Changeset 29114 for trunk/tools/czarplot.pl

Timestamp:

Sep 2, 2010, 3:09:56 PM (16 years ago)

Author:

rhenders

Message:

Added log plots for timeseries

File:

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

trunk/tools/czarplot.pl

@@ -23 +23 @@
 my $nebulous = undef;
 my $savingToFile = undef;
+my $log = undef;
 
 GetOptions (
@@ -36 +37 @@
         "timeseries|t" => \$timeSeries,
         "verbose|v" => \$verbose,
+        "log|g" => \$log,
         );
-
 
 print "\n*******************************************************************************\n";
@@ -50 +51 @@
 if (!$timeSeries) {
     print "* OPTIONAL: plot timeseries                 -t                          (default=on)\n";} 
+if (!$log) {
+    $log = 0;
+    print "* OPTIONAL: use log plots                   -g                          (default=$log\n";}
 if (!$nebulous) {
     print "* OPTIONAL: plot nebulous disk space        -n                          (default=off)\n";} 
 if (!$label) {
-    print "* OPTIONAL: choose a label                  -l <labellName>             (default='all_stdscience_labels')\n";}
+    $label = "all_stdscience_labels";
+    print "* OPTIONAL: choose a label                  -l <labellName>             (default=$label)\n";}
 if (!$stage) {
     print "* OPTIONAL: choose a stage                  -s <chip|cam|warp|etc>      (default=none)\n";}
@@ -63 +68 @@
     print "* OPTIONAL: choose an end time              -e <datetime>               (default=now)\n";} 
 if (!$path) {
-    print "* OPTIONAL: choose an output location       -o <path>                   (default=none)\n";} 
+    print "* OPTIONAL: choose an output location       -o <path>                   (default=none)\n";
+} 
 print "*\n*******************************************************************************\n";
 
@@ -69 +75 @@
 
 # default values
-if (!$label) {$label = "all_stdscience_labels";}
 if (!$nebulous && !$histogram && !$timeSeries) {$timeSeries = 1; $histogram = 0;}
 if (!$verbose) {$verbose = 0;}
@@ -92 +97 @@
 my $diskUsage = 1; # TODO
 
-if (!$nebulous && $timeSeries) {$czarplot->createTimeSeries($label, $stage, $begin, $end);}
+if (!$nebulous && $timeSeries) {$czarplot->createTimeSeries($label, $stage, $begin, $end, !$log, $log);}
 if ($histogram) {$czarplot->createHistogram($label, $begin, $end);}
 if ($nebulous && $timeSeries) {$czarplot->plotStorageTimeSeries($begin, $end);}