// Ryzom - MMORPG Framework <http://dev.ryzom.com/projects/ryzom/>
// Copyright (C) 2010  Winch Gate Property Limited
//
// This program is free software: you can redistribute it and/or modify
// it under the terms of the GNU Affero 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 Affero General Public License for more details.
//
// You should have received a copy of the GNU Affero General Public License
// along with this program.  If not, see <http://www.gnu.org/licenses/>.

#include "nel/gui/ctrl_button.h"
#include "nel/misc/xml_auto_ptr.h"
#include "nel/gui/widget_manager.h"
#include "nel/gui/interface_group.h"

// ----------------------------------------------------------------------------
using namespace std;
using namespace NLMISC;
using namespace NL3D;

NLMISC_REGISTER_OBJECT(CViewBase, CCtrlButton, std::string, "button");

namespace NLGUI
{

	// ----------------------------------------------------------------------------
	bool CCtrlButton::parse(xmlNodePtr cur, CInterfaceGroup * parentGroup)
	{
		CXMLAutoPtr prop;
		//try to get props that can be inherited from groups
		//if a property is not defined, try to find it in the parent group.
		//if it is undefined, set it to zero
		if (! CCtrlBaseButton::parse(cur,parentGroup) )
		{
			string tmp = "cannot parse view:"+getId()+", parent:"+parentGroup->getId();
			nlinfo(tmp.c_str());
			return false;
		}


		// *** Read Textures
		prop = (char*) xmlGetProp( cur, (xmlChar*)"tx_normal" );
		if (prop)
		{
			string TxName = (const char *) prop;
			TxName = strlwr(TxName);
			_TextureIdNormal.setTexture(TxName.c_str());
		}

		prop = (char*) xmlGetProp( cur, (xmlChar*)"tx_pushed" );
		if (prop)
		{
			string TxName = (const char *) prop;
			TxName = strlwr(TxName);
			_TextureIdPushed.setTexture(TxName.c_str());
		}

		prop = (char*) xmlGetProp( cur, (xmlChar*)"tx_over" );
		if (prop)
		{
			string TxName = (const char *) prop;
			TxName = strlwr(TxName);
			_TextureIdOver.setTexture(TxName.c_str());
		}

		// *** Misc.
		prop = (char*) xmlGetProp( cur, (xmlChar*)"scale" );
		_Scale = false;
		if (prop)
			_Scale = convertBool(prop);


		prop = (char*) xmlGetProp (cur, (xmlChar*)"align");
		_Align = 0;
		if (prop)
		{
			const char *seekPtr = prop.getDatas();
			while (*seekPtr != 0)
			{
				if ((*seekPtr=='l')||(*seekPtr=='L'))
					_Align &= ~1;
				if ((*seekPtr=='r')||(*seekPtr=='R'))
					_Align |= 1;
				if ((*seekPtr=='b')||(*seekPtr=='B'))
					_Align &= ~2;
				if ((*seekPtr=='t')||(*seekPtr=='T'))
					_Align |= 2;
				++seekPtr;
			}
		}


		return true;
	}

	// ----------------------------------------------------------------------------
	void CCtrlButton::draw ()
	{
		sint32 nTxId = -1;
		CRGBA  color;

		CViewRenderer &rVR = *CViewRenderer::getInstance();
		CRGBA  globalColor= CWidgetManager::getInstance()->getGlobalColorForContent();

		// *** Detect Over
		bool	lastOver = false;

		updateOver(lastOver);


		sint32 x = _XReal;
		sint32 y = _YReal;
		sint32 txw, txh;
		// the pointer is over the button
		if (_Scale)
		{
			x = _XReal;
			y = _YReal;
			txw = _WReal;
			txh = _HReal;
		}
		else
		{
			x = _XReal;
			y = _YReal;
		}

		switch(_Type)
		{
			case ToggleButton:
			{
				if (_Pushed)
				{
					nTxId = _TextureIdPushed;
					color  = getCurrentColorPushed(globalColor);
				}
				else
				{
					nTxId = _TextureIdNormal;
					color  = getCurrentColorNormal(globalColor);
				}
			}
			break;
			case RadioButton:
			{
	//			CViewPointer &rIP = *CInterfaceManager::getInstance()->getPointer();
				// Init the radio button
				initRBRef();

				if (*_RBRef == this)
				{
					// if it is equal to the ref value, then the button must appear pushed
					nTxId = _TextureIdPushed;
					color  = getCurrentColorPushed(globalColor);
				}
				else
				{
					if ((_Over) && (CWidgetManager::getInstance()->getCapturePointerLeft() == this))
					{
						nTxId = _TextureIdPushed;
						color  = getCurrentColorPushed(globalColor);
					}
					else
					{
						nTxId = _TextureIdNormal;
						color     = getCurrentColorNormal(globalColor);
						_Pushed = false;
					}
				}
			}
			break;
			case PushButton:
			{
				if (_Over && (CWidgetManager::getInstance()->getCapturePointerLeft() == this))
				{
					nTxId = _TextureIdPushed;
					color  = getCurrentColorPushed(globalColor);
				}
				else
				{
					nTxId = _TextureIdNormal;
					color     = getCurrentColorNormal(globalColor);
					_Pushed = false;
				}
			}
			break;
			default:
			break;
		}

		color.A = (uint8)(((sint32)color.A*((sint32)globalColor.A+1))>>8);

		// Fromzen ?
		if (getFrozen() && getFrozenHalfTone())
			color.A >>= 2;

		if (!_Scale)
		{
			CViewRenderer::getInstance()->getTextureSizeFromId (nTxId, txw, txh);
			if (_Align&1)
				x = x + _WReal - txw;
			if (_Align&2)
				y = y + _HReal - txh;
		}
		rVR.drawRotFlipBitmap (	_RenderLayer, x, y, txw, txh,
								0, false,
								nTxId,
								color );

		if ((_OverWhenPushed == false) && (_Pushed == true || (CWidgetManager::getInstance()->getCapturePointerLeft() == this)))
			return;



		if (_Over)
		{

			if ((lastOver == false) && (_AHOnOver != NULL))
				CAHManager::getInstance()->runActionHandler (_AHOnOver, this, _AHOverParams);

			// the pointer is over the button
			color= getCurrentColorOver(globalColor);
			color.A = (uint8)(((sint32)color.A*((sint32)globalColor.A+1))>>8);

			// Frozen ?
			if (getFrozen())
				color.A >>= 2;

			// draw the over. force upper layer to avoid problem with DXTC/tga
			rVR.drawRotFlipBitmap (	_RenderLayer+1, x, y, txw, txh,
									0, false,
									_TextureIdOver,
									color );
		}
	}


	// ----------------------------------------------------------------------------
	void CCtrlButton::updateCoords()
	{
		if (!_Scale)
		{
			CViewRenderer &rVR = *CViewRenderer::getInstance();
			sint32 txw, txh;
			rVR.getTextureSizeFromId (_TextureIdNormal, txw, txh);
			_W = txw;
			_H = txh;
		}
		CViewBase::updateCoords();
	}

	// ----------------------------------------------------------------------------
	void CCtrlButton::setTexture(const std::string&name)
	{
	//	CInterfaceManager *pIM = CInterfaceManager::getInstance();
	//	CViewRenderer &rVR = *CViewRenderer::getInstance();
		_TextureIdNormal.setTexture(name.c_str());
	}

	// ----------------------------------------------------------------------------
	void CCtrlButton::setTexturePushed(const std::string&name)
	{
	//	CInterfaceManager *pIM = CInterfaceManager::getInstance();
	//	CViewRenderer &rVR = *CViewRenderer::getInstance();
		_TextureIdPushed.setTexture(name.c_str());
	}

	// ----------------------------------------------------------------------------
	void CCtrlButton::setTextureOver(const std::string&name)
	{
	//	CInterfaceManager *pIM = CInterfaceManager::getInstance();
	//	CViewRenderer &rVR = *CViewRenderer::getInstance();
		_TextureIdOver.setTexture(name.c_str());
	}

	// ----------------------------------------------------------------------------
	std::string CCtrlButton::getTexture() const
	{
		CViewRenderer &rVR = *CViewRenderer::getInstance();
		return rVR.getTextureNameFromId(_TextureIdNormal);
	}

	// ----------------------------------------------------------------------------
	std::string CCtrlButton::getTexturePushed() const
	{
		CViewRenderer &rVR = *CViewRenderer::getInstance();
		return rVR.getTextureNameFromId(_TextureIdPushed);
	}

	// ----------------------------------------------------------------------------
	std::string CCtrlButton::getTextureOver() const
	{
		CViewRenderer &rVR = *CViewRenderer::getInstance();
		return rVR.getTextureNameFromId(_TextureIdOver);
	}

	// ***************************************************************************
	sint32	CCtrlButton::getMaxUsedW() const
	{
		sint32 txw, txh;
		CViewRenderer &rVR = *CViewRenderer::getInstance();
		rVR.getTextureSizeFromId (_TextureIdNormal, txw, txh);
		return txw;
	}

	// ***************************************************************************
	sint32	CCtrlButton::getMinUsedW() const
	{
		return getMaxUsedW();
	}

	// ***************************************************************************
	void CCtrlButton::fitTexture()
	{
		CViewRenderer &rVR = *CViewRenderer::getInstance();
		sint32 w, h;
		rVR.getTextureSizeFromId(_TextureIdNormal, w, h);
		setW(w);
		setH(h);
	}

	// ***************************************************************************
	bool CCtrlButton::getMouseOverShape(string &texName, uint8 &rot, CRGBA &col)
	{
		if (_AHOnLeftClickString == "browse")
		{
			if (!_AHOnLeftClickStringParams.empty())
			{
				texName = "@curs_pick.tga@"+_AHOnLeftClickStringParams;
			}
			else
			{
				texName = "curs_pick.tga";
			}
			rot= 0;
			col = CRGBA::White;
			return true;
		}
		
		return false;
	}

}