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