Several fixes to audio.
[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 "film_viewer.h"
26 #include "playhead_to_timecode_dialog.h"
27 #include "playhead_to_frame_dialog.h"
28 #include "wx_util.h"
29 #include "lib/film.h"
30 #include "lib/ratio.h"
31 #include "lib/util.h"
32 #include "lib/job_manager.h"
33 #include "lib/image.h"
34 #include "lib/exceptions.h"
35 #include "lib/examine_content_job.h"
36 #include "lib/filter.h"
37 #include "lib/player.h"
38 #include "lib/player_video.h"
39 #include "lib/video_content.h"
40 #include "lib/video_decoder.h"
41 #include "lib/timer.h"
42 #include "lib/butler.h"
43 #include "lib/log.h"
44 #include "lib/config.h"
45 extern "C" {
46 #include <libavutil/pixfmt.h>
47 }
48 #include <dcp/exceptions.h>
49 #include <wx/tglbtn.h>
50 #include <iostream>
51 #include <iomanip>
52
53 using std::string;
54 using std::pair;
55 using std::min;
56 using std::max;
57 using std::cout;
58 using std::list;
59 using std::bad_alloc;
60 using std::make_pair;
61 using std::exception;
62 using boost::shared_ptr;
63 using boost::dynamic_pointer_cast;
64 using boost::weak_ptr;
65 using boost::optional;
66 using dcp::Size;
67
68 static
69 int
70 rtaudio_callback (void* out, void *, unsigned int frames, double, RtAudioStreamStatus, void* data)
71 {
72         return reinterpret_cast<FilmViewer*>(data)->audio_callback (out, frames);
73 }
74
75 FilmViewer::FilmViewer (wxWindow* p)
76         : wxPanel (p)
77         , _panel (new wxPanel (this))
78         , _outline_content (new wxCheckBox (this, wxID_ANY, _("Outline content")))
79         , _left_eye (new wxRadioButton (this, wxID_ANY, _("Left eye"), wxDefaultPosition, wxDefaultSize, wxRB_GROUP))
80         , _right_eye (new wxRadioButton (this, wxID_ANY, _("Right eye")))
81         , _jump_to_selected (new wxCheckBox (this, wxID_ANY, _("Jump to selected content")))
82         , _slider (new wxSlider (this, wxID_ANY, 0, 0, 4096))
83         , _back_button (new wxButton (this, wxID_ANY, wxT("<")))
84         , _forward_button (new wxButton (this, wxID_ANY, wxT(">")))
85         , _frame_number (new wxStaticText (this, wxID_ANY, wxT("")))
86         , _timecode (new wxStaticText (this, wxID_ANY, wxT("")))
87         , _play_button (new wxToggleButton (this, wxID_ANY, _("Play")))
88         , _coalesce_player_changes (false)
89         , _pending_player_change (false)
90         , _last_seek_accurate (true)
91         , _audio (DCPOMATIC_RTAUDIO_API)
92         , _audio_channels (0)
93         , _audio_block_size (1024)
94         , _playing (false)
95 {
96 #ifndef __WXOSX__
97         _panel->SetDoubleBuffered (true);
98 #endif
99
100         _panel->SetBackgroundStyle (wxBG_STYLE_PAINT);
101
102         _v_sizer = new wxBoxSizer (wxVERTICAL);
103         SetSizer (_v_sizer);
104
105         _v_sizer->Add (_panel, 1, wxEXPAND);
106
107         wxBoxSizer* view_options = new wxBoxSizer (wxHORIZONTAL);
108         view_options->Add (_outline_content, 0, wxRIGHT, DCPOMATIC_SIZER_GAP);
109         view_options->Add (_left_eye, 0, wxLEFT | wxRIGHT, DCPOMATIC_SIZER_GAP);
110         view_options->Add (_right_eye, 0, wxLEFT | wxRIGHT, DCPOMATIC_SIZER_GAP);
111         view_options->Add (_jump_to_selected, 0, wxLEFT | wxRIGHT, DCPOMATIC_SIZER_GAP);
112         _v_sizer->Add (view_options, 0, wxALL, DCPOMATIC_SIZER_GAP);
113
114         wxBoxSizer* h_sizer = new wxBoxSizer (wxHORIZONTAL);
115
116         wxBoxSizer* time_sizer = new wxBoxSizer (wxVERTICAL);
117         time_sizer->Add (_frame_number, 0, wxEXPAND);
118         time_sizer->Add (_timecode, 0, wxEXPAND);
119
120         h_sizer->Add (_back_button, 0, wxALL, 2);
121         h_sizer->Add (time_sizer, 0, wxEXPAND);
122         h_sizer->Add (_forward_button, 0, wxALL, 2);
123         h_sizer->Add (_play_button, 0, wxEXPAND);
124         h_sizer->Add (_slider, 1, wxEXPAND);
125
126         _v_sizer->Add (h_sizer, 0, wxEXPAND | wxALL, 6);
127
128         _frame_number->SetMinSize (wxSize (84, -1));
129         _back_button->SetMinSize (wxSize (32, -1));
130         _forward_button->SetMinSize (wxSize (32, -1));
131
132         _panel->Bind            (wxEVT_PAINT,             boost::bind (&FilmViewer::paint_panel,     this));
133         _panel->Bind            (wxEVT_SIZE,              boost::bind (&FilmViewer::panel_sized,     this, _1));
134         _outline_content->Bind  (wxEVT_CHECKBOX,          boost::bind (&FilmViewer::refresh_panel,   this));
135         _left_eye->Bind         (wxEVT_RADIOBUTTON,       boost::bind (&FilmViewer::refresh,         this));
136         _right_eye->Bind        (wxEVT_RADIOBUTTON,       boost::bind (&FilmViewer::refresh,         this));
137         _slider->Bind           (wxEVT_SCROLL_THUMBTRACK, boost::bind (&FilmViewer::slider_moved,    this));
138         _slider->Bind           (wxEVT_SCROLL_PAGEUP,     boost::bind (&FilmViewer::slider_moved,    this));
139         _slider->Bind           (wxEVT_SCROLL_PAGEDOWN,   boost::bind (&FilmViewer::slider_moved,    this));
140         _play_button->Bind      (wxEVT_TOGGLEBUTTON,      boost::bind (&FilmViewer::play_clicked,    this));
141         _timer.Bind             (wxEVT_TIMER,             boost::bind (&FilmViewer::timer,           this));
142         _back_button->Bind      (wxEVT_LEFT_DOWN,         boost::bind (&FilmViewer::back_clicked,    this, _1));
143         _forward_button->Bind   (wxEVT_LEFT_DOWN,         boost::bind (&FilmViewer::forward_clicked, this, _1));
144         _frame_number->Bind     (wxEVT_LEFT_DOWN,         boost::bind (&FilmViewer::frame_number_clicked, this));
145         _timecode->Bind         (wxEVT_LEFT_DOWN,         boost::bind (&FilmViewer::timecode_clicked, this));
146         _jump_to_selected->Bind (wxEVT_CHECKBOX,          boost::bind (&FilmViewer::jump_to_selected_clicked, this));
147
148         _jump_to_selected->SetValue (Config::instance()->jump_to_selected ());
149
150         set_film (shared_ptr<Film> ());
151
152         JobManager::instance()->ActiveJobsChanged.connect (
153                 bind (&FilmViewer::active_jobs_changed, this, _2)
154                 );
155
156         setup_sensitivity ();
157
158         _config_changed_connection = Config::instance()->Changed.connect (bind (&FilmViewer::config_changed, this, _1));
159         config_changed (Config::SOUND_OUTPUT);
160 }
161
162 FilmViewer::~FilmViewer ()
163 {
164         stop ();
165 }
166
167 void
168 FilmViewer::set_film (shared_ptr<Film> film)
169 {
170         if (_film == film) {
171                 return;
172         }
173
174         _film = film;
175
176         _frame.reset ();
177
178         update_position_slider ();
179         update_position_label ();
180
181         if (!_film) {
182                 return;
183         }
184
185         try {
186                 _player.reset (new Player (_film, _film->playlist ()));
187                 _player->set_fast ();
188         } catch (bad_alloc) {
189                 error_dialog (this, _("There is not enough free memory to do that."));
190                 _film.reset ();
191                 return;
192         }
193
194         /* Always burn in subtitles, even if content is set not to, otherwise we won't see them
195            in the preview.
196         */
197         _player->set_always_burn_subtitles (true);
198         _player->set_play_referenced ();
199
200         _film->Changed.connect (boost::bind (&FilmViewer::film_changed, this, _1));
201         _player->Changed.connect (boost::bind (&FilmViewer::player_changed, this, _1));
202
203         recreate_butler ();
204
205         calculate_sizes ();
206         refresh ();
207
208         setup_sensitivity ();
209 }
210
211 void
212 FilmViewer::recreate_butler ()
213 {
214         bool const was_running = stop ();
215         _butler.reset ();
216
217         if (!_film) {
218                 return;
219         }
220
221         AudioMapping map = AudioMapping (_film->audio_channels(), _audio_channels);
222
223         if (_audio_channels != 2 || _film->audio_channels() < 3) {
224                 for (int i = 0; i < min (_film->audio_channels(), _audio_channels); ++i) {
225                         map.set (i, i, 1);
226                 }
227         } else {
228                 /* Special case: stereo output, at least 3 channel input, map L+R to L/R and
229                    C to both, all 3dB down.
230                 */
231                 map.set (0, 0, 1 / sqrt(2)); // L -> L
232                 map.set (1, 1, 1 / sqrt(2)); // R -> R
233                 map.set (2, 0, 1 / sqrt(2)); // C -> L
234                 map.set (2, 1, 1 / sqrt(2)); // C -> R
235         }
236
237         _butler.reset (new Butler (_film, _player, map, _audio_channels));
238
239         if (was_running) {
240                 start ();
241         }
242 }
243
244 void
245 FilmViewer::refresh_panel ()
246 {
247         _panel->Refresh ();
248         _panel->Update ();
249 }
250
251 void
252 FilmViewer::get ()
253 {
254         pair<shared_ptr<PlayerVideo>, DCPTime> video;
255         do {
256                 video = _butler->get_video ();
257         } while (_film->three_d() && ((_left_eye->GetValue() && video.first->eyes() == EYES_RIGHT) || (_right_eye->GetValue() && video.first->eyes() == EYES_LEFT)));
258
259         if (!video.first) {
260                 return;
261         }
262
263         /* In an ideal world, what we would do here is:
264          *
265          * 1. convert to XYZ exactly as we do in the DCP creation path.
266          * 2. convert back to RGB for the preview display, compensating
267          *    for the monitor etc. etc.
268          *
269          * but this is inefficient if the source is RGB.  Since we don't
270          * (currently) care too much about the precise accuracy of the preview's
271          * colour mapping (and we care more about its speed) we try to short-
272          * circuit this "ideal" situation in some cases.
273          *
274          * The content's specified colour conversion indicates the colourspace
275          * which the content is in (according to the user).
276          *
277          * PlayerVideo::image (bound to PlayerVideo::always_rgb) will take the source
278          * image and convert it (from whatever the user has said it is) to RGB.
279          */
280
281         _frame = video.first->image (
282                 bind (&Log::dcp_log, _film->log().get(), _1, _2),
283                 bind (&PlayerVideo::always_rgb, _1),
284                 false, true
285                 );
286
287         ImageChanged (video.first);
288
289         _video_position = video.second;
290         _inter_position = video.first->inter_position ();
291         _inter_size = video.first->inter_size ();
292
293         refresh_panel ();
294 }
295
296 void
297 FilmViewer::timer ()
298 {
299         if (!_film) {
300                 return;
301         }
302
303         if (_audio.isStreamRunning ()) {
304                 DCPTime const now = time().ceil (_film->video_frame_rate ());
305                 get ();
306                 update_position_label ();
307                 update_position_slider ();
308                 DCPTime const next = now + DCPTime::from_frames (1, _film->video_frame_rate ());
309                 _timer.Start (max ((next.seconds() - time().seconds()) * 1000, 0.0), wxTIMER_ONE_SHOT);
310         }
311 }
312
313 void
314 FilmViewer::paint_panel ()
315 {
316         wxPaintDC dc (_panel);
317
318         if (!_frame || !_film || !_out_size.width || !_out_size.height) {
319                 dc.Clear ();
320                 return;
321         }
322
323         wxImage frame (_out_size.width, _out_size.height, _frame->data()[0], true);
324         wxBitmap frame_bitmap (frame);
325         dc.DrawBitmap (frame_bitmap, 0, 0);
326
327         if (_out_size.width < _panel_size.width) {
328                 wxPen p (GetBackgroundColour ());
329                 wxBrush b (GetBackgroundColour ());
330                 dc.SetPen (p);
331                 dc.SetBrush (b);
332                 dc.DrawRectangle (_out_size.width, 0, _panel_size.width - _out_size.width, _panel_size.height);
333         }
334
335         if (_out_size.height < _panel_size.height) {
336                 wxPen p (GetBackgroundColour ());
337                 wxBrush b (GetBackgroundColour ());
338                 dc.SetPen (p);
339                 dc.SetBrush (b);
340                 dc.DrawRectangle (0, _out_size.height, _panel_size.width, _panel_size.height - _out_size.height);
341         }
342
343         if (_outline_content->GetValue ()) {
344                 wxPen p (wxColour (255, 0, 0), 2);
345                 dc.SetPen (p);
346                 dc.SetBrush (*wxTRANSPARENT_BRUSH);
347                 dc.DrawRectangle (_inter_position.x, _inter_position.y, _inter_size.width, _inter_size.height);
348         }
349 }
350
351 void
352 FilmViewer::slider_moved ()
353 {
354         if (!_film) {
355                 return;
356         }
357
358         DCPTime t (_slider->GetValue() * _film->length().get() / 4096);
359         /* Ensure that we hit the end of the film at the end of the slider */
360         if (t >= _film->length ()) {
361                 t = _film->length() - DCPTime::from_frames (1, _film->video_frame_rate ());
362         }
363         seek (t, false);
364         update_position_label ();
365 }
366
367 void
368 FilmViewer::panel_sized (wxSizeEvent& ev)
369 {
370         _panel_size.width = ev.GetSize().GetWidth();
371         _panel_size.height = ev.GetSize().GetHeight();
372
373         calculate_sizes ();
374         refresh ();
375         update_position_label ();
376         update_position_slider ();
377 }
378
379 void
380 FilmViewer::calculate_sizes ()
381 {
382         if (!_film) {
383                 return;
384         }
385
386         Ratio const * container = _film->container ();
387
388         float const panel_ratio = _panel_size.ratio ();
389         float const film_ratio = container ? container->ratio () : 1.78;
390
391         if (panel_ratio < film_ratio) {
392                 /* panel is less widscreen than the film; clamp width */
393                 _out_size.width = _panel_size.width;
394                 _out_size.height = lrintf (_out_size.width / film_ratio);
395         } else {
396                 /* panel is more widescreen than the film; clamp height */
397                 _out_size.height = _panel_size.height;
398                 _out_size.width = lrintf (_out_size.height * film_ratio);
399         }
400
401         /* Catch silly values */
402         _out_size.width = max (64, _out_size.width);
403         _out_size.height = max (64, _out_size.height);
404
405         _player->set_video_container_size (_out_size);
406 }
407
408 void
409 FilmViewer::play_clicked ()
410 {
411         check_play_state ();
412 }
413
414 void
415 FilmViewer::check_play_state ()
416 {
417         if (!_film || _film->video_frame_rate() == 0) {
418                 return;
419         }
420
421         if (_play_button->GetValue()) {
422                 start ();
423         } else {
424                 stop ();
425         }
426 }
427
428 void
429 FilmViewer::start ()
430 {
431         if (_audio.isStreamOpen()) {
432                 _audio.setStreamTime (_video_position.seconds());
433                 _audio.startStream ();
434         }
435
436         _playing = true;
437         _timer.Start (0, wxTIMER_ONE_SHOT);
438 }
439
440 bool
441 FilmViewer::stop ()
442 {
443         if (_audio.isStreamRunning()) {
444                 /* stop stream and discard any remainig queued samples */
445                 _audio.abortStream ();
446         }
447
448         if (!_playing) {
449                 return false;
450         }
451
452         _playing = false;
453         return true;
454 }
455
456 void
457 FilmViewer::update_position_slider ()
458 {
459         if (!_film) {
460                 _slider->SetValue (0);
461                 return;
462         }
463
464         DCPTime const len = _film->length ();
465
466         if (len.get ()) {
467                 int const new_slider_position = 4096 * _video_position.get() / len.get();
468                 if (new_slider_position != _slider->GetValue()) {
469                         _slider->SetValue (new_slider_position);
470                 }
471         }
472 }
473
474 void
475 FilmViewer::update_position_label ()
476 {
477         if (!_film) {
478                 _frame_number->SetLabel ("0");
479                 _timecode->SetLabel ("0:0:0.0");
480                 return;
481         }
482
483         double const fps = _film->video_frame_rate ();
484         /* Count frame number from 1 ... not sure if this is the best idea */
485         _frame_number->SetLabel (wxString::Format (wxT("%ld"), lrint (_video_position.seconds() * fps) + 1));
486         _timecode->SetLabel (time_to_timecode (_video_position, fps));
487 }
488
489 void
490 FilmViewer::active_jobs_changed (optional<string> j)
491 {
492         /* examine content is the only job which stops the viewer working */
493         bool const a = !j || *j != "examine_content";
494         _slider->Enable (a);
495         _play_button->Enable (a);
496 }
497
498 DCPTime
499 FilmViewer::nudge_amount (wxMouseEvent& ev)
500 {
501         DCPTime amount = DCPTime::from_frames (1, _film->video_frame_rate ());
502
503         if (ev.ShiftDown() && !ev.ControlDown()) {
504                 amount = DCPTime::from_seconds (1);
505         } else if (!ev.ShiftDown() && ev.ControlDown()) {
506                 amount = DCPTime::from_seconds (10);
507         } else if (ev.ShiftDown() && ev.ControlDown()) {
508                 amount = DCPTime::from_seconds (60);
509         }
510
511         return amount;
512 }
513
514 void
515 FilmViewer::go_to (DCPTime t)
516 {
517         if (t < DCPTime ()) {
518                 t = DCPTime ();
519         }
520
521         if (t >= _film->length ()) {
522                 t = _film->length ();
523         }
524
525         seek (t, true);
526         update_position_label ();
527         update_position_slider ();
528 }
529
530 void
531 FilmViewer::back_clicked (wxMouseEvent& ev)
532 {
533         go_to (_video_position - nudge_amount (ev));
534         ev.Skip ();
535 }
536
537 void
538 FilmViewer::forward_clicked (wxMouseEvent& ev)
539 {
540         go_to (_video_position + nudge_amount (ev));
541         ev.Skip ();
542 }
543
544 void
545 FilmViewer::player_changed (bool frequent)
546 {
547         if (frequent) {
548                 return;
549         }
550
551         if (_coalesce_player_changes) {
552                 _pending_player_change = true;
553                 return;
554         }
555
556         calculate_sizes ();
557         refresh ();
558         update_position_label ();
559         update_position_slider ();
560 }
561
562 void
563 FilmViewer::setup_sensitivity ()
564 {
565         bool const c = _film && !_film->content().empty ();
566
567         _slider->Enable (c);
568         _back_button->Enable (c);
569         _forward_button->Enable (c);
570         _play_button->Enable (c);
571         _outline_content->Enable (c);
572         _frame_number->Enable (c);
573         _timecode->Enable (c);
574
575         _left_eye->Enable (c && _film->three_d ());
576         _right_eye->Enable (c && _film->three_d ());
577 }
578
579 void
580 FilmViewer::film_changed (Film::Property p)
581 {
582         if (p == Film::CONTENT || p == Film::THREE_D) {
583                 setup_sensitivity ();
584         }
585 }
586
587 /** Re-get the current frame */
588 void
589 FilmViewer::refresh ()
590 {
591         seek (_video_position, _last_seek_accurate);
592 }
593
594 void
595 FilmViewer::set_position (DCPTime p)
596 {
597         _video_position = p;
598         seek (p, true);
599         update_position_label ();
600         update_position_slider ();
601 }
602
603 void
604 FilmViewer::set_coalesce_player_changes (bool c)
605 {
606         _coalesce_player_changes = c;
607
608         if (c) {
609                 _pending_player_change = false;
610         } else {
611                 if (_pending_player_change) {
612                         player_changed (false);
613                 }
614         }
615 }
616
617 void
618 FilmViewer::timecode_clicked ()
619 {
620         PlayheadToTimecodeDialog* dialog = new PlayheadToTimecodeDialog (this, _film->video_frame_rate ());
621         if (dialog->ShowModal() == wxID_OK) {
622                 go_to (dialog->get ());
623         }
624         dialog->Destroy ();
625 }
626
627 void
628 FilmViewer::frame_number_clicked ()
629 {
630         PlayheadToFrameDialog* dialog = new PlayheadToFrameDialog (this, _film->video_frame_rate ());
631         if (dialog->ShowModal() == wxID_OK) {
632                 go_to (dialog->get ());
633         }
634         dialog->Destroy ();
635 }
636
637 void
638 FilmViewer::jump_to_selected_clicked ()
639 {
640         Config::instance()->set_jump_to_selected (_jump_to_selected->GetValue ());
641 }
642
643 void
644 FilmViewer::seek (DCPTime t, bool accurate)
645 {
646         if (!_butler) {
647                 return;
648         }
649
650         _butler->seek (t, accurate);
651         _last_seek_accurate = accurate;
652         get ();
653 }
654
655 void
656 FilmViewer::config_changed (Config::Property p)
657 {
658         if (p != Config::SOUND_OUTPUT) {
659                 return;
660         }
661
662         if (_audio.isStreamOpen ()) {
663                 _audio.closeStream ();
664         }
665
666         unsigned int st = 0;
667         if (Config::instance()->sound_output()) {
668                 while (st < _audio.getDeviceCount()) {
669                         if (_audio.getDeviceInfo(st).name == Config::instance()->sound_output().get()) {
670                                 break;
671                         }
672                         ++st;
673                 }
674                 if (st == _audio.getDeviceCount()) {
675                         st = _audio.getDefaultOutputDevice();
676                 }
677         } else {
678                 st = _audio.getDefaultOutputDevice();
679         }
680
681         _audio_channels = _audio.getDeviceInfo(st).outputChannels;
682         recreate_butler ();
683
684         RtAudio::StreamParameters sp;
685         sp.deviceId = st;
686         sp.nChannels = _audio_channels;
687         sp.firstChannel = 0;
688         try {
689                 _audio.openStream (&sp, 0, RTAUDIO_FLOAT32, 48000, &_audio_block_size, &rtaudio_callback, this);
690 #ifdef DCPOMATIC_USE_RTERROR
691         } catch (RtError& e) {
692 #else
693         } catch (RtAudioError& e) {
694 #endif
695                 error_dialog (this, wxString::Format (_("Could not set up audio output (%s).  There will be no audio during the preview."), e.what()));
696         }
697 }
698
699 DCPTime
700 FilmViewer::time () const
701 {
702         if (_audio.isStreamRunning ()) {
703                 return DCPTime::from_seconds (const_cast<RtAudio*>(&_audio)->getStreamTime ());
704         }
705
706         return _video_position;
707 }
708
709 int
710 FilmViewer::audio_callback (void* out_p, unsigned int frames)
711 {
712         _butler->get_audio (reinterpret_cast<float*> (out_p), frames);
713         return 0;
714 }