From 4188f38ad56d7ba2ea46e94403f305243514f80c Mon Sep 17 00:00:00 2001 From: tcit Date: Thu, 24 Jul 2014 15:49:36 +0200 Subject: add pdf and mobi libraries --- inc/3rdparty/libraries/mpdf/graph.php | 721 ++++++++++++++++++++++++++++++++++ 1 file changed, 721 insertions(+) create mode 100644 inc/3rdparty/libraries/mpdf/graph.php (limited to 'inc/3rdparty/libraries/mpdf/graph.php') diff --git a/inc/3rdparty/libraries/mpdf/graph.php b/inc/3rdparty/libraries/mpdf/graph.php new file mode 100644 index 00000000..a210ad3d --- /dev/null +++ b/inc/3rdparty/libraries/mpdf/graph.php @@ -0,0 +1,721 @@ +1 hrs old + $interval = 3600; + if ($handle = opendir(_MPDF_PATH.'graph_cache')) { + while (false !== ($file = readdir($handle))) { + if (((filemtime(_MPDF_PATH.'graph_cache/'.$file)+$interval) < time()) && ($file != "..") && ($file != ".")) { + @unlink(_MPDF_PATH.'graph_cache/'.$file); // mPDF 4.0 + } + } + closedir($handle); + } +//============================================================================================================== +// LOAD GRAPHS + + include_once(_JPGRAPH_PATH.'jpgraph.php'); + include_once(_JPGRAPH_PATH.'jpgraph_line.php' ); + include_once(_JPGRAPH_PATH.'jpgraph_log.php' ); + include_once(_JPGRAPH_PATH.'jpgraph_scatter.php' ); + include_once(_JPGRAPH_PATH.'jpgraph_regstat.php' ); + include_once(_JPGRAPH_PATH.'jpgraph_pie.php'); + include_once(_JPGRAPH_PATH.'jpgraph_pie3d.php'); + include_once(_JPGRAPH_PATH.'jpgraph_bar.php'); + include_once(_JPGRAPH_PATH.'jpgraph_radar.php'); + + +//====================================================================================================== +//***************************************************************************************************** +//***************************************************************************************************** +//***************************************************************************************************** +//***************************************************************************************************** +//***************************************************************************************************** +//***************************************************************************************************** +//====================================================================================================== +//====================================================================================================== + +//====================================================================================================== +//====================================================================================================== + +//====================================================================================================== +function print_graph($g,$pgwidth) { + $splines = false; + $bandw = false; + $percent = false; + $show_percent = false; + $stacked = false; + $h = false; + $show_values = false; + $hide_grid = false; + $hide_y_axis = false; + + if (isset($g['attr']['TYPE']) && $g['attr']['TYPE']) { $type = strtolower($g['attr']['TYPE']); } + if (!in_array($type,array('bar','horiz_bar','line','radar','pie','pie3d','xy','scatter'))) { $type = 'bar'; } // Default=bar + + if (isset($g['attr']['STACKED']) && $g['attr']['STACKED']) { $stacked = true; } // stacked for bar or horiz_bar + if (isset($g['attr']['SPLINES']) && $g['attr']['SPLINES'] && $type=='xy') { $splines = true; } // splines for XY line graphs + if (isset($g['attr']['BANDW']) && $g['attr']['BANDW']) { $bandw = true; } // black and white + if (isset($g['attr']['LEGEND-OVERLAP']) && $g['attr']['LEGEND-OVERLAP']) { $overlap = true; } // avoid overlap of Legends over graph (line, bar, horiz_bar only) + if (isset($g['attr']['PERCENT']) && $g['attr']['PERCENT'] && $type != 'xy' && $type != 'scatter') { $percent = true; } // Show data series as percent of total in series + if (isset($g['attr']['SHOW-VALUES']) && $g['attr']['SHOW-VALUES']) { $show_values = true; } // Show the individual data values + if (isset($g['attr']['HIDE-GRID']) && $g['attr']['HIDE-GRID']) { $hide_grid = true; } // Hide the y-axis gridlines + if (isset($g['attr']['HIDE-Y-AXIS']) && $g['attr']['HIDE-Y-AXIS']) { $hide_y_axis = true; } // Hide the y-axis + + + // Antialias: If true - better quality curves, but graph line will only be 1px even in PDF 300dpi + // default=true for most except line and radar + if (isset($g['attr']['ANTIALIAS']) && ($g['attr']['ANTIALIAS']=='' || $g['attr']['ANTIALIAS']==0)) { $antialias = false; } + else if (isset($g['attr']['ANTIALIAS']) && $g['attr']['ANTIALIAS'] > 0) { $antialias = true; } + else if ($type=='line' || $type=='radar') { $antialias = false; } + else { $antialias = true; } + + if ($g['attr']['DPI']) { $dpi = intval($g['attr']['DPI']); } + if (!$dpi || $dpi < 50 || $dpi > 2400) { $dpi = 150; } // Default dpi 150 + $k = (0.2645/25.4 * $dpi); + + // mPDF 4.5.009 + global $JpgUseSVGFormat; + if (isset($JpgUseSVGFormat) && $JpgUseSVGFormat) { + $img_type = 'svg'; + $k = 1; // Overrides as Vector scale does not need DPI + } + else { + $img_type = 'png'; + } + + if (isset($g['attr']['TITLE']) && $g['attr']['TITLE']) { $title = $g['attr']['TITLE']; } + + if (isset($g['attr']['LABEL-X']) && $g['attr']['LABEL-X']) { $xlabel = $g['attr']['LABEL-X']; } // NOT IMPLEMENTED?????? + if (isset($g['attr']['LABEL-Y']) && $g['attr']['LABEL-Y']) { $ylabel = $g['attr']['LABEL-Y']; } + + if (isset($g['attr']['AXIS-X']) && $g['attr']['AXIS-X']) { $xaxis = strtolower($g['attr']['AXIS-X']); } + if (!in_array($xaxis,array('text','lin','linear','log'))) { $xaxis = 'text'; } // Default=text + if ($xaxis == 'linear') { $xaxis = 'lin'; } + + if (isset($g['attr']['AXIS-Y']) && $g['attr']['AXIS-Y']) { $yaxis = strtolower($g['attr']['AXIS-Y']); } + if (!in_array($yaxis,array('lin','linear','log','percent'))) { $yaxis = 'lin'; } // Default=lin + if ($yaxis == 'percent') { $show_percent = true; $yaxis = 'lin'; } // Show percent sign on scales + if ($yaxis == 'linear') { $yaxis = 'lin'; } + + if ($splines) { $xaxis = 'lin'; } + $axes = $xaxis.$yaxis; // e.g.textlin, textlog, loglog, loglin, linlog (XY) + + // mPDF 4.0 + if (isset($g['attr']['cWIDTH']) && $g['attr']['cWIDTH']) { $w=($g['attr']['cWIDTH'] / 0.2645); } // pixels + if (isset($g['attr']['cHEIGHT']) && $g['attr']['cHEIGHT']) { $h=($g['attr']['cHEIGHT'] / 0.2645); } + + + if (isset($g['attr']['SERIES']) && strtolower($g['attr']['SERIES']) == 'rows') { $dataseries = 'rows'; } + else { $dataseries = 'cols'; } + + // Defaults - define data + $rowbegin = 2; + $colbegin = 2; + if($type=='scatter' || $type=='xy') { + if ($dataseries == 'rows') { $rowbegin = 1; } + else { $colbegin = 1; } + } + $rowend = 0; + $colend = 0; + + if (isset($g['attr']['DATA-ROW-BEGIN']) && ($g['attr']['DATA-ROW-BEGIN'] === '0' || $g['attr']['DATA-ROW-BEGIN'] > 0)) { $rowbegin = $g['attr']['DATA-ROW-BEGIN']; } + + if (isset($g['attr']['DATA-COL-BEGIN']) && ($g['attr']['DATA-COL-BEGIN'] === '0' || $g['attr']['DATA-COL-BEGIN'] > 0)) { $colbegin = $g['attr']['DATA-COL-BEGIN']; } + + if (isset($g['attr']['DATA-ROW-END']) && ($g['attr']['DATA-ROW-END'] === '0' || $g['attr']['DATA-ROW-END'] <> 0)) { $rowend = $g['attr']['DATA-ROW-END']; } + if (isset($g['attr']['DATA-COL-END']) && ($g['attr']['DATA-COL-END'] === '0' || $g['attr']['DATA-COL-END'] <> 0)) { $colend = $g['attr']['DATA-COL-END']; } + + $nr = count($g['data']); + $nc = 0; + foreach($g['data'] AS $r) { + $cc=0; + foreach($r AS $c) { $cc++; } + $nc = max($nc,$cc); + } + if ($colend == 0) { $colend = $nc; } + else if ($colend < 0) { $colend = $nc+$colend; } + + if ($rowend == 0) { $rowend = $nr; } + else if ($rowend < 0) { $rowend = $nr+$rowend; } + + if ($colend < $colbegin) { $colend = $colbegin; } + if ($rowend < $rowbegin) { $rowend = $rowbegin; } + +// if ($type == 'xy' || $type=='scatter') { $colstart=0; } + + // Get Data + Totals + $data = array(); + $totals = array(); + for ($r=($rowbegin-1);$r<$rowend;$r++) { + for ($c=($colbegin-1);$c<$colend;$c++) { + if (isset($g['data'][$r][$c])) { $g['data'][$r][$c] = floatval($g['data'][$r][$c] ); } + else { $g['data'][$r][$c] = 0; } + if ($dataseries=='rows') { + $data[($r+1-$rowbegin)][($c+1-$colbegin)] = $g['data'][$r][$c] ; + $totals[($r+1-$rowbegin)] += $g['data'][$r][$c] ; + } + else { + $data[($c+1-$colbegin)][($r+1-$rowbegin)] = $g['data'][$r][$c] ; + if (isset($totals[($c+1-$colbegin)])) { $totals[($c+1-$colbegin)] += $g['data'][$r][$c] ; } + else { $totals[($c+1-$colbegin)] = $g['data'][$r][$c] ; } + } + } + } + // PERCENT + if ($percent && $type != 'pie' && $type != 'pie3d') { + for ($r=0;$r1) { + for ($r=($rowbegin-1);$r<$rowend;$r++) { + $legends[($r+1-$rowbegin)] = $g['data'][$r][0] ; + $longestlegend = max($longestlegend, strlen( $g['data'][$r][0] )); + } + } + if ($rowbegin>1) { + for ($c=($colbegin-1);$c<$colend;$c++) { + $labels[($c+1-$colbegin)] = $g['data'][0][$c] ; + $longestlabel = max($longestlabel , strlen( $g['data'][0][$c] )); + } + } + } + else if ($dataseries=='rows') { + if ($colbegin>1) { + for ($r=($rowbegin-1);$r<$rowend;$r++) { + $labels[($r+1-$rowbegin)] = $g['data'][$r][0] ; + $longestlabel = max($longestlabel , strlen( $g['data'][$r][0] )); + } + } + if ($rowbegin>1) { + for ($c=($colbegin-1);$c<$colend;$c++) { + $legends[($c+1-$colbegin)] = $g['data'][0][$c] ; + $longestlegend = max($longestlegend, strlen( $g['data'][0][$c] )); + } + } + } + // Default sizes + $defsize = array(); + $defsize['pie'] = array('w' => 600, 'h' => 300); + $defsize['pie3d'] = array('w' => 600, 'h' => 300); + $defsize['radar'] = array('w' => 600, 'h' => 300); + $defsize['line'] = array('w' => 600, 'h' => 400); + $defsize['xy'] = array('w' => 600, 'h' => 400); + $defsize['scatter'] = array('w' => 600, 'h' => 400); + $defsize['bar'] = array('w' => 600, 'h' => 400); + $defsize['horiz_bar'] = array('w' => 600, 'h' => 500); + + + // Use default ratios + if ($w && !$h) { $h = $w*$defsize[$type]['h']/$defsize[$type]['w']; } + if ($h && !$w) { $w = $h*$defsize[$type]['w']/$defsize[$type]['h']; } + if (!$h && !$w) { $w = $defsize[$type]['w']; $h = $defsize[$type]['h']; } + + + if (count($data)>0 && $type) { + $figure_file = "graph_cache/".rand(11111,999999999).".".$img_type; + if ($bandw) { $colours = array('snow1','black','snow4','snow3','snow2','cadetblue4','cadetblue3','cadetblue1','bisque4','bisque2','beige'); } + else { $colours = array('cyan','darkorchid4','cadetblue3','khaki1','darkolivegreen2','cadetblue4','coral','cyan4','rosybrown3','wheat1'); } + $fills = array('navy','orange','red','yellow','purple','navy','orange','red','yellow','purple'); + $patterns = array(PATTERN_DIAG1,PATTERN_CROSS1,PATTERN_STRIPE1,PATTERN_DIAG3,PATTERN_CROSS2,PATTERN_DIAG2,PATTERN_DIAG4,PATTERN_CROSS3, PATTERN_CROSS4,PATTERN_STRIPE1); + $markers = array(MARK_DIAMOND, MARK_SQUARE, MARK_CIRCLE, MARK_UTRIANGLE, MARK_DTRIANGLE, MARK_FILLEDCIRCLE, MARK_CROSS, MARK_STAR, MARK_X); + + // LEGENDS + if ($type == 'pie' || $type == 'pie3d') { + $graph = new PieGraph (($w*$k),($h*$k)); + } + else if ($type == 'radar') { + $graph = new RadarGraph(($w*$k),($h*$k)); + } + else { + $graph = new Graph(($w*$k),($h*$k)); + } + +// mPDF 4.5.009 +// $graph->img->SetImgFormat($img_type) ; +// if (strtoupper($img_type)=='JPEG') { $graph->img->SetQuality(90); } + if ($antialias) { $graph->img->SetAntiAliasing(); } + $graph->SetShadow(true, 2*$k); + $graph->SetMarginColor("white"); + // TITLE + $graph->title->Set($title); + $graph->title->SetMargin(10*$k); + $graph->title->SetFont(FF_USERFONT,FS_BOLD,11*$k); + $graph->title->SetColor("black"); + $graph->legend->SetLineSpacing(3*$k); + $graph->legend->SetMarkAbsSize(6*$k); + $graph->legend->SetFont(FF_USERFONT,FS_NORMAL,8*$k); + + // Set GRAPH IMAGE MARGINS + if ($type == 'pie' || $type == 'pie3d') { + $psize = 0.3; + $pposxabs = ($w/2); + $pposy = 0.55; + if ($longestlegend) { // if legend showing + $pposxabs -= ((($longestlegend * 5) + 20) / 2); + } + $pposx = ($pposxabs / $w); + $graph->legend->Pos(0.02,0.5,'right','center'); + } + else if ($type == 'radar') { + $psize = 0.5; + $pposxabs = ($w/2); + $pposy = 0.55; + if ($longestlabel) { // if legend showing + $pposxabs -= ((($longestlabel * 5) + 20) / 2); + } + $pposx = ($pposxabs / $w); + $graph->legend->Pos(0.02,0.5,'right','center'); + } + else if ($type == 'xy' || $type == 'scatter') { + $pml = 50; + $pmr = 20; + $pmt = 60; + $pmb = 50; + $xaxislblmargin = $pmb - 30; + $yaxislblmargin = $pml - 15; + $graph->legend->Pos(0.02,0.1,'right','top'); + } + else if ($type == 'line' || $type == 'bar') { + $pml = 50; + $pmr = 20; + $pmt = 60; + $pmb = 50; + $xlangle = 0; + $ll = ($longestlegend * 5); // 45 degrees 8pt fontsize + if ($ll > 5 || ($ll>3 && count($data)>10)) { + $pmb = max($pmb, $ll + 30); + $xlangle = 50; + } + $xaxislblmargin = $pmb - 30; + $yaxislblmargin = $pml - 15; + if ($longestlabel && !$overlap) { // if legend showing + $pmr = ((($longestlabel * 5) + 40)); + } + $graph->legend->Pos(0.02,0.1,'right','top'); + } + else if ($type == 'horiz_bar') { + $pml = 50; + $pmr = 20; + $pmt = 50; + $pmb = 45; + $ll = ($longestlegend * 6.5); // 8pt fontsize + $pml = max($pml, $ll + 20); + $xaxislblmargin = $pml - 20; + $yaxislblmargin = $pmb - 15; + if ($longestlabel && !$overlap) { // if legend showing + $pmr = ((($longestlabel * 5) + 40)); + } + $graph->legend->Pos(0.02,0.1,'right','top'); + } + + + // DRAW THE GRAPHS + if ($type == 'pie') { + $p1 = new PiePlot($data[0]); + $p1->SetSliceColors($colours); + + if ($show_values) { + $p1->value->SetFont(FF_USERFONT,FS_NORMAL,8*$k); + if ($percent) { $p1->SetLabelType(PIE_VALUE_PERADJ); } //PIE_VAL_PER = default + else { $p1->SetLabelType(PIE_VALUE_ABS); } + if ($percent || $show_percent) { $p1->value->SetFormat("%d%%"); } + else { $p1->value->SetFormat("%s"); } + // Enable and set policy for guide-lines. Make labels line up vertically + $p1->SetGuideLines(true); + $p1->SetGuideLinesAdjust(1.5); + } + else { $p1->value->Show(false); } + $p1->SetLegends($legends); + $p1->SetSize($psize); + $p1->SetCenter($pposx, $pposy); + if ($labels[0]) { + $graph->subtitle->Set($labels[0]); + $graph->subtitle->SetMargin(10*$k); + $graph->subtitle->SetFont(FF_USERFONT,FS_BOLD,11*$k); + $graph->subtitle->SetColor("black"); + } + $graph->Add($p1); + } + else if ($type == 'pie3d') { + $p1 = new PiePlot3d($data[0]); + $p1->SetSliceColors($colours); + if ($show_values) { + $p1->value->SetFont(FF_USERFONT,FS_NORMAL,8*$k); + if ($percent) { $p1->SetLabelType(PIE_VALUE_PERADJ); } //PIE_VAL_PER = default + else { $p1->SetLabelType(PIE_VALUE_ABS); } + if ($percent || $show_percent) { $p1->value->SetFormat("%d%%"); } + else { $p1->value->SetFormat("%s"); } + } + else { $p1->value->Show(false); } + $p1->SetLegends($legends); + $p1->SetEdge(); + $p1->SetSize($psize); + $p1->SetCenter($pposx, $pposy); + + if ($labels[0]) { + $graph->subtitle->Set($labels[0]); + $graph->subtitle->SetMargin(10*$k); + $graph->subtitle->SetFont(FF_USERFONT,FS_BOLD,11*$k); + $graph->subtitle->SetColor("black"); + } + + $graph->Add( $p1); + } + // RADAR + else if ($type == 'radar') { + $graph->SetSize($psize); + $graph->SetPos($pposx, $pposy); + + $graph->SetTitles( $legends); // labels each axis + + $graph->axis->title->SetFont(FF_USERFONT,FS_NORMAL,8*$k); + $graph->axis->title->SetMargin(5*$k); + $graph->axis->SetWeight(1*$k); + $graph->axis->HideLabels(); + $graph->axis->SetFont(FF_USERFONT,FS_NORMAL,6*$k); + $graph->HideTickMarks(); + + $group = array(); + foreach($data AS $series => $dat) { + $rdata = array(); + foreach($data[$series] AS $row) { $rdata[] = $row; } + if (count($rdata)<3) { die("ERROR::Graph::Cannot create a Radar Plot with less than 3 data points."); } + // Create the radar plot + $bplot = new RadarPlot($rdata); + $bplot->mark->SetType($markers[$series]); + $bplot->mark->SetFillColor($colours[$series]); + $bplot->mark->SetWidth(3*$k); + $bplot->SetColor($colours[$series]); + if ($series == 0) { $bplot->SetFillColor('lightred'); } + else { $bplot->SetFill(false); } + $bplot->SetLineWeight(1*$k); + $bplot->SetLegend($labels[$series]); + if ($bandw) { $bplot->SetShadow("gray5"); } + $graph->Add($bplot); + } + } + // LINE + else if ($type == 'line') { + // Setup the graph. + $graph->img->SetMargin($pml*$k,$pmr*$k,$pmt*$k,$pmb*$k); // LRTB + $graph->SetScale($axes); + $graph->yaxis->SetFont(FF_USERFONT,FS_NORMAL,8*$k); + + if ($ylabel) { + $graph->yaxis->title->SetFont(FF_USERFONT,FS_NORMAL,8*$k); + $graph->yaxis->SetTitle($ylabel,'middle'); + $graph->yaxis->SetTitleMargin($yaxislblmargin*$k); + } + + $graph->yaxis->SetLabelMargin(4*$k); + if ($percent || $show_percent) { $graph->yaxis->SetLabelFormat('%d%%'); } // Percent + + // Show 0 label on Y-axis (default is not to show) + $graph->yscale->ticks->SupressZeroLabel(true); + if ($hide_y_axis) { $graph->yaxis->Hide(); } + if ($hide_grid) { $graph->ygrid->Show(false); } + + // Setup X-axis labels + $graph->xaxis->SetFont(FF_USERFONT,FS_NORMAL,8*$k); + $graph->xaxis->SetTickLabels($legends); + $graph->xaxis->SetLabelAngle($xlangle); + $graph->xaxis->SetLabelMargin(4*$k); + // X-axis title + if ($xlabel) { + $graph->xaxis->title->SetFont(FF_USERFONT,FS_NORMAL,8*$k); + $graph->xaxis->SetTitle($xlabel,'middle'); + $graph->xaxis->SetTitleMargin($xaxislblmargin*$k); + } + foreach($data AS $series => $rdata) { + $bplot = new LinePlot($rdata); + $bplot->mark->SetType($markers[$series]); + $bplot->mark->SetFillColor($colours[$series]); + $bplot->mark->SetWidth(4*$k); + if ($show_values) { + $bplot->value-> Show(); // Not if scatter + $bplot->value->SetMargin(6*$k); + $bplot->value->SetColor("darkred"); + $bplot->value->SetFont( FF_USERFONT, FS_NORMAL, 8*$k); + if ($percent || $show_percent) { $bplot->value->SetFormat( '%d%%'); } + else { $bplot->value->SetFormat("%s"); } + } + // Set color for each line + $bplot->SetColor($colours[$series]); + $bplot->SetWeight(2*$k); + $bplot->SetLegend($labels[$series]); + if ($bandw) { $bplot->SetShadow("gray5"); } + // Indent the X-scale so the first and last point doesn't fall on the edges + $bplot->SetCenter(); + $graph->Add($bplot); + } + + } + // XY or SCATTER + else if ($type == 'xy' || $type == 'scatter') { + // Setup the graph. + $graph->img->SetMargin($pml*$k,$pmr*$k,$pmt*$k,$pmb*$k); // LRTB + $graph->SetScale($axes); + // Setup font for axis + $graph->yaxis->SetFont(FF_USERFONT,FS_NORMAL,8*$k); + // Y-axis title + if ($labels[1]) { + $graph->yaxis->title->SetFont(FF_USERFONT,FS_NORMAL,8*$k); + $graph->yaxis->SetTitleMargin($yaxislblmargin*$k); + $graph->yaxis->SetTitle($labels[1],'middle'); + } + + + $graph->yaxis->SetLabelMargin(4*$k); + if ($percent || $show_percent) { $graph->yaxis->SetLabelFormat('%d%%'); } // Percent + + // Show 0 label on Y-axis (default is not to show) + $graph->yscale->ticks->SupressZeroLabel(true); + // Just let the maximum be autoscaled + $graph->yaxis->scale->SetAutoMin(0); + if ($hide_y_axis) { $graph->yaxis->Hide(); } + if ($hide_grid) { $graph->ygrid->Show(false); } + + // Setup X-axis labels + $graph->xaxis->SetFont(FF_USERFONT,FS_NORMAL,8*$k); +// mPDF 2.5 Corrects labelling of x-axis +// $graph->xaxis->SetTickLabels($legends); + $graph->xaxis->SetLabelAngle(50); + $graph->xaxis->SetLabelMargin(4*$k); + // X-axis title + if ($labels[0]) { + $graph->xaxis->title->SetFont(FF_USERFONT,FS_NORMAL,8*$k); + $graph->xaxis->SetTitleMargin($xaxislblmargin*$k); + $graph->xaxis->SetTitle($labels[0],'middle'); + } + + // Create the bar plot + // SPLINES + if ($splines && $type=='xy') { + $spline = new Spline($data[0],$data[1]); + list($newx,$newy) = $spline->Get(100); + } + else { + $newx = $data[0]; + $newy = $data[1]; + } + + if ($type=='xy') { + // LINE PLOT + $bplot = new LinePlot($newy, $newx); + // Set color for each line + $bplot->SetColor($fills[0]); + $bplot->SetWeight(4*$k); + if ($bandw) { $bplot->SetShadow("gray5"); } + $graph->Add($bplot); + } + + // SCATTER PLOT + $cplot = new ScatterPlot($data[1], $data[0]); + + $cplot->mark->SetType($markers[0]); + $cplot->mark->SetFillColor($fills[0]); + $cplot->mark->SetWidth(8*$k); + if ($show_values) { +// mPDF 2.5 + if ($type=='xy') { $cplot->value->Show(); } // Not if scatter + $cplot->value->SetMargin(8*$k); + $cplot->value->SetColor("darkred"); + $cplot->value->SetFont( FF_USERFONT, FS_NORMAL, 6*$k); + + if ($percent || $show_percent) { $cplot->value->SetFormat( '%d%%'); } + else { $cplot->value->SetFormat("%s"); } + } + + // Set color for each line + $cplot->SetColor($fills[0]); + $cplot->SetWeight(4*$k); + if ($bandw) { $cplot->SetShadow("gray5"); } + $graph->Add($cplot); + + } + // BAR + else if ($type == 'bar') { + // Setup the graph. + $graph->img->SetMargin($pml*$k,$pmr*$k,$pmt*$k,$pmb*$k); // LRTB + $graph->SetScale($axes); + // Setup y-axis + $graph->yaxis->SetFont(FF_USERFONT,FS_NORMAL,8*$k); + if ($hide_y_axis) { $graph->yaxis->Hide(); } + if ($hide_grid) { $graph->ygrid->Show(false); } + $graph->yaxis->SetLabelMargin(4*$k); + if ($ylabel) { + $graph->yaxis->title->SetFont(FF_USERFONT,FS_NORMAL,8*$k); + $graph->yaxis->SetTitle($ylabel,'middle'); + $graph->yaxis->SetTitleMargin($yaxislblmargin*$k); + } + // Show 0 label on Y-axis (default is not to show) + $graph->yscale->ticks->SupressZeroLabel(false); + // Setup X-axis labels + $graph->xaxis->SetFont(FF_USERFONT,FS_NORMAL,8*$k); + $graph->xaxis->SetTickLabels($legends); + $graph->xaxis->SetLabelAngle($xlangle); + $graph->xaxis->SetLabelMargin(4*$k); + // X-axis title + if ($xlabel) { + $graph->xaxis->title->SetFont(FF_USERFONT,FS_NORMAL,8*$k); + $graph->xaxis->SetTitle($xlabel,'middle'); + $graph->xaxis->SetTitleMargin($xaxislblmargin*$k); + } + + $group = array(); + foreach($data AS $series => $dat) { + $rdata = array(); + foreach($data[$series] AS $row) { $rdata[] = $row; } + + // Create the bar plot + $bplot = new BarPlot($rdata); + $bplot->SetWidth(0.6); // for SINGLE?? + // Setup color for gradient fill style + if ($bandw) { $bplot->SetPattern( $patterns[$series]); } + else { $bplot->SetFillGradient($fills[$series],"#EEEEEE",GRAD_LEFT_REFLECTION); } + + // Set color for the frame of each bar + $bplot->SetColor("darkgray"); + $bplot->SetLegend($labels[$series]); + if ($bandw) { $bplot->SetShadow("gray5"); } + if ($show_values) { + $bplot->value->Show(); + $bplot->value->SetMargin(6*$k); + $bplot->value->SetColor("darkred"); + $bplot->value->SetFont( FF_USERFONT, FS_NORMAL, 8*$k); + if ($percent || $show_percent) { $bplot->value->SetFormat( '%d%%'); } + else { $bplot->value->SetFormat("%s"); } + } + + $group[] = $bplot; + } + if (count($data)==1) { + $graph->Add($group[0]); + } + else { + // Create the grouped bar plot + if ($stacked) { + $gbplot = new AccBarPlot ($group); + } + else { + $gbplot = new GroupBarPlot ($group); + } + $graph->Add($gbplot); + } + } + else if ($type == 'horiz_bar') { + $graph->SetScale($axes); + $graph->Set90AndMargin($pml*$k,$pmr*$k,$pmt*$k,$pmb*$k); // LRTB + + // Setup y-axis + $graph->yaxis->SetFont(FF_USERFONT,FS_NORMAL,8*$k); + $graph->yaxis->SetLabelMargin(4*$k); + + $graph->yaxis->SetPos('max'); // Intersect at top of x-axis i.e. y axis is at bottom + // First make the labels look right + $graph->yaxis->SetLabelAlign('center','top'); + if ($percent || $show_percent) { $graph->yaxis->SetLabelFormat('%d%%'); } + $graph->yaxis->SetLabelSide(SIDE_RIGHT); + $graph->yaxis->scale->SetGrace(10); // sets 10% headroom + if ($hide_y_axis) { $graph->yaxis->Hide(); } + if ($hide_grid) { $graph->ygrid->Show(false); } + + // The fix the tick marks + $graph->yaxis->SetTickSide(SIDE_LEFT); + if ($ylabel) { + $graph->yaxis->title->SetFont(FF_USERFONT,FS_NORMAL,8*$k); + $graph->yaxis->SetTitle($ylabel,'middle'); + $graph->yaxis->SetTitleMargin($yaxislblmargin*$k); + // Finally setup the title + $graph->yaxis->SetTitleSide(SIDE_RIGHT); + // To align the title to the right use : + $graph->yaxis->title->Align('right'); + $graph->yaxis->title->SetAngle(0); + + } + + // Show 0 label on Y-axis (default is not to show) + $graph->yscale->ticks->SupressZeroLabel(false); + // Setup X-axis labels + $graph->xaxis->SetFont(FF_USERFONT,FS_NORMAL,8*$k); + $graph->xaxis->title->SetAngle(90); + $graph->xaxis->SetTickLabels($legends); + $graph->xaxis->SetLabelMargin(4*$k); + // X-axis title + if ($xlabel) { + $graph->xaxis->title->SetFont(FF_USERFONT,FS_NORMAL,8*$k); + $graph->xaxis->SetTitleMargin($xaxislblmargin*$k); + $graph->xaxis->SetTitle($xlabel,'middle'); + } + $group = array(); + foreach($data AS $series => $dat) { + $rdata = array(); + foreach($data[$series] AS $row) { $rdata[] = $row; } + // Create the bar pot + $bplot = new BarPlot($rdata); + $bplot->SetWidth(0.6); // for SINGLE?? + // Setup color for gradient fill style + if ($bandw) { $bplot->SetPattern( $patterns[$series]); } + else { $bplot->SetFillGradient($fills[$series],"#EEEEEE",GRAD_LEFT_REFLECTION); } + + // Set color for the frame of each bar + $bplot->SetColor("darkgray"); + $bplot->SetLegend($labels[$series]); + if ($bandw) { $bplot->SetShadow("gray5"); } + if ($show_values) { + $bplot->value-> Show(); + $bplot->value->SetMargin(6*$k); + $bplot->value->SetColor("darkred"); + $bplot->value->SetFont( FF_USERFONT, FS_NORMAL, 8*$k); + if ($percent || $show_percent) { $bplot->value->SetFormat( '%d%%'); } + else { $bplot->value->SetFormat("%s"); } + } + + $group[] = $bplot; + } + if (count($data)==1) { + $graph->Add($group[0]); + } + else { + // Create the grouped bar plot + if ($stacked) { + $gbplot = new AccBarPlot ($group); + } + else { + $gbplot = new GroupBarPlot ($group); + } + $graph->Add($gbplot); + } + } + if ($graph) { + $graph->Stroke( _MPDF_PATH.$figure_file); + $srcpath = str_replace("\\","/",dirname(__FILE__)) . "/"; + $srcpath .= $figure_file; + return array('file'=>$srcpath, 'w'=>$w, 'h'=>$h); + } + } + return false; +} +//====================================================================================================== +//====================================================================================================== +//====================================================================================================== +//====================================================================================================== + +?> \ No newline at end of file -- cgit v1.2.3