/*
 * Copyright 2006, Haiku.
 * Distributed under the terms of the MIT License.
 *
 * Authors:
 *              Stephan Aßmus <superstippi@gmx.de>
 *              Ingo Weinhold <bonefish@cs.tu-berlin.de>
 */

#include "SliderView.h"

#include <math.h>
#include <stdio.h>

#include <Message.h>
#include <Window.h>

#include "PopupSlider.h"

// constructor
SliderView::SliderView(PopupSlider* target,
                                           int32 min, int32 max, int32 value,
                                           const char* formatString)
        : PopupView("slider"),
          fTarget(target),
          fFormatString(formatString),
          fMin(min),
          fMax(max),
          fValue(value),
          fButtonRect(0.0, 0.0, -1.0, -1.0),
          fDragOffset(0.0)
{
        SetViewColor(B_TRANSPARENT_32_BIT);
        if (Max() < Min())
                SetMax(Min());
        BFont font;
        GetFont(&font);
        float buttonWidth, buttonHeight;
        GetSliderButtonDimensions(Max(), FormatString(), &font,
                                                          buttonWidth, buttonHeight);

        fButtonRect.right = fButtonRect.left + buttonWidth;
        fButtonRect.bottom = fButtonRect.top + buttonHeight;
        float size = Max() - Min();
        if (size > 200)
                size = 200;
        ResizeTo(6.0 + fButtonRect.Width() + size + 6.0,
                         6.0 + fButtonRect.Height() + 6.0);
}

// destructor
SliderView::~SliderView()
{
}

// minimax
minimax 
SliderView::layoutprefs()
{
        mpm.mini.x = mpm.maxi.x = Bounds().Width() + 1.0;
        mpm.mini.y = mpm.maxi.y = Bounds().Height() + 1.0;

        mpm.weight = 1.0;

        return mpm;
}

// layout
BRect
SliderView::layout(BRect frame)
{
        MoveTo(frame.LeftTop());
        ResizeTo(frame.Width(), frame.Height());
        return Frame();
}

// Draw
void
SliderView::Draw(BRect updateRect)
{
        fButtonRect.OffsetTo(ButtonOffset(), 6.0);

        rgb_color background = ui_color(B_PANEL_BACKGROUND_COLOR);
        rgb_color light = tint_color(background, B_LIGHTEN_MAX_TINT);
        rgb_color lightShadow = tint_color(background, B_DARKEN_1_TINT);
        rgb_color shadow = tint_color(background, B_DARKEN_2_TINT);
        rgb_color darkShadow = tint_color(background, B_DARKEN_4_TINT);

        BRect r(Bounds());
        BeginLineArray(24);
                // outer dark line
                AddLine(BPoint(r.left, r.bottom),
                                BPoint(r.left, r.top), lightShadow);
                AddLine(BPoint(r.left + 1.0, r.top),
                                BPoint(r.right, r.top), lightShadow);
                AddLine(BPoint(r.right, r.top + 1.0),
                                BPoint(r.right, r.bottom), darkShadow);
                AddLine(BPoint(r.right - 1.0, r.bottom),
                                BPoint(r.left + 1.0, r.bottom), darkShadow);
                // second line (raised)
                r.InsetBy(1.0, 1.0);
                AddLine(BPoint(r.left, r.bottom),
                                BPoint(r.left, r.top), light);
                AddLine(BPoint(r.left + 1.0, r.top),
                                BPoint(r.right, r.top), light);
                AddLine(BPoint(r.right, r.top + 1.0),
                                BPoint(r.right, r.bottom), shadow);
                AddLine(BPoint(r.right - 1.0, r.bottom),
                                BPoint(r.left + 1.0, r.bottom), shadow);
                // third line (normal)
                r.InsetBy(1.0, 1.0);
                AddLine(BPoint(r.left, r.bottom),
                                BPoint(r.left, r.top), background);
                AddLine(BPoint(r.left + 1.0, r.top),
                                BPoint(r.right, r.top), background);
                AddLine(BPoint(r.right, r.top + 1.0),
                                BPoint(r.right, r.bottom), background);
                AddLine(BPoint(r.right - 1.0, r.bottom),
                                BPoint(r.left + 1.0, r.bottom), background);
                // fourth line (normal)
                r.InsetBy(1.0, 1.0);
                AddLine(BPoint(r.left, r.bottom),
                                BPoint(r.left, r.top), background);
                AddLine(BPoint(r.left + 1.0, r.top),
                                BPoint(r.right, r.top), background);
                AddLine(BPoint(r.right, r.top + 1.0),
                                BPoint(r.right, r.bottom), background);
                AddLine(BPoint(r.right - 1.0, r.bottom),
                                BPoint(r.left + 1.0, r.bottom), background);
                // fifth line (depressed)
                r.InsetBy(1.0, 1.0);
                AddLine(BPoint(r.left, r.bottom),
                                BPoint(r.left, r.top), lightShadow);
                AddLine(BPoint(r.left + 1.0, r.top),
                                BPoint(r.right, r.top), lightShadow);
                AddLine(BPoint(r.right, r.top + 1.0),
                                BPoint(r.right, r.bottom), light);
                AddLine(BPoint(r.right - 1.0, r.bottom),
                                BPoint(r.left + 1.0, r.bottom), light);
                // fifth line (strongly depressed)
                r.InsetBy(1.0, 1.0);
                AddLine(BPoint(r.left, r.bottom),
                                BPoint(r.left, r.top), darkShadow);
                AddLine(BPoint(r.left + 1.0, r.top),
                                BPoint(r.right, r.top), darkShadow);
                AddLine(BPoint(r.right, r.top + 1.0),
                                BPoint(r.right, r.bottom), shadow);
                AddLine(BPoint(r.right - 1.0, r.bottom),
                                BPoint(r.left + 1.0, r.bottom), shadow);
        EndLineArray();

        r.InsetBy(1.0, 1.0);
        SetLowColor(lightShadow);
        BRect leftOfButton(r.left + 1.0, r.top + 1.0, fButtonRect.left - 2.0, r.bottom);
        if (leftOfButton.IsValid())
                FillRect(leftOfButton, B_SOLID_LOW);
        BRect rightOfButton(fButtonRect.right + 2.0, r.top + 1.0,
                                                r.right, r.bottom);
        if (rightOfButton.IsValid())
                FillRect(rightOfButton, B_SOLID_LOW);

        // inner shadow and knob out lines
        BeginLineArray(5);
                // shadow
                AddLine(BPoint(r.left, r.bottom),
                                BPoint(r.left, r.top), shadow);
                AddLine(BPoint(r.left + 1.0, r.top),
                                BPoint(r.right, r.top), shadow);
                // at knob
                if (fButtonRect.left == 6.0)
                        AddLine(BPoint(fButtonRect.left - 1.0, r.top),
                                        BPoint(fButtonRect.left - 1.0, r.bottom), darkShadow);
                else
                        AddLine(BPoint(fButtonRect.left - 1.0, r.top),
                                        BPoint(fButtonRect.left - 1.0, r.bottom), shadow);
                AddLine(BPoint(fButtonRect.left, fButtonRect.bottom + 1.0),
                                BPoint(fButtonRect.right + 1.0, fButtonRect.bottom + 1.0), darkShadow);
                AddLine(BPoint(fButtonRect.right + 1.0, fButtonRect.bottom),
                                BPoint(fButtonRect.right + 1.0, fButtonRect.top), darkShadow);
        EndLineArray();


        DrawSliderButton(this, fButtonRect, fValue, fFormatString.String(), fTarget->IsEnabled());
}

// MouseUp
void
SliderView::MouseUp(BPoint where)
{
        PopupDone(false);
        fTarget->TriggerValueChanged(fTarget->Message());
}

// MouseMoved
void
SliderView::MouseMoved(BPoint where, uint32 transit, const BMessage* message)
{
        uint32 buttons = 0;
        if (BMessage* message = Window()->CurrentMessage()) {
                if (message->FindInt32("buttons", (int32*)&buttons) < B_OK)
                        buttons = 0;
        }

        if (buttons == 0) {
                MouseUp(where);
                return;
        }
        
        SetValue(_ValueAt(where.x - fDragOffset - 6.0));
}

// MessageReceived
void
SliderView::MessageReceived(BMessage* message)
{
        switch (message->what) {
                default:
                        PopupView::MessageReceived(message);
                        break;
        }
}

// SetValue
void
SliderView::SetValue(int32 value)
{
        if (value < fMin)
                value = fMin;
        if (value > fMax)
                value = fMax;
        if (value != fValue) {
                fValue = value;
                fTarget->SetValue(value);
                Invalidate();
        }
}

// Value
int32
SliderView::Value() const
{
        return fValue;
}

// SetMin
void    
SliderView::SetMin(int32 min)
{
        if (min != fMax) {
                fMin = min;
                if (fValue < fMin)
                        SetValue(fMin);
                Invalidate();
        }
}

// Min
int32
SliderView::Min() const
{
        return fMin;
}

// SetMax
void    
SliderView::SetMax(int32 max)
{
        if (max != fMax) {
                fMax = max;
                if (fValue > fMax)
                        SetValue(fMax);
                Invalidate();
        }
}

// Max
int32   
SliderView::Max() const
{
        return fMax;
}

// SetFormatString
void
SliderView::SetFormatString(const char* formatString)
{
        // TODO: check if formatString contains "%ld"
        fFormatString.SetTo(formatString);
}

// FormatString
const char*
SliderView::FormatString() const
{
        return fFormatString.String();
}

// SetDragOffset
void
SliderView::SetDragOffset(float offset)
{
        fDragOffset = offset;
}

// ButtonOffset
float
SliderView::ButtonOffset()
{
//      float range = Bounds().Width() - 12.0 - fButtonRect.Width() + 1.0;
//      return 6.0 + range / (float)(fMax - fMin + 1) * (float)(fValue - fMin);
        float ratio = fTarget->DeScale((float)(fValue - fMin) / (float)(fMax - fMin));
        return 6.0 + ratio * (Bounds().Width() - 12.0 - fButtonRect.Width());
}

// GetSliderButtonDimensions
void
SliderView::GetSliderButtonDimensions(int32 max, const char* formatString,
                                                                          BFont* font,
                                                                          float& width, float& height)
{
        if (font) {
                char label[256];
                sprintf(label, formatString, max);
                font_height fh;
                font->GetHeight(&fh);
                // 4 pixels room on each side,
                // 1 pixel room at top and bottom
                width = 5.0 + ceilf(font->StringWidth(label)) + 5.0;
                height = 2.0 + ceilf(fh.ascent + fh.descent) + 2.0;
        }
}

// DrawSliderButton
void
SliderView::DrawSliderButton(BView* v, BRect r, int32 value,
                                                         const char* formatString, bool enabled)
{
        rgb_color background = ui_color(B_PANEL_BACKGROUND_COLOR);
        rgb_color light;
        rgb_color shadow;
        rgb_color button;
        rgb_color black;
        if (enabled) {
                light = tint_color(background, B_LIGHTEN_MAX_TINT);
                shadow = tint_color(background, B_DARKEN_1_TINT);
                button = tint_color(background, B_LIGHTEN_1_TINT);
                black = tint_color(background, B_DARKEN_MAX_TINT);
        } else {
                light = tint_color(background, B_LIGHTEN_1_TINT);
                shadow = tint_color(background, 1.1);
                button = tint_color(background, 0.8);
                black = tint_color(background, B_DISABLED_LABEL_TINT);
        }
        // border
        v->BeginLineArray(4);
                v->AddLine(BPoint(r.left, r.bottom),
                                   BPoint(r.left, r.top), light);
                v->AddLine(BPoint(r.left + 1.0, r.top),
                                   BPoint(r.right, r.top), light);
                v->AddLine(BPoint(r.right, r.top + 1.0),
                                   BPoint(r.right, r.bottom), shadow);
                v->AddLine(BPoint(r.right - 1.0, r.bottom),
                                   BPoint(r.left + 1.0, r.bottom), shadow);
        v->EndLineArray();
        // background & label
        r.InsetBy(1.0, 1.0);
        char label[256];
        sprintf(label, formatString, value);
        float width = v->StringWidth(label);
        font_height fh;
        v->GetFontHeight(&fh);
        BPoint textPoint((r.left + r.right) / 2.0 - width / 2.0,
                                         (r.top + r.bottom) / 2.0 + fh.ascent / 2.0);
        v->SetHighColor(black);
        v->SetLowColor(button);
        v->FillRect(r, B_SOLID_LOW);
        v->DrawString(label, textPoint);
}

// _ValueAt
int32
SliderView::_ValueAt(float h)
{
/*      return fMin + (int32)(((float)(fMax - fMin + 1) * h) /
                   (Bounds().Width() - fButtonRect.Width() - 12.0));*/
        float ratio = h / (Bounds().Width() - fButtonRect.Width() - 12.0);
        if (ratio < 0.0)
                ratio = 0.0;
        if (ratio > 1.0)
                ratio = 1.0;
        ratio = fTarget->Scale(ratio);
        return fMin + (int32)((fMax - fMin + 1) * ratio);
}