Changeset 29119 for trunk/tools/roboczar.pl
- Timestamp:
- Sep 3, 2010, 3:55:23 PM (16 years ago)
- File:
-
- 1 edited
-
trunk/tools/roboczar.pl (modified) (6 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/tools/roboczar.pl
r29114 r29119 11 11 use czartool::Pantasks; 12 12 use czartool::Nebulous; 13 use czartool:: Czarplot;13 use czartool::Plotter; 14 14 use czartool::Burntool; 15 15 … … 27 27 my $nebulous = new czartool::Nebulous($czarDb); 28 28 my $pantasks = new czartool::Pantasks(); 29 my $ czarplot = new czartool::Czarplot($czarDb, "%Y%m%d-%H%M%S", "png font \"/usr/share/fonts/corefonts/arial.ttf\" 8", "/tmp", $save_temps); # TODO hardcoded font path29 my $plotter = new czartool::Plotter($czarDb, "%Y%m%d-%H%M%S", "png font \"/usr/share/fonts/corefonts/arial.ttf\" 8", "/tmp", $save_temps); # TODO hardcoded font path 30 30 my $burntool = new czartool::Burntool(); 31 31 … … 109 109 110 110 # sort out times 111 $begin = strftime('%Y-%m-%d 06:3 0',localtime);111 $begin = strftime('%Y-%m-%d 06:35',localtime); 112 112 $end = $czarDb->getNowTimestamp(); 113 113 … … 125 125 print "* Checking Nebulous\n"; 126 126 $nebulous->updateClusterSpaceInfo(); 127 $ czarplot->plotDiskUsageHistogram();127 $plotter->plotDiskUsageHistogram(); 128 128 updateServerStatus(); 129 129 … … 186 186 187 187 chomp($label); 188 $ czarplot->createTimeSeries($label, $stage, $begin, $end, 1, 1);188 $plotter->createLogAndLinearTimeSeries($label, $stage, $begin, $end); 189 189 } 190 190 } … … 194 194 my ($label) = @{$row}; 195 195 196 $ czarplot->createTimeSeries($label, undef, $begin, $end, 1, 1);197 $ czarplot->createHistogram($label, $begin, $end);196 $plotter->createLogAndLinearTimeSeries($label, undef, $begin, $end); 197 $plotter->createHistogram($label, $begin, $end); 198 198 199 199 #routineChecks($label, "1 HOUR"); 200 200 } 201 $ czarplot->createTimeSeries("all_".$server."_labels", undef, $begin, $end, 1, 1);202 $ czarplot->createHistogram("all_".$server."_labels", $begin, $end);201 $plotter->createLogAndLinearTimeSeries("all_".$server."_labels", undef, $begin, $end); 202 $plotter->createHistogram("all_".$server."_labels", $begin, $end); 203 203 foreach $stage (@stages) { 204 204 205 $ czarplot->createTimeSeries("all_".$server."_labels", $stage, $begin, $end, 1, 1); # TODO must be a neater way...205 $plotter->createLogAndLinearTimeSeries("all_".$server."_labels", $stage, $begin, $end); # TODO must be a neater way... 206 206 } 207 207 }
Note:
See TracChangeset
for help on using the changeset viewer.
