librenms-librenms/includes/graphing.php

<?php

function graph_multi_bits ($interfaces, $graph, $from, $to, $width, $height) {
  global $config, $rrdtool, $installdir, $mono_font, $rrd_dir;
  $imgfile = "graphs/" . "$graph";
  $options = "--alt-autoscale-max -E --start $from --end " . ($to - 150) . " --width $width --height $height";
  foreach(explode("\n", $interfaces) as $ifid) {
    $query = mysql_query("SELECT `ifIndex`, `hostname` FROM `interfaces` AS I, devices as D WHERE I.interface_id = '" . $ifid . "' AND I.device_id = D.device_id");    
    $int = mysql_fetch_row($query);
    if(is_file($rrd_dir . "/" . $int[1] . "/" . $int[0] . ".rrd")) {
      $options .= " DEF:inoctets" . $int[0] . "=" . $rrd_dir . "/" . $int[1] . "/" . $int[0] . ".rrd:INOCTETS:AVERAGE";
      $options .= " DEF:outoctets" . $int[0] . "=" . $rrd_dir . "/" . $int[1] . "/" . $int[0] . ".rrd:OUTOCTETS:AVERAGE";
      $in_thing .= $seperator . "inoctets" . $int[0] . ",UN,0," . "inoctets" . $int[0] . ",IF";
      $out_thing .= $seperator . "outoctets" . $int[0] . ",UN,0," . "outoctets" . $int[0] . ",IF";
      $pluses .= $plus;
      $seperator = ",";
      $plus = ",+";
    }
  }
  $options .= " CDEF:inoctets=" . $in_thing . $pluses;
  $options .= " CDEF:outoctets=" . $out_thing . $pluses;
  $options .= " CDEF:doutoctets=outoctets,-1,*";
  $options .= " CDEF:inbits=inoctets,8,*";
  $options .= " CDEF:outbits=outoctets,8,*";
  $options .= " CDEF:doutbits=doutoctets,8,*";
  $options .= " AREA:inbits#CDEB8B:";
  $options .= " COMMENT:BPS\ \ \ \ Current\ \ \ Average\ \ \ \ \ \ Max\\\\n";
  $options .= " LINE1.25:inbits#006600:In\ ";
  $options .= " GPRINT:inbits:LAST:%6.2lf%s";
  $options .= " GPRINT:inbits:AVERAGE:%6.2lf%s";
  $options .= " GPRINT:inbits:MAX:%6.2lf%s\\\\l";
  $options .= " AREA:doutbits#C3D9FF:";
  $options .= " LINE1.25:doutbits#000099:Out";
  $options .= " GPRINT:outbits:LAST:%6.2lf%s";
  $options .= " GPRINT:outbits:AVERAGE:%6.2lf%s";
  $options .= " GPRINT:outbits:MAX:%6.2lf%s";
  if($width <= "300") { $options .= " --font LEGEND:7:$mono_font --font AXIS:6:$mono_font --font-render-mode normal"; }
  $thing = `$rrdtool graph $imgfile $options`;
  return $imgfile;
}

function temp_graph ($temp, $graph, $from, $to, $width, $height, $title, $vertical) {
  global $config, $rrdtool, $installdir, $mono_font;
  $options = "--alt-autoscale-max -E --start $from --end $to --width $width --height $height ";
  if($width <= "300") {
    $options .= " --font LEGEND:7:$mono_font --font AXIS:6:$mono_font --font-render-mode normal ";
  }
  $hostname = gethostbyid($device);
  $imgfile = "graphs/" . "$graph";
  $iter = "1";
  $sql = mysql_query("SELECT * FROM temperature where temp_id = '$temp'");
  $opts[] = "COMMENT:                                  Cur    Max";
  while($temperature = mysql_fetch_array($sql)) {
    $hostname = mysql_result(mysql_query("SELECT hostname FROM devices WHERE device_id = '" . $temperature['temp_host'] . "'"),0);
    if($iter=="1") {$colour="CC0000";} elseif($iter=="2") {$colour="008C00";} elseif($iter=="3") {$colour="4096EE";
    } elseif($iter=="4") {$colour="73880A";} elseif($iter=="5") {$colour="D01F3C";} elseif($iter=="6") {$colour="36393D";
    } elseif($iter=="7") {$colour="FF0084"; unset($iter); }
    $temperature['temp_descr_fixed'] = str_pad($temperature['temp_descr'], 28);
    $temperature['temp_descr_fixed'] = substr($temperature['temp_descr_fixed'],0,28);
    $temprrd  = addslashes("rrd/$hostname-temp-" . str_replace("/", "_", str_replace(" ", "_",$temperature['temp_descr'])) . ".rrd");
    $temprrd  = str_replace(")", "_", $temprrd);
    $temprrd  = str_replace("(", "_", $temprrd);
    $opts[] = "DEF:temp" . $temperature[temp_id] . "=$temprrd:temp:AVERAGE";
    $opts[] = "CDEF:tempf" . $temperature[temp_id] . "=temp" . $temperature[temp_id] . ",UN,0,temp" . $temperature[temp_id] . ",IF";
    $opts[] = "CDEF:temp" . $temperature[temp_id] . "-80=tempf" . $temperature[temp_id] . ",80,GT,80,tempf" . $temperature[temp_id] . ",IF";
    $opts[] = "CDEF:temp" . $temperature[temp_id] . "-70=tempf" . $temperature[temp_id] . ",70,GT,70,tempf" . $temperature[temp_id] . ",IF";
    $opts[] = "CDEF:temp" . $temperature[temp_id] . "-60=tempf" . $temperature[temp_id] . ",60,GT,60,tempf" . $temperature[temp_id] . ",IF";
    $opts[] = "CDEF:temp" . $temperature[temp_id] . "-50=tempf" . $temperature[temp_id] . ",50,GT,50,tempf" . $temperature[temp_id] . ",IF";
    $opts[] = "CDEF:temp" . $temperature[temp_id] . "-40=tempf" . $temperature[temp_id] . ",40,GT,40,tempf" . $temperature[temp_id] . ",IF";
    $opts[] = "CDEF:temp" . $temperature[temp_id] . "-30=tempf" . $temperature[temp_id] . ",30,GT,30,tempf" . $temperature[temp_id] . ",IF";
    $opts[] = "CDEF:temp" . $temperature[temp_id] . "-25=tempf" . $temperature[temp_id] . ",25,GT,25,tempf" . $temperature[temp_id] . ",IF";
    $opts[] = "CDEF:temp" . $temperature[temp_id] . "-20=tempf" . $temperature[temp_id] . ",20,GT,20,tempf" . $temperature[temp_id] . ",IF";
    $opts[] = "CDEF:temp" . $temperature[temp_id] . "-15=tempf" . $temperature[temp_id] . ",15,GT,15,tempf" . $temperature[temp_id] . ",IF";
    $opts[] = "CDEF:temp" . $temperature[temp_id] . "-10=tempf" . $temperature[temp_id] . ",10,GT,10,tempf" . $temperature[temp_id] . ",IF";
    $opts[] = "CDEF:temp" . $temperature[temp_id] . "-5=tempf" . $temperature[temp_id] . ",5,GT,5,tempf" . $temperature[temp_id] . ",IF";
    $opts[] = "CDEF:temp" . $temperature[temp_id] . "-0=tempf" . $temperature[temp_id] . ",0,GT,0,tempf" . $temperature[temp_id] . ",IF";
    $opts[] = "AREA:temp" . $temperature[temp_id] .    "#ff0000:";
    $opts[] = "AREA:temp" . $temperature[temp_id] . "-80#ee0000:";
    $opts[] = "AREA:temp" . $temperature[temp_id] . "-70#dd0000:";
    $opts[] = "AREA:temp" . $temperature[temp_id] . "-60#cc0033:";
    $opts[] = "AREA:temp" . $temperature[temp_id] . "-50#aa0033:";
    $opts[] = "AREA:temp" . $temperature[temp_id] . "-40#990033:";
    $opts[] = "AREA:temp" . $temperature[temp_id] . "-30#800033:";
    $opts[] = "AREA:temp" . $temperature[temp_id] . "-25#660066:";
    $opts[] = "AREA:temp" . $temperature[temp_id] . "-20#490066:";
    $opts[] = "AREA:temp" . $temperature[temp_id] . "-15#330066:";
    $opts[] = "AREA:temp" . $temperature[temp_id] . "-10#160099:";
    $opts[] = "AREA:temp" . $temperature[temp_id] . "-5#000099:";
    $opts[] = "AREA:temp" . $temperature[temp_id] . "-0#000000:";
    $opts[] = "LINE1.5:temp" . $temperature[temp_id] . "#" . $colour . ":" . $temperature[temp_descr_fixed];
    $opts[] = "GPRINT:temp" . $temperature[temp_id] . ":LAST:%3.0lf<EFBFBD>C";
    $opts[] = "GPRINT:temp" . $temperature[temp_id] . ":MAX:%3.0lf<EFBFBD>C\\\l";
    $iter++;
  }
  foreach($opts as $opt) {
    $opt = str_replace(" ","\ ", $opt);
    $options .= " $opt";
  }
  $thing = `$rrdtool graph $imgfile $options`;
  return $imgfile;
}


function temp_graph_dev ($device, $graph, $from, $to, $width, $height, $title, $vertical) {
  global $config, $rrdtool, $installdir, $mono_font;
  $options  = "--start $from --end $to --width $width --height $height --vertical-label '$vertical' --alt-autoscale-max ";
  $options .= " -l 0 -E -b 1024 --title '$title' ";
  if($width <= "300") { $options .= " --font LEGEND:7:$mono_font --font AXIS:6:$mono_font --font-render-mode normal "; }
  $hostname = gethostbyid($device);
  $imgfile = "graphs/" . "$graph";
  $iter = "1";
  $sql = mysql_query("SELECT * FROM temperature where temp_host = '$device'");
  $options .= "COMMENT:\ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \ Cur\ \ \ \ Max\\\\n";
  while($temperature = mysql_fetch_array($sql)) {
    if($iter=="1") {$colour="CC0000";} elseif($iter=="2") {$colour="008C00";} elseif($iter=="3") {$colour="4096EE";
    } elseif($iter=="4") {$colour="73880A";} elseif($iter=="5") {$colour="D01F3C";} elseif($iter=="6") {$colour="36393D";
    } elseif($iter=="7") {$colour="FF0084"; unset($iter); }
    $temperature['temp_descr_fixed'] = str_pad($temperature['temp_descr'], 28);
    $temperature['temp_descr_fixed'] = substr($temperature['temp_descr_fixed'],0,28);
    $temprrd  = addslashes("rrd/$hostname-temp-" . str_replace("/", "_", str_replace(" ", "_",$temperature['temp_descr'])) . ".rrd");
    $temprrd  = str_replace(")", "_", $temprrd);
    $temprrd  = str_replace("(", "_", $temprrd);
    $options .= " DEF:temp" . $temperature[temp_id] . "=$temprrd:temp:AVERAGE ";
    $options .= " LINE1:temp" . $temperature[temp_id] . "#" . $colour . ":'" . $temperature[temp_descr_fixed] . "' ";
    $options .= " GPRINT:temp" . $temperature[temp_id] . ":LAST:%3.0lf\<EFBFBD>C ";
    $options .= " GPRINT:temp" . $temperature[temp_id] . ":MAX:%3.0lf\<EFBFBD>C\\\l ";
    $iter++;
  }
  $thing = `$rrdtool graph $imgfile $options`;
  return $imgfile;
}

function graph_device_bits ($device, $graph, $from, $to, $width, $height) {
  global $config, $rrdtool, $installdir, $mono_font, $rrd_dir;
  $imgfile = "graphs/" . "$graph";
  $options = "--alt-autoscale-max -E --start $from --end " . ($to - 150) . " --width $width --height $height ";
  $hostname = gethostbyid($device);
  $query = mysql_query("SELECT `ifIndex` FROM `interfaces` WHERE `device_id` = '$device' AND `ifType` NOT LIKE '%oopback%' AND `ifType` NOT LIKE '%SVI%'");
  if($width <= "300") { $options .= "--font LEGEND:7:$mono_font --font AXIS:6:$mono_font --font-render-mode normal "; }
  $pluses = "";
  while($int = mysql_fetch_row($query)) {
    if(is_file($rrd_dir . "/" . $hostname . "/" . $int[0] . ".rrd")) {
      $in_thing .= $seperator . "inoctets" . $int[0] . ",UN,0," . "inoctets" . $int[0] . ",IF";
                        $out_thing .= $seperator . "outoctets" . $int[0] . ",UN,0," . "outoctets" . $int[0] . ",IF";
			$pluses .= $plus;
                        $seperator = ",";
			$plus = ",+";
      $options .= "DEF:inoctets" . $int[0] . "=" . $rrd_dir . "/" . $hostname . "/" . $int[0] . ".rrd:INOCTETS:AVERAGE ";
      $options .= "DEF:outoctets" . $int[0] . "=" . $rrd_dir . "/" . $hostname . "/" . $int[0] . ".rrd:OUTOCTETS:AVERAGE ";     
    }
  }
  $options .=  " CDEF:inoctets=$in_thing$pluses ";
  $options .=  " CDEF:outoctets=$out_thing$pluses ";
  $options .=  " CDEF:doutoctets=outoctets,-1,* ";   
  $options .=  " CDEF:inbits=inoctets,8,*                  ";
  $options .=  " CDEF:outbits=outoctets,8,*               ";   
  $options .=  " CDEF:doutbits=doutoctets,8,*           ";       
  $options .=  " AREA:inbits#CDEB8B:                  ";
  $options .=  " COMMENT:BPS\ \ \ \ Current\ \ \ Average\ \ \ \ \ \ Max\\\\n ";                  
  $options .=  " LINE1.25:inbits#006600:In\ ";     
  $options .=  " GPRINT:inbits:LAST:%6.2lf%s          ";       
  $options .=  " GPRINT:inbits:AVERAGE:%6.2lf%s     ";            
  $options .=  " GPRINT:inbits:MAX:%6.2lf%s\\\l     ";            
  $options .=  " AREA:doutbits#C3D9FF:          ";        
  $options .=  " LINE1.25:doutbits#000099:Out ";
  $options .=  " GPRINT:outbits:LAST:%6.2lf%s ";
  $options .=  " GPRINT:outbits:AVERAGE:%6.2lf%s ";
  $options .=  " GPRINT:outbits:MAX:%6.2lf%s ";
  $thing = `$rrdtool graph $imgfile $options`;
  return $imgfile;
}

function trafgraph ($rrd, $graph, $from, $to, $width, $height) {
  global $config, $rrdtool, $installdir, $mono_font, $rrd_dir;    
  $database = $rrd_dir . "/" . $rrd;
  $imgfile = "graphs/" . "$graph";
  $period = $to - $from;
  $options = "--alt-autoscale-max -E --start $from --end $to --width $width --height $height ";
  if($width <= "300") { $options .= " --font LEGEND:7:$mono_font --font AXIS:6:$mono_font --font-render-mode normal "; }
  $options .= " DEF:inoctets=$database:INOCTETS:AVERAGE";
  $options .= " DEF:outoctets=$database:OUTOCTETS:AVERAGE";
  $options .= " CDEF:octets=inoctets,outoctets,+";
  $options .= " CDEF:doutoctets=outoctets,-1,*";
  $options .= " CDEF:inbits=inoctets,8,*";
  $options .= " CDEF:outbits=outoctets,8,*";
  $options .= " CDEF:doutbits=doutoctets,8,*";
  $options .= " VDEF:totin=inoctets,TOTAL";
  $options .= " VDEF:totout=outoctets,TOTAL";
  $options .= " VDEF:tot=octets,TOTAL";
  $options .= " VDEF:95thin=inbits,95,PERCENT";
  $options .= " VDEF:95thout=outbits,95,PERCENT";
  $options .= " VDEF:d95thout=doutbits,5,PERCENT";
  $options .= " AREA:inbits#CDEB8B:";
  $options .= " COMMENT:BPS\ \ \ \ Current\ \ \ Average\ \ \ \ \ \ Max\ \ \ 95th\ %\\\\n";
  $options .= " LINE1.25:inbits#006600:In\ ";
  $options .= " GPRINT:inbits:LAST:%6.2lf%s";
  $options .= " GPRINT:inbits:AVERAGE:%6.2lf%s";
  $options .= " GPRINT:inbits:MAX:%6.2lf%s";
  $options .= " GPRINT:95thin:%6.2lf%s\\\\n";
  $options .= " AREA:doutbits#C3D9FF:";
  $options .= " LINE1.25:doutbits#000099:Out";
  $options .= " GPRINT:outbits:LAST:%6.2lf%s";
  $options .= " GPRINT:outbits:AVERAGE:%6.2lf%s";
  $options .= " GPRINT:outbits:MAX:%6.2lf%s";
  $options .= " GPRINT:95thout:%6.2lf%s\\\\n";
  $options .= " GPRINT:tot:Total\ %6.2lf%s";
  $options .= " GPRINT:totin:\(In\ %6.2lf%s";
  $options .= " GPRINT:totout:Out\ %6.2lf%s\)\\\\l";
  $options .= " LINE1:95thin#aa0000";
  $options .= " LINE1:d95thout#aa0000";
  $thing = `$rrdtool graph $imgfile $options`;
  return $imgfile;
}

function pktsgraph ($rrd, $graph, $from, $to, $width, $height) {
  global $config, $rrdtool, $installdir, $mono_font, $rrd_dir;
  $database = $rrd_dir . "/" . $rrd;
  $imgfile = "graphs/" . "$graph";
  $options = "--alt-autoscale-max -E --start $from --end $to --width $width --height $height ";
  if($width <= "300") { $options .= " --font LEGEND:7:$mono_font --font AXIS:6:$mono_font --font-render-mode normal "; }
  $options .= " DEF:in=$database:INUCASTPKTS:AVERAGE";
  $options .= " DEF:out=$database:OUTUCASTPKTS:AVERAGE";
  $options .= " CDEF:dout=out,-1,*";
  $options .= " AREA:in#aa66aa:";
  $options .= " COMMENT:Packets\ \ \ \ Current\ \ \ \ \ Average\ \ \ \ \ \ Maximum\\\\n";
  $options .= " LINE1.25:in#330033:In\ \ ";
  $options .= " GPRINT:in:LAST:%6.2lf%spps";
  $options .= " GPRINT:in:AVERAGE:%6.2lf%spps";
  $options .= " GPRINT:in:MAX:%6.2lf%spps\\\\n";
  $options .= " AREA:dout#FFDD88:";
  $options .= " LINE1.25:dout#FF6600:Out\ ";
  $options .= " GPRINT:out:LAST:%6.2lf%spps";
  $options .= " GPRINT:out:AVERAGE:%6.2lf%spps";
  $options .= " GPRINT:out:MAX:%6.2lf%spps\\\\n";
  $thing = `$rrdtool graph $imgfile $options`;
  return $imgfile;
}

function errorgraph ($rrd, $graph, $from, $to, $width, $height) {
  global $config, $rrdtool, $installdir, $mono_font, $rrd_dir;
  $database = $rrd_dir . "/" . $rrd;
  $imgfile = "graphs/" . "$graph";
  $options = "--alt-autoscale-max -E --start $from --end $to --width $width --height $height ";
  if($width <= "300") { $options .= " --font LEGEND:7:$mono_font --font AXIS:6:$mono_font --font-render-mode normal "; }
  $options .= " DEF:in=$database:INERRORS:AVERAGE";
  $options .= " DEF:out=$database:OUTERRORS:AVERAGE";
  $options .= " CDEF:dout=out,-1,*";
  $options .= " AREA:in#ff3300:";
  $options .= " COMMENT:Errors\ \ \ \ Current\ \ \ \ \ Average\ \ \ \ \ \ Maximum\\\\n";
  $options .= " LINE1.25:in#ff0000:In\ \ ";
  $options .= " GPRINT:in:LAST:%6.2lf%spps";
  $options .= " GPRINT:in:AVERAGE:%6.2lf%spps";
  $options .= " GPRINT:in:MAX:%6.2lf%spps\\\\n";
  $options .= " AREA:dout#FF6633:";
  $options .= " LINE1.25:dout#cc3300:Out\ ";
  $options .= " GPRINT:out:LAST:%6.2lf%spps";
  $options .= " GPRINT:out:AVERAGE:%6.2lf%spps";
  $options .= " GPRINT:out:MAX:%6.2lf%spps\\\\n";
  $thing = `$rrdtool graph $imgfile $options`;
  return $imgfile;
}

function nucastgraph ($rrd, $graph, $from, $to, $width, $height) {
  global $config, $rrdtool, $installdir, $mono_font, $rrd_dir;
  $database = $rrd_dir . "/" . $rrd;
  $imgfile = "graphs/" . "$graph";
  $options = "--alt-autoscale-max -E --start $from --end $to --width $width --height $height ";
  if($width <= "300") { $options .= " --font LEGEND:7:$mono_font --font AXIS:6:$mono_font --font-render-mode normal "; }
  $options .= " DEF:in=$database:INNUCASTPKTS:AVERAGE";
  $options .= " DEF:out=$database:OUTNUCASTPKTS:AVERAGE";
  $options .= " CDEF:dout=out,-1,*";
  $options .= " AREA:in#aa66aa:";
  $options .= " COMMENT:Packets\ \ \ \ Current\ \ \ \ \ Average\ \ \ \ \ \ Maximum\\\\n";
  $options .= " LINE1.25:in#330033:In\ \ ";
  $options .= " GPRINT:in:LAST:%6.2lf%spps";
  $options .= " GPRINT:in:AVERAGE:%6.2lf%spps";
  $options .= " GPRINT:in:MAX:%6.2lf%spps\\\\n";
  $options .= " AREA:dout#FFDD88:";
  $options .= " LINE1.25:dout#FF6600:Out\ ";
  $options .= " GPRINT:out:LAST:%6.2lf%spps";
  $options .= " GPRINT:out:AVERAGE:%6.2lf%spps";
  $options .= " GPRINT:out:MAX:%6.2lf%spps\\\\n";
  $thing = `$rrdtool graph $imgfile $options`;
  return $imgfile;
}

function cpugraph ($rrd, $graph , $from, $to, $width, $height) {
  global $config, $rrdtool, $installdir, $mono_font, $rrd_dir;
  $database = $rrd_dir . "/" . $rrd;
  $imgfile = "graphs/" . "$graph";
  $options = "--alt-autoscale-max -E --start $from --end $to --width $width --height $height ";
  if($width <= "300") {$options .= " --font LEGEND:7:$mono_font --font AXIS:6:$mono_font --font-render-mode normal "; }
  $options .= " DEF:5s=$database:LOAD5S:AVERAGE";
  $options .= " DEF:5m=$database:LOAD5M:AVERAGE";
  $options .= " COMMENT:\ \ \ \ \ \ \ \ \ \ Current\ \ Minimum\ \ Maximum\ \ Average\\\\n";
  $options .= " AREA:5m#ffee99: LINE1.25:5m#aa2200:Load\ %";
  $options .= " GPRINT:5m:LAST:%6.2lf\  GPRINT:5m:AVERAGE:%6.2lf\ ";
  $options .= " GPRINT:5m:MAX:%6.2lf\  GPRINT:5m:AVERAGE:%6.2lf\\\\n";
  $thing = `$rrdtool graph $imgfile $options`;
  return $imgfile;
}

function uptimegraph ($rrd, $graph , $from, $to, $width, $height, $title, $vertical) {
  global $config, $rrdtool, $installdir, $mono_font, $rrd_dir;
  $database = $rrd_dir . "/" . $rrd;
  $imgfile = "graphs/" . "$graph";
  $options = "--alt-autoscale-max -E --start $from --end $to --width $width --height $height ";
  if($width <= "300") { $options .= " --font LEGEND:7:$mono_font --font AXIS:6:$mono_font --font-render-mode normal "; } 
  $options .= " DEF:uptime=$database:uptime:AVERAGE";
  $options .= " CDEF:cuptime=uptime,86400,/";
  $options .= " COMMENT:Days\ \ \ \ \ \ Current\ \ Minimum\ \ Maximum\ \ Average\\\\n";
  $options .= " AREA:cuptime#EEEEEE:Uptime";
  $options .= " LINE1.25:cuptime#36393D:";
  $options .= " GPRINT:cuptime:LAST:%6.2lf\  GPRINT:cuptime:AVERAGE:%6.2lf\ ";
  $options .= " GPRINT:cuptime:MAX:%6.2lf\  GPRINT:cuptime:AVERAGE:%6.2lf\\\\n";
  $thing = `$rrdtool graph $imgfile $options`;
  return $imgfile;
}


function memgraph ($rrd, $graph , $from, $to, $width, $height, $title, $vertical) {
  global $config, $rrdtool, $installdir, $mono_font, $rrd_dir;
  $database = $rrd_dir . "/" . $rrd;
  $imgfile = "graphs/" . "$graph";
  $period = $to - $from;
  $options = "--alt-autoscale-max -E --start $from --end $to --width $width --height $height ";
  if($width <= "300") { $options .= " --font LEGEND:7:$mono_font --font AXIS:6:$mono_font --font-render-mode normal "; }
  $options .= " DEF:MEMTOTAL=$database:MEMTOTAL:AVERAGE";
  $options .= " DEF:IOFREE=$database:IOFREE:AVERAGE";
  $options .= " DEF:IOUSED=$database:IOUSED:AVERAGE";
  $options .= " DEF:PROCFREE=$database:PROCFREE:AVERAGE";
  $options .= " DEF:PROCUSED=$database:PROCUSED:AVERAGE";
  $options .= " CDEF:FREE=IOFREE,PROCFREE,+";
  $options .= " CDEF:USED=IOUSED,PROCUSED,+";
  $options .= " COMMENT:Bytes\ \ \ \ Current\ \ Minimum\ \ Maximum\ \ Average\\\\n";
  $options .= " AREA:USED#ff6060:";
  $options .= " LINE2:USED#cc0000:Used";
  $options .= " GPRINT:USED:LAST:%6.2lf%s";
  $options .= " GPRINT:USED:MIN:%6.2lf%s";
  $options .= " GPRINT:USED:MAX:%6.2lf%s";
  $options .= " GPRINT:USED:AVERAGE:%6.2lf%s\\\\l";
  $options .= " AREA:FREE#e5e5e5:Free:STACK";
  $options .= " GPRINT:FREE:LAST:%6.2lf%s";
  $options .= " GPRINT:FREE:MIN:%6.2lf%s";
  $options .= " GPRINT:FREE:MAX:%6.2lf%s";
  $options .= " GPRINT:FREE:AVERAGE:%6.2lf%s\\\\l";
  $options .= " LINE1:MEMTOTAL#000000:";
  $thing = `$rrdtool graph $imgfile $options`;
  return $imgfile;
}

function ip_graph ($rrd, $graph, $from, $to, $width, $height) {
  global $config, $rrdtool, $installdir, $mono_font, $rrd_dir;
  $database = $rrd_dir . "/" . $rrd;
  $imgfile = "graphs/" . "$graph";
  $period = $to - $from;
  $options = "--alt-autoscale-max -E --start $from --end $to --width $width --height $height ";
  if($width <= "300") { $options .= " --font LEGEND:7:$mono_font --font AXIS:6:$mono_font --font-render-mode normal "; }
  $options .= " DEF:ipForwDatagrams=$database:ipForwDatagrams:AVERAGE";
  $options .= " DEF:ipInDelivers=$database:ipInDelivers:AVERAGE";
  $options .= " DEF:ipInReceives=$database:ipInReceives:AVERAGE";
  $options .= " DEF:ipOutRequests=$database:ipOutRequests:AVERAGE";
  $options .= " DEF:ipInDiscards=$database:ipInDiscards:AVERAGE";
  $options .= " DEF:ipOutDiscards=$database:ipOutDiscards:AVERAGE";
  $options .= " DEF:ipOutNoRoutes=$database:ipInDiscards:AVERAGE";
  $options .= " COMMENT:Packets/sec\ \ \ \ Current\ \ \ Average\ \ \ Maximum\\\n";
  $options .= " LINE1.25:ipForwDatagrams#cc0000:ForwDgrams\ ";
  $options .= " GPRINT:ipForwDatagrams:LAST:%6.2lf%s";
  $options .= " GPRINT:ipForwDatagrams:AVERAGE:\ %6.2lf%s";
  $options .= " GPRINT:ipForwDatagrams:MAX:\ %6.2lf%s\\\\n";
  $options .= " LINE1.25:ipInDelivers#00cc00:InDelivers\ ";
  $options .= " GPRINT:ipInDelivers:LAST:%6.2lf%s";
  $options .= " GPRINT:ipInDelivers:AVERAGE:\ %6.2lf%s";
  $options .= " GPRINT:ipInDelivers:MAX:\ %6.2lf%s\\\\n";
  $options .= " LINE1.25:ipInReceives#006600:InReceives\ ";
  $options .= " GPRINT:ipInReceives:LAST:%6.2lf%s";
  $options .= " GPRINT:ipInReceives:AVERAGE:\ %6.2lf%s";
  $options .= " GPRINT:ipInReceives:MAX:\ %6.2lf%s\\\\n";
  $options .= " LINE1.25:ipOutRequests#0000cc:OutRequests";
  $options .= " GPRINT:ipOutRequests:LAST:%6.2lf%s";
  $options .= " GPRINT:ipOutRequests:AVERAGE:\ %6.2lf%s";
  $options .= " GPRINT:ipOutRequests:MAX:\ %6.2lf%s\\\\n";
  $options .= " LINE1.25:ipInDiscards#cccc00:InDiscards\ ";
  $options .= " GPRINT:ipInDiscards:LAST:%6.2lf%s";
  $options .= " GPRINT:ipInDiscards:AVERAGE:\ %6.2lf%s";
  $options .= " GPRINT:ipInDiscards:MAX:\ %6.2lf%s\\\\n";
  $options .= " LINE1.25:ipOutDiscards#330033:OutDiscards";
  $options .= " GPRINT:ipOutDiscards:LAST:%6.2lf%s";
  $options .= " GPRINT:ipOutDiscards:AVERAGE:\ %6.2lf%s";
  $options .= " GPRINT:ipOutDiscards:MAX:\ %6.2lf%s\\\\n";
  $options .= " LINE1.25:ipOutNoRoutes#660000:OutNoRoutes";
  $options .= " GPRINT:ipOutNoRoutes:LAST:%6.2lf%s";
  $options .= " GPRINT:ipOutNoRoutes:AVERAGE:\ %6.2lf%s";
  $options .= " GPRINT:ipOutNoRoutes:MAX:\ %6.2lf%s\\\\n";
  $thing = `$rrdtool graph $imgfile $options`;
  return $imgfile;
}

function icmp_graph ($rrd, $graph, $from, $to, $width, $height) {
  global $config, $rrdtool, $installdir, $mono_font, $rrd_dir;
  $database = $rrd_dir . "/" . $rrd;
  $imgfile = "graphs/" . "$graph";
  $period = $to - $from;
  $options = "--alt-autoscale-max -E --start $from --end $to --width $width --height $height ";
  if($width <= "300") { $options .= " --font LEGEND:7:$mono_font --font AXIS:6:$mono_font --font-render-mode normal "; }  $options .= "DEF:icmpInMsgs=$database:icmpInMsgs:AVERAGE";
  $options .= " DEF:icmpOutMsgs=$database:icmpOutMsgs:AVERAGE";
  $options .= " DEF:icmpInErrors=$database:icmpInErrors:AVERAGE";
  $options .= " DEF:icmpOutErrors=$database:icmpOutErrors:AVERAGE";
  $options .= " DEF:icmpInEchos=$database:icmpInEchos:AVERAGE";
  $options .= " DEF:icmpOutEchos=$database:icmpOutEchos:AVERAGE";
  $options .= " DEF:icmpInEchoReps=$database:icmpInEchoReps:AVERAGE";
  $options .= " DEF:icmpOutEchoReps=$database:icmpOutEchoReps:AVERAGE";
  $options .= " COMMENT:Packets/sec\ \ \ \ Current\ \ \ \ Average\ \ \ Maximum\\\n";
  $options .= " LINE1.25:icmpInMsgs#00cc00:InMsgs     ";
  $options .= " GPRINT:icmpInMsgs:LAST:%6.2lf%s";
  $options .= " GPRINT:icmpInMsgs:AVERAGE:\ %6.2lf%s";
  $options .= " GPRINT:icmpInMsgs:MAX:\ %6.2lf%s\\\n";
  $options .= " LINE1.25:icmpOutMsgs#006600:OutMsgs    ";
  $options .= " GPRINT:icmpOutMsgs:LAST:%6.2lf%s";
  $options .= " GPRINT:icmpOutMsgs:AVERAGE:\ %6.2lf%s";
  $options .= " GPRINT:icmpOutMsgs:MAX:\ %6.2lf%s\\\n";
  $options .= " LINE1.25:icmpInErrors#cc0000:InErrors   ";
  $options .= " GPRINT:icmpInErrors:LAST:%6.2lf%s";
  $options .= " GPRINT:icmpInErrors:AVERAGE:\ %6.2lf%s";
  $options .= " GPRINT:icmpInErrors:MAX:\ %6.2lf%s\\\n";
  $options .= " LINE1.25:icmpOutErrors#660000:OutErrors  ";
  $options .= " GPRINT:icmpOutErrors:LAST:%6.2lf%s";
  $options .= " GPRINT:icmpOutErrors:AVERAGE:\ %6.2lf%s";
  $options .= " GPRINT:icmpOutErrors:MAX:\ %6.2lf%s\\\n";
  $options .= " LINE1.25:icmpInEchos#0066cc:InEchos    ";
  $options .= " GPRINT:icmpInEchos:LAST:%6.2lf%s";
  $options .= " GPRINT:icmpInEchos:AVERAGE:\ %6.2lf%s";
  $options .= " GPRINT:icmpInEchos:MAX:\ %6.2lf%s\\\n";
  $options .= " LINE1.25:icmpOutEchos#003399:OutEchos   ";
  $options .= " GPRINT:icmpOutEchos:LAST:%6.2lf%s";
  $options .= " GPRINT:icmpOutEchos:AVERAGE:\ %6.2lf%s";
  $options .= " GPRINT:icmpOutEchos:MAX:\ %6.2lf%s\\\n";
  $options .= " LINE1.25:icmpInEchoReps#cc00cc:InEchoReps ";
  $options .= " GPRINT:icmpInEchoReps:LAST:%6.2lf%s";
  $options .= " GPRINT:icmpInEchoReps:AVERAGE:\ %6.2lf%s";
  $options .= " GPRINT:icmpInEchoReps:MAX:\ %6.2lf%s\\\n";
  $options .= " LINE1.25:icmpOutEchoReps#990099:OutEchoReps";
  $options .= " GPRINT:icmpOutEchoReps:LAST:%6.2lf%s";
  $options .= " GPRINT:icmpOutEchoReps:AVERAGE:\ %6.2lf%s";
  $options .= " GPRINT:icmpOutEchoReps:MAX:\ %6.2lf%s\\\n";
  $thing = `$rrdtool graph $imgfile $options`;
  return $imgfile;
}

function tcp_graph ($rrd, $graph, $from, $to, $width, $height) {
  global $config, $rrdtool, $installdir, $mono_font, $rrd_dir;
  $database = $rrd_dir . "/" . $rrd;
  $imgfile = "graphs/" . "$graph";
  $period = $to - $from;
  $options = "--alt-autoscale-max -E --start $from --end $to --width $width --height $height ";
  if($width <= "300") { $options .= " --font LEGEND:7:$mono_font --font AXIS:6:$mono_font --font-render-mode normal "; }  $options .= "DEF:icmpInMsgs=$database:icmpInMsgs:AVERAGE";
  $options .= " DEF:tcpActiveOpens=$database:tcpActiveOpens:AVERAGE";
  $options .= " DEF:tcpPassiveOpens=$database:tcpPassiveOpens:AVERAGE";
  $options .= " DEF:tcpAttemptFails=$database:tcpAttemptFails:AVERAGE";
  $options .= " DEF:tcpEstabResets=$database:tcpEstabResets:AVERAGE";
  $options .= " DEF:tcpInSegs=$database:tcpInSegs:AVERAGE";
  $options .= " DEF:tcpOutSegs=$database:tcpOutSegs:AVERAGE";
  $options .= " DEF:tcpRetransSegs=$database:tcpRetransSegs:AVERAGE";
  $options .= " COMMENT:Packets/sec\ \ \ \ Current\ \ \ \ Average\ \ \ Maximum\\\n";
  $options .= " LINE1.25:tcpActiveOpens#00cc00:ActiveOpens\ ";
  $options .= " GPRINT:tcpActiveOpens:LAST:%6.2lf%s";
  $options .= " GPRINT:tcpActiveOpens:AVERAGE:\ %6.2lf%s";
  $options .= " GPRINT:tcpActiveOpens:MAX:\ %6.2lf%s\\\\n";
  $options .= " LINE1.25:tcpPassiveOpens#006600:PassiveOpens";
  $options .= " GPRINT:tcpPassiveOpens:LAST:%6.2lf%s";
  $options .= " GPRINT:tcpPassiveOpens:AVERAGE:\ %6.2lf%s";
  $options .= " GPRINT:tcpPassiveOpens:MAX:\ %6.2lf%s\\\\n";
  $options .= " LINE1.25:tcpAttemptFails#cc0000:AttemptFails";
  $options .= " GPRINT:tcpAttemptFails:LAST:%6.2lf%s";
  $options .= " GPRINT:tcpAttemptFails:AVERAGE:\ %6.2lf%s";
  $options .= " GPRINT:tcpAttemptFails:MAX:\ %6.2lf%s\\\\n";
  $options .= " LINE1.25:tcpEstabResets#660000:EstabResets\ ";
  $options .= " GPRINT:tcpEstabResets:LAST:%6.2lf%s";
  $options .= " GPRINT:tcpEstabResets:AVERAGE:\ %6.2lf%s";
  $options .= " GPRINT:tcpEstabResets:MAX:\ %6.2lf%s\\\\n";
  $options .= " LINE1.25:tcpInSegs#0066cc:InSegs\ \ \ \ \ \ ";
  $options .= " GPRINT:tcpInSegs:LAST:%6.2lf%s";
  $options .= " GPRINT:tcpInSegs:AVERAGE:\ %6.2lf%s";
  $options .= " GPRINT:tcpInSegs:MAX:\ %6.2lf%s\\\\n";
  $options .= " LINE1.25:tcpOutSegs#003399:OutSegs\ \ \ \ \ ";
  $options .= " GPRINT:tcpOutSegs:LAST:%6.2lf%s";
  $options .= " GPRINT:tcpOutSegs:AVERAGE:\ %6.2lf%s";
  $options .= " GPRINT:tcpOutSegs:MAX:\ %6.2lf%s\\\\n";
  $options .= " LINE1.25:tcpRetransSegs#cc00cc:RetransSegs\ ";
  $options .= " GPRINT:tcpRetransSegs:LAST:%6.2lf%s";
  $options .= " GPRINT:tcpRetransSegs:AVERAGE:\ %6.2lf%s";
  $options .= " GPRINT:tcpRetransSegs:MAX:\ %6.2lf%s\\\\n";
  $thing = `$rrdtool graph $imgfile $options`;  
  return $imgfile;
}

function udp_graph ($rrd, $graph, $from, $to, $width, $height) {
  global $config, $rrdtool, $installdir, $mono_font, $rrd_dir;
  $database = $rrd_dir . "/" . $rrd;
  $imgfile = "graphs/" . "$graph";
  $period = $to - $from;
  $options = "--alt-autoscale-max -E --start $from --end $to --width $width --height $height ";
  if($width <= "300") { $options .= " --font LEGEND:7:$mono_font --font AXIS:6:$mono_font --font-render-mode normal "; }  $options .= "DEF:icmpInMsgs=$database:icmpInMsgs:AVERAGE";
  $options .= " DEF:udpInDatagrams=$database:udpInDatagrams:AVERAGE";
  $options .= " DEF:udpOutDatagrams=$database:udpOutDatagrams:AVERAGE";
  $options .= " DEF:udpInErrors=$database:udpInErrors:AVERAGE";
  $options .= " DEF:udpNoPorts=$database:udpNoPorts:AVERAGE";
  $options .= " COMMENT:Packets/sec\ \ \ \ Current\ \ \ \ Average\ \ \ Maximum\\\\n";
  $options .= " LINE1.25:udpInDatagrams#00cc00:InDatagrams\ ";
  $options .= " GPRINT:udpInDatagrams:LAST:%6.2lf%s";
  $options .= " GPRINT:udpInDatagrams:AVERAGE:\ %6.2lf%s";
  $options .= " GPRINT:udpInDatagrams:MAX:\ %6.2lf%s\\\\n";
  $options .= " LINE1.25:udpOutDatagrams#006600:OutDatagrams";
  $options .= " GPRINT:udpOutDatagrams:LAST:%6.2lf%s";
  $options .= " GPRINT:udpOutDatagrams:AVERAGE:\ %6.2lf%s";
  $options .= " GPRINT:udpOutDatagrams:MAX:\ %6.2lf%s\\\\n";
  $options .= " LINE1.25:udpInErrors#cc0000:InErrors\ \ \ \ ";
  $options .= " GPRINT:udpInErrors:LAST:%6.2lf%s";
  $options .= " GPRINT:udpInErrors:AVERAGE:\ %6.2lf%s";
  $options .= " GPRINT:udpInErrors:MAX:\ %6.2lf%s\\\\n";
  $options .= " LINE1.25:udpNoPorts#660000:NoPorts\ \ \ \ \ ";
  $options .= " GPRINT:udpNoPorts:LAST:%6.2lf%s";
  $options .= " GPRINT:udpNoPorts:AVERAGE:\ %6.2lf%s";
  $options .= " GPRINT:udpNoPorts:MAX:\ %6.2lf%s\\\\n";
  $thing = `$rrdtool graph $imgfile $options`;
  return $imgfile;
}


?>