]> git.sesse.net Git - casparcg/blob - modules/bluefish/consumer/bluefish_consumer.cpp
git-svn-id: https://casparcg.svn.sourceforge.net/svnroot/casparcg/server/branches...
[casparcg] / modules / bluefish / consumer / bluefish_consumer.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  \r
21 #include "../StdAfx.h"\r
22 \r
23 #include "bluefish_consumer.h"\r
24 #include "../util/blue_velvet.h"\r
25 #include "../util/memory.h"\r
26 \r
27 #include <core/mixer/read_frame.h>\r
28 \r
29 #include <common/concurrency/executor.h>\r
30 #include <common/diagnostics/graph.h>\r
31 #include <common/memory/memclr.h>\r
32 #include <common/memory/memcpy.h>\r
33 #include <common/memory/memshfl.h>\r
34 #include <common/utility/timer.h>\r
35 \r
36 #include <core/consumer/frame_consumer.h>\r
37 #include <core/mixer/audio/audio_util.h>\r
38 \r
39 #include <tbb/concurrent_queue.h>\r
40 \r
41 #include <boost/timer.hpp>\r
42 \r
43 #include <memory>\r
44 #include <array>\r
45 \r
46 namespace caspar { \r
47                         \r
48 struct bluefish_consumer : boost::noncopyable\r
49 {\r
50         safe_ptr<CBlueVelvet4>                          blue_;\r
51         const unsigned int                                      device_index_;\r
52         const core::video_format_desc           format_desc_;\r
53 \r
54         const std::wstring                                      model_name_;\r
55 \r
56         std::shared_ptr<diagnostics::graph> graph_;\r
57         boost::timer                                            frame_timer_;\r
58         boost::timer                                            tick_timer_;\r
59         boost::timer                                            sync_timer_;    \r
60                         \r
61         unsigned int                                            vid_fmt_;\r
62 \r
63         std::array<blue_dma_buffer_ptr, 4>      reserved_frames_;       \r
64         tbb::concurrent_bounded_queue<std::shared_ptr<core::read_frame>> frame_buffer_;\r
65 \r
66         int                                                                     preroll_count_;\r
67 \r
68         const bool                                                      embedded_audio_;\r
69         const bool                                                      key_only_;\r
70         \r
71         executor                                                        executor_;\r
72 public:\r
73         bluefish_consumer(const core::video_format_desc& format_desc, unsigned int device_index, bool embedded_audio, bool key_only) \r
74                 : blue_(create_blue(device_index))\r
75                 , device_index_(device_index)\r
76                 , format_desc_(format_desc) \r
77                 , model_name_(get_card_desc(*blue_))\r
78                 , vid_fmt_(get_video_mode(*blue_, format_desc))\r
79                 , preroll_count_(0)\r
80                 , embedded_audio_(embedded_audio)\r
81                 , key_only_(key_only)\r
82                 , executor_(print())\r
83         {\r
84                 executor_.set_capacity(core::consumer_buffer_depth());\r
85 \r
86                 graph_ = diagnostics::create_graph(narrow(print()));\r
87                 graph_->add_guide("tick-time", 0.5);\r
88                 graph_->set_color("tick-time", diagnostics::color(0.0f, 0.6f, 0.9f));   \r
89                 graph_->add_guide("frame-time", 0.5f);  \r
90                 graph_->set_color("frame-time", diagnostics::color(1.0f, 0.0f, 0.0f));\r
91                 graph_->set_color("sync-time", diagnostics::color(0.5f, 1.0f, 0.2f));\r
92                 graph_->set_color("input-buffer", diagnostics::color(1.0f, 1.0f, 0.0f));\r
93                         \r
94                 //Setting output Video mode\r
95                 if(BLUE_FAIL(set_card_property(blue_, VIDEO_MODE, vid_fmt_))) \r
96                         BOOST_THROW_EXCEPTION(caspar_exception() << msg_info(narrow(print()) + " Failed to set videomode."));\r
97 \r
98                 //Select Update Mode for output\r
99                 if(BLUE_FAIL(set_card_property(blue_, VIDEO_UPDATE_TYPE, UPD_FMT_FRAME))) \r
100                         BOOST_THROW_EXCEPTION(caspar_exception() << msg_info(narrow(print()) + " Failed to set update type."));\r
101         \r
102                 disable_video_output();\r
103 \r
104                 //Enable dual link output\r
105                 if(BLUE_FAIL(set_card_property(blue_, VIDEO_DUAL_LINK_OUTPUT, 1)))\r
106                         BOOST_THROW_EXCEPTION(caspar_exception() << msg_info(narrow(print()) + " Failed to enable dual link."));\r
107 \r
108                 if(BLUE_FAIL(set_card_property(blue_, VIDEO_DUAL_LINK_OUTPUT_SIGNAL_FORMAT_TYPE, Signal_FormatType_4224)))\r
109                         BOOST_THROW_EXCEPTION(caspar_exception() << msg_info(narrow(print()) + " Failed to set dual link format type to 4:2:2:4."));\r
110                         \r
111                 //Select output memory format\r
112                 if(BLUE_FAIL(set_card_property(blue_, VIDEO_MEMORY_FORMAT, MEM_FMT_ARGB_PC))) \r
113                         BOOST_THROW_EXCEPTION(caspar_exception() << msg_info(narrow(print()) + " Failed to set memory format."));\r
114                 \r
115                 //Select image orientation\r
116                 if(BLUE_FAIL(set_card_property(blue_, VIDEO_IMAGE_ORIENTATION, ImageOrientation_Normal)))\r
117                         CASPAR_LOG(warning) << print() << TEXT(" Failed to set image orientation to normal.");  \r
118 \r
119                 // Select data range\r
120                 if(BLUE_FAIL(set_card_property(blue_, VIDEO_RGB_DATA_RANGE, CGR_RANGE))) \r
121                         CASPAR_LOG(warning) << print() << TEXT(" Failed to set RGB data range to CGR.");        \r
122                 \r
123                 if(BLUE_FAIL(set_card_property(blue_, VIDEO_PREDEFINED_COLOR_MATRIX, vid_fmt_ == VID_FMT_PAL ? MATRIX_601_CGR : MATRIX_709_CGR)))\r
124                         CASPAR_LOG(warning) << print() << TEXT(" Failed to set colormatrix to ") << (vid_fmt_ == VID_FMT_PAL ? TEXT("601 CGR") : TEXT("709 CGR")) << TEXT(".");\r
125 \r
126                 if(!embedded_audio_)\r
127                 {\r
128                         if(BLUE_FAIL(set_card_property(blue_, EMBEDEDDED_AUDIO_OUTPUT, 0))) \r
129                                 CASPAR_LOG(warning) << TEXT("BLUECARD ERROR: Failed to disable embedded audio.");                       \r
130                         CASPAR_LOG(info) << print() << TEXT(" Disabled embedded-audio.");\r
131                 }\r
132                 else\r
133                 {\r
134                         if(BLUE_FAIL(set_card_property(blue_, EMBEDEDDED_AUDIO_OUTPUT, blue_emb_audio_enable | blue_emb_audio_group1_enable))) \r
135                                 CASPAR_LOG(warning) << print() << TEXT(" Failed to enable embedded audio.");                    \r
136                         CASPAR_LOG(info) << print() << TEXT(" Enabled embedded-audio.");\r
137                 }\r
138                 \r
139                 if (blue_->has_output_key()) \r
140                 {\r
141                         int dummy = TRUE; int v4444 = FALSE; int invert = FALSE; int white = FALSE;\r
142                         blue_->set_output_key(dummy, v4444, invert, white);\r
143                 }\r
144 \r
145                 if(blue_->GetHDCardType(device_index_) != CRD_HD_INVALID) \r
146                         blue_->Set_DownConverterSignalType(vid_fmt_ == VID_FMT_PAL ? SD_SDI : HD_SDI);  \r
147         \r
148                 unsigned long engine_mode = VIDEO_ENGINE_FRAMESTORE;\r
149                 if(BLUE_FAIL(blue_->set_video_engine(engine_mode)))\r
150                         BOOST_THROW_EXCEPTION(caspar_exception() << msg_info(narrow(print()) + " Failed to set video engine."));\r
151 \r
152                 enable_video_output();\r
153                                                 \r
154                 int n = 0;\r
155                 std::generate(reserved_frames_.begin(), reserved_frames_.end(), [&]\r
156                 {\r
157                         return std::make_shared<blue_dma_buffer>(format_desc_.size, n++);\r
158                 });\r
159                                                                 \r
160                 CASPAR_LOG(info) << print() << L" Successfully Initialized.";\r
161         }\r
162 \r
163         ~bluefish_consumer()\r
164         {\r
165                 try\r
166                 {\r
167                         executor_.invoke([&]\r
168                         {\r
169                                 disable_video_output();\r
170                                 blue_->device_detach();         \r
171                         });\r
172                 }\r
173                 catch(...)\r
174                 {\r
175                         CASPAR_LOG_CURRENT_EXCEPTION();\r
176                 }\r
177                 \r
178                 CASPAR_LOG(info) << print() << L" Shutting down.";      \r
179         }\r
180         \r
181         const core::video_format_desc& get_video_format_desc() const\r
182         {\r
183                 return format_desc_;\r
184         }\r
185 \r
186         void enable_video_output()\r
187         {\r
188                 if(!BLUE_PASS(set_card_property(blue_, VIDEO_BLACKGENERATOR, 0)))\r
189                         CASPAR_LOG(error) << print() << TEXT(" Failed to disable video output.");       \r
190         }\r
191 \r
192         void disable_video_output()\r
193         {\r
194                 if(!BLUE_PASS(set_card_property(blue_, VIDEO_BLACKGENERATOR, 1)))\r
195                         CASPAR_LOG(error)<< print() << TEXT(" Failed to disable video output.");                \r
196         }\r
197         \r
198         void send(const safe_ptr<core::read_frame>& frame)\r
199         {       \r
200                 if(preroll_count_ < executor_.capacity())\r
201                 {\r
202                         while(preroll_count_++ < executor_.capacity())\r
203                                 schedule_next_video(make_safe<core::read_frame>());\r
204                 }\r
205                 \r
206                 schedule_next_video(frame);                     \r
207         }\r
208         \r
209         void schedule_next_video(const safe_ptr<core::read_frame>& frame)\r
210         {\r
211                 static std::vector<int16_t> silence(MAX_HANC_BUFFER_SIZE, 0);\r
212                 \r
213                 executor_.begin_invoke([=]\r
214                 {\r
215                         try\r
216                         {\r
217                                 const size_t audio_samples       = format_desc_.audio_samples_per_frame;\r
218                                 const size_t audio_nchannels = format_desc_.audio_channels;\r
219 \r
220                                 frame_timer_.restart();\r
221                                 \r
222                                 // Copy to local buffers\r
223 \r
224                                 if(!frame->image_data().empty())\r
225                                 {\r
226                                         if(key_only_)                                           \r
227                                                 fast_memshfl(reserved_frames_.front()->image_data(), frame->image_data().begin(), frame->image_data().size(), 0x0F0F0F0F, 0x0B0B0B0B, 0x07070707, 0x03030303);\r
228                                         else\r
229                                                 fast_memcpy(reserved_frames_.front()->image_data(), frame->image_data().begin(), frame->image_data().size());\r
230                                 }\r
231                                 else\r
232                                         fast_memclr(reserved_frames_.front()->image_data(), reserved_frames_.front()->image_size());\r
233                                                                 \r
234                                 // Sync\r
235 \r
236                                 sync_timer_.restart();\r
237                                 unsigned long n_field = 0;\r
238                                 blue_->wait_output_video_synch(UPD_FMT_FRAME, n_field);\r
239                                 graph_->update_value("sync-time", static_cast<float>(sync_timer_.elapsed()*format_desc_.fps*0.5));\r
240 \r
241                                 // Send and display\r
242 \r
243                                 if(embedded_audio_)\r
244                                 {               \r
245                                         auto frame_audio          = core::audio_32_to_16(frame->audio_data());\r
246                                         auto frame_audio_data = frame_audio.size() != audio_samples ? silence.data() : frame_audio.data();      \r
247 \r
248                                         encode_hanc(reinterpret_cast<BLUE_UINT32*>(reserved_frames_.front()->hanc_data()), frame_audio_data, audio_samples, audio_nchannels);\r
249                                                                 \r
250                                         blue_->system_buffer_write_async(const_cast<uint8_t*>(reserved_frames_.front()->image_data()), \r
251                                                                                                         reserved_frames_.front()->image_size(), \r
252                                                                                                         nullptr, \r
253                                                                                                         BlueImage_HANC_DMABuffer(reserved_frames_.front()->id(), BLUE_DATA_IMAGE));\r
254 \r
255                                         blue_->system_buffer_write_async(reserved_frames_.front()->hanc_data(),\r
256                                                                                                         reserved_frames_.front()->hanc_size(), \r
257                                                                                                         nullptr,                 \r
258                                                                                                         BlueImage_HANC_DMABuffer(reserved_frames_.front()->id(), BLUE_DATA_HANC));\r
259 \r
260                                         if(BLUE_FAIL(blue_->render_buffer_update(BlueBuffer_Image_HANC(reserved_frames_.front()->id()))))\r
261                                                 CASPAR_LOG(warning) << print() << TEXT(" render_buffer_update failed.");\r
262                                 }\r
263                                 else\r
264                                 {\r
265                                         blue_->system_buffer_write_async(const_cast<uint8_t*>(reserved_frames_.front()->image_data()),\r
266                                                                                                         reserved_frames_.front()->image_size(), \r
267                                                                                                         nullptr,                 \r
268                                                                                                         BlueImage_DMABuffer(reserved_frames_.front()->id(), BLUE_DATA_IMAGE));\r
269                         \r
270                                         if(BLUE_FAIL(blue_->render_buffer_update(BlueBuffer_Image(reserved_frames_.front()->id()))))\r
271                                                 CASPAR_LOG(warning) << print() << TEXT(" render_buffer_update failed.");\r
272                                 }\r
273 \r
274                                 std::rotate(reserved_frames_.begin(), reserved_frames_.begin() + 1, reserved_frames_.end());\r
275                                 \r
276                                 graph_->update_value("frame-time", static_cast<float>(frame_timer_.elapsed()*format_desc_.fps*0.5));\r
277 \r
278                                 graph_->update_value("tick-time", static_cast<float>(tick_timer_.elapsed()*format_desc_.fps*0.5));\r
279                                 tick_timer_.restart();\r
280                         }\r
281                         catch(...)\r
282                         {\r
283                                 CASPAR_LOG_CURRENT_EXCEPTION();\r
284                         }\r
285                         graph_->set_value("input-buffer", static_cast<double>(executor_.size())/static_cast<double>(executor_.capacity()));\r
286                 });\r
287                 graph_->set_value("input-buffer", static_cast<double>(executor_.size())/static_cast<double>(executor_.capacity()));\r
288         }\r
289 \r
290         void encode_hanc(BLUE_UINT32* hanc_data, void* audio_data, size_t audio_samples, size_t audio_nchannels)\r
291         {       \r
292                 const auto sample_type = AUDIO_CHANNEL_16BIT | AUDIO_CHANNEL_LITTLEENDIAN;\r
293                 const auto emb_audio_flag = blue_emb_audio_enable | blue_emb_audio_group1_enable;\r
294                 \r
295                 hanc_stream_info_struct hanc_stream_info;\r
296                 memset(&hanc_stream_info, 0, sizeof(hanc_stream_info));\r
297                 \r
298                 hanc_stream_info.AudioDBNArray[0] = -1;\r
299                 hanc_stream_info.AudioDBNArray[1] = -1;\r
300                 hanc_stream_info.AudioDBNArray[2] = -1;\r
301                 hanc_stream_info.AudioDBNArray[3] = -1;\r
302                 hanc_stream_info.hanc_data_ptr    = hanc_data;\r
303                 hanc_stream_info.video_mode               = vid_fmt_;           \r
304                 \r
305                 if (!is_epoch_card(*blue_))\r
306                         encode_hanc_frame(&hanc_stream_info, audio_data, audio_nchannels, audio_samples, sample_type, emb_audio_flag);  \r
307                 else\r
308                         encode_hanc_frame_ex(blue_->has_video_cardtype(), &hanc_stream_info, audio_data, audio_nchannels, audio_samples, sample_type, emb_audio_flag);\r
309         }\r
310         \r
311         std::wstring print() const\r
312         {\r
313                 return model_name_ + L" [" + boost::lexical_cast<std::wstring>(device_index_) + L"|" +  format_desc_.name + L"]";\r
314         }\r
315 };\r
316 \r
317 struct bluefish_consumer_proxy : public core::frame_consumer\r
318 {\r
319         std::unique_ptr<bluefish_consumer>      consumer_;\r
320         const size_t                                            device_index_;\r
321         const bool                                                      embedded_audio_;\r
322         const bool                                                      key_only_;\r
323         core::video_format_desc                         format_desc_;\r
324 public:\r
325 \r
326         bluefish_consumer_proxy(size_t device_index, bool embedded_audio, bool key_only)\r
327                 : device_index_(device_index)\r
328                 , embedded_audio_(embedded_audio)\r
329                 , key_only_(key_only)\r
330         {\r
331         }\r
332         \r
333         virtual void initialize(const core::video_format_desc& format_desc)\r
334         {\r
335                 format_desc_ = format_desc;\r
336                 consumer_.reset(new bluefish_consumer(format_desc, device_index_, embedded_audio_, key_only_));\r
337         }\r
338         \r
339         virtual bool send(const safe_ptr<core::read_frame>& frame)\r
340         {\r
341                 consumer_->send(frame);\r
342                 return true;\r
343         }\r
344 \r
345         virtual const core::video_format_desc& get_video_format_desc() const\r
346         {\r
347                 return consumer_->get_video_format_desc();\r
348         }\r
349         \r
350         virtual std::wstring print() const\r
351         {\r
352                 if(consumer_)\r
353                         consumer_->print();\r
354 \r
355                 return L"bluefish [" + boost::lexical_cast<std::wstring>(device_index_) + L"]";\r
356         }\r
357 };      \r
358 \r
359 safe_ptr<core::frame_consumer> create_bluefish_consumer(const std::vector<std::wstring>& params)\r
360 {\r
361         if(params.size() < 1 || params[0] != L"BLUEFISH")\r
362                 return core::frame_consumer::empty();\r
363                 \r
364         const auto device_index = params.size() > 1 ? lexical_cast_or_default<int>(params[1], 1) : 1;\r
365 \r
366         const auto embedded_audio = std::find(params.begin(), params.end(), L"EMBEDDED_AUDIO") != params.end();\r
367         const auto key_only               = std::find(params.begin(), params.end(), L"KEY_ONLY")           != params.end();\r
368 \r
369         return make_safe<bluefish_consumer_proxy>(device_index, embedded_audio, key_only);\r
370 }\r
371 \r
372 safe_ptr<core::frame_consumer> create_bluefish_consumer(const boost::property_tree::ptree& ptree) \r
373 {       \r
374         const auto device_index         = ptree.get("device",             1);\r
375         const auto embedded_audio       = ptree.get("embedded-audio", false);\r
376         const auto key_only                     = ptree.get("key-only",           false);\r
377 \r
378         return make_safe<bluefish_consumer_proxy>(device_index, embedded_audio, key_only);\r
379 }\r
380 \r
381 }