1 /*-
2 * SPDX-License-Identifier: BSD-3-Clause
3 *
4 * Copyright (c) 1983, 1993
5 * The Regents of the University of California. All rights reserved.
6 *
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
9 * are met:
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above copyright
13 * notice, this list of conditions and the following disclaimer in the
14 * documentation and/or other materials provided with the distribution.
15 * 3. Neither the name of the University nor the names of its contributors
16 * may be used to endorse or promote products derived from this software
17 * without specific prior written permission.
18 *
19 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
20 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
21 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
22 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
23 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
24 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
25 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
26 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
27 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
28 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29 * SUCH DAMAGE.
30 */
31
32 /* Portions Copyright (c) 1993 Carlos Leandro and Rui Salgueiro
33 * Dep. Matematica Universidade de Coimbra, Portugal, Europe
34 *
35 * Permission to use, copy, modify, and distribute this software for any
36 * purpose with or without fee is hereby granted, provided that the above
37 * copyright notice and this permission notice appear in all copies.
38 *
39 * from getnetent.c 1.1 (Coimbra) 93/06/02
40 */
41
42 #if defined(LIBC_SCCS) && !defined(lint)
43 static char sccsid[] = "@(#)getnetent.c 8.1 (Berkeley) 6/4/93";
44 static char orig_rcsid[] = "From: Id: getnetent.c,v 8.4 1997/06/01 20:34:37 vixie Exp";
45 #endif /* LIBC_SCCS and not lint */
46 #include <sys/cdefs.h>
47 __FBSDID("$FreeBSD: stable/12/lib/libc/net/getnetbyht.c 326025 2017-11-20 19:49:47Z pfg $");
48
49 #include <sys/types.h>
50 #include <sys/socket.h>
51 #include <netinet/in.h>
52 #include <arpa/inet.h>
53 #include <arpa/nameser.h>
54 #include <errno.h>
55 #include <netdb.h>
56 #include <resolv.h>
57 #include <stdio.h>
58 #include <string.h>
59 #include <stdarg.h>
60 #include <nsswitch.h>
61 #include "netdb_private.h"
62
63 void
_setnethtent(int f,struct netent_data * ned)64 _setnethtent(int f, struct netent_data *ned)
65 {
66
67 if (ned->netf == NULL)
68 ned->netf = fopen(_PATH_NETWORKS, "re");
69 else
70 rewind(ned->netf);
71 ned->stayopen |= f;
72 }
73
74 void
_endnethtent(struct netent_data * ned)75 _endnethtent(struct netent_data *ned)
76 {
77
78 if (ned->netf) {
79 fclose(ned->netf);
80 ned->netf = NULL;
81 }
82 ned->stayopen = 0;
83 }
84
85 static int
getnetent_p(struct netent * ne,struct netent_data * ned)86 getnetent_p(struct netent *ne, struct netent_data *ned)
87 {
88 char *p, *bp, *ep;
89 char *cp, **q;
90 int len;
91 char line[BUFSIZ + 1];
92
93 if (ned->netf == NULL &&
94 (ned->netf = fopen(_PATH_NETWORKS, "re")) == NULL)
95 return (-1);
96 again:
97 p = fgets(line, sizeof line, ned->netf);
98 if (p == NULL)
99 return (-1);
100 if (*p == '#')
101 goto again;
102 cp = strpbrk(p, "#\n");
103 if (cp != NULL)
104 *cp = '\0';
105 bp = ned->netbuf;
106 ep = ned->netbuf + sizeof ned->netbuf;
107 ne->n_name = bp;
108 cp = strpbrk(p, " \t");
109 if (cp == NULL)
110 goto again;
111 *cp++ = '\0';
112 len = strlen(p) + 1;
113 if (ep - bp < len) {
114 RES_SET_H_ERRNO(__res_state(), NO_RECOVERY);
115 return (-1);
116 }
117 strlcpy(bp, p, ep - bp);
118 bp += len;
119 while (*cp == ' ' || *cp == '\t')
120 cp++;
121 p = strpbrk(cp, " \t");
122 if (p != NULL)
123 *p++ = '\0';
124 ne->n_net = inet_network(cp);
125 ne->n_addrtype = AF_INET;
126 q = ne->n_aliases = ned->net_aliases;
127 if (p != NULL) {
128 cp = p;
129 while (cp && *cp) {
130 if (*cp == ' ' || *cp == '\t') {
131 cp++;
132 continue;
133 }
134 if (q >= &ned->net_aliases[_MAXALIASES - 1])
135 break;
136 p = strpbrk(cp, " \t");
137 if (p != NULL)
138 *p++ = '\0';
139 len = strlen(cp) + 1;
140 if (ep - bp < len)
141 break;
142 strlcpy(bp, cp, ep - bp);
143 *q++ = bp;
144 bp += len;
145 cp = p;
146 }
147 }
148 *q = NULL;
149 return (0);
150 }
151
152 int
getnetent_r(struct netent * nptr,char * buffer,size_t buflen,struct netent ** result,int * h_errnop)153 getnetent_r(struct netent *nptr, char *buffer, size_t buflen,
154 struct netent **result, int *h_errnop)
155 {
156 struct netent_data *ned;
157 struct netent ne;
158 res_state statp;
159
160 statp = __res_state();
161 if ((ned = __netent_data_init()) == NULL) {
162 RES_SET_H_ERRNO(statp, NETDB_INTERNAL);
163 *h_errnop = statp->res_h_errno;
164 return (-1);
165 }
166 if (getnetent_p(&ne, ned) != 0)
167 return (-1);
168 if (__copy_netent(&ne, nptr, buffer, buflen) != 0) {
169 RES_SET_H_ERRNO(statp, NETDB_INTERNAL);
170 *h_errnop = statp->res_h_errno;
171 return ((errno != 0) ? errno : -1);
172 }
173 *result = nptr;
174 return (0);
175 }
176
177 struct netent *
getnetent(void)178 getnetent(void)
179 {
180 struct netdata *nd;
181 struct netent *rval;
182 int ret_h_errno;
183
184 if ((nd = __netdata_init()) == NULL)
185 return (NULL);
186 if (getnetent_r(&nd->net, nd->data, sizeof(nd->data), &rval,
187 &ret_h_errno) != 0)
188 return (NULL);
189 return (rval);
190 }
191
192 int
_ht_getnetbyname(void * rval,void * cb_data,va_list ap)193 _ht_getnetbyname(void *rval, void *cb_data, va_list ap)
194 {
195 const char *name;
196 char *buffer;
197 size_t buflen;
198 int *errnop, *h_errnop;
199 struct netent *nptr, ne;
200 struct netent_data *ned;
201 char **cp;
202 res_state statp;
203 int error;
204
205 name = va_arg(ap, const char *);
206 nptr = va_arg(ap, struct netent *);
207 buffer = va_arg(ap, char *);
208 buflen = va_arg(ap, size_t);
209 errnop = va_arg(ap, int *);
210 h_errnop = va_arg(ap, int *);
211
212 statp = __res_state();
213 if ((ned = __netent_data_init()) == NULL) {
214 RES_SET_H_ERRNO(statp, NETDB_INTERNAL);
215 *h_errnop = statp->res_h_errno;
216 return (NS_UNAVAIL);
217 }
218
219 _setnethtent(ned->stayopen, ned);
220 while ((error = getnetent_p(&ne, ned)) == 0) {
221 if (strcasecmp(ne.n_name, name) == 0)
222 break;
223 for (cp = ne.n_aliases; *cp != 0; cp++)
224 if (strcasecmp(*cp, name) == 0)
225 goto found;
226 }
227 found:
228 if (!ned->stayopen)
229 _endnethtent(ned);
230 if (error != 0) {
231 *h_errnop = statp->res_h_errno;
232 return (NS_NOTFOUND);
233 }
234 if (__copy_netent(&ne, nptr, buffer, buflen) != 0) {
235 *errnop = errno;
236 RES_SET_H_ERRNO(statp, NETDB_INTERNAL);
237 *h_errnop = statp->res_h_errno;
238 return (NS_RETURN);
239 }
240 *((struct netent **)rval) = nptr;
241 return (NS_SUCCESS);
242 }
243
244 int
_ht_getnetbyaddr(void * rval,void * cb_data,va_list ap)245 _ht_getnetbyaddr(void *rval, void *cb_data, va_list ap)
246 {
247 uint32_t net;
248 int type;
249 char *buffer;
250 size_t buflen;
251 int *errnop, *h_errnop;
252 struct netent *nptr, ne;
253 struct netent_data *ned;
254 res_state statp;
255 int error;
256
257 net = va_arg(ap, uint32_t);
258 type = va_arg(ap, int);
259 nptr = va_arg(ap, struct netent *);
260 buffer = va_arg(ap, char *);
261 buflen = va_arg(ap, size_t);
262 errnop = va_arg(ap, int *);
263 h_errnop = va_arg(ap, int *);
264
265 statp = __res_state();
266 if ((ned = __netent_data_init()) == NULL) {
267 RES_SET_H_ERRNO(statp, NETDB_INTERNAL);
268 *h_errnop = statp->res_h_errno;
269 return (NS_UNAVAIL);
270 }
271
272 _setnethtent(ned->stayopen, ned);
273 while ((error = getnetent_p(&ne, ned)) == 0)
274 if (ne.n_addrtype == type && ne.n_net == net)
275 break;
276 if (!ned->stayopen)
277 _endnethtent(ned);
278 if (error != 0) {
279 *h_errnop = statp->res_h_errno;
280 return (NS_NOTFOUND);
281 }
282 if (__copy_netent(&ne, nptr, buffer, buflen) != 0) {
283 *errnop = errno;
284 RES_SET_H_ERRNO(statp, NETDB_INTERNAL);
285 *h_errnop = statp->res_h_errno;
286 return (NS_RETURN);
287 }
288 *((struct netent **)rval) = nptr;
289 return (NS_SUCCESS);
290 }
291