#!/bin/sh

if [ $# -ne 1 ] ; then
   echo "usage: $0 [pass|fail]"
   echo
   exit
fi

FILE=test/test-cases.new
NEXT=`grep "	pass	" $FILE | cut -d'	' -f1 | sort -n | tail -1`
NEXT=`expr $NEXT + 1`
TYPE=$1

if [ -z $VISUAL ] ; then
   echo -n "lazy!!! what editor? "
   read $VISUAL
   if [ ! -e $VISUAL ] ; then
   	echo "That is not an editor!"
	echo
	exit
   fi
fi

if [ "$TYPE" = "pass" ] ; then
   echo "adding pass test $NEXT"
   mkdir test/pass/$NEXT
   $VISUAL test/pass/$NEXT/in
   touch test/pass/$NEXT/mu
   touch test/pass/$NEXT/out
   chmod -R g=u test/pass/$NEXT
elif [ "$TYPE" = "fail" ] ; then
   echo "adding fail test $NEXT"
   $VISUAL test/fail/$NEXT
   chmod g=u test/fail/NEXT
else
   echo "invalid argument ($TYPE)"
   echo
   exit
fi

echo -n "phase? "
read PHASE

echo -n "description? "
read DESCRIPTION

perl -e "print join(qq/\t/, (qq/$NEXT/,qq/$TYPE/,qq/$PHASE/,qq/$DESCRIPTION/)), qq/\n/;" >> $FILE
echo "insert into case (caseid, num, type, phase, description) values (null, $NEXT, '$TYPE', '$PHASE', '$DESCRIPTION'); " | mysql -u root algol60

echo 
echo "added $TYPE test case $NEXT"
echo "run make test-rewrite if you added a pass test"