root/trunk/web/data/datamatgraph.php @ 140

<?php

include ('get_param.php');

print "<div id=\"contenu\">\n";

$CONFfinputRTR = fopen($router_list_file,'r');
while (!feof ($CONFfinputRTR)) {
  $CONFline = fgets($CONFfinputRTR, 512);
  $CONFline_split = split(" ",$CONFline);
  $CONFrouter_name[$CONFline_split[0]] =  $CONFline_split[1];
 }
fclose($CONFfinputRTR);

$CONFfinputSUB = fopen($subnet_list_file,'r');
$IDR_hash = NULL;
while (!feof ($CONFfinputSUB)) {
  $CONFline = fgets($CONFfinputSUB, 512);
  $CONFline_split = split("\t",$CONFline);
  $CONFline_split2 = split("-",$CONFline_split[0]);
  $IDR_hash[$CONFline_split2[1]] = 1;
 }
fclose($CONFfinputSUB);
$IDR_hash[55] = 1;

$dir = $CONF_MATRIX_RRD_LOCATION;
$i=1;
if (is_dir($dir)) {
    if ($dh = opendir($dir)) {
        while (($file = readdir($dh)) !== false) {
            if ( filetype($dir . $file) == "file" ) {
                $files[] = $file;
            }
        }
        sort($files);
        foreach ($files as $name){
      if (substr_count($name,".rrd")>0) {
        $filename_split = split("\.",$name);
        $pop_split = split("_",$filename_split[0]);
        $POP1 = $pop_split[0];
        $name1 = $CONFrouter_name[$pop_split[0]];
        $POP2 = $pop_split[1];
        $name2 = $CONFrouter_name[$pop_split[1]];
        if ($IDR_hash[$POP1] == 1 && $IDR_hash[$POP2] == 1) {
          $pngname = "img_monotoring/".$POP1."_".$POP2.".png";
          $rrdname = "$dir/$name";
          $samp = 10;
##          echo "rrdtool graph $pngname -s -1D --title \"$Descr\" --vertical-label \"bits/s\" DEF:BytesG=$rrdname:Bytes:AVERAGE CDEF:input10=BytesG,8,*,5,/,60,/,$samp,* AREA:input10\#00FF00:\"b/s\\n\" COMMENT:\"\s\" COMMENT:\"\s\" COMMENT:\"$name1 to $name2\c\"";
          $res = `rrdtool graph $pngname -s -1D --title "$name1 to $name2" --vertical-label "bits/s" -W "data source: RENETCOL" DEF:BytesG=$rrdname:Bytes:AVERAGE CDEF:input10=BytesG,8,*,5,/,60,/,$samp,* AREA:input10\#8FA3AD:"b/s\\n" COMMENT:"\s" COMMENT:"\s" COMMENT:"\c"`;
          print "<p>$name1 to $name2 <br> <img width=\"497\" heigth=\"189\" src=\"$pngname\"> </p> ";
        }
      }
        }
    }
 }

print "</div>\n";

?>