142 lines
3.4 KiB
Bash
142 lines
3.4 KiB
Bash
#! /bin/sh
|
|
|
|
# EXPAT TEST SCRIPT FOR W3C XML TEST SUITE
|
|
|
|
# This script can be used to exercise Expat against the
|
|
# w3c.org xml test suite, available from
|
|
# http://www.w3.org/XML/Test/xmlts20020606.zip.
|
|
|
|
# To run this script, first set XMLWF so that xmlwf can be
|
|
# found, then set the output directory with OUTPUT.
|
|
|
|
# The script lists all test cases where Expat shows a discrepancy
|
|
# from the expected result. Test cases where only the canonical
|
|
# output differs are prefixed with "Output differs:", and a diff file
|
|
# is generated in the appropriate subdirectory under $OUTPUT.
|
|
|
|
# If there are output files provided, the script will use
|
|
# output from xmlwf and compare the desired output against it.
|
|
# However, one has to take into account that the canonical output
|
|
# produced by xmlwf conforms to an older definition of canonical XML
|
|
# and does not generate notation declarations.
|
|
|
|
MYDIR="`dirname \"$0\"`"
|
|
cd "$MYDIR"
|
|
MYDIR="`pwd`"
|
|
XMLWF="`dirname \"$MYDIR\"`/xmlwf/xmlwf"
|
|
# XMLWF=/usr/local/bin/xmlwf
|
|
TS="$MYDIR/XML-Test-Suite"
|
|
# OUTPUT must terminate with the directory separator.
|
|
OUTPUT="$TS/out/"
|
|
# OUTPUT=/home/tmp/xml-testsuite-out/
|
|
|
|
|
|
# RunXmlwfNotWF file reldir
|
|
# reldir includes trailing slash
|
|
RunXmlwfNotWF() {
|
|
file="$1"
|
|
reldir="$2"
|
|
$XMLWF -p "$file" > outfile || return $?
|
|
read outdata < outfile
|
|
if test "$outdata" = "" ; then
|
|
echo "Expected well-formed: $reldir$file"
|
|
return 1
|
|
else
|
|
return 0
|
|
fi
|
|
}
|
|
|
|
# RunXmlwfWF file reldir
|
|
# reldir includes trailing slash
|
|
RunXmlwfWF() {
|
|
file="$1"
|
|
reldir="$2"
|
|
$XMLWF -p -d "$OUTPUT$reldir" "$file" > outfile || return $?
|
|
read outdata < outfile
|
|
if test "$outdata" = "" ; then
|
|
if [ -f "out/$file" ] ; then
|
|
diff "$OUTPUT$reldir$file" "out/$file" > outfile
|
|
if [ -s outfile ] ; then
|
|
cp outfile "$OUTPUT$reldir$file.diff"
|
|
echo "Output differs: $reldir$file"
|
|
return 1
|
|
fi
|
|
fi
|
|
return 0
|
|
else
|
|
echo "In $reldir: $outdata"
|
|
return 1
|
|
fi
|
|
}
|
|
|
|
SUCCESS=0
|
|
ERROR=0
|
|
|
|
UpdateStatus() {
|
|
if [ "$1" -eq 0 ] ; then
|
|
SUCCESS=`expr $SUCCESS + 1`
|
|
else
|
|
ERROR=`expr $ERROR + 1`
|
|
fi
|
|
}
|
|
|
|
##########################
|
|
# well-formed test cases #
|
|
##########################
|
|
|
|
cd "$TS/xmlconf"
|
|
for xmldir in ibm/valid/P* \
|
|
ibm/invalid/P* \
|
|
xmltest/valid/ext-sa \
|
|
xmltest/valid/not-sa \
|
|
xmltest/invalid \
|
|
xmltest/invalid/not-sa \
|
|
xmltest/valid/sa \
|
|
sun/valid \
|
|
sun/invalid ; do
|
|
cd "$TS/xmlconf/$xmldir"
|
|
mkdir -p "$OUTPUT$xmldir"
|
|
for xmlfile in *.xml ; do
|
|
RunXmlwfWF "$xmlfile" "$xmldir/"
|
|
UpdateStatus $?
|
|
done
|
|
rm outfile
|
|
done
|
|
|
|
cd "$TS/xmlconf/oasis"
|
|
mkdir -p "$OUTPUT"oasis
|
|
for xmlfile in *pass*.xml ; do
|
|
RunXmlwfWF "$xmlfile" "oasis/"
|
|
UpdateStatus $?
|
|
done
|
|
rm outfile
|
|
|
|
##############################
|
|
# not well-formed test cases #
|
|
##############################
|
|
|
|
cd "$TS/xmlconf"
|
|
for xmldir in ibm/not-wf/P* \
|
|
ibm/not-wf/misc \
|
|
xmltest/not-wf/ext-sa \
|
|
xmltest/not-wf/not-sa \
|
|
xmltest/not-wf/sa \
|
|
sun/not-wf ; do
|
|
cd "$TS/xmlconf/$xmldir"
|
|
for xmlfile in *.xml ; do
|
|
RunXmlwfNotWF "$xmlfile" "$xmldir/"
|
|
UpdateStatus $?
|
|
done
|
|
rm outfile
|
|
done
|
|
|
|
cd "$TS/xmlconf/oasis"
|
|
for xmlfile in *fail*.xml ; do
|
|
RunXmlwfNotWF "$xmlfile" "oasis/"
|
|
UpdateStatus $?
|
|
done
|
|
rm outfile
|
|
|
|
echo "Passed: $SUCCESS"
|
|
echo "Failed: $ERROR"
|