Changeset 31886 for trunk/tools/czarplot.pl

Timestamp:

Jul 15, 2011, 4:16:20 PM (15 years ago)

Author:

rhenders

Message:

all time-series plots now created at same time for speed

File:

• trunk/tools/czarplot.pl (modified) (4 diffs)

trunk/tools/czarplot.pl

@@ -26 +26 @@
 my $rateInterval = undef;
 my $deriv = undef;
-my $showCleanup = undef;
 my $nebulous = undef;
 my $savingToFile = undef;
@@ -46 +45 @@
         "histogram|h" => \$histogram,
         "nebulous|n" => \$nebulous,
-        "cleanup|c" => \$showCleanup,
         "rate|r" => \$rate,
         "deriv|f" => \$deriv,
@@ -81 +79 @@
     $analysis = 0;
     print "* OPTIONAL: include analysis                -a                          (default=$analysis)\n";} 
-if (!$showCleanup) {
-    $showCleanup = 0;
-    print "* OPTIONAL: include cleanup in timeseries   -c                          (default=$showCleanup)\n";} 
 if (!$log) {
     $log = 0;
@@ -166 +161 @@
 }
 
-if ($rate) {
+if ($rate and !$timeSeries) {
 
-    # default to a rate histogram if time series not selected
-    if (!$timeSeries) {$histogram = 1;}
-    $plotter->createRatePlot($label, $stage, $begin, $end, $rateInterval, $histogram, $timeSeries);
+        $plotter->createRateHistogram($label, $stage, $begin, $end, $rateInterval);
+        exit;
+}
+
+if (!$histogram && !$nebulous) {
+    $plotter->createTimeSeries($label, $stage, $begin, $end, $timeSeries, $log, $rate);
     exit;
 }
-if (!$nebulous && $timeSeries) {$plotter->createTimeSeries($label, $stage, $begin, $end, $log, $showCleanup, $deriv);}
+
 if ($histogram) {$plotter->createHistogram($label, $begin, $end);}
 if ($nebulous && $timeSeries) {$plotter->plotStorageTimeSeries($begin, $end);}