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