Home | History | Annotate | Download | only in funcs
      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 2007 Sun Microsystems, Inc.  All rights reserved.
     24  * Use is subject to license terms.
     25  */
     26 
     27 # ident	"%Z%%M%	%I%	%E% SMI"
     28 
     29 dtrace_script()
     30 {
     31 	
     32 	$dtrace -w -s /dev/stdin <<EOF
     33 
     34 	/*
     35  	* ASSERTION:
     36  	*	Verify that chill() refuses args greater than 
     37 	* 	500 milliseconds.
     38  	*
     39  	* SECTION: Actions and Subroutines/chill()
     40  	* 
     41  	*/
     42 
     43 	BEGIN 
     44 	{
     45 		chill(500000001);
     46 		exit(1);
     47 	}
     48 
     49 	ERROR
     50 	{
     51 		exit(1)
     52 	}
     53 EOF
     54 }
     55 
     56 if [ $# != 1 ]; then
     57 	echo expected one argument: '<'dtrace-path'>'
     58 	exit 2
     59 fi
     60 
     61 dtrace=$1
     62 
     63 dtrace_script &
     64 child=$!
     65 
     66 wait $child
     67 status=$?
     68 
     69 exit $status
     70