[backend] support test mode option for bs_deltastore

openSUSE · May 11, 2016 · e60af6b · e60af6b
1 parent 472ab56
commit e60af6b
Show file tree

Hide file tree

Showing 2 changed files with 14 additions and 1 deletion.
diff --git a/src/backend/bs_deltastore b/src/backend/bs_deltastore
@@ -52,6 +52,8 @@ my $rundir = $BSConfig::rundir || "$BSConfig::bsdir/run";
 
 my $myeventdir = "$eventdir/deltastore";
 
+my $testmode;
+
 sub deltastore {
   my ($projid, $packid, $file) = @_;
   print "generating src delta for $projid/$packid/$file\n";
@@ -94,6 +96,11 @@ sub deltastore {
   }
 }
 
+if (@ARGV && ($ARGV[0] eq '--test-mode' || $ARGV[0] eq '--testmode')) {
+  $testmode = 1;
+  shift @ARGV;
+}
+
 $| = 1;
 $SIG{'PIPE'} = 'IGNORE';
 BSUtil::restartexit($ARGV[0], 'deltastore', "$rundir/bs_deltastore", "$myeventdir/.ping");
@@ -143,6 +150,12 @@ while(1) {
     }
   }
 
+  if ($testmode) {
+    close(RUNLOCK);
+    print "Test mode, exiting...\n";
+    exit(0);
+  }
+
   # check for restart/exit
   if (-e "$rundir/bs_deltastore.exit") {
     close(RUNLOCK);

diff --git a/src/backend/bs_dispatch b/src/backend/bs_dispatch
@@ -78,7 +78,7 @@ while (@ARGV) {
   if ($ARGV[0] eq '--test-directory') {
     shift @ARGV;
     $testdir = shift @ARGV;
-  } elsif ($ARGV[0] eq '--test-mode') {
+  } elsif ($ARGV[0] eq '--test-mode' || $ARGV[0] eq '--testmode') {
     shift @ARGV;
     $testmode = 1;
   } elsif ($ARGV[0] eq '--test-constraints') {