1/*	$NetBSD: spray.c,v 1.6 2009/04/18 14:01:37 lukem Exp $	*/
2
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#include <sys/cdefs.h>
34#ifndef lint
35__RCSID("$NetBSD: spray.c,v 1.6 2009/04/18 14:01:37 lukem Exp $");
36#endif
37
38#include <stdio.h>
39#include <stdlib.h>
40#include <unistd.h>
41
42#include <rpc/rpc.h>
43#include <rpcsvc/spray.h>
44
45#ifndef SPRAYOVERHEAD
46#define SPRAYOVERHEAD	86
47#endif
48
49static void	print_xferstats(int, int, double);
50__dead static void	usage(void);
51
52/* spray buffer */
53static char spray_buffer[SPRAYMAX];
54
55/* RPC timeouts */
56static struct timeval NO_DEFAULT = { -1, -1 };
57static struct timeval ONE_WAY = { 0, 0 };
58static struct timeval TIMEOUT = { 25, 0 };
59
60int
61main(int argc, char **argv)
62{
63	char *progname;
64	spraycumul	host_stats;
65	sprayarr	host_array;
66	CLIENT *cl;
67	int c;
68	int i;
69	int count = 0;
70	int delay = 0;
71	int length = 0;
72	double xmit_time;			/* time to receive data */
73
74	progname = *argv;
75	while ((c = getopt(argc, argv, "c:d:l:")) != -1) {
76		switch (c) {
77		case 'c':
78			count = atoi(optarg);
79			break;
80		case 'd':
81			delay = atoi(optarg);
82			break;
83		case 'l':
84			length = atoi(optarg);
85			break;
86		default:
87			usage();
88			/* NOTREACHED */
89		}
90	}
91	argc -= optind;
92	argv += optind;
93
94	if (argc != 1) {
95		usage();
96		/* NOTREACHED */
97	}
98
99
100	/* Correct packet length. */
101	if (length > SPRAYMAX) {
102		length = SPRAYMAX;
103	} else if (length < SPRAYOVERHEAD) {
104		length = SPRAYOVERHEAD;
105	} else {
106		/* The RPC portion of the packet is a multiple of 32 bits. */
107		length -= SPRAYOVERHEAD - 3;
108		length &= ~3;
109		length += SPRAYOVERHEAD;
110	}
111
112
113	/*
114	 * The default value of count is the number of packets required
115	 * to make the total stream size 100000 bytes.
116	 */
117	if (!count) {
118		count = 100000 / length;
119	}
120
121	/* Initialize spray argument */
122	host_array.sprayarr_len = length - SPRAYOVERHEAD;
123	host_array.sprayarr_val = spray_buffer;
124
125
126	/* create connection with server */
127	cl = clnt_create(*argv, SPRAYPROG, SPRAYVERS, "udp");
128	if (cl == NULL) {
129		clnt_pcreateerror(progname);
130		exit(1);
131	}
132
133
134	/*
135	 * For some strange reason, RPC 4.0 sets the default timeout,
136	 * thus timeouts specified in clnt_call() are always ignored.
137	 *
138	 * The following (undocumented) hack resets the internal state
139	 * of the client handle.
140	 */
141	clnt_control(cl, CLSET_TIMEOUT, (caddr_t)&NO_DEFAULT);
142
143
144	/* Clear server statistics */
145	if (clnt_call(cl, SPRAYPROC_CLEAR, xdr_void, NULL, xdr_void, NULL, TIMEOUT) != RPC_SUCCESS) {
146		clnt_perror(cl, progname);
147		exit(1);
148	}
149
150
151	/* Spray server with packets */
152	printf ("sending %d packets of lnth %d to %s ...", count, length, *argv);
153	fflush (stdout);
154
155	for (i = 0; i < count; i++) {
156		clnt_call(cl, SPRAYPROC_SPRAY, xdr_sprayarr, &host_array, xdr_void, NULL, ONE_WAY);
157
158		if (delay) {
159			usleep(delay);
160		}
161	}
162
163
164	/* Collect statistics from server */
165	if (clnt_call(cl, SPRAYPROC_GET, xdr_void, NULL, xdr_spraycumul, &host_stats, TIMEOUT) != RPC_SUCCESS) {
166		clnt_perror(cl, progname);
167		exit(1);
168	}
169
170	xmit_time = host_stats.clock.sec +
171			(host_stats.clock.usec / 1000000.0);
172
173	printf ("\n\tin %.2f seconds elapsed time\n", xmit_time);
174
175
176	/* report dropped packets */
177	if (host_stats.counter != (unsigned)count) {
178		int packets_dropped = count - host_stats.counter;
179
180		printf("\t%d packets (%.2f%%) dropped\n",
181			packets_dropped,
182			100.0 * packets_dropped / count );
183	} else {
184		printf("\tno packets dropped\n");
185	}
186
187	printf("Sent:");
188	print_xferstats(count, length, xmit_time);
189
190	printf("Rcvd:");
191	print_xferstats(host_stats.counter, length, xmit_time);
192
193	exit (0);
194}
195
196
197static void
198print_xferstats(int packets, int packetlen, double xfertime)
199{
200	int datalen;
201	double pps;		/* packets per second */
202	double bps;		/* bytes per second */
203
204	datalen = packets * packetlen;
205	pps = packets / xfertime;
206	bps = datalen / xfertime;
207
208	printf("\t%.0f packets/sec, ", pps);
209
210	if (bps >= 1024)
211		printf ("%.1fK ", bps / 1024);
212	else
213		printf ("%.0f ", bps);
214
215	printf("bytes/sec\n");
216}
217
218static void
219usage(void)
220{
221	fprintf(stderr, "usage: spray [-c count] [-l length] [-d delay] host\n");
222	exit(1);
223}
224