// Copyright (c) 2007, Niels Martin Hansen
// All rights reserved.
//
// Redistribution and use in source and binary forms, with or without
// modification, are permitted provided that the following conditions are met:
//
//   * Redistributions of source code must retain the above copyright notice,
//     this list of conditions and the following disclaimer.
//   * Redistributions in binary form must reproduce the above copyright notice,
//     this list of conditions and the following disclaimer in the documentation
//     and/or other materials provided with the distribution.
//   * Neither the name of the Aegisub Group nor the names of its contributors
//     may be used to endorse or promote products derived from this software
//     without specific prior written permission.
//
// THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
// AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
// IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
// ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
// LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
// CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
// SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
// INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
// CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
// ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
// POSSIBILITY OF SUCH DAMAGE.
//
// Aegisub Project http://www.aegisub.org/

/// @file dialog_dummy_video.cpp
/// @brief Set up dummy video provider
/// @ingroup secondary_ui
///


#include "config.h"

#include "dialog_dummy_video.h"

#ifndef AGI_PRE
#include <tr1/functional>

#include <wx/checkbox.h>
#include <wx/combobox.h>
#include <wx/datetime.h>
#include <wx/log.h>
#include <wx/sizer.h>
#include <wx/spinctrl.h>
#include <wx/statline.h>
#include <wx/stattext.h>
#include <wx/string.h>
#include <wx/textctrl.h>
#endif

#include "colour_button.h"
#include "compat.h"
#include "help_button.h"
#include "libresrc/libresrc.h"
#include "main.h"
#include "utils.h"
#include "video_provider_dummy.h"

enum {
	Dummy_Video_Resolution_Shortcut = 1700,
	Dummy_Video_FPS,
	Dummy_Video_Length
};

/// DOCME
struct ResolutionShortcut {
	const char *name;
	int width;
	int height;
};

/// DOCME
static ResolutionShortcut resolutions[] = {
	{"640x480 (SD fullscreen)", 640, 480},
	{"704x480 (SD anamorphic)", 704, 480},
	{"640x360 (SD widescreen)", 640, 360},
	{"704x396 (SD widescreen)", 704, 396},
	{"640x352 (SD widescreen MOD16)", 640, 352},
	{"704x400 (SD widescreen MOD16)", 704, 400},
	{"1280x720 (HD 720p)", 1280, 720},
	{"1920x1080 (HD 1080p)", 1920, 1080},
	{"1024x576 (SuperPAL widescreen)", 1024, 576},
	{0, 0, 0}
};

bool DialogDummyVideo::CreateDummyVideo(wxWindow *parent, wxString &out_filename)
{
	DialogDummyVideo dlg(parent);
	if (dlg.ShowModal() != wxID_OK)
		return false;

	double fps;
	long width, height, length;
	agi::Color colour;
	bool pattern;

	// Read back values and check sensibility
	if (!dlg.fps->GetValue().ToDouble(&fps) || fps <= 0) {
		wxLogWarning("Invalid framerate specified, assuming 23.976");
		fps = 24/1.001;
	}
	if (!dlg.width->GetValue().ToLong(&width) || width <= 0) {
		wxLogWarning("Invalid width specified");
		width = 0;
	}
	if (!dlg.height->GetValue().ToLong(&height) || height <= 0) {
		wxLogWarning("Invalid height specified");
		height = 0;
	}
	if (width == 0 && height == 0) {
		wxLogWarning("Assuming 640x480");
		width = 640; height = 480;
	} else if (width == 0) {
		width = height * 4 / 3;
		wxLogWarning("Assuming 4:3 fullscreen, %dx%d", width, height);
	} else if (height == 0) {
		height = width * 3 / 4;
		wxLogWarning("Assuming 4:3 fullscreen, %dx%d", width, height);
	}
	if ((length = dlg.length->GetValue()) <= 0) {
		wxLogWarning("Invalid duration, assuming 2 frames");
		length = 2;
	}
	colour = dlg.colour->GetColor();
	pattern = dlg.pattern->GetValue();

	// Write to options
	OPT_SET("Video/Dummy/FPS")->SetDouble(fps);
	OPT_SET("Video/Dummy/Last/Width")->SetInt(width);
	OPT_SET("Video/Dummy/Last/Height")->SetInt(height);
	OPT_SET("Video/Dummy/Last/Length")->SetInt(length);
	OPT_SET("Colour/Video Dummy/Last Colour")->SetColor(colour);
	OPT_SET("Video/Dummy/Pattern")->SetBool(pattern);

	out_filename = DummyVideoProvider::MakeFilename(fps, length, width, height, colour, pattern);
	return true;
}

DialogDummyVideo::DialogDummyVideo(wxWindow *parent)
: wxDialog(parent, -1, _("Dummy video options"),wxDefaultPosition,wxDefaultSize)
{
	SetIcon(GETICON(use_dummy_video_menu_16));

	// Main controls
	length_display = 0;
	resolution_shortcuts = new wxComboBox(this, Dummy_Video_Resolution_Shortcut, "", wxDefaultPosition, wxDefaultSize, 0, 0, wxCB_READONLY);
	width = new wxTextCtrl(this, -1);
	height = new wxTextCtrl(this, -1);
	colour = new ColourButton(this, -1, wxSize(30, 17), OPT_GET("Colour/Video Dummy/Last Colour")->GetColor());
	pattern = new wxCheckBox(this, -1, _("Checkerboard &pattern"));
	fps = new wxTextCtrl(this, Dummy_Video_FPS, wxString::Format("%f", OPT_GET("Video/Dummy/FPS")->GetDouble()));
	length = new wxSpinCtrl(this, Dummy_Video_Length, "", wxDefaultPosition, wxDefaultSize, 4096|wxALIGN_LEFT);
	length_display = new wxStaticText(this, -1, "");

	// Support controls and layout
	wxFlexGridSizer *fg = new wxFlexGridSizer(2, 5, 5);
	fg->Add(new wxStaticText(this, -1, _("Video resolution:")), 0, wxALIGN_CENTRE_VERTICAL);
	fg->Add(resolution_shortcuts, 0, wxEXPAND);
	fg->AddStretchSpacer();
	wxBoxSizer *res_sizer = new wxBoxSizer(wxHORIZONTAL);
	res_sizer->Add(width, 0, wxEXPAND);
	res_sizer->Add(new wxStaticText(this, -1, " x "), 0, wxALIGN_CENTRE_VERTICAL|wxFIXED_MINSIZE);
	res_sizer->Add(height, 0, wxEXPAND);
	fg->Add(res_sizer, 0, wxEXPAND);
	fg->Add(new wxStaticText(this, -1, _("Color:")), 0, wxALIGN_CENTRE_VERTICAL);
	fg->Add(colour, 0, wxALIGN_LEFT|wxALIGN_CENTRE_VERTICAL);
	fg->AddStretchSpacer();
	fg->Add(pattern, 0, wxALIGN_LEFT|wxALIGN_CENTRE_VERTICAL);
	fg->Add(new wxStaticText(this, -1, _("Frame rate (fps):")), 0, wxALIGN_CENTRE_VERTICAL);
	fg->Add(fps, 0, wxEXPAND);
	fg->Add(new wxStaticText(this, -1, _("Duration (frames):")), 0, wxALIGN_CENTRE_VERTICAL);
	fg->Add(length, 0, wxEXPAND);
	fg->AddStretchSpacer();
	fg->Add(length_display, 0, wxEXPAND|wxALIGN_CENTRE_VERTICAL|wxALIGN_LEFT);
	wxBoxSizer *main_sizer = new wxBoxSizer(wxVERTICAL);
	main_sizer->Add(fg, 1, wxALL|wxEXPAND, 5);

	wxStdDialogButtonSizer *btnSizer = CreateStdDialogButtonSizer(wxOK | wxCANCEL | wxHELP);
	ok_button = btnSizer->GetAffirmativeButton();
	btnSizer->GetHelpButton()->Bind(wxEVT_COMMAND_BUTTON_CLICKED, std::tr1::bind(&HelpButton::OpenPage, "Dummy Video"));

	main_sizer->Add(new wxStaticLine(this,wxHORIZONTAL),0,wxALL|wxEXPAND,5);
	main_sizer->Add(btnSizer,0,wxLEFT|wxRIGHT|wxBOTTOM|wxEXPAND,5);

	// Initialise controls
	int lastwidth, lastheight, lastres = 0;
	lastwidth = OPT_GET("Video/Dummy/Last/Width")->GetInt();
	lastheight = OPT_GET("Video/Dummy/Last/Height")->GetInt();
	for (ResolutionShortcut *res = resolutions; res->name; ++res) {
		resolution_shortcuts->Append(res->name);
		if (res->width == lastwidth && res->height == lastheight)
			resolution_shortcuts->SetSelection(lastres);
		lastres++;
	}
	pattern->SetValue(OPT_GET("Video/Dummy/Pattern")->GetBool());
	width->ChangeValue(AegiIntegerToString(OPT_GET("Video/Dummy/Last/Width")->GetInt()));
	height->ChangeValue(AegiIntegerToString(OPT_GET("Video/Dummy/Last/Height")->GetInt()));
	length->SetRange(0, 0x10000000);
	length->SetValue(OPT_GET("Video/Dummy/Last/Length")->GetInt());
	UpdateLengthDisplay();

	// Layout
	SetSizerAndFit(main_sizer);
	CenterOnParent();
}

DialogDummyVideo::~DialogDummyVideo()
{
}

BEGIN_EVENT_TABLE(DialogDummyVideo,wxDialog)
	EVT_COMBOBOX(Dummy_Video_Resolution_Shortcut, DialogDummyVideo::OnResolutionShortcut)
	EVT_TEXT(Dummy_Video_FPS, DialogDummyVideo::OnFpsChange)
	EVT_SPINCTRL(Dummy_Video_Length, DialogDummyVideo::OnLengthSpin)
	EVT_TEXT(Dummy_Video_Length, DialogDummyVideo::OnLengthChange)
END_EVENT_TABLE()

void DialogDummyVideo::OnResolutionShortcut(wxCommandEvent &)
{
	int rs = resolution_shortcuts->GetSelection();
	width->ChangeValue(wxString::Format("%d", resolutions[rs].width));
	height->ChangeValue(wxString::Format("%d", resolutions[rs].height));
}

void DialogDummyVideo::OnFpsChange(wxCommandEvent &)
{
	UpdateLengthDisplay();
}

void DialogDummyVideo::OnLengthSpin(wxSpinEvent &)
{
	UpdateLengthDisplay();
}

void DialogDummyVideo::OnLengthChange(wxCommandEvent &)
{
	UpdateLengthDisplay();
}

void DialogDummyVideo::UpdateLengthDisplay()
{
	double fpsval;
	if (!length_display) return;
	bool valid = false;
	if (fps->GetValue().ToDouble(&fpsval)) {
		int lengthval = length->GetValue();
		if (lengthval && fpsval > 0 && lengthval > 0) {
			valid = true;
			int tt = int(lengthval / fpsval * 1000); // frames / (frames/seconds) * 1000 = milliseconds
			// 32 bit signed int can hold almost 600 positive hours when counting milliseconds, ASS allows at most just below 10 hours, so we're safe
			int ms, s, m, h;
			ms = tt % 1000; tt /= 1000;
			s = tt % 60; tt /= 60;
			m = tt % 60; tt /= 60;
			h = tt;
			length_display->SetLabel(wxString::Format(_("Resulting duration: %d:%02d:%02d.%03d"), h, m, s, ms));
			ok_button->Enable();
		}
	}

	if (!valid) {
		length_display->SetLabel(_("Invalid fps or length value"));
		ok_button->Disable();
	}
}