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.4 2005/12/05 00:58:50 swildner 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
  53 exitfn(void)
  54 {
  55         close(s);
  56         unlink(sunpath);
  57 }
  58
  59 int
  60 main(void)
  61 {
  62         struct sockaddr_un sun;
  63         char buf[RSRR_MAX_LEN];
  64         struct rsrr_header *rh;
  65         struct rsrr_vif *rvp;
  66         int i;
  67
  68         s = socket(PF_LOCAL, SOCK_DGRAM, 0);
  69         if (s < 0) {
  70                 err(EX_OSERR, "socket(PF_LOCAL, SOCK_DGRAM, 0)");
  71         }
  72
  73         sun.sun_family = AF_LOCAL;
  74         snprintf(sunpath, sizeof sun.sun_path, "/tmp/testrsrr.%lu",
  75                  (unsigned long)getpid());
  76         strcpy(sun.sun_path, sunpath);
  77         sun.sun_len = (offsetof(struct sockaddr_un, sun_path)
  78                        + strlen(sunpath));
  79
  80         if (bind(s, (struct sockaddr *)&sun, sun.sun_len) < 0) {
  81                 err(EX_OSERR, "bind: %s", sunpath);
  82         }
  83
  84         atexit(exitfn);         /* clean up if we exit on error */
  85
  86         strcpy(sun.sun_path, RSRR_SERV_PATH);
  87         sun.sun_len = (offsetof(struct sockaddr_un, sun_path)
  88                        + strlen(sunpath));
  89
  90         if (connect(s, (struct sockaddr *)&sun, sun.sun_len) < 0) {
  91                 err(EX_OSERR, "connect: %s", RSRR_SERV_PATH);
  92         }
  93
  94         rh = (struct rsrr_header *)buf;
  95         rh->version = RSRR_MAX_VERSION;
  96         rh->type = RSRR_INITIAL_QUERY;
  97         rh->flags = 0;
  98         rh->num = 0;
  99
 100         if (write(s, rh, sizeof *rh) == (ssize_t)-1) {
 101                 err(EX_OSERR, "write(initial query)");
 102         }
 103
 104         if (read(s, buf, sizeof buf) == (ssize_t)-1) {
 105                 err(EX_OSERR, "read(initial reply)");
 106         }
 107
 108         if (rh->version != RSRR_MAX_VERSION) {
 109                 errx(EX_PROTOCOL, "bad remote version %d", rh->version);
 110         }
 111
 112         if (rh->type != RSRR_INITIAL_REPLY) {
 113                 errx(EX_PROTOCOL, "remote returned unexpected message type %d",
 114                      rh->type);
 115         }
 116
 117         if (rh->flags) {
 118                 printf("confusing flags: %d\n", rh->flags);
 119         }
 120
 121         printf("There are %d vifs configured:\n", rh->num);
 122
 123         printf(" Vif  Thresh  Status  Local address\n");
 124         for(i = 0, rvp = (struct rsrr_vif *)(rh + 1); i < rh->num; i++,rvp++) {
 125                 printf(" %3d  %6d  %6d  %s\n", rvp->id, rvp->threshold,
 126                        rvp->status, inet_ntoa(rvp->local_addr));
 127         }
 128         exit(0);
 129 }