Move audio sample format stuff out of Decoder base class.
[dcpomatic.git] / src / lib / decoder.cc
index 9332511bcea0c96b7670dc2126e794aa3c7966b4..01c4edf604b9864e3f011d7a45afee81ffd47217 100644 (file)
 
 #include <iostream>
 #include <stdint.h>
-extern "C" {
-#include <libavfilter/avfiltergraph.h>
-#include <libavfilter/buffersrc.h>
-#if (LIBAVFILTER_VERSION_MAJOR == 2 && LIBAVFILTER_VERSION_MINOR >= 53 && LIBAVFILTER_VERSION_MINOR <= 77) || LIBAVFILTER_VERSION_MAJOR == 3
-#include <libavfilter/avcodec.h>
-#include <libavfilter/buffersink.h>
-#elif LIBAVFILTER_VERSION_MAJOR == 2 && LIBAVFILTER_VERSION_MINOR == 15
-#include <libavfilter/vsrc_buffer.h>
-#endif
-#include <libavformat/avio.h>
-}
+#include <boost/lexical_cast.hpp>
 #include "film.h"
 #include "format.h"
 #include "job.h"
-#include "film_state.h"
 #include "options.h"
 #include "exceptions.h"
 #include "image.h"
 #include "util.h"
 #include "log.h"
 #include "decoder.h"
-#include "filter.h"
 #include "delay_line.h"
-#include "ffmpeg_compatibility.h"
+#include "subtitle.h"
+#include "filter_graph.h"
 
-using namespace std;
-using namespace boost;
+using std::string;
+using std::stringstream;
+using std::min;
+using std::pair;
+using std::list;
+using boost::shared_ptr;
 
-/** @param s FilmState of the Film.
+/** @param f Film.
  *  @param o Options.
  *  @param j Job that we are running within, or 0
- *  @param l Log to use.
  *  @param minimal true to do the bare minimum of work; just run through the content.  Useful for acquiring
  *  accurate frame counts as quickly as possible.  This generates no video or audio output.
- *  @param ignore_length Ignore the content's claimed length when computing progress.
  */
-Decoder::Decoder (boost::shared_ptr<const FilmState> s, boost::shared_ptr<const Options> o, Job* j, Log* l, bool minimal, bool ignore_length)
-       : _fs (s)
+Decoder::Decoder (boost::shared_ptr<Film> f, boost::shared_ptr<const Options> o, Job* j)
+       : _film (f)
        , _opt (o)
        , _job (j)
-       , _log (l)
-       , _minimal (minimal)
-       , _ignore_length (ignore_length)
        , _video_frame (0)
-       , _buffer_src_context (0)
-       , _buffer_sink_context (0)
-#if HAVE_SWRESAMPLE      
-       , _swr_context (0)
-#endif   
-       , _have_setup_video_filters (false)
+       , _audio_frame (0)
        , _delay_line (0)
-       , _delay_in_bytes (0)
-       , _audio_frames_processed (0)
+       , _delay_in_frames (0)
 {
-       if (_opt->decode_video_frequency != 0 && _fs->length == 0) {
-               throw DecodeError ("cannot do a partial decode if length == 0");
-       }
+       
 }
 
 Decoder::~Decoder ()
@@ -87,98 +67,66 @@ Decoder::~Decoder ()
        delete _delay_line;
 }
 
-/** Start off a decode processing run */
+/** Start off a decode processing run.  This should only be called once on
+ *  a given Decoder object.
+ */
 void
 Decoder::process_begin ()
 {
-       if (_fs->audio_sample_rate != dcp_audio_sample_rate (_fs->audio_sample_rate)) {
-#if HAVE_SWRESAMPLE            
-               _swr_context = swr_alloc_set_opts (
-                       0,
-                       audio_channel_layout(),
-                       audio_sample_format(),
-                       dcp_audio_sample_rate (_fs->audio_sample_rate),
-                       audio_channel_layout(),
-                       audio_sample_format(),
-                       _fs->audio_sample_rate,
-                       0, 0
-                       );
-               
-               swr_init (_swr_context);
-#else
-               throw DecodeError ("Cannot resample audio as libswresample is not present");
-#endif         
-       } else {
-#if HAVE_SWRESAMPLE            
-               _swr_context = 0;
-#endif         
-       }
-
-       _delay_in_bytes = _fs->audio_delay * _fs->audio_sample_rate * _fs->audio_channels * _fs->bytes_per_sample() / 1000;
-       delete _delay_line;
-       _delay_line = new DelayLine (_delay_in_bytes);
-
-       _audio_frames_processed = 0;
+       _delay_in_frames = _film->audio_delay() * audio_sample_rate() / 1000;
+       _delay_line = new DelayLine (audio_channels(), _delay_in_frames);
 }
 
 /** Finish off a decode processing run */
 void
 Decoder::process_end ()
 {
-#if HAVE_SWRESAMPLE    
-       if (_swr_context) {
-
-               int mop = 0;
-               while (1) {
-                       uint8_t buffer[256 * _fs->bytes_per_sample() * _fs->audio_channels];
-                       uint8_t* out[1] = {
-                               buffer
-                       };
-
-                       int const frames = swr_convert (_swr_context, out, 256, 0, 0);
+       if (_delay_in_frames < 0 && _opt->decode_audio && audio_channels()) {
+               shared_ptr<AudioBuffers> b (new AudioBuffers (audio_channels(), -_delay_in_frames));
+               b->make_silent ();
+               emit_audio (b);
+       }
 
-                       if (frames < 0) {
-                               throw DecodeError ("could not run sample-rate converter");
-                       }
+       if (_opt->decode_audio && audio_channels()) {
 
-                       if (frames == 0) {
-                               break;
-                       }
+               /* Ensure that our video and audio emissions are the same length */
 
-                       mop += frames;
-                       int available = _delay_line->feed (buffer, frames * _fs->audio_channels * _fs->bytes_per_sample());
-                       Audio (buffer, available);
-               }
+               int64_t audio_short_by_frames = video_frames_to_audio_frames (_video_frame, audio_sample_rate(), frames_per_second()) - _audio_frame;
 
-               swr_free (&_swr_context);
-       }
-#endif 
-       
-       if (_delay_in_bytes < 0) {
-               uint8_t remainder[-_delay_in_bytes];
-               _delay_line->get_remaining (remainder);
-               _audio_frames_processed += _delay_in_bytes / (_fs->audio_channels * _fs->bytes_per_sample());
-               Audio (remainder, _delay_in_bytes);
-       }
+               _film->log()->log (
+                       String::compose (
+                               "Decoder has emitted %1 video frames (which equals %2 audio frames) and %3 audio frames",
+                               _video_frame,
+                               video_frames_to_audio_frames (_video_frame, audio_sample_rate(), frames_per_second()),
+                               _audio_frame
+                               )
+                       );
 
-       /* If we cut the decode off, the audio may be short; push some silence
-          in to get it to the right length.
-       */
+               if (audio_short_by_frames < 0) {
 
-       int const audio_short_by_frames =
-               (decoding_frames() * dcp_audio_sample_rate (_fs->audio_sample_rate) / _fs->frames_per_second)
-               - _audio_frames_processed;
+                       _film->log()->log (String::compose ("Emitted %1 too many audio frames", -audio_short_by_frames));
+                       
+                       /* We have emitted more audio than video.  Emit enough black video frames so that we reverse this */
+                       int const black_video_frames = ceil (-audio_short_by_frames * frames_per_second() / audio_sample_rate());
 
-       int bytes = audio_short_by_frames * _fs->audio_channels * _fs->bytes_per_sample();
+                       _film->log()->log (String::compose ("Emitting %1 frames of black video", black_video_frames));
 
-       int const silence_size = 64 * 1024;
-       uint8_t silence[silence_size];
-       memset (silence, 0, silence_size);
+                       shared_ptr<Image> black (new CompactImage (pixel_format(), native_size()));
+                       black->make_black ();
+                       for (int i = 0; i < black_video_frames; ++i) {
+                               emit_video (black, shared_ptr<Subtitle> ());
+                       }
 
-       while (bytes) {
-               int const t = min (bytes, silence_size);
-               Audio (silence, t);
-               bytes -= t;
+                       /* Now recompute our check value */
+                       audio_short_by_frames = video_frames_to_audio_frames (_video_frame, audio_sample_rate(), frames_per_second()) - _audio_frame;
+               }
+       
+               if (audio_short_by_frames > 0) {
+                       _film->log()->log (String::compose ("Emitted %1 too few audio frames", audio_short_by_frames));
+                       shared_ptr<AudioBuffers> b (new AudioBuffers (audio_channels(), audio_short_by_frames));
+                       b->make_silent ();
+                       emit_audio (b);
+               }
        }
 }
 
@@ -188,143 +136,38 @@ Decoder::go ()
 {
        process_begin ();
 
-       if (_job && _ignore_length) {
+       if (_job && !_film->dcp_length()) {
                _job->set_progress_unknown ();
        }
 
        while (pass () == false) {
-               if (_job && !_ignore_length) {
-                       _job->set_progress (float (_video_frame) / decoding_frames ());
+               if (_job && _film->dcp_length()) {
+                       _job->set_progress (float (_video_frame) / _film->length().get());
                }
        }
 
        process_end ();
 }
 
-/** @return Number of frames that we will be decoding */
-int
-Decoder::decoding_frames () const
-{
-       if (_opt->num_frames > 0) {
-               return _opt->num_frames;
-       }
-       
-       return _fs->length;
-}
-
-/** Run one pass.  This may or may not generate any actual video / audio data;
- *  some decoders may require several passes to generate a single frame.
- *  @return true if we have finished processing all data; otherwise false.
- */
-bool
-Decoder::pass ()
-{
-       if (!_have_setup_video_filters) {
-               setup_video_filters ();
-               _have_setup_video_filters = true;
-       }
-       
-       if (_opt->num_frames != 0 && _video_frame >= _opt->num_frames) {
-               return true;
-       }
-
-       return do_pass ();
-}
-
 /** Called by subclasses to tell the world that some audio data is ready
- *  @param data Interleaved audio data, in FilmState::audio_sample_format.
+ *  @param data Audio data, in Film::audio_sample_format.
  *  @param size Number of bytes of data.
  */
 void
-Decoder::process_audio (uint8_t* data, int size)
+Decoder::process_audio (shared_ptr<AudioBuffers> audio)
 {
-       /* Here's samples per channel */
-       int const samples = size / _fs->bytes_per_sample();
-
-#if HAVE_SWRESAMPLE    
-       /* And here's frames (where 1 frame is a collection of samples, 1 for each channel,
-          so for 5.1 a frame would be 6 samples)
-       */
-       int const frames = samples / _fs->audio_channels;
-#endif 
-
        /* Maybe apply gain */
-       if (_fs->audio_gain != 0) {
-               float const linear_gain = pow (10, _fs->audio_gain / 20);
-               uint8_t* p = data;
-               switch (_fs->audio_sample_format) {
-               case AV_SAMPLE_FMT_S16:
-                       for (int i = 0; i < samples; ++i) {
-                               /* XXX: assumes little-endian; also we should probably be dithering here */
-
-                               /* unsigned sample */
-                               int const ou = p[0] | (p[1] << 8);
-
-                               /* signed sample */
-                               int const os = ou >= 0x8000 ? (- 0x10000 + ou) : ou;
-
-                               /* signed sample with altered gain */
-                               int const gs = int (os * linear_gain);
-
-                               /* unsigned sample with altered gain */
-                               int const gu = gs > 0 ? gs : (0x10000 + gs);
-
-                               /* write it back */
-                               p[0] = gu & 0xff;
-                               p[1] = (gu & 0xff00) >> 8;
-                               p += 2;
+       if (_film->audio_gain() != 0) {
+               float const linear_gain = pow (10, _film->audio_gain() / 20);
+               for (int i = 0; i < audio->channels(); ++i) {
+                       for (int j = 0; j < audio->frames(); ++j) {
+                               audio->data(i)[j] *= linear_gain;
                        }
-                       break;
-               default:
-                       assert (false);
                }
        }
 
-       /* This is a buffer we might use if we are sample-rate converting;
-          it will need freeing if so.
-       */
-       uint8_t* out_buffer = 0;
-
-       /* Maybe sample-rate convert */
-#if HAVE_SWRESAMPLE    
-       if (_swr_context) {
-
-               uint8_t const * in[2] = {
-                       data,
-                       0
-               };
-
-               /* Compute the resampled frame count and add 32 for luck */
-               int const out_buffer_size_frames = ceil (frames * float (dcp_audio_sample_rate (_fs->audio_sample_rate)) / _fs->audio_sample_rate) + 32;
-               int const out_buffer_size_bytes = out_buffer_size_frames * _fs->audio_channels * _fs->bytes_per_sample();
-               out_buffer = new uint8_t[out_buffer_size_bytes];
-
-               uint8_t* out[2] = {
-                       out_buffer, 
-                       0
-               };
-
-               /* Resample audio */
-               int out_frames = swr_convert (_swr_context, out, out_buffer_size_frames, in, frames);
-               if (out_frames < 0) {
-                       throw DecodeError ("could not run sample-rate converter");
-               }
-
-               /* And point our variables at the resampled audio */
-               data = out_buffer;
-               size = out_frames * _fs->audio_channels * _fs->bytes_per_sample();
-       }
-#endif 
-               
-       /* Update the number of audio frames we've pushed to the encoder */
-       _audio_frames_processed += size / (_fs->audio_channels * _fs->bytes_per_sample ());
-
-       /* Push into the delay line and then tell the world what we've got */
-       int available = _delay_line->feed (data, size);
-       Audio (data, available);
-
-       /* Delete the sample-rate conversion buffer, if it exists */
-       delete[] out_buffer;
+       _delay_line->feed (audio);
+       emit_audio (audio);
 }
 
 /** Called by subclasses to tell the world that some video data is ready.
@@ -334,171 +177,69 @@ Decoder::process_audio (uint8_t* data, int size)
 void
 Decoder::process_video (AVFrame* frame)
 {
-       if (_minimal) {
-               ++_video_frame;
-               return;
-       }
-
-       /* Use FilmState::length here as our one may be wrong */
+       shared_ptr<FilterGraph> graph;
 
-       int gap = 0;
-       if (_opt->decode_video_frequency != 0) {
-               gap = _fs->length / _opt->decode_video_frequency;
+       list<shared_ptr<FilterGraph> >::iterator i = _filter_graphs.begin();
+       while (i != _filter_graphs.end() && !(*i)->can_process (Size (frame->width, frame->height), (AVPixelFormat) frame->format)) {
+               ++i;
        }
 
-       if (_opt->decode_video_frequency != 0 && gap != 0 && (_video_frame % gap) != 0) {
-               ++_video_frame;
-               return;
-       }
-
-#if LIBAVFILTER_VERSION_MAJOR == 2 && LIBAVFILTER_VERSION_MINOR >= 53 && LIBAVFILTER_VERSION_MINOR <= 61
-
-       if (av_vsrc_buffer_add_frame (_buffer_src_context, frame, 0) < 0) {
-               throw DecodeError ("could not push buffer into filter chain.");
-       }
-
-#elif LIBAVFILTER_VERSION_MAJOR == 2 && LIBAVFILTER_VERSION_MINOR == 15
-
-       AVRational par;
-       par.num = sample_aspect_ratio_numerator ();
-       par.den = sample_aspect_ratio_denominator ();
-
-       if (av_vsrc_buffer_add_frame (_buffer_src_context, frame, 0, par) < 0) {
-               throw DecodeError ("could not push buffer into filter chain.");
+       if (i == _filter_graphs.end ()) {
+               graph.reset (new FilterGraph (_film, this, _opt->apply_crop, Size (frame->width, frame->height), (AVPixelFormat) frame->format));
+               _filter_graphs.push_back (graph);
+               _film->log()->log (String::compose ("New graph for %1x%2, pixel format %3", frame->width, frame->height, frame->format));
+       } else {
+               graph = *i;
        }
 
-#else
-
-       if (av_buffersrc_write_frame (_buffer_src_context, frame) < 0) {
-               throw DecodeError ("could not push buffer into filter chain.");
-       }
+       list<shared_ptr<Image> > images = graph->process (frame);
 
-#endif 
-       
-#if LIBAVFILTER_VERSION_MAJOR == 2 && LIBAVFILTER_VERSION_MINOR >= 15 && LIBAVFILTER_VERSION_MINOR <= 61       
-       while (avfilter_poll_frame (_buffer_sink_context->inputs[0])) {
-#else
-       while (av_buffersink_read (_buffer_sink_context, 0)) {
-#endif         
-
-#if LIBAVFILTER_VERSION_MAJOR == 2 && LIBAVFILTER_VERSION_MINOR >= 15
-               
-               int r = avfilter_request_frame (_buffer_sink_context->inputs[0]);
-               if (r < 0) {
-                       throw DecodeError ("could not request filtered frame");
-               }
-               
-               AVFilterBufferRef* filter_buffer = _buffer_sink_context->inputs[0]->cur_buf;
-               
-#else
-
-               AVFilterBufferRef* filter_buffer;
-               if (av_buffersink_get_buffer_ref (_buffer_sink_context, &filter_buffer, 0) < 0) {
-                       filter_buffer = 0;
+       for (list<shared_ptr<Image> >::iterator i = images.begin(); i != images.end(); ++i) {
+               shared_ptr<Subtitle> sub;
+               if (_timed_subtitle && _timed_subtitle->displayed_at (double (video_frame()) / _film->frames_per_second())) {
+                       sub = _timed_subtitle->subtitle ();
                }
 
-#endif         
-               
-               if (filter_buffer) {
-                       /* This takes ownership of filter_buffer */
-                       shared_ptr<Image> image (new FilterBufferImage ((PixelFormat) frame->format, filter_buffer));
-
-                       if (_opt->black_after > 0 && _video_frame > _opt->black_after) {
-                               image->make_black ();
-                       }
-
-                       Video (image, _video_frame);
-                       ++_video_frame;
-               }
+               emit_video (*i, sub);
        }
 }
 
-
-/** Set up a video filtering chain to include cropping and any filters that are specified
- *  by the Film.
- */
 void
-Decoder::setup_video_filters ()
+Decoder::repeat_last_video ()
 {
-       stringstream fs;
-       Size size_after_crop;
-       
-       if (_opt->apply_crop) {
-               size_after_crop = _fs->cropped_size (native_size ());
-               fs << crop_string (Position (_fs->crop.left, _fs->crop.top), size_after_crop);
-       } else {
-               size_after_crop = native_size ();
-               fs << crop_string (Position (0, 0), size_after_crop);
-       }
-
-       string filters = Filter::ffmpeg_strings (_fs->filters).first;
-       if (!filters.empty ()) {
-               filters += ",";
-       }
-
-       filters += fs.str ();
-
-       avfilter_register_all ();
-       
-       AVFilterGraph* graph = avfilter_graph_alloc();
-       if (graph == 0) {
-               throw DecodeError ("Could not create filter graph.");
-       }
-
-       AVFilter* buffer_src = avfilter_get_by_name("buffer");
-       if (buffer_src == 0) {
-               throw DecodeError ("Could not find buffer src filter");
-       }
-
-       AVFilter* buffer_sink = get_sink ();
-
-       stringstream a;
-       a << native_size().width << ":"
-         << native_size().height << ":"
-         << pixel_format() << ":"
-         << time_base_numerator() << ":"
-         << time_base_denominator() << ":"
-         << sample_aspect_ratio_numerator() << ":"
-         << sample_aspect_ratio_denominator();
-
-       int r;
-       if ((r = avfilter_graph_create_filter (&_buffer_src_context, buffer_src, "in", a.str().c_str(), 0, graph)) < 0) {
-               throw DecodeError ("could not create buffer source");
+       if (!_last_image) {
+               _last_image.reset (new CompactImage (pixel_format(), native_size()));
+               _last_image->make_black ();
        }
 
-       enum PixelFormat pixel_formats[] = { pixel_format(), PIX_FMT_NONE };
-       if (avfilter_graph_create_filter (&_buffer_sink_context, buffer_sink, "out", 0, pixel_formats, graph) < 0) {
-               throw DecodeError ("could not create buffer sink.");
-       }
+       emit_video (_last_image, _last_subtitle);
+}
 
-       AVFilterInOut* outputs = avfilter_inout_alloc ();
-       outputs->name = av_strdup("in");
-       outputs->filter_ctx = _buffer_src_context;
-       outputs->pad_idx = 0;
-       outputs->next = 0;
+void
+Decoder::emit_video (shared_ptr<Image> image, shared_ptr<Subtitle> sub)
+{
+       TIMING ("Decoder emits %1", _video_frame);
+       Video (image, _video_frame, sub);
+       ++_video_frame;
 
-       AVFilterInOut* inputs = avfilter_inout_alloc ();
-       inputs->name = av_strdup("out");
-       inputs->filter_ctx = _buffer_sink_context;
-       inputs->pad_idx = 0;
-       inputs->next = 0;
+       _last_image = image;
+       _last_subtitle = sub;
+}
 
-       _log->log ("Using filter chain `" + filters + "'");
+void
+Decoder::emit_audio (shared_ptr<AudioBuffers> audio)
+{
+       Audio (audio, _audio_frame);
+       _audio_frame += audio->frames ();
+}
 
-#if LIBAVFILTER_VERSION_MAJOR == 2 && LIBAVFILTER_VERSION_MINOR == 15
-       if (avfilter_graph_parse (graph, filters.c_str(), inputs, outputs, 0) < 0) {
-               throw DecodeError ("could not set up filter graph.");
-       }
-#else  
-       if (avfilter_graph_parse (graph, filters.c_str(), &inputs, &outputs, 0) < 0) {
-               throw DecodeError ("could not set up filter graph.");
-       }
-#endif 
+void
+Decoder::process_subtitle (shared_ptr<TimedSubtitle> s)
+{
+       _timed_subtitle = s;
        
-       if (avfilter_graph_config (graph, 0) < 0) {
-               throw DecodeError ("could not configure filter graph.");
+       if (_timed_subtitle && _opt->apply_crop) {
+               Position const p = _timed_subtitle->subtitle()->position ();
+               _timed_subtitle->subtitle()->set_position (Position (p.x - _film->crop().left, p.y - _film->crop().top));
        }
-
-       /* XXX: leaking `inputs' / `outputs' ? */
 }
-