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