<?php
	/* Libchart - PHP chart library
	 * Copyright (C) 2005-2007 Jean-Marc Tr�meaux (jm.tremeaux at gmail.com)
	 *
	 * 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 3 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, see <http://www.gnu.org/licenses/>.
	 *
	 */

	defined('FULL_PATH') or die('restricted access!');

	/**
	 * Chart composed of vertical bars.
	 *
	 * @author Jean-Marc Tr�meaux (jm.tremeaux at gmail.com)
	 */
	class LibchartVerticalBarChart extends LibchartBarChart {
		/**
		 * Ratio of empty space beside the bars.
		 */
		private $emptyToFullRatio;

		/**
		 * Creates a new vertical bar chart
		 *
		 * @param integer width of the image
		 * @param integer height of the image
		 */
		public function LibchartVerticalBarChart($width = 600, $height = 250) {
			parent::LibchartBarChart($width, $height);

			$this->emptyToFullRatio = 1 / 5;
			$this->plot->setGraphPadding(new LibchartPadding(5, 30, 50, 50));
		}

		/**
		 * Computes the layout.
		 */
		protected function computeLayout() {
			if ($this->hasSeveralSerie) {
				$this->plot->setHasCaption(true);
			}
			$this->plot->computeLayout();
		}

		/**
		 * Print the horizontal and veritcal axis.
		 */
		protected function printAxis() {
			$minValue = $this->axis->getLowerBoundary();
			$maxValue = $this->axis->getUpperBoundary();
			$stepValue = $this->axis->getTics();

			// Get graphical obects
			$img = $this->plot->getImg();
			$palette = $this->plot->getPalette();
			$text = $this->plot->getText();

			// Get the graph area
			$graphArea = $this->plot->getGraphArea();

			// Vertical axis
			for ($value = $minValue; $value <= $maxValue; $value += $stepValue) {
				$y = $graphArea->y2 - ($value - $minValue) * ($graphArea->y2 - $graphArea->y1) / ($this->axis->displayDelta);

				imagerectangle($img, $graphArea->x1 - 3, $y, $graphArea->x1 - 2, $y + 1, $palette->axisColor[0]->getColor($img));
				imagerectangle($img, $graphArea->x1 - 1, $y, $graphArea->x1, $y + 1, $palette->axisColor[1]->getColor($img));

				$text->printText($img, $graphArea->x1 - 5, $y, $this->plot->getTextColor(), $value, $text->fontCondensed, $text->HORIZONTAL_RIGHT_ALIGN | $text->VERTICAL_CENTER_ALIGN);
			}

			// Get first serie of a list
			$pointList = $this->getFirstSerieOfList();

			// Horizontal Axis
			$pointCount = count($pointList);
			reset($pointList);
			$columnWidth = ($graphArea->x2 - $graphArea->x1) / $pointCount;
			for ($i = 0; $i <= $pointCount; $i++) {
				$x = $graphArea->x1 + $i * $columnWidth;

				imagerectangle($img, $x - 1, $graphArea->y2 + 2, $x, $graphArea->y2 + 3, $palette->axisColor[0]->getColor($img));
				imagerectangle($img, $x - 1, $graphArea->y2, $x, $graphArea->y2 + 1, $palette->axisColor[1]->getColor($img));

				if ($i < $pointCount) {
					$point = current($pointList);
					next($pointList);

					$label = $point->getX();

					$text->printDiagonal($img, $x + $columnWidth * 1 / 3, $graphArea->y2 + 10, $this->plot->getTextColor(), $label);
				}
			}
		}

		/**
		 * Print the bars.
		 */
		protected function printBar() {
			// Get the data as a list of series for consistency
			$serieList = $this->getDataAsSerieList();

			// Get graphical obects
			$img = $this->plot->getImg();
			$palette = $this->plot->getPalette();
			$text = $this->plot->getText();

			// Get the graph area
			$graphArea = $this->plot->getGraphArea();

			$barColorSet = $palette->barColorSet;
			$barColorSet->reset();

			$minValue = $this->axis->getLowerBoundary();
			$maxValue = $this->axis->getUpperBoundary();
			$stepValue = $this->axis->getTics();

			$serieCount = count($serieList);
			for ($j = 0; $j < $serieCount; $j++) {
				$serie = $serieList[$j];
				$pointList = $serie->getPointList();
				$pointCount = count($pointList);
				reset($pointList);

				// Get the next color
				$color = $barColorSet->currentColor();
				$shadowColor = $barColorSet->currentShadowColor();
				$barColorSet->next();

				$columnWidth = ($graphArea->x2 - $graphArea->x1) / $pointCount;
				for ($i = 0; $i < $pointCount; $i++) {
					$x = $graphArea->x1 + $i * $columnWidth;

					$point = current($pointList);
					next($pointList);

					$value = $point->getY();

					$ymin = $graphArea->y2 - ($value - $minValue) * ($graphArea->y2 - $graphArea->y1) / ($this->axis->displayDelta);

					// Bar dimensions
					$xWithMargin = $x + $columnWidth * $this->emptyToFullRatio;
					$columnWidthWithMargin = $columnWidth * (1 - $this->emptyToFullRatio * 2);
					$barWidth = $columnWidthWithMargin / $serieCount;
					$barOffset = $barWidth * $j;
					$x1 = $xWithMargin + $barOffset;
					$x2 = $xWithMargin + $barWidth + $barOffset - 1;

					// Text
					$text->printText($img, $x1 + $barWidth / 2 , $ymin - 5, $this->plot->getTextColor(), $value, $text->fontCondensed, $text->HORIZONTAL_CENTER_ALIGN | $text->VERTICAL_BOTTOM_ALIGN);

					// Vertical bar
					imagefilledrectangle($img, $x1, $ymin, $x2, $graphArea->y2 - 1, $shadowColor->getColor($img));
					imagefilledrectangle($img, $x1 + 1, $ymin + 1, $x2 - 4, $graphArea->y2 - 1, $color->getColor($img));
				}
			}
		}

		/**
		 * Renders the caption.
		 */
		protected function printCaption() {
			// Get the list of labels
			$labelList = $this->dataSet->getTitleList();

			// Create the caption
			$caption = new LibchartCaption();
			$caption->setPlot($this->plot);
			$caption->setLabelList($labelList);

			$palette = $this->plot->getPalette();
			$barColorSet = $palette->barColorSet;
			$caption->setColorSet($barColorSet);

			// Render the caption
			$caption->render();
		}

		/**
		 * Render the chart image.
		 *
		 * @param string name of the file to render the image to (optional)
		 */
		public function render($fileName = null) {
			// Check the data model
			$this->checkDataModel();

			$this->bound->computeBound($this->dataSet);
			$this->computeAxis();
			$this->computeLayout();
			$this->createImage();
			$this->plot->printLogo();
			$this->plot->printTitle();
			if (!$this->isEmptyDataSet(1)) {
				$this->printAxis();
				$this->printBar();
				if ($this->hasSeveralSerie) {
					$this->printCaption();
				}
			}

			$this->plot->render($fileName);
		}
	}