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 /* NETINET || NETINET6 */
  18 #include "libmilter.h"
  19
  20 /*
  21 **  MI_GETHOSTBY{NAME,ADDR} -- compatibility routines for gethostbyXXX
  22 **
  23 **      Some operating systems have wierd 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 /* ! AI_ADDRCONFIG */
  38 # ifndef AI_ALL
  39 #  define AI_ALL        0       /* dummy */
  40 # endif /* ! AI_ALL */
  41 # ifndef AI_DEFAULT
  42 #  define AI_DEFAULT    0       /* dummy */
  43 # endif /* ! AI_DEFAULT */
  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         bool resv6 = true;
  53         struct hostent *h;
  54
  55         if (family == AF_INET6)
  56         {
  57                 /* From RFC2133, section 6.1 */
  58                 resv6 = bitset(RES_USE_INET6, _res.options);
  59                 _res.options |= RES_USE_INET6;
  60         }
  61         SM_SET_H_ERRNO(0);
  62         h = gethostbyname(name);
  63         if (family == AF_INET6 && !resv6)
  64                 _res.options &= ~RES_USE_INET6;
  65
  66         /* the function is supposed to return only the requested family */
  67         if (h != NULL && h->h_addrtype != family)
  68         {
  69 # if NETINET6
  70                 freehostent(h);
  71 # endif /* NETINET6 */
  72                 h = NULL;
  73                 *err = NO_DATA;
  74         }
  75         else
  76                 *err = h_errno;
  77         return h;
  78 }
  79
  80 void
  81 freehostent(h)
  82         struct hostent *h;
  83 {
  84         /*
  85         **  Stub routine -- if they don't have getipnodeby*(),
  86         **  they probably don't have the free routine either.
  87         */
  88
  89         return;
  90 }
  91 #else /* NEEDSGETIPNODE && NETINET6 */
  92 #define sm_getipnodebyname getipnodebyname
  93 #endif /* NEEDSGETIPNODE && NETINET6 */
  94
  95 struct hostent *
  96 mi_gethostbyname(name, family)
  97         char *name;
  98         int family;
  99 {
 100         struct hostent *h = NULL;
 101 #if (SOLARIS > 10000 && SOLARIS < 20400) || (defined(SOLARIS) && SOLARIS < 204) || (defined(sony_news) && defined(__svr4))
 102 # if SOLARIS == 20300 || SOLARIS == 203
 103         static struct hostent hp;
 104         static char buf[1000];
 105         extern struct hostent *_switch_gethostbyname_r();
 106
 107         h = _switch_gethostbyname_r(name, &hp, buf, sizeof(buf), &h_errno);
 108 # else /* SOLARIS == 20300 || SOLARIS == 203 */
 109         extern struct hostent *__switch_gethostbyname();
 110
 111         h = __switch_gethostbyname(name);
 112 # endif /* SOLARIS == 20300 || SOLARIS == 203 */
 113 #else /* (SOLARIS > 10000 && SOLARIS < 20400) || (defined(SOLARIS) && SOLARIS < 204) || (defined(sony_news) && defined(__svr4)) */
 114 # if NETINET6
 115 #  ifndef SM_IPNODEBYNAME_FLAGS
 116     /* For IPv4-mapped addresses, use: AI_DEFAULT|AI_ALL */
 117 #   define SM_IPNODEBYNAME_FLAGS        AI_ADDRCONFIG
 118 #  endif /* SM_IPNODEBYNAME_FLAGS */
 119
 120         int flags = SM_IPNODEBYNAME_FLAGS;
 121         int err;
 122 # endif /* NETINET6 */
 123
 124 # if NETINET6
 125 #  if ADDRCONFIG_IS_BROKEN
 126         flags &= ~AI_ADDRCONFIG;
 127 #  endif /* ADDRCONFIG_IS_BROKEN */
 128         h = sm_getipnodebyname(name, family, flags, &err);
 129         SM_SET_H_ERRNO(err);
 130 # else /* NETINET6 */
 131         h = gethostbyname(name);
 132 # endif /* NETINET6 */
 133
 134 #endif /* (SOLARIS > 10000 && SOLARIS < 20400) || (defined(SOLARIS) && SOLARIS < 204) || (defined(sony_news) && defined(__svr4)) */
 135
 136         /* the function is supposed to return only the requested family */
 137         if (h != NULL && h->h_addrtype != family)
 138         {
 139 # if NETINET6
 140                 freehostent(h);
 141 # endif /* NETINET6 */
 142                 h = NULL;
 143                 SM_SET_H_ERRNO(NO_DATA);
 144         }
 145         return h;
 146 }
 147
 148 #if NETINET6
 149 /*
 150 **  MI_INET_PTON -- convert printed form to network address.
 151 **
 152 **      Wrapper for inet_pton() which handles IPv6: labels.
 153 **
 154 **      Parameters:
 155 **              family -- address family
 156 **              src -- string
 157 **              dst -- destination address structure
 158 **
 159 **      Returns:
 160 **              1 if the address was valid
 161 **              0 if the address wasn't parseable
 162 **              -1 if error
 163 */
 164
 165 int
 166 mi_inet_pton(family, src, dst)
 167         int family;
 168         const char *src;
 169         void *dst;
 170 {
 171         if (family == AF_INET6 &&
 172             strncasecmp(src, "IPv6:", 5) == 0)
 173                 src += 5;
 174         return inet_pton(family, src, dst);
 175 }
 176 #endif /* NETINET6 */