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