/*
 * Copyright 2008, Stephan Aßmus <superstippi@gmx.de>.
 * Copyright 2007, Ingo Weinhold <bonefish@cs.tu-berlin.de>.
 * All rights reserved. Distributed under the terms of the MIT License.
 */

#include "SliderTest.h"

#include <stdio.h>

#include <Message.h>
#include <Slider.h>

#include "CheckBox.h"
#include "GroupView.h"
#include "RadioButton.h"
#include "TestView.h"


// messages
enum {
	MSG_ORIENTATION_CHANGED			= 'orch',
	MSG_THUMB_STYLE_CHANGED			= 'tstc',
	MSG_HASH_MARKS_CHANGED			= 'hmch',
	MSG_BAR_THICKNESS_CHANGED		= 'btch',
	MSG_LABEL_CHANGED				= 'lbch',
	MSG_LIMIT_LABELS_CHANGED		= 'lmch',
	MSG_UPDATE_TEXT_CHANGED			= 'utch'
};


// TestSlider
class SliderTest::TestSlider : public BSlider {
public:
	TestSlider()
		: BSlider("test slider", "Label", NULL, 1, 100, B_HORIZONTAL),
		fExportUpdateText(false)
	{
	}

	virtual char* UpdateText() const
	{
		if (!fExportUpdateText)
			return NULL;
		sprintf(fUpdateText, "%ld", Value());
		return fUpdateText;
	}

	mutable char fUpdateText[32];
	bool fExportUpdateText;
};

// OrientationRadioButton
class SliderTest::OrientationRadioButton : public LabeledRadioButton {
public:
	OrientationRadioButton(const char* label, enum orientation orientation)
		: LabeledRadioButton(label),
		  fOrientation(orientation)
	{
	}

	enum orientation fOrientation;
};

// ThumbStyleRadioButton
class SliderTest::ThumbStyleRadioButton : public LabeledRadioButton {
public:
	ThumbStyleRadioButton(const char* label, enum thumb_style style)
		: LabeledRadioButton(label),
		  fStyle(style)
	{
	}

	thumb_style fStyle;
};

// HashMarkLocationRadioButton
class SliderTest::HashMarkLocationRadioButton : public LabeledRadioButton {
public:
	HashMarkLocationRadioButton(const char* label, enum hash_mark_location
		location)
		: LabeledRadioButton(label),
		  fLocation(location)
	{
	}

	hash_mark_location fLocation;
};


// ThicknessRadioButton
class SliderTest::ThicknessRadioButton : public LabeledRadioButton {
public:
	ThicknessRadioButton(const char* label, float thickness)
		: LabeledRadioButton(label),
		  fThickness(thickness)
	{
	}

	float fThickness;
};


// LabelRadioButton
class SliderTest::LabelRadioButton : public LabeledRadioButton {
public:
	LabelRadioButton(const char* label, const char* sliderLabel)
		: LabeledRadioButton(label),
		  fLabel(sliderLabel)
	{
	}

	const char*	fLabel;
};


// LimitLabelsRadioButton
class SliderTest::LimitLabelsRadioButton : public LabeledRadioButton {
public:
	LimitLabelsRadioButton(const char* label, const char* minLabel,
		const char* maxLabel)
		: LabeledRadioButton(label),
		  fMinLabel(minLabel),
		  fMaxLabel(maxLabel)
	{
	}

	const char*	fMinLabel;
	const char*	fMaxLabel;
};


// constructor
SliderTest::SliderTest()
	: Test("Slider", NULL),
	  fSlider(new TestSlider()),
	  fOrientationRadioGroup(NULL),
	  fThumbStyleRadioGroup(NULL),
	  fHashMarkLocationRadioGroup(NULL),
	  fBarThicknessRadioGroup(NULL),
	  fLabelRadioGroup(NULL),
	  fLimitLabelsRadioGroup(NULL),
	  fUpdateTextCheckBox(NULL)
{
	SetView(fSlider);
}


// destructor
SliderTest::~SliderTest()
{
	delete fOrientationRadioGroup;
	delete fThumbStyleRadioGroup;
	delete fHashMarkLocationRadioGroup;
	delete fBarThicknessRadioGroup;
	delete fLabelRadioGroup;
	delete fLimitLabelsRadioGroup;
}


// CreateTest
Test*
SliderTest::CreateTest()
{
	return new SliderTest;
}


// ActivateTest
void
SliderTest::ActivateTest(View* controls)
{
	// BSlider sets its background color to that of its parent in
	// AttachedToWindow(). Override.
	rgb_color background = ui_color(B_PANEL_BACKGROUND_COLOR);
	fSlider->SetViewColor(background);
	fSlider->SetLowColor(background);
	fSlider->SetHashMarkCount(10);

	GroupView* group = new GroupView(B_VERTICAL);
	group->SetFrame(controls->Bounds());
	group->SetSpacing(0, 4);
	controls->AddChild(group);

	GroupView* hGroup = new GroupView(B_HORIZONTAL);
	group->AddChild(hGroup);

	// the radio button group for selecting the orientation

	GroupView* vGroup = new GroupView(B_VERTICAL);
	vGroup->SetSpacing(0, 4);
	hGroup->AddChild(vGroup);

	fOrientationRadioGroup = new RadioButtonGroup(
		new BMessage(MSG_ORIENTATION_CHANGED), this);

	// horizontal
	LabeledRadioButton* button = new OrientationRadioButton("Horizontal",
		B_HORIZONTAL);
	vGroup->AddChild(button);
	fOrientationRadioGroup->AddButton(button->GetRadioButton());

	// vertical
	button = new OrientationRadioButton("Vertical", B_VERTICAL);
	vGroup->AddChild(button);
	fOrientationRadioGroup->AddButton(button->GetRadioButton());

	// default to horizontal
	fOrientationRadioGroup->SelectButton((int32)0);

	// the radio button group for selecting the thumb style

	vGroup = new GroupView(B_VERTICAL);
	vGroup->SetSpacing(0, 4);
	hGroup->AddChild(vGroup);

	fThumbStyleRadioGroup = new RadioButtonGroup(
		new BMessage(MSG_THUMB_STYLE_CHANGED), this);

	// block thumb
	button = new ThumbStyleRadioButton("Block thumb", B_BLOCK_THUMB);
	vGroup->AddChild(button);
	fThumbStyleRadioGroup->AddButton(button->GetRadioButton());

	// triangle thumb
	button = new ThumbStyleRadioButton("Triangle thumb", B_TRIANGLE_THUMB);
	vGroup->AddChild(button);
	fThumbStyleRadioGroup->AddButton(button->GetRadioButton());

	// default to block thumb
	fThumbStyleRadioGroup->SelectButton((int32)0);

	// spacing
	group->AddChild(new VStrut(10));

	// the radio button group for selecting the thumb style

	fHashMarkLocationRadioGroup = new RadioButtonGroup(
		new BMessage(MSG_HASH_MARKS_CHANGED), this);

	// no hash marks
	button = new HashMarkLocationRadioButton("No hash marks",
		B_HASH_MARKS_NONE);
	group->AddChild(button);
	fHashMarkLocationRadioGroup->AddButton(button->GetRadioButton());

	// left/top hash marks
	button = new HashMarkLocationRadioButton("Left/top hash marks",
		B_HASH_MARKS_TOP);
	group->AddChild(button);
	fHashMarkLocationRadioGroup->AddButton(button->GetRadioButton());

	// right/bottom hash marks
	button = new HashMarkLocationRadioButton("Right/bottom hash marks",
		B_HASH_MARKS_BOTTOM);
	group->AddChild(button);
	fHashMarkLocationRadioGroup->AddButton(button->GetRadioButton());

	// both side hash marks
	button = new HashMarkLocationRadioButton("Both sides hash marks",
		B_HASH_MARKS_BOTH);
	group->AddChild(button);
	fHashMarkLocationRadioGroup->AddButton(button->GetRadioButton());

	// default to no hash marks
	fHashMarkLocationRadioGroup->SelectButton((int32)0);

	// spacing
	group->AddChild(new VStrut(10));

	// the radio button group for selecting the bar thickness

	fBarThicknessRadioGroup = new RadioButtonGroup(
		new BMessage(MSG_BAR_THICKNESS_CHANGED), this);

	// default bar thickness
	button = new ThicknessRadioButton("Thin bar", 1.0);
	group->AddChild(button);
	fBarThicknessRadioGroup->AddButton(button->GetRadioButton());

	// thicker bar
	button = new ThicknessRadioButton("Normal bar", fSlider->BarThickness());
	group->AddChild(button);
	fBarThicknessRadioGroup->AddButton(button->GetRadioButton());

	// very thick bar
	button = new ThicknessRadioButton("Thick bar", 25.0);
	group->AddChild(button);
	fBarThicknessRadioGroup->AddButton(button->GetRadioButton());

	// default to default thickness
	fBarThicknessRadioGroup->SelectButton((int32)1);

	// spacing
	group->AddChild(new VStrut(10));

	// the radio button group for selecting the label

	fLabelRadioGroup = new RadioButtonGroup(new BMessage(MSG_LABEL_CHANGED),
		this);

	// no label
	button = new LabelRadioButton("No label", NULL);
	group->AddChild(button);
	fLabelRadioGroup->AddButton(button->GetRadioButton());

	// label string
	button = new LabelRadioButton("Label", "Label");
	group->AddChild(button);
	fLabelRadioGroup->AddButton(button->GetRadioButton());

	// long label string
	button = new LabelRadioButton("Long label",
		"Quite Long Label for a BSlider");
	group->AddChild(button);
	fLabelRadioGroup->AddButton(button->GetRadioButton());

	// default to normal label
	fLabelRadioGroup->SelectButton((int32)1);

	// spacing
	group->AddChild(new VStrut(10));

	// the radio button group for selecting the limit labels

	fLimitLabelsRadioGroup = new RadioButtonGroup(
		new BMessage(MSG_LIMIT_LABELS_CHANGED), this);

	// no limit labels
	button = new LimitLabelsRadioButton("No limit labels", NULL, NULL);
	group->AddChild(button);
	fLimitLabelsRadioGroup->AddButton(button->GetRadioButton());

	// normal limit label strings
	button = new LimitLabelsRadioButton("Normal limit labels", "Min", "Max");
	group->AddChild(button);
	fLimitLabelsRadioGroup->AddButton(button->GetRadioButton());

	// long limit label strings
	button = new LimitLabelsRadioButton("Long limit labels",
		"Very long min label", "Very long max label");
	group->AddChild(button);
	fLimitLabelsRadioGroup->AddButton(button->GetRadioButton());

	// default to no limit labels
	fLimitLabelsRadioGroup->SelectButton((int32)0);

	// spacing
	group->AddChild(new VStrut(10));

	// update text
	fUpdateTextCheckBox = new LabeledCheckBox("Update text",
		new BMessage(MSG_UPDATE_TEXT_CHANGED), this);
	group->AddChild(fUpdateTextCheckBox);


	// glue
	group->AddChild(new Glue());
}


// DectivateTest
void
SliderTest::DectivateTest()
{
}


// MessageReceived
void
SliderTest::MessageReceived(BMessage* message)
{
	switch (message->what) {
		case MSG_ORIENTATION_CHANGED:
			_UpdateOrientation();
			break;
		case MSG_THUMB_STYLE_CHANGED:
			_UpdateThumbStyle();
			break;
		case MSG_HASH_MARKS_CHANGED:
			_UpdateHashMarkLocation();
			break;
		case MSG_BAR_THICKNESS_CHANGED:
			_UpdateBarThickness();
			break;
		case MSG_LABEL_CHANGED:
			_UpdateLabel();
			break;
		case MSG_LIMIT_LABELS_CHANGED:
			_UpdateLimitLabels();
			break;
		case MSG_UPDATE_TEXT_CHANGED:
			_UpdateUpdateText();
			break;
		default:
			Test::MessageReceived(message);
			break;
	}
}


// _UpdateOrientation
void
SliderTest::_UpdateOrientation()
{
	if (fOrientationRadioGroup) {
		// We need to get the parent of the actually selected button, since
		// that is the labeled radio button we've derived our
		// BorderStyleRadioButton from.
		AbstractButton* selectedButton
			= fOrientationRadioGroup->SelectedButton();
		View* parent = (selectedButton ? selectedButton->Parent() : NULL);
		OrientationRadioButton* button = dynamic_cast<OrientationRadioButton*>(
			parent);
		if (button)
			fSlider->SetOrientation(button->fOrientation);
	}
}

// _UpdateThumbStyle
void
SliderTest::_UpdateThumbStyle()
{
	if (fThumbStyleRadioGroup) {
		// We need to get the parent of the actually selected button, since
		// that is the labeled radio button we've derived our
		// BorderStyleRadioButton from.
		AbstractButton* selectedButton
			= fThumbStyleRadioGroup->SelectedButton();
		View* parent = (selectedButton ? selectedButton->Parent() : NULL);
		ThumbStyleRadioButton* button = dynamic_cast<ThumbStyleRadioButton*>(
			parent);
		if (button)
			fSlider->SetStyle(button->fStyle);
	}
}

// _UpdateHashMarkLocation
void
SliderTest::_UpdateHashMarkLocation()
{
	if (fHashMarkLocationRadioGroup) {
		// We need to get the parent of the actually selected button, since
		// that is the labeled radio button we've derived our
		// BorderStyleRadioButton from.
		AbstractButton* selectedButton
			= fHashMarkLocationRadioGroup->SelectedButton();
		View* parent = (selectedButton ? selectedButton->Parent() : NULL);
		HashMarkLocationRadioButton* button
			= dynamic_cast<HashMarkLocationRadioButton*>(parent);
		if (button)
			fSlider->SetHashMarks(button->fLocation);
	}
}

// _UpdateBarThickness
void
SliderTest::_UpdateBarThickness()
{
	if (fBarThicknessRadioGroup) {
		// We need to get the parent of the actually selected button, since
		// that is the labeled radio button we've derived our
		// BorderStyleRadioButton from.
		AbstractButton* selectedButton
			= fBarThicknessRadioGroup->SelectedButton();
		View* parent = (selectedButton ? selectedButton->Parent() : NULL);
		ThicknessRadioButton* button
			= dynamic_cast<ThicknessRadioButton*>(parent);
		if (button)
			fSlider->SetBarThickness(button->fThickness);
	}
}

// _UpdateLabel
void
SliderTest::_UpdateLabel()
{
	if (fLabelRadioGroup) {
		// We need to get the parent of the actually selected button, since
		// that is the labeled radio button we've derived our
		// BorderStyleRadioButton from.
		AbstractButton* selectedButton = fLabelRadioGroup->SelectedButton();
		View* parent = (selectedButton ? selectedButton->Parent() : NULL);
		LabelRadioButton* button = dynamic_cast<LabelRadioButton*>(parent);
		if (button)
			fSlider->SetLabel(button->fLabel);
	}
}

// _UpdateLimitLabels
void
SliderTest::_UpdateLimitLabels()
{
	if (fLimitLabelsRadioGroup) {
		// We need to get the parent of the actually selected button, since
		// that is the labeled radio button we've derived our
		// BorderStyleRadioButton from.
		AbstractButton* selectedButton
			= fLimitLabelsRadioGroup->SelectedButton();
		View* parent = (selectedButton ? selectedButton->Parent() : NULL);
		LimitLabelsRadioButton* button = dynamic_cast<LimitLabelsRadioButton*>(
			parent);
		if (button)
			fSlider->SetLimitLabels(button->fMinLabel, button->fMaxLabel);
	}
}

// _UpdateUpdateText
void
SliderTest::_UpdateUpdateText()
{
	if (!fUpdateTextCheckBox
		|| fUpdateTextCheckBox->IsSelected() == fSlider->fExportUpdateText)
		return;

	fSlider->fExportUpdateText = fUpdateTextCheckBox->IsSelected();
	fSlider->UpdateTextChanged();
}