<?php
// Copyright (c) 2011-2011 Ártica Soluciones Tecnológicas
// http://www.artica.es  <info@artica.es>

// This program is free software; you can redistribute it and/or
// modify it under the terms of the GNU General Public License
// as published by the Free Software Foundation; 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.

$ttl = 1;
$homeurl = '';

/*function include_graphs_dependencies($home_url = '', $serialize_ttl = 1) {
	global $ttl;
	global $homeurl;
	
	$ttl = $serialize_ttl;
	$homeurl = $home_url;
	
	include_once($homeurl . 'include/functions.php');
	include_once($homeurl . 'include/functions_html.php');
	
	include_once($homeurl . 'include/graphs/functions_fsgraph.php');
	include_once($homeurl . 'include/graphs/functions_gd.php');
	include_once($homeurl . 'include/graphs/functions_utils.php');
}*/
/*
// If is called from index
if(file_exists('include/functions.php')) {
	include_once('include/functions.php');
	include_once('include/graphs/functions_fsgraph.php');
	include_once('include/graphs/functions_utils.php');
} // If is called through url
else if(file_exists('../functions.php')) {
	include_once('../functions.php');
	include_once('../functions_html.php');
	include_once('functions_fsgraph.php');
	include_once('functions_gd.php');
	include_once('functions_utils.php');
}


include_once('functions_fsgraph.php');
include_once('functions_utils.php');
*/

if (isset($_GET['homeurl'])) {
	$homeurl = $_GET['homeurl'];
}
else $homeurl = '';

if (isset($_GET['ttl'])) {
	$ttl = $_GET['ttl'];
}
else $ttl_param = 1;

if (isset($_GET['graph_type'])) {
	$graph_type = $_GET['graph_type'];
}
else $graph_type = '';

//$graph_type = get_parameter('graph_type', '');
//$ttl_param = get_parameter('ttl', 1);
//$homeurl_param = get_parameter('homeurl', '');

// Turn on output buffering.
// The entire buffer will be discarded later so that any accidental output
// does not corrupt images generated by fgraph.
ob_start ();

if (!empty($graph_type)) {
	include_once($homeurl . 'include/functions.php');
	include_once($homeurl . 'include/functions_html.php');
	
	include_once($homeurl . 'include/graphs/functions_gd.php');
	include_once($homeurl . 'include/graphs/functions_utils.php');
}

// Clean the output buffer and turn off output buffering
ob_end_clean ();

switch($graph_type) {
	case 'histogram': 
		$width = get_parameter('width');
		$height = get_parameter('height');
		$font = get_parameter('font');
		$data = json_decode(io_safe_output(get_parameter('data')), true);
		
		$max = get_parameter('max');
		$title = get_parameter('title');
		$mode = get_parameter ('mode', 1);
		gd_histogram ($width, $height, $mode, $data, $max, $font, $title);
		break;
	case 'progressbar':
		$width = get_parameter('width');
		$height = get_parameter('height');
		$progress = get_parameter('progress');
		
		$out_of_lim_str = get_parameter('out_of_lim_str', false);
		$out_of_lim_image = get_parameter('out_of_lim_image', false);
		
		$font = get_parameter('font');
		$title = get_parameter('title');
		
		$mode = get_parameter('mode', 1);
		
		$fontsize = get_parameter('fontsize', 10);
		
		$value_text = get_parameter('value_text', '');
		$colorRGB = get_parameter('colorRGB', '');
		
		gd_progress_bar ($width, $height, $progress, $title, $font,
			$out_of_lim_str, $out_of_lim_image, $mode, $fontsize, $value_text, $colorRGB);
		break;
	case 'progressbubble':
		$width = get_parameter('width');
		$height = get_parameter('height');
		$progress = get_parameter('progress');
		
		$out_of_lim_str = get_parameter('out_of_lim_str', false);
		$out_of_lim_image = get_parameter('out_of_lim_image', false);
		
		$font = get_parameter('font');
		$title = get_parameter('title');
		
		$mode = get_parameter('mode', 1);
		
		$fontsize = get_parameter('fontsize', 7);
		
		$value_text = get_parameter('value_text', '');
		$colorRGB = get_parameter('colorRGB', '');
		
		gd_progress_bubble ($width, $height, $progress, $title, $font,
			$out_of_lim_str, $out_of_lim_image, $mode, $fontsize, $value_text, $colorRGB);
		break;
}

function histogram($chart_data, $width, $height, $font, $max, $title, $mode, $ttl = 1) {
	$graph = array();
	$graph['data'] = $chart_data;
	$graph['width'] = $width;
	$graph['height'] = $height;
	$graph['font'] = $font;
	$graph['max'] = $max;
	$graph['title'] = $title;
	$graph['mode'] = $mode;
	
	$id_graph = serialize_in_temp($graph, null, $ttl);
	
	return "<img src='include/graphs/functions_gd.php?static_graph=1&graph_type=histogram&ttl=".$ttl."&id_graph=".$id_graph."'>";
}

function progressbar($progress, $width, $height, $title, $font, $mode = 1, 
	$out_of_lim_str = false, $out_of_lim_image = false, $ttl = 1) {
	
	$graph = array();
	
	$graph['progress'] = $progress;
	$graph['width'] = $width;
	$graph['height'] = $height;
	$graph['out_of_lim_str'] = $out_of_lim_str;
	$graph['out_of_lim_image'] = $out_of_lim_image;
	$graph['title'] = $title;
	$graph['font'] = $font;
	$graph['mode'] = $mode;
	
	$id_graph = serialize_in_temp($graph, null, $ttl);
	
	return "<img src='include/graphs/functions_gd.php?static_graph=1&graph_type=progressbar&ttl=".$ttl."&id_graph=".$id_graph."'>";
}


function slicesbar_graph($chart_data, $period, $width, $height, $colors, $font, 
	$round_corner, $home_url = '', $ttl = 1) {
	
	$graph = array();
	$graph['data'] = $chart_data;
	$graph['period'] = $period;
	$graph['width'] = $width;
	$graph['height'] = $height;
	$graph['font'] = $font;
	$graph['round_corner'] = $round_corner;
	$graph['color'] = $colors;
	
	$id_graph = serialize_in_temp($graph, null, $ttl);
	
	return "<img src='".$home_url."include/graphs/functions_pchart.php?static_graph=1&graph_type=slicebar&ttl=".$ttl."&id_graph=".$id_graph."'>";
}

function vbar_graph($flash_chart, $chart_data, $width, $height, $color = array(),
	$legend = array(), $xaxisname = "", $yaxisname = "", $homedir="",
	$water_mark = '', $font = '', $font_size = '', $force_steps = true, $ttl = 1, $reduce_data_columns = false,
	$adapt_key = '') {
	
	setup_watermark($water_mark, $water_mark_file, $water_mark_url);
	
	if($flash_chart) {
		return flot_vcolumn_chart ($chart_data, $width, $height, $color, $legend, $long_index, $homeurl, $unit, $water_mark_url, $homedir, $reduce_data_columns, $adapt_key);
	}
	else {
		$graph = array();
		$graph['data'] = $chart_data;
		$graph['width'] = $width;
		$graph['height'] = $height;
		$graph['color'] = $color;
		$graph['legend'] = $legend;
		$graph['xaxisname'] = $xaxisname;
		$graph['yaxisname'] = $yaxisname;
		$graph['water_mark'] = $water_mark_file;
		$graph['font'] = $font;
		$graph['font_size'] = $font_size;
		$graph['force_steps'] = $force_steps;
		
		$id_graph = serialize_in_temp($graph, null, $ttl);
		
		return "<img src='" . $homedir . "include/graphs/functions_pchart.php?static_graph=1&graph_type=vbar&ttl=".$ttl."&id_graph=".$id_graph."'>";
	}
}

// NOT USED ACTUALLY
function threshold_graph($flash_chart, $chart_data, $width, $height, $ttl = 1) {
	if ($flash_chart) {
		return flot_area_simple_graph($chart_data, $width, $height);
	}
	else {
		echo "<img src='include/graphs/functions_pchart.php?static_graph=1&graph_type=threshold&ttl=".$ttl."&data=".json_encode($chart_data)."&width=".$width."&height=".$height."'>";
	}
}

function area_graph($flash_chart, $chart_data, $width, $height, $color, $legend,
	$long_index, $no_data_image, $xaxisname = "", $yaxisname = "", $homeurl="",
	$water_mark = "", $font = '', $font_size = '', $unit = '', $ttl = 1, $series_type = array(),
	$chart_extra_data = array(), $yellow_threshold = 0, $red_threshold = 0, $adapt_key = '', $force_integer = false,
	$series_suffix_str = '', $menu = true) {

	setup_watermark($water_mark, $water_mark_file, $water_mark_url);
	
	// ATTENTION: The min size is 110x150 
	// It's not the same minsize for all graphs, but we are choosed a prudent minsize for all
	if ($height <= 110) {
		$height = 110;
	}
	if ($width < 150) {
		$width = 150;
	}
	
	if (empty($chart_data)) {
		return graph_nodata_image();
		return '<img src="' . $no_data_image . '" />';
	}
	
	if ($flash_chart) {
		return flot_area_simple_graph($chart_data, $width, $height, $color, $legend, $long_index, $homeurl, $unit, $water_mark_url, $series_type, $chart_extra_data, $yellow_threshold, $red_threshold, $adapt_key, $force_integer, $series_suffix_str, $menu);
	}
	else {
		$graph = array();
		$graph['data'] = $chart_data;
		$graph['width'] = $width;
		$graph['height'] = $height;
		$graph['color'] = $color;
		$graph['legend'] = $legend;
		$graph['xaxisname'] = $xaxisname;
		$graph['yaxisname'] = $yaxisname;
		$graph['water_mark'] = $water_mark_file;
		$graph['font'] = $font;
		$graph['font_size'] = $font_size;
		
		$id_graph = serialize_in_temp($graph, null, $ttl);
		
		return "<img src='" . ui_get_full_url (false, false, false, false) . "include/graphs/functions_pchart.php?static_graph=1&graph_type=area&ttl=".$ttl."&id_graph=" . $id_graph . "'>";
	}
}

function stacked_area_graph($flash_chart, $chart_data, $width, $height, $color,
	$legend, $long_index, $no_data_image, $xaxisname = "", $yaxisname = "",
	$water_mark = "", $font = '', $font_size = '', $unit = '', $ttl = 1, $homeurl = '') {
	
	setup_watermark($water_mark, $water_mark_file, $water_mark_url);
	
	if (empty($chart_data)) {
		return '<img src="' . $no_data_image . '" />';
	}
	
	if($flash_chart) {
		return flot_area_stacked_graph($chart_data, $width, $height, $color, $legend, $long_index, $homeurl, $unit, $water_mark_url);
	}
	else {
		//Stack the data
		stack_data($chart_data, $legend, $color);
		
		$graph = array();
		$graph['data'] = $chart_data;
		$graph['width'] = $width;
		$graph['height'] = $height;
		$graph['color'] = $color;
		$graph['legend'] = $legend;
		$graph['xaxisname'] = $xaxisname;
		$graph['yaxisname'] = $yaxisname;
		$graph['water_mark'] = $water_mark_file;
		$graph['font'] = $font;
		$graph['font_size'] = $font_size;
		
		$id_graph = serialize_in_temp($graph, null, $ttl);
		
		return "<img src='" . ui_get_full_url (false, false, false, false) . "include/graphs/functions_pchart.php?static_graph=1&graph_type=stacked_area&ttl=".$ttl."&id_graph=" . $id_graph . "' />";
	}
}

function stacked_line_graph($flash_chart, $chart_data, $width, $height, $color,
	$legend, $long_index, $no_data_image, $xaxisname = "", $yaxisname = "",
	$water_mark = "", $font = '', $font_size = '', $unit = '', $ttl = 1, $homeurl = '') {
	
	setup_watermark($water_mark, $water_mark_file, $water_mark_url);
	
	if (empty($chart_data)) {
		return '<img src="' . $no_data_image . '" />';
	}
	
	if($flash_chart) {
		return flot_line_stacked_graph($chart_data, $width, $height, $color, $legend, $long_index, $homeurl, $unit, $water_mark_url);
	}
	else {
		//Stack the data
		stack_data($chart_data, $legend, $color);
		
		$graph = array();
		$graph['data'] = $chart_data;
		$graph['width'] = $width;
		$graph['height'] = $height;
		$graph['color'] = $color;
		$graph['legend'] = $legend;
		$graph['xaxisname'] = $xaxisname;
		$graph['yaxisname'] = $yaxisname;
		$graph['water_mark'] = $water_mark_file;
		$graph['font'] = $font;
		$graph['font_size'] = $font_size;
		
		$id_graph = serialize_in_temp($graph, null, $ttl);
		
		return "<img src='" . $homeurl . "include/graphs/functions_pchart.php?static_graph=1&graph_type=line&ttl=".$ttl."&id_graph=" . $id_graph . "' />";
	}
}

function line_graph($flash_chart, $chart_data, $width, $height, $color, $legend,
	$long_index, $no_data_image, $xaxisname = "", $yaxisname = "",
	$water_mark = "", $font = '', $font_size = '', $unit = '', $ttl = 1, $homeurl = '') {
	
	setup_watermark($water_mark, $water_mark_file, $water_mark_url);

	if (empty($chart_data)) {
		return '<img src="' . $no_data_image . '" />';
	}
	
	if($flash_chart) {
		return flot_line_simple_graph($chart_data, $width, $height, $color, $legend, $long_index, $homeurl, $unit, $water_mark_url);
	}
	else {
		$graph = array();
		$graph['data'] = $chart_data;
		$graph['width'] = $width;
		$graph['height'] = $height;
		$graph['color'] = $color;
		$graph['legend'] = $legend;
		$graph['xaxisname'] = $xaxisname;
		$graph['yaxisname'] = $yaxisname;
		$graph['water_mark'] = $water_mark_file;
		$graph['font'] = $font;
		$graph['font_size'] = $font_size;
		
		$id_graph = serialize_in_temp($graph, null, $ttl);
		
		return "<img src='" . $homeurl . "include/graphs/functions_pchart.php?static_graph=1&graph_type=line&ttl=".$ttl."&id_graph=" . $id_graph . "' />";
	}
}

function kiviat_graph($graph_type, $flash_chart, $chart_data, $width, $height, $no_data_image, $ttl = 1, $homedir="") {
	if (empty($chart_data)) {
		return '<img src="' . $no_data_image . '" />';
	}
	
	$graph = array();
	$graph['data'] = $chart_data;
	$graph['width'] = $width;
	$graph['height'] = $height;
	
	$id_graph = serialize_in_temp($graph, null, $ttl);
	
	return "<img src='".$homedir."include/graphs/functions_pchart.php?static_graph=1&graph_type=".$graph_type."&ttl=".$ttl."&id_graph=" . $id_graph . "' />";
}

function radar_graph($flash_chart, $chart_data, $width, $height, $no_data_image, $ttl = 1, $homedir="") {
	return kiviat_graph('radar', $flash_chart, $chart_data, $width, $height, $no_data_image, $ttl, $homedir);
}

function polar_graph($flash_chart, $chart_data, $width, $height, $no_data_image, $ttl = 1, $homedir="") {
	return kiviat_graph('polar', $flash_chart, $chart_data, $width, $height, $no_data_image, $ttl, $homedir="");
}

function hbar_graph($flash_chart, $chart_data, $width, $height, $color = array(),
	$legend = array(), $xaxisname = "", $yaxisname = "", $force_height = true,
	$homedir="", $water_mark = '', $font = '', $font_size = '', $force_steps = true, $ttl = 1, $return = false) {
	
	setup_watermark($water_mark, $water_mark_file, $water_mark_url);
	
	if($flash_chart) {
		if ($return){
			return flot_hcolumn_chart ($chart_data, $width, $height, $water_mark_url);
		}
		else{
			echo flot_hcolumn_chart ($chart_data, $width, $height, $water_mark_url);
		}
	}
	else {
		$graph = array();
		$graph['data'] = $chart_data;
		$graph['width'] = $width;
		$graph['height'] = $height;
		$graph['color'] = $color;
		$graph['legend'] = $legend;
		$graph['xaxisname'] = $xaxisname;
		$graph['yaxisname'] = $yaxisname;
		$graph['force_height'] = $force_height;
		$graph['water_mark'] = $water_mark_file;
		$graph['font'] = $font;
		$graph['font_size'] = $font_size;
		$graph['force_steps'] = $force_steps;
		
		$id_graph = serialize_in_temp($graph, null, $ttl);
		
		return "<img src='".$homedir."include/graphs/functions_pchart.php?static_graph=1&graph_type=hbar&ttl=".$ttl."&id_graph=".$id_graph."'>";
	}
}

function pie3d_graph($flash_chart, $chart_data, $width, $height,
	$others_str = "other", $homedir="", $water_mark = "", $font = '',
	$font_size = '', $ttl = 1, $legend_position = false, $colors = '') {
	
	return pie_graph('3d', $flash_chart, $chart_data, $width, $height,
		$others_str, $homedir, $water_mark, $font, $font_size, $ttl,
		$legend_position, $colors);
}

function pie2d_graph($flash_chart, $chart_data, $width, $height,
	$others_str = "other", $homedir="", $water_mark = "", $font = '',
	$font_size = '', $ttl = 1, $legend_position = false, $colors = '') {
	
	return pie_graph('2d', $flash_chart, $chart_data, $width, $height,
		$others_str, $homedir, $water_mark, $font, $font_size, $ttl, 
		$legend_position, $colors);
}

function pie_graph($graph_type, $flash_chart, $chart_data, $width, $height,
	$others_str = "other", $homedir="", $water_mark = "", $font = '',
	$font_size = '', $ttl = 1, $legend_position = false, $colors = '') {
	
	setup_watermark($water_mark, $water_mark_file, $water_mark_url);
	
	// This library allows only 8 colors
	$max_values = 8;
	
	if (count($chart_data) > $max_values) {
		$chart_data_trunc = array();
		$n = 1;
		foreach ($chart_data as $key => $value) {
			if ($n < $max_values) {
				$chart_data_trunc[$key] = $value;
			}
			else {
				if (!isset($chart_data_trunc[$others_str])) {
					$chart_data_trunc[$others_str] = 0;
				}
				$chart_data_trunc[$others_str] += $value;
			}
			$n++;
		}
		$chart_data = $chart_data_trunc;
	}
	
	if ($flash_chart) {
		return flot_pie_chart(array_values($chart_data),
			array_keys($chart_data), $width, $height, $water_mark_url,
			$font, $font_size, $legend_position, $colors);
	}
	else {
		//TODO SET THE LEGEND POSITION
		
		$graph = array();
		$graph['data'] = $chart_data;
		$graph['width'] = $width;
		$graph['height'] = $height;
		$graph['water_mark'] = $water_mark_file;
		$graph['font'] = $font;
		$graph['font_size'] = $font_size;
		$graph['legend_position'] = $legend_position;
		$graph['color'] = $colors;
		
		$id_graph = serialize_in_temp($graph, null, $ttl);
		
		switch ($graph_type) {
			case "2d":
				return "<img src='" . $homedir . "include/graphs/functions_pchart.php?static_graph=1&graph_type=pie2d&ttl=".$ttl."&id_graph=".$id_graph."'>";
				break;
			case "3d":
				return "<img src='" . $homedir . "include/graphs/functions_pchart.php?static_graph=1&graph_type=pie3d&ttl=".$ttl."&id_graph=".$id_graph."'>";
				break;
		}
	}
}

?>