
#
# $XConsortium: pt,v 1.2 92/06/30 17:32:56 rws Exp $
#
usage () {
echo "Flags accepted.
      -v XT_VARIABLE_NAME=Value       Add a variable setting
      -d display                      Set the display
      -i <IC's>                       List of IC's to do
      -p                              Do pixmaps only.
      -w                              Do windows only.
      -P                              Pause after each drawing.
      -D                              Do default depth of screen only.
      -x <lev>                        Set debug level
      -g                              Generate pixmaps.
      -m                              Use macro version of function.
"
}

# The display defaults to $DISPLAY
#

trap "rm -f CONFIG" 0

ICS=
echo > CONFIG

GDB=""

while [ $# -gt 0 ]
do
	case $1 in
	-v)
		echo $2 >> CONFIG
		shift
		;;
	-d)
		echo "DISPLAY=$2" >> CONFIG
		shift
		;;
	-i)
		ICS=$2
		shift
		;;
	-x)
		echo "XT_DEBUG=$2" >> CONFIG
		shift
		;;
	-p)
		echo "XT_DEBUG_PIXMAP_ONLY=YES" >> CONFIG
		;;
	-w)
		echo "XT_DEBUG_WINDOW_ONLY=YES" >> CONFIG
		;;
	-P)
		echo "XT_DEBUG_PAUSE_AFTER=YES" >> CONFIG
		;;
	-D)
		echo "XT_DEBUG_DEFAULT_DEPTHS=YES" >> CONFIG
		;;
	-g)
		PROG=./pvgen
		;;
	-gdb)
		GDB=gdb
		;;
	-m)
		PROG=./MTest
		;;
        -h)
                usage
                exit 0
                ;;
	*)
		PROG=$1
		;;
	esac
	shift
done

if [ ! -f "$PROG" ]; then
	echo "Cannot find test run '$PROG'";
	exit 1
fi


# config=${TET_CONFIG:-$TET_ROOT/xts5/tetexec.cfg}
# Since :- is not universal, and I really want that functionality.
if [ x"$TET_CONFIG" = x"" ]; then
	config=$TET_ROOT/xts5/tetexec.cfg
else
	config=$TET_CONFIG
fi

if [ -z "$TEST_RESFILE" ]; then
	TET_RESFILE=$PROG.log
	export TET_RESFILE
fi

cat $config >> CONFIG
echo "junk=junk" >> CONFIG	# TEMP

# set TET_CONFIG to our modified file.
TET_CONFIG=CONFIG
export TET_CONFIG

#TET_CODE=${TET_CODE:-$TET_ROOT/xts5/tet_code}
if [ x"$TET_CODE" = x"" ]; then
	TET_CODE=$TET_ROOT/xts5/tet_code
fi
export TET_CODE

rm -f Err*.err

env | grep TET
$GDB $PROG $ICS

