sendmail: Update vendor branch to v8.14.15
[dragonfly.git] / contrib / sendmail-8.14 / libmilter / sm_gethost.c
1 /*
2  *  Copyright (c) 1999-2001, 2004, 2010 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.29 2010/07/27 01:09:31 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         *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         int flags = AI_DEFAULT|AI_ALL;
105         int err;
106 # endif /* NETINET6 */
107
108 # if NETINET6
109 #  if ADDRCONFIG_IS_BROKEN
110         flags &= ~AI_ADDRCONFIG;
111 #  endif /* ADDRCONFIG_IS_BROKEN */
112         h = sm_getipnodebyname(name, family, flags, &err);
113         SM_SET_H_ERRNO(err);
114 # else /* NETINET6 */
115         h = gethostbyname(name);
116 # endif /* NETINET6 */
117
118 #endif /* (SOLARIS > 10000 && SOLARIS < 20400) || (defined(SOLARIS) && SOLARIS < 204) || (defined(sony_news) && defined(__svr4)) */
119         return h;
120 }
121
122 #if NETINET6
123 /*
124 **  MI_INET_PTON -- convert printed form to network address.
125 **
126 **      Wrapper for inet_pton() which handles IPv6: labels.
127 **
128 **      Parameters:
129 **              family -- address family
130 **              src -- string
131 **              dst -- destination address structure
132 **
133 **      Returns:
134 **              1 if the address was valid
135 **              0 if the address wasn't parseable
136 **              -1 if error
137 */
138
139 int
140 mi_inet_pton(family, src, dst)
141         int family;
142         const char *src;
143         void *dst;
144 {
145         if (family == AF_INET6 &&
146             strncasecmp(src, "IPv6:", 5) == 0)
147                 src += 5;
148         return inet_pton(family, src, dst);
149 }
150 #endif /* NETINET6 */