contrib/bind9/lib/bind9/getaddresses.c

   1 /*
   2  * Copyright (C) 2004, 2005, 2007, 2014  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 #ifdef USE_GETADDRINFO
 135         memset(&hints, 0, sizeof(hints));
 136         if (!have_ipv6)
 137                 hints.ai_family = PF_INET;
 138         else if (!have_ipv4)
 139                 hints.ai_family = PF_INET6;
 140         else {
 141                 hints.ai_family = PF_UNSPEC;
 142 #ifdef AI_ADDRCONFIG
 143                 hints.ai_flags = AI_ADDRCONFIG;
 144 #endif
 145         }
 146         hints.ai_socktype = SOCK_STREAM;
 147 #ifdef AI_ADDRCONFIG
 148  again:
 149 #endif
 150         result = getaddrinfo(hostname, NULL, &hints, &ai);
 151         switch (result) {
 152         case 0:
 153                 break;
 154         case EAI_NONAME:
 155 #if defined(EAI_NODATA) && (EAI_NODATA != EAI_NONAME)
 156         case EAI_NODATA:
 157 #endif
 158                 return (ISC_R_NOTFOUND);
 159 #ifdef AI_ADDRCONFIG
 160         case EAI_BADFLAGS:
 161                 if ((hints.ai_flags & AI_ADDRCONFIG) != 0) {
 162                         hints.ai_flags &= ~AI_ADDRCONFIG;
 163                         goto again;
 164                 }
 165 #endif
 166         default:
 167                 return (ISC_R_FAILURE);
 168         }
 169         for (tmpai = ai, i = 0;
 170              tmpai != NULL && i < addrsize;
 171              tmpai = tmpai->ai_next)
 172         {
 173                 if (tmpai->ai_family != AF_INET &&
 174                     tmpai->ai_family != AF_INET6)
 175                         continue;
 176                 if (tmpai->ai_family == AF_INET) {
 177                         struct sockaddr_in *sin;
 178                         sin = (struct sockaddr_in *)tmpai->ai_addr;
 179                         isc_sockaddr_fromin(&addrs[i], &sin->sin_addr, port);
 180                 } else {
 181                         struct sockaddr_in6 *sin6;
 182                         sin6 = (struct sockaddr_in6 *)tmpai->ai_addr;
 183                         isc_sockaddr_fromin6(&addrs[i], &sin6->sin6_addr,
 184                                              port);
 185                 }
 186                 i++;
 187
 188         }
 189         freeaddrinfo(ai);
 190         *addrcount = i;
 191 #else
 192         he = gethostbyname(hostname);
 193         if (he == NULL) {
 194                 switch (h_errno) {
 195                 case HOST_NOT_FOUND:
 196 #ifdef NO_DATA
 197                 case NO_DATA:
 198 #endif
 199 #if defined(NO_ADDRESS) && (!defined(NO_DATA) || (NO_DATA != NO_ADDRESS))
 200                 case NO_ADDRESS:
 201 #endif
 202                         return (ISC_R_NOTFOUND);
 203                 default:
 204                         return (ISC_R_FAILURE);
 205                 }
 206         }
 207         if (he->h_addrtype != AF_INET && he->h_addrtype != AF_INET6)
 208                 return (ISC_R_NOTFOUND);
 209         for (i = 0; i < addrsize; i++) {
 210                 if (he->h_addrtype == AF_INET) {
 211                         struct in_addr *inp;
 212                         inp = (struct in_addr *)(he->h_addr_list[i]);
 213                         if (inp == NULL)
 214                                 break;
 215                         isc_sockaddr_fromin(&addrs[i], inp, port);
 216                 } else {
 217                         struct in6_addr *in6p;
 218                         in6p = (struct in6_addr *)(he->h_addr_list[i]);
 219                         if (in6p == NULL)
 220                                 break;
 221                         isc_sockaddr_fromin6(&addrs[i], in6p, port);
 222                 }
 223         }
 224         *addrcount = i;
 225 #endif
 226         if (*addrcount == 0)
 227                 return (ISC_R_NOTFOUND);
 228         else
 229                 return (ISC_R_SUCCESS);
 230 }