Blame contrib/compare_tests

Packit 62fe53
#!/bin/sh
Packit 62fe53
# This script automatically test the given tool with the tool's test cases,
Packit 62fe53
# reporting anything of interest.
Packit 62fe53
Packit 62fe53
# exits with 0 if there is nothing of interest
Packit 62fe53
# exits with 1 if there is something interesting
Packit 62fe53
# exits with 2 if an error occurred
Packit 62fe53
Packit 62fe53
# Give two .sum files to compare them
Packit 62fe53
Packit 62fe53
# Written by Mike Stump <mrs@cygnus.com>
Packit 62fe53
Packit 62fe53
tool=gxx
Packit 62fe53
Packit 62fe53
tmp1=/tmp/$tool-testing.$$a
Packit 62fe53
tmp2=/tmp/$tool-testing.$$b
Packit 62fe53
now_s=/tmp/$tool-testing.$$d
Packit 62fe53
before_s=/tmp/$tool-testing.$$e
Packit 62fe53
Packit 62fe53
if [ "$2" = "" ]; then
Packit 62fe53
	echo "Usage: $0 previous current" >&2
Packit 62fe53
	exit 2
Packit 62fe53
fi
Packit 62fe53
Packit 62fe53
sed 's/^XFAIL/FAIL/; s/^XPASS/PASS/' < "$1" | awk '/^Running target / {target = $3} { if (target != "unix") { sub(/: /, "&"target": " ); }; print $0; }' >$tmp1
Packit 62fe53
sed 's/^XFAIL/FAIL/; s/^XPASS/PASS/' < "$2" | awk '/^Running target / {target = $3} { if (target != "unix") { sub(/: /, "&"target": " ); }; print $0; }' >$tmp2
Packit 62fe53
Packit 62fe53
before=$tmp1
Packit 62fe53
now=$tmp2
Packit 62fe53
Packit 62fe53
exit_status=0
Packit 62fe53
trap "rm -f $tmp1 $tmp2 $now_s $before_s" 0 1 2 3 5 9 13 15
Packit 62fe53
Packit 62fe53
sort -t ':' +1 "$now" > "$now_s"
Packit 62fe53
sort -t ':' +1 "$before" > "$before_s"
Packit 62fe53
Packit 62fe53
grep '^FAIL:' "$now_s" | sed 's/^[^:]*:[ 	]//' >$tmp1
Packit 62fe53
grep '^PASS' "$before_s" | sed 's/^[^:]*:[ 	]//' | comm -12 $tmp1 - >$tmp2
Packit 62fe53
Packit 62fe53
grep -s . $tmp2 >/dev/null
Packit 62fe53
if [ $? = 0 ]; then
Packit 62fe53
	echo "Tests that now fail, but worked before:"
Packit 62fe53
	echo
Packit 62fe53
	cat $tmp2
Packit 62fe53
	echo
Packit 62fe53
	exit_status=1
Packit 62fe53
fi
Packit 62fe53
Packit 62fe53
grep '^PASS' "$now_s" | sed 's/^[^:]*:[ 	]//' >$tmp1
Packit 62fe53
grep '^FAIL' "$before_s" | sed 's/^[^:]*:[ 	]//' | comm -12 $tmp1 - >$tmp2
Packit 62fe53
Packit 62fe53
grep -s . $tmp2 >/dev/null
Packit 62fe53
if [ $? = 0 ]; then
Packit 62fe53
	echo "Tests that now work, but didn't before:"
Packit 62fe53
	echo
Packit 62fe53
	cat $tmp2
Packit 62fe53
	echo
Packit 62fe53
fi
Packit 62fe53
Packit 62fe53
grep '^FAIL' "$now_s" | sed 's/^[^:]*:[ 	]//' >$tmp1
Packit 62fe53
grep '^[PF]A[SI][SL]' "$before_s" | sed 's/^[^:]*:[ 	]//' | comm -23 $tmp1 - >$tmp2
Packit 62fe53
Packit 62fe53
grep -s . $tmp2 >/dev/null
Packit 62fe53
if [ $? = 0 ]; then
Packit 62fe53
	echo "New tests that FAIL:"
Packit 62fe53
	echo
Packit 62fe53
	cat $tmp2
Packit 62fe53
	echo
Packit 62fe53
	exit_status=1
Packit 62fe53
fi
Packit 62fe53
Packit 62fe53
grep '^PASS' "$now_s" | sed 's/^[^:]*:[ 	]//' >$tmp1
Packit 62fe53
grep '^[PF]A[SI][SL]' "$before_s" | sed 's/^[^:]*:[ 	]//' | comm -23 $tmp1 - >$tmp2
Packit 62fe53
Packit 62fe53
grep -s . $tmp2 >/dev/null
Packit 62fe53
if [ $? = 0 ]; then
Packit 62fe53
	echo "New tests that PASS:"
Packit 62fe53
	echo
Packit 62fe53
	cat $tmp2
Packit 62fe53
	echo
Packit 62fe53
fi
Packit 62fe53
Packit 62fe53
grep '^[PF]A[SI][SL]' "$now_s" | sed 's/^[^:]*:[ 	]//' >$tmp1
Packit 62fe53
grep '^PASS' "$before_s" | sed 's/^[^:]*:[ 	]//' | comm -13 $tmp1 - >$tmp2
Packit 62fe53
Packit 62fe53
grep -s . $tmp2 >/dev/null
Packit 62fe53
if [ $? = 0 ]; then
Packit 62fe53
	echo "Old tests that passed, that have disappeared: (Eeek!)"
Packit 62fe53
	echo
Packit 62fe53
	cat $tmp2
Packit 62fe53
	echo
Packit 62fe53
fi
Packit 62fe53
Packit 62fe53
grep '^[PF]A[SI][SL]' "$now_s" | sed 's/^[^:]*:[ 	]//' >$tmp1
Packit 62fe53
grep '^FAIL' "$before_s" | sed 's/^[^:]*:[ 	]//' | comm -13 $tmp1 - >$tmp2
Packit 62fe53
Packit 62fe53
grep -s . $tmp2 >/dev/null
Packit 62fe53
if [ $? = 0 ]; then
Packit 62fe53
	echo "Old tests that failed, that have disappeared: (Eeek!)"
Packit 62fe53
	echo
Packit 62fe53
	cat $tmp2
Packit 62fe53
	echo
Packit 62fe53
fi
Packit 62fe53
Packit 62fe53
exit $exit_status