vendor/dtracetoolkit/dtracetoolkit-20120512vendor/dtracetoolkit

1 files changed, 62 insertions, 0 deletions

diff --git a/Proc/mmapfiles.d b/Proc/mmapfiles.d
new file mode 100755
index 000000000000..7690f509576b
--- /dev/null
+++ b/Proc/mmapfiles.d
@@ -0,0 +1,62 @@
+#!/usr/sbin/dtrace -s
+/*
+ * mmapfiles.d - mmap'd files by process.
+ *               Written using DTrace (Solaris 10 3/05).
+ *
+ * $Id: mmapfiles.d 14 2007-09-11 08:03:35Z brendan $
+ *
+ * USAGE:       mmapfiles.d    # hit Ctrl-C to end sample
+ *
+ * FIELDS:
+ *		MMAPS		number of mmaps
+ *		CMD		process name
+ *		PATHNAME	pathname of mmap'd file
+ *
+ * COPYRIGHT: Copyright (c) 2005, 2006 Brendan Gregg.
+ *
+ * CDDL HEADER START
+ *
+ *  The contents of this file are subject to the terms of the
+ *  Common Development and Distribution License, Version 1.0 only
+ *  (the "License").  You may not use this file except in compliance
+ *  with the License.
+ *
+ *  You can obtain a copy of the license at Docs/cddl1.txt
+ *  or http://www.opensolaris.org/os/licensing.
+ *  See the License for the specific language governing permissions
+ *  and limitations under the License.
+ *
+ * CDDL HEADER END
+ *
+ * 18-Oct-2005	Brendan Gregg	Created this.
+ * 20-Apr-2006	   "      "	Last update.
+ */
+
+#pragma D option quiet
+
+dtrace:::BEGIN
+{
+	printf("Tracing... Hit Ctrl-C to end.\n");
+}
+
+syscall::mmap:entry
+/(int)arg4 > 0/
+{
+	/*
+	 * Fetch filename
+	 */
+	this->filep = curthread->t_procp->p_user.u_finfo.fi_list[arg4].uf_file;
+	this->vnodep = this->filep != 0 ? this->filep->f_vnode : 0;
+	self->vpath = this->vnodep ? (this->vnodep->v_path != 0 ?
+	    cleanpath(this->vnodep->v_path) : "<unknown>") : "<unknown>";
+
+	/* Store Details */
+	@hits[execname, self->vpath] = count();
+}
+
+dtrace:::END
+{
+	/* Print Details */
+	printf("%5s %-16s %s\n", "MMAPS", "CMD", "PATHNAME");
+	printa("%@5d %-16s %s\n", @hits);
+}