webadmin/bpfire
1
0
Fork 0
mirror of https://github.com/vincentmli/bpfire.git synced 2026-04-27 03:07:43 +02:00
Code Issues Packages Projects Releases Wiki Activity

Fixed network.cgi

Browse Source 
Fixed hddtemp graphs (week&month)
Fixed write permissions to html/graphs


git-svn-id: http://svn.ipfire.org/svn/ipfire/branches/2.1/trunk@1178 ea5c0bd1-69bd-2848-81d8-4f18e57aeed8
This commit is contained in:
arne_f
2008-02-02 21:49:04 +00:00
parent dbf04efa5b
commit 8fb804b51f
5 changed files with 5 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
html/cgi-bin/hardwaregraphs.cgi
View File

@@ -122,7 +122,7 @@ sub hddtempbox {
&Header::openbox('100%', 'center', "Disk $disk $Lang::tr{'graph'}");
my $ftime = localtime((stat("$graphdir/hddtemp-$disk-week.png"))[9]);
print "<center><b>$Lang::tr{'the statistics were last updated at'}: $ftime</b></center><br />\n";
print "<img src='/graphs/hddtemp-$disk-day.png' border='0' />";
print "<img src='/graphs/hddtemp-$disk-week.png' border='0' />";
print "<br />\n";
&Header::closebox();
}
@@ -131,7 +131,7 @@ sub hddtempbox {
&Header::openbox('100%', 'center', "Disk $disk $Lang::tr{'graph'}");
my $ftime = localtime((stat("$graphdir/hddtemp-$disk-month.png"))[9]);
print "<center><b>$Lang::tr{'the statistics were last updated at'}: $ftime</b></center><br />\n";
print "<img src='/graphs/hddtemp-$disk-day.png' border='0' />";
print "<img src='/graphs/hddtemp-$disk-month.png' border='0' />";
print "<br />\n";
&Header::closebox();
}

2
html/cgi-bin/network.cgi
View File

@@ -51,7 +51,7 @@ $cgiparams[1] = '' unless defined $cgiparams[1];
if ($cgiparams[1] =~ /red/) {
&Header::openpage($Lang::tr{'network traffic graphs external'}, 1, '');
push (@graphs, ($netsettings{'RED_DEV'}));
if (-e "/var/log/rrd/collectd/localhost/interface/if_octets-ipsec0.rrd") {push (@graphs, ("ipsec0"));
if (-e "/var/log/rrd/collectd/localhost/interface/if_octets-ipsec0.rrd") {push (@graphs, ("ipsec0"));}
}elsif ($cgiparams[1] =~ /other/) {
&Header::openpage($Lang::tr{'network traffic graphs others'}, 1, '');
push (@graphs, ("lq"));