/*
    Copyright (C) 2013-2016 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 "content_timeline.h"
#include "timeline_content_view.h"
#include "wx_util.h"
#include "lib/content.h"
#include "lib/util.h"
#include <dcp/warnings.h>
LIBDCP_DISABLE_WARNINGS
#include <wx/graphics.h>
LIBDCP_ENABLE_WARNINGS


using std::list;
using std::shared_ptr;
using namespace dcpomatic;
#if BOOST_VERSION >= 106100
using namespace boost::placeholders;
#endif


TimelineContentView::TimelineContentView(ContentTimeline& tl, shared_ptr<Content> c)
	: ContentTimelineView(tl)
	, _content (c)
{
	_content_connection = c->Change.connect(bind(&TimelineContentView::content_change, this, _1, _2));
}


dcpomatic::Rect<int>
TimelineContentView::bbox () const
{
	DCPOMATIC_ASSERT (_track);

	auto film = _timeline.film ();
	auto content = _content.lock ();
	if (!film || !content) {
		return {};
	}

	return dcpomatic::Rect<int> (
		time_x (content->position ()),
		y_pos (_track.get()),
		content->length_after_trim(film).seconds() * _timeline.pixels_per_second().get_value_or(0),
		_timeline.pixels_per_track()
		);
}


void
TimelineContentView::set_selected (bool s)
{
	_selected = s;
	force_redraw ();
}


bool
TimelineContentView::selected () const
{
	return _selected;
}


shared_ptr<Content>
TimelineContentView::content () const
{
	return _content.lock ();
}


void
TimelineContentView::set_track (int t)
{
	_track = t;
}


void
TimelineContentView::unset_track ()
{
	_track = boost::optional<int>();
}


boost::optional<int>
TimelineContentView::track () const
{
	return _track;
}


void
TimelineContentView::do_paint (wxGraphicsContext* gc, list<dcpomatic::Rect<int>> overlaps)
{
	DCPOMATIC_ASSERT (_track);

	auto film = _timeline.film ();
	auto cont = content ();
	if (!film || !cont) {
		return;
	}

	auto const position = cont->position ();
	auto const len = cont->length_after_trim (film);

	wxColour selected (background_colour().Red() / 2, background_colour().Green() / 2, background_colour().Blue() / 2);

	gc->SetPen (*wxThePenList->FindOrCreatePen (foreground_colour(), 4, wxPENSTYLE_SOLID));
	if (_selected) {
		gc->SetBrush (*wxTheBrushList->FindOrCreateBrush (selected, wxBRUSHSTYLE_SOLID));
	} else {
		gc->SetBrush (*wxTheBrushList->FindOrCreateBrush (background_colour(), wxBRUSHSTYLE_SOLID));
	}

	/* Outline */
	auto path = gc->CreatePath ();
	path.MoveToPoint    (time_x (position) + 2,	      y_pos (_track.get()) + 4);
	path.AddLineToPoint (time_x (position + len) - 1,     y_pos (_track.get()) + 4);
	path.AddLineToPoint (time_x (position + len) - 1,     y_pos (_track.get() + 1) - 4);
	path.AddLineToPoint (time_x (position) + 2,	      y_pos (_track.get() + 1) - 4);
	path.AddLineToPoint (time_x (position) + 2,	      y_pos (_track.get()) + 4);
	gc->StrokePath (path);
	gc->FillPath (path);

	/* Reel split points */
	gc->SetPen (*wxThePenList->FindOrCreatePen (foreground_colour(), 1, wxPENSTYLE_DOT));
	for (auto i: cont->reel_split_points(film)) {
		path = gc->CreatePath ();
		path.MoveToPoint (time_x (i), y_pos (_track.get()) + 4);
		path.AddLineToPoint (time_x (i), y_pos (_track.get() + 1) - 4);
		gc->StrokePath (path);
	}

	/* Overlaps */
	gc->SetBrush (*wxTheBrushList->FindOrCreateBrush (foreground_colour(), wxBRUSHSTYLE_CROSSDIAG_HATCH));
	for (auto const& i: overlaps) {
		gc->DrawRectangle (i.x, i.y + 4, i.width, i.height - 8);
	}

	/* Label text */
	auto lab = label ();
	wxDouble lab_width;
	wxDouble lab_height;
	wxDouble lab_descent;
	wxDouble lab_leading;
	gc->SetFont (gc->CreateFont (*wxNORMAL_FONT, foreground_colour ()));
	gc->GetTextExtent (lab, &lab_width, &lab_height, &lab_descent, &lab_leading);
	gc->PushState ();
	gc->Clip (wxRegion (time_x (position), y_pos (_track.get()), len.seconds() * _timeline.pixels_per_second().get_value_or(0), _timeline.pixels_per_track()));
	gc->DrawText (lab, time_x (position) + 12, y_pos (_track.get() + 1) - lab_height - 4);
	gc->PopState ();
}


void
TimelineContentView::content_change (ChangeType type, int p)
{
	if (type != ChangeType::DONE) {
		return;
	}

	ensure_ui_thread ();

	if (p == ContentProperty::POSITION || p == ContentProperty::LENGTH) {
		force_redraw ();
	}
}


wxString
TimelineContentView::label () const
{
	return std_to_wx(content()->summary());
}