xref: /illumos-gate/usr/src/lib/libresolv2/common/irs/irp_nw.c (revision 55fea89dcaa64928bed4327112404dcb3e07b79f)
1 /*
2  * Copyright (c) 2004 by Internet Systems Consortium, Inc. ("ISC")
3  * Portions Copyright (c) 1996,1998 by Internet Software Consortium.
4  *
5  * Permission to use, copy, modify, and distribute this software for any
6  * purpose with or without fee is hereby granted, provided that the above
7  * copyright notice and this permission notice appear in all copies.
8  *
9  * THE SOFTWARE IS PROVIDED "AS IS" AND ISC DISCLAIMS ALL WARRANTIES
10  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
11  * MERCHANTABILITY AND FITNESS.  IN NO EVENT SHALL ISC BE LIABLE FOR
12  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
13  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
14  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT
15  * OF OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
16  */
17 
18 /* Imports */
19 
20 #include "port_before.h"
21 
22 #include <syslog.h>
23 #include <sys/types.h>
24 #include <sys/socket.h>
25 
26 #include <netinet/in.h>
27 #include <arpa/inet.h>
28 #include <arpa/nameser.h>
29 
30 #include <errno.h>
31 #include <fcntl.h>
32 #include <resolv.h>
33 #include <stdio.h>
34 #include <stdlib.h>
35 #include <string.h>
36 #include <syslog.h>
37 
38 #include <irs.h>
39 #include <irp.h>
40 #include <isc/irpmarshall.h>
41 
42 #include <isc/memcluster.h>
43 #include <isc/misc.h>
44 
45 #include "irs_p.h"
46 #include "lcl_p.h"
47 #include "irp_p.h"
48 
49 #include "port_after.h"
50 
51 #define MAXALIASES 35
52 #define MAXADDRSIZE 4
53 
54 struct pvt {
55 	struct irp_p	       *girpdata;
56 	int			warned;
57 	struct nwent		net;
58 };
59 
60 /* Forward */
61 
62 static void		nw_close(struct irs_nw *);
63 static struct nwent *	nw_byname(struct irs_nw *, const char *, int);
64 static struct nwent *	nw_byaddr(struct irs_nw *, void *, int, int);
65 static struct nwent *	nw_next(struct irs_nw *);
66 static void		nw_rewind(struct irs_nw *);
67 static void		nw_minimize(struct irs_nw *);
68 
69 static void		free_nw(struct nwent *nw);
70 
71 
72 /* Public */
73 
74 /*%
75  * struct irs_nw * irs_irp_nw(struct irs_acc *this)
76  *
77  */
78 
79 struct irs_nw *
irs_irp_nw(struct irs_acc * this)80 irs_irp_nw(struct irs_acc *this) {
81 	struct irs_nw *nw;
82 	struct pvt *pvt;
83 
84 	if (!(pvt = memget(sizeof *pvt))) {
85 		errno = ENOMEM;
86 		return (NULL);
87 	}
88 	memset(pvt, 0, sizeof *pvt);
89 
90 	if (!(nw = memget(sizeof *nw))) {
91 		memput(pvt, sizeof *pvt);
92 		errno = ENOMEM;
93 		return (NULL);
94 	}
95 	memset(nw, 0x0, sizeof *nw);
96 	pvt->girpdata = this->private;
97 
98 	nw->private = pvt;
99 	nw->close = nw_close;
100 	nw->byname = nw_byname;
101 	nw->byaddr = nw_byaddr;
102 	nw->next = nw_next;
103 	nw->rewind = nw_rewind;
104 	nw->minimize = nw_minimize;
105 	return (nw);
106 }
107 
108 /* Methods */
109 
110 /*%
111  * void nw_close(struct irs_nw *this)
112  *
113  */
114 
115 static void
nw_close(struct irs_nw * this)116 nw_close(struct irs_nw *this) {
117 	struct pvt *pvt = (struct pvt *)this->private;
118 
119 	nw_minimize(this);
120 
121 	free_nw(&pvt->net);
122 
123 	memput(pvt, sizeof *pvt);
124 	memput(this, sizeof *this);
125 }
126 
127 /*%
128  * struct nwent * nw_byaddr(struct irs_nw *this, void *net,
129  * 				int length, int type)
130  *
131  */
132 
133 static struct nwent *
nw_byaddr(struct irs_nw * this,void * net,int length,int type)134 nw_byaddr(struct irs_nw *this, void *net, int length, int type) {
135 	struct pvt *pvt = (struct pvt *)this->private;
136 	struct nwent *nw = &pvt->net;
137 	char *body = NULL;
138 	size_t bodylen;
139 	int code;
140 	char paddr[24];			/*%< bigenough for ip4 w/ cidr spec. */
141 	char text[256];
142 
143 	if (inet_net_ntop(type, net, length, paddr, sizeof paddr) == NULL) {
144 		return (NULL);
145 	}
146 
147 	if (irs_irp_connection_setup(pvt->girpdata, &pvt->warned) != 0) {
148 		return (NULL);
149 	}
150 
151 	if (irs_irp_send_command(pvt->girpdata, "getnetbyaddr %s %s",
152 				 paddr, ADDR_T_STR(type)) != 0)
153 		return (NULL);
154 
155 	if (irs_irp_get_full_response(pvt->girpdata, &code,
156 				      text, sizeof text,
157 				      &body, &bodylen) != 0) {
158 		return (NULL);
159 	}
160 
161 	if (code == IRPD_GETNET_OK) {
162 		free_nw(nw);
163 		if (irp_unmarshall_nw(nw, body) != 0) {
164 			nw = NULL;
165 		}
166 	} else {
167 		nw = NULL;
168 	}
169 
170 	if (body != NULL) {
171 		memput(body, bodylen);
172 	}
173 
174 	return (nw);
175 }
176 
177 /*%
178  * struct nwent * nw_byname(struct irs_nw *this, const char *name, int type)
179  *
180  */
181 
182 static struct nwent *
nw_byname(struct irs_nw * this,const char * name,int type)183 nw_byname(struct irs_nw *this, const char *name, int type) {
184 	struct pvt *pvt = (struct pvt *)this->private;
185 	struct nwent *nw = &pvt->net;
186 	char *body = NULL;
187 	size_t bodylen;
188 	int code;
189 	char text[256];
190 
191 	if (nw->n_name != NULL &&
192 	    strcmp(name, nw->n_name) == 0 &&
193 	    nw->n_addrtype == type) {
194 		return (nw);
195 	}
196 
197 	if (irs_irp_connection_setup(pvt->girpdata, &pvt->warned) != 0) {
198 		return (NULL);
199 	}
200 
201 	if (irs_irp_send_command(pvt->girpdata, "getnetbyname %s", name) != 0)
202 		return (NULL);
203 
204 	if (irs_irp_get_full_response(pvt->girpdata, &code,
205 				      text, sizeof text,
206 				      &body, &bodylen) != 0) {
207 		return (NULL);
208 	}
209 
210 	if (code == IRPD_GETNET_OK) {
211 		free_nw(nw);
212 		if (irp_unmarshall_nw(nw, body) != 0) {
213 			nw = NULL;
214 		}
215 	} else {
216 		nw = NULL;
217 	}
218 
219 	if (body != NULL) {
220 		memput(body, bodylen);
221 	}
222 
223 	return (nw);
224 }
225 
226 /*%
227  * void nw_rewind(struct irs_nw *this)
228  *
229  */
230 
231 static void
nw_rewind(struct irs_nw * this)232 nw_rewind(struct irs_nw *this) {
233 	struct pvt *pvt = (struct pvt *)this->private;
234 	char text[256];
235 	int code;
236 
237 	if (irs_irp_connection_setup(pvt->girpdata, &pvt->warned) != 0) {
238 		return;
239 	}
240 
241 	if (irs_irp_send_command(pvt->girpdata, "setnetent") != 0) {
242 		return;
243 	}
244 
245 	code = irs_irp_read_response(pvt->girpdata, text, sizeof text);
246 	if (code != IRPD_GETNET_SETOK) {
247 		if (irp_log_errors) {
248 			syslog(LOG_WARNING, "setnetent failed: %s", text);
249 		}
250 	}
251 
252 	return;
253 }
254 
255 /*%
256  * 	Prepares the cache if necessary and returns the first, or
257  * 	next item from it.
258  */
259 
260 static struct nwent *
nw_next(struct irs_nw * this)261 nw_next(struct irs_nw *this) {
262 	struct pvt *pvt = (struct pvt *)this->private;
263 	struct nwent *nw = &pvt->net;
264 	char *body;
265 	size_t bodylen;
266 	int code;
267 	char text[256];
268 
269 	if (irs_irp_connection_setup(pvt->girpdata, &pvt->warned) != 0) {
270 		return (NULL);
271 	}
272 
273 	if (irs_irp_send_command(pvt->girpdata, "getnetent") != 0) {
274 		return (NULL);
275 	}
276 
277 	if (irs_irp_get_full_response(pvt->girpdata, &code,
278 				      text, sizeof text,
279 				      &body, &bodylen) != 0) {
280 		return (NULL);
281 	}
282 
283 	if (code == IRPD_GETNET_OK) {
284 		free_nw(nw);
285 		if (irp_unmarshall_nw(nw, body) != 0) {
286 			nw = NULL;
287 		}
288 	} else {
289 		nw = NULL;
290 	}
291 
292 	if (body != NULL)
293 		memput(body, bodylen);
294 	return (nw);
295 }
296 
297 /*%
298  * void nw_minimize(struct irs_nw *this)
299  *
300  */
301 
302 static void
nw_minimize(struct irs_nw * this)303 nw_minimize(struct irs_nw *this) {
304 	struct pvt *pvt = (struct pvt *)this->private;
305 
306 	irs_irp_disconnect(pvt->girpdata);
307 }
308 
309 
310 
311 
312 /* private. */
313 
314 /*%
315  *	deallocate all the memory irp_unmarshall_pw allocated.
316  *
317  */
318 
319 static void
free_nw(struct nwent * nw)320 free_nw(struct nwent *nw) {
321 	char **p;
322 
323 	if (nw == NULL)
324 		return;
325 
326 	if (nw->n_name != NULL)
327 		free(nw->n_name);
328 
329 	if (nw->n_aliases != NULL) {
330 		for (p = nw->n_aliases ; *p != NULL ; p++) {
331 			free(*p);
332 		}
333 		free(nw->n_aliases);
334 	}
335 
336 	if (nw->n_addr != NULL)
337 		free(nw->n_addr);
338 }
339 
340 /*! \file */
341