diff options
Diffstat (limited to 'Cpu/inttimes.d')
-rwxr-xr-x | Cpu/inttimes.d | 73 |
1 files changed, 73 insertions, 0 deletions
diff --git a/Cpu/inttimes.d b/Cpu/inttimes.d new file mode 100755 index 000000000000..926a566553e5 --- /dev/null +++ b/Cpu/inttimes.d @@ -0,0 +1,73 @@ +#!/usr/sbin/dtrace -s +/* + * inttimes.d - print interrupt on-cpu time. + * Written using DTrace (Solaris 10 3/05) + * + * $Id: inttimes.d 3 2007-08-01 10:50:08Z brendan $ + * + * USAGE: inttimes.d # wait several seconds, then hit Ctrl-C + * + * FIELDS: + * DEVICE instance name of device driver + * TIME (ns) sum of time spent servicing interrupt (ns) + * + * BASED ON: /usr/demo/dtrace/intr.d + * + * SEE ALSO: + * DTrace Guide "sdt Provider" chapter (docs.sun.com) + * intrstat(1M) + * + * PORTIONS: Copyright (c) 2005 Brendan Gregg. + * + * CDDL HEADER START + * + * The contents of this file are subject to the terms of the + * Common Development and Distribution License, Version 1.0 only + * (the "License"). You may not use this file except in compliance + * with the License. + * + * You can obtain a copy of the license at Docs/cddl1.txt + * or http://www.opensolaris.org/os/licensing. + * See the License for the specific language governing permissions + * and limitations under the License. + * + * CDDL HEADER END + * + * 28-Jun-2005 Brendan Gregg Created this. + * 20-Apr-2006 " " Last update. + */ + +#pragma D option quiet + +dtrace:::BEGIN +{ + printf("Tracing... Hit Ctrl-C to end.\n"); +} + +sdt:::interrupt-start +{ + self->ts = vtimestamp; +} + +sdt:::interrupt-complete +/self->ts && arg0 != 0/ +{ + this->devi = (struct dev_info *)arg0; + /* this checks the pointer is valid, */ + self->name = this->devi != 0 ? + stringof(`devnamesp[this->devi->devi_major].dn_name) : "?"; + this->inst = this->devi != 0 ? this->devi->devi_instance : 0; + @num[self->name, this->inst] = sum(vtimestamp - self->ts); + self->name = 0; +} + +sdt:::interrupt-complete +{ + self->ts = 0; +} + +dtrace:::END +{ + printf("%11s %16s\n", "DEVICE", "TIME (ns)"); + printa("%10s%-3d %@16d\n", @num); +} |