avdevice/decklink: fix MSVC build issues
[ffmpeg.git] / libavdevice / decklink_common.cpp
1 /*
2  * Blackmagic DeckLink output
3  * Copyright (c) 2013-2014 Ramiro Polla, Luca Barbato, Deti Fliegl
4  *
5  * This file is part of FFmpeg.
6  *
7  * FFmpeg is free software; you can redistribute it and/or
8  * modify it under the terms of the GNU Lesser General Public
9  * License as published by the Free Software Foundation; either
10  * version 2.1 of the License, or (at your option) any later version.
11  *
12  * FFmpeg is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
15  * Lesser General Public License for more details.
16  *
17  * You should have received a copy of the GNU Lesser General Public
18  * License along with FFmpeg; if not, write to the Free Software
19  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
20  */
21
22 /* Include internal.h first to avoid conflict between winsock.h (used by
23  * DeckLink headers) and winsock2.h (used by libavformat) in MSVC++ builds */
24 extern "C" {
25 #include "libavformat/internal.h"
26 }
27
28 #include <DeckLinkAPI.h>
29 #ifdef _WIN32
30 #include <DeckLinkAPI_i.c>
31 #else
32 #include <DeckLinkAPIDispatch.cpp>
33 #endif
34
35 extern "C" {
36 #include "libavformat/avformat.h"
37 #include "libavutil/imgutils.h"
38 #include "libavutil/intreadwrite.h"
39 #include "libavutil/bswap.h"
40 }
41
42 #include "decklink_common.h"
43
44 #ifdef _WIN32
45 IDeckLinkIterator *CreateDeckLinkIteratorInstance(void)
46 {
47     IDeckLinkIterator *iter;
48
49     if (CoInitialize(NULL) < 0) {
50         av_log(NULL, AV_LOG_ERROR, "COM initialization failed.\n");
51         return NULL;
52     }
53
54     if (CoCreateInstance(CLSID_CDeckLinkIterator, NULL, CLSCTX_ALL,
55                          IID_IDeckLinkIterator, (void**) &iter) != S_OK) {
56         av_log(NULL, AV_LOG_ERROR, "DeckLink drivers not installed.\n");
57         return NULL;
58     }
59
60     return iter;
61 }
62 #endif
63
64 #ifdef _WIN32
65 static char *dup_wchar_to_utf8(wchar_t *w)
66 {
67     char *s = NULL;
68     int l = WideCharToMultiByte(CP_UTF8, 0, w, -1, 0, 0, 0, 0);
69     s = (char *) av_malloc(l);
70     if (s)
71         WideCharToMultiByte(CP_UTF8, 0, w, -1, s, l, 0, 0);
72     return s;
73 }
74 #define DECKLINK_STR    OLECHAR *
75 #define DECKLINK_STRDUP dup_wchar_to_utf8
76 #define DECKLINK_FREE(s) SysFreeString(s)
77 #define DECKLINK_BOOL BOOL
78 #elif defined(__APPLE__)
79 static char *dup_cfstring_to_utf8(CFStringRef w)
80 {
81     char s[256];
82     CFStringGetCString(w, s, 255, kCFStringEncodingUTF8);
83     return av_strdup(s);
84 }
85 #define DECKLINK_STR    const __CFString *
86 #define DECKLINK_STRDUP dup_cfstring_to_utf8
87 #define DECKLINK_FREE(s) free((void *) s)
88 #define DECKLINK_BOOL bool
89 #else
90 #define DECKLINK_STR    const char *
91 #define DECKLINK_STRDUP av_strdup
92 /* free() is needed for a string returned by the DeckLink SDL. */
93 #define DECKLINK_FREE(s) free((void *) s)
94 #define DECKLINK_BOOL bool
95 #endif
96
97 HRESULT ff_decklink_get_display_name(IDeckLink *This, const char **displayName)
98 {
99     DECKLINK_STR tmpDisplayName;
100     HRESULT hr = This->GetDisplayName(&tmpDisplayName);
101     if (hr != S_OK)
102         return hr;
103     *displayName = DECKLINK_STRDUP(tmpDisplayName);
104     DECKLINK_FREE(tmpDisplayName);
105     return hr;
106 }
107
108 static int decklink_select_input(AVFormatContext *avctx, BMDDeckLinkConfigurationID cfg_id)
109 {
110     struct decklink_cctx *cctx = (struct decklink_cctx *)avctx->priv_data;
111     struct decklink_ctx *ctx = (struct decklink_ctx *)cctx->ctx;
112     BMDDeckLinkAttributeID attr_id = (cfg_id == bmdDeckLinkConfigAudioInputConnection) ? BMDDeckLinkAudioInputConnections : BMDDeckLinkVideoInputConnections;
113     int64_t bmd_input              = (cfg_id == bmdDeckLinkConfigAudioInputConnection) ? (int64_t)ctx->audio_input : (int64_t)ctx->video_input;
114     const char *type_name          = (cfg_id == bmdDeckLinkConfigAudioInputConnection) ? "audio" : "video";
115     int64_t supported_connections = 0;
116     HRESULT res;
117
118     if (bmd_input) {
119         res = ctx->attr->GetInt(attr_id, &supported_connections);
120         if (res != S_OK) {
121             av_log(avctx, AV_LOG_ERROR, "Failed to query supported %s inputs.\n", type_name);
122             return AVERROR_EXTERNAL;
123         }
124         if ((supported_connections & bmd_input) != bmd_input) {
125             av_log(avctx, AV_LOG_ERROR, "Device does not support selected %s input.\n", type_name);
126             return AVERROR(ENOSYS);
127         }
128         res = ctx->cfg->SetInt(cfg_id, bmd_input);
129         if (res != S_OK) {
130             av_log(avctx, AV_LOG_ERROR, "Failed to select %s input.\n", type_name);
131             return AVERROR_EXTERNAL;
132         }
133     }
134     return 0;
135 }
136
137 static DECKLINK_BOOL field_order_eq(enum AVFieldOrder field_order, BMDFieldDominance bmd_field_order)
138 {
139     if (field_order == AV_FIELD_UNKNOWN)
140         return true;
141     if ((field_order == AV_FIELD_TT || field_order == AV_FIELD_TB) && bmd_field_order == bmdUpperFieldFirst)
142         return true;
143     if ((field_order == AV_FIELD_BB || field_order == AV_FIELD_BT) && bmd_field_order == bmdLowerFieldFirst)
144         return true;
145     if (field_order == AV_FIELD_PROGRESSIVE && (bmd_field_order == bmdProgressiveFrame || bmd_field_order == bmdProgressiveSegmentedFrame))
146         return true;
147     return false;
148 }
149
150 int ff_decklink_set_format(AVFormatContext *avctx,
151                                int width, int height,
152                                int tb_num, int tb_den,
153                                enum AVFieldOrder field_order,
154                                decklink_direction_t direction, int num)
155 {
156     struct decklink_cctx *cctx = (struct decklink_cctx *)avctx->priv_data;
157     struct decklink_ctx *ctx = (struct decklink_ctx *)cctx->ctx;
158     BMDDisplayModeSupport support;
159     IDeckLinkDisplayModeIterator *itermode;
160     IDeckLinkDisplayMode *mode;
161     int i = 1;
162     HRESULT res;
163
164     av_log(avctx, AV_LOG_DEBUG, "Trying to find mode for frame size %dx%d, frame timing %d/%d, field order %d, direction %d, mode number %d, format code %s\n",
165         width, height, tb_num, tb_den, field_order, direction, num, (cctx->format_code) ? cctx->format_code : "(unset)");
166
167     if (ctx->duplex_mode) {
168         DECKLINK_BOOL duplex_supported = false;
169
170         if (ctx->attr->GetFlag(BMDDeckLinkSupportsDuplexModeConfiguration, &duplex_supported) != S_OK)
171             duplex_supported = false;
172
173         if (duplex_supported) {
174             res = ctx->cfg->SetInt(bmdDeckLinkConfigDuplexMode, ctx->duplex_mode == 2 ? bmdDuplexModeFull : bmdDuplexModeHalf);
175             if (res != S_OK)
176                 av_log(avctx, AV_LOG_WARNING, "Setting duplex mode failed.\n");
177             else
178                 av_log(avctx, AV_LOG_VERBOSE, "Successfully set duplex mode to %s duplex.\n", ctx->duplex_mode == 2 ? "full" : "half");
179         } else {
180             av_log(avctx, AV_LOG_WARNING, "Unable to set duplex mode, because it is not supported.\n");
181         }
182     }
183
184     if (direction == DIRECTION_IN) {
185         int ret;
186         ret = decklink_select_input(avctx, bmdDeckLinkConfigAudioInputConnection);
187         if (ret < 0)
188             return ret;
189         ret = decklink_select_input(avctx, bmdDeckLinkConfigVideoInputConnection);
190         if (ret < 0)
191             return ret;
192         res = ctx->dli->GetDisplayModeIterator (&itermode);
193     } else {
194         res = ctx->dlo->GetDisplayModeIterator (&itermode);
195     }
196
197     if (res!= S_OK) {
198             av_log(avctx, AV_LOG_ERROR, "Could not get Display Mode Iterator\n");
199             return AVERROR(EIO);
200     }
201
202     char format_buf[] = "    ";
203     if (cctx->format_code)
204         memcpy(format_buf, cctx->format_code, FFMIN(strlen(cctx->format_code), sizeof(format_buf)));
205     BMDDisplayMode target_mode = (BMDDisplayMode)AV_RB32(format_buf);
206     AVRational target_tb = av_make_q(tb_num, tb_den);
207     ctx->bmd_mode = bmdModeUnknown;
208     while ((ctx->bmd_mode == bmdModeUnknown) && itermode->Next(&mode) == S_OK) {
209         BMDTimeValue bmd_tb_num, bmd_tb_den;
210         int bmd_width  = mode->GetWidth();
211         int bmd_height = mode->GetHeight();
212         BMDDisplayMode bmd_mode = mode->GetDisplayMode();
213         BMDFieldDominance bmd_field_dominance = mode->GetFieldDominance();
214
215         mode->GetFrameRate(&bmd_tb_num, &bmd_tb_den);
216         AVRational mode_tb = av_make_q(bmd_tb_num, bmd_tb_den);
217
218         if ((bmd_width == width &&
219              bmd_height == height &&
220              !av_cmp_q(mode_tb, target_tb) &&
221              field_order_eq(field_order, bmd_field_dominance))
222              || i == num
223              || target_mode == bmd_mode) {
224             ctx->bmd_mode   = bmd_mode;
225             ctx->bmd_width  = bmd_width;
226             ctx->bmd_height = bmd_height;
227             ctx->bmd_tb_den = bmd_tb_den;
228             ctx->bmd_tb_num = bmd_tb_num;
229             ctx->bmd_field_dominance = bmd_field_dominance;
230             av_log(avctx, AV_LOG_INFO, "Found Decklink mode %d x %d with rate %.2f%s\n",
231                 bmd_width, bmd_height, 1/av_q2d(mode_tb),
232                 (ctx->bmd_field_dominance==bmdLowerFieldFirst || ctx->bmd_field_dominance==bmdUpperFieldFirst)?"(i)":"");
233         }
234
235         mode->Release();
236         i++;
237     }
238
239     itermode->Release();
240
241     if (ctx->bmd_mode == bmdModeUnknown)
242         return -1;
243     if (direction == DIRECTION_IN) {
244         if (ctx->dli->DoesSupportVideoMode(ctx->bmd_mode, bmdFormat8BitYUV,
245                                            bmdVideoOutputFlagDefault,
246                                            &support, NULL) != S_OK)
247             return -1;
248     } else {
249         if (ctx->dlo->DoesSupportVideoMode(ctx->bmd_mode, bmdFormat8BitYUV,
250                                            bmdVideoOutputFlagDefault,
251                                            &support, NULL) != S_OK)
252         return -1;
253     }
254     if (support == bmdDisplayModeSupported)
255         return 0;
256
257     return -1;
258 }
259
260 int ff_decklink_set_format(AVFormatContext *avctx, decklink_direction_t direction, int num) {
261     return ff_decklink_set_format(avctx, 0, 0, 0, 0, AV_FIELD_UNKNOWN, direction, num);
262 }
263
264 int ff_decklink_list_devices(AVFormatContext *avctx)
265 {
266     IDeckLink *dl = NULL;
267     IDeckLinkIterator *iter = CreateDeckLinkIteratorInstance();
268     if (!iter) {
269         av_log(avctx, AV_LOG_ERROR, "Could not create DeckLink iterator\n");
270         return AVERROR(EIO);
271     }
272     av_log(avctx, AV_LOG_INFO, "Blackmagic DeckLink devices:\n");
273     while (iter->Next(&dl) == S_OK) {
274         const char *displayName;
275         ff_decklink_get_display_name(dl, &displayName);
276         av_log(avctx, AV_LOG_INFO, "\t'%s'\n", displayName);
277         av_free((void *) displayName);
278         dl->Release();
279     }
280     iter->Release();
281     return 0;
282 }
283
284 int ff_decklink_list_formats(AVFormatContext *avctx, decklink_direction_t direction)
285 {
286     struct decklink_cctx *cctx = (struct decklink_cctx *)avctx->priv_data;
287     struct decklink_ctx *ctx = (struct decklink_ctx *)cctx->ctx;
288     IDeckLinkDisplayModeIterator *itermode;
289     IDeckLinkDisplayMode *mode;
290     uint32_t format_code;
291     HRESULT res;
292
293     if (direction == DIRECTION_IN) {
294         int ret;
295         ret = decklink_select_input(avctx, bmdDeckLinkConfigAudioInputConnection);
296         if (ret < 0)
297             return ret;
298         ret = decklink_select_input(avctx, bmdDeckLinkConfigVideoInputConnection);
299         if (ret < 0)
300             return ret;
301         res = ctx->dli->GetDisplayModeIterator (&itermode);
302     } else {
303         res = ctx->dlo->GetDisplayModeIterator (&itermode);
304     }
305
306     if (res!= S_OK) {
307             av_log(avctx, AV_LOG_ERROR, "Could not get Display Mode Iterator\n");
308             return AVERROR(EIO);
309     }
310
311     av_log(avctx, AV_LOG_INFO, "Supported formats for '%s':\n\tformat_code\tdescription",
312                avctx->filename);
313     while (itermode->Next(&mode) == S_OK) {
314         BMDTimeValue tb_num, tb_den;
315         mode->GetFrameRate(&tb_num, &tb_den);
316         format_code = av_bswap32(mode->GetDisplayMode());
317         av_log(avctx, AV_LOG_INFO, "\n\t%.4s\t\t%ldx%ld at %d/%d fps",
318                 (char*) &format_code, mode->GetWidth(), mode->GetHeight(),
319                 (int) tb_den, (int) tb_num);
320         switch (mode->GetFieldDominance()) {
321         case bmdLowerFieldFirst:
322         av_log(avctx, AV_LOG_INFO, " (interlaced, lower field first)"); break;
323         case bmdUpperFieldFirst:
324         av_log(avctx, AV_LOG_INFO, " (interlaced, upper field first)"); break;
325         }
326         mode->Release();
327     }
328     av_log(avctx, AV_LOG_INFO, "\n");
329
330     itermode->Release();
331
332     return 0;
333 }
334
335 void ff_decklink_cleanup(AVFormatContext *avctx)
336 {
337     struct decklink_cctx *cctx = (struct decklink_cctx *)avctx->priv_data;
338     struct decklink_ctx *ctx = (struct decklink_ctx *)cctx->ctx;
339
340     if (ctx->dli)
341         ctx->dli->Release();
342     if (ctx->dlo)
343         ctx->dlo->Release();
344     if (ctx->attr)
345         ctx->attr->Release();
346     if (ctx->cfg)
347         ctx->cfg->Release();
348     if (ctx->dl)
349         ctx->dl->Release();
350 }
351
352 int ff_decklink_init_device(AVFormatContext *avctx, const char* name)
353 {
354     struct decklink_cctx *cctx = (struct decklink_cctx *)avctx->priv_data;
355     struct decklink_ctx *ctx = (struct decklink_ctx *)cctx->ctx;
356     IDeckLink *dl = NULL;
357     IDeckLinkIterator *iter = CreateDeckLinkIteratorInstance();
358     if (!iter) {
359         av_log(avctx, AV_LOG_ERROR, "Could not create DeckLink iterator\n");
360         return AVERROR_EXTERNAL;
361     }
362
363     while (iter->Next(&dl) == S_OK) {
364         const char *displayName;
365         ff_decklink_get_display_name(dl, &displayName);
366         if (!strcmp(name, displayName)) {
367             av_free((void *)displayName);
368             ctx->dl = dl;
369             break;
370         }
371         av_free((void *)displayName);
372         dl->Release();
373     }
374     iter->Release();
375     if (!ctx->dl)
376         return AVERROR(ENXIO);
377
378     if (ctx->dl->QueryInterface(IID_IDeckLinkConfiguration, (void **)&ctx->cfg) != S_OK) {
379         av_log(avctx, AV_LOG_ERROR, "Could not get configuration interface for '%s'\n", name);
380         ff_decklink_cleanup(avctx);
381         return AVERROR_EXTERNAL;
382     }
383
384     if (ctx->dl->QueryInterface(IID_IDeckLinkAttributes, (void **)&ctx->attr) != S_OK) {
385         av_log(avctx, AV_LOG_ERROR, "Could not get attributes interface for '%s'\n", name);
386         ff_decklink_cleanup(avctx);
387         return AVERROR_EXTERNAL;
388     }
389
390     return 0;
391 }