]> git.sesse.net Git - casparcg/blob - modules/decklink/producer/decklink_producer.cpp
Merged most recent OSC changes
[casparcg] / modules / decklink / producer / decklink_producer.cpp
1 /*
2 * Copyright (c) 2011 Sveriges Television AB <info@casparcg.com>
3 *
4 * This file is part of CasparCG (www.casparcg.com).
5 *
6 * CasparCG is free software: you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License as published by
8 * the Free Software Foundation, either version 3 of the License, or
9 * (at your option) any later version.
10 *
11 * CasparCG is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14 * GNU General Public License for more details.
15 *
16 * You should have received a copy of the GNU General Public License
17 * along with CasparCG. If not, see <http://www.gnu.org/licenses/>.
18 *
19 * Author: Robert Nagy, ronag89@gmail.com
20 */
21
22 #include "../stdafx.h"
23
24 #include "decklink_producer.h"
25
26 #include "../interop/DeckLinkAPI_h.h"
27 #include "../util/util.h"
28
29 #include "../../ffmpeg/producer/filter/filter.h"
30 #include "../../ffmpeg/producer/util/util.h"
31 #include "../../ffmpeg/producer/muxer/frame_muxer.h"
32 #include "../../ffmpeg/producer/muxer/display_mode.h"
33
34 #include <common/executor.h>
35 #include <common/diagnostics/graph.h>
36 #include <common/except.h>
37 #include <common/log.h>
38 #include <common/param.h>
39
40 #include <core/frame/frame.h>
41 #include <core/frame/draw_frame.h>
42 #include <core/frame/frame_transform.h>
43 #include <core/frame/frame_factory.h>
44 #include <core/monitor/monitor.h>
45 #include <core/mixer/audio/audio_mixer.h>
46
47 #include <tbb/concurrent_queue.h>
48
49 #include <boost/algorithm/string.hpp>
50 #include <boost/foreach.hpp>
51 #include <boost/property_tree/ptree.hpp>
52 #include <boost/timer.hpp>
53
54 #if defined(_MSC_VER)
55 #pragma warning (push)
56 #pragma warning (disable : 4244)
57 #endif
58 extern "C" 
59 {
60         #define __STDC_CONSTANT_MACROS
61         #define __STDC_LIMIT_MACROS
62         #include <libavcodec/avcodec.h>
63 }
64 #if defined(_MSC_VER)
65 #pragma warning (pop)
66 #endif
67
68 #pragma warning(push)
69 #pragma warning(disable : 4996)
70
71         #include <atlbase.h>
72
73         #include <atlcom.h>
74         #include <atlhost.h>
75
76 #pragma warning(push)
77
78 #include <functional>
79
80 namespace caspar { namespace decklink {
81                 
82 class decklink_producer : boost::noncopyable, public IDeckLinkInputCallback
83 {       
84         core::monitor::subject                                                  monitor_subject_;
85         spl::shared_ptr<diagnostics::graph>                             graph_;
86         boost::timer                                                                    tick_timer_;
87
88         CComPtr<IDeckLink>                                                              decklink_;
89         CComQIPtr<IDeckLinkInput>                                               input_;
90         CComQIPtr<IDeckLinkAttributes >                                 attributes_;
91         
92         const std::wstring                                                              model_name_;
93         const int                                                                               device_index_;
94         const std::wstring                                                              filter_;
95         
96         std::vector<int>                                                                audio_cadence_;
97         boost::circular_buffer<size_t>                                  sync_buffer_;
98         ffmpeg::frame_muxer                                                             muxer_;
99                         
100         spl::shared_ptr<core::frame_factory>                    frame_factory_;
101         core::video_format_desc                                                 in_format_desc_;
102         core::video_format_desc                                                 out_format_desc_;
103         core::constraints                                                               constraints_;
104
105         tbb::concurrent_bounded_queue<core::draw_frame> frame_buffer_;
106
107         std::exception_ptr                                                              exception_;             
108
109 public:
110         decklink_producer(const core::video_format_desc& in_format_desc, 
111                                           int device_index, 
112                                           const spl::shared_ptr<core::frame_factory>& frame_factory, 
113                                           const core::video_format_desc& out_format_desc, 
114                                           const std::wstring& filter)
115                 : decklink_(get_device(device_index))
116                 , input_(decklink_)
117                 , attributes_(decklink_)
118                 , model_name_(get_model_name(decklink_))
119                 , device_index_(device_index)
120                 , filter_(filter)
121                 , in_format_desc_(in_format_desc)
122                 , out_format_desc_(out_format_desc)
123                 , constraints_(in_format_desc.width, in_format_desc.height)
124                 , muxer_(in_format_desc.fps, frame_factory, out_format_desc, filter)
125                 , audio_cadence_(out_format_desc.audio_cadence)
126                 , sync_buffer_(out_format_desc.audio_cadence.size())
127                 , frame_factory_(frame_factory)
128         {       
129                 frame_buffer_.set_capacity(2);
130                 
131                 graph_->set_color("tick-time", diagnostics::color(0.0f, 0.6f, 0.9f));   
132                 graph_->set_color("late-frame", diagnostics::color(0.6f, 0.3f, 0.3f));
133                 graph_->set_color("frame-time", diagnostics::color(1.0f, 0.0f, 0.0f));
134                 graph_->set_color("dropped-frame", diagnostics::color(0.3f, 0.6f, 0.3f));
135                 graph_->set_color("output-buffer", diagnostics::color(0.0f, 1.0f, 0.0f));
136                 graph_->set_text(print());
137                 diagnostics::register_graph(graph_);
138                 
139                 auto display_mode = get_display_mode(input_, in_format_desc.format, bmdFormat8BitYUV, bmdVideoInputFlagDefault);
140                 
141                 // NOTE: bmdFormat8BitARGB is currently not supported by any decklink card. (2011-05-08)
142                 if(FAILED(input_->EnableVideoInput(display_mode, bmdFormat8BitYUV, 0))) 
143                         CASPAR_THROW_EXCEPTION(caspar_exception() 
144                                                                         << msg_info(print() + L" Could not enable video input.")
145                                                                         << boost::errinfo_api_function("EnableVideoInput"));
146
147                 if(FAILED(input_->EnableAudioInput(bmdAudioSampleRate48kHz, bmdAudioSampleType32bitInteger, static_cast<int>(in_format_desc.audio_channels)))) 
148                         CASPAR_THROW_EXCEPTION(caspar_exception() 
149                                                                         << msg_info(print() + L" Could not enable audio input.")
150                                                                         << boost::errinfo_api_function("EnableAudioInput"));
151                         
152                 if (FAILED(input_->SetCallback(this)) != S_OK)
153                         CASPAR_THROW_EXCEPTION(caspar_exception() 
154                                                                         << msg_info(print() + L" Failed to set input callback.")
155                                                                         << boost::errinfo_api_function("SetCallback"));
156                         
157                 if(FAILED(input_->StartStreams()))
158                         CASPAR_THROW_EXCEPTION(caspar_exception() 
159                                                                         << msg_info(print() + L" Failed to start input stream.")
160                                                                         << boost::errinfo_api_function("StartStreams"));
161
162                 CASPAR_LOG(info) << print() << L" Initialized";
163         }
164
165         ~decklink_producer()
166         {
167                 if(input_ != nullptr) 
168                 {
169                         input_->StopStreams();
170                         input_->DisableVideoInput();
171                 }
172         }
173
174         core::constraints& pixel_constraints()
175         {
176                 return constraints_;
177         }
178
179         virtual HRESULT STDMETHODCALLTYPE       QueryInterface (REFIID, LPVOID*)        {return E_NOINTERFACE;}
180         virtual ULONG STDMETHODCALLTYPE         AddRef ()                                                       {return 1;}
181         virtual ULONG STDMETHODCALLTYPE         Release ()                                                      {return 1;}
182                 
183         virtual HRESULT STDMETHODCALLTYPE VideoInputFormatChanged(BMDVideoInputFormatChangedEvents /*notificationEvents*/, IDeckLinkDisplayMode* newDisplayMode, BMDDetectedVideoInputFormatFlags /*detectedSignalFlags*/)
184         {
185                 return S_OK;
186         }
187
188         virtual HRESULT STDMETHODCALLTYPE VideoInputFrameArrived(IDeckLinkVideoInputFrame* video, IDeckLinkAudioInputPacket* audio)
189         {       
190                 if(!video)
191                         return S_OK;
192
193                 try
194                 {
195                         graph_->set_value("tick-time", tick_timer_.elapsed()*out_format_desc_.fps*0.5);
196                         tick_timer_.restart();
197
198                         boost::timer frame_timer;       
199                         
200                         // Video
201
202                         void* video_bytes = nullptr;
203                         if(FAILED(video->GetBytes(&video_bytes)) || !video_bytes)
204                                 return S_OK;
205                         
206                         auto video_frame = ffmpeg::create_frame();
207                                                 
208                         video_frame->data[0]                    = reinterpret_cast<uint8_t*>(video_bytes);
209                         video_frame->linesize[0]                = video->GetRowBytes();                 
210                         video_frame->format                             = PIX_FMT_UYVY422;
211                         video_frame->width                              = video->GetWidth();
212                         video_frame->height                             = video->GetHeight();
213                         video_frame->interlaced_frame   = in_format_desc_.field_mode != core::field_mode::progressive;
214                         video_frame->top_field_first    = in_format_desc_.field_mode == core::field_mode::upper ? 1 : 0;
215                                 
216                         monitor_subject_
217                                         << core::monitor::message("/file/name")                                 % model_name_
218                                         << core::monitor::message("/file/path")                                 % device_index_
219                                         << core::monitor::message("/file/video/width")                  % video->GetWidth()
220                                         << core::monitor::message("/file/video/height")                 % video->GetHeight()
221                                         << core::monitor::message("/file/video/field")                  % u8(!video_frame->interlaced_frame ? "progressive" : (video_frame->top_field_first ? "upper" : "lower"))
222                                         << core::monitor::message("/file/audio/sample-rate")    % 48000
223                                         << core::monitor::message("/file/audio/channels")               % 2
224                                         << core::monitor::message("/file/audio/format")                 % u8(av_get_sample_fmt_name(AV_SAMPLE_FMT_S32))
225                                         << core::monitor::message("/file/fps")                                  % in_format_desc_.fps;
226
227                         // Audio
228
229                         void* audio_bytes = nullptr;
230                         if(FAILED(audio->GetBytes(&audio_bytes)) || !audio_bytes)
231                                 return S_OK;
232                         
233                         auto audio_frame = ffmpeg::create_frame();
234
235                         audio_frame->data[0]            = reinterpret_cast<uint8_t*>(audio_bytes);
236                         audio_frame->linesize[0]        = audio->GetSampleFrameCount()*out_format_desc_.audio_channels*sizeof(int32_t);
237                         audio_frame->nb_samples         = audio->GetSampleFrameCount();
238                         audio_frame->format                     = AV_SAMPLE_FMT_S32;
239                                                 
240                         // Note: Uses 1 step rotated cadence for 1001 modes (1602, 1602, 1601, 1602, 1601)
241                         // This cadence fills the audio mixer most optimally.
242
243                         sync_buffer_.push_back(audio->GetSampleFrameCount());           
244                         if(!boost::range::equal(sync_buffer_, audio_cadence_))
245                         {
246                                 CASPAR_LOG(trace) << print() << L" Syncing audio.";
247                                 return S_OK;
248                         }
249                         boost::range::rotate(audio_cadence_, std::begin(audio_cadence_)+1);
250                         
251                         // PUSH
252
253                         muxer_.push_video(video_frame); 
254                         muxer_.push_audio(audio_frame);                                                                                 
255                         
256                         // POLL
257
258                         auto frame = core::draw_frame::late();
259                         if(!muxer_.empty())
260                         {
261                                 frame = std::move(muxer_.front());
262                                 muxer_.pop();
263
264                                 if(!frame_buffer_.try_push(frame))
265                                 {
266                                         auto dummy = core::draw_frame::empty();
267                                         frame_buffer_.try_pop(dummy);
268                                         frame_buffer_.try_push(frame);
269                                                 
270                                         graph_->set_tag("dropped-frame");
271                                 }
272                         }
273                         
274                         graph_->set_value("frame-time", frame_timer.elapsed()*out_format_desc_.fps*0.5);        
275                         monitor_subject_ << core::monitor::message("/profiler/time") % frame_timer.elapsed() % out_format_desc_.fps;
276
277                         graph_->set_value("output-buffer", static_cast<float>(frame_buffer_.size())/static_cast<float>(frame_buffer_.capacity()));      
278                         monitor_subject_ << core::monitor::message("/buffer") % frame_buffer_.size() % frame_buffer_.capacity();
279                 }
280                 catch(...)
281                 {
282                         exception_ = std::current_exception();
283                         return E_FAIL;
284                 }
285
286                 return S_OK;
287         }
288         
289         core::draw_frame get_frame()
290         {
291                 if(exception_ != nullptr)
292                         std::rethrow_exception(exception_);
293                 
294                 core::draw_frame frame = core::draw_frame::late();
295                 if(!frame_buffer_.try_pop(frame))
296                         graph_->set_tag("late-frame");
297                 graph_->set_value("output-buffer", static_cast<float>(frame_buffer_.size())/static_cast<float>(frame_buffer_.capacity()));      
298                 return frame;
299         }
300         
301         std::wstring print() const
302         {
303                 return model_name_ + L" [" + boost::lexical_cast<std::wstring>(device_index_) + L"|" + in_format_desc_.name + L"]";
304         }
305
306         core::monitor::subject& monitor_output()
307         {
308                 return monitor_subject_;
309         }
310 };
311         
312 class decklink_producer_proxy : public core::frame_producer_base
313 {               
314         std::unique_ptr<decklink_producer>      producer_;
315         const uint32_t                                          length_;
316         executor                                                        executor_;
317 public:
318         explicit decklink_producer_proxy(const core::video_format_desc& in_format_desc,
319                                                                          const spl::shared_ptr<core::frame_factory>& frame_factory, 
320                                                                          const core::video_format_desc& out_format_desc, 
321                                                                          int device_index,
322                                                                          const std::wstring& filter_str, uint32_t length)
323                 : executor_(L"decklink_producer[" + boost::lexical_cast<std::wstring>(device_index) + L"]")
324                 , length_(length)
325         {
326                 executor_.invoke([=]
327                 {
328                         CoInitialize(nullptr);
329                         producer_.reset(new decklink_producer(in_format_desc, device_index, frame_factory, out_format_desc, filter_str));
330                 });
331         }
332
333         ~decklink_producer_proxy()
334         {               
335                 executor_.invoke([=]
336                 {
337                         producer_.reset();
338                         CoUninitialize();
339                 });
340         }
341
342         core::monitor::subject& monitor_output()
343         {
344                 return producer_->monitor_output();
345         }
346         
347         // frame_producer
348                                 
349         core::draw_frame receive_impl() override
350         {               
351                 return producer_->get_frame();
352         }
353
354         core::constraints& pixel_constraints() override
355         {
356                 return producer_->pixel_constraints();
357         }
358                         
359         uint32_t nb_frames() const override
360         {
361                 return length_;
362         }
363         
364         std::wstring print() const override
365         {
366                 return producer_->print();
367         }
368         
369         std::wstring name() const override
370         {
371                 return L"decklink";
372         }
373
374         boost::property_tree::wptree info() const override
375         {
376                 boost::property_tree::wptree info;
377                 info.add(L"type", L"decklink");
378                 return info;
379         }
380 };
381
382 spl::shared_ptr<core::frame_producer> create_producer(const spl::shared_ptr<core::frame_factory>& frame_factory, const core::video_format_desc& out_format_desc, const std::vector<std::wstring>& params)
383 {
384         if(params.empty() || !boost::iequals(params[0], "decklink"))
385                 return core::frame_producer::empty();
386
387         auto device_index       = get_param(L"DEVICE", params, -1);
388         if(device_index == -1)
389                 device_index = boost::lexical_cast<int>(params.at(1));
390         
391         auto filter_str         = get_param(L"FILTER", params);         
392         auto length                     = get_param(L"LENGTH", params, std::numeric_limits<uint32_t>::max());   
393         auto in_format_desc = core::video_format_desc(get_param(L"FORMAT", params, L"INVALID"));
394                 
395         if(in_format_desc.format == core::video_format::invalid)
396                 in_format_desc = out_format_desc;
397                         
398         return create_destroy_proxy(spl::make_shared<decklink_producer_proxy>(in_format_desc, frame_factory, out_format_desc, device_index, filter_str, length));
399 }
400
401 }}