19512fe85Sahl#
29512fe85Sahl# CDDL HEADER START
39512fe85Sahl#
49512fe85Sahl# The contents of this file are subject to the terms of the
59512fe85Sahl# Common Development and Distribution License (the "License").
69512fe85Sahl# You may not use this file except in compliance with the License.
79512fe85Sahl#
89512fe85Sahl# You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
99512fe85Sahl# or http://www.opensolaris.org/os/licensing.
109512fe85Sahl# See the License for the specific language governing permissions
119512fe85Sahl# and limitations under the License.
129512fe85Sahl#
139512fe85Sahl# When distributing Covered Code, include this CDDL HEADER in each
149512fe85Sahl# file and include the License file at usr/src/OPENSOLARIS.LICENSE.
159512fe85Sahl# If applicable, add the following below this CDDL HEADER, with the
169512fe85Sahl# fields enclosed by brackets "[]" replaced with your own identifying
179512fe85Sahl# information: Portions Copyright [yyyy] [name of copyright owner]
189512fe85Sahl#
199512fe85Sahl# CDDL HEADER END
209512fe85Sahl#
219512fe85Sahl
229512fe85Sahl#
23*bd0f52d7Sjhaslam# Copyright 2007 Sun Microsystems, Inc.  All rights reserved.
249512fe85Sahl# Use is subject to license terms.
259512fe85Sahl#
26*bd0f52d7Sjhaslam# ident	"%Z%%M%	%I%	%E% SMI"
279512fe85Sahl
289512fe85Sahl#
299512fe85Sahl# This script tests that the proc:::exec probe fires, followed by the
309512fe85Sahl# proc:::exec-success probe (in a successful exec(2)).
319512fe85Sahl#
329512fe85Sahl# If this fails, the script will run indefinitely; it relies on the harness
339512fe85Sahl# to time it out.
349512fe85Sahl#
359512fe85Sahlscript()
369512fe85Sahl{
379512fe85Sahl	$dtrace -s /dev/stdin <<EOF
389512fe85Sahl	proc:::exec
399512fe85Sahl	/curpsinfo->pr_ppid == $child && args[0] == "/usr/bin/sleep"/
409512fe85Sahl	{
419512fe85Sahl		self->exec = 1;
429512fe85Sahl	}
439512fe85Sahl
449512fe85Sahl	proc:::exec-success
459512fe85Sahl	/self->exec/
469512fe85Sahl	{
479512fe85Sahl		exit(0);
489512fe85Sahl	}
499512fe85SahlEOF
509512fe85Sahl}
519512fe85Sahl
529512fe85Sahlsleeper()
539512fe85Sahl{
549512fe85Sahl	while true; do
559512fe85Sahl		/usr/bin/sleep 1
569512fe85Sahl	done
579512fe85Sahl}
589512fe85Sahl
5923b5c241Stomeeif [ $# != 1 ]; then
6023b5c241Stomee	echo expected one argument: '<'dtrace-path'>'
6123b5c241Stomee	exit 2
6223b5c241Stomeefi
6323b5c241Stomee
6423b5c241Stomeedtrace=$1
659512fe85Sahl
669512fe85Sahlsleeper &
679512fe85Sahlchild=$!
689512fe85Sahl
699512fe85Sahlscript
709512fe85Sahlstatus=$?
719512fe85Sahl
729512fe85Sahlkill $child
739512fe85Sahlexit $status
74