| 1 |
#!/bin/sh
|
| 2 |
|
| 3 |
usage()
|
| 4 |
{
|
| 5 |
echo "runtest.sh [-L <lazarus root directory> ] -f <fbintf package directory> [-p <SYSDBA password] [-t <testid>]"
|
| 6 |
}
|
| 7 |
|
| 8 |
cd `dirname $0`
|
| 9 |
|
| 10 |
#Test suite Configuration parameters
|
| 11 |
#These may be modified if needed to suite local requirements
|
| 12 |
|
| 13 |
TESTOUTDIR=/tmp/ibx-testsuite
|
| 14 |
USERNAME=SYSDBA
|
| 15 |
PASSWORD=masterkey
|
| 16 |
EMPLOYEEDB=${SYSDBAPWD:-employee}
|
| 17 |
NEWDBNAME=$TESTOUTDIR/testsuite1.fdb
|
| 18 |
NEWDBNAME2=$TESTOUTDIR/testsuite2.fdb
|
| 19 |
BAKFILE=$TESTOUTDIR/testsuite.gbk
|
| 20 |
LOGFILE=testout.`date +%N`.log
|
| 21 |
LAZARUS=$HOME/lazarus
|
| 22 |
|
| 23 |
if [ -d "../fbintf" ]; then
|
| 24 |
export FBINTF="../fbintf"
|
| 25 |
elif [ -d "../../fbintf" ]; then
|
| 26 |
export FBINTF="../../fbintf"
|
| 27 |
else
|
| 28 |
echo "Error: unable to locate Pascal Firebird Interface API"
|
| 29 |
exit 2
|
| 30 |
fi
|
| 31 |
#parse command line
|
| 32 |
|
| 33 |
TEMP=`getopt hL:f:p:t: "$@"`
|
| 34 |
if [ $? != 0 ] ; then echo "Terminating..." >&2 ; exit 1 ; fi
|
| 35 |
|
| 36 |
eval set -- "$TEMP"
|
| 37 |
|
| 38 |
while true ; do
|
| 39 |
case "$1" in
|
| 40 |
-h) usage; exit 1;;
|
| 41 |
|
| 42 |
-t) TEST="-t $2"; shift 2;;
|
| 43 |
|
| 44 |
-L) LAZARUS="$2"; shift 2;;
|
| 45 |
|
| 46 |
-f) FBINTF="$2"; shift 2;;
|
| 47 |
|
| 48 |
-p) PASSWORD="$2"; shift 2;;
|
| 49 |
|
| 50 |
--) shift; break;;
|
| 51 |
|
| 52 |
*) echo "Unrecognised argument $1"; usage; exit 1;;
|
| 53 |
|
| 54 |
esac
|
| 55 |
done
|
| 56 |
|
| 57 |
|
| 58 |
INCDIR="$FBINTF/client/3.0/firebird $FBINTF/client/include"
|
| 59 |
UNITDIR="$FBINTF $FBINTF/client $FBINTF/client/3.0/firebird $FBINTF/client/2.5 $FBINTF/client/3.0 $LAZARUS/components/lazutils"
|
| 60 |
|
| 61 |
cd `dirname $0`
|
| 62 |
mkdir -p $TESTOUTDIR
|
| 63 |
chmod 777 $TESTOUTDIR
|
| 64 |
export FPCDIR=/usr/lib/fpc/`fpc -iV`
|
| 65 |
fpcmake
|
| 66 |
make clean
|
| 67 |
make INCDIR="$INCDIR" UNITDIR="$UNITDIR"
|
| 68 |
if [ -x testsuite ]; then
|
| 69 |
if [ -n "$FIREBIRD" ]; then
|
| 70 |
export LD_LIBRARY_PATH=$LD_LIBRARY_PATH:$FIREBIRD/lib
|
| 71 |
fi
|
| 72 |
echo ""
|
| 73 |
echo "Starting Testsuite"
|
| 74 |
echo ""
|
| 75 |
./testsuite -u $USERNAME -p $PASSWORD -e $EMPLOYEEDB -n $NEWDBNAME -s $NEWDBNAME2 -b $BAKFILE -o $LOGFILE $TEST
|
| 76 |
echo "Comparing results with reference log"
|
| 77 |
echo ""
|
| 78 |
if grep 'ODS Major Version = 11' $LOGFILE >/dev/null; then
|
| 79 |
diff FB2reference.log $LOGFILE >diff.log
|
| 80 |
elif grep 'ODS Major Version = 12' $LOGFILE >/dev/null; then
|
| 81 |
diff FB3reference.log $LOGFILE >diff.log
|
| 82 |
else
|
| 83 |
diff FB4reference.log $LOGFILE >diff.log
|
| 84 |
fi
|
| 85 |
# cat diff.log
|
| 86 |
echo "`cat diff.log|wc -l` lines in diff"
|
| 87 |
else
|
| 88 |
echo "Unable to run test suite"
|
| 89 |
fi
|
| 90 |
echo "Log File is $LOGFILE"
|
| 91 |
rm -r testunits
|
| 92 |
rm testsuite
|
| 93 |
exit 0
|
| 94 |
|
