1178476Sjb#!/bin/ksh -p
2178476Sjb#
3178476Sjb# CDDL HEADER START
4178476Sjb#
5178476Sjb# The contents of this file are subject to the terms of the
6178476Sjb# Common Development and Distribution License (the "License").
7178476Sjb# You may not use this file except in compliance with the License.
8178476Sjb#
9178476Sjb# You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
10178476Sjb# or http://www.opensolaris.org/os/licensing.
11178476Sjb# See the License for the specific language governing permissions
12178476Sjb# and limitations under the License.
13178476Sjb#
14178476Sjb# When distributing Covered Code, include this CDDL HEADER in each
15178476Sjb# file and include the License file at usr/src/OPENSOLARIS.LICENSE.
16178476Sjb# If applicable, add the following below this CDDL HEADER, with the
17178476Sjb# fields enclosed by brackets "[]" replaced with your own identifying
18178476Sjb# information: Portions Copyright [yyyy] [name of copyright owner]
19178476Sjb#
20178476Sjb# CDDL HEADER END
21178476Sjb#
22178476Sjb
23178476Sjb#
24178476Sjb# Copyright 2006 Sun Microsystems, Inc.  All rights reserved.
25178476Sjb# Use is subject to license terms.
26178476Sjb#
27178476Sjb
28178476Sjb#ident	"%Z%%M%	%I%	%E% SMI"
29178476Sjb
30178476Sjb##
31178476Sjb#
32178476Sjb# ASSERTION:
33178476Sjb# The -D option can be used to define a name when used in conjunction
34178476Sjb# with the -C option. The -U option can be used to undefine a name in
35178476Sjb# conjunction with the -C option. 
36178476Sjb#
37178476Sjb# SECTION: dtrace Utility/-C Option;
38178476Sjb# 	dtrace Utility/-D Option;
39178476Sjb# 	dtrace Utility/-U Option
40178476Sjb#
41178476Sjb##
42178476Sjb
43178476Sjbscript()
44178476Sjb{
45178476Sjb	$dtrace -C -D VALUE=40 -U VALUE -s /dev/stdin <<EOF
46178476Sjb	#pragma D option quiet
47178476Sjb
48178476Sjb	BEGIN
49178476Sjb	{
50178476Sjb		printf("Value of VALUE: %d\n", VALUE);
51178476Sjb		exit(0);
52178476Sjb	}
53178476SjbEOF
54178476Sjb}
55178476Sjb
56178476Sjbif [ $# != 1 ]; then
57178476Sjb	echo expected one argument: '<'dtrace-path'>'
58178476Sjb	exit 2
59178476Sjbfi
60178476Sjb
61178476Sjbdtrace=$1
62178476Sjb
63178476Sjbscript
64178476Sjbstatus=$?
65178476Sjb
66178476Sjbif [ "$status" -ne 0 ]; then
67178476Sjb	exit 0
68178476Sjbfi
69178476Sjb
70178476Sjbecho $tst: dtrace failed
71178476Sjbexit $status
72