src/lib/player.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
  22 #include "atmos_decoder.h"
  23 #include "audio_buffers.h"
  24 #include "audio_content.h"
  25 #include "audio_decoder.h"
  26 #include "audio_processor.h"
  27 #include "compose.hpp"
  28 #include "config.h"
  29 #include "content_audio.h"
  30 #include "content_video.h"
  31 #include "dcp_content.h"
  32 #include "dcp_decoder.h"
  33 #include "dcpomatic_log.h"
  34 #include "decoder.h"
  35 #include "decoder_factory.h"
  36 #include "ffmpeg_content.h"
  37 #include "film.h"
  38 #include "frame_rate_change.h"
  39 #include "image.h"
  40 #include "image_decoder.h"
  41 #include "job.h"
  42 #include "log.h"
  43 #include "maths_util.h"
  44 #include "piece.h"
  45 #include "player.h"
  46 #include "player_video.h"
  47 #include "playlist.h"
  48 #include "ratio.h"
  49 #include "raw_image_proxy.h"
  50 #include "referenced_reel_asset.h"
  51 #include "render_text.h"
  52 #include "shuffler.h"
  53 #include "text_content.h"
  54 #include "text_decoder.h"
  55 #include "timer.h"
  56 #include "video_decoder.h"
  57 #include <dcp/reel.h>
  58 #include <dcp/reel_closed_caption_asset.h>
  59 #include <dcp/reel_picture_asset.h>
  60 #include <dcp/reel_sound_asset.h>
  61 #include <dcp/reel_subtitle_asset.h>
  62 #include <algorithm>
  63 #include <iostream>
  64 #include <stdint.h>
  65
  66 #include "i18n.h"
  67
  68
  69 using std::copy;
  70 using std::cout;
  71 using std::dynamic_pointer_cast;
  72 using std::list;
  73 using std::make_pair;
  74 using std::make_shared;
  75 using std::make_shared;
  76 using std::max;
  77 using std::min;
  78 using std::min;
  79 using std::pair;
  80 using std::shared_ptr;
  81 using std::vector;
  82 using std::weak_ptr;
  83 using boost::optional;
  84 using boost::scoped_ptr;
  85 #if BOOST_VERSION >= 106100
  86 using namespace boost::placeholders;
  87 #endif
  88 using namespace dcpomatic;
  89
  90
  91 int const PlayerProperty::VIDEO_CONTAINER_SIZE = 700;
  92 int const PlayerProperty::PLAYLIST = 701;
  93 int const PlayerProperty::FILM_CONTAINER = 702;
  94 int const PlayerProperty::FILM_VIDEO_FRAME_RATE = 703;
  95 int const PlayerProperty::DCP_DECODE_REDUCTION = 704;
  96 int const PlayerProperty::PLAYBACK_LENGTH = 705;
  97
  98
  99 Player::Player (shared_ptr<const Film> film, Image::Alignment subtitle_alignment)
 100         : _film (film)
 101         , _suspended (0)
 102         , _tolerant (film->tolerant())
 103         , _audio_merger (_film->audio_frame_rate())
 104         , _subtitle_alignment (subtitle_alignment)
 105 {
 106         construct ();
 107 }
 108
 109
 110 Player::Player (shared_ptr<const Film> film, shared_ptr<const Playlist> playlist_)
 111         : _film (film)
 112         , _playlist (playlist_)
 113         , _suspended (0)
 114         , _tolerant (film->tolerant())
 115         , _audio_merger (_film->audio_frame_rate())
 116 {
 117         construct ();
 118 }
 119
 120
 121 void
 122 Player::construct ()
 123 {
 124         _film_changed_connection = _film->Change.connect (bind (&Player::film_change, this, _1, _2));
 125         /* The butler must hear about this first, so since we are proxying this through to the butler we must
 126            be first.
 127         */
 128         _playlist_change_connection = playlist()->Change.connect (bind (&Player::playlist_change, this, _1), boost::signals2::at_front);
 129         _playlist_content_change_connection = playlist()->ContentChange.connect (bind(&Player::playlist_content_change, this, _1, _3, _4));
 130         set_video_container_size (_film->frame_size ());
 131
 132         film_change (ChangeType::DONE, Film::Property::AUDIO_PROCESSOR);
 133
 134         setup_pieces ();
 135         seek (DCPTime (), true);
 136 }
 137
 138
 139 void
 140 Player::setup_pieces ()
 141 {
 142         boost::mutex::scoped_lock lm (_mutex);
 143         setup_pieces_unlocked ();
 144 }
 145
 146
 147 bool
 148 have_video (shared_ptr<const Content> content)
 149 {
 150         return static_cast<bool>(content->video) && content->video->use() && content->can_be_played();
 151 }
 152
 153
 154 bool
 155 have_audio (shared_ptr<const Content> content)
 156 {
 157         return static_cast<bool>(content->audio) && content->can_be_played();
 158 }
 159
 160
 161 void
 162 Player::setup_pieces_unlocked ()
 163 {
 164         _playback_length = _playlist ? _playlist->length(_film) : _film->length();
 165
 166         auto old_pieces = _pieces;
 167         _pieces.clear ();
 168
 169         auto playlist_content = playlist()->content();
 170         bool const have_threed = std::any_of(
 171                 playlist_content.begin(),
 172                 playlist_content.end(),
 173                 [](shared_ptr<const Content> c) {
 174                         return c->video && (c->video->frame_type() == VideoFrameType::THREE_D_LEFT || c->video->frame_type() == VideoFrameType::THREE_D_RIGHT);
 175                 });
 176
 177
 178         if (have_threed) {
 179                 _shuffler.reset(new Shuffler());
 180                 _shuffler->Video.connect(bind(&Player::video, this, _1, _2));
 181         }
 182
 183         for (auto i: playlist()->content()) {
 184
 185                 if (!i->paths_valid ()) {
 186                         continue;
 187                 }
 188
 189                 if (_ignore_video && _ignore_audio && i->text.empty()) {
 190                         /* We're only interested in text and this content has none */
 191                         continue;
 192                 }
 193
 194                 shared_ptr<Decoder> old_decoder;
 195                 for (auto j: old_pieces) {
 196                         if (j->content == i) {
 197                                 old_decoder = j->decoder;
 198                                 break;
 199                         }
 200                 }
 201
 202                 auto decoder = decoder_factory (_film, i, _fast, _tolerant, old_decoder);
 203                 DCPOMATIC_ASSERT (decoder);
 204
 205                 FrameRateChange frc (_film, i);
 206
 207                 if (decoder->video && _ignore_video) {
 208                         decoder->video->set_ignore (true);
 209                 }
 210
 211                 if (decoder->audio && _ignore_audio) {
 212                         decoder->audio->set_ignore (true);
 213                 }
 214
 215                 if (_ignore_text) {
 216                         for (auto i: decoder->text) {
 217                                 i->set_ignore (true);
 218                         }
 219                 }
 220
 221                 auto dcp = dynamic_pointer_cast<DCPDecoder> (decoder);
 222                 if (dcp) {
 223                         dcp->set_decode_referenced (_play_referenced);
 224                         if (_play_referenced) {
 225                                 dcp->set_forced_reduction (_dcp_decode_reduction);
 226                         }
 227                 }
 228
 229                 auto piece = make_shared<Piece>(i, decoder, frc);
 230                 _pieces.push_back (piece);
 231
 232                 if (decoder->video) {
 233                         if (have_threed) {
 234                                 /* We need a Shuffler to cope with 3D L/R video data arriving out of sequence */
 235                                 decoder->video->Data.connect (bind(&Shuffler::video, _shuffler.get(), weak_ptr<Piece>(piece), _1));
 236                         } else {
 237                                 decoder->video->Data.connect (bind(&Player::video, this, weak_ptr<Piece>(piece), _1));
 238                         }
 239                 }
 240
 241                 if (decoder->audio) {
 242                         decoder->audio->Data.connect (bind (&Player::audio, this, weak_ptr<Piece> (piece), _1, _2));
 243                 }
 244
 245                 auto j = decoder->text.begin();
 246
 247                 while (j != decoder->text.end()) {
 248                         (*j)->BitmapStart.connect (
 249                                 bind(&Player::bitmap_text_start, this, weak_ptr<Piece>(piece), weak_ptr<const TextContent>((*j)->content()), _1)
 250                                 );
 251                         (*j)->PlainStart.connect (
 252                                 bind(&Player::plain_text_start, this, weak_ptr<Piece>(piece), weak_ptr<const TextContent>((*j)->content()), _1)
 253                                 );
 254                         (*j)->Stop.connect (
 255                                 bind(&Player::subtitle_stop, this, weak_ptr<Piece>(piece), weak_ptr<const TextContent>((*j)->content()), _1)
 256                                 );
 257
 258                         ++j;
 259                 }
 260
 261                 if (decoder->atmos) {
 262                         decoder->atmos->Data.connect (bind(&Player::atmos, this, weak_ptr<Piece>(piece), _1));
 263                 }
 264         }
 265
 266         _stream_states.clear ();
 267         for (auto i: _pieces) {
 268                 if (i->content->audio) {
 269                         for (auto j: i->content->audio->streams()) {
 270                                 _stream_states[j] = StreamState (i, i->content->position ());
 271                         }
 272                 }
 273         }
 274
 275         auto ignore_overlap = [](shared_ptr<VideoContent> v) {
 276                 return v && v->use() && v->frame_type() != VideoFrameType::THREE_D_LEFT && v->frame_type() != VideoFrameType::THREE_D_RIGHT;
 277         };
 278
 279         for (auto i = _pieces.begin(); i != _pieces.end(); ++i) {
 280                 if (ignore_overlap((*i)->content->video)) {
 281                         /* Look for content later in the content list with in-use video that overlaps this */
 282                         auto const period = DCPTimePeriod((*i)->content->position(), (*i)->content->end(_film));
 283                         for (auto j = std::next(i); j != _pieces.end(); ++j) {
 284                                 if ((*j)->content->video && ignore_overlap((*j)->content->video)) {
 285                                         (*i)->ignore_video = DCPTimePeriod((*j)->content->position(), (*j)->content->end(_film)).overlap(period);
 286                                 }
 287                         }
 288                 }
 289         }
 290
 291         _black = Empty (_film, playlist(), bind(&have_video, _1), _playback_length);
 292         _silent = Empty (_film, playlist(), bind(&have_audio, _1), _playback_length);
 293
 294         _next_video_time = boost::none;
 295         _next_video_eyes = Eyes::BOTH;
 296         _next_audio_time = boost::none;
 297 }
 298
 299
 300 void
 301 Player::playlist_content_change (ChangeType type, int property, bool frequent)
 302 {
 303         if (property == VideoContentProperty::CROP) {
 304                 if (type == ChangeType::DONE) {
 305                         auto const vcs = video_container_size();
 306                         boost::mutex::scoped_lock lm (_mutex);
 307                         for (auto const& i: _delay) {
 308                                 i.first->reset_metadata (_film, vcs);
 309                         }
 310                 }
 311         } else {
 312                 if (type == ChangeType::PENDING) {
 313                         /* The player content is probably about to change, so we can't carry on
 314                            until that has happened and we've rebuilt our pieces.  Stop pass()
 315                            and seek() from working until then.
 316                         */
 317                         ++_suspended;
 318                 } else if (type == ChangeType::DONE) {
 319                         /* A change in our content has gone through.  Re-build our pieces. */
 320                         setup_pieces ();
 321                         --_suspended;
 322                 } else if (type == ChangeType::CANCELLED) {
 323                         --_suspended;
 324                 }
 325         }
 326
 327         Change (type, property, frequent);
 328 }
 329
 330
 331 void
 332 Player::set_video_container_size (dcp::Size s)
 333 {
 334         Change (ChangeType::PENDING, PlayerProperty::VIDEO_CONTAINER_SIZE, false);
 335
 336         {
 337                 boost::mutex::scoped_lock lm (_mutex);
 338
 339                 if (s == _video_container_size) {
 340                         lm.unlock ();
 341                         Change (ChangeType::CANCELLED, PlayerProperty::VIDEO_CONTAINER_SIZE, false);
 342                         return;
 343                 }
 344
 345                 _video_container_size = s;
 346
 347                 _black_image = make_shared<Image>(AV_PIX_FMT_RGB24, _video_container_size, Image::Alignment::PADDED);
 348                 _black_image->make_black ();
 349         }
 350
 351         Change (ChangeType::DONE, PlayerProperty::VIDEO_CONTAINER_SIZE, false);
 352 }
 353
 354
 355 void
 356 Player::playlist_change (ChangeType type)
 357 {
 358         if (type == ChangeType::DONE) {
 359                 setup_pieces ();
 360         }
 361         Change (type, PlayerProperty::PLAYLIST, false);
 362 }
 363
 364
 365 void
 366 Player::film_change (ChangeType type, Film::Property p)
 367 {
 368         /* Here we should notice Film properties that affect our output, and
 369            alert listeners that our output now would be different to how it was
 370            last time we were run.
 371         */
 372
 373         if (p == Film::Property::CONTAINER) {
 374                 Change (type, PlayerProperty::FILM_CONTAINER, false);
 375         } else if (p == Film::Property::VIDEO_FRAME_RATE) {
 376                 /* Pieces contain a FrameRateChange which contains the DCP frame rate,
 377                    so we need new pieces here.
 378                 */
 379                 if (type == ChangeType::DONE) {
 380                         setup_pieces ();
 381                 }
 382                 Change (type, PlayerProperty::FILM_VIDEO_FRAME_RATE, false);
 383         } else if (p == Film::Property::AUDIO_PROCESSOR) {
 384                 if (type == ChangeType::DONE && _film->audio_processor ()) {
 385                         boost::mutex::scoped_lock lm (_mutex);
 386                         _audio_processor = _film->audio_processor()->clone (_film->audio_frame_rate ());
 387                 }
 388         } else if (p == Film::Property::AUDIO_CHANNELS) {
 389                 if (type == ChangeType::DONE) {
 390                         boost::mutex::scoped_lock lm (_mutex);
 391                         _audio_merger.clear ();
 392                 }
 393         }
 394 }
 395
 396
 397 shared_ptr<PlayerVideo>
 398 Player::black_player_video_frame (Eyes eyes) const
 399 {
 400         return std::make_shared<PlayerVideo> (
 401                 std::make_shared<const RawImageProxy>(_black_image),
 402                 Crop(),
 403                 optional<double>(),
 404                 _video_container_size,
 405                 _video_container_size,
 406                 eyes,
 407                 Part::WHOLE,
 408                 PresetColourConversion::all().front().conversion,
 409                 VideoRange::FULL,
 410                 std::weak_ptr<Content>(),
 411                 boost::optional<Frame>(),
 412                 false
 413         );
 414 }
 415
 416
 417 Frame
 418 Player::dcp_to_content_video (shared_ptr<const Piece> piece, DCPTime t) const
 419 {
 420         auto s = t - piece->content->position ();
 421         s = min (piece->content->length_after_trim(_film), s);
 422         s = max (DCPTime(), s + DCPTime (piece->content->trim_start(), piece->frc));
 423
 424         /* It might seem more logical here to convert s to a ContentTime (using the FrameRateChange)
 425            then convert that ContentTime to frames at the content's rate.  However this fails for
 426            situations like content at 29.9978733fps, DCP at 30fps.  The accuracy of the Time type is not
 427            enough to distinguish between the two with low values of time (e.g. 3200 in Time units).
 428
 429            Instead we convert the DCPTime using the DCP video rate then account for any skip/repeat.
 430         */
 431         return s.frames_floor (piece->frc.dcp) / piece->frc.factor ();
 432 }
 433
 434
 435 DCPTime
 436 Player::content_video_to_dcp (shared_ptr<const Piece> piece, Frame f) const
 437 {
 438         /* See comment in dcp_to_content_video */
 439         auto const d = DCPTime::from_frames (f * piece->frc.factor(), piece->frc.dcp) - DCPTime(piece->content->trim_start(), piece->frc);
 440         return d + piece->content->position();
 441 }
 442
 443
 444 Frame
 445 Player::dcp_to_resampled_audio (shared_ptr<const Piece> piece, DCPTime t) const
 446 {
 447         auto s = t - piece->content->position ();
 448         s = min (piece->content->length_after_trim(_film), s);
 449         /* See notes in dcp_to_content_video */
 450         return max (DCPTime(), DCPTime(piece->content->trim_start(), piece->frc) + s).frames_floor(_film->audio_frame_rate());
 451 }
 452
 453
 454 DCPTime
 455 Player::resampled_audio_to_dcp (shared_ptr<const Piece> piece, Frame f) const
 456 {
 457         /* See comment in dcp_to_content_video */
 458         return DCPTime::from_frames (f, _film->audio_frame_rate())
 459                 - DCPTime (piece->content->trim_start(), piece->frc)
 460                 + piece->content->position();
 461 }
 462
 463
 464 ContentTime
 465 Player::dcp_to_content_time (shared_ptr<const Piece> piece, DCPTime t) const
 466 {
 467         auto s = t - piece->content->position ();
 468         s = min (piece->content->length_after_trim(_film), s);
 469         return max (ContentTime (), ContentTime (s, piece->frc) + piece->content->trim_start());
 470 }
 471
 472
 473 DCPTime
 474 Player::content_time_to_dcp (shared_ptr<const Piece> piece, ContentTime t) const
 475 {
 476         return max (DCPTime(), DCPTime(t - piece->content->trim_start(), piece->frc) + piece->content->position());
 477 }
 478
 479
 480 vector<shared_ptr<Font>>
 481 Player::get_subtitle_fonts ()
 482 {
 483         boost::mutex::scoped_lock lm (_mutex);
 484
 485         vector<shared_ptr<Font>> fonts;
 486         for (auto piece: _pieces) {
 487                 for (auto text: piece->content->text) {
 488                         auto text_fonts = text->fonts();
 489                         copy (text_fonts.begin(), text_fonts.end(), back_inserter(fonts));
 490                 }
 491         }
 492
 493         return fonts;
 494 }
 495
 496
 497 /** Set this player never to produce any video data */
 498 void
 499 Player::set_ignore_video ()
 500 {
 501         boost::mutex::scoped_lock lm (_mutex);
 502         _ignore_video = true;
 503         setup_pieces_unlocked ();
 504 }
 505
 506
 507 void
 508 Player::set_ignore_audio ()
 509 {
 510         boost::mutex::scoped_lock lm (_mutex);
 511         _ignore_audio = true;
 512         setup_pieces_unlocked ();
 513 }
 514
 515
 516 void
 517 Player::set_ignore_text ()
 518 {
 519         boost::mutex::scoped_lock lm (_mutex);
 520         _ignore_text = true;
 521         setup_pieces_unlocked ();
 522 }
 523
 524
 525 /** Set the player to always burn open texts into the image regardless of the content settings */
 526 void
 527 Player::set_always_burn_open_subtitles ()
 528 {
 529         boost::mutex::scoped_lock lm (_mutex);
 530         _always_burn_open_subtitles = true;
 531 }
 532
 533
 534 /** Sets up the player to be faster, possibly at the expense of quality */
 535 void
 536 Player::set_fast ()
 537 {
 538         boost::mutex::scoped_lock lm (_mutex);
 539         _fast = true;
 540         setup_pieces_unlocked ();
 541 }
 542
 543
 544 void
 545 Player::set_play_referenced ()
 546 {
 547         boost::mutex::scoped_lock lm (_mutex);
 548         _play_referenced = true;
 549         setup_pieces_unlocked ();
 550 }
 551
 552
 553 static void
 554 maybe_add_asset (list<ReferencedReelAsset>& a, shared_ptr<dcp::ReelAsset> r, Frame reel_trim_start, Frame reel_trim_end, DCPTime from, int const ffr)
 555 {
 556         DCPOMATIC_ASSERT (r);
 557         r->set_entry_point (r->entry_point().get_value_or(0) + reel_trim_start);
 558         r->set_duration (r->actual_duration() - reel_trim_start - reel_trim_end);
 559         if (r->actual_duration() > 0) {
 560                 a.push_back (
 561                         ReferencedReelAsset(r, DCPTimePeriod(from, from + DCPTime::from_frames(r->actual_duration(), ffr)))
 562                         );
 563         }
 564 }
 565
 566
 567 list<ReferencedReelAsset>
 568 Player::get_reel_assets ()
 569 {
 570         /* Does not require a lock on _mutex as it's only called from DCPEncoder */
 571
 572         list<ReferencedReelAsset> reel_assets;
 573
 574         for (auto content: playlist()->content()) {
 575                 auto dcp = dynamic_pointer_cast<DCPContent>(content);
 576                 if (!dcp) {
 577                         continue;
 578                 }
 579
 580                 if (!dcp->reference_video() && !dcp->reference_audio() && !dcp->reference_text(TextType::OPEN_SUBTITLE) && !dcp->reference_text(TextType::CLOSED_CAPTION)) {
 581                         continue;
 582                 }
 583
 584                 scoped_ptr<DCPDecoder> decoder;
 585                 try {
 586                         decoder.reset (new DCPDecoder(_film, dcp, false, false, shared_ptr<DCPDecoder>()));
 587                 } catch (...) {
 588                         return reel_assets;
 589                 }
 590
 591                 auto const frame_rate = _film->video_frame_rate();
 592                 DCPOMATIC_ASSERT (dcp->video_frame_rate());
 593                 /* We should only be referencing if the DCP rate is the same as the film rate */
 594                 DCPOMATIC_ASSERT (std::round(dcp->video_frame_rate().get()) == frame_rate);
 595
 596                 Frame const trim_start = dcp->trim_start().frames_round(frame_rate);
 597                 Frame const trim_end = dcp->trim_end().frames_round(frame_rate);
 598
 599                 /* position in the asset from the start */
 600                 int64_t offset_from_start = 0;
 601                 /* position i the asset from the end */
 602                 int64_t offset_from_end = 0;
 603                 for (auto reel: decoder->reels()) {
 604                         /* Assume that main picture duration is the length of the reel */
 605                         offset_from_end += reel->main_picture()->actual_duration();
 606                 }
 607
 608                 for (auto reel: decoder->reels()) {
 609
 610                         /* Assume that main picture duration is the length of the reel */
 611                         int64_t const reel_duration = reel->main_picture()->actual_duration();
 612
 613                         /* See doc/design/trim_reels.svg */
 614                         Frame const reel_trim_start = min(reel_duration, max(int64_t(0), trim_start - offset_from_start));
 615                         Frame const reel_trim_end =   min(reel_duration, max(int64_t(0), reel_duration - (offset_from_end - trim_end)));
 616
 617                         auto const from = max(DCPTime(), content->position() + DCPTime::from_frames(offset_from_start, frame_rate) - DCPTime::from_frames(trim_start, frame_rate));
 618                         if (dcp->reference_video()) {
 619                                 maybe_add_asset (reel_assets, reel->main_picture(), reel_trim_start, reel_trim_end, from, frame_rate);
 620                         }
 621
 622                         if (dcp->reference_audio()) {
 623                                 maybe_add_asset (reel_assets, reel->main_sound(), reel_trim_start, reel_trim_end, from, frame_rate);
 624                         }
 625
 626                         if (dcp->reference_text(TextType::OPEN_SUBTITLE)) {
 627                                 maybe_add_asset (reel_assets, reel->main_subtitle(), reel_trim_start, reel_trim_end, from, frame_rate);
 628                         }
 629
 630                         if (dcp->reference_text(TextType::CLOSED_CAPTION)) {
 631                                 for (auto caption: reel->closed_captions()) {
 632                                         maybe_add_asset (reel_assets, caption, reel_trim_start, reel_trim_end, from, frame_rate);
 633                                 }
 634                         }
 635
 636                         offset_from_start += reel_duration;
 637                         offset_from_end -= reel_duration;
 638                 }
 639         }
 640
 641         return reel_assets;
 642 }
 643
 644
 645 bool
 646 Player::pass ()
 647 {
 648         boost::mutex::scoped_lock lm (_mutex);
 649
 650         if (_suspended) {
 651                 /* We can't pass in this state */
 652                 LOG_DEBUG_PLAYER_NC ("Player is suspended");
 653                 return false;
 654         }
 655
 656         if (_playback_length == DCPTime()) {
 657                 /* Special; just give one black frame */
 658                 emit_video (black_player_video_frame(Eyes::BOTH), DCPTime());
 659                 return true;
 660         }
 661
 662         /* Find the decoder or empty which is farthest behind where we are and make it emit some data */
 663
 664         shared_ptr<Piece> earliest_content;
 665         optional<DCPTime> earliest_time;
 666
 667         for (auto i: _pieces) {
 668                 if (i->done) {
 669                         continue;
 670                 }
 671
 672                 auto const t = content_time_to_dcp (i, max(i->decoder->position(), i->content->trim_start()));
 673                 if (t > i->content->end(_film)) {
 674                         i->done = true;
 675                 } else {
 676
 677                         /* Given two choices at the same time, pick the one with texts so we see it before
 678                            the video.
 679                         */
 680                         if (!earliest_time || t < *earliest_time || (t == *earliest_time && !i->decoder->text.empty())) {
 681                                 earliest_time = t;
 682                                 earliest_content = i;
 683                         }
 684                 }
 685         }
 686
 687         bool done = false;
 688
 689         enum {
 690                 NONE,
 691                 CONTENT,
 692                 BLACK,
 693                 SILENT
 694         } which = NONE;
 695
 696         if (earliest_content) {
 697                 which = CONTENT;
 698         }
 699
 700         if (!_black.done() && !_ignore_video && (!earliest_time || _black.position() < *earliest_time)) {
 701                 earliest_time = _black.position ();
 702                 which = BLACK;
 703         }
 704
 705         if (!_silent.done() && !_ignore_audio && (!earliest_time || _silent.position() < *earliest_time)) {
 706                 earliest_time = _silent.position ();
 707                 which = SILENT;
 708         }
 709
 710         switch (which) {
 711         case CONTENT:
 712         {
 713                 LOG_DEBUG_PLAYER ("Calling pass() on %1", earliest_content->content->path(0));
 714                 earliest_content->done = earliest_content->decoder->pass ();
 715                 auto dcp = dynamic_pointer_cast<DCPContent>(earliest_content->content);
 716                 if (dcp && !_play_referenced && dcp->reference_audio()) {
 717                         /* We are skipping some referenced DCP audio content, so we need to update _next_audio_time
 718                            to `hide' the fact that no audio was emitted during the referenced DCP (though
 719                            we need to behave as though it was).
 720                         */
 721                         _next_audio_time = dcp->end (_film);
 722                 }
 723                 break;
 724         }
 725         case BLACK:
 726                 LOG_DEBUG_PLAYER ("Emit black for gap at %1", to_string(_black.position()));
 727                 emit_video (black_player_video_frame(Eyes::BOTH), _black.position());
 728                 _black.set_position (_black.position() + one_video_frame());
 729                 break;
 730         case SILENT:
 731         {
 732                 LOG_DEBUG_PLAYER ("Emit silence for gap at %1", to_string(_silent.position()));
 733                 DCPTimePeriod period (_silent.period_at_position());
 734                 if (_next_audio_time) {
 735                         /* Sometimes the thing that happened last finishes fractionally before
 736                            or after this silence.  Bodge the start time of the silence to fix it.
 737                            I think this is nothing to worry about since we will just add or
 738                            remove a little silence at the end of some content.
 739                         */
 740                         int64_t const error = labs(period.from.get() - _next_audio_time->get());
 741                         /* Let's not worry about less than a frame at 24fps */
 742                         int64_t const too_much_error = DCPTime::from_frames(1, 24).get();
 743                         if (error >= too_much_error) {
 744                                 _film->log()->log(String::compose("Silence starting before or after last audio by %1", error), LogEntry::TYPE_ERROR);
 745                         }
 746                         DCPOMATIC_ASSERT (error < too_much_error);
 747                         period.from = *_next_audio_time;
 748                 }
 749                 if (period.duration() > one_video_frame()) {
 750                         period.to = period.from + one_video_frame();
 751                 }
 752                 fill_audio (period);
 753                 _silent.set_position (period.to);
 754                 break;
 755         }
 756         case NONE:
 757                 done = true;
 758                 break;
 759         }
 760
 761         /* Emit any audio that is ready */
 762
 763         /* Work out the time before which the audio is definitely all here.  This is the earliest last_push_end of one
 764            of our streams, or the position of the _silent.  First, though we choose only streams that are less than
 765            ignore_streams_behind seconds behind the furthest ahead (we assume that if a stream has fallen that far
 766            behind it has finished).  This is so that we don't withhold audio indefinitely awaiting data from a stream
 767            that will never come, causing bugs like #2101.
 768         */
 769         constexpr int ignore_streams_behind = 5;
 770
 771         using state_pair = std::pair<AudioStreamPtr, StreamState>;
 772
 773         /* Find the 'leading' stream (i.e. the one that pushed data most recently) */
 774         auto latest_last_push_end = std::max_element(
 775                 _stream_states.begin(),
 776                 _stream_states.end(),
 777                 [](state_pair const& a, state_pair const& b) { return a.second.last_push_end < b.second.last_push_end; }
 778                 );
 779
 780         if (latest_last_push_end != _stream_states.end()) {
 781                 LOG_DEBUG_PLAYER("Leading stream is in %1 at %2", latest_last_push_end->second.piece->content->path(0), to_string(latest_last_push_end->second.last_push_end));
 782         }
 783
 784         /* Now make a list of those streams that are less than ignore_streams_behind behind the leader */
 785         std::map<AudioStreamPtr, StreamState> alive_stream_states;
 786         for (auto const& i: _stream_states) {
 787                 if ((latest_last_push_end->second.last_push_end - i.second.last_push_end) < dcpomatic::DCPTime::from_seconds(ignore_streams_behind)) {
 788                         alive_stream_states.insert(i);
 789                 } else {
 790                         LOG_DEBUG_PLAYER("Ignoring stream %1 because it is too far behind", i.second.piece->content->path(0));
 791                 }
 792         }
 793
 794         auto pull_to = _playback_length;
 795         for (auto const& i: alive_stream_states) {
 796                 if (!i.second.piece->done && i.second.last_push_end < pull_to) {
 797                         pull_to = i.second.last_push_end;
 798                 }
 799         }
 800         if (!_silent.done() && _silent.position() < pull_to) {
 801                 pull_to = _silent.position();
 802         }
 803
 804         LOG_DEBUG_PLAYER("Emitting audio up to %1", to_string(pull_to));
 805         auto audio = _audio_merger.pull (pull_to);
 806         for (auto i = audio.begin(); i != audio.end(); ++i) {
 807                 if (_next_audio_time && i->second < *_next_audio_time) {
 808                         /* This new data comes before the last we emitted (or the last seek); discard it */
 809                         auto cut = discard_audio (i->first, i->second, *_next_audio_time);
 810                         if (!cut.first) {
 811                                 continue;
 812                         }
 813                         *i = cut;
 814                 } else if (_next_audio_time && i->second > *_next_audio_time) {
 815                         /* There's a gap between this data and the last we emitted; fill with silence */
 816                         fill_audio (DCPTimePeriod (*_next_audio_time, i->second));
 817                 }
 818
 819                 emit_audio (i->first, i->second);
 820         }
 821
 822         if (done) {
 823                 if (_shuffler) {
 824                         _shuffler->flush ();
 825                 }
 826                 for (auto const& i: _delay) {
 827                         do_emit_video(i.first, i.second);
 828                 }
 829
 830                 /* Perhaps we should have Empty entries for both eyes in the 3D case (somehow).
 831                  * However, if we have L and R video files, and one is shorter than the other,
 832                  * the fill code in ::video mostly takes care of filling in the gaps.
 833                  * However, since it fills at the point when it knows there is more video coming
 834                  * at time t (so it should fill any gap up to t) it can't do anything right at the
 835                  * end.  This is particularly bad news if the last frame emitted is a LEFT
 836                  * eye, as the MXF writer will complain about the 3D sequence being wrong.
 837                  * Here's a hack to workaround that particular case.
 838                  */
 839                 if (_next_video_eyes && _next_video_time && *_next_video_eyes == Eyes::RIGHT) {
 840                         do_emit_video (black_player_video_frame(Eyes::RIGHT), *_next_video_time);
 841                 }
 842         }
 843
 844         return done;
 845 }
 846
 847
 848 /** @return Open subtitles for the frame at the given time, converted to images */
 849 optional<PositionImage>
 850 Player::open_subtitles_for_frame (DCPTime time) const
 851 {
 852         list<PositionImage> captions;
 853         int const vfr = _film->video_frame_rate();
 854
 855         for (
 856                 auto j:
 857                 _active_texts[static_cast<int>(TextType::OPEN_SUBTITLE)].get_burnt(DCPTimePeriod(time, time + DCPTime::from_frames(1, vfr)), _always_burn_open_subtitles)
 858                 ) {
 859
 860                 /* Bitmap subtitles */
 861                 for (auto i: j.bitmap) {
 862                         if (!i.image) {
 863                                 continue;
 864                         }
 865
 866                         /* i.image will already have been scaled to fit _video_container_size */
 867                         dcp::Size scaled_size (i.rectangle.width * _video_container_size.width, i.rectangle.height * _video_container_size.height);
 868
 869                         captions.push_back (
 870                                 PositionImage (
 871                                         i.image,
 872                                         Position<int> (
 873                                                 lrint(_video_container_size.width * i.rectangle.x),
 874                                                 lrint(_video_container_size.height * i.rectangle.y)
 875                                                 )
 876                                         )
 877                                 );
 878                 }
 879
 880                 /* String subtitles (rendered to an image) */
 881                 if (!j.string.empty()) {
 882                         auto s = render_text(j.string, _video_container_size, time, vfr);
 883                         copy (s.begin(), s.end(), back_inserter (captions));
 884                 }
 885         }
 886
 887         if (captions.empty()) {
 888                 return {};
 889         }
 890
 891         return merge (captions, _subtitle_alignment);
 892 }
 893
 894
 895 void
 896 Player::video (weak_ptr<Piece> weak_piece, ContentVideo video)
 897 {
 898         if (_suspended) {
 899                 return;
 900         }
 901
 902         auto piece = weak_piece.lock ();
 903         if (!piece) {
 904                 return;
 905         }
 906
 907         if (!piece->content->video->use()) {
 908                 return;
 909         }
 910
 911         FrameRateChange frc (_film, piece->content);
 912         if (frc.skip && (video.frame % 2) == 1) {
 913                 return;
 914         }
 915
 916         /* Time of the first frame we will emit */
 917         DCPTime const time = content_video_to_dcp (piece, video.frame);
 918         LOG_DEBUG_PLAYER("Received video frame %1 at %2", video.frame, to_string(time));
 919
 920         /* Discard if it's before the content's period or the last accurate seek.  We can't discard
 921            if it's after the content's period here as in that case we still need to fill any gap between
 922            `now' and the end of the content's period.
 923         */
 924         if (time < piece->content->position() || (_next_video_time && time < *_next_video_time)) {
 925                 return;
 926         }
 927
 928         if (piece->ignore_video && piece->ignore_video->contains(time)) {
 929                 return;
 930         }
 931
 932         /* Fill gaps that we discover now that we have some video which needs to be emitted.
 933            This is where we need to fill to.
 934         */
 935         DCPTime fill_to = min (time, piece->content->end(_film));
 936
 937         if (_next_video_time) {
 938                 DCPTime fill_from = max (*_next_video_time, piece->content->position());
 939
 940                 /* Fill if we have more than half a frame to do */
 941                 if ((fill_to - fill_from) > one_video_frame() / 2) {
 942                         auto last = _last_video.find (weak_piece);
 943                         if (_film->three_d()) {
 944                                 auto fill_to_eyes = video.eyes;
 945                                 if (fill_to_eyes == Eyes::BOTH) {
 946                                         fill_to_eyes = Eyes::LEFT;
 947                                 }
 948                                 if (fill_to == piece->content->end(_film)) {
 949                                         /* Don't fill after the end of the content */
 950                                         fill_to_eyes = Eyes::LEFT;
 951                                 }
 952                                 auto j = fill_from;
 953                                 auto eyes = _next_video_eyes.get_value_or(Eyes::LEFT);
 954                                 if (eyes == Eyes::BOTH) {
 955                                         eyes = Eyes::LEFT;
 956                                 }
 957                                 while (j < fill_to || eyes != fill_to_eyes) {
 958                                         if (last != _last_video.end()) {
 959                                                 LOG_DEBUG_PLAYER("Fill using last video at %1 in 3D mode", to_string(j));
 960                                                 auto copy = last->second->shallow_copy();
 961                                                 copy->set_eyes (eyes);
 962                                                 emit_video (copy, j);
 963                                         } else {
 964                                                 LOG_DEBUG_PLAYER("Fill using black at %1 in 3D mode", to_string(j));
 965                                                 emit_video (black_player_video_frame(eyes), j);
 966                                         }
 967                                         if (eyes == Eyes::RIGHT) {
 968                                                 j += one_video_frame();
 969                                         }
 970                                         eyes = increment_eyes (eyes);
 971                                 }
 972                         } else {
 973                                 for (DCPTime j = fill_from; j < fill_to; j += one_video_frame()) {
 974                                         if (last != _last_video.end()) {
 975                                                 emit_video (last->second, j);
 976                                         } else {
 977                                                 emit_video (black_player_video_frame(Eyes::BOTH), j);
 978                                         }
 979                                 }
 980                         }
 981                 }
 982         }
 983
 984         auto const content_video = piece->content->video;
 985
 986         _last_video[weak_piece] = std::make_shared<PlayerVideo>(
 987                 video.image,
 988                 content_video->actual_crop(),
 989                 content_video->fade (_film, video.frame),
 990                 scale_for_display(
 991                         content_video->scaled_size(_film->frame_size()),
 992                         _video_container_size,
 993                         _film->frame_size(),
 994                         content_video->pixel_quanta()
 995                         ),
 996                 _video_container_size,
 997                 video.eyes,
 998                 video.part,
 999                 content_video->colour_conversion(),
1000                 content_video->range(),
1001                 piece->content,
1002                 video.frame,
1003                 false
1004                 );
1005
1006         DCPTime t = time;
1007         for (int i = 0; i < frc.repeat; ++i) {
1008                 if (t < piece->content->end(_film)) {
1009                         emit_video (_last_video[weak_piece], t);
1010                 }
1011                 t += one_video_frame ();
1012         }
1013 }
1014
1015
1016 void
1017 Player::audio (weak_ptr<Piece> weak_piece, AudioStreamPtr stream, ContentAudio content_audio)
1018 {
1019         if (_suspended) {
1020                 return;
1021         }
1022
1023         DCPOMATIC_ASSERT (content_audio.audio->frames() > 0);
1024
1025         auto piece = weak_piece.lock ();
1026         if (!piece) {
1027                 return;
1028         }
1029
1030         auto content = piece->content->audio;
1031         DCPOMATIC_ASSERT (content);
1032
1033         int const rfr = content->resampled_frame_rate (_film);
1034
1035         /* Compute time in the DCP */
1036         auto time = resampled_audio_to_dcp (piece, content_audio.frame);
1037         LOG_DEBUG_PLAYER("Received audio frame %1 at %2", content_audio.frame, to_string(time));
1038
1039         /* And the end of this block in the DCP */
1040         auto end = time + DCPTime::from_frames(content_audio.audio->frames(), rfr);
1041
1042         /* Remove anything that comes before the start or after the end of the content */
1043         if (time < piece->content->position()) {
1044                 auto cut = discard_audio (content_audio.audio, time, piece->content->position());
1045                 if (!cut.first) {
1046                         /* This audio is entirely discarded */
1047                         return;
1048                 }
1049                 content_audio.audio = cut.first;
1050                 time = cut.second;
1051         } else if (time > piece->content->end(_film)) {
1052                 /* Discard it all */
1053                 return;
1054         } else if (end > piece->content->end(_film)) {
1055                 Frame const remaining_frames = DCPTime(piece->content->end(_film) - time).frames_round(rfr);
1056                 if (remaining_frames == 0) {
1057                         return;
1058                 }
1059                 content_audio.audio = make_shared<AudioBuffers>(content_audio.audio, remaining_frames, 0);
1060         }
1061
1062         DCPOMATIC_ASSERT (content_audio.audio->frames() > 0);
1063
1064         /* Gain and fade */
1065
1066         auto const fade_coeffs = content->fade (stream, content_audio.frame, content_audio.audio->frames(), rfr);
1067         if (content->gain() != 0 || !fade_coeffs.empty()) {
1068                 auto gain_buffers = make_shared<AudioBuffers>(content_audio.audio);
1069                 if (!fade_coeffs.empty()) {
1070                         /* Apply both fade and gain */
1071                         DCPOMATIC_ASSERT (fade_coeffs.size() == static_cast<size_t>(gain_buffers->frames()));
1072                         auto const channels = gain_buffers->channels();
1073                         auto const frames = fade_coeffs.size();
1074                         auto data = gain_buffers->data();
1075                         auto const gain = db_to_linear (content->gain());
1076                         for (auto channel = 0; channel < channels; ++channel) {
1077                                 for (auto frame = 0U; frame < frames; ++frame) {
1078                                         data[channel][frame] *= gain * fade_coeffs[frame];
1079                                 }
1080                         }
1081                 } else {
1082                         /* Just apply gain */
1083                         gain_buffers->apply_gain (content->gain());
1084                 }
1085                 content_audio.audio = gain_buffers;
1086         }
1087
1088         /* Remap */
1089
1090         content_audio.audio = remap (content_audio.audio, _film->audio_channels(), stream->mapping());
1091
1092         /* Process */
1093
1094         if (_audio_processor) {
1095                 content_audio.audio = _audio_processor->run (content_audio.audio, _film->audio_channels ());
1096         }
1097
1098         /* Push */
1099
1100         _audio_merger.push (content_audio.audio, time);
1101         DCPOMATIC_ASSERT (_stream_states.find (stream) != _stream_states.end ());
1102         _stream_states[stream].last_push_end = time + DCPTime::from_frames (content_audio.audio->frames(), _film->audio_frame_rate());
1103 }
1104
1105
1106 void
1107 Player::bitmap_text_start (weak_ptr<Piece> weak_piece, weak_ptr<const TextContent> weak_content, ContentBitmapText subtitle)
1108 {
1109         if (_suspended) {
1110                 return;
1111         }
1112
1113         auto piece = weak_piece.lock ();
1114         auto content = weak_content.lock ();
1115         if (!piece || !content) {
1116                 return;
1117         }
1118
1119         PlayerText ps;
1120         for (auto& sub: subtitle.subs)
1121         {
1122                 /* Apply content's subtitle offsets */
1123                 sub.rectangle.x += content->x_offset ();
1124                 sub.rectangle.y += content->y_offset ();
1125
1126                 /* Apply a corrective translation to keep the subtitle centred after the scale that is coming up */
1127                 sub.rectangle.x -= sub.rectangle.width * ((content->x_scale() - 1) / 2);
1128                 sub.rectangle.y -= sub.rectangle.height * ((content->y_scale() - 1) / 2);
1129
1130                 /* Apply content's subtitle scale */
1131                 sub.rectangle.width *= content->x_scale ();
1132                 sub.rectangle.height *= content->y_scale ();
1133
1134                 auto image = sub.image;
1135
1136                 /* We will scale the subtitle up to fit _video_container_size */
1137                 int const width = sub.rectangle.width * _video_container_size.width;
1138                 int const height = sub.rectangle.height * _video_container_size.height;
1139                 if (width == 0 || height == 0) {
1140                         return;
1141                 }
1142
1143                 dcp::Size scaled_size (width, height);
1144                 ps.bitmap.push_back (BitmapText(image->scale(scaled_size, dcp::YUVToRGB::REC601, image->pixel_format(), Image::Alignment::PADDED, _fast), sub.rectangle));
1145         }
1146
1147         DCPTime from(content_time_to_dcp(piece, subtitle.from()));
1148         _active_texts[static_cast<int>(content->type())].add_from(weak_content, ps, from);
1149 }
1150
1151
1152 void
1153 Player::plain_text_start (weak_ptr<Piece> weak_piece, weak_ptr<const TextContent> weak_content, ContentStringText subtitle)
1154 {
1155         if (_suspended) {
1156                 return;
1157         }
1158
1159         auto piece = weak_piece.lock ();
1160         auto content = weak_content.lock ();
1161         if (!piece || !content) {
1162                 return;
1163         }
1164
1165         PlayerText ps;
1166         DCPTime const from (content_time_to_dcp (piece, subtitle.from()));
1167
1168         if (from > piece->content->end(_film)) {
1169                 return;
1170         }
1171
1172         for (auto s: subtitle.subs) {
1173                 s.set_h_position (s.h_position() + content->x_offset());
1174                 s.set_v_position (s.v_position() + content->y_offset());
1175                 float const xs = content->x_scale();
1176                 float const ys = content->y_scale();
1177                 float size = s.size();
1178
1179                 /* Adjust size to express the common part of the scaling;
1180                    e.g. if xs = ys = 0.5 we scale size by 2.
1181                 */
1182                 if (xs > 1e-5 && ys > 1e-5) {
1183                         size *= 1 / min (1 / xs, 1 / ys);
1184                 }
1185                 s.set_size (size);
1186
1187                 /* Then express aspect ratio changes */
1188                 if (fabs (1.0 - xs / ys) > dcp::ASPECT_ADJUST_EPSILON) {
1189                         s.set_aspect_adjust (xs / ys);
1190                 }
1191
1192                 s.set_in (dcp::Time(from.seconds(), 1000));
1193                 ps.string.push_back (s);
1194         }
1195
1196         _active_texts[static_cast<int>(content->type())].add_from(weak_content, ps, from);
1197 }
1198
1199
1200 void
1201 Player::subtitle_stop (weak_ptr<Piece> weak_piece, weak_ptr<const TextContent> weak_content, ContentTime to)
1202 {
1203         if (_suspended) {
1204                 return;
1205         }
1206
1207         auto content = weak_content.lock ();
1208         if (!content) {
1209                 return;
1210         }
1211
1212         if (!_active_texts[static_cast<int>(content->type())].have(weak_content)) {
1213                 return;
1214         }
1215
1216         auto piece = weak_piece.lock ();
1217         if (!piece) {
1218                 return;
1219         }
1220
1221         DCPTime const dcp_to = content_time_to_dcp (piece, to);
1222
1223         if (dcp_to > piece->content->end(_film)) {
1224                 return;
1225         }
1226
1227         auto from = _active_texts[static_cast<int>(content->type())].add_to(weak_content, dcp_to);
1228
1229         bool const always = (content->type() == TextType::OPEN_SUBTITLE && _always_burn_open_subtitles);
1230         if (content->use() && !always && !content->burn()) {
1231                 Text (from.first, content->type(), content->dcp_track().get_value_or(DCPTextTrack()), DCPTimePeriod(from.second, dcp_to));
1232         }
1233 }
1234
1235
1236 void
1237 Player::seek (DCPTime time, bool accurate)
1238 {
1239         boost::mutex::scoped_lock lm (_mutex);
1240         LOG_DEBUG_PLAYER("Seek to %1 (%2accurate)", to_string(time), accurate ? "" : "in");
1241
1242         if (_suspended) {
1243                 /* We can't seek in this state */
1244                 return;
1245         }
1246
1247         if (_shuffler) {
1248                 _shuffler->clear ();
1249         }
1250
1251         _delay.clear ();
1252
1253         if (_audio_processor) {
1254                 _audio_processor->flush ();
1255         }
1256
1257         _audio_merger.clear ();
1258         for (int i = 0; i < static_cast<int>(TextType::COUNT); ++i) {
1259                 _active_texts[i].clear ();
1260         }
1261
1262         for (auto i: _pieces) {
1263                 if (time < i->content->position()) {
1264                         /* Before; seek to the start of the content.  Even if this request is for an inaccurate seek
1265                            we must seek this (following) content accurately, otherwise when we come to the end of the current
1266                            content we may not start right at the beginning of the next, causing a gap (if the next content has
1267                            been trimmed to a point between keyframes, or something).
1268                         */
1269                         i->decoder->seek (dcp_to_content_time (i, i->content->position()), true);
1270                         i->done = false;
1271                 } else if (i->content->position() <= time && time < i->content->end(_film)) {
1272                         /* During; seek to position */
1273                         i->decoder->seek (dcp_to_content_time (i, time), accurate);
1274                         i->done = false;
1275                 } else {
1276                         /* After; this piece is done */
1277                         i->done = true;
1278                 }
1279         }
1280
1281         if (accurate) {
1282                 _next_video_time = time;
1283                 _next_video_eyes = Eyes::LEFT;
1284                 _next_audio_time = time;
1285         } else {
1286                 _next_video_time = boost::none;
1287                 _next_video_eyes = boost::none;
1288                 _next_audio_time = boost::none;
1289         }
1290
1291         _black.set_position (time);
1292         _silent.set_position (time);
1293
1294         _last_video.clear ();
1295 }
1296
1297
1298 void
1299 Player::emit_video (shared_ptr<PlayerVideo> pv, DCPTime time)
1300 {
1301         if (!_film->three_d()) {
1302                 if (pv->eyes() == Eyes::LEFT) {
1303                         /* Use left-eye images for both eyes... */
1304                         pv->set_eyes (Eyes::BOTH);
1305                 } else if (pv->eyes() == Eyes::RIGHT) {
1306                         /* ...and discard the right */
1307                         return;
1308                 }
1309         }
1310
1311         /* We need a delay to give a little wiggle room to ensure that relevant subtitles arrive at the
1312            player before the video that requires them.
1313         */
1314         _delay.push_back (make_pair (pv, time));
1315
1316         if (pv->eyes() == Eyes::BOTH || pv->eyes() == Eyes::RIGHT) {
1317                 _next_video_time = time + one_video_frame();
1318         }
1319         _next_video_eyes = increment_eyes (pv->eyes());
1320
1321         if (_delay.size() < 3) {
1322                 return;
1323         }
1324
1325         auto to_do = _delay.front();
1326         _delay.pop_front();
1327         do_emit_video (to_do.first, to_do.second);
1328 }
1329
1330
1331 void
1332 Player::do_emit_video (shared_ptr<PlayerVideo> pv, DCPTime time)
1333 {
1334         if (pv->eyes() == Eyes::BOTH || pv->eyes() == Eyes::RIGHT) {
1335                 for (int i = 0; i < static_cast<int>(TextType::COUNT); ++i) {
1336                         _active_texts[i].clear_before (time);
1337                 }
1338         }
1339
1340         auto subtitles = open_subtitles_for_frame (time);
1341         if (subtitles) {
1342                 pv->set_text (subtitles.get ());
1343         }
1344
1345         Video (pv, time);
1346 }
1347
1348
1349 void
1350 Player::emit_audio (shared_ptr<AudioBuffers> data, DCPTime time)
1351 {
1352         /* Log if the assert below is about to fail */
1353         if (_next_audio_time && labs(time.get() - _next_audio_time->get()) > 1) {
1354                 _film->log()->log(String::compose("Out-of-sequence emit %1 vs %2", to_string(time), to_string(*_next_audio_time)), LogEntry::TYPE_WARNING);
1355         }
1356
1357         /* This audio must follow on from the previous, allowing for half a sample (at 48kHz) leeway */
1358         DCPOMATIC_ASSERT (!_next_audio_time || labs(time.get() - _next_audio_time->get()) < 2);
1359         Audio (data, time, _film->audio_frame_rate());
1360         _next_audio_time = time + DCPTime::from_frames (data->frames(), _film->audio_frame_rate());
1361 }
1362
1363
1364 void
1365 Player::fill_audio (DCPTimePeriod period)
1366 {
1367         if (period.from == period.to) {
1368                 return;
1369         }
1370
1371         DCPOMATIC_ASSERT (period.from < period.to);
1372
1373         DCPTime t = period.from;
1374         while (t < period.to) {
1375                 DCPTime block = min (DCPTime::from_seconds (0.5), period.to - t);
1376                 Frame const samples = block.frames_round(_film->audio_frame_rate());
1377                 if (samples) {
1378                         auto silence = make_shared<AudioBuffers>(_film->audio_channels(), samples);
1379                         silence->make_silent ();
1380                         emit_audio (silence, t);
1381                 }
1382                 t += block;
1383         }
1384 }
1385
1386
1387 DCPTime
1388 Player::one_video_frame () const
1389 {
1390         return DCPTime::from_frames (1, _film->video_frame_rate ());
1391 }
1392
1393
1394 pair<shared_ptr<AudioBuffers>, DCPTime>
1395 Player::discard_audio (shared_ptr<const AudioBuffers> audio, DCPTime time, DCPTime discard_to) const
1396 {
1397         auto const discard_time = discard_to - time;
1398         auto const discard_frames = discard_time.frames_round(_film->audio_frame_rate());
1399         auto remaining_frames = audio->frames() - discard_frames;
1400         if (remaining_frames <= 0) {
1401                 return make_pair(shared_ptr<AudioBuffers>(), DCPTime());
1402         }
1403         auto cut = make_shared<AudioBuffers>(audio, remaining_frames, discard_frames);
1404         return make_pair(cut, time + discard_time);
1405 }
1406
1407
1408 void
1409 Player::set_dcp_decode_reduction (optional<int> reduction)
1410 {
1411         Change (ChangeType::PENDING, PlayerProperty::DCP_DECODE_REDUCTION, false);
1412
1413         {
1414                 boost::mutex::scoped_lock lm (_mutex);
1415
1416                 if (reduction == _dcp_decode_reduction) {
1417                         lm.unlock ();
1418                         Change (ChangeType::CANCELLED, PlayerProperty::DCP_DECODE_REDUCTION, false);
1419                         return;
1420                 }
1421
1422                 _dcp_decode_reduction = reduction;
1423                 setup_pieces_unlocked ();
1424         }
1425
1426         Change (ChangeType::DONE, PlayerProperty::DCP_DECODE_REDUCTION, false);
1427 }
1428
1429
1430 optional<DCPTime>
1431 Player::content_time_to_dcp (shared_ptr<const Content> content, ContentTime t)
1432 {
1433         boost::mutex::scoped_lock lm (_mutex);
1434
1435         for (auto i: _pieces) {
1436                 if (i->content == content) {
1437                         return content_time_to_dcp (i, t);
1438                 }
1439         }
1440
1441         /* We couldn't find this content; perhaps things are being changed over */
1442         return {};
1443 }
1444
1445
1446 optional<ContentTime>
1447 Player::dcp_to_content_time (shared_ptr<const Content> content, DCPTime t)
1448 {
1449         boost::mutex::scoped_lock lm (_mutex);
1450
1451         for (auto i: _pieces) {
1452                 if (i->content == content) {
1453                         return dcp_to_content_time (i, t);
1454                 }
1455         }
1456
1457         /* We couldn't find this content; perhaps things are being changed over */
1458         return {};
1459 }
1460
1461
1462 shared_ptr<const Playlist>
1463 Player::playlist () const
1464 {
1465         return _playlist ? _playlist : _film->playlist();
1466 }
1467
1468
1469 void
1470 Player::atmos (weak_ptr<Piece> weak_piece, ContentAtmos data)
1471 {
1472         if (_suspended) {
1473                 return;
1474         }
1475
1476         auto piece = weak_piece.lock ();
1477         DCPOMATIC_ASSERT (piece);
1478
1479         auto const vfr = _film->video_frame_rate();
1480
1481         DCPTime const dcp_time = DCPTime::from_frames(data.frame, vfr) - DCPTime(piece->content->trim_start(), FrameRateChange(vfr, vfr));
1482         if (dcp_time < piece->content->position() || dcp_time >= (piece->content->end(_film))) {
1483                 return;
1484         }
1485
1486         Atmos (data.data, dcp_time, data.metadata);
1487 }
1488