1#!/usr/sbin/dtrace -s
2/*
3 * rfileio.d - read file I/O stats, with cache miss rate.
4 *             Written using DTrace (Solaris 10 3/05)
5 *
6 * This script provides statistics on the number of reads and the bytes
7 * read from filesystems (logical), and the number of bytes read from
8 * disk (physical). A summary is printed every five seconds by file.
9 *
10 * A total miss-rate is also provided for the file system cache.
11 *
12 * 23-Apr-2006, ver 0.70
13 *
14 * USAGE:	rfileio.d
15 *
16 * IDEA: Richard McDougall, Solaris Internals 2nd Ed, FS Chapter.
17 *
18 * COPYRIGHT: Copyright (c) 2006 Brendan Gregg.
19 *
20 * CDDL HEADER START
21 *
22 *  The contents of this file are subject to the terms of the
23 *  Common Development and Distribution License, Version 1.0 only
24 *  (the "License").  You may not use this file except in compliance
25 *  with the License.
26 *
27 *  You can obtain a copy of the license at Docs/cddl1.txt
28 *  or http://www.opensolaris.org/os/licensing.
29 *  See the License for the specific language governing permissions
30 *  and limitations under the License.
31 *
32 * CDDL HEADER END
33 *
34 * 19-Mar-2006  Brendan Gregg   Created this.
35 */
36
37#pragma D option quiet
38
39self int trace;
40uint64_t lbytes;
41uint64_t pbytes;
42
43dtrace:::BEGIN
44{
45	trace("Tracing...\n");
46}
47
48fbt::fop_read:entry
49/self->trace == 0 && args[0]->v_path/
50{
51	self->pathname = cleanpath(args[0]->v_path);
52	@rio[self->pathname, "logical"] = count();
53	lbytes += args[1]->uio_resid;
54	self->size = args[1]->uio_resid;
55	self->uiop = args[1];
56}
57
58fbt::fop_read:return
59/self->size/
60{
61	@rbytes[self->pathname, "logical"] =
62	    sum(self->size - self->uiop->uio_resid);
63	self->size = 0;
64	self->uiop = 0;
65	self->pathname = 0;
66}
67
68io::bdev_strategy:start
69/self->size && args[0]->b_flags & B_READ/
70{
71	@rio[self->pathname, "physical"] = count();
72	@rbytes[self->pathname, "physical"] = sum(args[0]->b_bcount);
73	pbytes += args[0]->b_bcount;
74}
75
76profile:::tick-5s
77{
78	trunc(@rio, 20);
79	trunc(@rbytes, 20);
80	printf("\033[H\033[2J");
81	printf("\nRead IOPS, top 20 (count)\n");
82	printa("%-54s %10s %10@d\n", @rio);
83	printf("\nRead Bandwidth, top 20 (bytes)\n");
84	printa("%-54s %10s %10@d\n", @rbytes);
85	printf("\nTotal File System miss-rate: %d%%\n",
86	    lbytes ? 100 * pbytes / lbytes : 0);
87	trunc(@rbytes);
88	trunc(@rio);
89	lbytes = pbytes = 0;
90}
91