HardenedBSD/cddl/contrib/dtracetoolkit/Kernel/dnlcsnoop.d
2012-05-12 21:25:48 +00:00

93 lines
2.2 KiB
D
Executable File

#!/usr/sbin/dtrace -s
/*
* dnlcsnoop.d - snoop DNLC activity.
* Written in DTrace (Solaris 10 3/05).
*
* The DNLC is the Directory Name Lookup Cache. Filename lookups often
* return a hit from here, before needing to traverse the regular file
* system cache or go to disk.
*
* $Id: dnlcsnoop.d 3 2007-08-01 10:50:08Z brendan $
*
* USAGE: dnlcsnoop.d # wait several seconds, then hit Ctrl-C
*
* FIELDS:
* PID Process ID
* CMD Command name
* TIME Elapsed time for lookup, us
* HIT DNLC hit Y/N
* PATH Path for DNLC lookup
*
* 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
*
* 27-Mar-2004 Brendan Gregg Created this.
* 14-Jun-2005 " " Rewrote this a lot.
* 20-Apr-2006 " " Last update.
*/
#pragma D option quiet
/*
* Print header
*/
dtrace:::BEGIN
{
printf("%6s %-12s %5s %3s %s\n",
"PID", "CMD", "TIME", "HIT", "PATH");
}
/*
* DNLC lookup
*/
fbt:genunix:dnlc_lookup:entry
{
/* store path */
self->path = stringof(args[0]->v_path);
/* check for trailing "/" */
this->len = strlen(self->path);
self->join = *(char *)(args[0]->v_path + this->len - 1) == '/' ?
"" : "/";
/* store lookup name */
self->name = stringof(arg1);
/* store start time */
self->start = timestamp;
}
/*
* DNLC return
*/
fbt:genunix:dnlc_lookup:return
/self->start/
{
/* calculate elapsed time */
this->elapsed = (timestamp - self->start) / 1000;
/* print output */
printf("%6d %-12.12s %5d %3s %s%s%s\n",
pid, execname, this->elapsed, arg1 == 0 ? "N" : "Y",
self->path, self->join, self->name);
/* clear variables */
self->path = 0;
self->join = 0;
self->name = 0;
self->start = 0;
}