patch from brian to get consistent menu behaviour
[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     $Id$
19 */
20
21 #include <fcntl.h>
22 #include <signal.h>
23 #include <unistd.h>
24 #include <cerrno>
25 #include <iostream>
26 #include <cmath>
27
28 #include <sigc++/bind.h>
29 #include <pbd/error.h>
30 #include <pbd/basename.h>
31 #include <pbd/fastlog.h>
32 #include <gtkmm2ext/utils.h>
33 #include <gtkmm2ext/click_box.h>
34 #include <gtkmm2ext/tearoff.h>
35
36 #include <ardour/audioengine.h>
37 #include <ardour/ardour.h>
38 #include <ardour/route.h>
39
40 #include "ardour_ui.h"
41 #include "public_editor.h"
42 #include "audio_clock.h"
43 #include "actions.h"
44 #include "utils.h"
45
46 #include "i18n.h"
47
48 using namespace std;
49 using namespace ARDOUR;
50 using namespace PBD;
51 using namespace Gtkmm2ext;
52 using namespace Gtk;
53 using namespace Glib;
54 using namespace sigc;
55
56 int     
57 ARDOUR_UI::setup_windows ()
58 {
59         if (create_editor ()) {
60                 error << _("UI: cannot setup editor") << endmsg;
61                 return -1;
62         }
63
64         if (create_mixer ()) {
65                 error << _("UI: cannot setup mixer") << endmsg;
66                 return -1;
67         }
68
69         /* all other dialogs are created conditionally */
70
71         we_have_dependents ();
72
73         setup_clock ();
74         setup_transport();
75         setup_adjustables ();
76         build_menu_bar ();
77
78         top_packer.pack_start (menu_bar_base, false, false);
79         top_packer.pack_start (transport_frame, false, false);
80
81         editor->add_toplevel_controls (top_packer);
82
83         return 0;
84 }
85
86 void
87 ARDOUR_UI::setup_adjustables ()
88 {
89         adjuster_table.set_homogeneous (true);
90
91         online_control_strings.push_back (_("MMC + Local"));
92         online_control_strings.push_back (_("MMC"));
93         online_control_strings.push_back (_("Local"));
94
95         online_control_button = new GlobalClickBox ("CONTROL",
96                                                     online_control_strings);
97
98         online_control_button->adjustment.signal_value_changed().connect(mem_fun(*this,&ARDOUR_UI::control_methods_adjusted));
99
100         mmc_id_strings.push_back ("1");
101         mmc_id_strings.push_back ("2");
102         mmc_id_strings.push_back ("3");
103         mmc_id_strings.push_back ("4");
104         mmc_id_strings.push_back ("5");
105         mmc_id_strings.push_back ("6");
106         mmc_id_strings.push_back ("7");
107         mmc_id_strings.push_back ("8");
108         mmc_id_strings.push_back ("9");
109
110         mmc_id_button = new GlobalClickBox (_("MMC ID"), mmc_id_strings);
111
112         mmc_id_button->adjustment.signal_value_changed().connect (mem_fun(*this,&ARDOUR_UI::mmc_device_id_adjusted));
113
114         adjuster_table.attach (*online_control_button, 0, 2, 1, 2, FILL|EXPAND, FILL, 5, 5);
115         adjuster_table.attach (*mmc_id_button, 2, 3, 1, 2, FILL, FILL, 5, 5);
116 }
117
118 void
119 ARDOUR_UI::transport_stopped ()
120 {
121         stop_button.set_active (true);
122         
123         roll_button.set_active (false);
124         play_selection_button.set_active (false);
125         auto_loop_button.set_active (false);
126
127         shuttle_fract = 0;
128         shuttle_box.queue_draw ();
129
130         update_disk_space ();
131 }
132
133 void
134 ARDOUR_UI::transport_rolling ()
135 {
136         stop_button.set_active (false);
137         if (session->get_play_range()) {
138                 play_selection_button.set_active (true);
139                 roll_button.set_active (false);
140                 auto_loop_button.set_active (false);
141
142         } else if (session->get_play_loop ()) {
143                 auto_loop_button.set_active (true);
144                 play_selection_button.set_active (false);
145                 roll_button.set_active (false);
146
147         } else {
148
149                 roll_button.set_active (true);
150                 play_selection_button.set_active (false);
151                 auto_loop_button.set_active (false);
152         }
153
154         /* reset shuttle controller */
155
156         shuttle_fract = SHUTTLE_FRACT_SPEED1;  /* speed = 1.0, believe it or not */
157         shuttle_box.queue_draw ();
158 }
159
160 void
161 ARDOUR_UI::transport_rewinding ()
162 {
163         stop_button.set_active(false);
164         roll_button.set_active (true);
165         play_selection_button.set_active (false);
166         auto_loop_button.set_active (false);
167 }
168
169 void
170 ARDOUR_UI::transport_forwarding ()
171 {
172         stop_button.set_active (false);
173         roll_button.set_active (true);
174         play_selection_button.set_active (false);
175         auto_loop_button.set_active (false);
176 }
177
178 void
179 ARDOUR_UI::setup_transport ()
180 {
181         transport_tearoff = manage (new TearOff (transport_tearoff_hbox));
182         transport_tearoff->set_name ("TransportBase");
183
184         transport_hbox.pack_start (*transport_tearoff, true, false);
185
186         transport_base.set_name ("TransportBase");
187         transport_base.add (transport_hbox);
188
189         transport_frame.set_shadow_type (SHADOW_OUT);
190         transport_frame.set_name ("BaseFrame");
191         transport_frame.add (transport_base);
192
193         transport_tearoff->Detach.connect (bind (mem_fun(*this, &ARDOUR_UI::detach_tearoff), static_cast<Box*>(&top_packer), 
194                                                  static_cast<Widget*>(&transport_frame)));
195         transport_tearoff->Attach.connect (bind (mem_fun(*this, &ARDOUR_UI::reattach_tearoff), static_cast<Box*> (&top_packer), 
196                                                  static_cast<Widget*> (&transport_frame), 1));
197         transport_tearoff->Hidden.connect (bind (mem_fun(*this, &ARDOUR_UI::detach_tearoff), static_cast<Box*>(&top_packer), 
198                                                  static_cast<Widget*>(&transport_frame)));
199         transport_tearoff->Visible.connect (bind (mem_fun(*this, &ARDOUR_UI::reattach_tearoff), static_cast<Box*> (&top_packer), 
200                                                   static_cast<Widget*> (&transport_frame), 1));
201         
202         shuttle_box.set_name ("TransportButton");
203         goto_start_button.set_name ("TransportButton");
204         goto_end_button.set_name ("TransportButton");
205         roll_button.set_name ("TransportButton");
206         stop_button.set_name ("TransportButton");
207         play_selection_button.set_name ("TransportButton");
208         rec_button.set_name ("TransportRecButton");
209         auto_loop_button.set_name ("TransportButton");
210         auto_return_button.set_name ("TransportButton");
211         auto_play_button.set_name ("TransportButton");
212         auto_input_button.set_name ("TransportButton");
213         punch_in_button.set_name ("TransportButton");
214         punch_out_button.set_name ("TransportButton");
215         click_button.set_name ("TransportButton");
216         time_master_button.set_name ("TransportButton");
217
218         vector<Gdk::Color> colors;
219         Gdk::Color c;
220
221         /* record button has 3 color states, so we set 2 extra here */
222         set_color(c, rgba_from_style ("TransportRecButton", 0xff, 0, 0, 0, "bg", Gtk::STATE_PRELIGHT, false ));
223         colors.push_back (c);
224         
225         set_color(c, rgba_from_style ("TransportRecButton", 0xff, 0, 0, 0, "bg", Gtk::STATE_ACTIVE, false ));
226         colors.push_back (c);
227         
228         rec_button.set_colors (colors);
229         colors.clear ();
230         
231         /* other buttons get 2 color states, so add one here */
232         set_color(c, rgba_from_style ("TransportButton", 0x7f, 0xff, 0x7f, 0, "bg", Gtk::STATE_ACTIVE, false ));
233         colors.push_back (c);
234
235         stop_button.set_colors (colors);
236         roll_button.set_colors (colors);
237         auto_loop_button.set_colors (colors);
238         play_selection_button.set_colors (colors);
239         goto_start_button.set_colors (colors);
240         goto_end_button.set_colors (colors);
241         
242         stop_button.set_size_request(29, -1);
243         roll_button.set_size_request(29, -1);
244         auto_loop_button.set_size_request(29, -1);
245         play_selection_button.set_size_request(29, -1);
246         goto_start_button.set_size_request(29, -1);
247         goto_end_button.set_size_request(29, -1);
248         rec_button.set_size_request(29, -1);
249         
250         Widget* w;
251
252         stop_button.set_active (true);
253         
254         w = manage (new Image (get_icon (X_("transport_start"))));
255         w->show();
256         goto_start_button.add (*w);
257         w = manage (new Image (get_icon (X_("transport_end"))));
258         w->show();
259         goto_end_button.add (*w);
260         w = manage (new Image (get_icon (X_("transport_play"))));
261         w->show();
262         roll_button.add (*w);
263         w = manage (new Image (get_icon (X_("transport_stop"))));
264         w->show();
265         stop_button.add (*w);
266         w = manage (new Image (get_icon (X_("transport_range"))));
267         w->show();
268         play_selection_button.add (*w);
269         w = manage (new Image (get_icon (X_("transport_record"))));
270         w->show();
271         rec_button.add (*w);
272         w = manage (new Image (get_icon (X_("transport_loop"))));
273         w->show();
274         auto_loop_button.add (*w);
275
276         RefPtr<Action> act;
277
278         act = ActionManager::get_action (X_("Transport"), X_("Stop"));
279         act->connect_proxy (stop_button);
280         act = ActionManager::get_action (X_("Transport"), X_("Roll"));
281         act->connect_proxy (roll_button);
282         act = ActionManager::get_action (X_("Transport"), X_("Record"));
283         act->connect_proxy (rec_button);
284         act = ActionManager::get_action (X_("Transport"), X_("GotoStart"));
285         act->connect_proxy (goto_start_button);
286         act = ActionManager::get_action (X_("Transport"), X_("GotoEnd"));
287         act->connect_proxy (goto_end_button);
288         act = ActionManager::get_action (X_("Transport"), X_("Loop"));
289         act->connect_proxy (auto_loop_button);
290         act = ActionManager::get_action (X_("Transport"), X_("PlaySelection"));
291         act->connect_proxy (play_selection_button);
292         act = ActionManager::get_action (X_("Transport"), X_("ToggleTimeMaster"));
293         act->connect_proxy (time_master_button);
294
295         ARDOUR_UI::instance()->tooltips().set_tip (roll_button, _("Play from playhead"));
296         ARDOUR_UI::instance()->tooltips().set_tip (stop_button, _("Stop playback"));
297         ARDOUR_UI::instance()->tooltips().set_tip (play_selection_button, _("Play range/selection"));
298         ARDOUR_UI::instance()->tooltips().set_tip (goto_start_button, _("Go to start of session"));
299         ARDOUR_UI::instance()->tooltips().set_tip (goto_end_button, _("Go to end of session"));
300         ARDOUR_UI::instance()->tooltips().set_tip (auto_loop_button, _("Play loop range"));
301         ARDOUR_UI::instance()->tooltips().set_tip (auto_return_button, _("Return to last playback start when stopped"));
302         ARDOUR_UI::instance()->tooltips().set_tip (auto_play_button, _("Start playback after any locate"));
303         ARDOUR_UI::instance()->tooltips().set_tip (auto_input_button, _("Be sensible about input monitoring"));
304         ARDOUR_UI::instance()->tooltips().set_tip (punch_in_button, _("Start recording at auto-punch start"));
305         ARDOUR_UI::instance()->tooltips().set_tip (punch_out_button, _("Stop recording at auto-punch end"));
306         ARDOUR_UI::instance()->tooltips().set_tip (click_button, _("Enable/Disable audio click"));
307         ARDOUR_UI::instance()->tooltips().set_tip (sync_option_combo, _("Positional sync source"));
308         ARDOUR_UI::instance()->tooltips().set_tip (time_master_button, _("Does Ardour control the time?"));
309         ARDOUR_UI::instance()->tooltips().set_tip (shuttle_box, _("Shuttle speed control"));
310         ARDOUR_UI::instance()->tooltips().set_tip (shuttle_units_button, _("Select semitones or %%-age for speed display"));
311         ARDOUR_UI::instance()->tooltips().set_tip (speed_display_box, _("Current transport speed"));
312         
313         shuttle_box.set_flags (CAN_FOCUS);
314         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);
315         shuttle_box.set_size_request (100, 15);
316
317         shuttle_box.signal_button_press_event().connect (mem_fun(*this, &ARDOUR_UI::shuttle_box_button_press));
318         shuttle_box.signal_button_release_event().connect (mem_fun(*this, &ARDOUR_UI::shuttle_box_button_release));
319         shuttle_box.signal_scroll_event().connect (mem_fun(*this, &ARDOUR_UI::shuttle_box_scroll));
320         shuttle_box.signal_motion_notify_event().connect (mem_fun(*this, &ARDOUR_UI::shuttle_box_motion));
321         shuttle_box.signal_expose_event().connect (mem_fun(*this, &ARDOUR_UI::shuttle_box_expose));
322
323         /* clocks, etc. */
324
325         ARDOUR_UI::Clock.connect (bind (mem_fun (primary_clock, &AudioClock::set), false));
326         ARDOUR_UI::Clock.connect (bind (mem_fun (secondary_clock, &AudioClock::set), false));
327
328         primary_clock.set_mode (AudioClock::SMPTE);
329         secondary_clock.set_mode (AudioClock::BBT);
330
331         primary_clock.ValueChanged.connect (mem_fun(*this, &ARDOUR_UI::primary_clock_value_changed));
332         secondary_clock.ValueChanged.connect (mem_fun(*this, &ARDOUR_UI::secondary_clock_value_changed));
333
334         ARDOUR_UI::instance()->tooltips().set_tip (primary_clock, _("Primary clock"));
335         ARDOUR_UI::instance()->tooltips().set_tip (secondary_clock, _("secondary clock"));
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         preroll_button.unset_flags (CAN_FOCUS);
345         preroll_button.set_events (preroll_button.get_events() & ~(Gdk::ENTER_NOTIFY_MASK|Gdk::LEAVE_NOTIFY_MASK));
346         preroll_button.set_name ("TransportButton");
347
348         postroll_button.unset_flags (CAN_FOCUS);
349         postroll_button.set_events (postroll_button.get_events() & ~(Gdk::ENTER_NOTIFY_MASK|Gdk::LEAVE_NOTIFY_MASK));
350         postroll_button.set_name ("TransportButton");
351
352         preroll_clock.set_mode (AudioClock::MinSec);
353         preroll_clock.set_name ("TransportClockDisplay");
354         postroll_clock.set_mode (AudioClock::MinSec);
355         postroll_clock.set_name ("TransportClockDisplay");
356
357         /* alerts */
358
359         /* CANNOT bind these to clicked or toggled, must use pressed or released */
360
361         solo_alert_button.set_name ("TransportSoloAlert");
362         solo_alert_button.signal_pressed().connect (mem_fun(*this,&ARDOUR_UI::solo_alert_toggle));
363         auditioning_alert_button.set_name ("TransportAuditioningAlert");
364         auditioning_alert_button.signal_pressed().connect (mem_fun(*this,&ARDOUR_UI::audition_alert_toggle));
365
366         tooltips().set_tip (solo_alert_button, _("When active, something is soloed.\nClick to de-solo everything"));
367         tooltips().set_tip (auditioning_alert_button, _("When active, auditioning is taking place\nClick to stop the audition"));
368
369         alert_box.pack_start (solo_alert_button, false, false);
370         alert_box.pack_start (auditioning_alert_button, false, false);
371
372         transport_tearoff_hbox.set_border_width (3);
373
374         transport_tearoff_hbox.pack_start (goto_start_button, false, false);
375         transport_tearoff_hbox.pack_start (goto_end_button, false, false);
376
377         Frame* sframe = manage (new Frame);
378         VBox*  svbox = manage (new VBox);
379         HBox*  shbox = manage (new HBox);
380
381         sframe->set_shadow_type (SHADOW_IN);
382         sframe->add (shuttle_box);
383
384         shuttle_box.set_name (X_("ShuttleControl"));
385
386         speed_display_box.add (speed_display_label);
387         speed_display_box.set_name (X_("ShuttleDisplay"));
388
389         shuttle_units_button.set_name (X_("ShuttleButton"));
390         shuttle_units_button.signal_clicked().connect (mem_fun(*this, &ARDOUR_UI::shuttle_unit_clicked));
391         
392         shuttle_style_button.set_name (X_("ShuttleButton"));
393
394         vector<string> shuttle_strings;
395         shuttle_strings.push_back (_("sprung"));
396         shuttle_strings.push_back (_("wheel"));
397         set_popdown_strings (shuttle_style_button, shuttle_strings);
398         shuttle_style_button.signal_changed().connect (mem_fun (*this, &ARDOUR_UI::shuttle_style_changed));
399
400         Frame* sdframe = manage (new Frame);
401
402         sdframe->set_shadow_type (SHADOW_IN);
403         sdframe->add (speed_display_box);
404
405         mtc_port_changed ();
406         sync_option_combo.signal_changed().connect (mem_fun (*this, &ARDOUR_UI::sync_option_changed));
407         const guint32 FUDGE = 25; // Combo's are stupid - they steal space from the entry for the button
408         set_size_request_to_display_given_text (sync_option_combo, X_("Igternal"), 2+FUDGE, 10);
409
410         shbox->pack_start (*sdframe, false, false);
411         shbox->pack_start (shuttle_units_button, true, true);
412         shbox->pack_start (shuttle_style_button, false, false);
413         
414         svbox->pack_start (*sframe, false, false);
415         svbox->pack_start (*shbox, false, false);
416
417         transport_tearoff_hbox.pack_start (*svbox, false, false, 3);
418
419         transport_tearoff_hbox.pack_start (auto_loop_button, false, false);
420         transport_tearoff_hbox.pack_start (play_selection_button, false, false);
421         transport_tearoff_hbox.pack_start (roll_button, false, false);
422         transport_tearoff_hbox.pack_start (stop_button, false, false);
423         transport_tearoff_hbox.pack_start (rec_button, false, false, 6);
424
425         HBox* clock_box = manage (new HBox);
426         clock_box->pack_start (primary_clock, false, false);
427         clock_box->pack_start (secondary_clock, false, false);
428         VBox* time_controls_box = manage (new VBox);
429         time_controls_box->pack_start (sync_option_combo, false, false);
430         time_controls_box->pack_start (time_master_button, false, false);
431         clock_box->pack_start (*time_controls_box, false, false, 1);
432         transport_tearoff_hbox.pack_start (*clock_box, false, false, 0);
433         
434         HBox* toggle_box = manage(new HBox);
435         
436         VBox* punch_box = manage (new VBox);
437         punch_box->pack_start (punch_in_button, false, false);
438         punch_box->pack_start (punch_out_button, false, false);
439         toggle_box->pack_start (*punch_box, false, false);
440
441         VBox* auto_box = manage (new VBox);
442         auto_box->pack_start (auto_play_button, false, false);
443         auto_box->pack_start (auto_return_button, false, false);
444         toggle_box->pack_start (*auto_box, false, false);
445         
446         VBox* io_box = manage (new VBox);
447         io_box->pack_start (auto_input_button, false, false);
448         io_box->pack_start (click_button, false, false);
449         toggle_box->pack_start (*io_box, false, false);
450         
451         /* desensitize */
452
453         set_transport_sensitivity (false);
454
455 //      toggle_box->pack_start (preroll_button, false, false);
456 //      toggle_box->pack_start (preroll_clock, false, false);
457
458 //      toggle_box->pack_start (postroll_button, false, false);
459 //      toggle_box->pack_start (postroll_clock, false, false);
460
461         transport_tearoff_hbox.pack_start (*toggle_box, false, false, 4);
462         transport_tearoff_hbox.pack_start (alert_box, false, false);
463 }
464
465 void
466 ARDOUR_UI::manage_window (Window& win)
467 {
468         win.signal_delete_event().connect (bind (sigc::ptr_fun (just_hide_it), &win));
469         win.signal_enter_notify_event().connect (bind (mem_fun (Keyboard::the_keyboard(), &Keyboard::enter_window), &win));
470         win.signal_leave_notify_event().connect (bind (mem_fun (Keyboard::the_keyboard(), &Keyboard::leave_window), &win));
471 }
472
473 void
474 ARDOUR_UI::detach_tearoff (Box* b, Widget* w)
475 {
476 //      editor->ensure_float (transport_tearoff->tearoff_window());
477         b->remove (*w);
478 }
479
480 void
481 ARDOUR_UI::reattach_tearoff (Box* b, Widget* w, int32_t n)
482 {
483         b->pack_start (*w);
484         b->reorder_child (*w, n);
485 }
486
487 void
488 ARDOUR_UI::soloing_changed (bool onoff)
489 {
490         if (solo_alert_button.get_active() != onoff) {
491                 solo_alert_button.set_active (onoff);
492         }
493 }
494
495 void
496 ARDOUR_UI::_auditioning_changed (bool onoff)
497 {
498         if (auditioning_alert_button.get_active() != onoff) {
499                 auditioning_alert_button.set_active (onoff);
500                 set_transport_sensitivity (!onoff);
501         }
502 }
503
504 void
505 ARDOUR_UI::auditioning_changed (bool onoff)
506 {
507         UI::instance()->call_slot(bind (mem_fun(*this, &ARDOUR_UI::_auditioning_changed), onoff));
508 }
509
510 void
511 ARDOUR_UI::audition_alert_toggle ()
512 {
513         if (session) {
514                 session->cancel_audition();
515         }
516 }
517
518 void
519 ARDOUR_UI::solo_alert_toggle ()
520 {
521         if (session) {
522                 session->set_all_solo (!session->soloing());
523         }
524 }
525
526 void
527 ARDOUR_UI::solo_blink (bool onoff)
528 {
529         if (session == 0) {
530                 return;
531         }
532         
533         if (session->soloing()) {
534                 if (onoff) {
535                         solo_alert_button.set_state (STATE_ACTIVE);
536                 } else {
537                         solo_alert_button.set_state (STATE_NORMAL);
538                 }
539         } else {
540                 solo_alert_button.set_active (false);
541                 solo_alert_button.set_state (STATE_NORMAL);
542         }
543 }
544
545 void
546 ARDOUR_UI::audition_blink (bool onoff)
547 {
548         if (session == 0) {
549                 return;
550         }
551         
552         if (session->is_auditioning()) {
553                 if (onoff) {
554                         auditioning_alert_button.set_state (STATE_ACTIVE);
555                 } else {
556                         auditioning_alert_button.set_state (STATE_NORMAL);
557                 }
558         } else {
559                 auditioning_alert_button.set_active (false);
560                 auditioning_alert_button.set_state (STATE_NORMAL);
561         }
562 }
563
564 void
565 ARDOUR_UI::build_shuttle_context_menu ()
566 {
567         using namespace Menu_Helpers;
568
569         shuttle_context_menu = new Menu();
570         MenuList& items = shuttle_context_menu->items();
571
572         Menu* speed_menu = manage (new Menu());
573         MenuList& speed_items = speed_menu->items();
574
575         RadioMenuItem::Group group;
576
577         speed_items.push_back (RadioMenuElem (group, "8", bind (mem_fun (*this, &ARDOUR_UI::set_shuttle_max_speed), 8.0f)));
578         if (shuttle_max_speed == 8.0) {
579                 static_cast<RadioMenuItem*>(&speed_items.back())->set_active ();        
580         }
581         speed_items.push_back (RadioMenuElem (group, "6", bind (mem_fun (*this, &ARDOUR_UI::set_shuttle_max_speed), 6.0f)));
582         if (shuttle_max_speed == 6.0) {
583                 static_cast<RadioMenuItem*>(&speed_items.back())->set_active ();        
584         }
585         speed_items.push_back (RadioMenuElem (group, "4", bind (mem_fun (*this, &ARDOUR_UI::set_shuttle_max_speed), 4.0f)));
586         if (shuttle_max_speed == 4.0) {
587                 static_cast<RadioMenuItem*>(&speed_items.back())->set_active ();        
588         }
589         speed_items.push_back (RadioMenuElem (group, "3", bind (mem_fun (*this, &ARDOUR_UI::set_shuttle_max_speed), 3.0f)));
590         if (shuttle_max_speed == 3.0) {
591                 static_cast<RadioMenuItem*>(&speed_items.back())->set_active ();        
592         }
593         speed_items.push_back (RadioMenuElem (group, "2", bind (mem_fun (*this, &ARDOUR_UI::set_shuttle_max_speed), 2.0f)));
594         if (shuttle_max_speed == 2.0) {
595                 static_cast<RadioMenuItem*>(&speed_items.back())->set_active ();        
596         }
597         speed_items.push_back (RadioMenuElem (group, "1.5", bind (mem_fun (*this, &ARDOUR_UI::set_shuttle_max_speed), 1.5f)));
598         if (shuttle_max_speed == 1.5) {
599                 static_cast<RadioMenuItem*>(&speed_items.back())->set_active ();        
600         }
601
602         items.push_back (MenuElem (_("Maximum speed"), *speed_menu));
603 }
604
605 void
606 ARDOUR_UI::show_shuttle_context_menu ()
607 {
608         if (shuttle_context_menu == 0) {
609                 build_shuttle_context_menu ();
610         }
611
612         shuttle_context_menu->popup (1, gtk_get_current_event_time());
613 }
614
615 void
616 ARDOUR_UI::set_shuttle_max_speed (float speed)
617 {
618         shuttle_max_speed = speed;
619 }
620
621 gint
622 ARDOUR_UI::shuttle_box_button_press (GdkEventButton* ev)
623 {
624         if (!session) {
625                 return true;
626         }
627
628         if (Keyboard::is_context_menu_event (ev)) {
629                 show_shuttle_context_menu ();
630                 return true;
631         }
632
633         switch (ev->button) {
634         case 1:
635                 shuttle_box.add_modal_grab ();
636                 shuttle_grabbed = true;
637                 mouse_shuttle (ev->x, true);
638                 break;
639
640         case 2:
641         case 3:
642                 return true;
643                 break;
644         }
645
646         return true;
647 }
648
649 gint
650 ARDOUR_UI::shuttle_box_button_release (GdkEventButton* ev)
651 {
652         if (!session) {
653                 return true;
654         }
655         
656         switch (ev->button) {
657         case 1:
658                 mouse_shuttle (ev->x, true);
659                 shuttle_grabbed = false;
660                 shuttle_box.remove_modal_grab ();
661                 if (Config->get_shuttle_behaviour() == Sprung) {
662                         if (Config->get_auto_play() || roll_button.get_state()) {
663                                 shuttle_fract = SHUTTLE_FRACT_SPEED1;                           
664                                 session->request_transport_speed (1.0);
665                                 stop_button.set_active (false);
666                                 roll_button.set_active (true);
667                         } else {
668                                 shuttle_fract = 0;
669                                 session->request_transport_speed (0.0);
670                         }
671                         shuttle_box.queue_draw ();
672                 }
673                 return true;
674
675         case 2:
676                 if (session->transport_rolling()) {
677                         shuttle_fract = SHUTTLE_FRACT_SPEED1;
678                         session->request_transport_speed (1.0);
679                         stop_button.set_active (false);
680                         roll_button.set_active (true);
681                 } else {
682                         shuttle_fract = 0;
683                 }
684                 shuttle_box.queue_draw ();
685                 return true;
686
687         case 3:
688                 return true;
689                 
690         case 4:
691                 shuttle_fract += 0.005;
692                 break;
693         case 5:
694                 shuttle_fract -= 0.005;
695                 break;
696         }
697
698         use_shuttle_fract (true);
699
700         return true;
701 }
702
703 gint
704 ARDOUR_UI::shuttle_box_scroll (GdkEventScroll* ev)
705 {
706         if (!session) {
707                 return true;
708         }
709         
710         switch (ev->direction) {
711                 
712         case GDK_SCROLL_UP:
713                 shuttle_fract += 0.005;
714                 break;
715         case GDK_SCROLL_DOWN:
716                 shuttle_fract -= 0.005;
717                 break;
718         default:
719                 /* scroll left/right */
720                 return false;
721         }
722
723         use_shuttle_fract (true);
724
725         return true;
726 }
727
728 gint
729 ARDOUR_UI::shuttle_box_motion (GdkEventMotion* ev)
730 {
731         if (!session || !shuttle_grabbed) {
732                 return true;
733         }
734
735         return mouse_shuttle (ev->x, false);
736 }
737
738 gint
739 ARDOUR_UI::mouse_shuttle (double x, bool force)
740 {
741         double half_width = shuttle_box.get_width() / 2.0;
742         double distance = x - half_width;
743
744         if (distance > 0) {
745                 distance = min (distance, half_width);
746         } else {
747                 distance = max (distance, -half_width);
748         }
749
750         shuttle_fract = distance / half_width;
751         use_shuttle_fract (force);
752         return true;
753 }
754
755 void
756 ARDOUR_UI::use_shuttle_fract (bool force)
757 {
758         struct timeval now;
759         struct timeval diff;
760         
761         /* do not attempt to submit a motion-driven transport speed request
762            more than once per process cycle.
763          */
764
765         gettimeofday (&now, 0);
766         timersub (&now, &last_shuttle_request, &diff);
767
768         if (!force && (diff.tv_usec + (diff.tv_sec * 1000000)) < engine->usecs_per_cycle()) {
769                 return;
770         }
771         
772         last_shuttle_request = now;
773
774         bool neg = (shuttle_fract < 0.0);
775
776         double fract = 1 - sqrt (1 - (shuttle_fract * shuttle_fract)); // Formula A1
777
778         if (neg) {
779                 fract = -fract;
780         }
781
782         session->request_transport_speed (shuttle_max_speed * fract); // Formula A2
783         shuttle_box.queue_draw ();
784 }
785
786 gint
787 ARDOUR_UI::shuttle_box_expose (GdkEventExpose* event)
788 {
789         gint x;
790         Glib::RefPtr<Gdk::Window> win (shuttle_box.get_window());
791
792         /* redraw the background */
793
794         win->draw_rectangle (shuttle_box.get_style()->get_bg_gc (shuttle_box.get_state()),
795                              true,
796                              event->area.x, event->area.y,
797                              event->area.width, event->area.height);
798
799
800         x = (gint) floor ((shuttle_box.get_width() / 2.0) + (0.5 * (shuttle_box.get_width() * shuttle_fract)));
801
802         /* draw line */
803
804         win->draw_line (shuttle_box.get_style()->get_fg_gc (shuttle_box.get_state()),
805                         x,
806                         0,
807                         x,
808                         shuttle_box.get_height());
809         return true;
810 }
811
812 void
813 ARDOUR_UI::shuttle_unit_clicked ()
814 {
815         if (shuttle_unit_menu == 0) {
816                 shuttle_unit_menu = dynamic_cast<Menu*> (ActionManager::get_widget ("/ShuttleUnitPopup"));
817         }
818         shuttle_unit_menu->popup (1, gtk_get_current_event_time());
819 }
820
821 void
822 ARDOUR_UI::shuttle_style_changed ()
823 {
824         ustring str = shuttle_style_button.get_active_text ();
825
826         if (str == _("sprung")) {
827                 Config->set_shuttle_behaviour (Sprung);
828         } else if (str == _("wheel")) {
829                 Config->set_shuttle_behaviour (Wheel);
830         }
831 }
832
833 void
834 ARDOUR_UI::update_speed_display ()
835 {
836         if (!session) {
837                 if (last_speed_displayed != 0) {
838                         speed_display_label.set_text (_("stop"));
839                         last_speed_displayed = 0;
840                 }
841                 return;
842         }
843
844         char buf[32];
845         float x = session->transport_speed ();
846
847         if (x != last_speed_displayed) {
848
849                 if (x != 0) {
850                         if (Config->get_shuttle_units() == Percentage) {
851                                 snprintf (buf, sizeof (buf), "%.2f", x);
852                         } else {
853                                 if (x < 0) {
854                                         snprintf (buf, sizeof (buf), "< %.1f", 12.0 * fast_log2 (-x));
855                                 } else {
856                                         snprintf (buf, sizeof (buf), "> %.1f", 12.0 * fast_log2 (x));
857                                 }
858                         }
859                         speed_display_label.set_text (buf);
860                 } else {
861                         speed_display_label.set_text (_("stop"));
862                 }
863
864                 last_speed_displayed = x;
865         }
866 }       
867         
868 void
869 ARDOUR_UI::set_transport_sensitivity (bool yn)
870 {
871         ActionManager::set_sensitive (ActionManager::transport_sensitive_actions, yn);
872         shuttle_box.set_sensitive (yn);
873 }
874
875 void
876 ARDOUR_UI::editor_realized ()
877 {
878         Config->map_parameters (mem_fun (*this, &ARDOUR_UI::parameter_changed));
879
880         set_size_request_to_display_given_text (speed_display_box, _("-0.55"), 2, 2);
881         const guint32 FUDGE = 25; // Combo's are stupid - they steal space from the entry for the button
882         set_size_request_to_display_given_text (shuttle_style_button, _("sprung"), 2+FUDGE, 10);
883 }
884
885 void
886 ARDOUR_UI::sync_option_changed ()
887 {
888         if (session) {
889                 session->request_slave_source (string_to_slave_source (sync_option_combo.get_active_text()));
890         }
891 }
892
893 void
894 ARDOUR_UI::maximise_editing_space ()
895 {
896         if (!editor) {
897                 return;
898         }
899
900         transport_tearoff->set_visible (false);
901         editor->maximise_editing_space ();
902 }
903
904 void
905 ARDOUR_UI::restore_editing_space ()
906 {
907         if (!editor) {
908                 return;
909         }
910
911         transport_tearoff->set_visible (true);
912         editor->restore_editing_space ();
913 }