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) __dead2; 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 } 223