Changeset 38276 for trunk

Timestamp:

May 14, 2015, 7:17:23 AM (11 years ago)

Author:

bills

Message:

Adapt commented out code to new StageMetrics by hardcoding database as gpc1.
Not tested.

File:

• trunk/ippMonitor/czartool/roboczar.pl (modified) (4 diffs)

trunk/ippMonitor/czartool/roboczar.pl

@@ -34 +34 @@
 #       "chipbackground"
 
+# XXX Currently the code to check for stuck stages is commented out.
+# Now the function StageMetrics needs a database so declare one.
+# This functionality is not tested.
+my $dbname = 'gpc1';
+
 my @interestedServers = $config->getRoboczarInterestedServers();
 
@@ -52 +57 @@
         $anythingToReport = 1;
     }
-#    if (anyStuckStages("2 HOUR", \$stuckMessage)) {
+#    if (anyStuckStages($dbname, "2 HOUR", \$stuckMessage)) {
 
  #       $message .= "\n\n" . $stuckMessage;
@@ -80 +85 @@
 ###########################################################################
 sub anyStuckStages {
-    my ($interval, $message) = @_;
+    my ($dbname, $interval, $message) = @_;
 
     my $end = $czarDb->getNowTimestamp();
@@ -96 +101 @@
     foreach $stage (@stages) {
 
-    my $stageMetrics = new czartool::StageMetrics($stage, "all_stdscience_labels", $begin, $end);
+    my $stageMetrics = new czartool::StageMetrics($stage, "all_stdscience_labels", $dbname, $begin, $end);
 
-    if ($czarDb->runAnalysis($stageMetrics)) {$stageMetrics->printMe();}
+    if ($czarDb->runAnalysis($stageMetrics, $dbname)) {$stageMetrics->printMe();}
 
         if ($stageMetrics->getStuck() && $stage eq "burntool" && !$worryAboutBurntool) {next;}