Changeset 338
- Timestamp:
- 12/04/06 03:01:59 (6 years ago)
- Files:
-
- 1 modified
-
util/server_daily_maint (modified) (12 diffs)
Legend:
- Unmodified
- Added
- Removed
-
util/server_daily_maint
r337 r338 15 15 my $store_dir = $ENV{HOME} . "/whuffy.com/dev/stats"; # where we retrieve our feedback 16 16 my $graph_dir = $ENV{HOME} . "/whuffy.com/dev/feedback"; # where we store our graphs 17 my $stylesheet = '/svgstyles.css'; 17 18 my $debug = 0; 18 19 … … 538 539 'scale_divisions' => $scalediv, 539 540 'fields' => \@sorted_keys, 541 'style_sheet' => $stylesheet 540 542 }); 541 543 $graph->add_data({ … … 592 594 'scale_divisions' => $scalediv, 593 595 'timescale_divisions' => $timediv, 596 'style_sheet' => $stylesheet 594 597 }); 595 598 … … 711 714 print F "<table align=left>\n"; 712 715 print F "<tr><td align=left valign=top nowrap><h2>Shepherd usage</h2>\n"; 713 print F "<b>Number of times shepherd reported in:</b> <font color= pink><i>(red)</i></font><br>\n";716 print F "<b>Number of times shepherd reported in:</b> <font color=lightgreen><i>(green)</i></font><br>\n"; 714 717 print F report_count_data("visits", "all"); 715 718 print F "<br><b>Reported in with no data:</b> <font color=lightblue><i>(blue)</i></font>\n"; … … 720 723 721 724 print F "<tr><td align=left valign=top nowrap><h2>Unique users</h2>\n"; 722 print F "<b>Number of unique systems seen:</b> <font color= pink><i>(red)</i></font><br>\n";725 print F "<b>Number of unique systems seen:</b> <font color=lightgreen><i>(green)</i></font><br>\n"; 723 726 print F report_count_data("seen_sysid_list"); 724 727 print F "</td><td nowrap><br>"; … … 727 730 728 731 print F "<tr><td align=left valign=top nowrap><h2>Start time</h2>\n"; 729 print F "<b>When shepherd checked in:</b> <font color= pink><i>(red)</i></font><br>\n";732 print F "<b>When shepherd checked in:</b> <font color=lightgreen><i>(green)</i></font><br>\n"; 730 733 print F "<i>(when shepherd is being run)</i><p>"; 731 734 print F "(in 15 minute groups, time in GMT+10)"; … … 738 741 print F "<b>How long shepherd took to run:</b><br>\n"; 739 742 printf F "<li><b>in last 24 hours:</b><br>". 740 " %s average <i><font color= pink>(red)</font></i><br>".743 " %s average <i><font color=lightgreen>(green)</font></i><br>". 741 744 " %s min <i><font color=lightblue>(blue)</font></i><br>". 742 " %s max <i><font color= lightgreen>(green)</font></i><br>\n",745 " %s max <i><font color=pink>(red)</font></i><br>\n", 743 746 sec2hms(numvar($store->{per_day}->[0]->{duration},"",0) / $store->{per_hour}->[0]->{duration_count}), 744 747 sec2hms(numvar($store->{per_day}->[0]->{duration_min},"",0)), … … 746 749 if ((defined $store->{per_hour}->[0]->{duration_count}) && ($store->{per_hour}->[0]->{duration_count} > 0)); 747 750 printf F "<li><b>in last month:</b><br>". 748 " %s average <i><font color= pink>(red)</font></i><br>".751 " %s average <i><font color=lightgreen>(green)</font></i><br>". 749 752 " %s min <i><font color=lightblue>(blue)</font></i><br>". 750 " %s max <i><font color= lightgreen>(green)</font></i><br>\n",753 " %s max <i><font color=pink>(red)</font></i><br>\n", 751 754 sec2hms(numvar($store->{per_month}->[0]->{duration},"",0) / $store->{per_month}->[0]->{duration_count}), 752 755 sec2hms(numvar($store->{per_month}->[0]->{duration_min},"",0)), … … 758 761 759 762 print F "<tr><td align=left valign=top nowrap><h2>Timezones</h2>\n"; 760 print F "<b>Where shepherd is being run:</b> <font color= pink><i>(red)</i></font><br>\n";763 print F "<b>Where shepherd is being run:</b> <font color=lightgreen><i>(green)</i></font><br>\n"; 761 764 print F "<i>(timezone setting of hosts)</i><p>"; 762 765 print F "</td><td nowrap><br>"; … … 820 823 print F "<tr><td align=left valign=top nowrap><h2>Success/Failure</h2>\n"; 821 824 print F "<i>(# of times called and return status)</i><br>\n"; 822 print F "<b>Successful runs:</b> <font color= pink><i>(red)</i></font><br>\n";825 print F "<b>Successful runs:</b> <font color=lightgreen><i>(green)</i></font><br>\n"; 823 826 print F report_count_data("c_".$c."_success_counter", "all"); 824 827 print F "<br><b>Failed runs:</b> <font color=lightblue><i>(blue)</i></font>\n"; … … 850 853 print F "<b>How long $c took to run ($w):</b><br>\n"; 851 854 printf F "<li><b>in last 24 hours:</b><br>". 852 " %s average <i><font color= pink>(red)</font></i><br>".855 " %s average <i><font color=lightgreen>(green)</font></i><br>". 853 856 " %s min <i><font color=lightblue>(blue)</font></i><br>". 854 " %s max <i><font color= lightgreen>(green)</font></i><br>\n",857 " %s max <i><font color=pink>(red)</font></i><br>\n", 855 858 sec2hms(numvar($store->{per_day}->[0]->{$g."_duration"},"",0) / $store->{per_hour}->[0]->{$g."_duration_count"}), 856 859 sec2hms(numvar($store->{per_day}->[0]->{$g."_duration_min"},"",0)), … … 858 861 if ((defined $store->{per_hour}->[0]->{$g."_duration_count"}) && ($store->{per_hour}->[0]->{$g."_duration_count"} > 0)); 859 862 printf F "<li><b>in last month:</b><br>". 860 " %s average <i><font color= pink>(red)</font></i><br>".863 " %s average <i><font color=lightgreen>(green)</font></i><br>". 861 864 " %s min <i><font color=lightblue>(blue)</font></i><br>". 862 " %s max <i><font color= lightgreen>(green)</font></i><br>\n",865 " %s max <i><font color=pink>(red)</font></i><br>\n", 863 866 sec2hms(numvar($store->{per_month}->[0]->{$g."_duration"},"",0) / $store->{per_month}->[0]->{$g."_duration_count"}), 864 867 sec2hms(numvar($store->{per_month}->[0]->{$g."_duration_min"},"",0)),
