git.sesse.net Git - casparcg/blob - modules/ffmpeg/producer/muxer/frame_muxer.cpp

   1 /*\r
   2 * Copyright (c) 2011 Sveriges Television AB <info@casparcg.com>\r
   3 *\r
   4 * This file is part of CasparCG (www.casparcg.com).\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 * Author: Robert Nagy, ronag89@gmail.com\r
  20 */\r
  21 \r
  22 #include "../../StdAfx.h"\r
  23 \r
  24 #include "frame_muxer.h"\r
  25 \r
  26 #include "../filter/filter.h"\r
  27 #include "../util/util.h"\r
  28 \r
  29 #include <core/producer/frame_producer.h>\r
  30 #include <core/producer/frame/basic_frame.h>\r
  31 #include <core/producer/frame/frame_transform.h>\r
  32 #include <core/producer/frame/pixel_format.h>\r
  33 #include <core/producer/frame/frame_factory.h>\r
  34 #include <core/mixer/write_frame.h>\r
  35 \r
  36 #include <common/env.h>\r
  37 #include <common/exception/exceptions.h>\r
  38 #include <common/log/log.h>\r
  39 \r
  40 #if defined(_MSC_VER)\r
  41 #pragma warning (push)\r
  42 #pragma warning (disable : 4244)\r
  43 #endif\r
  44 extern "C" \r
  45 {\r
  46         #define __STDC_CONSTANT_MACROS\r
  47         #define __STDC_LIMIT_MACROS\r
  48         #include <libavcodec/avcodec.h>\r
  49         #include <libavformat/avformat.h>\r
  50 }\r
  51 #if defined(_MSC_VER)\r
  52 #pragma warning (pop)\r
  53 #endif\r
  54 \r
  55 #include <boost/foreach.hpp>\r
  56 #include <boost/range/algorithm_ext/push_back.hpp>\r
  57 #include <boost/algorithm/string/predicate.hpp>\r
  58 \r
  59 #include <deque>\r
  60 #include <queue>\r
  61 #include <vector>\r
  62 \r
  63 using namespace caspar::core;\r
  64 \r
  65 namespace caspar { namespace ffmpeg {\r
  66         \r
  67 struct frame_muxer::implementation : boost::noncopyable\r
  68 {       \r
  69         std::queue<std::queue<safe_ptr<write_frame>>>   video_streams_;\r
  70         std::queue<core::audio_buffer>                                  audio_streams_;\r
  71         std::queue<safe_ptr<basic_frame>>                               frame_buffer_;\r
  72         display_mode::type                                                              display_mode_;\r
  73         const double                                                                    in_fps_;\r
  74         const video_format_desc                                                 format_desc_;\r
  75         bool                                                                                    auto_transcode_;\r
  76         bool                                                                                    auto_deinterlace_;\r
  77         \r
  78         std::vector<size_t>                                                             audio_cadence_;\r
  79                         \r
  80         safe_ptr<core::frame_factory>                                   frame_factory_;\r
  81         \r
  82         filter                                                                                  filter_;\r
  83         const std::wstring                                                              filter_str_;\r
  84         bool                                                                                    force_deinterlacing_;\r
  85                 \r
  86         implementation(double in_fps, const safe_ptr<core::frame_factory>& frame_factory, const std::wstring& filter_str)\r
  87                 : display_mode_(display_mode::invalid)\r
  88                 , in_fps_(in_fps)\r
  89                 , format_desc_(frame_factory->get_video_format_desc())\r
  90                 , auto_transcode_(env::properties().get(L"configuration.auto-transcode", true))\r
  91                 , auto_deinterlace_(env::properties().get(L"configuration.auto-deinterlace", true))\r
  92                 , audio_cadence_(format_desc_.audio_cadence)\r
  93                 , frame_factory_(frame_factory)\r
  94                 , filter_str_(filter_str)\r
  95                 , force_deinterlacing_(false)\r
  96         {\r
  97                 video_streams_.push(std::queue<safe_ptr<write_frame>>());\r
  98                 audio_streams_.push(core::audio_buffer());\r
  99                 boost::range::sort(audio_cadence_);\r
 100                 boost::range::reverse(audio_cadence_);\r
 101         }\r
 102 \r
 103         void push(const std::shared_ptr<AVFrame>& video_frame, int hints)\r
 104         {               \r
 105                 if(!video_frame)\r
 106                         return;\r
 107                 \r
 108                 if(video_frame == flush_video())\r
 109                 {       \r
 110                         video_streams_.push(std::queue<safe_ptr<write_frame>>());\r
 111                 }\r
 112                 else if(video_frame == empty_video())\r
 113                 {\r
 114                         video_streams_.back().push(make_safe<core::write_frame>(this));\r
 115                         display_mode_ = display_mode::simple;\r
 116                 }\r
 117                 else\r
 118                 {\r
 119                         bool deinterlace_hint = (hints & core::frame_producer::DEINTERLACE_HINT) != 0;\r
 120                 \r
 121                         if(auto_deinterlace_ && force_deinterlacing_ != deinterlace_hint)\r
 122                         {\r
 123                                 force_deinterlacing_ = deinterlace_hint;\r
 124                                 display_mode_ = display_mode::invalid;\r
 125                         }\r
 126 \r
 127                         if(display_mode_ == display_mode::invalid)\r
 128                                 update_display_mode(video_frame, force_deinterlacing_);\r
 129                                 \r
 130                         if(hints & core::frame_producer::ALPHA_HINT)\r
 131                                 video_frame->format = make_alpha_format(video_frame->format);\r
 132                 \r
 133                         auto format = video_frame->format;\r
 134                         if(video_frame->format == CASPAR_PIX_FMT_LUMA) // CASPAR_PIX_FMT_LUMA is not valid for filter, change it to GRAY8\r
 135                                 video_frame->format = PIX_FMT_GRAY8;\r
 136 \r
 137                         filter_.push(video_frame);\r
 138                         BOOST_FOREACH(auto& av_frame, filter_.poll_all())\r
 139                         {\r
 140                                 if(video_frame->format == PIX_FMT_GRAY8 && format == CASPAR_PIX_FMT_LUMA)\r
 141                                         av_frame->format = format;\r
 142 \r
 143                                 video_streams_.back().push(make_write_frame(this, av_frame, frame_factory_, hints));\r
 144                         }\r
 145                 }\r
 146 \r
 147                 if(video_streams_.back().size() > 32)\r
 148                         BOOST_THROW_EXCEPTION(invalid_operation() << source_info("frame_muxer") << msg_info("video-stream overflow. This can be caused by incorrect frame-rate. Check clip meta-data."));\r
 149         }\r
 150 \r
 151         void push(const std::shared_ptr<core::audio_buffer>& audio)\r
 152         {\r
 153                 if(!audio)      \r
 154                         return;\r
 155 \r
 156                 if(audio == flush_audio())\r
 157                 {\r
 158                         audio_streams_.push(core::audio_buffer());\r
 159                 }\r
 160                 else if(audio == empty_audio())\r
 161                 {\r
 162                         boost::range::push_back(audio_streams_.back(), core::audio_buffer(audio_cadence_.front(), 0));\r
 163                 }\r
 164                 else\r
 165                 {\r
 166                         boost::range::push_back(audio_streams_.back(), *audio);\r
 167                 }\r
 168 \r
 169                 if(audio_streams_.back().size() > 32*audio_cadence_.front())\r
 170                         BOOST_THROW_EXCEPTION(invalid_operation() << source_info("frame_muxer") << msg_info("audio-stream overflow. This can be caused by incorrect frame-rate. Check clip meta-data."));\r
 171         }\r
 172         \r
 173         bool video_ready() const\r
 174         {               \r
 175                 return video_streams_.size() > 1 || (video_streams_.size() >= audio_streams_.size() && video_ready2());\r
 176         }\r
 177         \r
 178         bool audio_ready() const\r
 179         {\r
 180                 return audio_streams_.size() > 1 || (audio_streams_.size() >= video_streams_.size() && audio_ready2());\r
 181         }\r
 182 \r
 183         bool video_ready2() const\r
 184         {               \r
 185                 switch(display_mode_)\r
 186                 {\r
 187                 case display_mode::deinterlace_bob_reinterlace:                                 \r
 188                 case display_mode::interlace:   \r
 189                 case display_mode::half:\r
 190                         return video_streams_.front().size() >= 2;\r
 191                 default:                                                                                \r
 192                         return video_streams_.front().size() >= 1;\r
 193                 }\r
 194         }\r
 195         \r
 196         bool audio_ready2() const\r
 197         {\r
 198                 switch(display_mode_)\r
 199                 {\r
 200                 case display_mode::duplicate:                                   \r
 201                         return audio_streams_.front().size()/2 >= audio_cadence_.front();\r
 202                 default:                                                                                \r
 203                         return audio_streams_.front().size() >= audio_cadence_.front();\r
 204                 }\r
 205         }\r
 206                 \r
 207         std::shared_ptr<basic_frame> poll()\r
 208         {\r
 209                 if(!frame_buffer_.empty())\r
 210                 {\r
 211                         auto frame = frame_buffer_.front();\r
 212                         frame_buffer_.pop();    \r
 213                         return frame;\r
 214                 }\r
 215 \r
 216                 if(video_streams_.size() > 1 && audio_streams_.size() > 1 && (!video_ready2() || !audio_ready2()))\r
 217                 {\r
 218                         if(!video_streams_.front().empty() || !audio_streams_.front().empty())\r
 219                                 CASPAR_LOG(trace) << "Truncating: " << video_streams_.front().size() << L" video-frames, " << audio_streams_.front().size() << L" audio-samples.";\r
 220 \r
 221                         video_streams_.pop();\r
 222                         audio_streams_.pop();\r
 223                 }\r
 224 \r
 225                 if(!video_ready2() || !audio_ready2() || display_mode_ == display_mode::invalid)\r
 226                         return nullptr;\r
 227                                 \r
 228                 auto frame1                             = pop_video();\r
 229                 frame1->audio_data()    = pop_audio();\r
 230 \r
 231                 switch(display_mode_)\r
 232                 {\r
 233                 case display_mode::simple:                                              \r
 234                 case display_mode::deinterlace_bob:                             \r
 235                 case display_mode::deinterlace: \r
 236                         {\r
 237                                 frame_buffer_.push(frame1);\r
 238                                 break;\r
 239                         }\r
 240                 case display_mode::interlace:                                   \r
 241                 case display_mode::deinterlace_bob_reinterlace: \r
 242                         {                               \r
 243                                 auto frame2 = pop_video();\r
 244 \r
 245                                 frame_buffer_.push(core::basic_frame::interlace(frame1, frame2, format_desc_.field_mode));      \r
 246                                 break;\r
 247                         }\r
 248                 case display_mode::duplicate:   \r
 249                         {\r
 250                                 auto frame2                             = make_safe<core::write_frame>(*frame1);\r
 251                                 frame2->audio_data()    = pop_audio();\r
 252 \r
 253                                 frame_buffer_.push(frame1);\r
 254                                 frame_buffer_.push(frame2);\r
 255                                 break;\r
 256                         }\r
 257                 case display_mode::half:        \r
 258                         {                               \r
 259                                 pop_video(); // Throw away\r
 260 \r
 261                                 frame_buffer_.push(frame1);\r
 262                                 break;\r
 263                         }\r
 264                 }\r
 265                 \r
 266                 return frame_buffer_.empty() ? nullptr : poll();\r
 267         }\r
 268         \r
 269         safe_ptr<core::write_frame> pop_video()\r
 270         {\r
 271                 auto frame = video_streams_.front().front();\r
 272                 video_streams_.front().pop();           \r
 273                 return frame;\r
 274         }\r
 275 \r
 276         core::audio_buffer pop_audio()\r
 277         {\r
 278                 CASPAR_VERIFY(audio_streams_.front().size() >= audio_cadence_.front());\r
 279 \r
 280                 auto begin = audio_streams_.front().begin();\r
 281                 auto end   = begin + audio_cadence_.front();\r
 282 \r
 283                 core::audio_buffer samples(begin, end);\r
 284                 audio_streams_.front().erase(begin, end);\r
 285                 \r
 286                 boost::range::rotate(audio_cadence_, std::begin(audio_cadence_)+1);\r
 287 \r
 288                 return samples;\r
 289         }\r
 290                                 \r
 291         void update_display_mode(const std::shared_ptr<AVFrame>& frame, bool force_deinterlace)\r
 292         {\r
 293                 std::wstring filter_str = filter_str_;\r
 294 \r
 295                 display_mode_ = display_mode::simple;\r
 296                 if(auto_transcode_)\r
 297                 {\r
 298                         auto mode = get_mode(*frame);\r
 299                         auto fps  = in_fps_;\r
 300 \r
 301                         if(filter::is_deinterlacing(filter_str_))\r
 302                                 mode = core::field_mode::progressive;\r
 303 \r
 304                         if(filter::is_double_rate(filter_str_))\r
 305                                 fps *= 2;\r
 306                         \r
 307                         display_mode_ = get_display_mode(mode, fps, format_desc_.field_mode, format_desc_.fps);\r
 308                         \r
 309                         if((frame->height != 480 || format_desc_.height != 486) && // don't deinterlace for NTSC DV\r
 310                                         display_mode_ == display_mode::simple && mode != core::field_mode::progressive && format_desc_.field_mode != core::field_mode::progressive && \r
 311                                         frame->height != static_cast<int>(format_desc_.height))\r
 312                         {\r
 313                                 display_mode_ = display_mode::deinterlace_bob_reinterlace; // The frame will most likely be scaled, we need to deinterlace->reinterlace \r
 314                         }\r
 315 \r
 316                         if(force_deinterlace && mode != core::field_mode::progressive && \r
 317                            display_mode_ != display_mode::deinterlace && \r
 318                            display_mode_ != display_mode::deinterlace_bob && \r
 319                            display_mode_ != display_mode::deinterlace_bob_reinterlace)                  \r
 320                         {       \r
 321                                 CASPAR_LOG(info) << L"[frame_muxer] Automatically started non bob-deinterlacing. Consider starting producer with bob-deinterlacing (FILTER DEINTERLACE_BOB) for smoothest playback.";\r
 322                                 display_mode_ = display_mode::deinterlace;\r
 323                         }\r
 324 \r
 325                         if(display_mode_ == display_mode::deinterlace)\r
 326                                 filter_str = append_filter(filter_str, L"YADIF=0:-1");\r
 327                         else if(display_mode_ == display_mode::deinterlace_bob || display_mode_ == display_mode::deinterlace_bob_reinterlace)\r
 328                                 filter_str = append_filter(filter_str, L"YADIF=1:-1");\r
 329                 }\r
 330 \r
 331                 if(display_mode_ == display_mode::invalid)\r
 332                 {\r
 333                         CASPAR_LOG(warning) << L"[frame_muxer] Auto-transcode: Failed to detect display-mode.";\r
 334                         display_mode_ = display_mode::simple;\r
 335                 }\r
 336                         \r
 337                 if(!boost::iequals(filter_.filter_str(), filter_str))\r
 338                 {\r
 339                         for(int n = 0; n < filter_.delay(); ++n)\r
 340                         {\r
 341                                 filter_.push(frame);\r
 342                                 auto av_frame = filter_.poll();\r
 343                                 if(av_frame)                                                    \r
 344                                         video_streams_.back().push(make_write_frame(this, make_safe_ptr(av_frame), frame_factory_, 0));\r
 345                         }\r
 346                         filter_ = filter(filter_str);\r
 347                         CASPAR_LOG(info) << L"[frame_muxer] " << display_mode::print(display_mode_) << L" " << print_mode(frame->width, frame->height, in_fps_, frame->interlaced_frame > 0);\r
 348                 }\r
 349         }\r
 350         \r
 351         uint32_t calc_nb_frames(uint32_t nb_frames) const\r
 352         {\r
 353                 uint64_t nb_frames2 = nb_frames;\r
 354                 \r
 355                 if(filter_.is_double_rate()) // Take into account transformations in filter.\r
 356                         nb_frames2 *= 2;\r
 357 \r
 358                 switch(display_mode_) // Take into account transformation in run.\r
 359                 {\r
 360                 case display_mode::deinterlace_bob_reinterlace:\r
 361                 case display_mode::interlace:   \r
 362                 case display_mode::half:\r
 363                         nb_frames2 /= 2;\r
 364                         break;\r
 365                 case display_mode::duplicate:\r
 366                         nb_frames2 *= 2;\r
 367                         break;\r
 368                 }\r
 369 \r
 370                 return static_cast<uint32_t>(nb_frames2);\r
 371         }\r
 372 };\r
 373 \r
 374 frame_muxer::frame_muxer(double in_fps, const safe_ptr<core::frame_factory>& frame_factory, const std::wstring& filter)\r
 375         : impl_(new implementation(in_fps, frame_factory, filter)){}\r
 376 void frame_muxer::push(const std::shared_ptr<AVFrame>& video_frame, int hints){impl_->push(video_frame, hints);}\r
 377 void frame_muxer::push(const std::shared_ptr<core::audio_buffer>& audio_samples){return impl_->push(audio_samples);}\r
 378 std::shared_ptr<basic_frame> frame_muxer::poll(){return impl_->poll();}\r
 379 uint32_t frame_muxer::calc_nb_frames(uint32_t nb_frames) const {return impl_->calc_nb_frames(nb_frames);}\r
 380 bool frame_muxer::video_ready() const{return impl_->video_ready();}\r
 381 bool frame_muxer::audio_ready() const{return impl_->audio_ready();}\r
 382 \r
 383 }}