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

   1 /*\r
   2 * copyright (c) 2010 Sveriges Television AB <info@casparcg.com>\r
   3 *\r
   4 *  This file 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 #include "../stdafx.h"\r
  21 \r
  22 #include "ffmpeg_producer.h"\r
  23 \r
  24 #include "input.h"\r
  25 #include "audio/audio_decoder.h"\r
  26 #include "video/video_decoder.h"\r
  27 \r
  28 #include <common/utility/assert.h>\r
  29 #include <common/utility/timer.h>\r
  30 #include <common/diagnostics/graph.h>\r
  31 \r
  32 #include <core/producer/frame/basic_frame.h>\r
  33 #include <core/mixer/write_frame.h>\r
  34 #include <core/producer/frame/audio_transform.h>\r
  35 #include <core/video_format.h>\r
  36 #include <core/producer/color/color_producer.h>\r
  37 \r
  38 #include <common/env.h>\r
  39 \r
  40 #include <boost/timer.hpp>\r
  41 #include <boost/range/algorithm.hpp>\r
  42 #include <boost/range/algorithm_ext.hpp>\r
  43 \r
  44 #include <tbb/task_group.h>\r
  45 \r
  46 #include <deque>\r
  47 #include <vector>\r
  48 \r
  49 namespace caspar {\r
  50 \r
  51 struct display_mode\r
  52 {\r
  53         enum type\r
  54         {\r
  55                 simple,\r
  56                 duplicate,\r
  57                 half,\r
  58                 interlace,\r
  59                 deinterlace,\r
  60                 deinterlace_half,\r
  61                 count,\r
  62                 invalid\r
  63         };\r
  64 \r
  65         static std::wstring print(display_mode::type value)\r
  66         {\r
  67                 switch(value)\r
  68                 {\r
  69                         case simple:\r
  70                                 return L"simple";\r
  71                         case duplicate:\r
  72                                 return L"duplicate";\r
  73                         case half:\r
  74                                 return L"half";\r
  75                         case interlace:\r
  76                                 return L"interlace";\r
  77                         case deinterlace:\r
  78                                 return L"deinterlace";\r
  79                         case deinterlace_half:\r
  80                                 return L"deinterlace_half";\r
  81                         default:\r
  82                                 return L"invalid";\r
  83                 }\r
  84         }\r
  85 };\r
  86 \r
  87 display_mode::type get_display_mode(const core::video_mode::type in_mode, double in_fps, const core::video_mode::type out_mode, double out_fps)\r
  88 {               \r
  89         if(in_mode == core::video_mode::invalid || out_mode == core::video_mode::invalid)\r
  90                 return display_mode::invalid;\r
  91 \r
  92         static const auto epsilon = 2.0;\r
  93 \r
  94         if(std::abs(in_fps - out_fps) < epsilon)\r
  95         {\r
  96                 if(in_mode != core::video_mode::progressive && out_mode == core::video_mode::progressive)\r
  97                         return display_mode::deinterlace_half;\r
  98                 //else if(in_mode == core::video_mode::progressive && out_mode != core::video_mode::progressive)\r
  99                 //      simple(); // interlace_duplicate();\r
 100                 else\r
 101                         return display_mode::simple;\r
 102         }\r
 103         else if(std::abs(in_fps/2.0 - out_fps) < epsilon)\r
 104         {\r
 105                 if(in_mode != core::video_mode::progressive)\r
 106                         return display_mode::invalid;\r
 107 \r
 108                 if(out_mode != core::video_mode::progressive)\r
 109                         return display_mode::interlace;\r
 110                 else\r
 111                         return display_mode::half;\r
 112         }\r
 113         else if(std::abs(in_fps - out_fps/2.0) < epsilon)\r
 114         {\r
 115                 if(out_mode != core::video_mode::progressive)\r
 116                         return display_mode::invalid;\r
 117 \r
 118                 if(in_mode != core::video_mode::progressive)\r
 119                         return display_mode::deinterlace;\r
 120                 else\r
 121                         return display_mode::duplicate;\r
 122         }\r
 123 \r
 124         return display_mode::invalid;\r
 125 }\r
 126                 \r
 127 struct ffmpeg_producer : public core::frame_producer\r
 128 {\r
 129         const std::wstring                                                              filename_;\r
 130         \r
 131         const safe_ptr<diagnostics::graph>                              graph_;\r
 132         boost::timer                                                                    frame_timer_;\r
 133                                         \r
 134         const safe_ptr<core::frame_factory>                             frame_factory_;\r
 135         const core::video_format_desc                                   format_desc_;\r
 136 \r
 137         input                                                                                   input_; \r
 138         video_decoder                                                                   video_decoder_;\r
 139         audio_decoder                                                                   audio_decoder_;\r
 140 \r
 141         std::queue<safe_ptr<core::basic_frame>>                 frame_buffer_;\r
 142         std::queue<safe_ptr<core::basic_frame>>                 output_buffer_;\r
 143 \r
 144         const bool                                                                              auto_convert_;\r
 145         display_mode::type                                                              display_mode_;\r
 146 \r
 147         std::deque<safe_ptr<core::write_frame>>                 video_frames_;\r
 148         std::deque<std::vector<int16_t>>                                audio_chunks_;\r
 149 \r
 150         tbb::task_group                                                                 tasks_;\r
 151 \r
 152 public:\r
 153         explicit ffmpeg_producer(const safe_ptr<core::frame_factory>& frame_factory, const std::wstring& filename, const std::wstring& filter_str, bool loop, int start, int length) \r
 154                 : filename_(filename)\r
 155                 , graph_(diagnostics::create_graph(narrow(print())))\r
 156                 , frame_factory_(frame_factory)         \r
 157                 , format_desc_(frame_factory->get_video_format_desc())\r
 158                 , input_(safe_ptr<diagnostics::graph>(graph_), filename_, loop, start, length)\r
 159                 , video_decoder_(input_.stream(AVMEDIA_TYPE_VIDEO), frame_factory)\r
 160                 , audio_decoder_(input_.stream(AVMEDIA_TYPE_AUDIO), frame_factory->get_video_format_desc())\r
 161                 , auto_convert_(env::properties().get("configuration.ffmpeg.auto-mode", false))\r
 162                 , display_mode_(display_mode::invalid)\r
 163         {\r
 164                 graph_->add_guide("frame-time", 0.5);\r
 165                 graph_->set_color("frame-time", diagnostics::color(1.0f, 0.0f, 0.0f));\r
 166                 graph_->set_color("underflow", diagnostics::color(0.6f, 0.3f, 0.9f));           \r
 167                 \r
 168                 for(int n = 0; n < 128 && frame_buffer_.size() < 4; ++n)\r
 169                         decode_frame();\r
 170         }\r
 171 \r
 172         ~ffmpeg_producer()\r
 173         {\r
 174                 tasks_.cancel();\r
 175                 tasks_.wait();\r
 176         }\r
 177 \r
 178         virtual safe_ptr<core::basic_frame> receive()\r
 179         {\r
 180                 if(output_buffer_.empty())\r
 181                 {       \r
 182                         tasks_.wait();\r
 183 \r
 184                         output_buffer_ = std::move(frame_buffer_);\r
 185 \r
 186                         tasks_.run([=]\r
 187                         {\r
 188                                 frame_timer_.restart();\r
 189 \r
 190                                 for(int n = 0; n < 64 && frame_buffer_.empty(); ++n)\r
 191                                         decode_frame();\r
 192 \r
 193                                 graph_->update_value("frame-time", static_cast<float>(frame_timer_.elapsed()*format_desc_.fps*0.5));\r
 194                         });\r
 195                 }\r
 196                 \r
 197                 auto frame = core::basic_frame::late();\r
 198 \r
 199                 if(output_buffer_.empty())\r
 200                 {\r
 201                         if(input_.eof())\r
 202                                 frame = core::basic_frame::eof();\r
 203                         else\r
 204                                 graph_->add_tag("underflow");                   \r
 205                 }\r
 206                 else\r
 207                 {\r
 208                         frame = output_buffer_.front();\r
 209                         output_buffer_.pop();\r
 210                 }\r
 211                 \r
 212                 return frame;\r
 213         }\r
 214 \r
 215         void decode_frame()\r
 216         {\r
 217                 for(int n = 0; n < 32 && ((video_frames_.size() < 2 && !video_decoder_.ready()) ||      (audio_chunks_.size() < 2 && !audio_decoder_.ready())); ++n) \r
 218                 {\r
 219                         std::shared_ptr<AVPacket> pkt;\r
 220                         if(input_.try_pop(pkt))\r
 221                         {\r
 222                                 video_decoder_.push(pkt);\r
 223                                 audio_decoder_.push(pkt);\r
 224                         }\r
 225                 }\r
 226                 \r
 227                 tbb::parallel_invoke(\r
 228                 [=]\r
 229                 {\r
 230                         if(video_frames_.size() < 2)\r
 231                                 boost::range::push_back(video_frames_, video_decoder_.poll());\r
 232                 },\r
 233                 [=]\r
 234                 {\r
 235                         if(audio_chunks_.size() < 2)\r
 236                                 boost::range::push_back(audio_chunks_, audio_decoder_.poll());\r
 237                 });\r
 238 \r
 239                 if(video_frames_.empty() || audio_chunks_.empty())\r
 240                         return;\r
 241 \r
 242                 if(auto_convert_)\r
 243                         auto_convert();\r
 244                 else\r
 245                         simple();\r
 246         }\r
 247 \r
 248         void auto_convert()\r
 249         {\r
 250                 auto current_display_mode = get_display_mode(video_decoder_.mode(), video_decoder_.fps(),  format_desc_.mode,  format_desc_.fps);               \r
 251                 if(current_display_mode != display_mode_)\r
 252                 {\r
 253                         display_mode_ = current_display_mode;\r
 254                         CASPAR_LOG(info) << print() << " display_mode: " << display_mode::print(display_mode_) << \r
 255                                 L" in: " << core::video_mode::print(video_decoder_.mode()) << L" " << video_decoder_.fps() << " fps" <<\r
 256                                 L" out: " << core::video_mode::print(format_desc_.mode) << L" " << format_desc_.fps << " fps";\r
 257                 }\r
 258 \r
 259                 switch(display_mode_)\r
 260                 {\r
 261                 case display_mode::simple:\r
 262                         return simple();\r
 263                 case display_mode::duplicate:\r
 264                         return duplicate();\r
 265                 case display_mode::half:\r
 266                         return half();\r
 267                 case display_mode::interlace:\r
 268                         return interlace();\r
 269                 case display_mode::deinterlace:\r
 270                         return deinterlace();\r
 271                 case display_mode::deinterlace_half:\r
 272                         return deinterlace_half();\r
 273                 default:\r
 274                         BOOST_THROW_EXCEPTION(invalid_operation());\r
 275                 }\r
 276         }\r
 277 \r
 278         void simple()\r
 279         {\r
 280                 CASPAR_ASSERT(!video_frames_.empty());\r
 281                 CASPAR_ASSERT(!audio_chunks_.empty());\r
 282 \r
 283                 auto frame1 = video_frames_.front();\r
 284                 video_frames_.pop_front();\r
 285 \r
 286                 frame1->audio_data() = audio_chunks_.front();\r
 287                 audio_chunks_.pop_front();\r
 288 \r
 289                 frame_buffer_.push(frame1);\r
 290         }\r
 291 \r
 292         void duplicate()\r
 293         {               \r
 294                 CASPAR_ASSERT(!video_frames_.empty());\r
 295                 CASPAR_ASSERT(!audio_chunks_.empty());\r
 296 \r
 297                 auto frame = video_frames_.front();\r
 298                 video_frames_.pop_front();\r
 299 \r
 300                 auto frame1 = make_safe<core::write_frame>(*frame); // make a copy\r
 301                 frame1->audio_data() = audio_chunks_.front();\r
 302                 audio_chunks_.pop_front();\r
 303 \r
 304                 auto frame2 = frame;\r
 305                 frame2->audio_data() = audio_chunks_.front();\r
 306                 audio_chunks_.pop_front();\r
 307 \r
 308                 frame_buffer_.push(frame1);\r
 309                 frame_buffer_.push(frame2);\r
 310         }\r
 311 \r
 312         void half()\r
 313         {       \r
 314                 CASPAR_ASSERT(!video_frames_.empty());\r
 315                 CASPAR_ASSERT(!audio_chunks_.empty());\r
 316 \r
 317                 if(video_frames_.size() < 2 && !input_.eof())\r
 318                         return;\r
 319                 \r
 320                 if(video_frames_.size() < 2)\r
 321                         video_frames_.push_back(create_color_frame(this, frame_factory_, L"#00000000"));\r
 322 \r
 323                 CASPAR_ASSERT(video_frames_.size() == 2);\r
 324                                 \r
 325                 auto frame1 =video_frames_.front();\r
 326                 video_frames_.pop_front();\r
 327                 frame1->audio_data() = audio_chunks_.front();\r
 328                 audio_chunks_.pop_front();\r
 329                                 \r
 330                 video_frames_.pop_front(); // Throw away\r
 331 \r
 332                 frame_buffer_.push(frame1);\r
 333         }\r
 334         \r
 335         void interlace()\r
 336         {               \r
 337                 CASPAR_ASSERT(!video_frames_.empty());\r
 338                 CASPAR_ASSERT(!audio_chunks_.empty());\r
 339 \r
 340                 if(video_frames_.size() < 2 && !input_.eof())\r
 341                         return;\r
 342 \r
 343                 if(video_frames_.size() < 2)\r
 344                         video_frames_.push_back(create_color_frame(this, frame_factory_, L"#00000000"));\r
 345                 \r
 346                 CASPAR_ASSERT(video_frames_.size() == 2);\r
 347 \r
 348                 auto frame1 = video_frames_.front();\r
 349                 video_frames_.pop_front();\r
 350 \r
 351                 frame1->audio_data() = audio_chunks_.front();\r
 352                 audio_chunks_.pop_front();\r
 353                                 \r
 354                 auto frame2 = video_frames_.front();\r
 355                 video_frames_.pop_front();\r
 356 \r
 357                 frame_buffer_.push(core::basic_frame::interlace(frame1, frame2, format_desc_.mode));            \r
 358         }\r
 359         \r
 360         void deinterlace()\r
 361         {\r
 362                 BOOST_THROW_EXCEPTION(not_implemented() << msg_info("deinterlace"));\r
 363         }\r
 364 \r
 365         void deinterlace_half()\r
 366         {\r
 367                 BOOST_THROW_EXCEPTION(not_implemented() << msg_info("deinterlace_half"));\r
 368         }\r
 369                                 \r
 370         virtual std::wstring print() const\r
 371         {\r
 372                 return L"ffmpeg[" + boost::filesystem::wpath(filename_).filename() + L"]";\r
 373         }\r
 374 };\r
 375 \r
 376 safe_ptr<core::frame_producer> create_ffmpeg_producer(const safe_ptr<core::frame_factory>& frame_factory, const std::vector<std::wstring>& params)\r
 377 {               \r
 378         static const std::vector<std::wstring> extensions = boost::assign::list_of\r
 379                 (L"mpg")(L"mpeg")(L"avi")(L"mov")(L"qt")(L"webm")(L"dv")(L"mp4")(L"f4v")(L"flv")(L"mkv")(L"mka")(L"wmv")(L"wma")(L"ogg")(L"divx")(L"xvid")(L"wav")(L"mp3")(L"m2v");\r
 380         std::wstring filename = env::media_folder() + L"\\" + params[0];\r
 381         \r
 382         auto ext = boost::find_if(extensions, [&](const std::wstring& ex)\r
 383         {                                       \r
 384                 return boost::filesystem::is_regular_file(boost::filesystem::wpath(filename + L"." + ex));\r
 385         });\r
 386 \r
 387         if(ext == extensions.end())\r
 388                 return core::frame_producer::empty();\r
 389 \r
 390         std::wstring path = filename + L"." + *ext;\r
 391         bool loop = boost::find(params, L"LOOP") != params.end();\r
 392 \r
 393         int start = -1;\r
 394         int length = -1;\r
 395         \r
 396         auto seek_it = std::find(params.begin(), params.end(), L"SEEK");\r
 397         if(seek_it != params.end())\r
 398         {\r
 399                 if(++seek_it != params.end())\r
 400                         start = boost::lexical_cast<int>(*seek_it);\r
 401         }\r
 402 \r
 403         return make_safe<ffmpeg_producer>(frame_factory, path, L"", loop, start, length);\r
 404 }\r
 405 \r
 406 }