6502/xa65
1
0
Fork 0
mirror of https://github.com/fachat/xa65.git synced 2025-01-01 10:29:19 +00:00
Code Issues Projects Releases Wiki Activity

first test infrastructure

Browse Source
This commit is contained in:
A. Fachat 2014-08-18 23:19:07 +02:00
parent cad65680e2
commit b4f36e9061
4 changed files with 308 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
xa/src/.gitignore vendored Normal file
View File

@ -0,0 +1,2 @@
*.o

4
xa/tests/Makefile Normal file
View File

@ -0,0 +1,4 @@
tests:
(cd adrm; make tests)

BIN
xa/tests/adrm/a.o65
View File

Binary file not shown.

302
xa/tests/adrm/runtest.sh Executable file
View File

@ -0,0 +1,302 @@
#!/bin/bash
# run a test script
#THISDIR=`dirname $0`
THISDIR=`pwd`
echo "0=$0"
echo "THISDIR=$THISDIR"
EXCLUDE=
TESTFILES=
XA=$THISDIR/../../xa
##########################
LIST=$NAME.lst
##########################
function usage() {
echo "Assemble *.asm test files"
echo " $0 [options] [frs_scripts]"
echo "Options:"
echo " -v verbose log"
echo " -o server log on console"
echo " -d <breakpoint> run xa with gdb and set given breakpoint. Can be "
echo " used multiple times"
echo " -k keep all files, even non-log and non-data files in run directory"
echo " -c clean up only non-log and non-data files from run directory,"
echo " keep rest (default)"
echo " -C always clean up complete run directory"
echo " -R <run directory> use given run directory instead of tmp folder (note:"
echo " will not be rmdir'd on -C"
echo " -q will suppress any output except whether test was successful"
echo " -h show this help"
}
function contains() {
local j
for j in "${@:2}"; do test "$j" == "$1" && return 0; done;
return 1;
}
function hexdiff() {
diffres=0
if ! cmp -b "$1" "$2"; then
tmp1=`mktemp`
tmp2=`mktemp`
hexdump -C "$1" > $tmp1
hexdump -C "$2" > $tmp2
diff -u $tmp1 $tmp2
diffres=$?
rm $tmp1 $tmp2
fi;
return $diffres
}
VERBOSE=""
DEBUG=""
CLEAN=1
QUIET=0
LOGFILE=""
TMPDIR=`mktemp -d`
OWNDIR=1
while test $# -gt 0; do
case $1 in
-h)
usage
exit 0;
;;
-o)
LOGFILE="-"
shift;
;;
-v)
VERBOSE="-v"
shift;
;;
-d)
if test $# -lt 2; then
echo "Option -d needs the break point name for gdb as parameter"
exit -1;
fi;
DEBUG="$DEBUG $2"
shift 2;
;;
-k)
CLEAN=0
shift;
;;
-c)
CLEAN=1
shift;
;;
-C)
CLEAN=2
shift;
;;
-q)
QUIET=1
shift;
;;
-R)
if test $# -lt 2; then
echo "Option -R needs the directory path as parameter"
exit -1;
fi;
TMPDIR="$2"
OWNDIR=0
shift 2;
;;
-?)
echo "Unknown option $1"
usage
exit 1;
;;
*)
break;
;;
esac;
done;
#######################
# test for executables
ERR=0
if test ! -e $XA; then
echo "$XA does not exist! Maybe forgot to compile?"
ERR=1
fi
if [ $ERR -ge 1 ]; then
echo "Aborting!"
exit 1;
fi
# scripts to run
if [ "x$*" = "x" ]; then
SCRIPTS=$THISDIR/*${FILTER}*.asm
SCRIPTS=`basename -a $SCRIPTS`;
TESTSCRIPTS=""
if test "x$EXCLUDE" != "x"; then
exarr=( $EXCLUDE )
scrarr=( $SCRIPTS )
for scr in "${scrarr[@]}"; do
if ! contains "${scr}" "${exarr[@]}"; then
TESTSCRIPTS="$TESTSCRIPTS $scr";
fi
done;
else
TESTSCRIPTS="$SCRIPTS"
fi;
else
TESTSCRIPTS="";
for i in "$@"; do
if test -f "$i".asm ; then
TESTSCRIPTS="$TESTSCRIPTS $i.asm";
else
TESTSCRIPTS="$TESTSCRIPTS $i";
fi
done;
fi;
echo "TESTSCRIPTS=$TESTSCRIPTS"
########################
# tmp names
#
DEBUGFILE="$TMPDIR"/gdb.ex
########################
# stdout
# remember stdout for summary output
exec 5>&1
# redirect log when quiet
if test $QUIET -ge 1 ; then
exec 1>$TMPDIR/stdout.log
fi
########################
# prepare files
#
for i in $TESTSCRIPTS; do
cp "$THISDIR/$i" "$TMPDIR"
done;
########################
# run scripts
#
for script in $TESTSCRIPTS; do
echo "Run script $script"
# overwrite test files in each iteration, just in case
for i in $TESTFILES; do
if [ -f ${THISDIR}/${i}.gz ]; then
gunzip -c ${THISDIR}/${i}.gz > ${TMPDIR}/${i}
else
cp ${THISDIR}/${i} ${TMPDIR}/${i}
fi;
done;
if test "x$DEBUG" = "x"; then
############################################
# simply do assemble
echo "Run assembler:" $XA $VERBOSE $script $TMPDIR
if test "x$LOGFILE" = "x"; then
(cd $TMPDIR; $XA -o a.out -P $script.log $script)
else
(cd $TMPDIR; $XA -o a.out -P $LOGFILE $script)
fi
RESULT=$?
if test $RESULT -eq 0; then
echo "$script: Ok" >&5
else
echo "$script: errors: $RESULT" >&5
fi
else
echo > $DEBUGFILE;
for i in $DEBUG; do
echo "break $i" >> $DEBUGFILE
done;
gdb -x $DEBUGFILE -ex "run -o a.out -P $LOGFILE $script.asm" $XA
fi;
#echo "Killing server (pid $SERVERPID)"
#kill -TERM $SERVERPID
if test "x$COMPAREFILES" != "x"; then
testname=`basename $script .asm`
for i in $COMPAREFILES; do
NAME="${THISDIR}/${i}-${testname}"
if test -f ${NAME}; then
echo "Comparing file ${i} with ${NAME}"
hexdiff ${NAME} $TMPDIR/${i}
if test $? -ne 0; then
echo "$script: File ${i} differs!" >&5
fi;
fi
if test -f ${NAME}.gz; then
echo "Comparing file ${i} with ${NAME}.gz"
gunzip -c ${NAME}.gz > ${TMPDIR}/shouldbe_${i}
hexdiff ${TMPDIR}/shouldbe_${i} ${TMPDIR}/${i}
if test $? -ne 0; then
echo "$script: File ${i} differs!" >&5
fi;
rm -f ${TMPDIR}/shouldbe_${i}
fi
done;
fi
if test $CLEAN -ge 1; then
rm -f $DEBUGFILE;
rm -f $TMPDIR/$script;
fi
done;
if test $CLEAN -ge 2; then
echo "Cleaning up directory $TMPDIR"
for script in $TESTSCRIPTS; do
rm -f $TMPDIR/$script.log
done;
# gzipped test files are unzipped
for i in $TESTFILES; do
rm -f $TMPDIR/$i;
done;
rm -f $TMPDIR/stdout.log
# only remove work dir if we own it (see option -R)
if test $OWNDIR -ge 1; then
rmdir $TMPDIR
fi;
else
echo "Find debug info in $TMPDIR" >&5
fi;