/*
 * PanelPlotOutput.cc
 *
 *  Created on: 29 oct. 2013
 *      Author: CS
 */

#include "PanelPlotOutput.hh"
#include "ColormapManager.hh"
#include "ColorAxis.hh"
#include "ParameterManager.hh"
#include "Page.hh"
#include "ShadesTools.hh"
#include "PlotLogger.hh"
#include "TimeUtil.hh"
#include "ParamMgr.hh"

#include "DecoratorPlot.hh"

#include "PlPlotUtil.hh"

#include <boost/range/adaptor/reversed.hpp>

using namespace AMDA::Parameters;
using namespace AMDA::Info;

namespace plot {

/**
 * Width character proportion is approximatively 0.83 times smaller than height.
 */
const float PanelPlotOutput::CHAR_RATIO = 5./6.;

const float PanelPlotOutput::DEFAULT_TICK_LENGTH_FACTOR = 0.75;

// Vertical is for Y axis.
const float PanelPlotOutput::VERTICAL_TICK_LENGTH_LIMIT = 0.5;
// Horizontal is for X axis.
const float PanelPlotOutput::HORIZONTAL_TICK_LENGTH_LIMIT = 0.75;


PanelPlotOutput::PanelPlotOutput(AMDA::Parameters::ParameterManager& manager, boost::shared_ptr<Panel> panel) :
		_panel(panel),
		_parameterManager(manager),
		_pParameterValues(NULL),
		_timeIntervalListPtr(NULL),

		_panelPlotXYRatio(1),
		_leftAxisTickMarkWidth(0),
		_automaticSerieColorCursor(0)
{
}

PanelPlotOutput::~PanelPlotOutput() {
}

double getVerticalTickLength(Axis* pAxis, double charHeight) {
	float horizontalTickLengthLimit = PanelPlotOutput::HORIZONTAL_TICK_LENGTH_LIMIT;
	float defaultTickLengthFactor	= PanelPlotOutput::DEFAULT_TICK_LENGTH_FACTOR;
	double tickLengthFactor 		= pAxis->_tick._lengthFactor;

	if ((!isnan(tickLengthFactor)) &&	(tickLengthFactor > horizontalTickLengthLimit)) {
		// 1 character size is equal to 0.75 tick length.
		return charHeight + ( ((tickLengthFactor - horizontalTickLengthLimit)
				* charHeight) / (defaultTickLengthFactor) );
	} else if ((isnan(tickLengthFactor))	&& (defaultTickLengthFactor > horizontalTickLengthLimit)) {
		// 1 character size is equal to 0.75 tick length.
		return charHeight + ( ((defaultTickLengthFactor - horizontalTickLengthLimit)
				* charHeight) / (defaultTickLengthFactor) );
	} else {
		return charHeight;
	}
}

double getHorizontalTickLength (Axis* pAxis, double charHeight) {
	float verticalTickLengthLimit 	= PanelPlotOutput::VERTICAL_TICK_LENGTH_LIMIT;
	float defaultTickLengthFactor	= PanelPlotOutput::DEFAULT_TICK_LENGTH_FACTOR;
	double tickLengthFactor 		= pAxis->_tick._lengthFactor;

	if ((!isnan(tickLengthFactor)) && (tickLengthFactor > verticalTickLengthLimit)) {
		// 1 character size is equal to 0.75 tick length.
		return charHeight + ( ((tickLengthFactor - verticalTickLengthLimit)
				* charHeight * PanelPlotOutput::CHAR_RATIO) / (defaultTickLengthFactor) );
	} else if ((isnan(tickLengthFactor)) && (defaultTickLengthFactor > verticalTickLengthLimit)) {
		// 1 character size is equal to 0.75 tick length.
		return charHeight + ( ((defaultTickLengthFactor - verticalTickLengthLimit)
				* charHeight * PanelPlotOutput::CHAR_RATIO) / (defaultTickLengthFactor) );
	} else {
		return charHeight;
	}
}

void PanelPlotOutput::calculatePlotArea(Bounds& bounds_) {
	double topSpace 	= 0;
	double bottomSpace 	= 0;
	double leftSpace 	= 0;
	double rightSpace	= 0;

	//Init
	_plotAreaSideSet[PlotCommon::Position::POS_TOP] = false;
	_plotAreaSideSet[PlotCommon::Position::POS_BOTTOM] = false;
	_plotAreaSideSet[PlotCommon::Position::POS_RIGHT] = false;
	_plotAreaSideSet[PlotCommon::Position::POS_LEFT] = false;
	_plotAreaSideSet[PlotCommon::Position::POS_CENTER] = false;

	// Reserve space for title
	double titleHeight = 0;
	_panel->reserveSpaceForTitle(topSpace, bottomSpace, titleHeight);

	// Reserve space for axes

	//
	std::map<PlotCommon::Position, int>  nbAxesBySide;
	nbAxesBySide[PlotCommon::Position::POS_TOP] = 0;
	nbAxesBySide[PlotCommon::Position::POS_BOTTOM] = 0;
	nbAxesBySide[PlotCommon::Position::POS_RIGHT] = 0;
	nbAxesBySide[PlotCommon::Position::POS_LEFT] = 0;
	for (Axes::iterator it = _panel->_axes.begin(); it != _panel->_axes.end();	++it)
	{
		boost::shared_ptr<Axis> lAxis = it->second;

		if ((lAxis == nullptr) || (lAxis->_isZAxis) || (!lAxis->_used) || (!lAxis->_visible) || (lAxis->_position == PlotCommon::Position::POS_CENTER))

			continue;
		++nbAxesBySide[lAxis->_position];
	}

	// ZAxis must be drawn at last!

	for (Axes::iterator it = _panel->_axes.begin(); it != _panel->_axes.end();	++it)
	{

		//Add X and Y axis

		boost::shared_ptr<Axis> lAxis = it->second;

		if ((lAxis == nullptr) || (lAxis->_isZAxis))

			continue;

		reserveSpaceForAxis(lAxis, titleHeight, nbAxesBySide, topSpace, bottomSpace, leftSpace, rightSpace);

	}

	for (Axes::iterator it = _panel->_axes.begin(); it != _panel->_axes.end();	++it)
	{

		//Add Z axis

		boost::shared_ptr<Axis> lAxis = it->second;

		if ((lAxis == nullptr) || (!lAxis->_isZAxis))

			continue;

		reserveSpaceForAxis(lAxis, titleHeight, nbAxesBySide, topSpace, bottomSpace, leftSpace, rightSpace);

	}

	// Get character size for panel.
	PlPlotUtil::setPlFont(_panel->getFont());
	CharSize lCharSizePanel = PlPlotUtil::getCharacterSizeInPlPage(_panel->_page);
	double panelCharWidth 	= lCharSizePanel.first;
	double panelCharHeight 	= lCharSizePanel.second;

	//add params legend right space when outside
	if (!_panel->_paramsLegendProperties.getLegendLines().empty() &&
			_panel->_paramsLegendProperties.isVisible() &&
			(_panel->_paramsLegendProperties.getPosition() == ParamsLegendPosition::POS_OUTSIDE))
	{

		PlPlotUtil::setPlFont(_panel->_paramsLegendProperties.getFont());
		CharSize lCharSizeLegend = PlPlotUtil::getCharacterSizeInPlPage(_panel->_page);

		double legendCharWidth 	= lCharSizeLegend.first;

		//set offset
		_panel->_paramsLegendProperties.setLeftOffset(rightSpace);

		//reserve place for legend
		rightSpace += _panel->_paramsLegendProperties.getEstimateWidth(legendCharWidth);
	}

	// Reserve space for text legend ( maximum 1 text legend by position

	bool	leftTextLegendFound		= false;
	bool	rightTextLegendFound 	= false;
	bool	topTextLegendFound 		= false;
	bool	bottomTextLegendFound 	= false;

	for (auto textLegendProp : _panel->_textLegendPropertiesList) {

		bool toDraw = true;

		switch (textLegendProp->getPosition()) {
		case TextLegendPosition::POS_LEFT :

			if (leftTextLegendFound)
				toDraw = false;
			leftTextLegendFound = true;

			break;

		case TextLegendPosition::POS_RIGHT :

			if (rightTextLegendFound)
				toDraw = false;
			rightTextLegendFound = true;

			break;

		case TextLegendPosition::POS_TOP :

			if (topTextLegendFound)
				toDraw = false;
			topTextLegendFound = true;

			break;

		case TextLegendPosition::POS_BOTTOM :

			if (bottomTextLegendFound)
				toDraw = false;
			bottomTextLegendFound = true;

			break;
		}

		if (toDraw)
			reserveSpaceForTextLegend (textLegendProp, titleHeight, topSpace, bottomSpace, leftSpace, rightSpace);