1178476Sjb#
2178476Sjb# CDDL HEADER START
3178476Sjb#
4178476Sjb# The contents of this file are subject to the terms of the
5178476Sjb# Common Development and Distribution License (the "License").
6178476Sjb# You may not use this file except in compliance with the License.
7178476Sjb#
8178476Sjb# You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
9178476Sjb# or http://www.opensolaris.org/os/licensing.
10178476Sjb# See the License for the specific language governing permissions
11178476Sjb# and limitations under the License.
12178476Sjb#
13178476Sjb# When distributing Covered Code, include this CDDL HEADER in each
14178476Sjb# file and include the License file at usr/src/OPENSOLARIS.LICENSE.
15178476Sjb# If applicable, add the following below this CDDL HEADER, with the
16178476Sjb# fields enclosed by brackets "[]" replaced with your own identifying
17178476Sjb# information: Portions Copyright [yyyy] [name of copyright owner]
18178476Sjb#
19178476Sjb# CDDL HEADER END
20178476Sjb#
21178476Sjb
22178476Sjb#
23178476Sjb# Copyright 2007 Sun Microsystems, Inc.  All rights reserved.
24178476Sjb# Use is subject to license terms.
25178476Sjb#
26178476Sjb# ident	"%Z%%M%	%I%	%E% SMI"
27178476Sjb
28178476Sjbscript()
29178476Sjb{
30178476Sjb	$dtrace -qs /dev/stdin <<EOF
31178476Sjb	profile-1234hz
32178476Sjb	/arg0 != 0/
33178476Sjb	{
34178476Sjb		@[func(arg0)] = count();
35178476Sjb	}
36178476Sjb
37178476Sjb	tick-100ms
38178476Sjb	/i++ == 50/
39178476Sjb	{
40178476Sjb		exit(0);
41178476Sjb	}
42178476SjbEOF
43178476Sjb}
44178476Sjb
45178476Sjbspinny()
46178476Sjb{
47178476Sjb	while true; do
48313126Smarkj		/bin/date > /dev/null
49178476Sjb	done
50178476Sjb}
51178476Sjb
52178476Sjbif [ $# != 1 ]; then
53178476Sjb	echo expected one argument: '<'dtrace-path'>'
54178476Sjb	exit 2
55178476Sjbfi
56178476Sjb
57178476Sjbdtrace=$1
58178476Sjb
59178476Sjbspinny &
60178476Sjbchild=$!
61178476Sjb
62178476Sjb#
63277911Smarkj# This is gutsy -- we're assuming that mtx_lock(9) will show up in the
64178476Sjb# output.  This is most likely _not_ to show up in the output if the 
65178476Sjb# platform does not support arbitrary resolution interval timers -- but
66178476Sjb# the above script was stress-tested down to 100 hertz and still ran
67178476Sjb# successfully on all platforms, so one is hopeful that this test will pass
68178476Sjb# even in that case.
69178476Sjb#
70277911Smarkjscript | tee /dev/fd/2 | grep mtx_lock > /dev/null
71178476Sjbstatus=$?
72178476Sjb
73178476Sjbkill $child
74178476Sjbexit $status
75