blob: 9e7cc466decd67b2c18a307c30b68980ea80e812
1 | /* |
2 | * Microsoft Screen 2 (aka Windows Media Video V9 Screen) decoder |
3 | * |
4 | * This file is part of FFmpeg. |
5 | * |
6 | * FFmpeg is free software; you can redistribute it and/or |
7 | * modify it under the terms of the GNU Lesser General Public |
8 | * License as published by the Free Software Foundation; either |
9 | * version 2.1 of the License, or (at your option) any later version. |
10 | * |
11 | * FFmpeg is distributed in the hope that it will be useful, |
12 | * but WITHOUT ANY WARRANTY; without even the implied warranty of |
13 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |
14 | * Lesser General Public License for more details. |
15 | * |
16 | * You should have received a copy of the GNU Lesser General Public |
17 | * License along with FFmpeg; if not, write to the Free Software |
18 | * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA |
19 | */ |
20 | |
21 | /** |
22 | * @file |
23 | * Microsoft Screen 2 (aka Windows Media Video V9 Screen) decoder |
24 | */ |
25 | |
26 | #include "libavutil/avassert.h" |
27 | #include "error_resilience.h" |
28 | #include "internal.h" |
29 | #include "mpeg_er.h" |
30 | #include "msmpeg4.h" |
31 | #include "qpeldsp.h" |
32 | #include "vc1.h" |
33 | #include "wmv2data.h" |
34 | #include "mss12.h" |
35 | #include "mss2dsp.h" |
36 | |
37 | typedef struct MSS2Context { |
38 | VC1Context v; |
39 | int split_position; |
40 | AVFrame *last_pic; |
41 | MSS12Context c; |
42 | MSS2DSPContext dsp; |
43 | QpelDSPContext qdsp; |
44 | SliceContext sc[2]; |
45 | } MSS2Context; |
46 | |
47 | static void arith2_normalise(ArithCoder *c) |
48 | { |
49 | while ((c->high >> 15) - (c->low >> 15) < 2) { |
50 | if ((c->low ^ c->high) & 0x10000) { |
51 | c->high ^= 0x8000; |
52 | c->value ^= 0x8000; |
53 | c->low ^= 0x8000; |
54 | } |
55 | c->high = (uint16_t)c->high << 8 | 0xFF; |
56 | c->value = (uint16_t)c->value << 8 | bytestream2_get_byte(c->gbc.gB); |
57 | c->low = (uint16_t)c->low << 8; |
58 | } |
59 | } |
60 | |
61 | ARITH_GET_BIT(arith2) |
62 | |
63 | /* L. Stuiver and A. Moffat: "Piecewise Integer Mapping for Arithmetic Coding." |
64 | * In Proc. 8th Data Compression Conference (DCC '98), pp. 3-12, Mar. 1998 */ |
65 | |
66 | static int arith2_get_scaled_value(int value, int n, int range) |
67 | { |
68 | int split = (n << 1) - range; |
69 | |
70 | if (value > split) |
71 | return split + (value - split >> 1); |
72 | else |
73 | return value; |
74 | } |
75 | |
76 | static void arith2_rescale_interval(ArithCoder *c, int range, |
77 | int low, int high, int n) |
78 | { |
79 | int split = (n << 1) - range; |
80 | |
81 | if (high > split) |
82 | c->high = split + (high - split << 1); |
83 | else |
84 | c->high = high; |
85 | |
86 | c->high += c->low - 1; |
87 | |
88 | if (low > split) |
89 | c->low += split + (low - split << 1); |
90 | else |
91 | c->low += low; |
92 | } |
93 | |
94 | static int arith2_get_number(ArithCoder *c, int n) |
95 | { |
96 | int range = c->high - c->low + 1; |
97 | int scale = av_log2(range) - av_log2(n); |
98 | int val; |
99 | |
100 | if (n << scale > range) |
101 | scale--; |
102 | |
103 | n <<= scale; |
104 | |
105 | val = arith2_get_scaled_value(c->value - c->low, n, range) >> scale; |
106 | |
107 | arith2_rescale_interval(c, range, val << scale, (val + 1) << scale, n); |
108 | |
109 | arith2_normalise(c); |
110 | |
111 | return val; |
112 | } |
113 | |
114 | static int arith2_get_prob(ArithCoder *c, int16_t *probs) |
115 | { |
116 | int range = c->high - c->low + 1, n = *probs; |
117 | int scale = av_log2(range) - av_log2(n); |
118 | int i = 0, val; |
119 | |
120 | if (n << scale > range) |
121 | scale--; |
122 | |
123 | n <<= scale; |
124 | |
125 | val = arith2_get_scaled_value(c->value - c->low, n, range) >> scale; |
126 | while (probs[++i] > val) ; |
127 | |
128 | arith2_rescale_interval(c, range, |
129 | probs[i] << scale, probs[i - 1] << scale, n); |
130 | |
131 | return i; |
132 | } |
133 | |
134 | ARITH_GET_MODEL_SYM(arith2) |
135 | |
136 | static int arith2_get_consumed_bytes(ArithCoder *c) |
137 | { |
138 | int diff = (c->high >> 16) - (c->low >> 16); |
139 | int bp = bytestream2_tell(c->gbc.gB) - 3 << 3; |
140 | int bits = 1; |
141 | |
142 | while (!(diff & 0x80)) { |
143 | bits++; |
144 | diff <<= 1; |
145 | } |
146 | |
147 | return (bits + bp + 7 >> 3) + ((c->low >> 16) + 1 == c->high >> 16); |
148 | } |
149 | |
150 | static void arith2_init(ArithCoder *c, GetByteContext *gB) |
151 | { |
152 | c->low = 0; |
153 | c->high = 0xFFFFFF; |
154 | c->value = bytestream2_get_be24(gB); |
155 | c->gbc.gB = gB; |
156 | c->get_model_sym = arith2_get_model_sym; |
157 | c->get_number = arith2_get_number; |
158 | } |
159 | |
160 | static int decode_pal_v2(MSS12Context *ctx, const uint8_t *buf, int buf_size) |
161 | { |
162 | int i, ncol; |
163 | uint32_t *pal = ctx->pal + 256 - ctx->free_colours; |
164 | |
165 | if (!ctx->free_colours) |
166 | return 0; |
167 | |
168 | ncol = *buf++; |
169 | if (ncol > ctx->free_colours || buf_size < 2 + ncol * 3) |
170 | return AVERROR_INVALIDDATA; |
171 | for (i = 0; i < ncol; i++) |
172 | *pal++ = AV_RB24(buf + 3 * i); |
173 | |
174 | return 1 + ncol * 3; |
175 | } |
176 | |
177 | static int decode_555(GetByteContext *gB, uint16_t *dst, ptrdiff_t stride, |
178 | int keyframe, int w, int h) |
179 | { |
180 | int last_symbol = 0, repeat = 0, prev_avail = 0; |
181 | |
182 | if (!keyframe) { |
183 | int x, y, endx, endy, t; |
184 | |
185 | #define READ_PAIR(a, b) \ |
186 | a = bytestream2_get_byte(gB) << 4; \ |
187 | t = bytestream2_get_byte(gB); \ |
188 | a |= t >> 4; \ |
189 | b = (t & 0xF) << 8; \ |
190 | b |= bytestream2_get_byte(gB); \ |
191 | |
192 | READ_PAIR(x, endx) |
193 | READ_PAIR(y, endy) |
194 | |
195 | if (endx >= w || endy >= h || x > endx || y > endy) |
196 | return AVERROR_INVALIDDATA; |
197 | dst += x + stride * y; |
198 | w = endx - x + 1; |
199 | h = endy - y + 1; |
200 | if (y) |
201 | prev_avail = 1; |
202 | } |
203 | |
204 | do { |
205 | uint16_t *p = dst; |
206 | do { |
207 | if (repeat-- < 1) { |
208 | int b = bytestream2_get_byte(gB); |
209 | if (b < 128) |
210 | last_symbol = b << 8 | bytestream2_get_byte(gB); |
211 | else if (b > 129) { |
212 | repeat = 0; |
213 | while (b-- > 130) { |
214 | if (repeat >= (INT_MAX >> 8) - 1) { |
215 | av_log(NULL, AV_LOG_ERROR, "repeat overflow\n"); |
216 | return AVERROR_INVALIDDATA; |
217 | } |
218 | repeat = (repeat << 8) + bytestream2_get_byte(gB) + 1; |
219 | } |
220 | if (last_symbol == -2) { |
221 | int skip = FFMIN((unsigned)repeat, dst + w - p); |
222 | repeat -= skip; |
223 | p += skip; |
224 | } |
225 | } else |
226 | last_symbol = 127 - b; |
227 | } |
228 | if (last_symbol >= 0) |
229 | *p = last_symbol; |
230 | else if (last_symbol == -1 && prev_avail) |
231 | *p = *(p - stride); |
232 | } while (++p < dst + w); |
233 | dst += stride; |
234 | prev_avail = 1; |
235 | } while (--h); |
236 | |
237 | return 0; |
238 | } |
239 | |
240 | static int decode_rle(GetBitContext *gb, uint8_t *pal_dst, ptrdiff_t pal_stride, |
241 | uint8_t *rgb_dst, ptrdiff_t rgb_stride, uint32_t *pal, |
242 | int keyframe, int kf_slipt, int slice, int w, int h) |
243 | { |
244 | uint8_t bits[270] = { 0 }; |
245 | uint32_t codes[270]; |
246 | VLC vlc; |
247 | |
248 | int current_length = 0, read_codes = 0, next_code = 0, current_codes = 0; |
249 | int remaining_codes, surplus_codes, i; |
250 | |
251 | const int alphabet_size = 270 - keyframe; |
252 | |
253 | int last_symbol = 0, repeat = 0, prev_avail = 0; |
254 | |
255 | if (!keyframe) { |
256 | int x, y, clipw, cliph; |
257 | |
258 | x = get_bits(gb, 12); |
259 | y = get_bits(gb, 12); |
260 | clipw = get_bits(gb, 12) + 1; |
261 | cliph = get_bits(gb, 12) + 1; |
262 | |
263 | if (x + clipw > w || y + cliph > h) |
264 | return AVERROR_INVALIDDATA; |
265 | pal_dst += pal_stride * y + x; |
266 | rgb_dst += rgb_stride * y + x * 3; |
267 | w = clipw; |
268 | h = cliph; |
269 | if (y) |
270 | prev_avail = 1; |
271 | } else { |
272 | if (slice > 0) { |
273 | pal_dst += pal_stride * kf_slipt; |
274 | rgb_dst += rgb_stride * kf_slipt; |
275 | prev_avail = 1; |
276 | h -= kf_slipt; |
277 | } else |
278 | h = kf_slipt; |
279 | } |
280 | |
281 | /* read explicit codes */ |
282 | do { |
283 | while (current_codes--) { |
284 | int symbol = get_bits(gb, 8); |
285 | if (symbol >= 204 - keyframe) |
286 | symbol += 14 - keyframe; |
287 | else if (symbol > 189) |
288 | symbol = get_bits1(gb) + (symbol << 1) - 190; |
289 | if (bits[symbol]) |
290 | return AVERROR_INVALIDDATA; |
291 | bits[symbol] = current_length; |
292 | codes[symbol] = next_code++; |
293 | read_codes++; |
294 | } |
295 | current_length++; |
296 | next_code <<= 1; |
297 | remaining_codes = (1 << current_length) - next_code; |
298 | current_codes = get_bits(gb, av_ceil_log2(remaining_codes + 1)); |
299 | if (current_length > 22 || current_codes > remaining_codes) |
300 | return AVERROR_INVALIDDATA; |
301 | } while (current_codes != remaining_codes); |
302 | |
303 | remaining_codes = alphabet_size - read_codes; |
304 | |
305 | /* determine the minimum length to fit the rest of the alphabet */ |
306 | while ((surplus_codes = (2 << current_length) - |
307 | (next_code << 1) - remaining_codes) < 0) { |
308 | current_length++; |
309 | next_code <<= 1; |
310 | } |
311 | |
312 | /* add the rest of the symbols lexicographically */ |
313 | for (i = 0; i < alphabet_size; i++) |
314 | if (!bits[i]) { |
315 | if (surplus_codes-- == 0) { |
316 | current_length++; |
317 | next_code <<= 1; |
318 | } |
319 | bits[i] = current_length; |
320 | codes[i] = next_code++; |
321 | } |
322 | |
323 | if (next_code != 1 << current_length) |
324 | return AVERROR_INVALIDDATA; |
325 | |
326 | if ((i = init_vlc(&vlc, 9, alphabet_size, bits, 1, 1, codes, 4, 4, 0)) < 0) |
327 | return i; |
328 | |
329 | /* frame decode */ |
330 | do { |
331 | uint8_t *pp = pal_dst; |
332 | uint8_t *rp = rgb_dst; |
333 | do { |
334 | if (repeat-- < 1) { |
335 | int b = get_vlc2(gb, vlc.table, 9, 3); |
336 | if (b < 256) |
337 | last_symbol = b; |
338 | else if (b < 268) { |
339 | b -= 256; |
340 | if (b == 11) |
341 | b = get_bits(gb, 4) + 10; |
342 | |
343 | if (!b) |
344 | repeat = 0; |
345 | else |
346 | repeat = get_bits(gb, b); |
347 | |
348 | repeat += (1 << b) - 1; |
349 | |
350 | if (last_symbol == -2) { |
351 | int skip = FFMIN(repeat, pal_dst + w - pp); |
352 | repeat -= skip; |
353 | pp += skip; |
354 | rp += skip * 3; |
355 | } |
356 | } else |
357 | last_symbol = 267 - b; |
358 | } |
359 | if (last_symbol >= 0) { |
360 | *pp = last_symbol; |
361 | AV_WB24(rp, pal[last_symbol]); |
362 | } else if (last_symbol == -1 && prev_avail) { |
363 | *pp = *(pp - pal_stride); |
364 | memcpy(rp, rp - rgb_stride, 3); |
365 | } |
366 | rp += 3; |
367 | } while (++pp < pal_dst + w); |
368 | pal_dst += pal_stride; |
369 | rgb_dst += rgb_stride; |
370 | prev_avail = 1; |
371 | } while (--h); |
372 | |
373 | ff_free_vlc(&vlc); |
374 | return 0; |
375 | } |
376 | |
377 | static int decode_wmv9(AVCodecContext *avctx, const uint8_t *buf, int buf_size, |
378 | int x, int y, int w, int h, int wmv9_mask) |
379 | { |
380 | MSS2Context *ctx = avctx->priv_data; |
381 | MSS12Context *c = &ctx->c; |
382 | VC1Context *v = avctx->priv_data; |
383 | MpegEncContext *s = &v->s; |
384 | AVFrame *f; |
385 | int ret; |
386 | |
387 | ff_mpeg_flush(avctx); |
388 | |
389 | if ((ret = init_get_bits8(&s->gb, buf, buf_size)) < 0) |
390 | return ret; |
391 | |
392 | s->loop_filter = avctx->skip_loop_filter < AVDISCARD_ALL; |
393 | |
394 | if (ff_vc1_parse_frame_header(v, &s->gb) < 0) { |
395 | av_log(v->s.avctx, AV_LOG_ERROR, "header error\n"); |
396 | return AVERROR_INVALIDDATA; |
397 | } |
398 | |
399 | if (s->pict_type != AV_PICTURE_TYPE_I) { |
400 | av_log(v->s.avctx, AV_LOG_ERROR, "expected I-frame\n"); |
401 | return AVERROR_INVALIDDATA; |
402 | } |
403 | |
404 | avctx->pix_fmt = AV_PIX_FMT_YUV420P; |
405 | |
406 | if ((ret = ff_mpv_frame_start(s, avctx)) < 0) { |
407 | av_log(v->s.avctx, AV_LOG_ERROR, "ff_mpv_frame_start error\n"); |
408 | avctx->pix_fmt = AV_PIX_FMT_RGB24; |
409 | return ret; |
410 | } |
411 | |
412 | ff_mpeg_er_frame_start(s); |
413 | |
414 | v->bits = buf_size * 8; |
415 | |
416 | v->end_mb_x = (w + 15) >> 4; |
417 | s->end_mb_y = (h + 15) >> 4; |
418 | if (v->respic & 1) |
419 | v->end_mb_x = v->end_mb_x + 1 >> 1; |
420 | if (v->respic & 2) |
421 | s->end_mb_y = s->end_mb_y + 1 >> 1; |
422 | |
423 | ff_vc1_decode_blocks(v); |
424 | |
425 | if (v->end_mb_x == s->mb_width && s->end_mb_y == s->mb_height) { |
426 | ff_er_frame_end(&s->er); |
427 | } else { |
428 | av_log(v->s.avctx, AV_LOG_WARNING, |
429 | "disabling error correction due to block count mismatch %dx%d != %dx%d\n", |
430 | v->end_mb_x, s->end_mb_y, s->mb_width, s->mb_height); |
431 | } |
432 | |
433 | ff_mpv_frame_end(s); |
434 | |
435 | f = s->current_picture.f; |
436 | |
437 | if (v->respic == 3) { |
438 | ctx->dsp.upsample_plane(f->data[0], f->linesize[0], w, h); |
439 | ctx->dsp.upsample_plane(f->data[1], f->linesize[1], w+1 >> 1, h+1 >> 1); |
440 | ctx->dsp.upsample_plane(f->data[2], f->linesize[2], w+1 >> 1, h+1 >> 1); |
441 | } else if (v->respic) |
442 | avpriv_request_sample(v->s.avctx, |
443 | "Asymmetric WMV9 rectangle subsampling"); |
444 | |
445 | av_assert0(f->linesize[1] == f->linesize[2]); |
446 | |
447 | if (wmv9_mask != -1) |
448 | ctx->dsp.mss2_blit_wmv9_masked(c->rgb_pic + y * c->rgb_stride + x * 3, |
449 | c->rgb_stride, wmv9_mask, |
450 | c->pal_pic + y * c->pal_stride + x, |
451 | c->pal_stride, |
452 | f->data[0], f->linesize[0], |
453 | f->data[1], f->data[2], f->linesize[1], |
454 | w, h); |
455 | else |
456 | ctx->dsp.mss2_blit_wmv9(c->rgb_pic + y * c->rgb_stride + x * 3, |
457 | c->rgb_stride, |
458 | f->data[0], f->linesize[0], |
459 | f->data[1], f->data[2], f->linesize[1], |
460 | w, h); |
461 | |
462 | avctx->pix_fmt = AV_PIX_FMT_RGB24; |
463 | |
464 | return 0; |
465 | } |
466 | |
467 | typedef struct Rectangle { |
468 | int coded, x, y, w, h; |
469 | } Rectangle; |
470 | |
471 | #define MAX_WMV9_RECTANGLES 20 |
472 | #define ARITH2_PADDING 2 |
473 | |
474 | static int mss2_decode_frame(AVCodecContext *avctx, void *data, int *got_frame, |
475 | AVPacket *avpkt) |
476 | { |
477 | const uint8_t *buf = avpkt->data; |
478 | int buf_size = avpkt->size; |
479 | MSS2Context *ctx = avctx->priv_data; |
480 | MSS12Context *c = &ctx->c; |
481 | AVFrame *frame = data; |
482 | GetBitContext gb; |
483 | GetByteContext gB; |
484 | ArithCoder acoder; |
485 | |
486 | int keyframe, has_wmv9, has_mv, is_rle, is_555, ret; |
487 | |
488 | Rectangle wmv9rects[MAX_WMV9_RECTANGLES], *r; |
489 | int used_rects = 0, i, implicit_rect = 0, av_uninit(wmv9_mask); |
490 | |
491 | if ((ret = init_get_bits8(&gb, buf, buf_size)) < 0) |
492 | return ret; |
493 | |
494 | if (keyframe = get_bits1(&gb)) |
495 | skip_bits(&gb, 7); |
496 | has_wmv9 = get_bits1(&gb); |
497 | has_mv = keyframe ? 0 : get_bits1(&gb); |
498 | is_rle = get_bits1(&gb); |
499 | is_555 = is_rle && get_bits1(&gb); |
500 | if (c->slice_split > 0) |
501 | ctx->split_position = c->slice_split; |
502 | else if (c->slice_split < 0) { |
503 | if (get_bits1(&gb)) { |
504 | if (get_bits1(&gb)) { |
505 | if (get_bits1(&gb)) |
506 | ctx->split_position = get_bits(&gb, 16); |
507 | else |
508 | ctx->split_position = get_bits(&gb, 12); |
509 | } else |
510 | ctx->split_position = get_bits(&gb, 8) << 4; |
511 | } else { |
512 | if (keyframe) |
513 | ctx->split_position = avctx->height / 2; |
514 | } |
515 | } else |
516 | ctx->split_position = avctx->height; |
517 | |
518 | if (c->slice_split && (ctx->split_position < 1 - is_555 || |
519 | ctx->split_position > avctx->height - 1)) |
520 | return AVERROR_INVALIDDATA; |
521 | |
522 | align_get_bits(&gb); |
523 | buf += get_bits_count(&gb) >> 3; |
524 | buf_size -= get_bits_count(&gb) >> 3; |
525 | |
526 | if (buf_size < 1) |
527 | return AVERROR_INVALIDDATA; |
528 | |
529 | if (is_555 && (has_wmv9 || has_mv || c->slice_split && ctx->split_position)) |
530 | return AVERROR_INVALIDDATA; |
531 | |
532 | avctx->pix_fmt = is_555 ? AV_PIX_FMT_RGB555 : AV_PIX_FMT_RGB24; |
533 | if (ctx->last_pic->format != avctx->pix_fmt) |
534 | av_frame_unref(ctx->last_pic); |
535 | |
536 | if (has_wmv9) { |
537 | bytestream2_init(&gB, buf, buf_size + ARITH2_PADDING); |
538 | arith2_init(&acoder, &gB); |
539 | |
540 | implicit_rect = !arith2_get_bit(&acoder); |
541 | |
542 | while (arith2_get_bit(&acoder)) { |
543 | if (used_rects == MAX_WMV9_RECTANGLES) |
544 | return AVERROR_INVALIDDATA; |
545 | r = &wmv9rects[used_rects]; |
546 | if (!used_rects) |
547 | r->x = arith2_get_number(&acoder, avctx->width); |
548 | else |
549 | r->x = arith2_get_number(&acoder, avctx->width - |
550 | wmv9rects[used_rects - 1].x) + |
551 | wmv9rects[used_rects - 1].x; |
552 | r->y = arith2_get_number(&acoder, avctx->height); |
553 | r->w = arith2_get_number(&acoder, avctx->width - r->x) + 1; |
554 | r->h = arith2_get_number(&acoder, avctx->height - r->y) + 1; |
555 | used_rects++; |
556 | } |
557 | |
558 | if (implicit_rect && used_rects) { |
559 | av_log(avctx, AV_LOG_ERROR, "implicit_rect && used_rects > 0\n"); |
560 | return AVERROR_INVALIDDATA; |
561 | } |
562 | |
563 | if (implicit_rect) { |
564 | wmv9rects[0].x = 0; |
565 | wmv9rects[0].y = 0; |
566 | wmv9rects[0].w = avctx->width; |
567 | wmv9rects[0].h = avctx->height; |
568 | |
569 | used_rects = 1; |
570 | } |
571 | for (i = 0; i < used_rects; i++) { |
572 | if (!implicit_rect && arith2_get_bit(&acoder)) { |
573 | av_log(avctx, AV_LOG_ERROR, "Unexpected grandchildren\n"); |
574 | return AVERROR_INVALIDDATA; |
575 | } |
576 | if (!i) { |
577 | wmv9_mask = arith2_get_bit(&acoder) - 1; |
578 | if (!wmv9_mask) |
579 | wmv9_mask = arith2_get_number(&acoder, 256); |
580 | } |
581 | wmv9rects[i].coded = arith2_get_number(&acoder, 2); |
582 | } |
583 | |
584 | buf += arith2_get_consumed_bytes(&acoder); |
585 | buf_size -= arith2_get_consumed_bytes(&acoder); |
586 | if (buf_size < 1) |
587 | return AVERROR_INVALIDDATA; |
588 | } |
589 | |
590 | c->mvX = c->mvY = 0; |
591 | if (keyframe && !is_555) { |
592 | if ((i = decode_pal_v2(c, buf, buf_size)) < 0) |
593 | return AVERROR_INVALIDDATA; |
594 | buf += i; |
595 | buf_size -= i; |
596 | } else if (has_mv) { |
597 | buf += 4; |
598 | buf_size -= 4; |
599 | if (buf_size < 1) |
600 | return AVERROR_INVALIDDATA; |
601 | c->mvX = AV_RB16(buf - 4) - avctx->width; |
602 | c->mvY = AV_RB16(buf - 2) - avctx->height; |
603 | } |
604 | |
605 | if (c->mvX < 0 || c->mvY < 0) { |
606 | FFSWAP(uint8_t *, c->pal_pic, c->last_pal_pic); |
607 | |
608 | if ((ret = ff_get_buffer(avctx, frame, AV_GET_BUFFER_FLAG_REF)) < 0) |
609 | return ret; |
610 | |
611 | if (ctx->last_pic->data[0]) { |
612 | av_assert0(frame->linesize[0] == ctx->last_pic->linesize[0]); |
613 | c->last_rgb_pic = ctx->last_pic->data[0] + |
614 | ctx->last_pic->linesize[0] * (avctx->height - 1); |
615 | } else { |
616 | av_log(avctx, AV_LOG_ERROR, "Missing keyframe\n"); |
617 | return AVERROR_INVALIDDATA; |
618 | } |
619 | } else { |
620 | if ((ret = ff_reget_buffer(avctx, ctx->last_pic)) < 0) |
621 | return ret; |
622 | if ((ret = av_frame_ref(frame, ctx->last_pic)) < 0) |
623 | return ret; |
624 | |
625 | c->last_rgb_pic = NULL; |
626 | } |
627 | c->rgb_pic = frame->data[0] + |
628 | frame->linesize[0] * (avctx->height - 1); |
629 | c->rgb_stride = -frame->linesize[0]; |
630 | |
631 | frame->key_frame = keyframe; |
632 | frame->pict_type = keyframe ? AV_PICTURE_TYPE_I : AV_PICTURE_TYPE_P; |
633 | |
634 | if (is_555) { |
635 | bytestream2_init(&gB, buf, buf_size); |
636 | |
637 | if (decode_555(&gB, (uint16_t *)c->rgb_pic, c->rgb_stride >> 1, |
638 | keyframe, avctx->width, avctx->height)) |
639 | return AVERROR_INVALIDDATA; |
640 | |
641 | buf_size -= bytestream2_tell(&gB); |
642 | } else { |
643 | if (keyframe) { |
644 | c->corrupted = 0; |
645 | ff_mss12_slicecontext_reset(&ctx->sc[0]); |
646 | if (c->slice_split) |
647 | ff_mss12_slicecontext_reset(&ctx->sc[1]); |
648 | } |
649 | if (is_rle) { |
650 | if ((ret = init_get_bits8(&gb, buf, buf_size)) < 0) |
651 | return ret; |
652 | if (ret = decode_rle(&gb, c->pal_pic, c->pal_stride, |
653 | c->rgb_pic, c->rgb_stride, c->pal, keyframe, |
654 | ctx->split_position, 0, |
655 | avctx->width, avctx->height)) |
656 | return ret; |
657 | align_get_bits(&gb); |
658 | |
659 | if (c->slice_split) |
660 | if (ret = decode_rle(&gb, c->pal_pic, c->pal_stride, |
661 | c->rgb_pic, c->rgb_stride, c->pal, keyframe, |
662 | ctx->split_position, 1, |
663 | avctx->width, avctx->height)) |
664 | return ret; |
665 | |
666 | align_get_bits(&gb); |
667 | buf += get_bits_count(&gb) >> 3; |
668 | buf_size -= get_bits_count(&gb) >> 3; |
669 | } else if (!implicit_rect || wmv9_mask != -1) { |
670 | if (c->corrupted) |
671 | return AVERROR_INVALIDDATA; |
672 | bytestream2_init(&gB, buf, buf_size + ARITH2_PADDING); |
673 | arith2_init(&acoder, &gB); |
674 | c->keyframe = keyframe; |
675 | if (c->corrupted = ff_mss12_decode_rect(&ctx->sc[0], &acoder, 0, 0, |
676 | avctx->width, |
677 | ctx->split_position)) |
678 | return AVERROR_INVALIDDATA; |
679 | |
680 | buf += arith2_get_consumed_bytes(&acoder); |
681 | buf_size -= arith2_get_consumed_bytes(&acoder); |
682 | if (c->slice_split) { |
683 | if (buf_size < 1) |
684 | return AVERROR_INVALIDDATA; |
685 | bytestream2_init(&gB, buf, buf_size + ARITH2_PADDING); |
686 | arith2_init(&acoder, &gB); |
687 | if (c->corrupted = ff_mss12_decode_rect(&ctx->sc[1], &acoder, 0, |
688 | ctx->split_position, |
689 | avctx->width, |
690 | avctx->height - ctx->split_position)) |
691 | return AVERROR_INVALIDDATA; |
692 | |
693 | buf += arith2_get_consumed_bytes(&acoder); |
694 | buf_size -= arith2_get_consumed_bytes(&acoder); |
695 | } |
696 | } else |
697 | memset(c->pal_pic, 0, c->pal_stride * avctx->height); |
698 | } |
699 | |
700 | if (has_wmv9) { |
701 | for (i = 0; i < used_rects; i++) { |
702 | int x = wmv9rects[i].x; |
703 | int y = wmv9rects[i].y; |
704 | int w = wmv9rects[i].w; |
705 | int h = wmv9rects[i].h; |
706 | if (wmv9rects[i].coded) { |
707 | int WMV9codedFrameSize; |
708 | if (buf_size < 4 || !(WMV9codedFrameSize = AV_RL24(buf))) |
709 | return AVERROR_INVALIDDATA; |
710 | if (ret = decode_wmv9(avctx, buf + 3, buf_size - 3, |
711 | x, y, w, h, wmv9_mask)) |
712 | return ret; |
713 | buf += WMV9codedFrameSize + 3; |
714 | buf_size -= WMV9codedFrameSize + 3; |
715 | } else { |
716 | uint8_t *dst = c->rgb_pic + y * c->rgb_stride + x * 3; |
717 | if (wmv9_mask != -1) { |
718 | ctx->dsp.mss2_gray_fill_masked(dst, c->rgb_stride, |
719 | wmv9_mask, |
720 | c->pal_pic + y * c->pal_stride + x, |
721 | c->pal_stride, |
722 | w, h); |
723 | } else { |
724 | do { |
725 | memset(dst, 0x80, w * 3); |
726 | dst += c->rgb_stride; |
727 | } while (--h); |
728 | } |
729 | } |
730 | } |
731 | } |
732 | |
733 | if (buf_size) |
734 | av_log(avctx, AV_LOG_WARNING, "buffer not fully consumed\n"); |
735 | |
736 | if (c->mvX < 0 || c->mvY < 0) { |
737 | av_frame_unref(ctx->last_pic); |
738 | ret = av_frame_ref(ctx->last_pic, frame); |
739 | if (ret < 0) |
740 | return ret; |
741 | } |
742 | |
743 | *got_frame = 1; |
744 | |
745 | return avpkt->size; |
746 | } |
747 | |
748 | static av_cold int wmv9_init(AVCodecContext *avctx) |
749 | { |
750 | VC1Context *v = avctx->priv_data; |
751 | int ret; |
752 | |
753 | v->s.avctx = avctx; |
754 | |
755 | if ((ret = ff_vc1_init_common(v)) < 0) |
756 | return ret; |
757 | ff_vc1dsp_init(&v->vc1dsp); |
758 | |
759 | v->profile = PROFILE_MAIN; |
760 | |
761 | v->zz_8x4 = ff_wmv2_scantableA; |
762 | v->zz_4x8 = ff_wmv2_scantableB; |
763 | v->res_y411 = 0; |
764 | v->res_sprite = 0; |
765 | |
766 | v->frmrtq_postproc = 7; |
767 | v->bitrtq_postproc = 31; |
768 | |
769 | v->res_x8 = 0; |
770 | v->multires = 0; |
771 | v->res_fasttx = 1; |
772 | |
773 | v->fastuvmc = 0; |
774 | |
775 | v->extended_mv = 0; |
776 | |
777 | v->dquant = 1; |
778 | v->vstransform = 1; |
779 | |
780 | v->res_transtab = 0; |
781 | |
782 | v->overlap = 0; |
783 | |
784 | v->resync_marker = 0; |
785 | v->rangered = 0; |
786 | |
787 | v->s.max_b_frames = avctx->max_b_frames = 0; |
788 | v->quantizer_mode = 0; |
789 | |
790 | v->finterpflag = 0; |
791 | |
792 | v->res_rtm_flag = 1; |
793 | |
794 | ff_vc1_init_transposed_scantables(v); |
795 | |
796 | if ((ret = ff_msmpeg4_decode_init(avctx)) < 0 || |
797 | (ret = ff_vc1_decode_init_alloc_tables(v)) < 0) |
798 | return ret; |
799 | |
800 | /* error concealment */ |
801 | v->s.me.qpel_put = v->s.qdsp.put_qpel_pixels_tab; |
802 | v->s.me.qpel_avg = v->s.qdsp.avg_qpel_pixels_tab; |
803 | |
804 | return 0; |
805 | } |
806 | |
807 | static av_cold int mss2_decode_end(AVCodecContext *avctx) |
808 | { |
809 | MSS2Context *const ctx = avctx->priv_data; |
810 | |
811 | av_frame_free(&ctx->last_pic); |
812 | |
813 | ff_mss12_decode_end(&ctx->c); |
814 | av_freep(&ctx->c.pal_pic); |
815 | av_freep(&ctx->c.last_pal_pic); |
816 | ff_vc1_decode_end(avctx); |
817 | |
818 | return 0; |
819 | } |
820 | |
821 | static av_cold int mss2_decode_init(AVCodecContext *avctx) |
822 | { |
823 | MSS2Context * const ctx = avctx->priv_data; |
824 | MSS12Context *c = &ctx->c; |
825 | int ret; |
826 | c->avctx = avctx; |
827 | if (ret = ff_mss12_decode_init(c, 1, &ctx->sc[0], &ctx->sc[1])) |
828 | return ret; |
829 | ctx->last_pic = av_frame_alloc(); |
830 | c->pal_stride = c->mask_stride; |
831 | c->pal_pic = av_mallocz(c->pal_stride * avctx->height); |
832 | c->last_pal_pic = av_mallocz(c->pal_stride * avctx->height); |
833 | if (!c->pal_pic || !c->last_pal_pic || !ctx->last_pic) { |
834 | mss2_decode_end(avctx); |
835 | return AVERROR(ENOMEM); |
836 | } |
837 | if (ret = wmv9_init(avctx)) { |
838 | mss2_decode_end(avctx); |
839 | return ret; |
840 | } |
841 | ff_mss2dsp_init(&ctx->dsp); |
842 | ff_qpeldsp_init(&ctx->qdsp); |
843 | |
844 | avctx->pix_fmt = c->free_colours == 127 ? AV_PIX_FMT_RGB555 |
845 | : AV_PIX_FMT_RGB24; |
846 | |
847 | |
848 | return 0; |
849 | } |
850 | |
851 | AVCodec ff_mss2_decoder = { |
852 | .name = "mss2", |
853 | .long_name = NULL_IF_CONFIG_SMALL("MS Windows Media Video V9 Screen"), |
854 | .type = AVMEDIA_TYPE_VIDEO, |
855 | .id = AV_CODEC_ID_MSS2, |
856 | .priv_data_size = sizeof(MSS2Context), |
857 | .init = mss2_decode_init, |
858 | .close = mss2_decode_end, |
859 | .decode = mss2_decode_frame, |
860 | .capabilities = AV_CODEC_CAP_DR1, |
861 | }; |
862 |