<?
// we will do our own error handling
error_reporting(0);

DEFINE("TTF_DIR","./fonts/");
include('./jpgraph/jpgraph.php');
include('./jpgraph/jpgraph_line.php' ); 
include('./jpgraph/jpgraph_scatter.php');
include('./jpgraph/jpgraph_date.php' ); 

if ( array_key_exists('filename',$_GET) )
	$filename=$_GET['filename'];
else
	$filename='data';

include "${filename}_desc.php";

if ( array_key_exists('field1',$_GET) )
	$field1=$_GET['field1'];
else
{
	$field1=array_keys($desc);
	$field1=$field1[4];

}
if ( array_key_exists('field2',$_GET) )
	$field2=$_GET['field2'];
else
	$field2='';

// constitution de la chaine format
$format1='';
$format2='';
foreach (array_keys($desc) as $item)
{
	$fmt=ereg_replace('\.[^fdsc]*','',$desc[$item]["Format"]);

	if ($format1!='')
		$format1=$format1 . $separator;
	if ($item==$field1 ||  $item=='Date' || $item=='Sec')
		$format1=$format1 . $fmt;
	else
		$format1=$format1 . str_replace('%','%*',$fmt);

	if (!empty($field2))
	{
		if ($format2!='')
			$format2=$format2 . $separator;
		if ($item==$field2)
			$format2=$format2 . $fmt;
		else
			$format2=$format2 . str_replace('%','%*',$fmt);
	}
}


$fid=@fopen($filename,"r");
$line=fgets($fid);
$n=0;
$minidx1=-1;
$maxidx1=-1;
$minidx2=-1;
$maxidx2=-1;
while (!feof($fid) && $line!=FALSE) 
{
	list($nsec,$dat,$y1[$n])=sscanf($line,$format1);
	if ($y1[$n]==999.99)
		$y1[$n]='x';
	else
	{
		if ($minidx1==-1)
			$minidx1=$n;
		$maxidx1=$n;
	}

	if (!empty($field2))
	{
		list($y2[$n])=sscanf($line,$format2);
		if ($y2[$n]==999.99)
			$y2[$n]='x';
		else
		{
			if ($minidx2==-1)
				$minidx2=$n;
			$maxidx2=$n;
		}
	}
	$tm=strptime($dat,"%d/%m/%Y");
	$time[$n]=gmmktime(0,0,0,$tm['tm_mon']+1,$tm['tm_mday'],1900+$tm['tm_year'])+$nsec*60;

	
	$n=$n+1;
	
	$line=fgets($fid);
}
fclose($fid);


date_default_timezone_set("UTC");

$xmin=0;$xmax=0;
if ( !empty($_GET['xmin']) )
{
//	list($year,$month,$day,$hour,$minute,$second)=split("[ :/]",$_GET['xmin']);
	list($day,$month,$year,$hour,$minute,$second)=split("[ :/]",$_GET['xmin']);
	$xmin=gmmktime($hour,$minute,$second,$month,$day,$year);
}
else
{
	if  (empty($field2))
		$xmin=$time[$minidx1];
	else
		$xmin=$time[($minidx1<$minidx2?$minidx1:$minidx2)];

}
if ( !empty($_GET['xmax']) )
{
//	list($year,$month,$day,$hour,$minute,$second)=split("[ :/]",$_GET['xmax']);
	list($day,$month,$year,$hour,$minute,$second)=split("[ :/]",$_GET['xmax']);
	$xmax=gmmktime($hour,$minute,$second,$month,$day,$year);
}
else
{
	if  (empty($field2))
		$xmax=$time[$maxidx1];
	else
		$xmax=$time[($maxidx1<$maxidx2?$maxidx2:$maxidx1)];

}
$y1min=0;$y1max=0;
if ( !empty($_GET['y1min']) )
	$y1min=$_GET['y1min'];
else 
	$y1min=min($y1);
if ( !empty($_GET['y1max']) )
	$y1max=$_GET['y1max'];
else
	$y1max=max($y1);
if (!empty($field2))
{
	$y2min=0;$y2max=0;
	if ( !empty($_GET['y2min']) )
		$y2min=$_GET['y2min'];
	else
		$y2min=min($y2);
	if ( !empty($_GET['y2max']) )
		$y2max=$_GET['y2max'];
	else
		$y2max=max($y2);
}
//if ( !empty($_GET['xmin']) &&  !empty($_GET['xmax']))
{
	function monfiltre($var)
	{
		global $xmin,$xmax;
		return ( ($var >= $xmin) && ($var <= $xmax) );
	}
	$newtime=array_filter($time,"monfiltre");

	$newy1=array_intersect_key($y1,$newtime);
	$y1=array_values($newy1);

	if (!empty($field2))
	{
		$newy2=array_intersect_key($y2,$newtime);
		$y2=array_values($newy2);
	}
	$time=array_values($newtime);
}

$width=800;
$height=600;
header("Content-type: image/png");
header("Content-Disposition: inline; filename=\"$title.png\"");

$graph  = new Graph($width, $height, "auto");
$graph-> img-> SetImgFormat("png");
$graph->SetScale("datlin",$y1min,$y1max,$xmin,$xmax);

$graph->img->SetMargin(80,80,40,80);
$graph->SetClipping(true); 
$graph->SetFrame(false);
$graph->SetBox(true);
$graph->SetGridDepth(DEPTH_BACK);
//$graph->SetAxisStyle(AXSTYLE_BOXOUT); 
$graph->SetTickDensity(TICKD_NORMAL,TICKD_VERYSPARSE);

$graph->title->Set($title);
$graph->title->SetFont(FF_ARIAL,FS_BOLD,12);

$graph->xaxis->title->Set("Time");
$graph->xaxis->title->SetFont(FF_ARIAL,FS_NORMAL,12);
$graph->xaxis->SetTitlemargin(50);
$graph->xaxis->SetFont(FF_ARIAL,FS_NORMAL,10);
$graph->xaxis->SetLabelAngle(45); 
$graph->xaxis->SetPos("min"); 

$datemin=getdate($xmin);
$datemax=getdate($xmax);
if (($xmax-$xmin)<5*60)
{
	//	$graph->xaxis->scale->SetTimeAlign(MINADJ_1);
	if ($datemin['day']==$datemax['day'])
		$graph->xaxis->scale->SetDateFormat( 'H:i:s');
	else
		$graph->xaxis->scale->SetDateFormat( 'd/m H:i:s');
}
elseif (($xmax-$xmin)<6*60*60)
{
//	$graph->xaxis->scale->SetTimeAlign(HOURADJ_1);
	if ($datemin['day']==$datemax['day'])
		$graph->xaxis->scale->SetDateFormat( 'H:i');
	else
		$graph->xaxis->scale->SetDateFormat( 'd/m H:i');
}
elseif (($xmax-$xmin)<7*24*60*60)
{
//	$graph->xaxis->scale->SetDateAlign(DAYADJ_1);
	if ($datemin['year']==$datemax['year'])
		$graph->xaxis->scale->SetDateFormat( 'd/m H:i');
	else
		$graph->xaxis->scale->SetDateFormat( 'd/m/Y H:i');
}
else
{
	if ($datemin['year']==$datemax['year'])
		$graph->xaxis->scale->SetDateFormat( 'd/m');
	else
		$graph->xaxis->scale->SetDateFormat( 'd/m/Y');
}
$graph->xaxis->SetLabelSide(SIDE_DOWN);
$graph->xaxis->SetTickSide(SIDE_DOWN);
$graph->xgrid->Show(); 

$graph->yaxis->title->Set("$field1");
$graph->yaxis->title->SetFont(FF_ARIAL,FS_NORMAL,12);
$graph->yaxis->SetTitlemargin(50);
$graph->yaxis->SetFont(FF_ARIAL,FS_NORMAL,10);
//$graph->yaxis->SetLabelAngle(0); 
$graph->yaxis->SetLabelSide(SIDE_LEFT);
$graph->yaxis->SetTickSide(SIDE_LEFT);

if ( !empty($_GET['style1']) && $_GET['style1']=='line')
{
	$lineplot =new LinePlot($y1,$time);
	$lineplot ->SetColor("blue");
	$lineplot->SetWeight(2);
	$graph->Add( $lineplot);
}
elseif ( !empty($_GET['style1']) && $_GET['style1']=='point')
{
	$scatterplot= new ScatterPlot($y1,$time);
	$scatterplot->mark->SetColor("blue");
	$scatterplot->mark->SetType(MARK_FILLEDCIRCLE);
	$scatterplot->mark->SetSize(2);
	$graph->Add( $scatterplot);

}
else
{
	$scatterplot= new ScatterPlot($y1,$time);
	$scatterplot->mark->SetColor("blue");
	$scatterplot->mark->SetType(MARK_FILLEDCIRCLE);
	$scatterplot->mark->SetSize(2);
	$graph->Add( $scatterplot);
}
$graph->yaxis->SetColor("blue");
$graph->yaxis->title->SetColor("blue");

if (!empty($field2))
{
	$graph->SetY2Scale("lin",$y2min,$y2max);

	$graph->y2axis->title->Set("$field2");
	$graph->y2axis->title->SetFont(FF_ARIAL,FS_NORMAL,12);
	$graph->y2axis->SetTitlemargin(50);
	$graph->y2axis->SetFont(FF_ARIAL,FS_NORMAL,10);
	//$graph->y2axis->SetLabelAngle(0); 
	$graph->y2axis->SetLabelSide(SIDE_RIGHT);
	$graph->y2axis->SetTickSide(SIDE_RIGHT);


	if ( !empty($_GET['style2']) && $_GET['style2']=='line')
	{
		$lineplot2 =new LinePlot($y2,$time);
		$lineplot2->SetColor("orange");
		$lineplot2->SetWeight(2);
		$graph->AddY2( $lineplot2);
	}
	elseif ( !empty($_GET['style2']) && $_GET['style2']=='point')
	{
		$scatterplot2= new ScatterPlot($y2,$time);
		$scatterplot2->mark->SetColor("orange");
		$scatterplot2->mark->SetFillColor("orange");
		$scatterplot2->mark->SetType(MARK_FILLEDCIRCLE);
		$scatterplot2->mark->SetSize(2);
		$graph->AddY2( $scatterplot2);

	}
	else
	{
		$scatterplot2= new ScatterPlot($y2,$time);
		$scatterplot2->mark->SetColor("orange");
		$scatterplot2->mark->SetFillColor("orange");
		$scatterplot2->mark->SetType(MARK_FILLEDCIRCLE);
		$scatterplot2->mark->SetSize(2);
		$graph->AddY2( $scatterplot2);
	}
	$graph->y2axis->SetColor("orange");
	$graph->y2axis->title->SetColor("orange");
}


$graph->Stroke();

?>