Initial import from FreeBSD RELENG_4:
[dragonfly.git] / usr.sbin / mrouted / testrsrr / testrsrr.c
1 /*
2  * Copyright 1995 Massachusetts Institute of Technology
3  *
4  * Permission to use, copy, modify, and distribute this software and
5  * its documentation for any purpose and without fee is hereby
6  * granted, provided that both the above copyright notice and this
7  * permission notice appear in all copies, that both the above
8  * copyright notice and this permission notice appear in all
9  * supporting documentation, and that the name of M.I.T. not be used
10  * in advertising or publicity pertaining to distribution of the
11  * software without specific, written prior permission.  M.I.T. makes
12  * no representations about the suitability of this software for any
13  * purpose.  It is provided "as is" without express or implied
14  * warranty.
15  * 
16  * THIS SOFTWARE IS PROVIDED BY M.I.T. ``AS IS''.  M.I.T. DISCLAIMS
17  * ALL EXPRESS OR IMPLIED WARRANTIES WITH REGARD TO THIS SOFTWARE,
18  * INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
19  * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. IN NO EVENT
20  * SHALL M.I.T. BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
21  * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
22  * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF
23  * USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
24  * ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
25  * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT
26  * OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
27  * SUCH DAMAGE.
28  *
29  * $FreeBSD: src/usr.sbin/mrouted/testrsrr/testrsrr.c,v 1.4 1999/08/28 01:17:17 peter Exp $
30  */
31 #include <stddef.h>
32 #include <stdlib.h>
33 #include <stdio.h>
34 #include <err.h>
35 #include <sysexits.h>
36
37 #include <sys/param.h>
38 #include <sys/types.h>
39 #include <unistd.h>
40 #include <sys/socket.h>
41 #include <sys/un.h>
42
43 #include <netinet/in.h>
44 #include <arpa/inet.h>
45
46 #include "rsrr.h"
47
48 char sunpath[MAXPATHLEN];
49 int s;
50
51 void exitfn(void) {
52         close(s);
53         unlink(sunpath);
54 }
55
56 int main(void) {
57         struct sockaddr_un sun;
58         char buf[RSRR_MAX_LEN];
59         struct rsrr_header *rh;
60         struct rsrr_vif *rvp;
61         int i;
62
63         s = socket(PF_LOCAL, SOCK_DGRAM, 0);
64         if (s < 0) {
65                 err(EX_OSERR, "socket(PF_LOCAL, SOCK_DGRAM, 0)");
66         }
67
68         sun.sun_family = AF_LOCAL;
69         snprintf(sunpath, sizeof sun.sun_path, "/tmp/testrsrr.%lu", 
70                  (unsigned long)getpid());
71         strcpy(sun.sun_path, sunpath);
72         sun.sun_len = (offsetof(struct sockaddr_un, sun_path) 
73                        + strlen(sunpath));
74
75         if (bind(s, (struct sockaddr *)&sun, sun.sun_len) < 0) {
76                 err(EX_OSERR, "bind: %s", sunpath);
77         }
78
79         atexit(exitfn);         /* clean up if we exit on error */
80
81         strcpy(sun.sun_path, RSRR_SERV_PATH);
82         sun.sun_len = (offsetof(struct sockaddr_un, sun_path) 
83                        + strlen(sunpath));
84
85         if (connect(s, (struct sockaddr *)&sun, sun.sun_len) < 0) {
86                 err(EX_OSERR, "connect: %s", RSRR_SERV_PATH);
87         }
88
89         rh = (struct rsrr_header *)buf;
90         rh->version = RSRR_MAX_VERSION;
91         rh->type = RSRR_INITIAL_QUERY;
92         rh->flags = 0;
93         rh->num = 0;
94
95         if (write(s, rh, sizeof *rh) == (ssize_t)-1) {
96                 err(EX_OSERR, "write(initial query)");
97         }
98
99         if (read(s, buf, sizeof buf) == (ssize_t)-1) {
100                 err(EX_OSERR, "read(initial reply)");
101         }
102
103         if (rh->version != RSRR_MAX_VERSION) {
104                 errx(EX_PROTOCOL, "bad remote version %d", rh->version);
105         }
106
107         if (rh->type != RSRR_INITIAL_REPLY) {
108                 errx(EX_PROTOCOL, "remote returned unexpected message type %d",
109                      rh->type);
110         }
111
112         if (rh->flags) {
113                 printf("confusing flags: %d\n", rh->flags);
114         }
115
116         printf("There are %d vifs configured:\n", rh->num);
117
118         printf(" Vif  Thresh  Status  Local address\n");
119         for(i = 0, rvp = (struct rsrr_vif *)(rh + 1); i < rh->num; i++,rvp++) {
120                 printf(" %3d  %6d  %6d  %s\n", rvp->id, rvp->threshold,
121                        rvp->status, inet_ntoa(rvp->local_addr));
122         }
123         exit(0);
124 }