/* This file is part of LED Pattern Editor.
 *
 * Copyright (C) 2010 Philipp Zabel
 *
 * LED Pattern Editor 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 3 of the License, or
 * (at your option) any later version.
 *
 * LED Pattern Editor 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 LED Pattern Editor. If not, see <http://www.gnu.org/licenses/>.
 */

class LedProgramDialog : Gtk.Dialog {
	LedPatternView lpv;
	LedPatternRX51 pattern;

	LedColorButton led_color1;
	LedColorButton led_color2;
	Gtk.Widget list1;
	Gtk.Widget list2;

	public LedProgramDialog (LedPatternRX51 _pattern) {
		pattern = _pattern;
		set_title ("LED pattern editor - " +
		           (pattern.name.has_prefix ("Pattern") ?
		            pattern.name.offset (7) : pattern.name) + " pattern");

		var content = (Gtk.VBox) get_content_area ();
		content.set_size_request (-1, 5*70);

		lpv = new LedPatternView (pattern.copy ());
		lpv.set_size_request (-1, 70);
		content.pack_start (lpv, false, false, 0);

		var hbox = new Gtk.HBox (true, 0);
		list1 = led_command_list (1);
		hbox.pack_start (list1, true, true, 0);
		list2 = led_command_list (2);
		hbox.pack_start (list2, true, true, 0);
		content.pack_start (hbox, true, true, 0);

		content.show_all ();
		list2.hide ();

		hbox = new Gtk.HBox (true, 0);
		led_color1 = new LedColorButton.with_color (lpv.pattern.color1);
		led_color1.clicked.connect (on_color1_clicked);
		hbox.pack_start (led_color1, true, true, 0);
		led_color2 = new LedColorButton.with_color (lpv.pattern.color2);
		led_color2.clicked.connect (on_color2_clicked);
		hbox.pack_start (led_color2, true, true, 0);
		add_action_widget (hbox, 2);
		action_area.set_child_secondary (hbox, true);

		hbox = new Gtk.HBox (true, 0);
		var radio = (Gtk.RadioButton) Hildon.gtk_radio_button_new (Hildon.SizeType.FINGER_HEIGHT, null);
		radio.set_mode (false);
		radio.set_label ("1");
		radio.set_active (true);
		radio.toggled.connect (on_engine1_toggled);
		hbox.pack_start (radio, true, true, 0);
		radio = (Gtk.RadioButton) Hildon.gtk_radio_button_new_from_widget (Hildon.SizeType.FINGER_HEIGHT, radio);
		radio.set_mode (false);
		radio.set_label ("2");
		radio.toggled.connect (on_engine2_toggled);
		hbox.pack_start (radio, true, true, 0);
		add_action_widget (hbox, 2);
		action_area.set_child_secondary (hbox, true);

		action_area.show_all ();

		add_button ("Test", 1);
		add_button ("Done", Gtk.ResponseType.ACCEPT);

		response.connect (on_response);
	}

	private Gtk.Widget led_command_list (int engine) {
		var pannable = new Hildon.PannableArea ();
		var vbox = new Gtk.VBox (false, 0);

		var label = new Gtk.Label ("Engine %d:".printf (engine));
		label.set_alignment (0, 0.5f);
		vbox.pack_start (label, false, false, 0);

		unowned List<LedCommandRX51> list = (engine == 1) ?
		                                    lpv.pattern.engine1 : lpv.pattern.engine2;
		foreach (LedCommandRX51 command in list) {
			if (command.type == CommandType.RESET_MUX)
				continue;
			var command_widget = new LedCommandWidget (lpv.pattern, list,
			                                           command);

			vbox.pack_start (command_widget, false, false, 0);
		}

		var button = new Gtk.Button.with_label ("New command");
		Hildon.gtk_widget_set_theme_size (button, Hildon.SizeType.FINGER_HEIGHT);
		button.clicked.connect (on_new_command_clicked);
		vbox.pack_end (button, false, false, 0);

		pannable.add_with_viewport (vbox);
		return pannable;
	}

	void on_response (int response) {
		if (response == 1) {
			Timeout.add (200, delayed_spawn);
			return;
		}
		if (response == Gtk.ResponseType.ACCEPT) {
			if (pattern.dump () != lpv.pattern.dump ()) {
				pattern.replace_with (lpv.pattern);
			}
		}
	}

	bool delayed_spawn () {
		try {
			int exit_status;
			string error;
			var command = "sudo /usr/bin/led-pattern-helper test \"" +
			              lpv.pattern.dump () + "\"";
			Process.spawn_command_line_sync (command, null, out error, out exit_status);
			if (exit_status != 0) {
				var information = "Exit status: %d\n%s".printf (exit_status, error);
				Hildon.Banner.show_information (null, null, information);
			}
		} catch (SpawnError e) {
			Hildon.Banner.show_information (null, null, e.message);
		}

		return false;
	}

	void on_color1_clicked (Gtk.Button button) {
		var dialog = new LedColorDialog ();
		int response = dialog.run ();
		if (response > 0) {
			LedColor color = (LedColor) response;
			led_color1.set_color (color);
			lpv.pattern.color1 = color;
			color = led_color2.get_color () & ~response;
			led_color2.set_color (color);
			lpv.pattern.color2 = color;
			lpv.pattern.changed ();
		}
		dialog.destroy ();
	}

	void on_color2_clicked (Gtk.Button button) {
		var dialog = new LedColorDialog ();
		int response = dialog.run ();
		if (response > 0) {
			LedColor color = (LedColor) response;
			led_color2.set_color (color);
			lpv.pattern.color2 = color;
			color = led_color1.get_color () & ~response;
			led_color1.set_color (color);
			lpv.pattern.color1 = color;
			lpv.pattern.changed ();
		}
		dialog.destroy ();
	}

	void on_engine1_toggled (Gtk.ToggleButton source) {
		if (source.get_active ())
			list1.show ();
		else
			list1.hide ();
	}

	void on_engine2_toggled (Gtk.ToggleButton source) {
		if (source.get_active ())
			list2.show ();
		else
			list2.hide ();
	}

	void on_new_command_clicked (Gtk.Button button) {
		var widget = button.parent.parent.parent;
		unowned List<LedCommandRX51> engine;
		if (widget == list1) {
			engine = lpv.pattern.engine1;
		} else if (widget == list2) {
			engine = lpv.pattern.engine2;
		} else {
			return;
		}

		var dialog = new Hildon.PickerDialog (this);
		dialog.set_title ("New command");

		var touch_selector = new Hildon.TouchSelector.text ();
		touch_selector.append_text ("Set PWM");
		touch_selector.append_text ("Ramp");
		touch_selector.append_text ("Wait");
		touch_selector.append_text ("Trigger");
		touch_selector.append_text ("Go To Start");
		touch_selector.append_text ("End");
		dialog.set_selector (touch_selector);

		int response = dialog.run ();
		if (response == Gtk.ResponseType.OK) {
			var command = new LedCommandRX51 ();
			LedCommandRX51 last_command = engine.last ().data;
			engine.append (command);
			command.changed.connect (lpv.pattern.on_changed);

			switch (touch_selector.get_active (0)) {
			case 0:
				command.set_pwm (127);
				break;
			case 1:
				if (last_command.type == CommandType.RAMP_WAIT) {
					command.ramp_wait (last_command.step_time,
					                   -last_command.steps);
				} else if (last_command.level > 0) {
					command.ramp_wait (125.0 / last_command.level,
					                   -last_command.level);
				} else {
					command.ramp_wait (0.49, 255);
				}
				break;
			case 2:
				command.ramp_wait (100.0, 0);
				break;
			case 3:
				command.type = CommandType.TRIGGER;
				command.code = 0xe000;
				command.changed ();
				break;
			case 4:
				command.go_to_start ();
				break;
			case 5:
				command.end (false);
				break;
			}
			var vbox = (Gtk.VBox) button.parent;
			var command_widget = new LedCommandWidget (lpv.pattern, engine,
			                                           command);
			vbox.pack_start (command_widget, false, false, 0);
			command_widget.show_all ();

		}
		dialog.destroy ();
	}
}