<?php

/*

 * Enano - an open-source CMS capable of wiki functions, Drupal-like sidebar blocks, and everything in between

 * Version 1.0.1 (Loch Ness)

 * Copyright (C) 2006-2007 Dan Fuhry

 *

 * This program is Free Software; you can redistribute 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 details.

 */

// BarGraph for PHP

// Source: http://www.phpclasses.org/browse/package/1567.html

// License: PHP license, see licenses/phplic.html included with this package

class GraphMaker {

  /**

   * GraphMaker::bar_width

   * Width of bars

   */

  var $bar_width = 32;

  /**

   * GraphMaker::bar_height

   * Height of bars

   */

  var $bar_height = 8;

  /**

   * GraphMaker::bar_data

   * Data of all bars

   */

  var $bar_data = array('a' => 7, 'b' => 3, 'c' => 6, 'd' => 0, 'e' => 2);

  /**

   * GraphMaker::bar_padding

   * Padding of bars

   */

  var $bar_padding = 5;

  /**

   * GraphMaker::bar_bordercolor

   * Border color of bars

   */

  var $bar_bordercolor = array(39, 78, 120);

  /**

   * GraphMaker::bar_bgcolor

   * Background color of bars

   */

  var $bar_bgcolor = array(69, 129, 194);

  //---------------------------------------------

  /**

   * GraphMaker::graph_areaheight

   * Height of graphic area

   */

  var $graph_areaheight = 100;

  /**

   * GraphMaker::graph_padding

   * Paddings of graph

   */

  var $graph_padding = array('left' => 50, 'top' => 20, 'right'  => 20, 'bottom' => 20);

  /**

   * GraphMaker::graph_title

   * Title text of graph

   */

  var $graph_title = "";

  /**

   * GraphMaker::graph_bgcolor

   * Background color of graph

   */

  var $graph_bgcolor = array(255, 255, 255);

  /**

   * GraphMaker::graph_bgtransparent

   * Boolean for background transparency

   */

  var $graph_bgtransparent = 0;

  /**

   * GraphMaker::graph_transparencylevel

   * Transparency level (0=opaque, 127=transparent)

   */

  var $graph_transparencylevel = 0;

  /**

   * GraphMaker::graph_borderwidth

   * Width of graph border

   */

  var $graph_borderwidth = 1;

  /**

   * GraphMaker::graph_bordercolor

   * Border color of graph

   */

  var $graph_bordercolor = array(218, 218, 239);

  /**

   * GraphMaker::graph_titlecolor

   * Color of title text of graph

   */

  var $graph_titlecolor = array(99, 88, 78);

  //---------------------------------------------

  /**

   * GraphMaker::axis_step

   * Scale step of axis

   */

  var $axis_step = 2;

  /**

   * GraphMaker::axis_bordercolor

   * Border color of axis

   */

  var $axis_bordercolor = array(99, 88, 78);

  /**

   * GraphMaker::axis_bgcolor

   * Background color of axis

   */

  var $axis_bgcolor = array(152, 137, 124);

  /****************************************************************

                              GRAPH

  ****************************************************************/

  /**

   * GraphMaker::SetGraphAreaHeight()

   * Sets graph height (not counting top and bottom margins)

   **/

  function SetGraphAreaHeight($height) {

    if ($height > 0) $this->graph_areaheight = $height;

  }

  /**

   * GraphMaker::SetGraphPadding()

   * Sets graph padding (margins)

   **/

  function SetGraphPadding($left, $top, $right, $bottom) {

    $this->graph_padding = array('left'   => (int) $left,

                                 'top'    => (int) $top,

                                 'right'  => (int) $right,

                                 'bottom' => (int) $bottom);

  }

  /**

   * GraphMaker::SetGraphTitle()

   * Set title text

   **/

  function SetGraphTitle($title) {

    $this->graph_title = $title;

  }

  /**

   * GraphMaker::SetGraphBorderColor()

   * Sets border color for graph

   **/

  function SetGraphBorderColor($red, $green, $blue) {

    $this->graph_bordercolor = array($red, $green, $blue);

  }

  /**

   * GraphMaker::SetGraphBorderWidth()

   * Set width of border. 0 disables border

   **/

  function SetGraphBorderWidth($width = 0) {

    $this->graph_borderwidth = $width;

  }

  /**

   * GraphMaker::SetGraphBackgroundColor()

   * Sets background color for graph

   **/

  function SetGraphBackgroundColor($red, $green, $blue) {

    $this->graph_bgcolor = array($red, $green, $blue);

  }

  /**

   * GraphMaker::SetGraphBackgroundTransparent()

   * Sets background color for graph (and set it transparent)

   **/

  function SetGraphBackgroundTransparent($red, $green, $blue, $addtransparency = 1) {

    $this->graph_bgcolor = array($red, $green, $blue);

    $this->graph_bgtransparent = ($addtransparency ? 1 : 0);

  }

  /**

   * GraphMaker::SetGraphTitleColor()

   * Sets title color for graph

   **/

  function SetGraphTitleColor($red, $green, $blue) {

    $this->graph_titlecolor = array($red, $green, $blue);

  }

  /**

   * GraphMaker::SetGraphTransparency()

   * Sets transparency for graph

   **/

  function SetGraphTransparency($percent) {

    if ($percent < 0) $percent = 0;

    elseif ($percent > 100) $percent = 127;

    else $percent = $percent * 1.27;

    $this->graph_transparencylevel = $percent;

  }

  /****************************************************************

                               BAR

  ****************************************************************/

  /**

   * GraphMaker::SetBarBorderColor()

   * Sets border color for bars

   **/

  function SetBarBorderColor($red, $green, $blue) {

    $this->bar_bordercolor = array($red, $green, $blue);

  }

  /**

   * GraphMaker::SetBarBackgroundColor()

   * Sets background color for bars

   **/

  function SetBarBackgroundColor($red, $green, $blue) {

    $this->bar_bgcolor = array($red, $green, $blue);

  }

  /**

   * GraphMaker::SetBarData()

   * Sets data of graph (parameter should be an array with key

   * being the name of the bar and the value the value of the bar.

   **/

  function SetBarData($data) {

    if (is_array($data)) $this->bar_data = $data;

  }

  /**

   * GraphMaker::SetBarDimensions()

   * Sets with and height of each bar

   **/

  function SetBarDimensions($width, $height) {

    if ($width > 0) $this->bar_width = $width;

    if ($height > 0) $this->bar_height = $height;

  }

  /**

   * GraphMaker::SetBarPadding()

   * Sets padding (border) around each bar

   **/

  function SetBarPadding($padding) {

    if ($padding > 0) $this->bar_padding = $padding;

  }

  /****************************************************************

                               AXIS

  ****************************************************************/

  /**

   * GraphMaker::SetAxisBorderColor()

   * Sets border color for axis

   **/

  function SetAxisBorderColor($red, $green, $blue) {

    $this->axis_bordercolor = array($red, $green, $blue);

  }

  /**

   * GraphMaker::SetAxisBackgroundColor()

   * Sets background color for axis

   **/

  function SetAxisBackgroundColor($red, $green, $blue) {

    $this->axis_bgcolor = array($red, $green, $blue);

  }

  /**

   * GraphMaker::SetAxisStep()

   * Sets axis scale step

   **/

  function SetAxisStep($step) {

    if ($step > 0) $this->axis_step = $step;

  }

  /**

   * GraphMaker::GetFinalGraphDimensions()

   * From the values already setted, it calculates image

   * width and height

   **/

  function GetFinalGraphDimensions() {

    $w = $this->graph_padding['left'] +

         (count($this->bar_data) * ($this->bar_width + ($this->bar_padding * 2))) +

         $this->graph_padding['right'];

    $h = $this->graph_padding['top'] +

         $this->graph_areaheight +

         $this->graph_padding['bottom'];

    return array($w, $h);

  }

  /**

   * GraphMaker::LoadGraph()

   * Loads definitions from a file

   **/

  function LoadGraph($path) {

    if (($fp = @fopen($path, "r")) !== false) {

      $content = "";

      while (!feof($fp)) {              // I do not use filesize() here

        $content .= fread($fp, 4096);   // because of remote files. If

      }                                 // there is no problem with them

      fclose($fp);                      // please let me know

      $this->__LoadGraphDefinitions($content);

      return true;

    } else return false;

  }

  /**

   * GraphMaker::DrawGraph()

   * Draw all the graph: bg, axis, bars, text.. and output it

   * Optional file parameter turns output to file, and bool on success

   **/

  function DrawGraph($file = "") {

    list($w, $h) = $this->GetFinalGraphDimensions();

    $this->graph_width = $w;

    $this->graph_height = $h;

    $this->im = imagecreatetruecolor($w, $h);

    if ($this->graph_transparencylevel) {

      imagealphablending($this->im, true);

    }

    $this->__PaintBackground();

    $this->__DrawAxis();

    $p = 0;

    foreach ($this->bar_data as $name => $value) {

      $p++;

      $this->__DrawBarText($p, $name);

      $this->__DrawBar($p, $value);

    }

    if (strlen($this->graph_title)) {

      $this->__AllocateColor("im_graph_titlecolor",

                             $this->graph_titlecolor,

                             $this->graph_transparencylevel);

      $this->__DrawText($this->graph_title,

                        floor($this->graph_width / 2),

                        $this->graph_borderwidth + 2,

                        $this->im_graph_titlecolor,

                        2,

                        1);

    }

    if (strlen($file)) {

      $ret = imagepng($this->im, $file);

    } else {

      header('Content-Type: image/png');

      imagepng($this->im);

      $ret = true;

    }

    imagedestroy($this->im);

    return $ret;

  }

  /**

   * GraphMaker::PaintBackground()

   * Draw all the graph: bg, axis, bars, text.. and output it

   * Optional file parameter turns output to file, and bool on success

   **/

  function __PaintBackground() {

    $this->__AllocateColor("im_graph_bgcolor",

                           $this->graph_bgcolor,

                           0);

    imagefilledrectangle($this->im,

                         0,

                         0,

                         $this->graph_width,

                         $this->graph_height,

                         $this->im_graph_bgcolor);

    if ($this->graph_bgtransparent) {

      imagecolortransparent($this->im, $this->im_graph_bgcolor);

    }

    if ($this->graph_borderwidth) {

      $this->__AllocateColor("im_graph_bordercolor",

                             $this->graph_bordercolor,

                             $this->graph_transparencylevel);

      for ($i = 0; $i < $this->graph_borderwidth; $i++) {

        imagerectangle($this->im,

                       $i,

                       $i,

                       $this->graph_width - 1 - $i,

                       $this->graph_height - 1 - $i,

                       $this->im_graph_bordercolor);

      }

    }

  }

  /**

   * GraphMaker::__DrawAxis()

   * Draws all the axis stuff (and scale steps)

   **/

  function __DrawAxis() {

    $this->__AllocateColor("im_axis_bordercolor",

                           $this->axis_bordercolor,

                           $this->graph_transparencylevel);

    $this->__AllocateColor("im_axis_bgcolor",

                           $this->axis_bgcolor,

                           $this->graph_transparencylevel);

    $this->__DrawPolygon($this->graph_padding['left'], $this->graph_height - $this->graph_padding['bottom'],

                         $this->graph_padding['left'], $this->graph_padding['top'],

                         $this->graph_padding['left'] + $this->bar_height - 1, $this->graph_padding['top'] - $this->bar_height + 1,

                         $this->graph_padding['left'] + $this->bar_height - 1, $this->graph_height - $this->graph_padding['bottom'] - $this->bar_height + 1,

                         $this->im_axis_bgcolor, true);

    $this->__DrawPolygon($this->graph_padding['left'], $this->graph_height - $this->graph_padding['bottom'],

                         $this->graph_padding['left'], $this->graph_padding['top'],

                         $this->graph_padding['left'] + $this->bar_height - 1, $this->graph_padding['top'] - $this->bar_height + 1,

                         $this->graph_padding['left'] + $this->bar_height - 1, $this->graph_height - $this->graph_padding['bottom'] - $this->bar_height + 1,

                         $this->im_axis_bordercolor);

    $this->__DrawPolygon($this->graph_padding['left'], $this->graph_height - $this->graph_padding['bottom'],

                         $this->graph_padding['left'] + $this->bar_height - 1, $this->graph_height - $this->graph_padding['bottom'] - $this->bar_height + 1,

                         $this->graph_width - $this->graph_padding['right'] + $this->bar_height - 1, $this->graph_height - $this->graph_padding['bottom'] - $this->bar_height + 1,

                         $this->graph_width - $this->graph_padding['right'], $this->graph_height - $this->graph_padding['bottom'],

                         $this->im_axis_bgcolor, true);

    $this->__DrawPolygon($this->graph_padding['left'], $this->graph_height - $this->graph_padding['bottom'],

                         $this->graph_padding['left'] + $this->bar_height - 1, $this->graph_height - $this->graph_padding['bottom'] - $this->bar_height + 1,

                         $this->graph_width - $this->graph_padding['right'] + $this->bar_height - 1, $this->graph_height - $this->graph_padding['bottom'] - $this->bar_height + 1,

                         $this->graph_width - $this->graph_padding['right'], $this->graph_height - $this->graph_padding['bottom'],

                         $this->im_axis_bordercolor);

    // draw lines that separate bars

    $total_bars = count($this->bar_data);

    for ($i = 1; $i < $total_bars; $i++) {

      $offset = $this->graph_padding['left'] +

                (($this->bar_width + ($this->bar_padding * 2)) * $i);

      imageline($this->im,

                $offset,

                $this->graph_height - $this->graph_padding['bottom'],

                $offset + $this->bar_height - 1,

                $this->graph_height - $this->graph_padding['bottom'] - $this->bar_height + 1,

                $this->im_axis_bordercolor);

    }

    // draw scale steps

    $max_value = $this->__GetMaxGraphValue();

    if (($max_value % 10) > 0) {

      $max_value = $max_value + (10 - ($max_value % 10));

    }

    $this->axis_max = $max_value;

    $y = 0;

    $style = array($this->im_axis_bordercolor, $this->im_graph_bgcolor);

    imagesetstyle($this->im, $style);

    while ($y <= $max_value) {

      if ($max_value == 0) { $max_value=1; } // corrected by Marcelo Trenkenchu

      $offset = floor($this->graph_height - $this->graph_padding['bottom'] -

                ($y * $this->graph_areaheight / $max_value));

      imageline($this->im,

                $this->graph_padding['left'],

                $offset,

                $this->graph_padding['left'] + $this->bar_height - 1,

                $offset - $this->bar_height + 1,

                $this->im_axis_bordercolor);

      $this->__DrawText($y,

                        $this->graph_padding['left'],

                        $offset,

                        $this->im_axis_bordercolor,

                        1,

                        2,

                        1);

      // gridline

      if ($y > 0) {

        imageline($this->im,

                  $this->graph_padding['left'] + $this->bar_height,

                  $offset - $this->bar_height + 1,

                  $this->graph_width - $this->graph_padding['right'] + $this->bar_height - 1,

                  $offset - $this->bar_height + 1,

                  IMG_COLOR_STYLED);

      }

      $y += $this->axis_step;

    }

    imageline($this->im,

              $this->graph_width - $this->graph_padding['right'] + $this->bar_height - 1,

              $this->graph_padding['top'] - $this->bar_height + 1,

              $this->graph_width - $this->graph_padding['right'] + $this->bar_height - 1,

              $this->graph_height - $this->graph_padding['bottom'] - $this->bar_height,

              IMG_COLOR_STYLED);

  }

  /**

   * GraphMaker::__DrawText()

   * Draws text on image with color, size and alignment options

   **/

  function __DrawText($text, $x, $y, $color, $size = 1, $align = 0, $valign = 0) {

    /*

     * Align: 0=left | 1=center | 2=right

     */

    if ($align == 1) $x -= floor(strlen($text) * imagefontwidth($size) / 2);

    elseif ($align == 2) $x -= (strlen($text) * imagefontwidth($size));

    if ($valign == 1) $y -= floor(imagefontheight($size) / 2);

    elseif ($valign == 2) $y -= imagefontheight($size);

    imagestring($this->im,

                $size,

                $x,

                $y,

                $text,

                $color);

  }

  /**

   * GraphMaker::__GetMaxGraphValue()

   * Returns max bar value

   **/

  function __GetMaxGraphValue() {

    $max_value = 0;

    foreach ($this->bar_data as $name => $value) {

      if ($value > $max_value) $max_value = $value;

    }

    return $max_value;

  }

  /**

   * GraphMaker::__DrawBarText()

   * Determines top and left to draw text to a choosen bar

   **/

  function __DrawBarText($bar, $text) {

    $this->__DrawText($text,

                      $this->graph_padding['left'] + (($this->bar_width + ($this->bar_padding * 2)) * ($bar - 0.5)),

                      $this->graph_height - $this->graph_padding['bottom'] + 1,

                      $this->axis_bordercolor,

                      1,

                      1);

  }

  /**

   * GraphMaker::__DrawBar()

   * Draws a choosen bar with it's value

   **/

  function __DrawBar($bar, $value) {

    $x = $this->graph_padding['left'] +

         (($this->bar_width + ($this->bar_padding * 2)) * ($bar - 1)) +

         $this->bar_padding;

    if ($this->axis_max == 0) { $this->axis_max = 1; } // corrected by Marcelo Trenkenchu

    $y = $value * $this->graph_areaheight / $this->axis_max;