xref: /netbsd-src/external/cddl/dtracetoolkit/dist/Bin/php_syscalls.d (revision c29d51755812ace2e87aeefdb06cb2b4dac7087a)
1 #!/usr/sbin/dtrace -Zs
2 /*
3  * php_syscalls.d - count PHP function calls and syscalls using DTrace.
4  *                  Written for the PHP DTrace provider.
5  *
6  * This traces syscalls that occured during a PHP function call.
7  *
8  * $Id: php_syscalls.d,v 1.1.1.1 2015/09/30 22:01:06 christos Exp $
9  *
10  * USAGE: php_syscalls.d 	# hit Ctrl-C to end
11  *
12  * FIELDS:
13  *		PID		Process ID
14  *		FILE		Filename of the PHP program
15  *		TYPE		Type of call (func/syscall)
16  *		NAME		Name of call
17  *		COUNT		Number of calls during sample
18  *
19  * Filename and function names are printed if available.
20  * The filename for syscalls may be printed as "php", if the program
21  * was invoked using the form "php filename" rather than running the
22  * program with an interpreter line.
23  *
24  * COPYRIGHT: Copyright (c) 2007 Brendan Gregg.
25  *
26  * CDDL HEADER START
27  *
28  *  The contents of this file are subject to the terms of the
29  *  Common Development and Distribution License, Version 1.0 only
30  *  (the "License").  You may not use this file except in compliance
31  *  with the License.
32  *
33  *  You can obtain a copy of the license at Docs/cddl1.txt
34  *  or http://www.opensolaris.org/os/licensing.
35  *  See the License for the specific language governing permissions
36  *  and limitations under the License.
37  *
38  * CDDL HEADER END
39  *
40  * 09-Sep-2007	Brendan Gregg	Created this.
41  */
42 
43 #pragma D option quiet
44 
45 dtrace:::BEGIN
46 {
47 	printf("Tracing... Hit Ctrl-C to end.\n");
48 }
49 
50 php*:::function-entry
51 /arg0/
52 {
53 	@calls[pid, basename(copyinstr(arg1)), "func", copyinstr(arg0)] =
54 	    count();
55 	self->php++;
56 }
57 
58 php*:::function-return
59 /arg0/
60 {
61 	self->php -= self->php == 0 ? 0 : 1;
62 }
63 
64 syscall:::entry
65 /self->php > 0/
66 {
67 	@calls[pid, basename(execname), "syscall", probefunc] = count();
68 }
69 
70 dtrace:::END
71 {
72 	printf(" %-6s  %-26s %-10s %-22s %8s\n", "PID", "FILE", "TYPE", "NAME",
73 	    "COUNT");
74 	printa(" %-6d  %-26s %-10s %-22s %@8d\n", @calls);
75 }
76