Commit | Line | Data |
---|---|---|
2ba45a60 DM |
1 | /* |
2 | * Pictor/PC Paint decoder | |
3 | * Copyright (c) 2010 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 | * Pictor/PC Paint decoder | |
25 | */ | |
26 | ||
27 | #include "libavutil/imgutils.h" | |
28 | #include "avcodec.h" | |
29 | #include "bytestream.h" | |
30 | #include "cga_data.h" | |
31 | #include "internal.h" | |
32 | ||
33 | typedef struct PicContext { | |
34 | int width, height; | |
35 | int nb_planes; | |
36 | GetByteContext g; | |
37 | } PicContext; | |
38 | ||
39 | static void picmemset_8bpp(PicContext *s, AVFrame *frame, int value, int run, | |
40 | int *x, int *y) | |
41 | { | |
42 | while (run > 0) { | |
43 | uint8_t *d = frame->data[0] + *y * frame->linesize[0]; | |
44 | if (*x + run >= s->width) { | |
45 | int n = s->width - *x; | |
46 | memset(d + *x, value, n); | |
47 | run -= n; | |
48 | *x = 0; | |
49 | *y -= 1; | |
50 | if (*y < 0) | |
51 | break; | |
52 | } else { | |
53 | memset(d + *x, value, run); | |
54 | *x += run; | |
55 | break; | |
56 | } | |
57 | } | |
58 | } | |
59 | ||
60 | static void picmemset(PicContext *s, AVFrame *frame, int value, int run, | |
61 | int *x, int *y, int *plane, int bits_per_plane) | |
62 | { | |
63 | uint8_t *d; | |
64 | int shift = *plane * bits_per_plane; | |
65 | int mask = ((1 << bits_per_plane) - 1) << shift; | |
66 | value <<= shift; | |
67 | ||
68 | while (run > 0) { | |
69 | int j; | |
70 | for (j = 8-bits_per_plane; j >= 0; j -= bits_per_plane) { | |
71 | d = frame->data[0] + *y * frame->linesize[0]; | |
72 | d[*x] |= (value >> j) & mask; | |
73 | *x += 1; | |
74 | if (*x == s->width) { | |
75 | *y -= 1; | |
76 | *x = 0; | |
77 | if (*y < 0) { | |
78 | *y = s->height - 1; | |
79 | *plane += 1; | |
80 | value <<= bits_per_plane; | |
81 | mask <<= bits_per_plane; | |
82 | if (*plane >= s->nb_planes) | |
83 | break; | |
84 | } | |
85 | } | |
86 | } | |
87 | run--; | |
88 | } | |
89 | } | |
90 | ||
91 | static const uint8_t cga_mode45_index[6][4] = { | |
92 | [0] = { 0, 3, 5, 7 }, // mode4, palette#1, low intensity | |
93 | [1] = { 0, 2, 4, 6 }, // mode4, palette#2, low intensity | |
94 | [2] = { 0, 3, 4, 7 }, // mode5, low intensity | |
95 | [3] = { 0, 11, 13, 15 }, // mode4, palette#1, high intensity | |
96 | [4] = { 0, 10, 12, 14 }, // mode4, palette#2, high intensity | |
97 | [5] = { 0, 11, 12, 15 }, // mode5, high intensity | |
98 | }; | |
99 | ||
100 | static int decode_frame(AVCodecContext *avctx, | |
101 | void *data, int *got_frame, | |
102 | AVPacket *avpkt) | |
103 | { | |
104 | PicContext *s = avctx->priv_data; | |
105 | AVFrame *frame = data; | |
106 | uint32_t *palette; | |
107 | int bits_per_plane, bpp, etype, esize, npal, pos_after_pal; | |
108 | int i, x, y, plane, tmp, ret, val; | |
109 | ||
110 | bytestream2_init(&s->g, avpkt->data, avpkt->size); | |
111 | ||
112 | if (bytestream2_get_bytes_left(&s->g) < 11) | |
113 | return AVERROR_INVALIDDATA; | |
114 | ||
115 | if (bytestream2_get_le16u(&s->g) != 0x1234) | |
116 | return AVERROR_INVALIDDATA; | |
117 | ||
118 | s->width = bytestream2_get_le16u(&s->g); | |
119 | s->height = bytestream2_get_le16u(&s->g); | |
120 | bytestream2_skip(&s->g, 4); | |
121 | tmp = bytestream2_get_byteu(&s->g); | |
122 | bits_per_plane = tmp & 0xF; | |
123 | s->nb_planes = (tmp >> 4) + 1; | |
124 | bpp = bits_per_plane * s->nb_planes; | |
125 | if (bits_per_plane > 8 || bpp < 1 || bpp > 32) { | |
126 | avpriv_request_sample(avctx, "Unsupported bit depth"); | |
127 | return AVERROR_PATCHWELCOME; | |
128 | } | |
129 | ||
130 | if (bytestream2_peek_byte(&s->g) == 0xFF || bpp == 1 || bpp == 4 || bpp == 8) { | |
131 | bytestream2_skip(&s->g, 2); | |
132 | etype = bytestream2_get_le16(&s->g); | |
133 | esize = bytestream2_get_le16(&s->g); | |
134 | if (bytestream2_get_bytes_left(&s->g) < esize) | |
135 | return AVERROR_INVALIDDATA; | |
136 | } else { | |
137 | etype = -1; | |
138 | esize = 0; | |
139 | } | |
140 | ||
141 | avctx->pix_fmt = AV_PIX_FMT_PAL8; | |
142 | ||
143 | if (av_image_check_size(s->width, s->height, 0, avctx) < 0) | |
144 | return -1; | |
145 | if (s->width != avctx->width && s->height != avctx->height) { | |
146 | ret = ff_set_dimensions(avctx, s->width, s->height); | |
147 | if (ret < 0) | |
148 | return ret; | |
149 | } | |
150 | ||
151 | if ((ret = ff_get_buffer(avctx, frame, 0)) < 0) | |
152 | return ret; | |
153 | memset(frame->data[0], 0, s->height * frame->linesize[0]); | |
154 | frame->pict_type = AV_PICTURE_TYPE_I; | |
155 | frame->palette_has_changed = 1; | |
156 | ||
157 | pos_after_pal = bytestream2_tell(&s->g) + esize; | |
158 | palette = (uint32_t*)frame->data[1]; | |
159 | if (etype == 1 && esize > 1 && bytestream2_peek_byte(&s->g) < 6) { | |
160 | int idx = bytestream2_get_byte(&s->g); | |
161 | npal = 4; | |
162 | for (i = 0; i < npal; i++) | |
163 | palette[i] = ff_cga_palette[ cga_mode45_index[idx][i] ]; | |
164 | } else if (etype == 2) { | |
165 | npal = FFMIN(esize, 16); | |
166 | for (i = 0; i < npal; i++) { | |
167 | int pal_idx = bytestream2_get_byte(&s->g); | |
168 | palette[i] = ff_cga_palette[FFMIN(pal_idx, 15)]; | |
169 | } | |
170 | } else if (etype == 3) { | |
171 | npal = FFMIN(esize, 16); | |
172 | for (i = 0; i < npal; i++) { | |
173 | int pal_idx = bytestream2_get_byte(&s->g); | |
174 | palette[i] = ff_ega_palette[FFMIN(pal_idx, 63)]; | |
175 | } | |
176 | } else if (etype == 4 || etype == 5) { | |
177 | npal = FFMIN(esize / 3, 256); | |
178 | for (i = 0; i < npal; i++) { | |
179 | palette[i] = bytestream2_get_be24(&s->g) << 2; | |
180 | palette[i] |= 0xFFU << 24 | palette[i] >> 6 & 0x30303; | |
181 | } | |
182 | } else { | |
183 | if (bpp == 1) { | |
184 | npal = 2; | |
185 | palette[0] = 0xFF000000; | |
186 | palette[1] = 0xFFFFFFFF; | |
187 | } else if (bpp == 2) { | |
188 | npal = 4; | |
189 | for (i = 0; i < npal; i++) | |
190 | palette[i] = ff_cga_palette[ cga_mode45_index[0][i] ]; | |
191 | } else { | |
192 | npal = 16; | |
193 | memcpy(palette, ff_cga_palette, npal * 4); | |
194 | } | |
195 | } | |
196 | // fill remaining palette entries | |
197 | memset(palette + npal, 0, AVPALETTE_SIZE - npal * 4); | |
198 | // skip remaining palette bytes | |
199 | bytestream2_seek(&s->g, pos_after_pal, SEEK_SET); | |
200 | ||
201 | val = 0; | |
202 | y = s->height - 1; | |
203 | if (bytestream2_get_le16(&s->g)) { | |
204 | x = 0; | |
205 | plane = 0; | |
206 | while (bytestream2_get_bytes_left(&s->g) >= 6) { | |
207 | int stop_size, marker, t1, t2; | |
208 | ||
209 | t1 = bytestream2_get_bytes_left(&s->g); | |
210 | t2 = bytestream2_get_le16(&s->g); | |
211 | stop_size = t1 - FFMIN(t1, t2); | |
212 | // ignore uncompressed block size | |
213 | bytestream2_skip(&s->g, 2); | |
214 | marker = bytestream2_get_byte(&s->g); | |
215 | ||
216 | while (plane < s->nb_planes && | |
217 | bytestream2_get_bytes_left(&s->g) > stop_size) { | |
218 | int run = 1; | |
219 | val = bytestream2_get_byte(&s->g); | |
220 | if (val == marker) { | |
221 | run = bytestream2_get_byte(&s->g); | |
222 | if (run == 0) | |
223 | run = bytestream2_get_le16(&s->g); | |
224 | val = bytestream2_get_byte(&s->g); | |
225 | } | |
226 | if (!bytestream2_get_bytes_left(&s->g)) | |
227 | break; | |
228 | ||
229 | if (bits_per_plane == 8) { | |
230 | picmemset_8bpp(s, frame, val, run, &x, &y); | |
231 | if (y < 0) | |
232 | goto finish; | |
233 | } else { | |
234 | picmemset(s, frame, val, run, &x, &y, &plane, bits_per_plane); | |
235 | } | |
236 | } | |
237 | } | |
238 | ||
239 | if (x < avctx->width) { | |
240 | int run = (y + 1) * avctx->width - x; | |
241 | if (bits_per_plane == 8) | |
242 | picmemset_8bpp(s, frame, val, run, &x, &y); | |
243 | else | |
244 | picmemset(s, frame, val, run / (8 / bits_per_plane), &x, &y, &plane, bits_per_plane); | |
245 | } | |
246 | } else { | |
247 | while (y >= 0 && bytestream2_get_bytes_left(&s->g) > 0) { | |
248 | memcpy(frame->data[0] + y * frame->linesize[0], s->g.buffer, FFMIN(avctx->width, bytestream2_get_bytes_left(&s->g))); | |
249 | bytestream2_skip(&s->g, avctx->width); | |
250 | y--; | |
251 | } | |
252 | } | |
253 | finish: | |
254 | ||
255 | *got_frame = 1; | |
256 | return avpkt->size; | |
257 | } | |
258 | ||
259 | AVCodec ff_pictor_decoder = { | |
260 | .name = "pictor", | |
261 | .long_name = NULL_IF_CONFIG_SMALL("Pictor/PC Paint"), | |
262 | .type = AVMEDIA_TYPE_VIDEO, | |
263 | .id = AV_CODEC_ID_PICTOR, | |
264 | .priv_data_size = sizeof(PicContext), | |
265 | .decode = decode_frame, | |
266 | .capabilities = CODEC_CAP_DR1, | |
267 | }; |