Fix disk (media/hardware) graphs with xen.

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

diff --git a/html/cgi-bin/media.cgi b/html/cgi-bin/media.cgi
index 490ffcad94d98406dbfeb3a048d0a8cb72dc1b4d..6a89ca86774710c29dc19f3398aa800f4b344568 100644 (file)
--- a/html/cgi-bin/media.cgi
+++ b/html/cgi-bin/media.cgi
@@ -47,7 +47,7 @@ $querry[1] = 'hour' unless defined $querry[1];
 
 my @devices = `kudzu -qps -c HD | grep device: | cut -d" " -f2 | sort | uniq`;
 
-if ( $querry[0] =~ "sd?" || $querry[0] =~ "hd?" ){
+if ( $querry[0] =~ "sd?" || $querry[0] =~ "hd?" || $querry[0] =~ "xvd??"){
        print "Content-type: image/png\n\n";
        binmode(STDOUT);
        
@@ -195,8 +195,8 @@ sub diskbox {
        my $disk = $_[0];
        chomp $disk;
        my @status;
-       if (-e "/tmp/hddstatus"){
-               open(DATEI, "</tmp/hddstatus") || die "Datei nicht gefunden";
+       if (-e "/var/run/hddstatus"){
+               open(DATEI, "</var/run/hddstatus") || die "Datei nicht gefunden";
                my  @diskstate = <DATEI>;
                close(DATEI);
 
@@ -205,7 +205,7 @@ sub diskbox {
                }
 
                if ( $status[1]=~/standby/){
-                       my $ftime = localtime((stat("/tmp/hddshutdown-$disk"))[9]);
+                       my $ftime = localtime((stat("/var/run/hddshutdown-$disk"))[9]);
                        print"<B>Disk $disk status:<font color=#FF0000>".$status[1]."</font></B> (since $ftime)";
                }else{
                        print"<B>Disk $disk status:<font color=#00FF00>".$status[1]."</font></B>";