Merge commit '36ef5369ee9b336febc2c270f8718cec4476cb85'
[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     int img_count;
50     int is_pipe;
51     int split_planes;       /**< use independent file for each Y, U, V plane */
52     char path[1024];
53     char *pixel_format;     /**< Set by a private option. */
54     char *video_size;       /**< Set by a private option. */
55     char *framerate;        /**< Set by a private option. */
56     int loop;
57     int use_glob;
58 #if HAVE_GLOB
59     glob_t globstate;
60 #endif
61     int start_number;
62     int start_number_range;
63 } VideoDemuxData;
64
65 static const int sizes[][2] = {
66     { 640, 480 },
67     { 720, 480 },
68     { 720, 576 },
69     { 352, 288 },
70     { 352, 240 },
71     { 160, 128 },
72     { 512, 384 },
73     { 640, 352 },
74     { 640, 240 },
75 };
76
77 static int infer_size(int *width_ptr, int *height_ptr, int size)
78 {
79     int i;
80
81     for(i=0;i<FF_ARRAY_ELEMS(sizes);i++) {
82         if ((sizes[i][0] * sizes[i][1]) == size) {
83             *width_ptr = sizes[i][0];
84             *height_ptr = sizes[i][1];
85             return 0;
86         }
87     }
88     return -1;
89 }
90
91 static int is_glob(const char *path)
92 {
93 #if HAVE_GLOB
94     size_t span = 0;
95     const char *p = path;
96
97     while (p = strchr(p, '%')) {
98         if (*(++p) == '%') {
99             ++p;
100             continue;
101         }
102         if (span = strspn(p, "*?[]{}"))
103             break;
104     }
105     /* Did we hit a glob char or get to the end? */
106     return span != 0;
107 #else
108     return 0;
109 #endif
110 }
111
112 /**
113  * Get index range of image files matched by path.
114  *
115  * @param pfirst_index pointer to index updated with the first number in the range
116  * @param plast_index  pointer to index updated with the last number in the range
117  * @param path         path which has to be matched by the image files in the range
118  * @param start_index  minimum accepted value for the first index in the range
119  * @return -1 if no image file could be found
120  */
121 static int find_image_range(int *pfirst_index, int *plast_index,
122                             const char *path, int start_index, int start_index_range)
123 {
124     char buf[1024];
125     int range, last_index, range1, first_index;
126
127     /* find the first image */
128     for (first_index = start_index; first_index < start_index + start_index_range; first_index++) {
129         if (av_get_frame_filename(buf, sizeof(buf), path, first_index) < 0){
130             *pfirst_index =
131             *plast_index = 1;
132             if (avio_check(buf, AVIO_FLAG_READ) > 0)
133                 return 0;
134             return -1;
135         }
136         if (avio_check(buf, AVIO_FLAG_READ) > 0)
137             break;
138     }
139     if (first_index == start_index + start_index_range)
140         goto fail;
141
142     /* find the last image */
143     last_index = first_index;
144     for(;;) {
145         range = 0;
146         for(;;) {
147             if (!range)
148                 range1 = 1;
149             else
150                 range1 = 2 * range;
151             if (av_get_frame_filename(buf, sizeof(buf), path,
152                                       last_index + range1) < 0)
153                 goto fail;
154             if (avio_check(buf, AVIO_FLAG_READ) <= 0)
155                 break;
156             range = range1;
157             /* just in case... */
158             if (range >= (1 << 30))
159                 goto fail;
160         }
161         /* we are sure than image last_index + range exists */
162         if (!range)
163             break;
164         last_index += range;
165     }
166     *pfirst_index = first_index;
167     *plast_index = last_index;
168     return 0;
169  fail:
170     return -1;
171 }
172
173
174 static int read_probe(AVProbeData *p)
175 {
176     if (p->filename && ff_guess_image2_codec(p->filename)) {
177         if (av_filename_number_test(p->filename))
178             return AVPROBE_SCORE_MAX;
179         else if (is_glob(p->filename))
180             return AVPROBE_SCORE_MAX;
181         else
182             return AVPROBE_SCORE_MAX/2;
183     }
184     return 0;
185 }
186
187 static int read_header(AVFormatContext *s1)
188 {
189     VideoDemuxData *s = s1->priv_data;
190     int first_index, last_index, ret = 0;
191     int width = 0, height = 0;
192     AVStream *st;
193     enum PixelFormat pix_fmt = PIX_FMT_NONE;
194     AVRational framerate;
195
196     s1->ctx_flags |= AVFMTCTX_NOHEADER;
197
198     st = avformat_new_stream(s1, NULL);
199     if (!st) {
200         return AVERROR(ENOMEM);
201     }
202
203     if (s->pixel_format && (pix_fmt = av_get_pix_fmt(s->pixel_format)) == PIX_FMT_NONE) {
204         av_log(s1, AV_LOG_ERROR, "No such pixel format: %s.\n", s->pixel_format);
205         return AVERROR(EINVAL);
206     }
207     if (s->video_size && (ret = av_parse_video_size(&width, &height, s->video_size)) < 0) {
208         av_log(s, AV_LOG_ERROR, "Could not parse video size: %s.\n", s->video_size);
209         return ret;
210     }
211     if ((ret = av_parse_video_rate(&framerate, s->framerate)) < 0) {
212         av_log(s, AV_LOG_ERROR, "Could not parse framerate: %s.\n", s->framerate);
213         return ret;
214     }
215
216     av_strlcpy(s->path, s1->filename, sizeof(s->path));
217     s->img_number = 0;
218     s->img_count = 0;
219
220     /* find format */
221     if (s1->iformat->flags & AVFMT_NOFILE)
222         s->is_pipe = 0;
223     else{
224         s->is_pipe = 1;
225         st->need_parsing = AVSTREAM_PARSE_FULL;
226     }
227
228     avpriv_set_pts_info(st, 60, framerate.den, framerate.num);
229
230     if (width && height) {
231         st->codec->width  = width;
232         st->codec->height = height;
233     }
234
235     if (!s->is_pipe) {
236         s->use_glob = is_glob(s->path);
237         if (s->use_glob) {
238 #if HAVE_GLOB
239             char *p = s->path, *q, *dup;
240             int gerr;
241
242             dup = q = av_strdup(p);
243             while (*q) {
244                 /* Do we have room for the next char and a \ insertion? */
245                 if ((p - s->path) >= (sizeof(s->path) - 2))
246                   break;
247                 if (*q == '%' && strspn(q + 1, "%*?[]{}"))
248                     ++q;
249                 else if (strspn(q, "\\*?[]{}"))
250                     *p++ = '\\';
251                 *p++ = *q++;
252             }
253             *p = 0;
254             av_free(dup);
255
256             gerr = glob(s->path, GLOB_NOCHECK|GLOB_BRACE|GLOB_NOMAGIC, NULL, &s->globstate);
257             if (gerr != 0) {
258                 return AVERROR(ENOENT);
259             }
260             first_index = 0;
261             last_index = s->globstate.gl_pathc - 1;
262 #endif
263         } else {
264             if (find_image_range(&first_index, &last_index, s->path,
265                                  s->start_number, s->start_number_range) < 0) {
266                 av_log(s1, AV_LOG_ERROR,
267                        "Could find no file with with path '%s' and index in the range %d-%d\n",
268                        s->path, s->start_number, s->start_number + s->start_number_range - 1);
269                 return AVERROR(ENOENT);
270             }
271         }
272         s->img_first = first_index;
273         s->img_last = last_index;
274         s->img_number = first_index;
275         /* compute duration */
276         st->start_time = 0;
277         st->duration = last_index - first_index + 1;
278     }
279
280     if(s1->video_codec_id){
281         st->codec->codec_type = AVMEDIA_TYPE_VIDEO;
282         st->codec->codec_id = s1->video_codec_id;
283     }else if(s1->audio_codec_id){
284         st->codec->codec_type = AVMEDIA_TYPE_AUDIO;
285         st->codec->codec_id = s1->audio_codec_id;
286     }else{
287         const char *str= strrchr(s->path, '.');
288         s->split_planes = str && !av_strcasecmp(str + 1, "y");
289         st->codec->codec_type = AVMEDIA_TYPE_VIDEO;
290         st->codec->codec_id = ff_guess_image2_codec(s->path);
291         if (st->codec->codec_id == AV_CODEC_ID_LJPEG)
292             st->codec->codec_id = AV_CODEC_ID_MJPEG;
293     }
294     if(st->codec->codec_type == AVMEDIA_TYPE_VIDEO && pix_fmt != PIX_FMT_NONE)
295         st->codec->pix_fmt = pix_fmt;
296
297     return 0;
298 }
299
300 static int read_packet(AVFormatContext *s1, AVPacket *pkt)
301 {
302     VideoDemuxData *s = s1->priv_data;
303     char filename_bytes[1024];
304     char *filename = filename_bytes;
305     int i;
306     int size[3]={0}, ret[3]={0};
307     AVIOContext *f[3];
308     AVCodecContext *codec= s1->streams[0]->codec;
309
310     if (!s->is_pipe) {
311         /* loop over input */
312         if (s->loop && s->img_number > s->img_last) {
313             s->img_number = s->img_first;
314         }
315         if (s->img_number > s->img_last)
316             return AVERROR_EOF;
317         if (s->use_glob) {
318 #if HAVE_GLOB
319             filename = s->globstate.gl_pathv[s->img_number];
320 #endif
321         } else {
322         if (av_get_frame_filename(filename_bytes, sizeof(filename_bytes),
323                                   s->path, s->img_number)<0 && s->img_number > 1)
324             return AVERROR(EIO);
325         }
326         for(i=0; i<3; i++){
327             if (avio_open2(&f[i], filename, AVIO_FLAG_READ,
328                            &s1->interrupt_callback, NULL) < 0) {
329                 if(i==1)
330                     break;
331                 av_log(s1, AV_LOG_ERROR, "Could not open file : %s\n",filename);
332                 return AVERROR(EIO);
333             }
334             size[i]= avio_size(f[i]);
335
336             if(!s->split_planes)
337                 break;
338             filename[ strlen(filename) - 1 ]= 'U' + i;
339         }
340
341         if(codec->codec_id == AV_CODEC_ID_RAWVIDEO && !codec->width)
342             infer_size(&codec->width, &codec->height, size[0]);
343     } else {
344         f[0] = s1->pb;
345         if (url_feof(f[0]))
346             return AVERROR(EIO);
347         size[0]= 4096;
348     }
349
350     av_new_packet(pkt, size[0] + size[1] + size[2]);
351     pkt->stream_index = 0;
352     pkt->flags |= AV_PKT_FLAG_KEY;
353
354     pkt->size= 0;
355     for(i=0; i<3; i++){
356         if(size[i]){
357             ret[i]= avio_read(f[i], pkt->data + pkt->size, size[i]);
358             if (!s->is_pipe)
359                 avio_close(f[i]);
360             if(ret[i]>0)
361                 pkt->size += ret[i];
362         }
363     }
364
365     if (ret[0] <= 0 || ret[1]<0 || ret[2]<0) {
366         av_free_packet(pkt);
367         return AVERROR(EIO); /* signal EOF */
368     } else {
369         s->img_count++;
370         s->img_number++;
371         return 0;
372     }
373 }
374
375 static int read_close(struct AVFormatContext* s1)
376 {
377     VideoDemuxData *s = s1->priv_data;
378 #if HAVE_GLOB
379     if (s->use_glob) {
380         globfree(&s->globstate);
381     }
382 #endif
383     return 0;
384 }
385
386 #define OFFSET(x) offsetof(VideoDemuxData, x)
387 #define DEC AV_OPT_FLAG_DECODING_PARAM
388 static const AVOption options[] = {
389     { "framerate",    "set the video framerate",             OFFSET(framerate),    AV_OPT_TYPE_STRING, {.str = "25"}, 0, 0, DEC },
390     { "loop",         "force loop over input file sequence", OFFSET(loop),         AV_OPT_TYPE_INT,    {.dbl = 0},    0, 1, DEC },
391     { "pixel_format", "set video pixel format",              OFFSET(pixel_format), AV_OPT_TYPE_STRING, {.str = NULL}, 0, 0, DEC },
392     { "start_number", "set first number in the sequence",    OFFSET(start_number), AV_OPT_TYPE_INT,    {.dbl = 0},    0, INT_MAX, DEC },
393     { "start_number_range", "set range for looking at the first sequence number", OFFSET(start_number_range), AV_OPT_TYPE_INT, {.dbl = 5}, 1, INT_MAX, DEC },
394     { "video_size",   "set video size",                      OFFSET(video_size),   AV_OPT_TYPE_STRING, {.str = NULL}, 0, 0, DEC },
395     { NULL },
396 };
397
398 #if CONFIG_IMAGE2_DEMUXER
399 static const AVClass img2_class = {
400     .class_name = "image2 demuxer",
401     .item_name  = av_default_item_name,
402     .option     = options,
403     .version    = LIBAVUTIL_VERSION_INT,
404 };
405 AVInputFormat ff_image2_demuxer = {
406     .name           = "image2",
407     .long_name      = NULL_IF_CONFIG_SMALL("image2 sequence"),
408     .priv_data_size = sizeof(VideoDemuxData),
409     .read_probe     = read_probe,
410     .read_header    = read_header,
411     .read_packet    = read_packet,
412     .read_close     = read_close,
413     .flags          = AVFMT_NOFILE,
414     .priv_class     = &img2_class,
415 };
416 #endif
417 #if CONFIG_IMAGE2PIPE_DEMUXER
418 static const AVClass img2pipe_class = {
419     .class_name = "image2pipe demuxer",
420     .item_name  = av_default_item_name,
421     .option     = options,
422     .version    = LIBAVUTIL_VERSION_INT,
423 };
424 AVInputFormat ff_image2pipe_demuxer = {
425     .name           = "image2pipe",
426     .long_name      = NULL_IF_CONFIG_SMALL("piped image2 sequence"),
427     .priv_data_size = sizeof(VideoDemuxData),
428     .read_header    = read_header,
429     .read_packet    = read_packet,
430     .priv_class     = &img2pipe_class,
431 };
432 #endif