contrib/sendmail/libmilter/sm_gethost.c

   1 /*
   2  *  Copyright (c) 1999-2001, 2004, 2010, 2013 Proofpoint, Inc. and its suppliers.
   3  *      All rights reserved.
   4  *
   5  * By using this file, you agree to the terms and conditions set
   6  * forth in the LICENSE file which can be found at the top level of
   7  * the sendmail distribution.
   8  *
   9  */
  10
  11 #include <sm/gen.h>
  12 SM_RCSID("@(#)$Id: sm_gethost.c,v 8.32 2013-11-22 20:51:36 ca Exp $")
  13
  14 #include <sendmail.h>
  15 #if NETINET || NETINET6
  16 # include <arpa/inet.h>
  17 #endif
  18 #include "libmilter.h"
  19
  20 /*
  21 **  MI_GETHOSTBY{NAME,ADDR} -- compatibility routines for gethostbyXXX
  22 **
  23 **      Some operating systems have weird problems with the gethostbyXXX
  24 **      routines.  For example, Solaris versions at least through 2.3
  25 **      don't properly deliver a canonical h_name field.  This tries to
  26 **      work around these problems.
  27 **
  28 **      Support IPv6 as well as IPv4.
  29 */
  30
  31 #if NETINET6 && NEEDSGETIPNODE
  32
  33 static struct hostent *sm_getipnodebyname __P((const char *, int, int, int *));
  34
  35 # ifndef AI_ADDRCONFIG
  36 #  define AI_ADDRCONFIG 0       /* dummy */
  37 # endif
  38 # ifndef AI_ALL
  39 #  define AI_ALL        0       /* dummy */
  40 # endif
  41 # ifndef AI_DEFAULT
  42 #  define AI_DEFAULT    0       /* dummy */
  43 # endif
  44
  45 static struct hostent *
  46 sm_getipnodebyname(name, family, flags, err)
  47         const char *name;
  48         int family;
  49         int flags;
  50         int *err;
  51 {
  52         struct hostent *h;
  53 # if HAS_GETHOSTBYNAME2
  54
  55         h = gethostbyname2(name, family);
  56         if (h == NULL)
  57                 *err = h_errno;
  58         return h;
  59
  60 # else /* HAS_GETHOSTBYNAME2 */
  61 #  ifdef RES_USE_INET6
  62         bool resv6 = true;
  63
  64         if (family == AF_INET6)
  65         {
  66                 /* From RFC2133, section 6.1 */
  67                 resv6 = bitset(RES_USE_INET6, _res.options);
  68                 _res.options |= RES_USE_INET6;
  69         }
  70 #  endif /* RES_USE_INET6 */
  71         SM_SET_H_ERRNO(0);
  72         h = gethostbyname(name);
  73 #  ifdef RES_USE_INET6
  74         if (!resv6)
  75                 _res.options &= ~RES_USE_INET6;
  76 #  endif
  77
  78         /* the function is supposed to return only the requested family */
  79         if (h != NULL && h->h_addrtype != family)
  80         {
  81 #  if NETINET6
  82                 freehostent(h);
  83 #  endif
  84                 h = NULL;
  85                 *err = NO_DATA;
  86         }
  87         else
  88                 *err = h_errno;
  89         return h;
  90 # endif /* HAS_GETHOSTBYNAME2 */
  91 }
  92
  93 void
  94 freehostent(h)
  95         struct hostent *h;
  96 {
  97         /*
  98         **  Stub routine -- if they don't have getipnodeby*(),
  99         **  they probably don't have the free routine either.
 100         */
 101
 102         return;
 103 }
 104 #else /* NEEDSGETIPNODE && NETINET6 */
 105 #define sm_getipnodebyname getipnodebyname
 106 #endif /* NEEDSGETIPNODE && NETINET6 */
 107
 108 struct hostent *
 109 mi_gethostbyname(name, family)
 110         char *name;
 111         int family;
 112 {
 113         struct hostent *h = NULL;
 114 #if (SOLARIS > 10000 && SOLARIS < 20400) || (defined(SOLARIS) && SOLARIS < 204) || (defined(sony_news) && defined(__svr4))
 115 # if SOLARIS == 20300 || SOLARIS == 203
 116         static struct hostent hp;
 117         static char buf[1000];
 118         extern struct hostent *_switch_gethostbyname_r();
 119
 120         h = _switch_gethostbyname_r(name, &hp, buf, sizeof(buf), &h_errno);
 121 # else /* SOLARIS == 20300 || SOLARIS == 203 */
 122         extern struct hostent *__switch_gethostbyname();
 123
 124         h = __switch_gethostbyname(name);
 125 # endif /* SOLARIS == 20300 || SOLARIS == 203 */
 126 #else /* (SOLARIS > 10000 && SOLARIS < 20400) || (defined(SOLARIS) && SOLARIS < 204) || (defined(sony_news) && defined(__svr4)) */
 127 # if NETINET6
 128 #  ifndef SM_IPNODEBYNAME_FLAGS
 129     /* For IPv4-mapped addresses, use: AI_DEFAULT|AI_ALL */
 130 #   define SM_IPNODEBYNAME_FLAGS        AI_ADDRCONFIG
 131 #  endif
 132
 133         int flags = SM_IPNODEBYNAME_FLAGS;
 134         int err;
 135 # endif /* NETINET6 */
 136
 137 # if NETINET6
 138 #  if ADDRCONFIG_IS_BROKEN
 139         flags &= ~AI_ADDRCONFIG;
 140 #  endif
 141         h = sm_getipnodebyname(name, family, flags, &err);
 142         SM_SET_H_ERRNO(err);
 143 # else /* NETINET6 */
 144         h = gethostbyname(name);
 145 # endif /* NETINET6 */
 146
 147 #endif /* (SOLARIS > 10000 && SOLARIS < 20400) || (defined(SOLARIS) && SOLARIS < 204) || (defined(sony_news) && defined(__svr4)) */
 148
 149         /* the function is supposed to return only the requested family */
 150         if (h != NULL && h->h_addrtype != family)
 151         {
 152 # if NETINET6
 153                 freehostent(h);
 154 # endif
 155                 h = NULL;
 156                 SM_SET_H_ERRNO(NO_DATA);
 157         }
 158         return h;
 159 }
 160
 161 #if NETINET6
 162 /*
 163 **  MI_INET_PTON -- convert printed form to network address.
 164 **
 165 **      Wrapper for inet_pton() which handles IPv6: labels.
 166 **
 167 **      Parameters:
 168 **              family -- address family
 169 **              src -- string
 170 **              dst -- destination address structure
 171 **
 172 **      Returns:
 173 **              1 if the address was valid
 174 **              0 if the address wasn't parsable
 175 **              -1 if error
 176 */
 177
 178 int
 179 mi_inet_pton(family, src, dst)
 180         int family;
 181         const char *src;
 182         void *dst;
 183 {
 184         if (family == AF_INET6 &&
 185             strncasecmp(src, "IPv6:", 5) == 0)
 186                 src += 5;
 187         return inet_pton(family, src, dst);
 188 }
 189 #endif /* NETINET6 */