No-op; fix GPL address and use the explicit-program-name version.
[dcpomatic.git] / src / wx / film_viewer.cc
1 /*
2     Copyright (C) 2012-2016 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 /** @file  src/film_viewer.cc
22  *  @brief A wx widget to view a preview of a Film.
23  */
24
25 #include "lib/film.h"
26 #include "lib/ratio.h"
27 #include "lib/util.h"
28 #include "lib/job_manager.h"
29 #include "lib/image.h"
30 #include "lib/exceptions.h"
31 #include "lib/examine_content_job.h"
32 #include "lib/filter.h"
33 #include "lib/player.h"
34 #include "lib/player_video.h"
35 #include "lib/video_content.h"
36 #include "lib/video_decoder.h"
37 #include "lib/timer.h"
38 #include "lib/log.h"
39 #include "film_viewer.h"
40 #include "wx_util.h"
41 extern "C" {
42 #include <libavutil/pixfmt.h>
43 }
44 #include <dcp/exceptions.h>
45 #include <wx/tglbtn.h>
46 #include <iostream>
47 #include <iomanip>
48
49 using std::string;
50 using std::pair;
51 using std::min;
52 using std::max;
53 using std::cout;
54 using std::list;
55 using std::bad_alloc;
56 using std::make_pair;
57 using std::exception;
58 using boost::shared_ptr;
59 using boost::dynamic_pointer_cast;
60 using boost::weak_ptr;
61 using boost::optional;
62 using dcp::Size;
63
64 FilmViewer::FilmViewer (wxWindow* p)
65         : wxPanel (p)
66         , _panel (new wxPanel (this))
67         , _outline_content (new wxCheckBox (this, wxID_ANY, _("Outline content")))
68         , _left_eye (new wxRadioButton (this, wxID_ANY, _("Left eye"), wxDefaultPosition, wxDefaultSize, wxRB_GROUP))
69         , _right_eye (new wxRadioButton (this, wxID_ANY, _("Right eye")))
70         , _slider (new wxSlider (this, wxID_ANY, 0, 0, 4096))
71         , _back_button (new wxButton (this, wxID_ANY, wxT("<")))
72         , _forward_button (new wxButton (this, wxID_ANY, wxT(">")))
73         , _frame_number (new wxStaticText (this, wxID_ANY, wxT("")))
74         , _timecode (new wxStaticText (this, wxID_ANY, wxT("")))
75         , _play_button (new wxToggleButton (this, wxID_ANY, _("Play")))
76         , _coalesce_player_changes (false)
77         , _pending_player_change (false)
78         , _last_get_accurate (true)
79 {
80 #ifndef __WXOSX__
81         _panel->SetDoubleBuffered (true);
82 #endif
83
84         _panel->SetBackgroundStyle (wxBG_STYLE_PAINT);
85
86         _v_sizer = new wxBoxSizer (wxVERTICAL);
87         SetSizer (_v_sizer);
88
89         _v_sizer->Add (_panel, 1, wxEXPAND);
90
91         wxBoxSizer* view_options = new wxBoxSizer (wxHORIZONTAL);
92         view_options->Add (_outline_content, 0, wxRIGHT, DCPOMATIC_SIZER_GAP);
93         view_options->Add (_left_eye, 0, wxLEFT | wxRIGHT, DCPOMATIC_SIZER_GAP);
94         view_options->Add (_right_eye, 0, wxLEFT | wxRIGHT, DCPOMATIC_SIZER_GAP);
95         _v_sizer->Add (view_options, 0, wxALL, DCPOMATIC_SIZER_GAP);
96
97         wxBoxSizer* h_sizer = new wxBoxSizer (wxHORIZONTAL);
98
99         wxBoxSizer* time_sizer = new wxBoxSizer (wxVERTICAL);
100         time_sizer->Add (_frame_number, 0, wxEXPAND);
101         time_sizer->Add (_timecode, 0, wxEXPAND);
102
103         h_sizer->Add (_back_button, 0, wxALL, 2);
104         h_sizer->Add (time_sizer, 0, wxEXPAND);
105         h_sizer->Add (_forward_button, 0, wxALL, 2);
106         h_sizer->Add (_play_button, 0, wxEXPAND);
107         h_sizer->Add (_slider, 1, wxEXPAND);
108
109         _v_sizer->Add (h_sizer, 0, wxEXPAND | wxALL, 6);
110
111         _frame_number->SetMinSize (wxSize (84, -1));
112         _back_button->SetMinSize (wxSize (32, -1));
113         _forward_button->SetMinSize (wxSize (32, -1));
114
115         _panel->Bind          (wxEVT_PAINT,                        boost::bind (&FilmViewer::paint_panel,     this));
116         _panel->Bind          (wxEVT_SIZE,                         boost::bind (&FilmViewer::panel_sized,     this, _1));
117         _outline_content->Bind(wxEVT_COMMAND_CHECKBOX_CLICKED,     boost::bind (&FilmViewer::refresh_panel,   this));
118         _left_eye->Bind       (wxEVT_COMMAND_RADIOBUTTON_SELECTED, boost::bind (&FilmViewer::refresh,         this));
119         _right_eye->Bind      (wxEVT_COMMAND_RADIOBUTTON_SELECTED, boost::bind (&FilmViewer::refresh,         this));
120         _slider->Bind         (wxEVT_SCROLL_THUMBTRACK,            boost::bind (&FilmViewer::slider_moved,    this));
121         _slider->Bind         (wxEVT_SCROLL_PAGEUP,                boost::bind (&FilmViewer::slider_moved,    this));
122         _slider->Bind         (wxEVT_SCROLL_PAGEDOWN,              boost::bind (&FilmViewer::slider_moved,    this));
123         _play_button->Bind    (wxEVT_COMMAND_TOGGLEBUTTON_CLICKED, boost::bind (&FilmViewer::play_clicked,    this));
124         _timer.Bind           (wxEVT_TIMER,                        boost::bind (&FilmViewer::timer,           this));
125         _back_button->Bind    (wxEVT_COMMAND_BUTTON_CLICKED,       boost::bind (&FilmViewer::back_clicked,    this));
126         _forward_button->Bind (wxEVT_COMMAND_BUTTON_CLICKED,       boost::bind (&FilmViewer::forward_clicked, this));
127
128         set_film (shared_ptr<Film> ());
129
130         JobManager::instance()->ActiveJobsChanged.connect (
131                 bind (&FilmViewer::active_jobs_changed, this, _2)
132                 );
133
134         setup_sensitivity ();
135 }
136
137 void
138 FilmViewer::set_film (shared_ptr<Film> film)
139 {
140         if (_film == film) {
141                 return;
142         }
143
144         _film = film;
145
146         _frame.reset ();
147
148         update_position_slider ();
149         update_position_label ();
150
151         if (!_film) {
152                 return;
153         }
154
155         try {
156                 _player.reset (new Player (_film, _film->playlist ()));
157                 _player->set_fast ();
158         } catch (bad_alloc) {
159                 error_dialog (this, _("There is not enough free memory to do that."));
160                 _film.reset ();
161                 return;
162         }
163
164         /* Always burn in subtitles, even if content is set not to, otherwise we won't see them
165            in the preview.
166         */
167         _player->set_always_burn_subtitles (true);
168         _player->set_ignore_audio ();
169         _player->set_play_referenced ();
170
171         _film_connection = _film->Changed.connect (boost::bind (&FilmViewer::film_changed, this, _1));
172
173         _player_connection = _player->Changed.connect (boost::bind (&FilmViewer::player_changed, this, _1));
174
175         calculate_sizes ();
176         refresh ();
177
178         setup_sensitivity ();
179 }
180
181 void
182 FilmViewer::refresh_panel ()
183 {
184         _panel->Refresh ();
185         _panel->Update ();
186 }
187
188 void
189 FilmViewer::get (DCPTime p, bool accurate)
190 {
191         if (!_player) {
192                 return;
193         }
194
195         list<shared_ptr<PlayerVideo> > all_pv;
196         try {
197                 all_pv = _player->get_video (p, accurate);
198         } catch (exception& e) {
199                 error_dialog (this, wxString::Format (_("Could not get video for view (%s)"), std_to_wx(e.what()).data()));
200         }
201
202         if (!all_pv.empty ()) {
203                 try {
204                         shared_ptr<PlayerVideo> pv;
205                         if (all_pv.size() == 2) {
206                                 /* We have 3D; choose the correct eye */
207                                 if (_left_eye->GetValue()) {
208                                         if (all_pv.front()->eyes() == EYES_LEFT) {
209                                                 pv = all_pv.front();
210                                         } else {
211                                                 pv = all_pv.back();
212                                         }
213                                 } else {
214                                         if (all_pv.front()->eyes() == EYES_RIGHT) {
215                                                 pv = all_pv.front();
216                                         } else {
217                                                 pv = all_pv.back();
218                                         }
219                                 }
220                         } else {
221                                 /* 2D; no choice to make */
222                                 pv = all_pv.front ();
223                         }
224
225                         _frame = pv->image (
226                                 bind (&Log::dcp_log, _film->log().get(), _1, _2), bind (&PlayerVideo::always_rgb, _1), false, true
227                                 );
228
229                         ImageChanged (pv);
230
231                         _position = pv->time ();
232                         _inter_position = pv->inter_position ();
233                         _inter_size = pv->inter_size ();
234                 } catch (dcp::DCPReadError& e) {
235                         /* This can happen on the following sequence of events:
236                          * - load encrypted DCP
237                          * - add KDM
238                          * - DCP is examined again, which sets its "playable" flag to 1
239                          * - as a side effect of the exam, the viewer is updated using the old pieces
240                          * - the DCPDecoder in the old piece gives us an encrypted frame
241                          * - then, the pieces are re-made (but too late).
242                          *
243                          * I hope there's a better way to handle this ...
244                          */
245                         _frame.reset ();
246                         _position = p;
247                 }
248         } else {
249                 _frame.reset ();
250                 _position = p;
251         }
252
253         refresh_panel ();
254
255         _last_get_accurate = accurate;
256 }
257
258 void
259 FilmViewer::timer ()
260 {
261         DCPTime const frame = DCPTime::from_frames (1, _film->video_frame_rate ());
262
263         if ((_position + frame) >= _film->length ()) {
264                 _play_button->SetValue (false);
265                 check_play_state ();
266         } else {
267                 get (_position + frame, true);
268         }
269
270         update_position_label ();
271         update_position_slider ();
272 }
273
274 void
275 FilmViewer::paint_panel ()
276 {
277         wxPaintDC dc (_panel);
278
279         if (!_frame || !_film || !_out_size.width || !_out_size.height) {
280                 dc.Clear ();
281                 return;
282         }
283
284         wxImage frame (_out_size.width, _out_size.height, _frame->data()[0], true);
285         wxBitmap frame_bitmap (frame);
286         dc.DrawBitmap (frame_bitmap, 0, 0);
287
288         if (_out_size.width < _panel_size.width) {
289                 wxPen p (GetBackgroundColour ());
290                 wxBrush b (GetBackgroundColour ());
291                 dc.SetPen (p);
292                 dc.SetBrush (b);
293                 dc.DrawRectangle (_out_size.width, 0, _panel_size.width - _out_size.width, _panel_size.height);
294         }
295
296         if (_out_size.height < _panel_size.height) {
297                 wxPen p (GetBackgroundColour ());
298                 wxBrush b (GetBackgroundColour ());
299                 dc.SetPen (p);
300                 dc.SetBrush (b);
301                 dc.DrawRectangle (0, _out_size.height, _panel_size.width, _panel_size.height - _out_size.height);
302         }
303
304         if (_outline_content->GetValue ()) {
305                 wxPen p (wxColour (255, 0, 0), 2);
306                 dc.SetPen (p);
307                 dc.SetBrush (*wxTRANSPARENT_BRUSH);
308                 dc.DrawRectangle (_inter_position.x, _inter_position.y, _inter_size.width, _inter_size.height);
309         }
310 }
311
312 void
313 FilmViewer::slider_moved ()
314 {
315         if (!_film) {
316                 return;
317         }
318
319         DCPTime t (_slider->GetValue() * _film->length().get() / 4096);
320         /* Ensure that we hit the end of the film at the end of the slider */
321         if (t >= _film->length ()) {
322                 t = _film->length() - DCPTime::from_frames (1, _film->video_frame_rate ());
323         }
324         get (t, false);
325         update_position_label ();
326 }
327
328 void
329 FilmViewer::panel_sized (wxSizeEvent& ev)
330 {
331         _panel_size.width = ev.GetSize().GetWidth();
332         _panel_size.height = ev.GetSize().GetHeight();
333
334         calculate_sizes ();
335         refresh ();
336         update_position_label ();
337         update_position_slider ();
338 }
339
340 void
341 FilmViewer::calculate_sizes ()
342 {
343         if (!_film || !_player) {
344                 return;
345         }
346
347         Ratio const * container = _film->container ();
348
349         float const panel_ratio = _panel_size.ratio ();
350         float const film_ratio = container ? container->ratio () : 1.78;
351
352         if (panel_ratio < film_ratio) {
353                 /* panel is less widscreen than the film; clamp width */
354                 _out_size.width = _panel_size.width;
355                 _out_size.height = lrintf (_out_size.width / film_ratio);
356         } else {
357                 /* panel is more widescreen than the film; clamp height */
358                 _out_size.height = _panel_size.height;
359                 _out_size.width = lrintf (_out_size.height * film_ratio);
360         }
361
362         /* Catch silly values */
363         _out_size.width = max (64, _out_size.width);
364         _out_size.height = max (64, _out_size.height);
365
366         _player->set_video_container_size (_out_size);
367 }
368
369 void
370 FilmViewer::play_clicked ()
371 {
372         check_play_state ();
373 }
374
375 void
376 FilmViewer::check_play_state ()
377 {
378         if (!_film || _film->video_frame_rate() == 0) {
379                 return;
380         }
381
382         if (_play_button->GetValue()) {
383                 _timer.Start (1000 / _film->video_frame_rate());
384         } else {
385                 _timer.Stop ();
386         }
387 }
388
389 void
390 FilmViewer::update_position_slider ()
391 {
392         if (!_film) {
393                 _slider->SetValue (0);
394                 return;
395         }
396
397         DCPTime const len = _film->length ();
398
399         if (len.get ()) {
400                 int const new_slider_position = 4096 * _position.get() / len.get();
401                 if (new_slider_position != _slider->GetValue()) {
402                         _slider->SetValue (new_slider_position);
403                 }
404         }
405 }
406
407 void
408 FilmViewer::update_position_label ()
409 {
410         if (!_film) {
411                 _frame_number->SetLabel ("0");
412                 _timecode->SetLabel ("0:0:0.0");
413                 return;
414         }
415
416         double const fps = _film->video_frame_rate ();
417         /* Count frame number from 1 ... not sure if this is the best idea */
418         _frame_number->SetLabel (wxString::Format (wxT("%ld"), lrint (_position.seconds() * fps) + 1));
419         _timecode->SetLabel (time_to_timecode (_position, fps));
420 }
421
422 void
423 FilmViewer::active_jobs_changed (optional<string> j)
424 {
425         /* examine content is the only job which stops the viewer working */
426         bool const a = !j || *j != "examine_content";
427         _slider->Enable (a);
428         _play_button->Enable (a);
429 }
430
431 void
432 FilmViewer::back_clicked ()
433 {
434         DCPTime p = _position - DCPTime::from_frames (1, _film->video_frame_rate ());
435         if (p < DCPTime ()) {
436                 p = DCPTime ();
437         }
438
439         get (p, true);
440         update_position_label ();
441         update_position_slider ();
442 }
443
444 void
445 FilmViewer::forward_clicked ()
446 {
447         DCPTime p = _position + DCPTime::from_frames (1, _film->video_frame_rate ());
448         if (p >= _film->length ()) {
449                 p = _position;
450         }
451
452         get (p, true);
453         update_position_label ();
454         update_position_slider ();
455 }
456
457 void
458 FilmViewer::player_changed (bool frequent)
459 {
460         if (frequent) {
461                 return;
462         }
463
464         if (_coalesce_player_changes) {
465                 _pending_player_change = true;
466                 return;
467         }
468
469         calculate_sizes ();
470         refresh ();
471         update_position_label ();
472         update_position_slider ();
473 }
474
475 void
476 FilmViewer::setup_sensitivity ()
477 {
478         bool const c = _film && !_film->content().empty ();
479
480         _slider->Enable (c);
481         _back_button->Enable (c);
482         _forward_button->Enable (c);
483         _play_button->Enable (c);
484         _outline_content->Enable (c);
485         _frame_number->Enable (c);
486         _timecode->Enable (c);
487
488         _left_eye->Enable (c && _film->three_d ());
489         _right_eye->Enable (c && _film->three_d ());
490 }
491
492 void
493 FilmViewer::film_changed (Film::Property p)
494 {
495         if (p == Film::CONTENT || p == Film::THREE_D) {
496                 setup_sensitivity ();
497         }
498 }
499
500 /** Re-get the current frame */
501 void
502 FilmViewer::refresh ()
503 {
504         get (_position, _last_get_accurate);
505 }
506
507 void
508 FilmViewer::set_position (DCPTime p)
509 {
510         _position = p;
511         get (_position, true);
512         update_position_label ();
513         update_position_slider ();
514 }
515
516 void
517 FilmViewer::set_coalesce_player_changes (bool c)
518 {
519         _coalesce_player_changes = c;
520
521         if (c) {
522                 _pending_player_change = false;
523         } else {
524                 if (_pending_player_change) {
525                         player_changed (false);
526                 }
527         }
528 }