1#!/usr/sbin/dtrace -s
2/*
3 * mmapfiles.d - mmap'd files by process.
4 *               Written using DTrace (Solaris 10 3/05).
5 *
6 * 20-Apr-2006, ver 0.71        (first release)
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 */
33
34#pragma D option quiet
35
36dtrace:::BEGIN
37{
38	printf("Tracing... Hit Ctrl-C to end.\n");
39}
40
41syscall::mmap:entry
42/(int)arg4 > 0/
43{
44	/*
45	 * Fetch filename
46	 */
47	this->filistp = curthread->t_procp->p_user.u_finfo.fi_list;
48	this->ufentryp = (uf_entry_t *)((uint64_t)this->filistp +
49	    (uint64_t)arg4 * (uint64_t)sizeof (uf_entry_t));
50	this->filep = this->ufentryp->uf_file;
51	this->vnodep = this->filep != 0 ? this->filep->f_vnode : 0;
52	self->vpath = this->vnodep ? (this->vnodep->v_path != 0 ?
53	    cleanpath(this->vnodep->v_path) : "<unknown>") : "<unknown>";
54
55	/* Store Details */
56	@hits[execname, self->vpath] = count();
57}
58
59dtrace:::END
60{
61	/* Print Details */
62	printf("%5s %-16s %s\n", "MMAPS", "CMD", "PATHNAME");
63	printa("%@5d %-16s %s\n", @hits);
64}
65