root/trunk/web/data/databgpas.php @ 141

<?php

include ('get_param.php');

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

print "<p> Choose a BGP AS: </p>\n";

$DIR = $CONF_BGPAS_RRD_LOCATION;
$ind=0;
$tabfile = NULL;
$files = NULL;

if (is_dir($DIR)){
  if ($do = opendir($DIR)) {
    while (($file = readdir($do)) !== false) {
      if ( filetype($DIR . $file) == "file" and strpos($file,".rrd") != FALSE ){
    $files[] = $file;
      }
    }
    sort($files);
  } else {
    print "Error when opening the directory defined in your renetcolParam.h file!! Please check the path and right for variable \"AS_RRD_LOCATION\".\n";
  }
 }else{ 
  print "Error, the directory defined in your renetcolParam.h file doesn't exist!! Please check the variable \"AS_RRD_LOCATION\".\n";
 }

print "<form action=\"index.php?section=databgpas\" method=\"POST\">\n";
print "BGP AS: <SELECT NAME=\"bgpas\">\n";
for ($p=0; $p < sizeof($files); $p++ ) {
  $completefile = split("_",$files[$p]);
  $theAS = $completefile[0];
  if ( $indice == $p ) {
    print "<OPTION SELECTED VALUE=\"$files[$p]\">$theAS\n";
  } else {
    print "<OPTION VALUE=\"$files[$p]\">$theAS\n";
  }
 }

print "</SELECT>\n";
print "<INPUT TYPE=\"submit\" VALUE=\" go \">. <P>\n";
print "</FORM>\n";

if ($bgpas != "") {
  $completefile = split("_",$bgpas);
  $theAS = $completefile[0];

  print "You have choose the BGP AS $theAS.<br>\n";

  $tmp = split("\.",$completefile[1]);
  $samp = $tmp[0];
  $rrdname = "$DIR/$bgpas";
  $pngname = "img_monitoring/".$theAS.".png";
## echo " rrdtool graph $pngname -s -1D --title \"AS $theAS\" --vertical-label \"bits/s\" -W \"data source: RENETCOL\" DEF:InBytesG=$rrdname:inBytes:AVERAGE DEF:OutBytesG=$rrdname:outBytes:AVERAGE CDEF:input10=InBytesG,8,*,5,/,60,/,$samp,* CDEF:output10=OutBytesG,8,*,5,/,60,/,$samp,* AREA:input10\#8FA3AD:\"b/s\\n\" LINE1:output10\#D1D1D1:\"b/s\\n\"  ";
  $res = `rrdtool graph $pngname -s -1D --title "AS $theAS" --vertical-label "bits/s" -W "data source: RENETCOL" DEF:InBytesG=$rrdname:inBytes:AVERAGE DEF:OutBytesG=$rrdname:outBytes:AVERAGE CDEF:input10=InBytesG,8,*,5,/,60,/,$samp,* CDEF:output10=OutBytesG,8,*,5,/,60,/,$samp,* AREA:input10\#8FA3AD:"From your network to AS $theAS\\n" LINE1:output10\#FF5B2B:"From AS $theAS to your network\\n" COMMENT:"\s" COMMENT:"\s" COMMENT:"\c"`;
  print "<p> <img width=\"497\" heigth=\"189\" src=\"$pngname\"> </p> ";

  $pngnameWeek = "img_monitoring/".$theAS."_w.png";
  $res = `rrdtool graph $pngnameWeek -s -7D --title "AS $theAS" --vertical-label "bits/s" -W "data source: RENETCOL" DEF:InBytesG=$rrdname:inBytes:AVERAGE DEF:OutBytesG=$rrdname:outBytes:AVERAGE CDEF:input10=InBytesG,8,*,5,/,60,/,$samp,* CDEF:output10=OutBytesG,8,*,5,/,60,/,$samp,* AREA:input10\#8FA3AD:"From your network to AS $theAS\\n" LINE1:output10\#FF5B2B:"From AS $theAS to your network\\n" COMMENT:"\s" COMMENT:"\s" COMMENT:"\c"`;
  
  print "<p> <img width=\"497\" heigth=\"189\" src=\"$pngnameWeek\"> </p> ";
  $pngnameMonth = "img_monitoring/".$theAS."_m.png";
  $res = `rrdtool graph $pngnameMonth -s -31D --title "AS $theAS" --vertical-label "bits/s" -W "data source: RENETCOL" DEF:InBytesG=$rrdname:inBytes:AVERAGE DEF:OutBytesG=$rrdname:outBytes:AVERAGE CDEF:input10=InBytesG,8,*,5,/,60,/,$samp,* CDEF:output10=OutBytesG,8,*,5,/,60,/,$samp,* AREA:input10\#8FA3AD:"From your network to AS $theAS\\n" LINE1:output10\#FF5B2B:"From AS $theAS to your network\\n" COMMENT:"\s" COMMENT:"\s" COMMENT:"\c"`;
  
  print "<p> <img width=\"497\" heigth=\"189\" src=\"$pngnameMonth\"> </p> ";
  $pngnameYear = "img_monitoring/".$theAS."_y.png";
  $res = `rrdtool graph $pngnameYear -s -365D --title "AS $theAS" --vertical-label "bits/s" -W "data source: RENETCOL" DEF:InBytesG=$rrdname:inBytes:AVERAGE DEF:OutBytesG=$rrdname:outBytes:AVERAGE CDEF:input10=InBytesG,8,*,5,/,60,/,$samp,* CDEF:output10=OutBytesG,8,*,5,/,60,/,$samp,* AREA:input10\#8FA3AD:"From your network to AS $theAS\\n" LINE1:output10\#FF5B2B:"From AS $theAS to your network\\n" COMMENT:"\s" COMMENT:"\s" COMMENT:"\c"`;
  
  print "<p> <img width=\"497\" heigth=\"189\" src=\"$pngnameYear\"> </p> ";
 }
print "\n";
print "\n";
print "\n";
print "\n";

print "</div>\n";

?>