Home | History | Annotate | Line # | Download | only in Ruby
      1  1.1  christos #!/usr/sbin/dtrace -Zs
      2  1.1  christos /*
      3  1.1  christos  * rb_funccalls.d - count Ruby function (method) calls using DTrace.
      4  1.1  christos  *                  Written for the Ruby DTrace provider.
      5  1.1  christos  *
      6  1.1  christos  * $Id: rb_funccalls.d,v 1.1.1.1 2015/09/30 22:01:09 christos Exp $
      7  1.1  christos  *
      8  1.1  christos  * This traces activity from all Ruby programs on the system that are
      9  1.1  christos  * running with Ruby provider support.
     10  1.1  christos  *
     11  1.1  christos  * USAGE: rb_funccalls.d 	# hit Ctrl-C to end
     12  1.1  christos  *
     13  1.1  christos  * FIELDS:
     14  1.1  christos  *		FILE		Filename of the Ruby program
     15  1.1  christos  *		METHOD		Method name
     16  1.1  christos  *		COUNT		Number of calls during sample
     17  1.1  christos  *
     18  1.1  christos  * Filename and method names are printed if available.
     19  1.1  christos  *
     20  1.1  christos  * COPYRIGHT: Copyright (c) 2007 Brendan Gregg.
     21  1.1  christos  *
     22  1.1  christos  * CDDL HEADER START
     23  1.1  christos  *
     24  1.1  christos  *  The contents of this file are subject to the terms of the
     25  1.1  christos  *  Common Development and Distribution License, Version 1.0 only
     26  1.1  christos  *  (the "License").  You may not use this file except in compliance
     27  1.1  christos  *  with the License.
     28  1.1  christos  *
     29  1.1  christos  *  You can obtain a copy of the license at Docs/cddl1.txt
     30  1.1  christos  *  or http://www.opensolaris.org/os/licensing.
     31  1.1  christos  *  See the License for the specific language governing permissions
     32  1.1  christos  *  and limitations under the License.
     33  1.1  christos  *
     34  1.1  christos  * CDDL HEADER END
     35  1.1  christos  *
     36  1.1  christos  * 09-Sep-2007	Brendan Gregg	Created this.
     37  1.1  christos  */
     38  1.1  christos 
     39  1.1  christos #pragma D option quiet
     40  1.1  christos 
     41  1.1  christos dtrace:::BEGIN
     42  1.1  christos {
     43  1.1  christos         printf("Tracing... Hit Ctrl-C to end.\n");
     44  1.1  christos }
     45  1.1  christos 
     46  1.1  christos ruby*:::function-entry
     47  1.1  christos {
     48  1.1  christos         @funcs[basename(copyinstr(arg2)), copyinstr(arg0), copyinstr(arg1)] =
     49  1.1  christos 	    count();
     50  1.1  christos }
     51  1.1  christos 
     52  1.1  christos dtrace:::END
     53  1.1  christos {
     54  1.1  christos         printf(" %-32.32s %-16s %-16s %8s\n", "FILE", "CLASS", "METHOD",
     55  1.1  christos 	    "CALLS");
     56  1.1  christos         printa(" %-32.32s %-16s %-16s %@8d\n", @funcs);
     57  1.1  christos }
     58