git.sesse.net Git - casparcg/blob - modules/ffmpeg/consumer/ffmpeg_consumer.cpp

   1 /*\r
   2 * copyright (c) 2010 Sveriges Television AB <info@casparcg.com>\r
   3 *\r
   4 *  This ffmpeg is part of CasparCG.\r
   5 *\r
   6 *    CasparCG is free software: you can redistribute it and/or modify\r
   7 *    it under the terms of the GNU General Public License as published by\r
   8 *    the Free Software Foundation, either version 3 of the License, or\r
   9 *    (at your option) any later version.\r
  10 *\r
  11 *    CasparCG is distributed in the hope that it will be useful,\r
  12 *    but WITHOUT ANY WARRANTY; without even the implied warranty of\r
  13 *    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the\r
  14 *    GNU General Public License for more details.\r
  15 \r
  16 *    You should have received a copy of the GNU General Public License\r
  17 *    along with CasparCG.  If not, see <http://www.gnu.org/licenses/>.\r
  18 *\r
  19 */\r
  20  \r
  21 #include "../StdAfx.h"\r
  22 \r
  23 #include "ffmpeg_consumer.h"\r
  24 \r
  25 #include <mixer/frame/read_frame.h>\r
  26 \r
  27 #include <common/concurrency/executor.h>\r
  28 #include <common/utility/string.h>\r
  29 #include <common/env.h>\r
  30 \r
  31 #include <boost/thread/once.hpp>\r
  32 \r
  33 #include <tbb/cache_aligned_allocator.h>\r
  34 #include <tbb/parallel_invoke.h>\r
  35 \r
  36 #include <cstdio>\r
  37 \r
  38 #if defined(_MSC_VER)\r
  39 #pragma warning (push)\r
  40 #pragma warning (disable : 4244)\r
  41 #endif\r
  42 extern "C" \r
  43 {\r
  44         #define __STDC_CONSTANT_MACROS\r
  45         #define __STDC_LIMIT_MACROS\r
  46         #include <libavformat/avformat.h>\r
  47         #include <libswscale/swscale.h>\r
  48 }\r
  49 #if defined(_MSC_VER)\r
  50 #pragma warning (pop)\r
  51 #endif\r
  52 \r
  53 namespace caspar { \r
  54         \r
  55 struct ffmpeg_consumer::implementation : boost::noncopyable\r
  56 {               \r
  57         printer parent_printer_;\r
  58         std::string filename_;\r
  59 \r
  60         // Audio\r
  61         AVStream* audio_st_;\r
  62         std::vector<unsigned char, tbb::cache_aligned_allocator<unsigned char>> audio_outbuf_;\r
  63 \r
  64         // Video\r
  65         AVStream* video_st_;\r
  66         std::vector<uint8_t, tbb::cache_aligned_allocator<unsigned char>> picture_buf_;\r
  67 \r
  68         std::vector<unsigned char, tbb::cache_aligned_allocator<unsigned char>> video_outbuf_;\r
  69         SwsContext* img_convert_ctx_;\r
  70         \r
  71         AVOutputFormat* fmt_;\r
  72         std::shared_ptr<AVFormatContext> oc_;\r
  73         core::video_format_desc format_desc_;\r
  74 \r
  75         std::vector<short, tbb::cache_aligned_allocator<short>> audio_input_buffer_;\r
  76 \r
  77         boost::unique_future<void> active_;\r
  78 \r
  79         executor executor_;\r
  80 public:\r
  81         implementation(const std::string& filename)\r
  82                 : filename_(filename)\r
  83                 , audio_st_(nullptr)\r
  84                 , video_st_(nullptr)\r
  85                 , fmt_(nullptr)\r
  86                 , img_convert_ctx_(nullptr)\r
  87                 , video_outbuf_(1920*1080*4)\r
  88                 , audio_outbuf_(48000)\r
  89         {}\r
  90 \r
  91         ~implementation()\r
  92         {    \r
  93                 executor_.invoke([]{});\r
  94                 executor_.stop();\r
  95 \r
  96                 av_write_trailer(oc_.get());\r
  97 \r
  98                 // Close each codec.\r
  99                 if (video_st_)          \r
 100                         avcodec_close(video_st_->codec);\r
 101                 \r
 102                 if (audio_st_)\r
 103                         avcodec_close(audio_st_->codec);\r
 104                                 \r
 105                 // Free the streams.\r
 106                 for(size_t i = 0; i < oc_->nb_streams; ++i) \r
 107                 {\r
 108                         av_freep(&oc_->streams[i]->codec);\r
 109                         av_freep(&oc_->streams[i]);\r
 110                 }\r
 111 \r
 112                 if (!(fmt_->flags & AVFMT_NOFILE)) \r
 113                         url_fclose(oc_->pb); // Close the output ffmpeg.\r
 114         }\r
 115 \r
 116         void initialize(const core::video_format_desc& format_desc, const printer& parent_printer)\r
 117         {\r
 118                 format_desc_ = format_desc;\r
 119                 parent_printer_ = parent_printer;\r
 120                 executor_.start();\r
 121                 active_ = executor_.begin_invoke([]{});\r
 122 \r
 123                 fmt_ = av_guess_format(nullptr, filename_.c_str(), nullptr);\r
 124                 if (!fmt_) \r
 125                 {\r
 126                         CASPAR_LOG(warning) << "Could not deduce output format from ffmpeg extension: using MPEG.";\r
 127                         fmt_ = av_guess_format("mpeg", nullptr, nullptr);\r
 128                         filename_ = filename_ + ".avi"; \r
 129                 }\r
 130                 if (!fmt_)\r
 131                         BOOST_THROW_EXCEPTION(caspar_exception() << msg_info("Could not find suitable output format"));\r
 132                 \r
 133                 oc_.reset(avformat_alloc_context(), av_free);\r
 134                 if (!oc_)\r
 135                         BOOST_THROW_EXCEPTION(caspar_exception() << msg_info("Memory error"));\r
 136                 std::copy_n(filename_.c_str(), filename_.size(), oc_->filename);\r
 137 \r
 138                 oc_->oformat = fmt_;\r
 139                 // To avoid mpeg buffer underflow (http://www.mail-archive.com/libav-user@mplayerhq.hu/msg00194.html)\r
 140                 oc_->preload = static_cast<int>(0.5*AV_TIME_BASE);\r
 141                 oc_->max_delay = static_cast<int>(0.7*AV_TIME_BASE);\r
 142                         \r
 143                 //  Add the audio and video streams using the default format codecs     and initialize the codecs .\r
 144                 if (fmt_->video_codec != CODEC_ID_NONE)         \r
 145                         video_st_ = add_video_stream(fmt_->video_codec);\r
 146                 \r
 147                 if (fmt_->audio_codec != CODEC_ID_NONE) \r
 148                         audio_st_ = add_audio_stream(fmt_->audio_codec);        \r
 149 \r
 150                 // Set the output parameters (must be done even if no parameters).              \r
 151                 int errn = 0;\r
 152                 if ((errn = -av_set_parameters(oc_.get(), nullptr)) > 0)\r
 153                         BOOST_THROW_EXCEPTION(\r
 154                                 file_read_error() << \r
 155                                 msg_info("Invalid output format parameters") <<\r
 156                                 boost::errinfo_api_function("avcodec_open") <<\r
 157                                 boost::errinfo_errno(errn) <<\r
 158                                 boost::errinfo_file_name(filename_));\r
 159                 \r
 160                 dump_format(oc_.get(), 0, filename_.c_str(), 1);\r
 161 \r
 162                 // Now that all the parameters are set, we can open the audio and\r
 163                 // video codecs and allocate the necessary encode buffers.\r
 164                 if (video_st_)\r
 165                         open_video(video_st_);\r
 166                 \r
 167                 try\r
 168                 {\r
 169                         if (audio_st_)\r
 170                                 open_audio(audio_st_);\r
 171                 }\r
 172                 catch(...)\r
 173                 {\r
 174                         CASPAR_LOG_CURRENT_EXCEPTION();\r
 175                         audio_st_ = nullptr;\r
 176                 }\r
 177  \r
 178                 // Open the output ffmpeg, if needed.\r
 179                 if (!(fmt_->flags & AVFMT_NOFILE)) \r
 180                 {\r
 181                         int errn = 0;\r
 182                         if ((errn = -url_fopen(&oc_->pb, filename_.c_str(), URL_WRONLY)) > 0) \r
 183                                 BOOST_THROW_EXCEPTION(\r
 184                                         file_not_found() << \r
 185                                         msg_info("Could not open file") <<\r
 186                                         boost::errinfo_api_function("url_fopen") <<\r
 187                                         boost::errinfo_errno(errn) <<\r
 188                                         boost::errinfo_file_name(filename_));\r
 189                 }\r
 190                 \r
 191                 av_write_header(oc_.get()); // write the stream header, if any \r
 192 \r
 193                 CASPAR_LOG(info) << print() << L" Successfully initialized.";\r
 194         }\r
 195         \r
 196         std::wstring print() const\r
 197         {\r
 198                 return (parent_printer_ ? parent_printer_() + L"/" : L"") + L"ffmpeg[" + widen(filename_) + L"]";\r
 199         }\r
 200 \r
 201         AVStream* add_video_stream(enum CodecID codec_id)\r
 202         { \r
 203                 auto st = av_new_stream(oc_.get(), 0);\r
 204                 if (!st) \r
 205                         BOOST_THROW_EXCEPTION(caspar_exception() << msg_info("Could not alloc stream"));\r
 206  \r
 207                 auto c = st->codec;\r
 208                 c->codec_id = codec_id;\r
 209                 c->codec_type = AVMEDIA_TYPE_VIDEO;\r
 210  \r
 211                 // Put sample parameters.\r
 212                 c->bit_rate = static_cast<int>(static_cast<double>(format_desc_.size)*format_desc_.fps*0.1326);\r
 213                 c->width = format_desc_.width;\r
 214                 c->height = format_desc_.height;\r
 215                 c->time_base.den = static_cast<int>(format_desc_.fps);\r
 216                 c->time_base.num = 1;\r
 217                 c->pix_fmt = c->pix_fmt == -1 ? PIX_FMT_YUV420P : c->pix_fmt;\r
 218 \r
 219                 // Some formats want stream headers to be separate.\r
 220                 if(oc_->oformat->flags & AVFMT_GLOBALHEADER)\r
 221                         c->flags |= CODEC_FLAG_GLOBAL_HEADER;\r
 222  \r
 223                 return st;\r
 224         }\r
 225          \r
 226         void open_video(AVStream* st)\r
 227         { \r
 228                 auto c = st->codec;\r
 229  \r
 230                 auto codec = avcodec_find_encoder(c->codec_id);\r
 231                 if (!codec)\r
 232                         BOOST_THROW_EXCEPTION(caspar_exception() << msg_info("codec not found"));\r
 233                 \r
 234                 int errn = 0;\r
 235                 if ((errn = -avcodec_open(c, codec)) > 0)\r
 236                         BOOST_THROW_EXCEPTION(\r
 237                                 file_read_error() << \r
 238                                 msg_info("Could not open video codec.") <<\r
 239                                 boost::errinfo_api_function("avcodec_open") <<\r
 240                                 boost::errinfo_errno(errn) <<\r
 241                                 boost::errinfo_file_name(filename_));            \r
 242         }\r
 243   \r
 244         void encode_video_frame(const safe_ptr<const core::read_frame>& frame)\r
 245         { \r
 246                 AVCodecContext* c = video_st_->codec;\r
 247  \r
 248                 if (img_convert_ctx_ == nullptr) \r
 249                 {\r
 250                         img_convert_ctx_ = sws_getContext(format_desc_.width, format_desc_.height, PIX_FMT_BGRA, c->width, c->height, c->pix_fmt, SWS_BICUBIC, nullptr, nullptr, nullptr);\r
 251                         if (img_convert_ctx_ == nullptr) \r
 252                                 BOOST_THROW_EXCEPTION(caspar_exception() << msg_info("Cannot initialize the conversion context"));\r
 253                 }\r
 254 \r
 255                 std::shared_ptr<AVFrame> av_frame(avcodec_alloc_frame(), av_free);\r
 256                 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
 257                                 \r
 258                 std::shared_ptr<AVFrame> local_av_frame(avcodec_alloc_frame(), av_free);\r
 259                 picture_buf_.resize(avpicture_get_size(c->pix_fmt, format_desc_.width, format_desc_.height));\r
 260                 avpicture_fill(reinterpret_cast<AVPicture*>(local_av_frame.get()), picture_buf_.data(), c->pix_fmt, format_desc_.width, format_desc_.height);\r
 261 \r
 262                 sws_scale(img_convert_ctx_, av_frame->data, av_frame->linesize, 0, c->height, local_av_frame->data, local_av_frame->linesize);\r
 263                                 \r
 264                 int ret = avcodec_encode_video(c, video_outbuf_.data(), video_outbuf_.size(), local_av_frame.get());\r
 265                                 \r
 266                 int errn = -ret;\r
 267                 if (errn > 0) \r
 268                         BOOST_THROW_EXCEPTION(\r
 269                                 invalid_operation() << \r
 270                                 msg_info("Could not encode video frame.") <<\r
 271                                 boost::errinfo_api_function("avcodec_encode_video") <<\r
 272                                 boost::errinfo_errno(errn) <<\r
 273                                 boost::errinfo_file_name(filename_));\r
 274 \r
 275                 auto out_size = ret;\r
 276                 AVPacket pkt;\r
 277                 av_init_packet(&pkt);\r
 278                 pkt.size = out_size;\r
 279 \r
 280                 // If zero size, it means the image was buffered.\r
 281                 if (out_size > 0) \r
 282                 { \r
 283                         if (c->coded_frame->pts != AV_NOPTS_VALUE)\r
 284                                 pkt.pts = av_rescale_q(c->coded_frame->pts, c->time_base, video_st_->time_base);\r
 285                         if(c->coded_frame->key_frame)\r
 286                                 pkt.flags |= AV_PKT_FLAG_KEY;\r
 287 \r
 288                         pkt.stream_index = video_st_->index;\r
 289                         pkt.data = video_outbuf_.data();\r
 290 \r
 291                         if (av_interleaved_write_frame(oc_.get(), &pkt) != 0)\r
 292                                 BOOST_THROW_EXCEPTION(caspar_exception() << msg_info("Error while writing video frame"));\r
 293                 }               \r
 294         }\r
 295 \r
 296         AVStream* add_audio_stream(enum CodecID codec_id)\r
 297         {\r
 298                 audio_st_ = av_new_stream(oc_.get(), 1);\r
 299                 if (!audio_st_)\r
 300                         BOOST_THROW_EXCEPTION(caspar_exception() << msg_info("Could not alloc stream"));\r
 301 \r
 302                 auto c = audio_st_->codec;\r
 303                 c->codec_id = codec_id;\r
 304                 c->codec_type = AVMEDIA_TYPE_AUDIO;\r
 305 \r
 306                 // Put sample parameters.\r
 307                 c->bit_rate = 192000;\r
 308                 c->sample_rate = 48000;\r
 309                 c->channels = 2;\r
 310 \r
 311                 // Some formats want stream headers to be separate.\r
 312                 if(oc_->oformat->flags & AVFMT_GLOBALHEADER)\r
 313                         c->flags |= CODEC_FLAG_GLOBAL_HEADER;\r
 314 \r
 315                 return audio_st_;\r
 316         }\r
 317 \r
 318         void open_audio(AVStream* st)\r
 319         {\r
 320                 auto c = st->codec;\r
 321 \r
 322                 // Find the audio encoder.\r
 323                 auto codec = avcodec_find_encoder(c->codec_id);\r
 324                 if (!codec) \r
 325                         BOOST_THROW_EXCEPTION(caspar_exception() << msg_info("codec not found"));\r
 326                 \r
 327                 // Open it.\r
 328                 int errn = 0;\r
 329                 if ((errn = -avcodec_open(c, codec)) > 0)\r
 330                         BOOST_THROW_EXCEPTION(\r
 331                                 file_read_error() << \r
 332                                 msg_info("Could not open audio codec") <<\r
 333                                 boost::errinfo_api_function("avcodec_open") <<\r
 334                                 boost::errinfo_errno(errn) <<\r
 335                                 boost::errinfo_file_name(filename_));\r
 336         }\r
 337         \r
 338         void encode_audio_frame(const safe_ptr<const core::read_frame>& frame)\r
 339         {       \r
 340                 if(!frame->audio_data().empty())\r
 341                         audio_input_buffer_.insert(audio_input_buffer_.end(), frame->audio_data().begin(), frame->audio_data().end());\r
 342                 else\r
 343                         audio_input_buffer_.insert(audio_input_buffer_.end(), 3840, 0);\r
 344 \r
 345                 while(encode_audio_packet()){}\r
 346         }\r
 347 \r
 348         bool encode_audio_packet()\r
 349         {                               \r
 350                 auto c = audio_st_->codec;\r
 351 \r
 352                 auto frame_bytes = c->frame_size * 2 * 2; // samples per frame * 2 channels * 2 bytes per sample\r
 353                 if(static_cast<int>(audio_input_buffer_.size()) < frame_bytes/2)\r
 354                         return false;\r
 355 \r
 356                 AVPacket pkt;\r
 357                 av_init_packet(&pkt);\r
 358                 \r
 359                 int ret = avcodec_encode_audio(c, audio_outbuf_.data(), audio_outbuf_.size(), audio_input_buffer_.data());\r
 360                 \r
 361                 int errn = -ret;\r
 362                 if (errn > 0) \r
 363                         BOOST_THROW_EXCEPTION(\r
 364                                 invalid_operation() << \r
 365                                 msg_info("Could not encode audio samples.") <<\r
 366                                 boost::errinfo_api_function("avcodec_encode_audio") <<\r
 367                                 boost::errinfo_errno(errn) <<\r
 368                                 boost::errinfo_file_name(filename_));\r
 369 \r
 370                 pkt.size = ret;\r
 371                 audio_input_buffer_ = std::vector<short, tbb::cache_aligned_allocator<short>>(audio_input_buffer_.begin() + frame_bytes/2, audio_input_buffer_.end());\r
 372 \r
 373                 if (c->coded_frame && c->coded_frame->pts != AV_NOPTS_VALUE)\r
 374                         pkt.pts = av_rescale_q(c->coded_frame->pts, c->time_base, audio_st_->time_base);\r
 375                 pkt.flags |= AV_PKT_FLAG_KEY;\r
 376                 pkt.stream_index = audio_st_->index;\r
 377                 pkt.data = audio_outbuf_.data();\r
 378                 \r
 379                 if (av_interleaved_write_frame(oc_.get(), &pkt) != 0)\r
 380                         BOOST_THROW_EXCEPTION(caspar_exception() << msg_info("Error while writing audio frame"));\r
 381 \r
 382                 return true;\r
 383         }\r
 384          \r
 385         void send(const safe_ptr<const core::read_frame>& frame)\r
 386         {\r
 387                 active_.get();\r
 388                 active_ = executor_.begin_invoke([=]\r
 389                 {                               \r
 390                         auto my_frame = frame;\r
 391                         encode_video_frame(my_frame);\r
 392                         encode_audio_frame(my_frame);\r
 393                 });\r
 394         }\r
 395 \r
 396         size_t buffer_depth() const { return 1; }\r
 397 };\r
 398 \r
 399 ffmpeg_consumer::ffmpeg_consumer(const std::wstring& filename) : impl_(new implementation(narrow(filename))){}\r
 400 ffmpeg_consumer::ffmpeg_consumer(ffmpeg_consumer&& other) : impl_(std::move(other.impl_)){}\r
 401 void ffmpeg_consumer::send(const safe_ptr<const core::read_frame>& frame){impl_->send(frame);}\r
 402 size_t ffmpeg_consumer::buffer_depth() const{return impl_->buffer_depth();}\r
 403 void ffmpeg_consumer::initialize(const core::video_format_desc& format_desc, const printer& parent_printer) {impl_->initialize(format_desc, parent_printer);}\r
 404 std::wstring ffmpeg_consumer::print() const {return impl_->print();}\r
 405 \r
 406 safe_ptr<core::frame_consumer> create_ffmpeg_consumer(const std::vector<std::wstring>& params)\r
 407 {\r
 408         if(params.size() < 2 || params[0] != L"FILE")\r
 409                 return core::frame_consumer::empty();\r
 410         \r
 411         // TODO: Ask stakeholders about case where file already exists.\r
 412         boost::filesystem::remove(boost::filesystem::wpath(env::media_folder() + params[1])); // Delete the file if it exists\r
 413         return make_safe<ffmpeg_consumer>(env::media_folder() + params[1]);\r
 414 }\r
 415 \r
 416 }\r