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