69326f8fba86e1893f13b8bc33382d41288d2781
[ardour.git] / gtk2_ardour / panner2d.cc
1 /*
2  * Copyright (C) 2005-2016 Paul Davis <paul@linuxaudiosystems.com>
3  * Copyright (C) 2005 Taybin Rutkin <taybin@taybin.com>
4  * Copyright (C) 2008-2011 David Robillard <d@drobilla.net>
5  * Copyright (C) 2010-2011 Carl Hetherington <carl@carlh.net>
6  * Copyright (C) 2014-2019 Robin Gareus <robin@gareus.org>
7  * Copyright (C) 2015 Tim Mayberry <mojofunk@gmail.com>
8  *
9  * This program is free software; you can redistribute it and/or modify
10  * it under the terms of the GNU General Public License as published by
11  * the Free Software Foundation; either version 2 of the License, or
12  * (at your option) any later version.
13  *
14  * This program is distributed in the hope that it will be useful,
15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17  * GNU General Public License for more details.
18  *
19  * You should have received a copy of the GNU General Public License along
20  * with this program; if not, write to the Free Software Foundation, Inc.,
21  * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
22  */
23
24 #include <cmath>
25 #include <climits>
26 #include <string.h>
27
28 #include <cairo.h>
29 #include <gtkmm/menu.h>
30
31 #include "gtkmm2ext/gtk_ui.h"
32
33 #include "pbd/error.h"
34 #include "pbd/cartesian.h"
35 #include "ardour/panner.h"
36 #include "ardour/panner_shell.h"
37 #include "ardour/pannable.h"
38 #include "ardour/speakers.h"
39
40 #include "gtkmm2ext/colors.h"
41
42 #include "panner2d.h"
43 #include "keyboard.h"
44 #include "gui_thread.h"
45 #include "rgb_macros.h"
46 #include "utils.h"
47 #include "public_editor.h"
48 #include "ui_config.h"
49
50 #include "pbd/i18n.h"
51
52 using namespace std;
53 using namespace Gtk;
54 using namespace ARDOUR;
55 using namespace ARDOUR_UI_UTILS;
56 using namespace PBD;
57 using Gtkmm2ext::Keyboard;
58
59 Panner2d::ColorScheme Panner2d::colors;
60 bool Panner2d::have_colors = false;
61
62 static const int large_size_threshold = 100;
63 static const int large_border_width = 25;
64 static const int small_border_width = 8;
65
66 Panner2d::Target::Target (const AngularVector& a, const char *txt)
67         : position (a)
68         , text (txt)
69         , _selected (false)
70 {
71 }
72
73 Panner2d::Target::~Target ()
74 {
75 }
76
77 void
78 Panner2d::Target::set_text (const char* txt)
79 {
80         text = txt;
81 }
82
83 Panner2d::Panner2d (boost::shared_ptr<PannerShell> p, int32_t h)
84 : panner_shell (p)
85         , position (AngularVector (0.0, 0.0), "")
86         , width (0)
87         , height (h)
88         , last_width (0)
89         , have_elevation (false)
90         , _send_mode (false)
91 {
92         if (!have_colors) {
93                 set_colors ();
94                 have_colors = true;
95         }
96
97         UIConfiguration::instance().ColorsChanged.connect (sigc::mem_fun (*this, &Panner2d::color_handler));
98
99         panner_shell->Changed.connect (panshell_connections, invalidator (*this), boost::bind (&Panner2d::handle_state_change, this), gui_context());
100
101         panner_shell->panner()->SignalPositionChanged.connect (panner_connections, invalidator(*this), boost::bind (&Panner2d::handle_position_change, this), gui_context());
102
103         drag_target = 0;
104         set_events (Gdk::BUTTON_PRESS_MASK|Gdk::BUTTON_RELEASE_MASK|Gdk::POINTER_MOTION_MASK);
105
106         handle_state_change ();
107         handle_position_change ();
108 }
109
110 Panner2d::~Panner2d()
111 {
112         for (Targets::iterator i = speakers.begin(); i != speakers.end(); ++i) {
113                 delete *i;
114         }
115         for (Targets::iterator i = signals.begin(); i != signals.end(); ++i) {
116                 delete *i;
117         }
118 }
119
120 void
121 Panner2d::set_colors ()
122 {
123         // TODO get all colors from theme, resolve dups
124         colors.background = UIConfiguration::instance().color ("mono panner bg");
125         colors.crosshairs =          0x4884a9ff; // 0.282, 0.517, 0.662, 1.0
126         colors.signalcircle_border = 0x84c5e1ff; // 0.517, 0.772, 0.882, 1.0
127         colors.signalcircle =        0x4884a9ff; // 0.282, 0.517, 0.662, 1.0  // also used with a = 0.9
128         colors.diffusion =           0x4884a973; // 0.282, 0.517, 0.662, 0.45
129         colors.diffusion_inv =       0xff6b6b73; // 1.0,   0.419, 0.419, 0.45
130         colors.pos_outline =         0xffe7e7d9; // 1.0,   0.905, 0.905, 0.85
131         colors.pos_fill =            0xff6b6bd9; // 1.0,   0.419, 0.419, 0.85
132         colors.signal_outline =      0x84c5e1cc; // 0.517, 0.772, 0.882, 0.8
133         colors.signal_fill =         0x4884a9bf; // 0.282, 0.517, 0.662, 0.75
134         colors.speaker_fill =        0x4884a9ff; // 0.282, 0.517, 0.662, 1.0
135         colors.text =                0x84c5e1e6; // 0.517, 0.772, 0.882, 0.9
136 }
137
138 void
139 Panner2d::color_handler ()
140 {
141         set_colors ();
142         queue_draw ();
143 }
144
145 void
146 Panner2d::reset (uint32_t n_inputs)
147 {
148         uint32_t nouts = panner_shell->panner()->out().n_audio();
149
150         /* signals */
151
152         while (signals.size() < n_inputs) {
153                 add_signal ("", AngularVector());
154         }
155
156         if (signals.size() > n_inputs) {
157                 for (uint32_t i = signals.size(); i < n_inputs; ++i) {
158                         delete signals[i];
159                 }
160
161                 signals.resize (n_inputs);
162         }
163
164         label_signals ();
165
166         for (uint32_t i = 0; i < n_inputs; ++i) {
167                 signals[i]->position = panner_shell->panner()->signal_position (i);
168         }
169
170         /* add all outputs */
171
172         while (speakers.size() < nouts) {
173                 add_speaker (AngularVector());
174         }
175
176         if (speakers.size() > nouts) {
177                 for (uint32_t i = nouts; i < speakers.size(); ++i) {
178                         delete speakers[i];
179                 }
180
181                 speakers.resize (nouts);
182         }
183
184         for (Targets::iterator x = speakers.begin(); x != speakers.end(); ++x) {
185                 (*x)->visible = false;
186         }
187
188         vector<Speaker>& the_speakers (panner_shell->panner()->get_speakers()->speakers());
189
190         for (uint32_t n = 0; n < nouts; ++n) {
191                 char buf[16];
192
193                 snprintf (buf, sizeof (buf), "%d", n+1);
194                 speakers[n]->set_text (buf);
195                 speakers[n]->position = the_speakers[n].angles();
196                 speakers[n]->visible = true;
197         }
198
199         queue_draw ();
200 }
201
202 void
203 Panner2d::on_size_allocate (Gtk::Allocation& alloc)
204 {
205         width = alloc.get_width();
206         height = alloc.get_height();
207
208         if (height > large_size_threshold) {
209                 border = large_border_width;
210         } else {
211                 border = small_border_width;
212         }
213
214         radius = min (width, height);
215         radius -= border;
216         radius /= 2;
217         radius = rint(radius) + .5;
218
219         hoffset = max ((double) (width - height), border);
220         voffset = max ((double) (height - width), border);
221
222         hoffset = rint(hoffset / 2.0);
223         voffset = rint(voffset / 2.0);
224
225         DrawingArea::on_size_allocate (alloc);
226 }
227
228 int
229 Panner2d::add_signal (const char* text, const AngularVector& a)
230 {
231         Target* signal = new Target (a, text);
232         signals.push_back (signal);
233         signal->visible = true;
234
235         return 0;
236 }
237
238 int
239 Panner2d::add_speaker (const AngularVector& a)
240 {
241         Target* speaker = new Target (a, "");
242         speakers.push_back (speaker);
243         speaker->visible = true;
244         queue_draw ();
245
246         return speakers.size() - 1;
247 }
248
249 void
250 Panner2d::handle_state_change ()
251 {
252         panner_connections.drop_connections();
253         if (!panner_shell->panner()) {
254                 return;
255         }
256
257         panner_shell->panner()->SignalPositionChanged.connect (panner_connections, invalidator(*this), boost::bind (&Panner2d::handle_position_change, this), gui_context());
258
259         set<Evoral::Parameter> params = panner_shell->panner()->what_can_be_automated();
260         set<Evoral::Parameter>::iterator p = params.find(PanElevationAutomation);
261         bool elev = have_elevation;
262         have_elevation = (p == params.end()) ? false : true;
263         if (elev != have_elevation) {
264                 handle_position_change();
265         }
266         queue_draw ();
267 }
268
269 void
270 Panner2d::label_signals ()
271 {
272         uint32_t sz = signals.size();
273
274         switch (sz) {
275                 case 0:
276                         break;
277
278                 case 1:
279                         signals[0]->set_text ("");
280                         break;
281
282                 case 2:
283                         signals[0]->set_text (S_("Panner|L"));
284                         signals[1]->set_text (S_("Panner|R"));
285                         break;
286
287                 default:
288                         for (uint32_t i = 0; i < sz; ++i) {
289                                 char buf[64];
290                                 snprintf (buf, sizeof (buf), "%" PRIu32, i + 1);
291                                 signals[i]->set_text (buf);
292                         }
293                         break;
294         }
295 }
296
297 void
298 Panner2d::handle_position_change ()
299 {
300         uint32_t n;
301         double w = panner_shell->pannable()->pan_width_control->get_value();
302
303         position.position = AngularVector (panner_shell->pannable()->pan_azimuth_control->get_value() * 360.0,
304                                            panner_shell->pannable()->pan_elevation_control->get_value() * 90.0);
305
306         for (uint32_t i = 0; i < signals.size(); ++i) {
307                 signals[i]->position = panner_shell->panner()->signal_position (i);
308         }
309
310         if (w * last_width <= 0) {
311                 /* changed sign */
312                 label_signals ();
313         }
314
315         last_width = w;
316
317         vector<Speaker>& the_speakers (panner_shell->panner()->get_speakers()->speakers());
318
319         for (n = 0; n < speakers.size(); ++n) {
320                 speakers[n]->position = the_speakers[n].angles();
321         }
322
323         queue_draw ();
324 }
325
326 void
327 Panner2d::move_signal (int which, const AngularVector& a)
328 {
329         if (which >= int (speakers.size())) {
330                 return;
331         }
332
333         speakers[which]->position = a;
334         queue_draw ();
335 }
336
337 Panner2d::Target *
338 Panner2d::find_closest_object (gdouble x, gdouble y, bool& is_signal)
339 {
340         Target *closest = 0;
341         Target *candidate;
342         float distance;
343         float best_distance = FLT_MAX;
344         CartesianVector c;
345
346         /* start with the position itself */
347
348         PBD::AngularVector dp = position.position;
349         if (!have_elevation) dp.ele = 0;
350         dp.azi = 270 - dp.azi;
351         dp.cartesian (c);
352
353         cart_to_gtk (c);
354         best_distance = sqrt ((c.x - x) * (c.x - x) +
355                         (c.y - y) * (c.y - y));
356         closest = &position;
357
358 #if 0 // TODO signal grab -> change width, not position
359         for (Targets::const_iterator i = signals.begin(); i != signals.end(); ++i) {
360                 candidate = *i;
361
362                 candidate->position.cartesian (c);
363                 cart_to_gtk (c);
364
365                 distance = sqrt ((c.x - x) * (c.x - x) +
366                                 (c.y - y) * (c.y - y));
367
368                 if (distance < best_distance) {
369                         closest = candidate;
370                         best_distance = distance;
371                 }
372         }
373 #endif
374
375         is_signal = true;
376
377         if (height > large_size_threshold) {
378                 /* "big" */
379                 if (best_distance > 30) { // arbitrary
380                         closest = 0;
381                 }
382         } else {
383                 /* "small" */
384                 if (best_distance > 10) { // arbitrary
385                         closest = 0;
386                 }
387         }
388
389         /* if we didn't find a signal close by, check the speakers */
390
391         if (!closest) {
392                 for (Targets::const_iterator i = speakers.begin(); i != speakers.end(); ++i) {
393                         candidate = *i;
394                         PBD::AngularVector sp = candidate->position;
395                         sp.azi = 270 -sp.azi;
396                         CartesianVector c;
397                         sp.cartesian (c);
398                         cart_to_gtk (c);
399
400                         distance = sqrt ((c.x - x) * (c.x - x) +
401                                         (c.y - y) * (c.y - y));
402
403                         if (distance < best_distance) {
404                                 closest = candidate;
405                                 best_distance = distance;
406                         }
407                 }
408
409                 if (height > large_size_threshold) {
410                         /* "big" */
411                         if (best_distance < 30) { // arbitrary
412                                 is_signal = false;
413                         } else {
414                                 closest = 0;
415                         }
416                 } else {
417                         /* "small" */
418                         if (best_distance < 10) { // arbitrary
419                                 is_signal = false;
420                         } else {
421                                 closest = 0;
422                         }
423                 }
424         }
425
426         return closest;
427 }
428
429 void
430 Panner2d::set_send_drawing_mode (bool onoff)
431 {
432         if (_send_mode != onoff) {
433                 _send_mode = onoff;
434                 queue_draw ();
435         }
436 }
437
438 bool
439 Panner2d::on_motion_notify_event (GdkEventMotion *ev)
440 {
441         gint x, y;
442         GdkModifierType state;
443
444         if (ev->is_hint) {
445                 gdk_window_get_pointer (ev->window, &x, &y, &state);
446         } else {
447                 x = (int) floor (ev->x);
448                 y = (int) floor (ev->y);
449                 state = (GdkModifierType) ev->state;
450         }
451
452         if (ev->state & (GDK_BUTTON1_MASK|GDK_BUTTON2_MASK)) {
453                 did_move = true;
454         }
455
456         return handle_motion (x, y, state);
457 }
458
459 #define CSSRGBA(CL) \
460         cairo_set_source_rgba (cr, UINT_RGBA_R_FLT(CL), UINT_RGBA_G_FLT(CL), UINT_RGBA_B_FLT(CL), UINT_RGBA_A_FLT(CL));
461
462 #define CSSRGB(CL, A) \
463         cairo_set_source_rgba (cr, UINT_RGBA_R_FLT(CL), UINT_RGBA_G_FLT(CL), UINT_RGBA_B_FLT(CL), A);
464 bool
465 Panner2d::on_expose_event (GdkEventExpose *event)
466 {
467         CartesianVector c;
468         cairo_t* cr;
469         bool xsmall = (height <= large_size_threshold);
470         const double diameter = radius*2.0;
471
472         cr = gdk_cairo_create (get_window()->gobj());
473
474         /* background */
475
476         cairo_rectangle (cr, event->area.x, event->area.y, event->area.width, event->area.height);
477
478         uint32_t bg = colors.background;
479         if (_send_mode) {
480                 bg = UIConfiguration::instance().color ("send bg");
481         }
482
483         if (!panner_shell->bypassed()) {
484                 CSSRGBA(bg);
485         } else {
486                 CSSRGB(bg, 0.2);
487         }
488         cairo_fill_preserve (cr);
489         cairo_clip (cr);
490
491         /* offset to give us some border */
492
493         cairo_translate (cr, hoffset, voffset);
494
495         cairo_set_line_width (cr, 1.0);
496
497         /* horizontal line of "crosshairs" */
498
499         CSSRGBA(colors.crosshairs);
500         cairo_move_to (cr, 0.0, radius);
501         cairo_line_to (cr, diameter, radius);
502         cairo_stroke (cr);
503
504         /* vertical line of "crosshairs" */
505
506         cairo_move_to (cr, radius, 0);
507         cairo_line_to (cr, radius, diameter);
508         cairo_stroke (cr);
509
510         /* the circle on which signals live */
511
512         cairo_set_line_width (cr, 1.5);
513         CSSRGBA(colors.signalcircle_border);
514         cairo_arc (cr, radius, radius, radius, 0.0, 2.0 * M_PI);
515         cairo_stroke (cr);
516
517         for (uint32_t rad = 15; rad < 90; rad += 15) {
518                 cairo_set_line_width (cr, .5 + (float)rad / 150.0);
519                 if (rad == 45) {
520                         CSSRGBA(colors.signalcircle);
521                 } else {
522                         CSSRGB(colors.signalcircle, 0.9);
523                 }
524                 cairo_new_path (cr);
525                 cairo_arc (cr, radius, radius, radius * sin(M_PI * (float) rad / 180.0), 0, 2.0 * M_PI);
526                 cairo_stroke (cr);
527         }
528
529         if (!panner_shell->bypassed()) {
530                 /* convention top == front ^= azimuth == .5 (same as stereo/mono panners) */
531
532                 if (signals.size() > 1) {
533                         /* arc to show "diffusion" */
534
535                         double width_angle = fabs (panner_shell->pannable()->pan_width_control->get_value()) * 2 * M_PI;
536                         double position_angle = panner_shell->pannable()->pan_azimuth_control->get_value() * 2 * M_PI;
537
538                         cairo_save (cr);
539                         cairo_translate (cr, radius, radius);
540                         cairo_rotate (cr, M_PI / 2.0);
541                         cairo_rotate (cr, position_angle - (width_angle/2.0));
542                         cairo_move_to (cr, 0, 0);
543                         cairo_arc_negative (cr, 0, 0, radius, width_angle, 0.0);
544                         cairo_close_path (cr);
545                         if (panner_shell->pannable()->pan_width_control->get_value() >= 0.0) {
546                                 /* normal width */
547                                 CSSRGBA(colors.diffusion);
548                         } else {
549                                 /* inverse width */
550                                 CSSRGBA(colors.diffusion_inv);
551                         }
552                         cairo_fill (cr);
553                         cairo_restore (cr);
554                 }
555
556                 double arc_radius;
557
558                 cairo_select_font_face (cr, "sans", CAIRO_FONT_SLANT_NORMAL, CAIRO_FONT_WEIGHT_NORMAL);
559
560                 if (xsmall) {
561                         arc_radius = 4.0;
562                 } else {
563                         cairo_set_font_size (cr, 10);
564                         arc_radius = 12.0;
565                 }
566
567                 /* draw position */
568
569                 PBD::AngularVector dp = position.position;
570                 if (!have_elevation) dp.ele = 0;
571                 dp.azi = 270 - dp.azi;
572                 dp.cartesian (c);
573                 cart_to_gtk (c);
574
575                 cairo_new_path (cr);
576                 cairo_arc (cr, c.x, c.y, arc_radius + 1.0, 0, 2.0 * M_PI);
577                 CSSRGBA(colors.pos_fill);
578                 cairo_fill_preserve (cr);
579                 CSSRGBA(colors.pos_outline);
580                 cairo_stroke (cr);
581
582                 /* signals */
583
584                 if (signals.size() > 0) {
585                         for (Targets::iterator i = signals.begin(); i != signals.end(); ++i) {
586                                 Target* signal = *i;
587
588                                 if (signal->visible) {
589
590                                         /* TODO check for overlap - multiple src at same position
591                                          * -> visualize it properly
592                                          */
593                                         PBD::AngularVector sp = signal->position;
594                                         if (!have_elevation) sp.ele = 0;
595                                         sp.azi += 270.0;
596                                         sp.cartesian (c);
597                                         cart_to_gtk (c);
598
599                                         cairo_new_path (cr);
600                                         cairo_arc (cr, c.x, c.y, arc_radius, 0, 2.0 * M_PI);
601                                         CSSRGBA(colors.signal_fill);
602                                         cairo_fill_preserve (cr);
603                                         CSSRGBA(colors.signal_outline);
604                                         cairo_stroke (cr);
605
606                                         if (!xsmall && !signal->text.empty()) {
607                                                 CSSRGBA(colors.text);
608                                                 /* the +/- adjustments are a hack to try to center the text in the circle
609                                                  * TODO use pango get_pixel_size() -- see mono_panner.cc
610                                                  */
611                                                 if (xsmall) {
612                                                         cairo_move_to (cr, c.x - 1, c.y + 1);
613                                                 } else {
614                                                         cairo_move_to (cr, c.x - 4, c.y + 4);
615                                                 }
616                                                 cairo_show_text (cr, signal->text.c_str());
617                                         }
618                                 }
619                         }
620                 }
621
622                 /* speakers */
623
624                 int n = 0;
625
626                 for (Targets::iterator i = speakers.begin(); i != speakers.end(); ++i) {
627                         Target *speaker = *i;
628                         char buf[256];
629                         ++n;
630
631                         if (speaker->visible) {
632
633                                 PBD::AngularVector sp = speaker->position;
634                                 sp.azi += 270.0;
635                                 CartesianVector c;
636                                 sp.cartesian (c);
637                                 cart_to_gtk (c);
638
639                                 snprintf (buf, sizeof (buf), "%d", n);
640
641                                 /* stroke out a speaker shape */
642
643                                 cairo_move_to (cr, c.x, c.y);
644                                 cairo_save (cr);
645                                 cairo_rotate (cr, -(sp.azi/360.0) * (2.0 * M_PI));
646                                 if (xsmall) {
647                                         cairo_scale (cr, 0.8, 0.8);
648                                 } else {
649                                         cairo_scale (cr, 1.2, 1.2);
650                                 }
651                                 cairo_rel_line_to (cr, 4, -2);
652                                 cairo_rel_line_to (cr, 0, -7);
653                                 cairo_rel_line_to (cr, 5, +5);
654                                 cairo_rel_line_to (cr, 5, 0);
655                                 cairo_rel_line_to (cr, 0, 5);
656                                 cairo_rel_line_to (cr, -5, 0);
657                                 cairo_rel_line_to (cr, -5, +5);
658                                 cairo_rel_line_to (cr, 0, -7);
659                                 cairo_close_path (cr);
660                                 CSSRGBA(colors.speaker_fill);
661                                 cairo_fill (cr);
662                                 cairo_restore (cr);
663
664                                 if (!xsmall) {
665                                         cairo_set_font_size (cr, 16);
666
667                                         /* move the text in just a bit */
668
669                                         AngularVector textpos (speaker->position.azi + 270.0, speaker->position.ele, 0.85);
670
671                                         textpos.cartesian (c);
672                                         cart_to_gtk (c);
673                                         cairo_move_to (cr, c.x, c.y);
674                                         cairo_show_text (cr, buf);
675                                 }
676
677                         }
678                 }
679         }
680
681         cairo_destroy (cr);
682
683         return true;
684 }
685
686 bool
687 Panner2d::on_button_press_event (GdkEventButton *ev)
688 {
689         GdkModifierType state;
690         int x;
691         int y;
692         bool is_signal;
693
694         if (ev->type == GDK_2BUTTON_PRESS && ev->button == 1) {
695                 return false;
696         }
697
698         did_move = false;
699
700         switch (ev->button) {
701         case 1:
702         case 2:
703                 x = ev->x - hoffset;
704                 y = ev->y - voffset;
705
706                 if ((drag_target = find_closest_object (x, y, is_signal)) != 0) {
707                         if (!is_signal) {
708                                 panner_shell->panner()->set_position (drag_target->position.azi/360.0);
709                                 drag_target = 0;
710                         } else {
711                                 drag_target->set_selected (true);
712                         }
713                 }
714
715                 state = (GdkModifierType) ev->state;
716                 return handle_motion (ev->x, ev->y, state);
717                 break;
718
719         default:
720                 break;
721         }
722
723         return false;
724 }
725
726 bool
727 Panner2d::on_button_release_event (GdkEventButton *ev)
728 {
729         gint x, y;
730         GdkModifierType state;
731         bool ret = false;
732
733         switch (ev->button) {
734         case 1:
735                 x = (int) floor (ev->x);
736                 y = (int) floor (ev->y);
737                 state = (GdkModifierType) ev->state;
738                 ret = handle_motion (x, y, state);
739                 drag_target = 0;
740                 break;
741
742         case 2:
743                 x = (int) floor (ev->x);
744                 y = (int) floor (ev->y);
745                 state = (GdkModifierType) ev->state;
746
747                 if (Keyboard::modifier_state_contains (state, Keyboard::TertiaryModifier)) {
748                         toggle_bypass ();
749                         ret = true;
750                 } else {
751                         ret = handle_motion (x, y, state);
752                 }
753
754                 drag_target = 0;
755                 break;
756
757         case 3:
758                 break;
759
760         }
761
762         return ret;
763 }
764
765 gint
766 Panner2d::handle_motion (gint evx, gint evy, GdkModifierType state)
767 {
768         if (drag_target == 0) {
769                 return false;
770         }
771
772         if ((state & (GDK_BUTTON1_MASK|GDK_BUTTON2_MASK)) == 0) {
773                 return false;
774         }
775
776         evx -= hoffset;
777         evy -= voffset;
778
779         if (state & GDK_BUTTON1_MASK && !(state & GDK_BUTTON2_MASK)) {
780                 CartesianVector c;
781                 bool need_move = false;
782
783                 drag_target->position.cartesian (c);
784                 cart_to_gtk (c);
785
786                 if ((evx != c.x) || (evy != c.y)) {
787                         need_move = true;
788                 }
789
790                 if (need_move) {
791                         CartesianVector cp (evx, evy, 0.0);
792                         AngularVector av;
793                         gtk_to_cart (cp);
794
795                         if (!have_elevation) {
796                                 clamp_to_circle (cp.x, cp.y);
797                                 cp.angular (av);
798                                 av.azi = fmod(270 - av.azi, 360);
799                                 if (drag_target == &position) {
800                                         double degree_fract = av.azi / 360.0;
801                                         panner_shell->panner()->set_position (degree_fract);
802                                 }
803                         } else {
804                                 /* sphere projection */
805                                 sphere_project (cp.x, cp.y, cp.z);
806
807                                 double r2d = 180.0 / M_PI;
808                                 av.azi = r2d * atan2(cp.y, cp.x);
809                                 av.ele = r2d * asin(cp.z);
810                                 av.azi = fmod(270 - av.azi, 360);
811
812                                 if (drag_target == &position) {
813                                         double azi_fract = av.azi / 360.0;
814                                         double ele_fract = av.ele / 90.0;
815                                         panner_shell->panner()->set_position (azi_fract);
816                                         panner_shell->panner()->set_elevation (ele_fract);
817                                 }
818                         }
819                 }
820         }
821
822         return true;
823 }
824
825 bool
826 Panner2d::on_scroll_event (GdkEventScroll* ev)
827 {
828         switch (ev->direction) {
829         case GDK_SCROLL_UP:
830         case GDK_SCROLL_RIGHT:
831                 panner_shell->panner()->set_position (panner_shell->pannable()->pan_azimuth_control->get_value() - 1.0/360.0);
832                 break;
833
834         case GDK_SCROLL_DOWN:
835         case GDK_SCROLL_LEFT:
836                 panner_shell->panner()->set_position (panner_shell->pannable()->pan_azimuth_control->get_value() + 1.0/360.0);
837                 break;
838         }
839         return true;
840 }
841
842 void
843 Panner2d::cart_to_gtk (CartesianVector& c) const
844 {
845         /* cartesian coordinate space:
846          *  center = 0.0
847          *  dimension = 2.0 * 2.0
848          *  increasing y moves up
849          * so max values along each axis are -1..+1
850          *
851          * GTK uses a coordinate space that is:
852          *  top left = 0.0
853          *  dimension = (radius*2.0) * (radius*2.0)
854          * increasing y moves down
855         */
856         const double diameter = radius*2.0;
857
858         c.x = diameter * ((c.x + 1.0) / 2.0);
859         /* extra subtraction inverts the y-axis to match "increasing y moves down" */
860         c.y = diameter - (diameter * ((c.y + 1.0) / 2.0));
861 }
862
863 void
864 Panner2d::gtk_to_cart (CartesianVector& c) const
865 {
866         const double diameter = radius*2.0;
867         c.x = ((c.x / diameter) * 2.0) - 1.0;
868         c.y = (((diameter - c.y) / diameter) * 2.0) - 1.0;
869 }
870
871 void
872 Panner2d::sphere_project (double& x, double& y, double& z)
873 {
874         double r, r2;
875         r2 = x * x + y * y;
876         if (r2 < 1.0) {
877                 z = sqrt (1.0 - r2);
878         } else {
879                 r = sqrt (r2);
880                 x = x / r;
881                 y = y / r;
882                 z = 0.0;
883         }
884 }
885
886 void
887 Panner2d::clamp_to_circle (double& x, double& y)
888 {
889         double azi, ele;
890         double z = 0.0;
891         double l;
892         PBD::cartesian_to_spherical (x, y, z, azi, ele, l);
893         PBD::spherical_to_cartesian (azi, ele, 1.0, x, y, z);
894 }
895
896 void
897 Panner2d::toggle_bypass ()
898 {
899         panner_shell->set_bypassed (!panner_shell->bypassed());
900 }
901
902 Panner2dWindow::Panner2dWindow (boost::shared_ptr<PannerShell> p, int32_t h, uint32_t inputs)
903         : ArdourWindow (_("Panner (2D)"))
904         , widget (p, h)
905         , bypass_button (_("Bypass"))
906         , width_adjustment (0, -100, 100, 1, 5, 0)
907         , width_spinner (width_adjustment)
908 {
909         widget.set_name ("MixerPanZone");
910
911         set_title (_("Panner"));
912         widget.set_size_request (h, h);
913
914         bypass_button.signal_toggled().connect (sigc::mem_fun (*this, &Panner2dWindow::bypass_toggled));
915         width_spinner.signal_changed().connect (sigc::mem_fun (*this, &Panner2dWindow::width_changed));
916
917         p->Changed.connect (panshell_connections, invalidator (*this), boost::bind (&Panner2dWindow::set_bypassed, this), gui_context());
918         /* needed for the width-spinbox in the main window */
919         p->PannableChanged.connect (panshell_connections, invalidator (*this), boost::bind (&Panner2dWindow::pannable_handler, this), gui_context());
920         p->pannable()->pan_width_control->Changed.connect (panvalue_connections, invalidator(*this), boost::bind (&Panner2dWindow::set_width, this), gui_context());
921
922
923         button_box.set_spacing (6);
924         button_box.pack_start (bypass_button, false, false);
925
926         left_side.set_spacing (6);
927
928         left_side.pack_start (button_box, false, false);
929
930         Gtk::Label* l = manage (new Label (
931                                 p->panner()->describe_parameter(PanWidthAutomation),
932                                 Gtk::ALIGN_LEFT, Gtk::ALIGN_CENTER, false));
933         spinner_box.pack_start (*l, false, false);
934         spinner_box.pack_start (width_spinner, false, false);
935         left_side.pack_start (spinner_box, false, false);
936
937         l->show ();
938         bypass_button.show ();
939         button_box.show ();
940         width_spinner.show ();
941         spinner_box.show ();
942         left_side.show ();
943
944         hpacker.set_spacing (6);
945         hpacker.set_border_width (12);
946         hpacker.pack_start (widget, false, false);
947         hpacker.pack_start (left_side, false, false);
948         hpacker.show ();
949
950         add (hpacker);
951         reset (inputs);
952         set_width();
953         set_bypassed();
954         widget.show ();
955 }
956
957 void
958 Panner2dWindow::reset (uint32_t n_inputs)
959 {
960         widget.reset (n_inputs);
961 }
962
963 void
964 Panner2dWindow::bypass_toggled ()
965 {
966         bool view = bypass_button.get_active ();
967         bool model = widget.get_panner_shell()->bypassed ();
968
969         if (model != view) {
970                 widget.get_panner_shell()->set_bypassed (view);
971         }
972 }
973 void
974 Panner2dWindow::width_changed ()
975 {
976         float model = widget.get_panner_shell()->pannable()->pan_width_control->get_value();
977         float view  = width_spinner.get_value() / 100.0;
978         if (model != view) {
979                 widget.get_panner_shell()->panner()->set_width (view);
980         }
981 }
982
983 void
984 Panner2dWindow::pannable_handler ()
985 {
986         panvalue_connections.drop_connections();
987         widget.get_panner_shell()->pannable()->pan_width_control->Changed.connect (panvalue_connections, invalidator(*this), boost::bind (&Panner2dWindow::set_width, this), gui_context());
988         set_width();
989 }
990
991 void
992 Panner2dWindow::set_bypassed ()
993 {
994         bool view = bypass_button.get_active ();
995         bool model = widget.get_panner_shell()->bypassed ();
996         if (model != view) {
997                 bypass_button.set_active(model);
998         }
999
1000         set<Evoral::Parameter> params = widget.get_panner_shell()->panner()->what_can_be_automated();
1001         set<Evoral::Parameter>::iterator p = params.find(PanWidthAutomation);
1002         if (p == params.end()) {
1003                 spinner_box.set_sensitive(false);
1004         } else {
1005                 spinner_box.set_sensitive(true);
1006         }
1007 }
1008
1009 void
1010 Panner2dWindow::set_width ()
1011 {
1012         // rounding of spinbox is different from slider -- TODO use slider
1013         float model = (widget.get_panner_shell()->pannable()->pan_width_control->get_value() * 100.0);
1014         float view  = (width_spinner.get_value());
1015         if (model != view) {
1016                 width_spinner.set_value (model);
1017         }
1018 }
1019
1020 bool
1021 Panner2dWindow::on_key_press_event (GdkEventKey* event)
1022 {
1023         return relay_key_press (event, this);
1024 }
1025
1026 bool
1027 Panner2dWindow::on_key_release_event (GdkEventKey*)
1028 {
1029         return true;
1030 }