xref: /freebsd/contrib/sendmail/libmilter/sm_gethost.c (revision a98ff317388a00b992f1bf8404dee596f9383f5e)
1 /*
2  *  Copyright (c) 1999-2001, 2004, 2010, 2013 Sendmail, 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.30 2013/02/22 22:43:33 gshapiro 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 	*err = h_errno;
66 	return h;
67 }
68 
69 void
70 freehostent(h)
71 	struct hostent *h;
72 {
73 	/*
74 	**  Stub routine -- if they don't have getipnodeby*(),
75 	**  they probably don't have the free routine either.
76 	*/
77 
78 	return;
79 }
80 #else /* NEEDSGETIPNODE && NETINET6 */
81 #define sm_getipnodebyname getipnodebyname
82 #endif /* NEEDSGETIPNODE && NETINET6 */
83 
84 struct hostent *
85 mi_gethostbyname(name, family)
86 	char *name;
87 	int family;
88 {
89 	struct hostent *h = NULL;
90 #if (SOLARIS > 10000 && SOLARIS < 20400) || (defined(SOLARIS) && SOLARIS < 204) || (defined(sony_news) && defined(__svr4))
91 # if SOLARIS == 20300 || SOLARIS == 203
92 	static struct hostent hp;
93 	static char buf[1000];
94 	extern struct hostent *_switch_gethostbyname_r();
95 
96 	h = _switch_gethostbyname_r(name, &hp, buf, sizeof(buf), &h_errno);
97 # else /* SOLARIS == 20300 || SOLARIS == 203 */
98 	extern struct hostent *__switch_gethostbyname();
99 
100 	h = __switch_gethostbyname(name);
101 # endif /* SOLARIS == 20300 || SOLARIS == 203 */
102 #else /* (SOLARIS > 10000 && SOLARIS < 20400) || (defined(SOLARIS) && SOLARIS < 204) || (defined(sony_news) && defined(__svr4)) */
103 # if NETINET6
104 #  ifndef SM_IPNODEBYNAME_FLAGS
105     /* For IPv4-mapped addresses, use: AI_DEFAULT|AI_ALL */
106 #   define SM_IPNODEBYNAME_FLAGS	AI_ADDRCONFIG
107 #  endif /* SM_IPNODEBYNAME_FLAGS */
108 
109 	int flags = SM_IPNODEBYNAME_FLAGS;
110 	int err;
111 # endif /* NETINET6 */
112 
113 # if NETINET6
114 #  if ADDRCONFIG_IS_BROKEN
115 	flags &= ~AI_ADDRCONFIG;
116 #  endif /* ADDRCONFIG_IS_BROKEN */
117 	h = sm_getipnodebyname(name, family, flags, &err);
118 	SM_SET_H_ERRNO(err);
119 # else /* NETINET6 */
120 	h = gethostbyname(name);
121 # endif /* NETINET6 */
122 
123 #endif /* (SOLARIS > 10000 && SOLARIS < 20400) || (defined(SOLARIS) && SOLARIS < 204) || (defined(sony_news) && defined(__svr4)) */
124 	return h;
125 }
126 
127 #if NETINET6
128 /*
129 **  MI_INET_PTON -- convert printed form to network address.
130 **
131 **	Wrapper for inet_pton() which handles IPv6: labels.
132 **
133 **	Parameters:
134 **		family -- address family
135 **		src -- string
136 **		dst -- destination address structure
137 **
138 **	Returns:
139 **		1 if the address was valid
140 **		0 if the address wasn't parseable
141 **		-1 if error
142 */
143 
144 int
145 mi_inet_pton(family, src, dst)
146 	int family;
147 	const char *src;
148 	void *dst;
149 {
150 	if (family == AF_INET6 &&
151 	    strncasecmp(src, "IPv6:", 5) == 0)
152 		src += 5;
153 	return inet_pton(family, src, dst);
154 }
155 #endif /* NETINET6 */
156