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 <core/consumer/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         std::string filename_;\r
  58 \r
  59         // Audio\r
  60         AVStream* audio_st_;\r
  61         std::vector<unsigned char, tbb::cache_aligned_allocator<unsigned char>> audio_outbuf_;\r
  62 \r
  63         // Video\r
  64         AVStream* video_st_;\r
  65         std::vector<uint8_t, tbb::cache_aligned_allocator<unsigned char>> picture_buf_;\r
  66 \r
  67         std::vector<unsigned char, tbb::cache_aligned_allocator<unsigned char>> video_outbuf_;\r
  68         SwsContext* img_convert_ctx_;\r
  69         \r
  70         AVOutputFormat* fmt_;\r
  71         std::shared_ptr<AVFormatContext> oc_;\r
  72         core::video_format_desc format_desc_;\r
  73 \r
  74         std::vector<short, tbb::cache_aligned_allocator<short>> audio_input_buffer_;\r
  75 \r
  76         boost::unique_future<void> active_;\r
  77 \r
  78         executor executor_;\r
  79 public:\r
  80         implementation(const std::string& filename)\r
  81                 : filename_(filename)\r
  82                 , audio_st_(nullptr)\r
  83                 , video_st_(nullptr)\r
  84                 , fmt_(nullptr)\r
  85                 , img_convert_ctx_(nullptr)\r
  86                 , video_outbuf_(1920*1080*4)\r
  87                 , audio_outbuf_(48000)\r
  88                 , executor_(L"ffmpeg_consumer")\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)\r
 117         {\r
 118                 format_desc_ = format_desc;\r
 119                 active_ = executor_.begin_invoke([]{});\r
 120 \r
 121                 fmt_ = av_guess_format(nullptr, filename_.c_str(), nullptr);\r
 122                 if (!fmt_) \r
 123                 {\r
 124                         CASPAR_LOG(warning) << "Could not deduce output format from ffmpeg extension: using MPEG.";\r
 125                         fmt_ = av_guess_format("mpeg", nullptr, nullptr);\r
 126                         filename_ = filename_ + ".avi"; \r
 127                 }\r
 128                 if (!fmt_)\r
 129                         BOOST_THROW_EXCEPTION(caspar_exception() << msg_info("Could not find suitable output format"));\r
 130                 \r
 131                 oc_.reset(avformat_alloc_context(), av_free);\r
 132                 if (!oc_)\r
 133                         BOOST_THROW_EXCEPTION(caspar_exception() << msg_info("Memory error"));\r
 134                 std::copy_n(filename_.c_str(), filename_.size(), oc_->filename);\r
 135 \r
 136                 oc_->oformat = fmt_;\r
 137                 // To avoid mpeg buffer underflow (http://www.mail-archive.com/libav-user@mplayerhq.hu/msg00194.html)\r
 138                 oc_->preload = static_cast<int>(0.5*AV_TIME_BASE);\r
 139                 oc_->max_delay = static_cast<int>(0.7*AV_TIME_BASE);\r
 140                         \r
 141                 //  Add the audio and video streams using the default format codecs     and initialize the codecs .\r
 142                 if (fmt_->video_codec != CODEC_ID_NONE)         \r
 143                         video_st_ = add_video_stream(fmt_->video_codec);\r
 144                 \r
 145                 if (fmt_->audio_codec != CODEC_ID_NONE) \r
 146                         audio_st_ = add_audio_stream(fmt_->audio_codec);        \r
 147 \r
 148                 // Set the output parameters (must be done even if no parameters).              \r
 149                 int errn = 0;\r
 150                 if ((errn = -av_set_parameters(oc_.get(), nullptr)) > 0)\r
 151                         BOOST_THROW_EXCEPTION(\r
 152                                 file_read_error() << \r
 153                                 msg_info("Invalid output format parameters") <<\r
 154                                 boost::errinfo_api_function("avcodec_open") <<\r
 155                                 boost::errinfo_errno(errn) <<\r
 156                                 boost::errinfo_file_name(filename_));\r
 157                 \r
 158                 dump_format(oc_.get(), 0, filename_.c_str(), 1);\r
 159 \r
 160                 // Now that all the parameters are set, we can open the audio and\r
 161                 // video codecs and allocate the necessary encode buffers.\r
 162                 if (video_st_)\r
 163                         open_video(video_st_);\r
 164                 \r
 165                 try\r
 166                 {\r
 167                         if (audio_st_)\r
 168                                 open_audio(audio_st_);\r
 169                 }\r
 170                 catch(...)\r
 171                 {\r
 172                         CASPAR_LOG_CURRENT_EXCEPTION();\r
 173                         audio_st_ = nullptr;\r
 174                 }\r
 175  \r
 176                 // Open the output ffmpeg, if needed.\r
 177                 if (!(fmt_->flags & AVFMT_NOFILE)) \r
 178                 {\r
 179                         int errn = 0;\r
 180                         if ((errn = -url_fopen(&oc_->pb, filename_.c_str(), URL_WRONLY)) > 0) \r
 181                                 BOOST_THROW_EXCEPTION(\r
 182                                         file_not_found() << \r
 183                                         msg_info("Could not open file") <<\r
 184                                         boost::errinfo_api_function("url_fopen") <<\r
 185                                         boost::errinfo_errno(errn) <<\r
 186                                         boost::errinfo_file_name(filename_));\r
 187                 }\r
 188                 \r
 189                 av_write_header(oc_.get()); // write the stream header, if any \r
 190 \r
 191                 CASPAR_LOG(info) << print() << L" Successfully initialized.";\r
 192         }\r
 193         \r
 194         std::wstring print() const\r
 195         {\r
 196                 return L"ffmpeg[" + widen(filename_) + L"]";\r
 197         }\r
 198 \r
 199         AVStream* add_video_stream(enum CodecID codec_id)\r
 200         { \r
 201                 auto st = av_new_stream(oc_.get(), 0);\r
 202                 if (!st) \r
 203                         BOOST_THROW_EXCEPTION(caspar_exception() << msg_info("Could not alloc stream"));\r
 204  \r
 205                 auto c = st->codec;\r
 206                 c->codec_id = codec_id;\r
 207                 c->codec_type = AVMEDIA_TYPE_VIDEO;\r
 208  \r
 209                 // Put sample parameters.\r
 210                 c->bit_rate = static_cast<int>(static_cast<double>(format_desc_.size)*format_desc_.fps*0.1326);\r
 211                 c->width = format_desc_.width;\r
 212                 c->height = format_desc_.height;\r
 213                 c->time_base.den = static_cast<int>(format_desc_.fps);\r
 214                 c->time_base.num = 1;\r
 215                 c->pix_fmt = c->pix_fmt == -1 ? PIX_FMT_YUV420P : c->pix_fmt;\r
 216 \r
 217                 // Some formats want stream headers to be separate.\r
 218                 if(oc_->oformat->flags & AVFMT_GLOBALHEADER)\r
 219                         c->flags |= CODEC_FLAG_GLOBAL_HEADER;\r
 220  \r
 221                 return st;\r
 222         }\r
 223          \r
 224         void open_video(AVStream* st)\r
 225         { \r
 226                 auto c = st->codec;\r
 227  \r
 228                 auto codec = avcodec_find_encoder(c->codec_id);\r
 229                 if (!codec)\r
 230                         BOOST_THROW_EXCEPTION(caspar_exception() << msg_info("codec not found"));\r
 231                 \r
 232                 int errn = 0;\r
 233                 if ((errn = -avcodec_open(c, codec)) > 0)\r
 234                         BOOST_THROW_EXCEPTION(\r
 235                                 file_read_error() << \r
 236                                 msg_info("Could not open video codec.") <<\r
 237                                 boost::errinfo_api_function("avcodec_open") <<\r
 238                                 boost::errinfo_errno(errn) <<\r
 239                                 boost::errinfo_file_name(filename_));            \r
 240         }\r
 241   \r
 242         void encode_video_frame(const safe_ptr<const core::read_frame>& frame)\r
 243         { \r
 244                 AVCodecContext* c = video_st_->codec;\r
 245  \r
 246                 if (img_convert_ctx_ == nullptr) \r
 247                 {\r
 248                         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
 249                         if (img_convert_ctx_ == nullptr) \r
 250                                 BOOST_THROW_EXCEPTION(caspar_exception() << msg_info("Cannot initialize the conversion context"));\r
 251                 }\r
 252 \r
 253                 std::shared_ptr<AVFrame> av_frame(avcodec_alloc_frame(), av_free);\r
 254                 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
 255                                 \r
 256                 std::shared_ptr<AVFrame> local_av_frame(avcodec_alloc_frame(), av_free);\r
 257                 picture_buf_.resize(avpicture_get_size(c->pix_fmt, format_desc_.width, format_desc_.height));\r
 258                 avpicture_fill(reinterpret_cast<AVPicture*>(local_av_frame.get()), picture_buf_.data(), c->pix_fmt, format_desc_.width, format_desc_.height);\r
 259 \r
 260                 sws_scale(img_convert_ctx_, av_frame->data, av_frame->linesize, 0, c->height, local_av_frame->data, local_av_frame->linesize);\r
 261                                 \r
 262                 int ret = avcodec_encode_video(c, video_outbuf_.data(), video_outbuf_.size(), local_av_frame.get());\r
 263                                 \r
 264                 int errn = -ret;\r
 265                 if (errn > 0) \r
 266                         BOOST_THROW_EXCEPTION(\r
 267                                 invalid_operation() << \r
 268                                 msg_info("Could not encode video frame.") <<\r
 269                                 boost::errinfo_api_function("avcodec_encode_video") <<\r
 270                                 boost::errinfo_errno(errn) <<\r
 271                                 boost::errinfo_file_name(filename_));\r
 272 \r
 273                 auto out_size = ret;\r
 274                 AVPacket pkt;\r
 275                 av_init_packet(&pkt);\r
 276                 pkt.size = out_size;\r
 277 \r
 278                 // If zero size, it means the image was buffered.\r
 279                 if (out_size > 0) \r
 280                 { \r
 281                         if (c->coded_frame->pts != AV_NOPTS_VALUE)\r
 282                                 pkt.pts = av_rescale_q(c->coded_frame->pts, c->time_base, video_st_->time_base);\r
 283                         if(c->coded_frame->key_frame)\r
 284                                 pkt.flags |= AV_PKT_FLAG_KEY;\r
 285 \r
 286                         pkt.stream_index = video_st_->index;\r
 287                         pkt.data = video_outbuf_.data();\r
 288 \r
 289                         if (av_interleaved_write_frame(oc_.get(), &pkt) != 0)\r
 290                                 BOOST_THROW_EXCEPTION(caspar_exception() << msg_info("Error while writing video frame"));\r
 291                 }               \r
 292         }\r
 293 \r
 294         AVStream* add_audio_stream(enum CodecID codec_id)\r
 295         {\r
 296                 audio_st_ = av_new_stream(oc_.get(), 1);\r
 297                 if (!audio_st_)\r
 298                         BOOST_THROW_EXCEPTION(caspar_exception() << msg_info("Could not alloc stream"));\r
 299 \r
 300                 auto c = audio_st_->codec;\r
 301                 c->codec_id = codec_id;\r
 302                 c->codec_type = AVMEDIA_TYPE_AUDIO;\r
 303 \r
 304                 // Put sample parameters.\r
 305                 c->bit_rate = 192000;\r
 306                 c->sample_rate = 48000;\r
 307                 c->channels = 2;\r
 308 \r
 309                 // Some formats want stream headers to be separate.\r
 310                 if(oc_->oformat->flags & AVFMT_GLOBALHEADER)\r
 311                         c->flags |= CODEC_FLAG_GLOBAL_HEADER;\r
 312 \r
 313                 return audio_st_;\r
 314         }\r
 315 \r
 316         void open_audio(AVStream* st)\r
 317         {\r
 318                 auto c = st->codec;\r
 319 \r
 320                 // Find the audio encoder.\r
 321                 auto codec = avcodec_find_encoder(c->codec_id);\r
 322                 if (!codec) \r
 323                         BOOST_THROW_EXCEPTION(caspar_exception() << msg_info("codec not found"));\r
 324                 \r
 325                 // Open it.\r
 326                 int errn = 0;\r
 327                 if ((errn = -avcodec_open(c, codec)) > 0)\r
 328                         BOOST_THROW_EXCEPTION(\r
 329                                 file_read_error() << \r
 330                                 msg_info("Could not open audio codec") <<\r
 331                                 boost::errinfo_api_function("avcodec_open") <<\r
 332                                 boost::errinfo_errno(errn) <<\r
 333                                 boost::errinfo_file_name(filename_));\r
 334         }\r
 335         \r
 336         void encode_audio_frame(const safe_ptr<const core::read_frame>& frame)\r
 337         {       \r
 338                 if(!frame->audio_data().empty())\r
 339                         audio_input_buffer_.insert(audio_input_buffer_.end(), frame->audio_data().begin(), frame->audio_data().end());\r
 340                 else\r
 341                         audio_input_buffer_.insert(audio_input_buffer_.end(), 3840, 0);\r
 342 \r
 343                 while(encode_audio_packet()){}\r
 344         }\r
 345 \r
 346         bool encode_audio_packet()\r
 347         {                               \r
 348                 auto c = audio_st_->codec;\r
 349 \r
 350                 auto frame_bytes = c->frame_size * 2 * 2; // samples per frame * 2 channels * 2 bytes per sample\r
 351                 if(static_cast<int>(audio_input_buffer_.size()) < frame_bytes/2)\r
 352                         return false;\r
 353 \r
 354                 AVPacket pkt;\r
 355                 av_init_packet(&pkt);\r
 356                 \r
 357                 int ret = avcodec_encode_audio(c, audio_outbuf_.data(), audio_outbuf_.size(), audio_input_buffer_.data());\r
 358                 \r
 359                 int errn = -ret;\r
 360                 if (errn > 0) \r
 361                         BOOST_THROW_EXCEPTION(\r
 362                                 invalid_operation() << \r
 363                                 msg_info("Could not encode audio samples.") <<\r
 364                                 boost::errinfo_api_function("avcodec_encode_audio") <<\r
 365                                 boost::errinfo_errno(errn) <<\r
 366                                 boost::errinfo_file_name(filename_));\r
 367 \r
 368                 pkt.size = ret;\r
 369                 audio_input_buffer_ = std::vector<short, tbb::cache_aligned_allocator<short>>(audio_input_buffer_.begin() + frame_bytes/2, audio_input_buffer_.end());\r
 370 \r
 371                 if (c->coded_frame && c->coded_frame->pts != AV_NOPTS_VALUE)\r
 372                         pkt.pts = av_rescale_q(c->coded_frame->pts, c->time_base, audio_st_->time_base);\r
 373                 pkt.flags |= AV_PKT_FLAG_KEY;\r
 374                 pkt.stream_index = audio_st_->index;\r
 375                 pkt.data = audio_outbuf_.data();\r
 376                 \r
 377                 if (av_interleaved_write_frame(oc_.get(), &pkt) != 0)\r
 378                         BOOST_THROW_EXCEPTION(caspar_exception() << msg_info("Error while writing audio frame"));\r
 379 \r
 380                 return true;\r
 381         }\r
 382          \r
 383         void send(const safe_ptr<const core::read_frame>& frame)\r
 384         {\r
 385                 active_.get();\r
 386                 active_ = executor_.begin_invoke([=]\r
 387                 {                               \r
 388                         auto my_frame = frame;\r
 389                         encode_video_frame(my_frame);\r
 390                         encode_audio_frame(my_frame);\r
 391                 });\r
 392         }\r
 393 \r
 394         size_t buffer_depth() const { return 1; }\r
 395 };\r
 396 \r
 397 ffmpeg_consumer::ffmpeg_consumer(const std::wstring& filename) : impl_(new implementation(narrow(filename))){}\r
 398 ffmpeg_consumer::ffmpeg_consumer(ffmpeg_consumer&& other) : impl_(std::move(other.impl_)){}\r
 399 void ffmpeg_consumer::send(const safe_ptr<const core::read_frame>& frame){impl_->send(frame);}\r
 400 size_t ffmpeg_consumer::buffer_depth() const{return impl_->buffer_depth();}\r
 401 void ffmpeg_consumer::initialize(const core::video_format_desc& format_desc)\r
 402 {\r
 403         // TODO: Ugly\r
 404         impl_.reset(new implementation(impl_->filename_));\r
 405         impl_->initialize(format_desc);\r
 406 }\r
 407 std::wstring ffmpeg_consumer::print() const {return impl_->print();}\r
 408 \r
 409 safe_ptr<core::frame_consumer> create_ffmpeg_consumer(const std::vector<std::wstring>& params)\r
 410 {\r
 411         if(params.size() < 2 || params[0] != L"FILE")\r
 412                 return core::frame_consumer::empty();\r
 413         \r
 414         // TODO: Ask stakeholders about case where file already exists.\r
 415         boost::filesystem::remove(boost::filesystem::wpath(env::media_folder() + params[1])); // Delete the file if it exists\r
 416         return make_safe<ffmpeg_consumer>(env::media_folder() + params[1]);\r
 417 }\r
 418 \r
 419 }\r