lavfi.c 18.5 KB
Newer Older
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27
/*
 * Copyright (c) 2011 Stefano Sabatini
 *
 * This file is part of FFmpeg.
 *
 * FFmpeg is free software; you can redistribute it and/or
 * modify it under the terms of the GNU Lesser General Public
 * License as published by the Free Software Foundation; either
 * version 2.1 of the License, or (at your option) any later version.
 *
 * FFmpeg is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 * Lesser General Public License for more details.
 *
 * You should have received a copy of the GNU Lesser General Public
 * License along with FFmpeg; if not, write to the Free Software
 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
 */

/**
 * @file
 * libavfilter virtual input device
 */

/* #define DEBUG */

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 36 37 38 39 40 41
#include "libavutil/log.h"
#include "libavutil/mem.h"
#include "libavutil/opt.h"
#include "libavutil/parseutils.h"
#include "libavutil/pixdesc.h"
#include "libavfilter/avfilter.h"
#include "libavfilter/avfiltergraph.h"
42
#include "libavfilter/buffersink.h"
43
#include "libavformat/avio_internal.h"
44
#include "libavformat/internal.h"
45 46 47 48 49
#include "avdevice.h"

typedef struct {
    AVClass *class;          ///< class for private options
    char          *graph_str;
50
    char          *graph_filename;
51
    char          *dump_graph;
52 53 54
    AVFilterGraph *graph;
    AVFilterContext **sinks;
    int *sink_stream_map;
55
    int *sink_eof;
56
    int *stream_sink_map;
57
    int *sink_stream_subcc_map;
58
    AVFrame *decoded_frame;
59 60
    int nb_sinks;
    AVPacket subcc_packet;
61 62 63 64 65 66
} LavfiContext;

static int *create_all_formats(int n)
{
    int i, j, *fmts, count = 0;

67 68
    for (i = 0; i < n; i++) {
        const AVPixFmtDescriptor *desc = av_pix_fmt_desc_get(i);
69
        if (!(desc->flags & AV_PIX_FMT_FLAG_HWACCEL))
70
            count++;
71
    }
72 73 74 75

    if (!(fmts = av_malloc((count+1) * sizeof(int))))
        return NULL;
    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 79 80 81 82 83 84 85 86 87 88
            fmts[j++] = i;
    }
    fmts[j] = -1;
    return fmts;
}

av_cold static int lavfi_read_close(AVFormatContext *avctx)
{
    LavfiContext *lavfi = avctx->priv_data;

    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 97 98

    return 0;
}

99 100 101 102 103 104 105 106 107 108 109 110
static int create_subcc_streams(AVFormatContext *avctx)
{
    LavfiContext *lavfi = avctx->priv_data;
    AVStream *st;
    int stream_idx, sink_idx;

    for (stream_idx = 0; stream_idx < lavfi->nb_sinks; stream_idx++) {
        sink_idx = lavfi->stream_sink_map[stream_idx];
        if (lavfi->sink_stream_subcc_map[sink_idx]) {
            lavfi->sink_stream_subcc_map[sink_idx] = avctx->nb_streams;
            if (!(st = avformat_new_stream(avctx, NULL)))
                return AVERROR(ENOMEM);
111 112
            st->codecpar->codec_id = AV_CODEC_ID_EIA_608;
            st->codecpar->codec_type = AVMEDIA_TYPE_SUBTITLE;
113 114 115 116 117 118 119
        } else {
            lavfi->sink_stream_subcc_map[sink_idx] = -1;
        }
    }
    return 0;
}

120
av_cold static int lavfi_read_header(AVFormatContext *avctx)
121 122 123
{
    LavfiContext *lavfi = avctx->priv_data;
    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 128 129 130
    int ret = 0, i, n;

#define FAIL(ERR) { ret = ERR; goto end; }

131 132 133
    if (!pix_fmts)
        FAIL(AVERROR(ENOMEM));

134 135
    avfilter_register_all();

136 137
    buffersink = avfilter_get_by_name("buffersink");
    abuffersink = avfilter_get_by_name("abuffersink");
138

139 140 141
    if (lavfi->graph_filename && lavfi->graph_str) {
        av_log(avctx, AV_LOG_ERROR,
               "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 147
        AVBPrint graph_file_pb;
        AVIOContext *avio = NULL;
148 149 150 151 152
        AVDictionary *options = NULL;
        if (avctx->protocol_whitelist && (ret = av_dict_set(&options, "protocol_whitelist", avctx->protocol_whitelist, 0)) < 0)
            goto end;
        ret = avio_open2(&avio, lavfi->graph_filename, AVIO_FLAG_READ, &avctx->interrupt_callback, &options);
        av_dict_set(&options, "protocol_whitelist", NULL, 0);
153
        if (ret < 0)
154
            goto end;
155 156
        av_bprint_init(&graph_file_pb, 0, AV_BPRINT_SIZE_UNLIMITED);
        ret = avio_read_to_bprint(avio, &graph_file_pb, INT_MAX);
157
        avio_closep(&avio);
158 159 160 161 162
        av_bprint_chars(&graph_file_pb, '\0', 1);
        if (!ret && !av_bprint_is_complete(&graph_file_pb))
            ret = AVERROR(ENOMEM);
        if (ret) {
            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 170 171 172 173 174 175
    if (!lavfi->graph_str)
        lavfi->graph_str = av_strdup(avctx->filename);

    /* parse the graph, create a stream for each open output */
    if (!(lavfi->graph = avfilter_graph_alloc()))
        FAIL(AVERROR(ENOMEM));

176
    if ((ret = avfilter_graph_parse_ptr(lavfi->graph, lavfi->graph_str,
177
                                    &input_links, &output_links, avctx)) < 0)
178
        goto end;
179 180 181 182 183 184 185 186 187

    if (input_links) {
        av_log(avctx, AV_LOG_ERROR,
               "Open inputs in the filtergraph are not acceptable\n");
        FAIL(AVERROR(EINVAL));
    }

    /* count the outputs */
    for (n = 0, inout = output_links; inout; n++, inout = inout->next);
188
    lavfi->nb_sinks = n;
189 190 191

    if (!(lavfi->sink_stream_map = av_malloc(sizeof(int) * n)))
        FAIL(AVERROR(ENOMEM));
192 193
    if (!(lavfi->sink_eof = av_mallocz(sizeof(int) * n)))
        FAIL(AVERROR(ENOMEM));
194 195
    if (!(lavfi->stream_sink_map = av_malloc(sizeof(int) * n)))
        FAIL(AVERROR(ENOMEM));
196 197
    if (!(lavfi->sink_stream_subcc_map = av_malloc(sizeof(int) * n)))
        FAIL(AVERROR(ENOMEM));
198 199 200 201 202 203 204

    for (i = 0; i < n; i++)
        lavfi->stream_sink_map[i] = -1;

    /* parse the output link names - they need to be of the form out0, out1, ...
     * create a mapping between them and the streams */
    for (i = 0, inout = output_links; inout; i++, inout = inout->next) {
205 206 207
        int stream_idx = 0, suffix = 0, use_subcc = 0;
        sscanf(inout->name, "out%n%d%n", &suffix, &stream_idx, &suffix);
        if (!suffix) {
208 209 210 211
            av_log(avctx,  AV_LOG_ERROR,
                   "Invalid outpad name '%s'\n", inout->name);
            FAIL(AVERROR(EINVAL));
        }
212 213 214 215 216 217 218 219 220
        if (inout->name[suffix]) {
            if (!strcmp(inout->name + suffix, "+subcc")) {
                use_subcc = 1;
            } else {
                av_log(avctx,  AV_LOG_ERROR,
                       "Invalid outpad suffix '%s'\n", inout->name);
                FAIL(AVERROR(EINVAL));
            }
        }
221 222 223 224 225 226 227 228 229 230 231

        if ((unsigned)stream_idx >= n) {
            av_log(avctx, AV_LOG_ERROR,
                   "Invalid index was specified in output '%s', "
                   "must be a non-negative value < %d\n",
                   inout->name, n);
            FAIL(AVERROR(EINVAL));
        }

        if (lavfi->stream_sink_map[stream_idx] != -1) {
            av_log(avctx,  AV_LOG_ERROR,
232
                   "An output with stream index %d was already specified\n",
233 234 235 236 237
                   stream_idx);
            FAIL(AVERROR(EINVAL));
        }
        lavfi->sink_stream_map[i] = stream_idx;
        lavfi->stream_sink_map[stream_idx] = i;
238
        lavfi->sink_stream_subcc_map[i] = !!use_subcc;
239 240 241 242 243
    }

    /* for each open output create a corresponding stream */
    for (i = 0, inout = output_links; inout; i++, inout = inout->next) {
        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 252 253 254 255
    if (!lavfi->sinks)
        FAIL(AVERROR(ENOMEM));

    for (i = 0, inout = output_links; inout; i++, inout = inout->next) {
        AVFilterContext *sink;
256

257
        type = avfilter_pad_get_type(inout->filter_ctx->output_pads, inout->pad_idx);
258 259 260 261 262 263 264 265

        if (type == AVMEDIA_TYPE_VIDEO && ! buffersink ||
            type == AVMEDIA_TYPE_AUDIO && ! abuffersink) {
                av_log(avctx, AV_LOG_ERROR, "Missing required buffersink filter, aborting.\n");
                FAIL(AVERROR_FILTER_NOT_FOUND);
        }

        if (type == AVMEDIA_TYPE_VIDEO) {
266 267
            ret = avfilter_graph_create_filter(&sink, buffersink,
                                               inout->name, NULL,
268
                                               NULL, lavfi->graph);
269 270
            if (ret >= 0)
                ret = av_opt_set_int_list(sink, "pix_fmts", pix_fmts,  AV_PIX_FMT_NONE, AV_OPT_SEARCH_CHILDREN);
271 272
            if (ret < 0)
                goto end;
273
        } else if (type == AVMEDIA_TYPE_AUDIO) {
274 275 276 277 278
            enum AVSampleFormat sample_fmts[] = { AV_SAMPLE_FMT_U8,
                                                  AV_SAMPLE_FMT_S16,
                                                  AV_SAMPLE_FMT_S32,
                                                  AV_SAMPLE_FMT_FLT,
                                                  AV_SAMPLE_FMT_DBL, -1 };
279 280 281

            ret = avfilter_graph_create_filter(&sink, abuffersink,
                                               inout->name, NULL,
282
                                               NULL, lavfi->graph);
283 284
            if (ret >= 0)
                ret = av_opt_set_int_list(sink, "sample_fmts", sample_fmts,  AV_SAMPLE_FMT_NONE, AV_OPT_SEARCH_CHILDREN);
285 286
            if (ret < 0)
                goto end;
287 288 289 290
            ret = av_opt_set_int(sink, "all_channel_counts", 1,
                                 AV_OPT_SEARCH_CHILDREN);
            if (ret < 0)
                goto end;
291 292 293 294
        } else {
            av_log(avctx,  AV_LOG_ERROR,
                   "Output '%s' is not a video or audio output, not yet supported\n", inout->name);
            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 303
    }

    /* configure the graph */
    if ((ret = avfilter_graph_config(lavfi->graph, avctx)) < 0)
304
        goto end;
305

306 307 308 309 310 311 312
    if (lavfi->dump_graph) {
        char *dump = avfilter_graph_dump(lavfi->graph, lavfi->dump_graph);
        fputs(dump, stderr);
        fflush(stderr);
        av_free(dump);
    }

313
    /* fill each stream with the information in the corresponding sink */
314
    for (i = 0; i < lavfi->nb_sinks; i++) {
315 316
        AVFilterContext *sink = lavfi->sinks[lavfi->stream_sink_map[i]];
        AVRational time_base = av_buffersink_get_time_base(sink);
317
        AVStream *st = avctx->streams[i];
318 319 320
        st->codecpar->codec_type = av_buffersink_get_type(sink);
        avpriv_set_pts_info(st, 64, time_base.num, time_base.den);
        if (av_buffersink_get_type(sink) == AVMEDIA_TYPE_VIDEO) {
321
            st->codecpar->codec_id   = AV_CODEC_ID_RAWVIDEO;
322 323 324
            st->codecpar->format     = av_buffersink_get_format(sink);
            st->codecpar->width      = av_buffersink_get_w(sink);
            st->codecpar->height     = av_buffersink_get_h(sink);
325
            st       ->sample_aspect_ratio =
326
            st->codecpar->sample_aspect_ratio = av_buffersink_get_sample_aspect_ratio(sink);
327
            avctx->probesize = FFMAX(avctx->probesize,
328 329
                                     av_buffersink_get_w(sink) * av_buffersink_get_h(sink) *
                                     av_get_padded_bits_per_pixel(av_pix_fmt_desc_get(av_buffersink_get_format(sink))) *
330
                                     30);
331 332 333 334 335 336
        } else if (av_buffersink_get_type(sink) == AVMEDIA_TYPE_AUDIO) {
            st->codecpar->codec_id    = av_get_pcm_codec(av_buffersink_get_format(sink), -1);
            st->codecpar->channels    = av_buffersink_get_channels(sink);
            st->codecpar->format      = av_buffersink_get_format(sink);
            st->codecpar->sample_rate = av_buffersink_get_sample_rate(sink);
            st->codecpar->channel_layout = av_buffersink_get_channel_layout(sink);
337
            if (st->codecpar->codec_id == AV_CODEC_ID_NONE)
338 339
                av_log(avctx, AV_LOG_ERROR,
                       "Could not find PCM codec for sample format %s.\n",
340
                       av_get_sample_fmt_name(av_buffersink_get_format(sink)));
341 342 343
        }
    }

344
    if ((ret = create_subcc_streams(avctx)) < 0)
345
        goto end;
346

347 348 349
    if (!(lavfi->decoded_frame = av_frame_alloc()))
        FAIL(AVERROR(ENOMEM));

350
end:
351
    av_free(pix_fmts);
352 353 354 355 356 357 358
    avfilter_inout_free(&input_links);
    avfilter_inout_free(&output_links);
    if (ret < 0)
        lavfi_read_close(avctx);
    return ret;
}

359 360 361 362 363 364 365 366 367 368 369 370 371 372 373 374 375 376 377 378 379 380 381 382
static int create_subcc_packet(AVFormatContext *avctx, AVFrame *frame,
                               int sink_idx)
{
    LavfiContext *lavfi = avctx->priv_data;
    AVFrameSideData *sd;
    int stream_idx, i, ret;

    if ((stream_idx = lavfi->sink_stream_subcc_map[sink_idx]) < 0)
        return 0;
    for (i = 0; i < frame->nb_side_data; i++)
        if (frame->side_data[i]->type == AV_FRAME_DATA_A53_CC)
            break;
    if (i >= frame->nb_side_data)
        return 0;
    sd = frame->side_data[i];
    if ((ret = av_new_packet(&lavfi->subcc_packet, sd->size)) < 0)
        return ret;
    memcpy(lavfi->subcc_packet.data, sd->data, sd->size);
    lavfi->subcc_packet.stream_index = stream_idx;
    lavfi->subcc_packet.pts = frame->pts;
    lavfi->subcc_packet.pos = av_frame_get_pkt_pos(frame);
    return 0;
}

383 384 385 386
static int lavfi_read_packet(AVFormatContext *avctx, AVPacket *pkt)
{
    LavfiContext *lavfi = avctx->priv_data;
    double min_pts = DBL_MAX;
387
    int stream_idx, min_pts_sink_idx = 0;
388 389
    AVFrame *frame = lavfi->decoded_frame;
    AVDictionary *frame_metadata;
390 391
    int ret, i;
    int size = 0;
392

393 394 395 396 397 398 399 400
    if (lavfi->subcc_packet.size) {
        *pkt = lavfi->subcc_packet;
        av_init_packet(&lavfi->subcc_packet);
        lavfi->subcc_packet.size = 0;
        lavfi->subcc_packet.data = NULL;
        return pkt->size;
    }

401 402
    /* iterate through all the graph sinks. Select the sink with the
     * minimum PTS */
403
    for (i = 0; i < lavfi->nb_sinks; i++) {
404
        AVRational tb = av_buffersink_get_time_base(lavfi->sinks[i]);
405
        double d;
406 407 408 409 410
        int ret;

        if (lavfi->sink_eof[i])
            continue;

411 412
        ret = av_buffersink_get_frame_flags(lavfi->sinks[i], frame,
                                            AV_BUFFERSINK_FLAG_PEEK);
413
        if (ret == AVERROR_EOF) {
414
            ff_dlog(avctx, "EOF sink_idx:%d\n", i);
415 416 417
            lavfi->sink_eof[i] = 1;
            continue;
        } else if (ret < 0)
418
            return ret;
419
        d = av_rescale_q_rnd(frame->pts, tb, AV_TIME_BASE_Q, AV_ROUND_NEAR_INF|AV_ROUND_PASS_MINMAX);
420
        ff_dlog(avctx, "sink_idx:%d time:%f\n", i, d);
421
        av_frame_unref(frame);
422

423 424 425 426 427
        if (d < min_pts) {
            min_pts = d;
            min_pts_sink_idx = i;
        }
    }
428 429 430
    if (min_pts == DBL_MAX)
        return AVERROR_EOF;

431
    ff_dlog(avctx, "min_pts_sink_idx:%i\n", min_pts_sink_idx);
432

433
    av_buffersink_get_frame_flags(lavfi->sinks[min_pts_sink_idx], frame, 0);
434
    stream_idx = lavfi->sink_stream_map[min_pts_sink_idx];
435

436
    if (frame->width /* FIXME best way of testing a video */) {
437
        size = av_image_get_buffer_size(frame->format, frame->width, frame->height, 1);
438 439
        if ((ret = av_new_packet(pkt, size)) < 0)
            return ret;
440

441 442
        av_image_copy_to_buffer(pkt->data, size, (const uint8_t **)frame->data, frame->linesize,
                                frame->format, frame->width, frame->height, 1);
443 444 445
    } else if (av_frame_get_channels(frame) /* FIXME test audio */) {
        size = frame->nb_samples * av_get_bytes_per_sample(frame->format) *
                                   av_frame_get_channels(frame);
446 447
        if ((ret = av_new_packet(pkt, size)) < 0)
            return ret;
448
        memcpy(pkt->data, frame->data[0], size);
449
    }
450

451 452
    frame_metadata = av_frame_get_metadata(frame);
    if (frame_metadata) {
453 454 455 456 457
        uint8_t *metadata;
        AVDictionaryEntry *e = NULL;
        AVBPrint meta_buf;

        av_bprint_init(&meta_buf, 0, AV_BPRINT_SIZE_UNLIMITED);
458
        while ((e = av_dict_get(frame_metadata, "", e, AV_DICT_IGNORE_SUFFIX))) {
459 460 461 462 463 464 465 466 467 468 469 470 471 472 473
            av_bprintf(&meta_buf, "%s", e->key);
            av_bprint_chars(&meta_buf, '\0', 1);
            av_bprintf(&meta_buf, "%s", e->value);
            av_bprint_chars(&meta_buf, '\0', 1);
        }
        if (!av_bprint_is_complete(&meta_buf) ||
            !(metadata = av_packet_new_side_data(pkt, AV_PKT_DATA_STRINGS_METADATA,
                                                 meta_buf.len))) {
            av_bprint_finalize(&meta_buf, NULL);
            return AVERROR(ENOMEM);
        }
        memcpy(metadata, meta_buf.str, meta_buf.len);
        av_bprint_finalize(&meta_buf, NULL);
    }

474 475 476 477 478 479
    if ((ret = create_subcc_packet(avctx, frame, min_pts_sink_idx)) < 0) {
        av_frame_unref(frame);
        av_packet_unref(pkt);
        return ret;
    }

480
    pkt->stream_index = stream_idx;
481 482
    pkt->pts = frame->pts;
    pkt->pos = av_frame_get_pkt_pos(frame);
483
    pkt->size = size;
484
    av_frame_unref(frame);
485 486 487 488 489 490 491 492
    return size;
}

#define OFFSET(x) offsetof(LavfiContext, x)

#define DEC AV_OPT_FLAG_DECODING_PARAM

static const AVOption options[] = {
493
    { "graph",     "set libavfilter graph", OFFSET(graph_str),  AV_OPT_TYPE_STRING, {.str = NULL}, 0, 0, DEC },
494
    { "graph_file","set libavfilter graph filename", OFFSET(graph_filename), AV_OPT_TYPE_STRING, {.str = NULL}, 0, 0, DEC},
495
    { "dumpgraph", "dump graph to stderr",  OFFSET(dump_graph), AV_OPT_TYPE_STRING, {.str = NULL}, 0, 0, DEC },
496 497 498 499 500 501 502 503
    { NULL },
};

static const AVClass lavfi_class = {
    .class_name = "lavfi indev",
    .item_name  = av_default_item_name,
    .option     = options,
    .version    = LIBAVUTIL_VERSION_INT,
504
    .category   = AV_CLASS_CATEGORY_DEVICE_INPUT,
505 506 507 508 509 510 511 512 513 514 515 516
};

AVInputFormat ff_lavfi_demuxer = {
    .name           = "lavfi",
    .long_name      = NULL_IF_CONFIG_SMALL("Libavfilter virtual input device"),
    .priv_data_size = sizeof(LavfiContext),
    .read_header    = lavfi_read_header,
    .read_packet    = lavfi_read_packet,
    .read_close     = lavfi_read_close,
    .flags          = AVFMT_NOFILE,
    .priv_class     = &lavfi_class,
};