usr.sbin/spray/spray.c

   1 /*-
   2  * SPDX-License-Identifier: BSD-4-Clause
   3  *
   4  * Copyright (c) 1993 Winning Strategies, Inc.
   5  * All rights reserved.
   6  *
   7  * Redistribution and use in source and binary forms, with or without
   8  * modification, are permitted provided that the following conditions
   9  * are met:
  10  * 1. Redistributions of source code must retain the above copyright
  11  *    notice, this list of conditions and the following disclaimer.
  12  * 2. Redistributions in binary form must reproduce the above copyright
  13  *    notice, this list of conditions and the following disclaimer in the
  14  *    documentation and/or other materials provided with the distribution.
  15  * 3. All advertising materials mentioning features or use of this software
  16  *    must display the following acknowledgement:
  17  *      This product includes software developed by Winning Strategies, Inc.
  18  * 4. The name of the author may not be used to endorse or promote products
  19  *    derived from this software without specific prior written permission
  20  *
  21  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
  22  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
  23  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
  24  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
  25  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
  26  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
  27  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
  28  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
  29  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
  30  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  31  */
  32
  33 #ifndef lint
  34 static const char rcsid[] =
  35   "$FreeBSD$";
  36 #endif /* not lint */
  37
  38 #include <err.h>
  39 #include <stdio.h>
  40 #include <stdlib.h>
  41 #include <unistd.h>
  42
  43 #include <rpc/rpc.h>
  44 #include <rpcsvc/spray.h>
  45
  46 #ifndef SPRAYOVERHEAD
  47 #define SPRAYOVERHEAD   86
  48 #endif
  49
  50 static void usage(void);
  51 static void print_xferstats(unsigned int, int, double);
  52
  53 /* spray buffer */
  54 static char spray_buffer[SPRAYMAX];
  55
  56 /* RPC timeouts */
  57 static struct timeval NO_DEFAULT = { -1, -1 };
  58 static struct timeval ONE_WAY = { 0, 0 };
  59 static struct timeval TIMEOUT = { 25, 0 };
  60
  61 int
  62 main(int argc, char *argv[])
  63 {
  64         spraycumul      host_stats;
  65         sprayarr        host_array;
  66         CLIENT *cl;
  67         int c;
  68         u_int i;
  69         u_int count = 0;
  70         int delay = 0;
  71         int length = 0;
  72         double xmit_time;                       /* time to receive data */
  73
  74         while ((c = getopt(argc, argv, "c:d:l:")) != -1) {
  75                 switch (c) {
  76                 case 'c':
  77                         count = atoi(optarg);
  78                         break;
  79                 case 'd':
  80                         delay = atoi(optarg);
  81                         break;
  82                 case 'l':
  83                         length = atoi(optarg);
  84                         break;
  85                 default:
  86                         usage();
  87                         /* NOTREACHED */
  88                 }
  89         }
  90         argc -= optind;
  91         argv += optind;
  92
  93         if (argc != 1) {
  94                 usage();
  95                 /* NOTREACHED */
  96         }
  97
  98
  99         /* Correct packet length. */
 100         if (length > SPRAYMAX) {
 101                 length = SPRAYMAX;
 102         } else if (length < SPRAYOVERHEAD) {
 103                 length = SPRAYOVERHEAD;
 104         } else {
 105                 /* The RPC portion of the packet is a multiple of 32 bits. */
 106                 length -= SPRAYOVERHEAD - 3;
 107                 length &= ~3;
 108                 length += SPRAYOVERHEAD;
 109         }
 110
 111
 112         /*
 113          * The default value of count is the number of packets required
 114          * to make the total stream size 100000 bytes.
 115          */
 116         if (!count) {
 117                 count = 100000 / length;
 118         }
 119
 120         /* Initialize spray argument */
 121         host_array.sprayarr_len = length - SPRAYOVERHEAD;
 122         host_array.sprayarr_val = spray_buffer;
 123
 124
 125         /* create connection with server */
 126         cl = clnt_create(*argv, SPRAYPROG, SPRAYVERS, "udp");
 127         if (cl == NULL)
 128                 errx(1, "%s", clnt_spcreateerror(""));
 129
 130
 131         /*
 132          * For some strange reason, RPC 4.0 sets the default timeout,
 133          * thus timeouts specified in clnt_call() are always ignored.
 134          *
 135          * The following (undocumented) hack resets the internal state
 136          * of the client handle.
 137          */
 138         clnt_control(cl, CLSET_TIMEOUT, &NO_DEFAULT);
 139
 140
 141         /* Clear server statistics */
 142         if (clnt_call(cl, SPRAYPROC_CLEAR, (xdrproc_t)xdr_void, NULL,
 143                 (xdrproc_t)xdr_void, NULL, TIMEOUT) != RPC_SUCCESS)
 144                 errx(1, "%s", clnt_sperror(cl, ""));
 145
 146
 147         /* Spray server with packets */
 148         printf ("sending %u packets of length %d to %s ...", count, length,
 149             *argv);
 150         fflush (stdout);
 151
 152         for (i = 0; i < count; i++) {
 153                 clnt_call(cl, SPRAYPROC_SPRAY, (xdrproc_t)xdr_sprayarr,
 154                     &host_array, (xdrproc_t)xdr_void, NULL, ONE_WAY);
 155
 156                 if (delay) {
 157                         usleep(delay);
 158                 }
 159         }
 160
 161
 162         /* Collect statistics from server */
 163         if (clnt_call(cl, SPRAYPROC_GET, (xdrproc_t)xdr_void, NULL,
 164                 (xdrproc_t)xdr_spraycumul, &host_stats, TIMEOUT) != RPC_SUCCESS)
 165                 errx(1, "%s", clnt_sperror(cl, ""));
 166
 167         xmit_time = host_stats.clock.sec +
 168                         (host_stats.clock.usec / 1000000.0);
 169
 170         printf ("\n\tin %.2f seconds elapsed time\n", xmit_time);
 171
 172
 173         /* report dropped packets */
 174         if (host_stats.counter != count) {
 175                 int packets_dropped = count - host_stats.counter;
 176
 177                 printf("\t%d packets (%.2f%%) dropped\n",
 178                         packets_dropped,
 179                         100.0 * packets_dropped / count );
 180         } else {
 181                 printf("\tno packets dropped\n");
 182         }
 183
 184         printf("Sent:");
 185         print_xferstats(count, length, xmit_time);
 186
 187         printf("Rcvd:");
 188         print_xferstats(host_stats.counter, length, xmit_time);
 189
 190         exit (0);
 191 }
 192
 193
 194 static void
 195 print_xferstats(u_int packets, int packetlen, double xfertime)
 196 {
 197         int datalen;
 198         double pps;             /* packets per second */
 199         double bps;             /* bytes per second */
 200
 201         datalen = packets * packetlen;
 202         pps = packets / xfertime;
 203         bps = datalen / xfertime;
 204
 205         printf("\t%.0f packets/sec, ", pps);
 206
 207         if (bps >= 1024)
 208                 printf ("%.1fK ", bps / 1024);
 209         else
 210                 printf ("%.0f ", bps);
 211
 212         printf("bytes/sec\n");
 213 }
 214
 215
 216 static void
 217 usage(void)
 218 {
 219         fprintf(stderr,
 220                 "usage: spray [-c count] [-l length] [-d delay] host\n");
 221         exit(1);
 222 }