summaryrefslogtreecommitdiff
path: root/test/bbackupd/testfiles/extcheck1.pl.in
diff options
context:
space:
mode:
Diffstat (limited to 'test/bbackupd/testfiles/extcheck1.pl.in')
-rwxr-xr-xtest/bbackupd/testfiles/extcheck1.pl.in33
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;
+