1# 2# CDDL HEADER START 3# 4# The contents of this file are subject to the terms of the 5# Common Development and Distribution License (the "License"). 6# You may not use this file except in compliance with the License. 7# 8# You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE 9# or http://www.opensolaris.org/os/licensing. 10# See the License for the specific language governing permissions 11# and limitations under the License. 12# 13# When distributing Covered Code, include this CDDL HEADER in each 14# file and include the License file at usr/src/OPENSOLARIS.LICENSE. 15# If applicable, add the following below this CDDL HEADER, with the 16# fields enclosed by brackets "[]" replaced with your own identifying 17# information: Portions Copyright [yyyy] [name of copyright owner] 18# 19# CDDL HEADER END 20# 21 22# 23# Copyright 2006 Sun Microsystems, Inc. All rights reserved. 24# Use is subject to license terms. 25# 26#pragma ident "@(#)tst.func.ksh 1.1 06/08/28 SMI" 27 28script() 29{ 30 $dtrace -qs /dev/stdin <<EOF 31 profile-1234hz 32 /arg0 != 0/ 33 { 34 @[func(arg0)] = count(); 35 } 36 37 tick-100ms 38 /i++ == 50/ 39 { 40 exit(0); 41 } 42EOF 43} 44 45if [ -f /usr/lib/dtrace/darwin.d ] ; then 46date=/bin/date 47else 48date=/usr/bin/date 49fi 50 51spinny() 52{ 53 while true; do 54 $date > /dev/null 55 done 56} 57 58dtrace=/usr/sbin/dtrace 59 60spinny & 61child=$! 62 63# 64# This is gutsy -- we're assuming that mutex_enter(9F) will show up in the 65# output. This is most likely _not_ to show up in the output if the 66# platform does not support arbitrary resolution interval timers -- but 67# the above script was stress-tested down to 100 hertz and still ran 68# successfully on all platforms, so one is hopeful that this test will pass 69# even in that case. 70# 71if [ -f /usr/lib/dtrace/darwin.d ] ; then 72script | tee /dev/fd/2 | grep ml_set_interrupts_enabled > /dev/null 73else 74script | tee /dev/fd/2 | grep mutex_enter > /dev/null 75fi 76status=$? 77 78kill $child 79exit $status 80