Update to MPlayer SVN rev 29978 and FFmpeg SVN rev 20757.
[vaapi:challenzhous-mplayer.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             if(url_exist(buf))
132                 return 0;
133             return -1;
134         }
135         if (url_exist(buf))
136             break;
137     }
138     if (first_index == 5)
139         goto fail;
140
141     /* find the last image */
142     last_index = first_index;
143     for(;;) {
144         range = 0;
145         for(;;) {
146             if (!range)
147                 range1 = 1;
148             else
149                 range1 = 2 * range;
150             if (av_get_frame_filename(buf, sizeof(buf), path,
151                                       last_index + range1) < 0)
152                 goto fail;
153             if (!url_exist(buf))
154                 break;
155             range = range1;
156             /* just in case... */
157             if (range >= (1 << 30))
158                 goto fail;
159         }
160         /* we are sure than image last_index + range exists */
161         if (!range)
162             break;
163         last_index += range;
164     }
165     *pfirst_index = first_index;
166     *plast_index = last_index;
167     return 0;
168  fail:
169     return -1;
170 }
171
172
173 static int image_probe(AVProbeData *p)
174 {
175     if (p->filename && av_str2id(img_tags, p->filename)) {
176         if (av_filename_number_test(p->filename))
177             return AVPROBE_SCORE_MAX;
178         else
179             return AVPROBE_SCORE_MAX/2;
180     }
181     return 0;
182 }
183
184 enum CodecID av_guess_image2_codec(const char *filename){
185     return av_str2id(img_tags, filename);
186 }
187
188 static int img_read_header(AVFormatContext *s1, AVFormatParameters *ap)
189 {
190     VideoData *s = s1->priv_data;
191     int first_index, last_index;
192     AVStream *st;
193
194     s1->ctx_flags |= AVFMTCTX_NOHEADER;
195
196     st = av_new_stream(s1, 0);
197     if (!st) {
198         return AVERROR(ENOMEM);
199     }
200
201     av_strlcpy(s->path, s1->filename, sizeof(s->path));
202     s->img_number = 0;
203     s->img_count = 0;
204
205     /* find format */
206     if (s1->iformat->flags & AVFMT_NOFILE)
207         s->is_pipe = 0;
208     else{
209         s->is_pipe = 1;
210         st->need_parsing = AVSTREAM_PARSE_FULL;
211     }
212
213     if (!ap->time_base.num) {
214         av_set_pts_info(st, 60, 1, 25);
215     } else {
216         av_set_pts_info(st, 60, ap->time_base.num, ap->time_base.den);
217     }
218
219     if(ap->width && ap->height){
220         st->codec->width = ap->width;
221         st->codec->height= ap->height;
222     }
223
224     if (!s->is_pipe) {
225         if (find_image_range(&first_index, &last_index, s->path) < 0)
226             return AVERROR(ENOENT);
227         s->img_first = first_index;
228         s->img_last = last_index;
229         s->img_number = first_index;
230         /* compute duration */
231         st->start_time = 0;
232         st->duration = last_index - first_index + 1;
233     }
234
235     if(ap->video_codec_id){
236         st->codec->codec_type = CODEC_TYPE_VIDEO;
237         st->codec->codec_id = ap->video_codec_id;
238     }else if(ap->audio_codec_id){
239         st->codec->codec_type = CODEC_TYPE_AUDIO;
240         st->codec->codec_id = ap->audio_codec_id;
241     }else{
242         st->codec->codec_type = CODEC_TYPE_VIDEO;
243         st->codec->codec_id = av_str2id(img_tags, s->path);
244     }
245     if(st->codec->codec_type == CODEC_TYPE_VIDEO && ap->pix_fmt != PIX_FMT_NONE)
246         st->codec->pix_fmt = ap->pix_fmt;
247
248     return 0;
249 }
250
251 static int img_read_packet(AVFormatContext *s1, AVPacket *pkt)
252 {
253     VideoData *s = s1->priv_data;
254     char filename[1024];
255     int i;
256     int size[3]={0}, ret[3]={0};
257     ByteIOContext *f[3];
258     AVCodecContext *codec= s1->streams[0]->codec;
259
260     if (!s->is_pipe) {
261         /* loop over input */
262         if (s1->loop_input && s->img_number > s->img_last) {
263             s->img_number = s->img_first;
264         }
265         if (s->img_number > s->img_last)
266             return AVERROR_EOF;
267         if (av_get_frame_filename(filename, sizeof(filename),
268                                   s->path, s->img_number)<0 && s->img_number > 1)
269             return AVERROR(EIO);
270         for(i=0; i<3; i++){
271             if (url_fopen(&f[i], filename, URL_RDONLY) < 0) {
272                 av_log(s1, AV_LOG_ERROR, "Could not open file : %s\n",filename);
273                 return AVERROR(EIO);
274             }
275             size[i]= url_fsize(f[i]);
276
277             if(codec->codec_id != CODEC_ID_RAWVIDEO)
278                 break;
279             filename[ strlen(filename) - 1 ]= 'U' + i;
280         }
281
282         if(codec->codec_id == CODEC_ID_RAWVIDEO && !codec->width)
283             infer_size(&codec->width, &codec->height, size[0]);
284     } else {
285         f[0] = s1->pb;
286         if (url_feof(f[0]))
287             return AVERROR(EIO);
288         size[0]= 4096;
289     }
290
291     av_new_packet(pkt, size[0] + size[1] + size[2]);
292     pkt->stream_index = 0;
293     pkt->flags |= PKT_FLAG_KEY;
294
295     pkt->size= 0;
296     for(i=0; i<3; i++){
297         if(size[i]){
298             ret[i]= get_buffer(f[i], pkt->data + pkt->size, size[i]);
299             if (!s->is_pipe)
300                 url_fclose(f[i]);
301             if(ret[i]>0)
302                 pkt->size += ret[i];
303         }
304     }
305
306     if (ret[0] <= 0 || ret[1]<0 || ret[2]<0) {
307         av_free_packet(pkt);
308         return AVERROR(EIO); /* signal EOF */
309     } else {
310         s->img_count++;
311         s->img_number++;
312         return 0;
313     }
314 }
315
316 #if CONFIG_IMAGE2_MUXER || CONFIG_IMAGE2PIPE_MUXER
317 /******************************************************/
318 /* image output */
319
320 static int img_write_header(AVFormatContext *s)
321 {
322     VideoData *img = s->priv_data;
323
324     img->img_number = 1;
325     av_strlcpy(img->path, s->filename, sizeof(img->path));
326
327     /* find format */
328     if (s->oformat->flags & AVFMT_NOFILE)
329         img->is_pipe = 0;
330     else
331         img->is_pipe = 1;
332
333     return 0;
334 }
335
336 static int img_write_packet(AVFormatContext *s, AVPacket *pkt)
337 {
338     VideoData *img = s->priv_data;
339     ByteIOContext *pb[3];
340     char filename[1024];
341     AVCodecContext *codec= s->streams[ pkt->stream_index ]->codec;
342     int i;
343
344     if (!img->is_pipe) {
345         if (av_get_frame_filename(filename, sizeof(filename),
346                                   img->path, img->img_number) < 0 && img->img_number>1) {
347             av_log(s, AV_LOG_ERROR, "Could not get frame filename from pattern\n");
348             return AVERROR(EIO);
349         }
350         for(i=0; i<3; i++){
351             if (url_fopen(&pb[i], filename, URL_WRONLY) < 0) {
352                 av_log(s, AV_LOG_ERROR, "Could not open file : %s\n",filename);
353                 return AVERROR(EIO);
354             }
355
356             if(codec->codec_id != CODEC_ID_RAWVIDEO)
357                 break;
358             filename[ strlen(filename) - 1 ]= 'U' + i;
359         }
360     } else {
361         pb[0] = s->pb;
362     }
363
364     if(codec->codec_id == CODEC_ID_RAWVIDEO){
365         int ysize = codec->width * codec->height;
366         put_buffer(pb[0], pkt->data        , ysize);
367         put_buffer(pb[1], pkt->data + ysize, (pkt->size - ysize)/2);
368         put_buffer(pb[2], pkt->data + ysize +(pkt->size - ysize)/2, (pkt->size - ysize)/2);
369         put_flush_packet(pb[1]);
370         put_flush_packet(pb[2]);
371         url_fclose(pb[1]);
372         url_fclose(pb[2]);
373     }else{
374         if(av_str2id(img_tags, s->filename) == CODEC_ID_JPEG2000){
375             AVStream *st = s->streams[0];
376             if(st->codec->extradata_size > 8 &&
377                AV_RL32(st->codec->extradata+4) == MKTAG('j','p','2','h')){
378                 if(pkt->size < 8 || AV_RL32(pkt->data+4) != MKTAG('j','p','2','c'))
379                     goto error;
380                 put_be32(pb[0], 12);
381                 put_tag (pb[0], "jP  ");
382                 put_be32(pb[0], 0x0D0A870A); // signature
383                 put_be32(pb[0], 20);
384                 put_tag (pb[0], "ftyp");
385                 put_tag (pb[0], "jp2 ");
386                 put_be32(pb[0], 0);
387                 put_tag (pb[0], "jp2 ");
388                 put_buffer(pb[0], st->codec->extradata, st->codec->extradata_size);
389             }else if(pkt->size < 8 ||
390                      (!st->codec->extradata_size &&
391                       AV_RL32(pkt->data+4) != MKTAG('j','P',' ',' '))){ // signature
392             error:
393                 av_log(s, AV_LOG_ERROR, "malformated jpeg2000 codestream\n");
394                 return -1;
395             }
396         }
397         put_buffer(pb[0], pkt->data, pkt->size);
398     }
399     put_flush_packet(pb[0]);
400     if (!img->is_pipe) {
401         url_fclose(pb[0]);
402     }
403
404     img->img_number++;
405     return 0;
406 }
407
408 #endif /* CONFIG_IMAGE2_MUXER || CONFIG_IMAGE2PIPE_MUXER */
409
410 /* input */
411 #if CONFIG_IMAGE2_DEMUXER
412 AVInputFormat image2_demuxer = {
413     "image2",
414     NULL_IF_CONFIG_SMALL("image2 sequence"),
415     sizeof(VideoData),
416     image_probe,
417     img_read_header,
418     img_read_packet,
419     NULL,
420     NULL,
421     NULL,
422     AVFMT_NOFILE,
423 };
424 #endif
425 #if CONFIG_IMAGE2PIPE_DEMUXER
426 AVInputFormat image2pipe_demuxer = {
427     "image2pipe",
428     NULL_IF_CONFIG_SMALL("piped image2 sequence"),
429     sizeof(VideoData),
430     NULL, /* no probe */
431     img_read_header,
432     img_read_packet,
433 };
434 #endif
435
436 /* output */
437 #if CONFIG_IMAGE2_MUXER
438 AVOutputFormat image2_muxer = {
439     "image2",
440     NULL_IF_CONFIG_SMALL("image2 sequence"),
441     "",
442     "bmp,jpeg,jpg,ljpg,pam,pbm,pcx,pgm,pgmyuv,png,ppm,sgi,tif,tiff,jp2",
443     sizeof(VideoData),
444     CODEC_ID_NONE,
445     CODEC_ID_MJPEG,
446     img_write_header,
447     img_write_packet,
448     NULL,
449     .flags= AVFMT_NOTIMESTAMPS | AVFMT_NOFILE
450 };
451 #endif
452 #if CONFIG_IMAGE2PIPE_MUXER
453 AVOutputFormat image2pipe_muxer = {
454     "image2pipe",
455     NULL_IF_CONFIG_SMALL("piped image2 sequence"),
456     "",
457     "",
458     sizeof(VideoData),
459     CODEC_ID_NONE,
460     CODEC_ID_MJPEG,
461     img_write_header,
462     img_write_packet,
463     .flags= AVFMT_NOTIMESTAMPS
464 };
465 #endif