#! /bin/sh

# librsync -- the library for network deltas
# $Id: mutate.test,v 1.1 2002/01/25 21:08:26 bje 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