#!/bin/sh 
# scilab batch execution for testing 
# scidem scidir fn fileres  flag

# Copyright INRIA
echo ------------------- File $2--------------------
SCI1=$1
if [ -f $3  ]; then rm $3;fi;
trap "rm -f /tmp/$2.$$ /tmp/$2.$$.res /tmp/$2.$$.err /tmp/$2.$$.diff\
        ;exit 1"  1 2 13 15
echo "clear;lines(0);deff('[]=bugmes()','write(%io(2),''error on test'')');\
        diary('$3');driver('Pos');" >> /tmp/$2.$$ ;
sed     -e "s/pause,end/bugmes();quit;end/" \
        -e "s/halt()//" \
        $2 >> /tmp/$2.$$ ;
echo "diary(0);xend();exit;" >> /tmp/$2.$$ ;
($SCI1/bin/scilab -nw < /tmp/$2.$$ > /tmp/$2.$$.res ) 2> /tmp/$2.$$.err ;
sed -e "s/ \./0\./g" -e "s/E+/D+/g" -e "s/E-/D-/g" -e "s/-\./-0\./g" -e "s/^-->//g" -e "s/^-1->//g" $3 > $3.n
grep -v "xinit(" $3.n | grep -v "diary(" | grep -v "exec("  > $3
rm -f $3.n
if ( grep error /tmp/$2.$$.res >  /dev/null ) ; then 
        if [ $# != 4 ]; then 
                echo "Test failed ERROR DETECTED  while executing $2" ;
        else if (grep "$4" /tmp/$2.$$.res >  /dev/null ) ; 
             then  echo Test skipped ;
             else echo "Test failed ERROR DETECTED  while executing $2" ;
             fi;
        fi;
else if [ -f $3.ref ];then 
        if ( diff -w $3 $3.ref > /tmp/$2.$$.diff ) ;
        then  echo Test passed ;
        else  echo Test Failed SEE : diff -w  $3 $3.ref ;
        fi;
      fi;
fi;
echo ---------------------------------------------------------- 
rm -f /tmp/$2.$$ /tmp/$2.$$.res /tmp/$2.$$.err /tmp/$2.$$.diff
exit 0
