55 lines
1.4 KiB
Bash
Executable File
55 lines
1.4 KiB
Bash
Executable File
#! /bin/sh
|
|
|
|
# librsync -- the library for network deltas
|
|
# Id: mutate.test,v 1.4 2001/03/18 13:17:33 mbp Exp
|
|
#
|
|
# Copyright (C) 2001 by Martin Pool <mbp@samba.org>
|
|
#
|
|
# This program is free software; you can redistribute it and/or
|
|
# modify it under the terms of the GNU Lesser General Public License
|
|
# as published by the Free Software Foundation; either version 2.1 of
|
|
# the License, or (at your option) any later version.
|
|
#
|
|
# This program is distributed in the hope that it will be useful, but
|
|
# WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
# Lesser General Public License for more details.
|
|
#
|
|
# You should have received a copy of the GNU Lesser General Public
|
|
# License along with this program; if not, write to the Free Software
|
|
# Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
|
|
|
|
old=$srcdir/COPYING
|
|
|
|
if which perl >/dev/null
|
|
then
|
|
:
|
|
else
|
|
echo "Skipped because perl was not found";
|
|
exit 77;
|
|
fi
|
|
|
|
old="$tmpdir/old"
|
|
cat $srcdir/*.[ch] >"$old"
|
|
new="$tmpdir/new"
|
|
sig="$tmpdir/sig"
|
|
delta="$tmpdir/delta"
|
|
out="$tmpdir/out"
|
|
i=0
|
|
|
|
while test $i -lt 100
|
|
do
|
|
perl "$srcdir/mutate.pl" $i 5 <"$old" >"$new" 2>>"$tmpdir/mutate.log"
|
|
|
|
run_test rdiff $debug signature $old $sig
|
|
run_test rdiff $debug delta $sig $new $delta
|
|
run_test rdiff $debug patch $old $delta "$out"
|
|
|
|
check_compare "$new" "$out" "mutate $i $old $new"
|
|
|
|
i=`expr $i + 1`
|
|
countdown
|
|
done
|
|
|
|
true
|