makegraphs umgebaut, sodass nurnoch rrd daten geschrieben werden die graphen

[people/pmueller/ipfire-2.x.git] / html / cgi-bin / hardwaregraphs.cgi

diff --git a/html/cgi-bin/hardwaregraphs.cgi b/html/cgi-bin/hardwaregraphs.cgi
index 312c0096637279abf01f05a7ec35f0ad39497e8c..4537994852c6cd61966b98f512498af142b2dd49 100644 (file)
--- a/html/cgi-bin/hardwaregraphs.cgi
+++ b/html/cgi-bin/hardwaregraphs.cgi
@@ -16,15 +16,40 @@ use strict;
 require '/var/ipfire/general-functions.pl';
 require "${General::swroot}/lang.pl";
 require "${General::swroot}/header.pl";
+require "${General::swroot}/graphs.pl";
 
 my %cgiparams=();
 my @cgigraphs=();
-my @graphs=();
 
 &Header::showhttpheaders();
 
 my $graphdir = "/srv/web/ipfire/html/graphs";
 
+my @disks = `kudzu -qps -c HD | grep device: | cut -d" " -f2 | sort | uniq`;
+foreach (@disks){
+  my $disk = $_;
+  chomp $disk;
+  &Graphs::updatehddgraph ($disk,"day");
+  &Graphs::updatehddgraph ($disk,"week");
+  &Graphs::updatehddgraph ($disk,"month");
+  &Graphs::updatehddgraph ($disk,"year");
+}
+
+  &Graphs::updatetempgraph ("day");
+  &Graphs::updatetempgraph ("week");
+  &Graphs::updatetempgraph ("month");
+  &Graphs::updatetempgraph ("year");
+  &Graphs::updatefangraph ("day");
+  &Graphs::updatefangraph ("week");
+  &Graphs::updatefangraph ("month");
+  &Graphs::updatefangraph ("year");
+  &Graphs::updatevoltgraph ("day");
+  &Graphs::updatevoltgraph ("week");
+  &Graphs::updatevoltgraph ("month");
+  &Graphs::updatevoltgraph ("year");
+
+my @graphs=();
+
 &Header::getcgihash(\%cgiparams);
 
 $ENV{'QUERY_STRING'} =~ s/&//g;