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