// copyright (c) 2007 magnus auvinen, see licence.txt for more info
#include <base/system.h>

#include <engine/shared/config.h>
#include <engine/graphics.h>
#include <engine/textrender.h>
#include "ui.h"

/********************************************************
 UI                                                      
*********************************************************/

CUI::CUI()
{
	m_pHotItem = 0;
	m_pActiveItem = 0;
	m_pLastActiveItem = 0;
	m_pBecommingHotItem = 0;
	
	m_MouseX = 0;
	m_MouseY = 0;
	m_MouseWorldX = 0;
	m_MouseWorldY = 0;
	m_MouseButtons = 0;
	m_LastMouseButtons = 0;	
	
	m_Screen.x = 0;
	m_Screen.y = 0;
	m_Screen.w = 848.0f;
	m_Screen.h = 480.0f;
}

int CUI::Update(float Mx, float My, float Mwx, float Mwy, int Buttons)
{
    m_MouseX = Mx;
    m_MouseY = My;
    m_MouseWorldX = Mwx;
    m_MouseWorldY = Mwy;
    m_LastMouseButtons = m_MouseButtons;
    m_MouseButtons = Buttons;
    m_pHotItem = m_pBecommingHotItem;
    if(m_pActiveItem)
    	m_pHotItem = m_pActiveItem;
    m_pBecommingHotItem = 0;
    return 0;
}

int CUI::MouseInside(const CUIRect *r)
{
    if(m_MouseX >= r->x && m_MouseX <= r->x+r->w && m_MouseY >= r->y && m_MouseY <= r->y+r->h)
        return 1;
    return 0;
}

CUIRect *CUI::Screen()
{
    float Aspect = Graphics()->ScreenAspect();
    float w, h;

    h = 600;
    w = Aspect*h;

    m_Screen.w = w;
    m_Screen.h = h;

    return &m_Screen;
}

void CUI::SetScale(float s)
{
    //config.UI()->Scale = (int)(s*100.0f);
}

/*float CUI::Scale()
{
    return config.UI()->Scale/100.0f;
}*/

void CUI::ClipEnable(const CUIRect *r)
{
	float XScale = Graphics()->ScreenWidth()/Screen()->w;
	float YScale = Graphics()->ScreenHeight()/Screen()->h;
	Graphics()->ClipEnable((int)(r->x*XScale), (int)(r->y*YScale), (int)(r->w*XScale), (int)(r->h*YScale));
}

void CUI::ClipDisable()
{
	Graphics()->ClipDisable();
}

void CUIRect::HSplitTop(float Cut, CUIRect *pTop, CUIRect *pBottom) const
{
    CUIRect r = *this;
    Cut *= Scale();

    if (pTop)
    {
        pTop->x = r.x;
        pTop->y = r.y;
        pTop->w = r.w;
        pTop->h = Cut;
    }

    if (pBottom)
    {
        pBottom->x = r.x;
        pBottom->y = r.y + Cut;
        pBottom->w = r.w;
        pBottom->h = r.h - Cut;
    }
}

void CUIRect::HSplitBottom(float Cut, CUIRect *pTop, CUIRect *pBottom) const
{
    CUIRect r = *this;
    Cut *= Scale();

    if (pTop)
    {
        pTop->x = r.x;
        pTop->y = r.y;
        pTop->w = r.w;
        pTop->h = r.h - Cut;
    }

    if (pBottom)
    {
        pBottom->x = r.x;
        pBottom->y = r.y + r.h - Cut;
        pBottom->w = r.w;
        pBottom->h = Cut;
    }
}


void CUIRect::VSplitMid(CUIRect *pLeft, CUIRect *pRight) const
{
    CUIRect r = *this;
    float Cut = r.w/2;

    if (pLeft)
    {
        pLeft->x = r.x;
        pLeft->y = r.y;
        pLeft->w = Cut;
        pLeft->h = r.h;
    }

    if (pRight)
    {
        pRight->x = r.x + Cut;
        pRight->y = r.y;
        pRight->w = r.w - Cut;
        pRight->h = r.h;
    }
}

void CUIRect::VSplitLeft(float Cut, CUIRect *pLeft, CUIRect *pRight) const
{
    CUIRect r = *this;
    Cut *= Scale();

    if (pLeft)
    {
        pLeft->x = r.x;
        pLeft->y = r.y;
        pLeft->w = Cut;
        pLeft->h = r.h;
    }

    if (pRight)
    {
        pRight->x = r.x + Cut;
        pRight->y = r.y;
        pRight->w = r.w - Cut;
        pRight->h = r.h;
    }
}

void CUIRect::VSplitRight(float Cut, CUIRect *pLeft, CUIRect *pRight) const
{
    CUIRect r = *this;
    Cut *= Scale();

    if (pLeft)
    {
        pLeft->x = r.x;
        pLeft->y = r.y;
        pLeft->w = r.w - Cut;
        pLeft->h = r.h;
    }

    if (pRight)
    {
        pRight->x = r.x + r.w - Cut;
        pRight->y = r.y;
        pRight->w = Cut;
        pRight->h = r.h;
    }
}

void CUIRect::Margin(float Cut, CUIRect *pOtherRect) const
{
    CUIRect r = *this;
	Cut *= Scale();

    pOtherRect->x = r.x + Cut;
    pOtherRect->y = r.y + Cut;
    pOtherRect->w = r.w - 2*Cut;
    pOtherRect->h = r.h - 2*Cut;
}

void CUIRect::VMargin(float Cut, CUIRect *pOtherRect) const
{
    CUIRect r = *this;
	Cut *= Scale();

    pOtherRect->x = r.x + Cut;
    pOtherRect->y = r.y;
    pOtherRect->w = r.w - 2*Cut;
    pOtherRect->h = r.h;
}

void CUIRect::HMargin(float Cut, CUIRect *pOtherRect) const
{
    CUIRect r = *this;
	Cut *= Scale();

    pOtherRect->x = r.x;
    pOtherRect->y = r.y + Cut;
    pOtherRect->w = r.w;
    pOtherRect->h = r.h - 2*Cut;
}

int CUI::DoButtonLogic(const void *pID, const char *pText, int Checked, const CUIRect *pRect)
{
    // logic
    int ReturnValue = 0;
    int Inside = MouseInside(pRect);
	static int ButtonUsed = 0;

	if(ActiveItem() == pID)
	{
		if(!MouseButton(ButtonUsed))
		{
			if(Inside && Checked >= 0)
				ReturnValue = 1+ButtonUsed;
			SetActiveItem(0);
		}
	}
	else if(HotItem() == pID)
	{
		if(MouseButton(0))
		{
			SetActiveItem(pID);
			ButtonUsed = 0;
		}
		
		if(MouseButton(1))
		{
			SetActiveItem(pID);
			ButtonUsed = 1;
		}
	}
	
	if(Inside)
		SetHotItem(pID);

    return ReturnValue;
}
/*
int CUI::DoButton(const void *id, const char *text, int checked, const CUIRect *r, ui_draw_button_func draw_func, const void *extra)
{
    // logic
    int ret = 0;
    int inside = ui_MouseInside(r);
	static int button_used = 0;

	if(ui_ActiveItem() == id)
	{
		if(!ui_MouseButton(button_used))
		{
			if(inside && checked >= 0)
				ret = 1+button_used;
			ui_SetActiveItem(0);
		}
	}
	else if(ui_HotItem() == id)
	{
		if(ui_MouseButton(0))
		{
			ui_SetActiveItem(id);
			button_used = 0;
		}
		
		if(ui_MouseButton(1))
		{
			ui_SetActiveItem(id);
			button_used = 1;
		}
	}
	
	if(inside)
		ui_SetHotItem(id);

	if(draw_func)
    	draw_func(id, text, checked, r, extra);
    return ret;
}*/

void CUI::DoLabel(const CUIRect *r, const char *pText, float Size, int Align, int MaxWidth)
{
	// TODO: FIX ME!!!!
    //Graphics()->BlendNormal();
    Size *= Scale();
    if(Align == 0)
    {
    	float tw = TextRender()->TextWidth(0, Size, pText, MaxWidth);
    	TextRender()->Text(0, r->x + r->w/2-tw/2, r->y - Size/10, Size, pText, MaxWidth);
	}
	else if(Align < 0)
    	TextRender()->Text(0, r->x, r->y - Size/10, Size, pText, MaxWidth);
	else if(Align > 0)
	{
    	float tw = TextRender()->TextWidth(0, Size, pText, MaxWidth);
    	TextRender()->Text(0, r->x + r->w-tw, r->y - Size/10, Size, pText, MaxWidth);
	}
}
