diff options
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; + |