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