xref: /titanic_52/usr/src/cmd/dtrace/demo/udp/udpbytesstat.d (revision 9cd928fe5e3ea4e05f64cfb380beb54b2623e7dc)
1 #!/usr/sbin/dtrace -s
2 /*
3  * CDDL HEADER START
4  *
5  * The contents of this file are subject to the terms of the
6  * Common Development and Distribution License (the "License").
7  * You may not use this file except in compliance with the License.
8  *
9  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
10  * or http://www.opensolaris.org/os/licensing.
11  * See the License for the specific language governing permissions
12  * and limitations under the License.
13  *
14  * When distributing Covered Code, include this CDDL HEADER in each
15  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
16  * If applicable, add the following below this CDDL HEADER, with the
17  * fields enclosed by brackets "[]" replaced with your own identifying
18  * information: Portions Copyright [yyyy] [name of copyright owner]
19  *
20  * CDDL HEADER END
21  */
22 /*
23  * Copyright (c) 2010, Oracle and/or its affiliates. All rights reserved.
24  */
25 
26 #pragma D option quiet
27 
28 udp:::receive
29 {
30 	@bytes[args[2]->ip_saddr, args[4]->udp_dport] =
31 	    sum(args[4]->udp_length);
32 }
33 
34 udp:::send
35 {
36 	@bytes[args[2]->ip_daddr, args[4]->udp_sport] =
37 	    sum(args[4]->udp_length);
38 }
39 
40 profile:::tick-1sec
41 {
42 	printf("\n   %-32s %16s\n", "HOST", "BYTES/s");
43 	printa("   %-32s %@16d\n", @bytes);
44 	trunc(@bytes);
45 }
46