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