0
0
mirror of https://github.com/salesagility/SuiteCRM.git synced 2024-12-22 20:38:31 +00:00
salesagility_SuiteCRM/modules/AOR_Charts/lib/pChart/class/pImage.class.php
2023-07-18 15:53:48 +01:00

587 lines
23 KiB
PHP

<?php
/*
pDraw - pChart core class
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.
*/
/* The GD extension is mandatory */
if (!extension_loaded('gd') && !extension_loaded('gd2')) {
echo "GD extension must be loaded. \r\n";
exit();
}
/* Image map handling */
define("IMAGE_MAP_STORAGE_FILE", 680001);
define("IMAGE_MAP_STORAGE_SESSION", 680002);
/* Last generated chart layout */
define("CHART_LAST_LAYOUT_REGULAR", 680011);
define("CHART_LAST_LAYOUT_STACKED", 680012);
/* ImageMap string delimiter */
define("IMAGE_MAP_DELIMITER", chr(1));
#[\AllowDynamicProperties]
class pImage extends pDraw
{
/* Image settings, size, quality, .. */
public $XSize = null; // Width of the picture
public $YSize = null; // Height of the picture
public $Picture = null; // GD picture object
public $Antialias = true; // Turn antialias on or off
public $AntialiasQuality = 0; // Quality of the antialiasing implementation (0-1)
public $Mask = ""; // Already drawn pixels mask (Filled circle implementation)
public $TransparentBackground = false; // Just to know if we need to flush the alpha channels when rendering
/* Graph area settings */
public $GraphAreaX1 = null; // Graph area X origin
public $GraphAreaY1 = null; // Graph area Y origin
public $GraphAreaX2 = null; // Graph area bottom right X position
public $GraphAreaY2 = null; // Graph area bottom right Y position
/* Scale settings */
public $ScaleMinDivHeight = 20; // Minimum height for scame divs
/* Font properties */
public $FontName = "fonts/GeosansLight.ttf"; // Default font file
public $FontSize = 12; // Default font size
public $FontBox = null; // Return the bounding box of the last written string
public $FontColorR = 0; // Default color settings
public $FontColorG = 0; // Default color settings
public $FontColorB = 0; // Default color settings
public $FontColorA = 100; // Default transparency
/* Shadow properties */
public $Shadow = false; // Turn shadows on or off
public $ShadowX = null; // X Offset of the shadow
public $ShadowY = null; // Y Offset of the shadow
public $ShadowR = null; // R component of the shadow
public $ShadowG = null; // G component of the shadow
public $ShadowB = null; // B component of the shadow
public $Shadowa = null; // Alpha level of the shadow
/* Image map */
public $ImageMap = null; // Aray containing the image map
public $ImageMapIndex = "pChart"; // Name of the session array
public $ImageMapStorageMode = null; // Save the current imagemap storage mode
public $ImageMapAutoDelete = true; // Automatic deletion of the image map temp files
/* Data Set */
public $DataSet = null; // Attached dataset
/* Last generated chart info */
public $LastChartLayout = CHART_LAST_LAYOUT_REGULAR; // Last layout : regular or stacked
/* Class constructor */
public function __construct($XSize, $YSize, $DataSet = null, $TransparentBackground = false)
{
$this->TransparentBackground = $TransparentBackground;
if ($DataSet != null) {
$this->DataSet = $DataSet;
}
$this->XSize = $XSize;
$this->YSize = $YSize;
$this->Picture = imagecreatetruecolor($XSize, $YSize);
if ($this->TransparentBackground) {
imagealphablending($this->Picture, false);
imagefilledrectangle($this->Picture, 0, 0, $XSize, $YSize, imagecolorallocatealpha($this->Picture, 255, 255, 255, 127));
imagealphablending($this->Picture, true);
imagesavealpha($this->Picture, true);
} else {
$C_White = $this->AllocateColor($this->Picture, 255, 255, 255);
imagefilledrectangle($this->Picture, 0, 0, $XSize, $YSize, $C_White);
}
}
/* Enable / Disable and set shadow properties */
public function setShadow($Enabled=true, $Format="")
{
$X = isset($Format["X"]) ? $Format["X"] : 2;
$Y = isset($Format["Y"]) ? $Format["Y"] : 2;
$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"] : 10;
$this->Shadow = $Enabled;
$this->ShadowX = $X;
$this->ShadowY = $Y;
$this->ShadowR = $R;
$this->ShadowG = $G;
$this->ShadowB = $B;
$this->Shadowa = $Alpha;
}
/* Set the graph area position */
public function setGraphArea($X1, $Y1, $X2, $Y2)
{
if ($X2 < $X1 || $X1 == $X2 || $Y2 < $Y1 || $Y1 == $Y2) {
return(-1);
}
$this->GraphAreaX1 = $X1;
$this->DataSet->Data["GraphArea"]["X1"] = $X1;
$this->GraphAreaY1 = $Y1;
$this->DataSet->Data["GraphArea"]["Y1"] = $Y1;
$this->GraphAreaX2 = $X2;
$this->DataSet->Data["GraphArea"]["X2"] = $X2;
$this->GraphAreaY2 = $Y2;
$this->DataSet->Data["GraphArea"]["Y2"] = $Y2;
}
/* Return the width of the picture */
public function getWidth()
{
return($this->XSize);
}
/* Return the heigth of the picture */
public function getHeight()
{
return($this->YSize);
}
/* Render the picture to a file */
public function render($FileName)
{
if ($this->TransparentBackground) {
imagealphablending($this->Picture, false);
imagesavealpha($this->Picture, true);
}
imagepng($this->Picture, $FileName);
}
/* Render the picture to a web browser stream */
public function stroke($BrowserExpire=false)
{
if ($this->TransparentBackground) {
imagealphablending($this->Picture, false);
imagesavealpha($this->Picture, true);
}
if ($BrowserExpire) {
header("Expires: Mon, 26 Jul 1997 05:00:00 GMT");
header("Cache-Control: no-cache");
header("Pragma: no-cache");
}
header('Content-type: image/png');
imagepng($this->Picture);
}
/* Automatic output method based on the calling interface */
public function autoOutput($FileName="output.png")
{
if (php_sapi_name() == "cli") {
$this->Render($FileName);
} else {
$this->Stroke();
}
}
/* Return the length between two points */
public function getLength($X1, $Y1, $X2, $Y2)
{
return(sqrt(pow(max($X1, $X2)-min($X1, $X2), 2)+pow(max($Y1, $Y2)-min($Y1, $Y2), 2)));
}
/* Return the orientation of a line */
public function getAngle($X1, $Y1, $X2, $Y2)
{
$Opposite = $Y2 - $Y1;
$Adjacent = $X2 - $X1;
$Angle = rad2deg(atan2($Opposite, $Adjacent));
if ($Angle > 0) {
return($Angle);
}
return(360-abs($Angle));
}
/* Return the surrounding box of text area */
public function getTextBox_deprecated($X, $Y, $FontName, $FontSize, $Angle, $Text)
{
$Size = imagettfbbox($FontSize, $Angle, $FontName, $Text);
$Width = $this->getLength($Size[0], $Size[1], $Size[2], $Size[3])+1;
$Height = $this->getLength($Size[2], $Size[3], $Size[4], $Size[5])+1;
$RealPos = [];
$RealPos[0]["X"] = $X;
$RealPos[0]["Y"] = $Y;
$RealPos[1]["X"] = cos((360-$Angle)*PI/180)*$Width + $RealPos[0]["X"];
$RealPos[1]["Y"] = sin((360-$Angle)*PI/180)*$Width + $RealPos[0]["Y"];
$RealPos[2]["X"] = cos((270-$Angle)*PI/180)*$Height + $RealPos[1]["X"];
$RealPos[2]["Y"] = sin((270-$Angle)*PI/180)*$Height + $RealPos[1]["Y"];
$RealPos[3]["X"] = cos((180-$Angle)*PI/180)*$Width + $RealPos[2]["X"];
$RealPos[3]["Y"] = sin((180-$Angle)*PI/180)*$Width + $RealPos[2]["Y"];
$RealPos[TEXT_ALIGN_BOTTOMLEFT]["X"] = $RealPos[0]["X"];
$RealPos[TEXT_ALIGN_BOTTOMLEFT]["Y"] = $RealPos[0]["Y"];
$RealPos[TEXT_ALIGN_BOTTOMRIGHT]["X"] = $RealPos[1]["X"];
$RealPos[TEXT_ALIGN_BOTTOMRIGHT]["Y"] = $RealPos[1]["Y"];
return($RealPos);
}
/* Return the surrounding box of text area */
public function getTextBox($X, $Y, $FontName, $FontSize, $Angle, $Text)
{
$coords = imagettfbbox($FontSize, 0, $FontName, $Text);
$a = deg2rad($Angle);
$ca = cos($a);
$sa = sin($a);
$RealPos = array();
for ($i = 0; $i < 7; $i += 2) {
$RealPos[$i/2]["X"] = $X + round($coords[$i] * $ca + $coords[$i+1] * $sa);
$RealPos[$i/2]["Y"] = $Y + round($coords[$i+1] * $ca - $coords[$i] * $sa);
}
$RealPos[TEXT_ALIGN_BOTTOMLEFT]["X"] = $RealPos[0]["X"];
$RealPos[TEXT_ALIGN_BOTTOMLEFT]["Y"] = $RealPos[0]["Y"];
$RealPos[TEXT_ALIGN_BOTTOMRIGHT]["X"] = $RealPos[1]["X"];
$RealPos[TEXT_ALIGN_BOTTOMRIGHT]["Y"] = $RealPos[1]["Y"];
$RealPos[TEXT_ALIGN_TOPLEFT]["X"] = $RealPos[3]["X"];
$RealPos[TEXT_ALIGN_TOPLEFT]["Y"] = $RealPos[3]["Y"];
$RealPos[TEXT_ALIGN_TOPRIGHT]["X"] = $RealPos[2]["X"];
$RealPos[TEXT_ALIGN_TOPRIGHT]["Y"] = $RealPos[2]["Y"];
$RealPos[TEXT_ALIGN_BOTTOMMIDDLE]["X"] = ($RealPos[1]["X"]-$RealPos[0]["X"])/2+$RealPos[0]["X"];
$RealPos[TEXT_ALIGN_BOTTOMMIDDLE]["Y"] = ($RealPos[0]["Y"]-$RealPos[1]["Y"])/2+$RealPos[1]["Y"];
$RealPos[TEXT_ALIGN_TOPMIDDLE]["X"] = ($RealPos[2]["X"]-$RealPos[3]["X"])/2+$RealPos[3]["X"];
$RealPos[TEXT_ALIGN_TOPMIDDLE]["Y"] = ($RealPos[3]["Y"]-$RealPos[2]["Y"])/2+$RealPos[2]["Y"];
$RealPos[TEXT_ALIGN_MIDDLELEFT]["X"] = ($RealPos[0]["X"]-$RealPos[3]["X"])/2+$RealPos[3]["X"];
$RealPos[TEXT_ALIGN_MIDDLELEFT]["Y"] = ($RealPos[0]["Y"]-$RealPos[3]["Y"])/2+$RealPos[3]["Y"];
$RealPos[TEXT_ALIGN_MIDDLERIGHT]["X"] = ($RealPos[1]["X"]-$RealPos[2]["X"])/2+$RealPos[2]["X"];
$RealPos[TEXT_ALIGN_MIDDLERIGHT]["Y"] = ($RealPos[1]["Y"]-$RealPos[2]["Y"])/2+$RealPos[2]["Y"];
$RealPos[TEXT_ALIGN_MIDDLEMIDDLE]["X"] = ($RealPos[1]["X"]-$RealPos[3]["X"])/2+$RealPos[3]["X"];
$RealPos[TEXT_ALIGN_MIDDLEMIDDLE]["Y"] = ($RealPos[0]["Y"]-$RealPos[2]["Y"])/2+$RealPos[2]["Y"];
return($RealPos);
}
/* Set current font properties */
public function setFontProperties($Format="")
{
$R = isset($Format["R"]) ? $Format["R"] : -1;
$G = isset($Format["G"]) ? $Format["G"] : -1;
$B = isset($Format["B"]) ? $Format["B"] : -1;
$Alpha = isset($Format["Alpha"]) ? $Format["Alpha"] : 100;
$FontName = isset($Format["FontName"]) ? $Format["FontName"] : null;
$FontSize = isset($Format["FontSize"]) ? $Format["FontSize"] : null;
if ($R != -1) {
$this->FontColorR = $R;
}
if ($G != -1) {
$this->FontColorG = $G;
}
if ($B != -1) {
$this->FontColorB = $B;
}
if ($Alpha != null) {
$this->FontColorA = $Alpha;
}
if ($FontName != null) {
$this->FontName = $FontName;
}
if ($FontSize != null) {
$this->FontSize = $FontSize;
}
}
/* Returns the 1st decimal values (used to correct AA bugs) */
public function getFirstDecimal($Value)
{
$Values = preg_split("/\./", (string) $Value);
if (isset($Values[1])) {
return(substr($Values[1], 0, 1));
}
return(0);
}
/* Attach a dataset to your pChart Object */
public function setDataSet(&$DataSet)
{
$this->DataSet = $DataSet;
}
/* Print attached dataset contents to STDOUT */
public function printDataSet()
{
print_r($this->DataSet);
}
/* Initialise the image map methods */
public function initialiseImageMap($Name="pChart", $StorageMode=IMAGE_MAP_STORAGE_SESSION, $UniqueID="imageMap", $StorageFolder="tmp")
{
$this->ImageMapIndex = $Name;
$this->ImageMapStorageMode = $StorageMode;
if ($StorageMode == IMAGE_MAP_STORAGE_SESSION) {
if (!isset($_SESSION)) {
session_start();
}
$_SESSION[$this->ImageMapIndex] = null;
} elseif ($StorageMode == IMAGE_MAP_STORAGE_FILE) {
$this->ImageMapFileName = $UniqueID;
$this->ImageMapStorageFolder = $StorageFolder;
if (file_exists($StorageFolder."/".$UniqueID.".map")) {
unlink($StorageFolder."/".$UniqueID.".map");
}
}
}
/* Add a zone to the image map */
public function addToImageMap($Type, $Plots, $Color=null, $Title=null, $Message=null, $HTMLEncode=false)
{
if ($this->ImageMapStorageMode == null) {
$this->initialiseImageMap();
}
/* Encode the characters in the imagemap in HTML standards */
$Title = str_replace("&#8364;", "\u20AC", (string) $Title);
$Title = htmlentities($Title, ENT_QUOTES, "ISO-8859-15");
if ($HTMLEncode) {
$Message = htmlentities((string) $Message, ENT_QUOTES, "ISO-8859-15");
$Message = str_replace("&lt;", "<", $Message);
$Message = str_replace("&gt;", ">", $Message);
}
if ($this->ImageMapStorageMode == IMAGE_MAP_STORAGE_SESSION) {
if (!isset($_SESSION)) {
$this->initialiseImageMap();
}
$_SESSION[$this->ImageMapIndex][] = array($Type,$Plots,$Color,$Title,$Message);
} elseif ($this->ImageMapStorageMode == IMAGE_MAP_STORAGE_FILE) {
$Handle = fopen($this->ImageMapStorageFolder."/".$this->ImageMapFileName.".map", 'ab');
fwrite($Handle, $Type.IMAGE_MAP_DELIMITER.$Plots.IMAGE_MAP_DELIMITER.$Color.IMAGE_MAP_DELIMITER.$Title.IMAGE_MAP_DELIMITER.$Message."\r\n");
fclose($Handle);
}
}
/* Remove VOID values from an imagemap custom values array */
public function removeVOIDFromArray($SerieName, $Values)
{
if (!isset($this->DataSet->Data["Series"][$SerieName])) {
return(-1);
}
$Result = [];
foreach ($this->DataSet->Data["Series"][$SerieName]["Data"] as $Key => $Value) {
if ($Value != VOID && isset($Values[$Key])) {
$Result[] = $Values[$Key];
}
}
return($Result);
}
/* Replace the title of one image map serie */
public function replaceImageMapTitle($OldTitle, $NewTitle)
{
if ($this->ImageMapStorageMode == null) {
return(-1);
}
if (is_array($NewTitle)) {
$NewTitle = $this->removeVOIDFromArray($OldTitle, $NewTitle);
}
if ($this->ImageMapStorageMode == IMAGE_MAP_STORAGE_SESSION) {
if (!isset($_SESSION)) {
return(-1);
}
if (is_array($NewTitle)) {
$ID = 0;
foreach ($_SESSION[$this->ImageMapIndex] as $Key => $Settings) {
if ($Settings[3] == $OldTitle && isset($NewTitle[$ID])) {
$_SESSION[$this->ImageMapIndex][$Key][3] = $NewTitle[$ID];
$ID++;
}
}
} else {
foreach ($_SESSION[$this->ImageMapIndex] as $Key => $Settings) {
if ($Settings[3] == $OldTitle) {
$_SESSION[$this->ImageMapIndex][$Key][3] = $NewTitle;
}
}
}
} elseif ($this->ImageMapStorageMode == IMAGE_MAP_STORAGE_FILE) {
$TempArray = [];
$Handle = @fopen($this->ImageMapStorageFolder."/".$this->ImageMapFileName.".map", 'rb');
if ($Handle) {
while (($Buffer = fgets($Handle, 4096)) !== false) {
$Fields = preg_split("/".IMAGE_MAP_DELIMITER."/", str_replace(array(chr(10),chr(13)), "", $Buffer));
$TempArray[] = array($Fields[0],$Fields[1],$Fields[2],$Fields[3],$Fields[4]);
}
fclose($Handle);
if (is_array($NewTitle)) {
$ID = 0;
foreach ($TempArray as $Key => $Settings) {
if ($Settings[3] == $OldTitle && isset($NewTitle[$ID])) {
$TempArray[$Key][3] = $NewTitle[$ID];
$ID++;
}
}
} else {
foreach ($TempArray as $Key => $Settings) {
if ($Settings[3] == $OldTitle) {
$TempArray[$Key][3] = $NewTitle;
}
}
}
$Handle = fopen($this->ImageMapStorageFolder."/".$this->ImageMapFileName.".map", 'wb');
foreach ($TempArray as $Key => $Settings) {
fwrite($Handle, $Settings[0].IMAGE_MAP_DELIMITER.$Settings[1].IMAGE_MAP_DELIMITER.$Settings[2].IMAGE_MAP_DELIMITER.$Settings[3].IMAGE_MAP_DELIMITER.$Settings[4]."\r\n");
}
fclose($Handle);
}
}
}
/* Replace the values of the image map contents */
public function replaceImageMapValues($Title, $Values)
{
if ($this->ImageMapStorageMode == null) {
return(-1);
}
$Values = $this->removeVOIDFromArray($Title, $Values);
$ID = 0;
if ($this->ImageMapStorageMode == IMAGE_MAP_STORAGE_SESSION) {
if (!isset($_SESSION)) {
return(-1);
}
foreach ($_SESSION[$this->ImageMapIndex] as $Key => $Settings) {
if ($Settings[3] == $Title) {
if (isset($Values[$ID])) {
$_SESSION[$this->ImageMapIndex][$Key][4] = $Values[$ID];
}
$ID++;
}
}
} elseif ($this->ImageMapStorageMode == IMAGE_MAP_STORAGE_FILE) {
$TempArray = [];
$Handle = @fopen($this->ImageMapStorageFolder."/".$this->ImageMapFileName.".map", 'rb');
if ($Handle) {
while (($Buffer = fgets($Handle, 4096)) !== false) {
$Fields = preg_split("/".IMAGE_MAP_DELIMITER."/", str_replace(array(chr(10),chr(13)), "", $Buffer));
$TempArray[] = array($Fields[0],$Fields[1],$Fields[2],$Fields[3],$Fields[4]);
}
fclose($Handle);
foreach ($TempArray as $Key => $Settings) {
if ($Settings[3] == $Title) {
if (isset($Values[$ID])) {
$TempArray[$Key][4] = $Values[$ID];
}
$ID++;
}
}
$Handle = fopen($this->ImageMapStorageFolder."/".$this->ImageMapFileName.".map", 'wb');
foreach ($TempArray as $Key => $Settings) {
fwrite($Handle, $Settings[0].IMAGE_MAP_DELIMITER.$Settings[1].IMAGE_MAP_DELIMITER.$Settings[2].IMAGE_MAP_DELIMITER.$Settings[3].IMAGE_MAP_DELIMITER.$Settings[4]."\r\n");
}
fclose($Handle);
}
}
}
/* Dump the image map */
public function dumpImageMap($Name="pChart", $StorageMode=IMAGE_MAP_STORAGE_SESSION, $UniqueID="imageMap", $StorageFolder="tmp")
{
$this->ImageMapIndex = $Name;
$this->ImageMapStorageMode = $StorageMode;
if ($this->ImageMapStorageMode == IMAGE_MAP_STORAGE_SESSION) {
if (!isset($_SESSION)) {
session_start();
}
if ($_SESSION[$Name] != null) {
foreach ($_SESSION[$Name] as $Key => $Params) {
echo $Params[0].IMAGE_MAP_DELIMITER.$Params[1].IMAGE_MAP_DELIMITER.$Params[2].IMAGE_MAP_DELIMITER.$Params[3].IMAGE_MAP_DELIMITER.$Params[4]."\r\n";
}
}
} elseif ($this->ImageMapStorageMode == IMAGE_MAP_STORAGE_FILE) {
if (file_exists($StorageFolder."/".$UniqueID.".map")) {
$Handle = @fopen($StorageFolder."/".$UniqueID.".map", 'rb');
if ($Handle) {
while (($Buffer = fgets($Handle, 4096)) !== false) {
echo $Buffer;
}
}
fclose($Handle);
if ($this->ImageMapAutoDelete) {
unlink($StorageFolder."/".$UniqueID.".map");
}
}
}
/* When the image map is returned to the client, the script ends */
exit();
}
/* Return the HTML converted color from the RGB composite values */
public function toHTMLColor($R, $G, $B)
{
$R= (int)$R;
$G= (int)$G;
$B= (int)$B;
$R=dechex($R<0?0:($R>255?255:$R));
$G=dechex($G<0?0:($G>255?255:$G));
$B=dechex($B<0?0:($B>255?255:$B));
$Color="#".(strlen($R) < 2?'0':'').$R;
$Color.=(strlen($G) < 2?'0':'').$G;
$Color.= (strlen($B) < 2?'0':'').$B;
return($Color);
}
/* Reverse an array of points */
public function reversePlots($Plots)
{
$Result = [];
for ($i=(is_countable($Plots) ? count($Plots) : 0)-2;$i>=0;$i=$i-2) {
$Result[] = $Plots[$i];
$Result[] = $Plots[$i+1];
}
return($Result);
}
/* Mirror Effect */
public function drawAreaMirror($X, $Y, $Width, $Height, $Format="")
{
$StartAlpha = isset($Format["StartAlpha"]) ? $Format["StartAlpha"] : 80;
$EndAlpha = isset($Format["EndAlpha"]) ? $Format["EndAlpha"] : 0;
$AlphaStep = ($StartAlpha-$EndAlpha)/$Height;
$Picture = imagecreatetruecolor($this->XSize, $this->YSize);
imagecopy($Picture, $this->Picture, 0, 0, 0, 0, $this->XSize, $this->YSize);
for ($i=1;$i<=$Height;$i++) {
if ($Y+($i-1) < $this->YSize && $Y-$i > 0) {
imagecopymerge($Picture, $this->Picture, $X, $Y+($i-1), $X, $Y-$i, $Width, 1, $StartAlpha-$AlphaStep*$i);
}
}
imagecopy($this->Picture, $Picture, 0, 0, 0, 0, $this->XSize, $this->YSize);
}
}