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
28typedef 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
37typedef struct {
38    enum CodecID id;
39    const char *str;
40} IdStrMap;
41
42static 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
79static 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
91static 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}
104static 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 */
120static 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
173static 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
184enum CodecID av_guess_image2_codec(const char *filename){
185    return av_str2id(img_tags, filename);
186}
187
188static 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(s1->video_codec_id){
236        st->codec->codec_type = AVMEDIA_TYPE_VIDEO;
237        st->codec->codec_id = s1->video_codec_id;
238    }else if(s1->audio_codec_id){
239        st->codec->codec_type = AVMEDIA_TYPE_AUDIO;
240        st->codec->codec_id = s1->audio_codec_id;
241    }else{
242        st->codec->codec_type = AVMEDIA_TYPE_VIDEO;
243        st->codec->codec_id = av_str2id(img_tags, s->path);
244    }
245    if(st->codec->codec_type == AVMEDIA_TYPE_VIDEO && ap->pix_fmt != PIX_FMT_NONE)
246        st->codec->pix_fmt = ap->pix_fmt;
247
248    return 0;
249}
250
251static 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                if(i==1)
273                    break;
274                av_log(s1, AV_LOG_ERROR, "Could not open file : %s\n",filename);
275                return AVERROR(EIO);
276            }
277            size[i]= url_fsize(f[i]);
278
279            if(codec->codec_id != CODEC_ID_RAWVIDEO)
280                break;
281            filename[ strlen(filename) - 1 ]= 'U' + i;
282        }
283
284        if(codec->codec_id == CODEC_ID_RAWVIDEO && !codec->width)
285            infer_size(&codec->width, &codec->height, size[0]);
286    } else {
287        f[0] = s1->pb;
288        if (url_feof(f[0]))
289            return AVERROR(EIO);
290        size[0]= 4096;
291    }
292
293    av_new_packet(pkt, size[0] + size[1] + size[2]);
294    pkt->stream_index = 0;
295    pkt->flags |= AV_PKT_FLAG_KEY;
296
297    pkt->size= 0;
298    for(i=0; i<3; i++){
299        if(size[i]){
300            ret[i]= get_buffer(f[i], pkt->data + pkt->size, size[i]);
301            if (!s->is_pipe)
302                url_fclose(f[i]);
303            if(ret[i]>0)
304                pkt->size += ret[i];
305        }
306    }
307
308    if (ret[0] <= 0 || ret[1]<0 || ret[2]<0) {
309        av_free_packet(pkt);
310        return AVERROR(EIO); /* signal EOF */
311    } else {
312        s->img_count++;
313        s->img_number++;
314        return 0;
315    }
316}
317
318#if CONFIG_IMAGE2_MUXER || CONFIG_IMAGE2PIPE_MUXER
319/******************************************************/
320/* image output */
321
322static int img_write_header(AVFormatContext *s)
323{
324    VideoData *img = s->priv_data;
325
326    img->img_number = 1;
327    av_strlcpy(img->path, s->filename, sizeof(img->path));
328
329    /* find format */
330    if (s->oformat->flags & AVFMT_NOFILE)
331        img->is_pipe = 0;
332    else
333        img->is_pipe = 1;
334
335    return 0;
336}
337
338static int img_write_packet(AVFormatContext *s, AVPacket *pkt)
339{
340    VideoData *img = s->priv_data;
341    ByteIOContext *pb[3];
342    char filename[1024];
343    AVCodecContext *codec= s->streams[ pkt->stream_index ]->codec;
344    int i;
345
346    if (!img->is_pipe) {
347        if (av_get_frame_filename(filename, sizeof(filename),
348                                  img->path, img->img_number) < 0 && img->img_number>1) {
349            av_log(s, AV_LOG_ERROR, "Could not get frame filename from pattern\n");
350            return AVERROR(EIO);
351        }
352        for(i=0; i<3; i++){
353            if (url_fopen(&pb[i], filename, URL_WRONLY) < 0) {
354                av_log(s, AV_LOG_ERROR, "Could not open file : %s\n",filename);
355                return AVERROR(EIO);
356            }
357
358            if(codec->codec_id != CODEC_ID_RAWVIDEO)
359                break;
360            filename[ strlen(filename) - 1 ]= 'U' + i;
361        }
362    } else {
363        pb[0] = s->pb;
364    }
365
366    if(codec->codec_id == CODEC_ID_RAWVIDEO){
367        int ysize = codec->width * codec->height;
368        put_buffer(pb[0], pkt->data        , ysize);
369        put_buffer(pb[1], pkt->data + ysize, (pkt->size - ysize)/2);
370        put_buffer(pb[2], pkt->data + ysize +(pkt->size - ysize)/2, (pkt->size - ysize)/2);
371        put_flush_packet(pb[1]);
372        put_flush_packet(pb[2]);
373        url_fclose(pb[1]);
374        url_fclose(pb[2]);
375    }else{
376        if(av_str2id(img_tags, s->filename) == CODEC_ID_JPEG2000){
377            AVStream *st = s->streams[0];
378            if(st->codec->extradata_size > 8 &&
379               AV_RL32(st->codec->extradata+4) == MKTAG('j','p','2','h')){
380                if(pkt->size < 8 || AV_RL32(pkt->data+4) != MKTAG('j','p','2','c'))
381                    goto error;
382                put_be32(pb[0], 12);
383                put_tag (pb[0], "jP  ");
384                put_be32(pb[0], 0x0D0A870A); // signature
385                put_be32(pb[0], 20);
386                put_tag (pb[0], "ftyp");
387                put_tag (pb[0], "jp2 ");
388                put_be32(pb[0], 0);
389                put_tag (pb[0], "jp2 ");
390                put_buffer(pb[0], st->codec->extradata, st->codec->extradata_size);
391            }else if(pkt->size < 8 ||
392                     (!st->codec->extradata_size &&
393                      AV_RL32(pkt->data+4) != MKTAG('j','P',' ',' '))){ // signature
394            error:
395                av_log(s, AV_LOG_ERROR, "malformated jpeg2000 codestream\n");
396                return -1;
397            }
398        }
399        put_buffer(pb[0], pkt->data, pkt->size);
400    }
401    put_flush_packet(pb[0]);
402    if (!img->is_pipe) {
403        url_fclose(pb[0]);
404    }
405
406    img->img_number++;
407    return 0;
408}
409
410#endif /* CONFIG_IMAGE2_MUXER || CONFIG_IMAGE2PIPE_MUXER */
411
412/* input */
413#if CONFIG_IMAGE2_DEMUXER
414AVInputFormat image2_demuxer = {
415    "image2",
416    NULL_IF_CONFIG_SMALL("image2 sequence"),
417    sizeof(VideoData),
418    image_probe,
419    img_read_header,
420    img_read_packet,
421    NULL,
422    NULL,
423    NULL,
424    AVFMT_NOFILE,
425};
426#endif
427#if CONFIG_IMAGE2PIPE_DEMUXER
428AVInputFormat image2pipe_demuxer = {
429    "image2pipe",
430    NULL_IF_CONFIG_SMALL("piped image2 sequence"),
431    sizeof(VideoData),
432    NULL, /* no probe */
433    img_read_header,
434    img_read_packet,
435};
436#endif
437
438/* output */
439#if CONFIG_IMAGE2_MUXER
440AVOutputFormat image2_muxer = {
441    "image2",
442    NULL_IF_CONFIG_SMALL("image2 sequence"),
443    "",
444    "bmp,jpeg,jpg,ljpg,pam,pbm,pcx,pgm,pgmyuv,png,ppm,sgi,tif,tiff,jp2",
445    sizeof(VideoData),
446    CODEC_ID_NONE,
447    CODEC_ID_MJPEG,
448    img_write_header,
449    img_write_packet,
450    NULL,
451    .flags= AVFMT_NOTIMESTAMPS | AVFMT_NODIMENSIONS | AVFMT_NOFILE
452};
453#endif
454#if CONFIG_IMAGE2PIPE_MUXER
455AVOutputFormat image2pipe_muxer = {
456    "image2pipe",
457    NULL_IF_CONFIG_SMALL("piped image2 sequence"),
458    "",
459    "",
460    sizeof(VideoData),
461    CODEC_ID_NONE,
462    CODEC_ID_MJPEG,
463    img_write_header,
464    img_write_packet,
465    .flags= AVFMT_NOTIMESTAMPS | AVFMT_NODIMENSIONS
466};
467#endif
468