A shell script to run a very large scale diff/patch/cmp regression.

The script recursively walks though a checked out cvs dir and
retrieves all revisions from each file. All pairs of these revisions
are diffed against each other, and the resulting patches are checked
using patch(1) and cmp(1). Based on an idea from deraadt@.

ok millert@ deraadt@

1 files changed, 130 insertions, 0 deletions

diff --git a/regress/usr.bin/diff/torture/torture b/regress/usr.bin/diff/torture/torture
new file mode 100644
index 00000000000..1ee533c766e
--- /dev/null
+++ b/regress/usr.bin/diff/torture/torture
@@ -0,0 +1,130 @@
+#!/bin/ksh
+#
+#	$OpenBSD: torture,v 1.1 2003/07/22 18:32:08 otto Exp $
+#
+# Copyright (c) 2003 Otto Moerbeek <otto@drijf.net>
+#
+# Permission to use, copy, modify, and distribute this software for any
+# purpose with or without fee is hereby granted, provided that the above
+# copyright notice and this permission notice appear in all copies.
+#
+# THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
+# WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
+# MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
+# ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
+# WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
+# ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
+# OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
+#
+# Usage: torture file or directory
+#
+# Run a diff/patch/cmp regression on all available cvs revisisons of a
+# file or recursively on all files in a cvs checkout directory.
+#
+# Run this script on a freshly checked out cvs dir. Local modifications
+# should not be touched, but this is not tested.
+#
+# Make sure you have $CVSROOT setup properly, preferably on a local
+# cvs mirror. This shell script puts a lot of stress on your cvs
+# server. It also can take very long to run, since it compares all
+# pairs of available revisions of a file.
+#
+# The program appends run and failure information to the file torture.log
+# in the startup directory. This log can be used to rerun failing tests.
+#
+
+DIFF=diff
+DIFFOPTIONS=-au
+PATCH=patch
+PATCHOPTIONS=-s
+
+TMP=/tmp/torture$$
+trap 'rm -rf "$TMP"; exit 0' HUP INT QUIT PIPE TERM
+
+FAILLOG="$PWD/$(basename $0).log"
+
+revisions() {
+    cvs log "$1" | awk '/^revision/ { print $2 }'
+}
+
+getrevs() {
+    BASE=$(basename "$1")
+    REVS=$(revisions "$1")
+
+    for i in $REVS ; do
+	cvs up -pr $i "$1" > "$TMP/$BASE.$i"
+    done
+}
+
+dodiffs() {
+    typeset pwd="$PWD"
+    cd $TMP
+    for i in $REVS ; do
+	print -n "$BASE.$i "
+	for j in $REVS ; do
+	    $DIFF $DIFFOPTIONS "$BASE.$i" "$BASE.$j" > "diff-$i-$j"
+	    cp "$BASE.$i" "$BASE.$i.copy"
+	    $PATCH $PATCHOPTIONS "$BASE.$i.copy" < "diff-$i-$j" 2> /dev/null
+	    cmp "$BASE.$i.copy" "$BASE.$j"
+	    if [[ $? = 0 ]] ; then
+		print -n .
+	    else
+		print " $j FAILED"
+		print "# $pwd/$BASE.$i vs $j failed" >> "$FAILLOG"
+		print "$0 $pwd/$BASE" >> "$FAILLOG"
+	    fi
+	    rm -f "$BASE.$i.copy" "diff-$i-$j"
+	done
+	print
+    done
+    cd "$pwd"
+}
+
+dofile() {
+    typeset pwd="$PWD"
+    typeset arg=$(basename "$1")
+
+    cd $(dirname "$1")
+    print $0 "$PWD/$arg"
+    mkdir -p "$TMP"
+
+    getrevs "$arg"
+    dodiffs
+
+    rm -rf "$TMP"
+    cd "$pwd"
+}
+
+dodir() {
+    typeset pwd="$PWD"
+    cd "$1"
+    print $0 "$PWD"
+    list=$('ls' -A)
+    for i in $list ; do
+	if [[ "$i" != CVS ]] ; then
+	   main "$i"
+	fi
+    done
+    cd $pwd
+}
+
+print -n "# $0 $1: run started at " >> "$FAILLOG"
+date >> "$FAILLOG"
+
+main() {
+    if [[ -f "$1" ]] ; then
+	dofile "$1"
+    elif [[ -d "$1" ]] ; then
+	dodir "$1"
+    fi
+}
+
+if [[ $# != 1 ]] ; then
+    print Usage: $0 file or directory
+    exit 1
+fi
+
+main "$1"
+
+print -n "# $0 $1: run done at " >> "$FAILLOG"
+date >> "$FAILLOG"