<?
# Parameter:
#
header ("Content-type: image/png");
$width=720;
$height=340;
$borderleft=20;
$borderright=20;
$bordertop=10;
$borderbottom=50;
$host = "127.0.0.1";
$user = "50001-helbing";
$password = "Gkl10psa";
$db = "50001_helbing";
$link=mysqli_connect($host,$user,$password, $db);

$tag=isSet($_REQUEST["tag"]) ? $_REQUEST["tag"] : '';
if (!is_numeric($tag)) {
	$tag = 1;
}
  
$cwd=getcwd();
$ttf=$cwd."/../../fonts/arial.ttf";

$im = @ImageCreate (($width+$borderleft+$borderright), ($height+$bordertop+$borderbottom)) or die ("Kann keinen neuen GD-Bild-Stream erzeugen");
$background_color = ImageColorAllocate ($im, 192, 192, 192);
$hellgrau = ImageColorAllocate ($im, 205, 205, 205);
$dunkelgrau = ImageColorAllocate ($im, 80, 80, 80);
$weiss = ImageColorAllocate ($im, 255, 255, 255);
$schwarz = ImageColorAllocate ($im, 0, 0, 0);
$gruen = ImageColorAllocate ($im, 0, 255, 0);
$rot = ImageColorAllocate ($im, 255, 0, 0);
$blau = ImageColorAllocate ($im, 0, 0, 160);
$gelb = ImageColorAllocate ($im, 255, 255, 0);

$timestamp=time();
$timestamp-=($tag*86400);

$akttag=date("j",$timestamp);
$aktmonat=date("m",$timestamp);
$aktjahr=date("Y",$timestamp);

$firsttime=mktime(0, 0, 0, $aktmonat, $akttag, $aktjahr);
$lasttime=mktime(0, 0, 0, $aktmonat, $akttag+1, $aktjahr);

$maxwert=0;
$hourlines=array();
$sql="SELECT MIN(timestamp), MAX(timestamp) FROM sddata_1 WHERE timestamp>=UNIX_TIMESTAMP('".strftime("%Y-%m-%d %H:%M", $firsttime)."') AND timestamp<UNIX_TIMESTAMP('".strftime("%Y-%m-%d %H:%M", $lasttime)."')";
$result = mysqli_query($link, $sql);
$result0=mysqli_fetch_array($result);
if (!is_null($result0[0])) {
	$secondstoday=$result0[1]-$result0[0];
	$firsttime=$result0[0];
	$lasttime=$result0[1];
	$sql="SELECT timestamp, Pac FROM sddata_1 WHERE timestamp>=".$firsttime." AND timestamp<=".$lasttime." ORDER BY timestamp";
	$result = mysqli_query($link, $sql);
	while ($result0=mysqli_fetch_array($result)) {
		$hpos=floor(($result0[0]-$firsttime)/$secondstoday*720);
		$wert[0][$hpos]+=$result0[1];
		$count[0][$hpos]++;
		if (($wert[0][$hpos]/$count[0][$hpos])>$maxwert) {
			$maxwert=$wert[0][$hpos]/$count[0][$hpos];
		}
		if ((strftime("%M",$result0[0])=="00") || ($result0[0]==$firsttime) || ($result0[0]==$lasttime)) {
			if (($result0[0]<>$lasttime) || (strftime("%M",$result0[0])>12)) { 
				$hourlines[strftime("%H:%M",$result0[0])]=$hpos;
			}
		}
	}

	$punkte[0]=array($borderleft,$height+$bordertop); #Anfangspunkt festlegen
	#$punkte[1]=array($borderleft,$height+$bordertop);
	if ($maxwert==0) {
		$maxwert=0.00001;
	}
	$heightperwert=$height/$maxwert;
	for ($i=0;$i<=$hpos;$i++) {
		if (isset($count[0][$i])) {
			if ($count[0][$i]>0) { #Durchschnittswert bilden
				$wert[0][$i]=$wert[0][$i]/$count[0][$i];
			}
			if ($wert[0][$i]==0) {
				array_push($punkte[0], $i+$borderleft, $height+$bordertop);
			} else {
				array_push($punkte[0], $i+$borderleft, $height-(floor($wert[0][$i]))*$heightperwert+$bordertop);
			}
#			if ((floor($wert[1][$i]))==0) {
#				array_push($punkte[1], $i+$borderleft, $height+$bordertop);
#			} else {
#				array_push($punkte[1], $i+$borderleft, $height-(floor($wert[1][$i]))*$heightperwert+$bordertop);
#			}
		}
	}
#	array_push($punkte[0], $width+$borderleft, $height+$bordertop);
#	array_push($punkte[1], $width+$borderleft, $height+$bordertop);

	#senkrechte Linien malen und beschriften
	reset($hourlines);
	$pos=current($hourlines);
#	ImageString($im, 1, $pos+$borderleft-10, $height+$bordertop+3, key($hourlines), $schwarz);
	ImageTTFText($im, 7, 60, $pos+$borderleft-5, $height+$bordertop+25, $schwarz, $ttf, key($hourlines));
	next($hourlines);
	while ($pos=current($hourlines)) {
		ImageLine($im, $pos+$borderleft, $bordertop, $pos+$borderleft, $height+$bordertop, $dunkelgrau);
#		ImageString($im, 1, $pos+$borderleft-12, $height+$bordertop+3, key($hourlines), $schwarz);
		ImageTTFText($im, 7, 60, $pos+$borderleft-5, $height+$bordertop+25, $schwarz, $ttf, key($hourlines));
		next($hourlines);
	}

	#horizontale Linien malen
	for ($i=0;$i<4;$i++) {
		ImageLine($im, $borderleft, $i*floor($height/4)+$bordertop, $width+$borderleft, $i*floor($height/4)+$bordertop, $dunkelgrau);
		ImageString($im, 1, $borderleft-18, $height-($i+1)*floor($height/4)+$bordertop-4, floor($maxwert*($i+1)/4), $schwarz);
	}
	ImageString($im, 1, $borderleft-10, $height+$bordertop-7, 0, $schwarz);

	for ($i=1;$i<(sizeof($punkte[0])/2);$i++) {
		ImageLine($im, $punkte[0][2*($i-1)], $punkte[0][2*($i-1)+1], $punkte[0][2*$i], $punkte[0][2*$i+1], $rot);
	}

	ImageLine($im, $borderleft, $bordertop+$height, $borderleft+$width, $bordertop+$height, $schwarz);
	ImageLine($im, $borderleft, $bordertop, $borderleft, $bordertop+$height, $schwarz);
	ImageLine($im, $borderleft, $bordertop, $borderleft+$width, $bordertop, $schwarz);
	ImageLine($im, $borderleft+$width, $bordertop, $borderleft+$width, $bordertop+$height, $schwarz);

	$titlestring="AC-Power Pac in W (";
	switch ($tag) {
		case 0: $titlestring.="today"; break;
		case 1: $titlestring.="yesterday"; break;
		case 2: $titlestring.="day before yesterday"; break;
		case 3: $titlestring.="3 days ago"; break;
	}
	$titlestring.=")";
	ImageString($im, 3, $borderleft, $height+$bordertop+28, $titlestring, $schwarz);
#	$titlestring="Green line: count of really accepted emails (spams already excluded)";
#	ImageString($im, 3, $borderleft, $height+$bordertop+30, $titlestring, $schwarz);
} else {
	ImageString($im, 3, $borderleft, $height+$bordertop+30, "no data available", $schwarz);
}

ImagePNG ($im);
?>