root/tags/renetcol-0.0.11/trunk/tool/metro.php

<?php
    function generation_graph_jour($nom_du_site, $prefixe, $cidr, $rrdname, $sampling) {
        // SAGA
        $png_path = "/var/www/saga/www/images/tmp/";
        // SAGA

        // FX
        //$png_path = "/tmp/";
        // FX

        # creation du nom de fichier de l'image a creer
        $filename = $nom_du_site."_j".".png";
        $pngname = $png_path.$filename;

        # creation de l'image dans $png_path.
        $res = `rrdtool graph $pngname -s -1D --title "$nom_du_site - prefixe : $prefixe / $cidr" --vertical-label "bits/s" DEF:inBytesG=$rrdname:inBytes:AVERAGE DEF:outBytesG=$rrdname:outBytes:AVERAGE CDEF:input10=inBytesG,8,*,5,/,60,/,$sampling,* CDEF:output10=outBytesG,8,*,5,/,60,/,$sampling,* AREA:input10\#00FF00:"In b/s\\n" LINE1:output10\#0000FF:"Out b/s\\n"`;
        
        # todo FX : faire un retour different si erreur
        return $filename;
    }

    function generation_graph_mois($nom_du_site, $prefixe, $cidr, $rrdname, $sampling) {
        // SAGA
        global $cfgTmp, $cfgFileSep;

        $png_path = "/var/www/saga/www/images/tmp/";
        $tmp_path .= $cfgTmp.$cfgFileSep;
        // SAGA

        // FX
        //$png_path = "/tmp/";
        //$tmp_path = "/tmp/";
        // FX
        
        # creation du nom de fichier de l'image a creer
        $filename = $nom_du_site."_m".".png";
        $pngname = $png_path.$filename;
        
        # recuperation des donnees par un rrd fecht pour calculer le debit 95%percentile
        $tmp_file = $tmp_path.$nom_du_site.".tmp";

        `rrdtool fetch $rrdname AVERAGE --start -31Days | cut -d " " -f 2,3 > $tmp_file`;

        $fd = fopen ($tmp_file, "r");
        $i=0;
        $tab_in = array();
        $tab_out = array();
        while (!feof ($fd)) {
            $buffer = fgets($fd, 4096);
            $buffer_split = split(" ",$buffer);
            $tab_in[$i] = trim($buffer_split[0]);
            $tab_out[$i] = trim($buffer_split[1]);
            $i++;
        }
        fclose ($fd);
        rsort($tab_in,SORT_NUMERIC);
        rsort($tab_out,SORT_NUMERIC);
        foreach ( $tab_in as $key => $value ) {
          if ($value != "nan") {$lgin++;}
        }
        $percin = $lgin-intval(($lgin*95/100));
        foreach ( $tab_out as $key2 => $value2 ) {
          if ($value2 != "nan") {$lgout++;}
        }
        $percout = $lgout-intval(($lgout*95/100));
        $dr1 =  max($tab_in[$percin-1],$tab_out[$percout-1]);
        $debit = number_format($dr1*$sampling);
        `rm $tmp_file`;

        # creation de l'image dans $png_path.
        $res = `rrdtool graph $pngname -s -31D --title "$nom_du_site - prefixe : $prefixe / $cidr" --vertical-label "bits/s" DEF:inBytesG=$rrdname:inBytes:AVERAGE DEF:outBytesG=$rrdname:outBytes:AVERAGE CDEF:input10=inBytesG,8,*,5,/,60,/,$sampling,* CDEF:output10=outBytesG,8,*,5,/,60,/,$sampling,* AREA:input10\#00FF00:"In b/s\\n" LINE1:output10\#0000FF:"Out b/s\\n"  HRULE:$dr1\#FF0000:"RENATER debit (95th percentile) $debit bits/s"`;
        
        # todo FX : faire un retour different si erreur
        return $filename;
    }

    function graphiqueMetrologie() {
        // SAGA
        global $cfgTmp, $cfgFileSep, $cfgRrdPath;

        $png_path = "/var/www/saga/www/images/tmp/";
        $nfs_path = $cfgRrdPath.$cfgFileSep;

        $monAg = new Agrement_2($this->tuple['ip_ag_numero'],$this->tuple['ip_ag_version'], $this->dbh);
        $monAg->querySelect('r', true);
        $nom_du_site = $monAg->get_dc_et_code();
        $prefixe = $this->tuple['ip_adresse'];
        $cidr = $this->tuple['ip_cidr'];
        // SAGA

        // FX
        //$png_path = "/tmp/";
        //$nfs_path = ""; # expl: "/mnt/db/RENATER_PREFIXES_RRD/";
        //$nom_du_site = "U-BS-VANNES";
        //$prefixe = "193.54.227.0";
        //$cidr = "24";
        // FX
        
        # creation du nom de fichier .rrd correspondant (du type ".../193_49_159_0_24_X.rrd")
        # X n'est pas connu, c'est la valeur d'echantillonnage
        # ce fichier sera sur le serveur de donnees d ou $nfs_path
        $tmp = str_replace(".", "_", $prefixe);
        $prefix_name = $tmp . "_" . $cidr;
        if (is_dir($nfs_path)) {
            if ($dh = opendir($nfs_path)) {
                while (($file = readdir($dh)) !== false) {
                    if (strpos($file, $prefix_name) !== false) {
                        $found = 1;
                        break;
                    };
                }
                closedir($dh);
            }
        }
        // SAGA
        $title = "Graphiques Métrologie";
        require_once("saga_2.inc.php");
        include("head_2.inc.php");
        // SAGA

        // FX
        //$html = "<!DOCTYPE HTML PUBLIC \"-//W3C//DTD HTML 4.01 Transitional//EN\" \"http://www.w3.org/TR/html4/loose.dtd\">";
        //$html = "<html>";
        //$html = "<head>";
        //$html = "<title>Graphiques Métrologie</title>";
        //$html = "<body>\n";
        // FX

        if ($found == true) {
            $rrdname = $nfs_path.$file;
            $file_split = split("_", $file);
            $tmp = split("\.",$file_split[5]);
            $sampling = $tmp[0];

            $pngJour = $this->generation_graph_jour($nom_du_site, $prefixe, $cidr, $rrdname, $sampling);
            $pngMois = $this->generation_graph_mois($nom_du_site, $prefixe, $cidr, $rrdname, $sampling);
    
            $html .= "<img border=\"0\" src=\"images/tmp/".$pngJour."\" alt=\"Graphique journalier\">\n";
            $html .= "<br>\n";
            $html .= "<img border=\"0\" src=\"images/tmp/".$pngMois."\" alt=\"Graphique mensuel\">\n";
            $html .= "</body></html>\n";
    
            echo $html;

            // a voir (pb synchro avec affichage de la page)
            //exec("rm -f ".$png_path.$pngJour);
            //exec("rm -f ".$png_path.$pngMois);
        } else {
            // si le fichier rrd n'est pas présent
            $html .= "<br>  Données indisponibles pour le moment\n";
            $html .= "</body></html>\n";
            
            echo $html;
        }
    }
?>