blob: 7d7c33d1533b848c2fa5f6c5caa1609f8aba2f8b (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
|
#!/usr/sbin/dtrace -s
/*
* This file and its contents are supplied under the terms of the
* Common Development and Distribution License ("CDDL"), version 1.0.
* You may only use this file in accordance with the terms of version
* 1.0 of the CDDL.
*
* A full copy of the text of the CDDL should have accompanied this
* source. A copy of the CDDL is also available via the Internet at
* http://www.illumos.org/license/CDDL.
*/
/*
* Copyright 2018 Nexenta Systems, Inc. All rights reserved.
*/
/*
* Quantize the time spent in each NFSv3 andf NFSv4 operation,
* optionally for a specified client, share and zone.
*
* Usage: nfs-time.d [<client ip>|all [<share path>|all] [<zone id>]]]
*
* example: nfs_time.d 192.168.123.1 /mypool/fs1 0
*
* It is valid to specify <client ip> or <share path> as "all"
* to quantize data for all clients and/or all shares.
* Omitting <zone id> will quantize data for all zones.
*/
#pragma D option flowindent
#pragma D option defaultargs
dtrace:::BEGIN
{
all_clients = (($$1 == NULL) || ($$1 == "all")) ? 1 : 0;
all_shares = (($$2 == NULL) || ($$2 == "all")) ? 1 : 0;
all_zones = ($$3 == NULL) ? 1 : 0;
client = $$1;
share = $$2;
zoneid = $3;
printf("%Y - client=%s share=%s zone=%s)\n", walltimestamp,
(all_clients) ? "all" : client,
(all_shares) ? "all" : share,
(all_zones) ? "all" : $$3);
}
nfsv3:::op-*-start,
nfsv4:::op-*-start
{
self->ts[probefunc] = timestamp;
}
nfsv3:::op-*-done,
nfsv4:::op-*-done
/ ((all_clients) || (args[0]->ci_remote == client)) &&
((all_shares) || (args[1]->noi_shrpath == share)) &&
((all_zones) || (args[1]->noi_zoneid == zoneid)) /
{
elapsed = (timestamp - self->ts[probefunc]);
@q[probefunc]=quantize(elapsed);
}
tick-5s
{
printa(@q);
/*
* uncomment "clear" to quantize per 5s interval
* rather than cumulative for duration of script.
* clear(@q);
*/
}
dtrace:::END
{
}
|
