update drobilla's fascistic dir-locals.el to force emacs users into whitespace submis...
[ardour.git] / gtk2_ardour / ardour_ui2.cc
1 /*
2     Copyright (C) 1999 Paul Davis
3
4     This program is free software; you can redistribute it and/or modify
5     it under the terms of the GNU General Public License as published by
6     the Free Software Foundation; either version 2 of the License, or
7     (at your option) any later version.
8
9     This program is distributed in the hope that it will be useful,
10     but WITHOUT ANY WARRANTY; without even the implied warranty of
11     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12     GNU General Public License for more details.
13
14     You should have received a copy of the GNU General Public License
15     along with this program; if not, write to the Free Software
16     Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
17
18 */
19
20 #ifdef WAF_BUILD
21 #include "gtk2ardour-config.h"
22 #endif
23
24 #include <fcntl.h>
25 #include <signal.h>
26 #include <unistd.h>
27 #include <cerrno>
28 #include <iostream>
29 #include <cmath>
30
31 #include <sigc++/bind.h>
32 #include "pbd/error.h"
33 #include "pbd/basename.h"
34 #include "pbd/fastlog.h"
35 #include <gtkmm2ext/utils.h>
36 #include <gtkmm2ext/click_box.h>
37 #include <gtkmm2ext/tearoff.h>
38
39 #include "ardour/session.h"
40 #include "ardour/audioengine.h"
41 #include "ardour/ardour.h"
42 #include "ardour/profile.h"
43 #include "ardour/route.h"
44
45 #include "ardour_ui.h"
46 #include "keyboard.h"
47 #include "public_editor.h"
48 #include "audio_clock.h"
49 #include "actions.h"
50 #include "utils.h"
51 #include "theme_manager.h"
52 #include "midi_tracer.h"
53 #include "global_port_matrix.h"
54 #include "location_ui.h"
55 #include "rc_option_editor.h"
56
57 #include "i18n.h"
58
59 using namespace std;
60 using namespace ARDOUR;
61 using namespace PBD;
62 using namespace Gtkmm2ext;
63 using namespace Gtk;
64 using namespace Glib;
65
66 int
67 ARDOUR_UI::setup_windows ()
68 {
69         if (create_editor ()) {
70                 error << _("UI: cannot setup editor") << endmsg;
71                 return -1;
72         }
73
74         if (create_mixer ()) {
75                 error << _("UI: cannot setup mixer") << endmsg;
76                 return -1;
77         }
78
79         /* all other dialogs are created conditionally */
80
81         we_have_dependents ();
82
83         theme_manager->signal_unmap().connect (sigc::bind (sigc::ptr_fun(&ActionManager::uncheck_toggleaction), X_("<Actions>/Common/ToggleThemeManager")));
84
85 #ifdef TOP_MENUBAR
86         HBox* status_bar_packer = manage (new HBox);
87         EventBox* status_bar_event_box = manage (new EventBox);
88
89         status_bar_event_box->add (status_bar_label);
90         status_bar_event_box->add_events (Gdk::BUTTON_PRESS_MASK|Gdk::BUTTON_RELEASE_MASK);
91         status_bar_label.set_size_request (300, -1);
92         status_bar_packer->pack_start (*status_bar_event_box, true, true, 6);
93         status_bar_packer->pack_start (error_log_button, false, false);
94
95         status_bar_label.show ();
96         status_bar_event_box->show ();
97         status_bar_packer->show ();
98         error_log_button.show ();
99
100         error_log_button.signal_clicked().connect (mem_fun (*this, &UI::toggle_errors));
101         status_bar_event_box->signal_button_press_event().connect (mem_fun (*this, &ARDOUR_UI::status_bar_button_press));
102
103         editor->get_status_bar_packer().pack_start (*status_bar_packer, true, true);
104         editor->get_status_bar_packer().pack_start (menu_bar_base, false, false, 6);
105 #else
106         top_packer.pack_start (menu_bar_base, false, false);
107 #endif
108
109         top_packer.pack_start (transport_frame, false, false);
110
111         editor->add_toplevel_controls (top_packer);
112
113         setup_transport();
114         build_menu_bar ();
115
116         setup_tooltips ();
117
118         return 0;
119 }
120
121 void
122 ARDOUR_UI::setup_tooltips ()
123 {
124         set_tip (roll_button, _("Play from playhead"));
125         set_tip (stop_button, _("Stop playback"));
126         set_tip (rec_button, _("Toggle record"));
127         set_tip (play_selection_button, _("Play range/selection"));
128         set_tip (join_play_range_button, _("Always play range/selection"));
129         set_tip (goto_start_button, _("Go to start of session"));
130         set_tip (goto_end_button, _("Go to end of session"));
131         set_tip (auto_loop_button, _("Play loop range"));
132
133         set_tip (auto_return_button, _("Return to last playback start when stopped"));
134         set_tip (auto_play_button, _("Start playback after any locate"));
135         set_tip (auto_input_button, _("Be sensible about input monitoring"));
136         set_tip (punch_in_button, _("Start recording at auto-punch start"));
137         set_tip (punch_out_button, _("Stop recording at auto-punch end"));
138         set_tip (click_button, _("Enable/Disable audio click"));
139         set_tip (time_master_button, string_compose (_("Does %1 control the time?"), PROGRAM_NAME));
140         set_tip (shuttle_box, _("Shuttle speed control"));
141         set_tip (shuttle_units_button, _("Select semitones or %%-age for speed display"));
142         set_tip (speed_display_box, _("Current transport speed"));
143         set_tip (solo_alert_button, _("When active, something is soloed.\nClick to de-solo everything"));
144         set_tip (auditioning_alert_button, _("When active, auditioning is taking place\nClick to stop the audition"));
145         set_tip (primary_clock, _("Primary Clock"));
146         set_tip (secondary_clock, _("Secondary Clock"));
147
148         synchronize_sync_source_and_video_pullup ();
149
150         editor->setup_tooltips ();
151 }
152
153 bool
154 ARDOUR_UI::status_bar_button_press (GdkEventButton* ev)
155 {
156         bool handled = false;
157
158         switch (ev->button) {
159         case 1:
160                 status_bar_label.set_text ("");
161                 handled = true;
162                 break;
163         default:
164                 break;
165         }
166
167         return handled;
168 }
169
170 void
171 ARDOUR_UI::display_message (const char *prefix, gint prefix_len, RefPtr<TextBuffer::Tag> ptag, RefPtr<TextBuffer::Tag> mtag, const char *msg)
172 {
173         string text;
174
175         UI::display_message (prefix, prefix_len, ptag, mtag, msg);
176 #ifdef TOP_MENUBAR
177
178         if (strcmp (prefix, _("[ERROR]: ")) == 0) {
179                 text = "<span color=\"red\" weight=\"bold\">";
180         } else if (strcmp (prefix, _("[WARNING]: ")) == 0) {
181                 text = "<span color=\"yellow\" weight=\"bold\">";
182         } else if (strcmp (prefix, _("[INFO]: ")) == 0) {
183                 text = "<span color=\"green\" weight=\"bold\">";
184         } else {
185                 text = "<span color=\"white\" weight=\"bold\">???";
186         }
187
188         text += prefix;
189         text += "</span>";
190         text += msg;
191
192         status_bar_label.set_markup (text);
193 #endif
194 }
195
196 XMLNode*
197 ARDOUR_UI::tearoff_settings (const char* name) const
198 {
199         XMLNode* ui_node = Config->extra_xml(X_("UI"));
200         
201         if (ui_node) {
202                 XMLNode* tearoff_node = ui_node->child (X_("Tearoffs"));
203                 if (tearoff_node) {
204                         XMLNode* mnode = tearoff_node->child (name);
205                         return mnode;
206                 }
207         }
208
209         return 0;
210 }
211
212 void
213 ARDOUR_UI::setup_transport ()
214 {
215         transport_tearoff = manage (new TearOff (transport_tearoff_hbox));
216         transport_tearoff->set_name ("TransportBase");
217         transport_tearoff->tearoff_window().signal_key_press_event().connect (sigc::bind (sigc::ptr_fun (relay_key_press), &transport_tearoff->tearoff_window()), false);
218
219         if (Profile->get_sae()) {
220                 transport_tearoff->set_can_be_torn_off (false);
221         }
222
223         transport_hbox.pack_start (*transport_tearoff, true, false);
224
225         transport_base.set_name ("TransportBase");
226         transport_base.add (transport_hbox);
227
228         transport_frame.set_shadow_type (SHADOW_OUT);
229         transport_frame.set_name ("BaseFrame");
230         transport_frame.add (transport_base);
231
232         transport_tearoff->Detach.connect (sigc::bind (sigc::mem_fun(*this, &ARDOUR_UI::detach_tearoff), static_cast<Box*>(&top_packer),
233                                                  static_cast<Widget*>(&transport_frame)));
234         transport_tearoff->Attach.connect (sigc::bind (sigc::mem_fun(*this, &ARDOUR_UI::reattach_tearoff), static_cast<Box*> (&top_packer),
235                                                  static_cast<Widget*> (&transport_frame), 1));
236         transport_tearoff->Hidden.connect (sigc::bind (sigc::mem_fun(*this, &ARDOUR_UI::detach_tearoff), static_cast<Box*>(&top_packer),
237                                                  static_cast<Widget*>(&transport_frame)));
238         transport_tearoff->Visible.connect (sigc::bind (sigc::mem_fun(*this, &ARDOUR_UI::reattach_tearoff), static_cast<Box*> (&top_packer),
239                                                   static_cast<Widget*> (&transport_frame), 1));
240
241         shuttle_box.set_name ("TransportButton");
242         goto_start_button.set_name ("TransportButton");
243         goto_end_button.set_name ("TransportButton");
244         roll_button.set_name ("TransportButton");
245         stop_button.set_name ("TransportButton");
246         play_selection_button.set_name ("TransportButton");
247         rec_button.set_name ("TransportRecButton");
248         auto_loop_button.set_name ("TransportButton");
249         join_play_range_button.set_name ("TransportButton");
250
251         auto_return_button.set_name ("TransportButton");
252         auto_play_button.set_name ("TransportButton");
253         auto_input_button.set_name ("TransportButton");
254         punch_in_button.set_name ("TransportButton");
255         punch_out_button.set_name ("TransportButton");
256         click_button.set_name ("TransportButton");
257         time_master_button.set_name ("TransportButton");
258         sync_button.set_name ("TransportSyncButton");
259
260         stop_button.set_size_request(29, -1);
261         roll_button.set_size_request(29, -1);
262         auto_loop_button.set_size_request(29, -1);
263         play_selection_button.set_size_request(29, -1);
264         goto_start_button.set_size_request(29, -1);
265         goto_end_button.set_size_request(29, -1);
266         rec_button.set_size_request(29, -1);
267
268         Widget* w;
269
270         stop_button.set_visual_state (1);
271
272         w = manage (new Image (get_icon (X_("transport_start"))));
273         w->show();
274         goto_start_button.add (*w);
275         w = manage (new Image (get_icon (X_("transport_end"))));
276         w->show();
277         goto_end_button.add (*w);
278         w = manage (new Image (get_icon (X_("transport_play"))));
279         w->show();
280         roll_button.add (*w);
281         w = manage (new Image (get_icon (X_("transport_stop"))));
282         w->show();
283         stop_button.add (*w);
284         w = manage (new Image (get_icon (X_("transport_range"))));
285         w->show();
286         play_selection_button.add (*w);
287         w = manage (new Image (get_icon (X_("transport_record"))));
288         w->show();
289         rec_button.add (*w);
290         w = manage (new Image (get_icon (X_("transport_loop"))));
291         w->show();
292         auto_loop_button.add (*w);
293         w = manage (new Image (get_icon (X_("join_tools"))));
294         w->show ();
295         join_play_range_button.add (*w);
296
297         RefPtr<Action> act;
298
299         act = ActionManager::get_action (X_("Transport"), X_("Stop"));
300         act->connect_proxy (stop_button);
301         act = ActionManager::get_action (X_("Transport"), X_("Roll"));
302         act->connect_proxy (roll_button);
303         act = ActionManager::get_action (X_("Transport"), X_("Record"));
304         act->connect_proxy (rec_button);
305         act = ActionManager::get_action (X_("Transport"), X_("GotoStart"));
306         act->connect_proxy (goto_start_button);
307         act = ActionManager::get_action (X_("Transport"), X_("GotoEnd"));
308         act->connect_proxy (goto_end_button);
309         act = ActionManager::get_action (X_("Transport"), X_("Loop"));
310         act->connect_proxy (auto_loop_button);
311         act = ActionManager::get_action (X_("Transport"), X_("PlaySelection"));
312         act->connect_proxy (play_selection_button);
313         act = ActionManager::get_action (X_("Transport"), X_("ToggleTimeMaster"));
314         act->connect_proxy (time_master_button);
315         act = ActionManager::get_action (X_("Transport"), X_("ToggleExternalSync"));
316         act->connect_proxy (sync_button);
317
318         shuttle_box.set_flags (CAN_FOCUS);
319         shuttle_box.add_events (Gdk::ENTER_NOTIFY_MASK|Gdk::LEAVE_NOTIFY_MASK|Gdk::BUTTON_RELEASE_MASK|Gdk::BUTTON_PRESS_MASK|Gdk::POINTER_MOTION_MASK|Gdk::SCROLL_MASK);
320         shuttle_box.set_size_request (100, 15);
321
322         shuttle_box.signal_button_press_event().connect (sigc::mem_fun(*this, &ARDOUR_UI::shuttle_box_button_press));
323         shuttle_box.signal_button_release_event().connect (sigc::mem_fun(*this, &ARDOUR_UI::shuttle_box_button_release));
324         shuttle_box.signal_scroll_event().connect (sigc::mem_fun(*this, &ARDOUR_UI::shuttle_box_scroll));
325         shuttle_box.signal_motion_notify_event().connect (sigc::mem_fun(*this, &ARDOUR_UI::shuttle_box_motion));
326         shuttle_box.signal_expose_event().connect (sigc::mem_fun(*this, &ARDOUR_UI::shuttle_box_expose));
327
328         /* clocks, etc. */
329
330         ARDOUR_UI::Clock.connect (sigc::bind (sigc::mem_fun (primary_clock, &AudioClock::set), 'p'));
331         ARDOUR_UI::Clock.connect (sigc::bind (sigc::mem_fun (secondary_clock, &AudioClock::set), 's'));
332
333         primary_clock.ValueChanged.connect (sigc::mem_fun(*this, &ARDOUR_UI::primary_clock_value_changed));
334         secondary_clock.ValueChanged.connect (sigc::mem_fun(*this, &ARDOUR_UI::secondary_clock_value_changed));
335         big_clock.ValueChanged.connect (sigc::mem_fun(*this, &ARDOUR_UI::big_clock_value_changed));
336
337         ActionManager::get_action ("Transport", "ToggleAutoReturn")->connect_proxy (auto_return_button);
338         ActionManager::get_action ("Transport", "ToggleAutoPlay")->connect_proxy (auto_play_button);
339         ActionManager::get_action ("Transport", "ToggleAutoInput")->connect_proxy (auto_input_button);
340         ActionManager::get_action ("Transport", "ToggleClick")->connect_proxy (click_button);
341         ActionManager::get_action ("Transport", "TogglePunchIn")->connect_proxy (punch_in_button);
342         ActionManager::get_action ("Transport", "TogglePunchOut")->connect_proxy (punch_out_button);
343
344         click_button.signal_button_press_event().connect (sigc::mem_fun (*this, &ARDOUR_UI::click_button_clicked), false);
345
346         preroll_button.set_name ("TransportButton");
347         postroll_button.set_name ("TransportButton");
348
349         preroll_clock.set_mode (AudioClock::MinSec);
350         preroll_clock.set_name ("TransportClockDisplay");
351         postroll_clock.set_mode (AudioClock::MinSec);
352         postroll_clock.set_name ("TransportClockDisplay");
353
354         /* alerts */
355
356         /* CANNOT sigc::bind these to clicked or toggled, must use pressed or released */
357
358         solo_alert_button.set_name ("TransportSoloAlert");
359         solo_alert_button.signal_button_press_event().connect (sigc::mem_fun(*this,&ARDOUR_UI::solo_alert_press), false);
360         auditioning_alert_button.set_name ("TransportAuditioningAlert");
361         auditioning_alert_button.signal_button_press_event().connect (sigc::mem_fun(*this,&ARDOUR_UI::audition_alert_press), false);
362
363         alert_box.pack_start (solo_alert_button, false, false);
364         alert_box.pack_start (auditioning_alert_button, false, false);
365
366         transport_tearoff_hbox.set_border_width (3);
367
368         transport_tearoff_hbox.pack_start (goto_start_button, false, false);
369         transport_tearoff_hbox.pack_start (goto_end_button, false, false);
370
371         Frame* sframe = manage (new Frame);
372         VBox*  svbox = manage (new VBox);
373         HBox*  shbox = manage (new HBox);
374
375         sframe->set_shadow_type (SHADOW_IN);
376         sframe->add (shuttle_box);
377
378         shuttle_box.set_name (X_("ShuttleControl"));
379
380         speed_display_box.add (speed_display_label);
381         speed_display_box.set_name (X_("ShuttleDisplay"));
382         set_size_request_to_display_given_text (speed_display_label, X_("> 24.0"), 2, 2);
383
384         shuttle_units_button.set_name (X_("ShuttleButton"));
385         shuttle_units_button.signal_clicked().connect (sigc::mem_fun(*this, &ARDOUR_UI::shuttle_unit_clicked));
386
387         shuttle_style_button.set_name (X_("ShuttleStyleButton"));
388
389         vector<string> shuttle_strings;
390         shuttle_strings.push_back (_("sprung"));
391         shuttle_strings.push_back (_("wheel"));
392         set_popdown_strings (shuttle_style_button, shuttle_strings, true);
393         shuttle_style_button.signal_changed().connect (sigc::mem_fun (*this, &ARDOUR_UI::shuttle_style_changed));
394
395         Frame* sdframe = manage (new Frame);
396
397         sdframe->set_shadow_type (SHADOW_IN);
398         sdframe->add (speed_display_box);
399
400         /* translators: Egternal is "External" with a descender character */
401         set_size_request_to_display_given_text (sync_button, X_("Egternal"), 4, 10);
402
403         shbox->pack_start (*sdframe, false, false);
404         shbox->pack_start (shuttle_units_button, true, true);
405         shbox->pack_start (shuttle_style_button, false, false);
406
407         svbox->pack_start (*sframe, false, false);
408         svbox->pack_start (*shbox, false, false);
409
410         transport_tearoff_hbox.pack_start (*svbox, false, false, 3);
411
412         if (Profile->get_sae()) {
413                 transport_tearoff_hbox.pack_start (auto_loop_button);
414                 transport_tearoff_hbox.pack_start (roll_button);
415         } else {
416                 transport_tearoff_hbox.pack_start (auto_loop_button, false, false);
417                 play_range_hbox.pack_start (play_selection_button, false, false);
418                 play_range_hbox.pack_start (roll_button, false, false);
419                 play_range_vbox.pack_start (play_range_hbox, false, false);
420                 play_range_vbox.pack_start (join_play_range_button, false, false);
421                 transport_tearoff_hbox.pack_start (play_range_vbox, false, false);
422         }
423         transport_tearoff_hbox.pack_start (stop_button, false, false);
424         transport_tearoff_hbox.pack_start (rec_button, false, false, 6);
425
426         HBox* clock_box = manage (new HBox);
427         clock_box->pack_start (primary_clock, false, false);
428         if (!ARDOUR::Profile->get_small_screen()) {
429                 clock_box->pack_start (secondary_clock, false, false);
430         }
431
432         if (!Profile->get_sae()) {
433                 VBox* time_controls_box = manage (new VBox);
434                 time_controls_box->pack_start (sync_button, false, false);
435                 time_controls_box->pack_start (time_master_button, false, false);
436                 clock_box->pack_start (*time_controls_box, false, false, 1);
437         }
438
439         transport_tearoff_hbox.pack_start (*clock_box, false, false, 0);
440
441         HBox* toggle_box = manage(new HBox);
442
443         VBox* punch_box = manage (new VBox);
444         punch_box->pack_start (punch_in_button, false, false);
445         punch_box->pack_start (punch_out_button, false, false);
446         toggle_box->pack_start (*punch_box, false, false);
447
448         VBox* auto_box = manage (new VBox);
449         auto_box->pack_start (auto_play_button, false, false);
450         auto_box->pack_start (auto_return_button, false, false);
451         if (!Profile->get_small_screen()) {
452                 toggle_box->pack_start (*auto_box, false, false);
453         }
454
455         VBox* io_box = manage (new VBox);
456         io_box->pack_start (auto_input_button, false, false);
457         io_box->pack_start (click_button, false, false);
458         if (!Profile->get_small_screen()) {
459                 toggle_box->pack_start (*io_box, false, false);
460         }
461
462         /* desensitize */
463
464         set_transport_sensitivity (false);
465
466 //      toggle_box->pack_start (preroll_button, false, false);
467 //      toggle_box->pack_start (preroll_clock, false, false);
468
469 //      toggle_box->pack_start (postroll_button, false, false);
470 //      toggle_box->pack_start (postroll_clock, false, false);
471
472         transport_tearoff_hbox.pack_start (*toggle_box, false, false, 4);
473         if (Profile->get_small_screen()) {
474                 transport_tearoff_hbox.pack_start (_editor_transport_box, false, false, 4);
475         }
476         transport_tearoff_hbox.pack_start (alert_box, false, false);
477
478         if (Profile->get_sae()) {
479                 Image* img = manage (new Image ((::get_icon (X_("sae")))));
480                 transport_tearoff_hbox.pack_end (*img, false, false, 6);
481         }
482
483         XMLNode* tnode = tearoff_settings ("transport");
484         if (tnode) {
485                 transport_tearoff->set_state (*tnode);
486         }
487 }
488
489 void
490 ARDOUR_UI::manage_window (Window& win)
491 {
492         win.signal_delete_event().connect (sigc::bind (sigc::ptr_fun (just_hide_it), &win));
493         win.signal_enter_notify_event().connect (sigc::bind (sigc::mem_fun (Keyboard::the_keyboard(), &Keyboard::enter_window), &win));
494         win.signal_leave_notify_event().connect (sigc::bind (sigc::mem_fun (Keyboard::the_keyboard(), &Keyboard::leave_window), &win));
495 }
496
497 void
498 ARDOUR_UI::detach_tearoff (Box* b, Widget* w)
499 {
500 //      editor->ensure_float (transport_tearoff->tearoff_window());
501         b->remove (*w);
502 }
503
504 void
505 ARDOUR_UI::reattach_tearoff (Box* b, Widget* w, int32_t n)
506 {
507         b->pack_start (*w);
508         b->reorder_child (*w, n);
509 }
510
511 void
512 ARDOUR_UI::soloing_changed (bool onoff)
513 {
514         if (solo_alert_button.get_active() != onoff) {
515                 solo_alert_button.set_active (onoff);
516         }
517 }
518
519 void
520 ARDOUR_UI::_auditioning_changed (bool onoff)
521 {
522         if (auditioning_alert_button.get_active() != onoff) {
523                 auditioning_alert_button.set_active (onoff);
524                 set_transport_sensitivity (!onoff);
525         }
526 }
527
528 void
529 ARDOUR_UI::auditioning_changed (bool onoff)
530 {
531         UI::instance()->call_slot (MISSING_INVALIDATOR, boost::bind (&ARDOUR_UI::_auditioning_changed, this, onoff));
532 }
533
534 bool
535 ARDOUR_UI::audition_alert_press (GdkEventButton*)
536 {
537         if (_session) {
538                 _session->cancel_audition();
539         }
540         return true;
541 }
542
543 bool
544 ARDOUR_UI::solo_alert_press (GdkEventButton*)
545 {
546         if (_session) {
547                 if (_session->soloing()) {
548                         _session->set_solo (_session->get_routes(), false);
549                 } else if (_session->listening()) {
550                         _session->set_listen (_session->get_routes(), false);
551                 }
552         }
553         return true;
554 }
555
556 void
557 ARDOUR_UI::solo_blink (bool onoff)
558 {
559         if (_session == 0) {
560                 return;
561         }
562
563         if (_session->soloing() || _session->listening()) {
564                 if (onoff) {
565                         solo_alert_button.set_state (STATE_ACTIVE);
566                 } else {
567                         solo_alert_button.set_state (STATE_NORMAL);
568                 }
569         } else {
570                 solo_alert_button.set_active (false);
571                 solo_alert_button.set_state (STATE_NORMAL);
572         }
573 }
574
575 void
576 ARDOUR_UI::sync_blink (bool onoff)
577 {
578         if (_session == 0 || !_session->config.get_external_sync()) {
579                 /* internal sync */
580                 sync_button.set_visual_state (0);
581                 return;
582         }
583
584         if (!_session->transport_locked()) {
585                 /* not locked, so blink on and off according to the onoff argument */
586
587                 if (onoff) {
588                         sync_button.set_visual_state (1); // "-active"
589                 } else {
590                         sync_button.set_visual_state (0); // normal
591                 }
592         } else {
593                 /* locked */
594                 sync_button.set_visual_state (1); // "-active"
595         }
596 }
597
598 void
599 ARDOUR_UI::audition_blink (bool onoff)
600 {
601         if (_session == 0) {
602                 return;
603         }
604
605         if (_session->is_auditioning()) {
606                 if (onoff) {
607                         auditioning_alert_button.set_state (STATE_ACTIVE);
608                 } else {
609                         auditioning_alert_button.set_state (STATE_NORMAL);
610                 }
611         } else {
612                 auditioning_alert_button.set_active (false);
613                 auditioning_alert_button.set_state (STATE_NORMAL);
614         }
615 }
616
617 void
618 ARDOUR_UI::build_shuttle_context_menu ()
619 {
620         using namespace Menu_Helpers;
621
622         shuttle_context_menu = new Menu();
623         MenuList& items = shuttle_context_menu->items();
624
625         Menu* speed_menu = manage (new Menu());
626         MenuList& speed_items = speed_menu->items();
627
628         RadioMenuItem::Group group;
629
630         speed_items.push_back (RadioMenuElem (group, "8", sigc::bind (sigc::mem_fun (*this, &ARDOUR_UI::set_shuttle_max_speed), 8.0f)));
631         if (shuttle_max_speed == 8.0) {
632                 static_cast<RadioMenuItem*>(&speed_items.back())->set_active ();
633         }
634         speed_items.push_back (RadioMenuElem (group, "6", sigc::bind (sigc::mem_fun (*this, &ARDOUR_UI::set_shuttle_max_speed), 6.0f)));
635         if (shuttle_max_speed == 6.0) {
636                 static_cast<RadioMenuItem*>(&speed_items.back())->set_active ();
637         }
638         speed_items.push_back (RadioMenuElem (group, "4", sigc::bind (sigc::mem_fun (*this, &ARDOUR_UI::set_shuttle_max_speed), 4.0f)));
639         if (shuttle_max_speed == 4.0) {
640                 static_cast<RadioMenuItem*>(&speed_items.back())->set_active ();
641         }
642         speed_items.push_back (RadioMenuElem (group, "3", sigc::bind (sigc::mem_fun (*this, &ARDOUR_UI::set_shuttle_max_speed), 3.0f)));
643         if (shuttle_max_speed == 3.0) {
644                 static_cast<RadioMenuItem*>(&speed_items.back())->set_active ();
645         }
646         speed_items.push_back (RadioMenuElem (group, "2", sigc::bind (sigc::mem_fun (*this, &ARDOUR_UI::set_shuttle_max_speed), 2.0f)));
647         if (shuttle_max_speed == 2.0) {
648                 static_cast<RadioMenuItem*>(&speed_items.back())->set_active ();
649         }
650         speed_items.push_back (RadioMenuElem (group, "1.5", sigc::bind (sigc::mem_fun (*this, &ARDOUR_UI::set_shuttle_max_speed), 1.5f)));
651         if (shuttle_max_speed == 1.5) {
652                 static_cast<RadioMenuItem*>(&speed_items.back())->set_active ();
653         }
654
655         items.push_back (MenuElem (_("Maximum speed"), *speed_menu));
656 }
657
658 void
659 ARDOUR_UI::show_shuttle_context_menu ()
660 {
661         if (shuttle_context_menu == 0) {
662                 build_shuttle_context_menu ();
663         }
664
665         shuttle_context_menu->popup (1, gtk_get_current_event_time());
666 }
667
668 void
669 ARDOUR_UI::set_shuttle_max_speed (float speed)
670 {
671         shuttle_max_speed = speed;
672 }
673
674 gint
675 ARDOUR_UI::shuttle_box_button_press (GdkEventButton* ev)
676 {
677         if (!_session) {
678                 return true;
679         }
680
681         if (shuttle_controller_binding_proxy.button_press_handler (ev)) {
682                 return true;
683         }
684
685         if (Keyboard::is_context_menu_event (ev)) {
686                 show_shuttle_context_menu ();
687                 return true;
688         }
689
690         switch (ev->button) {
691         case 1:
692                 shuttle_box.add_modal_grab ();
693                 shuttle_grabbed = true;
694                 mouse_shuttle (ev->x, true);
695                 break;
696
697         case 2:
698         case 3:
699                 return true;
700                 break;
701         }
702
703         return true;
704 }
705
706 gint
707 ARDOUR_UI::shuttle_box_button_release (GdkEventButton* ev)
708 {
709         if (!_session) {
710                 return true;
711         }
712
713         switch (ev->button) {
714         case 1:
715                 mouse_shuttle (ev->x, true);
716                 shuttle_grabbed = false;
717                 shuttle_box.remove_modal_grab ();
718                 if (Config->get_shuttle_behaviour() == Sprung) {
719                         if (_session->config.get_auto_play() || roll_button.get_visual_state()) {
720                                 shuttle_fract = SHUTTLE_FRACT_SPEED1;
721                                 _session->request_transport_speed (1.0);
722                                 stop_button.set_visual_state (0);
723                                 roll_button.set_visual_state (1);
724                         } else {
725                                 shuttle_fract = 0;
726                                 _session->request_transport_speed (0.0);
727                         }
728                         shuttle_box.queue_draw ();
729                 }
730                 return true;
731
732         case 2:
733                 if (_session->transport_rolling()) {
734                         shuttle_fract = SHUTTLE_FRACT_SPEED1;
735                         _session->request_transport_speed (1.0);
736                         stop_button.set_visual_state (0);
737                         roll_button.set_visual_state (1);
738                 } else {
739                         shuttle_fract = 0;
740                 }
741                 shuttle_box.queue_draw ();
742                 return true;
743
744         case 3:
745         default:
746                 return true;
747
748         }
749
750         use_shuttle_fract (true);
751
752         return true;
753 }
754
755 gint
756 ARDOUR_UI::shuttle_box_scroll (GdkEventScroll* ev)
757 {
758         if (!_session) {
759                 return true;
760         }
761
762         switch (ev->direction) {
763
764         case GDK_SCROLL_UP:
765                 shuttle_fract += 0.005;
766                 break;
767         case GDK_SCROLL_DOWN:
768                 shuttle_fract -= 0.005;
769                 break;
770         default:
771                 /* scroll left/right */
772                 return false;
773         }
774
775         use_shuttle_fract (true);
776
777         return true;
778 }
779
780 gint
781 ARDOUR_UI::shuttle_box_motion (GdkEventMotion* ev)
782 {
783         if (!_session || !shuttle_grabbed) {
784                 return true;
785         }
786
787         return mouse_shuttle (ev->x, false);
788 }
789
790 gint
791 ARDOUR_UI::mouse_shuttle (double x, bool force)
792 {
793         double const half_width = shuttle_box.get_width() / 2.0;
794         double distance = x - half_width;
795
796         if (distance > 0) {
797                 distance = min (distance, half_width);
798         } else {
799                 distance = max (distance, -half_width);
800         }
801
802         shuttle_fract = distance / half_width;
803         use_shuttle_fract (force);
804         return true;
805 }
806
807 void
808 ARDOUR_UI::set_shuttle_fract (double f)
809 {
810         shuttle_fract = f;
811         use_shuttle_fract (false);
812 }
813
814 void
815 ARDOUR_UI::use_shuttle_fract (bool force)
816 {
817         microseconds_t now = get_microseconds();
818
819         /* do not attempt to submit a motion-driven transport speed request
820            more than once per process cycle.
821          */
822
823         if (!force && (last_shuttle_request - now) < (microseconds_t) engine->usecs_per_cycle()) {
824                 return;
825         }
826
827         last_shuttle_request = now;
828
829         double speed = 0;
830
831         if (Config->get_shuttle_units() == Semitones) {
832
833                 double const step = 1.0 / 24.0; // range is 24 semitones up & down
834                 double const semitones = round (shuttle_fract / step);
835                 speed = pow (2.0, (semitones / 12.0));
836
837         } else {
838
839                 bool const neg = (shuttle_fract < 0.0);
840                 double fract = 1 - sqrt (1 - (shuttle_fract * shuttle_fract)); // Formula A1
841
842                 if (neg) {
843                         fract = -fract;
844                 }
845
846                 speed = shuttle_max_speed * fract;
847         }
848         
849         _session->request_transport_speed_nonzero (speed);
850         
851         shuttle_box.queue_draw ();
852 }
853
854 gint
855 ARDOUR_UI::shuttle_box_expose (GdkEventExpose* event)
856 {
857         gint x;
858         Glib::RefPtr<Gdk::Window> win (shuttle_box.get_window());
859
860         /* redraw the background */
861
862         win->draw_rectangle (shuttle_box.get_style()->get_bg_gc (shuttle_box.get_state()),
863                              true,
864                              event->area.x, event->area.y,
865                              event->area.width, event->area.height);
866
867
868         x = (gint) floor ((shuttle_box.get_width() / 2.0) + (0.5 * (shuttle_box.get_width() * shuttle_fract)));
869
870         /* draw line */
871
872         win->draw_line (shuttle_box.get_style()->get_fg_gc (shuttle_box.get_state()),
873                         x,
874                         0,
875                         x,
876                         shuttle_box.get_height());
877         return true;
878 }
879
880 void
881 ARDOUR_UI::shuttle_unit_clicked ()
882 {
883         if (shuttle_unit_menu == 0) {
884                 shuttle_unit_menu = dynamic_cast<Menu*> (ActionManager::get_widget ("/ShuttleUnitPopup"));
885         }
886         shuttle_unit_menu->popup (1, gtk_get_current_event_time());
887 }
888
889 void
890 ARDOUR_UI::shuttle_style_changed ()
891 {
892         string str = shuttle_style_button.get_active_text ();
893
894         if (str == _("sprung")) {
895                 Config->set_shuttle_behaviour (Sprung);
896         } else if (str == _("wheel")) {
897                 Config->set_shuttle_behaviour (Wheel);
898         }
899 }
900
901 void
902 ARDOUR_UI::update_speed_display ()
903 {
904         if (!_session) {
905                 if (last_speed_displayed != 0) {
906                         speed_display_label.set_text (_("stop"));
907                         last_speed_displayed = 0;
908                 }
909                 return;
910         }
911
912         char buf[32];
913         float x = _session->transport_speed ();
914
915         if (x != last_speed_displayed) {
916
917                 if (x != 0) {
918                         if (Config->get_shuttle_units() == Percentage) {
919                                 snprintf (buf, sizeof (buf), "%d", (int) round (x * 100));
920                         } else {
921
922                                 if (x < 0) {
923                                         snprintf (buf, sizeof (buf), "< %d", (int) round (12.0 * fast_log2 (-x)));
924                                 } else {
925                                         snprintf (buf, sizeof (buf), "> %d", (int) round (12.0 * fast_log2 (x)));
926                                 }
927                         }
928                         speed_display_label.set_text (buf);
929                 } else {
930                         speed_display_label.set_text (_("stop"));
931                 }
932
933                 last_speed_displayed = x;
934         }
935 }
936
937 void
938 ARDOUR_UI::set_transport_sensitivity (bool yn)
939 {
940         ActionManager::set_sensitive (ActionManager::transport_sensitive_actions, yn);
941         shuttle_box.set_sensitive (yn);
942 }
943
944 void
945 ARDOUR_UI::editor_realized ()
946 {
947         boost::function<void (string)> pc (boost::bind (&ARDOUR_UI::parameter_changed, this, _1));
948         Config->map_parameters (pc);
949
950         set_size_request_to_display_given_text (speed_display_box, _("-0.55"), 2, 2);
951         reset_dpi ();
952 }
953
954 void
955 ARDOUR_UI::maximise_editing_space ()
956 {
957         if (!editor) {
958                 return;
959         }
960
961         transport_tearoff->set_visible (false);
962         editor->maximise_editing_space ();
963         if (Config->get_keep_tearoffs()) {
964                 transport_tearoff->set_visible (true);
965         }
966 }
967
968 void
969 ARDOUR_UI::restore_editing_space ()
970 {
971         if (!editor) {
972                 return;
973         }
974
975         transport_tearoff->set_visible (true);
976         editor->restore_editing_space ();
977 }
978
979 bool
980 ARDOUR_UI::click_button_clicked (GdkEventButton* ev)
981 {
982         if (ev->button != 3) {
983                 /* this handler is just for button-3 clicks */
984                 return false;
985         }
986
987         RefPtr<Action> act = ActionManager::get_action (X_("Common"), X_("ToggleRCOptionsEditor"));
988         assert (act);
989
990         RefPtr<ToggleAction> tact = RefPtr<ToggleAction>::cast_dynamic (act);
991         tact->set_active ();
992
993         rc_option_editor->set_current_page (_("Misc"));
994         return true;
995 }