cmdutils: fix new API break the "ffmpeg -muxers/demuxers"
[ffmpeg.git] / libavdevice / lavfi.c
1 /*
2  * Copyright (c) 2011 Stefano Sabatini
3  *
4  * This file is part of FFmpeg.
5  *
6  * FFmpeg is free software; you can redistribute it and/or
7  * modify it under the terms of the GNU Lesser General Public
8  * License as published by the Free Software Foundation; either
9  * version 2.1 of the License, or (at your option) any later version.
10  *
11  * FFmpeg 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 GNU
14  * Lesser General Public License for more details.
15  *
16  * You should have received a copy of the GNU Lesser General Public
17  * License along with FFmpeg; if not, write to the Free Software
18  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
19  */
20
21 /**
22  * @file
23  * libavfilter virtual input device
24  */
25
26 /* #define DEBUG */
27
28 #include <float.h>              /* DBL_MIN, DBL_MAX */
29
30 #include "libavutil/bprint.h"
31 #include "libavutil/channel_layout.h"
32 #include "libavutil/file.h"
33 #include "libavutil/imgutils.h"
34 #include "libavutil/internal.h"
35 #include "libavutil/log.h"
36 #include "libavutil/mem.h"
37 #include "libavutil/opt.h"
38 #include "libavutil/parseutils.h"
39 #include "libavutil/pixdesc.h"
40 #include "libavfilter/avfilter.h"
41 #include "libavfilter/buffersink.h"
42 #include "libavformat/avio_internal.h"
43 #include "libavformat/internal.h"
44 #include "avdevice.h"
45
46 typedef struct {
47     AVClass *class;          ///< class for private options
48     char          *graph_str;
49     char          *graph_filename;
50     char          *dump_graph;
51     AVFilterGraph *graph;
52     AVFilterContext **sinks;
53     int *sink_stream_map;
54     int *sink_eof;
55     int *stream_sink_map;
56     int *sink_stream_subcc_map;
57     AVFrame *decoded_frame;
58     int nb_sinks;
59     AVPacket subcc_packet;
60 } LavfiContext;
61
62 static int *create_all_formats(int n)
63 {
64     int i, j, *fmts, count = 0;
65
66     for (i = 0; i < n; i++) {
67         const AVPixFmtDescriptor *desc = av_pix_fmt_desc_get(i);
68         if (!(desc->flags & AV_PIX_FMT_FLAG_HWACCEL))
69             count++;
70     }
71
72     if (!(fmts = av_malloc((count+1) * sizeof(int))))
73         return NULL;
74     for (j = 0, i = 0; i < n; i++) {
75         const AVPixFmtDescriptor *desc = av_pix_fmt_desc_get(i);
76         if (!(desc->flags & AV_PIX_FMT_FLAG_HWACCEL))
77             fmts[j++] = i;
78     }
79     fmts[j] = -1;
80     return fmts;
81 }
82
83 av_cold static int lavfi_read_close(AVFormatContext *avctx)
84 {
85     LavfiContext *lavfi = avctx->priv_data;
86
87     av_freep(&lavfi->sink_stream_map);
88     av_freep(&lavfi->sink_eof);
89     av_freep(&lavfi->stream_sink_map);
90     av_freep(&lavfi->sink_stream_subcc_map);
91     av_freep(&lavfi->sinks);
92     avfilter_graph_free(&lavfi->graph);
93     av_frame_free(&lavfi->decoded_frame);
94
95     return 0;
96 }
97
98 static int create_subcc_streams(AVFormatContext *avctx)
99 {
100     LavfiContext *lavfi = avctx->priv_data;
101     AVStream *st;
102     int stream_idx, sink_idx;
103
104     for (stream_idx = 0; stream_idx < lavfi->nb_sinks; stream_idx++) {
105         sink_idx = lavfi->stream_sink_map[stream_idx];
106         if (lavfi->sink_stream_subcc_map[sink_idx]) {
107             lavfi->sink_stream_subcc_map[sink_idx] = avctx->nb_streams;
108             if (!(st = avformat_new_stream(avctx, NULL)))
109                 return AVERROR(ENOMEM);
110             st->codecpar->codec_id = AV_CODEC_ID_EIA_608;
111             st->codecpar->codec_type = AVMEDIA_TYPE_SUBTITLE;
112         } else {
113             lavfi->sink_stream_subcc_map[sink_idx] = -1;
114         }
115     }
116     return 0;
117 }
118
119 av_cold static int lavfi_read_header(AVFormatContext *avctx)
120 {
121     LavfiContext *lavfi = avctx->priv_data;
122     AVFilterInOut *input_links = NULL, *output_links = NULL, *inout;
123     const AVFilter *buffersink, *abuffersink;
124     int *pix_fmts = create_all_formats(AV_PIX_FMT_NB);
125     enum AVMediaType type;
126     int ret = 0, i, n;
127
128 #define FAIL(ERR) { ret = ERR; goto end; }
129
130     if (!pix_fmts)
131         FAIL(AVERROR(ENOMEM));
132
133     avfilter_register_all();
134
135     buffersink = avfilter_get_by_name("buffersink");
136     abuffersink = avfilter_get_by_name("abuffersink");
137
138     if (lavfi->graph_filename && lavfi->graph_str) {
139         av_log(avctx, AV_LOG_ERROR,
140                "Only one of the graph or graph_file options must be specified\n");
141         FAIL(AVERROR(EINVAL));
142     }
143
144     if (lavfi->graph_filename) {
145         AVBPrint graph_file_pb;
146         AVIOContext *avio = NULL;
147         AVDictionary *options = NULL;
148         if (avctx->protocol_whitelist && (ret = av_dict_set(&options, "protocol_whitelist", avctx->protocol_whitelist, 0)) < 0)
149             goto end;
150         ret = avio_open2(&avio, lavfi->graph_filename, AVIO_FLAG_READ, &avctx->interrupt_callback, &options);
151         av_dict_set(&options, "protocol_whitelist", NULL, 0);
152         if (ret < 0)
153             goto end;
154         av_bprint_init(&graph_file_pb, 0, AV_BPRINT_SIZE_UNLIMITED);
155         ret = avio_read_to_bprint(avio, &graph_file_pb, INT_MAX);
156         avio_closep(&avio);
157         av_bprint_chars(&graph_file_pb, '\0', 1);
158         if (!ret && !av_bprint_is_complete(&graph_file_pb))
159             ret = AVERROR(ENOMEM);
160         if (ret) {
161             av_bprint_finalize(&graph_file_pb, NULL);
162             goto end;
163         }
164         if ((ret = av_bprint_finalize(&graph_file_pb, &lavfi->graph_str)))
165             goto end;
166     }
167
168     if (!lavfi->graph_str)
169         lavfi->graph_str = av_strdup(avctx->url);
170
171     /* parse the graph, create a stream for each open output */
172     if (!(lavfi->graph = avfilter_graph_alloc()))
173         FAIL(AVERROR(ENOMEM));
174
175     if ((ret = avfilter_graph_parse_ptr(lavfi->graph, lavfi->graph_str,
176                                     &input_links, &output_links, avctx)) < 0)
177         goto end;
178
179     if (input_links) {
180         av_log(avctx, AV_LOG_ERROR,
181                "Open inputs in the filtergraph are not acceptable\n");
182         FAIL(AVERROR(EINVAL));
183     }
184
185     /* count the outputs */
186     for (n = 0, inout = output_links; inout; n++, inout = inout->next);
187     lavfi->nb_sinks = n;
188
189     if (!(lavfi->sink_stream_map = av_malloc(sizeof(int) * n)))
190         FAIL(AVERROR(ENOMEM));
191     if (!(lavfi->sink_eof = av_mallocz(sizeof(int) * n)))
192         FAIL(AVERROR(ENOMEM));
193     if (!(lavfi->stream_sink_map = av_malloc(sizeof(int) * n)))
194         FAIL(AVERROR(ENOMEM));
195     if (!(lavfi->sink_stream_subcc_map = av_malloc(sizeof(int) * n)))
196         FAIL(AVERROR(ENOMEM));
197
198     for (i = 0; i < n; i++)
199         lavfi->stream_sink_map[i] = -1;
200
201     /* parse the output link names - they need to be of the form out0, out1, ...
202      * create a mapping between them and the streams */
203     for (i = 0, inout = output_links; inout; i++, inout = inout->next) {
204         int stream_idx = 0, suffix = 0, use_subcc = 0;
205         sscanf(inout->name, "out%n%d%n", &suffix, &stream_idx, &suffix);
206         if (!suffix) {
207             av_log(avctx,  AV_LOG_ERROR,
208                    "Invalid outpad name '%s'\n", inout->name);
209             FAIL(AVERROR(EINVAL));
210         }
211         if (inout->name[suffix]) {
212             if (!strcmp(inout->name + suffix, "+subcc")) {
213                 use_subcc = 1;
214             } else {
215                 av_log(avctx,  AV_LOG_ERROR,
216                        "Invalid outpad suffix '%s'\n", inout->name);
217                 FAIL(AVERROR(EINVAL));
218             }
219         }
220
221         if ((unsigned)stream_idx >= n) {
222             av_log(avctx, AV_LOG_ERROR,
223                    "Invalid index was specified in output '%s', "
224                    "must be a non-negative value < %d\n",
225                    inout->name, n);
226             FAIL(AVERROR(EINVAL));
227         }
228
229         if (lavfi->stream_sink_map[stream_idx] != -1) {
230             av_log(avctx,  AV_LOG_ERROR,
231                    "An output with stream index %d was already specified\n",
232                    stream_idx);
233             FAIL(AVERROR(EINVAL));
234         }
235         lavfi->sink_stream_map[i] = stream_idx;
236         lavfi->stream_sink_map[stream_idx] = i;
237         lavfi->sink_stream_subcc_map[i] = !!use_subcc;
238     }
239
240     /* for each open output create a corresponding stream */
241     for (i = 0, inout = output_links; inout; i++, inout = inout->next) {
242         AVStream *st;
243         if (!(st = avformat_new_stream(avctx, NULL)))
244             FAIL(AVERROR(ENOMEM));
245         st->id = i;
246     }
247
248     /* create a sink for each output and connect them to the graph */
249     lavfi->sinks = av_malloc_array(lavfi->nb_sinks, sizeof(AVFilterContext *));
250     if (!lavfi->sinks)
251         FAIL(AVERROR(ENOMEM));
252
253     for (i = 0, inout = output_links; inout; i++, inout = inout->next) {
254         AVFilterContext *sink;
255
256         type = avfilter_pad_get_type(inout->filter_ctx->output_pads, inout->pad_idx);
257
258         if (type == AVMEDIA_TYPE_VIDEO && ! buffersink ||
259             type == AVMEDIA_TYPE_AUDIO && ! abuffersink) {
260                 av_log(avctx, AV_LOG_ERROR, "Missing required buffersink filter, aborting.\n");
261                 FAIL(AVERROR_FILTER_NOT_FOUND);
262         }
263
264         if (type == AVMEDIA_TYPE_VIDEO) {
265             ret = avfilter_graph_create_filter(&sink, buffersink,
266                                                inout->name, NULL,
267                                                NULL, lavfi->graph);
268             if (ret >= 0)
269                 ret = av_opt_set_int_list(sink, "pix_fmts", pix_fmts,  AV_PIX_FMT_NONE, AV_OPT_SEARCH_CHILDREN);
270             if (ret < 0)
271                 goto end;
272         } else if (type == AVMEDIA_TYPE_AUDIO) {
273             enum AVSampleFormat sample_fmts[] = { AV_SAMPLE_FMT_U8,
274                                                   AV_SAMPLE_FMT_S16,
275                                                   AV_SAMPLE_FMT_S32,
276                                                   AV_SAMPLE_FMT_FLT,
277                                                   AV_SAMPLE_FMT_DBL, -1 };
278
279             ret = avfilter_graph_create_filter(&sink, abuffersink,
280                                                inout->name, NULL,
281                                                NULL, lavfi->graph);
282             if (ret >= 0)
283                 ret = av_opt_set_int_list(sink, "sample_fmts", sample_fmts,  AV_SAMPLE_FMT_NONE, AV_OPT_SEARCH_CHILDREN);
284             if (ret < 0)
285                 goto end;
286             ret = av_opt_set_int(sink, "all_channel_counts", 1,
287                                  AV_OPT_SEARCH_CHILDREN);
288             if (ret < 0)
289                 goto end;
290         } else {
291             av_log(avctx,  AV_LOG_ERROR,
292                    "Output '%s' is not a video or audio output, not yet supported\n", inout->name);
293             FAIL(AVERROR(EINVAL));
294         }
295
296         lavfi->sinks[i] = sink;
297         if ((ret = avfilter_link(inout->filter_ctx, inout->pad_idx, sink, 0)) < 0)
298             goto end;
299     }
300
301     /* configure the graph */
302     if ((ret = avfilter_graph_config(lavfi->graph, avctx)) < 0)
303         goto end;
304
305     if (lavfi->dump_graph) {
306         char *dump = avfilter_graph_dump(lavfi->graph, lavfi->dump_graph);
307         fputs(dump, stderr);
308         fflush(stderr);
309         av_free(dump);
310     }
311
312     /* fill each stream with the information in the corresponding sink */
313     for (i = 0; i < lavfi->nb_sinks; i++) {
314         AVFilterContext *sink = lavfi->sinks[lavfi->stream_sink_map[i]];
315         AVRational time_base = av_buffersink_get_time_base(sink);
316         AVStream *st = avctx->streams[i];
317         st->codecpar->codec_type = av_buffersink_get_type(sink);
318         avpriv_set_pts_info(st, 64, time_base.num, time_base.den);
319         if (av_buffersink_get_type(sink) == AVMEDIA_TYPE_VIDEO) {
320             st->codecpar->codec_id   = AV_CODEC_ID_RAWVIDEO;
321             st->codecpar->format     = av_buffersink_get_format(sink);
322             st->codecpar->width      = av_buffersink_get_w(sink);
323             st->codecpar->height     = av_buffersink_get_h(sink);
324             st       ->sample_aspect_ratio =
325             st->codecpar->sample_aspect_ratio = av_buffersink_get_sample_aspect_ratio(sink);
326             avctx->probesize = FFMAX(avctx->probesize,
327                                      av_buffersink_get_w(sink) * av_buffersink_get_h(sink) *
328                                      av_get_padded_bits_per_pixel(av_pix_fmt_desc_get(av_buffersink_get_format(sink))) *
329                                      30);
330         } else if (av_buffersink_get_type(sink) == AVMEDIA_TYPE_AUDIO) {
331             st->codecpar->codec_id    = av_get_pcm_codec(av_buffersink_get_format(sink), -1);
332             st->codecpar->channels    = av_buffersink_get_channels(sink);
333             st->codecpar->format      = av_buffersink_get_format(sink);
334             st->codecpar->sample_rate = av_buffersink_get_sample_rate(sink);
335             st->codecpar->channel_layout = av_buffersink_get_channel_layout(sink);
336             if (st->codecpar->codec_id == AV_CODEC_ID_NONE)
337                 av_log(avctx, AV_LOG_ERROR,
338                        "Could not find PCM codec for sample format %s.\n",
339                        av_get_sample_fmt_name(av_buffersink_get_format(sink)));
340         }
341     }
342
343     if ((ret = create_subcc_streams(avctx)) < 0)
344         goto end;
345
346     if (!(lavfi->decoded_frame = av_frame_alloc()))
347         FAIL(AVERROR(ENOMEM));
348
349 end:
350     av_free(pix_fmts);
351     avfilter_inout_free(&input_links);
352     avfilter_inout_free(&output_links);
353     if (ret < 0)
354         lavfi_read_close(avctx);
355     return ret;
356 }
357
358 static int create_subcc_packet(AVFormatContext *avctx, AVFrame *frame,
359                                int sink_idx)
360 {
361     LavfiContext *lavfi = avctx->priv_data;
362     AVFrameSideData *sd;
363     int stream_idx, i, ret;
364
365     if ((stream_idx = lavfi->sink_stream_subcc_map[sink_idx]) < 0)
366         return 0;
367     for (i = 0; i < frame->nb_side_data; i++)
368         if (frame->side_data[i]->type == AV_FRAME_DATA_A53_CC)
369             break;
370     if (i >= frame->nb_side_data)
371         return 0;
372     sd = frame->side_data[i];
373     if ((ret = av_new_packet(&lavfi->subcc_packet, sd->size)) < 0)
374         return ret;
375     memcpy(lavfi->subcc_packet.data, sd->data, sd->size);
376     lavfi->subcc_packet.stream_index = stream_idx;
377     lavfi->subcc_packet.pts = frame->pts;
378     lavfi->subcc_packet.pos = frame->pkt_pos;
379     return 0;
380 }
381
382 static int lavfi_read_packet(AVFormatContext *avctx, AVPacket *pkt)
383 {
384     LavfiContext *lavfi = avctx->priv_data;
385     double min_pts = DBL_MAX;
386     int stream_idx, min_pts_sink_idx = 0;
387     AVFrame *frame = lavfi->decoded_frame;
388     AVDictionary *frame_metadata;
389     int ret, i;
390     int size = 0;
391
392     if (lavfi->subcc_packet.size) {
393         *pkt = lavfi->subcc_packet;
394         av_init_packet(&lavfi->subcc_packet);
395         lavfi->subcc_packet.size = 0;
396         lavfi->subcc_packet.data = NULL;
397         return pkt->size;
398     }
399
400     /* iterate through all the graph sinks. Select the sink with the
401      * minimum PTS */
402     for (i = 0; i < lavfi->nb_sinks; i++) {
403         AVRational tb = av_buffersink_get_time_base(lavfi->sinks[i]);
404         double d;
405         int ret;
406
407         if (lavfi->sink_eof[i])
408             continue;
409
410         ret = av_buffersink_get_frame_flags(lavfi->sinks[i], frame,
411                                             AV_BUFFERSINK_FLAG_PEEK);
412         if (ret == AVERROR_EOF) {
413             ff_dlog(avctx, "EOF sink_idx:%d\n", i);
414             lavfi->sink_eof[i] = 1;
415             continue;
416         } else if (ret < 0)
417             return ret;
418         d = av_rescale_q_rnd(frame->pts, tb, AV_TIME_BASE_Q, AV_ROUND_NEAR_INF|AV_ROUND_PASS_MINMAX);
419         ff_dlog(avctx, "sink_idx:%d time:%f\n", i, d);
420         av_frame_unref(frame);
421
422         if (d < min_pts) {
423             min_pts = d;
424             min_pts_sink_idx = i;
425         }
426     }
427     if (min_pts == DBL_MAX)
428         return AVERROR_EOF;
429
430     ff_dlog(avctx, "min_pts_sink_idx:%i\n", min_pts_sink_idx);
431
432     av_buffersink_get_frame_flags(lavfi->sinks[min_pts_sink_idx], frame, 0);
433     stream_idx = lavfi->sink_stream_map[min_pts_sink_idx];
434
435     if (frame->width /* FIXME best way of testing a video */) {
436         size = av_image_get_buffer_size(frame->format, frame->width, frame->height, 1);
437         if ((ret = av_new_packet(pkt, size)) < 0)
438             return ret;
439
440         av_image_copy_to_buffer(pkt->data, size, (const uint8_t **)frame->data, frame->linesize,
441                                 frame->format, frame->width, frame->height, 1);
442     } else if (frame->channels /* FIXME test audio */) {
443         size = frame->nb_samples * av_get_bytes_per_sample(frame->format) *
444                                    frame->channels;
445         if ((ret = av_new_packet(pkt, size)) < 0)
446             return ret;
447         memcpy(pkt->data, frame->data[0], size);
448     }
449
450     frame_metadata = frame->metadata;
451     if (frame_metadata) {
452         uint8_t *metadata;
453         AVDictionaryEntry *e = NULL;
454         AVBPrint meta_buf;
455
456         av_bprint_init(&meta_buf, 0, AV_BPRINT_SIZE_UNLIMITED);
457         while ((e = av_dict_get(frame_metadata, "", e, AV_DICT_IGNORE_SUFFIX))) {
458             av_bprintf(&meta_buf, "%s", e->key);
459             av_bprint_chars(&meta_buf, '\0', 1);
460             av_bprintf(&meta_buf, "%s", e->value);
461             av_bprint_chars(&meta_buf, '\0', 1);
462         }
463         if (!av_bprint_is_complete(&meta_buf) ||
464             !(metadata = av_packet_new_side_data(pkt, AV_PKT_DATA_STRINGS_METADATA,
465                                                  meta_buf.len))) {
466             av_bprint_finalize(&meta_buf, NULL);
467             return AVERROR(ENOMEM);
468         }
469         memcpy(metadata, meta_buf.str, meta_buf.len);
470         av_bprint_finalize(&meta_buf, NULL);
471     }
472
473     if ((ret = create_subcc_packet(avctx, frame, min_pts_sink_idx)) < 0) {
474         av_frame_unref(frame);
475         av_packet_unref(pkt);
476         return ret;
477     }
478
479     pkt->stream_index = stream_idx;
480     pkt->pts = frame->pts;
481     pkt->pos = frame->pkt_pos;
482     pkt->size = size;
483     av_frame_unref(frame);
484     return size;
485 }
486
487 #define OFFSET(x) offsetof(LavfiContext, x)
488
489 #define DEC AV_OPT_FLAG_DECODING_PARAM
490
491 static const AVOption options[] = {
492     { "graph",     "set libavfilter graph", OFFSET(graph_str),  AV_OPT_TYPE_STRING, {.str = NULL}, 0, 0, DEC },
493     { "graph_file","set libavfilter graph filename", OFFSET(graph_filename), AV_OPT_TYPE_STRING, {.str = NULL}, 0, 0, DEC},
494     { "dumpgraph", "dump graph to stderr",  OFFSET(dump_graph), AV_OPT_TYPE_STRING, {.str = NULL}, 0, 0, DEC },
495     { NULL },
496 };
497
498 static const AVClass lavfi_class = {
499     .class_name = "lavfi indev",
500     .item_name  = av_default_item_name,
501     .option     = options,
502     .version    = LIBAVUTIL_VERSION_INT,
503     .category   = AV_CLASS_CATEGORY_DEVICE_INPUT,
504 };
505
506 AVInputFormat ff_lavfi_demuxer = {
507     .name           = "lavfi",
508     .long_name      = NULL_IF_CONFIG_SMALL("Libavfilter virtual input device"),
509     .priv_data_size = sizeof(LavfiContext),
510     .read_header    = lavfi_read_header,
511     .read_packet    = lavfi_read_packet,
512     .read_close     = lavfi_read_close,
513     .flags          = AVFMT_NOFILE,
514     .priv_class     = &lavfi_class,
515 };