#! /bin/ksh
#
# Copyright 2007 Sun Microsystems, Inc.  All rights reserved.
# Use is subject to license terms.
#
#pragma ident	"@(#)wdwwrapper.sh	1.1	07/10/17 SMI"
#


# Script to wrap a non-windowing clean script to provide a prompt 
# before the dtterm window closes, and to catch abnormal terminations.

# For any abnormal termination of the clean script, kill our parent
# process so that our grandparent will know that the script did not
# terminate normally.  (We expect our parent to be dtterm, and our
# grandparent to be allocate.)

# Trap any signal that would cause abnormal termination of the script,
# This catches use of ^C, ^Z, etc., and it also catches the HUP signal
# when the dtterm window is closed before the script is finished.

PARENT_KILLED=no

killparent() {
  if [ $PARENT_KILLED = "no" ]; then
    PARENT_KILLED=yes
    kill -9 $PPID
  fi
}

trap "killparent" HUP INT TERM QUIT TSTP ABRT

SCRIPT=$1
shift

if [ ! -e $SCRIPT ]; then
	echo **** Clean script $SCRIPT not found **** 
	echo "**** Press RETURN to close window ****"
	read
	kill -9 $PPID
fi

echo "**** Device cleanup for $2 ****\n"

$SCRIPT "$@"
STAT=$?

echo "\n**** Press RETURN to close window ****"
read

# If the script returned a non-zero exit status, kill our dtterm
# parent process.

if [ $STAT != 0 ]; then
	killparent
fi
