ff_read_timestamp: check stream_index before using it as array index
[ffmpeg.git] / libavformat / img2dec.c
1 /*
2  * Image format
3  * Copyright (c) 2000, 2001, 2002 Fabrice Bellard
4  * Copyright (c) 2004 Michael Niedermayer
5  *
6  * This file is part of FFmpeg.
7  *
8  * FFmpeg is free software; you can redistribute it and/or
9  * modify it under the terms of the GNU Lesser General Public
10  * License as published by the Free Software Foundation; either
11  * version 2.1 of the License, or (at your option) any later version.
12  *
13  * FFmpeg is distributed in the hope that it will be useful,
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
16  * Lesser General Public License for more details.
17  *
18  * You should have received a copy of the GNU Lesser General Public
19  * License along with FFmpeg; if not, write to the Free Software
20  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
21  */
22
23 #include "libavutil/avstring.h"
24 #include "libavutil/log.h"
25 #include "libavutil/opt.h"
26 #include "libavutil/pixdesc.h"
27 #include "libavutil/parseutils.h"
28 #include "avformat.h"
29 #include "internal.h"
30 #if HAVE_GLOB
31 #include <glob.h>
32
33 /* Locally define as 0 (bitwise-OR no-op) any missing glob options that
34    are non-posix glibc/bsd extensions. */
35 #ifndef GLOB_NOMAGIC
36 #define GLOB_NOMAGIC 0
37 #endif
38 #ifndef GLOB_BRACE
39 #define GLOB_BRACE 0
40 #endif
41
42 #endif /* HAVE_GLOB */
43
44 typedef struct {
45     const AVClass *class;  /**< Class for private options. */
46     int img_first;
47     int img_last;
48     int img_number;
49     int64_t pts;
50     int img_count;
51     int is_pipe;
52     int split_planes;       /**< use independent file for each Y, U, V plane */
53     char path[1024];
54     char *pixel_format;     /**< Set by a private option. */
55     char *video_size;       /**< Set by a private option. */
56     char *framerate;        /**< Set by a private option. */
57     int loop;
58     enum { PT_GLOB_SEQUENCE, PT_GLOB, PT_SEQUENCE } pattern_type;
59     int use_glob;
60 #if HAVE_GLOB
61     glob_t globstate;
62 #endif
63     int start_number;
64     int start_number_range;
65     int frame_size;
66 } VideoDemuxData;
67
68 static const int sizes[][2] = {
69     { 640, 480 },
70     { 720, 480 },
71     { 720, 576 },
72     { 352, 288 },
73     { 352, 240 },
74     { 160, 128 },
75     { 512, 384 },
76     { 640, 352 },
77     { 640, 240 },
78 };
79
80 static int infer_size(int *width_ptr, int *height_ptr, int size)
81 {
82     int i;
83
84     for (i = 0; i < FF_ARRAY_ELEMS(sizes); i++) {
85         if ((sizes[i][0] * sizes[i][1]) == size) {
86             *width_ptr  = sizes[i][0];
87             *height_ptr = sizes[i][1];
88             return 0;
89         }
90     }
91
92     return -1;
93 }
94
95 static int is_glob(const char *path)
96 {
97 #if HAVE_GLOB
98     size_t span = 0;
99     const char *p = path;
100
101     while (p = strchr(p, '%')) {
102         if (*(++p) == '%') {
103             ++p;
104             continue;
105         }
106         if (span = strspn(p, "*?[]{}"))
107             break;
108     }
109     /* Did we hit a glob char or get to the end? */
110     return span != 0;
111 #else
112     return 0;
113 #endif
114 }
115
116 /**
117  * Get index range of image files matched by path.
118  *
119  * @param pfirst_index pointer to index updated with the first number in the range
120  * @param plast_index  pointer to index updated with the last number in the range
121  * @param path         path which has to be matched by the image files in the range
122  * @param start_index  minimum accepted value for the first index in the range
123  * @return -1 if no image file could be found
124  */
125 static int find_image_range(int *pfirst_index, int *plast_index,
126                             const char *path, int start_index, int start_index_range)
127 {
128     char buf[1024];
129     int range, last_index, range1, first_index;
130
131     /* find the first image */
132     for (first_index = start_index; first_index < start_index + start_index_range; first_index++) {
133         if (av_get_frame_filename(buf, sizeof(buf), path, first_index) < 0) {
134             *pfirst_index =
135             *plast_index  = 1;
136             if (avio_check(buf, AVIO_FLAG_READ) > 0)
137                 return 0;
138             return -1;
139         }
140         if (avio_check(buf, AVIO_FLAG_READ) > 0)
141             break;
142     }
143     if (first_index == start_index + start_index_range)
144         goto fail;
145
146     /* find the last image */
147     last_index = first_index;
148     for (;;) {
149         range = 0;
150         for (;;) {
151             if (!range)
152                 range1 = 1;
153             else
154                 range1 = 2 * range;
155             if (av_get_frame_filename(buf, sizeof(buf), path,
156                                       last_index + range1) < 0)
157                 goto fail;
158             if (avio_check(buf, AVIO_FLAG_READ) <= 0)
159                 break;
160             range = range1;
161             /* just in case... */
162             if (range >= (1 << 30))
163                 goto fail;
164         }
165         /* we are sure than image last_index + range exists */
166         if (!range)
167             break;
168         last_index += range;
169     }
170     *pfirst_index = first_index;
171     *plast_index  = last_index;
172     return 0;
173
174 fail:
175     return -1;
176 }
177
178 static int img_read_probe(AVProbeData *p)
179 {
180     if (p->filename && ff_guess_image2_codec(p->filename)) {
181         if (av_filename_number_test(p->filename))
182             return AVPROBE_SCORE_MAX;
183         else if (is_glob(p->filename))
184             return AVPROBE_SCORE_MAX;
185         else if (av_match_ext(p->filename, "raw") || av_match_ext(p->filename, "gif"))
186             return 5;
187         else
188             return AVPROBE_SCORE_MAX / 2;
189     }
190     return 0;
191 }
192
193 static int img_read_header(AVFormatContext *s1)
194 {
195     VideoDemuxData *s = s1->priv_data;
196     int first_index, last_index, ret = 0;
197     int width = 0, height = 0;
198     AVStream *st;
199     enum AVPixelFormat pix_fmt = AV_PIX_FMT_NONE;
200     AVRational framerate;
201
202     s1->ctx_flags |= AVFMTCTX_NOHEADER;
203
204     st = avformat_new_stream(s1, NULL);
205     if (!st) {
206         return AVERROR(ENOMEM);
207     }
208
209     if (s->pixel_format &&
210         (pix_fmt = av_get_pix_fmt(s->pixel_format)) == AV_PIX_FMT_NONE) {
211         av_log(s1, AV_LOG_ERROR, "No such pixel format: %s.\n",
212                s->pixel_format);
213         return AVERROR(EINVAL);
214     }
215     if (s->video_size &&
216         (ret = av_parse_video_size(&width, &height, s->video_size)) < 0) {
217         av_log(s, AV_LOG_ERROR,
218                "Could not parse video size: %s.\n", s->video_size);
219         return ret;
220     }
221     if ((ret = av_parse_video_rate(&framerate, s->framerate)) < 0) {
222         av_log(s, AV_LOG_ERROR,
223                "Could not parse framerate: %s.\n", s->framerate);
224         return ret;
225     }
226
227     av_strlcpy(s->path, s1->filename, sizeof(s->path));
228     s->img_number = 0;
229     s->img_count  = 0;
230
231     /* find format */
232     if (s1->iformat->flags & AVFMT_NOFILE)
233         s->is_pipe = 0;
234     else {
235         s->is_pipe       = 1;
236         st->need_parsing = AVSTREAM_PARSE_FULL;
237     }
238
239     avpriv_set_pts_info(st, 60, framerate.den, framerate.num);
240
241     if (width && height) {
242         st->codec->width  = width;
243         st->codec->height = height;
244     }
245
246     if (!s->is_pipe) {
247         if (s->pattern_type == PT_GLOB_SEQUENCE) {
248         s->use_glob = is_glob(s->path);
249         if (s->use_glob) {
250             char *p = s->path, *q, *dup;
251             int gerr;
252
253             av_log(s1, AV_LOG_WARNING, "Pattern type 'glob_sequence' is deprecated: "
254                    "use pattern_type 'glob' instead\n");
255 #if HAVE_GLOB
256             dup = q = av_strdup(p);
257             while (*q) {
258                 /* Do we have room for the next char and a \ insertion? */
259                 if ((p - s->path) >= (sizeof(s->path) - 2))
260                   break;
261                 if (*q == '%' && strspn(q + 1, "%*?[]{}"))
262                     ++q;
263                 else if (strspn(q, "\\*?[]{}"))
264                     *p++ = '\\';
265                 *p++ = *q++;
266             }
267             *p = 0;
268             av_free(dup);
269
270             gerr = glob(s->path, GLOB_NOCHECK|GLOB_BRACE|GLOB_NOMAGIC, NULL, &s->globstate);
271             if (gerr != 0) {
272                 return AVERROR(ENOENT);
273             }
274             first_index = 0;
275             last_index = s->globstate.gl_pathc - 1;
276 #endif
277         }
278         }
279         if ((s->pattern_type == PT_GLOB_SEQUENCE && !s->use_glob) || s->pattern_type == PT_SEQUENCE) {
280             if (find_image_range(&first_index, &last_index, s->path,
281                                  s->start_number, s->start_number_range) < 0) {
282                 av_log(s1, AV_LOG_ERROR,
283                        "Could find no file with with path '%s' and index in the range %d-%d\n",
284                        s->path, s->start_number, s->start_number + s->start_number_range - 1);
285                 return AVERROR(ENOENT);
286             }
287         } else if (s->pattern_type == PT_GLOB) {
288 #if HAVE_GLOB
289             int gerr;
290             gerr = glob(s->path, GLOB_NOCHECK|GLOB_BRACE|GLOB_NOMAGIC, NULL, &s->globstate);
291             if (gerr != 0) {
292                 return AVERROR(ENOENT);
293             }
294             first_index = 0;
295             last_index = s->globstate.gl_pathc - 1;
296             s->use_glob = 1;
297 #else
298             av_log(s1, AV_LOG_ERROR,
299                    "Pattern type 'glob' was selected but globbing "
300                    "is not supported by this libavformat build\n");
301             return AVERROR(ENOSYS);
302 #endif
303         } else if (s->pattern_type != PT_GLOB_SEQUENCE) {
304             av_log(s1, AV_LOG_ERROR,
305                    "Unknown value '%d' for pattern_type option\n", s->pattern_type);
306             return AVERROR(EINVAL);
307         }
308         s->img_first  = first_index;
309         s->img_last   = last_index;
310         s->img_number = first_index;
311         /* compute duration */
312         st->start_time = 0;
313         st->duration   = last_index - first_index + 1;
314     }
315
316     if (s1->video_codec_id) {
317         st->codec->codec_type = AVMEDIA_TYPE_VIDEO;
318         st->codec->codec_id   = s1->video_codec_id;
319     } else if (s1->audio_codec_id) {
320         st->codec->codec_type = AVMEDIA_TYPE_AUDIO;
321         st->codec->codec_id   = s1->audio_codec_id;
322     } else {
323         const char *str = strrchr(s->path, '.');
324         s->split_planes       = str && !av_strcasecmp(str + 1, "y");
325         st->codec->codec_type = AVMEDIA_TYPE_VIDEO;
326         st->codec->codec_id   = ff_guess_image2_codec(s->path);
327         if (st->codec->codec_id == AV_CODEC_ID_LJPEG)
328             st->codec->codec_id = AV_CODEC_ID_MJPEG;
329     }
330     if (st->codec->codec_type == AVMEDIA_TYPE_VIDEO &&
331         pix_fmt != AV_PIX_FMT_NONE)
332         st->codec->pix_fmt = pix_fmt;
333
334     return 0;
335 }
336
337 static int img_read_packet(AVFormatContext *s1, AVPacket *pkt)
338 {
339     VideoDemuxData *s = s1->priv_data;
340     char filename_bytes[1024];
341     char *filename = filename_bytes;
342     int i;
343     int size[3]           = { 0 }, ret[3] = { 0 };
344     AVIOContext *f[3]     = { NULL };
345     AVCodecContext *codec = s1->streams[0]->codec;
346
347     if (!s->is_pipe) {
348         /* loop over input */
349         if (s->loop && s->img_number > s->img_last) {
350             s->img_number = s->img_first;
351         }
352         if (s->img_number > s->img_last)
353             return AVERROR_EOF;
354         if (s->use_glob) {
355 #if HAVE_GLOB
356             filename = s->globstate.gl_pathv[s->img_number];
357 #endif
358         } else {
359         if (av_get_frame_filename(filename_bytes, sizeof(filename_bytes),
360                                   s->path,
361                                   s->img_number) < 0 && s->img_number > 1)
362             return AVERROR(EIO);
363         }
364         for (i = 0; i < 3; i++) {
365             if (avio_open2(&f[i], filename, AVIO_FLAG_READ,
366                            &s1->interrupt_callback, NULL) < 0) {
367                 if (i >= 1)
368                     break;
369                 av_log(s1, AV_LOG_ERROR, "Could not open file : %s\n",
370                        filename);
371                 return AVERROR(EIO);
372             }
373             size[i] = avio_size(f[i]);
374
375             if (!s->split_planes)
376                 break;
377             filename[strlen(filename) - 1] = 'U' + i;
378         }
379
380         if (codec->codec_id == AV_CODEC_ID_RAWVIDEO && !codec->width)
381             infer_size(&codec->width, &codec->height, size[0]);
382     } else {
383         f[0] = s1->pb;
384         if (url_feof(f[0]))
385             return AVERROR(EIO);
386         if (s->frame_size > 0) {
387             size[0] = s->frame_size;
388         } else {
389             size[0] = 4096;
390         }
391     }
392
393     if (av_new_packet(pkt, size[0] + size[1] + size[2]) < 0)
394         return AVERROR(ENOMEM);
395     pkt->stream_index = 0;
396     pkt->flags       |= AV_PKT_FLAG_KEY;
397     if (!s->is_pipe)
398         pkt->pts      = s->pts;
399
400     pkt->size = 0;
401     for (i = 0; i < 3; i++) {
402         if (f[i]) {
403             ret[i] = avio_read(f[i], pkt->data + pkt->size, size[i]);
404             if (!s->is_pipe)
405                 avio_close(f[i]);
406             if (ret[i] > 0)
407                 pkt->size += ret[i];
408         }
409     }
410
411     if (ret[0] <= 0 || ret[1] < 0 || ret[2] < 0) {
412         av_free_packet(pkt);
413         return AVERROR(EIO); /* signal EOF */
414     } else {
415         s->img_count++;
416         s->img_number++;
417         s->pts++;
418         return 0;
419     }
420 }
421
422 static int img_read_close(struct AVFormatContext* s1)
423 {
424     VideoDemuxData *s = s1->priv_data;
425 #if HAVE_GLOB
426     if (s->use_glob) {
427         globfree(&s->globstate);
428     }
429 #endif
430     return 0;
431 }
432
433 static int img_read_seek(AVFormatContext *s, int stream_index, int64_t timestamp, int flags)
434 {
435     VideoDemuxData *s1 = s->priv_data;
436
437     if (timestamp < 0 || !s1->loop && timestamp > s1->img_last - s1->img_first)
438         return -1;
439     s1->img_number = timestamp%(s1->img_last - s1->img_first + 1) + s1->img_first;
440     s1->pts = timestamp;
441     return 0;
442 }
443
444 #define OFFSET(x) offsetof(VideoDemuxData, x)
445 #define DEC AV_OPT_FLAG_DECODING_PARAM
446 static const AVOption options[] = {
447     { "framerate",    "set the video framerate",             OFFSET(framerate),    AV_OPT_TYPE_STRING, {.str = "25"}, 0, 0,       DEC },
448     { "loop",         "force loop over input file sequence", OFFSET(loop),         AV_OPT_TYPE_INT,    {.i64 = 0   }, 0, 1,       DEC },
449
450     { "pattern_type", "set pattern type",                    OFFSET(pattern_type), AV_OPT_TYPE_INT,    {.i64=PT_GLOB_SEQUENCE}, 0,       INT_MAX, DEC, "pattern_type"},
451     { "glob_sequence","select glob/sequence pattern type",   0, AV_OPT_TYPE_CONST,  {.i64=PT_GLOB_SEQUENCE}, INT_MIN, INT_MAX, DEC, "pattern_type" },
452     { "glob",         "select glob pattern type",            0, AV_OPT_TYPE_CONST,  {.i64=PT_GLOB         }, INT_MIN, INT_MAX, DEC, "pattern_type" },
453     { "sequence",     "select sequence pattern type",        0, AV_OPT_TYPE_CONST,  {.i64=PT_SEQUENCE     }, INT_MIN, INT_MAX, DEC, "pattern_type" },
454
455     { "pixel_format", "set video pixel format",              OFFSET(pixel_format), AV_OPT_TYPE_STRING, {.str = NULL}, 0, 0,       DEC },
456     { "start_number", "set first number in the sequence",    OFFSET(start_number), AV_OPT_TYPE_INT,    {.i64 = 0   }, 0, INT_MAX, DEC },
457     { "start_number_range", "set range for looking at the first sequence number", OFFSET(start_number_range), AV_OPT_TYPE_INT, {.i64 = 5}, 1, INT_MAX, DEC },
458     { "video_size",   "set video size",                      OFFSET(video_size),   AV_OPT_TYPE_STRING, {.str = NULL}, 0, 0,       DEC },
459     { "frame_size",   "force frame size in bytes",           OFFSET(frame_size),   AV_OPT_TYPE_INT,    {.i64 = 0   }, 0, INT_MAX, DEC },
460     { NULL },
461 };
462
463 #if CONFIG_IMAGE2_DEMUXER
464 static const AVClass img2_class = {
465     .class_name = "image2 demuxer",
466     .item_name  = av_default_item_name,
467     .option     = options,
468     .version    = LIBAVUTIL_VERSION_INT,
469 };
470 AVInputFormat ff_image2_demuxer = {
471     .name           = "image2",
472     .long_name      = NULL_IF_CONFIG_SMALL("image2 sequence"),
473     .priv_data_size = sizeof(VideoDemuxData),
474     .read_probe     = img_read_probe,
475     .read_header    = img_read_header,
476     .read_packet    = img_read_packet,
477     .read_close     = img_read_close,
478     .read_seek      = img_read_seek,
479     .flags          = AVFMT_NOFILE,
480     .priv_class     = &img2_class,
481 };
482 #endif
483 #if CONFIG_IMAGE2PIPE_DEMUXER
484 static const AVClass img2pipe_class = {
485     .class_name = "image2pipe demuxer",
486     .item_name  = av_default_item_name,
487     .option     = options,
488     .version    = LIBAVUTIL_VERSION_INT,
489 };
490 AVInputFormat ff_image2pipe_demuxer = {
491     .name           = "image2pipe",
492     .long_name      = NULL_IF_CONFIG_SMALL("piped image2 sequence"),
493     .priv_data_size = sizeof(VideoDemuxData),
494     .read_header    = img_read_header,
495     .read_packet    = img_read_packet,
496     .priv_class     = &img2pipe_class,
497 };
498 #endif