Merge from vendor branch OPENSSL:
[dragonfly.git] / lib / libc / net / gethostbynis.c
1 /*-
2  * Copyright (c) 1994, Garrett Wollman
3  *
4  * Redistribution and use in source and binary forms, with or without
5  * modification, are permitted provided that the following conditions
6  * are met:
7  * 1. Redistributions of source code must retain the above copyright
8  *    notice, this list of conditions and the following disclaimer.
9  * 2. Redistributions in binary form must reproduce the above copyright
10  *    notice, this list of conditions and the following disclaimer in the
11  *    documentation and/or other materials provided with the distribution.
12  *
13  * THIS SOFTWARE IS PROVIDED BY THE CONTRIBUTORS ``AS IS'' AND
14  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
15  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
16  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
17  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
18  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
19  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
20  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
21  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
22  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
23  * SUCH DAMAGE.
24  *
25  * $FreeBSD: src/lib/libc/net/gethostbynis.c,v 1.10.2.1 2000/10/01 16:39:47 nectar Exp $
26  * $DragonFly: src/lib/libc/net/gethostbynis.c,v 1.3 2004/10/25 19:38:01 drhodus Exp $
27  */
28
29 #include <sys/param.h>
30 #include <sys/socket.h>
31 #include <netinet/in.h>
32 #include <arpa/inet.h>
33 #include <arpa/nameser.h>
34 #include <netdb.h>
35 #include <stdio.h>
36 #include <stdlib.h>
37 #include <ctype.h>
38 #include <errno.h>
39 #include <string.h>
40 #ifdef YP
41 #include <rpc/rpc.h>
42 #include <rpcsvc/yp_prot.h>
43 #include <rpcsvc/ypclnt.h>
44 #endif
45
46 #define MAXALIASES      35
47 #define MAXADDRS        35
48
49 extern int h_errno;
50
51 #ifdef YP
52 static char *host_aliases[MAXALIASES];
53 static char hostaddr[MAXADDRS];
54 static char *host_addrs[2];
55 #endif /* YP */
56
57 static struct hostent *
58 _gethostbynis(name, map, af)
59         const char *name;
60         char *map;
61         int af;
62 {
63 #ifdef YP
64         char *cp, **q;
65         char *result;
66         int resultlen,size;
67         static struct hostent h;
68         static char *domain = (char *)NULL;
69         static char ypbuf[YPMAXRECORD + 2];
70
71         switch(af) {
72         case AF_INET:
73                 size = NS_INADDRSZ;
74                 break;
75         default:
76         case AF_INET6:
77                 size = NS_IN6ADDRSZ;
78                 errno = EAFNOSUPPORT;
79                 h_errno = NETDB_INTERNAL;
80                 return NULL;
81         }
82
83         if (domain == (char *)NULL)
84                 if (yp_get_default_domain (&domain)) {
85                         h_errno = NETDB_INTERNAL;
86                         return ((struct hostent *)NULL);
87                 }
88
89         if (yp_match(domain, map, name, strlen(name), &result, &resultlen)) {
90                 h_errno = HOST_NOT_FOUND;
91                 return ((struct hostent *)NULL);
92         }
93
94         /* avoid potential memory leak */
95         bcopy((char *)result, (char *)&ypbuf, resultlen);
96         ypbuf[resultlen] = '\0';
97         free(result);
98         result = (char *)&ypbuf;
99
100         if ((cp = index(result, '\n')))
101                 *cp = '\0';
102
103         cp = strpbrk(result, " \t");
104         *cp++ = '\0';
105         h.h_addr_list = host_addrs;
106         h.h_addr = hostaddr;
107         *((u_long *)h.h_addr) = inet_addr(result);
108         h.h_length = size;
109         h.h_addrtype = AF_INET;
110         while (*cp == ' ' || *cp == '\t')
111                 cp++;
112         h.h_name = cp;
113         q = h.h_aliases = host_aliases;
114         cp = strpbrk(cp, " \t");
115         if (cp != NULL)
116                 *cp++ = '\0';
117         while (cp && *cp) {
118                 if (*cp == ' ' || *cp == '\t') {
119                         cp++;
120                         continue;
121                 }
122                 if (q < &host_aliases[MAXALIASES - 1])
123                         *q++ = cp;
124                 cp = strpbrk(cp, " \t");
125                 if (cp != NULL)
126                         *cp++ = '\0';
127         }
128         *q = NULL;
129         return (&h);
130 #else
131         return (NULL);
132 #endif /* YP */
133 }
134
135 struct hostent *
136 _gethostbynisname(name, af)
137         const char *name;
138         int af;
139 {
140         return _gethostbynis(name, "hosts.byname", af);
141 }
142
143 struct hostent *
144 _gethostbynisaddr(addr, len, af)
145         const char *addr;
146         int len;
147         int af;
148 {
149         return _gethostbynis(inet_ntoa(*(struct in_addr *)addr),"hosts.byaddr", af);
150 }