/*
    Copyright (C) 2011 Paul Davis

    This program 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.

    This program 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 this program; if not, write to the Free Software
    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.

*/

#include "pbd/compose.h"

#include "gtkmm2ext/cairocell.h"
#include "gtkmm2ext/gui_thread.h"
#include "gtkmm2ext/utils.h"

#include "ardour/location.h"
#include "ardour/session.h"

#include "time_info_box.h"
#include "audio_clock.h"
#include "editor.h"

#include "i18n.h"

using namespace Gtk;
using namespace ARDOUR;

TimeInfoBox::TimeInfoBox ()
	: Table (4, 4)
	, syncing_selection (false)
	, syncing_punch (false)
{
	selection_start = new AudioClock ("selection-start", false, "SelectionClockDisplay", false, false, false, false);
	selection_end = new AudioClock ("selection-end", false, "SelectionClockDisplay", false, false, false, false);
	selection_length = new AudioClock ("selection-length", false, "SelectionClockDisplay", false, false, true, false);

	punch_start = new AudioClock ("punch-start", false, "PunchClockDisplay", false, false, false, false);
	punch_end = new AudioClock ("punch-end", false, "PunchClockDisplay", false, false, false, false);

	bool bg = true;

	CairoEditableText& ss (selection_start->main_display());
	ss.set_ypad (1);
	ss.set_xpad (1);
	ss.set_corner_radius (0);
	ss.set_draw_background (bg);

	CairoEditableText& se (selection_end->main_display());
	se.set_ypad (1);
	se.set_xpad (1);
	se.set_corner_radius (0);
	se.set_draw_background (bg);

	CairoEditableText& sl (selection_length->main_display());
	sl.set_ypad (1);
	sl.set_xpad (2);
	sl.set_corner_radius (0);
	sl.set_draw_background (bg);

	CairoEditableText& ps (punch_start->main_display());
	ps.set_ypad (1);
	ps.set_xpad (2);
	ps.set_corner_radius (0);
	ps.set_draw_background (bg);

	CairoEditableText& pe (punch_end->main_display());
	pe.set_ypad (1);
	pe.set_xpad (2);
	pe.set_corner_radius (0);
	pe.set_draw_background (bg);

	selection_title.set_markup (string_compose ("<span size=\"x-small\">%1</span>", _("Selection")));
	punch_title.set_markup (string_compose ("<span size=\"x-small\">%1</span>", _("Punch")));

	set_homogeneous (false);
	set_spacings (0);
	set_border_width (2);
	set_col_spacings (2);

	/* a bit more spacing between the two "sides" */
	set_col_spacing (1, 10);

	Gtk::Label* l;

	attach (selection_title, 0, 2, 0, 1);
	l = manage (new Label);
	l->set_markup (string_compose ("<span size=\"x-small\">%1</span>", _("Start")));
        attach (*l, 0, 1, 1, 2);
        attach (*selection_start, 1, 2, 1, 2);
	l = manage (new Label);
	l->set_markup (string_compose ("<span size=\"x-small\">%1</span>", _("End")));
        attach (*l, 0, 1, 2, 3);
        attach (*selection_end, 1, 2, 2, 3);
	l = manage (new Label);
	l->set_markup (string_compose ("<span size=\"x-small\">%1</span>", _("Length")));
        attach (*l, 0, 1, 3, 4);
        attach (*selection_length, 1, 2, 3, 4);

	attach (punch_title, 2, 4, 0, 1);
	l = manage (new Label);
	l->set_markup (string_compose ("<span size=\"x-small\">%1</span>", _("Start")));
        attach (*l, 2, 3, 1, 2);
        attach (*punch_start, 3, 4, 1, 2);
	l = manage (new Label);
	l->set_markup (string_compose ("<span size=\"x-small\">%1</span>", _("End")));
        attach (*l, 2, 3, 2, 3);
        attach (*punch_end, 3, 4, 2, 3);

        show_all ();

	selection_start->mode_changed.connect (sigc::bind (sigc::mem_fun (*this, &TimeInfoBox::sync_selection_mode), selection_start));
	selection_end->mode_changed.connect (sigc::bind (sigc::mem_fun (*this, &TimeInfoBox::sync_selection_mode), selection_start));
	selection_length->mode_changed.connect (sigc::bind (sigc::mem_fun (*this, &TimeInfoBox::sync_selection_mode), selection_start));

	punch_start->mode_changed.connect (sigc::bind (sigc::mem_fun (*this, &TimeInfoBox::sync_punch_mode), punch_start));
	punch_end->mode_changed.connect (sigc::bind (sigc::mem_fun (*this, &TimeInfoBox::sync_punch_mode), punch_end));

	selection_start->signal_button_release_event().connect (sigc::bind (sigc::mem_fun (*this, &TimeInfoBox::clock_button_release_event), selection_start), true);
	selection_end->signal_button_release_event().connect (sigc::bind (sigc::mem_fun (*this, &TimeInfoBox::clock_button_release_event), selection_end), true);

	punch_start->signal_button_release_event().connect (sigc::bind (sigc::mem_fun (*this, &TimeInfoBox::clock_button_release_event), punch_start), true);
	punch_end->signal_button_release_event().connect (sigc::bind (sigc::mem_fun (*this, &TimeInfoBox::clock_button_release_event), punch_end), true);

	Editor::instance().get_selection().TimeChanged.connect (sigc::mem_fun (*this, &TimeInfoBox::selection_changed));
	Editor::instance().get_selection().RegionsChanged.connect (sigc::mem_fun (*this, &TimeInfoBox::selection_changed));

	Editor::instance().MouseModeChanged.connect (editor_connections, invalidator(*this), ui_bind (&TimeInfoBox::track_mouse_mode, this), gui_context());
}

TimeInfoBox::~TimeInfoBox ()
{
        delete selection_length;
        delete selection_end;
        delete selection_start;
        
        delete punch_start;
        delete punch_end;
}

void
TimeInfoBox::track_mouse_mode ()
{
	selection_changed ();
}

bool
TimeInfoBox::clock_button_release_event (GdkEventButton* ev, AudioClock* src)
{
	if (!_session) {
		return false;
	}

	if (ev->button == 1) {
		_session->request_locate (src->current_time ());
		return true;
	}

	return false;
}

void
TimeInfoBox::sync_selection_mode (AudioClock* src)
{
	if (!syncing_selection) {
		syncing_selection = true;
		selection_start->set_mode (src->mode());
		selection_end->set_mode (src->mode());
		selection_length->set_mode (src->mode());
		syncing_selection = false;
	}
}

void
TimeInfoBox::sync_punch_mode (AudioClock* src)
{
	if (!syncing_punch) {
		syncing_punch = true;
		punch_start->set_mode (src->mode());
		punch_end->set_mode (src->mode());
		syncing_punch = false;
	}
}
	

void
TimeInfoBox::set_session (Session* s)
{
	SessionHandlePtr::set_session (s);

	selection_start->set_session (s);
	selection_end->set_session (s);
	selection_length->set_session (s);

	punch_start->set_session (s);
	punch_end->set_session (s);

	if (s) {
		Location* punch = s->locations()->auto_punch_location ();
		
		if (punch) {
			watch_punch (punch);
		}
		
		_session->auto_punch_location_changed.connect (_session_connections, MISSING_INVALIDATOR, 
							       boost::bind (&TimeInfoBox::punch_location_changed, this, _1), gui_context());
	}
}

void
TimeInfoBox::selection_changed ()
{
	framepos_t s, e;

	switch (Editor::instance().current_mouse_mode()) {
	case Editing::MouseObject:
		s = Editor::instance().get_selection().regions.start();
		e = Editor::instance().get_selection().regions.end_frame();
	
		selection_start->set_off (false);
		selection_end->set_off (false);
		selection_length->set_off (false);
		selection_start->set (s);
		selection_end->set (e);
		selection_length->set (e - s + 1);
		break;

	case Editing::MouseRange:
		selection_start->set_off (false);
		selection_end->set_off (false);
		selection_length->set_off (false);
		selection_start->set (Editor::instance().get_selection().time.start());
		selection_end->set (Editor::instance().get_selection().time.end_frame());
		selection_length->set (Editor::instance().get_selection().time.length());
		break;

	default:
		selection_start->set_off (true);
		selection_end->set_off (true);
		selection_length->set_off (true);	
		break;
	}
}

void
TimeInfoBox::punch_location_changed (Location* loc)
{
	if (loc) {
		watch_punch (loc);
	} 
}

void
TimeInfoBox::watch_punch (Location* punch)
{
	punch_connections.drop_connections ();

	punch->start_changed.connect (punch_connections, MISSING_INVALIDATOR, boost::bind (&TimeInfoBox::punch_changed, this, _1), gui_context());
	punch->end_changed.connect (punch_connections, MISSING_INVALIDATOR, boost::bind (&TimeInfoBox::punch_changed, this, _1), gui_context());

	punch_changed (punch);
}

void
TimeInfoBox::punch_changed (Location* loc)
{
	if (!loc) {
		punch_start->set (99999999);
		punch_end->set (999999999);
		return;
	}

	punch_start->set (loc->start());
	punch_end->set (loc->end());
}	

bool
TimeInfoBox::on_expose_event (GdkEventExpose* ev)
{
	{
		int x, y;
		Gtk::Widget* window_parent;
		Glib::RefPtr<Gdk::Window> win = Gtkmm2ext::window_to_draw_on (*this, &window_parent);

		if (win) {
		
			Cairo::RefPtr<Cairo::Context> context = win->create_cairo_context();

#if 0			
			translate_coordinates (*window_parent, ev->area.x, ev->area.y, x, y);
			context->rectangle (x, y, ev->area.width, ev->area.height);
			context->clip ();
#endif
			translate_coordinates (*window_parent, 0, 0, x, y);
			context->set_source_rgba (0.149, 0.149, 0.149, 1.0);
			Gtkmm2ext::rounded_rectangle (context, x, y, get_allocation().get_width(), get_allocation().get_height(), 5);
			context->fill ();
		}
	}

	Table::on_expose_event (ev);

	return false;
}