]> git.sesse.net Git - casparcg/blobdiff - modules/ffmpeg/consumer/ffmpeg_consumer.cpp
Created a consumer that provides sync to a channel based on the pace of another chann...
[casparcg] / modules / ffmpeg / consumer / ffmpeg_consumer.cpp
index a025598987cc2f825e7e8c2fc7c6b64953049521..20a30cd839cf7c76aac537cce9d4b041b9604b04 100644 (file)
-/*\r
-* Copyright (c) 2011 Sveriges Television AB <info@casparcg.com>\r
-*\r
-* This file is part of CasparCG (www.casparcg.com).\r
-*\r
-* CasparCG is free software: you can redistribute it and/or modify\r
-* it under the terms of the GNU General Public License as published by\r
-* the Free Software Foundation, either version 3 of the License, or\r
-* (at your option) any later version.\r
-*\r
-* CasparCG is distributed in the hope that it will be useful,\r
-* but WITHOUT ANY WARRANTY; without even the implied warranty of\r
-* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the\r
-* GNU General Public License for more details.\r
-*\r
-* You should have received a copy of the GNU General Public License\r
-* along with CasparCG. If not, see <http://www.gnu.org/licenses/>.\r
-*\r
-* Author: Robert Nagy, ronag89@gmail.com\r
-*/\r
\r
-#include "../StdAfx.h"\r
-\r
-#include "../ffmpeg_error.h"\r
-\r
-#include "ffmpeg_consumer.h"\r
-\r
-#include <core/frame/data_frame.h>\r
-#include <core/mixer/audio/audio_util.h>\r
-#include <core/consumer/frame_consumer.h>\r
-#include <core/video_format.h>\r
-\r
-#include <common/env.h>\r
-#include <common/concurrency/executor.h>\r
-#include <common/diagnostics/graph.h>\r
-#include <common/spl/memory.h>\r
-#include <common/utf.h>\r
-#include <common/param.h>\r
-\r
-#include <boost/algorithm/string.hpp>\r
-#include <boost/timer.hpp>\r
-#include <boost/property_tree/ptree.hpp>\r
-#include <boost/filesystem.hpp>\r
-\r
-#if defined(_MSC_VER)\r
-#pragma warning (push)\r
-#pragma warning (disable : 4244)\r
-#endif\r
-extern "C" \r
-{\r
-       #define __STDC_CONSTANT_MACROS\r
-       #define __STDC_LIMIT_MACROS\r
-       #include <libavformat/avformat.h>\r
-       #include <libswscale/swscale.h>\r
-       #include <libavutil/opt.h>\r
-}\r
-#if defined(_MSC_VER)\r
-#pragma warning (pop)\r
-#endif\r
-\r
-namespace caspar { namespace ffmpeg {\r
-       \r
-struct option\r
-{\r
-       std::string name;\r
-       std::string value;\r
-\r
-       option(std::string name, std::string value)\r
-               : name(std::move(name))\r
-               , value(std::move(value))\r
-       {\r
-       }\r
-};\r
-       \r
-void set_format(AVOutputFormat*& format, const std::string& value)\r
-{\r
-       format = av_guess_format(value.c_str(), nullptr, nullptr);\r
-\r
-       if(format == nullptr)\r
-               BOOST_THROW_EXCEPTION(invalid_argument() << arg_name_info("f"));        \r
-}\r
-\r
-bool parse_format(AVOutputFormat*& format, std::vector<option>& options)\r
-{      \r
-       auto format_it = std::find_if(options.begin(), options.end(), [](const option& o)\r
-       {\r
-               return o.name == "f" || o.name == "format";\r
-       });\r
-\r
-       if(format_it == options.end())\r
-               return false;\r
-\r
-       set_format(format, format_it->value);\r
-\r
-       options.erase(format_it);\r
-\r
-       return true;\r
-}\r
-\r
-void set_vcodec(CodecID& vcodec, const std::string& value)\r
-{      \r
-       vcodec = avcodec_find_encoder_by_name(value.c_str())->id;\r
-       if(vcodec == CODEC_ID_NONE)\r
-               BOOST_THROW_EXCEPTION(invalid_argument() << arg_name_info("vcodec"));\r
-}\r
-\r
-bool parse_vcodec(CodecID& vcodec, std::vector<option>& options)\r
-{\r
-       auto vcodec_it = std::find_if(options.begin(), options.end(), [](const option& o)\r
-       {\r
-               return o.name == "vcodec";\r
-       });\r
-\r
-       if(vcodec_it == options.end())\r
-               return false;\r
-       \r
-       set_vcodec(vcodec, vcodec_it->value);\r
-\r
-       options.erase(vcodec_it);\r
-\r
-       return true;\r
-}\r
-\r
-void set_pix_fmt(AVCodecContext* vcodec, const std::string& value)\r
-{\r
-       auto pix_fmt = av_get_pix_fmt(value.c_str());\r
-       if(pix_fmt == PIX_FMT_NONE)\r
-               BOOST_THROW_EXCEPTION(invalid_argument() << arg_name_info("pix_fmt"));\r
-\r
-       vcodec->pix_fmt = pix_fmt;\r
-}\r
-\r
-bool parse_pix_fmt(AVCodecContext* vcodec, std::vector<option>& options)\r
-{\r
-       auto pix_fmt_it = std::find_if(options.begin(), options.end(), [](const option& o)\r
-       {\r
-               return o.name == "pix_fmt" || o.name == "pixel_format";\r
-       });\r
-       \r
-       if(pix_fmt_it == options.end())\r
-               return false;\r
-\r
-       set_pix_fmt(vcodec, pix_fmt_it->value);\r
-       \r
-       options.erase(pix_fmt_it);\r
-\r
-       return true;\r
-}\r
-\r
-struct ffmpeg_consumer : boost::noncopyable\r
-{              \r
-       const std::string                                               filename_;\r
-               \r
-       const std::shared_ptr<AVFormatContext>  oc_;\r
-       const core::video_format_desc                   format_desc_;\r
-       \r
-       const spl::shared_ptr<diagnostics::graph>               graph_;\r
-       boost::timer                                                    frame_timer_;\r
-       boost::timer                                                    write_timer_;\r
-\r
-       executor                                                                executor_;\r
-       executor                                                                file_write_executor_;\r
-\r
-       // Audio\r
-       std::shared_ptr<AVStream>                               audio_st_;\r
-       \r
-       // Video\r
-       std::shared_ptr<AVStream>                               video_st_;\r
-\r
-       std::vector<uint8_t>                                    video_outbuf_;\r
-       std::vector<uint8_t>                                    picture_buf_;\r
-       std::shared_ptr<SwsContext>                             sws_;\r
-\r
-       int64_t                                                                 frame_number_;\r
-       \r
-public:\r
-       ffmpeg_consumer(const std::string& filename, const core::video_format_desc& format_desc, std::vector<option> options)\r
-               : filename_(filename)\r
-               , video_outbuf_(1920*1080*8)\r
-               , oc_(avformat_alloc_context(), av_free)\r
-               , format_desc_(format_desc)\r
-               , executor_(print())\r
-               , file_write_executor_(print() + L"/output")\r
-               , frame_number_(0)\r
-       {\r
-               // TODO: Ask stakeholders about case where file already exists.\r
-               boost::filesystem::remove(boost::filesystem::path(env::media_folder() + u16(filename))); // Delete the file if it exists\r
-\r
-               graph_->set_color("frame-time", diagnostics::color(0.1f, 1.0f, 0.1f));\r
-               graph_->set_color("write-time", diagnostics::color(0.5f, 0.5f, 0.1f));\r
-               graph_->set_text(print());\r
-               diagnostics::register_graph(graph_);\r
-\r
-               executor_.set_capacity(8);\r
-               file_write_executor_.set_capacity(8);\r
-\r
-               oc_->oformat = av_guess_format(nullptr, filename_.c_str(), nullptr);\r
-               if (!oc_->oformat)\r
-                       BOOST_THROW_EXCEPTION(caspar_exception() << msg_info("Could not find suitable output format."));\r
-               \r
-               parse_format(oc_->oformat, options);\r
-\r
-               auto vcodec = oc_->oformat->video_codec;\r
-               parse_vcodec(vcodec, options);\r
-               \r
-               THROW_ON_ERROR2(av_set_parameters(oc_.get(), nullptr), "[ffmpeg_consumer]");\r
-\r
-               strcpy_s(oc_->filename, filename_.c_str());\r
-               \r
-               //  Add the audio and video streams using the default format codecs     and initialize the codecs .\r
-               video_st_ = add_video_stream(vcodec, options);\r
-               audio_st_ = add_audio_stream();\r
-                               \r
-               dump_format(oc_.get(), 0, filename_.c_str(), 1);\r
-                \r
-               // Open the output ffmpeg, if needed.\r
-               if (!(oc_->oformat->flags & AVFMT_NOFILE)) \r
-                       THROW_ON_ERROR2(avio_open(&oc_->pb, filename_.c_str(), URL_WRONLY), "[ffmpeg_consumer]");\r
-                               \r
-               THROW_ON_ERROR2(av_write_header(oc_.get()), "[ffmpeg_consumer]");\r
-\r
-               CASPAR_LOG(info) << print() << L" Successfully Initialized.";   \r
-       }\r
-\r
-       ~ffmpeg_consumer()\r
-       {    \r
-               executor_.stop();\r
-               executor_.join();\r
-\r
-               file_write_executor_.stop();\r
-               file_write_executor_.join();\r
-               \r
-               LOG_ON_ERROR2(av_write_trailer(oc_.get()), "[ffmpeg_consumer]");\r
-               \r
-               audio_st_.reset();\r
-               video_st_.reset();\r
-                         \r
-               if (!(oc_->oformat->flags & AVFMT_NOFILE)) \r
-                       LOG_ON_ERROR2(avio_close(oc_->pb), "[ffmpeg_consumer]"); // Close the output ffmpeg.\r
-\r
-               CASPAR_LOG(info) << print() << L" Successfully Uninitialized."; \r
-       }\r
-                       \r
-       std::wstring print() const\r
-       {\r
-               return L"ffmpeg[" + u16(filename_) + L"]";\r
-       }\r
-\r
-       std::shared_ptr<AVStream> add_video_stream(CodecID vcodec, std::vector<option>& options)\r
-       { \r
-               auto st = av_new_stream(oc_.get(), 0);\r
-               if (!st)                \r
-                       BOOST_THROW_EXCEPTION(caspar_exception() << msg_info("Could not allocate video-stream") << boost::errinfo_api_function("av_new_stream"));               \r
-\r
-               auto encoder = avcodec_find_encoder(vcodec);\r
-               if (!encoder)\r
-                       BOOST_THROW_EXCEPTION(caspar_exception() << msg_info("codec not found"));\r
-\r
-               auto c = st->codec;\r
-\r
-               avcodec_get_context_defaults3(c, encoder);\r
-                               \r
-               c->codec_id                     = vcodec;\r
-               c->codec_type           = AVMEDIA_TYPE_VIDEO;\r
-               c->width                        = format_desc_.width;\r
-               c->height                       = format_desc_.height;\r
-               c->time_base.den        = format_desc_.time_scale;\r
-               c->time_base.num        = format_desc_.duration;\r
-               c->gop_size                     = 25;\r
-               c->flags                   |= format_desc_.field_mode == core::field_mode::progressive ? 0 : (CODEC_FLAG_INTERLACED_ME | CODEC_FLAG_INTERLACED_DCT);\r
-\r
-               if(c->codec_id == CODEC_ID_PRORES)\r
-               {                       \r
-                       c->bit_rate     = format_desc_.width < 1280 ? 63*1000000 : 220*1000000;\r
-                       c->pix_fmt      = PIX_FMT_YUV422P10;\r
-               }\r
-               else if(c->codec_id == CODEC_ID_DNXHD)\r
-               {\r
-                       if(format_desc_.width < 1280 || format_desc_.height < 720)\r
-                               BOOST_THROW_EXCEPTION(caspar_exception() << msg_info("unsupported dimension"));\r
-\r
-                       c->bit_rate     = 220*1000000;\r
-                       c->pix_fmt      = PIX_FMT_YUV422P;\r
-               }\r
-               else if(c->codec_id == CODEC_ID_DVVIDEO)\r
-               {\r
-                       c->bit_rate     = format_desc_.width < 1280 ? 50*1000000 : 100*1000000;\r
-                       c->width = format_desc_.height == 1280 ? 960  : c->width;\r
-                       \r
-                       //if(format_desc_.format == core::video_format::ntsc)\r
-                       //      c->pix_fmt = PIX_FMT_YUV411P;\r
-                       //else if(format_desc_.format == core::video_format::pal)\r
-                       //      c->pix_fmt = PIX_FMT_YUV420P;\r
-\r
-                       c->pix_fmt = PIX_FMT_YUV411P;\r
-\r
-                       if(c->bit_rate >= 50*1000000) // dv50\r
-                               c->pix_fmt = PIX_FMT_YUV422P;\r
-                       \r
-                       if(format_desc_.duration == 1001)                       \r
-                               c->width = format_desc_.height == 1080 ? 1280 : c->width;                       \r
-                       else\r
-                               c->width = format_desc_.height == 1080 ? 1440 : c->width;                       \r
-               }\r
-               else if(c->codec_id == CODEC_ID_H264)\r
-               {                          \r
-                       c->pix_fmt = PIX_FMT_YUV420P;    \r
-                       if(options.empty())\r
-                       {\r
-                               av_opt_set(c->priv_data, "preset", "ultrafast", 0);\r
-                               av_opt_set(c->priv_data, "tune",   "fastdecode",   0);\r
-                               av_opt_set(c->priv_data, "crf",    "5",     0);\r
-                       }\r
-               }\r
-               else if(c->codec_id == CODEC_ID_QTRLE)\r
-               {\r
-                       c->pix_fmt = PIX_FMT_ARGB;\r
-               }\r
-               else\r
-               {\r
-                       BOOST_THROW_EXCEPTION(invalid_argument() << msg_info("Unsupported output parameters."));\r
-               }\r
-\r
-               parse_pix_fmt(c, options);\r
-               \r
-               c->max_b_frames = 0; // b-frames not supported.\r
-\r
-               BOOST_FOREACH(auto& option, options)\r
-                       THROW_ON_ERROR2(av_opt_set(c, option.name.c_str(), option.value.c_str(), AV_OPT_SEARCH_CHILDREN), "[ffmpeg_consumer]");\r
-                               \r
-               if(oc_->oformat->flags & AVFMT_GLOBALHEADER)\r
-                       c->flags |= CODEC_FLAG_GLOBAL_HEADER;\r
-               \r
-               c->thread_count = boost::thread::hardware_concurrency();\r
-               THROW_ON_ERROR2(avcodec_open(c, encoder), "[ffmpeg_consumer]");\r
-\r
-               return std::shared_ptr<AVStream>(st, [](AVStream* st)\r
-               {\r
-                       LOG_ON_ERROR2(avcodec_close(st->codec), "[ffmpeg_consumer]");\r
-                       av_freep(&st->codec);\r
-                       av_freep(&st);\r
-               });\r
-       }\r
-       \r
-       std::shared_ptr<AVStream> add_audio_stream()\r
-       {\r
-               auto st = av_new_stream(oc_.get(), 1);\r
-               if(!st)\r
-                       BOOST_THROW_EXCEPTION(caspar_exception() << msg_info("Could not allocate audio-stream") << boost::errinfo_api_function("av_new_stream"));               \r
-\r
-               st->codec->codec_id                     = CODEC_ID_PCM_S16LE;\r
-               st->codec->codec_type           = AVMEDIA_TYPE_AUDIO;\r
-               st->codec->sample_rate          = 48000;\r
-               st->codec->channels                     = 2;\r
-               st->codec->sample_fmt           = SAMPLE_FMT_S16;\r
-               \r
-               if(oc_->oformat->flags & AVFMT_GLOBALHEADER)\r
-                       st->codec->flags |= CODEC_FLAG_GLOBAL_HEADER;\r
-               \r
-               auto codec = avcodec_find_encoder(st->codec->codec_id);\r
-               if (!codec)\r
-                       BOOST_THROW_EXCEPTION(caspar_exception() << msg_info("codec not found"));\r
-\r
-               THROW_ON_ERROR2(avcodec_open(st->codec, codec), "[ffmpeg_consumer]");\r
-\r
-               return std::shared_ptr<AVStream>(st, [](AVStream* st)\r
-               {\r
-                       LOG_ON_ERROR2(avcodec_close(st->codec), "[ffmpeg_consumer]");;\r
-                       av_freep(&st->codec);\r
-                       av_freep(&st);\r
-               });\r
-       }\r
-\r
-       std::shared_ptr<AVFrame> convert_video_frame(const spl::shared_ptr<const core::data_frame>& frame, AVCodecContext* c)\r
-       {\r
-               if(!sws_) \r
-               {\r
-                       sws_.reset(sws_getContext(format_desc_.width, format_desc_.height, PIX_FMT_BGRA, c->width, c->height, c->pix_fmt, SWS_BICUBIC, nullptr, nullptr, nullptr), sws_freeContext);\r
-                       if (sws_ == nullptr) \r
-                               BOOST_THROW_EXCEPTION(caspar_exception() << msg_info("Cannot initialize the conversion context"));\r
-               }\r
-\r
-               std::shared_ptr<AVFrame> av_frame(avcodec_alloc_frame(), av_free);\r
-               avpicture_fill(reinterpret_cast<AVPicture*>(av_frame.get()), const_cast<uint8_t*>(frame->image_data().begin()), PIX_FMT_BGRA, format_desc_.width, format_desc_.height);\r
-                               \r
-               std::shared_ptr<AVFrame> local_av_frame(avcodec_alloc_frame(), av_free);\r
-               picture_buf_.resize(avpicture_get_size(c->pix_fmt, format_desc_.width, format_desc_.height));\r
-               avpicture_fill(reinterpret_cast<AVPicture*>(local_av_frame.get()), picture_buf_.data(), c->pix_fmt, format_desc_.width, format_desc_.height);\r
-\r
-               sws_scale(sws_.get(), av_frame->data, av_frame->linesize, 0, c->height, local_av_frame->data, local_av_frame->linesize);\r
-\r
-               return local_av_frame;\r
-       }\r
-  \r
-       std::shared_ptr<AVPacket> encode_video_frame(const spl::shared_ptr<const core::data_frame>& frame)\r
-       { \r
-               auto c = video_st_->codec;\r
\r
-               auto av_frame = convert_video_frame(frame, c);\r
-               av_frame->interlaced_frame      = format_desc_.field_mode != core::field_mode::progressive;\r
-               av_frame->top_field_first       = format_desc_.field_mode == core::field_mode::upper;\r
-               av_frame->pts                           = frame_number_++;\r
-\r
-               int out_size = THROW_ON_ERROR2(avcodec_encode_video(c, video_outbuf_.data(), static_cast<int>(video_outbuf_.size()), av_frame.get()), "[ffmpeg_consumer]");\r
-               if(out_size > 0)\r
-               {\r
-                       spl::shared_ptr<AVPacket> pkt(new AVPacket, [](AVPacket* p)\r
-                       {\r
-                               av_free_packet(p);\r
-                               delete p;\r
-                       });\r
-                       av_init_packet(pkt.get());\r
\r
-                       if (c->coded_frame->pts != AV_NOPTS_VALUE)\r
-                               pkt->pts = av_rescale_q(c->coded_frame->pts, c->time_base, video_st_->time_base);\r
-\r
-                       if(c->coded_frame->key_frame)\r
-                               pkt->flags |= AV_PKT_FLAG_KEY;\r
-\r
-                       pkt->stream_index       = video_st_->index;\r
-                       pkt->data                       = video_outbuf_.data();\r
-                       pkt->size                       = out_size;\r
\r
-                       av_dup_packet(pkt.get());\r
-                       return pkt;\r
-               }       \r
-               return nullptr;\r
-       }\r
-               \r
-       std::shared_ptr<AVPacket> encode_audio_frame(const spl::shared_ptr<const core::data_frame>& frame)\r
-       {                       \r
-               auto c = audio_st_->codec;\r
-\r
-               auto audio_data = core::audio_32_to_16(frame->audio_data());\r
-               \r
-               spl::shared_ptr<AVPacket> pkt(new AVPacket, [](AVPacket* p)\r
-               {\r
-                       av_free_packet(p);\r
-                       delete p;\r
-               });\r
-               av_init_packet(pkt.get());\r
-               \r
-               if (c->coded_frame && c->coded_frame->pts != AV_NOPTS_VALUE)\r
-                       pkt->pts = av_rescale_q(c->coded_frame->pts, c->time_base, audio_st_->time_base);\r
-\r
-               pkt->flags                      |= AV_PKT_FLAG_KEY;\r
-               pkt->stream_index       = audio_st_->index;\r
-               pkt->size                       = static_cast<int>(audio_data.size()*2);\r
-               pkt->data                       = reinterpret_cast<uint8_t*>(audio_data.data());\r
-               \r
-               av_dup_packet(pkt.get());\r
-               return pkt;\r
-       }\r
-                \r
-       void send(const spl::shared_ptr<const core::data_frame>& frame)\r
-       {\r
-               executor_.begin_invoke([=]\r
-               {               \r
-                       frame_timer_.restart();\r
-\r
-                       auto video = encode_video_frame(frame);\r
-                       auto audio = encode_audio_frame(frame);\r
-\r
-                       graph_->set_value("frame-time", frame_timer_.elapsed()*format_desc_.fps*0.5);\r
-                       \r
-                       file_write_executor_.begin_invoke([=]\r
-                       {\r
-                               write_timer_.restart();\r
-\r
-                               if(video)\r
-                                       av_write_frame(oc_.get(), video.get());\r
-                               if(audio)\r
-                                       av_write_frame(oc_.get(), audio.get());\r
-\r
-                               graph_->set_value("write-time", write_timer_.elapsed()*format_desc_.fps*0.5);\r
-                       });\r
-               });\r
-       }\r
-};\r
-\r
-struct ffmpeg_consumer_proxy : public core::frame_consumer\r
-{\r
-       const std::wstring                              filename_;\r
-       const std::vector<option>               options_;\r
-\r
-       std::unique_ptr<ffmpeg_consumer> consumer_;\r
-\r
-public:\r
-\r
-       ffmpeg_consumer_proxy(const std::wstring& filename, const std::vector<option>& options)\r
-               : filename_(filename)\r
-               , options_(options)\r
-       {\r
-       }\r
-       \r
-       virtual void initialize(const core::video_format_desc& format_desc, int)\r
-       {\r
-               consumer_.reset();\r
-               consumer_.reset(new ffmpeg_consumer(u8(filename_), format_desc, options_));\r
-       }\r
-       \r
-       virtual bool send(const spl::shared_ptr<const core::data_frame>& frame) override\r
-       {\r
-               consumer_->send(frame);\r
-               return true;\r
-       }\r
-       \r
-       virtual std::wstring print() const override\r
-       {\r
-               return consumer_ ? consumer_->print() : L"[ffmpeg_consumer]";\r
-       }\r
-\r
-       virtual std::wstring name() const override\r
-       {\r
-               return L"file";\r
-       }\r
-\r
-       virtual boost::property_tree::wptree info() const override\r
-       {\r
-               boost::property_tree::wptree info;\r
-               info.add(L"type", L"file");\r
-               info.add(L"filename", filename_);\r
-               return info;\r
-       }\r
-               \r
-       virtual bool has_synchronization_clock() const override\r
-       {\r
-               return false;\r
-       }\r
-\r
-       virtual int buffer_depth() const override\r
-       {\r
-               return 1;\r
-       }\r
-\r
-       virtual int index() const override\r
-       {\r
-               return 200;\r
-       }\r
-};     \r
-\r
-spl::shared_ptr<core::frame_consumer> create_consumer(const std::vector<std::wstring>& params)\r
-{\r
-       if(params.size() < 1 || params[0] != L"FILE")\r
-               return core::frame_consumer::empty();\r
-       \r
-       auto filename   = (params.size() > 1 ? params[1] : L"");\r
-                       \r
-       std::vector<option> options;\r
-       \r
-       if(params.size() >= 3)\r
-       {\r
-               for(auto opt_it = params.begin()+2; opt_it != params.end();)\r
-               {\r
-                       auto name  = u8(boost::trim_copy(boost::to_lower_copy(*opt_it++))).substr(1);\r
-                       auto value = u8(boost::trim_copy(boost::to_lower_copy(*opt_it++)));\r
-                               \r
-                       if(value == "h264")\r
-                               value = "libx264";\r
-                       else if(value == "dvcpro")\r
-                               value = "dvvideo";\r
-\r
-                       options.push_back(option(name, value));\r
-               }\r
-       }\r
-               \r
-       return spl::make_shared<ffmpeg_consumer_proxy>(env::media_folder() + filename, options);\r
-}\r
-\r
-spl::shared_ptr<core::frame_consumer> create_consumer(const boost::property_tree::wptree& ptree)\r
-{\r
-       auto filename   = ptree.get<std::wstring>(L"path");\r
-       auto codec              = ptree.get(L"vcodec", L"libx264");\r
-\r
-       std::vector<option> options;\r
-       options.push_back(option("vcodec", u8(codec)));\r
-       \r
-       return spl::make_shared<ffmpeg_consumer_proxy>(env::media_folder() + filename, options);\r
-}\r
-\r
-}}\r
+/*
+* Copyright (c) 2011 Sveriges Television AB <info@casparcg.com>
+*
+* This file is part of CasparCG (www.casparcg.com).
+*
+* CasparCG is free software: you can redistribute it and/or modify
+* it under the terms of the GNU General Public License as published by
+* the Free Software Foundation, either version 3 of the License, or
+* (at your option) any later version.
+*
+* CasparCG is distributed in the hope that it will be useful,
+* but WITHOUT ANY WARRANTY; without even the implied warranty of
+* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+* GNU General Public License for more details.
+*
+* You should have received a copy of the GNU General Public License
+* along with CasparCG. If not, see <http://www.gnu.org/licenses/>.
+*
+* Author: Robert Nagy, ronag89@gmail.com
+*/
+
+#include "../StdAfx.h"
+
+#include "../ffmpeg_error.h"
+
+#include "ffmpeg_consumer.h"
+
+#include "../producer/tbb_avcodec.h"
+#include "../producer/util/util.h"
+
+#include <core/frame/frame.h>
+#include <core/frame/audio_channel_layout.h>
+#include <core/mixer/audio/audio_util.h>
+#include <core/consumer/frame_consumer.h>
+#include <core/video_format.h>
+#include <core/help/help_repository.h>
+#include <core/help/help_sink.h>
+
+#include <common/array.h>
+#include <common/env.h>
+#include <common/except.h>
+#include <common/executor.h>
+#include <common/future.h>
+#include <common/diagnostics/graph.h>
+#include <common/lock.h>
+#include <common/memory.h>
+#include <common/param.h>
+#include <common/utf.h>
+#include <common/assert.h>
+#include <common/memshfl.h>
+#include <common/timer.h>
+#include <common/ptree.h>
+
+#include <boost/algorithm/string.hpp>
+#include <boost/property_tree/ptree.hpp>
+#include <boost/filesystem.hpp>
+#include <boost/range/algorithm.hpp>
+#include <boost/range/algorithm_ext.hpp>
+#include <boost/lexical_cast.hpp>
+
+#include <tbb/spin_mutex.h>
+
+#include <numeric>
+#include <cstring>
+
+#if defined(_MSC_VER)
+#pragma warning (push)
+#pragma warning (disable : 4244)
+#endif
+extern "C"
+{
+       #define __STDC_CONSTANT_MACROS
+       #define __STDC_LIMIT_MACROS
+       #include <libavformat/avformat.h>
+       #include <libswscale/swscale.h>
+       #include <libavutil/opt.h>
+       #include <libavutil/pixdesc.h>
+       #include <libavutil/parseutils.h>
+       #include <libavutil/samplefmt.h>
+       #include <libswresample/swresample.h>
+}
+#if defined(_MSC_VER)
+#pragma warning (pop)
+#endif
+
+namespace caspar { namespace ffmpeg {
+
+int av_opt_set(void *obj, const char *name, const char *val, int search_flags)
+{
+       AVClass* av_class = *(AVClass**)obj;
+
+       if((strcmp(name, "pix_fmt") == 0 || strcmp(name, "pixel_format") == 0) && strcmp(av_class->class_name, "AVCodecContext") == 0)
+       {
+               AVCodecContext* c = (AVCodecContext*)obj;
+               auto pix_fmt = av_get_pix_fmt(val);
+               if(pix_fmt == PIX_FMT_NONE)
+                       return -1;
+               c->pix_fmt = pix_fmt;
+               return 0;
+       }
+       //if((strcmp(name, "r") == 0 || strcmp(name, "frame_rate") == 0) && strcmp(av_class->class_name, "AVCodecContext") == 0)
+       //{
+       //      AVCodecContext* c = (AVCodecContext*)obj;
+
+       //      if(c->codec_type != AVMEDIA_TYPE_VIDEO)
+       //              return -1;
+
+       //      AVRational rate;
+       //      int ret = av_parse_video_rate(&rate, val);
+       //      if(ret < 0)
+       //              return ret;
+
+       //      c->time_base.num = rate.den;
+       //      c->time_base.den = rate.num;
+       //      return 0;
+       //}
+
+       return ::av_opt_set(obj, name, val, search_flags);
+}
+
+struct option
+{
+       std::string name;
+       std::string value;
+
+       option(std::string name, std::string value)
+               : name(std::move(name))
+               , value(std::move(value))
+       {
+       }
+};
+
+struct output_format
+{
+       AVOutputFormat* format;
+       int                             width;
+       int                             height;
+       AVCodecID               vcodec;
+       AVCodecID               acodec;
+       int                             croptop;
+       int                             cropbot;
+
+       output_format(const core::video_format_desc& format_desc, const std::string& filename, std::vector<option>& options)
+               : format(av_guess_format(nullptr, filename.c_str(), nullptr))
+               , width(format_desc.width)
+               , height(format_desc.height)
+               , vcodec(CODEC_ID_NONE)
+               , acodec(CODEC_ID_NONE)
+               , croptop(0)
+               , cropbot(0)
+       {
+               if(boost::iequals(boost::filesystem::path(filename).extension().string(), ".dv"))
+                       set_opt("f", "dv");
+
+               boost::range::remove_erase_if(options, [&](const option& o)
+               {
+                       return set_opt(o.name, o.value);
+               });
+
+               if(vcodec == CODEC_ID_NONE && format)
+                       vcodec = format->video_codec;
+
+               if(acodec == CODEC_ID_NONE && format)
+                       acodec = format->audio_codec;
+
+               if(vcodec == CODEC_ID_NONE)
+                       vcodec = CODEC_ID_H264;
+
+               if(acodec == CODEC_ID_NONE)
+                       acodec = CODEC_ID_PCM_S16LE;
+       }
+
+       bool set_opt(const std::string& name, const std::string& value)
+       {
+               //if(name == "target")
+               //{
+               //      enum { PAL, NTSC, FILM, UNKNOWN } norm = UNKNOWN;
+               //
+               //      if(name.find("pal-") != std::string::npos)
+               //              norm = PAL;
+               //      else if(name.find("ntsc-") != std::string::npos)
+               //              norm = NTSC;
+
+               //      if(norm == UNKNOWN)
+               //              CASPAR_THROW_EXCEPTION(invalid_argument() << arg_name_info("target"));
+               //
+               //      if (name.find("-dv") != std::string::npos)
+               //      {
+               //              set_opt("f", "dv");
+               //              if(norm == PAL)
+               //              {
+               //                      set_opt("s", "720x576");
+               //              }
+               //              else
+               //              {
+               //                      set_opt("s", "720x480");
+               //                      if(height == 486)
+               //                      {
+               //                              set_opt("croptop", "2");
+               //                              set_opt("cropbot", "4");
+               //                      }
+               //              }
+               //              set_opt("s", norm == PAL ? "720x576" : "720x480");
+               //      }
+
+               //      return true;
+               //}
+               //else
+               if(name == "f")
+               {
+                       format = av_guess_format(value.c_str(), nullptr, nullptr);
+
+                       if(format == nullptr)
+                               CASPAR_THROW_EXCEPTION(user_error() << msg_info("Unknown format " + value));
+
+                       return true;
+               }
+               else if(name == "vcodec" || name == "v:codec")
+               {
+                       auto c = avcodec_find_encoder_by_name(value.c_str());
+                       if(c == nullptr)
+                               CASPAR_THROW_EXCEPTION(user_error() << msg_info("Unknown video codec " + value));
+
+                       vcodec = avcodec_find_encoder_by_name(value.c_str())->id;
+                       return true;
+
+               }
+               else if(name == "acodec" || name == "a:codec")
+               {
+                       auto c = avcodec_find_encoder_by_name(value.c_str());
+                       if(c == nullptr)
+                               CASPAR_THROW_EXCEPTION(user_error() << msg_info("Unknown audio codec " + value));
+
+                       acodec = avcodec_find_encoder_by_name(value.c_str())->id;
+
+                       return true;
+               }
+               else if(name == "s")
+               {
+                       if(av_parse_video_size(&width, &height, value.c_str()) < 0)
+                               CASPAR_THROW_EXCEPTION(user_error() << msg_info("Unknown video size " + value));
+
+                       return true;
+               }
+               else if(name == "croptop")
+               {
+                       croptop = boost::lexical_cast<int>(value);
+
+                       return true;
+               }
+               else if(name == "cropbot")
+               {
+                       cropbot = boost::lexical_cast<int>(value);
+
+                       return true;
+               }
+
+               return false;
+       }
+};
+
+typedef cache_aligned_vector<uint8_t> byte_vector;
+
+struct ffmpeg_consumer : boost::noncopyable
+{
+       const spl::shared_ptr<diagnostics::graph>       graph_;
+       const std::string                                                       filename_;
+       const std::string                                                       full_filename_          = u8(env::media_folder()) + filename_;
+       const std::shared_ptr<AVFormatContext>          oc_                                     { avformat_alloc_context(), avformat_free_context };
+       const core::video_format_desc                           format_desc_;
+       const core::audio_channel_layout                        channel_layout_;
+
+       core::monitor::subject                                          monitor_subject_;
+
+       tbb::spin_mutex                                                         exception_mutex_;
+       std::exception_ptr                                                      exception_;
+
+       std::shared_ptr<AVStream>                                       audio_st_;
+       std::shared_ptr<AVStream>                                       video_st_;
+
+       byte_vector                                                                     picture_buffer_;
+       byte_vector                                                                     key_picture_buf_;
+       byte_vector                                                                     audio_buffer_;
+       std::shared_ptr<SwrContext>                                     swr_;
+       std::shared_ptr<SwsContext>                                     sws_;
+
+       int64_t                                                                         frame_number_           = 0;
+
+       output_format                                                           output_format_;
+       bool                                                                            key_only_;
+       tbb::atomic<int64_t>                                            current_encoding_delay_;
+
+       executor                                                                        executor_;
+public:
+       ffmpeg_consumer(
+                       const std::string& filename,
+                       const core::video_format_desc& format_desc,
+                       const core::audio_channel_layout& channel_layout,
+                       std::vector<option> options,
+                       bool key_only)
+               : filename_(filename)
+               , format_desc_(format_desc)
+               , channel_layout_(channel_layout)
+               , output_format_(format_desc, full_filename_, options)
+               , key_only_(key_only)
+               , executor_(print())
+       {
+               current_encoding_delay_ = 0;
+               check_space();
+
+               // TODO: Ask stakeholders about case where file already exists.
+               boost::filesystem::remove(boost::filesystem::path(full_filename_)); // Delete the file if it exists
+
+               graph_->set_color("frame-time", diagnostics::color(0.1f, 1.0f, 0.1f));
+               graph_->set_color("dropped-frame", diagnostics::color(0.3f, 0.6f, 0.3f));
+               graph_->set_text(print());
+               diagnostics::register_graph(graph_);
+
+               executor_.set_capacity(8);
+
+               oc_->oformat = output_format_.format;
+
+               std::strcpy(oc_->filename, full_filename_.c_str());
+
+               //  Add the audio and video streams using the default format codecs     and initialize the codecs.
+               video_st_ = add_video_stream(options);
+
+               if (!key_only)
+                       audio_st_ = add_audio_stream(options);
+
+               av_dump_format(oc_.get(), 0, full_filename_.c_str(), 1);
+
+               // Open the output ffmpeg, if needed.
+               if (!(oc_->oformat->flags & AVFMT_NOFILE))
+                       THROW_ON_ERROR2(avio_open(&oc_->pb, full_filename_.c_str(), AVIO_FLAG_WRITE), "[ffmpeg_consumer]");
+
+               THROW_ON_ERROR2(avformat_write_header(oc_.get(), nullptr), "[ffmpeg_consumer]");
+
+               if(options.size() > 0)
+               {
+                       for (auto& option : options)
+                               CASPAR_LOG(warning) << L"Invalid option: -" << u16(option.name) << L" " << u16(option.value);
+               }
+       }
+
+       ~ffmpeg_consumer()
+       {
+               try
+               {
+                       executor_.wait();
+               }
+               catch(...)
+               {
+                       CASPAR_LOG_CURRENT_EXCEPTION();
+               }
+
+               LOG_ON_ERROR2(av_write_trailer(oc_.get()), "[ffmpeg_consumer]");
+
+               if (!key_only_)
+                       audio_st_.reset();
+
+               video_st_.reset();
+
+               if (!(oc_->oformat->flags & AVFMT_NOFILE))
+                       LOG_ON_ERROR2(avio_close(oc_->pb), "[ffmpeg_consumer]");
+       }
+
+       // frame_consumer
+
+       void send(core::const_frame& frame)
+       {
+               auto exception = lock(exception_mutex_, [&]
+               {
+                       return exception_;
+               });
+
+               if(exception != nullptr)
+                       std::rethrow_exception(exception);
+
+               executor_.begin_invoke([=]
+               {
+                       encode(frame);
+                       current_encoding_delay_ = frame.get_age_millis();
+               });
+       }
+
+       bool ready_for_frame() const
+       {
+               return !executor_.is_full();
+       }
+
+       void mark_dropped()
+       {
+               graph_->set_tag(diagnostics::tag_severity::WARNING, "dropped-frame");
+       }
+
+       std::wstring print() const
+       {
+               return L"ffmpeg[" + u16(filename_) + L"]";
+       }
+
+       core::monitor::subject& monitor_output()
+       {
+               return monitor_subject_;
+       }
+
+private:
+       std::shared_ptr<AVStream> add_video_stream(std::vector<option>& options)
+       {
+               if(output_format_.vcodec == CODEC_ID_NONE)
+                       return nullptr;
+
+               auto st = avformat_new_stream(oc_.get(), 0);
+               if (!st)
+                       CASPAR_THROW_EXCEPTION(caspar_exception() << msg_info("Could not allocate video-stream.") << boost::errinfo_api_function("av_new_stream"));
+
+               auto encoder = avcodec_find_encoder(output_format_.vcodec);
+               if (!encoder)
+                       CASPAR_THROW_EXCEPTION(caspar_exception() << msg_info("Codec not found."));
+
+               auto c = st->codec;
+
+               avcodec_get_context_defaults3(c, encoder);
+
+               c->codec_id                     = output_format_.vcodec;
+               c->codec_type           = AVMEDIA_TYPE_VIDEO;
+               c->width                        = output_format_.width;
+               c->height                       = output_format_.height - output_format_.croptop - output_format_.cropbot;
+               c->time_base.den        = format_desc_.time_scale;
+               c->time_base.num        = format_desc_.duration;
+               c->gop_size                     = 25;
+               c->flags                   |= format_desc_.field_mode == core::field_mode::progressive ? 0 : (CODEC_FLAG_INTERLACED_ME | CODEC_FLAG_INTERLACED_DCT);
+               c->pix_fmt                      = c->pix_fmt != PIX_FMT_NONE ? c->pix_fmt : PIX_FMT_YUV420P;
+
+               if(c->codec_id == CODEC_ID_PRORES)
+               {
+                       c->bit_rate     = output_format_.width < 1280 ? 63*1000000 : 220*1000000;
+                       c->pix_fmt      = PIX_FMT_YUV422P10;
+               }
+               else if(c->codec_id == CODEC_ID_DNXHD)
+               {
+                       if(c->width < 1280 || c->height < 720)
+                               CASPAR_THROW_EXCEPTION(caspar_exception() << msg_info("Unsupported video dimensions."));
+
+                       c->bit_rate     = 220*1000000;
+                       c->pix_fmt      = PIX_FMT_YUV422P;
+               }
+               else if(c->codec_id == CODEC_ID_DVVIDEO)
+               {
+                       c->width = c->height == 1280 ? 960  : c->width;
+
+                       if(format_desc_.format == core::video_format::ntsc)
+                       {
+                               c->pix_fmt = PIX_FMT_YUV411P;
+                               output_format_.croptop = 2;
+                               output_format_.cropbot = 4;
+                               c->height                          = output_format_.height - output_format_.croptop - output_format_.cropbot;
+                       }
+                       else if(format_desc_.format == core::video_format::pal)
+                               c->pix_fmt = PIX_FMT_YUV420P;
+                       else // dv50
+                               c->pix_fmt = PIX_FMT_YUV422P;
+
+                       if(format_desc_.duration == 1001)
+                               c->width = c->height == 1080 ? 1280 : c->width;
+                       else
+                               c->width = c->height == 1080 ? 1440 : c->width;
+               }
+               else if(c->codec_id == CODEC_ID_H264)
+               {
+                       c->pix_fmt = PIX_FMT_YUV420P;
+                       av_opt_set(c->priv_data, "preset", "ultrafast", 0);
+                       av_opt_set(c->priv_data, "tune",   "fastdecode",   0);
+                       av_opt_set(c->priv_data, "crf",    "5",     0);
+               }
+               else if(c->codec_id == CODEC_ID_QTRLE)
+               {
+                       c->pix_fmt = PIX_FMT_ARGB;
+               }
+
+               boost::range::remove_erase_if(options, [&](const option& o)
+               {
+                       return o.name.at(0) != 'a' && ffmpeg::av_opt_set(c, o.name.c_str(), o.value.c_str(), AV_OPT_SEARCH_CHILDREN) > -1;
+               });
+
+               if(output_format_.format->flags & AVFMT_GLOBALHEADER)
+                       c->flags |= CODEC_FLAG_GLOBAL_HEADER;
+
+               THROW_ON_ERROR2(tbb_avcodec_open(c, encoder, false), "[ffmpeg_consumer]");
+
+               return std::shared_ptr<AVStream>(st, [](AVStream* st)
+               {
+                       LOG_ON_ERROR2(tbb_avcodec_close(st->codec), "[ffmpeg_consumer]");
+               });
+       }
+
+       std::shared_ptr<AVStream> add_audio_stream(std::vector<option>& options)
+       {
+               if(output_format_.acodec == CODEC_ID_NONE)
+                       return nullptr;
+
+               auto st = avformat_new_stream(oc_.get(), nullptr);
+               if(!st)
+                       CASPAR_THROW_EXCEPTION(caspar_exception() << msg_info("Could not allocate audio-stream") << boost::errinfo_api_function("av_new_stream"));
+
+               auto encoder = avcodec_find_encoder(output_format_.acodec);
+               if (!encoder)
+                       CASPAR_THROW_EXCEPTION(caspar_exception() << msg_info("codec not found"));
+
+               auto c = st->codec;
+
+               avcodec_get_context_defaults3(c, encoder);
+
+               c->codec_id                     = output_format_.acodec;
+               c->codec_type           = AVMEDIA_TYPE_AUDIO;
+               c->sample_rate          = 48000;
+               c->channels                     = 2;
+               c->sample_fmt           = AV_SAMPLE_FMT_S16;
+               c->time_base.num        = 1;
+               c->time_base.den        = c->sample_rate;
+
+               if(output_format_.vcodec == CODEC_ID_FLV1)
+                       c->sample_rate  = 44100;
+
+               if(output_format_.format->flags & AVFMT_GLOBALHEADER)
+                       c->flags |= CODEC_FLAG_GLOBAL_HEADER;
+
+               boost::range::remove_erase_if(options, [&](const option& o)
+               {
+                       return ffmpeg::av_opt_set(c, o.name.c_str(), o.value.c_str(), AV_OPT_SEARCH_CHILDREN) > -1;
+               });
+
+               THROW_ON_ERROR2(avcodec_open2(c, encoder, nullptr), "[ffmpeg_consumer]");
+
+               return std::shared_ptr<AVStream>(st, [](AVStream* st)
+               {
+                       LOG_ON_ERROR2(avcodec_close(st->codec), "[ffmpeg_consumer]");
+               });
+       }
+
+       void encode_video_frame(core::const_frame frame)
+       {
+               if(!video_st_)
+                       return;
+
+               auto enc = video_st_->codec;
+
+               auto av_frame                           = convert_video(frame, enc);
+               av_frame->interlaced_frame      = format_desc_.field_mode != core::field_mode::progressive;
+               av_frame->top_field_first       = format_desc_.field_mode == core::field_mode::upper;
+               av_frame->pts = frame_number_++;
+
+               monitor_subject_
+                       << core::monitor::message("/frame") % static_cast<int64_t>(frame_number_)
+                       << core::monitor::message("/path") % filename_
+                       << core::monitor::message("/fps") % format_desc_.fps;
+
+               AVPacket pkt;
+               av_init_packet(&pkt);
+               pkt.data = nullptr;
+               pkt.size = 0;
+
+               int got_packet = 0;
+               THROW_ON_ERROR2(avcodec_encode_video2(enc, &pkt, av_frame.get(), &got_packet), "[ffmpeg_consumer]");
+               std::shared_ptr<AVPacket> guard(&pkt, av_free_packet);
+
+               if(!got_packet)
+                       return;
+
+               if (pkt.pts != AV_NOPTS_VALUE)
+                       pkt.pts = av_rescale_q(pkt.pts, enc->time_base, video_st_->time_base);
+               if (pkt.dts != AV_NOPTS_VALUE)
+                       pkt.dts = av_rescale_q(pkt.dts, enc->time_base, video_st_->time_base);
+
+               pkt.stream_index = video_st_->index;
+
+               THROW_ON_ERROR2(av_interleaved_write_frame(oc_.get(), &pkt), "[ffmpeg_consumer]");
+       }
+
+       uint64_t get_channel_layout(AVCodecContext* dec)
+       {
+               auto layout = (dec->channel_layout && dec->channels == av_get_channel_layout_nb_channels(dec->channel_layout)) ? dec->channel_layout : av_get_default_channel_layout(dec->channels);
+               return layout;
+       }
+
+       void encode_audio_frame(core::const_frame frame)
+       {
+               if(!audio_st_)
+                       return;
+
+               auto enc = audio_st_->codec;
+
+               boost::push_back(audio_buffer_, convert_audio(frame, enc));
+
+               auto frame_size = enc->frame_size != 0 ? enc->frame_size * enc->channels * av_get_bytes_per_sample(enc->sample_fmt) : static_cast<int>(audio_buffer_.size());
+
+               while(audio_buffer_.size() >= frame_size)
+               {
+                       auto av_frame = create_frame();
+                       av_frame->nb_samples = frame_size / (enc->channels * av_get_bytes_per_sample(enc->sample_fmt));
+
+                       AVPacket pkt;
+                       av_init_packet(&pkt);
+                       pkt.data = nullptr;
+                       pkt.size = 0;
+
+                       THROW_ON_ERROR2(avcodec_fill_audio_frame(av_frame.get(), enc->channels, enc->sample_fmt, audio_buffer_.data(), frame_size, 1), "[ffmpeg_consumer]");
+
+                       int got_packet = 0;
+                       THROW_ON_ERROR2(avcodec_encode_audio2(enc, &pkt, av_frame.get(), &got_packet), "[ffmpeg_consumer]");
+                       std::shared_ptr<AVPacket> guard(&pkt, av_free_packet);
+
+                       audio_buffer_.erase(audio_buffer_.begin(), audio_buffer_.begin() + frame_size);
+
+                       if(!got_packet)
+                               return;
+
+                       if (pkt.pts != AV_NOPTS_VALUE)
+                               pkt.pts      = av_rescale_q(pkt.pts, enc->time_base, audio_st_->time_base);
+                       if (pkt.dts != AV_NOPTS_VALUE)
+                               pkt.dts      = av_rescale_q(pkt.dts, enc->time_base, audio_st_->time_base);
+                       if (pkt.duration > 0)
+                               pkt.duration = static_cast<int>(av_rescale_q(pkt.duration, enc->time_base, audio_st_->time_base));
+
+                       pkt.stream_index = audio_st_->index;
+
+                       THROW_ON_ERROR2(av_interleaved_write_frame(oc_.get(), &pkt), "[ffmpeg_consumer]");
+               }
+       }
+
+       std::shared_ptr<AVFrame> convert_video(core::const_frame frame, AVCodecContext* c)
+       {
+               if(!sws_)
+               {
+                       sws_.reset(sws_getContext(format_desc_.width,
+                                                                         format_desc_.height - output_format_.croptop  - output_format_.cropbot,
+                                                                         PIX_FMT_BGRA,
+                                                                         c->width,
+                                                                         c->height,
+                                                                         c->pix_fmt,
+                                                                         SWS_BICUBIC, nullptr, nullptr, nullptr),
+                                               sws_freeContext);
+                       if (sws_ == nullptr)
+                               CASPAR_THROW_EXCEPTION(caspar_exception() << msg_info("Cannot initialize the conversion context"));
+               }
+
+               // #in_frame
+
+               std::shared_ptr<AVFrame> in_frame(avcodec_alloc_frame(), av_free);
+
+               auto in_picture = reinterpret_cast<AVPicture*>(in_frame.get());
+
+               if (key_only_)
+               {
+                       key_picture_buf_.resize(frame.image_data().size());
+                       in_picture->linesize[0] = format_desc_.width * 4;
+                       in_picture->data[0] = key_picture_buf_.data();
+
+                       aligned_memshfl(in_picture->data[0], frame.image_data().begin(), frame.image_data().size(), 0x0F0F0F0F, 0x0B0B0B0B, 0x07070707, 0x03030303);
+               }
+               else
+               {
+                       avpicture_fill(
+                                       in_picture,
+                                       const_cast<uint8_t*>(frame.image_data().begin()),
+                                       PIX_FMT_BGRA,
+                                       format_desc_.width,
+                                       format_desc_.height - output_format_.croptop  - output_format_.cropbot);
+               }
+
+               // crop-top
+
+               for(int n = 0; n < 4; ++n)
+                       in_frame->data[n] += in_frame->linesize[n] * output_format_.croptop;
+
+               // #out_frame
+
+               std::shared_ptr<AVFrame> out_frame(avcodec_alloc_frame(), av_free);
+
+               av_image_fill_linesizes(out_frame->linesize, c->pix_fmt, c->width);
+               for(int n = 0; n < 4; ++n)
+                       out_frame->linesize[n] += 32 - (out_frame->linesize[n] % 32); // align
+
+               picture_buffer_.resize(av_image_fill_pointers(out_frame->data, c->pix_fmt, c->height, nullptr, out_frame->linesize));
+               av_image_fill_pointers(out_frame->data, c->pix_fmt, c->height, picture_buffer_.data(), out_frame->linesize);
+
+               // #scale
+
+               sws_scale(sws_.get(),
+                                 in_frame->data,
+                                 in_frame->linesize,
+                                 0,
+                                 format_desc_.height - output_format_.cropbot - output_format_.croptop,
+                                 out_frame->data,
+                                 out_frame->linesize);
+
+               out_frame->format       = c->pix_fmt;
+               out_frame->width        = c->width;
+               out_frame->height       = c->height;
+
+               return out_frame;
+       }
+
+       byte_vector convert_audio(core::const_frame& frame, AVCodecContext* c)
+       {
+               if(!swr_)
+               {
+                       swr_ = std::shared_ptr<SwrContext>(swr_alloc_set_opts(nullptr,
+                                                                               get_channel_layout(c), c->sample_fmt, c->sample_rate,
+                                                                               av_get_default_channel_layout(channel_layout_.num_channels), AV_SAMPLE_FMT_S32, format_desc_.audio_sample_rate,
+                                                                               0, nullptr), [](SwrContext* p){swr_free(&p);});
+
+                       if(!swr_)
+                               CASPAR_THROW_EXCEPTION(bad_alloc());
+
+                       THROW_ON_ERROR2(swr_init(swr_.get()), "[audio_decoder]");
+               }
+
+               byte_vector buffer(48000);
+
+               const uint8_t* in[]  = {reinterpret_cast<const uint8_t*>(frame.audio_data().data())};
+               uint8_t*       out[] = {buffer.data()};
+
+               auto channel_samples = swr_convert(swr_.get(),
+                                                                                  out, static_cast<int>(buffer.size()) / c->channels / av_get_bytes_per_sample(c->sample_fmt),
+                                                                                  in, static_cast<int>(frame.audio_data().size()/channel_layout_.num_channels));
+
+               buffer.resize(channel_samples * c->channels * av_get_bytes_per_sample(c->sample_fmt));
+
+               return buffer;
+       }
+
+       void check_space()
+       {
+               auto space = boost::filesystem::space(boost::filesystem::path(full_filename_).parent_path());
+               if(space.available < 512*1000000)
+                       CASPAR_THROW_EXCEPTION(file_write_error() << msg_info("out of space"));
+       }
+
+       void encode(const core::const_frame& frame)
+       {
+               try
+               {
+                       if(frame_number_ % 25 == 0)
+                               check_space();
+
+                       caspar::timer frame_timer;
+
+                       encode_video_frame(frame);
+                       encode_audio_frame(frame);
+
+                       graph_->set_value("frame-time", frame_timer.elapsed()*format_desc_.fps*0.5);
+               }
+               catch(...)
+               {
+                       lock(exception_mutex_, [&]
+                       {
+                               exception_ = std::current_exception();
+                       });
+               }
+       }
+};
+
+struct ffmpeg_consumer_proxy : public core::frame_consumer
+{
+       const std::wstring                      filename_;
+       const std::vector<option>       options_;
+       const bool                                      separate_key_;
+
+       std::unique_ptr<ffmpeg_consumer> consumer_;
+       std::unique_ptr<ffmpeg_consumer> key_only_consumer_;
+
+public:
+
+       ffmpeg_consumer_proxy(const std::wstring& filename, const std::vector<option>& options, bool separate_key)
+               : filename_(filename)
+               , options_(options)
+               , separate_key_(separate_key)
+       {
+       }
+
+       void initialize(const core::video_format_desc& format_desc, const core::audio_channel_layout& channel_layout, int) override
+       {
+               if(consumer_)
+                       CASPAR_THROW_EXCEPTION(invalid_operation() << msg_info("Cannot reinitialize ffmpeg-consumer."));
+
+               consumer_.reset(new ffmpeg_consumer(u8(filename_), format_desc, channel_layout, options_, false));
+
+               if (separate_key_)
+               {
+                       boost::filesystem::path fill_file(filename_);
+                       auto without_extension = u16(fill_file.stem().string());
+                       auto key_file = without_extension + L"_A" + u16(fill_file.extension().string());
+
+                       key_only_consumer_.reset(new ffmpeg_consumer(u8(key_file), format_desc, channel_layout, options_, true));
+               }
+       }
+
+       int64_t presentation_frame_age_millis() const override
+       {
+               return consumer_ ? static_cast<int64_t>(consumer_->current_encoding_delay_) : 0;
+       }
+
+       std::future<bool> send(core::const_frame frame) override
+       {
+               bool ready_for_frame = consumer_->ready_for_frame();
+
+               if (ready_for_frame && separate_key_)
+                       ready_for_frame = ready_for_frame && key_only_consumer_->ready_for_frame();
+
+               if (ready_for_frame)
+               {
+                       consumer_->send(frame);
+
+                       if (separate_key_)
+                               key_only_consumer_->send(frame);
+               }
+               else
+               {
+                       consumer_->mark_dropped();
+
+                       if (separate_key_)
+                               key_only_consumer_->mark_dropped();
+               }
+
+               return make_ready_future(true);
+       }
+
+       std::wstring print() const override
+       {
+               return consumer_ ? consumer_->print() : L"[ffmpeg_consumer]";
+       }
+
+       std::wstring name() const override
+       {
+               return L"file";
+       }
+
+       boost::property_tree::wptree info() const override
+       {
+               boost::property_tree::wptree info;
+               info.add(L"type", L"file");
+               info.add(L"filename", filename_);
+               info.add(L"separate_key", separate_key_);
+               return info;
+       }
+
+       bool has_synchronization_clock() const override
+       {
+               return false;
+       }
+
+       int buffer_depth() const override
+       {
+               return -1;
+       }
+
+       int index() const override
+       {
+               return 200;
+       }
+
+       core::monitor::subject& monitor_output()
+       {
+               return consumer_->monitor_output();
+       }
+};
+
+void describe_consumer(core::help_sink& sink, const core::help_repository& repo)
+{
+       sink.short_description(L"Can record a channel to a file supported by FFmpeg.");
+       sink.syntax(L"FILE [filename:string] {-[ffmpeg_param1:string] [value1:string] {-[ffmpeg_param2:string] [value2:string] {...}}} {[separate_key:SEPARATE_KEY]}");
+       sink.para()->text(L"Can record a channel to a file supported by FFmpeg.");
+       sink.definitions()
+               ->item(L"filename", L"The filename under the media folder including the extension (decides which kind of container format that will be used).")
+               ->item(L"ffmpeg_paramX", L"A parameter supported by FFmpeg. For example vcodec or acodec etc.")
+               ->item(L"separate_key", L"If defined will create two files simultaneously -- One for fill and one for key (_A will be appended).")
+               ;
+       sink.para()->text(L"Examples:");
+       sink.example(L">> ADD 1 FILE output.mov -vcodec dnxhd");
+       sink.example(L">> ADD 1 FILE output.mov -vcodec prores");
+       sink.example(L">> ADD 1 FILE output.mov -vcodec dvvideo");
+       sink.example(L">> ADD 1 FILE output.mov -vcodec libx264 -preset ultrafast -tune fastdecode -crf 25");
+       sink.example(L">> ADD 1 FILE output.mov -vcodec dnxhd SEPARATE_KEY", L"for creating output.mov with fill and output_A.mov with key/alpha");
+}
+
+spl::shared_ptr<core::frame_consumer> create_consumer(
+               const std::vector<std::wstring>& params, core::interaction_sink*, std::vector<spl::shared_ptr<core::video_channel>> channels)
+{
+       auto params2 = params;
+       auto separate_key_it = std::find_if(params2.begin(), params2.end(), param_comparer(L"SEPARATE_KEY"));
+       bool separate_key = false;
+
+       if (separate_key_it != params2.end())
+       {
+               separate_key = true;
+               params2.erase(separate_key_it);
+       }
+
+       auto str = std::accumulate(params2.begin(), params2.end(), std::wstring(), [](const std::wstring& lhs, const std::wstring& rhs) {return lhs + L" " + rhs;});
+
+       boost::wregex path_exp(LR"(\s*FILE(\s(?<PATH>.+\.[^\s]+))?.*)", boost::regex::icase);
+
+       boost::wsmatch path;
+       if(!boost::regex_match(str, path, path_exp))
+               return core::frame_consumer::empty();
+
+       boost::wregex opt_exp(LR"(-((?<NAME>[^\s]+)\s+(?<VALUE>[^\s]+)))");
+
+       std::vector<option> options;
+       for(boost::wsregex_iterator it(str.begin(), str.end(), opt_exp); it != boost::wsregex_iterator(); ++it)
+       {
+               auto name  = u8(boost::trim_copy(boost::to_lower_copy((*it)["NAME"].str())));
+               auto value = u8(boost::trim_copy(boost::to_lower_copy((*it)["VALUE"].str())));
+
+               if(value == "h264")
+                       value = "libx264";
+               else if(value == "dvcpro")
+                       value = "dvvideo";
+
+               options.push_back(option(name, value));
+       }
+
+       return spl::make_shared<ffmpeg_consumer_proxy>(path["PATH"].str(), options, separate_key);
+}
+
+spl::shared_ptr<core::frame_consumer> create_preconfigured_consumer(
+               const boost::property_tree::wptree& ptree, core::interaction_sink*, std::vector<spl::shared_ptr<core::video_channel>> channels)
+{
+       auto filename           = ptree_get<std::wstring>(ptree, L"path");
+       auto codec                      = ptree.get(L"vcodec", L"libx264");
+       auto separate_key       = ptree.get(L"separate-key", false);
+
+       std::vector<option> options;
+       options.push_back(option("vcodec", u8(codec)));
+
+       return spl::make_shared<ffmpeg_consumer_proxy>(filename, options, separate_key);
+}
+
+}}