2 Copyright (C) 2004 Paul Davis
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.
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.
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.
21 #include "ardour/io.h"
22 #include "ardour/dB.h"
23 #include <gtkmm2ext/utils.h>
24 #include <gtkmm2ext/barcontroller.h>
25 #include "midi++/manager.h"
26 #include "pbd/fastlog.h"
28 #include "ardour_ui.h"
29 #include "panner_ui.h"
33 #include "gui_thread.h"
35 #include "ardour/delivery.h"
36 #include "ardour/session.h"
37 #include "ardour/panner.h"
38 #include "ardour/route.h"
43 using namespace ARDOUR
;
45 using namespace Gtkmm2ext
;
48 const int PannerUI::pan_bar_height
= 30;
50 PannerUI::PannerUI (Session
* s
)
53 , hAdjustment(0.0, 0.0, 0.0)
54 , vAdjustment(0.0, 0.0, 0.0)
55 , panning_viewport(hAdjustment
, vAdjustment
)
56 , panning_up_arrow (Gtk::ARROW_UP
, Gtk::SHADOW_OUT
)
57 , panning_down_arrow (Gtk::ARROW_DOWN
, Gtk::SHADOW_OUT
)
58 , panning_link_button (_("link"))
59 , pan_automation_style_button ("")
60 , pan_automation_state_button ("")
64 ignore_toggle
= false;
68 in_pan_update
= false;
70 pan_automation_style_button
.set_name ("MixerAutomationModeButton");
71 pan_automation_state_button
.set_name ("MixerAutomationPlaybackButton");
73 ARDOUR_UI::instance()->set_tip (pan_automation_state_button
, _("Pan automation mode"));
74 ARDOUR_UI::instance()->set_tip (pan_automation_style_button
, _("Pan automation type"));
76 //set_size_request_to_display_given_text (pan_automation_state_button, X_("O"), 2, 2);
77 //set_size_request_to_display_given_text (pan_automation_style_button, X_("0"), 2, 2);
79 panning_viewport
.set_name (X_("BaseFrame"));
81 ARDOUR_UI::instance()->set_tip (panning_link_button
,
82 _("panning link control"));
83 ARDOUR_UI::instance()->set_tip (panning_link_direction_button
,
84 _("panning link direction"));
86 pan_automation_style_button
.unset_flags (Gtk::CAN_FOCUS
);
87 pan_automation_state_button
.unset_flags (Gtk::CAN_FOCUS
);
89 pan_automation_style_button
.signal_button_press_event().connect (sigc::mem_fun(*this, &PannerUI::pan_automation_style_button_event
), false);
90 pan_automation_state_button
.signal_button_press_event().connect (sigc::mem_fun(*this, &PannerUI::pan_automation_state_button_event
), false);
92 panning_link_button
.set_name (X_("PanningLinkButton"));
93 panning_link_direction_button
.set_name (X_("PanningLinkDirectionButton"));
95 panning_link_box
.pack_start (panning_link_button
, true, true);
96 panning_link_box
.pack_start (panning_link_direction_button
, true, true);
97 panning_link_box
.pack_start (pan_automation_state_button
, true, true);
99 /* the pixmap will be reset at some point, but the key thing is that
100 we need a pixmap in the button just to get started.
102 panning_link_direction_button
.add (*(manage (new Image (get_xpm("forwardblarrow.xpm")))));
104 panning_link_direction_button
.signal_clicked().connect
105 (sigc::mem_fun(*this, &PannerUI::panning_link_direction_clicked
));
107 panning_link_button
.signal_button_press_event().connect
108 (sigc::mem_fun(*this, &PannerUI::panning_link_button_press
), false);
109 panning_link_button
.signal_button_release_event().connect
110 (sigc::mem_fun(*this, &PannerUI::panning_link_button_release
), false);
112 panning_up
.set_border_width (3);
113 panning_down
.set_border_width (3);
114 panning_up
.add (panning_up_arrow
);
115 panning_down
.add (panning_down_arrow
);
116 panning_up
.set_name (X_("PanScrollerBase"));
117 panning_down
.set_name (X_("PanScrollerBase"));
118 panning_up_arrow
.set_name (X_("PanScrollerArrow"));
119 panning_down_arrow
.set_name (X_("PanScrollerArrow"));
121 pan_vbox
.set_spacing (2);
122 pan_vbox
.pack_start (panning_viewport
, Gtk::PACK_SHRINK
);
123 pan_vbox
.pack_start (panning_link_box
, Gtk::PACK_SHRINK
);
125 pack_start (pan_vbox
, true, true);
134 PannerUI::set_panner (boost::shared_ptr
<Panner
> p
)
136 connections
.drop_connections ();
138 delete pan_astyle_menu
;
141 delete pan_astate_menu
;
153 _panner
->Changed
.connect (connections
, invalidator (*this), boost::bind (&PannerUI::panner_changed
, this), gui_context());
154 _panner
->LinkStateChanged
.connect (connections
, invalidator (*this), boost::bind (&PannerUI::update_pan_linkage
, this), gui_context());
155 _panner
->StateChanged
.connect (connections
, invalidator (*this), boost::bind (&PannerUI::update_pan_state
, this), gui_context());
160 update_pan_sensitive ();
161 update_pan_linkage ();
162 pan_automation_state_changed ();
166 PannerUI::build_astate_menu ()
168 using namespace Menu_Helpers
;
170 if (pan_astate_menu
== 0) {
171 pan_astate_menu
= new Menu
;
172 pan_astate_menu
->set_name ("ArdourContextMenu");
174 pan_astate_menu
->items().clear ();
177 pan_astate_menu
->items().push_back (MenuElem (_("Manual"), sigc::bind (
178 sigc::mem_fun (_panner
.get(), &Panner::set_automation_state
),
180 pan_astate_menu
->items().push_back (MenuElem (_("Play"), sigc::bind (
181 sigc::mem_fun (_panner
.get(), &Panner::set_automation_state
),
183 pan_astate_menu
->items().push_back (MenuElem (_("Write"), sigc::bind (
184 sigc::mem_fun (_panner
.get(), &Panner::set_automation_state
),
185 (AutoState
) Write
)));
186 pan_astate_menu
->items().push_back (MenuElem (_("Touch"), sigc::bind (
187 sigc::mem_fun (_panner
.get(), &Panner::set_automation_state
),
188 (AutoState
) Touch
)));
193 PannerUI::build_astyle_menu ()
195 using namespace Menu_Helpers
;
197 if (pan_astyle_menu
== 0) {
198 pan_astyle_menu
= new Menu
;
199 pan_astyle_menu
->set_name ("ArdourContextMenu");
201 pan_astyle_menu
->items().clear();
204 pan_astyle_menu
->items().push_back (MenuElem (_("Trim")));
205 pan_astyle_menu
->items().push_back (MenuElem (_("Abs")));
208 boost::shared_ptr
<PBD::Controllable
>
209 PannerUI::get_controllable()
211 return pan_bars
[0]->get_controllable();
215 PannerUI::panning_link_button_press (GdkEventButton
*)
221 PannerUI::panning_link_button_release (GdkEventButton
*)
223 if (!ignore_toggle
) {
224 _panner
->set_linked (!_panner
->linked());
230 PannerUI::panning_link_direction_clicked()
232 switch (_panner
->link_direction()) {
233 case Panner::SameDirection
:
234 _panner
->set_link_direction (Panner::OppositeDirection
);
237 _panner
->set_link_direction (Panner::SameDirection
);
243 PannerUI::update_pan_linkage ()
245 ENSURE_GUI_THREAD (*this, &PannerUI::update_pan_linkage
)
247 bool const x
= _panner
->linked();
248 bool const bx
= panning_link_button
.get_active();
252 ignore_toggle
= true;
253 panning_link_button
.set_active (x
);
254 ignore_toggle
= false;
257 panning_link_direction_button
.set_sensitive (x
);
259 switch (_panner
->link_direction()) {
260 case Panner::SameDirection
:
261 panning_link_direction_button
.set_image (*(manage (new Image (get_xpm ("forwardblarrow.xpm")))));
264 panning_link_direction_button
.set_image (*(manage (new Image (get_xpm("revdblarrow.xpm")))));
270 PannerUI::set_width (Width w
)
274 panning_link_button
.set_label (_("link"));
277 panning_link_button
.set_label (_("L"));
285 PannerUI::~PannerUI ()
287 for (vector
<Adjustment
*>::iterator i
= pan_adjustments
.begin(); i
!= pan_adjustments
.end(); ++i
) {
291 for (vector
<PannerBar
*>::iterator i
= pan_bars
.begin(); i
!= pan_bars
.end(); ++i
) {
298 delete pan_astyle_menu
;
299 delete pan_astate_menu
;
304 PannerUI::panner_changed ()
306 ENSURE_GUI_THREAD (*this, &PannerUI::panner_changed
)
312 PannerUI::update_pan_state ()
314 /* currently nothing to do */
315 // ENSURE_GUI_THREAD (*this, &PannerUI::update_panner_state)
319 PannerUI::setup_pan ()
325 uint32_t const nouts
= _panner
->nouts();
326 uint32_t const npans
= _panner
->npanners();
328 if (int32_t (nouts
) == _current_nouts
&& int32_t (npans
) == _current_npans
) {
332 _pan_control_connections
.drop_connections ();
333 for (uint32_t i
= 0; i
< _panner
->npanners(); ++i
) {
334 connect_to_pan_control (i
);
337 _current_nouts
= nouts
;
338 _current_npans
= npans
;
340 if (nouts
== 0 || nouts
== 1) {
342 while (!pan_adjustments
.empty()) {
343 delete pan_bars
.back();
344 pan_bars
.pop_back ();
345 delete pan_adjustments
.back();
346 pan_adjustments
.pop_back ();
352 /* stick something into the panning viewport so that it redraws */
354 EventBox
* eb
= manage (new EventBox());
355 panning_viewport
.remove ();
356 panning_viewport
.add (*eb
);
357 panning_viewport
.show_all ();
359 } else if (nouts
== 2) {
361 vector
<Adjustment
*>::size_type asz
;
363 while (!pan_adjustments
.empty()) {
364 delete pan_bars
.back();
365 pan_bars
.pop_back ();
366 delete pan_adjustments
.back();
367 pan_adjustments
.pop_back ();
373 while ((asz
= pan_adjustments
.size()) < npans
) {
378 /* initialize adjustment with 0.0 (L) or 1.0 (R) for the first and second panners,
379 which serves as a default, otherwise use current value */
381 rx
= _panner
->pan_control( asz
)->get_value();
385 } else if (asz
== 0) {
387 } else if (asz
== 1) {
393 pan_adjustments
.push_back (new Adjustment (x
, 0, 1.0, 0.005, 0.05));
394 bc
= new PannerBar (*pan_adjustments
[asz
],
395 boost::static_pointer_cast
<PBD::Controllable
>( _panner
->pan_control( asz
)) );
397 /* now set adjustment with current value of panner, then connect the signals */
398 pan_adjustments
.back()->set_value(rx
);
399 pan_adjustments
.back()->signal_value_changed().connect (sigc::bind (sigc::mem_fun(*this, &PannerUI::pan_adjustment_changed
), (uint32_t) asz
));
400 connect_to_pan_control (asz
);
402 bc
->set_name ("PanSlider");
403 bc
->set_shadow_type (Gtk::SHADOW_NONE
);
405 boost::shared_ptr
<AutomationControl
> ac
= _panner
->pan_control (asz
);
408 bc
->StartGesture
.connect (sigc::mem_fun (*ac
, &AutomationControl::start_touch
));
409 bc
->StopGesture
.connect (sigc::mem_fun (*ac
, &AutomationControl::stop_touch
));
413 snprintf (buf
, sizeof (buf
), _("panner for channel %zu"), asz
+ 1);
414 ARDOUR_UI::instance()->set_tip (bc
->event_widget(), buf
);
416 bc
->event_widget().signal_button_release_event().connect
417 (sigc::bind (sigc::mem_fun(*this, &PannerUI::pan_button_event
), (uint32_t) asz
));
419 bc
->set_size_request (-1, pan_bar_height
);
421 pan_bars
.push_back (bc
);
422 pan_bar_packer
.pack_start (*bc
, false, false);
425 /* now that we actually have the pan bars,
426 set their sensitivity based on current
430 update_pan_sensitive ();
432 panning_viewport
.remove ();
433 panning_viewport
.add (pan_bar_packer
);
434 panning_viewport
.show_all ();
439 twod_panner
= new Panner2d (_panner
, 61);
440 twod_panner
->set_name ("MixerPanZone");
441 twod_panner
->show ();
443 twod_panner
->signal_button_press_event().connect
444 (sigc::bind (sigc::mem_fun(*this, &PannerUI::pan_button_event
), (uint32_t) 0), false);
447 update_pan_sensitive ();
448 twod_panner
->reset (npans
);
450 big_window
->reset (npans
);
452 twod_panner
->set_size_request (-1, 61);
454 /* and finally, add it to the panner frame */
456 panning_viewport
.remove ();
457 panning_viewport
.add (*twod_panner
);
458 panning_viewport
.show_all ();
463 PannerUI::pan_button_event (GdkEventButton
* ev
, uint32_t which
)
465 switch (ev
->button
) {
467 if (twod_panner
&& ev
->type
== GDK_2BUTTON_PRESS
) {
469 big_window
= new Panner2dWindow (_panner
, 400, _panner
->npanners());
478 pan_menu
= manage (new Menu
);
479 pan_menu
->set_name ("ArdourContextMenu");
481 build_pan_menu (which
);
482 pan_menu
->popup (1, ev
->time
);
489 return false; // what's wrong with gcc?
493 PannerUI::build_pan_menu (uint32_t which
)
495 using namespace Menu_Helpers
;
496 MenuList
& items (pan_menu
->items());
500 items
.push_back (CheckMenuElem (_("Mute")));
502 /* set state first, connect second */
504 (dynamic_cast<CheckMenuItem
*> (&items
.back()))->set_active (_panner
->streampanner(which
).muted());
505 (dynamic_cast<CheckMenuItem
*> (&items
.back()))->signal_toggled().connect
506 (sigc::bind (sigc::mem_fun(*this, &PannerUI::pan_mute
), which
));
508 items
.push_back (CheckMenuElem (_("Bypass"), sigc::mem_fun(*this, &PannerUI::pan_bypass_toggle
)));
509 bypass_menu_item
= static_cast<CheckMenuItem
*> (&items
.back());
511 /* set state first, connect second */
513 bypass_menu_item
->set_active (_panner
->bypassed());
514 bypass_menu_item
->signal_toggled().connect (sigc::mem_fun(*this, &PannerUI::pan_bypass_toggle
));
516 items
.push_back (MenuElem (_("Reset"), sigc::bind (sigc::mem_fun (*this, &PannerUI::pan_reset
), which
)));
517 items
.push_back (SeparatorElem());
518 items
.push_back (MenuElem (_("Reset all"), sigc::mem_fun (*this, &PannerUI::pan_reset_all
)));
522 PannerUI::pan_mute (uint32_t which
)
524 StreamPanner
& sp
= _panner
->streampanner(which
);
525 sp
.set_muted (!sp
.muted());
529 PannerUI::pan_bypass_toggle ()
531 if (bypass_menu_item
&& (_panner
->bypassed() != bypass_menu_item
->get_active())) {
532 _panner
->set_bypassed (!_panner
->bypassed());
537 PannerUI::pan_reset (uint32_t which
)
539 _panner
->reset_streampanner (which
);
543 PannerUI::pan_reset_all ()
545 _panner
->reset_to_default ();
549 PannerUI::effective_pan_display ()
551 if (_panner
->empty()) {
555 switch (_panner
->nouts()) {
562 update_pan_bars (true);
566 //panner->move_puck (pan_value (v, right), 0.5);
572 PannerUI::pan_changed (void *src
)
578 switch (_panner
->npanners()) {
580 panning_link_direction_button
.set_sensitive (false);
581 panning_link_button
.set_sensitive (false);
584 panning_link_direction_button
.set_sensitive (false);
585 panning_link_button
.set_sensitive (false);
588 panning_link_direction_button
.set_sensitive (_panner
->linked ());
589 panning_link_button
.set_sensitive (true);
592 uint32_t const nouts
= _panner
->nouts();
601 /* bring pan bar state up to date */
602 update_pan_bars (false);
606 // panner->move_puck (pan_value (pans[0], pans[1]), 0.5);
612 PannerUI::pan_adjustment_changed (uint32_t which
)
614 if (!in_pan_update
&& which
< _panner
->npanners()) {
616 float val
= pan_adjustments
[which
]->get_value ();
617 float const xpos
= _panner
->pan_control(which
)->get_value();
619 /* add a kinda-sorta detent for the middle */
621 if (val
!= 0.5 && Panner::equivalent (val
, 0.5)) {
622 /* this is going to be reentrant, so just
626 in_pan_update
= true;
627 pan_adjustments
[which
]->set_value (0.5);
628 in_pan_update
= false;
632 if (!Panner::equivalent (val
, xpos
)) {
634 _panner
->pan_control(which
)->set_value (val
);
636 the panner objects have no access to the session,
637 so do this here. ick.
639 _session
->set_dirty();
645 PannerUI::pan_value_changed (uint32_t which
)
647 ENSURE_GUI_THREAD (*this, &PannerUI::pan_value_changed
, which
)
653 _panner
->streampanner(which
).get_position (x
, y
);
655 in_pan_update
= true;
656 twod_panner
->move_puck (which
, x
, y
);
657 in_pan_update
= false;
659 } else if (_panner
->npanners() > 0 && which
< _panner
->npanners()) {
661 float val
= pan_adjustments
[which
]->get_value ();
663 _panner
->streampanner(which
).get_position (xpos
);
665 if (!Panner::equivalent (val
, xpos
)) {
666 in_pan_update
= true;
667 pan_adjustments
[which
]->set_value (xpos
);
668 in_pan_update
= false;
674 PannerUI::update_pan_bars (bool only_if_aplay
)
677 vector
<Adjustment
*>::iterator i
;
679 in_pan_update
= true;
681 /* this runs during automation playback, and moves the bar controllers
685 for (i
= pan_adjustments
.begin(), n
= 0; i
!= pan_adjustments
.end(); ++i
, ++n
) {
689 boost::shared_ptr
<AutomationList
> alist (_panner
->streampanner(n
).pan_control()->alist());
691 if (!alist
->automation_playback()) {
696 _panner
->streampanner(n
).get_effective_position (xpos
);
697 val
= (*i
)->get_value ();
699 if (!Panner::equivalent (val
, xpos
)) {
700 (*i
)->set_value (xpos
);
704 in_pan_update
= false;
708 PannerUI::update_pan_sensitive ()
710 bool const sensitive
= !(_panner
->mono()) && !(_panner
->automation_state() & Play
);
712 switch (_panner
->nouts()) {
717 for (vector
<PannerBar
*>::iterator i
= pan_bars
.begin(); i
!= pan_bars
.end(); ++i
) {
718 (*i
)->set_sensitive (sensitive
);
723 twod_panner
->set_sensitive (sensitive
);
726 big_window
->set_sensitive (sensitive
);
733 PannerUI::pan_automation_state_button_event (GdkEventButton
*ev
)
735 using namespace Menu_Helpers
;
737 if (ev
->type
== GDK_BUTTON_RELEASE
) {
741 switch (ev
->button
) {
743 if (pan_astate_menu
== 0) {
744 build_astate_menu ();
746 pan_astate_menu
->popup (1, ev
->time
);
756 PannerUI::pan_automation_style_button_event (GdkEventButton
*ev
)
758 if (ev
->type
== GDK_BUTTON_RELEASE
) {
762 switch (ev
->button
) {
764 if (pan_astyle_menu
== 0) {
765 build_astyle_menu ();
767 pan_astyle_menu
->popup (1, ev
->time
);
776 PannerUI::pan_automation_style_changed ()
778 ENSURE_GUI_THREAD (*this, &PannerUI::pan_automation_style_changed
)
782 pan_automation_style_button
.set_label (astyle_string(_panner
->automation_style()));
785 pan_automation_style_button
.set_label (short_astyle_string(_panner
->automation_style()));
791 PannerUI::pan_automation_state_changed ()
793 ENSURE_GUI_THREAD (*this, &PannerUI::pan_automation_state_changed
)
799 pan_automation_state_button
.set_label (astate_string(_panner
->automation_state()));
802 pan_automation_state_button
.set_label (short_astate_string(_panner
->automation_state()));
806 /* when creating a new session, we get to create busses (and
807 sometimes tracks) with no outputs by the time they get
811 if (_panner
->empty()) {
815 x
= (_panner
->streampanner(0).pan_control()->alist()->automation_state() != Off
);
817 if (pan_automation_state_button
.get_active() != x
) {
818 ignore_toggle
= true;
819 pan_automation_state_button
.set_active (x
);
820 ignore_toggle
= false;
823 update_pan_sensitive ();
825 /* start watching automation so that things move */
827 pan_watching
.disconnect();
830 pan_watching
= ARDOUR_UI::RapidScreenUpdate
.connect (sigc::mem_fun (*this, &PannerUI::effective_pan_display
));
835 PannerUI::astate_string (AutoState state
)
837 return _astate_string (state
, false);
841 PannerUI::short_astate_string (AutoState state
)
843 return _astate_string (state
, true);
847 PannerUI::_astate_string (AutoState state
, bool shrt
)
853 sstr
= (shrt
? "M" : _("M"));
856 sstr
= (shrt
? "P" : _("P"));
859 sstr
= (shrt
? "T" : _("T"));
862 sstr
= (shrt
? "W" : _("W"));
870 PannerUI::astyle_string (AutoStyle style
)
872 return _astyle_string (style
, false);
876 PannerUI::short_astyle_string (AutoStyle style
)
878 return _astyle_string (style
, true);
882 PannerUI::_astyle_string (AutoStyle style
, bool shrt
)
887 /* XXX it might different in different languages */
889 return (shrt
? _("Abs") : _("Abs"));
894 PannerUI::set_mono (bool yn
)
896 _panner
->set_mono (yn
);
897 update_pan_sensitive ();
902 PannerUI::connect_to_pan_control (uint32_t i
)
904 _panner
->pan_control(i
)->Changed
.connect (
905 _pan_control_connections
, invalidator (*this), boost::bind (&PannerUI::pan_value_changed
, this, i
), gui_context ()