1 /*************************************************************************** 2 * _ _ ____ _ 3 * Project ___| | | | _ \| | 4 * / __| | | | |_) | | 5 * | (__| |_| | _ <| |___ 6 * \___|\___/|_| \_\_____| 7 * 8 * Copyright (C) 1998 - 2016, Daniel Stenberg, <daniel (at) haxx.se>, et al. 9 * 10 * This software is licensed as described in the file COPYING, which 11 * you should have received as part of this distribution. The terms 12 * are also available at https://curl.haxx.se/docs/copyright.html. 13 * 14 * You may opt to use, copy, modify, merge, publish, distribute and/or sell 15 * copies of the Software, and permit persons to whom the Software is 16 * furnished to do so, under the terms of the COPYING file. 17 * 18 * This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY 19 * KIND, either express or implied. 20 * 21 ***************************************************************************/ 22 23 #include "curl_setup.h" 24 25 #include <curl/curl.h> 26 27 #ifdef HAVE_NETINET_IN_H 28 # include <netinet/in.h> 29 #endif 30 #ifdef HAVE_NETDB_H 31 # include <netdb.h> 32 #endif 33 #ifdef HAVE_ARPA_INET_H 34 # include <arpa/inet.h> 35 #endif 36 #ifdef HAVE_SYS_UN_H 37 # include <sys/un.h> 38 #endif 39 40 #ifdef __VMS 41 # include <in.h> 42 # include <inet.h> 43 #endif 44 45 #if defined(NETWARE) && defined(__NOVELL_LIBC__) 46 # undef in_addr_t 47 # define in_addr_t unsigned long 48 #endif 49 50 #include "curl_addrinfo.h" 51 #include "inet_pton.h" 52 #include "warnless.h" 53 /* The last 3 #include files should be in this order */ 54 #include "curl_printf.h" 55 #include "curl_memory.h" 56 #include "memdebug.h" 57 58 /* 59 * Curl_freeaddrinfo() 60 * 61 * This is used to free a linked list of Curl_addrinfo structs along 62 * with all its associated allocated storage. This function should be 63 * called once for each successful call to Curl_getaddrinfo_ex() or to 64 * any function call which actually allocates a Curl_addrinfo struct. 65 */ 66 67 #if defined(__INTEL_COMPILER) && (__INTEL_COMPILER == 910) && \ 68 defined(__OPTIMIZE__) && defined(__unix__) && defined(__i386__) 69 /* workaround icc 9.1 optimizer issue */ 70 # define vqualifier volatile 71 #else 72 # define vqualifier 73 #endif 74 75 void 76 Curl_freeaddrinfo(Curl_addrinfo *cahead) 77 { 78 Curl_addrinfo *vqualifier canext; 79 Curl_addrinfo *ca; 80 81 for(ca = cahead; ca != NULL; ca = canext) { 82 free(ca->ai_addr); 83 free(ca->ai_canonname); 84 canext = ca->ai_next; 85 86 free(ca); 87 } 88 } 89 90 91 #ifdef HAVE_GETADDRINFO 92 /* 93 * Curl_getaddrinfo_ex() 94 * 95 * This is a wrapper function around system's getaddrinfo(), with 96 * the only difference that instead of returning a linked list of 97 * addrinfo structs this one returns a linked list of Curl_addrinfo 98 * ones. The memory allocated by this function *MUST* be free'd with 99 * Curl_freeaddrinfo(). For each successful call to this function 100 * there must be an associated call later to Curl_freeaddrinfo(). 101 * 102 * There should be no single call to system's getaddrinfo() in the 103 * whole library, any such call should be 'routed' through this one. 104 */ 105 106 int 107 Curl_getaddrinfo_ex(const char *nodename, 108 const char *servname, 109 const struct addrinfo *hints, 110 Curl_addrinfo **result) 111 { 112 const struct addrinfo *ai; 113 struct addrinfo *aihead; 114 Curl_addrinfo *cafirst = NULL; 115 Curl_addrinfo *calast = NULL; 116 Curl_addrinfo *ca; 117 size_t ss_size; 118 int error; 119 120 *result = NULL; /* assume failure */ 121 122 error = getaddrinfo(nodename, servname, hints, &aihead); 123 if(error) 124 return error; 125 126 /* traverse the addrinfo list */ 127 128 for(ai = aihead; ai != NULL; ai = ai->ai_next) { 129 130 /* ignore elements with unsupported address family, */ 131 /* settle family-specific sockaddr structure size. */ 132 if(ai->ai_family == AF_INET) 133 ss_size = sizeof(struct sockaddr_in); 134 #ifdef ENABLE_IPV6 135 else if(ai->ai_family == AF_INET6) 136 ss_size = sizeof(struct sockaddr_in6); 137 #endif 138 else 139 continue; 140 141 /* ignore elements without required address info */ 142 if((ai->ai_addr == NULL) || !(ai->ai_addrlen > 0)) 143 continue; 144 145 /* ignore elements with bogus address size */ 146 if((size_t)ai->ai_addrlen < ss_size) 147 continue; 148 149 if((ca = malloc(sizeof(Curl_addrinfo))) == NULL) { 150 error = EAI_MEMORY; 151 break; 152 } 153 154 /* copy each structure member individually, member ordering, */ 155 /* size, or padding might be different for each platform. */ 156 157 ca->ai_flags = ai->ai_flags; 158 ca->ai_family = ai->ai_family; 159 ca->ai_socktype = ai->ai_socktype; 160 ca->ai_protocol = ai->ai_protocol; 161 ca->ai_addrlen = (curl_socklen_t)ss_size; 162 ca->ai_addr = NULL; 163 ca->ai_canonname = NULL; 164 ca->ai_next = NULL; 165 166 if((ca->ai_addr = malloc(ss_size)) == NULL) { 167 error = EAI_MEMORY; 168 free(ca); 169 break; 170 } 171 memcpy(ca->ai_addr, ai->ai_addr, ss_size); 172 173 if(ai->ai_canonname != NULL) { 174 if((ca->ai_canonname = strdup(ai->ai_canonname)) == NULL) { 175 error = EAI_MEMORY; 176 free(ca->ai_addr); 177 free(ca); 178 break; 179 } 180 } 181 182 /* if the return list is empty, this becomes the first element */ 183 if(!cafirst) 184 cafirst = ca; 185 186 /* add this element last in the return list */ 187 if(calast) 188 calast->ai_next = ca; 189 calast = ca; 190 191 } 192 193 /* destroy the addrinfo list */ 194 if(aihead) 195 freeaddrinfo(aihead); 196 197 /* if we failed, also destroy the Curl_addrinfo list */ 198 if(error) { 199 Curl_freeaddrinfo(cafirst); 200 cafirst = NULL; 201 } 202 else if(!cafirst) { 203 #ifdef EAI_NONAME 204 /* rfc3493 conformant */ 205 error = EAI_NONAME; 206 #else 207 /* rfc3493 obsoleted */ 208 error = EAI_NODATA; 209 #endif 210 #ifdef USE_WINSOCK 211 SET_SOCKERRNO(error); 212 #endif 213 } 214 215 *result = cafirst; 216 217 /* This is not a CURLcode */ 218 return error; 219 } 220 #endif /* HAVE_GETADDRINFO */ 221 222 223 /* 224 * Curl_he2ai() 225 * 226 * This function returns a pointer to the first element of a newly allocated 227 * Curl_addrinfo struct linked list filled with the data of a given hostent. 228 * Curl_addrinfo is meant to work like the addrinfo struct does for a IPv6 229 * stack, but usable also for IPv4, all hosts and environments. 230 * 231 * The memory allocated by this function *MUST* be free'd later on calling 232 * Curl_freeaddrinfo(). For each successful call to this function there 233 * must be an associated call later to Curl_freeaddrinfo(). 234 * 235 * Curl_addrinfo defined in "lib/curl_addrinfo.h" 236 * 237 * struct Curl_addrinfo { 238 * int ai_flags; 239 * int ai_family; 240 * int ai_socktype; 241 * int ai_protocol; 242 * curl_socklen_t ai_addrlen; * Follow rfc3493 struct addrinfo * 243 * char *ai_canonname; 244 * struct sockaddr *ai_addr; 245 * struct Curl_addrinfo *ai_next; 246 * }; 247 * typedef struct Curl_addrinfo Curl_addrinfo; 248 * 249 * hostent defined in <netdb.h> 250 * 251 * struct hostent { 252 * char *h_name; 253 * char **h_aliases; 254 * int h_addrtype; 255 * int h_length; 256 * char **h_addr_list; 257 * }; 258 * 259 * for backward compatibility: 260 * 261 * #define h_addr h_addr_list[0] 262 */ 263 264 Curl_addrinfo * 265 Curl_he2ai(const struct hostent *he, int port) 266 { 267 Curl_addrinfo *ai; 268 Curl_addrinfo *prevai = NULL; 269 Curl_addrinfo *firstai = NULL; 270 struct sockaddr_in *addr; 271 #ifdef ENABLE_IPV6 272 struct sockaddr_in6 *addr6; 273 #endif 274 CURLcode result = CURLE_OK; 275 int i; 276 char *curr; 277 278 if(!he) 279 /* no input == no output! */ 280 return NULL; 281 282 DEBUGASSERT((he->h_name != NULL) && (he->h_addr_list != NULL)); 283 284 for(i=0; (curr = he->h_addr_list[i]) != NULL; i++) { 285 286 size_t ss_size; 287 #ifdef ENABLE_IPV6 288 if(he->h_addrtype == AF_INET6) 289 ss_size = sizeof (struct sockaddr_in6); 290 else 291 #endif 292 ss_size = sizeof (struct sockaddr_in); 293 294 if((ai = calloc(1, sizeof(Curl_addrinfo))) == NULL) { 295 result = CURLE_OUT_OF_MEMORY; 296 break; 297 } 298 if((ai->ai_canonname = strdup(he->h_name)) == NULL) { 299 result = CURLE_OUT_OF_MEMORY; 300 free(ai); 301 break; 302 } 303 if((ai->ai_addr = calloc(1, ss_size)) == NULL) { 304 result = CURLE_OUT_OF_MEMORY; 305 free(ai->ai_canonname); 306 free(ai); 307 break; 308 } 309 310 if(!firstai) 311 /* store the pointer we want to return from this function */ 312 firstai = ai; 313 314 if(prevai) 315 /* make the previous entry point to this */ 316 prevai->ai_next = ai; 317 318 ai->ai_family = he->h_addrtype; 319 320 /* we return all names as STREAM, so when using this address for TFTP 321 the type must be ignored and conn->socktype be used instead! */ 322 ai->ai_socktype = SOCK_STREAM; 323 324 ai->ai_addrlen = (curl_socklen_t)ss_size; 325 326 /* leave the rest of the struct filled with zero */ 327 328 switch (ai->ai_family) { 329 case AF_INET: 330 addr = (void *)ai->ai_addr; /* storage area for this info */ 331 332 memcpy(&addr->sin_addr, curr, sizeof(struct in_addr)); 333 addr->sin_family = (unsigned short)(he->h_addrtype); 334 addr->sin_port = htons((unsigned short)port); 335 break; 336 337 #ifdef ENABLE_IPV6 338 case AF_INET6: 339 addr6 = (void *)ai->ai_addr; /* storage area for this info */ 340 341 memcpy(&addr6->sin6_addr, curr, sizeof(struct in6_addr)); 342 addr6->sin6_family = (unsigned short)(he->h_addrtype); 343 addr6->sin6_port = htons((unsigned short)port); 344 break; 345 #endif 346 } 347 348 prevai = ai; 349 } 350 351 if(result) { 352 Curl_freeaddrinfo(firstai); 353 firstai = NULL; 354 } 355 356 return firstai; 357 } 358 359 360 struct namebuff { 361 struct hostent hostentry; 362 union { 363 struct in_addr ina4; 364 #ifdef ENABLE_IPV6 365 struct in6_addr ina6; 366 #endif 367 } addrentry; 368 char *h_addr_list[2]; 369 }; 370 371 372 /* 373 * Curl_ip2addr() 374 * 375 * This function takes an internet address, in binary form, as input parameter 376 * along with its address family and the string version of the address, and it 377 * returns a Curl_addrinfo chain filled in correctly with information for the 378 * given address/host 379 */ 380 381 Curl_addrinfo * 382 Curl_ip2addr(int af, const void *inaddr, const char *hostname, int port) 383 { 384 Curl_addrinfo *ai; 385 386 #if defined(__VMS) && \ 387 defined(__INITIAL_POINTER_SIZE) && (__INITIAL_POINTER_SIZE == 64) 388 #pragma pointer_size save 389 #pragma pointer_size short 390 #pragma message disable PTRMISMATCH 391 #endif 392 393 struct hostent *h; 394 struct namebuff *buf; 395 char *addrentry; 396 char *hoststr; 397 size_t addrsize; 398 399 DEBUGASSERT(inaddr && hostname); 400 401 buf = malloc(sizeof(struct namebuff)); 402 if(!buf) 403 return NULL; 404 405 hoststr = strdup(hostname); 406 if(!hoststr) { 407 free(buf); 408 return NULL; 409 } 410 411 switch(af) { 412 case AF_INET: 413 addrsize = sizeof(struct in_addr); 414 addrentry = (void *)&buf->addrentry.ina4; 415 memcpy(addrentry, inaddr, sizeof(struct in_addr)); 416 break; 417 #ifdef ENABLE_IPV6 418 case AF_INET6: 419 addrsize = sizeof(struct in6_addr); 420 addrentry = (void *)&buf->addrentry.ina6; 421 memcpy(addrentry, inaddr, sizeof(struct in6_addr)); 422 break; 423 #endif 424 default: 425 free(hoststr); 426 free(buf); 427 return NULL; 428 } 429 430 h = &buf->hostentry; 431 h->h_name = hoststr; 432 h->h_aliases = NULL; 433 h->h_addrtype = (short)af; 434 h->h_length = (short)addrsize; 435 h->h_addr_list = &buf->h_addr_list[0]; 436 h->h_addr_list[0] = addrentry; 437 h->h_addr_list[1] = NULL; /* terminate list of entries */ 438 439 #if defined(__VMS) && \ 440 defined(__INITIAL_POINTER_SIZE) && (__INITIAL_POINTER_SIZE == 64) 441 #pragma pointer_size restore 442 #pragma message enable PTRMISMATCH 443 #endif 444 445 ai = Curl_he2ai(h, port); 446 447 free(hoststr); 448 free(buf); 449 450 return ai; 451 } 452 453 /* 454 * Given an IPv4 or IPv6 dotted string address, this converts it to a proper 455 * allocated Curl_addrinfo struct and returns it. 456 */ 457 Curl_addrinfo *Curl_str2addr(char *address, int port) 458 { 459 struct in_addr in; 460 if(Curl_inet_pton(AF_INET, address, &in) > 0) 461 /* This is a dotted IP address 123.123.123.123-style */ 462 return Curl_ip2addr(AF_INET, &in, address, port); 463 #ifdef ENABLE_IPV6 464 else { 465 struct in6_addr in6; 466 if(Curl_inet_pton(AF_INET6, address, &in6) > 0) 467 /* This is a dotted IPv6 address ::1-style */ 468 return Curl_ip2addr(AF_INET6, &in6, address, port); 469 } 470 #endif 471 return NULL; /* bad input format */ 472 } 473 474 #ifdef USE_UNIX_SOCKETS 475 /** 476 * Given a path to a Unix domain socket, return a newly allocated Curl_addrinfo 477 * struct initialized with this path. 478 */ 479 Curl_addrinfo *Curl_unix2addr(const char *path) 480 { 481 Curl_addrinfo *ai; 482 struct sockaddr_un *sa_un; 483 size_t path_len; 484 485 ai = calloc(1, sizeof(Curl_addrinfo)); 486 if(!ai) 487 return NULL; 488 if((ai->ai_addr = calloc(1, sizeof(struct sockaddr_un))) == NULL) { 489 free(ai); 490 return NULL; 491 } 492 /* sun_path must be able to store the NUL-terminated path */ 493 path_len = strlen(path); 494 if(path_len >= sizeof(sa_un->sun_path)) { 495 free(ai->ai_addr); 496 free(ai); 497 return NULL; 498 } 499 500 ai->ai_family = AF_UNIX; 501 ai->ai_socktype = SOCK_STREAM; /* assume reliable transport for HTTP */ 502 ai->ai_addrlen = (curl_socklen_t) sizeof(struct sockaddr_un); 503 sa_un = (void *) ai->ai_addr; 504 sa_un->sun_family = AF_UNIX; 505 memcpy(sa_un->sun_path, path, path_len + 1); /* copy NUL byte */ 506 return ai; 507 } 508 #endif 509 510 #if defined(CURLDEBUG) && defined(HAVE_FREEADDRINFO) 511 /* 512 * curl_dofreeaddrinfo() 513 * 514 * This is strictly for memory tracing and are using the same style as the 515 * family otherwise present in memdebug.c. I put these ones here since they 516 * require a bunch of structs I didn't want to include in memdebug.c 517 */ 518 519 void 520 curl_dofreeaddrinfo(struct addrinfo *freethis, 521 int line, const char *source) 522 { 523 #ifdef USE_LWIPSOCK 524 lwip_freeaddrinfo(freethis); 525 #else 526 (freeaddrinfo)(freethis); 527 #endif 528 curl_memlog("ADDR %s:%d freeaddrinfo(%p)\n", 529 source, line, (void *)freethis); 530 } 531 #endif /* defined(CURLDEBUG) && defined(HAVE_FREEADDRINFO) */ 532 533 534 #if defined(CURLDEBUG) && defined(HAVE_GETADDRINFO) 535 /* 536 * curl_dogetaddrinfo() 537 * 538 * This is strictly for memory tracing and are using the same style as the 539 * family otherwise present in memdebug.c. I put these ones here since they 540 * require a bunch of structs I didn't want to include in memdebug.c 541 */ 542 543 int 544 curl_dogetaddrinfo(const char *hostname, 545 const char *service, 546 const struct addrinfo *hints, 547 struct addrinfo **result, 548 int line, const char *source) 549 { 550 #ifdef USE_LWIPSOCK 551 int res=lwip_getaddrinfo(hostname, service, hints, result); 552 #else 553 int res=(getaddrinfo)(hostname, service, hints, result); 554 #endif 555 if(0 == res) 556 /* success */ 557 curl_memlog("ADDR %s:%d getaddrinfo() = %p\n", 558 source, line, (void *)*result); 559 else 560 curl_memlog("ADDR %s:%d getaddrinfo() failed\n", 561 source, line); 562 return res; 563 } 564 #endif /* defined(CURLDEBUG) && defined(HAVE_GETADDRINFO) */ 565 566 #if defined(HAVE_GETADDRINFO) && defined(USE_RESOLVE_ON_IPS) 567 /* 568 * Work-arounds the sin6_port is always zero bug on iOS 9.3.2 and Mac OS X 569 * 10.11.5. 570 */ 571 void Curl_addrinfo_set_port(Curl_addrinfo *addrinfo, int port) 572 { 573 Curl_addrinfo *ca; 574 struct sockaddr_in *addr; 575 #ifdef ENABLE_IPV6 576 struct sockaddr_in6 *addr6; 577 #endif 578 for(ca = addrinfo; ca != NULL; ca = ca->ai_next) { 579 switch (ca->ai_family) { 580 case AF_INET: 581 addr = (void *)ca->ai_addr; /* storage area for this info */ 582 addr->sin_port = htons((unsigned short)port); 583 break; 584 585 #ifdef ENABLE_IPV6 586 case AF_INET6: 587 addr6 = (void *)ca->ai_addr; /* storage area for this info */ 588 addr6->sin6_port = htons((unsigned short)port); 589 break; 590 #endif 591 } 592 } 593 } 594 #endif 595