d53c33ab0a11403045212b3ad3041cae6772a4c6
[ffmpeg.git] / libavformat / icodec.c
1 /*
2  * Microsoft Windows ICO demuxer
3  * Copyright (c) 2011 Peter Ross (pross@xvid.org)
4  *
5  * This file is part of FFmpeg.
6  *
7  * FFmpeg is free software; you can redistribute it and/or
8  * modify it under the terms of the GNU Lesser General Public
9  * License as published by the Free Software Foundation; either
10  * version 2.1 of the License, or (at your option) any later version.
11  *
12  * FFmpeg is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
15  * Lesser General Public License for more details.
16  *
17  * You should have received a copy of the GNU Lesser General Public
18  * License along with FFmpeg; if not, write to the Free Software
19  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
20  */
21
22 /**
23  * @file
24  * Microsoft Windows ICO demuxer
25  */
26
27 #include "libavutil/intreadwrite.h"
28 #include "libavcodec/bytestream.h"
29 #include "libavcodec/bmp.h"
30 #include "avformat.h"
31 #include "internal.h"
32
33 typedef struct {
34     int offset;
35     int size;
36     int nb_pal;
37 } IcoImage;
38
39 typedef struct {
40     int current_image;
41     int nb_images;
42     IcoImage * images;
43 } IcoDemuxContext;
44
45 static int probe(AVProbeData *p)
46 {
47     if (AV_RL16(p->buf) == 0 && AV_RL16(p->buf + 2) == 1 && AV_RL16(p->buf + 4))
48         return AVPROBE_SCORE_MAX / 3;
49     return 0;
50 }
51
52 static int read_header(AVFormatContext *s, AVFormatParameters *ap)
53 {
54     IcoDemuxContext *ico = s->priv_data;
55     AVIOContext *pb = s->pb;
56     int i;
57
58     avio_skip(pb, 4);
59     ico->nb_images = avio_rl16(pb);
60
61     ico->images = av_malloc(ico->nb_images * sizeof(IcoImage));
62     if (!ico->images)
63         return AVERROR(ENOMEM);
64
65     for (i = 0; i < ico->nb_images; i++) {
66         AVStream *st;
67
68         if (avio_seek(pb, 6 + i * 16, SEEK_SET) < 0)
69             break;
70
71         st = avformat_new_stream(s, NULL);
72         if (!st)
73             return AVERROR(ENOMEM);
74
75         st->codec->codec_type = AVMEDIA_TYPE_VIDEO;
76         st->codec->width      = avio_r8(pb);
77         st->codec->height     = avio_r8(pb);
78         ico->images[i].nb_pal = avio_r8(pb);
79         if (ico->images[i].nb_pal == 255)
80             ico->images[i].nb_pal = 0;
81
82         avio_skip(pb, 5);
83
84         ico->images[i].size   = avio_rl32(pb);
85         ico->images[i].offset = avio_rl32(pb);
86
87         if (avio_seek(pb, ico->images[i].offset, SEEK_SET) < 0)
88             break;
89
90         switch(avio_rl32(pb)) {
91         case MKTAG(0x89, 'P', 'N', 'G'):
92             st->codec->codec_id = CODEC_ID_PNG;
93             st->codec->width    = 0;
94             st->codec->height   = 0;
95             break;
96         case 40:
97             if (ico->images[i].size < 40)
98                 return AVERROR_INVALIDDATA;
99             st->codec->codec_id = CODEC_ID_BMP;
100             if (!st->codec->width || !st->codec->height) {
101                 st->codec->width  = avio_rl32(pb);
102                 st->codec->height = avio_rl32(pb) / 2;
103             }
104             break;
105         default:
106             av_log_ask_for_sample(s, "unsupported codec\n");
107             return AVERROR_INVALIDDATA;
108         }
109     }
110
111     return 0;
112 }
113
114 static int read_packet(AVFormatContext *s, AVPacket *pkt)
115 {
116     IcoDemuxContext *ico = s->priv_data;
117     IcoImage *image;
118     AVIOContext *pb = s->pb;
119     AVStream *st = s->streams[0];
120     int ret;
121
122     if (ico->current_image >= ico->nb_images)
123         return AVERROR(EIO);
124
125     image = &ico->images[ico->current_image];
126
127     if ((ret = avio_seek(pb, image->offset, SEEK_SET)) < 0)
128         return ret;
129
130     if (s->streams[ico->current_image]->codec->codec_id == CODEC_ID_PNG) {
131         if ((ret = av_get_packet(pb, pkt, image->size)) < 0)
132             return ret;
133     } else {
134         uint8_t *buf;
135         if ((ret = av_new_packet(pkt, 14 + image->size)) < 0)
136             return ret;
137         buf = pkt->data;
138
139         /* add BMP header */
140         bytestream_put_byte(&buf, 'B');
141         bytestream_put_byte(&buf, 'M');
142         bytestream_put_le32(&buf, pkt->size);
143         bytestream_put_le16(&buf, 0);
144         bytestream_put_le16(&buf, 0);
145         bytestream_put_le32(&buf, 0);
146
147         if ((ret = avio_read(pb, buf, image->size)) < 0)
148             return ret;
149
150         st->codec->bits_per_coded_sample = AV_RL16(buf + 14);
151
152         if (AV_RL32(buf + 32))
153             image->nb_pal = AV_RL32(buf + 32);
154
155         if (st->codec->bits_per_coded_sample <= 8 && !image->nb_pal) {
156             image->nb_pal = 1 << st->codec->bits_per_coded_sample;
157             AV_WL32(buf + 32, image->nb_pal);
158         }
159
160         AV_WL32(buf - 4, 14 + 40 + image->nb_pal * 4);
161         AV_WL32(buf + 8, AV_RL32(buf + 8) / 2);
162     }
163
164     pkt->stream_index = ico->current_image++;
165     pkt->flags |= AV_PKT_FLAG_KEY;
166
167     return 0;
168 }
169
170 AVInputFormat ff_ico_demuxer = {
171     .name           = "ico",
172     .long_name      = NULL_IF_CONFIG_SMALL("Microsoft Windows ICO"),
173     .priv_data_size = sizeof(IcoDemuxContext),
174     .read_probe     = probe,
175     .read_header    = read_header,
176     .read_packet    = read_packet,
177     .flags          = AVFMT_NOTIMESTAMPS,
178 };