#! /bin/sh
# softWorks, risc, 97/05/27-18:00
old=`pwd`;new=`dirname $0`;cd $new
SOFTBIN=`pwd`;export SOFTBIN
SOFTDIR=${SOFTDIR:-`dirname $SOFTBIN`};export SOFTDIR;cd $old
SOFTWORKS=${SOFTWORKS:-$SOFTDIR}; export SOFTWORKS
if [ "X$SOFTTRACE" != "X" ]; then echo "Shell script tprof";fi
if [ "X$SOFTDEBUG" != "X" ]; then set -v;fi
if [ "X$SOFTOS" = "X" ] ; then
case `uname -s` in
"HP-UX") SOFTOS=hpux; 
SHLIB_PATH=$SOFTDIR/exe/$SOFTOS:$SHLIB_PATH;
export SHLIB_PATH;;
"Linux") SOFTOS=linux;
LD_LIBRARY_PATH=$SOFTDIR/exe/$SOFTOS:$LD_LIBRARY_PATH;
export LD_LIBRARY_PATH;;
"IRIX")  SOFTOS=irix;
LD_LIBRARY_PATH=$SOFTDIR/exe/$SOFTOS:$LD_LIBRARY_PATH;
export LD_LIBRARY_PATH;;
"AIX")   SOFTOS=aix;
LD_LIBRARY_PATH=$SOFTDIR/exe/$SOFTOS:$LD_LIBRARY_PATH;
export LD_LIBRARY_PATH;;
"SunOS")   SOFTOS=solaris;
LD_LIBRARY_PATH=$SOFTDIR/exe/$SOFTOS:$LD_LIBRARY_PATH;
export LD_LIBRARY_PATH;;
"Solaris")   SOFTOS=solaris;
LD_LIBRARY_PATH=$SOFTDIR/exe/$SOFTOS:$LD_LIBRARY_PATH;
export LD_LIBRARY_PATH;;
"OSF1")   SOFTOS=osf1;
LD_LIBRARY_PATH=$SOFTDIR/exe/$SOFTOS:$LD_LIBRARY_PATH;
export LD_LIBRARY_PATH;;
*)       echo "Unknown operating system"; exit;;
esac
export SOFTOS
fi
TCL_LIBRARY=$SOFTDIR/lib;TK_LIBRARY=$SOFTDIR/lib;TIX_LIBRARY=$SOFTDIR/lib
export TCL_LIBRARY TK_LIBRARY TIX_LIBRARY
SOFTPAY=${SOFTPAY:-1}
if [ "X$SOFTPAY" = "X1" ]; then
if [ -f $SOFTDIR/lib/tprof2.2.txc ]; then 
startup=$SOFTDIR/lib/tprof2.2.txc;
binary=$SOFTDIR/exe/$SOFTOS/${SOFTTCL:-tip4.2.cxc}
else 
startup=$SOFTDIR/lib/tprof2.2.tx;
binary=$SOFTDIR/exe/$SOFTOS/${SOFTTCL:-tip4.2.cx}
fi
else
startup=$SOFTDIR/lib/tprof2.2.tx;
binary=$SOFTDIR/exe/$SOFTOS/${SOFTTCL:-tip4.2.cx}
fi
if [ ! -x $binary ]; then
echo "tcl binary $binary not executable"; exit 2;fi
if [ ! -f $startup ]; then
echo "tcl startup file $startup not found"; exit 3;fi
if [ "X$SOFTTRACE" != "X" ]; then echo "exec: $binary $startup $@"; fi
exec $binary $startup "$@"
# EOF
