#!/bin/sh
if [ $# -lt 1 ]
then
	echo "Usage: $0 [application] [program]"
	echo "{Application Choices} r matlab sas sas9 exec"
	exit 0
fi
CWD=`pwd`
PARAMS=${@}
APP=$1
if [ $LOGNAME == "root" ]; then
        echo "You are 'root' job aborted."
        echo "Modify script so email not sent to root@ncsu.edu"
        exit 0
fi

case $APP in 
	r|R )
		APP="/opt/R-2.5.0/bin/R CMD BATCH --vanilla"
		PROG=$2
		/usr/bin/dos2unix $PROG 2>/dev/null
		CODE="$APP $PROG $PROG.out 2>&1" 
	;;
	sas|sas9 )
		while test -n "${1}"; do
               		PROG=$1
                	shift
        	done
		APP="/opt/SAS_9.1/sas"
		/usr/bin/dos2unix $PROG 2>/dev/null
		CODE="/opt/SAS_9.1/${PARAMS}"
	;;
	matlab )
		APP="/opt/matlab/bin/matlab -nodisplay -nosplash -nojvm" 
		PROG=$2
		/usr/bin/dos2unix $PROG 2>/dev/null
		CODE="$APP < $PROG > $PROG.out"
	;;
	exec)
		PROG=$2
		if ! [ -x $PROG ]; then
			echo "ERROR: $APP not found or not executable!"
			exit 0
		fi
	;;
	* )
		echo "ERROR: bwsubmit [application] [program]"
		echo "{Application Choices} r matlab sas exec"
		exit 0
	;;
esac
BATCHSCRIPT=$CWD/$LOGNAME\_$PROG\_$$
# Create Batch Script
echo '#!/bin/tcsh' > $BATCHSCRIPT
echo "" >> $BATCHSCRIPT
echo "#$ -cwd -N $PROG -m e -M $LOGNAME@ncsu.edu" >> $BATCHSCRIPT
echo "" >> $BATCHSCRIPT
echo "($CODE)" >> $BATCHSCRIPT
# echo "Type: qsub $BATCHSCRIPT to Submit Job"
# . /sge/default/common/settings.sh
qsub $BATCHSCRIPT
qstat
/bin/rm $BATCHSCRIPT