Merge branch 'vendor/LESS' into less_update
[dragonfly.git] / contrib / bind-9.5.2 / lib / bind9 / getaddresses.c
1 /*
2  * Copyright (C) 2004, 2005, 2007  Internet Systems Consortium, Inc. ("ISC")
3  * Copyright (C) 2001, 2002  Internet Software Consortium.
4  *
5  * Permission to use, copy, modify, and/or distribute this software for any
6  * purpose with or without fee is hereby granted, provided that the above
7  * copyright notice and this permission notice appear in all copies.
8  *
9  * THE SOFTWARE IS PROVIDED "AS IS" AND ISC DISCLAIMS ALL WARRANTIES WITH
10  * REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF MERCHANTABILITY
11  * AND FITNESS.  IN NO EVENT SHALL ISC BE LIABLE FOR ANY SPECIAL, DIRECT,
12  * INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM
13  * LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, NEGLIGENCE
14  * OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
15  * PERFORMANCE OF THIS SOFTWARE.
16  */
17
18 /* $Id: getaddresses.c,v 1.22 2007/06/19 23:47:16 tbox Exp $ */
19
20 /*! \file */
21
22 #include <config.h>
23 #include <string.h>
24
25 #include <isc/net.h>
26 #include <isc/netaddr.h>
27 #include <isc/netdb.h>
28 #include <isc/netscope.h>
29 #include <isc/result.h>
30 #include <isc/sockaddr.h>
31 #include <isc/util.h>
32
33 #include <bind9/getaddresses.h>
34
35 #ifdef HAVE_ADDRINFO
36 #ifdef HAVE_GETADDRINFO
37 #ifdef HAVE_GAISTRERROR
38 #define USE_GETADDRINFO
39 #endif
40 #endif
41 #endif
42
43 #ifndef USE_GETADDRINFO
44 #ifndef ISC_PLATFORM_NONSTDHERRNO
45 extern int h_errno;
46 #endif
47 #endif
48
49 isc_result_t
50 bind9_getaddresses(const char *hostname, in_port_t port,
51                    isc_sockaddr_t *addrs, int addrsize, int *addrcount)
52 {
53         struct in_addr in4;
54         struct in6_addr in6;
55         isc_boolean_t have_ipv4, have_ipv6;
56         int i;
57
58 #ifdef USE_GETADDRINFO
59         struct addrinfo *ai = NULL, *tmpai, hints;
60         int result;
61 #else
62         struct hostent *he;
63 #endif
64
65         REQUIRE(hostname != NULL);
66         REQUIRE(addrs != NULL);
67         REQUIRE(addrcount != NULL);
68         REQUIRE(addrsize > 0);
69
70         have_ipv4 = ISC_TF((isc_net_probeipv4() == ISC_R_SUCCESS));
71         have_ipv6 = ISC_TF((isc_net_probeipv6() == ISC_R_SUCCESS));
72
73         /*
74          * Try IPv4, then IPv6.  In order to handle the extended format
75          * for IPv6 scoped addresses (address%scope_ID), we'll use a local
76          * working buffer of 128 bytes.  The length is an ad-hoc value, but
77          * should be enough for this purpose; the buffer can contain a string
78          * of at least 80 bytes for scope_ID in addition to any IPv6 numeric
79          * addresses (up to 46 bytes), the delimiter character and the
80          * terminating NULL character.
81          */
82         if (inet_pton(AF_INET, hostname, &in4) == 1) {
83                 if (have_ipv4)
84                         isc_sockaddr_fromin(&addrs[0], &in4, port);
85                 else
86                         isc_sockaddr_v6fromin(&addrs[0], &in4, port);
87                 *addrcount = 1;
88                 return (ISC_R_SUCCESS);
89         } else if (strlen(hostname) <= 127U) {
90                 char tmpbuf[128], *d;
91                 isc_uint32_t zone = 0;
92
93                 strcpy(tmpbuf, hostname);
94                 d = strchr(tmpbuf, '%');
95                 if (d != NULL)
96                         *d = '\0';
97
98                 if (inet_pton(AF_INET6, tmpbuf, &in6) == 1) {
99                         isc_netaddr_t na;
100
101                         if (!have_ipv6)
102                                 return (ISC_R_FAMILYNOSUPPORT);
103
104                         if (d != NULL) {
105 #ifdef ISC_PLATFORM_HAVESCOPEID
106                                 isc_result_t result;
107
108                                 result = isc_netscope_pton(AF_INET6, d + 1,
109                                                            &in6, &zone);
110                                     
111                                 if (result != ISC_R_SUCCESS)
112                                         return (result);
113 #else
114                                 /*
115                                  * The extended format is specified while the
116                                  * system does not provide the ability to use
117                                  * it.  Throw an explicit error instead of
118                                  * ignoring the specified value.
119                                  */
120                                 return (ISC_R_BADADDRESSFORM);
121 #endif
122                         }
123
124                         isc_netaddr_fromin6(&na, &in6);
125                         isc_netaddr_setzone(&na, zone);
126                         isc_sockaddr_fromnetaddr(&addrs[0],
127                                                  (const isc_netaddr_t *)&na,
128                                                  port);
129
130                         *addrcount = 1;
131                         return (ISC_R_SUCCESS);
132                         
133                 }
134         }
135 #ifdef USE_GETADDRINFO
136         memset(&hints, 0, sizeof(hints));
137         if (!have_ipv6)
138                 hints.ai_family = PF_INET;
139         else if (!have_ipv4)
140                 hints.ai_family = PF_INET6;
141         else {
142                 hints.ai_family = PF_UNSPEC;
143 #ifdef AI_ADDRCONFIG
144                 hints.ai_flags = AI_ADDRCONFIG;
145 #endif
146         }
147         hints.ai_socktype = SOCK_STREAM;
148 #ifdef AI_ADDRCONFIG
149  again:
150 #endif
151         result = getaddrinfo(hostname, NULL, &hints, &ai);
152         switch (result) {
153         case 0:
154                 break;
155         case EAI_NONAME:
156 #if defined(EAI_NODATA) && (EAI_NODATA != EAI_NONAME)
157         case EAI_NODATA:
158 #endif
159                 return (ISC_R_NOTFOUND);
160 #ifdef AI_ADDRCONFIG
161         case EAI_BADFLAGS:
162                 if ((hints.ai_flags & AI_ADDRCONFIG) != 0) {
163                         hints.ai_flags &= ~AI_ADDRCONFIG;
164                         goto again;
165                 }
166 #endif
167         default:
168                 return (ISC_R_FAILURE);
169         }
170         for (tmpai = ai, i = 0;
171              tmpai != NULL && i < addrsize;
172              tmpai = tmpai->ai_next)
173         {
174                 if (tmpai->ai_family != AF_INET &&
175                     tmpai->ai_family != AF_INET6)
176                         continue;
177                 if (tmpai->ai_family == AF_INET) {
178                         struct sockaddr_in *sin;
179                         sin = (struct sockaddr_in *)tmpai->ai_addr;
180                         isc_sockaddr_fromin(&addrs[i], &sin->sin_addr, port);
181                 } else {
182                         struct sockaddr_in6 *sin6;
183                         sin6 = (struct sockaddr_in6 *)tmpai->ai_addr;
184                         isc_sockaddr_fromin6(&addrs[i], &sin6->sin6_addr,
185                                              port);
186                 }
187                 i++;
188
189         }
190         freeaddrinfo(ai);
191         *addrcount = i;
192 #else
193         he = gethostbyname(hostname);
194         if (he == NULL) {
195                 switch (h_errno) {
196                 case HOST_NOT_FOUND:
197 #ifdef NO_DATA
198                 case NO_DATA:
199 #endif
200 #if defined(NO_ADDRESS) && (!defined(NO_DATA) || (NO_DATA != NO_ADDRESS))
201                 case NO_ADDRESS:
202 #endif
203                         return (ISC_R_NOTFOUND);
204                 default:
205                         return (ISC_R_FAILURE);
206                 }
207         }
208         if (he->h_addrtype != AF_INET && he->h_addrtype != AF_INET6)
209                 return (ISC_R_NOTFOUND);
210         for (i = 0; i < addrsize; i++) {
211                 if (he->h_addrtype == AF_INET) {
212                         struct in_addr *inp;
213                         inp = (struct in_addr *)(he->h_addr_list[i]);
214                         if (inp == NULL)
215                                 break;
216                         isc_sockaddr_fromin(&addrs[i], inp, port);
217                 } else {
218                         struct in6_addr *in6p;
219                         in6p = (struct in6_addr *)(he->h_addr_list[i]);
220                         if (in6p == NULL)
221                                 break;
222                         isc_sockaddr_fromin6(&addrs[i], in6p, port);
223                 }
224         }
225         *addrcount = i;
226 #endif
227         if (*addrcount == 0)
228                 return (ISC_R_NOTFOUND);
229         else
230                 return (ISC_R_SUCCESS);
231 }