| #! /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" |