// ================================================================================
// ==      This file is a part of Turbo Badger. (C) 2011-2014, Emil Segerås      ==
// ==                     See tb_core.h for more information.                    ==
// ================================================================================

#include "tb_inline_select.h"
#include <assert.h>
#include <math.h>
#include <stdlib.h>

namespace tb {

// FIX: axis should affect the buttons arrow skin!
// FIX: unfocus should set the correct text!

// == TBInlineSelect ========================================================================================

TBInlineSelect::TBInlineSelect()
    : m_value(0)
    , m_min(0)
    , m_max(100)
    , m_modified(false)
// ATOMIC BEGIN
    , m_stepsize(1.0)
// ATOMIC END
{
    SetSkinBg(TBIDC("TBInlineSelect"));
    AddChild(&m_layout);
    m_layout.AddChild(&m_buttons[0]);
    m_layout.AddChild(&m_editfield);
    m_layout.AddChild(&m_buttons[1]);
    m_layout.SetRect(GetPaddingRect());
    m_layout.SetGravity(WIDGET_GRAVITY_ALL);
    m_layout.SetSpacing(0);
    m_buttons[0].SetSkinBg(TBIDC("TBButton.flat"));
    m_buttons[1].SetSkinBg(TBIDC("TBButton.flat"));
    m_buttons[0].GetContentRoot()->AddChild(new TBSkinImage(TBIDC("arrowdark.left")));
    m_buttons[1].GetContentRoot()->AddChild(new TBSkinImage(TBIDC("arrowdark.right")));
    m_buttons[0].SetIsFocusable(false);
    m_buttons[1].SetIsFocusable(false);
    m_buttons[0].SetID(TBIDC("dec"));
    m_buttons[1].SetID(TBIDC("inc"));
    m_buttons[0].SetAutoRepeat(true);
    m_buttons[1].SetAutoRepeat(true);
    m_editfield.SetID(TBIDC("edit"));
    m_editfield.SetTextAlign(TB_TEXT_ALIGN_CENTER);
    m_editfield.SetEditType(EDIT_TYPE_NUMBER);
    m_editfield.SetText("0");

    m_editfield.AddListener(this);

}

TBInlineSelect::~TBInlineSelect()
{
    m_editfield.RemoveListener(this);

    m_layout.RemoveChild(&m_buttons[1]);
    m_layout.RemoveChild(&m_editfield);
    m_layout.RemoveChild(&m_buttons[0]);
    RemoveChild(&m_layout);
}

void TBInlineSelect::SetEditFieldLayoutParams(LayoutParams& lp)
{
    m_editfield.SetLayoutParams(lp);
}

void TBInlineSelect::SetLimits(double min, double max)
{
    assert(min <= max);
    m_min = min;
    m_max = max;
    SetValueDouble(m_value);
}

void TBInlineSelect::SetValueInternal(double value, bool update_text)
{
    value = CLAMP(value, m_min, m_max);
    if (value == m_value)
        return;
    m_value = value;

    if (update_text)
    {
        TBStr strval;

        double prec = m_value - floor(m_value);
        if (prec < .001)
        {
            strval.SetFormatted("%.0f", m_value);
        }
        else
            strval.SetFormatted("%.2f", m_value);


        m_editfield.SetText(strval);
    }

    TBWidgetEvent ev(EVENT_TYPE_CHANGED);
    InvokeEvent(ev);

    // Warning: Do nothing here since the event might have deleted us.
    //          If needed, check if we are alive using a safe pointer first.
}

void TBInlineSelect::OnSkinChanged()
{
    m_layout.SetRect(GetPaddingRect());
}

bool TBInlineSelect::OnEvent(const TBWidgetEvent &ev)
{
    if (ev.type == EVENT_TYPE_KEY_DOWN)
    {
        if (ev.special_key == TB_KEY_UP || ev.special_key == TB_KEY_DOWN)
        {
// ATOMIC BEGIN
            double dv = ev.special_key == TB_KEY_UP ? m_stepsize : -m_stepsize;
// ATOMIC END
            SetValueDouble(GetValueDouble() + dv);
            return true;
        }
    }
    else if (ev.type == EVENT_TYPE_CLICK && ev.target->GetID() == TBIDC("dec"))
    {
// ATOMIC BEGIN
       SetValueDouble(GetValueDouble() - m_stepsize);
// ATOMIC END
        if (!ev.target->IsCaptured()) {

            InvokeModifiedEvent();

        }
        return true;
    }
    else if (ev.type == EVENT_TYPE_CLICK && ev.target->GetID() == TBIDC("inc"))
    {
// ATOMIC BEGIN
        SetValueDouble(GetValueDouble() + m_stepsize);
// ATOMIC END

        if (!ev.target->IsCaptured()) {

            InvokeModifiedEvent();

        }

        return true;
    }
    else if (ev.type == EVENT_TYPE_CHANGED && ev.target == &m_editfield)
    {
        TBStr text;
        m_editfield.GetText(text);
        SetValueInternal((double) atof(text), false);
    }
    else if (ev.type == EVENT_TYPE_CHANGED && ev.target == this)
    {
        return TBWidget::OnEvent(ev);
    }

    return false;
}

void TBInlineSelect::InvokeModifiedEvent()
{
    TBWidgetEvent ev(EVENT_TYPE_CUSTOM);
    // TBIDC does not register the TBID with the UI system, so do it this way
    TBID refid("edit_complete");
    ev.ref_id = refid;
    // forward to delegate
    TBWidget::OnEvent(ev);
    m_modified = false;
    m_editfield.GetText(m_initial_edit_value);
}

bool TBInlineSelect::OnWidgetInvokeEvent(TBWidget *widget, const TBWidgetEvent &ev)
{
    return false;
}

void TBInlineSelect::OnWidgetFocusChanged(TBWidget *widget, bool focused)
{
    if (widget == &m_editfield)
    {
        if (focused)
            m_editfield.GetText(m_initial_edit_value);
        else
        {
            TBStr editvalue;
            m_editfield.GetText(editvalue);
            if (m_modified || !editvalue.Equals(m_initial_edit_value.CStr()))
            {
                InvokeModifiedEvent();
            }
        }
    }
}

}; // namespace tb