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 */ 177