XWD encoder and decoder
[libav.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 Libav.
7 *
8 * Libav 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 * Libav 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 Libav; 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 "libavutil/log.h"
26 #include "libavutil/opt.h"
27 #include "libavutil/pixdesc.h"
28 #include "libavutil/parseutils.h"
29 #include "avformat.h"
30 #include "avio_internal.h"
31 #include "internal.h"
32
33 typedef struct {
34 const AVClass *class; /**< Class for private options. */
35 int img_first;
36 int img_last;
37 int img_number;
38 int img_count;
39 int is_pipe;
40 char path[1024];
41 char *pixel_format; /**< Set by a private option. */
42 char *video_size; /**< Set by a private option. */
43 char *framerate; /**< Set by a private option. */
44 int loop;
45 } VideoData;
46
47 typedef struct {
48 enum CodecID id;
49 const char *str;
50 } IdStrMap;
51
52 static const IdStrMap img_tags[] = {
53 { CODEC_ID_MJPEG , "jpeg"},
54 { CODEC_ID_MJPEG , "jpg"},
55 { CODEC_ID_LJPEG , "ljpg"},
56 { CODEC_ID_PNG , "png"},
57 { CODEC_ID_PNG , "mng"},
58 { CODEC_ID_PPM , "ppm"},
59 { CODEC_ID_PPM , "pnm"},
60 { CODEC_ID_PGM , "pgm"},
61 { CODEC_ID_PGMYUV , "pgmyuv"},
62 { CODEC_ID_PBM , "pbm"},
63 { CODEC_ID_PAM , "pam"},
64 { CODEC_ID_MPEG1VIDEO, "mpg1-img"},
65 { CODEC_ID_MPEG2VIDEO, "mpg2-img"},
66 { CODEC_ID_MPEG4 , "mpg4-img"},
67 { CODEC_ID_FFV1 , "ffv1-img"},
68 { CODEC_ID_RAWVIDEO , "y"},
69 { CODEC_ID_BMP , "bmp"},
70 { CODEC_ID_GIF , "gif"},
71 { CODEC_ID_TARGA , "tga"},
72 { CODEC_ID_TIFF , "tiff"},
73 { CODEC_ID_TIFF , "tif"},
74 { CODEC_ID_SGI , "sgi"},
75 { CODEC_ID_PTX , "ptx"},
76 { CODEC_ID_PCX , "pcx"},
77 { CODEC_ID_SUNRAST , "sun"},
78 { CODEC_ID_SUNRAST , "ras"},
79 { CODEC_ID_SUNRAST , "rs"},
80 { CODEC_ID_SUNRAST , "im1"},
81 { CODEC_ID_SUNRAST , "im8"},
82 { CODEC_ID_SUNRAST , "im24"},
83 { CODEC_ID_SUNRAST , "sunras"},
84 { CODEC_ID_JPEG2000 , "jp2"},
85 { CODEC_ID_JPEG2000 , "jpc"},
86 { CODEC_ID_DPX , "dpx"},
87 { CODEC_ID_PICTOR , "pic"},
88 { CODEC_ID_XWD , "xwd"},
89 { CODEC_ID_NONE , NULL}
90 };
91
92 static const int sizes[][2] = {
93 { 640, 480 },
94 { 720, 480 },
95 { 720, 576 },
96 { 352, 288 },
97 { 352, 240 },
98 { 160, 128 },
99 { 512, 384 },
100 { 640, 352 },
101 { 640, 240 },
102 };
103
104 static int infer_size(int *width_ptr, int *height_ptr, int size)
105 {
106 int i;
107
108 for(i=0;i<FF_ARRAY_ELEMS(sizes);i++) {
109 if ((sizes[i][0] * sizes[i][1]) == size) {
110 *width_ptr = sizes[i][0];
111 *height_ptr = sizes[i][1];
112 return 0;
113 }
114 }
115 return -1;
116 }
117 static enum CodecID av_str2id(const IdStrMap *tags, const char *str)
118 {
119 str= strrchr(str, '.');
120 if(!str) return CODEC_ID_NONE;
121 str++;
122
123 while (tags->id) {
124 if (!av_strcasecmp(str, tags->str))
125 return tags->id;
126
127 tags++;
128 }
129 return CODEC_ID_NONE;
130 }
131
132 /* return -1 if no image found */
133 static int find_image_range(int *pfirst_index, int *plast_index,
134 const char *path)
135 {
136 char buf[1024];
137 int range, last_index, range1, first_index;
138
139 /* find the first image */
140 for(first_index = 0; first_index < 5; first_index++) {
141 if (av_get_frame_filename(buf, sizeof(buf), path, first_index) < 0){
142 *pfirst_index =
143 *plast_index = 1;
144 if (avio_check(buf, AVIO_FLAG_READ) > 0)
145 return 0;
146 return -1;
147 }
148 if (avio_check(buf, AVIO_FLAG_READ) > 0)
149 break;
150 }
151 if (first_index == 5)
152 goto fail;
153
154 /* find the last image */
155 last_index = first_index;
156 for(;;) {
157 range = 0;
158 for(;;) {
159 if (!range)
160 range1 = 1;
161 else
162 range1 = 2 * range;
163 if (av_get_frame_filename(buf, sizeof(buf), path,
164 last_index + range1) < 0)
165 goto fail;
166 if (avio_check(buf, AVIO_FLAG_READ) <= 0)
167 break;
168 range = range1;
169 /* just in case... */
170 if (range >= (1 << 30))
171 goto fail;
172 }
173 /* we are sure than image last_index + range exists */
174 if (!range)
175 break;
176 last_index += range;
177 }
178 *pfirst_index = first_index;
179 *plast_index = last_index;
180 return 0;
181 fail:
182 return -1;
183 }
184
185
186 static int read_probe(AVProbeData *p)
187 {
188 if (p->filename && av_str2id(img_tags, p->filename)) {
189 if (av_filename_number_test(p->filename))
190 return AVPROBE_SCORE_MAX;
191 else
192 return AVPROBE_SCORE_MAX/2;
193 }
194 return 0;
195 }
196
197 enum CodecID ff_guess_image2_codec(const char *filename)
198 {
199 return av_str2id(img_tags, filename);
200 }
201
202 #if FF_API_GUESS_IMG2_CODEC
203 enum CodecID av_guess_image2_codec(const char *filename){
204 return av_str2id(img_tags, filename);
205 }
206 #endif
207
208 static int read_header(AVFormatContext *s1, AVFormatParameters *ap)
209 {
210 VideoData *s = s1->priv_data;
211 int first_index, last_index, ret = 0;
212 int width = 0, height = 0;
213 AVStream *st;
214 enum PixelFormat pix_fmt = PIX_FMT_NONE;
215 AVRational framerate;
216
217 s1->ctx_flags |= AVFMTCTX_NOHEADER;
218
219 st = avformat_new_stream(s1, NULL);
220 if (!st) {
221 return AVERROR(ENOMEM);
222 }
223
224 if (s->pixel_format && (pix_fmt = av_get_pix_fmt(s->pixel_format)) == PIX_FMT_NONE) {
225 av_log(s1, AV_LOG_ERROR, "No such pixel format: %s.\n", s->pixel_format);
226 return AVERROR(EINVAL);
227 }
228 if (s->video_size && (ret = av_parse_video_size(&width, &height, s->video_size)) < 0) {
229 av_log(s, AV_LOG_ERROR, "Could not parse video size: %s.\n", s->video_size);
230 return ret;
231 }
232 if ((ret = av_parse_video_rate(&framerate, s->framerate)) < 0) {
233 av_log(s, AV_LOG_ERROR, "Could not parse framerate: %s.\n", s->framerate);
234 return ret;
235 }
236
237 #if FF_API_LOOP_INPUT
238 if (s1->loop_input)
239 s->loop = s1->loop_input;
240 #endif
241
242 av_strlcpy(s->path, s1->filename, sizeof(s->path));
243 s->img_number = 0;
244 s->img_count = 0;
245
246 /* find format */
247 if (s1->iformat->flags & AVFMT_NOFILE)
248 s->is_pipe = 0;
249 else{
250 s->is_pipe = 1;
251 st->need_parsing = AVSTREAM_PARSE_FULL;
252 }
253
254 avpriv_set_pts_info(st, 60, framerate.den, framerate.num);
255
256 if (width && height) {
257 st->codec->width = width;
258 st->codec->height = height;
259 }
260
261 if (!s->is_pipe) {
262 if (find_image_range(&first_index, &last_index, s->path) < 0)
263 return AVERROR(ENOENT);
264 s->img_first = first_index;
265 s->img_last = last_index;
266 s->img_number = first_index;
267 /* compute duration */
268 st->start_time = 0;
269 st->duration = last_index - first_index + 1;
270 }
271
272 if(s1->video_codec_id){
273 st->codec->codec_type = AVMEDIA_TYPE_VIDEO;
274 st->codec->codec_id = s1->video_codec_id;
275 }else if(s1->audio_codec_id){
276 st->codec->codec_type = AVMEDIA_TYPE_AUDIO;
277 st->codec->codec_id = s1->audio_codec_id;
278 }else{
279 st->codec->codec_type = AVMEDIA_TYPE_VIDEO;
280 st->codec->codec_id = av_str2id(img_tags, s->path);
281 }
282 if(st->codec->codec_type == AVMEDIA_TYPE_VIDEO && pix_fmt != PIX_FMT_NONE)
283 st->codec->pix_fmt = pix_fmt;
284
285 return 0;
286 }
287
288 static int read_packet(AVFormatContext *s1, AVPacket *pkt)
289 {
290 VideoData *s = s1->priv_data;
291 char filename[1024];
292 int i;
293 int size[3]={0}, ret[3]={0};
294 AVIOContext *f[3];
295 AVCodecContext *codec= s1->streams[0]->codec;
296
297 if (!s->is_pipe) {
298 /* loop over input */
299 if (s->loop && s->img_number > s->img_last) {
300 s->img_number = s->img_first;
301 }
302 if (s->img_number > s->img_last)
303 return AVERROR_EOF;
304 if (av_get_frame_filename(filename, sizeof(filename),
305 s->path, s->img_number)<0 && s->img_number > 1)
306 return AVERROR(EIO);
307 for(i=0; i<3; i++){
308 if (avio_open2(&f[i], filename, AVIO_FLAG_READ,
309 &s1->interrupt_callback, NULL) < 0) {
310 if(i==1)
311 break;
312 av_log(s1, AV_LOG_ERROR, "Could not open file : %s\n",filename);
313 return AVERROR(EIO);
314 }
315 size[i]= avio_size(f[i]);
316
317 if(codec->codec_id != CODEC_ID_RAWVIDEO)
318 break;
319 filename[ strlen(filename) - 1 ]= 'U' + i;
320 }
321
322 if(codec->codec_id == CODEC_ID_RAWVIDEO && !codec->width)
323 infer_size(&codec->width, &codec->height, size[0]);
324 } else {
325 f[0] = s1->pb;
326 if (f[0]->eof_reached)
327 return AVERROR(EIO);
328 size[0]= 4096;
329 }
330
331 av_new_packet(pkt, size[0] + size[1] + size[2]);
332 pkt->stream_index = 0;
333 pkt->flags |= AV_PKT_FLAG_KEY;
334
335 pkt->size= 0;
336 for(i=0; i<3; i++){
337 if(size[i]){
338 ret[i]= avio_read(f[i], pkt->data + pkt->size, size[i]);
339 if (!s->is_pipe)
340 avio_close(f[i]);
341 if(ret[i]>0)
342 pkt->size += ret[i];
343 }
344 }
345
346 if (ret[0] <= 0 || ret[1]<0 || ret[2]<0) {
347 av_free_packet(pkt);
348 return AVERROR(EIO); /* signal EOF */
349 } else {
350 s->img_count++;
351 s->img_number++;
352 return 0;
353 }
354 }
355
356 #if CONFIG_IMAGE2_MUXER || CONFIG_IMAGE2PIPE_MUXER
357 /******************************************************/
358 /* image output */
359
360 static int write_header(AVFormatContext *s)
361 {
362 VideoData *img = s->priv_data;
363
364 img->img_number = 1;
365 av_strlcpy(img->path, s->filename, sizeof(img->path));
366
367 /* find format */
368 if (s->oformat->flags & AVFMT_NOFILE)
369 img->is_pipe = 0;
370 else
371 img->is_pipe = 1;
372
373 return 0;
374 }
375
376 static int write_packet(AVFormatContext *s, AVPacket *pkt)
377 {
378 VideoData *img = s->priv_data;
379 AVIOContext *pb[3];
380 char filename[1024];
381 AVCodecContext *codec= s->streams[ pkt->stream_index ]->codec;
382 int i;
383
384 if (!img->is_pipe) {
385 if (av_get_frame_filename(filename, sizeof(filename),
386 img->path, img->img_number) < 0 && img->img_number>1) {
387 av_log(s, AV_LOG_ERROR,
388 "Could not get frame filename number %d from pattern '%s'\n",
389 img->img_number, img->path);
390 return AVERROR(EIO);
391 }
392 for(i=0; i<3; i++){
393 if (avio_open2(&pb[i], filename, AVIO_FLAG_WRITE,
394 &s->interrupt_callback, NULL) < 0) {
395 av_log(s, AV_LOG_ERROR, "Could not open file : %s\n",filename);
396 return AVERROR(EIO);
397 }
398
399 if(codec->codec_id != CODEC_ID_RAWVIDEO)
400 break;
401 filename[ strlen(filename) - 1 ]= 'U' + i;
402 }
403 } else {
404 pb[0] = s->pb;
405 }
406
407 if(codec->codec_id == CODEC_ID_RAWVIDEO){
408 int ysize = codec->width * codec->height;
409 avio_write(pb[0], pkt->data , ysize);
410 avio_write(pb[1], pkt->data + ysize, (pkt->size - ysize)/2);
411 avio_write(pb[2], pkt->data + ysize +(pkt->size - ysize)/2, (pkt->size - ysize)/2);
412 avio_flush(pb[1]);
413 avio_flush(pb[2]);
414 avio_close(pb[1]);
415 avio_close(pb[2]);
416 }else{
417 if(av_str2id(img_tags, s->filename) == CODEC_ID_JPEG2000){
418 AVStream *st = s->streams[0];
419 if(st->codec->extradata_size > 8 &&
420 AV_RL32(st->codec->extradata+4) == MKTAG('j','p','2','h')){
421 if(pkt->size < 8 || AV_RL32(pkt->data+4) != MKTAG('j','p','2','c'))
422 goto error;
423 avio_wb32(pb[0], 12);
424 ffio_wfourcc(pb[0], "jP ");
425 avio_wb32(pb[0], 0x0D0A870A); // signature
426 avio_wb32(pb[0], 20);
427 ffio_wfourcc(pb[0], "ftyp");
428 ffio_wfourcc(pb[0], "jp2 ");
429 avio_wb32(pb[0], 0);
430 ffio_wfourcc(pb[0], "jp2 ");
431 avio_write(pb[0], st->codec->extradata, st->codec->extradata_size);
432 }else if(pkt->size < 8 ||
433 (!st->codec->extradata_size &&
434 AV_RL32(pkt->data+4) != MKTAG('j','P',' ',' '))){ // signature
435 error:
436 av_log(s, AV_LOG_ERROR, "malformed JPEG 2000 codestream\n");
437 return -1;
438 }
439 }
440 avio_write(pb[0], pkt->data, pkt->size);
441 }
442 avio_flush(pb[0]);
443 if (!img->is_pipe) {
444 avio_close(pb[0]);
445 }
446
447 img->img_number++;
448 return 0;
449 }
450
451 #endif /* CONFIG_IMAGE2_MUXER || CONFIG_IMAGE2PIPE_MUXER */
452
453 #define OFFSET(x) offsetof(VideoData, x)
454 #define DEC AV_OPT_FLAG_DECODING_PARAM
455 static const AVOption options[] = {
456 { "pixel_format", "", OFFSET(pixel_format), AV_OPT_TYPE_STRING, {.str = NULL}, 0, 0, DEC },
457 { "video_size", "", OFFSET(video_size), AV_OPT_TYPE_STRING, {.str = NULL}, 0, 0, DEC },
458 { "framerate", "", OFFSET(framerate), AV_OPT_TYPE_STRING, {.str = "25"}, 0, 0, DEC },
459 { "loop", "", OFFSET(loop), AV_OPT_TYPE_INT, {.dbl = 0}, 0, 1, DEC },
460 { NULL },
461 };
462
463 /* input */
464 #if CONFIG_IMAGE2_DEMUXER
465 static const AVClass img2_class = {
466 .class_name = "image2 demuxer",
467 .item_name = av_default_item_name,
468 .option = options,
469 .version = LIBAVUTIL_VERSION_INT,
470 };
471 AVInputFormat ff_image2_demuxer = {
472 .name = "image2",
473 .long_name = NULL_IF_CONFIG_SMALL("image2 sequence"),
474 .priv_data_size = sizeof(VideoData),
475 .read_probe = read_probe,
476 .read_header = read_header,
477 .read_packet = read_packet,
478 .flags = AVFMT_NOFILE,
479 .priv_class = &img2_class,
480 };
481 #endif
482 #if CONFIG_IMAGE2PIPE_DEMUXER
483 static const AVClass img2pipe_class = {
484 .class_name = "image2pipe demuxer",
485 .item_name = av_default_item_name,
486 .option = options,
487 .version = LIBAVUTIL_VERSION_INT,
488 };
489 AVInputFormat ff_image2pipe_demuxer = {
490 .name = "image2pipe",
491 .long_name = NULL_IF_CONFIG_SMALL("piped image2 sequence"),
492 .priv_data_size = sizeof(VideoData),
493 .read_header = read_header,
494 .read_packet = read_packet,
495 .priv_class = &img2pipe_class,
496 };
497 #endif
498
499 /* output */
500 #if CONFIG_IMAGE2_MUXER
501 AVOutputFormat ff_image2_muxer = {
502 .name = "image2",
503 .long_name = NULL_IF_CONFIG_SMALL("image2 sequence"),
504 .extensions = "bmp,dpx,jpeg,jpg,ljpg,pam,pbm,pcx,pgm,pgmyuv,png,"
505 "ppm,sgi,tga,tif,tiff,jp2,xwd",
506 .priv_data_size = sizeof(VideoData),
507 .video_codec = CODEC_ID_MJPEG,
508 .write_header = write_header,
509 .write_packet = write_packet,
510 .flags = AVFMT_NOTIMESTAMPS | AVFMT_NODIMENSIONS | AVFMT_NOFILE
511 };
512 #endif
513 #if CONFIG_IMAGE2PIPE_MUXER
514 AVOutputFormat ff_image2pipe_muxer = {
515 .name = "image2pipe",
516 .long_name = NULL_IF_CONFIG_SMALL("piped image2 sequence"),
517 .priv_data_size = sizeof(VideoData),
518 .video_codec = CODEC_ID_MJPEG,
519 .write_header = write_header,
520 .write_packet = write_packet,
521 .flags = AVFMT_NOTIMESTAMPS | AVFMT_NODIMENSIONS
522 };
523 #endif