mirror of
https://github.com/Stichting-MINIX-Research-Foundation/netbsd.git
synced 2025-09-10 07:39:25 -04:00
63 lines
1.6 KiB
D
Executable File
63 lines
1.6 KiB
D
Executable File
#!/usr/sbin/dtrace -s
|
|
/*
|
|
* mmapfiles.d - mmap'd files by process.
|
|
* Written using DTrace (Solaris 10 3/05).
|
|
*
|
|
* $Id: mmapfiles.d,v 1.1.1.1 2015/09/30 22:01:09 christos Exp $
|
|
*
|
|
* 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);
|
|
}
|