diff options
| -rw-r--r-- | regress/usr.bin/diff/torture/torture | 130 |
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" |