12633Sahl#!/bin/ksh -p
22633Sahl#
32633Sahl# CDDL HEADER START
42633Sahl#
52633Sahl# The contents of this file are subject to the terms of the
62633Sahl# Common Development and Distribution License (the "License").
72633Sahl# You may not use this file except in compliance with the License.
82633Sahl#
92633Sahl# You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
102633Sahl# or http://www.opensolaris.org/os/licensing.
112633Sahl# See the License for the specific language governing permissions
122633Sahl# and limitations under the License.
132633Sahl#
142633Sahl# When distributing Covered Code, include this CDDL HEADER in each
152633Sahl# file and include the License file at usr/src/OPENSOLARIS.LICENSE.
162633Sahl# If applicable, add the following below this CDDL HEADER, with the
172633Sahl# fields enclosed by brackets "[]" replaced with your own identifying
182633Sahl# information: Portions Copyright [yyyy] [name of copyright owner]
192633Sahl#
202633Sahl# CDDL HEADER END
212633Sahl#
222633Sahl
232633Sahl#
242633Sahl# Copyright 2006 Sun Microsystems, Inc.  All rights reserved.
252633Sahl# Use is subject to license terms.
262633Sahl#
272633Sahl
282633Sahl#ident	"%Z%%M%	%I%	%E% SMI"
292633Sahl
302633Sahl##
312633Sahl#
322633Sahl# ASSERTION:
332633Sahl# Using the -e option exits after compiling any requests but before
342633Sahl# enabling probes.
352633Sahl#
362633Sahl# SECTION: dtrace Utility/-e Option
372633Sahl#
382633Sahl##
392633Sahl
402633Sahlscript()
412633Sahl{
422633Sahl	$dtrace -e -s /dev/stdin <<EOF
432633Sahl	#pragma D option quiet
442633Sahl	BEGIN
452633Sahl	{
462633Sahl		i = 100;
472633Sahl		printf("Value of i: %d\n", i);
482633Sahl		exit(0);
492633Sahl	}
502633SahlEOF
512633Sahl}
522633Sahl
53*2804Stomeeif [ $# != 1 ]; then
54*2804Stomee	echo expected one argument: '<'dtrace-path'>'
55*2804Stomee	exit 2
56*2804Stomeefi
57*2804Stomee
58*2804Stomeedtrace=$1
592633Sahl
602633Sahlscript
612633Sahlstatus=$?
622633Sahl
632633Sahlif [ "$status" -ne 0 ]; then
642633Sahl	echo $tst: dtrace failed
652633Sahlfi
662633Sahl
672633Sahlexit $status
68