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