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