diff options
Diffstat (limited to 'cddl/contrib/opensolaris/cmd/dtrace/test/tst/common/proc/tst.execfail.ksh')
-rw-r--r-- | cddl/contrib/opensolaris/cmd/dtrace/test/tst/common/proc/tst.execfail.ksh | 86 |
1 files changed, 86 insertions, 0 deletions
diff --git a/cddl/contrib/opensolaris/cmd/dtrace/test/tst/common/proc/tst.execfail.ksh b/cddl/contrib/opensolaris/cmd/dtrace/test/tst/common/proc/tst.execfail.ksh new file mode 100644 index 0000000..3b2dbb3 --- /dev/null +++ b/cddl/contrib/opensolaris/cmd/dtrace/test/tst/common/proc/tst.execfail.ksh @@ -0,0 +1,86 @@ +# +# CDDL HEADER START +# +# The contents of this file are subject to the terms of the +# Common Development and Distribution License (the "License"). +# You may not use this file except in compliance with the License. +# +# You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE +# or http://www.opensolaris.org/os/licensing. +# See the License for the specific language governing permissions +# and limitations under the License. +# +# When distributing Covered Code, include this CDDL HEADER in each +# file and include the License file at usr/src/OPENSOLARIS.LICENSE. +# If applicable, add the following below this CDDL HEADER, with the +# fields enclosed by brackets "[]" replaced with your own identifying +# information: Portions Copyright [yyyy] [name of copyright owner] +# +# CDDL HEADER END +# + +# +# Copyright 2007 Sun Microsystems, Inc. All rights reserved. +# Use is subject to license terms. +# +# ident "%Z%%M% %I% %E% SMI" + +# +# This script tests that -- if a exec(2) fails -- the proc:::exec probe fires, +# followed by the proc:::exec-success probe (in a successful exec(2)). To +# circumvent any potential shell cleverness, this script generates exec +# failure by generating a file with a bogus interpreter. (It seems unlikely +# that a shell -- regardless of how clever it claims to be -- would bother to +# validate the interpreter before exec'ing.) +# +# If this fails, the script will run indefinitely; it relies on the harness +# to time it out. +# +script() +{ + $dtrace -s /dev/stdin <<EOF + proc:::exec + /curpsinfo->pr_ppid == $child && args[0] == "$badexec"/ + { + self->exec = 1; + } + + proc:::exec_failure + /self->exec/ + { + exit(0); + } +EOF +} + +sleeper() +{ + while true; do + /bin/sleep 1 + $badexec + done +} + +if [ $# != 1 ]; then + echo expected one argument: '<'dtrace-path'>' + exit 2 +fi + +badexec=/tmp/execfail.ksh.$$ +dtrace=$1 + +cat > $badexec <<EOF +#!/this_is_a_bogus_interpreter +EOF + +chmod +x $badexec + +sleeper & +child=$! +script +status=$? + +kill $child +rm $badexec + +exit $status |