src/lib/butler.cc

   1 /*
   2     Copyright (C) 2016-2017 Carl Hetherington <cth@carlh.net>
   3
   4     This file is part of DCP-o-matic.
   5
   6     DCP-o-matic is free software; you can redistribute it and/or modify
   7     it under the terms of the GNU General Public License as published by
   8     the Free Software Foundation; either version 2 of the License, or
   9     (at your option) any later version.
  10
  11     DCP-o-matic is distributed in the hope that it will be useful,
  12     but WITHOUT ANY WARRANTY; without even the implied warranty of
  13     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14     GNU General Public License for more details.
  15
  16     You should have received a copy of the GNU General Public License
  17     along with DCP-o-matic.  If not, see <http://www.gnu.org/licenses/>.
  18
  19 */
  20
  21 #include "butler.h"
  22 #include "player.h"
  23 #include "util.h"
  24 #include "log.h"
  25 #include "cross.h"
  26 #include "compose.hpp"
  27 #include "exceptions.h"
  28 #include <boost/weak_ptr.hpp>
  29 #include <boost/shared_ptr.hpp>
  30
  31 #define LOG_TIMING(...)  _log->log (String::compose(__VA_ARGS__), LogEntry::TYPE_TIMING);
  32 #define LOG_WARNING(...) _log->log (String::compose(__VA_ARGS__), LogEntry::TYPE_WARNING);
  33
  34 using std::cout;
  35 using std::pair;
  36 using std::make_pair;
  37 using std::string;
  38 using boost::weak_ptr;
  39 using boost::shared_ptr;
  40 using boost::bind;
  41 using boost::optional;
  42
  43 /** Minimum video readahead in frames */
  44 #define MINIMUM_VIDEO_READAHEAD 10
  45 /** Maximum video readahead in frames; should never be reached unless there are bugs in Player */
  46 #define MAXIMUM_VIDEO_READAHEAD 24
  47 /** Minimum audio readahead in frames */
  48 #define MINIMUM_AUDIO_READAHEAD (48000 * MINIMUM_VIDEO_READAHEAD / 24)
  49 /** Minimum audio readahead in frames; should never be reached unless there are bugs in Player */
  50 #define MAXIMUM_AUDIO_READAHEAD (48000 * MAXIMUM_VIDEO_READAHEAD / 24)
  51
  52 Butler::Butler (shared_ptr<Player> player, shared_ptr<Log> log, AudioMapping audio_mapping, int audio_channels)
  53         : _player (player)
  54         , _log (log)
  55         , _prepare_work (new boost::asio::io_service::work (_prepare_service))
  56         , _pending_seek_accurate (false)
  57         , _suspended (0)
  58         , _finished (false)
  59         , _died (false)
  60         , _stop_thread (false)
  61         , _audio_mapping (audio_mapping)
  62         , _audio_channels (audio_channels)
  63         , _disable_audio (false)
  64 {
  65         _player_video_connection = _player->Video.connect (bind (&Butler::video, this, _1, _2));
  66         _player_audio_connection = _player->Audio.connect (bind (&Butler::audio, this, _1, _2));
  67         _player_text_connection = _player->Text.connect (bind (&Butler::text, this, _1, _2, _3, _4));
  68         /* The butler must hear about things first, otherwise it might not sort out suspensions in time for
  69            get_video() to be called in response to this signal.
  70         */
  71         _player_change_connection = _player->Change.connect (bind (&Butler::player_change, this, _1, _3), boost::signals2::at_front);
  72         _thread = new boost::thread (bind (&Butler::thread, this));
  73 #ifdef DCPOMATIC_LINUX
  74         pthread_setname_np (_thread->native_handle(), "butler");
  75 #endif
  76
  77         /* Create some threads to do work on the PlayerVideos we are creating; at present this is used to
  78            multi-thread JPEG2000 decoding.
  79         */
  80
  81         if (_log) {
  82                 LOG_TIMING("start-prepare-threads %1", boost::thread::hardware_concurrency());
  83         }
  84
  85         for (size_t i = 0; i < boost::thread::hardware_concurrency(); ++i) {
  86                 _prepare_pool.create_thread (bind (&boost::asio::io_service::run, &_prepare_service));
  87         }
  88 }
  89
  90 Butler::~Butler ()
  91 {
  92         {
  93                 boost::mutex::scoped_lock lm (_mutex);
  94                 _stop_thread = true;
  95         }
  96
  97         _prepare_work.reset ();
  98         _prepare_pool.join_all ();
  99         _prepare_service.stop ();
 100
 101         _thread->interrupt ();
 102         try {
 103                 _thread->join ();
 104         } catch (boost::thread_interrupted& e) {
 105                 /* No problem */
 106         }
 107         delete _thread;
 108 }
 109
 110 /** Caller must hold a lock on _mutex */
 111 bool
 112 Butler::should_run () const
 113 {
 114         if (_video.size() >= MAXIMUM_VIDEO_READAHEAD * 10) {
 115                 /* This is way too big */
 116                 throw ProgrammingError
 117                         (__FILE__, __LINE__, String::compose ("Butler video buffers reached %1 frames (audio is %2)", _video.size(), _audio.size()));
 118         }
 119
 120         if (_audio.size() >= MAXIMUM_AUDIO_READAHEAD * 10) {
 121                 /* This is way too big */
 122                 throw ProgrammingError
 123                         (__FILE__, __LINE__, String::compose ("Butler audio buffers reached %1 frames (video is %2)", _audio.size(), _video.size()));
 124         }
 125
 126         if (_video.size() >= MAXIMUM_VIDEO_READAHEAD * 2 && _log) {
 127                 LOG_WARNING ("Butler video buffers reached %1 frames (audio is %2)", _video.size(), _audio.size());
 128         }
 129
 130         if (_audio.size() >= MAXIMUM_AUDIO_READAHEAD * 2 && _log) {
 131                 LOG_WARNING ("Butler audio buffers reached %1 frames (video is %2)", _audio.size(), _video.size());
 132         }
 133
 134         if (_stop_thread || _finished || _died || _suspended) {
 135                 /* Definitely do not run */
 136                 return false;
 137         }
 138
 139         if (_video.size() < MINIMUM_VIDEO_READAHEAD || (!_disable_audio && _audio.size() < MINIMUM_AUDIO_READAHEAD)) {
 140                 /* Definitely do run: we need data */
 141                 return true;
 142         }
 143
 144         /* Run if we aren't full of video or audio */
 145         return (_video.size() < MAXIMUM_VIDEO_READAHEAD) && (_audio.size() < MAXIMUM_AUDIO_READAHEAD);
 146 }
 147
 148 void
 149 Butler::thread ()
 150 try
 151 {
 152         while (true) {
 153                 boost::mutex::scoped_lock lm (_mutex);
 154
 155                 /* Wait until we have something to do */
 156                 while (!should_run() && !_pending_seek_position) {
 157                         _summon.wait (lm);
 158                 }
 159
 160                 /* Do any seek that has been requested */
 161                 if (_pending_seek_position) {
 162                         _finished = false;
 163                         _player->seek (*_pending_seek_position, _pending_seek_accurate);
 164                         _pending_seek_position = optional<DCPTime> ();
 165                 }
 166
 167                 /* Fill _video and _audio.  Don't try to carry on if a pending seek appears
 168                    while lm is unlocked, as in that state nothing will be added to
 169                    _video/_audio.
 170                 */
 171                 while (should_run() && !_pending_seek_position) {
 172                         lm.unlock ();
 173                         bool const r = _player->pass ();
 174                         lm.lock ();
 175                         if (r) {
 176                                 _finished = true;
 177                                 _arrived.notify_all ();
 178                                 break;
 179                         }
 180                         _arrived.notify_all ();
 181                 }
 182         }
 183 } catch (boost::thread_interrupted) {
 184         /* The butler thread is being terminated */
 185         boost::mutex::scoped_lock lm (_mutex);
 186         _finished = true;
 187         _arrived.notify_all ();
 188 } catch (...) {
 189         store_current ();
 190         boost::mutex::scoped_lock lm (_mutex);
 191         _died = true;
 192         _arrived.notify_all ();
 193 }
 194
 195 pair<shared_ptr<PlayerVideo>, DCPTime>
 196 Butler::get_video (Error* e)
 197 {
 198         boost::mutex::scoped_lock lm (_mutex);
 199
 200         if (_suspended) {
 201                 if (e) {
 202                         *e = AGAIN;
 203                 }
 204                 return make_pair(shared_ptr<PlayerVideo>(), DCPTime());
 205         }
 206
 207         /* Wait for data if we have none */
 208         while (_video.empty() && !_finished && !_died) {
 209                 _arrived.wait (lm);
 210         }
 211
 212         if (_video.empty()) {
 213                 if (e) {
 214                         *e = NONE;
 215                 }
 216                 return make_pair(shared_ptr<PlayerVideo>(), DCPTime());
 217         }
 218
 219         pair<shared_ptr<PlayerVideo>, DCPTime> const r = _video.get ();
 220         _summon.notify_all ();
 221         return r;
 222 }
 223
 224 optional<TextRingBuffers::Data>
 225 Butler::get_closed_caption ()
 226 {
 227         boost::mutex::scoped_lock lm (_mutex);
 228         return _closed_caption.get ();
 229 }
 230
 231 void
 232 Butler::seek (DCPTime position, bool accurate)
 233 {
 234         boost::mutex::scoped_lock lm (_mutex);
 235         seek_unlocked (position, accurate);
 236 }
 237
 238 void
 239 Butler::seek_unlocked (DCPTime position, bool accurate)
 240 {
 241         if (_died) {
 242                 return;
 243         }
 244
 245         _finished = false;
 246         _pending_seek_position = position;
 247         _pending_seek_accurate = accurate;
 248
 249         {
 250                 boost::mutex::scoped_lock lm (_buffers_mutex);
 251                 _video.clear ();
 252                 _audio.clear ();
 253                 _closed_caption.clear ();
 254         }
 255
 256         _summon.notify_all ();
 257 }
 258
 259 void
 260 Butler::prepare (weak_ptr<PlayerVideo> weak_video) const
 261 {
 262         shared_ptr<PlayerVideo> video = weak_video.lock ();
 263         /* If the weak_ptr cannot be locked the video obviously no longer requires any work */
 264         if (video) {
 265                 if (_log) {
 266                         LOG_TIMING("start-prepare in %1", thread_id());
 267                 }
 268
 269                 video->prepare ();
 270
 271                 if (_log) {
 272                         LOG_TIMING("finish-prepare in %1", thread_id());
 273                 }
 274         }
 275 }
 276
 277 void
 278 Butler::video (shared_ptr<PlayerVideo> video, DCPTime time)
 279 {
 280         boost::mutex::scoped_lock lm (_mutex);
 281
 282         if (_pending_seek_position) {
 283                 /* Don't store any video in this case */
 284                 return;
 285         }
 286
 287         _prepare_service.post (bind (&Butler::prepare, this, weak_ptr<PlayerVideo>(video)));
 288
 289         boost::mutex::scoped_lock lm2 (_buffers_mutex);
 290         _video.put (video, time);
 291 }
 292
 293 void
 294 Butler::audio (shared_ptr<AudioBuffers> audio, DCPTime time)
 295 {
 296         {
 297                 boost::mutex::scoped_lock lm (_mutex);
 298                 if (_pending_seek_position || _disable_audio) {
 299                         /* Don't store any audio in these cases */
 300                         return;
 301                 }
 302         }
 303
 304         boost::mutex::scoped_lock lm2 (_buffers_mutex);
 305         _audio.put (remap (audio, _audio_channels, _audio_mapping), time);
 306 }
 307
 308 /** Try to get `frames' frames of audio and copy it into `out'.  Silence
 309  *  will be filled if no audio is available.
 310  *  @return time of this audio, or unset if there was a buffer underrun.
 311  */
 312 optional<DCPTime>
 313 Butler::get_audio (float* out, Frame frames)
 314 {
 315         optional<DCPTime> t = _audio.get (out, _audio_channels, frames);
 316         _summon.notify_all ();
 317         return t;
 318 }
 319
 320 void
 321 Butler::disable_audio ()
 322 {
 323         boost::mutex::scoped_lock lm (_mutex);
 324         _disable_audio = true;
 325 }
 326
 327 pair<size_t, string>
 328 Butler::memory_used () const
 329 {
 330         /* XXX: should also look at _audio.memory_used() */
 331         return _video.memory_used();
 332 }
 333
 334 void
 335 Butler::player_change (ChangeType type, bool frequent)
 336 {
 337         boost::mutex::scoped_lock lm (_mutex);
 338
 339         if (type == CHANGE_TYPE_PENDING) {
 340                 ++_suspended;
 341         } else if (type == CHANGE_TYPE_DONE) {
 342                 --_suspended;
 343                 if (_died || _pending_seek_position || frequent) {
 344                         lm.unlock ();
 345                         _summon.notify_all ();
 346                         return;
 347                 }
 348
 349                 DCPTime seek_to;
 350                 DCPTime next = _video.get().second;
 351                 if (_awaiting && _awaiting > next) {
 352                         /* We have recently done a player_changed seek and our buffers haven't been refilled yet,
 353                            so assume that we're seeking to the same place as last time.
 354                         */
 355                         seek_to = *_awaiting;
 356                 } else {
 357                         seek_to = next;
 358                 }
 359
 360                 seek_unlocked (seek_to, true);
 361                 _awaiting = seek_to;
 362         } else if (type == CHANGE_TYPE_CANCELLED) {
 363                 --_suspended;
 364         }
 365
 366         lm.unlock ();
 367         _summon.notify_all ();
 368 }
 369
 370 void
 371 Butler::text (PlayerText pt, TextType type, optional<DCPTextTrack> track, DCPTimePeriod period)
 372 {
 373         if (type != TEXT_CLOSED_CAPTION) {
 374                 return;
 375         }
 376
 377         DCPOMATIC_ASSERT (track);
 378
 379         boost::mutex::scoped_lock lm2 (_buffers_mutex);
 380         _closed_caption.put (pt, *track, period);
 381 }