libavcodec/vp56.c

   1 /*
   2  * Copyright (C) 2006  Aurelien Jacobs <aurel@gnuage.org>
   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  * VP5 and VP6 compatible video decoder (common features)
  24  */
  25
  26 #include "avcodec.h"
  27 #include "bytestream.h"
  28 #include "internal.h"
  29 #include "h264chroma.h"
  30 #include "vp56.h"
  31 #include "vp56data.h"
  32
  33
  34 void ff_vp56_init_dequant(VP56Context *s, int quantizer)
  35 {
  36     s->quantizer = quantizer;
  37     s->dequant_dc = ff_vp56_dc_dequant[quantizer] << 2;
  38     s->dequant_ac = ff_vp56_ac_dequant[quantizer] << 2;
  39 }
  40
  41 static int vp56_get_vectors_predictors(VP56Context *s, int row, int col,
  42                                        VP56Frame ref_frame)
  43 {
  44     int nb_pred = 0;
  45     VP56mv vect[2] = {{0,0}, {0,0}};
  46     int pos, offset;
  47     VP56mv mvp;
  48
  49     for (pos=0; pos<12; pos++) {
  50         mvp.x = col + ff_vp56_candidate_predictor_pos[pos][0];
  51         mvp.y = row + ff_vp56_candidate_predictor_pos[pos][1];
  52         if (mvp.x < 0 || mvp.x >= s->mb_width ||
  53             mvp.y < 0 || mvp.y >= s->mb_height)
  54             continue;
  55         offset = mvp.x + s->mb_width*mvp.y;
  56
  57         if (ff_vp56_reference_frame[s->macroblocks[offset].type] != ref_frame)
  58             continue;
  59         if ((s->macroblocks[offset].mv.x == vect[0].x &&
  60              s->macroblocks[offset].mv.y == vect[0].y) ||
  61             (s->macroblocks[offset].mv.x == 0 &&
  62              s->macroblocks[offset].mv.y == 0))
  63             continue;
  64
  65         vect[nb_pred++] = s->macroblocks[offset].mv;
  66         if (nb_pred > 1) {
  67             nb_pred = -1;
  68             break;
  69         }
  70         s->vector_candidate_pos = pos;
  71     }
  72
  73     s->vector_candidate[0] = vect[0];
  74     s->vector_candidate[1] = vect[1];
  75
  76     return nb_pred+1;
  77 }
  78
  79 static void vp56_parse_mb_type_models(VP56Context *s)
  80 {
  81     VP56RangeCoder *c = &s->c;
  82     VP56Model *model = s->modelp;
  83     int i, ctx, type;
  84
  85     for (ctx=0; ctx<3; ctx++) {
  86         if (vp56_rac_get_prob_branchy(c, 174)) {
  87             int idx = vp56_rac_gets(c, 4);
  88             memcpy(model->mb_types_stats[ctx],
  89                    ff_vp56_pre_def_mb_type_stats[idx][ctx],
  90                    sizeof(model->mb_types_stats[ctx]));
  91         }
  92         if (vp56_rac_get_prob_branchy(c, 254)) {
  93             for (type=0; type<10; type++) {
  94                 for(i=0; i<2; i++) {
  95                     if (vp56_rac_get_prob_branchy(c, 205)) {
  96                         int delta, sign = vp56_rac_get(c);
  97
  98                         delta = vp56_rac_get_tree(c, ff_vp56_pmbtm_tree,
  99                                                   ff_vp56_mb_type_model_model);
 100                         if (!delta)
 101                             delta = 4 * vp56_rac_gets(c, 7);
 102                         model->mb_types_stats[ctx][type][i] += (delta ^ -sign) + sign;
 103                     }
 104                 }
 105             }
 106         }
 107     }
 108
 109     /* compute MB type probability tables based on previous MB type */
 110     for (ctx=0; ctx<3; ctx++) {
 111         int p[10];
 112
 113         for (type=0; type<10; type++)
 114             p[type] = 100 * model->mb_types_stats[ctx][type][1];
 115
 116         for (type=0; type<10; type++) {
 117             int p02, p34, p0234, p17, p56, p89, p5689, p156789;
 118
 119             /* conservative MB type probability */
 120             model->mb_type[ctx][type][0] = 255 - (255 * model->mb_types_stats[ctx][type][0]) / (1 + model->mb_types_stats[ctx][type][0] + model->mb_types_stats[ctx][type][1]);
 121
 122             p[type] = 0;    /* same MB type => weight is null */
 123
 124             /* binary tree parsing probabilities */
 125             p02 = p[0] + p[2];
 126             p34 = p[3] + p[4];
 127             p0234 = p02 + p34;
 128             p17 = p[1] + p[7];
 129             p56 = p[5] + p[6];
 130             p89 = p[8] + p[9];
 131             p5689 = p56 + p89;
 132             p156789 = p17 + p5689;
 133
 134             model->mb_type[ctx][type][1] = 1 + 255 * p0234/(1+p0234+p156789);
 135             model->mb_type[ctx][type][2] = 1 + 255 * p02  / (1+p0234);
 136             model->mb_type[ctx][type][3] = 1 + 255 * p17  / (1+p156789);
 137             model->mb_type[ctx][type][4] = 1 + 255 * p[0] / (1+p02);
 138             model->mb_type[ctx][type][5] = 1 + 255 * p[3] / (1+p34);
 139             model->mb_type[ctx][type][6] = 1 + 255 * p[1] / (1+p17);
 140             model->mb_type[ctx][type][7] = 1 + 255 * p56  / (1+p5689);
 141             model->mb_type[ctx][type][8] = 1 + 255 * p[5] / (1+p56);
 142             model->mb_type[ctx][type][9] = 1 + 255 * p[8] / (1+p89);
 143
 144             /* restore initial value */
 145             p[type] = 100 * model->mb_types_stats[ctx][type][1];
 146         }
 147     }
 148 }
 149
 150 static VP56mb vp56_parse_mb_type(VP56Context *s,
 151                                  VP56mb prev_type, int ctx)
 152 {
 153     uint8_t *mb_type_model = s->modelp->mb_type[ctx][prev_type];
 154     VP56RangeCoder *c = &s->c;
 155
 156     if (vp56_rac_get_prob_branchy(c, mb_type_model[0]))
 157         return prev_type;
 158     else
 159         return vp56_rac_get_tree(c, ff_vp56_pmbt_tree, mb_type_model);
 160 }
 161
 162 static void vp56_decode_4mv(VP56Context *s, int row, int col)
 163 {
 164     VP56mv mv = {0,0};
 165     int type[4];
 166     int b;
 167
 168     /* parse each block type */
 169     for (b=0; b<4; b++) {
 170         type[b] = vp56_rac_gets(&s->c, 2);
 171         if (type[b])
 172             type[b]++;  /* only returns 0, 2, 3 or 4 (all INTER_PF) */
 173     }
 174
 175     /* get vectors */
 176     for (b=0; b<4; b++) {
 177         switch (type[b]) {
 178             case VP56_MB_INTER_NOVEC_PF:
 179                 s->mv[b] = (VP56mv) {0,0};
 180                 break;
 181             case VP56_MB_INTER_DELTA_PF:
 182                 s->parse_vector_adjustment(s, &s->mv[b]);
 183                 break;
 184             case VP56_MB_INTER_V1_PF:
 185                 s->mv[b] = s->vector_candidate[0];
 186                 break;
 187             case VP56_MB_INTER_V2_PF:
 188                 s->mv[b] = s->vector_candidate[1];
 189                 break;
 190         }
 191         mv.x += s->mv[b].x;
 192         mv.y += s->mv[b].y;
 193     }
 194
 195     /* this is the one selected for the whole MB for prediction */
 196     s->macroblocks[row * s->mb_width + col].mv = s->mv[3];
 197
 198     /* chroma vectors are average luma vectors */
 199     if (s->avctx->codec->id == AV_CODEC_ID_VP5) {
 200         s->mv[4].x = s->mv[5].x = RSHIFT(mv.x,2);
 201         s->mv[4].y = s->mv[5].y = RSHIFT(mv.y,2);
 202     } else {
 203         s->mv[4] = s->mv[5] = (VP56mv) {mv.x/4, mv.y/4};
 204     }
 205 }
 206
 207 static VP56mb vp56_decode_mv(VP56Context *s, int row, int col)
 208 {
 209     VP56mv *mv, vect = {0,0};
 210     int ctx, b;
 211
 212     ctx = vp56_get_vectors_predictors(s, row, col, VP56_FRAME_PREVIOUS);
 213     s->mb_type = vp56_parse_mb_type(s, s->mb_type, ctx);
 214     s->macroblocks[row * s->mb_width + col].type = s->mb_type;
 215
 216     switch (s->mb_type) {
 217         case VP56_MB_INTER_V1_PF:
 218             mv = &s->vector_candidate[0];
 219             break;
 220
 221         case VP56_MB_INTER_V2_PF:
 222             mv = &s->vector_candidate[1];
 223             break;
 224
 225         case VP56_MB_INTER_V1_GF:
 226             vp56_get_vectors_predictors(s, row, col, VP56_FRAME_GOLDEN);
 227             mv = &s->vector_candidate[0];
 228             break;
 229
 230         case VP56_MB_INTER_V2_GF:
 231             vp56_get_vectors_predictors(s, row, col, VP56_FRAME_GOLDEN);
 232             mv = &s->vector_candidate[1];
 233             break;
 234
 235         case VP56_MB_INTER_DELTA_PF:
 236             s->parse_vector_adjustment(s, &vect);
 237             mv = &vect;
 238             break;
 239
 240         case VP56_MB_INTER_DELTA_GF:
 241             vp56_get_vectors_predictors(s, row, col, VP56_FRAME_GOLDEN);
 242             s->parse_vector_adjustment(s, &vect);
 243             mv = &vect;
 244             break;
 245
 246         case VP56_MB_INTER_4V:
 247             vp56_decode_4mv(s, row, col);
 248             return s->mb_type;
 249
 250         default:
 251             mv = &vect;
 252             break;
 253     }
 254
 255     s->macroblocks[row*s->mb_width + col].mv = *mv;
 256
 257     /* same vector for all blocks */
 258     for (b=0; b<6; b++)
 259         s->mv[b] = *mv;
 260
 261     return s->mb_type;
 262 }
 263
 264 static VP56mb vp56_conceal_mv(VP56Context *s, int row, int col)
 265 {
 266     VP56mv *mv, vect = {0,0};
 267     int b;
 268
 269     s->mb_type = VP56_MB_INTER_NOVEC_PF;
 270     s->macroblocks[row * s->mb_width + col].type = s->mb_type;
 271
 272     mv = &vect;
 273
 274     s->macroblocks[row*s->mb_width + col].mv = *mv;
 275
 276     /* same vector for all blocks */
 277     for (b=0; b<6; b++)
 278         s->mv[b] = *mv;
 279
 280     return s->mb_type;
 281 }
 282
 283 static void vp56_add_predictors_dc(VP56Context *s, VP56Frame ref_frame)
 284 {
 285     int idx = s->idct_scantable[0];
 286     int b;
 287
 288     for (b=0; b<6; b++) {
 289         VP56RefDc *ab = &s->above_blocks[s->above_block_idx[b]];
 290         VP56RefDc *lb = &s->left_block[ff_vp56_b6to4[b]];
 291         int count = 0;
 292         int dc = 0;
 293         int i;
 294
 295         if (ref_frame == lb->ref_frame) {
 296             dc += lb->dc_coeff;
 297             count++;
 298         }
 299         if (ref_frame == ab->ref_frame) {
 300             dc += ab->dc_coeff;
 301             count++;
 302         }
 303         if (s->avctx->codec->id == AV_CODEC_ID_VP5)
 304             for (i=0; i<2; i++)
 305                 if (count < 2 && ref_frame == ab[-1+2*i].ref_frame) {
 306                     dc += ab[-1+2*i].dc_coeff;
 307                     count++;
 308                 }
 309         if (count == 0)
 310             dc = s->prev_dc[ff_vp56_b2p[b]][ref_frame];
 311         else if (count == 2)
 312             dc /= 2;
 313
 314         s->block_coeff[b][idx] += dc;
 315         s->prev_dc[ff_vp56_b2p[b]][ref_frame] = s->block_coeff[b][idx];
 316         ab->dc_coeff = s->block_coeff[b][idx];
 317         ab->ref_frame = ref_frame;
 318         lb->dc_coeff = s->block_coeff[b][idx];
 319         lb->ref_frame = ref_frame;
 320         s->block_coeff[b][idx] *= s->dequant_dc;
 321     }
 322 }
 323
 324 static void vp56_deblock_filter(VP56Context *s, uint8_t *yuv,
 325                                 ptrdiff_t stride, int dx, int dy)
 326 {
 327     int t = ff_vp56_filter_threshold[s->quantizer];
 328     if (dx)  s->vp56dsp.edge_filter_hor(yuv +         10-dx , stride, t);
 329     if (dy)  s->vp56dsp.edge_filter_ver(yuv + stride*(10-dy), stride, t);
 330 }
 331
 332 static void vp56_mc(VP56Context *s, int b, int plane, uint8_t *src,
 333                     ptrdiff_t stride, int x, int y)
 334 {
 335     uint8_t *dst = s->frames[VP56_FRAME_CURRENT]->data[plane] + s->block_offset[b];
 336     uint8_t *src_block;
 337     int src_offset;
 338     int overlap_offset = 0;
 339     int mask = s->vp56_coord_div[b] - 1;
 340     int deblock_filtering = s->deblock_filtering;
 341     int dx;
 342     int dy;
 343
 344     if (s->avctx->skip_loop_filter >= AVDISCARD_ALL ||
 345         (s->avctx->skip_loop_filter >= AVDISCARD_NONKEY
 346          && !s->frames[VP56_FRAME_CURRENT]->key_frame))
 347         deblock_filtering = 0;
 348
 349     dx = s->mv[b].x / s->vp56_coord_div[b];
 350     dy = s->mv[b].y / s->vp56_coord_div[b];
 351
 352     if (b >= 4) {
 353         x /= 2;
 354         y /= 2;
 355     }
 356     x += dx - 2;
 357     y += dy - 2;
 358
 359     if (x<0 || x+12>=s->plane_width[plane] ||
 360         y<0 || y+12>=s->plane_height[plane]) {
 361         s->vdsp.emulated_edge_mc(s->edge_emu_buffer,
 362                                  src + s->block_offset[b] + (dy-2)*stride + (dx-2),
 363                                  stride, stride,
 364                                  12, 12, x, y,
 365                                  s->plane_width[plane],
 366                                  s->plane_height[plane]);
 367         src_block = s->edge_emu_buffer;
 368         src_offset = 2 + 2*stride;
 369     } else if (deblock_filtering) {
 370         /* only need a 12x12 block, but there is no such dsp function, */
 371         /* so copy a 16x12 block */
 372         s->hdsp.put_pixels_tab[0][0](s->edge_emu_buffer,
 373                                      src + s->block_offset[b] + (dy-2)*stride + (dx-2),
 374                                      stride, 12);
 375         src_block = s->edge_emu_buffer;
 376         src_offset = 2 + 2*stride;
 377     } else {
 378         src_block = src;
 379         src_offset = s->block_offset[b] + dy*stride + dx;
 380     }
 381
 382     if (deblock_filtering)
 383         vp56_deblock_filter(s, src_block, stride, dx&7, dy&7);
 384
 385     if (s->mv[b].x & mask)
 386         overlap_offset += (s->mv[b].x > 0) ? 1 : -1;
 387     if (s->mv[b].y & mask)
 388         overlap_offset += (s->mv[b].y > 0) ? stride : -stride;
 389
 390     if (overlap_offset) {
 391         if (s->filter)
 392             s->filter(s, dst, src_block, src_offset, src_offset+overlap_offset,
 393                       stride, s->mv[b], mask, s->filter_selection, b<4);
 394         else
 395             s->vp3dsp.put_no_rnd_pixels_l2(dst, src_block+src_offset,
 396                                            src_block+src_offset+overlap_offset,
 397                                            stride, 8);
 398     } else {
 399         s->hdsp.put_pixels_tab[1][0](dst, src_block+src_offset, stride, 8);
 400     }
 401 }
 402
 403 static av_always_inline void vp56_render_mb(VP56Context *s, int row, int col, int is_alpha, VP56mb mb_type)
 404 {
 405     int b, ab, b_max, plane, off;
 406     AVFrame *frame_current, *frame_ref;
 407     VP56Frame ref_frame = ff_vp56_reference_frame[mb_type];
 408
 409     vp56_add_predictors_dc(s, ref_frame);
 410
 411     frame_current = s->frames[VP56_FRAME_CURRENT];
 412     frame_ref = s->frames[ref_frame];
 413     if (mb_type != VP56_MB_INTRA && !frame_ref->data[0])
 414         return;
 415
 416     ab = 6*is_alpha;
 417     b_max = 6 - 2*is_alpha;
 418
 419     switch (mb_type) {
 420         case VP56_MB_INTRA:
 421             for (b=0; b<b_max; b++) {
 422                 plane = ff_vp56_b2p[b+ab];
 423                 s->vp3dsp.idct_put(frame_current->data[plane] + s->block_offset[b],
 424                                 s->stride[plane], s->block_coeff[b]);
 425             }
 426             break;
 427
 428         case VP56_MB_INTER_NOVEC_PF:
 429         case VP56_MB_INTER_NOVEC_GF:
 430             for (b=0; b<b_max; b++) {
 431                 plane = ff_vp56_b2p[b+ab];
 432                 off = s->block_offset[b];
 433                 s->hdsp.put_pixels_tab[1][0](frame_current->data[plane] + off,
 434                                              frame_ref->data[plane] + off,
 435                                              s->stride[plane], 8);
 436                 s->vp3dsp.idct_add(frame_current->data[plane] + off,
 437                                 s->stride[plane], s->block_coeff[b]);
 438             }
 439             break;
 440
 441         case VP56_MB_INTER_DELTA_PF:
 442         case VP56_MB_INTER_V1_PF:
 443         case VP56_MB_INTER_V2_PF:
 444         case VP56_MB_INTER_DELTA_GF:
 445         case VP56_MB_INTER_4V:
 446         case VP56_MB_INTER_V1_GF:
 447         case VP56_MB_INTER_V2_GF:
 448             for (b=0; b<b_max; b++) {
 449                 int x_off = b==1 || b==3 ? 8 : 0;
 450                 int y_off = b==2 || b==3 ? 8 : 0;
 451                 plane = ff_vp56_b2p[b+ab];
 452                 vp56_mc(s, b, plane, frame_ref->data[plane], s->stride[plane],
 453                         16*col+x_off, 16*row+y_off);
 454                 s->vp3dsp.idct_add(frame_current->data[plane] + s->block_offset[b],
 455                                 s->stride[plane], s->block_coeff[b]);
 456             }
 457             break;
 458     }
 459
 460     if (is_alpha) {
 461         s->block_coeff[4][0] = 0;
 462         s->block_coeff[5][0] = 0;
 463     }
 464 }
 465
 466 static int vp56_decode_mb(VP56Context *s, int row, int col, int is_alpha)
 467 {
 468     VP56mb mb_type;
 469     int ret;
 470
 471     if (s->frames[VP56_FRAME_CURRENT]->key_frame)
 472         mb_type = VP56_MB_INTRA;
 473     else
 474         mb_type = vp56_decode_mv(s, row, col);
 475
 476     ret = s->parse_coeff(s);
 477     if (ret < 0)
 478         return ret;
 479
 480     vp56_render_mb(s, row, col, is_alpha, mb_type);
 481
 482     return 0;
 483 }
 484
 485 static int vp56_conceal_mb(VP56Context *s, int row, int col, int is_alpha)
 486 {
 487     VP56mb mb_type;
 488
 489     if (s->frames[VP56_FRAME_CURRENT]->key_frame)
 490         mb_type = VP56_MB_INTRA;
 491     else
 492         mb_type = vp56_conceal_mv(s, row, col);
 493
 494     vp56_render_mb(s, row, col, is_alpha, mb_type);
 495
 496     return 0;
 497 }
 498
 499 static int vp56_size_changed(VP56Context *s)
 500 {
 501     AVCodecContext *avctx = s->avctx;
 502     int stride = s->frames[VP56_FRAME_CURRENT]->linesize[0];
 503     int i;
 504
 505     s->plane_width[0]  = s->plane_width[3]  = avctx->coded_width;
 506     s->plane_width[1]  = s->plane_width[2]  = avctx->coded_width/2;
 507     s->plane_height[0] = s->plane_height[3] = avctx->coded_height;
 508     s->plane_height[1] = s->plane_height[2] = avctx->coded_height/2;
 509
 510     s->have_undamaged_frame = 0;
 511
 512     for (i=0; i<4; i++)
 513         s->stride[i] = s->flip * s->frames[VP56_FRAME_CURRENT]->linesize[i];
 514
 515     s->mb_width  = (avctx->coded_width +15) / 16;
 516     s->mb_height = (avctx->coded_height+15) / 16;
 517
 518     if (s->mb_width > 1000 || s->mb_height > 1000) {
 519         ff_set_dimensions(avctx, 0, 0);
 520         av_log(avctx, AV_LOG_ERROR, "picture too big\n");
 521         return AVERROR_INVALIDDATA;
 522     }
 523
 524     av_reallocp_array(&s->above_blocks, 4*s->mb_width+6,
 525                       sizeof(*s->above_blocks));
 526     av_reallocp_array(&s->macroblocks, s->mb_width*s->mb_height,
 527                       sizeof(*s->macroblocks));
 528     av_free(s->edge_emu_buffer_alloc);
 529     s->edge_emu_buffer_alloc = av_malloc(16*stride);
 530     s->edge_emu_buffer = s->edge_emu_buffer_alloc;
 531     if (!s->above_blocks || !s->macroblocks || !s->edge_emu_buffer_alloc)
 532         return AVERROR(ENOMEM);
 533     if (s->flip < 0)
 534         s->edge_emu_buffer += 15 * stride;
 535
 536     if (s->alpha_context)
 537         return vp56_size_changed(s->alpha_context);
 538
 539     return 0;
 540 }
 541
 542 static int ff_vp56_decode_mbs(AVCodecContext *avctx, void *, int, int);
 543
 544 int ff_vp56_decode_frame(AVCodecContext *avctx, void *data, int *got_frame,
 545                          AVPacket *avpkt)
 546 {
 547     const uint8_t *buf = avpkt->data;
 548     VP56Context *s = avctx->priv_data;
 549     AVFrame *const p = s->frames[VP56_FRAME_CURRENT];
 550     int remaining_buf_size = avpkt->size;
 551     int av_uninit(alpha_offset);
 552     int i, res;
 553     int ret;
 554
 555     if (s->has_alpha) {
 556         if (remaining_buf_size < 3)
 557             return AVERROR_INVALIDDATA;
 558         alpha_offset = bytestream_get_be24(&buf);
 559         remaining_buf_size -= 3;
 560         if (remaining_buf_size < alpha_offset)
 561             return AVERROR_INVALIDDATA;
 562     }
 563
 564     res = s->parse_header(s, buf, remaining_buf_size);
 565     if (res < 0)
 566         return res;
 567
 568     if (res == VP56_SIZE_CHANGE) {
 569         for (i = 0; i < 4; i++) {
 570             av_frame_unref(s->frames[i]);
 571             if (s->alpha_context)
 572                 av_frame_unref(s->alpha_context->frames[i]);
 573         }
 574     }
 575
 576     ret = ff_get_buffer(avctx, p, AV_GET_BUFFER_FLAG_REF);
 577     if (ret < 0) {
 578         if (res == VP56_SIZE_CHANGE)
 579             ff_set_dimensions(avctx, 0, 0);
 580         return ret;
 581     }
 582
 583     if (avctx->pix_fmt == AV_PIX_FMT_YUVA420P) {
 584         av_frame_unref(s->alpha_context->frames[VP56_FRAME_CURRENT]);
 585         if ((ret = av_frame_ref(s->alpha_context->frames[VP56_FRAME_CURRENT], p)) < 0) {
 586             av_frame_unref(p);
 587             if (res == VP56_SIZE_CHANGE)
 588                 ff_set_dimensions(avctx, 0, 0);
 589             return ret;
 590         }
 591     }
 592
 593     if (res == VP56_SIZE_CHANGE) {
 594         if (vp56_size_changed(s)) {
 595             av_frame_unref(p);
 596             return AVERROR_INVALIDDATA;
 597         }
 598     }
 599
 600     if (avctx->pix_fmt == AV_PIX_FMT_YUVA420P) {
 601         int bak_w = avctx->width;
 602         int bak_h = avctx->height;
 603         int bak_cw = avctx->coded_width;
 604         int bak_ch = avctx->coded_height;
 605         buf += alpha_offset;
 606         remaining_buf_size -= alpha_offset;
 607
 608         res = s->alpha_context->parse_header(s->alpha_context, buf, remaining_buf_size);
 609         if (res != 0) {
 610             if(res==VP56_SIZE_CHANGE) {
 611                 av_log(avctx, AV_LOG_ERROR, "Alpha reconfiguration\n");
 612                 avctx->width  = bak_w;
 613                 avctx->height = bak_h;
 614                 avctx->coded_width  = bak_cw;
 615                 avctx->coded_height = bak_ch;
 616             }
 617             av_frame_unref(p);
 618             return AVERROR_INVALIDDATA;
 619         }
 620     }
 621
 622     s->discard_frame = 0;
 623     avctx->execute2(avctx, ff_vp56_decode_mbs, 0, 0, (avctx->pix_fmt == AV_PIX_FMT_YUVA420P) + 1);
 624
 625     if (s->discard_frame)
 626         return AVERROR_INVALIDDATA;
 627
 628     if ((res = av_frame_ref(data, p)) < 0)
 629         return res;
 630     *got_frame = 1;
 631
 632     return avpkt->size;
 633 }
 634
 635 static int ff_vp56_decode_mbs(AVCodecContext *avctx, void *data,
 636                               int jobnr, int threadnr)
 637 {
 638     VP56Context *s0 = avctx->priv_data;
 639     int is_alpha = (jobnr == 1);
 640     VP56Context *s = is_alpha ? s0->alpha_context : s0;
 641     AVFrame *const p = s->frames[VP56_FRAME_CURRENT];
 642     int mb_row, mb_col, mb_row_flip, mb_offset = 0;
 643     int block, y, uv;
 644     ptrdiff_t stride_y, stride_uv;
 645     int res;
 646     int damaged = 0;
 647
 648     if (p->key_frame) {
 649         p->pict_type = AV_PICTURE_TYPE_I;
 650         s->default_models_init(s);
 651         for (block=0; block<s->mb_height*s->mb_width; block++)
 652             s->macroblocks[block].type = VP56_MB_INTRA;
 653     } else {
 654         p->pict_type = AV_PICTURE_TYPE_P;
 655         vp56_parse_mb_type_models(s);
 656         s->parse_vector_models(s);
 657         s->mb_type = VP56_MB_INTER_NOVEC_PF;
 658     }
 659
 660     if (s->parse_coeff_models(s))
 661         goto next;
 662
 663     memset(s->prev_dc, 0, sizeof(s->prev_dc));
 664     s->prev_dc[1][VP56_FRAME_CURRENT] = 128;
 665     s->prev_dc[2][VP56_FRAME_CURRENT] = 128;
 666
 667     for (block=0; block < 4*s->mb_width+6; block++) {
 668         s->above_blocks[block].ref_frame = VP56_FRAME_NONE;
 669         s->above_blocks[block].dc_coeff = 0;
 670         s->above_blocks[block].not_null_dc = 0;
 671     }
 672     s->above_blocks[2*s->mb_width + 2].ref_frame = VP56_FRAME_CURRENT;
 673     s->above_blocks[3*s->mb_width + 4].ref_frame = VP56_FRAME_CURRENT;
 674
 675     stride_y  = p->linesize[0];
 676     stride_uv = p->linesize[1];
 677
 678     if (s->flip < 0)
 679         mb_offset = 7;
 680
 681     /* main macroblocks loop */
 682     for (mb_row=0; mb_row<s->mb_height; mb_row++) {
 683         if (s->flip < 0)
 684             mb_row_flip = s->mb_height - mb_row - 1;
 685         else
 686             mb_row_flip = mb_row;
 687
 688         for (block=0; block<4; block++) {
 689             s->left_block[block].ref_frame = VP56_FRAME_NONE;
 690             s->left_block[block].dc_coeff = 0;
 691             s->left_block[block].not_null_dc = 0;
 692         }
 693         memset(s->coeff_ctx, 0, sizeof(s->coeff_ctx));
 694         memset(s->coeff_ctx_last, 24, sizeof(s->coeff_ctx_last));
 695
 696         s->above_block_idx[0] = 1;
 697         s->above_block_idx[1] = 2;
 698         s->above_block_idx[2] = 1;
 699         s->above_block_idx[3] = 2;
 700         s->above_block_idx[4] = 2*s->mb_width + 2 + 1;
 701         s->above_block_idx[5] = 3*s->mb_width + 4 + 1;
 702
 703         s->block_offset[s->frbi] = (mb_row_flip*16 + mb_offset) * stride_y;
 704         s->block_offset[s->srbi] = s->block_offset[s->frbi] + 8*stride_y;
 705         s->block_offset[1] = s->block_offset[0] + 8;
 706         s->block_offset[3] = s->block_offset[2] + 8;
 707         s->block_offset[4] = (mb_row_flip*8 + mb_offset) * stride_uv;
 708         s->block_offset[5] = s->block_offset[4];
 709
 710         for (mb_col=0; mb_col<s->mb_width; mb_col++) {
 711             if (!damaged) {
 712                 int ret = vp56_decode_mb(s, mb_row, mb_col, is_alpha);
 713                 if (ret < 0) {
 714                     damaged = 1;
 715                     if (!s->have_undamaged_frame || !avctx->error_concealment) {
 716                         s->discard_frame = 1;
 717                         return AVERROR_INVALIDDATA;
 718                     }
 719                 }
 720             }
 721             if (damaged)
 722                 vp56_conceal_mb(s, mb_row, mb_col, is_alpha);
 723
 724             for (y=0; y<4; y++) {
 725                 s->above_block_idx[y] += 2;
 726                 s->block_offset[y] += 16;
 727             }
 728
 729             for (uv=4; uv<6; uv++) {
 730                 s->above_block_idx[uv] += 1;
 731                 s->block_offset[uv] += 8;
 732             }
 733         }
 734     }
 735
 736     if (!damaged)
 737         s->have_undamaged_frame = 1;
 738
 739 next:
 740     if (p->key_frame || s->golden_frame) {
 741         av_frame_unref(s->frames[VP56_FRAME_GOLDEN]);
 742         if ((res = av_frame_ref(s->frames[VP56_FRAME_GOLDEN], p)) < 0)
 743             return res;
 744     }
 745
 746     av_frame_unref(s->frames[VP56_FRAME_PREVIOUS]);
 747     FFSWAP(AVFrame *, s->frames[VP56_FRAME_CURRENT],
 748                       s->frames[VP56_FRAME_PREVIOUS]);
 749     return 0;
 750 }
 751
 752 av_cold int ff_vp56_init(AVCodecContext *avctx, int flip, int has_alpha)
 753 {
 754     VP56Context *s = avctx->priv_data;
 755     return ff_vp56_init_context(avctx, s, flip, has_alpha);
 756 }
 757
 758 av_cold int ff_vp56_init_context(AVCodecContext *avctx, VP56Context *s,
 759                                   int flip, int has_alpha)
 760 {
 761     int i;
 762
 763     s->avctx = avctx;
 764     avctx->pix_fmt = has_alpha ? AV_PIX_FMT_YUVA420P : AV_PIX_FMT_YUV420P;
 765     if (avctx->skip_alpha) avctx->pix_fmt = AV_PIX_FMT_YUV420P;
 766
 767     ff_h264chroma_init(&s->h264chroma, 8);
 768     ff_hpeldsp_init(&s->hdsp, avctx->flags);
 769     ff_videodsp_init(&s->vdsp, 8);
 770     ff_vp3dsp_init(&s->vp3dsp, avctx->flags);
 771     for (i = 0; i < 64; i++) {
 772 #define TRANSPOSE(x) (((x) >> 3) | (((x) & 7) << 3))
 773         s->idct_scantable[i] = TRANSPOSE(ff_zigzag_direct[i]);
 774 #undef TRANSPOSE
 775     }
 776
 777     for (i = 0; i < FF_ARRAY_ELEMS(s->frames); i++) {
 778         s->frames[i] = av_frame_alloc();
 779         if (!s->frames[i]) {
 780             ff_vp56_free(avctx);
 781             return AVERROR(ENOMEM);
 782         }
 783     }
 784     s->edge_emu_buffer_alloc = NULL;
 785
 786     s->above_blocks = NULL;
 787     s->macroblocks = NULL;
 788     s->quantizer = -1;
 789     s->deblock_filtering = 1;
 790     s->golden_frame = 0;
 791
 792     s->filter = NULL;
 793
 794     s->has_alpha = has_alpha;
 795
 796     s->modelp = &s->model;
 797
 798     if (flip) {
 799         s->flip = -1;
 800         s->frbi = 2;
 801         s->srbi = 0;
 802     } else {
 803         s->flip = 1;
 804         s->frbi = 0;
 805         s->srbi = 2;
 806     }
 807
 808     return 0;
 809 }
 810
 811 av_cold int ff_vp56_free(AVCodecContext *avctx)
 812 {
 813     VP56Context *s = avctx->priv_data;
 814     return ff_vp56_free_context(s);
 815 }
 816
 817 av_cold int ff_vp56_free_context(VP56Context *s)
 818 {
 819     int i;
 820
 821     av_freep(&s->above_blocks);
 822     av_freep(&s->macroblocks);
 823     av_freep(&s->edge_emu_buffer_alloc);
 824
 825     for (i = 0; i < FF_ARRAY_ELEMS(s->frames); i++)
 826         av_frame_free(&s->frames[i]);
 827
 828     return 0;
 829 }