0
0
Fork 0
mirror of https://github.com/salesagility/SuiteCRM.git synced 2025-03-16 22:33:34 +00:00
salesagility_SuiteCRM/modules/AOR_Charts/lib/pChart/class/pSurface.class.php
2018-07-13 06:54:51 +01:00

355 lines
No EOL
15 KiB
PHP

<?php
/*
pSurface - class to draw surface charts
Version : 2.1.4
Made by : Jean-Damien POGOLOTTI
Last Update : 19/01/2014
This file can be distributed under the license you can find at :
http://www.pchart.net/license
You can find the whole class documentation on the pChart web site.
*/
define("UNKNOWN" , 0.123456789);
define("IGNORED" , -1);
define("LABEL_POSITION_LEFT" , 880001);
define("LABEL_POSITION_RIGHT" , 880002);
define("LABEL_POSITION_TOP" , 880003);
define("LABEL_POSITION_BOTTOM" , 880004);
/* pStock class definition */
class pSurface
{
public $pChartObject;
public $GridSizeX;
public $GridSizeY;
public $Points;
/* Class creator */
public function pSurface($pChartObject)
{
$this->pChartObject = $pChartObject;
$this->GridSize = 10;
$this->Points = "";
}
/* Define the grid size and initialise the 2D matrix */
public function setGrid($XSize=10,$YSize=10)
{
for ($X=0; $X<=$XSize; $X++) {
for ($Y=0; $Y<=$YSize; $Y++) {
$this->Points[$X][$Y]=UNKNOWN;
}
}
$this->GridSizeX = $XSize;
$this->GridSizeY = $YSize;
}
/* Add a point on the grid */
public function addPoint($X,$Y,$Value,$Force=TRUE)
{
if ($X < 0 || $X >$this->GridSizeX) {
return(0);
}
if ($Y < 0 || $Y >$this->GridSizeY) {
return(0);
}
if ($this->Points[$X][$Y] == UNKNOWN || $Force) {
$this->Points[$X][$Y] = $Value;
} elseif ($this->Points[$X][$Y] == UNKNOWN) {
$this->Points[$X][$Y] = $Value;
} else {
$this->Points[$X][$Y] = ($this->Points[$X][$Y] + $Value)/2;
}
}
/* Write the X labels */
public function writeXLabels($Format="")
{
$R = isset($Format["R"]) ? $Format["R"] : $this->pChartObject->FontColorR;
$G = isset($Format["G"]) ? $Format["G"] : $this->pChartObject->FontColorG;
$B = isset($Format["B"]) ? $Format["B"] : $this->pChartObject->FontColorB;
$Alpha = isset($Format["Alpha"]) ? $Format["Alpha"] : $this->pChartObject->FontColorA;
$Angle = isset($Format["Angle"]) ? $Format["Angle"] : 0;
$Padding = isset($Format["Padding"]) ? $Format["Padding"] : 5;
$Position = isset($Format["Position"]) ? $Format["Position"] : LABEL_POSITION_TOP;
$Labels = isset($Format["Labels"]) ? $Format["Labels"] : NULL;
$CountOffset = isset($Format["CountOffset"]) ? $Format["CountOffset"] : 0;
if ($Labels != NULL && !is_array($Labels)) {
$Label = $Labels;
$Labels = "";
$Labels[] = $Label;
}
$X0 = $this->pChartObject->GraphAreaX1;
$XSize = ($this->pChartObject->GraphAreaX2 - $this->pChartObject->GraphAreaX1) / ($this->GridSizeX+1);
$Settings = array("Angle"=>$Angle,"R"=>$R,"G"=>$G,"B"=>$B,"Alpha"=>$Alpha);
if ($Position == LABEL_POSITION_TOP) {
$YPos = $this->pChartObject->GraphAreaY1 - $Padding;
if ($Angle == 0) {
$Settings["Align"] = TEXT_ALIGN_BOTTOMMIDDLE;
}
if ($Angle != 0) {
$Settings["Align"] = TEXT_ALIGN_MIDDLELEFT;
}
} elseif ($Position == LABEL_POSITION_BOTTOM) {
$YPos = $this->pChartObject->GraphAreaY2 + $Padding;
if ($Angle == 0) {
$Settings["Align"] = TEXT_ALIGN_TOPMIDDLE;
}
if ($Angle != 0) {
$Settings["Align"] = TEXT_ALIGN_MIDDLERIGHT;
}
} else {
return(-1);
}
for ($X=0;$X<=$this->GridSizeX;$X++) {
$XPos = floor($X0+$X*$XSize + $XSize/2);
if ($Labels == NULL || !isset($Labels[$X])) {
$Value = $X+$CountOffset;
} else {
$Value = $Labels[$X];
}
$this->pChartObject->drawText($XPos,$YPos,$Value,$Settings);
}
}
/* Write the Y labels */
public function writeYLabels($Format="")
{
$R = isset($Format["R"]) ? $Format["R"] : $this->pChartObject->FontColorR;
$G = isset($Format["G"]) ? $Format["G"] : $this->pChartObject->FontColorG;
$B = isset($Format["B"]) ? $Format["B"] : $this->pChartObject->FontColorB;
$Alpha = isset($Format["Alpha"]) ? $Format["Alpha"] : $this->pChartObject->FontColorA;
$Angle = isset($Format["Angle"]) ? $Format["Angle"] : 0;
$Padding = isset($Format["Padding"]) ? $Format["Padding"] : 5;
$Position = isset($Format["Position"]) ? $Format["Position"] : LABEL_POSITION_LEFT;
$Labels = isset($Format["Labels"]) ? $Format["Labels"] : NULL;
$CountOffset = isset($Format["CountOffset"]) ? $Format["CountOffset"] : 0;
if ($Labels != NULL && !is_array($Labels)) {
$Label = $Labels;
$Labels = "";
$Labels[] = $Label;
}
$Y0 = $this->pChartObject->GraphAreaY1;
$YSize = ($this->pChartObject->GraphAreaY2 - $this->pChartObject->GraphAreaY1) / ($this->GridSizeY+1);
$Settings = array("Angle"=>$Angle,"R"=>$R,"G"=>$G,"B"=>$B,"Alpha"=>$Alpha);
if ($Position == LABEL_POSITION_LEFT) {
$XPos = $this->pChartObject->GraphAreaX1 - $Padding;
$Settings["Align"] = TEXT_ALIGN_MIDDLERIGHT;
} elseif ($Position == LABEL_POSITION_RIGHT) {
$XPos = $this->pChartObject->GraphAreaX2 + $Padding;
$Settings["Align"] = TEXT_ALIGN_MIDDLELEFT;
} else {
return(-1);
}
for ($Y=0;$Y<=$this->GridSizeY;$Y++) {
$YPos = floor($Y0+$Y*$YSize + $YSize/2);
if ($Labels == NULL || !isset($Labels[$Y])) {
$Value = $Y+$CountOffset;
} else {
$Value = $Labels[$Y];
}
$this->pChartObject->drawText($XPos,$YPos,$Value,$Settings);
}
}
/* Draw the area arround the specified Threshold */
public function drawContour($Threshold,$Format="")
{
$R = isset($Format["R"]) ? $Format["R"] : 0;
$G = isset($Format["G"]) ? $Format["G"] : 0;
$B = isset($Format["B"]) ? $Format["B"] : 0;
$Alpha = isset($Format["Alpha"]) ? $Format["Alpha"] : 100;
$Ticks = isset($Format["Ticks"]) ? $Format["Ticks"] : 3;
$Padding = isset($Format["Padding"]) ? $Format["Padding"] : 0;
$X0 = $this->pChartObject->GraphAreaX1;
$Y0 = $this->pChartObject->GraphAreaY1;
$XSize = ($this->pChartObject->GraphAreaX2 - $this->pChartObject->GraphAreaX1) / ($this->GridSizeX+1);
$YSize = ($this->pChartObject->GraphAreaY2 - $this->pChartObject->GraphAreaY1) / ($this->GridSizeY+1);
$Color = array("R"=>$R,"G"=>$G,"B"=>$B,"Alpha"=>$Alpha,"Ticks"=>$Ticks);
for ($X=0;$X<=$this->GridSizeX;$X++) {
for ($Y=0;$Y<=$this->GridSizeY;$Y++) {
$Value = $this->Points[$X][$Y];
if ($Value != UNKNOWN && $Value != IGNORED && $Value >= $Threshold) {
$X1 = floor($X0+$X*$XSize)+$Padding;
$Y1 = floor($Y0+$Y*$YSize)+$Padding;
$X2 = floor($X0+$X*$XSize+$XSize);
$Y2 = floor($Y0+$Y*$YSize+$YSize);
if ($X > 0 && $this->Points[$X-1][$Y] != UNKNOWN && $this->Points[$X-1][$Y] != IGNORED && $this->Points[$X-1][$Y] < $Threshold) {
$this->pChartObject->drawLine($X1,$Y1,$X1,$Y2,$Color);
}
if ($Y > 0 && $this->Points[$X][$Y-1] != UNKNOWN && $this->Points[$X][$Y-1] != IGNORED && $this->Points[$X][$Y-1] < $Threshold) {
$this->pChartObject->drawLine($X1,$Y1,$X2,$Y1,$Color);
}
if ($X < $this->GridSizeX && $this->Points[$X+1][$Y] != UNKNOWN && $this->Points[$X+1][$Y] != IGNORED && $this->Points[$X+1][$Y] < $Threshold) {
$this->pChartObject->drawLine($X2,$Y1,$X2,$Y2,$Color);
}
if ($Y < $this->GridSizeY && $this->Points[$X][$Y+1] != UNKNOWN && $this->Points[$X][$Y+1] != IGNORED && $this->Points[$X][$Y+1] < $Threshold) {
$this->pChartObject->drawLine($X1,$Y2,$X2,$Y2,$Color);
}
}
}
}
}
/* Draw the surface chart */
public function drawSurface($Format="")
{
$Palette = isset($Format["Palette"]) ? $Format["Palette"] : NULL;
$ShadeR1 = isset($Format["ShadeR1"]) ? $Format["ShadeR1"] : 77;
$ShadeG1 = isset($Format["ShadeG1"]) ? $Format["ShadeG1"] : 205;
$ShadeB1 = isset($Format["ShadeB1"]) ? $Format["ShadeB1"] : 21;
$ShadeA1 = isset($Format["ShadeA1"]) ? $Format["ShadeA1"] : 40;
$ShadeR2 = isset($Format["ShadeR2"]) ? $Format["ShadeR2"] : 227;
$ShadeG2 = isset($Format["ShadeG2"]) ? $Format["ShadeG2"] : 135;
$ShadeB2 = isset($Format["ShadeB2"]) ? $Format["ShadeB2"] : 61;
$ShadeA2 = isset($Format["ShadeA2"]) ? $Format["ShadeA2"] : 100;
$Border = isset($Format["Border"]) ? $Format["Border"] : FALSE;
$BorderR = isset($Format["BorderR"]) ? $Format["BorderR"] : 0;
$BorderG = isset($Format["BorderG"]) ? $Format["BorderG"] : 0;
$BorderB = isset($Format["BorderB"]) ? $Format["BorderB"] : 0;
$Surrounding = isset($Format["Surrounding"]) ? $Format["Surrounding"] : -1;
$Padding = isset($Format["Padding"]) ? $Format["Padding"] : 1;
$X0 = $this->pChartObject->GraphAreaX1;
$Y0 = $this->pChartObject->GraphAreaY1;
$XSize = ($this->pChartObject->GraphAreaX2 - $this->pChartObject->GraphAreaX1) / ($this->GridSizeX+1);
$YSize = ($this->pChartObject->GraphAreaY2 - $this->pChartObject->GraphAreaY1) / ($this->GridSizeY+1);
for ($X=0;$X<=$this->GridSizeX;$X++) {
for ($Y=0;$Y<=$this->GridSizeY;$Y++) {
$Value = $this->Points[$X][$Y];
if ($Value != UNKNOWN && $Value != IGNORED) {
$X1 = floor($X0+$X*$XSize)+$Padding;
$Y1 = floor($Y0+$Y*$YSize)+$Padding;
$X2 = floor($X0+$X*$XSize+$XSize);
$Y2 = floor($Y0+$Y*$YSize+$YSize);
if ($Palette != NULL) {
if (isset($Palette[$Value]) && isset($Palette[$Value]["R"])) {
$R = $Palette[$Value]["R"];
} else {
$R = 0;
}
if (isset($Palette[$Value]) && isset($Palette[$Value]["G"])) {
$G = $Palette[$Value]["G"];
} else {
$G = 0;
}
if (isset($Palette[$Value]) && isset($Palette[$Value]["B"])) {
$B = $Palette[$Value]["B"];
} else {
$B = 0;
}
if (isset($Palette[$Value]) && isset($Palette[$Value]["Alpha"])) {
$Alpha = $Palette[$Value]["Alpha"];
} else {
$Alpha = 1000;
}
} else {
$R = (($ShadeR2-$ShadeR1)/100)*$Value + $ShadeR1;
$G = (($ShadeG2-$ShadeG1)/100)*$Value + $ShadeG1;
$B = (($ShadeB2-$ShadeB1)/100)*$Value + $ShadeB1;
$Alpha = (($ShadeA2-$ShadeA1)/100)*$Value + $ShadeA1;
}
$Settings = array("R"=>$R,"G"=>$G,"B"=>$B,"Alpha"=>$Alpha);
if ($Border) {
$Settings["BorderR"] = $BorderR;
$Settings["BorderG"] = $BorderG;
$Settings["BorderB"] = $BorderB;
}
if ($Surrounding != -1) {
$Settings["BorderR"] = $R+$Surrounding;
$Settings["BorderG"] = $G+$Surrounding;
$Settings["BorderB"] = $B+$Surrounding;
}
$this->pChartObject->drawFilledRectangle($X1,$Y1,$X2-1,$Y2-1,$Settings);
}
}
}
}
/* Compute the missing points */
public function computeMissing()
{
$Missing = "";
for ($X=0;$X<=$this->GridSizeX;$X++) {
for ($Y=0;$Y<=$this->GridSizeY;$Y++) {
if ($this->Points[$X][$Y] == UNKNOWN) {
$Missing[] = $X.",".$Y;
}
}
}
shuffle($Missing);
foreach ($Missing as $Key => $Pos) {
$Pos = preg_split("/,/",$Pos);
$X = $Pos[0];
$Y = $Pos[1];
if ($this->Points[$X][$Y] == UNKNOWN) {
$NearestNeighbor = $this->getNearestNeighbor($X,$Y);
$Value = 0;
$Points = 0;
for ($Xi=$X-$NearestNeighbor;$Xi<=$X+$NearestNeighbor;$Xi++) {
for ($Yi=$Y-$NearestNeighbor;$Yi<=$Y+$NearestNeighbor;$Yi++) {
if ($Xi >=0 && $Yi >= 0 && $Xi <= $this->GridSizeX && $Yi <= $this->GridSizeY && $this->Points[$Xi][$Yi] != UNKNOWN && $this->Points[$Xi][$Yi] != IGNORED) {
$Value = $Value + $this->Points[$Xi][$Yi];
$Points++;
}
}
}
if ($Points != 0) {
$this->Points[$X][$Y] = $Value / $Points;
}
}
}
}
/* Return the nearest Neighbor distance of a point */
public function getNearestNeighbor($Xp,$Yp)
{
$Nearest = UNKNOWN;
for ($X=0;$X<=$this->GridSizeX;$X++) {
for ($Y=0;$Y<=$this->GridSizeY;$Y++) {
if ($this->Points[$X][$Y] != UNKNOWN && $this->Points[$X][$Y] != IGNORED) {
$DistanceX = max($Xp,$X)-min($Xp,$X);
$DistanceY = max($Yp,$Y)-min($Yp,$Y);
$Distance = max($DistanceX,$DistanceY);
if ($Distance < $Nearest || $Nearest == UNKNOWN) {
$Nearest = $Distance;
}
}
}
}
return($Nearest);
}
}