decode mng color decorrelation
[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 #include "avformat.h"
23 #include "avstring.h"
24
25 typedef struct {
26     int img_first;
27     int img_last;
28     int img_number;
29     int img_count;
30     int is_pipe;
31     char path[1024];
32 } VideoData;
33
34 typedef struct {
35     enum CodecID id;
36     const char *str;
37 } IdStrMap;
38
39 static const IdStrMap img_tags[] = {
40     { CODEC_ID_MJPEG     , "jpeg"},
41     { CODEC_ID_MJPEG     , "jpg"},
42     { CODEC_ID_LJPEG     , "ljpg"},
43     { CODEC_ID_PNG       , "png"},
44     { CODEC_ID_PNG       , "mng"},
45     { CODEC_ID_PPM       , "ppm"},
46     { CODEC_ID_PGM       , "pgm"},
47     { CODEC_ID_PGMYUV    , "pgmyuv"},
48     { CODEC_ID_PBM       , "pbm"},
49     { CODEC_ID_PAM       , "pam"},
50     { CODEC_ID_MPEG1VIDEO, "mpg1-img"},
51     { CODEC_ID_MPEG2VIDEO, "mpg2-img"},
52     { CODEC_ID_MPEG4     , "mpg4-img"},
53     { CODEC_ID_FFV1      , "ffv1-img"},
54     { CODEC_ID_RAWVIDEO  , "y"},
55     { CODEC_ID_BMP       , "bmp"},
56     { CODEC_ID_GIF       , "gif"},
57     { CODEC_ID_TARGA     , "tga"},
58     { CODEC_ID_TIFF      , "tiff"},
59     { CODEC_ID_SGI       , "sgi"},
60     { CODEC_ID_PTX       , "ptx"},
61     { CODEC_ID_PCX       , "pcx"},
62     { CODEC_ID_SUNRAST   , "sun"},
63     { CODEC_ID_SUNRAST   , "ras"},
64     { CODEC_ID_SUNRAST   , "rs"},
65     { CODEC_ID_SUNRAST   , "im1"},
66     { CODEC_ID_SUNRAST   , "im8"},
67     { CODEC_ID_SUNRAST   , "im24"},
68     { CODEC_ID_SUNRAST   , "sunras"},
69     {0, NULL}
70 };
71
72 static int sizes[][2] = {
73     { 640, 480 },
74     { 720, 480 },
75     { 720, 576 },
76     { 352, 288 },
77     { 352, 240 },
78     { 160, 128 },
79     { 512, 384 },
80     { 640, 352 },
81     { 640, 240 },
82 };
83
84 static int infer_size(int *width_ptr, int *height_ptr, int size)
85 {
86     int i;
87
88     for(i=0;i<sizeof(sizes)/sizeof(sizes[0]);i++) {
89         if ((sizes[i][0] * sizes[i][1]) == size) {
90             *width_ptr = sizes[i][0];
91             *height_ptr = sizes[i][1];
92             return 0;
93         }
94     }
95     return -1;
96 }
97 static enum CodecID av_str2id(const IdStrMap *tags, const char *str)
98 {
99     str= strrchr(str, '.');
100     if(!str) return CODEC_ID_NONE;
101     str++;
102
103     while (tags->id) {
104         int i;
105         for(i=0; toupper(tags->str[i]) == toupper(str[i]); i++){
106             if(tags->str[i]==0 && str[i]==0)
107                 return tags->id;
108         }
109
110         tags++;
111     }
112     return CODEC_ID_NONE;
113 }
114
115 /* return -1 if no image found */
116 static int find_image_range(int *pfirst_index, int *plast_index,
117                             const char *path)
118 {
119     char buf[1024];
120     int range, last_index, range1, first_index;
121
122     /* find the first image */
123     for(first_index = 0; first_index < 5; first_index++) {
124         if (av_get_frame_filename(buf, sizeof(buf), path, first_index) < 0){
125             *pfirst_index =
126             *plast_index = 1;
127             return 0;
128         }
129         if (url_exist(buf))
130             break;
131     }
132     if (first_index == 5)
133         goto fail;
134
135     /* find the last image */
136     last_index = first_index;
137     for(;;) {
138         range = 0;
139         for(;;) {
140             if (!range)
141                 range1 = 1;
142             else
143                 range1 = 2 * range;
144             if (av_get_frame_filename(buf, sizeof(buf), path,
145                                       last_index + range1) < 0)
146                 goto fail;
147             if (!url_exist(buf))
148                 break;
149             range = range1;
150             /* just in case... */
151             if (range >= (1 << 30))
152                 goto fail;
153         }
154         /* we are sure than image last_index + range exists */
155         if (!range)
156             break;
157         last_index += range;
158     }
159     *pfirst_index = first_index;
160     *plast_index = last_index;
161     return 0;
162  fail:
163     return -1;
164 }
165
166
167 static int image_probe(AVProbeData *p)
168 {
169     if (p->filename && av_str2id(img_tags, p->filename)) {
170         if (av_filename_number_test(p->filename))
171             return AVPROBE_SCORE_MAX;
172         else
173             return AVPROBE_SCORE_MAX/2;
174     }
175     return 0;
176 }
177
178 enum CodecID av_guess_image2_codec(const char *filename){
179     return av_str2id(img_tags, filename);
180 }
181
182 static int img_read_header(AVFormatContext *s1, AVFormatParameters *ap)
183 {
184     VideoData *s = s1->priv_data;
185     int first_index, last_index;
186     AVStream *st;
187
188     s1->ctx_flags |= AVFMTCTX_NOHEADER;
189
190     st = av_new_stream(s1, 0);
191     if (!st) {
192         return AVERROR(ENOMEM);
193     }
194
195     av_strlcpy(s->path, s1->filename, sizeof(s->path));
196     s->img_number = 0;
197     s->img_count = 0;
198
199     /* find format */
200     if (s1->iformat->flags & AVFMT_NOFILE)
201         s->is_pipe = 0;
202     else{
203         s->is_pipe = 1;
204         st->need_parsing = AVSTREAM_PARSE_FULL;
205     }
206
207     if (!ap->time_base.num) {
208         av_set_pts_info(st, 60, 1, 25);
209     } else {
210         av_set_pts_info(st, 60, ap->time_base.num, ap->time_base.den);
211     }
212
213     if(ap->width && ap->height){
214         st->codec->width = ap->width;
215         st->codec->height= ap->height;
216     }
217
218     if (!s->is_pipe) {
219         if (find_image_range(&first_index, &last_index, s->path) < 0)
220             return AVERROR(EIO);
221         s->img_first = first_index;
222         s->img_last = last_index;
223         s->img_number = first_index;
224         /* compute duration */
225         st->start_time = 0;
226         st->duration = last_index - first_index + 1;
227     }
228
229     if(ap->video_codec_id){
230         st->codec->codec_type = CODEC_TYPE_VIDEO;
231         st->codec->codec_id = ap->video_codec_id;
232     }else if(ap->audio_codec_id){
233         st->codec->codec_type = CODEC_TYPE_AUDIO;
234         st->codec->codec_id = ap->audio_codec_id;
235     }else{
236         st->codec->codec_type = CODEC_TYPE_VIDEO;
237         st->codec->codec_id = av_str2id(img_tags, s->path);
238     }
239     if(st->codec->codec_type == CODEC_TYPE_VIDEO && ap->pix_fmt != PIX_FMT_NONE)
240         st->codec->pix_fmt = ap->pix_fmt;
241
242     return 0;
243 }
244
245 static int img_read_packet(AVFormatContext *s1, AVPacket *pkt)
246 {
247     VideoData *s = s1->priv_data;
248     char filename[1024];
249     int i;
250     int size[3]={0}, ret[3]={0};
251     ByteIOContext *f[3];
252     AVCodecContext *codec= s1->streams[0]->codec;
253
254     if (!s->is_pipe) {
255         /* loop over input */
256         if (s1->loop_input && s->img_number > s->img_last) {
257             s->img_number = s->img_first;
258         }
259         if (av_get_frame_filename(filename, sizeof(filename),
260                                   s->path, s->img_number)<0 && s->img_number > 1)
261             return AVERROR(EIO);
262         for(i=0; i<3; i++){
263             if (url_fopen(&f[i], filename, URL_RDONLY) < 0)
264                 return AVERROR(EIO);
265             size[i]= url_fsize(f[i]);
266
267             if(codec->codec_id != CODEC_ID_RAWVIDEO)
268                 break;
269             filename[ strlen(filename) - 1 ]= 'U' + i;
270         }
271
272         if(codec->codec_id == CODEC_ID_RAWVIDEO && !codec->width)
273             infer_size(&codec->width, &codec->height, size[0]);
274     } else {
275         f[0] = s1->pb;
276         if (url_feof(f[0]))
277             return AVERROR(EIO);
278         size[0]= 4096;
279     }
280
281     av_new_packet(pkt, size[0] + size[1] + size[2]);
282     pkt->stream_index = 0;
283     pkt->flags |= PKT_FLAG_KEY;
284
285     pkt->size= 0;
286     for(i=0; i<3; i++){
287         if(size[i]){
288             ret[i]= get_buffer(f[i], pkt->data + pkt->size, size[i]);
289             if (!s->is_pipe)
290                 url_fclose(f[i]);
291             if(ret[i]>0)
292                 pkt->size += ret[i];
293         }
294     }
295
296     if (ret[0] <= 0 || ret[1]<0 || ret[2]<0) {
297         av_free_packet(pkt);
298         return AVERROR(EIO); /* signal EOF */
299     } else {
300         s->img_count++;
301         s->img_number++;
302         return 0;
303     }
304 }
305
306 static int img_read_close(AVFormatContext *s1)
307 {
308     return 0;
309 }
310
311 #ifdef CONFIG_MUXERS
312 /******************************************************/
313 /* image output */
314
315 static int img_write_header(AVFormatContext *s)
316 {
317     VideoData *img = s->priv_data;
318
319     img->img_number = 1;
320     av_strlcpy(img->path, s->filename, sizeof(img->path));
321
322     /* find format */
323     if (s->oformat->flags & AVFMT_NOFILE)
324         img->is_pipe = 0;
325     else
326         img->is_pipe = 1;
327
328     return 0;
329 }
330
331 static int img_write_packet(AVFormatContext *s, AVPacket *pkt)
332 {
333     VideoData *img = s->priv_data;
334     ByteIOContext *pb[3];
335     char filename[1024];
336     AVCodecContext *codec= s->streams[ pkt->stream_index ]->codec;
337     int i;
338
339     if (!img->is_pipe) {
340         if (av_get_frame_filename(filename, sizeof(filename),
341                                   img->path, img->img_number) < 0 && img->img_number>1)
342             return AVERROR(EIO);
343         for(i=0; i<3; i++){
344             if (url_fopen(&pb[i], filename, URL_WRONLY) < 0)
345                 return AVERROR(EIO);
346
347             if(codec->codec_id != CODEC_ID_RAWVIDEO)
348                 break;
349             filename[ strlen(filename) - 1 ]= 'U' + i;
350         }
351     } else {
352         pb[0] = s->pb;
353     }
354
355     if(codec->codec_id == CODEC_ID_RAWVIDEO){
356         int ysize = codec->width * codec->height;
357         put_buffer(pb[0], pkt->data        , ysize);
358         put_buffer(pb[1], pkt->data + ysize, (pkt->size - ysize)/2);
359         put_buffer(pb[2], pkt->data + ysize +(pkt->size - ysize)/2, (pkt->size - ysize)/2);
360         put_flush_packet(pb[1]);
361         put_flush_packet(pb[2]);
362         url_fclose(pb[1]);
363         url_fclose(pb[2]);
364     }else{
365         put_buffer(pb[0], pkt->data, pkt->size);
366     }
367     put_flush_packet(pb[0]);
368     if (!img->is_pipe) {
369         url_fclose(pb[0]);
370     }
371
372     img->img_number++;
373     return 0;
374 }
375
376 static int img_write_trailer(AVFormatContext *s)
377 {
378     return 0;
379 }
380
381 #endif /* CONFIG_MUXERS */
382
383 /* input */
384 #ifdef CONFIG_IMAGE2_DEMUXER
385 AVInputFormat image2_demuxer = {
386     "image2",
387     "image2 sequence",
388     sizeof(VideoData),
389     image_probe,
390     img_read_header,
391     img_read_packet,
392     img_read_close,
393     NULL,
394     NULL,
395     AVFMT_NOFILE,
396 };
397 #endif
398 #ifdef CONFIG_IMAGE2PIPE_DEMUXER
399 AVInputFormat image2pipe_demuxer = {
400     "image2pipe",
401     "piped image2 sequence",
402     sizeof(VideoData),
403     NULL, /* no probe */
404     img_read_header,
405     img_read_packet,
406     img_read_close,
407     NULL,
408 };
409 #endif
410
411 /* output */
412 #ifdef CONFIG_IMAGE2_MUXER
413 AVOutputFormat image2_muxer = {
414     "image2",
415     "image2 sequence",
416     "",
417     "",
418     sizeof(VideoData),
419     CODEC_ID_NONE,
420     CODEC_ID_MJPEG,
421     img_write_header,
422     img_write_packet,
423     img_write_trailer,
424     AVFMT_NOFILE,
425 };
426 #endif
427 #ifdef CONFIG_IMAGE2PIPE_MUXER
428 AVOutputFormat image2pipe_muxer = {
429     "image2pipe",
430     "piped image2 sequence",
431     "",
432     "",
433     sizeof(VideoData),
434     CODEC_ID_NONE,
435     CODEC_ID_MJPEG,
436     img_write_header,
437     img_write_packet,
438     img_write_trailer,
439 };
440 #endif