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