1 /***************************************************************************
2 * _ _ ____ _
3 * Project ___| | | | _ \| |
4 * / __| | | | |_) | |
5 * | (__| |_| | _ <| |___
6 * \___|\___/|_| \_\_____|
7 *
8 * Copyright (C) 1998 - 2016, Daniel Stenberg, <daniel@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
Curl_freeaddrinfo(Curl_addrinfo * cahead)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
Curl_getaddrinfo_ex(const char * nodename,const char * servname,const struct addrinfo * hints,Curl_addrinfo ** result)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 *
Curl_he2ai(const struct hostent * he,int port)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 *
Curl_ip2addr(int af,const void * inaddr,const char * hostname,int port)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 */
Curl_str2addr(char * address,int port)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 */
Curl_unix2addr(const char * path)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
curl_dofreeaddrinfo(struct addrinfo * freethis,int line,const char * source)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
curl_dogetaddrinfo(const char * hostname,const char * service,const struct addrinfo * hints,struct addrinfo ** result,int line,const char * source)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 */
Curl_addrinfo_set_port(Curl_addrinfo * addrinfo,int port)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