lainwir3d/dolibarr
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Gestion de la librairie Artichow

Browse Source
This commit is contained in:
Rodolphe Quiedeville 2006-12-05 16:53:30 +00:00
parent 635b67aead
commit ca7b72519a
1 changed files with 459 additions and 386 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

845
htdocs/dolgraph.class.php
View File

@ -1,5 +1,5 @@
<?php <?php
/* Copyright (c) 2003 Rodolphe Quiedeville <rodolphe@quiedeville.org> /* Copyright (c) 2003-2006 Rodolphe Quiedeville <rodolphe@quiedeville.org>
* Copyright (c) 2004-2006 Laurent Destailleur <eldy@users.sourceforge.net> * Copyright (c) 2004-2006 Laurent Destailleur <eldy@users.sourceforge.net>
* *
* This program is free software; you can redistribute it and/or modify * This program is free software; you can redistribute it and/or modify
@ -21,451 +21,524 @@
*/ */
/** /**
\file htdocs/dolgraph.class.php \file htdocs/dolgraph.class.php
\brief Fichier de la classe mère de gestion des graph phplot \brief Fichier de la classe mère de gestion des graph phplot
\version $Revision$ \version $Revision$
\remarks Usage: \remarks Usage:
$graph_data = array(array('labelA',yA),array('labelB',yB)); $graph_data = array(array('labelA',yA),array('labelB',yB));
array(array('labelA',yA1,...,yAn),array('labelB',yB1,...yBn)); array(array('labelA',yA1,...,yAn),array('labelB',yB1,...yBn));
$px = new DolGraph(); $px = new DolGraph();
$px->SetData($graph_data); $px->SetData($graph_data);
$px->SetMaxValue($px->GetCeilMaxValue()); $px->SetMaxValue($px->GetCeilMaxValue());
$px->SetMinValue($px->GetFloorMinValue()); $px->SetMinValue($px->GetFloorMinValue());
$px->SetTitle("title"); $px->SetTitle("title");
$px->SetLegend(array("Val1","Val2")); $px->SetLegend(array("Val1","Val2"));
$px->SetWidth(width); $px->SetWidth(width);
$px->SetHeight(height); $px->SetHeight(height);
$px->draw("file.png"); $px->draw("file.png");
*/ */
/** /**
\class Graph \class Graph
\brief Classe mère permettant la gestion des graph \brief Classe mère permettant la gestion des graph
*/ */
class DolGraph class DolGraph
{ {
var $type='bars'; // Type de graph //! Type du graphique
var $data; // Tableau de donnees var $type='bars';
var $width=380; //! Tableau de donnees
var $height=200; var $data;
var $MaxValue=0; var $width=380;
var $MinValue=0; var $height=200;
var $SetShading=0; var $MaxValue=0;
var $PrecisionY=-1; var $MinValue=0;
var $SetHorizTickIncrement=-1; var $SetShading=0;
var $SetNumXTicks=-1; var $PrecisionY=-1;
var $SetHorizTickIncrement=-1;
var $SetNumXTicks=-1;
var $graph; // Objet PHPlot
var $error;
var $library;
function DolGraph()
{
global $conf;
global $theme_bordercolor, $theme_datacolor, $theme_bgcolor, $theme_bgcoloronglet;
$this->library = 'phplot';
var $graph; // Objet PHPlot // Test si module GD présent
$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 générer les graphiques.";
return -1;
}
// Vérifie que chemin vers PHPLOT_PATH est connu et definie $graphpath
$graphpathdir=DOL_DOCUMENT_ROOT."/includes/phplot";
if (defined('PHPLOT_PATH')) $graphpathdir=PHPLOT_PATH;
if ($conf->global->PHPLOT_PATH) $graphpathdir=$conf->global->PHPLOT_PATH;
if (! eregi('[\\\/]$',$graphpathdir)) $graphpathdir.='/';
include_once($graphpathdir.'phplot.php');
// Défini propriétés de l'objet graphe
$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 Génère le fichier graphique sur le disque
* \param file Nom du fichier image
*/
function draw($file)
{
$call = "draw_".$this->library;
$this->$call($file);
}
function prepare($file)
{
$call = "prepare_".$this->library;
$this->$call($file);
}
var $error; function generate($file)
{
$call = "generate_".$this->library;
$this->$call($file);
}
/**
* Artichow
*
*
*
*/
function draw_artichow($file)
{
require_once DOL_DOCUMENT_ROOT."/../external-libs/Artichow/BarPlot.class.php";
function DolGraph() $graph = new Graph($this->width, $this->height);
{ if (isset($this->title)) $graph->title->set($this->title);
global $conf;
global $theme_bordercolor, $theme_datacolor, $theme_bgcolor, $theme_bgcoloronglet;
// Test si module GD présent $graph->border->hide();
$modules_list = get_loaded_extensions();
$isgdinstalled=0; $color = new Color(244,244,244);
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 générer les graphiques.";
return -1;
}
// Vérifie que chemin vers PHPLOT_PATH est connu et definie $graphpath $graph->setAntiAliasing(TRUE);
$graphpathdir=DOL_DOCUMENT_ROOT."/includes/phplot";
if (defined('PHPLOT_PATH')) $graphpathdir=PHPLOT_PATH;
if ($conf->global->PHPLOT_PATH) $graphpathdir=$conf->global->PHPLOT_PATH;
if (! eregi('[\\\/]$',$graphpathdir)) $graphpathdir.='/';
include_once($graphpathdir.'phplot.php'); $graph->setBackgroundColor( $color );
$i = 0;
foreach($this->data as $key => $value)
{
$values[$i] = $value[1];
$legends[$i] = $value[0];
$i++;
}
// Défini propriétés de l'objet graphe $plot = new BarPlot($values);
$this->bordercolor = array(235,235,224); $plot->setSize(1, 0.96);
$this->datacolor = array(array(120,130,150), array(160,160,180), array(190,190,220)); $plot->setCenter(0.5, 0.52);
$this->bgcolor = array(235,235,224);
$plot->setBarColor( new LightGreen(25) );
$color_file = DOL_DOCUMENT_ROOT."/theme/".$conf->theme."/graph-color.php"; $plot->xAxis->setLabelText($legends);
if (is_readable($color_file)) $plot->xAxis->label->setFont(new Tuffy(7));
{
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;
}
$graph->add($plot);
function isGraphKo() $graph->draw($file);
{ }
return $this->error;
}
/**
* \brief Génère le fichier graphique sur le disque
* \param file Nom du fichier image
*/
function draw_phplot($file)
{
// Prepare parametres
$this->prepare_phplot($file);
$this->generate_phplot();
}
/** function generate_phplot()
* \brief Génère le fichier graphique sur le disque {
* \param file Nom du fichier image // Génère le fichier $file
*/ $this->graph->DrawGraph();
function draw($file) }
{
// Prepare parametres
$this->prepare($file);
// Génère le fichier $file /**
$this->graph->DrawGraph(); * \brief Prépare l'objet PHPlot
} * \param file Nom du fichier image à générer
*/
function prepare_phplot($file)
{
// Define the object
$this->graph = new PHPlot($this->width, $this->height);
$phplotversion=4;
if (defined('TOTY')) $phplotversion=5;
$this->graph->SetIsInline(1);
$this->graph->SetPlotType($this->type);
$this->graph->SetDataValues($this->data);
// Precision axe y (pas de decimal si 3 chiffres ou plus)
if ($this->PrecisionY > -1)
{
$this->graph->SetPrecisionY($this->PrecisionY);
if ($this->PrecisionY == 0) // Si precision de 0
{
// Determine un nombre de ticks qui permet decoupage qui tombe juste
$maxval=$this->getMaxValue();
$minval=$this->getMinValue();
if ($maxval * $minval >= 0) // Si du meme signe
{
$plage=$maxval;
}
else
{
$plage=$maxval-$minval;
}
if (abs($plage) <= 2)
{
$this->SetMaxValue(2);
$maxticks=2;
}
else
{
$maxticks=10;
if (substr($plage,0,1) == 3 || substr($plage,0,1) == 6)
{
$maxticks=min(6,$plage);
}
elseif (substr($plage,0,1) == 4 || substr($plage,0,1) == 8)
{
$maxticks=min(8,$plage);
}
elseif (substr($plage,0,1) == 7)
{
$maxticks=min(7,$plage);
}
elseif (substr($plage,0,1) == 9)
{
$maxticks=min(9,$plage);
}
}
$this->graph->SetNumVertTicks($maxticks);
// print 'minval='.$minval.' - maxval='.$maxval.' - plage='.$plage.' - maxticks='.$maxticks.'<br>';
}
}
else
{
$this->graph->SetPrecisionY(3-strlen(round($this->GetMaxValueInData())));
}
$this->graph->SetPrecisionX(0);
/** // Set areas
* \brief Prépare l'objet PHPlot $top_space=40;
* \param file Nom du fichier image à générer if ($phplotversion >= 5) $top_space=25;
*/ $left_space=80; // For y labels
function prepare($file) $right_space=10; // If no legend
{ if (isset($this->Legend))
// Define the object {
$this->graph = new PHPlot($this->width, $this->height); foreach($this->Legend as $key => $val)
{
$phplotversion=4; $maxlen=max($maxlen,$val);
if (defined('TOTY')) $phplotversion=5; }
$right_space=50+strlen($maxlen)*6; // For legend
$this->graph->SetIsInline(1); }
$this->graph->SetPlotType($this->type);
$this->graph->SetDataValues($this->data);
// Precision axe y (pas de decimal si 3 chiffres ou plus)
if ($this->PrecisionY > -1)
{
$this->graph->SetPrecisionY($this->PrecisionY);
if ($this->PrecisionY == 0) // Si precision de 0
{
// Determine un nombre de ticks qui permet decoupage qui tombe juste
$maxval=$this->getMaxValue();
$minval=$this->getMinValue();
if ($maxval * $minval >= 0) // Si du meme signe
{
$plage=$maxval;
}
else
{
$plage=$maxval-$minval;
}
if (abs($plage) <= 2)
{
$this->SetMaxValue(2);
$maxticks=2;
}
else
{
$maxticks=10;
if (substr($plage,0,1) == 3 || substr($plage,0,1) == 6)
{
$maxticks=min(6,$plage);
}
elseif (substr($plage,0,1) == 4 || substr($plage,0,1) == 8)
{
$maxticks=min(8,$plage);
}
elseif (substr($plage,0,1) == 7)
{
$maxticks=min(7,$plage);
}
elseif (substr($plage,0,1) == 9)
{
$maxticks=min(9,$plage);
}
}
$this->graph->SetNumVertTicks($maxticks);
// print 'minval='.$minval.' - maxval='.$maxval.' - plage='.$plage.' - maxticks='.$maxticks.'<br>';
}
}
else
{
$this->graph->SetPrecisionY(3-strlen(round($this->GetMaxValueInData())));
}
$this->graph->SetPrecisionX(0);
// Set areas
$top_space=40;
if ($phplotversion >= 5) $top_space=25;
$left_space=80; // For y labels
$right_space=10; // If no legend
if (isset($this->Legend))
{
foreach($this->Legend as $key => $val)
{
$maxlen=max($maxlen,$val);
}
$right_space=50+strlen($maxlen)*6; // For legend
}
$this->graph->SetNewPlotAreaPixels($left_space, $top_space, $this->width-$right_space, $this->height-40); $this->graph->SetNewPlotAreaPixels($left_space, $top_space, $this->width-$right_space, $this->height-40);
if (isset($this->MaxValue)) if (isset($this->MaxValue))
{ {
$this->graph->SetPlotAreaWorld(0,$this->MinValue,sizeof($this->data),$this->MaxValue); $this->graph->SetPlotAreaWorld(0,$this->MinValue,sizeof($this->data),$this->MaxValue);
} }
// Define title // Define title
if (isset($this->title)) $this->graph->SetTitle($this->title); if (isset($this->title)) $this->graph->SetTitle($this->title);
// Défini position du graphe (et legende) au sein de l'image // Défini position du graphe (et legende) au sein de l'image
if (isset($this->Legend)) if (isset($this->Legend))
{ {
$this->graph->SetLegendPixels($this->width-$right_space+8,40,''); $this->graph->SetLegendPixels($this->width-$right_space+8,40,'');
$this->graph->SetLegend($this->Legend); $this->graph->SetLegend($this->Legend);
} }
if (isset($this->SetShading)) if (isset($this->SetShading))
{ {
$this->graph->SetShading($this->SetShading); $this->graph->SetShading($this->SetShading);
} }
$this->graph->SetTickLength(6); $this->graph->SetTickLength(6);
$this->graph->SetBackgroundColor($this->bgcolor); $this->graph->SetBackgroundColor($this->bgcolor);
$this->graph->SetDataColors($this->datacolor, $this->bordercolor); $this->graph->SetDataColors($this->datacolor, $this->bordercolor);
if ($this->SetNumXTicks > -1) if ($this->SetNumXTicks > -1)
{ {
if ($phplotversion >= 5) // If PHPlot 5, for compatibility if ($phplotversion >= 5) // If PHPlot 5, for compatibility
{ {
$this->graph->SetXLabelType(''); $this->graph->SetXLabelType('');
$this->graph->SetNumXTicks($this->SetNumXTicks); $this->graph->SetNumXTicks($this->SetNumXTicks);
} }
else else
{ {
$this->graph->SetNumHorizTicks($this->SetNumXTicks); $this->graph->SetNumHorizTicks($this->SetNumXTicks);
} }
} }
if ($this->SetHorizTickIncrement > -1) if ($this->SetHorizTickIncrement > -1)
{ {
// Les ticks sont en mode forcé // Les ticks sont en mode forcé
$this->graph->SetHorizTickIncrement($this->SetHorizTickIncrement); $this->graph->SetHorizTickIncrement($this->SetHorizTickIncrement);
if ($phplotversion >= 5) // If PHPlot 5, for compatibility if ($phplotversion >= 5) // If PHPlot 5, for compatibility
{ {
$this->graph->SetXLabelType(''); $this->graph->SetXLabelType('');
$this->graph->SetXTickLabelPos('none'); $this->graph->SetXTickLabelPos('none');
} }
} }
else else
{ {
// Les ticks sont en mode automatique // Les ticks sont en mode automatique
if ($phplotversion >= 5) // If PHPlot 5, for compatibility if ($phplotversion >= 5) // If PHPlot 5, for compatibility
{ {
$this->graph->SetXDataLabelPos('none'); $this->graph->SetXDataLabelPos('none');
} }
} }
if ($phplotversion >= 5) if ($phplotversion >= 5)
{ {
// Ne gere pas la transparence // Ne gere pas la transparence
// $this->graph->SetBgImage(DOL_DOCUMENT_ROOT.'/theme/dolibarr_logo_2.png','tile'); // $this->graph->SetBgImage(DOL_DOCUMENT_ROOT.'/theme/dolibarr_logo_2.png','tile');
$this->graph->SetDrawPlotAreaBackground(array(255,255,255)); $this->graph->SetDrawPlotAreaBackground(array(255,255,255));
} }
$this->graph->SetPlotBorderType("left"); // Affiche axe y a gauche uniquement $this->graph->SetPlotBorderType("left"); // Affiche axe y a gauche uniquement
$this->graph->SetVertTickPosition('plotleft'); // Affiche tick axe y a gauche uniquement $this->graph->SetVertTickPosition('plotleft'); // Affiche tick axe y a gauche uniquement
$this->graph->SetOutputFile($file); $this->graph->SetOutputFile($file);
} }
function SetPrecisionY($which_prec) function SetPrecisionY($which_prec)
{ {
$this->PrecisionY = $which_prec; $this->PrecisionY = $which_prec;
return true; return true;
} }
/* /*
\remarks Utiliser SetNumTicks ou SetHorizTickIncrement mais pas les 2 \remarks Utiliser SetNumTicks ou SetHorizTickIncrement mais pas les 2
*/ */
function SetHorizTickIncrement($xi) function SetHorizTickIncrement($xi)
{ {
$this->SetHorizTickIncrement = $xi; $this->SetHorizTickIncrement = $xi;
return true; return true;
} }
/* /*
\remarks Utiliser SetNumTicks ou SetHorizTickIncrement mais pas les 2 \remarks Utiliser SetNumTicks ou SetHorizTickIncrement mais pas les 2
*/ */
function SetNumXTicks($xt) function SetNumXTicks($xt)
{ {
$this->SetNumXTicks = $xt; $this->SetNumXTicks = $xt;
return true; return true;
} }
function SetYLabel($label) function SetYLabel($label)
{ {
$this->YLabel = $label; $this->YLabel = $label;
} }
function SetWidth($w) function SetWidth($w)
{ {
$this->width = $w; $this->width = $w;
} }
function SetTitle($title) function SetTitle($title)
{ {
$this->title = $title; $this->title = $title;
} }
function SetData($data) function SetData($data)
{ {
$this->data = $data; $this->data = $data;
} }
function SetType($type) function SetType($type)
{ {
$this->type = $type; $this->type = $type;
} }
function SetLegend($legend) function SetLegend($legend)
{ {
$this->Legend = $legend; $this->Legend = $legend;
} }
function SetMaxValue($max) function SetMaxValue($max)
{ {
$this->MaxValue = $max; $this->MaxValue = $max;
} }
function GetMaxValue() function GetMaxValue()
{ {
return $this->MaxValue; return $this->MaxValue;
} }
function SetMinValue($min) function SetMinValue($min)
{ {
$this->MinValue = $min; $this->MinValue = $min;
} }
function GetMinValue() function GetMinValue()
{ {
return $this->MinValue; return $this->MinValue;
} }
function SetHeight($h) function SetHeight($h)
{ {
$this->height = $h; $this->height = $h;
} }
function SetShading($s) function SetShading($s)
{ {
$this->SetShading = $s; $this->SetShading = $s;
} }
function ResetBgColor() function ResetBgColor()
{ {
unset($this->bgcolor); unset($this->bgcolor);
} }
/** /**
* \brief Definie la couleur de fond du graphique * \brief Definie la couleur de fond du graphique
* \param bg_color array(R,G,B) ou 'onglet' ou 'default' * \param bg_color array(R,G,B) ou 'onglet' ou 'default'
*/ */
function SetBgColor($bg_color = array(255,255,255)) function SetBgColor($bg_color = array(255,255,255))
{ {
global $theme_bgcolor,$theme_bgcoloronglet; global $theme_bgcolor,$theme_bgcoloronglet;
if (! is_array($bg_color)) if (! is_array($bg_color))
{ {
if ($bg_color == 'onglet') if ($bg_color == 'onglet')
{ {
//print 'ee'.join(',',$theme_bgcoloronglet); //print 'ee'.join(',',$theme_bgcoloronglet);
$this->bgcolor = $theme_bgcoloronglet; $this->bgcolor = $theme_bgcoloronglet;
} }
else else
{ {
$this->bgcolor = $theme_bgcolor; $this->bgcolor = $theme_bgcolor;
} }
} }
else else
{ {
$this->bgcolor = $bg_color; $this->bgcolor = $bg_color;
} }
} }
function ResetDataColor() function ResetDataColor()
{ {
unset($this->datacolor); unset($this->datacolor);
} }
function GetMaxValueInData() function GetMaxValueInData()
{ {
$k = 0; $k = 0;
$vals = array(); $vals = array();
$nblines = sizeof($this->data); $nblines = sizeof($this->data);
$nbvalues = sizeof($this->data[0]) - 1; $nbvalues = sizeof($this->data[0]) - 1;
for ($j = 0 ; $j < $nblines ; $j++) for ($j = 0 ; $j < $nblines ; $j++)
{ {
for ($i = 0 ; $i < $nbvalues ; $i++) for ($i = 0 ; $i < $nbvalues ; $i++)
{ {
$vals[$k] = $this->data[$j][$i+1]; $vals[$k] = $this->data[$j][$i+1];
$k++; $k++;
} }
} }
rsort($vals); rsort($vals);
return $vals[0]; return $vals[0];
} }
function GetMinValueInData() function GetMinValueInData()
{ {
$k = 0; $k = 0;
$vals = array(); $vals = array();
$nblines = sizeof($this->data); $nblines = sizeof($this->data);
$nbvalues = sizeof($this->data[0]) - 1; $nbvalues = sizeof($this->data[0]) - 1;
for ($j = 0 ; $j < $nblines ; $j++) for ($j = 0 ; $j < $nblines ; $j++)
{ {
for ($i = 0 ; $i < $nbvalues ; $i++) for ($i = 0 ; $i < $nbvalues ; $i++)
{ {
$vals[$k] = $this->data[$j][$i+1]; $vals[$k] = $this->data[$j][$i+1];
$k++; $k++;
} }
} }
sort($vals); sort($vals);
return $vals[0]; return $vals[0];
} }
function GetCeilMaxValue() function GetCeilMaxValue()
{ {
$max = $this->GetMaxValueInData(); $max = $this->GetMaxValueInData();
if ($max != 0) $max++; if ($max != 0) $max++;
$size=strlen(abs(ceil($max))); $size=strlen(abs(ceil($max)));
$factor=1; $factor=1;
for ($i=0; $i < ($size-1); $i++) for ($i=0; $i < ($size-1); $i++)
{ {
$factor*=10; $factor*=10;
} }
$res=ceil($max/$factor)*$factor; $res=ceil($max/$factor)*$factor;
//print "max=".$max." res=".$res; //print "max=".$max." res=".$res;
return $res; return $res;
} }
function GetFloorMinValue() function GetFloorMinValue()
{ {
$min = $this->GetMinValueInData(); $min = $this->GetMinValueInData();
if ($min != 0) $min--; if ($min != 0) $min--;
$size=strlen(abs(floor($min))); $size=strlen(abs(floor($min)));
$factor=1; $factor=1;
for ($i=0; $i < ($size-1); $i++) for ($i=0; $i < ($size-1); $i++)
{ {
$factor*=10; $factor*=10;
} }
$res=floor($min/$factor)*$factor; $res=floor($min/$factor)*$factor;
//print "min=".$min." res=".$res; //print "min=".$min." res=".$res;
return $res; return $res;
} }
} }
?> ?>