Use LV2_SUPPORT define instead of HAVE_SLV2.
[ardour.git] / gtk2_ardour / editor_canvas.cc
1 /*
2     Copyright (C) 2005 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 #ifdef WAF_BUILD
21 #include "gtk2ardour-config.h"
22 #endif
23
24 #include <libgnomecanvasmm/init.h>
25 #include <libgnomecanvasmm/pixbuf.h>
26 #include <jack/types.h>
27 #include <gtkmm2ext/utils.h>
28
29 #include "ardour/profile.h"
30 #include "ardour/rc_configuration.h"
31
32 #include "ardour_ui.h"
33 #include "editor.h"
34 #include "global_signals.h"
35 #include "waveview.h"
36 #include "simplerect.h"
37 #include "simpleline.h"
38 #include "imageframe.h"
39 #include "waveview_p.h"
40 #include "simplerect_p.h"
41 #include "simpleline_p.h"
42 #include "imageframe_p.h"
43 #include "canvas_impl.h"
44 #include "canvas-noevent-text.h"
45 #include "editing.h"
46 #include "rgb_macros.h"
47 #include "utils.h"
48 #include "audio_time_axis.h"
49 #include "editor_drag.h"
50 #include "region_view.h"
51 #include "editor_group_tabs.h"
52 #include "editor_routes.h"
53 #include "editor_summary.h"
54 #include "keyboard.h"
55 #include "editor_cursors.h"
56 #include "mouse_cursors.h"
57 #include "verbose_cursor.h"
58
59 #include "i18n.h"
60
61 using namespace std;
62 using namespace ARDOUR;
63 using namespace PBD;
64 using namespace Gtk;
65 using namespace Glib;
66 using namespace Gtkmm2ext;
67 using namespace Editing;
68
69 /* XXX this is a hack. it ought to be the maximum value of an framepos_t */
70
71 const double max_canvas_coordinate = (double) JACK_MAX_FRAMES;
72
73 extern "C"
74 {
75
76 GType gnome_canvas_simpleline_get_type(void);
77 GType gnome_canvas_simplerect_get_type(void);
78 GType gnome_canvas_waveview_get_type(void);
79 GType gnome_canvas_imageframe_get_type(void);
80
81 }
82
83 static void ardour_canvas_type_init()
84 {
85         // Map gtypes to gtkmm wrapper-creation functions:
86
87         Glib::wrap_register(gnome_canvas_simpleline_get_type(), &Gnome::Canvas::SimpleLine_Class::wrap_new);
88         Glib::wrap_register(gnome_canvas_simplerect_get_type(), &Gnome::Canvas::SimpleRect_Class::wrap_new);
89         Glib::wrap_register(gnome_canvas_waveview_get_type(), &Gnome::Canvas::WaveView_Class::wrap_new);
90         // Glib::wrap_register(gnome_canvas_imageframe_get_type(), &Gnome::Canvas::ImageFrame_Class::wrap_new);
91
92         // Register the gtkmm gtypes:
93
94         (void) Gnome::Canvas::WaveView::get_type();
95         (void) Gnome::Canvas::SimpleLine::get_type();
96         (void) Gnome::Canvas::SimpleRect::get_type();
97         (void) Gnome::Canvas::ImageFrame::get_type();
98 }
99
100 void
101 Editor::initialize_canvas ()
102 {
103         if (getenv ("ARDOUR_NON_AA_CANVAS")) {
104                 track_canvas = new ArdourCanvas::Canvas ();
105         } else {
106                 track_canvas = new ArdourCanvas::CanvasAA ();
107         }
108
109         ArdourCanvas::init ();
110         ardour_canvas_type_init ();
111
112         /* don't try to center the canvas */
113
114         track_canvas->set_center_scroll_region (false);
115         track_canvas->set_dither (Gdk::RGB_DITHER_NONE);
116
117         gint phys_width = physical_screen_width (Glib::RefPtr<Gdk::Window>());
118         gint phys_height = physical_screen_height (Glib::RefPtr<Gdk::Window>());
119
120         _verbose_cursor = new VerboseCursor (this);
121         
122         /* on the bottom, an image */
123
124         if (Profile->get_sae()) {
125                 Image img (::get_icon (X_("saelogo")));
126                 logo_item = new ArdourCanvas::Pixbuf (*track_canvas->root(), 0.0, 0.0, img.get_pixbuf());
127                 // logo_item->property_height_in_pixels() = true;
128                 // logo_item->property_width_in_pixels() = true;
129                 // logo_item->property_height_set() = true;
130                 // logo_item->property_width_set() = true;
131                 logo_item->show ();
132         }
133
134         /* a group to hold time (measure) lines */
135         time_line_group = new ArdourCanvas::Group (*track_canvas->root());
136
137 #ifdef GTKOSX
138         /*XXX please don't laugh. this actually improves canvas performance on osx */
139         bogus_background_rect =  new ArdourCanvas::SimpleRect (*time_line_group, 0.0, 0.0, max_canvas_coordinate/3, phys_height);
140         bogus_background_rect->property_outline_pixels() = 0;
141 #endif
142         transport_loop_range_rect = new ArdourCanvas::SimpleRect (*time_line_group, 0.0, 0.0, 0.0, phys_height);
143         transport_loop_range_rect->property_outline_pixels() = 1;
144         transport_loop_range_rect->hide();
145
146         transport_punch_range_rect = new ArdourCanvas::SimpleRect (*time_line_group, 0.0, 0.0, 0.0, phys_height);
147         transport_punch_range_rect->property_outline_pixels() = 0;
148         transport_punch_range_rect->hide();
149
150         _background_group = new ArdourCanvas::Group (*track_canvas->root());
151         _master_group = new ArdourCanvas::Group (*track_canvas->root());
152
153         _trackview_group = new ArdourCanvas::Group (*_master_group);
154         _region_motion_group = new ArdourCanvas::Group (*_trackview_group);
155
156         meter_bar_group = new ArdourCanvas::Group (*track_canvas->root ());
157         meter_bar = new ArdourCanvas::SimpleRect (*meter_bar_group, 0.0, 0.0, phys_width, timebar_height - 1);
158         meter_bar->property_outline_pixels() = 1;
159         meter_bar->property_outline_what() = 0x8;
160
161         tempo_bar_group = new ArdourCanvas::Group (*track_canvas->root ());
162         tempo_bar = new ArdourCanvas::SimpleRect (*tempo_bar_group, 0.0, 0.0, phys_width, (timebar_height - 1));
163         tempo_bar->property_outline_pixels() = 1;
164         tempo_bar->property_outline_what() = 0x8;
165
166         range_marker_bar_group = new ArdourCanvas::Group (*track_canvas->root ());
167         range_marker_bar = new ArdourCanvas::SimpleRect (*range_marker_bar_group, 0.0, 0.0, phys_width, (timebar_height - 1));
168         range_marker_bar->property_outline_pixels() = 1;
169         range_marker_bar->property_outline_what() = 0x8;
170
171         transport_marker_bar_group = new ArdourCanvas::Group (*track_canvas->root ());
172         transport_marker_bar = new ArdourCanvas::SimpleRect (*transport_marker_bar_group, 0.0, 0.0,  phys_width, (timebar_height - 1));
173         transport_marker_bar->property_outline_pixels() = 1;
174         transport_marker_bar->property_outline_what() = 0x8;
175
176         marker_bar_group = new ArdourCanvas::Group (*track_canvas->root ());
177         marker_bar = new ArdourCanvas::SimpleRect (*marker_bar_group, 0.0, 0.0, phys_width, (timebar_height - 1));
178         marker_bar->property_outline_pixels() = 1;
179         marker_bar->property_outline_what() = 0x8;
180
181         cd_marker_bar_group = new ArdourCanvas::Group (*track_canvas->root ());
182         cd_marker_bar = new ArdourCanvas::SimpleRect (*cd_marker_bar_group, 0.0, 0.0, phys_width, (timebar_height - 1));
183         cd_marker_bar->property_outline_pixels() = 1;
184         cd_marker_bar->property_outline_what() = 0x8;
185
186         timebar_group =  new ArdourCanvas::Group (*track_canvas->root(), 0.0, 0.0);
187         cursor_group = new ArdourCanvas::Group (*track_canvas->root(), 0.0, 0.0);
188
189         meter_group = new ArdourCanvas::Group (*timebar_group, 0.0, timebar_height * 5.0);
190         tempo_group = new ArdourCanvas::Group (*timebar_group, 0.0, timebar_height * 4.0);
191         range_marker_group = new ArdourCanvas::Group (*timebar_group, 0.0, timebar_height * 3.0);
192         transport_marker_group = new ArdourCanvas::Group (*timebar_group, 0.0, timebar_height * 2.0);
193         marker_group = new ArdourCanvas::Group (*timebar_group, 0.0, timebar_height);
194         cd_marker_group = new ArdourCanvas::Group (*timebar_group, 0.0, 0.0);
195
196         cd_marker_bar_drag_rect = new ArdourCanvas::SimpleRect (*cd_marker_group, 0.0, 0.0, 100, timebar_height);
197         cd_marker_bar_drag_rect->property_outline_pixels() = 0;
198         cd_marker_bar_drag_rect->hide ();
199
200         range_bar_drag_rect = new ArdourCanvas::SimpleRect (*range_marker_group, 0.0, 0.0, 100, timebar_height);
201         range_bar_drag_rect->property_outline_pixels() = 0;
202         range_bar_drag_rect->hide ();
203
204         transport_bar_drag_rect = new ArdourCanvas::SimpleRect (*transport_marker_group, 0.0, 0.0, 100, timebar_height);
205         transport_bar_drag_rect->property_outline_pixels() = 0;
206         transport_bar_drag_rect->hide ();
207
208         transport_punchin_line = new ArdourCanvas::SimpleLine (*_master_group);
209         transport_punchin_line->property_x1() = 0.0;
210         transport_punchin_line->property_y1() = 0.0;
211         transport_punchin_line->property_x2() = 0.0;
212         transport_punchin_line->property_y2() = phys_height;
213         transport_punchin_line->hide ();
214
215         transport_punchout_line  = new ArdourCanvas::SimpleLine (*_master_group);
216         transport_punchout_line->property_x1() = 0.0;
217         transport_punchout_line->property_y1() = 0.0;
218         transport_punchout_line->property_x2() = 0.0;
219         transport_punchout_line->property_y2() = phys_height;
220         transport_punchout_line->hide();
221
222         // used to show zoom mode active zooming
223         zoom_rect = new ArdourCanvas::SimpleRect (*_master_group, 0.0, 0.0, 0.0, 0.0);
224         zoom_rect->property_outline_pixels() = 1;
225         zoom_rect->hide();
226
227         zoom_rect->signal_event().connect (sigc::bind (sigc::mem_fun (*this, &Editor::canvas_zoom_rect_event), (ArdourCanvas::Item*) 0));
228
229         // used as rubberband rect
230         rubberband_rect = new ArdourCanvas::SimpleRect (*_trackview_group, 0.0, 0.0, 0.0, 0.0);
231
232         rubberband_rect->property_outline_pixels() = 1;
233         rubberband_rect->hide();
234
235         tempo_bar->signal_event().connect (sigc::bind (sigc::mem_fun (*this, &Editor::canvas_tempo_bar_event), tempo_bar));
236         meter_bar->signal_event().connect (sigc::bind (sigc::mem_fun (*this, &Editor::canvas_meter_bar_event), meter_bar));
237         marker_bar->signal_event().connect (sigc::bind (sigc::mem_fun (*this, &Editor::canvas_marker_bar_event), marker_bar));
238         cd_marker_bar->signal_event().connect (sigc::bind (sigc::mem_fun (*this, &Editor::canvas_cd_marker_bar_event), cd_marker_bar));
239         range_marker_bar->signal_event().connect (sigc::bind (sigc::mem_fun (*this, &Editor::canvas_range_marker_bar_event), range_marker_bar));
240         transport_marker_bar->signal_event().connect (sigc::bind (sigc::mem_fun (*this, &Editor::canvas_transport_marker_bar_event), transport_marker_bar));
241
242         playhead_cursor = new EditorCursor (*this, &Editor::canvas_playhead_cursor_event);
243
244         if (logo_item) {
245                 logo_item->lower_to_bottom ();
246         }
247         /* need to handle 4 specific types of events as catch-alls */
248
249         track_canvas->signal_scroll_event().connect (sigc::mem_fun (*this, &Editor::track_canvas_scroll_event));
250         track_canvas->signal_motion_notify_event().connect (sigc::mem_fun (*this, &Editor::track_canvas_motion_notify_event));
251         track_canvas->signal_button_press_event().connect (sigc::mem_fun (*this, &Editor::track_canvas_button_press_event));
252         track_canvas->signal_button_release_event().connect (sigc::mem_fun (*this, &Editor::track_canvas_button_release_event));
253         track_canvas->signal_drag_motion().connect (sigc::mem_fun (*this, &Editor::track_canvas_drag_motion));
254         track_canvas->signal_key_press_event().connect (sigc::mem_fun (*this, &Editor::track_canvas_key_press));
255         track_canvas->signal_key_release_event().connect (sigc::mem_fun (*this, &Editor::track_canvas_key_release));
256
257         track_canvas->set_name ("EditorMainCanvas");
258         track_canvas->add_events (Gdk::POINTER_MOTION_HINT_MASK | Gdk::SCROLL_MASK | Gdk::KEY_PRESS_MASK | Gdk::KEY_RELEASE_MASK);
259         track_canvas->signal_leave_notify_event().connect (sigc::mem_fun(*this, &Editor::left_track_canvas));
260         track_canvas->signal_enter_notify_event().connect (sigc::mem_fun(*this, &Editor::entered_track_canvas));
261         track_canvas->set_flags (CAN_FOCUS);
262
263         /* set up drag-n-drop */
264
265         vector<TargetEntry> target_table;
266
267         // Drag-N-Drop from the region list can generate this target
268         target_table.push_back (TargetEntry ("regions"));
269
270         target_table.push_back (TargetEntry ("text/plain"));
271         target_table.push_back (TargetEntry ("text/uri-list"));
272         target_table.push_back (TargetEntry ("application/x-rootwin-drop"));
273
274         track_canvas->drag_dest_set (target_table);
275         track_canvas->signal_drag_data_received().connect (sigc::mem_fun(*this, &Editor::track_canvas_drag_data_received));
276
277         track_canvas->signal_size_allocate().connect (sigc::mem_fun(*this, &Editor::track_canvas_allocate));
278
279         ColorsChanged.connect (sigc::mem_fun (*this, &Editor::color_handler));
280         color_handler();
281
282 }
283
284 void
285 Editor::track_canvas_allocate (Gtk::Allocation alloc)
286 {
287         canvas_allocation = alloc;
288         track_canvas_size_allocated ();
289 }
290
291 bool
292 Editor::track_canvas_size_allocated ()
293 {
294         bool height_changed = _canvas_height != canvas_allocation.get_height();
295
296         _canvas_width = canvas_allocation.get_width();
297         _canvas_height = canvas_allocation.get_height();
298
299         if (_session) {
300                 TrackViewList::iterator i;
301
302                 for (i = track_views.begin(); i != track_views.end(); ++i) {
303                         (*i)->clip_to_viewport ();
304                 }
305         }
306
307         if (height_changed) {
308                 if (playhead_cursor) {
309                         playhead_cursor->set_length (_canvas_height);
310                 }
311
312                 for (LocationMarkerMap::iterator i = location_markers.begin(); i != location_markers.end(); ++i) {
313                         i->second->canvas_height_set (_canvas_height);
314                 }
315
316                 vertical_adjustment.set_page_size (_canvas_height);
317                 last_trackview_group_vertical_offset = get_trackview_group_vertical_offset ();
318                 if ((vertical_adjustment.get_value() + _canvas_height) >= vertical_adjustment.get_upper()) {
319                         /*
320                            We're increasing the size of the canvas while the bottom is visible.
321                            We scroll down to keep in step with the controls layout.
322                         */
323                         vertical_adjustment.set_value (full_canvas_height - _canvas_height);
324                 }
325         }
326
327         update_fixed_rulers();
328         redisplay_tempo (false);
329         _summary->set_overlays_dirty ();
330
331         return false;
332 }
333
334 void
335 Editor::reset_controls_layout_width ()
336 {
337         gint w = edit_controls_vbox.get_width();
338
339         if (_group_tabs->is_mapped()) {
340                 w += _group_tabs->get_width();
341         }
342
343         /* the controls layout has no horizontal scrolling, its visible
344            width is always equal to the total width of its contents. 
345         */
346
347         controls_layout.property_width() = w;
348         controls_layout.property_width_request() = w;
349 }
350
351 void
352 Editor::reset_controls_layout_height (int32_t h)
353 {
354         /* set the height of the scrollable area (i.e. the sum of all contained widgets)
355          */
356
357         controls_layout.property_height() = h;
358         
359         /* size request is set elsewhere, see ::track_canvas_allocate() */
360 }
361         
362 bool
363 Editor::track_canvas_map_handler (GdkEventAny* /*ev*/)
364 {
365         if (current_canvas_cursor) {
366                 set_canvas_cursor (current_canvas_cursor);
367         }
368         return false;
369 }
370
371 /** This is called when something is dropped onto the track canvas */
372 void
373 Editor::track_canvas_drag_data_received (const RefPtr<Gdk::DragContext>& context,
374                                          int x, int y,
375                                          const SelectionData& data,
376                                          guint info, guint time)
377 {
378         if (data.get_target() == "regions") {
379                 drop_regions (context, x, y, data, info, time);
380         } else {
381                 drop_paths (context, x, y, data, info, time);
382         }
383 }
384
385 bool
386 Editor::idle_drop_paths (vector<string> paths, framepos_t frame, double ypos)
387 {
388         drop_paths_part_two (paths, frame, ypos);
389         return false;
390 }
391
392 void
393 Editor::drop_paths_part_two (const vector<string>& paths, framepos_t frame, double ypos)
394 {
395         RouteTimeAxisView* tv;
396
397         std::pair<TimeAxisView*, int> const tvp = trackview_by_y_position (ypos);
398         if (tvp.first == 0) {
399
400                 /* drop onto canvas background: create new tracks */
401
402                 frame = 0;
403
404                 if (Profile->get_sae() || Config->get_only_copy_imported_files()) {
405                         do_import (paths, Editing::ImportDistinctFiles, Editing::ImportAsTrack, SrcBest, frame);
406                 } else {
407                         do_embed (paths, Editing::ImportDistinctFiles, ImportAsTrack, frame);
408                 }
409
410         } else if ((tv = dynamic_cast<RouteTimeAxisView*> (tvp.first)) != 0) {
411
412                 /* check that its an audio track, not a bus */
413
414                 if (tv->track()) {
415                         /* select the track, then embed/import */
416                         selection->set (tv);
417
418                         if (Profile->get_sae() || Config->get_only_copy_imported_files()) {
419                                 do_import (paths, Editing::ImportSerializeFiles, Editing::ImportToTrack, SrcBest, frame);
420                         } else {
421                                 do_embed (paths, Editing::ImportSerializeFiles, ImportToTrack, frame);
422                         }
423                 }
424         }
425 }
426
427 void
428 Editor::drop_paths (const RefPtr<Gdk::DragContext>& context,
429                     int x, int y,
430                     const SelectionData& data,
431                     guint info, guint time)
432 {
433         vector<string> paths;
434         GdkEvent ev;
435         framepos_t frame;
436         double wx;
437         double wy;
438         double cy;
439
440         if (convert_drop_to_paths (paths, context, x, y, data, info, time) == 0) {
441
442                 /* D-n-D coordinates are window-relative, so convert to "world" coordinates
443                  */
444
445                 track_canvas->window_to_world (x, y, wx, wy);
446
447                 ev.type = GDK_BUTTON_RELEASE;
448                 ev.button.x = wx;
449                 ev.button.y = wy;
450
451                 frame = event_frame (&ev, 0, &cy);
452
453                 snap_to (frame);
454
455 #ifdef GTKOSX
456                 /* We are not allowed to call recursive main event loops from within
457                    the main event loop with GTK/Quartz. Since import/embed wants
458                    to push up a progress dialog, defer all this till we go idle.
459                 */
460                 Glib::signal_idle().connect (sigc::bind (sigc::mem_fun (*this, &Editor::idle_drop_paths), paths, frame, cy));
461 #else
462                 drop_paths_part_two (paths, frame, cy);
463 #endif
464         }
465
466         context->drag_finish (true, false, time);
467 }
468
469 void
470 Editor::drop_regions (const RefPtr<Gdk::DragContext>& /*context*/,
471                       int /*x*/, int /*y*/,
472                       const SelectionData& /*data*/,
473                       guint /*info*/, guint /*time*/)
474 {
475         _drags->end_grab (0);
476 }
477
478 void
479 Editor::maybe_autoscroll (bool allow_horiz, bool allow_vert)
480 {
481         framepos_t rightmost_frame = leftmost_frame + current_page_frames();
482         bool startit = false;
483
484         double const ty = _drags->current_pointer_y() - get_trackview_group_vertical_offset ();
485
486         autoscroll_y = 0;
487         autoscroll_x = 0;
488         if (ty < canvas_timebars_vsize && allow_vert) {
489                 autoscroll_y = -1;
490                 startit = true;
491         } else if (ty > _canvas_height && allow_vert) {
492                 autoscroll_y = 1;
493                 startit = true;
494         }
495
496         if (_drags->current_pointer_frame() > rightmost_frame && allow_horiz) {
497                 if (rightmost_frame < max_framepos) {
498                         autoscroll_x = 1;
499                         startit = true;
500                 }
501         } else if (_drags->current_pointer_frame() < leftmost_frame && allow_horiz) {
502                 if (leftmost_frame > 0) {
503                         autoscroll_x = -1;
504                         startit = true;
505                 }
506         }
507
508         if (autoscroll_active && ((autoscroll_x != last_autoscroll_x) || (autoscroll_y != last_autoscroll_y) || (autoscroll_x == 0 && autoscroll_y == 0))) {
509                 stop_canvas_autoscroll ();
510         }
511
512         if (startit && autoscroll_timeout_tag < 0) {
513                 start_canvas_autoscroll (autoscroll_x, autoscroll_y);
514         }
515
516         last_autoscroll_x = autoscroll_x;
517         last_autoscroll_y = autoscroll_y;
518 }
519
520 gint
521 Editor::_autoscroll_canvas (void *arg)
522 {
523         return ((Editor *) arg)->autoscroll_canvas ();
524 }
525
526 bool
527 Editor::autoscroll_canvas ()
528 {
529         framepos_t new_frame;
530         framepos_t limit = max_framepos - current_page_frames();
531         GdkEventMotion ev;
532         double new_pixel;
533         double target_pixel;
534
535         if (autoscroll_x_distance != 0) {
536
537                 if (autoscroll_x > 0) {
538                         autoscroll_x_distance = (_drags->current_pointer_frame() - (leftmost_frame + current_page_frames())) / 3;
539                 } else if (autoscroll_x < 0) {
540                         autoscroll_x_distance = (leftmost_frame - _drags->current_pointer_frame()) / 3;
541
542                 }
543         }
544
545         if (autoscroll_y_distance != 0) {
546                 if (autoscroll_y > 0) {
547                         autoscroll_y_distance = (_drags->current_pointer_y() - (get_trackview_group_vertical_offset() + _canvas_height)) / 3;
548                 } else if (autoscroll_y < 0) {
549
550                         autoscroll_y_distance = (vertical_adjustment.get_value () - _drags->current_pointer_y()) / 3;
551                 }
552         }
553
554         if (autoscroll_x < 0) {
555                 if (leftmost_frame < autoscroll_x_distance) {
556                         new_frame = 0;
557                 } else {
558                         new_frame = leftmost_frame - autoscroll_x_distance;
559                 }
560         } else if (autoscroll_x > 0) {
561                 if (leftmost_frame > limit - autoscroll_x_distance) {
562                         new_frame = limit;
563                 } else {
564                         new_frame = leftmost_frame + autoscroll_x_distance;
565                 }
566         } else {
567                 new_frame = leftmost_frame;
568         }
569
570         double vertical_pos = vertical_adjustment.get_value();
571
572         if (autoscroll_y < 0) {
573
574                 if (vertical_pos < autoscroll_y_distance) {
575                         new_pixel = 0;
576                 } else {
577                         new_pixel = vertical_pos - autoscroll_y_distance;
578                 }
579
580                 target_pixel = _drags->current_pointer_y() - autoscroll_y_distance;
581                 target_pixel = max (target_pixel, 0.0);
582
583         } else if (autoscroll_y > 0) {
584
585                 double top_of_bottom_of_canvas = full_canvas_height - _canvas_height;
586
587                 if (vertical_pos > full_canvas_height - autoscroll_y_distance) {
588                         new_pixel = full_canvas_height;
589                 } else {
590                         new_pixel = vertical_pos + autoscroll_y_distance;
591                 }
592
593                 new_pixel = min (top_of_bottom_of_canvas, new_pixel);
594
595                 target_pixel = _drags->current_pointer_y() + autoscroll_y_distance;
596
597                 /* don't move to the full canvas height because the item will be invisible
598                    (its top edge will line up with the bottom of the visible canvas.
599                 */
600
601                 target_pixel = min (target_pixel, full_canvas_height - 10);
602
603         } else {
604                 target_pixel = _drags->current_pointer_y();
605                 new_pixel = vertical_pos;
606         }
607
608         if ((new_frame == 0 || new_frame == limit) && (new_pixel == 0 || new_pixel == DBL_MAX)) {
609                 /* we are done */
610                 return false;
611         }
612
613         if (new_frame != leftmost_frame) {
614                 reset_x_origin (new_frame);
615         }
616
617         vertical_adjustment.set_value (new_pixel);
618
619         /* fake an event. */
620
621         Glib::RefPtr<Gdk::Window> canvas_window = const_cast<Editor*>(this)->track_canvas->get_window();
622         gint x, y;
623         Gdk::ModifierType mask;
624         canvas_window->get_pointer (x, y, mask);
625         ev.type = GDK_MOTION_NOTIFY;
626         ev.state = Gdk::BUTTON1_MASK;
627         ev.x = x;
628         ev.y = y;
629
630         motion_handler (0, (GdkEvent*) &ev, true);
631
632         autoscroll_cnt++;
633
634         if (autoscroll_cnt == 1) {
635
636                 /* connect the timeout so that we get called repeatedly */
637
638                 autoscroll_timeout_tag = g_idle_add ( _autoscroll_canvas, this);
639                 return false;
640
641         }
642
643         return true;
644 }
645
646 void
647 Editor::start_canvas_autoscroll (int dx, int dy)
648 {
649         if (!_session || autoscroll_active) {
650                 return;
651         }
652
653         stop_canvas_autoscroll ();
654
655         autoscroll_active = true;
656         autoscroll_x = dx;
657         autoscroll_y = dy;
658         autoscroll_x_distance = (framepos_t) floor (current_page_frames()/50.0);
659         autoscroll_y_distance = fabs (dy * 5); /* pixels */
660         autoscroll_cnt = 0;
661
662         /* do it right now, which will start the repeated callbacks */
663
664         autoscroll_canvas ();
665 }
666
667 void
668 Editor::stop_canvas_autoscroll ()
669 {
670         if (autoscroll_timeout_tag >= 0) {
671                 g_source_remove (autoscroll_timeout_tag);
672                 autoscroll_timeout_tag = -1;
673         }
674
675         autoscroll_active = false;
676 }
677
678 bool
679 Editor::left_track_canvas (GdkEventCrossing */*ev*/)
680 {
681         DropDownKeys ();
682         set_entered_track (0);
683         set_entered_regionview (0);
684         reset_canvas_action_sensitivity (false);
685         return false;
686 }
687
688 bool
689 Editor::entered_track_canvas (GdkEventCrossing */*ev*/)
690 {
691         reset_canvas_action_sensitivity (true);
692         return FALSE;
693 }
694
695 void
696 Editor::tie_vertical_scrolling ()
697 {
698         scroll_canvas_vertically ();
699
700         /* this will do an immediate redraw */
701
702         controls_layout.get_vadjustment()->set_value (vertical_adjustment.get_value());
703
704         if (pending_visual_change.idle_handler_id < 0) {
705                 _summary->set_overlays_dirty ();
706         }
707 }
708
709 void
710 Editor::set_horizontal_position (double p)
711 {
712         /* horizontal scrolling only */
713         double x1, y1, x2, y2, x_delta;
714         _master_group->get_bounds (x1, y1, x2, y2);
715
716         x_delta = - (x1 + p);
717
718         _master_group->move (x_delta, 0);
719         timebar_group->move (x_delta, 0);
720         time_line_group->move (x_delta, 0);
721         cursor_group->move (x_delta, 0);
722
723         leftmost_frame = (framepos_t) floor (p * frames_per_unit);
724
725         update_fixed_rulers ();
726         redisplay_tempo (true);
727
728         if (pending_visual_change.idle_handler_id < 0) {
729                 _summary->set_overlays_dirty ();
730         }
731
732         HorizontalPositionChanged (); /* EMIT SIGNAL */
733
734 #ifndef GTKOSX
735         if (!autoscroll_active && !_stationary_playhead) {
736                 /* force rulers and canvas to move in lock step */
737                 while (gtk_events_pending ()) {
738                         gtk_main_iteration ();
739                 }
740         }
741 #endif
742
743 }
744
745 void
746 Editor::scroll_canvas_vertically ()
747 {
748         /* vertical scrolling only */
749
750         double y_delta;
751
752         y_delta = last_trackview_group_vertical_offset - get_trackview_group_vertical_offset ();
753         _trackview_group->move (0, y_delta);
754         _background_group->move (0, y_delta);
755
756         for (TrackViewList::iterator i = track_views.begin(); i != track_views.end(); ++i) {
757                 (*i)->clip_to_viewport ();
758         }
759         last_trackview_group_vertical_offset = get_trackview_group_vertical_offset ();
760         /* required to keep the controls_layout in lock step with the canvas group */
761         update_canvas_now ();
762 }
763
764 void
765 Editor::color_handler()
766 {
767         playhead_cursor->canvas_item.property_fill_color_rgba() = ARDOUR_UI::config()->canvasvar_PlayHead.get();
768         _verbose_cursor->set_color (ARDOUR_UI::config()->canvasvar_VerboseCanvasCursor.get());
769
770         meter_bar->property_fill_color_rgba() = ARDOUR_UI::config()->canvasvar_MeterBar.get();
771         meter_bar->property_outline_color_rgba() = ARDOUR_UI::config()->canvasvar_MarkerBarSeparator.get();
772
773         tempo_bar->property_fill_color_rgba() = ARDOUR_UI::config()->canvasvar_TempoBar.get();
774         tempo_bar->property_outline_color_rgba() = ARDOUR_UI::config()->canvasvar_MarkerBarSeparator.get();
775
776         marker_bar->property_fill_color_rgba() = ARDOUR_UI::config()->canvasvar_MarkerBar.get();
777         marker_bar->property_outline_color_rgba() = ARDOUR_UI::config()->canvasvar_MarkerBarSeparator.get();
778
779         cd_marker_bar->property_fill_color_rgba() = ARDOUR_UI::config()->canvasvar_CDMarkerBar.get();
780         cd_marker_bar->property_outline_color_rgba() = ARDOUR_UI::config()->canvasvar_MarkerBarSeparator.get();
781
782         range_marker_bar->property_fill_color_rgba() = ARDOUR_UI::config()->canvasvar_RangeMarkerBar.get();
783         range_marker_bar->property_outline_color_rgba() = ARDOUR_UI::config()->canvasvar_MarkerBarSeparator.get();
784
785         transport_marker_bar->property_fill_color_rgba() = ARDOUR_UI::config()->canvasvar_TransportMarkerBar.get();
786         transport_marker_bar->property_outline_color_rgba() = ARDOUR_UI::config()->canvasvar_MarkerBarSeparator.get();
787
788         cd_marker_bar_drag_rect->property_fill_color_rgba() = ARDOUR_UI::config()->canvasvar_RangeDragBarRect.get();
789         cd_marker_bar_drag_rect->property_outline_color_rgba() = ARDOUR_UI::config()->canvasvar_RangeDragBarRect.get();
790
791         range_bar_drag_rect->property_fill_color_rgba() = ARDOUR_UI::config()->canvasvar_RangeDragBarRect.get();
792         range_bar_drag_rect->property_outline_color_rgba() = ARDOUR_UI::config()->canvasvar_RangeDragBarRect.get();
793
794         transport_bar_drag_rect->property_fill_color_rgba() = ARDOUR_UI::config()->canvasvar_TransportDragRect.get();
795         transport_bar_drag_rect->property_outline_color_rgba() = ARDOUR_UI::config()->canvasvar_TransportDragRect.get();
796
797         transport_loop_range_rect->property_fill_color_rgba() = ARDOUR_UI::config()->canvasvar_TransportLoopRect.get();
798         transport_loop_range_rect->property_outline_color_rgba() = ARDOUR_UI::config()->canvasvar_TransportLoopRect.get();
799
800         transport_punch_range_rect->property_fill_color_rgba() = ARDOUR_UI::config()->canvasvar_TransportPunchRect.get();
801         transport_punch_range_rect->property_outline_color_rgba() = ARDOUR_UI::config()->canvasvar_TransportPunchRect.get();
802
803         transport_punchin_line->property_color_rgba() = ARDOUR_UI::config()->canvasvar_PunchLine.get();
804         transport_punchout_line->property_color_rgba() = ARDOUR_UI::config()->canvasvar_PunchLine.get();
805
806         zoom_rect->property_fill_color_rgba() = ARDOUR_UI::config()->canvasvar_ZoomRect.get();
807         zoom_rect->property_outline_color_rgba() = ARDOUR_UI::config()->canvasvar_ZoomRect.get();
808
809         rubberband_rect->property_outline_color_rgba() = ARDOUR_UI::config()->canvasvar_RubberBandRect.get();
810         rubberband_rect->property_fill_color_rgba() = (guint32) ARDOUR_UI::config()->canvasvar_RubberBandRect.get();
811
812         location_marker_color = ARDOUR_UI::config()->canvasvar_LocationMarker.get();
813         location_range_color = ARDOUR_UI::config()->canvasvar_LocationRange.get();
814         location_cd_marker_color = ARDOUR_UI::config()->canvasvar_LocationCDMarker.get();
815         location_loop_color = ARDOUR_UI::config()->canvasvar_LocationLoop.get();
816         location_punch_color = ARDOUR_UI::config()->canvasvar_LocationPunch.get();
817
818         refresh_location_display ();
819 /*
820         redisplay_tempo (true);
821
822         if (_session)
823               _session->tempo_map().apply_with_metrics (*this, &Editor::draw_metric_marks); // redraw metric markers
824 */
825 }
826
827 void
828 Editor::flush_canvas ()
829 {
830         if (is_mapped()) {
831                 update_canvas_now ();
832                 // gdk_window_process_updates (GTK_LAYOUT(track_canvas->gobj())->bin_window, true);
833         }
834 }
835
836 void
837 Editor::update_canvas_now ()
838 {
839         /* GnomeCanvas has a bug whereby if its idle handler is not scheduled between
840            two calls to update_now, an assert will trip.  This wrapper works around
841            that problem by only calling update_now if the assert will not trip.
842
843            I think the GC bug is due to the fact that its code will reset need_update
844            and need_redraw to FALSE without checking to see if an idle handler is scheduled.
845            If one is scheduled, GC should probably remove it.
846         */
847
848         GnomeCanvas* c = track_canvas->gobj ();
849         if (c->need_update || c->need_redraw) {
850                 track_canvas->update_now ();
851         }
852 }
853
854 double
855 Editor::horizontal_position () const
856 {
857         return frame_to_unit (leftmost_frame);
858 }
859 void
860 Editor::set_canvas_cursor (Gdk::Cursor* cursor, bool save)
861 {
862         if (save) {
863                 current_canvas_cursor = cursor;
864         }
865
866         if (is_drawable()) {
867                 track_canvas->get_window()->set_cursor (*cursor);
868         }
869 }
870
871 bool
872 Editor::track_canvas_key_press (GdkEventKey* event)
873 {
874         /* XXX: event does not report the modifier key pressed down, AFAICS, so use the Keyboard object instead */
875         if (mouse_mode == Editing::MouseZoom && Keyboard::the_keyboard().key_is_down (GDK_Control_L)) {
876                 set_canvas_cursor (_cursors->zoom_out, true);
877         }
878
879         return false;
880 }
881
882 bool
883 Editor::track_canvas_key_release (GdkEventKey* event)
884 {
885         if (mouse_mode == Editing::MouseZoom && !Keyboard::the_keyboard().key_is_down (GDK_Control_L)) {
886                 set_canvas_cursor (_cursors->zoom_in, true);
887         }
888
889         return false;
890 }