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