1 /* $KAME: getaddrinfo.c,v 1.14 2001/01/06 09:41:15 jinmei Exp $ */
4 * Copyright (C) 1995, 1996, 1997, and 1998 WIDE Project.
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
15 * 3. Neither the name of the project nor the names of its contributors
16 * may be used to endorse or promote products derived from this software
17 * without specific prior written permission.
19 * THIS SOFTWARE IS PROVIDED BY THE PROJECT AND CONTRIBUTORS ``AS IS'' AND
20 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
21 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
22 * ARE DISCLAIMED. IN NO EVENT SHALL THE PROJECT OR CONTRIBUTORS BE LIABLE
23 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
24 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
25 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
26 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
27 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
28 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33 * Issues to be discussed:
34 * - Thread safe-ness must be checked.
35 * - Return values. There are nonstandard return values defined and used
36 * in the source code. This is because RFC2553 is silent about which error
37 * code must be returned for which situation.
38 * - IPv4 classful (shortened) form. RFC2553 is silent about it. XNET 5.2
39 * says to use inet_aton() to convert IPv4 numeric to binary (allows
40 * classful form as a result).
41 * current code - disallow classful form for IPv4 (due to use of inet_pton).
42 * - freeaddrinfo(NULL). RFC2553 is silent about it. XNET 5.2 says it is
44 * current code - SEGV on freeaddrinfo(NULL)
46 * - We use getipnodebyname() just for thread-safeness. There's no intent
47 * to let it do PF_UNSPEC (actually we never pass PF_UNSPEC to
49 * - The code filters out AFs that are not supported by the kernel,
50 * when globbing NULL hostname (to loopback, or wildcard). Is it the right
51 * thing to do? What is the relationship with post-RFC2553 AI_ADDRCONFIG
53 * - (post-2553) semantics of AI_ADDRCONFIG itself is too vague.
54 * (1) what should we do against numeric hostname (2) what should we do
55 * against NULL hostname (3) what is AI_ADDRCONFIG itself. AF not ready?
56 * non-loopback address configured? global address configured?
57 * - To avoid search order issue, we have a big amount of code duplicate
58 * from gethnamaddr.c and some other places. The issues that there's no
59 * lower layer function to lookup "IPv4 or IPv6" record. Calling
60 * gethostbyname2 from getaddrinfo will end up in wrong search order, as
62 * - The code makes use of following calls when asked to resolver with
63 * ai_family = PF_UNSPEC:
64 * getipnodebyname(host, AF_INET6);
65 * getipnodebyname(host, AF_INET);
66 * This will result in the following queries if the node is configure to
67 * prefer /etc/hosts than DNS:
68 * lookup /etc/hosts for IPv6 address
69 * lookup DNS for IPv6 address
70 * lookup /etc/hosts for IPv4 address
71 * lookup DNS for IPv4 address
72 * which may not meet people's requirement.
73 * The right thing to happen is to have underlying layer which does
74 * PF_UNSPEC lookup (lookup both) and return chain of addrinfos.
75 * This would result in a bit of code duplicate with _dns_ghbyname() and
79 #include "port_before.h"
81 #include <sys/types.h>
82 #include <sys/param.h>
83 #include <sys/socket.h>
86 #include <netinet/in.h>
88 #include <arpa/inet.h>
89 #include <arpa/nameser.h>
104 #include <isc/assertions.h>
106 #include "port_after.h"
108 #include "irs_data.h"
115 static const char in_addrany[] = { 0, 0, 0, 0 };
116 static const char in6_addrany[] = {
117 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0
119 static const char in_loopback[] = { 127, 0, 0, 1 };
120 static const char in6_loopback[] = {
121 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1
124 static const struct afd {
129 const char *a_addrany;
130 const char *a_loopback;
133 {PF_INET6, sizeof(struct in6_addr),
134 sizeof(struct sockaddr_in6),
135 offsetof(struct sockaddr_in6, sin6_addr),
136 in6_addrany, in6_loopback, 1},
137 {PF_INET, sizeof(struct in_addr),
138 sizeof(struct sockaddr_in),
139 offsetof(struct sockaddr_in, sin_addr),
140 in_addrany, in_loopback, 0},
141 {0, 0, 0, 0, NULL, NULL, 0},
148 const char *e_protostr;
150 #define WILD_AF(ex) ((ex)->e_wild & 0x01)
151 #define WILD_SOCKTYPE(ex) ((ex)->e_wild & 0x02)
152 #define WILD_PROTOCOL(ex) ((ex)->e_wild & 0x04)
155 static const struct explore explore[] = {
157 { PF_LOCAL, 0, ANY, ANY, NULL, 0x01 },
159 { PF_INET6, SOCK_DGRAM, IPPROTO_UDP, "udp", 0x07 },
160 { PF_INET6, SOCK_STREAM, IPPROTO_TCP, "tcp", 0x07 },
161 { PF_INET6, SOCK_RAW, ANY, NULL, 0x05 },
162 { PF_INET, SOCK_DGRAM, IPPROTO_UDP, "udp", 0x07 },
163 { PF_INET, SOCK_STREAM, IPPROTO_TCP, "tcp", 0x07 },
164 { PF_INET, SOCK_RAW, ANY, NULL, 0x05 },
165 { -1, 0, 0, NULL, 0 },
170 static int str_isnumber __P((const char *));
171 static int explore_fqdn __P((const struct addrinfo *, const char *,
172 const char *, struct addrinfo **));
173 static int explore_copy __P((const struct addrinfo *, const struct addrinfo *,
174 struct addrinfo **));
175 static int explore_null __P((const struct addrinfo *,
176 const char *, struct addrinfo **));
177 static int explore_numeric __P((const struct addrinfo *, const char *,
178 const char *, struct addrinfo **));
179 static int explore_numeric_scope __P((const struct addrinfo *, const char *,
180 const char *, struct addrinfo **));
181 static int get_canonname __P((const struct addrinfo *,
182 struct addrinfo *, const char *));
183 static struct addrinfo *get_ai __P((const struct addrinfo *,
184 const struct afd *, const char *));
185 static struct addrinfo *copy_ai __P((const struct addrinfo *));
186 static int get_portmatch __P((const struct addrinfo *, const char *));
187 static int get_port __P((const struct addrinfo *, const char *, int));
188 static const struct afd *find_afd __P((int));
189 static int addrconfig __P((int));
190 static int ip6_str2scopeid __P((char *, struct sockaddr_in6 *,
191 u_int32_t *scopeidp));
192 static struct net_data *init __P((void));
194 struct addrinfo *hostent2addrinfo __P((struct hostent *,
195 const struct addrinfo *));
196 struct addrinfo *addr2addrinfo __P((const struct addrinfo *,
200 static const char *ai_errlist[] = {
202 "Address family for hostname not supported", /* EAI_ADDRFAMILY */
203 "Temporary failure in name resolution", /* EAI_AGAIN */
204 "Invalid value for ai_flags", /* EAI_BADFLAGS */
205 "Non-recoverable failure in name resolution", /* EAI_FAIL */
206 "ai_family not supported", /* EAI_FAMILY */
207 "Memory allocation failure", /* EAI_MEMORY */
208 "No address associated with hostname", /* EAI_NODATA */
209 "hostname nor servname provided, or not known", /* EAI_NONAME */
210 "servname not supported for ai_socktype", /* EAI_SERVICE */
211 "ai_socktype not supported", /* EAI_SOCKTYPE */
212 "System error returned in errno", /* EAI_SYSTEM */
213 "Invalid value for hints", /* EAI_BADHINTS */
214 "Resolved protocol is unknown", /* EAI_PROTOCOL */
215 "Unknown error", /* EAI_MAX */
219 /* XXX macros that make external reference is BAD. */
221 #define GET_AI(ai, afd, addr) \
223 /* external reference: pai, error, and label free */ \
224 (ai) = get_ai(pai, (afd), (addr)); \
225 if ((ai) == NULL) { \
226 error = EAI_MEMORY; \
229 } while (/*CONSTCOND*/0)
231 #define GET_PORT(ai, serv) \
233 /* external reference: error and label free */ \
234 error = get_port((ai), (serv), 0); \
237 } while (/*CONSTCOND*/0)
239 #define GET_CANONNAME(ai, str) \
241 /* external reference: pai, error and label free */ \
242 error = get_canonname(pai, (ai), (str)); \
245 } while (/*CONSTCOND*/0)
248 #define SETERROR(err) \
250 /* external reference: error, and label bad */ \
254 } while (/*CONSTCOND*/0)
256 #define SETERROR(err) \
258 /* external reference: error, and label bad */ \
260 if (error == error) \
262 } while (/*CONSTCOND*/0)
266 #define MATCH_FAMILY(x, y, w) \
267 ((x) == (y) || (/*CONSTCOND*/(w) && ((x) == PF_UNSPEC || (y) == PF_UNSPEC)))
268 #define MATCH(x, y, w) \
269 ((x) == (y) || (/*CONSTCOND*/(w) && ((x) == ANY || (y) == ANY)))
271 #if 0 /* bind8 has its own version */
276 if (ecode < 0 || ecode > EAI_MAX)
278 return ai_errlist[ecode];
286 struct addrinfo *next;
290 if (ai->ai_canonname)
291 free(ai->ai_canonname);
292 /* no need to free(ai->ai_addr) */
308 (void)strtoul(p, &ep, 10);
309 if (errno == 0 && ep && *ep == '\0')
316 getaddrinfo(hostname, servname, hints, res)
317 const char *hostname, *servname;
318 const struct addrinfo *hints;
319 struct addrinfo **res;
321 struct addrinfo sentinel;
322 struct addrinfo *cur;
324 struct addrinfo ai, ai0, *afai = NULL;
325 struct addrinfo *pai;
326 const struct explore *ex;
328 memset(&sentinel, 0, sizeof(sentinel));
332 pai->ai_family = PF_UNSPEC;
333 pai->ai_socktype = ANY;
334 pai->ai_protocol = ANY;
335 #if defined(sun) && defined(_SOCKLEN_T) && defined(__sparcv9)
337 * clear _ai_pad to preserve binary
338 * compatibility with previously compiled 64-bit
339 * applications in a pre-SUSv3 environment by
340 * guaranteeing the upper 32-bits are empty.
345 pai->ai_canonname = NULL;
349 if (hostname == NULL && servname == NULL)
352 /* error check for hints */
353 if (hints->ai_addrlen || hints->ai_canonname ||
354 hints->ai_addr || hints->ai_next)
355 SETERROR(EAI_BADHINTS); /* xxx */
356 if (hints->ai_flags & ~AI_MASK)
357 SETERROR(EAI_BADFLAGS);
358 switch (hints->ai_family) {
364 SETERROR(EAI_FAMILY);
366 memcpy(pai, hints, sizeof(*pai));
368 #if defined(sun) && defined(_SOCKLEN_T) && defined(__sparcv9)
370 * We need to clear _ai_pad to preserve binary
371 * compatibility. See prior comment.
376 * if both socktype/protocol are specified, check if they
377 * are meaningful combination.
379 if (pai->ai_socktype != ANY && pai->ai_protocol != ANY) {
380 for (ex = explore; ex->e_af >= 0; ex++) {
381 if (pai->ai_family != ex->e_af)
383 if (ex->e_socktype == ANY)
385 if (ex->e_protocol == ANY)
387 if (pai->ai_socktype == ex->e_socktype &&
388 pai->ai_protocol != ex->e_protocol) {
389 SETERROR(EAI_BADHINTS);
396 * post-2553: AI_ALL and AI_V4MAPPED are effective only against
397 * AF_INET6 query. They needs to be ignored if specified in other
400 switch (pai->ai_flags & (AI_ALL | AI_V4MAPPED)) {
402 case AI_ALL | AI_V4MAPPED:
403 if (pai->ai_family != AF_INET6)
404 pai->ai_flags &= ~(AI_ALL | AI_V4MAPPED);
409 SETERROR(EAI_BADFLAGS);
411 pai->ai_flags &= ~(AI_ALL | AI_V4MAPPED);
417 * check for special cases. (1) numeric servname is disallowed if
418 * socktype/protocol are left unspecified. (2) servname is disallowed
419 * for raw and other inet{,6} sockets.
421 if (MATCH_FAMILY(pai->ai_family, PF_INET, 1)
423 || MATCH_FAMILY(pai->ai_family, PF_INET6, 1)
426 ai0 = *pai; /* backup *pai */
428 if (pai->ai_family == PF_UNSPEC) {
430 pai->ai_family = PF_INET6;
432 pai->ai_family = PF_INET;
435 error = get_portmatch(pai, servname);
444 /* NULL hostname, or numeric hostname */
445 for (ex = explore; ex->e_af >= 0; ex++) {
448 if (!MATCH_FAMILY(pai->ai_family, ex->e_af, WILD_AF(ex)))
450 if (!MATCH(pai->ai_socktype, ex->e_socktype, WILD_SOCKTYPE(ex)))
452 if (!MATCH(pai->ai_protocol, ex->e_protocol, WILD_PROTOCOL(ex)))
455 if (pai->ai_family == PF_UNSPEC)
456 pai->ai_family = ex->e_af;
457 if (pai->ai_socktype == ANY && ex->e_socktype != ANY)
458 pai->ai_socktype = ex->e_socktype;
459 if (pai->ai_protocol == ANY && ex->e_protocol != ANY)
460 pai->ai_protocol = ex->e_protocol;
463 * if the servname does not match socktype/protocol, ignore it.
465 if (get_portmatch(pai, servname) != 0)
468 if (hostname == NULL) {
470 * filter out AFs that are not supported by the kernel
473 if (!addrconfig(pai->ai_family))
475 error = explore_null(pai, servname, &cur->ai_next);
477 error = explore_numeric_scope(pai, hostname, servname,
483 while (cur && cur->ai_next)
489 * If numreic representation of AF1 can be interpreted as FQDN
490 * representation of AF2, we need to think again about the code below.
492 if (sentinel.ai_next)
495 if (pai->ai_flags & AI_NUMERICHOST)
496 SETERROR(EAI_NONAME);
497 if (hostname == NULL)
498 SETERROR(EAI_NONAME);
501 * hostname as alphabetical name.
502 * We'll make sure that
503 * - if returning addrinfo list is empty, return non-zero error
504 * value (already known one or EAI_NONAME).
506 * + if we haven't had any errors, return 0 (i.e. success).
507 * + if we've had an error, free the list and return the error.
508 * without any assumption on the behavior of explore_fqdn().
511 /* first, try to query DNS for all possible address families. */
513 error = explore_fqdn(pai, hostname, servname, &afai);
520 error = EAI_NONAME; /* we've had no errors. */
525 * we would like to prefer AF_INET6 than AF_INET, so we'll make an
528 for (ex = explore; ex->e_af >= 0; ex++) {
531 if (pai->ai_family == PF_UNSPEC)
532 pai->ai_family = ex->e_af;
534 if (!MATCH_FAMILY(pai->ai_family, ex->e_af, WILD_AF(ex)))
536 if (!MATCH(pai->ai_socktype, ex->e_socktype,
537 WILD_SOCKTYPE(ex))) {
540 if (!MATCH(pai->ai_protocol, ex->e_protocol,
541 WILD_PROTOCOL(ex))) {
547 * If AI_ADDRCONFIG is specified, check if we are
548 * expected to return the address family or not.
550 if ((pai->ai_flags & AI_ADDRCONFIG) != 0 &&
551 !addrconfig(pai->ai_family))
555 if (pai->ai_family == PF_UNSPEC)
556 pai->ai_family = ex->e_af;
557 if (pai->ai_socktype == ANY && ex->e_socktype != ANY)
558 pai->ai_socktype = ex->e_socktype;
559 if (pai->ai_protocol == ANY && ex->e_protocol != ANY)
560 pai->ai_protocol = ex->e_protocol;
563 * if the servname does not match socktype/protocol, ignore it.
565 if (get_portmatch(pai, servname) != 0)
568 if ((error = explore_copy(pai, afai, &cur->ai_next)) != 0) {
573 while (cur && cur->ai_next)
577 freeaddrinfo(afai); /* afai must not be NULL at this point. */
579 if (sentinel.ai_next) {
581 *res = sentinel.ai_next;
585 * All the process succeeded, but we've had an empty list.
586 * This can happen if the given hints do not match our
594 if (sentinel.ai_next)
595 freeaddrinfo(sentinel.ai_next);
601 * FQDN hostname, DNS lookup
604 explore_fqdn(pai, hostname, servname, res)
605 const struct addrinfo *pai;
606 const char *hostname;
607 const char *servname;
608 struct addrinfo **res;
610 struct addrinfo *result;
611 struct addrinfo *cur;
612 struct net_data *net_data = init();
615 char tmp[NS_MAXDNAME];
618 INSIST(res != NULL && *res == NULL);
621 * if the servname does not match socktype/protocol, ignore it.
623 if (get_portmatch(pai, servname) != 0)
626 if (!net_data || !(ho = net_data->ho))
628 #if 0 /* XXX (notyet) */
629 if (net_data->ho_stayopen && net_data->ho_last &&
630 net_data->ho_last->h_addrtype == af) {
631 if (ns_samename(name, net_data->ho_last->h_name) == 1)
632 return (net_data->ho_last);
633 for (hap = net_data->ho_last->h_aliases; hap && *hap; hap++)
634 if (ns_samename(name, *hap) == 1)
635 return (net_data->ho_last);
638 if (!strchr(hostname, '.') &&
639 (cp = res_hostalias(net_data->res, hostname,
642 result = (*ho->addrinfo)(ho, hostname, pai);
643 if (!net_data->ho_stayopen) {
646 if (result == NULL) {
664 case NETDB_SUCCESS: /* should be impossible... */
671 for (cur = result; cur; cur = cur->ai_next) {
672 GET_PORT(cur, servname); /* XXX: redundant lookups... */
673 /* canonname should already be filled. */
682 freeaddrinfo(result);
687 explore_copy(pai, src0, res)
688 const struct addrinfo *pai; /* seed */
689 const struct addrinfo *src0; /* source */
690 struct addrinfo **res;
693 struct addrinfo sentinel, *cur;
694 const struct addrinfo *src;
697 sentinel.ai_next = NULL;
700 for (src = src0; src != NULL; src = src->ai_next) {
701 if (src->ai_family != pai->ai_family)
704 cur->ai_next = copy_ai(src);
710 cur->ai_next->ai_socktype = pai->ai_socktype;
711 cur->ai_next->ai_protocol = pai->ai_protocol;
715 *res = sentinel.ai_next;
719 freeaddrinfo(sentinel.ai_next);
725 * passive socket -> anyaddr (0.0.0.0 or ::)
726 * non-passive socket -> localhost (127.0.0.1 or ::1)
729 explore_null(pai, servname, res)
730 const struct addrinfo *pai;
731 const char *servname;
732 struct addrinfo **res;
734 const struct afd *afd;
735 struct addrinfo *cur;
736 struct addrinfo sentinel;
740 sentinel.ai_next = NULL;
743 afd = find_afd(pai->ai_family);
747 if (pai->ai_flags & AI_PASSIVE) {
748 GET_AI(cur->ai_next, afd, afd->a_addrany);
750 * GET_CANONNAME(cur->ai_next, "anyaddr");
752 GET_PORT(cur->ai_next, servname);
754 GET_AI(cur->ai_next, afd, afd->a_loopback);
756 * GET_CANONNAME(cur->ai_next, "localhost");
758 GET_PORT(cur->ai_next, servname);
762 *res = sentinel.ai_next;
766 if (sentinel.ai_next)
767 freeaddrinfo(sentinel.ai_next);
775 explore_numeric(pai, hostname, servname, res)
776 const struct addrinfo *pai;
777 const char *hostname;
778 const char *servname;
779 struct addrinfo **res;
781 const struct afd *afd;
782 struct addrinfo *cur;
783 struct addrinfo sentinel;
788 sentinel.ai_next = NULL;
791 afd = find_afd(pai->ai_family);
796 #if 0 /*X/Open spec*/
798 if (inet_aton(hostname, (struct in_addr *)pton) == 1) {
799 if (pai->ai_family == afd->a_af ||
800 pai->ai_family == PF_UNSPEC /*?*/) {
801 GET_AI(cur->ai_next, afd, pton);
802 GET_PORT(cur->ai_next, servname);
806 SETERROR(EAI_FAMILY); /*xxx*/
811 if (inet_pton(afd->a_af, hostname, pton) == 1) {
812 if (pai->ai_family == afd->a_af ||
813 pai->ai_family == PF_UNSPEC /*?*/) {
814 GET_AI(cur->ai_next, afd, pton);
815 GET_PORT(cur->ai_next, servname);
819 SETERROR(EAI_FAMILY); /*xxx*/
824 *res = sentinel.ai_next;
829 if (sentinel.ai_next)
830 freeaddrinfo(sentinel.ai_next);
835 * numeric hostname with scope
838 explore_numeric_scope(pai, hostname, servname, res)
839 const struct addrinfo *pai;
840 const char *hostname;
841 const char *servname;
842 struct addrinfo **res;
844 #ifndef SCOPE_DELIMITER
845 return explore_numeric(pai, hostname, servname, res);
847 const struct afd *afd;
848 struct addrinfo *cur;
850 char *cp, *hostname2 = NULL, *scope, *addr;
851 struct sockaddr_in6 *sin6;
853 afd = find_afd(pai->ai_family);
858 return explore_numeric(pai, hostname, servname, res);
860 cp = strchr(hostname, SCOPE_DELIMITER);
862 return explore_numeric(pai, hostname, servname, res);
865 * Handle special case of <scoped_address><delimiter><scope id>
867 hostname2 = strdup(hostname);
868 if (hostname2 == NULL)
870 /* terminate at the delimiter */
871 hostname2[cp - hostname] = '\0';
875 error = explore_numeric(pai, addr, servname, res);
877 u_int32_t scopeid = 0;
879 for (cur = *res; cur; cur = cur->ai_next) {
880 if (cur->ai_family != AF_INET6)
882 sin6 = (struct sockaddr_in6 *)(void *)cur->ai_addr;
883 if (!ip6_str2scopeid(scope, sin6, &scopeid)) {
885 return(EAI_NONAME); /* XXX: is return OK? */
887 #ifdef HAVE_SIN6_SCOPE_ID
888 sin6->sin6_scope_id = scopeid;
900 get_canonname(pai, ai, str)
901 const struct addrinfo *pai;
905 if ((pai->ai_flags & AI_CANONNAME) != 0) {
906 ai->ai_canonname = (char *)malloc(strlen(str) + 1);
907 if (ai->ai_canonname == NULL)
909 strcpy(ai->ai_canonname, str);
914 static struct addrinfo *
915 get_ai(pai, afd, addr)
916 const struct addrinfo *pai;
917 const struct afd *afd;
923 ai = (struct addrinfo *)malloc(sizeof(struct addrinfo)
928 memcpy(ai, pai, sizeof(struct addrinfo));
929 ai->ai_addr = (struct sockaddr *)(void *)(ai + 1);
930 memset(ai->ai_addr, 0, (size_t)afd->a_socklen);
932 ai->ai_addr->sa_len = afd->a_socklen;
934 ai->ai_addrlen = afd->a_socklen;
935 ai->ai_addr->sa_family = ai->ai_family = afd->a_af;
936 p = (char *)(void *)(ai->ai_addr);
937 memcpy(p + afd->a_off, addr, (size_t)afd->a_addrlen);
941 /* XXX need to malloc() the same way we do from other functions! */
942 static struct addrinfo *
944 const struct addrinfo *pai;
949 l = sizeof(*ai) + pai->ai_addrlen;
950 if ((ai = (struct addrinfo *)malloc(l)) == NULL)
953 memcpy(ai, pai, sizeof(*ai));
954 ai->ai_addr = (struct sockaddr *)(void *)(ai + 1);
955 memcpy(ai->ai_addr, pai->ai_addr, pai->ai_addrlen);
957 if (pai->ai_canonname) {
958 l = strlen(pai->ai_canonname) + 1;
959 if ((ai->ai_canonname = malloc(l)) == NULL) {
963 strcpy(ai->ai_canonname, pai->ai_canonname); /* (checked) */
965 /* just to make sure */
966 ai->ai_canonname = NULL;
975 get_portmatch(const struct addrinfo *ai, const char *servname) {
977 /* get_port does not touch first argument. when matchonly == 1. */
978 /* LINTED const cast */
979 return get_port((const struct addrinfo *)ai, servname, 1);
983 get_port(const struct addrinfo *ai, const char *servname, int matchonly) {
989 if (servname == NULL)
991 switch (ai->ai_family) {
1001 switch (ai->ai_socktype) {
1009 switch (ai->ai_family) {
1022 return EAI_SOCKTYPE;
1025 if (str_isnumber(servname)) {
1028 port = atoi(servname);
1029 if (port < 0 || port > 65535)
1033 switch (ai->ai_socktype) {
1045 if ((sp = getservbyname(servname, proto)) == NULL)
1051 switch (ai->ai_family) {
1053 ((struct sockaddr_in *)(void *)
1054 ai->ai_addr)->sin_port = port;
1057 ((struct sockaddr_in6 *)(void *)
1058 ai->ai_addr)->sin6_port = port;
1066 static const struct afd *
1070 const struct afd *afd;
1072 if (af == PF_UNSPEC)
1074 for (afd = afdl; afd->a_af; afd++) {
1075 if (afd->a_af == af)
1082 * post-2553: AI_ADDRCONFIG check. if we use getipnodeby* as backend, backend
1083 * will take care of it.
1084 * the semantics of AI_ADDRCONFIG is not defined well. we are not sure
1085 * if the code is right or not.
1094 s = socket(af, SOCK_DGRAM, 0);
1096 if (errno != EMFILE)
1103 /* convert a string to a scope identifier. XXX: IPv6 specific */
1105 ip6_str2scopeid(char *scope, struct sockaddr_in6 *sin6,
1106 u_int32_t *scopeidp)
1110 struct in6_addr *a6 = &sin6->sin6_addr;
1113 /* empty scopeid portion is invalid */
1117 #ifdef USE_IFNAMELINKID
1118 if (IN6_IS_ADDR_LINKLOCAL(a6) || IN6_IS_ADDR_MC_LINKLOCAL(a6) ||
1119 IN6_IS_ADDR_MC_NODELOCAL(a6)) {
1121 * Using interface names as link indices can be allowed
1122 * only when we can assume a one-to-one mappings between
1123 * links and interfaces. See comments in getnameinfo.c.
1125 scopeid = if_nametoindex(scope);
1128 *scopeidp = scopeid;
1133 /* still unclear about literal, allow numeric only - placeholder */
1134 if (IN6_IS_ADDR_SITELOCAL(a6) || IN6_IS_ADDR_MC_SITELOCAL(a6))
1136 if (IN6_IS_ADDR_MC_ORGLOCAL(a6))
1139 goto trynumeric; /* global */
1141 /* try to convert to a numeric id as a last resort */
1144 lscopeid = strtoul(scope, &ep, 10);
1145 scopeid = lscopeid & 0xffffffff;
1146 if (errno == 0 && ep && *ep == '\0' && scopeid == lscopeid) {
1147 *scopeidp = scopeid;
1154 hostent2addrinfo(hp, pai)
1156 const struct addrinfo *pai;
1158 int i, af, error = 0;
1159 char **aplist = NULL, *ap;
1160 struct addrinfo sentinel, *cur;
1161 const struct afd *afd;
1163 af = hp->h_addrtype;
1164 if (pai->ai_family != AF_UNSPEC && af != pai->ai_family)
1171 aplist = hp->h_addr_list;
1173 memset(&sentinel, 0, sizeof(sentinel));
1176 for (i = 0; (ap = aplist[i]) != NULL; i++) {
1177 #if 0 /* the trick seems too much */
1178 af = hp->h_addr_list;
1179 if (af == AF_INET6 &&
1180 IN6_IS_ADDR_V4MAPPED((struct in6_addr *)ap)) {
1182 ap = ap + sizeof(struct in6_addr)
1183 - sizeof(struct in_addr);
1190 GET_AI(cur->ai_next, afd, ap);
1192 /* GET_PORT(cur->ai_next, servname); */
1193 if ((pai->ai_flags & AI_CANONNAME) != 0) {
1195 * RFC2553 says that ai_canonname will be set only for
1196 * the first element. we do it for all the elements,
1197 * just for convenience.
1199 GET_CANONNAME(cur->ai_next, hp->h_name);
1201 while (cur->ai_next) /* no need to loop, actually. */
1207 freeaddrinfo(cur->ai_next);
1208 cur->ai_next = NULL;
1209 /* continue, without tht pointer CUR advanced. */
1212 return(sentinel.ai_next);
1216 addr2addrinfo(pai, cp)
1217 const struct addrinfo *pai;
1220 const struct afd *afd;
1222 afd = find_afd(pai->ai_family);
1226 return(get_ai(pai, afd, cp));
1229 static struct net_data *
1232 struct net_data *net_data;
1234 if (!(net_data = net_data_init(NULL)))
1236 if (!net_data->ho) {
1237 net_data->ho = (*net_data->irs->ho_map)(net_data->irs);
1238 if (!net_data->ho || !net_data->res) {
1241 if (net_data && net_data->res)
1242 RES_SET_H_ERRNO(net_data->res, NETDB_INTERNAL);
1246 (*net_data->ho->res_set)(net_data->ho, net_data->res, NULL);