/*
    Copyright (C) 2012-2021 Carl Hetherington <cth@carlh.net>

    This file is part of DCP-o-matic.

    DCP-o-matic is free software; you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
    the Free Software Foundation; either version 2 of the License, or
    (at your option) any later version.

    DCP-o-matic is distributed in the hope that it will be useful,
    but WITHOUT ANY WARRANTY; without even the implied warranty of
    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
    GNU General Public License for more details.

    You should have received a copy of the GNU General Public License
    along with DCP-o-matic.  If not, see <http://www.gnu.org/licenses/>.

*/


#include "hints_dialog.h"
#include "wx_util.h"
#include "static_text.h"
#include "check_box.h"
#include "lib/film.h"
#include "lib/hints.h"
#include "lib/config.h"
#include <dcp/warnings.h>
LIBDCP_DISABLE_WARNINGS
#include <wx/richtext/richtextctrl.h>
LIBDCP_ENABLE_WARNINGS


using std::max;
using std::vector;
using std::string;
using std::cout;
using std::shared_ptr;
using boost::optional;
using boost::bind;
using std::dynamic_pointer_cast;
#if BOOST_VERSION >= 106100
using namespace boost::placeholders;
#endif


HintsDialog::HintsDialog(wxWindow* parent, std::weak_ptr<Film> film, bool ok)
	: wxDialog(parent, wxID_ANY, _("Hints"))
	, _film(film)
	, _hints(0)
	, _finished(false)
{
	auto sizer = new wxBoxSizer(wxVERTICAL);

	_gauge = new wxGauge(this, wxID_ANY, 100);
	sizer->Add(_gauge, 0, wxALL | wxEXPAND, DCPOMATIC_SIZER_GAP);
	_gauge_message = new StaticText(this, {});
	sizer->Add(_gauge_message, 0, wxALL | wxEXPAND, DCPOMATIC_SIZER_GAP);

	_text = new wxRichTextCtrl(this, wxID_ANY, wxEmptyString, wxDefaultPosition, wxSize(400, 300), wxRE_READONLY);
	sizer->Add(_text, 1, wxEXPAND | wxALL, 6);

	if (!ok) {
		auto b = new CheckBox(this, _("Don't show hints again"));
		sizer->Add(b, 0, wxALL, 6);
		b->bind(&HintsDialog::shut_up, this, _1);
	}

	auto buttons = CreateStdDialogButtonSizer(0);
	sizer->Add(CreateSeparatedSizer(buttons), wxSizerFlags().Expand().DoubleBorder());
	wxButton* default_button = nullptr;
	if (ok) {
		default_button = new wxButton(this, wxID_OK);
		buttons->SetAffirmativeButton(default_button);
	} else {
		default_button = new wxButton(this, wxID_OK, _("Make DCP"));
		buttons->SetAffirmativeButton(default_button);
		buttons->SetNegativeButton(new wxButton(this, wxID_CANCEL, _("Go back")));
	}

	buttons->Realize();

	default_button->SetFocus();

	SetSizer(sizer);
	sizer->Layout();
	sizer->SetSizeHints(this);

	_text->GetCaret()->Hide();

	auto locked_film = _film.lock();
	if (locked_film) {
		_film_change_connection = locked_film->Change.connect(boost::bind(&HintsDialog::film_change, this, _1));
		_film_content_change_connection = locked_film->ContentChange.connect(boost::bind(&HintsDialog::film_content_change, this, _1));
	}

	film_change(ChangeType::DONE);
}


void
HintsDialog::film_change(ChangeType type)
{
	if (type != ChangeType::DONE) {
		return;
	}

	_text->Clear();
	_current.clear();

	auto film = _film.lock();
	if (!film) {
		return;
	}

	_gauge->Show();
	_gauge_message->Show();
	Layout();
	_gauge->SetValue(0);
	update();
	_finished = false;

	_hints.reset(new Hints(_film));
	_hints_hint_connection = _hints->Hint.connect(bind(&HintsDialog::hint, this, _1));
	_hints_progress_connection = _hints->Progress.connect(bind(&HintsDialog::progress, this, _1));
	_hints_pulse_connection = _hints->Pulse.connect(bind(&HintsDialog::pulse, this));
	_hints_finished_connection = _hints->Finished.connect(bind(&HintsDialog::finished, this));
	_hints->start();
}

void
HintsDialog::film_content_change(ChangeType type)
{
	film_change(type);
}

void
HintsDialog::update()
{
	_text->Clear();
	if (_current.empty()) {
		if (_finished) {
			_text->WriteText(_("There are no hints: everything looks good!"));
		} else {
			_text->WriteText(_("There are no hints yet: project check in progress."));
		}
	} else {
		_text->BeginStandardBullet(char_to_wx("standard/circle"), 1, 50);
		for (auto i: _current) {
			_text->WriteText(std_to_wx(i));
			_text->Newline();
		}
		_text->EndSymbolBullet();
	}
}

void
HintsDialog::hint(string text)
{
	_current.push_back(text);
	update();
}

void
HintsDialog::shut_up(wxCommandEvent& ev)
{
	Config::instance()->set_show_hints_before_make_dcp(!ev.IsChecked());
}

void
HintsDialog::pulse()
{
	_gauge->Pulse();
}

void
HintsDialog::finished()
{
	try {
		_hints->rethrow();
	} catch (std::exception& e) {
		error_dialog(this, wxString::Format(_("A problem occurred when looking for hints (%s)"), std_to_wx(e.what())));
	}

	_finished = true;
	update();
	_gauge->Hide();
	_gauge_message->Hide();
	Layout();
}

void
HintsDialog::progress(string m)
{
	_gauge_message->SetLabel(std_to_wx(m));
}