Update to MPlayer SVN rev 29473 and FFmpeg SVN rev 19572.
[vaapi:athaifas-mplayer.git] / libavformat / .svn / text-base / img2.c.svn-base
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 (s->img_number > s->img_last)
264             return AVERROR_EOF;
265         if (av_get_frame_filename(filename, sizeof(filename),
266                                   s->path, s->img_number)<0 && s->img_number > 1)
267             return AVERROR(EIO);
268         for(i=0; i<3; i++){
269             if (url_fopen(&f[i], filename, URL_RDONLY) < 0) {
270                 av_log(s1, AV_LOG_ERROR, "Could not open file : %s\n",filename);
271                 return AVERROR(EIO);
272             }
273             size[i]= url_fsize(f[i]);
274
275             if(codec->codec_id != CODEC_ID_RAWVIDEO)
276                 break;
277             filename[ strlen(filename) - 1 ]= 'U' + i;
278         }
279
280         if(codec->codec_id == CODEC_ID_RAWVIDEO && !codec->width)
281             infer_size(&codec->width, &codec->height, size[0]);
282     } else {
283         f[0] = s1->pb;
284         if (url_feof(f[0]))
285             return AVERROR(EIO);
286         size[0]= 4096;
287     }
288
289     av_new_packet(pkt, size[0] + size[1] + size[2]);
290     pkt->stream_index = 0;
291     pkt->flags |= PKT_FLAG_KEY;
292
293     pkt->size= 0;
294     for(i=0; i<3; i++){
295         if(size[i]){
296             ret[i]= get_buffer(f[i], pkt->data + pkt->size, size[i]);
297             if (!s->is_pipe)
298                 url_fclose(f[i]);
299             if(ret[i]>0)
300                 pkt->size += ret[i];
301         }
302     }
303
304     if (ret[0] <= 0 || ret[1]<0 || ret[2]<0) {
305         av_free_packet(pkt);
306         return AVERROR(EIO); /* signal EOF */
307     } else {
308         s->img_count++;
309         s->img_number++;
310         return 0;
311     }
312 }
313
314 #if CONFIG_IMAGE2_MUXER || CONFIG_IMAGE2PIPE_MUXER
315 /******************************************************/
316 /* image output */
317
318 static int img_write_header(AVFormatContext *s)
319 {
320     VideoData *img = s->priv_data;
321
322     img->img_number = 1;
323     av_strlcpy(img->path, s->filename, sizeof(img->path));
324
325     /* find format */
326     if (s->oformat->flags & AVFMT_NOFILE)
327         img->is_pipe = 0;
328     else
329         img->is_pipe = 1;
330
331     return 0;
332 }
333
334 static int img_write_packet(AVFormatContext *s, AVPacket *pkt)
335 {
336     VideoData *img = s->priv_data;
337     ByteIOContext *pb[3];
338     char filename[1024];
339     AVCodecContext *codec= s->streams[ pkt->stream_index ]->codec;
340     int i;
341
342     if (!img->is_pipe) {
343         if (av_get_frame_filename(filename, sizeof(filename),
344                                   img->path, img->img_number) < 0 && img->img_number>1)
345             return AVERROR(EIO);
346         for(i=0; i<3; i++){
347             if (url_fopen(&pb[i], filename, URL_WRONLY) < 0) {
348                 av_log(s, AV_LOG_ERROR, "Could not open file : %s\n",filename);
349                 return AVERROR(EIO);
350             }
351
352             if(codec->codec_id != CODEC_ID_RAWVIDEO)
353                 break;
354             filename[ strlen(filename) - 1 ]= 'U' + i;
355         }
356     } else {
357         pb[0] = s->pb;
358     }
359
360     if(codec->codec_id == CODEC_ID_RAWVIDEO){
361         int ysize = codec->width * codec->height;
362         put_buffer(pb[0], pkt->data        , ysize);
363         put_buffer(pb[1], pkt->data + ysize, (pkt->size - ysize)/2);
364         put_buffer(pb[2], pkt->data + ysize +(pkt->size - ysize)/2, (pkt->size - ysize)/2);
365         put_flush_packet(pb[1]);
366         put_flush_packet(pb[2]);
367         url_fclose(pb[1]);
368         url_fclose(pb[2]);
369     }else{
370         if(av_str2id(img_tags, s->filename) == CODEC_ID_JPEG2000){
371             AVStream *st = s->streams[0];
372             if(st->codec->extradata_size > 8 &&
373                AV_RL32(st->codec->extradata+4) == MKTAG('j','p','2','h')){
374                 if(pkt->size < 8 || AV_RL32(pkt->data+4) != MKTAG('j','p','2','c'))
375                     goto error;
376                 put_be32(pb[0], 12);
377                 put_tag (pb[0], "jP  ");
378                 put_be32(pb[0], 0x0D0A870A); // signature
379                 put_be32(pb[0], 20);
380                 put_tag (pb[0], "ftyp");
381                 put_tag (pb[0], "jp2 ");
382                 put_be32(pb[0], 0);
383                 put_tag (pb[0], "jp2 ");
384                 put_buffer(pb[0], st->codec->extradata, st->codec->extradata_size);
385             }else if(pkt->size < 8 ||
386                      (!st->codec->extradata_size &&
387                       AV_RL32(pkt->data+4) != MKTAG('j','P',' ',' '))){ // signature
388             error:
389                 av_log(s, AV_LOG_ERROR, "malformated jpeg2000 codestream\n");
390                 return -1;
391             }
392         }
393         put_buffer(pb[0], pkt->data, pkt->size);
394     }
395     put_flush_packet(pb[0]);
396     if (!img->is_pipe) {
397         url_fclose(pb[0]);
398     }
399
400     img->img_number++;
401     return 0;
402 }
403
404 #endif /* CONFIG_IMAGE2_MUXER || CONFIG_IMAGE2PIPE_MUXER */
405
406 /* input */
407 #if CONFIG_IMAGE2_DEMUXER
408 AVInputFormat image2_demuxer = {
409     "image2",
410     NULL_IF_CONFIG_SMALL("image2 sequence"),
411     sizeof(VideoData),
412     image_probe,
413     img_read_header,
414     img_read_packet,
415     NULL,
416     NULL,
417     NULL,
418     AVFMT_NOFILE,
419 };
420 #endif
421 #if CONFIG_IMAGE2PIPE_DEMUXER
422 AVInputFormat image2pipe_demuxer = {
423     "image2pipe",
424     NULL_IF_CONFIG_SMALL("piped image2 sequence"),
425     sizeof(VideoData),
426     NULL, /* no probe */
427     img_read_header,
428     img_read_packet,
429 };
430 #endif
431
432 /* output */
433 #if CONFIG_IMAGE2_MUXER
434 AVOutputFormat image2_muxer = {
435     "image2",
436     NULL_IF_CONFIG_SMALL("image2 sequence"),
437     "",
438     "bmp,jpeg,jpg,ljpg,pam,pbm,pcx,pgm,pgmyuv,png,ppm,sgi,tif,tiff,jp2",
439     sizeof(VideoData),
440     CODEC_ID_NONE,
441     CODEC_ID_MJPEG,
442     img_write_header,
443     img_write_packet,
444     NULL,
445     .flags= AVFMT_NOTIMESTAMPS | AVFMT_NOFILE
446 };
447 #endif
448 #if CONFIG_IMAGE2PIPE_MUXER
449 AVOutputFormat image2pipe_muxer = {
450     "image2pipe",
451     NULL_IF_CONFIG_SMALL("piped image2 sequence"),
452     "",
453     "",
454     sizeof(VideoData),
455     CODEC_ID_NONE,
456     CODEC_ID_MJPEG,
457     img_write_header,
458     img_write_packet,
459     .flags= AVFMT_NOTIMESTAMPS
460 };
461 #endif