+++ /dev/null
-#! /bin/bash
-
-# $Id$
-
-
-t=./test_negative
-
-init_test () {
- # $1: Options for test_negative
- # $2: Path to test record
- options="$1"
- input="$2"
- output=`dirname $input`/`basename $input .xml`.out
- if [ -f "$output" ]; then
- echo "Test $input already initialized; skipping"
- else
- $t $options "$input" >"$output"
- echo Test $input initialized.
- fi
-}
-
-
-check_test () {
- # $1: Options for test_negative
- # $2: Path to test record
- options="$1"
- input="$2"
- output=`dirname $input`/`basename $input .xml`.out
- $t $options "$input" >current.out
- if [ -f "$output" ]; then
- if cmp "$output" current.out; then
- echo Test $input OK
- else
- echo Test $input FAILED!!!
- fi
- else
- echo Test $input still uninitialized
- echo - OUTPUT:
- cat current.out
- fi
-}
-
-
-for_directory () {
- what="$1"
- shift
- options="$1"
- shift
- while [ $# -gt 0 ]; do
- input="$1"
- shift
- if [ -f "$input" ]; then
- $what "$options" "$input"
- else
- if [ -d "$input" ]; then
- for ent in $input/*.xml; do
- for_directory $what "$options" $ent
- done
- else
- echo "Not found: $input" >&2
- fi
- fi
- done
-}
-
-
-usage () {
- cat <<EOF >&2
-usage: $0 [ -init -wf ] file ... dir ...
-EOF
- exit 1
-}
-
-
-action="check_test"
-options=""
-while true; do
- case "x$1" in
- x-init)
- action="init_test"
- shift
- ;;
- x-wf)
- options="$options -wf"
- shift
- ;;
- x-*)
- usage
- ;;
- *)
- break
- ;;
- esac
-done
-
-
-if [ $# -gt 0 ]; then
- for_directory $action "$options" "$@"
-else
- for_directory $action -wf \
- data_jclark_notwf/ext-sa data_jclark_notwf/not-sa data_jclark_notwf/sa \
- data_notwf/sa
- for_directory $action "" \
- data_jclark_invalid data_invalid
-fi
-
-# ======================================================================
-# $Log$
-# Revision 1.1 2000/11/17 09:57:33 lpadovan
-# Initial revision
-#
-# Revision 1.2 2000/05/01 16:23:39 gerd
-# Added data_invalid.
-#
-# Revision 1.1 2000/05/01 15:58:50 gerd
-# Initial revision.
-#