pictor: Correctly check frame dimensions
[ffmpeg.git] / libavcodec / mss2.c
1 /*
2  * Microsoft Screen 2 (aka Windows Media Video V9 Screen) decoder
3  *
4  * This file is part of Libav.
5  *
6  * Libav 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  * Libav 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 Libav; 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  = c->high  << 8 & 0xFFFFFF | 0xFF;
56         c->value = c->value << 8 & 0xFFFFFF | bytestream2_get_byte(c->gbc.gB);
57         c->low   = c->low   << 8 & 0xFFFFFF;
58     }
59 }
60
61 ARITH_GET_BIT(2)
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(2)
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                         repeat = (repeat << 8) + bytestream2_get_byte(gB) + 1;
215                     if (last_symbol == -2) {
216                         int skip = FFMIN((unsigned)repeat, dst + w - p);
217                         repeat -= skip;
218                         p      += skip;
219                     }
220                 } else
221                     last_symbol = 127 - b;
222             }
223             if (last_symbol >= 0)
224                 *p = last_symbol;
225             else if (last_symbol == -1 && prev_avail)
226                 *p = *(p - stride);
227         } while (++p < dst + w);
228         dst       += stride;
229         prev_avail = 1;
230     } while (--h);
231
232     return 0;
233 }
234
235 static int decode_rle(GetBitContext *gb, uint8_t *pal_dst, ptrdiff_t pal_stride,
236                       uint8_t *rgb_dst, ptrdiff_t rgb_stride, uint32_t *pal,
237                       int keyframe, int kf_slipt, int slice, int w, int h)
238 {
239     uint8_t bits[270] = { 0 };
240     uint32_t codes[270];
241     VLC vlc;
242
243     int current_length = 0, read_codes = 0, next_code = 0, current_codes = 0;
244     int remaining_codes, surplus_codes, i;
245
246     const int alphabet_size = 270 - keyframe;
247
248     int last_symbol = 0, repeat = 0, prev_avail = 0;
249
250     if (!keyframe) {
251         int x, y, clipw, cliph;
252
253         x     = get_bits(gb, 12);
254         y     = get_bits(gb, 12);
255         clipw = get_bits(gb, 12) + 1;
256         cliph = get_bits(gb, 12) + 1;
257
258         if (x + clipw > w || y + cliph > h)
259             return AVERROR_INVALIDDATA;
260         pal_dst += pal_stride * y + x;
261         rgb_dst += rgb_stride * y + x * 3;
262         w        = clipw;
263         h        = cliph;
264         if (y)
265             prev_avail = 1;
266     } else {
267         if (slice > 0) {
268             pal_dst   += pal_stride * kf_slipt;
269             rgb_dst   += rgb_stride * kf_slipt;
270             prev_avail = 1;
271             h         -= kf_slipt;
272         } else
273             h = kf_slipt;
274     }
275
276     /* read explicit codes */
277     do {
278         while (current_codes--) {
279             int symbol = get_bits(gb, 8);
280             if (symbol >= 204 - keyframe)
281                 symbol += 14 - keyframe;
282             else if (symbol > 189)
283                 symbol = get_bits1(gb) + (symbol << 1) - 190;
284             if (bits[symbol])
285                 return AVERROR_INVALIDDATA;
286             bits[symbol]  = current_length;
287             codes[symbol] = next_code++;
288             read_codes++;
289         }
290         current_length++;
291         next_code     <<= 1;
292         remaining_codes = (1 << current_length) - next_code;
293         current_codes   = get_bits(gb, av_ceil_log2(remaining_codes + 1));
294         if (current_length > 22 || current_codes > remaining_codes)
295             return AVERROR_INVALIDDATA;
296     } while (current_codes != remaining_codes);
297
298     remaining_codes = alphabet_size - read_codes;
299
300     /* determine the minimum length to fit the rest of the alphabet */
301     while ((surplus_codes = (2 << current_length) -
302                             (next_code << 1) - remaining_codes) < 0) {
303         current_length++;
304         next_code <<= 1;
305     }
306
307     /* add the rest of the symbols lexicographically */
308     for (i = 0; i < alphabet_size; i++)
309         if (!bits[i]) {
310             if (surplus_codes-- == 0) {
311                 current_length++;
312                 next_code <<= 1;
313             }
314             bits[i]  = current_length;
315             codes[i] = next_code++;
316         }
317
318     if (next_code != 1 << current_length)
319         return AVERROR_INVALIDDATA;
320
321     if (i = init_vlc(&vlc, 9, alphabet_size, bits, 1, 1, codes, 4, 4, 0))
322         return i;
323
324     /* frame decode */
325     do {
326         uint8_t *pp = pal_dst;
327         uint8_t *rp = rgb_dst;
328         do {
329             if (repeat-- < 1) {
330                 int b = get_vlc2(gb, vlc.table, 9, 3);
331                 if (b < 256)
332                     last_symbol = b;
333                 else if (b < 268) {
334                     b -= 256;
335                     if (b == 11)
336                         b = get_bits(gb, 4) + 10;
337
338                     if (!b)
339                         repeat = 0;
340                     else
341                         repeat = get_bits(gb, b);
342
343                     repeat += (1 << b) - 1;
344
345                     if (last_symbol == -2) {
346                         int skip = FFMIN(repeat, pal_dst + w - pp);
347                         repeat -= skip;
348                         pp     += skip;
349                         rp     += skip * 3;
350                     }
351                 } else
352                     last_symbol = 267 - b;
353             }
354             if (last_symbol >= 0) {
355                 *pp = last_symbol;
356                 AV_WB24(rp, pal[last_symbol]);
357             } else if (last_symbol == -1 && prev_avail) {
358                 *pp = *(pp - pal_stride);
359                 memcpy(rp, rp - rgb_stride, 3);
360             }
361             rp += 3;
362         } while (++pp < pal_dst + w);
363         pal_dst   += pal_stride;
364         rgb_dst   += rgb_stride;
365         prev_avail = 1;
366     } while (--h);
367
368     ff_free_vlc(&vlc);
369     return 0;
370 }
371
372 static int decode_wmv9(AVCodecContext *avctx, const uint8_t *buf, int buf_size,
373                        int x, int y, int w, int h, int wmv9_mask)
374 {
375     MSS2Context *ctx  = avctx->priv_data;
376     MSS12Context *c   = &ctx->c;
377     VC1Context *v     = avctx->priv_data;
378     MpegEncContext *s = &v->s;
379     AVFrame *f;
380     int ret;
381
382     ff_mpeg_flush(avctx);
383
384     init_get_bits(&s->gb, buf, buf_size * 8);
385
386     s->loop_filter = avctx->skip_loop_filter < AVDISCARD_ALL;
387
388     if (ff_vc1_parse_frame_header(v, &s->gb) < 0) {
389         av_log(v->s.avctx, AV_LOG_ERROR, "header error\n");
390         return AVERROR_INVALIDDATA;
391     }
392
393     if (s->pict_type != AV_PICTURE_TYPE_I) {
394         av_log(v->s.avctx, AV_LOG_ERROR, "expected I-frame\n");
395         return AVERROR_INVALIDDATA;
396     }
397
398     avctx->pix_fmt = AV_PIX_FMT_YUV420P;
399
400     if ((ret = ff_mpv_frame_start(s, avctx)) < 0) {
401         av_log(v->s.avctx, AV_LOG_ERROR, "ff_mpv_frame_start error\n");
402         avctx->pix_fmt = AV_PIX_FMT_RGB24;
403         return ret;
404     }
405
406     ff_mpeg_er_frame_start(s);
407
408     v->bits = buf_size * 8;
409
410     v->end_mb_x = (w + 15) >> 4;
411     s->end_mb_y = (h + 15) >> 4;
412     if (v->respic & 1)
413         v->end_mb_x = v->end_mb_x + 1 >> 1;
414     if (v->respic & 2)
415         s->end_mb_y = s->end_mb_y + 1 >> 1;
416
417     ff_vc1_decode_blocks(v);
418
419     if (v->end_mb_x == s->mb_width && s->end_mb_y == s->mb_height) {
420         ff_er_frame_end(&s->er);
421     } else {
422         av_log(v->s.avctx, AV_LOG_WARNING,
423                "disabling error correction due to block count mismatch %dx%d != %dx%d\n",
424                v->end_mb_x, s->end_mb_y, s->mb_width, s->mb_height);
425     }
426
427     ff_mpv_frame_end(s);
428
429     f = s->current_picture.f;
430
431     if (v->respic == 3) {
432         ctx->dsp.upsample_plane(f->data[0], f->linesize[0], w,      h);
433         ctx->dsp.upsample_plane(f->data[1], f->linesize[1], w >> 1, h >> 1);
434         ctx->dsp.upsample_plane(f->data[2], f->linesize[2], w >> 1, h >> 1);
435     } else if (v->respic)
436         avpriv_request_sample(v->s.avctx,
437                               "Asymmetric WMV9 rectangle subsampling");
438
439     av_assert0(f->linesize[1] == f->linesize[2]);
440
441     if (wmv9_mask != -1)
442         ctx->dsp.mss2_blit_wmv9_masked(c->rgb_pic + y * c->rgb_stride + x * 3,
443                                        c->rgb_stride, wmv9_mask,
444                                        c->pal_pic + y * c->pal_stride + x,
445                                        c->pal_stride,
446                                        f->data[0], f->linesize[0],
447                                        f->data[1], f->data[2], f->linesize[1],
448                                        w, h);
449     else
450         ctx->dsp.mss2_blit_wmv9(c->rgb_pic + y * c->rgb_stride + x * 3,
451                                 c->rgb_stride,
452                                 f->data[0], f->linesize[0],
453                                 f->data[1], f->data[2], f->linesize[1],
454                                 w, h);
455
456     avctx->pix_fmt = AV_PIX_FMT_RGB24;
457
458     return 0;
459 }
460
461 typedef struct Rectangle {
462     int coded, x, y, w, h;
463 } Rectangle;
464
465 #define MAX_WMV9_RECTANGLES 20
466 #define ARITH2_PADDING 2
467
468 static int mss2_decode_frame(AVCodecContext *avctx, void *data, int *got_frame,
469                              AVPacket *avpkt)
470 {
471     const uint8_t *buf = avpkt->data;
472     int buf_size       = avpkt->size;
473     MSS2Context *ctx = avctx->priv_data;
474     MSS12Context *c  = &ctx->c;
475     AVFrame *frame   = data;
476     GetBitContext gb;
477     GetByteContext gB;
478     ArithCoder acoder;
479
480     int keyframe, has_wmv9, has_mv, is_rle, is_555, ret;
481
482     Rectangle wmv9rects[MAX_WMV9_RECTANGLES], *r;
483     int used_rects = 0, i, implicit_rect = 0, av_uninit(wmv9_mask);
484
485     init_get_bits(&gb, buf, buf_size * 8);
486
487     if (keyframe = get_bits1(&gb))
488         skip_bits(&gb, 7);
489     has_wmv9 = get_bits1(&gb);
490     has_mv   = keyframe ? 0 : get_bits1(&gb);
491     is_rle   = get_bits1(&gb);
492     is_555   = is_rle && get_bits1(&gb);
493     if (c->slice_split > 0)
494         ctx->split_position = c->slice_split;
495     else if (c->slice_split < 0) {
496         if (get_bits1(&gb)) {
497             if (get_bits1(&gb)) {
498                 if (get_bits1(&gb))
499                     ctx->split_position = get_bits(&gb, 16);
500                 else
501                     ctx->split_position = get_bits(&gb, 12);
502             } else
503                 ctx->split_position = get_bits(&gb, 8) << 4;
504         } else {
505             if (keyframe)
506                 ctx->split_position = avctx->height / 2;
507         }
508     } else
509         ctx->split_position = avctx->height;
510
511     if (c->slice_split && (ctx->split_position < 1 - is_555 ||
512                            ctx->split_position > avctx->height - 1))
513         return AVERROR_INVALIDDATA;
514
515     align_get_bits(&gb);
516     buf      += get_bits_count(&gb) >> 3;
517     buf_size -= get_bits_count(&gb) >> 3;
518
519     if (buf_size < 1)
520         return AVERROR_INVALIDDATA;
521
522     if (is_555 && (has_wmv9 || has_mv || c->slice_split && ctx->split_position))
523         return AVERROR_INVALIDDATA;
524
525     avctx->pix_fmt = is_555 ? AV_PIX_FMT_RGB555 : AV_PIX_FMT_RGB24;
526     if (ctx->last_pic->format != avctx->pix_fmt)
527         av_frame_unref(ctx->last_pic);
528
529     if (has_wmv9) {
530         bytestream2_init(&gB, buf, buf_size + ARITH2_PADDING);
531         arith2_init(&acoder, &gB);
532
533         implicit_rect = !arith2_get_bit(&acoder);
534
535         while (arith2_get_bit(&acoder)) {
536             if (used_rects == MAX_WMV9_RECTANGLES)
537                 return AVERROR_INVALIDDATA;
538             r = &wmv9rects[used_rects];
539             if (!used_rects)
540                 r->x = arith2_get_number(&acoder, avctx->width);
541             else
542                 r->x = arith2_get_number(&acoder, avctx->width -
543                                          wmv9rects[used_rects - 1].x) +
544                        wmv9rects[used_rects - 1].x;
545             r->y = arith2_get_number(&acoder, avctx->height);
546             r->w = arith2_get_number(&acoder, avctx->width  - r->x) + 1;
547             r->h = arith2_get_number(&acoder, avctx->height - r->y) + 1;
548             used_rects++;
549         }
550
551         if (implicit_rect && used_rects) {
552             av_log(avctx, AV_LOG_ERROR, "implicit_rect && used_rects > 0\n");
553             return AVERROR_INVALIDDATA;
554         }
555
556         if (implicit_rect) {
557             wmv9rects[0].x = 0;
558             wmv9rects[0].y = 0;
559             wmv9rects[0].w = avctx->width;
560             wmv9rects[0].h = avctx->height;
561
562             used_rects = 1;
563         }
564         for (i = 0; i < used_rects; i++) {
565             if (!implicit_rect && arith2_get_bit(&acoder)) {
566                 av_log(avctx, AV_LOG_ERROR, "Unexpected grandchildren\n");
567                 return AVERROR_INVALIDDATA;
568             }
569             if (!i) {
570                 wmv9_mask = arith2_get_bit(&acoder) - 1;
571                 if (!wmv9_mask)
572                     wmv9_mask = arith2_get_number(&acoder, 256);
573             }
574             wmv9rects[i].coded = arith2_get_number(&acoder, 2);
575         }
576
577         buf      += arith2_get_consumed_bytes(&acoder);
578         buf_size -= arith2_get_consumed_bytes(&acoder);
579         if (buf_size < 1)
580             return AVERROR_INVALIDDATA;
581     }
582
583     c->mvX = c->mvY = 0;
584     if (keyframe && !is_555) {
585         if ((i = decode_pal_v2(c, buf, buf_size)) < 0)
586             return AVERROR_INVALIDDATA;
587         buf      += i;
588         buf_size -= i;
589     } else if (has_mv) {
590         buf      += 4;
591         buf_size -= 4;
592         if (buf_size < 1)
593             return AVERROR_INVALIDDATA;
594         c->mvX = AV_RB16(buf - 4) - avctx->width;
595         c->mvY = AV_RB16(buf - 2) - avctx->height;
596     }
597
598     if (c->mvX < 0 || c->mvY < 0) {
599         FFSWAP(uint8_t *, c->pal_pic, c->last_pal_pic);
600
601         if ((ret = ff_get_buffer(avctx, frame, AV_GET_BUFFER_FLAG_REF)) < 0) {
602             av_log(avctx, AV_LOG_ERROR, "get_buffer() failed\n");
603             return ret;
604         }
605
606         if (ctx->last_pic->data[0]) {
607             av_assert0(frame->linesize[0] == ctx->last_pic->linesize[0]);
608             c->last_rgb_pic = ctx->last_pic->data[0] +
609                               ctx->last_pic->linesize[0] * (avctx->height - 1);
610         } else {
611             av_log(avctx, AV_LOG_ERROR, "Missing keyframe\n");
612             return AVERROR_INVALIDDATA;
613         }
614     } else {
615         if ((ret = ff_reget_buffer(avctx, ctx->last_pic)) < 0) {
616             av_log(avctx, AV_LOG_ERROR, "reget_buffer() failed\n");
617             return ret;
618         }
619         if ((ret = av_frame_ref(frame, ctx->last_pic)) < 0)
620             return ret;
621
622         c->last_rgb_pic = NULL;
623     }
624     c->rgb_pic    = frame->data[0] +
625                     frame->linesize[0] * (avctx->height - 1);
626     c->rgb_stride = -frame->linesize[0];
627
628     frame->key_frame = keyframe;
629     frame->pict_type = keyframe ? AV_PICTURE_TYPE_I : AV_PICTURE_TYPE_P;
630
631     if (is_555) {
632         bytestream2_init(&gB, buf, buf_size);
633
634         if (decode_555(&gB, (uint16_t *)c->rgb_pic, c->rgb_stride >> 1,
635                        keyframe, avctx->width, avctx->height))
636             return AVERROR_INVALIDDATA;
637
638         buf_size -= bytestream2_tell(&gB);
639     } else {
640         if (keyframe) {
641             c->corrupted = 0;
642             ff_mss12_slicecontext_reset(&ctx->sc[0]);
643             if (c->slice_split)
644                 ff_mss12_slicecontext_reset(&ctx->sc[1]);
645         }
646         if (is_rle) {
647             init_get_bits(&gb, buf, buf_size * 8);
648             if (ret = decode_rle(&gb, c->pal_pic, c->pal_stride,
649                                  c->rgb_pic, c->rgb_stride, c->pal, keyframe,
650                                  ctx->split_position, 0,
651                                  avctx->width, avctx->height))
652                 return ret;
653             align_get_bits(&gb);
654
655             if (c->slice_split)
656                 if (ret = decode_rle(&gb, c->pal_pic, c->pal_stride,
657                                      c->rgb_pic, c->rgb_stride, c->pal, keyframe,
658                                      ctx->split_position, 1,
659                                      avctx->width, avctx->height))
660                     return ret;
661
662             align_get_bits(&gb);
663             buf      += get_bits_count(&gb) >> 3;
664             buf_size -= get_bits_count(&gb) >> 3;
665         } else if (!implicit_rect || wmv9_mask != -1) {
666             if (c->corrupted)
667                 return AVERROR_INVALIDDATA;
668             bytestream2_init(&gB, buf, buf_size + ARITH2_PADDING);
669             arith2_init(&acoder, &gB);
670             c->keyframe = keyframe;
671             if (c->corrupted = ff_mss12_decode_rect(&ctx->sc[0], &acoder, 0, 0,
672                                                     avctx->width,
673                                                     ctx->split_position))
674                 return AVERROR_INVALIDDATA;
675
676             buf      += arith2_get_consumed_bytes(&acoder);
677             buf_size -= arith2_get_consumed_bytes(&acoder);
678             if (c->slice_split) {
679                 if (buf_size < 1)
680                     return AVERROR_INVALIDDATA;
681                 bytestream2_init(&gB, buf, buf_size + ARITH2_PADDING);
682                 arith2_init(&acoder, &gB);
683                 if (c->corrupted = ff_mss12_decode_rect(&ctx->sc[1], &acoder, 0,
684                                                         ctx->split_position,
685                                                         avctx->width,
686                                                         avctx->height - ctx->split_position))
687                     return AVERROR_INVALIDDATA;
688
689                 buf      += arith2_get_consumed_bytes(&acoder);
690                 buf_size -= arith2_get_consumed_bytes(&acoder);
691             }
692         } else
693             memset(c->pal_pic, 0, c->pal_stride * avctx->height);
694     }
695
696     if (has_wmv9) {
697         for (i = 0; i < used_rects; i++) {
698             int x = wmv9rects[i].x;
699             int y = wmv9rects[i].y;
700             int w = wmv9rects[i].w;
701             int h = wmv9rects[i].h;
702             if (wmv9rects[i].coded) {
703                 int WMV9codedFrameSize;
704                 if (buf_size < 4 || !(WMV9codedFrameSize = AV_RL24(buf)))
705                     return AVERROR_INVALIDDATA;
706                 if (ret = decode_wmv9(avctx, buf + 3, buf_size - 3,
707                                       x, y, w, h, wmv9_mask))
708                     return ret;
709                 buf      += WMV9codedFrameSize + 3;
710                 buf_size -= WMV9codedFrameSize + 3;
711             } else {
712                 uint8_t *dst = c->rgb_pic + y * c->rgb_stride + x * 3;
713                 if (wmv9_mask != -1) {
714                     ctx->dsp.mss2_gray_fill_masked(dst, c->rgb_stride,
715                                                    wmv9_mask,
716                                                    c->pal_pic + y * c->pal_stride + x,
717                                                    c->pal_stride,
718                                                    w, h);
719                 } else {
720                     do {
721                         memset(dst, 0x80, w * 3);
722                         dst += c->rgb_stride;
723                     } while (--h);
724                 }
725             }
726         }
727     }
728
729     if (buf_size)
730         av_log(avctx, AV_LOG_WARNING, "buffer not fully consumed\n");
731
732     if (c->mvX < 0 || c->mvY < 0) {
733         av_frame_unref(ctx->last_pic);
734         ret = av_frame_ref(ctx->last_pic, frame);
735         if (ret < 0)
736             return ret;
737     }
738
739     *got_frame       = 1;
740
741     return avpkt->size;
742 }
743
744 static av_cold int wmv9_init(AVCodecContext *avctx)
745 {
746     VC1Context *v = avctx->priv_data;
747     int ret;
748
749     v->s.avctx    = avctx;
750
751     if ((ret = ff_vc1_init_common(v)) < 0)
752         return ret;
753     ff_vc1dsp_init(&v->vc1dsp);
754
755     v->profile = PROFILE_MAIN;
756
757     v->zz_8x4     = ff_wmv2_scantableA;
758     v->zz_4x8     = ff_wmv2_scantableB;
759     v->res_y411   = 0;
760     v->res_sprite = 0;
761
762     v->frmrtq_postproc = 7;
763     v->bitrtq_postproc = 31;
764
765     v->res_x8          = 0;
766     v->multires        = 0;
767     v->res_fasttx      = 1;
768
769     v->fastuvmc        = 0;
770
771     v->extended_mv     = 0;
772
773     v->dquant          = 1;
774     v->vstransform     = 1;
775
776     v->res_transtab    = 0;
777
778     v->overlap         = 0;
779
780     v->resync_marker   = 0;
781     v->rangered        = 0;
782
783     v->s.max_b_frames = avctx->max_b_frames = 0;
784     v->quantizer_mode = 0;
785
786     v->finterpflag = 0;
787
788     v->res_rtm_flag = 1;
789
790     ff_vc1_init_transposed_scantables(v);
791
792     if ((ret = ff_msmpeg4_decode_init(avctx)) < 0 ||
793         (ret = ff_vc1_decode_init_alloc_tables(v)) < 0)
794         return ret;
795
796     /* error concealment */
797     v->s.me.qpel_put = v->s.qdsp.put_qpel_pixels_tab;
798     v->s.me.qpel_avg = v->s.qdsp.avg_qpel_pixels_tab;
799
800     return 0;
801 }
802
803 static av_cold int mss2_decode_end(AVCodecContext *avctx)
804 {
805     MSS2Context *const ctx = avctx->priv_data;
806
807     av_frame_free(&ctx->last_pic);
808
809     ff_mss12_decode_end(&ctx->c);
810     av_freep(&ctx->c.pal_pic);
811     av_freep(&ctx->c.last_pal_pic);
812     ff_vc1_decode_end(avctx);
813
814     return 0;
815 }
816
817 static av_cold int mss2_decode_init(AVCodecContext *avctx)
818 {
819     MSS2Context * const ctx = avctx->priv_data;
820     MSS12Context *c = &ctx->c;
821     int ret;
822     c->avctx = avctx;
823     if (ret = ff_mss12_decode_init(c, 1, &ctx->sc[0], &ctx->sc[1]))
824         return ret;
825     c->pal_stride   = c->mask_stride;
826     c->pal_pic      = av_mallocz(c->pal_stride * avctx->height);
827     c->last_pal_pic = av_mallocz(c->pal_stride * avctx->height);
828     if (!c->pal_pic || !c->last_pal_pic) {
829         mss2_decode_end(avctx);
830         return AVERROR(ENOMEM);
831     }
832     if (ret = wmv9_init(avctx)) {
833         mss2_decode_end(avctx);
834         return ret;
835     }
836     ff_mss2dsp_init(&ctx->dsp);
837     ff_qpeldsp_init(&ctx->qdsp);
838
839     avctx->pix_fmt = c->free_colours == 127 ? AV_PIX_FMT_RGB555
840                                             : AV_PIX_FMT_RGB24;
841
842     ctx->last_pic = av_frame_alloc();
843     if (!ctx->last_pic) {
844         mss2_decode_end(avctx);
845         return AVERROR(ENOMEM);
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 };