/*
 * Copyright (C) 2011-2017 Paul Davis <paul@linuxaudiosystems.com>
 * Copyright (C) 2021 Ben Loftis <ben@harrisonconsoles.com>
 *
 * 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.,
 * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
 */

#include <algorithm>
#include "pbd/basename.h"
#include "pbd/compose.h"
#include "pbd/convert.h"
#include "pbd/file_utils.h"
#include "pbd/pathexpand.h"
#include "pbd/search_path.h"

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

#include <gtkmm/alignment.h>
#include <gtkmm/filechooserdialog.h>
#include <gtkmm/menu.h>
#include <gtkmm/menuitem.h>
#include <gtkmm/stock.h>

#include "widgets/tooltips.h"

#include "ardour/location.h"
#include "ardour/profile.h"
#include "ardour/session.h"
#include "ardour/region.h"
#include "ardour/triggerbox.h"

#include "ardour_ui.h"
#include "audio_clock.h"
#include "region_view.h"
#include "trigger_ui.h"
#include "utils.h"

#include "audio_region_properties_box.h"
#include "audio_trigger_properties_box.h"
#include "audio_region_operations_box.h"

#include "midi_trigger_properties_box.h"
#include "midi_region_properties_box.h"
#include "midi_region_operations_box.h"
#include "midi_clip_editor.h"

#include "slot_properties_box.h"

#include "pbd/i18n.h"


using namespace Gtk;
using namespace PBD;
using namespace ARDOUR;
using namespace ArdourWidgets;
using namespace Temporal;
using std::min;
using std::max;

SlotPropertiesBox::SlotPropertiesBox ()
{
	_header_label.set_text(_("Slot Properties:"));
	_header_label.set_alignment(0.0, 0.5);
//	pack_start(_header_label, false, false, 6);

	_triggerwidget = manage (new SlotPropertyWidget ());
	_triggerwidget->show();

	pack_start (*_triggerwidget, true, true);
}

SlotPropertiesBox::~SlotPropertiesBox ()
{
}

void
SlotPropertiesBox::set_session (Session* s)
{
	SessionHandlePtr::set_session (s);
}

void
SlotPropertiesBox::set_slot (TriggerReference tref)
{
	_triggerwidget->set_trigger (tref);
}

/* **************************************** */

SlotPropertyTable::SlotPropertyTable ()
	: _color_button (ArdourButton::Element (ArdourButton::just_led_default_elements | ArdourButton::ColorBox))
	, _color_label (_("Color:"))
	, _velocity_adjustment(1.,0.,1.0,0.01,0.1)
	, _velocity_slider (&_velocity_adjustment, boost::shared_ptr<PBD::Controllable>(), 24/*length*/, 12/*girth*/ )
	, _gain_adjustment( 0.0, -20.0, +20.0, 1.0, 3.0, 0)
	, _gain_spinner (_gain_adjustment)
	, _allow_button (ArdourButton::Element (ArdourButton::led_default_elements))
	, _follow_probability_adjustment(0,0,100,2,5)
	, _follow_probability_slider (&_follow_probability_adjustment, boost::shared_ptr<PBD::Controllable>(), 24/*length*/, 12/*girth*/ )
	, _follow_count_adjustment (1, 1, 128, 1, 4)
	, _follow_count_spinner (_follow_count_adjustment)
	, _use_follow_length_button (ArdourButton::default_elements)
	, _follow_length_adjustment (1, 1, 128, 1, 4)
	, _follow_length_spinner (_follow_length_adjustment)
	, _legato_button (ArdourButton::led_default_elements)
	, _isolate_button (ArdourButton::led_default_elements)
	, _ignore_changes(false)

{
	using namespace Gtk::Menu_Helpers;
	using namespace ArdourWidgets;

	_follow_count_spinner.set_can_focus(false);
	_follow_count_spinner.signal_changed ().connect (sigc::mem_fun (*this, &SlotPropertyTable::follow_count_event));

	_use_follow_length_button.signal_event().connect (sigc::mem_fun (*this, (&SlotPropertyTable::use_follow_length_event)));

	_follow_length_spinner.set_can_focus(false);
	_follow_length_spinner.signal_changed ().connect (sigc::mem_fun (*this, &SlotPropertyTable::follow_length_event));

	_velocity_adjustment.signal_value_changed ().connect (sigc::mem_fun (*this, &SlotPropertyTable::velocity_adjusted));

	_velocity_slider.set_name("FollowAction");

	_follow_probability_adjustment.signal_value_changed ().connect (sigc::mem_fun (*this, &SlotPropertyTable::probability_adjusted));

	_follow_probability_slider.set_name("FollowAction");

	_follow_left.set_name("FollowAction");
	_follow_left.AddMenuElem (MenuElem (follow_action_to_string(FollowAction (FollowAction::None)), sigc::bind (sigc::mem_fun (*this, &SlotPropertyTable::set_follow_action), FollowAction (FollowAction::None), 0)));
	_follow_left.AddMenuElem (MenuElem (follow_action_to_string(FollowAction (FollowAction::Stop)), sigc::bind (sigc::mem_fun (*this, &SlotPropertyTable::set_follow_action), FollowAction (FollowAction::Stop), 0)));
	_follow_left.AddMenuElem (MenuElem (follow_action_to_string(FollowAction (FollowAction::Again)), sigc::bind (sigc::mem_fun (*this, &SlotPropertyTable::set_follow_action), FollowAction (FollowAction::Again), 0)));
	_follow_left.AddMenuElem (MenuElem (follow_action_to_string(FollowAction (FollowAction::ReverseTrigger)), sigc::bind (sigc::mem_fun (*this, &SlotPropertyTable::set_follow_action), FollowAction (FollowAction::ReverseTrigger), 0)));
	_follow_left.AddMenuElem (MenuElem (follow_action_to_string(FollowAction (FollowAction::ForwardTrigger)), sigc::bind (sigc::mem_fun (*this, &SlotPropertyTable::set_follow_action), FollowAction (FollowAction::ForwardTrigger), 0)));
		Menu*     jump_menu = manage (new Menu);
		MenuList& jitems      = jump_menu->items ();
		jitems.push_back (MenuElem (_("Multi..."), sigc::bind (sigc::mem_fun (*this, &TriggerUI::edit_jump), false)));
		for (int i = 0; i < TriggerBox::default_triggers_per_box; i++) {
			FollowAction jump_fa = (FollowAction::JumpTrigger);
			jump_fa.targets.set(i);
			jitems.push_back (MenuElem (cue_marker_name (i), sigc::bind (sigc::mem_fun (*this, &SlotPropertyTable::set_follow_action), jump_fa, 0)));
		}
	_follow_left.AddMenuElem (MenuElem (_("Jump"), *jump_menu));
	_follow_left.set_sizing_text (longest_follow);

	_follow_right.set_name("FollowAction");
	_follow_right.AddMenuElem (MenuElem (follow_action_to_string(FollowAction (FollowAction::None)), sigc::bind (sigc::mem_fun (*this, &SlotPropertyTable::set_follow_action), FollowAction (FollowAction::None), 1)));
	_follow_right.AddMenuElem (MenuElem (follow_action_to_string(FollowAction (FollowAction::Stop)), sigc::bind (sigc::mem_fun (*this, &SlotPropertyTable::set_follow_action), FollowAction (FollowAction::Stop), 1)));
	_follow_right.AddMenuElem (MenuElem (follow_action_to_string(FollowAction (FollowAction::Again)), sigc::bind (sigc::mem_fun (*this, &SlotPropertyTable::set_follow_action), FollowAction (FollowAction::Again), 1)));
	_follow_right.AddMenuElem (MenuElem (follow_action_to_string(FollowAction (FollowAction::ReverseTrigger)), sigc::bind (sigc::mem_fun (*this, &SlotPropertyTable::set_follow_action), FollowAction (FollowAction::ReverseTrigger), 1)));
	_follow_right.AddMenuElem (MenuElem (follow_action_to_string(FollowAction (FollowAction::ForwardTrigger)), sigc::bind (sigc::mem_fun (*this, &SlotPropertyTable::set_follow_action), FollowAction (FollowAction::ForwardTrigger), 1)));
		Menu*     jump_menu_1 = manage (new Menu);
		MenuList& jitems_1      = jump_menu_1->items ();
		jitems_1.push_back (MenuElem (_("Multi..."), sigc::bind (sigc::mem_fun (*this, &TriggerUI::edit_jump), true)));
		for (int i = 0; i < TriggerBox::default_triggers_per_box; i++) {
			FollowAction jump_fa = (FollowAction::JumpTrigger);
			jump_fa.targets.set(i);
			jitems_1.push_back (MenuElem (cue_marker_name (i), sigc::bind (sigc::mem_fun (*this, &SlotPropertyTable::set_follow_action), jump_fa, 1)));
		}
	_follow_right.AddMenuElem (MenuElem (_("Jump"), *jump_menu_1));
	_follow_right.set_sizing_text (longest_follow);

	_launch_style_button.set_name("FollowAction");
	_launch_style_button.set_sizing_text (longest_launch);
	_launch_style_button.AddMenuElem (MenuElem (launch_style_to_string (Trigger::OneShot), sigc::bind (sigc::mem_fun (*this, &SlotPropertyTable::set_launch_style), Trigger::OneShot)));
	_launch_style_button.AddMenuElem (MenuElem (launch_style_to_string (Trigger::ReTrigger), sigc::bind (sigc::mem_fun (*this, &SlotPropertyTable::set_launch_style), Trigger::ReTrigger)));
	_launch_style_button.AddMenuElem (MenuElem (launch_style_to_string (Trigger::Gate), sigc::bind (sigc::mem_fun (*this, &SlotPropertyTable::set_launch_style), Trigger::Gate)));
	_launch_style_button.AddMenuElem (MenuElem (launch_style_to_string (Trigger::Toggle), sigc::bind (sigc::mem_fun (*this, &SlotPropertyTable::set_launch_style), Trigger::Toggle)));
	_launch_style_button.AddMenuElem (MenuElem (launch_style_to_string (Trigger::Repeat), sigc::bind (sigc::mem_fun (*this, &SlotPropertyTable::set_launch_style), Trigger::Repeat)));

	_launch_style_button.set_name("FollowAction");

	_legato_button.set_text (_("Legato"));
	_legato_button.signal_event().connect (sigc::mem_fun (*this, (&SlotPropertyTable::legato_button_event)));

	_isolate_button.set_text (_("Isolate"));
	_isolate_button.signal_event().connect (sigc::mem_fun (*this, (&SlotPropertyTable::isolate_button_event)));

#define quantize_item(b) _quantize_button.AddMenuElem (MenuElem (quantize_length_to_string (b), sigc::bind (sigc::mem_fun (*this, &SlotPropertyTable::set_quantize), b)));

#if TRIGGER_PAGE_GLOBAL_QUANTIZATION_IMPLEMENTED
	quantize_item (BBT_Offset (0, 0, 0));
#endif
	quantize_item (BBT_Offset (4, 0, 0));
	quantize_item (BBT_Offset (2, 0, 0));
	quantize_item (BBT_Offset (1, 0, 0));
	quantize_item (BBT_Offset (0, 2, 0));
	quantize_item (BBT_Offset (0, 1, 0));
	quantize_item (BBT_Offset (0, 0, Temporal::ticks_per_beat/2));
	quantize_item (BBT_Offset (0, 0, Temporal::ticks_per_beat/4));
	quantize_item (BBT_Offset (0, 0, Temporal::ticks_per_beat/8));
	quantize_item (BBT_Offset (0, 0, Temporal::ticks_per_beat/16));
	quantize_item (BBT_Offset (-1, 0, 0));

	for (std::vector<std::string>::const_iterator i = quantize_strings.begin(); i != quantize_strings.end(); ++i) {
		if (i->length() > longest_quantize.length()) {
			longest_quantize = *i;
		}
	}
	_quantize_button.set_sizing_text (longest_quantize);
	_quantize_button.set_name("FollowAction");

#undef quantize_item

	_name_label.set_name (X_("TrackNameEditor"));
	_name_label.set_alignment (0.0, 0.5);
	_name_label.set_padding (4, 0);
	_name_label.set_width_chars (24);

	_namebox.add (_name_label);
	_namebox.add_events (Gdk::BUTTON_PRESS_MASK);
	_namebox.signal_button_press_event ().connect (sigc::mem_fun (*this, &SlotPropertyTable::namebox_button_press));

	_name_frame.add (_namebox);
	_name_frame.set_edge_color (0x000000ff);
	_name_frame.set_border_width (0);
	_name_frame.set_padding (0);

	_gain_spinner.set_can_focus(false);
	_gain_spinner.configure(_gain_adjustment, 0.0, 1);
	_gain_spinner.signal_changed ().connect (sigc::mem_fun (*this, &SlotPropertyTable::gain_change_event));

	_load_button.set_name("FollowAction");
	_load_button.set_text (_("Load"));
	_load_button.signal_clicked.connect (sigc::bind((sigc::mem_fun (*this, (&TriggerUI::choose_sample))), false));

	_color_button.set_name("FollowAction");
	_color_button.signal_clicked.connect (sigc::mem_fun (*this, (&TriggerUI::choose_color)));

	_follow_size_group  = Gtk::SizeGroup::create (Gtk::SIZE_GROUP_VERTICAL);
	_follow_size_group->add_widget(_name_frame);
	_follow_size_group->add_widget(_load_button);
	_follow_size_group->add_widget(_color_button);
	_follow_size_group->add_widget(_velocity_slider);
	_follow_size_group->add_widget(_follow_count_spinner);

	_patch_button.set_text (_("MIDI Patches"));
	_patch_button.set_name("FollowAction");
	_patch_button.signal_clicked.connect (sigc::mem_fun (*this, (&SlotPropertyTable::patch_button_event)));

	_allow_button.set_text (_("Send Patches"));
	_allow_button.set_name("FollowAction");
	_allow_button.signal_event().connect (sigc::mem_fun (*this, (&SlotPropertyTable::allow_button_event)));

	set_spacings (8);  //match to TriggerPage::  table->set_spacings
	set_border_width (0);  //change TriggerPage::  table->set_border_width   instead
	set_homogeneous (false);

	int row=0;

	/* ---- Basic trigger properties (name, color) ----- */
	_trigger_table.set_spacings (4);
	_trigger_table.set_border_width (8);
	_trigger_table.set_homogeneous (false);

	_trigger_table.attach(_name_frame,    0, 6, row, row+1, Gtk::FILL|Gtk::EXPAND, Gtk::SHRINK ); row++;
	_trigger_table.attach(_load_button,   0, 1, row, row+1, Gtk::SHRINK,           Gtk::SHRINK );
	_trigger_table.attach(_color_label,   1, 2, row, row + 1, Gtk::FILL, Gtk::SHRINK);
	_trigger_table.attach(_color_button,  2, 3, row, row+1, Gtk::SHRINK,           Gtk::SHRINK );
	_trigger_table.attach(_gain_label,    3, 5, row, row + 1, Gtk::FILL, Gtk::SHRINK);
	_trigger_table.attach(_gain_spinner,  5, 6, row, row + 1, Gtk::FILL, Gtk::SHRINK); row++;
	_trigger_table.attach(_allow_button,  0, 3, row, row + 1, Gtk::FILL, Gtk::SHRINK);
	_trigger_table.attach(_patch_button,  3, 6, row, row + 1, Gtk::FILL, Gtk::SHRINK);


	/* ---- Launch settings ----- */
	_launch_table.set_spacings (2);
	_launch_table.set_border_width (8);
	_launch_table.set_homogeneous (false);
	row=0;

	_vel_sense_label.set_text(_("Velocity Sense:"));  _vel_sense_label.set_alignment(1.0, 0.5);
	_launch_table.attach(_vel_sense_label,       0, 1, row, row+1, Gtk::FILL, Gtk::SHRINK );
	_launch_table.attach(_velocity_slider,       1, 3, row, row+1, Gtk::FILL, Gtk::SHRINK ); row++;

	_launch_style_label.set_text(_("Launch Style:"));  _launch_style_label.set_alignment(1.0, 0.5);
	_launch_table.attach(_launch_style_label,    0, 1, row, row+1, Gtk::FILL, Gtk::SHRINK );
	_launch_table.attach(_launch_style_button,   1, 3, row, row+1, Gtk::FILL, Gtk::SHRINK ); row++;

	_launch_quant_label.set_text(_("Launch Quantize:"));  _launch_quant_label.set_alignment(1.0, 0.5);
	_launch_table.attach(_launch_quant_label, 0, 1, row, row+1, Gtk::FILL, Gtk::SHRINK );
	_launch_table.attach(_quantize_button,    1, 3, row, row+1, Gtk::FILL, Gtk::SHRINK ); row++;

	_legato_label.set_text(_("Legato:"));  _legato_label.set_alignment(1.0, 0.5);
	_launch_table.attach(_legato_label,   0, 1, row, row+1, Gtk::FILL, Gtk::SHRINK );
	_launch_table.attach(_legato_button,  1, 3, row, row+1, Gtk::FILL, Gtk::SHRINK ); row++;

	_isolate_label.set_text(_("Cue Isolate:"));  _isolate_label.set_alignment(1.0, 0.5);
	_launch_table.attach(_isolate_label,   0, 1, row, row+1, Gtk::FILL, Gtk::SHRINK );
	_launch_table.attach(_isolate_button,  1, 3, row, row+1, Gtk::FILL, Gtk::SHRINK ); row++;


	/* ---- Follow settings ----- */
	_follow_table.set_spacings (2);
	_follow_table.set_border_width (8);
	_follow_table.set_homogeneous (false);
	row=0;

	Gtkmm2ext::set_size_request_to_display_given_text (_left_probability_label, "100% Left ", 12, 0);
	_left_probability_label.set_alignment(0.0, 0.5);
	Gtkmm2ext::set_size_request_to_display_given_text (_right_probability_label, "100% Right", 12, 0);
	_right_probability_label.set_alignment(1.0, 0.5);

	Gtk::Table *prob_table = manage(new Gtk::Table());
	prob_table->set_spacings(2);
	prob_table->set_border_width(0);
	prob_table->attach(_left_probability_label,    0, 1, 0, 1, Gtk::FILL,             Gtk::SHRINK );
	prob_table->attach(_right_probability_label,   1, 2, 0, 1, Gtk::FILL,             Gtk::SHRINK );
	prob_table->attach(_follow_probability_slider, 0, 2, 1, 2, Gtk::FILL, Gtk::SHRINK );

	/* follow count, follow length */
	Gtk::Table *fol_table = manage(new Gtk::Table());
	fol_table->set_spacings(2);
	fol_table->set_border_width(4);

	_follow_count_label.set_text(_("Follow Count:"));  _follow_count_label.set_alignment(1.0, 0.5);
	fol_table->attach(_follow_count_label,  1, 2, row, row+1, Gtk::FILL, Gtk::SHRINK );
	Gtk::Alignment *align = manage (new Gtk::Alignment (0, .5, 0, 0));
	align->add (_follow_count_spinner);
	fol_table->attach(*align,               2, 3, row, row+1, Gtk::FILL, Gtk::SHRINK, 0, 0 ); row++;

	_follow_length_label.set_text(_("Follow Length:"));  _follow_length_label.set_alignment(1.0, 0.5);
	_beat_label.set_text(_("(beats)"));	_beat_label.set_alignment (0.0, 0.5);
	Gtk::Alignment *fl_align = manage (new Gtk::Alignment (0, .5, 0, 0));
	fl_align->add (_follow_length_spinner);
	fol_table->attach(_use_follow_length_button,     0, 1, row, row+1, Gtk::SHRINK, Gtk::SHRINK);
	fol_table->attach(_follow_length_label,          1, 2, row, row+1, Gtk::FILL, Gtk::SHRINK );
	fol_table->attach(*fl_align,                     2, 3, row, row+1, Gtk::FILL, Gtk::SHRINK );
	fol_table->attach(_beat_label,                   3, 4, row, row+1, Gtk::SHRINK, Gtk::SHRINK);

	_follow_table.attach(_follow_left,   0, 1, row, row+1, Gtk::FILL,             Gtk::SHRINK );
	_follow_table.attach(_follow_right,  1, 2, row, row+1, Gtk::FILL,             Gtk::SHRINK ); row++;
	_follow_table.attach( *prob_table,   0, 2, row, row+1, Gtk::FILL, Gtk::SHRINK ); row++;
	_follow_table.attach( *fol_table,    0, 2, row, row+1, Gtk::FILL, Gtk::SHRINK ); row++;

	ArdourWidgets::Frame* trigBox = manage (new ArdourWidgets::Frame);
	trigBox->set_label(_("Clip Properties"));
	trigBox->set_name("EditorDark");
	trigBox->set_edge_color (0x000000ff); // black
	trigBox->add (_trigger_table);

	ArdourWidgets::Frame* eFollowBox = manage (new ArdourWidgets::Frame);
	eFollowBox->set_label(_("Follow Options"));
	eFollowBox->set_name("EditorDark");
	eFollowBox->set_edge_color (0x000000ff); // black
	eFollowBox->add (_follow_table);

	ArdourWidgets::Frame* eLaunchBox = manage (new ArdourWidgets::Frame);
	eLaunchBox->set_label(_("Launch Options"));
	eLaunchBox->set_name("EditorDark");
	eLaunchBox->set_edge_color (0x000000ff); // black
	eLaunchBox->add (_launch_table);

	attach(*trigBox,        0,1, 0,1, Gtk::FILL, Gtk::SHRINK | Gtk::FILL);
	attach(*eLaunchBox,     1,2, 0,1, Gtk::FILL, Gtk::SHRINK | Gtk::FILL);
	attach(*eFollowBox,     2,3, 0,1, Gtk::FILL, Gtk::SHRINK | Gtk::FILL);

	set_tooltip(_name_frame, _("Double-click to rename this clip"));
	set_tooltip(_gain_spinner, _("Adjust audio gain (or MIDI velocity) for this slot"));
	set_tooltip(_load_button, _("Load a new file into this slot"));
	set_tooltip(_color_button, _("Pick a color for this clip"));
	set_tooltip(_patch_button, _("View and edit the programs (patches) that this MIDI clip will send to a synth"));
	set_tooltip(_allow_button, _("Allow this slot to send MIDI patches to a synth"));

	set_tooltip(_follow_count_spinner, _("Number of times to repeat this clip's Follow Length before triggering the Follow-Action"));
	set_tooltip(_use_follow_length_button, _("Click to use the Follow Length instead of the Clip Length"));
	set_tooltip(_follow_length_spinner, _("When enabled, the Follow Length is used instead of Clip Length"));
	set_tooltip(_velocity_slider, _("MIDI Velocity Sensitivity for clip's volume"));
	set_tooltip(_follow_probability_slider, _("Probability for the Left vs Right Follow-Action to be activated"));
	set_tooltip(_follow_left, _("Select an action that will occur when this clip ends"));
	set_tooltip(_follow_right, _("Select an action that will occur when this clip ends"));

	set_tooltip(_launch_style_button, _("Set the behavior of this clip's launch button"));
	set_tooltip(_quantize_button, _("Clip will wait until the timeline passes this boundary before it triggers"));
	set_tooltip(_legato_button, _("If selected, this clip can 'take over' playback in the playback position of the prior clip"));
	set_tooltip(_isolate_button, _("If selected, this slot will not respond to Cue events (either starting or stopping)"));
}

SlotPropertyTable::~SlotPropertyTable ()
{
}

void
SlotPropertyTable::set_quantize (BBT_Offset bbo)
{
#if TRIGGER_PAGE_GLOBAL_QUANTIZATION_IMPLEMENTED
	if (bbo == BBT_Offset (0, 0, 0)) {
		/* use grid */
		bbo = BBT_Offset (1, 2, 3); /* XXX get grid from editor */
	}
#endif

	trigger()->set_quantization (bbo);
}

void
SlotPropertyTable::patch_button_event ()
{
	boost::shared_ptr<Trigger> trigr = trigger();
	if (boost::dynamic_pointer_cast<MIDITrigger> (trigr)) {
		SessionObject* obj = trigr->box ().owner ();
		boost::shared_ptr<Stripable> stripable = obj->session().stripable_by_id (obj->id ());
		_patch_change_window.reset (boost::dynamic_pointer_cast<Route> (stripable), boost::dynamic_pointer_cast<MIDITrigger> (trigr));
		_patch_change_window.present ();
	}
}

bool
SlotPropertyTable::allow_button_event (GdkEvent* ev)
{
	if (_ignore_changes) {
		return false;
	}

	switch (ev->type) {
	case GDK_BUTTON_PRESS:
		trigger()->set_allow_patch_changes (!trigger()->allow_patch_changes());
		return true;

	default:
		break;
	}

	return false;
}


void
SlotPropertyTable::follow_length_event ()
{
	if (_ignore_changes) {
		return;
	}

	int beatz = (int) _follow_length_adjustment.get_value();

	int metrum_numerator = trigger()->meter().divisions_per_bar();

	int bars = beatz/metrum_numerator;
	int beats = beatz%metrum_numerator;

	trigger()->set_follow_length(Temporal::BBT_Offset(bars,beats,0));
	trigger()->set_use_follow_length (true);  //if the user is adjusting follow-length, they want to use it
}

void
SlotPropertyTable::follow_count_event ()
{
	if (_ignore_changes) {
		return;
	}

	trigger()->set_follow_count ((int) _follow_count_adjustment.get_value());
}

void
SlotPropertyTable::velocity_adjusted ()
{
	if (_ignore_changes) {
		return;
	}

	trigger()->set_velocity_effect (_velocity_adjustment.get_value());
}

void
SlotPropertyTable::probability_adjusted ()
{
	if (_ignore_changes) {
		return;
	}

	trigger()->set_follow_action_probability ((int) _follow_probability_adjustment.get_value());
}

bool
SlotPropertyTable::use_follow_length_event (GdkEvent* ev)
{
	if (_ignore_changes) {
		return false;
	}

	switch (ev->type) {
	case GDK_BUTTON_PRESS:
		trigger()->set_use_follow_length (!trigger()->use_follow_length());
		return true;

	default:
		break;
	}

	return false;
}

void
SlotPropertyTable::gain_change_event ()
{
	if (_ignore_changes) {
		return;
	}

	float coeff = dB_to_coefficient(_gain_adjustment.get_value());

	trigger()->set_gain(coeff);
}


bool
SlotPropertyTable::legato_button_event (GdkEvent* ev)
{
	if (_ignore_changes) {
		return false;
	}

	switch (ev->type) {
	case GDK_BUTTON_PRESS:
		trigger()->set_legato (!trigger()->legato());
		return true;

	default:
		break;
	}

	return false;
}

bool
SlotPropertyTable::isolate_button_event (GdkEvent* ev)
{
	if (_ignore_changes) {
		return false;
	}

	switch (ev->type) {
	case GDK_BUTTON_PRESS:
		trigger()->set_cue_isolated (!trigger()->cue_isolated());
		return true;

	default:
		break;
	}

	return false;
}

void
SlotPropertyTable::set_launch_style (Trigger::LaunchStyle ls)
{
	if (_ignore_changes) {
		return;
	}

	trigger()->set_launch_style (ls);
}

void
SlotPropertyTable::set_follow_action (FollowAction const & fa, uint64_t idx)
{
	if (_ignore_changes) {
		return;
	}

	if (idx == 0) {
		trigger()->set_follow_action0 (fa);
	} else {
		trigger()->set_follow_action1 (fa);
	}
}

void
SlotPropertyTable::on_trigger_set ()
{
	boost::shared_ptr<Trigger> trigr = trigger();
	if (boost::dynamic_pointer_cast<MIDITrigger> (trigr)) {
		SessionObject* obj = triggerbox ().owner ();
		boost::shared_ptr<Stripable> stripable = obj->session().stripable_by_id (obj->id ());
		_patch_change_window.reset (boost::dynamic_pointer_cast<Route> (stripable), boost::dynamic_pointer_cast<MIDITrigger> (trigr));
		_patch_button.show();
		_allow_button.show();
	} else {
		_patch_button.hide();
		_allow_button.hide();
	}
}

void
SlotPropertyTable::on_trigger_changed (PropertyChange const& pc)
{
	_ignore_changes = true;

	int probability = trigger()->follow_action_probability();

	if (pc.contains (Properties::name)) {
		_name_label.set_text (trigger()->name());
	}
	if (pc.contains (Properties::color)) {
		_color_button.set_custom_led_color (trigger()->color());
	}

	if (pc.contains (Properties::gain)) {
		float gain = accurate_coefficient_to_dB(trigger()->gain());
		if (gain != _gain_adjustment.get_value()) {
			_gain_adjustment.set_value (gain);
		}
	}

	if (triggerbox().data_type () == DataType::AUDIO) {
		_gain_label.set_text(_("Gain (dB):"));
	} else {
		_gain_label.set_text(_("Velocity Adj:"));
	}

	if (pc.contains (Properties::quantization)) {
		BBT_Offset bbo (trigger()->quantization());
		_quantize_button.set_active (quantize_length_to_string (bbo));
	}

	if (pc.contains (Properties::follow_count)) {
		_follow_count_adjustment.set_value (trigger()->follow_count());
	}

	if (pc.contains (Properties::tempo_meter) || pc.contains (Properties::follow_length)) {
		int metrum_numerator = trigger()->meter().divisions_per_bar();
		int bar_beats = metrum_numerator * trigger()->follow_length().bars;
		int beats = trigger()->follow_length().beats;
		_follow_length_adjustment.set_value (bar_beats+beats);
	}

	if (pc.contains (Properties::use_follow_length)) {
		_use_follow_length_button.set_active_state(trigger()->use_follow_length() ? Gtkmm2ext::ExplicitActive : Gtkmm2ext::Off);
	}

	if (pc.contains (Properties::legato)) {
		_legato_button.set_active_state (trigger()->legato() ? Gtkmm2ext::ExplicitActive : Gtkmm2ext::Off);
	}

	if (pc.contains (Properties::cue_isolated)) {
		_isolate_button.set_active_state (trigger()->cue_isolated() ? Gtkmm2ext::ExplicitActive : Gtkmm2ext::Off);
	}

	if (pc.contains (Properties::allow_patch_changes)) {
		_patch_button.set_sensitive(trigger()->allow_patch_changes());
		_allow_button.set_active_state (trigger()->allow_patch_changes() ? Gtkmm2ext::ExplicitActive : Gtkmm2ext::Off);
	}

	if (pc.contains (Properties::launch_style)) {
		_launch_style_button.set_active (launch_style_to_string (trigger()->launch_style()));
	}

	if (pc.contains (Properties::follow_action0)) {
		_follow_left.set_text (follow_action_to_string (trigger()->follow_action0 (), true));

		/* set widget sensitivity based on 'left' follow action */
		bool follow_widgets_sensitive = trigger()->follow_action0 ().type != FollowAction::None;
		if (follow_widgets_sensitive) {
			_follow_right.set_sensitive(true);
			_follow_count_spinner.set_sensitive(true);
			_follow_length_spinner.set_sensitive(true);
			_use_follow_length_button.set_sensitive(true);
			_follow_probability_slider.set_sensitive(true);
			_left_probability_label.set_sensitive(true);
			_right_probability_label.set_sensitive(true);
			_beat_label.set_sensitive(true);
			_follow_count_label.set_sensitive(true);
			_follow_length_label.set_sensitive(true);
		} else {
			_follow_right.set_sensitive(false);
			_follow_count_spinner.set_sensitive(false);
			_follow_length_spinner.set_sensitive(false);
			_use_follow_length_button.set_sensitive(false);
			_follow_probability_slider.set_sensitive(false);
			_left_probability_label.set_sensitive(false);
			_right_probability_label.set_sensitive(false);
			_beat_label.set_sensitive(false);
			_follow_count_label.set_sensitive(false);
			_follow_length_label.set_sensitive(false);
		}
	}

	if (pc.contains (Properties::follow_action1)) {
		_follow_right.set_text (follow_action_to_string (trigger()->follow_action1 (), true));
	}

	if (pc.contains (Properties::velocity_effect)) {
		_velocity_adjustment.set_value (trigger()->velocity_effect());
	}

	if (pc.contains (Properties::follow_action_probability)) {
		_follow_probability_adjustment.set_value (probability);
		_left_probability_label.set_text (string_compose(_("%1%% Left"), 100-probability));
		_right_probability_label.set_text (string_compose(_("%1%% Right"), probability));
	}

	_ignore_changes = false;
}

/* ------------ */

SlotPropertyWidget::SlotPropertyWidget ()
{
	ui = new SlotPropertyTable ();
	pack_start(*ui);
	ui->show();
}

/* ------------ */

SlotPropertyWindow::SlotPropertyWindow (TriggerReference tref)
{
	TriggerPtr trigger (tref.trigger());

	set_title (string_compose (_("Trigger Slot: %1"), trigger->name()));

	SlotPropertiesBox* slot_prop_box = manage (new SlotPropertiesBox ());
	slot_prop_box->set_slot (tref);

	Gtk::Table* table = manage (new Gtk::Table);
	table->set_homogeneous (false);
	table->set_spacings (16);
	table->set_border_width (8);

	int col = 0;
	table->attach(*slot_prop_box,  col, col+1, 0, 1, Gtk::FILL|Gtk::EXPAND, Gtk::FILL|Gtk::EXPAND );  col++;

	if (trigger->region()) {
		if (trigger->region()->data_type() == DataType::AUDIO) {
			_trig_box = manage(new AudioTriggerPropertiesBox ());
			_ops_box = manage(new AudioRegionOperationsBox ());
			_trim_box = manage(new AudioClipEditorBox ());

			_trig_box->set_trigger (tref);
		} else {
			_trig_box = manage(new MidiTriggerPropertiesBox ());
			_ops_box = manage(new MidiRegionOperationsBox ());
			_trim_box = manage(new MidiClipEditorBox ());

			_trig_box->set_trigger (tref);
		}

		_trim_box->set_region(trigger->region(), tref);
		_ops_box->set_session(&trigger->region()->session());

		table->attach(*_trig_box,  col, col+1, 0, 1, Gtk::FILL|Gtk::EXPAND, Gtk::FILL|Gtk::EXPAND );  col++;
		table->attach(*_trim_box,  col, col+1, 0, 1, Gtk::FILL|Gtk::EXPAND, Gtk::FILL|Gtk::EXPAND );  col++;
		table->attach(*_ops_box,   col, col+1, 0, 1, Gtk::FILL|Gtk::EXPAND, Gtk::FILL|Gtk::EXPAND );  col++;
	}

	add (*table);
	table->show_all();
}

bool
SlotPropertyWindow::on_key_press_event (GdkEventKey* ev)
{
	Gtk::Window& main_window (ARDOUR_UI::instance()->main_window());
	return ARDOUR_UI_UTILS::relay_key_press (ev, &main_window);
}

bool
SlotPropertyWindow::on_key_release_event (GdkEventKey* ev)
{
	Gtk::Window& main_window (ARDOUR_UI::instance()->main_window());
	return ARDOUR_UI_UTILS::relay_key_press (ev, &main_window);
}
