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