174 lines
5.2 KiB
Bash
Executable File
174 lines
5.2 KiB
Bash
Executable File
#! /usr/bin/env bash
|
|
# 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 below 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.
|
|
#
|
|
# __ __ _
|
|
# ___\ \/ /_ __ __ _| |_
|
|
# / _ \\ /| '_ \ / _` | __|
|
|
# | __// \| |_) | (_| | |_
|
|
# \___/_/\_\ .__/ \__,_|\__|
|
|
# |_| XML parser
|
|
#
|
|
# Copyright (c) 2002-2004 Fred L. Drake, Jr. <fdrake@users.sourceforge.net>
|
|
# Copyright (c) 2002 Karl Waclawek <karl@waclawek.net>
|
|
# Copyright (c) 2008-2019 Sebastian Pipping <sebastian@pipping.org>
|
|
# Copyright (c) 2017 Rhodri James <rhodri@wildebeest.org.uk>
|
|
# Licensed under the MIT license:
|
|
#
|
|
# Permission is hereby granted, free of charge, to any person obtaining
|
|
# a copy of this software and associated documentation files (the
|
|
# "Software"), to deal in the Software without restriction, including
|
|
# without limitation the rights to use, copy, modify, merge, publish,
|
|
# distribute, sublicense, and/or sell copies of the Software, and to permit
|
|
# persons to whom the Software is furnished to do so, subject to the
|
|
# following conditions:
|
|
#
|
|
# The above copyright notice and this permission notice shall be included
|
|
# in all copies or substantial portions of the Software.
|
|
#
|
|
# THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
|
|
# EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
|
|
# MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN
|
|
# NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM,
|
|
# DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR
|
|
# OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE
|
|
# USE OR OTHER DEALINGS IN THE SOFTWARE.
|
|
|
|
shopt -s nullglob
|
|
|
|
# Note: OUTPUT must terminate with the directory separator.
|
|
OUTPUT="$PWD/tests/out/"
|
|
TS="$PWD/tests/"
|
|
|
|
MYDIR="`dirname \"$0\"`"
|
|
cd "$MYDIR"
|
|
MYDIR="`pwd`"
|
|
XMLWF="${1:-`dirname \"$MYDIR\"`/xmlwf/xmlwf}"
|
|
# Unicode-aware diff utility
|
|
DIFF="${MYDIR}/udiffer.py"
|
|
|
|
|
|
# RunXmlwfNotWF file reldir
|
|
# reldir includes trailing slash
|
|
RunXmlwfNotWF() {
|
|
file="$1"
|
|
reldir="$2"
|
|
if $XMLWF -p "$file" > /dev/null; then
|
|
echo "Expected not well-formed: $reldir$file"
|
|
return 1
|
|
else
|
|
return 0
|
|
fi
|
|
}
|
|
|
|
# RunXmlwfWF file reldir
|
|
# reldir includes trailing slash
|
|
RunXmlwfWF() {
|
|
file="$1"
|
|
reldir="$2"
|
|
$XMLWF -p -N -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 $(ls -1 *.xml | sort -d) ; do
|
|
[[ -f "$xmlfile" ]] || continue
|
|
RunXmlwfWF "$xmlfile" "$xmldir/"
|
|
UpdateStatus $?
|
|
done
|
|
rm -f 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/p28a \
|
|
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
|
|
done
|
|
|
|
cd "$TS/xmlconf/oasis"
|
|
for xmlfile in *fail*.xml ; do
|
|
RunXmlwfNotWF "$xmlfile" "oasis/"
|
|
UpdateStatus $?
|
|
done
|
|
|
|
echo "Passed: $SUCCESS"
|
|
echo "Failed: $ERROR"
|