3 * rb_calltime.d - measure Ruby elapsed times for types of operation.
4 * Written for the Ruby DTrace provider.
6 * $Id: rb_calltime.d 41 2007-09-17 02:20:10Z brendan $
8 * This traces Ruby activity from all programs running on the system with
9 * Ruby provider support.
11 * USAGE: rb_calltime.d # hit Ctrl-C to end
14 * FILE Filename of the Ruby program
15 * TYPE Type of call (method/obj-new/gc/total)
17 * TOTAL Total elapsed time for calls (us)
19 * Filename and method names are printed if available.
21 * COPYRIGHT: Copyright (c) 2007 Brendan Gregg.
25 * The contents of this file are subject to the terms of the
26 * Common Development and Distribution License, Version 1.0 only
27 * (the "License"). You may not use this file except in compliance
30 * You can obtain a copy of the license at Docs/cddl1.txt
31 * or http://www.opensolaris.org/os/licensing.
32 * See the License for the specific language governing permissions
33 * and limitations under the License.
37 * 09-Sep-2007 Brendan Gregg Created this.
40 #pragma D option quiet
44 printf("Tracing... Hit Ctrl-C to end.\n");
47 ruby*:::function-entry
50 self->exclude[self->depth] = 0;
51 self->function[self->depth] = timestamp;
54 ruby*:::function-return
55 /self->function[self->depth]/
57 this->elapsed_incl = timestamp - self->function[self->depth];
58 this->elapsed_excl = this->elapsed_incl - self->exclude[self->depth];
59 self->function[self->depth] = 0;
60 self->exclude[self->depth] = 0;
61 this->file = basename(copyinstr(arg2));
62 this->name = strjoin(strjoin(copyinstr(arg0), "::"), copyinstr(arg1));
64 @num[this->file, "func", this->name] = count();
65 @num["-", "total", "-"] = count();
66 @types_incl[this->file, "func", this->name] = sum(this->elapsed_incl);
67 @types_excl[this->file, "func", this->name] = sum(this->elapsed_excl);
68 @types_excl["-", "total", "-"] = sum(this->elapsed_excl);
71 self->exclude[self->depth] += this->elapsed_incl;
74 ruby*:::object-create-start
76 self->object = timestamp;
79 ruby*:::object-create-done
82 this->elapsed = timestamp - self->object;
84 this->file = basename(copyinstr(arg1));
85 this->file = this->file != NULL ? this->file : ".";
86 this->name = copyinstr(arg0);
88 @num[this->file, "obj-new", this->name] = count();
89 @types[this->file, "obj-new", this->name] = sum(this->elapsed);
91 self->exclude[self->depth] += this->elapsed;
102 this->elapsed = timestamp - self->gc;
104 @num[".", "gc", "-"] = count();
105 @types[".", "gc", "-"] = sum(this->elapsed);
106 self->exclude[self->depth] += this->elapsed;
111 printf("\nCount,\n");
112 printf(" %-20s %-10s %-32s %8s\n", "FILE", "TYPE", "NAME", "COUNT");
113 printa(" %-20s %-10s %-32s %@8d\n", @num);
115 normalize(@types, 1000);
116 printf("\nElapsed times (us),\n");
117 printf(" %-20s %-10s %-32s %8s\n", "FILE", "TYPE", "NAME", "TOTAL");
118 printa(" %-20s %-10s %-32s %@8d\n", @types);
120 normalize(@types_excl, 1000);
121 printf("\nExclusive function elapsed times (us),\n");
122 printf(" %-20s %-10s %-32s %8s\n", "FILE", "TYPE", "NAME", "TOTAL");
123 printa(" %-20s %-10s %-32s %@8d\n", @types_excl);
125 normalize(@types_incl, 1000);
126 printf("\nInclusive function elapsed times (us),\n");
127 printf(" %-20s %-10s %-32s %8s\n", "FILE", "TYPE", "NAME", "TOTAL");
128 printa(" %-20s %-10s %-32s %@8d\n", @types_incl);