xref: /titanic_50/usr/src/cmd/dtrace/demo/io/iocpu.d (revision 3f7d54a6b84904c8f4d8daa4c7b577bede7df8b9)
1 /*
2  * CDDL HEADER START
3  *
4  * The contents of this file are subject to the terms of the
5  * Common Development and Distribution License, Version 1.0 only
6  * (the "License").  You may not use this file except in compliance
7  * 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 2005 Sun Microsystems, Inc.  All rights reserved.
24  * Use is subject to license terms.
25  */
26 
27 #pragma D option quiet
28 
29 sched:::on-cpu
30 /execname == "soffice.bin"/
31 {
32 	self->on = vtimestamp;
33 }
34 
35 sched:::off-cpu
36 /self->on/
37 {
38 	@time["<on cpu>"] = sum(vtimestamp - self->on);
39 	self->on = 0;
40 }
41 
42 io:::wait-start
43 /execname == "soffice.bin"/
44 {
45 	self->wait = timestamp;
46 }
47 
48 io:::wait-done
49 /self->wait/
50 {
51 	@io[args[2]->fi_name] = sum(timestamp - self->wait);
52 	@time["<I/O wait>"] = sum(timestamp - self->wait);
53 	self->wait = 0;
54 }
55 
56 END
57 {
58 	printf("Time breakdown (milliseconds):\n");
59 	normalize(@time, 1000000);
60 	printa("  %-50s %15@d\n", @time);
61 
62 	printf("\nI/O wait breakdown (milliseconds):\n");
63 	normalize(@io, 1000000);
64 	printa("  %-50s %15@d\n", @io);
65 }
66