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 tcp:::receive 29 { 30 @bytes[args[2]->ip_saddr, args[4]->tcp_dport] = 31 sum(args[2]->ip_plength - args[4]->tcp_offset); 32 } 33 34 tcp:::send 35 { 36 @bytes[args[2]->ip_daddr, args[4]->tcp_sport] = 37 sum(args[2]->ip_plength - args[4]->tcp_offset); 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