diff options
author | Martin Ebourne <martin@ebourne.me.uk> | 2006-03-04 01:38:13 +0000 |
---|---|---|
committer | Martin Ebourne <martin@ebourne.me.uk> | 2006-03-04 01:38:13 +0000 |
commit | 7292390de5903b96e1f9798fbd8ae8a4ec65b85c (patch) | |
tree | 8f63eb9074793f7fc798082daef1755cf72fa919 /test/bbackupd/testfiles/extcheck1.pl.in | |
parent | defac6623afe8b7d765a9477371fbc47da855c19 (diff) |
This is part 2 of a patch from James O'Gorman.
This just renames all of the files that configure now substitutes - no changes to any of the files.
Diffstat (limited to 'test/bbackupd/testfiles/extcheck1.pl.in')
-rwxr-xr-x | test/bbackupd/testfiles/extcheck1.pl.in | 33 |
1 files changed, 33 insertions, 0 deletions
diff --git a/test/bbackupd/testfiles/extcheck1.pl.in b/test/bbackupd/testfiles/extcheck1.pl.in new file mode 100755 index 00000000..edbacd0a --- /dev/null +++ b/test/bbackupd/testfiles/extcheck1.pl.in @@ -0,0 +1,33 @@ +#!@PERL@ +use strict; + +unless(open IN,"../../bin/bbackupquery/bbackupquery -q -c testfiles/bbackupd.conf -l testfiles/query4.log \"compare -ac\" quit|") +{ + print "Couldn't open compare utility\n"; + exit 2; +} + +my $ret = 1; +my $seen = 0; + +while(<IN>) +{ + next unless m/\S/; + if(m/continousupdate/) + { + $ret = 2 unless m/exists/; + $seen = 1; + } + else + { + $ret = 2 unless m/\AWARNING/ || m/\ADifferences/ || /might be reason/ || /probably due to file mod/; + } + print; +} + +close IN; + +$ret = 2 unless $seen; + +exit $ret; + |