Fix flickering timeline drags on Windows (#2625).
[dcpomatic.git] / src / wx / timeline.cc
1 /*
2     Copyright (C) 2013-2021 Carl Hetherington <cth@carlh.net>
3
4     This file is part of DCP-o-matic.
5
6     DCP-o-matic is free software; you can redistribute it and/or modify
7     it under the terms of the GNU General Public License as published by
8     the Free Software Foundation; either version 2 of the License, or
9     (at your option) any later version.
10
11     DCP-o-matic is distributed in the hope that it will be useful,
12     but WITHOUT ANY WARRANTY; without even the implied warranty of
13     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14     GNU General Public License for more details.
15
16     You should have received a copy of the GNU General Public License
17     along with DCP-o-matic.  If not, see <http://www.gnu.org/licenses/>.
18
19 */
20
21 #include "content_panel.h"
22 #include "film_editor.h"
23 #include "film_viewer.h"
24 #include "timeline.h"
25 #include "timeline_atmos_content_view.h"
26 #include "timeline_audio_content_view.h"
27 #include "timeline_labels_view.h"
28 #include "timeline_reels_view.h"
29 #include "timeline_text_content_view.h"
30 #include "timeline_time_axis_view.h"
31 #include "timeline_video_content_view.h"
32 #include "wx_util.h"
33 #include "lib/atmos_mxf_content.h"
34 #include "lib/audio_content.h"
35 #include "lib/film.h"
36 #include "lib/image_content.h"
37 #include "lib/playlist.h"
38 #include "lib/scope_guard.h"
39 #include "lib/text_content.h"
40 #include "lib/timer.h"
41 #include "lib/video_content.h"
42 #include <dcp/warnings.h>
43 LIBDCP_DISABLE_WARNINGS
44 #include <wx/graphics.h>
45 LIBDCP_ENABLE_WARNINGS
46 #include <iterator>
47 #include <list>
48
49
50 using std::abs;
51 using std::dynamic_pointer_cast;
52 using std::list;
53 using std::make_shared;
54 using std::max;
55 using std::min;
56 using std::shared_ptr;
57 using std::weak_ptr;
58 using boost::bind;
59 using boost::optional;
60 using namespace dcpomatic;
61 #if BOOST_VERSION >= 106100
62 using namespace boost::placeholders;
63 #endif
64
65
66 /* 3 hours in 640 pixels */
67 double const Timeline::_minimum_pixels_per_second = 640.0 / (60 * 60 * 3);
68 int const Timeline::_minimum_pixels_per_track = 16;
69
70
71 Timeline::Timeline(wxWindow* parent, ContentPanel* cp, shared_ptr<Film> film, FilmViewer& viewer)
72         : wxPanel (parent, wxID_ANY)
73         , _labels_canvas (new wxScrolledCanvas (this, wxID_ANY, wxDefaultPosition, wxDefaultSize, wxFULL_REPAINT_ON_RESIZE))
74         , _main_canvas (new wxScrolledCanvas (this, wxID_ANY, wxDefaultPosition, wxDefaultSize, wxFULL_REPAINT_ON_RESIZE))
75         , _content_panel (cp)
76         , _film (film)
77         , _viewer (viewer)
78         , _time_axis_view (new TimelineTimeAxisView (*this, 64))
79         , _reels_view (new TimelineReelsView (*this, 32))
80         , _labels_view (new TimelineLabelsView (*this))
81         , _tracks (0)
82         , _left_down (false)
83         , _down_view_position (0)
84         , _first_move (false)
85         , _menu (this, viewer)
86         , _snap (true)
87         , _tool (SELECT)
88         , _x_scroll_rate (16)
89         , _y_scroll_rate (16)
90         , _pixels_per_track (48)
91         , _first_resize (true)
92         , _timer (this)
93 {
94 #ifndef __WXOSX__
95         _labels_canvas->SetDoubleBuffered (true);
96         _main_canvas->SetDoubleBuffered (true);
97 #endif
98
99         auto sizer = new wxBoxSizer (wxHORIZONTAL);
100         sizer->Add (_labels_canvas, 0, wxEXPAND);
101         _labels_canvas->SetMinSize (wxSize (_labels_view->bbox().width, -1));
102         sizer->Add (_main_canvas, 1, wxEXPAND);
103         SetSizer (sizer);
104
105         _labels_canvas->Bind (wxEVT_PAINT,      boost::bind (&Timeline::paint_labels, this));
106         _main_canvas->Bind   (wxEVT_PAINT,      boost::bind (&Timeline::paint_main,   this));
107         _main_canvas->Bind   (wxEVT_LEFT_DOWN,  boost::bind (&Timeline::left_down,    this, _1));
108         _main_canvas->Bind   (wxEVT_LEFT_UP,    boost::bind (&Timeline::left_up,      this, _1));
109         _main_canvas->Bind   (wxEVT_RIGHT_DOWN, boost::bind (&Timeline::right_down,   this, _1));
110         _main_canvas->Bind   (wxEVT_MOTION,     boost::bind (&Timeline::mouse_moved,  this, _1));
111         _main_canvas->Bind   (wxEVT_SIZE,       boost::bind (&Timeline::resized,      this));
112         _main_canvas->Bind   (wxEVT_SCROLLWIN_TOP,        boost::bind (&Timeline::scrolled,     this, _1));
113         _main_canvas->Bind   (wxEVT_SCROLLWIN_BOTTOM,     boost::bind (&Timeline::scrolled,     this, _1));
114         _main_canvas->Bind   (wxEVT_SCROLLWIN_LINEUP,     boost::bind (&Timeline::scrolled,     this, _1));
115         _main_canvas->Bind   (wxEVT_SCROLLWIN_LINEDOWN,   boost::bind (&Timeline::scrolled,     this, _1));
116         _main_canvas->Bind   (wxEVT_SCROLLWIN_PAGEUP,     boost::bind (&Timeline::scrolled,     this, _1));
117         _main_canvas->Bind   (wxEVT_SCROLLWIN_PAGEDOWN,   boost::bind (&Timeline::scrolled,     this, _1));
118         _main_canvas->Bind   (wxEVT_SCROLLWIN_THUMBTRACK, boost::bind (&Timeline::scrolled,     this, _1));
119
120         film_change(ChangeType::DONE, FilmProperty::CONTENT);
121
122         SetMinSize (wxSize (640, 4 * pixels_per_track() + 96));
123
124         _film_changed_connection = film->Change.connect (bind (&Timeline::film_change, this, _1, _2));
125         _film_content_change_connection = film->ContentChange.connect (bind (&Timeline::film_content_change, this, _1, _3, _4));
126
127         Bind (wxEVT_TIMER, boost::bind(&Timeline::update_playhead, this));
128         _timer.Start (200, wxTIMER_CONTINUOUS);
129
130         setup_scrollbars ();
131         _labels_canvas->ShowScrollbars (wxSHOW_SB_NEVER, wxSHOW_SB_NEVER);
132 }
133
134
135 void
136 Timeline::update_playhead ()
137 {
138         Refresh ();
139 }
140
141
142 void
143 Timeline::set_pixels_per_second (double pps)
144 {
145         _pixels_per_second = max (_minimum_pixels_per_second, pps);
146 }
147
148
149 void
150 Timeline::paint_labels ()
151 {
152         wxPaintDC dc (_labels_canvas);
153
154         auto film = _film.lock();
155         if (film->content().empty()) {
156                 return;
157         }
158
159         auto gc = wxGraphicsContext::Create (dc);
160         if (!gc) {
161                 return;
162         }
163
164         ScopeGuard sg = [gc]() { delete gc; };
165
166         int vsx, vsy;
167         _labels_canvas->GetViewStart (&vsx, &vsy);
168         gc->Translate (-vsx * _x_scroll_rate, -vsy * _y_scroll_rate + tracks_y_offset());
169
170         _labels_view->paint (gc, {});
171 }
172
173
174 void
175 Timeline::paint_main ()
176 {
177         wxPaintDC dc (_main_canvas);
178         dc.Clear();
179
180         auto film = _film.lock();
181         if (film->content().empty()) {
182                 return;
183         }
184
185         _main_canvas->DoPrepareDC (dc);
186
187         auto gc = wxGraphicsContext::Create (dc);
188         if (!gc) {
189                 return;
190         }
191
192         ScopeGuard sg = [gc]() { delete gc; };
193
194         gc->SetAntialiasMode (wxANTIALIAS_DEFAULT);
195
196         for (auto i: _views) {
197
198                 auto ic = dynamic_pointer_cast<TimelineContentView> (i);
199
200                 /* Find areas of overlap with other content views, so that we can plot them */
201                 list<dcpomatic::Rect<int>> overlaps;
202                 for (auto j: _views) {
203                         auto jc = dynamic_pointer_cast<TimelineContentView> (j);
204                         /* No overlap with non-content views, views on different tracks, audio views or non-active views */
205                         if (!ic || !jc || i == j || ic->track() != jc->track() || ic->track().get_value_or(2) >= 2 || !ic->active() || !jc->active()) {
206                                 continue;
207                         }
208
209                         auto r = j->bbox().intersection(i->bbox());
210                         if (r) {
211                                 overlaps.push_back (r.get ());
212                         }
213                 }
214
215                 i->paint (gc, overlaps);
216         }
217
218         if (_zoom_point) {
219                 gc->SetPen(gui_is_dark() ? *wxWHITE_PEN : *wxBLACK_PEN);
220                 gc->SetBrush (*wxTRANSPARENT_BRUSH);
221                 gc->DrawRectangle (
222                         min (_down_point.x, _zoom_point->x),
223                         min (_down_point.y, _zoom_point->y),
224                         abs (_down_point.x - _zoom_point->x),
225                         abs (_down_point.y - _zoom_point->y)
226                         );
227         }
228
229         /* Playhead */
230
231         gc->SetPen (*wxRED_PEN);
232         auto path = gc->CreatePath ();
233         double const ph = _viewer.position().seconds() * pixels_per_second().get_value_or(0);
234         path.MoveToPoint (ph, 0);
235         path.AddLineToPoint (ph, pixels_per_track() * _tracks + 32);
236         gc->StrokePath (path);
237 }
238
239
240 void
241 Timeline::film_change(ChangeType type, FilmProperty p)
242 {
243         if (type != ChangeType::DONE) {
244                 return;
245         }
246
247         if (p == FilmProperty::CONTENT || p == FilmProperty::REEL_TYPE || p == FilmProperty::REEL_LENGTH) {
248                 ensure_ui_thread ();
249                 recreate_views ();
250         } else if (p == FilmProperty::CONTENT_ORDER) {
251                 Refresh ();
252         }
253 }
254
255
256 void
257 Timeline::recreate_views ()
258 {
259         auto film = _film.lock ();
260         if (!film) {
261                 return;
262         }
263
264         _views.clear ();
265         _views.push_back (_time_axis_view);
266         _views.push_back (_reels_view);
267
268         for (auto i: film->content ()) {
269                 if (i->video) {
270                         _views.push_back (make_shared<TimelineVideoContentView>(*this, i));
271                 }
272
273                 if (i->audio && !i->audio->mapping().mapped_output_channels().empty ()) {
274                         _views.push_back (make_shared<TimelineAudioContentView>(*this, i));
275                 }
276
277                 for (auto j: i->text) {
278                         _views.push_back (make_shared<TimelineTextContentView>(*this, i, j));
279                 }
280
281                 if (i->atmos) {
282                         _views.push_back (make_shared<TimelineAtmosContentView>(*this, i));
283                 }
284         }
285
286         assign_tracks ();
287         setup_scrollbars ();
288         Refresh ();
289 }
290
291
292 void
293 Timeline::film_content_change (ChangeType type, int property, bool frequent)
294 {
295         if (type != ChangeType::DONE) {
296                 return;
297         }
298
299         ensure_ui_thread ();
300
301         if (property == AudioContentProperty::STREAMS || property == VideoContentProperty::FRAME_TYPE) {
302                 recreate_views ();
303         } else if (property == ContentProperty::POSITION || property == ContentProperty::LENGTH) {
304                 _reels_view->force_redraw ();
305         } else if (!frequent) {
306                 setup_scrollbars ();
307                 Refresh ();
308         }
309 }
310
311
312 template <class T>
313 int
314 place (shared_ptr<const Film> film, TimelineViewList& views, int& tracks)
315 {
316         int const base = tracks;
317
318         for (auto i: views) {
319                 if (!dynamic_pointer_cast<T>(i)) {
320                         continue;
321                 }
322
323                 auto cv = dynamic_pointer_cast<TimelineContentView> (i);
324
325                 int t = base;
326
327                 auto content = cv->content();
328                 DCPTimePeriod const content_period = content->period(film);
329
330                 while (true) {
331                         auto j = views.begin();
332                         while (j != views.end()) {
333                                 auto test = dynamic_pointer_cast<T> (*j);
334                                 if (!test) {
335                                         ++j;
336                                         continue;
337                                 }
338
339                                 auto test_content = test->content();
340                                 if (
341                                         test->track() && test->track().get() == t &&
342                                         content_period.overlap(test_content->period(film))
343                                    ) {
344                                         /* we have an overlap on track `t' */
345                                         ++t;
346                                         break;
347                                 }
348
349                                 ++j;
350                         }
351
352                         if (j == views.end ()) {
353                                 /* no overlap on `t' */
354                                 break;
355                         }
356                 }
357
358                 cv->set_track (t);
359                 tracks = max (tracks, t + 1);
360         }
361
362         return tracks - base;
363 }
364
365
366 /** Compare the mapped output channels of two TimelineViews, so we can into
367  *  order of first mapped DCP channel.
368  */
369 struct AudioMappingComparator {
370         bool operator()(shared_ptr<TimelineView> a, shared_ptr<TimelineView> b) {
371                 int la = -1;
372                 auto cva = dynamic_pointer_cast<TimelineAudioContentView>(a);
373                 if (cva) {
374                         auto oc = cva->content()->audio->mapping().mapped_output_channels();
375                         la = *min_element(boost::begin(oc), boost::end(oc));
376                 }
377                 int lb = -1;
378                 auto cvb = dynamic_pointer_cast<TimelineAudioContentView>(b);
379                 if (cvb) {
380                         auto oc = cvb->content()->audio->mapping().mapped_output_channels();
381                         lb = *min_element(boost::begin(oc), boost::end(oc));
382                 }
383                 return la < lb;
384         }
385 };
386
387
388 void
389 Timeline::assign_tracks ()
390 {
391         /* Tracks are:
392            Video 1
393            Video 2
394            Video N
395            Text 1
396            Text 2
397            Text N
398            Atmos
399            Audio 1
400            Audio 2
401            Audio N
402         */
403
404         auto film = _film.lock ();
405         DCPOMATIC_ASSERT (film);
406
407         _tracks = 0;
408
409         for (auto i: _views) {
410                 auto c = dynamic_pointer_cast<TimelineContentView>(i);
411                 if (c) {
412                         c->unset_track ();
413                 }
414         }
415
416         int const video_tracks = place<TimelineVideoContentView> (film, _views, _tracks);
417         int const text_tracks = place<TimelineTextContentView> (film, _views, _tracks);
418
419         /* Atmos */
420
421         bool have_atmos = false;
422         for (auto i: _views) {
423                 auto cv = dynamic_pointer_cast<TimelineAtmosContentView>(i);
424                 if (cv) {
425                         cv->set_track (_tracks);
426                         have_atmos = true;
427                 }
428         }
429
430         if (have_atmos) {
431                 ++_tracks;
432         }
433
434         /* Audio.  We're sorting the views so that we get the audio views in order of increasing
435            DCP channel index.
436         */
437
438         auto views = _views;
439         sort(views.begin(), views.end(), AudioMappingComparator());
440         int const audio_tracks = place<TimelineAudioContentView> (film, views, _tracks);
441
442         _labels_view->set_video_tracks (video_tracks);
443         _labels_view->set_audio_tracks (audio_tracks);
444         _labels_view->set_text_tracks (text_tracks);
445         _labels_view->set_atmos (have_atmos);
446
447         _time_axis_view->set_y (tracks());
448         _reels_view->set_y (8);
449 }
450
451
452 int
453 Timeline::tracks () const
454 {
455         return _tracks;
456 }
457
458
459 void
460 Timeline::setup_scrollbars ()
461 {
462         auto film = _film.lock ();
463         if (!film || !_pixels_per_second) {
464                 return;
465         }
466
467         int const h = tracks() * pixels_per_track() + tracks_y_offset() + _time_axis_view->bbox().height;
468
469         _labels_canvas->SetVirtualSize (_labels_view->bbox().width, h);
470         _labels_canvas->SetScrollRate (_x_scroll_rate, _y_scroll_rate);
471         _main_canvas->SetVirtualSize (*_pixels_per_second * film->length().seconds(), h);
472         _main_canvas->SetScrollRate (_x_scroll_rate, _y_scroll_rate);
473 }
474
475
476 shared_ptr<TimelineView>
477 Timeline::event_to_view (wxMouseEvent& ev)
478 {
479         /* Search backwards through views so that we find the uppermost one first */
480         auto i = _views.rbegin();
481
482         int vsx, vsy;
483         _main_canvas->GetViewStart (&vsx, &vsy);
484         Position<int> const p (ev.GetX() + vsx * _x_scroll_rate, ev.GetY() + vsy * _y_scroll_rate);
485
486         while (i != _views.rend() && !(*i)->bbox().contains (p)) {
487                 ++i;
488         }
489
490         if (i == _views.rend ()) {
491                 return {};
492         }
493
494         return *i;
495 }
496
497
498 void
499 Timeline::left_down (wxMouseEvent& ev)
500 {
501         _left_down = true;
502         _down_point = ev.GetPosition ();
503
504         switch (_tool) {
505         case SELECT:
506                 left_down_select (ev);
507                 break;
508         case ZOOM:
509         case ZOOM_ALL:
510         case SNAP:
511         case SEQUENCE:
512                 /* Nothing to do */
513                 break;
514         }
515 }
516
517
518 void
519 Timeline::left_down_select (wxMouseEvent& ev)
520 {
521         auto view = event_to_view (ev);
522         auto content_view = dynamic_pointer_cast<TimelineContentView>(view);
523
524         _down_view.reset ();
525
526         if (content_view) {
527                 _down_view = content_view;
528                 _down_view_position = content_view->content()->position ();
529         }
530
531         if (dynamic_pointer_cast<TimelineTimeAxisView>(view)) {
532                 int vsx, vsy;
533                 _main_canvas->GetViewStart(&vsx, &vsy);
534                 _viewer.seek(DCPTime::from_seconds((ev.GetPosition().x + vsx * _x_scroll_rate) / _pixels_per_second.get_value_or(1)), true);
535         }
536
537         for (auto i: _views) {
538                 auto cv = dynamic_pointer_cast<TimelineContentView>(i);
539                 if (!cv) {
540                         continue;
541                 }
542
543                 if (!ev.ShiftDown ()) {
544                         cv->set_selected (view == i);
545                 }
546         }
547
548         if (content_view && ev.ShiftDown ()) {
549                 content_view->set_selected (!content_view->selected ());
550         }
551
552         _first_move = false;
553
554         if (_down_view) {
555                 /* Pre-compute the points that we might snap to */
556                 for (auto i: _views) {
557                         auto cv = dynamic_pointer_cast<TimelineContentView>(i);
558                         if (!cv || cv == _down_view || cv->content() == _down_view->content()) {
559                                 continue;
560                         }
561
562                         auto film = _film.lock ();
563                         DCPOMATIC_ASSERT (film);
564
565                         _start_snaps.push_back (cv->content()->position());
566                         _end_snaps.push_back (cv->content()->position());
567                         _start_snaps.push_back (cv->content()->end(film));
568                         _end_snaps.push_back (cv->content()->end(film));
569
570                         for (auto i: cv->content()->reel_split_points(film)) {
571                                 _start_snaps.push_back (i);
572                         }
573                 }
574
575                 /* Tell everyone that things might change frequently during the drag */
576                 _down_view->content()->set_change_signals_frequent (true);
577         }
578 }
579
580
581 void
582 Timeline::left_up (wxMouseEvent& ev)
583 {
584         _left_down = false;
585
586         switch (_tool) {
587         case SELECT:
588                 left_up_select (ev);
589                 break;
590         case ZOOM:
591                 left_up_zoom (ev);
592                 break;
593         case ZOOM_ALL:
594         case SNAP:
595         case SEQUENCE:
596                 break;
597         }
598 }
599
600
601 void
602 Timeline::left_up_select (wxMouseEvent& ev)
603 {
604         if (_down_view) {
605                 _down_view->content()->set_change_signals_frequent (false);
606         }
607
608         _content_panel->set_selection (selected_content ());
609         /* Since we may have just set change signals back to `not-frequent', we have to
610            make sure this position change is signalled, even if the position value has
611            not changed since the last time it was set (with frequent=true).  This is
612            a bit of a hack.
613         */
614         set_position_from_event (ev, true);
615
616         /* Clear up up the stuff we don't do during drag */
617         assign_tracks ();
618         setup_scrollbars ();
619         Refresh ();
620
621         _start_snaps.clear ();
622         _end_snaps.clear ();
623 }
624
625
626 void
627 Timeline::left_up_zoom (wxMouseEvent& ev)
628 {
629         _zoom_point = ev.GetPosition ();
630
631         int vsx, vsy;
632         _main_canvas->GetViewStart (&vsx, &vsy);
633
634         wxPoint top_left(min(_down_point.x, _zoom_point->x), min(_down_point.y, _zoom_point->y));
635         wxPoint bottom_right(max(_down_point.x, _zoom_point->x), max(_down_point.y, _zoom_point->y));
636
637         if ((bottom_right.x - top_left.x) < 8 || (bottom_right.y - top_left.y) < 8) {
638                 /* Very small zoom rectangle: we assume it wasn't intentional */
639                 _zoom_point = optional<wxPoint> ();
640                 Refresh ();
641                 return;
642         }
643
644         auto const time_left = DCPTime::from_seconds((top_left.x + vsx) / *_pixels_per_second);
645         auto const time_right = DCPTime::from_seconds((bottom_right.x + vsx) / *_pixels_per_second);
646         set_pixels_per_second (double(GetSize().GetWidth()) / (time_right.seconds() - time_left.seconds()));
647
648         double const tracks_top = double(top_left.y - tracks_y_offset()) / _pixels_per_track;
649         double const tracks_bottom = double(bottom_right.y - tracks_y_offset()) / _pixels_per_track;
650         set_pixels_per_track (lrint(GetSize().GetHeight() / (tracks_bottom - tracks_top)));
651
652         setup_scrollbars ();
653         int const y = (tracks_top * _pixels_per_track + tracks_y_offset()) / _y_scroll_rate;
654         _main_canvas->Scroll (time_left.seconds() * *_pixels_per_second / _x_scroll_rate, y);
655         _labels_canvas->Scroll (0, y);
656
657         _zoom_point = optional<wxPoint> ();
658         Refresh ();
659 }
660
661
662 void
663 Timeline::set_pixels_per_track (int h)
664 {
665         _pixels_per_track = max(_minimum_pixels_per_track, h);
666 }
667
668
669 void
670 Timeline::mouse_moved (wxMouseEvent& ev)
671 {
672         switch (_tool) {
673         case SELECT:
674                 mouse_moved_select (ev);
675                 break;
676         case ZOOM:
677                 mouse_moved_zoom (ev);
678                 break;
679         case ZOOM_ALL:
680         case SNAP:
681         case SEQUENCE:
682                 break;
683         }
684 }
685
686
687 void
688 Timeline::mouse_moved_select (wxMouseEvent& ev)
689 {
690         if (!_left_down) {
691                 return;
692         }
693
694         set_position_from_event (ev);
695 }
696
697
698 void
699 Timeline::mouse_moved_zoom (wxMouseEvent& ev)
700 {
701         if (!_left_down) {
702                 return;
703         }
704
705         _zoom_point = ev.GetPosition ();
706         setup_scrollbars();
707         Refresh ();
708 }
709
710
711 void
712 Timeline::right_down (wxMouseEvent& ev)
713 {
714         switch (_tool) {
715         case SELECT:
716                 right_down_select (ev);
717                 break;
718         case ZOOM:
719                 /* Zoom out */
720                 set_pixels_per_second (*_pixels_per_second / 2);
721                 set_pixels_per_track (_pixels_per_track / 2);
722                 setup_scrollbars ();
723                 Refresh ();
724                 break;
725         case ZOOM_ALL:
726         case SNAP:
727         case SEQUENCE:
728                 break;
729         }
730 }
731
732
733 void
734 Timeline::right_down_select (wxMouseEvent& ev)
735 {
736         auto view = event_to_view (ev);
737         auto cv = dynamic_pointer_cast<TimelineContentView> (view);
738         if (!cv) {
739                 return;
740         }
741
742         if (!cv->selected ()) {
743                 clear_selection ();
744                 cv->set_selected (true);
745         }
746
747         _menu.popup (_film, selected_content (), selected_views (), ev.GetPosition ());
748 }
749
750
751 void
752 Timeline::maybe_snap (DCPTime a, DCPTime b, optional<DCPTime>& nearest_distance) const
753 {
754         auto const d = a - b;
755         if (!nearest_distance || d.abs() < nearest_distance.get().abs()) {
756                 nearest_distance = d;
757         }
758 }
759
760
761 void
762 Timeline::set_position_from_event (wxMouseEvent& ev, bool force_emit)
763 {
764         if (!_pixels_per_second) {
765                 return;
766         }
767
768         double const pps = _pixels_per_second.get ();
769
770         auto const p = ev.GetPosition();
771
772         if (!_first_move) {
773                 /* We haven't moved yet; in that case, we must move the mouse some reasonable distance
774                    before the drag is considered to have started.
775                 */
776                 int const dist = sqrt (pow (p.x - _down_point.x, 2) + pow (p.y - _down_point.y, 2));
777                 if (dist < 8) {
778                         return;
779                 }
780                 _first_move = true;
781         }
782
783         if (!_down_view) {
784                 return;
785         }
786
787         auto new_position = _down_view_position + DCPTime::from_seconds ((p.x - _down_point.x) / pps);
788
789         auto film = _film.lock ();
790         DCPOMATIC_ASSERT (film);
791
792         if (_snap) {
793                 auto const new_end = new_position + _down_view->content()->length_after_trim(film);
794                 /* Signed `distance' to nearest thing (i.e. negative is left on the timeline,
795                    positive is right).
796                 */
797                 optional<DCPTime> nearest_distance;
798
799                 /* Find the nearest snap point */
800
801                 for (auto i: _start_snaps) {
802                         maybe_snap (i, new_position, nearest_distance);
803                 }
804
805                 for (auto i: _end_snaps) {
806                         maybe_snap (i, new_end, nearest_distance);
807                 }
808
809                 if (nearest_distance) {
810                         /* Snap if it's close; `close' means within a proportion of the time on the timeline */
811                         if (nearest_distance.get().abs() < DCPTime::from_seconds ((width() / pps) / 64)) {
812                                 new_position += nearest_distance.get ();
813                         }
814                 }
815         }
816
817         if (new_position < DCPTime ()) {
818                 new_position = DCPTime ();
819         }
820
821         _down_view->content()->set_position (film, new_position, force_emit);
822
823         film->set_sequence (false);
824 }
825
826
827 void
828 Timeline::force_redraw (dcpomatic::Rect<int> const & r)
829 {
830         _main_canvas->RefreshRect (wxRect (r.x, r.y, r.width, r.height), false);
831 }
832
833
834 shared_ptr<const Film>
835 Timeline::film () const
836 {
837         return _film.lock ();
838 }
839
840
841 void
842 Timeline::resized ()
843 {
844         if (_main_canvas->GetSize().GetWidth() > 0 && _first_resize) {
845                 zoom_all ();
846                 _first_resize = false;
847         }
848         setup_scrollbars ();
849 }
850
851
852 void
853 Timeline::clear_selection ()
854 {
855         for (auto i: _views) {
856                 shared_ptr<TimelineContentView> cv = dynamic_pointer_cast<TimelineContentView>(i);
857                 if (cv) {
858                         cv->set_selected (false);
859                 }
860         }
861 }
862
863
864 TimelineContentViewList
865 Timeline::selected_views () const
866 {
867         TimelineContentViewList sel;
868
869         for (auto i: _views) {
870                 auto cv = dynamic_pointer_cast<TimelineContentView>(i);
871                 if (cv && cv->selected()) {
872                         sel.push_back (cv);
873                 }
874         }
875
876         return sel;
877 }
878
879
880 ContentList
881 Timeline::selected_content () const
882 {
883         ContentList sel;
884
885         for (auto i: selected_views()) {
886                 sel.push_back(i->content());
887         }
888
889         return sel;
890 }
891
892
893 void
894 Timeline::set_selection (ContentList selection)
895 {
896         for (auto i: _views) {
897                 auto cv = dynamic_pointer_cast<TimelineContentView> (i);
898                 if (cv) {
899                         cv->set_selected (find (selection.begin(), selection.end(), cv->content ()) != selection.end ());
900                 }
901         }
902 }
903
904
905 int
906 Timeline::tracks_y_offset () const
907 {
908         return _reels_view->bbox().height + 4;
909 }
910
911
912 int
913 Timeline::width () const
914 {
915         return _main_canvas->GetVirtualSize().GetWidth();
916 }
917
918
919 void
920 Timeline::scrolled (wxScrollWinEvent& ev)
921 {
922         if (ev.GetOrientation() == wxVERTICAL) {
923                 int x, y;
924                 _main_canvas->GetViewStart (&x, &y);
925                 _labels_canvas->Scroll (0, y);
926         }
927         ev.Skip ();
928 }
929
930
931 void
932 Timeline::tool_clicked (Tool t)
933 {
934         switch (t) {
935         case ZOOM:
936         case SELECT:
937                 _tool = t;
938                 break;
939         case ZOOM_ALL:
940                 zoom_all ();
941                 break;
942         case SNAP:
943         case SEQUENCE:
944                 break;
945         }
946 }
947
948
949 void
950 Timeline::zoom_all ()
951 {
952         auto film = _film.lock ();
953         DCPOMATIC_ASSERT (film);
954         set_pixels_per_second((_main_canvas->GetSize().GetWidth() - 32) / std::max(1.0, film->length().seconds()));
955         set_pixels_per_track((_main_canvas->GetSize().GetHeight() - tracks_y_offset() - _time_axis_view->bbox().height - 32) / std::max(1, _tracks));
956         setup_scrollbars ();
957         _main_canvas->Scroll (0, 0);
958         _labels_canvas->Scroll (0, 0);
959         Refresh ();
960 }
961
962
963 void
964 Timeline::keypress(wxKeyEvent const& event)
965 {
966         if (event.GetKeyCode() == WXK_DELETE) {
967                 auto film = _film.lock();
968                 DCPOMATIC_ASSERT(film);
969                 film->remove_content(selected_content());
970         } else {
971                 switch (event.GetRawKeyCode()) {
972                 case '+':
973                         set_pixels_per_second(_pixels_per_second.get_value_or(1) * 2);
974                         setup_scrollbars();
975                         break;
976                 case '-':
977                         set_pixels_per_second(_pixels_per_second.get_value_or(1) / 2);
978                         setup_scrollbars();
979                         break;
980                 }
981         }
982 }
983