xref: /netbsd-src/external/cddl/dtracetoolkit/dist/Proc/mmapfiles.d (revision c29d51755812ace2e87aeefdb06cb2b4dac7087a)
1 #!/usr/sbin/dtrace -s
2 /*
3  * mmapfiles.d - mmap'd files by process.
4  *               Written using DTrace (Solaris 10 3/05).
5  *
6  * $Id: mmapfiles.d,v 1.1.1.1 2015/09/30 22:01:09 christos Exp $
7  *
8  * USAGE:       mmapfiles.d    # hit Ctrl-C to end sample
9  *
10  * FIELDS:
11  *		MMAPS		number of mmaps
12  *		CMD		process name
13  *		PATHNAME	pathname of mmap'd file
14  *
15  * COPYRIGHT: Copyright (c) 2005, 2006 Brendan Gregg.
16  *
17  * CDDL HEADER START
18  *
19  *  The contents of this file are subject to the terms of the
20  *  Common Development and Distribution License, Version 1.0 only
21  *  (the "License").  You may not use this file except in compliance
22  *  with the License.
23  *
24  *  You can obtain a copy of the license at Docs/cddl1.txt
25  *  or http://www.opensolaris.org/os/licensing.
26  *  See the License for the specific language governing permissions
27  *  and limitations under the License.
28  *
29  * CDDL HEADER END
30  *
31  * 18-Oct-2005	Brendan Gregg	Created this.
32  * 20-Apr-2006	   "      "	Last update.
33  */
34 
35 #pragma D option quiet
36 
37 dtrace:::BEGIN
38 {
39 	printf("Tracing... Hit Ctrl-C to end.\n");
40 }
41 
42 syscall::mmap:entry
43 /(int)arg4 > 0/
44 {
45 	/*
46 	 * Fetch filename
47 	 */
48 	this->filep = curthread->t_procp->p_user.u_finfo.fi_list[arg4].uf_file;
49 	this->vnodep = this->filep != 0 ? this->filep->f_vnode : 0;
50 	self->vpath = this->vnodep ? (this->vnodep->v_path != 0 ?
51 	    cleanpath(this->vnodep->v_path) : "<unknown>") : "<unknown>";
52 
53 	/* Store Details */
54 	@hits[execname, self->vpath] = count();
55 }
56 
57 dtrace:::END
58 {
59 	/* Print Details */
60 	printf("%5s %-16s %s\n", "MMAPS", "CMD", "PATHNAME");
61 	printa("%@5d %-16s %s\n", @hits);
62 }
63