lavfi/src_movie: Check pointer is not NULL before deref
[ffmpeg.git] / libavfilter / src_movie.c
1 /*
2  * Copyright (c) 2010 Stefano Sabatini
3  * Copyright (c) 2008 Victor Paesa
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 /**
23  * @file
24  * movie video source
25  *
26  * @todo use direct rendering (no allocation of a new frame)
27  * @todo support a PTS correction mechanism
28  */
29
30 #include <float.h>
31
32 #include "libavutil/attributes.h"
33 #include "libavutil/avstring.h"
34 #include "libavutil/avassert.h"
35 #include "libavutil/opt.h"
36 #include "libavutil/imgutils.h"
37 #include "libavutil/timestamp.h"
38 #include "libavformat/avformat.h"
39 #include "audio.h"
40 #include "avcodec.h"
41 #include "avfilter.h"
42 #include "formats.h"
43 #include "internal.h"
44 #include "video.h"
45
46 typedef struct {
47     AVStream *st;
48     int done;
49 } MovieStream;
50
51 typedef struct {
52     /* common A/V fields */
53     const AVClass *class;
54     int64_t seek_point;   ///< seekpoint in microseconds
55     double seek_point_d;
56     char *format_name;
57     char *file_name;
58     char *stream_specs; /**< user-provided list of streams, separated by + */
59     int stream_index; /**< for compatibility */
60     int loop_count;
61
62     AVFormatContext *format_ctx;
63     int eof;
64     AVPacket pkt, pkt0;
65     AVFrame *frame;   ///< video frame to store the decoded images in
66
67     int max_stream_index; /**< max stream # actually used for output */
68     MovieStream *st; /**< array of all streams, one per output */
69     int *out_index; /**< stream number -> output number map, or -1 */
70 } MovieContext;
71
72 #define OFFSET(x) offsetof(MovieContext, x)
73 #define FLAGS AV_OPT_FLAG_FILTERING_PARAM | AV_OPT_FLAG_AUDIO_PARAM | AV_OPT_FLAG_VIDEO_PARAM
74
75 static const AVOption movie_options[]= {
76     { "filename",     NULL,                      OFFSET(file_name),    AV_OPT_TYPE_STRING,                                    .flags = FLAGS },
77     { "format_name",  "set format name",         OFFSET(format_name),  AV_OPT_TYPE_STRING,                                    .flags = FLAGS },
78     { "f",            "set format name",         OFFSET(format_name),  AV_OPT_TYPE_STRING,                                    .flags = FLAGS },
79     { "stream_index", "set stream index",        OFFSET(stream_index), AV_OPT_TYPE_INT,    { .i64 = -1 }, -1, INT_MAX,                 FLAGS  },
80     { "si",           "set stream index",        OFFSET(stream_index), AV_OPT_TYPE_INT,    { .i64 = -1 }, -1, INT_MAX,                 FLAGS  },
81     { "seek_point",   "set seekpoint (seconds)", OFFSET(seek_point_d), AV_OPT_TYPE_DOUBLE, { .dbl =  0 },  0, (INT64_MAX-1) / 1000000, FLAGS },
82     { "sp",           "set seekpoint (seconds)", OFFSET(seek_point_d), AV_OPT_TYPE_DOUBLE, { .dbl =  0 },  0, (INT64_MAX-1) / 1000000, FLAGS },
83     { "streams",      "set streams",             OFFSET(stream_specs), AV_OPT_TYPE_STRING, {.str =  0},  CHAR_MAX, CHAR_MAX, FLAGS },
84     { "s",            "set streams",             OFFSET(stream_specs), AV_OPT_TYPE_STRING, {.str =  0},  CHAR_MAX, CHAR_MAX, FLAGS },
85     { "loop",         "set loop count",          OFFSET(loop_count),   AV_OPT_TYPE_INT,    {.i64 =  1},  0,        INT_MAX, FLAGS },
86     { NULL },
87 };
88
89 static int movie_config_output_props(AVFilterLink *outlink);
90 static int movie_request_frame(AVFilterLink *outlink);
91
92 static AVStream *find_stream(void *log, AVFormatContext *avf, const char *spec)
93 {
94     int i, ret, already = 0, stream_id = -1;
95     char type_char[2], dummy;
96     AVStream *found = NULL;
97     enum AVMediaType type;
98
99     ret = sscanf(spec, "d%1[av]%d%c", type_char, &stream_id, &dummy);
100     if (ret >= 1 && ret <= 2) {
101         type = type_char[0] == 'v' ? AVMEDIA_TYPE_VIDEO : AVMEDIA_TYPE_AUDIO;
102         ret = av_find_best_stream(avf, type, stream_id, -1, NULL, 0);
103         if (ret < 0) {
104             av_log(log, AV_LOG_ERROR, "No %s stream with index '%d' found\n",
105                    av_get_media_type_string(type), stream_id);
106             return NULL;
107         }
108         return avf->streams[ret];
109     }
110     for (i = 0; i < avf->nb_streams; i++) {
111         ret = avformat_match_stream_specifier(avf, avf->streams[i], spec);
112         if (ret < 0) {
113             av_log(log, AV_LOG_ERROR,
114                    "Invalid stream specifier \"%s\"\n", spec);
115             return NULL;
116         }
117         if (!ret)
118             continue;
119         if (avf->streams[i]->discard != AVDISCARD_ALL) {
120             already++;
121             continue;
122         }
123         if (found) {
124             av_log(log, AV_LOG_WARNING,
125                    "Ambiguous stream specifier \"%s\", using #%d\n", spec, i);
126             break;
127         }
128         found = avf->streams[i];
129     }
130     if (!found) {
131         av_log(log, AV_LOG_WARNING, "Stream specifier \"%s\" %s\n", spec,
132                already ? "matched only already used streams" :
133                          "did not match any stream");
134         return NULL;
135     }
136     if (found->codec->codec_type != AVMEDIA_TYPE_VIDEO &&
137         found->codec->codec_type != AVMEDIA_TYPE_AUDIO) {
138         av_log(log, AV_LOG_ERROR, "Stream specifier \"%s\" matched a %s stream,"
139                "currently unsupported by libavfilter\n", spec,
140                av_get_media_type_string(found->codec->codec_type));
141         return NULL;
142     }
143     return found;
144 }
145
146 static int open_stream(void *log, MovieStream *st)
147 {
148     AVCodec *codec;
149     int ret;
150
151     codec = avcodec_find_decoder(st->st->codec->codec_id);
152     if (!codec) {
153         av_log(log, AV_LOG_ERROR, "Failed to find any codec\n");
154         return AVERROR(EINVAL);
155     }
156
157     st->st->codec->refcounted_frames = 1;
158
159     if ((ret = avcodec_open2(st->st->codec, codec, NULL)) < 0) {
160         av_log(log, AV_LOG_ERROR, "Failed to open codec\n");
161         return ret;
162     }
163
164     return 0;
165 }
166
167 static int guess_channel_layout(MovieStream *st, int st_index, void *log_ctx)
168 {
169     AVCodecContext *dec_ctx = st->st->codec;
170     char buf[256];
171     int64_t chl = av_get_default_channel_layout(dec_ctx->channels);
172
173     if (!chl) {
174         av_log(log_ctx, AV_LOG_ERROR,
175                "Channel layout is not set in stream %d, and could not "
176                "be guessed from the number of channels (%d)\n",
177                st_index, dec_ctx->channels);
178         return AVERROR(EINVAL);
179     }
180
181     av_get_channel_layout_string(buf, sizeof(buf), dec_ctx->channels, chl);
182     av_log(log_ctx, AV_LOG_WARNING,
183            "Channel layout is not set in output stream %d, "
184            "guessed channel layout is '%s'\n",
185            st_index, buf);
186     dec_ctx->channel_layout = chl;
187     return 0;
188 }
189
190 static av_cold int movie_common_init(AVFilterContext *ctx)
191 {
192     MovieContext *movie = ctx->priv;
193     AVInputFormat *iformat = NULL;
194     int64_t timestamp;
195     int nb_streams, ret, i;
196     char default_streams[16], *stream_specs, *spec, *cursor;
197     char name[16];
198     AVStream *st;
199
200     if (!movie->file_name) {
201         av_log(ctx, AV_LOG_ERROR, "No filename provided!\n");
202         return AVERROR(EINVAL);
203     }
204
205     movie->seek_point = movie->seek_point_d * 1000000 + 0.5;
206
207     stream_specs = movie->stream_specs;
208     if (!stream_specs) {
209         snprintf(default_streams, sizeof(default_streams), "d%c%d",
210                  !strcmp(ctx->filter->name, "amovie") ? 'a' : 'v',
211                  movie->stream_index);
212         stream_specs = default_streams;
213     }
214     for (cursor = stream_specs, nb_streams = 1; *cursor; cursor++)
215         if (*cursor == '+')
216             nb_streams++;
217
218     if (movie->loop_count != 1 && nb_streams != 1) {
219         av_log(ctx, AV_LOG_ERROR,
220                "Loop with several streams is currently unsupported\n");
221         return AVERROR_PATCHWELCOME;
222     }
223
224     av_register_all();
225
226     // Try to find the movie format (container)
227     iformat = movie->format_name ? av_find_input_format(movie->format_name) : NULL;
228
229     movie->format_ctx = NULL;
230     if ((ret = avformat_open_input(&movie->format_ctx, movie->file_name, iformat, NULL)) < 0) {
231         av_log(ctx, AV_LOG_ERROR,
232                "Failed to avformat_open_input '%s'\n", movie->file_name);
233         return ret;
234     }
235     if ((ret = avformat_find_stream_info(movie->format_ctx, NULL)) < 0)
236         av_log(ctx, AV_LOG_WARNING, "Failed to find stream info\n");
237
238     // if seeking requested, we execute it
239     if (movie->seek_point > 0) {
240         timestamp = movie->seek_point;
241         // add the stream start time, should it exist
242         if (movie->format_ctx->start_time != AV_NOPTS_VALUE) {
243             if (timestamp > INT64_MAX - movie->format_ctx->start_time) {
244                 av_log(ctx, AV_LOG_ERROR,
245                        "%s: seek value overflow with start_time:%"PRId64" seek_point:%"PRId64"\n",
246                        movie->file_name, movie->format_ctx->start_time, movie->seek_point);
247                 return AVERROR(EINVAL);
248             }
249             timestamp += movie->format_ctx->start_time;
250         }
251         if ((ret = av_seek_frame(movie->format_ctx, -1, timestamp, AVSEEK_FLAG_BACKWARD)) < 0) {
252             av_log(ctx, AV_LOG_ERROR, "%s: could not seek to position %"PRId64"\n",
253                    movie->file_name, timestamp);
254             return ret;
255         }
256     }
257
258     for (i = 0; i < movie->format_ctx->nb_streams; i++)
259         movie->format_ctx->streams[i]->discard = AVDISCARD_ALL;
260
261     movie->st = av_calloc(nb_streams, sizeof(*movie->st));
262     if (!movie->st)
263         return AVERROR(ENOMEM);
264
265     for (i = 0; i < nb_streams; i++) {
266         spec = av_strtok(stream_specs, "+", &cursor);
267         if (!spec)
268             return AVERROR_BUG;
269         stream_specs = NULL; /* for next strtok */
270         st = find_stream(ctx, movie->format_ctx, spec);
271         if (!st)
272             return AVERROR(EINVAL);
273         st->discard = AVDISCARD_DEFAULT;
274         movie->st[i].st = st;
275         movie->max_stream_index = FFMAX(movie->max_stream_index, st->index);
276     }
277     if (av_strtok(NULL, "+", &cursor))
278         return AVERROR_BUG;
279
280     movie->out_index = av_calloc(movie->max_stream_index + 1,
281                                  sizeof(*movie->out_index));
282     if (!movie->out_index)
283         return AVERROR(ENOMEM);
284     for (i = 0; i <= movie->max_stream_index; i++)
285         movie->out_index[i] = -1;
286     for (i = 0; i < nb_streams; i++)
287         movie->out_index[movie->st[i].st->index] = i;
288
289     for (i = 0; i < nb_streams; i++) {
290         AVFilterPad pad = { 0 };
291         snprintf(name, sizeof(name), "out%d", i);
292         pad.type          = movie->st[i].st->codec->codec_type;
293         pad.name          = av_strdup(name);
294         pad.config_props  = movie_config_output_props;
295         pad.request_frame = movie_request_frame;
296         ff_insert_outpad(ctx, i, &pad);
297         ret = open_stream(ctx, &movie->st[i]);
298         if (ret < 0)
299             return ret;
300         if ( movie->st[i].st->codec->codec->type == AVMEDIA_TYPE_AUDIO &&
301             !movie->st[i].st->codec->channel_layout) {
302             ret = guess_channel_layout(&movie->st[i], i, ctx);
303             if (ret < 0)
304                 return ret;
305         }
306     }
307
308     av_log(ctx, AV_LOG_VERBOSE, "seek_point:%"PRIi64" format_name:%s file_name:%s stream_index:%d\n",
309            movie->seek_point, movie->format_name, movie->file_name,
310            movie->stream_index);
311
312     return 0;
313 }
314
315 static av_cold void movie_uninit(AVFilterContext *ctx)
316 {
317     MovieContext *movie = ctx->priv;
318     int i;
319
320     for (i = 0; i < ctx->nb_outputs; i++) {
321         av_freep(&ctx->output_pads[i].name);
322         if (movie->st[i].st)
323             avcodec_close(movie->st[i].st->codec);
324     }
325     av_freep(&movie->file_name);
326     av_freep(&movie->st);
327     av_freep(&movie->out_index);
328     av_frame_free(&movie->frame);
329     if (movie->format_ctx)
330         avformat_close_input(&movie->format_ctx);
331 }
332
333 static int movie_query_formats(AVFilterContext *ctx)
334 {
335     MovieContext *movie = ctx->priv;
336     int list[] = { 0, -1 };
337     int64_t list64[] = { 0, -1 };
338     int i;
339
340     for (i = 0; i < ctx->nb_outputs; i++) {
341         MovieStream *st = &movie->st[i];
342         AVCodecContext *c = st->st->codec;
343         AVFilterLink *outlink = ctx->outputs[i];
344
345         switch (c->codec_type) {
346         case AVMEDIA_TYPE_VIDEO:
347             list[0] = c->pix_fmt;
348             ff_formats_ref(ff_make_format_list(list), &outlink->in_formats);
349             break;
350         case AVMEDIA_TYPE_AUDIO:
351             list[0] = c->sample_fmt;
352             ff_formats_ref(ff_make_format_list(list), &outlink->in_formats);
353             list[0] = c->sample_rate;
354             ff_formats_ref(ff_make_format_list(list), &outlink->in_samplerates);
355             list64[0] = c->channel_layout;
356             ff_channel_layouts_ref(avfilter_make_format64_list(list64),
357                                    &outlink->in_channel_layouts);
358             break;
359         }
360     }
361
362     return 0;
363 }
364
365 static int movie_config_output_props(AVFilterLink *outlink)
366 {
367     AVFilterContext *ctx = outlink->src;
368     MovieContext *movie  = ctx->priv;
369     unsigned out_id = FF_OUTLINK_IDX(outlink);
370     MovieStream *st = &movie->st[out_id];
371     AVCodecContext *c = st->st->codec;
372
373     outlink->time_base = st->st->time_base;
374
375     switch (c->codec_type) {
376     case AVMEDIA_TYPE_VIDEO:
377         outlink->w          = c->width;
378         outlink->h          = c->height;
379         outlink->frame_rate = st->st->r_frame_rate;
380         break;
381     case AVMEDIA_TYPE_AUDIO:
382         break;
383     }
384
385     return 0;
386 }
387
388 static char *describe_frame_to_str(char *dst, size_t dst_size,
389                                     AVFrame *frame,
390                                     AVFilterLink *link)
391 {
392     switch (frame->type) {
393     case AVMEDIA_TYPE_VIDEO:
394         snprintf(dst, dst_size,
395                  "video pts:%s time:%s size:%dx%d aspect:%d/%d",
396                  av_ts2str(frame->pts), av_ts2timestr(frame->pts, &link->time_base),
397                  frame->width, frame->height,
398                  frame->sample_aspect_ratio.num,
399                  frame->sample_aspect_ratio.den);
400                  break;
401     case AVMEDIA_TYPE_AUDIO:
402         snprintf(dst, dst_size,
403                  "audio pts:%s time:%s samples:%d",
404                  av_ts2str(frame->pts), av_ts2timestr(frame->pts, &link->time_base),
405                  frame->nb_samples);
406                  break;
407     default:
408         snprintf(dst, dst_size, "%s BUG", av_get_media_type_string(frame->type));
409         break;
410     }
411     return dst;
412 }
413
414 #define describe_frameref(f, link) \
415     describe_frame_to_str((char[1024]){0}, 1024, f, link)
416
417 static int rewind_file(AVFilterContext *ctx)
418 {
419     MovieContext *movie = ctx->priv;
420     int64_t timestamp = movie->seek_point;
421     int ret, i;
422
423     if (movie->format_ctx->start_time != AV_NOPTS_VALUE)
424         timestamp += movie->format_ctx->start_time;
425     ret = av_seek_frame(movie->format_ctx, -1, timestamp, AVSEEK_FLAG_BACKWARD);
426     if (ret < 0) {
427         av_log(ctx, AV_LOG_ERROR, "Unable to loop: %s\n", av_err2str(ret));
428         movie->loop_count = 1; /* do not try again */
429         return ret;
430     }
431
432     for (i = 0; i < ctx->nb_outputs; i++) {
433         avcodec_flush_buffers(movie->st[i].st->codec);
434         movie->st[i].done = 0;
435     }
436     movie->eof = 0;
437     return 0;
438 }
439
440 /**
441  * Try to push a frame to the requested output.
442  *
443  * @param ctx     filter context
444  * @param out_id  number of output where a frame is wanted;
445  *                if the frame is read from file, used to set the return value;
446  *                if the codec is being flushed, flush the corresponding stream
447  * @return  1 if a frame was pushed on the requested output,
448  *          0 if another attempt is possible,
449  *          <0 AVERROR code
450  */
451 static int movie_push_frame(AVFilterContext *ctx, unsigned out_id)
452 {
453     MovieContext *movie = ctx->priv;
454     AVPacket *pkt = &movie->pkt;
455     MovieStream *st;
456     int ret, got_frame = 0, pkt_out_id;
457     AVFilterLink *outlink;
458
459     if (!pkt->size) {
460         if (movie->eof) {
461             if (movie->st[out_id].done) {
462                 if (movie->loop_count != 1) {
463                     ret = rewind_file(ctx);
464                     if (ret < 0)
465                         return ret;
466                     movie->loop_count -= movie->loop_count > 1;
467                     av_log(ctx, AV_LOG_VERBOSE, "Stream finished, looping.\n");
468                     return 0; /* retry */
469                 }
470                 return AVERROR_EOF;
471             }
472             pkt->stream_index = movie->st[out_id].st->index;
473             /* packet is already ready for flushing */
474         } else {
475             ret = av_read_frame(movie->format_ctx, &movie->pkt0);
476             if (ret < 0) {
477                 av_init_packet(&movie->pkt0); /* ready for flushing */
478                 *pkt = movie->pkt0;
479                 if (ret == AVERROR_EOF) {
480                     movie->eof = 1;
481                     return 0; /* start flushing */
482                 }
483                 return ret;
484             }
485             *pkt = movie->pkt0;
486         }
487     }
488
489     pkt_out_id = pkt->stream_index > movie->max_stream_index ? -1 :
490                  movie->out_index[pkt->stream_index];
491     if (pkt_out_id < 0) {
492         av_free_packet(&movie->pkt0);
493         pkt->size = 0; /* ready for next run */
494         pkt->data = NULL;
495         return 0;
496     }
497     st = &movie->st[pkt_out_id];
498     outlink = ctx->outputs[pkt_out_id];
499
500     movie->frame = av_frame_alloc();
501     if (!movie->frame)
502         return AVERROR(ENOMEM);
503
504     switch (st->st->codec->codec_type) {
505     case AVMEDIA_TYPE_VIDEO:
506         ret = avcodec_decode_video2(st->st->codec, movie->frame, &got_frame, pkt);
507         break;
508     case AVMEDIA_TYPE_AUDIO:
509         ret = avcodec_decode_audio4(st->st->codec, movie->frame, &got_frame, pkt);
510         break;
511     default:
512         ret = AVERROR(ENOSYS);
513         break;
514     }
515     if (ret < 0) {
516         av_log(ctx, AV_LOG_WARNING, "Decode error: %s\n", av_err2str(ret));
517         av_frame_free(&movie->frame);
518         return 0;
519     }
520     if (!ret)
521         ret = pkt->size;
522
523     pkt->data += ret;
524     pkt->size -= ret;
525     if (pkt->size <= 0) {
526         av_free_packet(&movie->pkt0);
527         pkt->size = 0; /* ready for next run */
528         pkt->data = NULL;
529     }
530     if (!got_frame) {
531         if (!ret)
532             st->done = 1;
533         av_frame_free(&movie->frame);
534         return 0;
535     }
536
537     av_dlog(ctx, "movie_push_frame(): file:'%s' %s\n", movie->file_name,
538             describe_frameref(movie->frame, outlink));
539
540     movie->frame->pts = av_frame_get_best_effort_timestamp(movie->frame);
541     ret = ff_filter_frame(outlink, movie->frame);
542     movie->frame = NULL;
543
544     if (ret < 0)
545         return ret;
546     return pkt_out_id == out_id;
547 }
548
549 static int movie_request_frame(AVFilterLink *outlink)
550 {
551     AVFilterContext *ctx = outlink->src;
552     unsigned out_id = FF_OUTLINK_IDX(outlink);
553     int ret;
554
555     while (1) {
556         ret = movie_push_frame(ctx, out_id);
557         if (ret)
558             return FFMIN(ret, 0);
559     }
560 }
561
562 #if CONFIG_MOVIE_FILTER
563
564 AVFILTER_DEFINE_CLASS(movie);
565
566 static av_cold int movie_init(AVFilterContext *ctx)
567 {
568     return movie_common_init(ctx);
569 }
570
571 AVFilter avfilter_avsrc_movie = {
572     .name          = "movie",
573     .description   = NULL_IF_CONFIG_SMALL("Read from a movie source."),
574     .priv_size     = sizeof(MovieContext),
575     .priv_class    = &movie_class,
576     .init          = movie_init,
577     .uninit        = movie_uninit,
578     .query_formats = movie_query_formats,
579
580     .inputs    = NULL,
581     .outputs   = NULL,
582     .flags     = AVFILTER_FLAG_DYNAMIC_OUTPUTS,
583 };
584
585 #endif  /* CONFIG_MOVIE_FILTER */
586
587 #if CONFIG_AMOVIE_FILTER
588
589 #define amovie_options movie_options
590 AVFILTER_DEFINE_CLASS(amovie);
591
592 static av_cold int amovie_init(AVFilterContext *ctx)
593 {
594     return movie_common_init(ctx);
595 }
596
597 AVFilter avfilter_avsrc_amovie = {
598     .name          = "amovie",
599     .description   = NULL_IF_CONFIG_SMALL("Read audio from a movie source."),
600     .priv_size     = sizeof(MovieContext),
601     .init          = amovie_init,
602     .uninit        = movie_uninit,
603     .query_formats = movie_query_formats,
604
605     .inputs     = NULL,
606     .outputs    = NULL,
607     .priv_class = &amovie_class,
608     .flags      = AVFILTER_FLAG_DYNAMIC_OUTPUTS,
609 };
610
611 #endif /* CONFIG_AMOVIE_FILTER */