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  * $DragonFly: src/usr.sbin/mrouted/testrsrr/testrsrr.c,v 1.3 2004/03/15 18:10:29 dillon Exp $
  31  */
  32 #include <stddef.h>
  33 #include <stdlib.h>
  34 #include <stdio.h>
  35 #include <err.h>
  36 #include <sysexits.h>
  37
  38 #include <sys/param.h>
  39 #include <sys/types.h>
  40 #include <unistd.h>
  41 #include <sys/socket.h>
  42 #include <sys/un.h>
  43
  44 #include <netinet/in.h>
  45 #include <arpa/inet.h>
  46
  47 #include "rsrr.h"
  48
  49 char sunpath[MAXPATHLEN];
  50 int s;
  51
  52 void exitfn(void)
  53 {
  54         close(s);
  55         unlink(sunpath);
  56 }
  57
  58 int
  59 main(void)
  60 {
  61         struct sockaddr_un sun;
  62         char buf[RSRR_MAX_LEN];
  63         struct rsrr_header *rh;
  64         struct rsrr_vif *rvp;
  65         int i;
  66
  67         s = socket(PF_LOCAL, SOCK_DGRAM, 0);
  68         if (s < 0) {
  69                 err(EX_OSERR, "socket(PF_LOCAL, SOCK_DGRAM, 0)");
  70         }
  71
  72         sun.sun_family = AF_LOCAL;
  73         snprintf(sunpath, sizeof sun.sun_path, "/tmp/testrsrr.%lu",
  74                  (unsigned long)getpid());
  75         strcpy(sun.sun_path, sunpath);
  76         sun.sun_len = (offsetof(struct sockaddr_un, sun_path)
  77                        + strlen(sunpath));
  78
  79         if (bind(s, (struct sockaddr *)&sun, sun.sun_len) < 0) {
  80                 err(EX_OSERR, "bind: %s", sunpath);
  81         }
  82
  83         atexit(exitfn);         /* clean up if we exit on error */
  84
  85         strcpy(sun.sun_path, RSRR_SERV_PATH);
  86         sun.sun_len = (offsetof(struct sockaddr_un, sun_path)
  87                        + strlen(sunpath));
  88
  89         if (connect(s, (struct sockaddr *)&sun, sun.sun_len) < 0) {
  90                 err(EX_OSERR, "connect: %s", RSRR_SERV_PATH);
  91         }
  92
  93         rh = (struct rsrr_header *)buf;
  94         rh->version = RSRR_MAX_VERSION;
  95         rh->type = RSRR_INITIAL_QUERY;
  96         rh->flags = 0;
  97         rh->num = 0;
  98
  99         if (write(s, rh, sizeof *rh) == (ssize_t)-1) {
 100                 err(EX_OSERR, "write(initial query)");
 101         }
 102
 103         if (read(s, buf, sizeof buf) == (ssize_t)-1) {
 104                 err(EX_OSERR, "read(initial reply)");
 105         }
 106
 107         if (rh->version != RSRR_MAX_VERSION) {
 108                 errx(EX_PROTOCOL, "bad remote version %d", rh->version);
 109         }
 110
 111         if (rh->type != RSRR_INITIAL_REPLY) {
 112                 errx(EX_PROTOCOL, "remote returned unexpected message type %d",
 113                      rh->type);
 114         }
 115
 116         if (rh->flags) {
 117                 printf("confusing flags: %d\n", rh->flags);
 118         }
 119
 120         printf("There are %d vifs configured:\n", rh->num);
 121
 122         printf(" Vif  Thresh  Status  Local address\n");
 123         for(i = 0, rvp = (struct rsrr_vif *)(rh + 1); i < rh->num; i++,rvp++) {
 124                 printf(" %3d  %6d  %6d  %s\n", rvp->id, rvp->threshold,
 125                        rvp->status, inet_ntoa(rvp->local_addr));
 126         }
 127         exit(0);
 128 }