[apple/network_cmds.git] / spray.tproj / spray.c

/*
 * Copyright (c) 1999 Apple Computer, Inc. All rights reserved.
 *
 * @APPLE_LICENSE_HEADER_START@
 * 
 * "Portions Copyright (c) 1999 Apple Computer, Inc.  All Rights
 * Reserved.  This file contains Original Code and/or Modifications of
 * Original Code as defined in and that are subject to the Apple Public
 * Source License Version 1.0 (the 'License').  You may not use this file
 * except in compliance with the License.  Please obtain a copy of the
 * License at http://www.apple.com/publicsource and read it before using
 * this file.
 * 
 * The Original Code and all software distributed under the License are
 * distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
 * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
 * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
 * FITNESS FOR A PARTICULAR PURPOSE OR NON-INFRINGEMENT.  Please see the
 * License for the specific language governing rights and limitations
 * under the License."
 * 
 * @APPLE_LICENSE_HEADER_END@
 */
/*
 * Copyright (c) 1993 Winning Strategies, Inc.
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 * 1. Redistributions of source code must retain the above copyright
 *    notice, this list of conditions and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in the
 *    documentation and/or other materials provided with the distribution.
 * 3. All advertising materials mentioning features or use of this software
 *    must display the following acknowledgement:
 *      This product includes software developed by Winning Strategies, Inc.
 * 4. The name of the author may not be used to endorse or promote products
 *    derived from this software without specific prior written permission
 *
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 *
 *	$Id: spray.c,v 1.2 2006/02/07 06:22:44 lindak Exp $
 */

#include <stdio.h>
#include <stdlib.h>
#include <unistd.h>

#include <rpc/rpc.h>
#include <rpcsvc/spray.h>

#ifndef SPRAYOVERHEAD
#define SPRAYOVERHEAD	86
#endif

void usage ();
void print_xferstats ();

/* spray buffer */
char spray_buffer[SPRAYMAX];

/* RPC timeouts */
struct timeval NO_DEFAULT = { -1, -1 };
struct timeval ONE_WAY = { 0, 0 };
struct timeval TIMEOUT = { 25, 0 };

int
main(argc, argv)
	int argc;
	char **argv;
{
	char *progname;
	spraycumul	host_stats;
	sprayarr	host_array;
	CLIENT *cl;
	int c;
	int i;
	int count = 0;
	int delay = 0;
	int length = 0;
	double xmit_time;			/* time to receive data */

	progname = *argv;
	while ((c = getopt(argc, argv, "c:d:l:")) != -1) {
		switch (c) {
		case 'c':
			count = atoi(optarg);
			break;
		case 'd':
			delay = atoi(optarg);
			break;
		case 'l':
			length = atoi(optarg);
			break;
		default:
			usage();
			/* NOTREACHED */
		}
	}
	argc -= optind;
	argv += optind;

	if (argc != 1) {
		usage();
		/* NOTREACHED */
	}


	/* Correct packet length. */
	if (length > SPRAYMAX) {
		length = SPRAYMAX;
	} else if (length < SPRAYOVERHEAD) {
		length = SPRAYOVERHEAD;
	} else {
		/* The RPC portion of the packet is a multiple of 32 bits. */
		length -= SPRAYOVERHEAD - 3;
		length &= ~3;
		length += SPRAYOVERHEAD;
	}


	/*
	 * The default value of count is the number of packets required
	 * to make the total stream size 100000 bytes.
	 */
	if (!count) {
		count = 100000 / length;
	}

	/* Initialize spray argument */
	host_array.sprayarr_len = length - SPRAYOVERHEAD;
	host_array.sprayarr_val = spray_buffer;
	

	/* create connection with server */
	cl = clnt_create(*argv, SPRAYPROG, SPRAYVERS, "udp");
	if (cl == NULL) {
		clnt_pcreateerror(progname);
		exit(1);
	}


	/*
	 * For some strange reason, RPC 4.0 sets the default timeout, 
	 * thus timeouts specified in clnt_call() are always ignored.  
	 *
	 * The following (undocumented) hack resets the internal state
	 * of the client handle.
	 */
	clnt_control(cl, CLSET_TIMEOUT, (char *)&NO_DEFAULT);


	/* Clear server statistics */
	if (clnt_call(cl, SPRAYPROC_CLEAR, (xdrproc_t)xdr_void, NULL, (xdrproc_t)xdr_void, NULL, TIMEOUT) != RPC_SUCCESS) {
		clnt_perror(cl, progname);
		exit(1);
	}


	/* Spray server with packets */
	printf ("sending %d packets of lnth %d to %s ...", count, length, *argv);
	fflush (stdout);

	for (i = 0; i < count; i++) {
		clnt_call(cl, SPRAYPROC_SPRAY, (xdrproc_t)xdr_sprayarr, &host_array, (xdrproc_t)xdr_void, NULL, ONE_WAY);

		if (delay) {
			usleep(delay);
		}
	}


	/* Collect statistics from server */
	if (clnt_call(cl, SPRAYPROC_GET, (xdrproc_t)xdr_void, NULL, (xdrproc_t)xdr_spraycumul, &host_stats, TIMEOUT) != RPC_SUCCESS) {
		clnt_perror(cl, progname);
		exit(1);
	}

	xmit_time = host_stats.clock.sec +
			(host_stats.clock.usec / 1000000.0);

	printf ("\n\tin %.2f seconds elapsed time\n", xmit_time);


	/* report dropped packets */
	if (host_stats.counter != count) {
		int packets_dropped = count - host_stats.counter;

		printf("\t%d packets (%.2f%%) dropped\n",
			packets_dropped,
			100.0 * packets_dropped / count );
	} else {
		printf("\tno packets dropped\n");
	}

	printf("Sent:");
	print_xferstats(count, length, xmit_time);

	printf("Rcvd:");
	print_xferstats(host_stats.counter, length, xmit_time);
	
	exit (0);
}


void
print_xferstats(packets, packetlen, xfertime)
	int packets;
	int packetlen;
	double xfertime;
{
	int datalen;
	double pps;		/* packets per second */
	double bps;		/* bytes per second */

	datalen = packets * packetlen;
	pps = packets / xfertime;
	bps = datalen / xfertime;

	printf("\t%.0f packets/sec, ", pps);

	if (bps >= 1024) 
		printf ("%.1fK ", bps / 1024);
	else
		printf ("%.0f ", bps);
	
	printf("bytes/sec\n");
}


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