<?php

// Pandora FMS - the Flexible Monitoring System
// ============================================
// Copyright (c) 2008 Artica Soluciones Tecnologicas, http://www.artica.es
// Please see http://pandora.sourceforge.net for full contribution list

// This program is free software; you can redistribute it and/or
// modify it under the terms of the GNU Lesser General Public License (LGPL)
// as published by the Free Software Foundation for version 2.
// 
// This program is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
// GNU General Public License for more details.
// You should have received a copy of the GNU General Public License
// along with this program; if not, write to the Free Software
// Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.

require_once ('../include/config.php');
require_once ($config["homedir"].'/include/functions.php');
require_once ($config["homedir"].'/include/functions_db.php');
require_once ('Image/Graph.php');

global $config;

if (!isset($_SESSION["id_user"])){
	session_start();
	session_write_close();
}
$config["id_user"] = $_SESSION["id_usuario"];

// Session check
check_login ();

/**
 * Show a brief error message in a PNG graph
 */

function graphic_error () {
	Header('Content-type: image/png');
	$imgPng = imageCreateFromPng('../images/image_problem.png');
	imageAlphaBlending($imgPng, true);
	imageSaveAlpha($imgPng, true);
	imagePng($imgPng);
}

/**
 * Return a MySQL timestamp date, formatted with actual date MINUS X minutes, 
 *
 * @param int Date in unix format (timestamp)
 *
 * @return string Formatted date string (YY-MM-DD hh:mm:ss)
 */
function dame_fecha ($mh) {
	$mh *= 60;
	$m_year = date ("Y", time() - $mh); 
	$m_month = date ("m", time() - $mh);
	$m_day = date ("d", time() - $mh);
	$m_hour = date ("H", time() - $mh);
	$m_min = date ("i", time() - $mh);
	$m = $m_year."-".$m_month."-".$m_day." ".$m_hour.":".$m_min.":00";
	return $m;
}

/**
 * Return a short timestamp data, D/M h:m
 *
 * @param int Date in unix format (timestamp)
 *
 * @return string Formatted date string
 */

function dame_fecha_grafico_timestamp ($timestamp) {
	return date('d/m H:i', $timestamp);
}

/**
 * Produces a combined/user defined PNG graph
 *
 * @param array List of source modules
 * @param array List of weighs for each module
 * @param int Period (in seconds)
 * @param int Width, in pixels
 * @param int Height, in pixels
 * @param string Title for graph
 * @param string Unit name, for render in legend
 * @param int Show events in graph (set to 1)
 * @param int Show alerts in graph (set to 1)
 * @param int Pure mode (without titles) (set to 1)
 * @param int Date to start of getting info.
 */
function graphic_combined_module ($module_list, $weight_list, $periodo, $width, $height,
				$title, $unit_name, $show_event = 0, $show_alert = 0, $pure = 0, $stacked = 0, $date = 0) {

	global $config;
	
	require_once 'Image/Graph.php';
	$resolution = $config['graph_res'] * 50; // Number of "slices" we want in graph
	
	if (! $date)
		$date = time ();
	//$unix_timestamp = strtotime($mysql_timestamp) // Convert MYSQL format tio utime
	$fechatope = $date - $periodo; // limit date
	$horasint = $periodo / $resolution; // Each intervalo is $horasint seconds length
	$module_number = count($module_list);

	// intervalo - This is the number of "rows" we are divided the time to fill data.
	//             more interval, more resolution, and slower.
	// periodo - Gap of time, in seconds. This is now to (now-periodo) secs
	
	// Init tables
	for ($i = 0; $i < $module_number; $i++){
		$real_data[$i] = array();
		$mod_data[$i] = 1; // Data multiplier to get the same scale on all modules
		if ($show_event == 1)
			$real_event[$i] = array();
		if (isset($weight_list[$i])){
			if ($weight_list[$i] == 0)
				$weight_list[$i] = 1;
		} else
			$weight_list[$i] = 1;
	}

	$max_value = 0;
	$min_value = 0;
	// FOR EACH MODULE IN module_list....
	for ($i = 0; $i < $module_number; $i++){	
		$id_agente_modulo = $module_list[$i];
		$nombre_agente = dame_nombre_agente_agentemodulo($id_agente_modulo);
		$id_agente = dame_agente_id($nombre_agente);
		$nombre_modulo = dame_nombre_modulo_agentemodulo($id_agente_modulo);
		$module_list_name[$i] = substr($nombre_agente,0,9)." / ".substr($nombre_modulo,0,20);
		for ($j = 0; $j <= $resolution; $j++) {
			$valores[$j][0] = 0; // SUM of all values for this interval
			$valores[$j][1] = 0; // counter
			$valores[$j][2] = $fechatope + ($horasint * $j); // [2] Top limit for this range
			$valores[$j][3] = $fechatope + ($horasint*($j+1)); // [3] Botom limit
			$valores[$j][4] = 0; // MIN
			$valores[$j][5] = 0; // MAX
			$valores[$j][6] = 0; // Event
		}
		// Init other general variables

		if ($show_event == 1){
			// If we want to show events in graphs
			$sql1="SELECT utimestamp FROM tevento WHERE id_agentmodule = $id_agente_modulo AND utimestamp > $fechatope";
			$result=mysql_query($sql1);
			while ($row=mysql_fetch_array($result)){
				$utimestamp = $row[0];
				for ($i=0; $i <= $resolution; $i++) {
					if ( ($utimestamp <= $valores[$i][3]) && ($utimestamp >= $valores[$i][2]) ){
						$real_event[$i]=1;
					}
				}
			}
		}
		$alert_high = 0;
		$alert_low = 10000000;
		if ($show_alert == 1){
			// If we want to show alerts limits
			$sql1="SELECT * FROM talerta_agente_modulo where id_agente_modulo = ".$id_agente_modulo;
			$result=mysql_query($sql1);
			while ($row=mysql_fetch_array($result)){
				if ($row["dis_max"] > $alert_high)
					$alert_high = $row["dis_max"];
				if ($row["dis_min"] < $alert_low)
					$alert_low = $row["dis_min"];
			}
		}
		$previous=0;
		// Get the first data outsite (to the left---more old) of the interval given
		$sql = "SELECT datos, utimestamp FROM tagente_datos WHERE id_agente = $id_agente AND id_agente_modulo = $id_agente_modulo AND utimestamp < $fechatope AND utimestamp >= $date ORDER BY utimestamp DESC LIMIT 1";
		if ($result = mysql_query($sql)) {
			$row = mysql_fetch_array($result);
			$previous = $row[0];
		}
		
		$sql1="SELECT datos,utimestamp FROM tagente_datos WHERE id_agente = $id_agente AND id_agente_modulo = $id_agente_modulo AND utimestamp >= $fechatope AND utimestamp < $date";
		if ($result = mysql_query($sql1))
		while ($row = mysql_fetch_array ($result)) {
			$datos = $row[0];
			$utimestamp = $row[1];
			for ($j = 0; $j <= $resolution; $j++) {
				if ($utimestamp <= $valores[$j][3] && $utimestamp > $valores[$j][2]) {
					$valores[$j][0]=$valores[$j][0]+$datos;
					$valores[$j][1]++;
					// Init min value
					if ($valores[$j][4] == 0)
						$valores[$j][4] = $datos;
					else {
						// Check min value
						if ($datos < $valores[$j][4])
						$valores[$j][4] = $datos;
					}			
					// Check max value
					if ($datos > $valores[$j][5])
						$valores[$j][5] = $datos;
					break;
				}
			}
		}

		
		// Calculate Average value for $valores[][0]
		for ($j = 0; $j <= $resolution; $j++) {
			if ($valores[$j][1] > 0){
				$real_data[$i][$j] =  $weight_list[$i] * ($valores[$j][0]/$valores[$j][1]);
				$valores[$j][0] = $valores[$j][0]/$valores[$j][1];
			} else {
				$valores[$j][0] = $previous;
				$real_data[$i][$j] = $previous * $weight_list[$i];
				$valores[$j][4] = $previous;
				$valores[$j][5] = $previous;
			}
			// Get max value for all graph
			if ($valores[$j][5] > $max_value ){
				$max_value = $valores[$j][5];
			}
			// This stores in mod_data max values for each module
			if ($mod_data[$i] < $valores[$j][5]){
				$mod_data[$i] = $valores[$j][5];
			}
			// Take prev. value
			// TODO: CHeck if there are more than 24hours between
			// data, if there are > 24h, module down.
			$previous = $valores[$j][0];
		}
	}

	for ($i = 0; $i < $module_number; $i++){
		// Disabled autoadjusment, is not working fine :(
		// $weight_list[$i] = ($max_value / $mod_data[$i]) + ($weight_list[$i]-1);
		if ($weight_list[$i] != 1)
		$module_list_name[$i] .= " (x". format_numeric($weight_list[$i],1).")";
		$module_list_name[$i] = $module_list_name[$i]." (MAX: ".format_numeric($mod_data[$i]).")";
	}

	// Create graph
	// *************
	$Graph =& Image_Graph::factory('graph', array($width, $height));
	// add a TrueType font

	if ($periodo == 86400)
		$title_period = "Last day";
	elseif ($periodo == 604800)
		$title_period = "Last week";
	elseif ($periodo == 3600)
		$title_period = "Last hour";
	elseif ($periodo == 2419200)
		$title_period = "Last month";
	else
		$title_period = "Last ".format_numeric (($periodo / (3600 * 24)), 2)." days";
	
	if ($pure == 0){
		$Font =& $Graph->addNew('font', $config['fontpath']);
		$Font->setSize(7);
		$Graph->setFont($Font);
		$Graph->add(
		Image_Graph::vertical(
			Image_Graph::vertical(
						$Title = Image_Graph::factory('title', array('   Pandora FMS Graph - '. $title_period, 10)),
						$Subtitle = Image_Graph::factory('title', array('     '.$title, 7)),
						90
				),
			Image_Graph::vertical(
				$Plotarea = Image_Graph::factory('plotarea'),
				$Legend = Image_Graph::factory('legend'),
				80
				),
			20)
		);
		$Legend->setPlotarea($Plotarea);
		$Title->setAlignment(IMAGE_GRAPH_ALIGN_LEFT);
		$Subtitle->setAlignment(IMAGE_GRAPH_ALIGN_LEFT);
	} else {
		$Font =& $Graph->addNew('font', $config['fontpath']);
		$Font->setSize(7);
		$Graph->setFont($Font);
		$Graph->add(
			Image_Graph::vertical(
				$Plotarea = Image_Graph::factory('plotarea'),
				$Legend = Image_Graph::factory('legend'),
				85
				)
		);
		$Legend->setPlotarea($Plotarea);
	}
	
	// Create the dataset
	// Merge data into a dataset object (sancho)
	// $Dataset =& Image_Graph::factory('dataset');

	for ($i = 0; $i < $module_number; $i++){
		$dataset[$i] = Image_Graph::factory('dataset');
		$dataset[$i] -> setName($module_list_name[$i]);
	}
	if ($show_event == 1) {
		$dataset_event = Image_Graph::factory('dataset');
		$dataset_event -> setName("Event Fired");
	}
	
	// ... and populated with data ...
	for ($i = 0; $i < $resolution; $i++) {
		$tdate = date('d/m', $valores[$i][2])."\n".date('H:i', $valores[$i][2]);
		for ($j = 0; $j < $module_number; $j++) {
			$dataset[$j]->addPoint($tdate, $real_data[$j][$i]);
			if (($show_event == 1) AND (isset($real_event[$i]))) {
				$dataset_event->addPoint($tdate, $max_value);
			}
		}
	}
	
	if ($max_value <= 0) {
		graphic_error ();
		return;
	}
	// Show events !
	if ($show_event == 1) {
		$Plot =& $Plotarea->addNew('Plot_Impulse', array($dataset_event));
		$Plot->setLineColor( 'black' );
		$Marker_event =& Image_Graph::factory('Image_Graph_Marker_Cross');
		$Plot->setMarker($Marker_event);
		$Marker_event->setFillColor( 'red' );
		$Marker_event->setLineColor( 'red' );
		$Marker_event->setSize ( 5 );
	}
	
	// Show limits (for alert or whathever you want...
	if ($show_alert == 1){
		$Plot =& $Plotarea->addNew('Image_Graph_Axis_Marker_Area', IMAGE_GRAPH_AXIS_Y);
		$Plot->setFillColor( 'blue@0.1' );
		$Plot->setLowerBound( $alert_low);
		$Plot->setUpperBound( $alert_high );
	}
	

	// create the 1st plot as smoothed area chart using the 1st dataset
        if ($stacked == 0) {

                // Non-stacked
                $Plot =& $Plotarea->addNew('area', array(&$dataset));

        } elseif ($stacked == 1) {

                // Stacked (> 2.0)
                $Plot =& $Plotarea->addNew('Image_Graph_Plot_Area', array(&$dataset, 'stacked'));

        } else {

		$color_array[0] = "red";
		$color_array[1] = "blue";
		$color_array[2] = "green";
		$color_array[3] = 'yellow'; // yellow
        	$color_array[4] = '#FF5FDF'; // pink
        	$color_array[5] = 'orange'; // orange
		$color_array[6] = '#FE00DA'; // magenta
		$color_array[7]	= '#00E2FF'; // cyan
		$color_array[8]	= '#000000'; // Black

                // Single lines, new in 2.0 (Jul08)
		for ($i = 0; $i < $module_number; $i++){
	                $Plot =& $Plotarea->addNew('line', array(&$dataset[$i]));
			$Plot->setLineColor($color_array[$i]); 
		}
        }

	// Color management
	if ($stacked != 2){
		$Plot->setLineColor('gray@0.4');
	}
		
	$AxisX =& $Plotarea->getAxis(IMAGE_GRAPH_AXIS_X);
	// $AxisX->Hide();
	$AxisY =& $Plotarea->getAxis(IMAGE_GRAPH_AXIS_Y);
	$AxisY->setLabelOption("showtext",true);
	$AxisY->setLabelInterval(ceil($max_value / 5));
	$AxisY->showLabel(IMAGE_GRAPH_LABEL_ZERO);
	if ($unit_name != "")
		$AxisY->setTitle($unit_name, 'vertical');
	$AxisX->setLabelInterval($resolution / 10);		
	//$AxisY->forceMinimum($minvalue);
	//$AxisY->forceMaximum($max_value+($max_value/12)) ;
	$GridY2 =& $Plotarea->addNew('bar_grid', IMAGE_GRAPH_AXIS_Y_SECONDARY);
	$GridY2->setLineColor('gray');
	$GridY2->setFillColor('lightgray@0.05');
	// set line colors
	$FillArray =& Image_Graph::factory('Image_Graph_Fill_Array');
	$Plot->setFillStyle($FillArray);
	$FillArray->addColor('#BFFF51@0.6'); // Green
	$FillArray->addColor('yellow@0.6'); // yellow
	$FillArray->addColor('#FF5FDF@0.6'); // pink
	$FillArray->addColor('orange@0.6'); // orange
	$FillArray->addColor('#7D8AFF@0.6'); // blue
	$FillArray->addColor('#FF302A@0.6'); // red
	$FillArray->addColor('brown@0.6'); // brown
	$FillArray->addColor('green@0.6');
	$AxisY_Weather =& $Plotarea->getAxis(IMAGE_GRAPH_AXIS_Y);
	$Graph->done();
}

function grafico_modulo_sparse ($id_agente_modulo, $periodo, $show_event,
				$width, $height , $title, $unit_name, $show_alert, $avg_only = 0, $pure = 0, $date = 0) {
	include ("../include/config.php");
	require_once 'Image/Graph.php';	

	if (! $date)
		$date = time ();
	$resolution = $config["graph_res"] * 50; // Number of "slices" we want in graph
	$fechatope = $date - $periodo;

	$horasint = $periodo / $resolution; // Each intervalo is $horasint seconds length
	$nombre_agente = dame_nombre_agente_agentemodulo ($id_agente_modulo);
	$id_agente = dame_agente_id ($nombre_agente);
	$nombre_modulo = dame_nombre_modulo_agentemodulo ($id_agente_modulo);

	if ($show_event) {
		// If we want to show events in graphs
		$sql1 = "SELECT utimestamp FROM tevento WHERE id_agentmodule = $id_agente_modulo AND utimestamp > $fechatope";
		$result = mysql_query($sql1);
		while ($row=mysql_fetch_array($result)) {
			$utimestamp = $row[0];
			for ($i=0; $i <= $resolution; $i++) {
				if ($utimestamp <= $valores[$i][3] && $utimestamp >= $valores[$i][2]) {
					$real_event[$i]=1;
				}
			}
		}
	}

	if ($show_alert) {
		$alert_high = false;
		$alert_low = false;
		// If we want to show alerts limits
		
		$alert_high = get_db_value ('MAX(dis_max)', 'talerta_agente_modulo', 'id_agente_modulo', (int) $id_agente_modulo);
		$alert_low = get_db_value ('MIN(dis_min)', 'talerta_agente_modulo', 'id_agente_modulo', (int) $id_agente_modulo);
		
		// if no valid alert defined to render limits, disable it
		if (($alert_low === false) && ($alert_high === false)) {
			$show_alert = 0;
		}
	}

	// intervalo - This is the number of "rows" we are divided the time
	 // to fill data. more interval, more resolution, and slower.
	// periodo - Gap of time, in seconds. This is now to (now-periodo) secs
	
	// Init tables
	for ($i = 0; $i <= $resolution; $i++) {
		$valores[$i][0] = 0; // SUM of all values for this interval
		$valores[$i][1] = 0; // counter
		$valores[$i][2] = $fechatope + ($horasint * $i); // [2] Top limit for this range
		$valores[$i][3] = $fechatope + ($horasint * ($i + 1)); // [3] Botom limit
		$valores[$i][4] = 0; // MIN
		$valores[$i][5] = 0; // MAX
		$valores[$i][6] = 0; // Event
		
	}
	// Init other general variables
	if ($show_event){
		// If we want to show events in graphs
		$sql = sprintf ('SELECT utimestamp FROM tevento WHERE id_agente = %d AND utimestamp > %d', $id_agente, $fechatope);
		$eventos = get_db_all_rows_sql ($sql);
		foreach ($eventos as $row) {
			$utimestamp = $row[0];
			for ($i = 0; $i <= $resolution; $i++) {
				if ($utimestamp <= $valores[$i][3] && $utimestamp >= $valores[$i][2]) {
					$real_event[$i] = 1;
				}
			}
		}
	}
	// Init other general variables
	$max_value = 0;
	$min_value = 0;

	// Get the first data outsite (to the left---more old) of the interval given
	$sql = sprintf ('SELECT datos, utimestamp FROM tagente_datos 
			WHERE id_agente = %d AND id_agente_modulo = %d 
			AND utimestamp < %d ORDER BY utimestamp DESC LIMIT 1', $id_agente, $id_agente_modulo, $fechatope);
	$previous = (float) get_db_sql ($sql);
	
	$sql = sprintf ('SELECT datos,utimestamp FROM tagente_datos 
			WHERE id_agente = %d AND id_agente_modulo = %d AND utimestamp > %d',
			$id_agente, $id_agente_modulo, $fechatope);
	$result = mysql_query ($sql);
	if (mysql_num_rows ($result) == 0) {
		graphic_error ();
		return;
	}
	while ($row = mysql_fetch_array ($result)) {
		$datos = $row[0];
		$utimestamp = $row[1];
		for ($i = 0; $i <= $resolution; $i++) {
			if ( ($utimestamp <= $valores[$i][3]) && ($utimestamp >= $valores[$i][2]) ){
				$valores[$i][0]=$valores[$i][0]+$datos;
				$valores[$i][1]++;
				// Init min value
				if ($valores[$i][4] == 0)
					$valores[$i][4] = $datos;
				else {
					// Check min value
					if ($datos < $valores[$i][4])
						$valores[$i][4] = $datos;
				}			
				// Check max value
				if ($datos > $valores[$i][5])
						$valores[$i][5] = $datos;
				break;
			}
		}
				
	}
	
	// Calculate Average value for $valores[][0]
	for ($i =0; $i <= $resolution; $i++) {
		if ($valores[$i][1] > 0)
			$valores[$i][0] = $valores[$i][0]/$valores[$i][1];
		else {
			$valores[$i][0] = $previous;
			$valores[$i][4] = $previous;
			$valores[$i][5] = $previous;
		}
		// Get max value for all graph
		if ($valores[$i][5] > $max_value)
			$max_value = $valores[$i][5];
		// Get min value for all graph
		if ($valores[$i][5] < $min_value)
			$min_value = $valores[$i][5];

		// Take prev. value
		// TODO: CHeck if there are more than 24hours between
		// data, if there are > 24h, module down.
		$previous = $valores[$i][0];
	}

	// Create graph
	// *************
	$Graph =& Image_Graph::factory('graph', array($width, $height));
	// add a TrueType font
	$Font =& $Graph->addNew('font', $config['fontpath']);
	$Font->setSize(6);
	$Graph->setFont($Font);

	if ($periodo == 86400)
		$title_period = "Last day";
	elseif ($periodo == 604800)
		$title_period = "Last week";
	elseif ($periodo == 3600)
		$title_period = "Last hour";
	elseif ($periodo == 2419200)
		$title_period = "Last month";
	else
		$title_period = "Last ".format_numeric(($periodo / (3600*24)),2)." days";
	if ($pure == 0){
		$Graph->add(
		Image_Graph::vertical(
			Image_Graph::vertical(
						$Title = Image_Graph::factory('title', array('   Pandora FMS Graph - '.strtoupper($nombre_agente)." - ".$title_period, 10)),
						$Subtitle = Image_Graph::factory('title', array('     '.$title, 7)),
						90
				),
			Image_Graph::horizontal(
				$Plotarea = Image_Graph::factory('plotarea'),
				$Legend = Image_Graph::factory('legend'),
				85
				),
			15)
		);
		$Legend->setPlotarea($Plotarea);
		$Title->setAlignment(IMAGE_GRAPH_ALIGN_LEFT);
		$Subtitle->setAlignment(IMAGE_GRAPH_ALIGN_LEFT);
	} else { // Pure, without title and legends
		$Graph->add($Plotarea = Image_Graph::factory('plotarea'));
	}
	// Create the dataset
	// Merge data into a dataset object (sancho)
	// $Dataset =& Image_Graph::factory('dataset');
	if ($avg_only == 1) {
		$dataset[0] = Image_Graph::factory('dataset');
		$dataset[0]->setName("Avg.");
	} else {
		$dataset[0] = Image_Graph::factory('dataset');
		$dataset[0]->setName("Max.");
		$dataset[1] = Image_Graph::factory('dataset');
		$dataset[1]->setName("Avg.");
		$dataset[2] = Image_Graph::factory('dataset');
		$dataset[2]->setName("Min.");
	}
	// Event dataset creation
	if ($show_event == 1){
		$dataset_event = Image_Graph::factory('dataset');
		$dataset_event -> setName("Event Fired");
	}

	// ... and populated with data ...
	for ($i = 0; $i <= $resolution; $i++) {
		$tdate = date('d/m', $valores[$i][2])."\n".date('H:i', $valores[$i][2]);
		if ($avg_only == 0) {
			$dataset[1]->addPoint($tdate, $valores[$i][0]);
			$dataset[0]->addPoint($tdate, $valores[$i][5]);
			$dataset[2]->addPoint($tdate, $valores[$i][4]);
		} else {
			$dataset[0]->addPoint($tdate, $valores[$i][0]);
		}
		if (($show_event == 1) AND (isset($real_event[$i]))) {
			$dataset_event->addPoint($tdate, $valores[$i][5]);
		}
	}

	if ($max_value != $min_value){
		// Show alert limits 
		if ($show_alert == 1){
			$Plot =& $Plotarea->addNew('Image_Graph_Axis_Marker_Area', IMAGE_GRAPH_AXIS_Y);
			$Plot->setFillColor( 'gray@0.1' );
			$Plot->setLowerBound( $alert_low);
			$Plot->setUpperBound( $alert_high );
		}

		// create the 1st plot as smoothed area chart using the 1st dataset
		$Plot =& $Plotarea->addNew('area', array(&$dataset));
		if ($avg_only == 1){
			$Plot->setLineColor('black@0.1');
		} else {
			$Plot->setLineColor('yellow@0.2');
		}

		$AxisX =& $Plotarea->getAxis(IMAGE_GRAPH_AXIS_X);
		// $AxisX->Hide();
		
		$AxisY =& $Plotarea->getAxis(IMAGE_GRAPH_AXIS_Y);
		$AxisY->setDataPreprocessor(Image_Graph::factory('Image_Graph_DataPreprocessor_Function', 'format_for_graph'));
		$AxisY->setLabelOption("showtext",true);
		$yinterval = $height / 30;


		if (($min_value < 0) AND ($max_value > 0))
			$AxisY->setLabelInterval( -1 * ceil(($min_value - $max_value)/ $yinterval ));
		elseif ($min_value < 0)
			$AxisY->setLabelInterval( -1 * ceil($min_value / $yinterval));
		else
			$AxisY->setLabelInterval(ceil($max_value / $yinterval));

		$AxisY->showLabel(IMAGE_GRAPH_LABEL_ZERO);
		if ($unit_name != ""){
			$AxisY->setTitle($unit_name, 'vertical');		if ($periodo < 10000)
			$xinterval = 8;
		} else
			$xinterval = $resolution / 7 ;
		$AxisX->setLabelInterval($xinterval) ;

		//$AxisY->forceMinimum($minvalue);
		$AxisY->forceMaximum($max_value+($max_value/12)) ;
		$GridY2 =& $Plotarea->addNew('bar_grid', IMAGE_GRAPH_AXIS_Y_SECONDARY);
		$GridY2->setLineColor('gray');
		$GridY2->setFillColor('lightgray@0.05');
		// set line colors
		$FillArray =& Image_Graph::factory('Image_Graph_Fill_Array');

		$Plot->setFillStyle($FillArray);
		if ($avg_only == 1){
			$FillArray->addColor($config["graph_color1"]);
		} else {
			$FillArray->addColor($config["graph_color3"]); 
			$FillArray->addColor($config["graph_color2"]); 
			$FillArray->addColor($config["graph_color1"]);
			

		}
		$AxisY_Weather =& $Plotarea->getAxis(IMAGE_GRAPH_AXIS_Y);

		// Show events !
		if ($show_event == 1){
			$Plot =& $Plotarea->addNew('Plot_Impulse', array($dataset_event));
			$Plot->setLineColor( 'red' );
			$Marker_event =& Image_Graph::factory('Image_Graph_Marker_Cross');
			$Plot->setMarker($Marker_event);
			$Marker_event->setFillColor( 'red' );
			$Marker_event->setLineColor( 'red' );
			$Marker_event->setSize ( 5 );
		}

		$Graph->done();
	} else
		graphic_error ();
}

function generic_pie_graph ($width = 300, $height = 200, $data, $legend) {
	global $config;
	
	if (sizeof($data) == 0) {
		graphic_error ();
		return;
	}
	// create the graph
	$driver=& Image_Canvas::factory('png',array('width'=>$width,'height'=>$height,'antialias' => 'native'));
	$Graph = & Image_Graph::factory('graph', $driver);
	// add a TrueType font
	$Font =& $Graph->addNew('font', $config['fontpath']);
	// set the font size to 7 pixels
	$Font->setSize(7);
	$Graph->setFont($Font);
	// create the plotarea
	$Graph->add(
		Image_Graph::horizontal(
			$Plotarea = Image_Graph::factory('plotarea'),
			$Legend = Image_Graph::factory('legend'),
		50
		)
	);
	$Legend->setPlotarea($Plotarea);
	// Create the dataset
	// Merge data into a dataset object (sancho)
	$Dataset1 =& Image_Graph::factory('dataset');
	for ($i = 0; $i < sizeof($data); $i++) {
		$Dataset1->addPoint(str_pad($legend[$i],15), $data[$i]);
	}
	$Plot =& $Plotarea->addNew('pie', $Dataset1);
	$Plotarea->hideAxis();
	// create a Y data value marker
	$Marker =& $Plot->addNew('Image_Graph_Marker_Value', IMAGE_GRAPH_PCT_Y_TOTAL);
	// create a pin-point marker type
	$PointingMarker =& $Plot->addNew('Image_Graph_Marker_Pointing_Angular', array(1, &$Marker));
	// and use the marker on the 1st plot
	$Plot->setMarker($PointingMarker);
	// format value marker labels as percentage values
	$Marker->setDataPreprocessor(Image_Graph::factory('Image_Graph_DataPreprocessor_Formatted', '%0.1f%%'));
	$Plot->Radius = 15;
	$FillArray =& Image_Graph::factory('Image_Graph_Fill_Array');
	$Plot->setFillStyle($FillArray);
	
	$FillArray->addColor('green@0.7');
	$FillArray->addColor('yellow@0.7');
	$FillArray->addColor('red@0.7');
	$FillArray->addColor('orange@0.7');
	$FillArray->addColor('blue@0.7');
	$FillArray->addColor('purple@0.7');
	$FillArray->addColor('lightgreen@0.7');
	$FillArray->addColor('lightblue@0.7');
	$FillArray->addColor('lightred@0.7');
	$FillArray->addColor('grey@0.6', 'rest');
	$Plot->explode(6);
	$Plot->setStartingAngle(0);
	// output the Graph
	$Graph->done();
}


function graphic_agentmodules($id_agent, $width, $height) {
	global $config;

	$sql1="SELECT * FROM ttipo_modulo";
	$result=mysql_query($sql1);
	$ntipos = 0;
	while ($row=mysql_fetch_array($result)){
		$data_label[$ntipos]=$row["nombre"]; 
		$data[$ntipos]=0;
		$data_id[$ntipos] = $row["id_tipo"];
		$ntipos++;
	}
	$cx=0;
	$sql1="SELECT * FROM tagente_modulo WHERE id_agente = ".$id_agent;
	$result=mysql_query($sql1);
	while ($row=mysql_fetch_array($result)){
		$cx++;
		for ($i = 0; $i <= $ntipos; $i++){
			if (isset($data_id[$i])){
				if ($data_id[$i] == $row["id_tipo_modulo"]) {
					$data[$i]++;
				}
			}
		}		
	}
	$data2 = "";
	$data_label2 = "";
	$mayor = 0;
	$mayor_data =0;
	for ($i = 0; $i < sizeof($data); $i++)
		if ($data[$i] > $mayor_data){
			$mayor = $i;
			$mayor_data = $data[$i];
		}
	$bx=0;
	for ($i=0;$i < sizeof($data_label); $i++){
		if ($data[$i] > 0){
			$data_label2[$bx] = $data_label[$i];
			$data2[$bx] = $data[$i];
			$bx++;
		}
	}
	generic_pie_graph ($width, $height, $data2, $data_label2);

}

function graphic_agentaccess ($id_agent, $periodo, $width, $height) {
	global $config;
	
	$color ="#437722"; // Green pandora 1.1 octopus color
	/*
	$agent_interval = give_agentinterval($id_agent);
	$intervalo = 30 * $config['graph_res']; // Desired interval / range between dates
	$intervalo_real = (86400 / $agent_interval); // 60x60x24 secs
	if ($intervalo_real < $intervalo ) {
		$intervalo = $intervalo_real;
		
	}*/
	$intervalo = 24;
	$fechatope = dame_fecha($periodo);
	$horasint = $periodo / $intervalo;

	// $intervalo now stores "ideal" interval			}
	// interval is the number of rows that will store data. more rows, more resolution

	// Para crear las graficas vamos a crear un array de Ix4 elementos, donde
	// I es el numero de posiciones diferentes en la grafica (30 para un mes, 7 para una semana, etc)
	// y los 4 valores en el ejeY serian los detallados a continuacion:
	// Rellenamos la tabla con un solo select, y los calculos se hacen todos sobre memoria
	// esto acelera el tiempo de calculo al maximo, aunque complica el algoritmo :-)
	
	// Creamos la tabla (array) con los valores para el grafico. Inicializacion
	for ($i = 0; $i <$intervalo; $i++) {
		$valores[$i][0] = 0; // [0] Valor (contador)
		$valores[$i][1] = 0; // [0] Valor (contador)
		$valores[$i][2] = dame_fecha($horasint * $i); // [2] Rango superior de fecha para ese rango
		$valores[$i][3] = dame_fecha($horasint*($i+1)); // [3] Rango inferior de fecha para ese rango
	}
	$sql1="SELECT * FROM tagent_access WHERE id_agent = ".$id_agent." and timestamp > '".$fechatope."'";

	$result=mysql_query($sql1);
	while ($row=mysql_fetch_array($result)){
		for ($i = 0; $i < $intervalo; $i++){
			if (($row["timestamp"] < $valores[$i][2]) and ($row["timestamp"] >= $valores[$i][3]) ){ 
				// entra en esta fila
				$valores[$i][0]++;
			}
		} 
		
	}
	$valor_maximo = 0;
	for ($i = 0; $i < $intervalo; $i++) { // 30 entries in graph, one by day
		$grafica[]=$valores[$i][0];
		if ($valores[$i][0] > $valor_maximo)
			$valor_maximo = $valores[$i][0];
	}

	// Create graph
	// create the graph
	$Graph =& Image_Graph::factory('graph', array($width, $height));
	// add a TrueType font
	$Font =& $Graph->addNew('font', $config['fontpath']);
	$Font->setSize(6);
	$Graph->setFont($Font);
	$Graph->add(
	Image_Graph::vertical(
		Image_Graph::factory('title', array("", 2)),
		$Plotarea = Image_Graph::factory('plotarea'),
		0)
	);
	// Create the dataset
	// Merge data into a dataset object (sancho)
	$Dataset =& Image_Graph::factory('dataset');
	for ($i = 0; $i < sizeof($grafica); $i++) {
		$Dataset->addPoint ($i, $grafica[$i]);
	}
	// create the 1st plot as smoothed area chart using the 1st dataset
	$Plot =& $Plotarea->addNew('area', array(&$Dataset));
	// set a line color
	$Plot->setLineColor('green');
	// set a standard fill style
	$Plot->setFillColor('green@0.5');
	// $Plotarea->hideAxis();
	$AxisX =& $Plotarea->getAxis(IMAGE_GRAPH_AXIS_X);
	// $AxisX->Hide();

	$AxisY =& $Plotarea->getAxis(IMAGE_GRAPH_AXIS_Y);
	$AxisY->setLabelOption("showtext",true);
	$AxisY->setLabelInterval($valor_maximo / 2);
	
	$AxisX->setLabelInterval($intervalo / 5);

	$GridY2 =& $Plotarea->addNew('bar_grid', IMAGE_GRAPH_AXIS_Y_SECONDARY);
	$GridY2->setLineColor('green');
	$GridY2->setFillColor('green@0.2');
	$AxisY2 =& $Plotarea->getAxis(IMAGE_GRAPH_AXIS_Y_SECONDARY);
	$Graph->done();
}

function graphic_string_data ($id_agent_module, $periodo, $width, $height, $pure = 0, $date = "") {
	global $config;
	
	// $color = $config["color_graph1"]; //#437722"; // Green pandora 1.1 octopus color
	$color = "#437722";


	if ($date == "")
		$date = time ();
	$resolution = $config["graph_res"] * 5; // Number of "slices" we want in graph
	$fechatope = $date - $periodo;
	$horasint = $periodo / $resolution; // Each intervalo is $horasint seconds length


	// Creamos la tabla (array) con los valores para el grafico. Inicializacion
	for ($i = 0; $i <$resolution; $i++) {
		$valores[$i][0] = 0; // [0] Valor (contador)
		$valores[$i][1] = dame_fecha_grafico_timestamp ($fechatope + ($horasint * $i));
		$valores[$i][2] = $fechatope + ($horasint * $i); // [2] Top limit for this range
		$valores[$i][3] = $fechatope + ($horasint * ($i + 1)); // [3] Botom limit
	}
	$sql1="SELECT utimestamp FROM tagente_datos_string WHERE id_agente_modulo = ".$id_agent_module." and utimestamp > '".$fechatope."'";

	$result=mysql_query($sql1);
	while ($row=mysql_fetch_array($result)){
		for ($i = 0; $i < $resolution; $i++){
			if (($row[0] < $valores[$i][3]) and ($row[0] >= $valores[$i][2]) ){ 
				// entra en esta fila
				$valores[$i][0]++;
			}
		} 
		
	}
	$valor_maximo = 0;
	for ($i = 0; $i < $resolution; $i++) { // 30 entries in graph, one by day
//echo $valores[$i][2]. " - ". $valores[$i][3] ." | ". $valores[$i][1]." - ".$valores[$i][0];
//echo "<br>";
		$grafica[]=$valores[$i][0];
		if ($valores[$i][0] > $valor_maximo)
			$valor_maximo = $valores[$i][0];
	}

	if ($valor_maximo <= 0) {
		graphic_error ();
		return;
	}

	$nombre_agente = dame_nombre_agente_agentemodulo ($id_agent_module);
	$id_agente = dame_agente_id ($nombre_agente);
	$nombre_modulo = dame_nombre_modulo_agentemodulo ($id_agent_module);

	if ($pure == 0) {
		$Graph =& Image_Graph::factory('graph', array($width, $height));
		// add a TrueType font
		$Font =& $Graph->addNew('font', $config['fontpath']);
		$Font->setSize(7);
		$Graph->setFont($Font);

		$Graph->add(
		Image_Graph::vertical(
			Image_Graph::vertical(
						$Title = Image_Graph::factory('title', array('   Pandora FMS Graph - '.strtoupper($nombre_agente)." - ".give_human_time ($periodo), 10)),
						$Subtitle = Image_Graph::factory('title', array('     '.__('Data occurrence for module ').$nombre_modulo, 7)),
						90
				),
			Image_Graph::horizontal(
				$Plotarea = Image_Graph::factory('plotarea'),
				$Legend = Image_Graph::factory('legend'),
				100
				),
			15)
		);
		$Legend->setPlotarea($Plotarea);
		$Title->setAlignment(IMAGE_GRAPH_ALIGN_LEFT);
		$Subtitle->setAlignment(IMAGE_GRAPH_ALIGN_LEFT);


	} else { // Pure, without title and legends
		$Graph->add($Plotarea = Image_Graph::factory('plotarea'));
	}

	//$Legend->setPlotarea($Plotarea);
	// Create the dataset
	// Merge data into a dataset object (sancho)
	$Dataset1 =& Image_Graph::factory('dataset');
	for ($i = 0; $i < $resolution; $i++) {
		$Dataset1->addPoint($valores[$i][1], $valores[$i][0]);
	}
	$Plot =& $Plotarea->addNew('bar', $Dataset1);
	$GridY2 =& $Plotarea->addNew('bar_grid', IMAGE_GRAPH_AXIS_Y_SECONDARY);
	$GridY2->setLineColor('gray');
	$GridY2->setFillColor('lightgray@0.05');
	$Plot->setLineColor('gray');
	$Plot->setFillColor($color."@0.70");
	$AxisX =& $Plotarea->getAxis(IMAGE_GRAPH_AXIS_X);
	$AxisY =& $Plotarea->getAxis(IMAGE_GRAPH_AXIS_Y);
	$AxisY->setLabelInterval($valor_maximo / 2);
	$AxisX->setLabelInterval($resolution / 5);
	$Graph->done(); 
}


function grafico_incidente_estados() {
	$data = array(0,0,0,0);
	// 0 - Abierta / Sin notas
	// 2 - Descartada
	// 3 - Caducada 
	// 13 - Cerrada
	$sql1="SELECT * FROM tincidencia";
	$result=mysql_query($sql1);
	while ($row=mysql_fetch_array($result)){
		if ($row["estado"] == 0)
			$data[0]=$data[0]+1;
		if ($row["estado"] == 2)
			$data[1]=$data[1]+1;
		if ($row["estado"] == 3)
			$data[2]=$data[2]+1;
		if ($row["estado"] == 13)
			$data[3]=$data[3]+1;
	}
	$mayor = 0;
	$mayor_data =0;
	for ($i = 0; $i < sizeof($data); $i++) {
		if ($data[$i] > $mayor_data) {
			$mayor = $i;
			$mayor_data = $data[$i];
		}
	}
	$legend = array ("Open Incident", "Closed Incident", "Outdated", "Invalid");
	generic_pie_graph (370, 180,$data, $legend);
}

function grafico_incidente_prioridad () {
	$data = array (0, 0, 0, 0, 0, 0);
	// 0 - Abierta / Sin notas
	// 2 - Descartada
	// 3 - Caducada 
	// 13 - Cerrada
	$sql = "SELECT * FROM tincidencia";
	$result = mysql_query ($sql);
	while ($row = mysql_fetch_array ($result)){
		if ($row["prioridad"] < 10)
			$data[$row["prioridad"]] += 1;
		else
			$data[5] += 1;
	}
		
	$mayor = 0;
	$mayor_data =0;
	for ($i = 0;$i < sizeof($data); $i++)
		if ($data[$i] > $mayor_data){
				$mayor = $i;
				$mayor_data = $data[$i];
		}
	$legend = array (__('Informative'),
			__('Low'),
			__('Medium'),
			__('Serious'),
			__('Very serious'),
			__('Maintance'));
	generic_pie_graph (320, 200, $data, $legend);
}

function graphic_incident_group () {
	$data = array();
	$legend = array();
	$sql = "SELECT distinct id_grupo FROM tincidencia ";
	$result = mysql_query ($sql);
	while ($row = mysql_fetch_array($result)) {
			$sql="SELECT COUNT(id_incidencia) FROM tincidencia WHERE id_grupo = ".$row[0];
			$result2=mysql_query ($sql);
			$row2 = mysql_fetch_array($result2);
			$data[] = $row2[0];
			$legend[] = dame_nombre_grupo($row[0])."(".$row2[0].")";
	}
	// Sort array by bubble method (yes, I study more methods in university, but if you want more speed, please, submit a patch :)
	// or much better, pay me to do a special version for you, highly optimized :-))))
	for ($i = 0; $i < sizeof($data); $i++) {
			for ($j = $i; $j <sizeof($data); $j++)
			if ($data[$j] > $data[$i]) {
					$temp = $data[$i];
					$temp_label = $legend[$i];
					$data[$i] = $data[$j];
					$legend[$i] = $legend[$j];
					$data[$j] = $temp;
					$legend[$j] = $temp_label;
			}
	}
	$mayor = 0;
	$mayor_data =0;
	for ($i = 0; $i < sizeof($data); $i++) {
		if ($data[$i] > $mayor_data) {
				$mayor = $i;
				$mayor_data = $data[$i];
		}
	}
	generic_pie_graph (320, 200, $data, $legend);
}

function graphic_incident_user() {
	$data = array();
	$legend = array();
	$sql1="SELECT distinct id_usuario FROM tincidencia ";
	$result=mysql_query($sql1);
	while ($row=mysql_fetch_array($result)){
		$sql1="SELECT COUNT(id_incidencia) FROM tincidencia WHERE id_usuario = '".$row[0]."'";
		$result2=mysql_query($sql1);
		$row2=mysql_fetch_array($result2);
		$data[] = $row2[0];
		$legend[] = $row[0]."(".$row2[0].")";
	}
	// Sort array by bubble method (yes, I study more methods in university, but if you want more speed, please, submit a patch :)
	// or much better, pay me to do a special version for you, highly optimized :-))))
	for ($i = 0; $i < sizeof($data); $i++) {
			for ($j = $i; $j <sizeof($data); $j++)
			if ($data[$j] > $data[$i]) {
					$temp = $data[$i];
					$temp_label = $legend[$i];
					$data[$i] = $data[$j];
					$legend[$i] = $legend[$j];
					$data[$j] = $temp;
					$legend[$j] = $temp_label;
			}
	}
	$mayor = 0;
	$mayor_data =0;
	for ($i = 0; $i < sizeof($data); $i++) {
			if ($data[$i] > $mayor_data) {
					$mayor = $i;
					$mayor_data = $data[$i];
			}
	}
	generic_pie_graph (320, 200, $data, $legend);
}

function graphic_user_activity ($width = 350, $height = 230) {
	$data = array();
	$legend = array();
	$sql1="SELECT DISTINCT ID_usuario FROM tsesion ";
	$result=mysql_query($sql1);
	while ($row=mysql_fetch_array($result)){
		$entrada= entrada_limpia($row[0]);
		$sql1='SELECT COUNT(ID_usuario) FROM tsesion WHERE ID_usuario = "'.$entrada.'"';
		$result2=mysql_query($sql1);
		$row2=mysql_fetch_array($result2);
		$data[] = $row2[0];
		$legend[] = str_pad(substr($row[0],0,16)."(".format_for_graph($row2[0],0).")", 15);
	}

	// Sort array by bubble method (yes, I study more methods in university, but if you want more speed, please, submit a patch :)
	// or much better, pay me to do a special version for you, highly optimized :-))))
	for ($i = 0; $i < sizeof($data); $i++) {
		for ($j = $i; $j <sizeof($data); $j++)
		if ($data[$j] > $data[$i]) {
			$temp = $data[$i];
			$temp_label = $legend[$i];
			$data[$i] = $data[$j];
			$legend[$i] = $legend[$j];
			$data[$j] = $temp;
			$legend[$j] = $temp_label;
		}
	}

	// Take only the first 5 items
	if (sizeof($data) >= 5){
		for ($i = 0; $i < 5; $i++) {
			$legend2[]= $legend[$i];
			$data2[] = $data[$i];
		}
	 	generic_pie_graph ($width, $height, $data2, $legend2);
	} else
	 	generic_pie_graph ($width, $height, $data, $legend);
}

function graphic_incident_source ($width=320, $height=200) {
	$data = array();
	$legend = array();
	$sql1="SELECT DISTINCT origen FROM tincidencia";
	$result=mysql_query($sql1);
	while ($row=mysql_fetch_array($result)){
			$sql1="SELECT COUNT(id_incidencia) FROM tincidencia WHERE origen = '".$row[0]."'";
			$result2=mysql_query($sql1);
			$row2=mysql_fetch_array($result2);
			$data[] = $row2[0];
			$legend[] = $row[0]."(".$row2[0].")";
	}
// Sort array by bubble method (yes, I study more methods in university, but if you want more speed, please, submit a patch :)
	// or much better, pay me to do a special version for you, highly optimized :-))))
	for ($i = 0; $i < sizeof($data); $i++) {
			for ($j = $i; $j <sizeof($data); $j++)
			if ($data[$j] > $data[$i]) {
					$temp = $data[$i];
					$temp_label = $legend[$i];
					$data[$i] = $data[$j];
					$legend[$i] = $legend[$j];
					$data[$j] = $temp;
					$legend[$j] = $temp_label;
			}
	}
	// Take only the first 5 items
	if (sizeof($data) >= 5){
		for ($i = 0; $i < 5; $i++) {
			$legend2[]= $legend[$i];
			$data2[] = $data[$i];
		}
	 	generic_pie_graph ($width, $height, $data2, $legend2);
	} else
	 	generic_pie_graph ($width, $height, $data, $legend);
}

function grafico_db_agentes_modulos($width, $height) {
	$data = array();
	$legend = array();
	$sql1="SELECT * FROM tagente";
	$result=mysql_query($sql1);
	while ($row=mysql_fetch_array($result)){
		$sql1="SELECT COUNT(id_agente_modulo) FROM tagente_modulo WHERE id_agente = ".$row["id_agente"];;
		$result2=mysql_query($sql1);
		$row2=mysql_fetch_array($result2);
		$data[] = $row2[0];
		$legend[] = $row["nombre"];
	}
	// Sort array by bubble method (yes, I study more methods in university, but if you want more speed, please, submit a patch :)
	// or much better, pay me to do a special version for you, highly optimized :-))))
	for ($i = 0; $i < sizeof($data); $i++) {
		for ($j = $i; $j <sizeof($data); $j++)
		if ($data[$j] > $data[$i]) {
				$temp = $data[$i];
				$temp_label = $legend[$i];
				$data[$i] = $data[$j];
				$legend[$i] = $legend[$j];
				$data[$j] = $temp;
				$legend[$j] = $temp_label;
		}
	}
	generic_bar_graph ($width, $height, $data, $legend);
}

function grafico_eventos_usuario( $width=420, $height=200) {
	$data = array();
	$legend = array();
	$sql1="SELECT * FROM tusuario";
	$result=mysql_query($sql1);
	while ($row=mysql_fetch_array($result)){
		$sql1="SELECT COUNT(id_evento) FROM tevento WHERE id_usuario = '".$row["id_usuario"]."'";
		$result2=mysql_query($sql1);
		$row2=mysql_fetch_array($result2);
		if ($row2[0] > 0){
			$data[] = $row2[0];
			$legend[] = $row["id_usuario"]." ( $row2[0] )";
		}
	}
	// Sort array by bubble method (yes, I study more methods in university, but if you want more speed, please, submit a patch :)
	// or much better, pay me to do a special version for you, highly optimized :-))))
	for ($i = 0; $i < sizeof($data); $i++) {
			for ($j = $i; $j <sizeof($data); $j++)
			if ($data[$j] > $data[$i]) {
					$temp = $data[$i];
					$temp_label = $legend[$i];
					$data[$i] = $data[$j];
					$legend[$i] = $legend[$j];
					$data[$j] = $temp;
					$legend[$j] = $temp_label;
			}
	}
	// Take only the first 5 items
	if (sizeof($data) >= 5){
		for ($i = 0; $i < 5; $i++) {
			$legend2[]= $legend[$i];
			$data2[] = $data[$i];
		}
	 	generic_pie_graph ($width, $height, $data2, $legend2);
	} else
	 	generic_pie_graph ($width, $height, $data, $legend);
}

function grafico_eventos_total ($filter = "") {
	$filter = str_replace  ( "\\" , "", $filter);
	$data = array();
	$legend = array();
	$total = 0;
	
	$sql1="SELECT COUNT(id_evento) FROM tevento WHERE criticity = 0 $filter";
	$result=mysql_query($sql1);
	$row=mysql_fetch_array($result);
	$data[] = $row[0];
	$legend[] = __('Maintenance')." ( $row[0] )";
	$total = $row[0];
	
	$sql1="SELECT COUNT(id_evento) FROM tevento WHERE criticity = 1 $filter";
	$result=mysql_query($sql1);
	$row=mysql_fetch_array($result);
	$data[] = $row[0];
	$total = $total + $row[0];
	$legend[] = __('Informational')."( $row[0] )";

	$sql1="SELECT COUNT(id_evento) FROM tevento WHERE criticity = 2 $filter";
	$result=mysql_query($sql1);
	$row=mysql_fetch_array($result);
	$data[] = $row[0];
	$total = $total + $row[0];
	$legend[] = __('Normal')." ( $row[0] )";

	$sql1="SELECT COUNT(id_evento) FROM tevento WHERE criticity = 3 $filter";
	$result=mysql_query($sql1);
	$row=mysql_fetch_array($result);
	$data[] = $row[0];
	$total = $total + $row[0];
	$legend[] = __('Warning')." ( $row[0] )";

	$sql1="SELECT COUNT(id_evento) FROM tevento WHERE criticity = 4 $filter";
	$result=mysql_query($sql1);
	$row=mysql_fetch_array($result);
	$data[] = $row[0];
	$total = $total + $row[0];
	$legend[] = __('Critical')." ( $row[0] )";

	// Sort array by bubble method (yes, I study more methods in university, but if you want more speed, please, submit a patch :)
	// or much better, pay me to do a special version for you, highly optimized :-))))
	for ($i = 0; $i < sizeof($data); $i++) {
			for ($j = $i; $j <sizeof($data); $j++)
			if ($data[$j] > $data[$i]){
					$temp = $data[$i];
					$temp_label = $legend[$i];
					$data[$i] = $data[$j];
					$legend[$i] = $legend[$j];
					$data[$j] = $temp;
					$legend[$j] = $temp_label;
			}
	}
	generic_pie_graph (320, 200, $data, $legend);
}

function graph_event_module ($width = 300, $height = 200, $id_agent) {
        global $config;

        $data = array();
        $legend = array();

        $sql = "SELECT DISTINCT(id_agentmodule) AS id_agentmodule, id_grupo, COUNT(id_agentmodule) AS count FROM tevento WHERE id_agente = ".$id_agent." GROUP BY id_agentmodule";
        $result = get_db_all_rows_sql ($sql);
        if ($result === false)
                $result = array();

        foreach ($result as $row) {
                if (give_acl ($config["id_user"], $row["id_grupo"], "AR") == 1) {
                        $data[] = $row["count"];
                        if ($row["id_agentmodule"] == 0) {
                                //System event
                                $legend[] = "SYSTEM (".$row["count"].")";
                        } else {
                                //Other events
                                $legend[] = substr (dame_nombre_modulo_agentemodulo ($row["id_agentmodule"]), 0, 15)." (".$row["count"].")";
                        }
                }
        }

        array_multisort ($legend, $data);

        $max_items = 6; //Maximum items on the piegraph
        while (count($data) > $max_items) {
                //Pops an element off the array until the array is small enough
                array_pop ($data);
        }

        generic_pie_graph ($width, $height, $data, $legend);	

}


function grafico_eventos_grupo ($width = 300, $height = 200, $url = "") {
	global $config;
	
	$url = rawurldecode ($url); //It was urlencoded, so we urldecode it
	$data = array();
	$legend = array();
	
	//This will give the distinct id_agente, give the id_grupo that goes
	//with it and then the number of times it occured. GROUP BY statement
	//is required if both DISTINCT() and COUNT() are in the statement 
	$sql = "SELECT DISTINCT(id_agente) AS id_agente, id_grupo, COUNT(id_agente) AS count FROM tevento WHERE 1=1 ".$url." GROUP BY id_agente"; 
	$result = get_db_all_rows_sql ($sql);
	if ($result === false)
		$result = array();

	foreach ($result as $row) {
		if (give_acl ($config["id_user"], $row["id_grupo"], "AR") == 1) {
			$data[] = $row["count"];
			if ($row["id_agente"] == 0) {
				//System event
				$legend[] = "SYSTEM (".$row["count"].")";
			} else {
				//Other events
				$legend[] = substr (dame_nombre_agente ($row["id_agente"]), 0, 15)." (".$row["count"].")";
			}
		}
	}
	
	array_multisort ($legend, $data);
	
	$max_items = 6; //Maximum items on the piegraph
	while (count($data) > $max_items) {
		//Pops an element off the array until the array is small enough
		array_pop ($data);
	}
	
	generic_pie_graph ($width, $height, $data, $legend);
}


function generic_bar_graph ( $width =380, $height = 200, $data, $legend) {
	global $config;
	
	if (sizeof($data) > 10){
		$height = sizeof($legend) * 20;
	}

	// create the graph
	$Graph =& Image_Graph::factory('graph', array($width, $height));
	// add a TrueType font
	$Font =& $Graph->addNew('font', $config['fontpath']);
	$Font->setSize(9);
	$Graph->setFont($Font);
	$Graph->add(
		Image_Graph::vertical (
			$Plotarea = Image_Graph::factory('plotarea',array('category', 'axis', 'horizontal')),
			$Legend = Image_Graph::factory('legend'),
			100
		)
	);
	
	$Legend->setPlotarea($Plotarea);
	// Create the dataset
	// Merge data into a dataset object (sancho)
	$Dataset1 =& Image_Graph::factory('dataset');
	for ($i = 0; $i < sizeof($data); $i++) {
		$Dataset1->addPoint(substr($legend[$i], 0, 22), $data[$i]);
	}
	$Plot =& $Plotarea->addNew('bar', $Dataset1);
	$GridY2 =& $Plotarea->addNew('bar_grid', IMAGE_GRAPH_AXIS_Y_SECONDARY);
	$GridY2->setLineColor('gray');
	$GridY2->setFillColor('lightgray@0.05');
	$Plot->setLineColor('gray');
	$Plot->setFillColor('blue@0.85');
	$Graph->done(); 
}

function grafico_db_agentes_paquetes ($width = 380, $height = 300) {
	$data = array();
	$legend = array();
	$sql1="SELECT distinct (id_agente) FROM tagente_datos";
	$result=mysql_query($sql1);
	while ($row=mysql_fetch_array($result)){
		if (! is_null($row["id_agente"])){
			$sql1="SELECT COUNT(id_agente) FROM tagente_datos WHERE id_agente = ".$row["id_agente"];
			$result3=mysql_query($sql1);
			if ($row3=mysql_fetch_array($result3)){
				$agent_name = dame_nombre_agente($row[0]);
				if ($agent_name != ""){
					$data[]= $row3[0];
					$legend[] = str_pad($agent_name,15);
				}
			}
		}
	}
	// Sort array by bubble method (yes, I study more methods in university, but if you want more speed, please, submit a patch :)
	// or much better, pay me to do a special version for you, highly optimized :-))))
	for ($i=0;$i < sizeof($data);$i++){
		for ($j=$i; $j <sizeof($data); $j++)
		if ($data[$j] > $data[$i]){
				$temp = $data[$i];
				$temp_label = $legend[$i];
				$data[$i] = $data[$j];
				$legend[$i] = $legend[$j];
				$data[$j] = $temp;
				$legend[$j] = $temp_label;
		}
	}
	generic_bar_graph ($width, $height, $data, $legend);
}

function grafico_db_agentes_purge ($id_agent, $width, $height) {
	if ($id_agent == 0)
		$id_agent = -1;
	// All data (now)
	$purge_all=date("Y-m-d H:i:s",time());
	
	$data = array();
	$legend = array();
	
	$d90 = time()-(2592000*3);
	$d30 = time()-2592000;
	$d7 = time()-604800;
	$d1 = time()-86400;
	$fechas = array($d90, $d30, $d7, $d1);
	$fechas_label = array("30-90 days","7-30 days","This week","Today");

	// Calc. total packets
	$sql1 = "SELECT COUNT(id_agente_datos) FROM tagente_datos";
	$result2 = mysql_query ($sql1);
	$row2 = mysql_fetch_array ($result2);
	$total = $row2[0];
	
	for ($i = 0; $i < sizeof ($fechas); $i++){
	// 4 x intervals will be enought, increase if your database is very very fast :)
		if ($i == 3) {
			if ($id_agent == -1)
				$sql1="SELECT COUNT(id_agente_datos) FROM tagente_datos WHERE utimestamp >= ".$fechas[$i];
			else
				$sql1="SELECT COUNT(id_agente_datos) FROM tagente_datos WHERE id_agente = $id_agent AND utimestamp >= ".$fechas[$i];
		} else {
			if ($id_agent == -1)
				$sql1="SELECT COUNT(id_agente_datos) FROM tagente_datos WHERE utimestamp >= ".$fechas[$i]." AND utimestamp < ".$fechas[$i+1];
			else
				$sql1="SELECT COUNT(id_agente_datos) FROM tagente_datos WHERE id_agente = $id_agent AND utimestamp >= ".$fechas[$i]." AND utimestamp < ".$fechas[$i+1];
		}
		$result=mysql_query($sql1);
		$row=mysql_fetch_array($result);
		$data[] =  $row[0];
		$legend[]=$fechas_label[$i]." ( ".format_for_graph($row[0],0)." )";
	}
	generic_pie_graph ($width, $height, $data, $legend);
}

function drawWarning($width,$height) {
	global $config;
	
	if ($width == 0) {
		$width = 50;
	}
	if ($height == 0) {
		$height = 30;
	}
	
	
	$image = imagecreate($width,$height);
	//colors
	$back = ImageColorAllocate($image,255,255,255);
	$border = ImageColorAllocate($image,0,0,0);
	$red = ImageColorAllocate($image,255,60,75);
	$fill = ImageColorAllocate($image,44,81,150);

	ImageFilledRectangle($image,0,0,$width-1,$height-1,$back);
	ImageRectangle($image,0,0,$width-1,$height-1,$border);
	ImageTTFText($image, 8, 0, ($width/2)-($width/10), ($height/2)+($height/5), $border, $config['fontpath'], __('no data'));
	imagePNG($image);
	imagedestroy($image);
}


// ***************************************************************************
// Draw a dynamic progress bar using GDlib directly
// ***************************************************************************

function progress_bar ($progress, $width, $height, $mode = 1) {
	// Copied from the PHP manual:
	// http://us3.php.net/manual/en/function.imagefilledrectangle.php
	// With some adds from sdonie at lgc dot com
	// Get from official documentation PHP.net website. Thanks guys :-)
	function drawRating($rating, $width, $height, $mode) {
		global $config;
		
		$rating = format_numeric($rating,1);
		if ($width == 0) {
			$width = 150;
		}
		if ($height == 0) {
			$height = 20;
		}

		//$rating = $_GET['rating'];
		$ratingbar = (($rating/100)*$width)-2;

		$image = imagecreate($width,$height);
		//colors
		$back = ImageColorAllocate($image,255,255,255);
		$border = ImageColorAllocate($image,140,140,140);
		$textcolor = ImageColorAllocate($image,60,60,60);
		$red = ImageColorAllocate($image,255,60,75);

		if ($mode == 0){
			if ($rating > 70) 
				$fill = ImageColorAllocate($image,176,255,84); // Green
			elseif ($rating > 50)
				$fill = ImageColorAllocate($image,255,230,84); // Yellow
			elseif ($rating > 30)
				$fill = ImageColorAllocate($image,255,154,83); // Orange
			else
				$fill = ImageColorAllocate($image,255,0,0); // Red
		}
		else
			$fill = ImageColorAllocate($image,44,81,150);


		$grey = ImageColorAllocate($image,230,230,210);

		if ($mode == 1){
			ImageFilledRectangle($image,0,0,$width-1,$height-1,$back);
		} else {
			ImageFilledRectangle($image,0,0,$width-1,$height-1,$grey);
		}
		if ($rating > 100)
			ImageFilledRectangle($image,1,1,$ratingbar,$height-1,$red);
		else
			ImageFilledRectangle($image,1,1,$ratingbar,$height-1,$fill);
		if ($mode == 1){
			ImageRectangle($image,0,0,$width-1,$height-1,$border);
		}
		if ($mode == 1){
			if ($rating > 50)
				if ($rating > 100)
					ImageTTFText($image, 8, 0, ($width/4), ($height/2)+($height/5), $back, $config["fontpath"], __('Out of limits'));
				else
					ImageTTFText($image, 8, 0, ($width/2)-($width/10), ($height/2)+($height/5), $back, $config["fontpath"], $rating."%");
			else
				ImageTTFText($image, 8, 0, ($width/2)-($width/10), ($height/2)+($height/5), $textcolor, $config["fontpath"], $rating."%");
		}
		imagePNG($image);
		imagedestroy($image);
	}
	Header("Content-type: image/png");
	if ($progress > 100 || $progress < 0){
		// HACK: This report a static image... will increase render in about 200% :-) useful for
		// high number of realtime statusbar images creation (in main all agents view, for example
		$imgPng = imageCreateFromPng("../images/outof.png");
		imageAlphaBlending($imgPng, true);
		imageSaveAlpha($imgPng, true);
		imagePng($imgPng); 
	} else 
		drawRating($progress,$width,$height,$mode);
}

function odo_tactic ($value1, $value2, $value3) {
	global $config;
	
	// create the graph
	$driver=& Image_Canvas::factory('png',array('width'=>350,'height'=>260,'antialias' => 'driver'));
	$Graph = & Image_Graph::factory('graph', $driver);
	// add a TrueType font
	$Font =& $Graph->addNew('font', $config['fontpath']);
	// set the font size to 11 pixels
	$Font->setSize(8);
	$Graph->setFont($Font);

	// create the plotarea
	$Graph->add(
			Image_Graph::vertical(
				$Plotarea = Image_Graph::factory('plotarea'),
				$Legend = Image_Graph::factory('legend'),
				80
			)
	);

	$Legend->setPlotarea($Plotarea);
	$Legend->setAlignment(IMAGE_GRAPH_ALIGN_HORIZONTAL);
	if ($value1 <0)
		$value1=0;
	if ($value2 <0)
		$value2=0;
	if ($value3 <0)
		$value3=0;
	/***************************Arrows************************/
	$Arrows = & Image_Graph::factory('dataset');
	$Arrows->addPoint('Global Health', $value1, 'GLOBAL');
	$Arrows->addPoint('Data Health', $value2, 'DATA');
	$Arrows->addPoint('Monitor Health', $value3, 'MONITOR');

	/**************************PARAMATERS for PLOT*******************/

	// create the plot as odo chart using the dataset
	$Plot =& $Plotarea->addNew('Image_Graph_Plot_Odo',$Arrows);
	$Plot->setRange(0, 100);
	$Plot->setAngles(180, 180);
	$Plot->setRadiusWidth(90);
	$Plot->setLineColor('gray');//for range and outline

	$Marker =& $Plot->addNew('Image_Graph_Marker_Value', IMAGE_GRAPH_VALUE_Y);
	$Plot->setArrowMarker($Marker);

	$Plotarea->hideAxis();
	/***************************Axis************************/
	// create a Y data value marker

	$Marker->setFillColor('transparent');
	$Marker->setBorderColor('transparent');
	$Marker->setFontSize(7);
	$Marker->setFontColor('black');

	// create a pin-point marker type
	$Plot->setTickLength(14);
	$Plot->setAxisTicks(5);
	/********************************color of arrows*************/
	$FillArray = & Image_Graph::factory('Image_Graph_Fill_Array');
	$FillArray->addColor('red@0.8', 'GLOBAL');
	$FillArray->addColor('black.6', 'DATA');
	$FillArray->addColor('blue@0.6', 'MONITOR');

	// create a line array
	$LineArray =& Image_Graph::factory('Image_Graph_Line_Array');
	$LineArray->addColor('red', 'GLOBAL');
	$LineArray->addColor('black', 'DATA');
	$LineArray->addColor('blue', 'MONITOR');
	$Plot->setArrowLineStyle($LineArray);
	$Plot->setArrowFillStyle($FillArray);

	/***************************MARKER OR ARROW************************/
	// create a Y data value marker
	$Marker =& $Plot->addNew('Image_Graph_Marker_Value', IMAGE_GRAPH_VALUE_Y);
	$Marker->setFillColor('white');
	$Marker->setBorderColor('white');
	$Marker->setFontSize(7);
	$Marker->setFontColor('black');
	// create a pin-point marker type
	$PointingMarker =& $Plot->addNew('Image_Graph_Marker_Pointing_Angular', array(20, &$Marker));
	// and use the marker on the plot
	$Plot->setMarker($PointingMarker);
	/**************************RANGE*******************/
	$Plot->addRangeMarker(0, 30);
	$Plot->addRangeMarker(30, 70);
	$Plot->addRangeMarker(70, 100);
	// create a fillstyle for the ranges
	$FillRangeArray = & Image_Graph::factory('Image_Graph_Fill_Array');
	$FillRangeArray->addColor('red@0.8');
	$FillRangeArray->addColor('yellow@0.8');
	$FillRangeArray->addColor('green@0.8');
	$Plot->setRangeMarkerFillStyle($FillRangeArray);
	// output the Graph
	$Graph->done();
}

function grafico_modulo_boolean ( $id_agente_modulo, $periodo, $show_event,
				 $width, $height , $title, $unit_name, $show_alert, $avg_only = 0, $pure=0 ) {
	
	global $config;

	$resolution = $config['graph_res'] * 50; // Number of "slices" we want in graph
	
	//$unix_timestamp = strtotime($mysql_timestamp) // Convert MYSQL format tio utime
	$fechatope = time() - $periodo; // limit date
	$horasint = $periodo / $resolution; // Each intervalo is $horasint seconds length
	$nombre_agente = dame_nombre_agente_agentemodulo($id_agente_modulo);
	$id_agente = dame_agente_id($nombre_agente);
	$nombre_modulo = dame_nombre_modulo_agentemodulo($id_agente_modulo);

	if ($show_event == 1)
		$real_event = array();

	if ($show_alert == 1){
		$alert_high = 0;
		$alert_low = 10000000;
		// If we want to show alerts limits
		$sql1="SELECT * FROM talerta_agente_modulo where id_agente_modulo = ".$id_agente_modulo;
		$result=mysql_query($sql1);
		while ($row=mysql_fetch_array($result)){
			if ($row["dis_max"] > $alert_high)
				$alert_high = $row["dis_max"];
			if ($row["dis_min"] < $alert_low)
				$alert_low = $row["dis_min"];
		}
		// if no valid alert defined to render limits, disable it
		if (($alert_low == 10000000) && ($alert_high == 0)){
			$show_alert = 0;
		}
	}

	// intervalo - This is the number of "rows" we are divided the time
	 // to fill data. more interval, more resolution, and slower.
	// periodo - Gap of time, in seconds. This is now to (now-periodo) secs
	
	// Init tables
	for ($i = 0; $i <= $resolution; $i++) {
		$valores[$i][0] = 0; // SUM of all values for this interval
		$valores[$i][1] = 0; // counter
		$valores[$i][2] = $fechatope + ($horasint * $i); // [2] Top limit for this range
		$valores[$i][3] = $fechatope + ($horasint*($i+1)); // [3] Botom limit
		$valores[$i][4] = -1; // MIN
		$valores[$i][5] = -1; // MAX
		$valores[$i][6] = -1; // Event
	}
	// Init other general variables
	if ($show_event == 1){
		// If we want to show events in graphs
		$sql1="SELECT utimestamp FROM tevento WHERE id_agente = $id_agente AND utimestamp > $fechatope";
		$result=mysql_query($sql1);
		while ($row = mysql_fetch_array($result)){
			$utimestamp = $row[0];
			for ($i=0; $i <= $resolution; $i++) {
				if ( ($utimestamp <= $valores[$i][3]) && ($utimestamp >= $valores[$i][2]) ){
					$real_event[$i]=1;
				}
			}
		}
	}
	// Init other general variables
	$max_value = 0;
	$min_value = 0;

	// DEBUG ONLY (to get number of items for this graph)
	/*
	// Make "THE" query. Very HUGE.
		$sql1="SELECT COUNT(datos) FROM tagente_datos WHERE id_agente = $id_agente AND id_agente_modulo = $id_agente_modulo AND utimestamp > fechatope";
		$result=mysql_query($sql1);
		$row=mysql_fetch_array($result);
		$title=$title." [C] ".$row[0];
	*/
	$previous=0;
	// Get the first data outsite (to the left---more old) of the interval given
	$sql1="SELECT datos,utimestamp FROM tagente_datos WHERE id_agente = $id_agente AND id_agente_modulo = $id_agente_modulo AND utimestamp < $fechatope ORDER BY utimestamp DESC LIMIT 1";
	$result=mysql_query($sql1);
	if ($row=mysql_fetch_array($result))
		$previous=$row[0];
	
	$sql1="SELECT datos,utimestamp FROM tagente_datos WHERE id_agente = $id_agente AND id_agente_modulo = $id_agente_modulo AND utimestamp > $fechatope";
	//echo "$sql1<br>";
	$result=mysql_query($sql1);
	while ($row=mysql_fetch_array($result)){
		$datos = $row[0];
		$utimestamp = $row[1];
		
		$i = round(($utimestamp - $fechatope) / $horasint);
		if (isset($valores[$i][0])){
			$valores[$i][0] += $datos;
			$valores[$i][1]++;
		
			if ($valores[$i][6] == -1)
				$valores[$i][6]=$datos;
			
			// Init min value
			if ($valores[$i][4] == -1)
				$valores[$i][4] = $datos;
			else {
				// Check min value
				if ($datos < $valores[$i][4])
					$valores[$i][4] = $datos;
			}
			// Check max value
			if ($valores[$i][5] == -1)
				$valores[$i][5] = $datos;
			else
				if ($datos > $valores[$i][5])
					$valores[$i][5] = $datos;
		}
	}
	
	
	$last = $previous;
	// Calculate Average value for $valores[][0]
	for ($i =0; $i <= $resolution; $i++) {
		//echo $valores[$i][6] . ", (" . $valores[$i][4] . ", " . $valores[$i][5] . ") :  ";
	
		if ($valores[$i][6] == -1)
			$valores[$i][6] = $last;
		else
			$valores[$i][6] = $valores[$i][4]; // min
			
		$last = $valores[$i][5] != -1 ? $valores[$i][5] : $valores[$i][6]; // max
		
		if ($valores[$i][1] > 0)
			$valores[$i][0] = $valores[$i][0]/$valores[$i][1];
		else {
			$valores[$i][0] = $previous;
			$valores[$i][4] = $previous;
			$valores[$i][5] = $previous;
		}
		// Get max value for all graph
		if ($valores[$i][5] > $max_value)
			$max_value = $valores[$i][5];
		// Take prev. value
		// TODO: CHeck if there are more than 24hours between
		// data, if there are > 24h, module down.
		$previous = $valores[$i][0];
		
		//echo $valores[$i][6];
		//echo "<br>";
	}
	
	// Create graph
	// *************
	$Graph =& Image_Graph::factory('graph', array($width, $height));
	// add a TrueType font
	$Font =& $Graph->addNew ('font', $config['fontpath']);
	$Font->setSize(6);
	$Graph->setFont($Font);

	if ($periodo == 86400)
		$title_period = "Last day";
	elseif ($periodo == 604800)
		$title_period = "Last week";
	elseif ($periodo == 3600)
		$title_period = "Last hour";
	elseif ($periodo == 2419200)
		$title_period = "Last month";
	else
		$title_period = "Last ".format_numeric(($periodo / (3600*24)),2)." days";
	if ($pure == 0){
		$Graph->add(
		Image_Graph::vertical(
			Image_Graph::vertical(
						$Title = Image_Graph::factory('title', array('   Pandora FMS Graph - '.strtoupper($nombre_agente)." - ".$title_period, 10)),
						$Subtitle = Image_Graph::factory('title', array('     '.$title, 7)),
						90
				),
			Image_Graph::horizontal(
				$Plotarea = Image_Graph::factory('plotarea'),
				$Legend = Image_Graph::factory('legend'),
				85
				),
			15)
		);
		$Legend->setPlotarea($Plotarea);
		$Title->setAlignment(IMAGE_GRAPH_ALIGN_LEFT);
		$Subtitle->setAlignment(IMAGE_GRAPH_ALIGN_LEFT);
	} else { // Pure, without title and legends
		$Graph->add($Plotarea = Image_Graph::factory('plotarea'));
	}
	// Create the dataset
	// Merge data into a dataset object (sancho)
	// $Dataset =& Image_Graph::factory('dataset');
	/*
	if ($avg_only == 1) {
		$dataset[0] = Image_Graph::factory('dataset');
		$dataset[0]->setName("Avg.");
	} else {
		$dataset[0] = Image_Graph::factory('dataset');
		$dataset[0]->setName("Max.");
		$dataset[1] = Image_Graph::factory('dataset');
		$dataset[1]->setName("Avg.");
		$dataset[2] = Image_Graph::factory('dataset');
		$dataset[2]->setName("Min.");
	}
	*/
	$dataset[0] = Image_Graph::factory('dataset');
	$dataset[0]->setName("Value");
		
	// Event dataset creation
	if ($show_event == 1){
		$dataset_event = Image_Graph::factory('dataset');
		$dataset_event -> setName("Event Fired");
	}
	// ... and populated with data ...
	for ($i = 0; $i <= $resolution; $i++) {
		$tdate = date('d/m', $valores[$i][2])."\n".date('H:i', $valores[$i][2]);
		/*
		if ($avg_only == 0) {
			$dataset[1]->addPoint($tdate, $valores[$i][0]);
			$dataset[0]->addPoint($tdate, $valores[$i][5]);
			$dataset[2]->addPoint($tdate, $valores[$i][4]);
		} else {
			$dataset[0]->addPoint($tdate, $valores[$i][6]); // 0:average 4:min 5:max 6:event
		}
		*/
		$dataset[0]->addPoint($tdate, $valores[$i][6]);
		
		if (($show_event == 1) AND (isset($real_event[$i]))) {
			$dataset_event->addPoint($tdate, $valores[$i][5]);
		}
	}

	if ($max_value > 0){
		// Show alert limits
		if ($show_alert == 1){
			$Plot =& $Plotarea->addNew('Image_Graph_Axis_Marker_Area', IMAGE_GRAPH_AXIS_Y);
			$Plot->setFillColor( 'blue@0.1' );
			$Plot->setLowerBound( $alert_low);
			$Plot->setUpperBound( $alert_high );
		}

		// create the 1st plot as smoothed area chart using the 1st dataset
		$Plot =& $Plotarea->addNew('area', array(&$dataset));
		if ($avg_only == 1){
			$Plot->setLineColor('black@0.1');
		} else {
			$Plot->setLineColor('yellow@0.2');
		}

		$AxisX =& $Plotarea->getAxis(IMAGE_GRAPH_AXIS_X);
		// $AxisX->Hide();
		
		$AxisY =& $Plotarea->getAxis(IMAGE_GRAPH_AXIS_Y);
		$AxisY->setDataPreprocessor(Image_Graph::factory('Image_Graph_DataPreprocessor_Function', 'format_for_graph'));
		$AxisY->setLabelOption("showtext",true);
		$yinterval = $height / 30;
		$AxisY->setLabelInterval(ceil($max_value / $yinterval));
		$AxisY->showLabel(IMAGE_GRAPH_LABEL_ZERO);
		if ($unit_name != "")
			$AxisY->setTitle($unit_name, 'vertical');
		if ($periodo < 10000)
			$xinterval = 8;
		else
			$xinterval = $resolution / 7 ;
		$AxisX->setLabelInterval($xinterval) ;
		//$AxisY->forceMinimum($minvalue);
		$AxisY->forceMaximum($max_value+($max_value/12)) ;
		$GridY2 =& $Plotarea->addNew('bar_grid', IMAGE_GRAPH_AXIS_Y_SECONDARY);
		$GridY2->setLineColor('gray');
		$GridY2->setFillColor('lightgray@0.05');
		// set line colors
		$FillArray =& Image_Graph::factory('Image_Graph_Fill_Array');

		$Plot->setFillStyle($FillArray);
		/*
		if ($avg_only == 1){
			$FillArray->addColor('green@0.6');
		} else {
			$FillArray->addColor('yellow@0.5');
			$FillArray->addColor('orange@0.6');
			$FillArray->addColor('#e37907@0.7');
			$FillArray->addColor('red@0.7');
			$FillArray->addColor('blue@0.7');
			$FillArray->addColor('green@0.7');
			$FillArray->addColor('black@0.7');
		}
		*/
		$FillArray->addColor('green@0.6');
		$AxisY_Weather =& $Plotarea->getAxis(IMAGE_GRAPH_AXIS_Y);

		// Show events !
		if ($show_event == 1){
			$Plot =& $Plotarea->addNew('Plot_Impulse', array($dataset_event));
			$Plot->setLineColor( 'red' );
			$Marker_event =& Image_Graph::factory('Image_Graph_Marker_Cross');
			$Plot->setMarker($Marker_event);
			$Marker_event->setFillColor( 'red' );
			$Marker_event->setLineColor( 'red' );
			$Marker_event->setSize ( 5 );
		}

		$Graph->done();
	} else
		graphic_error ();
}

// **************************************************************************
// **************************************************************************
//   MAIN Code - Parse get parameters
// **************************************************************************
// **************************************************************************

// Generic parameter handling
// **************************

$id_agent = (int) get_parameter ('id_agent');
$tipo = (string) get_parameter ('tipo');
$pure = (bool) get_parameter ('pure');
$period = (int) get_parameter ('period', 86400);
$intervalo = (int) get_parameter ('intervalo', 300);
$id = (string) get_parameter ('id');
$weight_l = (string) get_parameter ('weight_l');
$width = (int) get_parameter ('width', 450);
$height = (int) get_parameter ('height', 200);
$label = (string) get_parameter ('label', '');
$color = (string) get_parameter ('color', '#226677');
$percent = (int) get_parameter ('percent', 100);
$zoom = (int) get_parameter ('zoom', 100);
$zoom /= 100;
if ($zoom <= 0 || $zoom > 1)
	$zoom = 1;
$unit_name = (string) get_parameter ('unit_name');
$draw_events = (int) get_parameter ('draw_events');
$avg_only = (int) get_parameter ('avg_only');
$draw_alerts = (int) get_parameter ('draw_alerts');
$value1 = get_parameter ('value1');
$value2 = get_parameter ('value2');
$value3 = get_parameter("value3", 0);
$stacked = get_parameter ("stacked", 0);
$date = get_parameter ("date");
$graphic_type = (string) get_parameter ('tipo');
$mode = get_parameter ("mode", 1);
$url = get_parameter ('url','');

if ($graphic_type) {
	switch ($graphic_type) {
	case 'string':
		graphic_string_data ($id, $period, $width, $height, $date);
		
		break;
	case 'sparse': 
		grafico_modulo_sparse ($id, $period, $draw_events, $width, $height,
					$label, $unit_name, $draw_alerts, $avg_only, $pure, $date);
		break;
	case "boolean":
		grafico_modulo_boolean ($id, $period, $draw_events, $width, $height , $label, $unit_name, $draw_alerts, 1, $pure);
		
		break;
	case "estado_incidente":
		grafico_incidente_estados ();
		
		break;
	case "prioridad_incidente":
		grafico_incidente_prioridad ();
		
		break;
	case "db_agente_modulo":
		grafico_db_agentes_modulos($width, $height);
		
		break;
	case "db_agente_paquetes":
		grafico_db_agentes_paquetes($width, $height);
		
		break;
	case "db_agente_purge":
		grafico_db_agentes_purge($id, $width, $height);
		
		break;
	case "event_module":
		graph_event_module ($width, $height, $id_agent);
	
		break;	
	case "group_events":
		grafico_eventos_grupo($width, $height, $url);
		
		break;
	case "user_events":
		grafico_eventos_usuario($width, $height);
		
		break;
	case "total_events":
		grafico_eventos_total();
		
		break;
	case "group_incident":
		graphic_incident_group();
		
		break;
	case "user_incident":
		graphic_incident_user();
		
		break;
	case "source_incident":
		graphic_incident_source();
		
		break;
	case "user_activity":
		graphic_user_activity($width,$height);
		
		break;
	case "agentaccess":
		graphic_agentaccess ($id, get_parameter ("periodo"), $width, $height);
		
		break;
	case "agentmodules":
		graphic_agentmodules($id, $width, $height);
		
		break;
	case "progress": 
		$percent = get_parameter_get ("percent");
		progress_bar ($percent,$width,$height, $mode);
		
		break;
	case "odo_tactic":
		odo_tactic ( $value1, $value2, $value3 );
		
		break;
	case "combined":
		// Split id to get all parameters
		$module_list = array();
		$module_list = split (",", $id);
		$weight_list = array();
		$weight_list = split (",", $weight_l);
		graphic_combined_module ($module_list, $weight_list, $period, $width, $height,
					$label, $unit_name, $draw_events, $draw_alerts, $pure, $stacked, $date);
		
		break;
	case "alerts_fired_pipe":
		$data = array ();
		$data[0] = (float) get_parameter ('fired');
		$data[1] = (float) get_parameter ('not_fired');
		$legends = array ();
		$legends[0] = __('Alerts fired');
		$legends[1] = __('Alerts not fired');
		generic_pie_graph ($width, $height, $data, $legends);
		
		break;
	case 'monitors_health_pipe':
		$data = array ();
		$data[0] = (float) get_parameter ('down');
		$data[1] = (float) get_parameter ('not_down');
		$legends = array ();
		$legends[0] = __('Monitors BAD');
		$legends[1] = __('Monitors OK');
		generic_pie_graph ($width, $height, $data, $legends);
		
		break;
	default:
		graphic_error ();
	}
} else {
	graphic_error ();
}
?>