12be1a816SJohn Birrell#
22be1a816SJohn Birrell# CDDL HEADER START
32be1a816SJohn Birrell#
42be1a816SJohn Birrell# The contents of this file are subject to the terms of the
52be1a816SJohn Birrell# Common Development and Distribution License (the "License").
62be1a816SJohn Birrell# You may not use this file except in compliance with the License.
72be1a816SJohn Birrell#
82be1a816SJohn Birrell# You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
92be1a816SJohn Birrell# or http://www.opensolaris.org/os/licensing.
102be1a816SJohn Birrell# See the License for the specific language governing permissions
112be1a816SJohn Birrell# and limitations under the License.
122be1a816SJohn Birrell#
132be1a816SJohn Birrell# When distributing Covered Code, include this CDDL HEADER in each
142be1a816SJohn Birrell# file and include the License file at usr/src/OPENSOLARIS.LICENSE.
152be1a816SJohn Birrell# If applicable, add the following below this CDDL HEADER, with the
162be1a816SJohn Birrell# fields enclosed by brackets "[]" replaced with your own identifying
172be1a816SJohn Birrell# information: Portions Copyright [yyyy] [name of copyright owner]
182be1a816SJohn Birrell#
192be1a816SJohn Birrell# CDDL HEADER END
202be1a816SJohn Birrell#
212be1a816SJohn Birrell
222be1a816SJohn Birrell#
232be1a816SJohn Birrell# Copyright 2007 Sun Microsystems, Inc.  All rights reserved.
242be1a816SJohn Birrell# Use is subject to license terms.
252be1a816SJohn Birrell#
262be1a816SJohn Birrell# ident	"%Z%%M%	%I%	%E% SMI"
272be1a816SJohn Birrell
282be1a816SJohn Birrellscript()
292be1a816SJohn Birrell{
302be1a816SJohn Birrell	$dtrace -qs /dev/stdin <<EOF
312be1a816SJohn Birrell	profile-1234hz
322be1a816SJohn Birrell	/arg0 != 0/
332be1a816SJohn Birrell	{
342be1a816SJohn Birrell		@[sym(arg0)] = count();
352be1a816SJohn Birrell	}
362be1a816SJohn Birrell
372be1a816SJohn Birrell	tick-100ms
382be1a816SJohn Birrell	/i++ == 50/
392be1a816SJohn Birrell	{
402be1a816SJohn Birrell		exit(0);
412be1a816SJohn Birrell	}
422be1a816SJohn BirrellEOF
432be1a816SJohn Birrell}
442be1a816SJohn Birrell
452be1a816SJohn Birrellspinny()
462be1a816SJohn Birrell{
472be1a816SJohn Birrell	while true; do
483c606f67SMark Johnston		/bin/date > /dev/null
492be1a816SJohn Birrell	done
502be1a816SJohn Birrell}
512be1a816SJohn Birrell
522be1a816SJohn Birrellif [ $# != 1 ]; then
532be1a816SJohn Birrell	echo expected one argument: '<'dtrace-path'>'
542be1a816SJohn Birrell	exit 2
552be1a816SJohn Birrellfi
562be1a816SJohn Birrell
572be1a816SJohn Birrelldtrace=$1
582be1a816SJohn Birrell
592be1a816SJohn Birrellspinny &
602be1a816SJohn Birrellchild=$!
612be1a816SJohn Birrell
622be1a816SJohn Birrell#
632be1a816SJohn Birrell# This is the same gutsy test as that found in the func() test; see that
642be1a816SJohn Birrell# test for the rationale.
652be1a816SJohn Birrell#
66bc8eecf7SMark Johnstonscript | tee /dev/fd/2 | grep mtx_lock > /dev/null
672be1a816SJohn Birrellstatus=$?
682be1a816SJohn Birrell
692be1a816SJohn Birrellkill $child
702be1a816SJohn Birrellexit $status
71