]> git.sesse.net Git - casparcg/blob - modules/bluefish/consumer/bluefish_consumer.cpp
7fb98adf0768ac467d58aa745f10cd9d637aee7e
[casparcg] / modules / bluefish / consumer / bluefish_consumer.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 "bluefish_consumer.h"
25 #include "../util/blue_velvet.h"
26 #include "../util/memory.h"
27
28 #include <core/video_format.h>
29 #include <core/frame/frame.h>
30 #include <core/frame/audio_channel_layout.h>
31 #include <core/help/help_repository.h>
32 #include <core/help/help_sink.h>
33
34 #include <common/executor.h>
35 #include <common/diagnostics/graph.h>
36 #include <common/array.h>
37 #include <common/memshfl.h>
38 #include <common/param.h>
39
40 #include <core/consumer/frame_consumer.h>
41 #include <core/mixer/audio/audio_util.h>
42
43 #include <tbb/concurrent_queue.h>
44 #include <tbb/atomic.h>
45
46 #include <common/assert.h>
47 #include <boost/lexical_cast.hpp>
48 #include <boost/timer.hpp>
49 #include <boost/range/algorithm.hpp>
50 #include <boost/property_tree/ptree.hpp>
51 #include <boost/algorithm/string.hpp>
52
53 #include <asmlib.h>
54
55 #include <memory>
56 #include <array>
57
58 namespace caspar { namespace bluefish { 
59
60 #define BLUEFISH_HW_BUFFER_DEPTH 1
61 #define BLUEFISH_SOFTWARE_BUFFERS 4
62                 
63 enum class hardware_downstream_keyer_mode
64 {
65         disable = 0,
66         external = 1,
67         internal = 2,           // Bluefish dedicated HW keyer - only available on some models.
68 };
69
70 enum class hardware_downstream_keyer_audio_source
71 {
72         SDIVideoInput = 1,
73         VideoOutputChannel = 2
74 };
75
76 enum class bluefish_hardware_output_channel
77 {
78         channel_a,
79         channel_b,
80         channel_c,
81         channel_d,
82         default_output_channel = channel_a
83 };
84
85 EBlueVideoChannel get_bluesdk_videochannel_from_streamid(bluefish_hardware_output_channel streamid)
86 {
87         /*This function would return the corresponding EBlueVideoChannel from the device output channel*/
88         switch (streamid)
89         {
90                 case bluefish_hardware_output_channel::channel_a:       return BLUE_VIDEO_OUTPUT_CHANNEL_A;
91                 case bluefish_hardware_output_channel::channel_b:       return BLUE_VIDEO_OUTPUT_CHANNEL_B;
92                 case bluefish_hardware_output_channel::channel_c:       return BLUE_VIDEO_OUTPUT_CHANNEL_C;
93                 case bluefish_hardware_output_channel::channel_d:       return BLUE_VIDEO_OUTPUT_CHANNEL_D;
94                 default: return BLUE_VIDEO_OUTPUT_CHANNEL_A;
95         }
96 }
97
98 bool get_videooutput_channel_routing_info_from_streamid(bluefish_hardware_output_channel streamid,
99         EEpochRoutingElements & channelSrcElement,
100         EEpochRoutingElements & sdioutputDstElement)
101 {
102         switch (streamid)
103         {
104         case bluefish_hardware_output_channel::channel_a:       channelSrcElement = EPOCH_SRC_OUTPUT_MEM_INTERFACE_CHA;
105                 sdioutputDstElement = EPOCH_DEST_SDI_OUTPUT_A;
106                 break;
107         case bluefish_hardware_output_channel::channel_b:       channelSrcElement = EPOCH_SRC_OUTPUT_MEM_INTERFACE_CHB;
108                 sdioutputDstElement = EPOCH_DEST_SDI_OUTPUT_B;
109                 break;
110         case bluefish_hardware_output_channel::channel_c:       channelSrcElement = EPOCH_SRC_OUTPUT_MEM_INTERFACE_CHC;
111                 sdioutputDstElement = EPOCH_DEST_SDI_OUTPUT_C;
112                 break;
113         case bluefish_hardware_output_channel::channel_d:       channelSrcElement = EPOCH_SRC_OUTPUT_MEM_INTERFACE_CHD;
114                 sdioutputDstElement = EPOCH_DEST_SDI_OUTPUT_D;
115                 break;
116         default: return false;
117         }
118         return true;
119 }
120
121 struct bluefish_consumer : boost::noncopyable
122 {
123         spl::shared_ptr<bvc_wrapper>                                                            blue_;
124         const unsigned int                                                                                      device_index_;
125         const core::video_format_desc                                                           format_desc_;
126         const core::audio_channel_layout                                                        channel_layout_;
127         core::audio_channel_remapper                                                            channel_remapper_;
128         const int                                                                                                       channel_index_;
129
130         const std::wstring                                                                                      model_name_;
131
132         spl::shared_ptr<diagnostics::graph>                                                     graph_;
133         boost::timer                                                                                            frame_timer_;
134         boost::timer                                                                                            tick_timer_;
135         boost::timer                                                                                            sync_timer_;    
136                         
137         unsigned int                                                                                            vid_fmt_;
138
139         std::array<blue_dma_buffer_ptr, BLUEFISH_SOFTWARE_BUFFERS>      all_frames_;    
140         tbb::concurrent_bounded_queue<blue_dma_buffer_ptr>                      reserved_frames_;
141         tbb::concurrent_bounded_queue<blue_dma_buffer_ptr>                      live_frames_;
142         std::shared_ptr<std::thread>                                                            dma_present_thread_;
143         tbb::atomic<bool>                                                                                       end_dma_thread_;
144
145         tbb::concurrent_bounded_queue<core::const_frame>                        frame_buffer_;
146         tbb::atomic<int64_t>                                                                            presentation_delay_millis_;
147         core::const_frame                                                                                       previous_frame_                         = core::const_frame::empty();
148
149         const bool                                                                                                      embedded_audio_;
150         const bool                                                                                                      key_only_;
151                 
152         executor                                                                                                        executor_;
153         hardware_downstream_keyer_mode                                                          hardware_keyer_;
154         hardware_downstream_keyer_audio_source                                          keyer_audio_source_;
155         bluefish_hardware_output_channel                                                        device_output_channel_;
156 public:
157         bluefish_consumer(
158                         const core::video_format_desc& format_desc,
159                         const core::audio_channel_layout& in_channel_layout,
160                         const core::audio_channel_layout& out_channel_layout,
161                         int device_index,
162                         bool embedded_audio,
163                         bool key_only,
164                         hardware_downstream_keyer_mode keyer,
165                         hardware_downstream_keyer_audio_source keyer_audio_source,
166                         int channel_index,
167                         bluefish_hardware_output_channel device_output_channel)
168                 : blue_(create_blue(device_index))
169                 , device_index_(device_index)
170                 , format_desc_(format_desc)
171                 , channel_layout_(out_channel_layout)
172                 , channel_remapper_(in_channel_layout, out_channel_layout)
173                 , channel_index_(channel_index)
174                 , model_name_(get_card_desc(*blue_, device_index))
175                 , vid_fmt_(get_video_mode(*blue_, format_desc))
176                 , embedded_audio_(embedded_audio)
177                 , hardware_keyer_(keyer)
178                 , keyer_audio_source_(keyer_audio_source)
179                 , key_only_(key_only)
180                 , executor_(print())
181                 , device_output_channel_(device_output_channel)
182         {
183                 executor_.set_capacity(1);
184                 presentation_delay_millis_ = 0;
185
186                 reserved_frames_.set_capacity(BLUEFISH_SOFTWARE_BUFFERS);
187                 live_frames_.set_capacity(BLUEFISH_SOFTWARE_BUFFERS);
188                 
189                 graph_->set_color("tick-time", diagnostics::color(0.0f, 0.6f, 0.9f));   
190                 graph_->set_color("sync-time", diagnostics::color(1.0f, 0.0f, 0.0f));
191                 graph_->set_color("frame-time", diagnostics::color(0.5f, 1.0f, 0.2f));
192                 graph_->set_text(print());
193                 diagnostics::register_graph(graph_);
194
195                 // Specify the video channel
196                 setup_hardware_output_channel();
197
198                 // Setting output Video mode
199                 if (BLUE_FAIL(blue_->set_card_property32(VIDEO_MODE, vid_fmt_)))
200                         CASPAR_THROW_EXCEPTION(caspar_exception() << msg_info(print() + L" Failed to set videomode."));
201
202                 // Select Update Mode for output
203                 if(BLUE_FAIL(blue_->set_card_property32(VIDEO_UPDATE_TYPE, UPD_FMT_FRAME)))
204                         CASPAR_THROW_EXCEPTION(caspar_exception() << msg_info(print() + L" Failed to set update type."));
205         
206                 disable_video_output();
207                 setup_hardware_output_channel_routing();
208                         
209                 //Select output memory format
210                 if(BLUE_FAIL(blue_->set_card_property32(VIDEO_MEMORY_FORMAT, MEM_FMT_ARGB_PC)))
211                         CASPAR_THROW_EXCEPTION(caspar_exception() << msg_info(print() + L" Failed to set memory format."));
212                 
213                 //Select image orientation
214                 if(BLUE_FAIL(blue_->set_card_property32(VIDEO_IMAGE_ORIENTATION, ImageOrientation_Normal)))
215                         CASPAR_LOG(warning) << print() << L" Failed to set image orientation to normal.";       
216
217                 // Select data range
218                 if(BLUE_FAIL(blue_->set_card_property32(VIDEO_RGB_DATA_RANGE, CGR_RANGE)))
219                         CASPAR_LOG(warning) << print() << L" Failed to set RGB data range to CGR.";     
220                 
221                 if(!embedded_audio_ || (hardware_keyer_ == hardware_downstream_keyer_mode::internal && keyer_audio_source_ == hardware_downstream_keyer_audio_source::SDIVideoInput) )
222                 {
223                         if(BLUE_FAIL(blue_->set_card_property32(EMBEDEDDED_AUDIO_OUTPUT, 0)))
224                                 CASPAR_LOG(warning) << TEXT("BLUECARD ERROR: Failed to disable embedded audio.");                       
225                         CASPAR_LOG(info) << print() << TEXT(" Disabled embedded-audio.");
226                 }
227                 else
228                 {
229                         ULONG audio_value =
230                                 EMBEDDED_AUDIO_OUTPUT | blue_emb_audio_group1_enable;
231
232                         if (channel_layout_.num_channels > 4)
233                                 audio_value |= blue_emb_audio_group2_enable;
234
235                         if (channel_layout_.num_channels > 8)
236                                 audio_value |= blue_emb_audio_group3_enable;
237
238                         if (channel_layout_.num_channels > 12)
239                                 audio_value |= blue_emb_audio_group4_enable;
240
241                         if(BLUE_FAIL(blue_->set_card_property32(EMBEDEDDED_AUDIO_OUTPUT, audio_value)))
242                                 CASPAR_LOG(warning) << print() << TEXT(" Failed to enable embedded audio.");                    
243                         CASPAR_LOG(info) << print() << TEXT(" Enabled embedded-audio.");
244                 }
245
246                 if(BLUE_FAIL(blue_->set_card_property32(VIDEO_OUTPUT_ENGINE, VIDEO_ENGINE_PLAYBACK)))
247                         CASPAR_LOG(warning) << print() << TEXT(" Failed to set video engine.");
248
249                 if (is_epoch_card((*blue_)))
250                         setup_hardware_downstream_keyer(hardware_keyer_, keyer_audio_source_);
251
252                 enable_video_output();
253                                                 
254                 int n = 0;
255                 boost::range::generate(all_frames_, [&]{return std::make_shared<blue_dma_buffer>(static_cast<int>(format_desc_.size), n++);});
256         
257                 for (size_t i = 0; i < all_frames_.size(); i++)
258                         reserved_frames_.push(all_frames_[i]);
259         }
260
261         ~bluefish_consumer()
262         {
263                 try
264                 {
265                         executor_.invoke([&]
266                         {
267                                 end_dma_thread_ = true;
268                                 disable_video_output();
269                                 blue_->detach();        
270
271                                 if (dma_present_thread_)
272                                         dma_present_thread_->join();
273                         });
274                 }
275                 catch(...)
276                 {
277                         CASPAR_LOG_CURRENT_EXCEPTION();
278                 }
279         }
280
281         void setup_hardware_output_channel()
282         {
283                 // This function would be used to setup the logic video channel in the bluefish hardware
284                 EBlueVideoChannel out_vid_channel = get_bluesdk_videochannel_from_streamid(device_output_channel_);
285                 if (is_epoch_card((*blue_)))
286                 {
287                         if (out_vid_channel != BLUE_VIDEOCHANNEL_INVALID)
288                         {
289                                 if (BLUE_FAIL(blue_->set_card_property32(DEFAULT_VIDEO_OUTPUT_CHANNEL, out_vid_channel)))
290                                         CASPAR_THROW_EXCEPTION(caspar_exception() << msg_info(" Failed to set video stream."));
291
292                                 blue_->video_playback_stop(0, 0);
293                         }
294                 }
295         }
296
297         void setup_hardware_output_channel_routing()
298         {
299                 //This function would be used to setup the dual link and any other routing that would be required .
300                 if (is_epoch_card(*blue_))
301                 {
302                         EBlueVideoChannel blueVideoOutputChannel = get_bluesdk_videochannel_from_streamid(device_output_channel_);
303                         EEpochRoutingElements src_element = (EEpochRoutingElements)0;
304                         EEpochRoutingElements dst_element = (EEpochRoutingElements)0;
305                         get_videooutput_channel_routing_info_from_streamid(device_output_channel_, src_element, dst_element);
306                         bool duallink_4224_enabled = false;
307
308                         if ((device_output_channel_ == bluefish_hardware_output_channel::channel_a || device_output_channel_ == bluefish_hardware_output_channel::channel_c) &&
309                                 (hardware_keyer_ == hardware_downstream_keyer_mode::external) || (hardware_keyer_ == hardware_downstream_keyer_mode::internal) )
310                         {
311                                 duallink_4224_enabled = true;
312                         }
313
314                         // Enable/Disable dual link output
315                         if (BLUE_FAIL(blue_->set_card_property32(VIDEO_DUAL_LINK_OUTPUT, duallink_4224_enabled)))
316                                 CASPAR_THROW_EXCEPTION(caspar_exception() << msg_info(print() + L" Failed to enable/disable dual link."));
317
318                         if (!duallink_4224_enabled)
319                         {
320                                 if (BLUE_FAIL(blue_->set_card_property32(VIDEO_DUAL_LINK_OUTPUT_SIGNAL_FORMAT_TYPE, Signal_FormatType_Independent_422)))
321                                         CASPAR_THROW_EXCEPTION(caspar_exception() << msg_info(print() + L" Failed to set dual link format type to 4:2:2."));
322
323                                 ULONG routingValue = EPOCH_SET_ROUTING(src_element, dst_element, BLUE_CONNECTOR_PROP_SINGLE_LINK);
324                                 if (BLUE_FAIL(blue_->set_card_property32(MR2_ROUTING, routingValue)))
325                                         CASPAR_THROW_EXCEPTION(caspar_exception() << msg_info(" Failed to MR 2 routing."));
326
327                                 // If single link 422, but on second channel AND on Neutron we need to set Genlock to Aux.
328                                 if (is_epoch_neutron_1i2o_card((*blue_)))               
329                                 {
330                                         if (blueVideoOutputChannel == BLUE_VIDEO_OUTPUT_CHANNEL_B)
331                                         {
332                                                 ULONG genLockSource = BlueGenlockAux;
333                                                 if (BLUE_FAIL(blue_->set_card_property32(VIDEO_GENLOCK_SIGNAL, genLockSource)))
334                                                         CASPAR_THROW_EXCEPTION(caspar_exception() << msg_info("Failed to set GenLock to Aux Input."));
335                                         }
336                                 }
337                                 if (is_epoch_neutron_3o_card((*blue_)))
338                                 {
339                                         if (blueVideoOutputChannel == BLUE_VIDEO_OUTPUT_CHANNEL_C)
340                                         {
341                                                 ULONG genLockSource = BlueGenlockAux;
342                                                 if (BLUE_FAIL(blue_->set_card_property32(VIDEO_GENLOCK_SIGNAL, genLockSource)))
343                                                         CASPAR_THROW_EXCEPTION(caspar_exception() << msg_info("Failed to set GenLock to Aux Input."));
344                                         }
345                                 }
346                         }
347                         else            // dual Link IS enabled, ie. 4224 Fill and Key
348                         {
349                                 if (BLUE_FAIL(blue_->set_card_property32(VIDEO_DUAL_LINK_OUTPUT_SIGNAL_FORMAT_TYPE, Signal_FormatType_4224)))
350                                         CASPAR_THROW_EXCEPTION(caspar_exception() << msg_info(print() + L" Failed to set dual link format type to 4:2:2:4."));
351
352                                 if (is_epoch_neutron_1i2o_card((*blue_)))               // Neutron cards require setting the Genlock conector to Aux to enable them to do Dual-Link
353                                 {
354                                         ULONG genLockSource = BlueGenlockAux;
355                                         if (BLUE_FAIL(blue_->set_card_property32(VIDEO_GENLOCK_SIGNAL, genLockSource)))
356                                                 CASPAR_THROW_EXCEPTION(caspar_exception() << msg_info("Failed to set GenLock to Aux Input."));
357                                 }
358                                 else if (is_epoch_neutron_3o_card((*blue_)))
359                                 {
360                                         if (blueVideoOutputChannel == BLUE_VIDEO_OUTPUT_CHANNEL_C)
361                                         {
362                                                 ULONG genLockSource = BlueGenlockAux;
363                                                 if (BLUE_FAIL(blue_->set_card_property32(VIDEO_GENLOCK_SIGNAL, genLockSource)))
364                                                         CASPAR_THROW_EXCEPTION(caspar_exception() << msg_info("Failed to set GenLock to Aux Input."));
365                                         }
366                                 }
367                         }
368                 }
369         }
370
371         void setup_hardware_downstream_keyer(hardware_downstream_keyer_mode keyer, hardware_downstream_keyer_audio_source audio_source)
372         {
373                 unsigned int keyer_control_value = 0, card_feature_value = 0;
374                 unsigned int card_connector_value = 0;
375                 unsigned int nOutputStreams = 0;
376                 unsigned int nInputStreams = 0;
377                 unsigned int nInputSDIConnector = 0;
378                 unsigned int nOutputSDIConnector = 0;
379                 if (BLUE_OK(blue_->get_card_property32(CARD_FEATURE_STREAM_INFO, card_feature_value)))
380                 {
381                         nOutputStreams = CARD_FEATURE_GET_SDI_OUTPUT_STREAM_COUNT(card_feature_value);
382                         nInputStreams = CARD_FEATURE_GET_SDI_INPUT_STREAM_COUNT(card_feature_value);
383                 }
384                 if (BLUE_OK(blue_->get_card_property32(CARD_FEATURE_CONNECTOR_INFO, card_connector_value)))
385                 {
386                         nOutputSDIConnector = CARD_FEATURE_GET_SDI_OUTPUT_CONNECTOR_COUNT(card_connector_value);
387                         nInputSDIConnector = CARD_FEATURE_GET_SDI_INPUT_CONNECTOR_COUNT(card_connector_value);
388                 }
389                 if (nInputSDIConnector == 0 || nInputStreams == 0)
390                         return;
391
392                 if (keyer == hardware_downstream_keyer_mode::disable || keyer == hardware_downstream_keyer_mode::external)
393                 {
394                         keyer_control_value = VIDEO_ONBOARD_KEYER_SET_STATUS_DISABLED(keyer_control_value);
395                         keyer_control_value = VIDEO_ONBOARD_KEYER_SET_STATUS_DISABLE_OVER_BLACK(keyer_control_value);
396                 }
397                 else if (keyer == hardware_downstream_keyer_mode::internal)
398                 {
399                         unsigned int invalidVideoModeFlag = 0;
400                         unsigned int inputVideoSignal = 0;
401                         if (BLUE_FAIL(blue_->get_card_property32(INVALID_VIDEO_MODE_FLAG, invalidVideoModeFlag)))
402                                 CASPAR_THROW_EXCEPTION(caspar_exception() << msg_info(" Failed to get invalid video mode flag"));
403
404                         // The bluefish HW keyer is going to pre-multiply the RGB with the A. 
405                         // This setting results in the correct image coming through when using the 1080_test.tga image.
406                         keyer_control_value = VIDEO_ONBOARD_KEYER_SET_STATUS_DATA_IS_NOT_PREMULTIPLIED(keyer_control_value);
407
408                         keyer_control_value = VIDEO_ONBOARD_KEYER_SET_STATUS_ENABLED(keyer_control_value);
409                         if (BLUE_FAIL(blue_->get_card_property32(VIDEO_INPUT_SIGNAL_VIDEO_MODE, inputVideoSignal)))
410                                 CASPAR_THROW_EXCEPTION(caspar_exception() << msg_info(" Failed to get video input signal mode"));
411
412                         if (inputVideoSignal >= invalidVideoModeFlag)
413                                 keyer_control_value = VIDEO_ONBOARD_KEYER_SET_STATUS_ENABLE_OVER_BLACK(keyer_control_value);
414                         else
415                                 keyer_control_value = VIDEO_ONBOARD_KEYER_SET_STATUS_DISABLE_OVER_BLACK(keyer_control_value);
416                 
417                         // lock to input
418                         if (BLUE_FAIL(blue_->set_card_property32(VIDEO_GENLOCK_SIGNAL, BlueSDI_A_BNC)))
419                                 CASPAR_THROW_EXCEPTION(caspar_exception() << msg_info(" Failed to set the genlock to the input for the HW keyer"));
420                 }
421
422                 if (audio_source == hardware_downstream_keyer_audio_source::SDIVideoInput && (keyer == hardware_downstream_keyer_mode::internal))
423                         keyer_control_value = VIDEO_ONBOARD_KEYER_SET_STATUS_USE_INPUT_ANCILLARY(keyer_control_value);
424                 else if (audio_source == hardware_downstream_keyer_audio_source::VideoOutputChannel)
425                         keyer_control_value = VIDEO_ONBOARD_KEYER_SET_STATUS_USE_OUTPUT_ANCILLARY(keyer_control_value);
426
427                 if (BLUE_FAIL(blue_->set_card_property32(VIDEO_ONBOARD_KEYER, keyer_control_value)))
428                         CASPAR_LOG(error) << print() << TEXT(" Failed to set keyer control.");
429         }
430
431         void enable_video_output()
432         {
433                 if(BLUE_FAIL(blue_->set_card_property32(VIDEO_BLACKGENERATOR, 0)))
434                         CASPAR_LOG(error) << print() << TEXT(" Failed to disable video output.");       
435         }
436
437         void disable_video_output()
438         {
439                 blue_->video_playback_stop(0,0);
440                 if(BLUE_FAIL(blue_->set_card_property32(VIDEO_BLACKGENERATOR, 1)))
441                         CASPAR_LOG(error)<< print() << TEXT(" Failed to disable video output.");        
442                 if (BLUE_FAIL(blue_->set_card_property32(EMBEDEDDED_AUDIO_OUTPUT, 0)))
443                         CASPAR_LOG(error) << print() << TEXT(" Failed to disable audio output.");
444
445         }
446         
447         std::future<bool> send(core::const_frame& frame)
448         {                               
449                 return executor_.begin_invoke([=]() -> bool
450                 {
451                         try
452                         {       
453                                 display_frame(frame);                           
454                                 graph_->set_value("tick-time", static_cast<float>(tick_timer_.elapsed()*format_desc_.fps*0.5));
455                                 tick_timer_.restart();
456                         }
457                         catch(...)
458                         {
459                                 CASPAR_LOG_CURRENT_EXCEPTION();
460                         }
461
462                         return true;
463                 });
464         }
465
466         void dma_present_thread_actual()
467         {
468                 bvc_wrapper wait_b;
469                 wait_b.attach(device_index_);
470                 EBlueVideoChannel out_vid_channel = get_bluesdk_videochannel_from_streamid(device_output_channel_);
471                 wait_b.set_card_property32(DEFAULT_VIDEO_OUTPUT_CHANNEL, out_vid_channel);
472                 int frames_to_buffer = BLUEFISH_HW_BUFFER_DEPTH;
473                 unsigned long buffer_id = 0;
474                 unsigned long underrun = 0;
475
476                 while (!end_dma_thread_)
477                 {
478                         blue_dma_buffer_ptr buf = nullptr;
479                         if (live_frames_.try_pop(buf) && BLUE_OK(blue_->video_playback_allocate(buffer_id, underrun)))
480                         {
481                                 // Send and display
482                                 if (embedded_audio_)
483                                 {
484                                         // Do video first, then do hanc DMA...
485                                         blue_->system_buffer_write(const_cast<uint8_t*>(buf->image_data()),
486                                                 static_cast<unsigned long>(buf->image_size()),
487                                                 BlueImage_HANC_DMABuffer(buffer_id, BLUE_DATA_IMAGE),
488                                                 0);
489
490                                         blue_->system_buffer_write(buf->hanc_data(),
491                                                 static_cast<unsigned long>(buf->hanc_size()),
492                                                 BlueImage_HANC_DMABuffer(buffer_id, BLUE_DATA_HANC),
493                                                 0);
494
495                                         if (BLUE_FAIL(blue_->video_playback_present(BlueBuffer_Image_HANC(buffer_id), 1, 0, 0)))
496                                         {
497                                                 CASPAR_LOG(warning) << print() << TEXT(" video_playback_present failed.");
498                                         }
499                                 }
500                                 else
501                                 {
502                                         blue_->system_buffer_write(const_cast<uint8_t*>(buf->image_data()),
503                                                 static_cast<unsigned long>(buf->image_size()),
504                                                 BlueImage_DMABuffer(buffer_id, BLUE_DATA_IMAGE),
505                                                 0);
506
507                                         if (BLUE_FAIL(blue_->video_playback_present(BlueBuffer_Image(buffer_id), 1, 0, 0)))
508                                                 CASPAR_LOG(warning) << print() << TEXT(" video_playback_present failed.");
509                                 }
510
511                                 reserved_frames_.push(buf);
512                         }
513                         else
514                         {
515                                 // do WFS       
516                                 unsigned long n_field = 0;
517                                 wait_b.wait_video_output_sync(UPD_FMT_FRAME, n_field);
518                         }
519
520                         if (frames_to_buffer > 0)
521                         {
522                                 frames_to_buffer--;
523                                 if (frames_to_buffer == 0)
524                                 {
525                                         if (BLUE_FAIL(blue_->video_playback_start(0, 0)))
526                                                 CASPAR_LOG(warning) << print() << TEXT("Error video playback start failed");
527                                 }
528                         }
529                 }
530                 wait_b.detach();
531         }
532
533         void display_frame(core::const_frame frame)
534         {
535                 frame_timer_.restart();         
536
537                 if (previous_frame_ != core::const_frame::empty())
538                         presentation_delay_millis_ = previous_frame_.get_age_millis();
539
540                 previous_frame_ = frame;
541                 blue_dma_buffer_ptr buf = nullptr;
542
543                 // Copy to local buffers
544                 if (reserved_frames_.try_pop(buf))
545                 {
546                         void* dest = buf->image_data();
547                         if (!frame.image_data().empty())
548                         {
549                                 if (key_only_)
550                                         aligned_memshfl(dest, frame.image_data().begin(), frame.image_data().size(), 0x0F0F0F0F, 0x0B0B0B0B, 0x07070707, 0x03030303);
551                                 else
552                                         A_memcpy(dest, frame.image_data().begin(), frame.image_data().size());
553                         }
554                         else
555                                 A_memset(dest, 0, buf->image_size());
556
557                         frame_timer_.restart();
558
559                         // remap, encode and copy hanc data
560                         if (embedded_audio_)
561                         {
562                                 auto remapped_audio = channel_remapper_.mix_and_rearrange(frame.audio_data());
563                                 auto frame_audio = core::audio_32_to_24(remapped_audio);
564                                 encode_hanc(reinterpret_cast<BLUE_UINT32*>(buf->hanc_data()),
565                                         frame_audio.data(),
566                                         static_cast<int>(frame.audio_data().size() / channel_layout_.num_channels),
567                                         static_cast<int>(channel_layout_.num_channels));
568                         }
569                         live_frames_.push(buf);
570
571                         // start the thread if required.
572                         if (dma_present_thread_ == 0)
573                         {
574                                 end_dma_thread_ = false;
575                                 dma_present_thread_ = std::make_shared<std::thread>([this] {dma_present_thread_actual(); });
576 #if defined(_WIN32)
577                                 HANDLE handle = (HANDLE)dma_present_thread_->native_handle();
578                                 SetThreadPriority(handle, THREAD_PRIORITY_HIGHEST);
579 #endif
580                         }
581                 }
582                 graph_->set_value("frame-time", static_cast<float>(frame_timer_.elapsed()*format_desc_.fps*0.5));
583
584                 // Sync
585                 sync_timer_.restart();
586                 unsigned long n_field = 0;
587                 blue_->wait_video_output_sync(UPD_FMT_FRAME, n_field);
588                 graph_->set_value("sync-time", sync_timer_.elapsed()*format_desc_.fps*0.5);
589         }
590
591         void encode_hanc(BLUE_UINT32* hanc_data, void* audio_data, int audio_samples, int audio_nchannels)
592         {       
593                 const auto sample_type = AUDIO_CHANNEL_24BIT | AUDIO_CHANNEL_LITTLEENDIAN;
594                 auto emb_audio_flag = blue_emb_audio_enable | blue_emb_audio_group1_enable;
595
596                 if (audio_nchannels > 4)
597                         emb_audio_flag |= blue_emb_audio_group2_enable;
598
599                 if (audio_nchannels > 8)
600                         emb_audio_flag |= blue_emb_audio_group3_enable;
601
602                 if (audio_nchannels > 12)
603                         emb_audio_flag |= blue_emb_audio_group4_enable;
604                 
605                 hanc_stream_info_struct hanc_stream_info;
606                 memset(&hanc_stream_info, 0, sizeof(hanc_stream_info));
607                 
608                 hanc_stream_info.AudioDBNArray[0] = -1;
609                 hanc_stream_info.AudioDBNArray[1] = -1;
610                 hanc_stream_info.AudioDBNArray[2] = -1;
611                 hanc_stream_info.AudioDBNArray[3] = -1;
612                 hanc_stream_info.hanc_data_ptr    = hanc_data;
613                 hanc_stream_info.video_mode               = vid_fmt_;           
614                 
615                 int cardType = CRD_INVALID;
616                 blue_->query_card_type(cardType, device_index_);
617                 blue_->encode_hanc_frame(cardType, &hanc_stream_info, audio_data, audio_nchannels, audio_samples, sample_type, emb_audio_flag);
618         }
619         
620         std::wstring print() const
621         {
622                 return model_name_ + L" [" + boost::lexical_cast<std::wstring>(channel_index_) + L"-" + 
623                         boost::lexical_cast<std::wstring>(device_index_) + L"|" +  format_desc_.name + L"]";
624         }
625
626         int64_t presentation_delay_millis() const
627         {
628                 return presentation_delay_millis_;
629         }
630 };
631
632 struct bluefish_consumer_proxy : public core::frame_consumer
633 {
634         core::monitor::subject                                  monitor_subject_;
635
636         std::unique_ptr<bluefish_consumer>              consumer_;
637         const int                                                               device_index_;
638         const bool                                                              embedded_audio_;
639         const bool                                                              key_only_;
640
641         std::vector<int>                                                audio_cadence_;
642         core::video_format_desc                                 format_desc_;
643         core::audio_channel_layout                              in_channel_layout_              = core::audio_channel_layout::invalid();
644         core::audio_channel_layout                              out_channel_layout_;
645         hardware_downstream_keyer_mode                  hardware_keyer_;
646         hardware_downstream_keyer_audio_source  hardware_keyer_audio_source_;
647         bluefish_hardware_output_channel                hardware_output_channel_;
648
649 public:
650
651         bluefish_consumer_proxy(int device_index, 
652                                                         bool embedded_audio, 
653                                                         bool key_only, 
654                                                         hardware_downstream_keyer_mode keyer,
655                                                         hardware_downstream_keyer_audio_source keyer_audio_source,
656                                                         const core::audio_channel_layout& out_channel_layout,
657                                                         bluefish_hardware_output_channel hardware_output_channel)
658
659                 : device_index_(device_index)
660                 , embedded_audio_(embedded_audio)
661                 , key_only_(key_only)
662                 , hardware_keyer_(keyer)
663                 , hardware_keyer_audio_source_(keyer_audio_source)
664                 , out_channel_layout_(out_channel_layout)
665                 , hardware_output_channel_(hardware_output_channel)
666         {
667         }
668         
669         // frame_consumer
670         
671         void initialize(const core::video_format_desc& format_desc, const core::audio_channel_layout& channel_layout, int channel_index) override
672         {
673                 format_desc_            = format_desc;
674                 in_channel_layout_      = channel_layout;
675                 audio_cadence_          = format_desc.audio_cadence;
676
677                 if (out_channel_layout_ == core::audio_channel_layout::invalid())
678                         out_channel_layout_ = in_channel_layout_;
679
680                 consumer_.reset();
681                 consumer_.reset(new bluefish_consumer(  format_desc, 
682                                                                                                 in_channel_layout_, 
683                                                                                                 out_channel_layout_, 
684                                                                                                 device_index_, 
685                                                                                                 embedded_audio_, 
686                                                                                                 key_only_, 
687                                                                                                 hardware_keyer_,
688                                                                                                 hardware_keyer_audio_source_, 
689                                                                                                 channel_index,
690                                                                                                 hardware_output_channel_));
691         }
692         
693         std::future<bool> send(core::const_frame frame) override
694         {
695                 CASPAR_VERIFY(audio_cadence_.front() * in_channel_layout_.num_channels == static_cast<size_t>(frame.audio_data().size()));
696                 boost::range::rotate(audio_cadence_, std::begin(audio_cadence_)+1);
697                 return consumer_->send(frame);
698         }
699                 
700         std::wstring print() const override
701         {
702                 return consumer_ ? consumer_->print() : L"[bluefish_consumer]";
703         }
704
705         std::wstring name() const override
706         {
707                 return L"bluefish";
708         }
709
710         boost::property_tree::wptree info() const override
711         {
712                 boost::property_tree::wptree info;
713                 info.add(L"type", L"bluefish");
714                 info.add(L"key-only", key_only_);
715                 info.add(L"device", device_index_);
716                 info.add(L"embedded-audio", embedded_audio_);
717                 info.add(L"presentation-frame-age", presentation_frame_age_millis());
718                 return info;
719         }
720
721         int buffer_depth() const override
722         {
723                 return BLUEFISH_HW_BUFFER_DEPTH;
724         }
725         
726         int index() const override
727         {
728                 return 400 + device_index_;
729         }
730
731         int64_t presentation_frame_age_millis() const override
732         {
733                 return consumer_ ? consumer_->presentation_delay_millis() : 0;
734         }
735
736         core::monitor::subject& monitor_output()
737         {
738                 return monitor_subject_;
739         }
740 };      
741
742
743 void describe_consumer(core::help_sink& sink, const core::help_repository& repo)
744 {
745         sink.short_description(L"Sends video on an SDI output using Bluefish video cards.");
746         sink.syntax(L"BLUEFISH {[device_index:int]|1} {[sdi_device:int]|a} {[embedded_audio:EMBEDDED_AUDIO]} {[key_only:KEY_ONLY]} {CHANNEL_LAYOUT [channel_layout:string]} {[keyer:string|disabled]} ");
747         sink.para()
748                 ->text(L"Sends video on an SDI output using Bluefish video cards. Multiple devices can be ")
749                 ->text(L"installed in the same machine and used at the same time, they will be addressed via ")
750                 ->text(L"different ")->code(L"device_index")->text(L" parameters.");
751         sink.para()->text(L"Multiple output channels can be accessed via the ")->code(L"sdi_device")->text(L" parameter.");
752         sink.para()->text(L"Specify ")->code(L"embedded_audio")->text(L" to embed audio into the SDI signal.");
753         sink.para()
754                 ->text(L"Specifying ")->code(L"key_only")->text(L" will extract only the alpha channel from the ")
755                 ->text(L"channel. This is useful when you have two SDI video cards, and neither has native support ")
756                 ->text(L"for separate fill/key output");
757         sink.para()->text(L"Specify ")->code(L"channel_layout")->text(L" to output a different audio channel layout than the channel uses.");
758         sink.para()->text(L"Specify ")->code(L"keyer")->text(L" to control the output channel configuration and hardware keyer")
759                 ->text(L"disabled results in a single SDI stream of 422 output - This is the default")
760                 ->text(L"external results in a 4224 stream across 2 SDI connectors, ")
761                 ->text(L"internal results in a 422 output keyed over the incoming SDI input using the dedicated hardware keyer on the Bleufish hadrware");
762         sink.para()->text(L"Specify ")->code(L"internal-keyer-audio-source")->text(L" to control the source of the audio and ANC data when using the internal/hardware keyer");
763
764         sink.para()->text(L"Examples:");
765         sink.example(L">> ADD 1 BLUEFISH", L"uses the default device_index of 1.");
766         sink.example(L">> ADD 1 BLUEFISH 2", L"for device_index 2.");
767         sink.example(
768                 L">> ADD 1 BLUEFISH 1 EMBEDDED_AUDIO\n"
769
770                 L">> ADD 1 BLUEFISH 2 KEY_ONLY", L"uses device with index 1 as fill output with audio and device with index 2 as key output.");
771
772 }
773
774
775 spl::shared_ptr<core::frame_consumer> create_consumer(  const std::vector<std::wstring>& params,
776                                                                                                                 core::interaction_sink*,
777                                                                                                                 std::vector<spl::shared_ptr<core::video_channel>> channels)
778 {
779         if(params.size() < 1 || !boost::iequals(params.at(0), L"BLUEFISH"))
780                 return core::frame_consumer::empty();
781
782         const auto device_index                 = params.size() > 1 ? boost::lexical_cast<int>(params.at(1)) : 1;
783         const auto device_stream                = contains_param(       L"SDI-STREAM", params);
784         const auto embedded_audio               = contains_param(       L"EMBEDDED_AUDIO",      params);
785         const auto key_only                             = contains_param(       L"KEY_ONLY",            params);
786         const auto channel_layout               = get_param(            L"CHANNEL_LAYOUT",      params);
787         const auto keyer_option                 = contains_param(       L"KEYER",                       params);
788         const auto keyer_audio_option   = contains_param(       L"INTERNAL-KEYER-AUDIO-SOURCE", params);
789
790         auto layout = core::audio_channel_layout::invalid();
791
792         if (!channel_layout.empty())
793         {
794                 auto found_layout = core::audio_channel_layout_repository::get_default()->get_layout(channel_layout);
795
796                 if (!found_layout)
797                         CASPAR_THROW_EXCEPTION(user_error() << msg_info(L"Channel layout " + channel_layout + L" not found"));
798
799                 layout = *found_layout;
800         }
801
802         bluefish_hardware_output_channel device_output_channel = bluefish_hardware_output_channel::channel_a;
803         if (contains_param(L"A", params))
804                 device_output_channel = bluefish_hardware_output_channel::channel_a;
805         else if (contains_param(L"B", params))
806                 device_output_channel = bluefish_hardware_output_channel::channel_b;
807         else if (contains_param(L"C", params))
808                 device_output_channel = bluefish_hardware_output_channel::channel_c;
809         else if (contains_param(L"D", params))
810                 device_output_channel = bluefish_hardware_output_channel::channel_d;
811
812         hardware_downstream_keyer_mode keyer = hardware_downstream_keyer_mode::disable;
813         if (contains_param(L"DISABLED", params))
814                 keyer = hardware_downstream_keyer_mode::disable;
815         else if (contains_param(L"EXTERNAL", params))
816                 keyer = hardware_downstream_keyer_mode::external;
817         else if (contains_param(L"INTERNAL", params))
818                 keyer = hardware_downstream_keyer_mode::internal;
819
820         hardware_downstream_keyer_audio_source keyer_audio_source = hardware_downstream_keyer_audio_source::VideoOutputChannel;
821         if (contains_param(L"SDIVIDEOINPUT", params))
822                 keyer_audio_source = hardware_downstream_keyer_audio_source::SDIVideoInput;
823         else
824         if (contains_param(L"VIDEOOUTPUTCHANNEL", params))
825                 keyer_audio_source = hardware_downstream_keyer_audio_source::VideoOutputChannel;
826
827         return spl::make_shared<bluefish_consumer_proxy>(device_index, embedded_audio, key_only, keyer, keyer_audio_source, layout, device_output_channel);
828 }
829
830 spl::shared_ptr<core::frame_consumer> create_preconfigured_consumer(
831                                                                                         const boost::property_tree::wptree& ptree, core::interaction_sink*,
832                                                                                         std::vector<spl::shared_ptr<core::video_channel>> channels)
833 {       
834         const auto device_index         = ptree.get(                                            L"device",                      1);
835         const auto device_stream        = ptree.get(                                            L"sdi-stream", L"a");
836         const auto embedded_audio       = ptree.get(                                            L"embedded-audio",      false);
837         const auto key_only                     = ptree.get(                                            L"key-only",            false);
838         const auto channel_layout       = ptree.get_optional<std::wstring>(     L"channel-layout");
839         const auto hardware_keyer_value = ptree.get(                                    L"keyer", L"disabled");
840         const auto keyer_audio_source_value = ptree.get(                                L"internal-keyer-audio-source", L"videooutputchannel");
841         
842         auto layout = core::audio_channel_layout::invalid();
843
844         if (channel_layout)
845         {
846                 CASPAR_SCOPED_CONTEXT_MSG("/channel-layout")
847
848                 auto found_layout = core::audio_channel_layout_repository::get_default()->get_layout(*channel_layout);
849
850                 if (!found_layout)
851                         CASPAR_THROW_EXCEPTION(user_error() << msg_info(L"Channel layout " + *channel_layout + L" not found"));
852
853                 layout = *found_layout;
854         }
855
856         bluefish_hardware_output_channel device_output_channel = bluefish_hardware_output_channel::channel_a;
857         if (device_stream == L"a")
858                 device_output_channel = bluefish_hardware_output_channel::channel_a;
859         else if (device_stream == L"b")
860                 device_output_channel = bluefish_hardware_output_channel::channel_b;
861         else if (device_stream == L"c")
862                 device_output_channel = bluefish_hardware_output_channel::channel_c;
863         else if (device_stream == L"d")
864                 device_output_channel = bluefish_hardware_output_channel::channel_d;
865
866         hardware_downstream_keyer_mode keyer_mode = hardware_downstream_keyer_mode::disable;
867         if (hardware_keyer_value == L"disabled")
868                 keyer_mode = hardware_downstream_keyer_mode::disable;
869         else if (hardware_keyer_value == L"external")
870                 keyer_mode = hardware_downstream_keyer_mode::external;
871         else if (hardware_keyer_value == L"internal")
872                 keyer_mode = hardware_downstream_keyer_mode::internal;
873
874         hardware_downstream_keyer_audio_source keyer_audio_source = hardware_downstream_keyer_audio_source::VideoOutputChannel;
875         if (keyer_audio_source_value == L"videooutputchannel")
876                 keyer_audio_source = hardware_downstream_keyer_audio_source::VideoOutputChannel;
877         else
878                 if (keyer_audio_source_value == L"sdivideoinput")
879                         keyer_audio_source = hardware_downstream_keyer_audio_source::SDIVideoInput;
880
881         return spl::make_shared<bluefish_consumer_proxy>(device_index, embedded_audio, key_only, keyer_mode, keyer_audio_source, layout, device_output_channel);
882 }
883
884 }}