Add -submit-aux option to NewNightlyTest.pl
authorDaniel Dunbar <daniel@zuster.org>
Mon, 18 May 2009 23:24:26 +0000 (23:24 +0000)
committerDaniel Dunbar <daniel@zuster.org>
Mon, 18 May 2009 23:24:26 +0000 (23:24 +0000)
 - If given, the argument will be run using system with the path to the sent
   data. Useful for testing nightlytest server replacements.

git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@72070 91177308-0d34-0410-b5e6-96231b3b80d8

utils/NewNightlyTest.pl

index 235ce8bfdf36489971d532f67533b488728e81cd..dc6cf6d17f5251d93e0c0aa5ecfc84b7e59b80ed 100755 (executable)
@@ -75,6 +75,9 @@ use Socket;
 #                   this option is not specified it defaults to
 #                   /nightlytest/NightlyTestAccept.php. This is basically
 #                   everything after the www.yourserver.org.
+#  -submit-aux      If specified, an auxiliary script to run in addition to the
+#                   normal submit script. The script will be passed the path to
+#                   the "sentdata.txt" file as its sole argument.
 #  -nosubmit        Do not report the test results back to a submit server.
 #
 # CVSROOT is the CVS repository from which the tree will be checked out,
@@ -128,6 +131,7 @@ $NORUNNINGTESTS=0;
 $MAKECMD="make";
 $SUBMITSERVER = "llvm.org";
 $SUBMITSCRIPT = "/nightlytest/NightlyTestAccept.php";
+$SUBMITAUX="";
 $SUBMIT = 1;
 
 while (scalar(@ARGV) and ($_ = $ARGV[0], /^[-+]/)) {
@@ -168,6 +172,7 @@ while (scalar(@ARGV) and ($_ = $ARGV[0], /^[-+]/)) {
                              shift; next; }
   if (/^-submit-server/)   { $SUBMITSERVER = "$ARGV[0]"; shift; next; }
   if (/^-submit-script/)   { $SUBMITSCRIPT = "$ARGV[0]"; shift; next; }
+  if (/^-submit-aux/)      { $SUBMITAUX = "$ARGV[0]"; shift; next; }
   if (/^-nosubmit$/)       { $SUBMIT = 0; next; }
   if (/^-nickname$/)       { $nickname = "$ARGV[0]"; shift; next; }
   if (/^-gccpath/)         { $CONFIGUREARGS .=
@@ -477,6 +482,9 @@ sub SendData{
     }
     WriteFile "$Prefix-sentdata.txt", $sentdata;
 
+    if (!($SUBMITAUX eq "")) {
+      system "$SUBMITAUX \"$Prefix-sentdata.txt\"";
+    }
 
     return $result;
 }