avdevice/v4l2: Try to fix build on netbsd/openbsd
[ffmpeg.git] / libavdevice / decklink_enc.cpp
1 /*
2  * Blackmagic DeckLink output
3  * Copyright (c) 2013-2014 Ramiro Polla
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 <DeckLinkAPI.h>
23
24 #include <pthread.h>
25 #include <semaphore.h>
26
27 extern "C" {
28 #include "libavformat/avformat.h"
29 #include "libavformat/internal.h"
30 #include "libavutil/imgutils.h"
31 }
32
33 #include "decklink_common.h"
34 #include "decklink_enc.h"
35
36
37 /* DeckLink callback class declaration */
38 class decklink_frame : public IDeckLinkVideoFrame
39 {
40 public:
41     decklink_frame(struct decklink_ctx *ctx, AVFrame *avframe, long width,
42                    long height, void *buffer) :
43                    _ctx(ctx), _avframe(avframe), _width(width),
44                    _height(height), _buffer(buffer), _refs(0) { }
45
46     virtual long           STDMETHODCALLTYPE GetWidth      (void)          { return _width; }
47     virtual long           STDMETHODCALLTYPE GetHeight     (void)          { return _height; }
48     virtual long           STDMETHODCALLTYPE GetRowBytes   (void)          { return _width<<1; }
49     virtual BMDPixelFormat STDMETHODCALLTYPE GetPixelFormat(void)          { return bmdFormat8BitYUV; }
50     virtual BMDFrameFlags  STDMETHODCALLTYPE GetFlags      (void)          { return bmdVideoOutputFlagDefault; }
51     virtual HRESULT        STDMETHODCALLTYPE GetBytes      (void **buffer) { *buffer = _buffer; return S_OK; }
52
53     virtual HRESULT STDMETHODCALLTYPE GetTimecode     (BMDTimecodeFormat format, IDeckLinkTimecode **timecode) { return S_FALSE; }
54     virtual HRESULT STDMETHODCALLTYPE GetAncillaryData(IDeckLinkVideoFrameAncillary **ancillary)               { return S_FALSE; }
55
56     virtual HRESULT STDMETHODCALLTYPE QueryInterface(REFIID iid, LPVOID *ppv) { return E_NOINTERFACE; }
57     virtual ULONG   STDMETHODCALLTYPE AddRef(void)                            { return ++_refs; }
58     virtual ULONG   STDMETHODCALLTYPE Release(void)                           { if (!--_refs) delete this; return _refs; }
59
60     struct decklink_ctx *_ctx;
61     AVFrame *_avframe;
62
63 private:
64     long  _width;
65     long  _height;
66     void *_buffer;
67     int   _refs;
68 };
69
70 class decklink_output_callback : public IDeckLinkVideoOutputCallback
71 {
72 public:
73     virtual HRESULT STDMETHODCALLTYPE ScheduledFrameCompleted(IDeckLinkVideoFrame *_frame, BMDOutputFrameCompletionResult result)
74     {
75         decklink_frame *frame = static_cast<decklink_frame *>(_frame);
76         struct decklink_ctx *ctx = frame->_ctx;
77         AVFrame *avframe = frame->_avframe;
78
79         av_frame_free(&avframe);
80
81         sem_post(&ctx->semaphore);
82
83         return S_OK;
84     }
85     virtual HRESULT STDMETHODCALLTYPE ScheduledPlaybackHasStopped(void)       { return S_OK; }
86     virtual HRESULT STDMETHODCALLTYPE QueryInterface(REFIID iid, LPVOID *ppv) { return E_NOINTERFACE; }
87     virtual ULONG   STDMETHODCALLTYPE AddRef(void)                            { return 1; }
88     virtual ULONG   STDMETHODCALLTYPE Release(void)                           { return 1; }
89 };
90
91 static int decklink_setup_video(AVFormatContext *avctx, AVStream *st)
92 {
93     struct decklink_cctx *cctx = (struct decklink_cctx *) avctx->priv_data;
94     struct decklink_ctx *ctx = (struct decklink_ctx *) cctx->ctx;
95     AVCodecContext *c = st->codec;
96
97     if (ctx->video) {
98         av_log(avctx, AV_LOG_ERROR, "Only one video stream is supported!\n");
99         return -1;
100     }
101
102     if (c->pix_fmt != AV_PIX_FMT_UYVY422) {
103         av_log(avctx, AV_LOG_ERROR, "Unsupported pixel format!"
104                " Only AV_PIX_FMT_UYVY422 is supported.\n");
105         return -1;
106     }
107     if (ff_decklink_set_format(avctx, c->width, c->height,
108                             c->time_base.num, c->time_base.den)) {
109         av_log(avctx, AV_LOG_ERROR, "Unsupported video size or framerate!"
110                " Check available formats with -list_formats 1.\n");
111         return -1;
112     }
113     if (ctx->dlo->EnableVideoOutput(ctx->bmd_mode,
114                                     bmdVideoOutputFlagDefault) != S_OK) {
115         av_log(avctx, AV_LOG_ERROR, "Could not enable video output!\n");
116         return -1;
117     }
118
119     /* Set callback. */
120     ctx->output_callback = new decklink_output_callback();
121     ctx->dlo->SetScheduledFrameCompletionCallback(ctx->output_callback);
122
123     /* Start video semaphore. */
124     ctx->frames_preroll = c->time_base.den * ctx->preroll;
125     if (c->time_base.den > 1000)
126         ctx->frames_preroll /= 1000;
127
128     /* Buffer twice as many frames as the preroll. */
129     ctx->frames_buffer = ctx->frames_preroll * 2;
130     ctx->frames_buffer = FFMIN(ctx->frames_buffer, 60);
131     sem_init(&ctx->semaphore, 0, ctx->frames_buffer);
132
133     /* The device expects the framerate to be fixed. */
134     avpriv_set_pts_info(st, 64, c->time_base.num, c->time_base.den);
135
136     ctx->video = 1;
137
138     return 0;
139 }
140
141 static int decklink_setup_audio(AVFormatContext *avctx, AVStream *st)
142 {
143     struct decklink_cctx *cctx = (struct decklink_cctx *) avctx->priv_data;
144     struct decklink_ctx *ctx = (struct decklink_ctx *) cctx->ctx;
145     AVCodecContext *c = st->codec;
146
147     if (ctx->audio) {
148         av_log(avctx, AV_LOG_ERROR, "Only one audio stream is supported!\n");
149         return -1;
150     }
151     if (c->sample_rate != 48000) {
152         av_log(avctx, AV_LOG_ERROR, "Unsupported sample rate!"
153                " Only 48kHz is supported.\n");
154         return -1;
155     }
156     if (c->channels != 2 && c->channels != 8) {
157         av_log(avctx, AV_LOG_ERROR, "Unsupported number of channels!"
158                " Only stereo and 7.1 are supported.\n");
159         return -1;
160     }
161     if (ctx->dlo->EnableAudioOutput(bmdAudioSampleRate48kHz,
162                                     bmdAudioSampleType16bitInteger,
163                                     c->channels,
164                                     bmdAudioOutputStreamTimestamped) != S_OK) {
165         av_log(avctx, AV_LOG_ERROR, "Could not enable audio output!\n");
166         return -1;
167     }
168     if (ctx->dlo->BeginAudioPreroll() != S_OK) {
169         av_log(avctx, AV_LOG_ERROR, "Could not begin audio preroll!\n");
170         return -1;
171     }
172
173     /* The device expects the sample rate to be fixed. */
174     avpriv_set_pts_info(st, 64, 1, c->sample_rate);
175     ctx->channels = c->channels;
176
177     ctx->audio = 1;
178
179     return 0;
180 }
181
182 av_cold int ff_decklink_write_trailer(AVFormatContext *avctx)
183 {
184     struct decklink_cctx *cctx = (struct decklink_cctx *) avctx->priv_data;
185     struct decklink_ctx *ctx = (struct decklink_ctx *) cctx->ctx;
186
187     if (ctx->playback_started) {
188         BMDTimeValue actual;
189         ctx->dlo->StopScheduledPlayback(ctx->last_pts * ctx->bmd_tb_num,
190                                         &actual, ctx->bmd_tb_den);
191         ctx->dlo->DisableVideoOutput();
192         if (ctx->audio)
193             ctx->dlo->DisableAudioOutput();
194     }
195
196     if (ctx->dlo)
197         ctx->dlo->Release();
198     if (ctx->dl)
199         ctx->dl->Release();
200
201     if (ctx->output_callback)
202         delete ctx->output_callback;
203
204     sem_destroy(&ctx->semaphore);
205
206     av_freep(&cctx->ctx);
207
208     return 0;
209 }
210
211 static int decklink_write_video_packet(AVFormatContext *avctx, AVPacket *pkt)
212 {
213     struct decklink_cctx *cctx = (struct decklink_cctx *) avctx->priv_data;
214     struct decklink_ctx *ctx = (struct decklink_ctx *) cctx->ctx;
215     AVPicture *avpicture = (AVPicture *) pkt->data;
216     AVFrame *avframe, *tmp;
217     decklink_frame *frame;
218     buffercount_type buffered;
219     HRESULT hr;
220
221     /* HACK while av_uncoded_frame() isn't implemented */
222     int ret;
223
224     tmp = av_frame_alloc();
225     if (!tmp)
226         return AVERROR(ENOMEM);
227     tmp->format = AV_PIX_FMT_UYVY422;
228     tmp->width  = ctx->bmd_width;
229     tmp->height = ctx->bmd_height;
230     ret = av_frame_get_buffer(tmp, 32);
231     if (ret < 0) {
232         av_frame_free(&tmp);
233         return ret;
234     }
235     av_image_copy(tmp->data, tmp->linesize, (const uint8_t **) avpicture->data,
236                   avpicture->linesize, (AVPixelFormat) tmp->format, tmp->width,
237                   tmp->height);
238     avframe = av_frame_clone(tmp);
239     av_frame_free(&tmp);
240     if (!avframe) {
241         av_log(avctx, AV_LOG_ERROR, "Could not clone video frame.\n");
242         return AVERROR(EIO);
243     }
244     /* end HACK */
245
246     frame = new decklink_frame(ctx, avframe, ctx->bmd_width, ctx->bmd_height,
247                                (void *) avframe->data[0]);
248     if (!frame) {
249         av_log(avctx, AV_LOG_ERROR, "Could not create new frame.\n");
250         return AVERROR(EIO);
251     }
252
253     /* Always keep at most one second of frames buffered. */
254     sem_wait(&ctx->semaphore);
255
256     /* Schedule frame for playback. */
257     hr = ctx->dlo->ScheduleVideoFrame((struct IDeckLinkVideoFrame *) frame,
258                                       pkt->pts * ctx->bmd_tb_num,
259                                       ctx->bmd_tb_num, ctx->bmd_tb_den);
260     if (hr != S_OK) {
261         av_log(avctx, AV_LOG_ERROR, "Could not schedule video frame."
262                 " error %08x.\n", (uint32_t) hr);
263         frame->Release();
264         return AVERROR(EIO);
265     }
266
267     ctx->dlo->GetBufferedVideoFrameCount(&buffered);
268     av_log(avctx, AV_LOG_DEBUG, "Buffered video frames: %d.\n", (int) buffered);
269     if (pkt->pts > 2 && buffered <= 2)
270         av_log(avctx, AV_LOG_WARNING, "There are not enough buffered video frames."
271                " Video may misbehave!\n");
272
273     /* Preroll video frames. */
274     if (!ctx->playback_started && pkt->pts > ctx->frames_preroll) {
275         av_log(avctx, AV_LOG_DEBUG, "Ending audio preroll.\n");
276         if (ctx->audio && ctx->dlo->EndAudioPreroll() != S_OK) {
277             av_log(avctx, AV_LOG_ERROR, "Could not end audio preroll!\n");
278             return AVERROR(EIO);
279         }
280         av_log(avctx, AV_LOG_DEBUG, "Starting scheduled playback.\n");
281         if (ctx->dlo->StartScheduledPlayback(0, ctx->bmd_tb_den, 1.0) != S_OK) {
282             av_log(avctx, AV_LOG_ERROR, "Could not start scheduled playback!\n");
283             return AVERROR(EIO);
284         }
285         ctx->playback_started = 1;
286     }
287
288     return 0;
289 }
290
291 static int decklink_write_audio_packet(AVFormatContext *avctx, AVPacket *pkt)
292 {
293     struct decklink_cctx *cctx = (struct decklink_cctx *) avctx->priv_data;
294     struct decklink_ctx *ctx = (struct decklink_ctx *) cctx->ctx;
295     int sample_count = pkt->size / (ctx->channels << 1);
296     buffercount_type buffered;
297
298     ctx->dlo->GetBufferedAudioSampleFrameCount(&buffered);
299     if (pkt->pts > 1 && !buffered)
300         av_log(avctx, AV_LOG_WARNING, "There's no buffered audio."
301                " Audio will misbehave!\n");
302
303     if (ctx->dlo->ScheduleAudioSamples(pkt->data, sample_count, pkt->pts,
304                                        bmdAudioSampleRate48kHz, NULL) != S_OK) {
305         av_log(avctx, AV_LOG_ERROR, "Could not schedule audio samples.\n");
306         return AVERROR(EIO);
307     }
308
309     return 0;
310 }
311
312 extern "C" {
313
314 av_cold int ff_decklink_write_header(AVFormatContext *avctx)
315 {
316     struct decklink_cctx *cctx = (struct decklink_cctx *) avctx->priv_data;
317     struct decklink_ctx *ctx;
318     IDeckLinkDisplayModeIterator *itermode;
319     IDeckLinkIterator *iter;
320     IDeckLink *dl = NULL;
321     unsigned int n;
322
323     ctx = (struct decklink_ctx *) av_mallocz(sizeof(struct decklink_ctx));
324     if (!ctx)
325         return AVERROR(ENOMEM);
326     ctx->list_devices = cctx->list_devices;
327     ctx->list_formats = cctx->list_formats;
328     ctx->preroll      = cctx->preroll;
329     cctx->ctx = ctx;
330
331     iter = CreateDeckLinkIteratorInstance();
332     if (!iter) {
333         av_log(avctx, AV_LOG_ERROR, "Could not create DeckLink iterator\n");
334         return AVERROR(EIO);
335     }
336
337     /* List available devices. */
338     if (ctx->list_devices) {
339         ff_decklink_list_devices(avctx);
340         return AVERROR_EXIT;
341     }
342
343     /* Open device. */
344     while (iter->Next(&dl) == S_OK) {
345         const char *displayName;
346         ff_decklink_get_display_name(dl, &displayName);
347         if (!strcmp(avctx->filename, displayName)) {
348             av_free((void *) displayName);
349             ctx->dl = dl;
350             break;
351         }
352         av_free((void *) displayName);
353         dl->Release();
354     }
355     iter->Release();
356     if (!ctx->dl) {
357         av_log(avctx, AV_LOG_ERROR, "Could not open '%s'\n", avctx->filename);
358         return AVERROR(EIO);
359     }
360
361     /* Get output device. */
362     if (ctx->dl->QueryInterface(IID_IDeckLinkOutput, (void **) &ctx->dlo) != S_OK) {
363         av_log(avctx, AV_LOG_ERROR, "Could not open output device from '%s'\n",
364                avctx->filename);
365         ctx->dl->Release();
366         return AVERROR(EIO);
367     }
368
369     /* List supported formats. */
370     if (ctx->list_formats) {
371         ff_decklink_list_formats(avctx);
372         ctx->dlo->Release();
373         ctx->dl->Release();
374         return AVERROR_EXIT;
375     }
376
377     if (ctx->dlo->GetDisplayModeIterator(&itermode) != S_OK) {
378         av_log(avctx, AV_LOG_ERROR, "Could not get Display Mode Iterator\n");
379         ctx->dl->Release();
380         return AVERROR(EIO);
381     }
382
383     /* Setup streams. */
384     for (n = 0; n < avctx->nb_streams; n++) {
385         AVStream *st = avctx->streams[n];
386         AVCodecContext *c = st->codec;
387         if        (c->codec_type == AVMEDIA_TYPE_AUDIO) {
388             if (decklink_setup_audio(avctx, st))
389                 goto error;
390         } else if (c->codec_type == AVMEDIA_TYPE_VIDEO) {
391             if (decklink_setup_video(avctx, st))
392                 goto error;
393         } else {
394             av_log(avctx, AV_LOG_ERROR, "Unsupported stream type.\n");
395             goto error;
396         }
397     }
398     itermode->Release();
399
400     return 0;
401
402 error:
403
404     ctx->dlo->Release();
405     ctx->dl->Release();
406
407     return AVERROR(EIO);
408 }
409
410 int ff_decklink_write_packet(AVFormatContext *avctx, AVPacket *pkt)
411 {
412     struct decklink_cctx *cctx = (struct decklink_cctx *) avctx->priv_data;
413     struct decklink_ctx *ctx = (struct decklink_ctx *) cctx->ctx;
414     AVStream *st = avctx->streams[pkt->stream_index];
415
416     ctx->last_pts = FFMAX(ctx->last_pts, pkt->pts);
417
418     if      (st->codec->codec_type == AVMEDIA_TYPE_VIDEO)
419         return decklink_write_video_packet(avctx, pkt);
420     else if (st->codec->codec_type == AVMEDIA_TYPE_AUDIO)
421         return decklink_write_audio_packet(avctx, pkt);
422
423     return AVERROR(EIO);
424 }
425
426 } /* extern "C" */