1#!/usr/sbin/dtrace -s 2/*- 3 * Copyright 2014 John-Mark Gurney. 4 * All rights reserved. 5 * 6 * Redistribution and use in source and binary forms, with or without 7 * modification, are permitted provided that the following conditions 8 * are met: 9 * 1. Redistributions of source code must retain the above copyright 10 * notice, this list of conditions and the following disclaimer. 11 * 2. Redistributions in binary form must reproduce the above copyright 12 * notice, this list of conditions and the following disclaimer in the 13 * documentation and/or other materials provided with the distribution. 14 * 15 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 16 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 17 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 18 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 19 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 20 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 21 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 22 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 23 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 24 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 25 * SUCH DAMAGE. 26 * 27 */ 28 29#pragma D option quiet 30 31/* from http://www.mail-archive.com/dtrace-discuss@opensolaris.org/msg03755.html */ 32#pragma D option aggsize=8m 33#pragma D option bufsize=16m 34#pragma D option dynvarsize=32m 35/* 36#pragma D option aggrate=0 37#pragma D option cleanrate=50Hz 38*/ 39 40dtrace:::BEGIN 41{ 42 printf("Tracing... Hit Ctrl-C to end.\n"); 43 dstart = timestamp; 44} 45 46io:::start 47{ 48 start_time[arg0] = timestamp; 49} 50 51io:::done 52/this->start = start_time[arg0]/ 53{ 54 this->delta = (timestamp - this->start) / 1000; 55 @q[args[1]->device_name, args[1]->unit_number] = 56 lquantize(this->delta, 4000, 80000, 4000); 57 @max[args[1]->device_name, args[1]->unit_number] = max(this->delta); 58 @avg[args[1]->device_name, args[1]->unit_number] = avg(this->delta); 59 @stddev[args[1]->device_name, args[1]->unit_number] = stddev(this->delta); 60 start_time[arg0] = 0; 61} 62 63dtrace:::END 64{ 65 printf("total time, us: %d\n", (timestamp - dstart) / 1000); 66 printa(" %s (%d), us:\n%@d\n", @q); 67 printa("max%s (%d), us: %@d\n", @max); 68 printa("avg%s (%d), us: %@d\n", @avg); 69 printa("stddev%s (%d), us: %@d\n", @stddev); 70} 71