Home | History | Annotate | Download | only in proc
      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 # ident	"%Z%%M%	%I%	%E% SMI"
     27 
     28 #
     29 # This script tests that the proc:::exit probe fires with the correct argument
     30 # when the process core dumps.  The problematic bit here is making sure that
     31 # a process _can_ dump core -- if core dumps are disabled on both a global
     32 # and per-process basis, this test will fail.  Rather than having this test
     33 # muck with coreadm(1M) settings, it will fail explicitly in this case and
     34 # provide a hint as to the problem.  In general, machines should never be
     35 # running with both per-process and global core dumps disabled -- so this
     36 # should be a non-issue in practice.
     37 #
     38 # If this fails, the script will run indefinitely; it relies on the harness
     39 # to time it out.
     40 #
     41 script()
     42 {
     43 	$dtrace -s /dev/stdin <<EOF
     44 	proc:::exit
     45 	/curpsinfo->pr_ppid == $child &&
     46 	    curpsinfo->pr_psargs == "$longsleep" && args[0] == CLD_DUMPED/
     47 	{
     48 		exit(0);
     49 	}
     50 
     51 	proc:::exit
     52 	/curpsinfo->pr_ppid == $child &&
     53 	    curpsinfo->pr_psargs == "$longsleep" && args[0] != CLD_DUMPED/
     54 	{
     55 		printf("Child process could not dump core.  Check coreadm(1M)");
     56 		printf(" settings; either per-process or global core dumps ");
     57 		printf("must be enabled for this test to work properly.");
     58 		exit(1);
     59 	}
     60 EOF
     61 }
     62 
     63 sleeper()
     64 {
     65 	/usr/bin/coreadm -p $corefile
     66 	while true; do
     67 		$longsleep &
     68 		/usr/bin/sleep 1
     69 		kill -SEGV $!
     70 	done
     71 	/usr/bin/rm -f $corefile
     72 }
     73 
     74 if [ $# != 1 ]; then
     75 	echo expected one argument: '<'dtrace-path'>'
     76 	exit 2
     77 fi
     78 
     79 dtrace=$1
     80 longsleep="/usr/bin/sleep 10000"
     81 corefile=/tmp/core.$$
     82 
     83 sleeper &
     84 child=$!
     85 
     86 script
     87 status=$?
     88 
     89 pstop $child
     90 pkill -P $child
     91 kill $child
     92 prun $child
     93 
     94 /usr/bin/rm -f $corefile
     95 exit $status
     96