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>
12SM_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
33static 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
45static struct hostent *
46sm_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
69void
70freehostent(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
84struct hostent *
85mi_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
144int
145mi_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 */