Changeset 38213 for trunk/ippMonitor
- Timestamp:
- Apr 28, 2015, 4:37:58 PM (11 years ago)
- File:
-
- 1 edited
-
trunk/ippMonitor/czartool/czartool/CzarDb.pm (modified) (4 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/ippMonitor/czartool/czartool/CzarDb.pm
r38206 r38213 685 685 $query->execute; 686 686 687 # print "fromTime: $fromTime, toTime: $toTime\n"; 688 687 689 # set up Gnuplot datafiles 688 690 my $tmpFile = File::Temp->new( TEMPLATE => "czarplot_gnuplot_".$label."_".$stage."_t.XXXXX", DIR => '/tmp', SUFFIX => 'dat'); … … 727 729 my ($thisTimestamp, $thisPending, $thisFaults, $thisProcessed) = @row; 728 730 731 # print "$thisTimestamp, $thisPending, $thisFaults, $thisProcessed\n"; 732 729 733 $formattedTimestamp = $self->getFormattedDate($thisTimestamp); 730 734 … … 743 747 744 748 # First, look for large positive jumps in processed, most likely a label 745 # added, and store value to subtract from linear value below. If > 1000749 # added, and store value to subtract from linear value below. If > 5000 746 750 # processed per hour, then it must be wrong 747 if (($thisProcessed - $lastProcessed)/($timeSep/3600) > 1000) {751 if (($thisProcessed - $lastProcessed)/($timeSep/3600) > 5000) { 748 752 $positiveJump = $thisProcessed - $lastProcessed; 749 753 } … … 763 767 $linearProcessed = $linearProcessed; 764 768 } 769 770 # print "$thisTimestamp, $thisPending, $thisFaults, $thisProcessed, $timeSep, $diffProcessed, $linearProcessed\n"; 765 771 766 772 # calculate first derivative in units of images per hour
Note:
See TracChangeset
for help on using the changeset viewer.
