avformat: Use avio_open2, pass the AVFormatContext interrupt_callback onwards
[platform/upstream/libav.git] / libavformat / img2.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 Libav.
7  *
8  * Libav 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  * Libav 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 Libav; 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/intreadwrite.h"
24 #include "libavutil/avstring.h"
25 #include "libavutil/log.h"
26 #include "libavutil/opt.h"
27 #include "libavutil/pixdesc.h"
28 #include "libavutil/parseutils.h"
29 #include "avformat.h"
30 #include "avio_internal.h"
31 #include "internal.h"
32
33 typedef struct {
34     const AVClass *class;  /**< Class for private options. */
35     int img_first;
36     int img_last;
37     int img_number;
38     int img_count;
39     int is_pipe;
40     char path[1024];
41     char *pixel_format;     /**< Set by a private option. */
42     char *video_size;       /**< Set by a private option. */
43     char *framerate;        /**< Set by a private option. */
44     int loop;
45 } VideoData;
46
47 typedef struct {
48     enum CodecID id;
49     const char *str;
50 } IdStrMap;
51
52 static const IdStrMap img_tags[] = {
53     { CODEC_ID_MJPEG     , "jpeg"},
54     { CODEC_ID_MJPEG     , "jpg"},
55     { CODEC_ID_LJPEG     , "ljpg"},
56     { CODEC_ID_PNG       , "png"},
57     { CODEC_ID_PNG       , "mng"},
58     { CODEC_ID_PPM       , "ppm"},
59     { CODEC_ID_PPM       , "pnm"},
60     { CODEC_ID_PGM       , "pgm"},
61     { CODEC_ID_PGMYUV    , "pgmyuv"},
62     { CODEC_ID_PBM       , "pbm"},
63     { CODEC_ID_PAM       , "pam"},
64     { CODEC_ID_MPEG1VIDEO, "mpg1-img"},
65     { CODEC_ID_MPEG2VIDEO, "mpg2-img"},
66     { CODEC_ID_MPEG4     , "mpg4-img"},
67     { CODEC_ID_FFV1      , "ffv1-img"},
68     { CODEC_ID_RAWVIDEO  , "y"},
69     { CODEC_ID_BMP       , "bmp"},
70     { CODEC_ID_GIF       , "gif"},
71     { CODEC_ID_TARGA     , "tga"},
72     { CODEC_ID_TIFF      , "tiff"},
73     { CODEC_ID_TIFF      , "tif"},
74     { CODEC_ID_SGI       , "sgi"},
75     { CODEC_ID_PTX       , "ptx"},
76     { CODEC_ID_PCX       , "pcx"},
77     { CODEC_ID_SUNRAST   , "sun"},
78     { CODEC_ID_SUNRAST   , "ras"},
79     { CODEC_ID_SUNRAST   , "rs"},
80     { CODEC_ID_SUNRAST   , "im1"},
81     { CODEC_ID_SUNRAST   , "im8"},
82     { CODEC_ID_SUNRAST   , "im24"},
83     { CODEC_ID_SUNRAST   , "sunras"},
84     { CODEC_ID_JPEG2000  , "jp2"},
85     { CODEC_ID_JPEG2000  , "jpc"},
86     { CODEC_ID_DPX       , "dpx"},
87     { CODEC_ID_PICTOR    , "pic"},
88     { CODEC_ID_NONE      , NULL}
89 };
90
91 static const int sizes[][2] = {
92     { 640, 480 },
93     { 720, 480 },
94     { 720, 576 },
95     { 352, 288 },
96     { 352, 240 },
97     { 160, 128 },
98     { 512, 384 },
99     { 640, 352 },
100     { 640, 240 },
101 };
102
103 static int infer_size(int *width_ptr, int *height_ptr, int size)
104 {
105     int i;
106
107     for(i=0;i<FF_ARRAY_ELEMS(sizes);i++) {
108         if ((sizes[i][0] * sizes[i][1]) == size) {
109             *width_ptr = sizes[i][0];
110             *height_ptr = sizes[i][1];
111             return 0;
112         }
113     }
114     return -1;
115 }
116 static enum CodecID av_str2id(const IdStrMap *tags, const char *str)
117 {
118     str= strrchr(str, '.');
119     if(!str) return CODEC_ID_NONE;
120     str++;
121
122     while (tags->id) {
123         if (!av_strcasecmp(str, tags->str))
124             return tags->id;
125
126         tags++;
127     }
128     return CODEC_ID_NONE;
129 }
130
131 /* return -1 if no image found */
132 static int find_image_range(int *pfirst_index, int *plast_index,
133                             const char *path)
134 {
135     char buf[1024];
136     int range, last_index, range1, first_index;
137
138     /* find the first image */
139     for(first_index = 0; first_index < 5; first_index++) {
140         if (av_get_frame_filename(buf, sizeof(buf), path, first_index) < 0){
141             *pfirst_index =
142             *plast_index = 1;
143             if (avio_check(buf, AVIO_FLAG_READ) > 0)
144                 return 0;
145             return -1;
146         }
147         if (avio_check(buf, AVIO_FLAG_READ) > 0)
148             break;
149     }
150     if (first_index == 5)
151         goto fail;
152
153     /* find the last image */
154     last_index = first_index;
155     for(;;) {
156         range = 0;
157         for(;;) {
158             if (!range)
159                 range1 = 1;
160             else
161                 range1 = 2 * range;
162             if (av_get_frame_filename(buf, sizeof(buf), path,
163                                       last_index + range1) < 0)
164                 goto fail;
165             if (avio_check(buf, AVIO_FLAG_READ) <= 0)
166                 break;
167             range = range1;
168             /* just in case... */
169             if (range >= (1 << 30))
170                 goto fail;
171         }
172         /* we are sure than image last_index + range exists */
173         if (!range)
174             break;
175         last_index += range;
176     }
177     *pfirst_index = first_index;
178     *plast_index = last_index;
179     return 0;
180  fail:
181     return -1;
182 }
183
184
185 static int read_probe(AVProbeData *p)
186 {
187     if (p->filename && av_str2id(img_tags, p->filename)) {
188         if (av_filename_number_test(p->filename))
189             return AVPROBE_SCORE_MAX;
190         else
191             return AVPROBE_SCORE_MAX/2;
192     }
193     return 0;
194 }
195
196 enum CodecID ff_guess_image2_codec(const char *filename)
197 {
198     return av_str2id(img_tags, filename);
199 }
200
201 #if FF_API_GUESS_IMG2_CODEC
202 enum CodecID av_guess_image2_codec(const char *filename){
203     return av_str2id(img_tags, filename);
204 }
205 #endif
206
207 static int read_header(AVFormatContext *s1, AVFormatParameters *ap)
208 {
209     VideoData *s = s1->priv_data;
210     int first_index, last_index, ret = 0;
211     int width = 0, height = 0;
212     AVStream *st;
213     enum PixelFormat pix_fmt = PIX_FMT_NONE;
214     AVRational framerate;
215
216     s1->ctx_flags |= AVFMTCTX_NOHEADER;
217
218     st = avformat_new_stream(s1, NULL);
219     if (!st) {
220         return AVERROR(ENOMEM);
221     }
222
223     if (s->pixel_format && (pix_fmt = av_get_pix_fmt(s->pixel_format)) == PIX_FMT_NONE) {
224         av_log(s1, AV_LOG_ERROR, "No such pixel format: %s.\n", s->pixel_format);
225         return AVERROR(EINVAL);
226     }
227     if (s->video_size && (ret = av_parse_video_size(&width, &height, s->video_size)) < 0) {
228         av_log(s, AV_LOG_ERROR, "Could not parse video size: %s.\n", s->video_size);
229         return ret;
230     }
231     if ((ret = av_parse_video_rate(&framerate, s->framerate)) < 0) {
232         av_log(s, AV_LOG_ERROR, "Could not parse framerate: %s.\n", s->framerate);
233         return ret;
234     }
235
236 #if FF_API_LOOP_INPUT
237     if (s1->loop_input)
238         s->loop = s1->loop_input;
239 #endif
240
241     av_strlcpy(s->path, s1->filename, sizeof(s->path));
242     s->img_number = 0;
243     s->img_count = 0;
244
245     /* find format */
246     if (s1->iformat->flags & AVFMT_NOFILE)
247         s->is_pipe = 0;
248     else{
249         s->is_pipe = 1;
250         st->need_parsing = AVSTREAM_PARSE_FULL;
251     }
252
253     av_set_pts_info(st, 60, framerate.den, framerate.num);
254
255     if (width && height) {
256         st->codec->width  = width;
257         st->codec->height = height;
258     }
259
260     if (!s->is_pipe) {
261         if (find_image_range(&first_index, &last_index, s->path) < 0)
262             return AVERROR(ENOENT);
263         s->img_first = first_index;
264         s->img_last = last_index;
265         s->img_number = first_index;
266         /* compute duration */
267         st->start_time = 0;
268         st->duration = last_index - first_index + 1;
269     }
270
271     if(s1->video_codec_id){
272         st->codec->codec_type = AVMEDIA_TYPE_VIDEO;
273         st->codec->codec_id = s1->video_codec_id;
274     }else if(s1->audio_codec_id){
275         st->codec->codec_type = AVMEDIA_TYPE_AUDIO;
276         st->codec->codec_id = s1->audio_codec_id;
277     }else{
278         st->codec->codec_type = AVMEDIA_TYPE_VIDEO;
279         st->codec->codec_id = av_str2id(img_tags, s->path);
280     }
281     if(st->codec->codec_type == AVMEDIA_TYPE_VIDEO && pix_fmt != PIX_FMT_NONE)
282         st->codec->pix_fmt = pix_fmt;
283
284     return 0;
285 }
286
287 static int read_packet(AVFormatContext *s1, AVPacket *pkt)
288 {
289     VideoData *s = s1->priv_data;
290     char filename[1024];
291     int i;
292     int size[3]={0}, ret[3]={0};
293     AVIOContext *f[3];
294     AVCodecContext *codec= s1->streams[0]->codec;
295
296     if (!s->is_pipe) {
297         /* loop over input */
298         if (s->loop && s->img_number > s->img_last) {
299             s->img_number = s->img_first;
300         }
301         if (s->img_number > s->img_last)
302             return AVERROR_EOF;
303         if (av_get_frame_filename(filename, sizeof(filename),
304                                   s->path, s->img_number)<0 && s->img_number > 1)
305             return AVERROR(EIO);
306         for(i=0; i<3; i++){
307             if (avio_open2(&f[i], filename, AVIO_FLAG_READ,
308                            &s1->interrupt_callback, NULL) < 0) {
309                 if(i==1)
310                     break;
311                 av_log(s1, AV_LOG_ERROR, "Could not open file : %s\n",filename);
312                 return AVERROR(EIO);
313             }
314             size[i]= avio_size(f[i]);
315
316             if(codec->codec_id != CODEC_ID_RAWVIDEO)
317                 break;
318             filename[ strlen(filename) - 1 ]= 'U' + i;
319         }
320
321         if(codec->codec_id == CODEC_ID_RAWVIDEO && !codec->width)
322             infer_size(&codec->width, &codec->height, size[0]);
323     } else {
324         f[0] = s1->pb;
325         if (f[0]->eof_reached)
326             return AVERROR(EIO);
327         size[0]= 4096;
328     }
329
330     av_new_packet(pkt, size[0] + size[1] + size[2]);
331     pkt->stream_index = 0;
332     pkt->flags |= AV_PKT_FLAG_KEY;
333
334     pkt->size= 0;
335     for(i=0; i<3; i++){
336         if(size[i]){
337             ret[i]= avio_read(f[i], pkt->data + pkt->size, size[i]);
338             if (!s->is_pipe)
339                 avio_close(f[i]);
340             if(ret[i]>0)
341                 pkt->size += ret[i];
342         }
343     }
344
345     if (ret[0] <= 0 || ret[1]<0 || ret[2]<0) {
346         av_free_packet(pkt);
347         return AVERROR(EIO); /* signal EOF */
348     } else {
349         s->img_count++;
350         s->img_number++;
351         return 0;
352     }
353 }
354
355 #if CONFIG_IMAGE2_MUXER || CONFIG_IMAGE2PIPE_MUXER
356 /******************************************************/
357 /* image output */
358
359 static int write_header(AVFormatContext *s)
360 {
361     VideoData *img = s->priv_data;
362
363     img->img_number = 1;
364     av_strlcpy(img->path, s->filename, sizeof(img->path));
365
366     /* find format */
367     if (s->oformat->flags & AVFMT_NOFILE)
368         img->is_pipe = 0;
369     else
370         img->is_pipe = 1;
371
372     return 0;
373 }
374
375 static int write_packet(AVFormatContext *s, AVPacket *pkt)
376 {
377     VideoData *img = s->priv_data;
378     AVIOContext *pb[3];
379     char filename[1024];
380     AVCodecContext *codec= s->streams[ pkt->stream_index ]->codec;
381     int i;
382
383     if (!img->is_pipe) {
384         if (av_get_frame_filename(filename, sizeof(filename),
385                                   img->path, img->img_number) < 0 && img->img_number>1) {
386             av_log(s, AV_LOG_ERROR,
387                    "Could not get frame filename number %d from pattern '%s'\n",
388                    img->img_number, img->path);
389             return AVERROR(EIO);
390         }
391         for(i=0; i<3; i++){
392             if (avio_open2(&pb[i], filename, AVIO_FLAG_WRITE,
393                            &s->interrupt_callback, NULL) < 0) {
394                 av_log(s, AV_LOG_ERROR, "Could not open file : %s\n",filename);
395                 return AVERROR(EIO);
396             }
397
398             if(codec->codec_id != CODEC_ID_RAWVIDEO)
399                 break;
400             filename[ strlen(filename) - 1 ]= 'U' + i;
401         }
402     } else {
403         pb[0] = s->pb;
404     }
405
406     if(codec->codec_id == CODEC_ID_RAWVIDEO){
407         int ysize = codec->width * codec->height;
408         avio_write(pb[0], pkt->data        , ysize);
409         avio_write(pb[1], pkt->data + ysize, (pkt->size - ysize)/2);
410         avio_write(pb[2], pkt->data + ysize +(pkt->size - ysize)/2, (pkt->size - ysize)/2);
411         avio_flush(pb[1]);
412         avio_flush(pb[2]);
413         avio_close(pb[1]);
414         avio_close(pb[2]);
415     }else{
416         if(av_str2id(img_tags, s->filename) == CODEC_ID_JPEG2000){
417             AVStream *st = s->streams[0];
418             if(st->codec->extradata_size > 8 &&
419                AV_RL32(st->codec->extradata+4) == MKTAG('j','p','2','h')){
420                 if(pkt->size < 8 || AV_RL32(pkt->data+4) != MKTAG('j','p','2','c'))
421                     goto error;
422                 avio_wb32(pb[0], 12);
423                 ffio_wfourcc(pb[0], "jP  ");
424                 avio_wb32(pb[0], 0x0D0A870A); // signature
425                 avio_wb32(pb[0], 20);
426                 ffio_wfourcc(pb[0], "ftyp");
427                 ffio_wfourcc(pb[0], "jp2 ");
428                 avio_wb32(pb[0], 0);
429                 ffio_wfourcc(pb[0], "jp2 ");
430                 avio_write(pb[0], st->codec->extradata, st->codec->extradata_size);
431             }else if(pkt->size < 8 ||
432                      (!st->codec->extradata_size &&
433                       AV_RL32(pkt->data+4) != MKTAG('j','P',' ',' '))){ // signature
434             error:
435                 av_log(s, AV_LOG_ERROR, "malformated jpeg2000 codestream\n");
436                 return -1;
437             }
438         }
439         avio_write(pb[0], pkt->data, pkt->size);
440     }
441     avio_flush(pb[0]);
442     if (!img->is_pipe) {
443         avio_close(pb[0]);
444     }
445
446     img->img_number++;
447     return 0;
448 }
449
450 #endif /* CONFIG_IMAGE2_MUXER || CONFIG_IMAGE2PIPE_MUXER */
451
452 #define OFFSET(x) offsetof(VideoData, x)
453 #define DEC AV_OPT_FLAG_DECODING_PARAM
454 static const AVOption options[] = {
455     { "pixel_format", "", OFFSET(pixel_format), AV_OPT_TYPE_STRING, {.str = NULL}, 0, 0, DEC },
456     { "video_size",   "", OFFSET(video_size),   AV_OPT_TYPE_STRING, {.str = NULL}, 0, 0, DEC },
457     { "framerate",    "", OFFSET(framerate),    AV_OPT_TYPE_STRING, {.str = "25"}, 0, 0, DEC },
458     { "loop",         "", OFFSET(loop),         AV_OPT_TYPE_INT,    {.dbl = 0},    0, 1, DEC },
459     { NULL },
460 };
461
462 /* input */
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(VideoData),
474     .read_probe     = read_probe,
475     .read_header    = read_header,
476     .read_packet    = read_packet,
477     .flags          = AVFMT_NOFILE,
478     .priv_class     = &img2_class,
479 };
480 #endif
481 #if CONFIG_IMAGE2PIPE_DEMUXER
482 static const AVClass img2pipe_class = {
483     .class_name = "image2pipe demuxer",
484     .item_name  = av_default_item_name,
485     .option     = options,
486     .version    = LIBAVUTIL_VERSION_INT,
487 };
488 AVInputFormat ff_image2pipe_demuxer = {
489     .name           = "image2pipe",
490     .long_name      = NULL_IF_CONFIG_SMALL("piped image2 sequence"),
491     .priv_data_size = sizeof(VideoData),
492     .read_header    = read_header,
493     .read_packet    = read_packet,
494     .priv_class     = &img2pipe_class,
495 };
496 #endif
497
498 /* output */
499 #if CONFIG_IMAGE2_MUXER
500 AVOutputFormat ff_image2_muxer = {
501     .name           = "image2",
502     .long_name      = NULL_IF_CONFIG_SMALL("image2 sequence"),
503     .extensions     = "bmp,dpx,jpeg,jpg,ljpg,pam,pbm,pcx,pgm,pgmyuv,png,"
504                       "ppm,sgi,tga,tif,tiff,jp2",
505     .priv_data_size = sizeof(VideoData),
506     .video_codec    = CODEC_ID_MJPEG,
507     .write_header   = write_header,
508     .write_packet   = write_packet,
509     .flags          = AVFMT_NOTIMESTAMPS | AVFMT_NODIMENSIONS | AVFMT_NOFILE
510 };
511 #endif
512 #if CONFIG_IMAGE2PIPE_MUXER
513 AVOutputFormat ff_image2pipe_muxer = {
514     .name           = "image2pipe",
515     .long_name      = NULL_IF_CONFIG_SMALL("piped image2 sequence"),
516     .priv_data_size = sizeof(VideoData),
517     .video_codec    = CODEC_ID_MJPEG,
518     .write_header   = write_header,
519     .write_packet   = write_packet,
520     .flags          = AVFMT_NOTIMESTAMPS | AVFMT_NODIMENSIONS
521 };
522 #endif