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