Wavyzz/dolibarr
2
0
Fork 1
mirror of https://github.com/Dolibarr/dolibarr.git synced 2025-12-12 20:41:26 +01:00
Code Issues Packages Projects Releases Wiki Activity
Files
f79f98d68b2c825149ca9762a66a1e15ca4b51c8
dolibarr/htdocs/dolgraph.class.php
Laurent Destailleur 995fc54414 On remplace completement phplot par artichow
2007-12-26 22:35:57 +00:00

699 lines
16 KiB
PHP
Raw Blame History

<?php
/* Copyright (c) 2003-2006 Rodolphe Quiedeville <rodolphe@quiedeville.org>
* Copyright (c) 2004-2007 Laurent Destailleur <eldy@users.sourceforge.net>
*
* 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; either version 2 of the License, or
* (at your option) any later version.
*
* 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.
*
* You should have received a copy of the GNU General Public License
* along with this program; if not, write to the Free Software
* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
*
* $Id$
*/
/**
\file htdocs/dolgraph.class.php
\brief Fichier de la classe mere de gestion des graph
\version $Revision$
\remarks Usage:
$graph_data = array(array('labelA',yA),array('labelB',yB));
array(array('labelA',yA1,...,yAn),array('labelB',yB1,...yBn));
$px = new DolGraph();
$px->SetData($graph_data);
$px->SetMaxValue($px->GetCeilMaxValue());
$px->SetMinValue($px->GetFloorMinValue());
$px->SetTitle("title");
$px->SetLegend(array("Val1","Val2"));
$px->SetWidth(width);
$px->SetHeight(height);
$px->draw("file.png");
*/
/**
\class Graph
\brief Classe mere permettant la gestion des graph
*/
class DolGraph
{
//! Type du graphique
var $type='bars'; // bars, lines, ...
//! Tableau de donnees
var $data; // array(array('abs1',valA1,valB1), array('abs2',valA2,valB2), ...)
var $width=380;
var $height=200;
var $MaxValue=0;
var $MinValue=0;
var $SetShading=0;
var $PrecisionY=-1;
var $SetHorizTickIncrement=-1;
var $SetNumXTicks=-1;
var $Legend=array();
var $LegendWidthMin=0;
var $graph; // Objet Graph (Artichow, Phplot...)
var $error;
var $library=''; // Par defaut on utiliser PHPlot
var $bordercolor; // array(R,G,B)
var $bgcolor; // array(R,G,B)
var $datacolor; // array(array(R,G,B),...)
/**
* Constructeur
*/
function DolGraph()
{
global $conf;
global $theme_bordercolor, $theme_datacolor, $theme_bgcolor, $theme_bgcoloronglet;
// Test si module GD present
$modules_list = get_loaded_extensions();
$isgdinstalled=0;
foreach ($modules_list as $module)
{
if ($module == 'gd') { $isgdinstalled=1; }
}
if (! $isgdinstalled)
{
$this->error="Erreur: Le module GD pour php ne semble pas disponible. Il est requis pour generer les graphiques.";
return -1;
}
// Defini proprietes de l'objet graphe
$this->library=$conf->global->MAIN_GRAPH_LIBRARY;
$this->bordercolor = array(235,235,224);
$this->datacolor = array(array(120,130,150), array(160,160,180), array(190,190,220));
$this->bgcolor = array(235,235,224);
$color_file = DOL_DOCUMENT_ROOT."/theme/".$conf->theme."/graph-color.php";
if (is_readable($color_file))
{
include_once($color_file);
if (isset($theme_bordercolor)) $this->bordercolor = $theme_bordercolor;
if (isset($theme_datacolor)) $this->datacolor = $theme_datacolor;
if (isset($theme_bgcolor)) $this->bgcolor = $theme_bgcolor;
}
//print 'bgcolor: '.join(',',$this->bgcolor).'<br>';
return 1;
}
function isGraphKo()
{
return $this->error;
}
/**
* \brief Genere le fichier graphique sur le disque
* \param file Nom du fichier image
*/
function draw($file)
{
$call = "draw_".$this->library;
$this->$call($file);
}
/**
* \brief Generation graph a partir de la lib Artichow
* \param file Nom fichier a generer
*/
function draw_artichow($file)
{
dolibarr_syslog("DolGraph.class::draw_artichow this->type=".$this->type);
// Create graph
$class='';
if ($this->type == 'bars') $class='BarPlot';
if ($this->type == 'lines') $class='LinePlot';
include_once DOL_DOCUMENT_ROOT."/../external-libs/Artichow/".$class.".class.php";
// Definition de couleurs
$bgcolor=new Color($this->bgcolor[0],$this->bgcolor[1],$this->bgcolor[2]);
$colortrans=new Color(0,0,0,100);
$colorsemitrans=new Color(255,255,255,50);
$colorgradient= new LinearGradient(new Color(235, 235, 235),new Color(255, 255, 255),0);
// Graph
$graph = new Graph($this->width, $this->height);
$graph->border->hide();
$graph->setAntiAliasing(true);
if (isset($this->title))
{
$graph->title->set($this->title);
$graph->title->setFont(new Tuffy(10));
}
// $graph->setBackgroundColor($bgcolor);
$graph->setBackgroundGradient($colorgradient);
$group = new PlotGroup;
//$group->setSpace(5, 5, 0, 0);
$group->setPadding(30, 10);
$group->legend->setSpace(0);
$group->legend->setPadding(2,2,2,2);
$group->legend->setPosition(NULL,0.1);
$group->legend->setBackgroundColor($colorsemitrans);
$group->grid->setBackgroundColor($colortrans);
// On boucle sur chaque lot de donnees
$legends=array();
$i=0;
$nblot=sizeof($this->data[0])-1;
if (! $nblot) $end=1;
while ($i < $nblot)
{
$j=0;
$values=array();
foreach($this->data as $key => $valarray)
{
$legends[$j] = $valarray[0];
$values[$j] = $valarray[$i+1];
$j++;
}
// Artichow ne gere pas les valeurs inconnues
// Donc si inconnu, on la fixe a null
$newvalues=array();
foreach($values as $val)
{
$newvalues[]=(is_numeric($val) ? $val : null);
}
if ($this->type == 'bars')
{
//print "Lot de donnees $i<br>";
//print_r($values);
//print '<br>';
$color=new Color($this->datacolor[$i][0],$this->datacolor[$i][1],$this->datacolor[$i][2],20);
$colorborder=new Color($this->datacolor[$i][0],$this->datacolor[$i][1],$this->datacolor[$i][2]);
//$plot = new BarPlot($newvalues,1,1,0);
$plot = new BarPlot($newvalues, $i+1, $nblot);
$plot->barBorder->setColor($colorborder);
$plot->setBarColor($color);
$plot->setBarPadding(0.1, 0.1);
$plot->setBarSpace(5);
$plot->barShadow->setSize($this->SetShading);
$plot->barShadow->setPosition(Shadow::RIGHT_TOP);
$plot->barShadow->setColor(new Color(160, 160, 160, 50));
$plot->barShadow->smooth(TRUE);
//$plot->setSize(1, 0.96);
//$plot->setCenter(0.5, 0.52);
// Le mode automatique est plus efficace
$plot->SetYMax($this->MaxValue);
$plot->SetYMin($this->MinValue);
}
if ($this->type == 'lines')
{
$color=new Color($this->datacolor[$i][0],$this->datacolor[$i][1],$this->datacolor[$i][2],20);
$plot = new LinePlot($newvalues);
//$plot->setSize(1, 0.96);
//$plot->setCenter(0.5, 0.52);
$plot->setColor($color);
$plot->setThickness(2);
// Le mode automatique est plus efficace
$plot->SetYMax($this->MaxValue);
$plot->SetYMin($this->MinValue);
//$plot->setYAxis(0);
//$plot->hideLine(true);
}
//$plot->reduce(80); // Evite temps d'affichage trop long et nombre de ticks absisce satures
if (sizeof($this->Legend))
{
if ($this->type == 'bars') $group->legend->add($plot, $this->Legend[$i], Legend::BACKGROUND);
if ($this->type == 'lines') $group->legend->add($plot, $this->Legend[$i], Legend::LINE);
}
$group->add($plot);
$i++;
}
$group->axis->bottom->setLabelText($legends);
$group->axis->bottom->label->setFont(new Tuffy(7));
$graph->add($group);
// Generate file
$graph->draw($file);
}
/**
*/
function SetPrecisionY($which_prec)
{
$this->PrecisionY = $which_prec;
return true;
}
/**
\remarks Utiliser SetNumTicks ou SetHorizTickIncrement mais pas les 2
*/
function SetHorizTickIncrement($xi)
{
$this->SetHorizTickIncrement = $xi;
return true;
}
/**
\remarks Utiliser SetNumTicks ou SetHorizTickIncrement mais pas les 2
*/
function SetNumXTicks($xt)
{
$this->SetNumXTicks = $xt;
return true;
}
function SetYLabel($label)
{
$this->YLabel = $label;
}
function SetWidth($w)
{
$this->width = $w;
}
function SetTitle($title)
{
$this->title = $title;
}
function SetData($data)
{
$this->data = $data;
}
function SetType($type)
{
$this->type = $type;
}
function SetLegend($legend)
{
$this->Legend = $legend;
}
function SetLegendWidthMin($legendwidthmin)
{
$this->LegendWidthMin = $legendwidthmin;
}
function SetMaxValue($max)
{
$this->MaxValue = $max;
}
function GetMaxValue()
{
return $this->MaxValue;
}
function SetMinValue($min)
{
$this->MinValue = $min;
}
function GetMinValue()
{
return $this->MinValue;
}
function SetHeight($h)
{
$this->height = $h;
}
function SetShading($s)
{
$this->SetShading = $s;
}
function ResetBgColor()
{
unset($this->bgcolor);
}
/**
* \brief Definie la couleur de fond du graphique
* \param bg_color array(R,G,B) ou 'onglet' ou 'default'
*/
function SetBgColor($bg_color = array(255,255,255))
{
global $theme_bgcolor,$theme_bgcoloronglet;
if (! is_array($bg_color))
{
if ($bg_color == 'onglet')
{
//print 'ee'.join(',',$theme_bgcoloronglet);
$this->bgcolor = $theme_bgcoloronglet;
}
else
{
$this->bgcolor = $theme_bgcolor;
}
}
else
{
$this->bgcolor = $bg_color;
}
}
function ResetDataColor()
{
unset($this->datacolor);
}
function GetMaxValueInData()
{
$k = 0;
$vals = array();
$nblines = sizeof($this->data);
$nbvalues = sizeof($this->data[0]) - 1;
for ($j = 0 ; $j < $nblines ; $j++)
{
for ($i = 0 ; $i < $nbvalues ; $i++)
{
$vals[$k] = $this->data[$j][$i+1];
$k++;
}
}
rsort($vals);
return $vals[0];
}
function GetMinValueInData()
{
$k = 0;
$vals = array();
$nblines = sizeof($this->data);
$nbvalues = sizeof($this->data[0]) - 1;
for ($j = 0 ; $j < $nblines ; $j++)
{
for ($i = 0 ; $i < $nbvalues ; $i++)
{
$vals[$k] = $this->data[$j][$i+1];
$k++;
}
}
sort($vals);
return $vals[0];
}
function GetCeilMaxValue()
{
$max = $this->GetMaxValueInData();
if ($max != 0) $max++;
$size=strlen(abs(ceil($max)));
$factor=1;
for ($i=0; $i < ($size-1); $i++)
{
$factor*=10;
}
$res=ceil($max/$factor)*$factor;
//print "max=".$max." res=".$res;
return $res;
}
function GetFloorMinValue()
{
$min = $this->GetMinValueInData();
if ($min != 0) $min--;
$size=strlen(abs(floor($min)));
$factor=1;
for ($i=0; $i < ($size-1); $i++)
{
$factor*=10;
}
$res=floor($min/$factor)*$factor;
//print "min=".$min." res=".$res;
return $res;
}
function BarLineAnnualArtichow($file='', $barvalues, $linevalues, $legends='')
{
require_once DOL_DOCUMENT_ROOT."/../external-libs/Artichow/BarPlot.class.php";
require_once DOL_DOCUMENT_ROOT."/../external-libs/Artichow/LinePlot.class.php";
$graph = new Graph(240, 220);
$graph->title->set($this->title);
$graph->title->setFont(new Tuffy(10));
$graph->border->hide();
$color = new Color(222,231,236);
//new Color(0xF4, 0xF4, 0xF4)
$graph->setAntiAliasing(TRUE);
$graph->setBackgroundColor($color);
$group = new PlotGroup;
$group->setSize(0.82, 1);
$group->setCenter(0.41, 0.5);
$group->setPadding(35, 26, 40, 27);
$group->setSpace(2, 2);
$group->grid->setColor(new Color(0xC4, 0xC4, 0xC4));
// $group->grid->setType(Line::DASHED);
$group->grid->hideVertical(TRUE);
$group->grid->setBackgroundColor(new White);
$group->axis->left->setColor(new DarkGreen);
$group->axis->left->label->setFont(new Font2);
$group->axis->right->setColor(new DarkBlue);
$group->axis->right->label->setFont(new Font2);
$group->axis->bottom->label->setFont(new Font2);
//$group->legend->setPosition(1.18);
//$group->legend->setTextFont(new Tuffy(8));
//$group->legend->setSpace(10);
// Add a bar plot
$plot = new BarPlot($barvalues);
//$plot->setBarColor(new MidYellow);
$plot->setBarGradient(new LinearGradient(new Color(244,244,244),new Color(222,231,236),90 ) );
$plot->setBarPadding(0.15, 0.15);
$plot->barShadow->setSize(3);
$plot->barShadow->smooth(TRUE);
$plot->barShadow->setColor(new Color(200, 200, 200, 10));
//$plot->move(1, 0);
// $group->legend->add($plot, "Yellow bar", Legend::BACKGROUND);
// // $group->legend->add($plot, "CA (HT)", 2);
$group->add($plot);
// Add a line plot
$plot = new LinePlot($linevalues, 1);
$plot->setColor(new DarkBlue);
$plot->setThickness(3);
$plot->setYAxis('right');
$plot->mark->setType(1);
$plot->mark->setSize(6);
$plot->mark->setFill(new LightBlue);
$plot->mark->border->show();
// // $group->legend->add($plot, "Unites", 3);
$group->add($plot);
/*
*
*/
$group->axis->right->setColor(new DarkBlue);
$group->axis->right->label->setColor(new DarkBlue);
$group->axis->bottom->setLabelText($legends);
$group->axis->bottom->hideTicks(TRUE);
/*
*
*/
$graph->add($group);
$graph->draw($file);
}
function BarLineOneYearArtichow($file='', $barvalues, $linevalues, $legends='')
{
$ok = 0;
foreach($linevalues as $val)
{
$sum1 += abs($val);
}
foreach($barvalues as $val)
{
$sum2 += abs($val);
}
$ok = sizeof($values) * $sum1 * $sum2;
if (( sizeof($barvalues) * sizeof($linevalues) ) > 0)
{
require_once DOL_DOCUMENT_ROOT."/../external-libs/Artichow/BarPlot.class.php";
require_once DOL_DOCUMENT_ROOT."/../external-libs/Artichow/LinePlot.class.php";
$graph = new Graph(540, 220);
$graph->title->set($this->title);
$graph->title->setFont(new Tuffy(10));
$graph->border->hide();
$color = new Color(222,231,236);
//new Color(0xF4, 0xF4, 0xF4)
$graph->setAntiAliasing(TRUE);
$graph->setBackgroundColor($color);
$group = new PlotGroup;
$group->setSize(0.82, 1);
$group->setCenter(0.41, 0.5);
$group->setPadding(35, 26, 40, 27);
$group->setSpace(2, 2);
$group->grid->setColor(new Color(0xC4, 0xC4, 0xC4));
// $group->grid->setType(Line::DASHED);
$group->grid->hideVertical(TRUE);
$group->grid->setBackgroundColor(new White);
$group->axis->left->setColor(new DarkGreen);
$group->axis->left->label->setFont(new Font2);
$group->axis->right->setColor(new DarkBlue);
$group->axis->right->label->setFont(new Font2);
$group->axis->bottom->label->setFont(new Font2);
$group->legend->setPosition(1.18);
$group->legend->setTextFont(new Tuffy(8));
$group->legend->setSpace(10);
// Add a bar plot
$plot = new BarPlot($barvalues);
//$plot->setBarColor(new MidYellow);
$plot->setBarGradient(new LinearGradient(new Color(244,244,244),new Color(222,231,236),90 ) );
$plot->setBarPadding(0.15, 0.15);
$plot->barShadow->setSize(3);
$plot->barShadow->smooth(TRUE);
$plot->barShadow->setColor(new Color(200, 200, 200, 10));
//$plot->move(1, 0);
// $group->legend->add($plot, "Yellow bar", Legend::BACKGROUND);
$group->legend->add($plot, "CA (HT)", 2);
$group->add($plot);
// Add a line plot
$plot = new LinePlot($linevalues, 1);
$plot->setColor(new DarkBlue);
$plot->setThickness(3);
$plot->setYAxis('right');
$plot->mark->setType(1);
$plot->mark->setSize(6);
$plot->mark->setFill(new LightBlue);
$plot->mark->border->show();
$group->legend->add($plot, "Unites", 3);
$group->add($plot);
/*
*
*/
$group->axis->right->setColor(new DarkBlue);
$group->axis->right->label->setColor(new DarkBlue);
$group->axis->bottom->setLabelText($legends);
$group->axis->bottom->hideTicks(TRUE);
/*
*
*/
$graph->add($group);
$graph->draw($file);
}
}
function BarAnnualArtichow($file='', $values='', $legends='')
{
require_once DOL_DOCUMENT_ROOT."/../external-libs/Artichow/BarPlot.class.php";
$ok = 0;
foreach($values as $val)
{
$sum += abs($val);
}
$ok = sizeof($values) * $sum;
if ($ok > 0)
{
$graph = new Graph(500, 200);
$graph->title->set($this->title);
$graph->title->setFont(new Tuffy(10));
$graph->border->hide();
$color = new Color(222,231,236);
$graph->setAntiAliasing(TRUE);
$graph->setBackgroundColor( $color );
$plot = new BarPlot($values);
$plot->setBarGradient(
new LinearGradient(
new Color(244,244,244),
new Color(222,231,236),
90
)
);
$plot->setSpace(5, 5, NULL, NULL);
$plot->barShadow->setSize(4);
$plot->barShadow->setPosition(SHADOW_RIGHT_TOP);
$plot->barShadow->setColor(new Color(180, 180, 180, 10));
$plot->barShadow->smooth(TRUE);
$plot->xAxis->hideTicks();
$plot->xAxis->setLabelText($legends);
$plot->xAxis->label->setFont(new Tuffy(7));
$graph->add($plot);
$graph->draw($file);
}
}
}
?>
Reference in New Issue View Git Blame Copy Permalink