michael@0: /*
michael@0:  *  Copyright (c) 2010 The WebM project authors. All Rights Reserved.
michael@0:  *
michael@0:  *  Use of this source code is governed by a BSD-style license
michael@0:  *  that can be found in the LICENSE file in the root of the source
michael@0:  *  tree. An additional intellectual property rights grant can be found
michael@0:  *  in the file PATENTS.  All contributing project authors may
michael@0:  *  be found in the AUTHORS file in the root of the source tree.
michael@0:  */
michael@0: 
michael@0: 
michael@0: #include "vpx_config.h"
michael@0: #include "vp8_rtcd.h"
michael@0: #include "./vpx_scale_rtcd.h"
michael@0: #include "onyxd_int.h"
michael@0: #include "vp8/common/header.h"
michael@0: #include "vp8/common/reconintra4x4.h"
michael@0: #include "vp8/common/reconinter.h"
michael@0: #include "detokenize.h"
michael@0: #include "vp8/common/invtrans.h"
michael@0: #include "vp8/common/alloccommon.h"
michael@0: #include "vp8/common/entropymode.h"
michael@0: #include "vp8/common/quant_common.h"
michael@0: #include "vpx_scale/vpx_scale.h"
michael@0: #include "vp8/common/setupintrarecon.h"
michael@0: 
michael@0: #include "decodemv.h"
michael@0: #include "vp8/common/extend.h"
michael@0: #if CONFIG_ERROR_CONCEALMENT
michael@0: #include "error_concealment.h"
michael@0: #endif
michael@0: #include "vpx_mem/vpx_mem.h"
michael@0: #include "vp8/common/threading.h"
michael@0: #include "decoderthreading.h"
michael@0: #include "dboolhuff.h"
michael@0: 
michael@0: #include <assert.h>
michael@0: #include <stdio.h>
michael@0: 
michael@0: void vp8cx_init_de_quantizer(VP8D_COMP *pbi)
michael@0: {
michael@0:     int Q;
michael@0:     VP8_COMMON *const pc = & pbi->common;
michael@0: 
michael@0:     for (Q = 0; Q < QINDEX_RANGE; Q++)
michael@0:     {
michael@0:         pc->Y1dequant[Q][0] = (short)vp8_dc_quant(Q, pc->y1dc_delta_q);
michael@0:         pc->Y2dequant[Q][0] = (short)vp8_dc2quant(Q, pc->y2dc_delta_q);
michael@0:         pc->UVdequant[Q][0] = (short)vp8_dc_uv_quant(Q, pc->uvdc_delta_q);
michael@0: 
michael@0:         pc->Y1dequant[Q][1] = (short)vp8_ac_yquant(Q);
michael@0:         pc->Y2dequant[Q][1] = (short)vp8_ac2quant(Q, pc->y2ac_delta_q);
michael@0:         pc->UVdequant[Q][1] = (short)vp8_ac_uv_quant(Q, pc->uvac_delta_q);
michael@0:     }
michael@0: }
michael@0: 
michael@0: void vp8_mb_init_dequantizer(VP8D_COMP *pbi, MACROBLOCKD *xd)
michael@0: {
michael@0:     int i;
michael@0:     int QIndex;
michael@0:     MB_MODE_INFO *mbmi = &xd->mode_info_context->mbmi;
michael@0:     VP8_COMMON *const pc = & pbi->common;
michael@0: 
michael@0:     /* Decide whether to use the default or alternate baseline Q value. */
michael@0:     if (xd->segmentation_enabled)
michael@0:     {
michael@0:         /* Abs Value */
michael@0:         if (xd->mb_segement_abs_delta == SEGMENT_ABSDATA)
michael@0:             QIndex = xd->segment_feature_data[MB_LVL_ALT_Q][mbmi->segment_id];
michael@0: 
michael@0:         /* Delta Value */
michael@0:         else
michael@0:         {
michael@0:             QIndex = pc->base_qindex + xd->segment_feature_data[MB_LVL_ALT_Q][mbmi->segment_id];
michael@0:             QIndex = (QIndex >= 0) ? ((QIndex <= MAXQ) ? QIndex : MAXQ) : 0;    /* Clamp to valid range */
michael@0:         }
michael@0:     }
michael@0:     else
michael@0:         QIndex = pc->base_qindex;
michael@0: 
michael@0:     /* Set up the macroblock dequant constants */
michael@0:     xd->dequant_y1_dc[0] = 1;
michael@0:     xd->dequant_y1[0] = pc->Y1dequant[QIndex][0];
michael@0:     xd->dequant_y2[0] = pc->Y2dequant[QIndex][0];
michael@0:     xd->dequant_uv[0] = pc->UVdequant[QIndex][0];
michael@0: 
michael@0:     for (i = 1; i < 16; i++)
michael@0:     {
michael@0:         xd->dequant_y1_dc[i] =
michael@0:         xd->dequant_y1[i] = pc->Y1dequant[QIndex][1];
michael@0:         xd->dequant_y2[i] = pc->Y2dequant[QIndex][1];
michael@0:         xd->dequant_uv[i] = pc->UVdequant[QIndex][1];
michael@0:     }
michael@0: }
michael@0: 
michael@0: static void decode_macroblock(VP8D_COMP *pbi, MACROBLOCKD *xd,
michael@0:                               unsigned int mb_idx)
michael@0: {
michael@0:     MB_PREDICTION_MODE mode;
michael@0:     int i;
michael@0: #if CONFIG_ERROR_CONCEALMENT
michael@0:     int corruption_detected = 0;
michael@0: #endif
michael@0: 
michael@0:     if (xd->mode_info_context->mbmi.mb_skip_coeff)
michael@0:     {
michael@0:         vp8_reset_mb_tokens_context(xd);
michael@0:     }
michael@0:     else if (!vp8dx_bool_error(xd->current_bc))
michael@0:     {
michael@0:         int eobtotal;
michael@0:         eobtotal = vp8_decode_mb_tokens(pbi, xd);
michael@0: 
michael@0:         /* Special case:  Force the loopfilter to skip when eobtotal is zero */
michael@0:         xd->mode_info_context->mbmi.mb_skip_coeff = (eobtotal==0);
michael@0:     }
michael@0: 
michael@0:     mode = xd->mode_info_context->mbmi.mode;
michael@0: 
michael@0:     if (xd->segmentation_enabled)
michael@0:         vp8_mb_init_dequantizer(pbi, xd);
michael@0: 
michael@0: 
michael@0: #if CONFIG_ERROR_CONCEALMENT
michael@0: 
michael@0:     if(pbi->ec_active)
michael@0:     {
michael@0:         int throw_residual;
michael@0:         /* When we have independent partitions we can apply residual even
michael@0:          * though other partitions within the frame are corrupt.
michael@0:          */
michael@0:         throw_residual = (!pbi->independent_partitions &&
michael@0:                           pbi->frame_corrupt_residual);
michael@0:         throw_residual = (throw_residual || vp8dx_bool_error(xd->current_bc));
michael@0: 
michael@0:         if ((mb_idx >= pbi->mvs_corrupt_from_mb || throw_residual))
michael@0:         {
michael@0:             /* MB with corrupt residuals or corrupt mode/motion vectors.
michael@0:              * Better to use the predictor as reconstruction.
michael@0:              */
michael@0:             pbi->frame_corrupt_residual = 1;
michael@0:             vpx_memset(xd->qcoeff, 0, sizeof(xd->qcoeff));
michael@0:             vp8_conceal_corrupt_mb(xd);
michael@0: 
michael@0: 
michael@0:             corruption_detected = 1;
michael@0: 
michael@0:             /* force idct to be skipped for B_PRED and use the
michael@0:              * prediction only for reconstruction
michael@0:              * */
michael@0:             vpx_memset(xd->eobs, 0, 25);
michael@0:         }
michael@0:     }
michael@0: #endif
michael@0: 
michael@0:     /* do prediction */
michael@0:     if (xd->mode_info_context->mbmi.ref_frame == INTRA_FRAME)
michael@0:     {
michael@0:         vp8_build_intra_predictors_mbuv_s(xd,
michael@0:                                           xd->recon_above[1],
michael@0:                                           xd->recon_above[2],
michael@0:                                           xd->recon_left[1],
michael@0:                                           xd->recon_left[2],
michael@0:                                           xd->recon_left_stride[1],
michael@0:                                           xd->dst.u_buffer, xd->dst.v_buffer,
michael@0:                                           xd->dst.uv_stride);
michael@0: 
michael@0:         if (mode != B_PRED)
michael@0:         {
michael@0:             vp8_build_intra_predictors_mby_s(xd,
michael@0:                                                  xd->recon_above[0],
michael@0:                                                  xd->recon_left[0],
michael@0:                                                  xd->recon_left_stride[0],
michael@0:                                                  xd->dst.y_buffer,
michael@0:                                                  xd->dst.y_stride);
michael@0:         }
michael@0:         else
michael@0:         {
michael@0:             short *DQC = xd->dequant_y1;
michael@0:             int dst_stride = xd->dst.y_stride;
michael@0: 
michael@0:             /* clear out residual eob info */
michael@0:             if(xd->mode_info_context->mbmi.mb_skip_coeff)
michael@0:                 vpx_memset(xd->eobs, 0, 25);
michael@0: 
michael@0:             intra_prediction_down_copy(xd, xd->recon_above[0] + 16);
michael@0: 
michael@0:             for (i = 0; i < 16; i++)
michael@0:             {
michael@0:                 BLOCKD *b = &xd->block[i];
michael@0:                 unsigned char *dst = xd->dst.y_buffer + b->offset;
michael@0:                 B_PREDICTION_MODE b_mode =
michael@0:                     xd->mode_info_context->bmi[i].as_mode;
michael@0:                 unsigned char *Above = dst - dst_stride;
michael@0:                 unsigned char *yleft = dst - 1;
michael@0:                 int left_stride = dst_stride;
michael@0:                 unsigned char top_left = Above[-1];
michael@0: 
michael@0:                 vp8_intra4x4_predict(Above, yleft, left_stride, b_mode,
michael@0:                                      dst, dst_stride, top_left);
michael@0: 
michael@0:                 if (xd->eobs[i])
michael@0:                 {
michael@0:                     if (xd->eobs[i] > 1)
michael@0:                     {
michael@0:                     vp8_dequant_idct_add(b->qcoeff, DQC, dst, dst_stride);
michael@0:                     }
michael@0:                     else
michael@0:                     {
michael@0:                         vp8_dc_only_idct_add
michael@0:                             (b->qcoeff[0] * DQC[0],
michael@0:                                 dst, dst_stride,
michael@0:                                 dst, dst_stride);
michael@0:                         vpx_memset(b->qcoeff, 0, 2 * sizeof(b->qcoeff[0]));
michael@0:                     }
michael@0:                 }
michael@0:             }
michael@0:         }
michael@0:     }
michael@0:     else
michael@0:     {
michael@0:         vp8_build_inter_predictors_mb(xd);
michael@0:     }
michael@0: 
michael@0: 
michael@0: #if CONFIG_ERROR_CONCEALMENT
michael@0:     if (corruption_detected)
michael@0:     {
michael@0:         return;
michael@0:     }
michael@0: #endif
michael@0: 
michael@0:     if(!xd->mode_info_context->mbmi.mb_skip_coeff)
michael@0:     {
michael@0:         /* dequantization and idct */
michael@0:         if (mode != B_PRED)
michael@0:         {
michael@0:             short *DQC = xd->dequant_y1;
michael@0: 
michael@0:             if (mode != SPLITMV)
michael@0:             {
michael@0:                 BLOCKD *b = &xd->block[24];
michael@0: 
michael@0:                 /* do 2nd order transform on the dc block */
michael@0:                 if (xd->eobs[24] > 1)
michael@0:                 {
michael@0:                     vp8_dequantize_b(b, xd->dequant_y2);
michael@0: 
michael@0:                     vp8_short_inv_walsh4x4(&b->dqcoeff[0],
michael@0:                         xd->qcoeff);
michael@0:                     vpx_memset(b->qcoeff, 0, 16 * sizeof(b->qcoeff[0]));
michael@0:                 }
michael@0:                 else
michael@0:                 {
michael@0:                     b->dqcoeff[0] = b->qcoeff[0] * xd->dequant_y2[0];
michael@0:                     vp8_short_inv_walsh4x4_1(&b->dqcoeff[0],
michael@0:                         xd->qcoeff);
michael@0:                     vpx_memset(b->qcoeff, 0, 2 * sizeof(b->qcoeff[0]));
michael@0:                 }
michael@0: 
michael@0:                 /* override the dc dequant constant in order to preserve the
michael@0:                  * dc components
michael@0:                  */
michael@0:                 DQC = xd->dequant_y1_dc;
michael@0:             }
michael@0: 
michael@0:             vp8_dequant_idct_add_y_block
michael@0:                             (xd->qcoeff, DQC,
michael@0:                              xd->dst.y_buffer,
michael@0:                              xd->dst.y_stride, xd->eobs);
michael@0:         }
michael@0: 
michael@0:         vp8_dequant_idct_add_uv_block
michael@0:                         (xd->qcoeff+16*16, xd->dequant_uv,
michael@0:                          xd->dst.u_buffer, xd->dst.v_buffer,
michael@0:                          xd->dst.uv_stride, xd->eobs+16);
michael@0:     }
michael@0: }
michael@0: 
michael@0: static int get_delta_q(vp8_reader *bc, int prev, int *q_update)
michael@0: {
michael@0:     int ret_val = 0;
michael@0: 
michael@0:     if (vp8_read_bit(bc))
michael@0:     {
michael@0:         ret_val = vp8_read_literal(bc, 4);
michael@0: 
michael@0:         if (vp8_read_bit(bc))
michael@0:             ret_val = -ret_val;
michael@0:     }
michael@0: 
michael@0:     /* Trigger a quantizer update if the delta-q value has changed */
michael@0:     if (ret_val != prev)
michael@0:         *q_update = 1;
michael@0: 
michael@0:     return ret_val;
michael@0: }
michael@0: 
michael@0: #ifdef PACKET_TESTING
michael@0: #include <stdio.h>
michael@0: FILE *vpxlog = 0;
michael@0: #endif
michael@0: 
michael@0: static void yv12_extend_frame_top_c(YV12_BUFFER_CONFIG *ybf)
michael@0: {
michael@0:     int i;
michael@0:     unsigned char *src_ptr1;
michael@0:     unsigned char *dest_ptr1;
michael@0: 
michael@0:     unsigned int Border;
michael@0:     int plane_stride;
michael@0: 
michael@0:     /***********/
michael@0:     /* Y Plane */
michael@0:     /***********/
michael@0:     Border = ybf->border;
michael@0:     plane_stride = ybf->y_stride;
michael@0:     src_ptr1 = ybf->y_buffer - Border;
michael@0:     dest_ptr1 = src_ptr1 - (Border * plane_stride);
michael@0: 
michael@0:     for (i = 0; i < (int)Border; i++)
michael@0:     {
michael@0:         vpx_memcpy(dest_ptr1, src_ptr1, plane_stride);
michael@0:         dest_ptr1 += plane_stride;
michael@0:     }
michael@0: 
michael@0: 
michael@0:     /***********/
michael@0:     /* U Plane */
michael@0:     /***********/
michael@0:     plane_stride = ybf->uv_stride;
michael@0:     Border /= 2;
michael@0:     src_ptr1 = ybf->u_buffer - Border;
michael@0:     dest_ptr1 = src_ptr1 - (Border * plane_stride);
michael@0: 
michael@0:     for (i = 0; i < (int)(Border); i++)
michael@0:     {
michael@0:         vpx_memcpy(dest_ptr1, src_ptr1, plane_stride);
michael@0:         dest_ptr1 += plane_stride;
michael@0:     }
michael@0: 
michael@0:     /***********/
michael@0:     /* V Plane */
michael@0:     /***********/
michael@0: 
michael@0:     src_ptr1 = ybf->v_buffer - Border;
michael@0:     dest_ptr1 = src_ptr1 - (Border * plane_stride);
michael@0: 
michael@0:     for (i = 0; i < (int)(Border); i++)
michael@0:     {
michael@0:         vpx_memcpy(dest_ptr1, src_ptr1, plane_stride);
michael@0:         dest_ptr1 += plane_stride;
michael@0:     }
michael@0: }
michael@0: 
michael@0: static void yv12_extend_frame_bottom_c(YV12_BUFFER_CONFIG *ybf)
michael@0: {
michael@0:     int i;
michael@0:     unsigned char *src_ptr1, *src_ptr2;
michael@0:     unsigned char *dest_ptr2;
michael@0: 
michael@0:     unsigned int Border;
michael@0:     int plane_stride;
michael@0:     int plane_height;
michael@0: 
michael@0:     /***********/
michael@0:     /* Y Plane */
michael@0:     /***********/
michael@0:     Border = ybf->border;
michael@0:     plane_stride = ybf->y_stride;
michael@0:     plane_height = ybf->y_height;
michael@0: 
michael@0:     src_ptr1 = ybf->y_buffer - Border;
michael@0:     src_ptr2 = src_ptr1 + (plane_height * plane_stride) - plane_stride;
michael@0:     dest_ptr2 = src_ptr2 + plane_stride;
michael@0: 
michael@0:     for (i = 0; i < (int)Border; i++)
michael@0:     {
michael@0:         vpx_memcpy(dest_ptr2, src_ptr2, plane_stride);
michael@0:         dest_ptr2 += plane_stride;
michael@0:     }
michael@0: 
michael@0: 
michael@0:     /***********/
michael@0:     /* U Plane */
michael@0:     /***********/
michael@0:     plane_stride = ybf->uv_stride;
michael@0:     plane_height = ybf->uv_height;
michael@0:     Border /= 2;
michael@0: 
michael@0:     src_ptr1 = ybf->u_buffer - Border;
michael@0:     src_ptr2 = src_ptr1 + (plane_height * plane_stride) - plane_stride;
michael@0:     dest_ptr2 = src_ptr2 + plane_stride;
michael@0: 
michael@0:     for (i = 0; i < (int)(Border); i++)
michael@0:     {
michael@0:         vpx_memcpy(dest_ptr2, src_ptr2, plane_stride);
michael@0:         dest_ptr2 += plane_stride;
michael@0:     }
michael@0: 
michael@0:     /***********/
michael@0:     /* V Plane */
michael@0:     /***********/
michael@0: 
michael@0:     src_ptr1 = ybf->v_buffer - Border;
michael@0:     src_ptr2 = src_ptr1 + (plane_height * plane_stride) - plane_stride;
michael@0:     dest_ptr2 = src_ptr2 + plane_stride;
michael@0: 
michael@0:     for (i = 0; i < (int)(Border); i++)
michael@0:     {
michael@0:         vpx_memcpy(dest_ptr2, src_ptr2, plane_stride);
michael@0:         dest_ptr2 += plane_stride;
michael@0:     }
michael@0: }
michael@0: 
michael@0: static void yv12_extend_frame_left_right_c(YV12_BUFFER_CONFIG *ybf,
michael@0:                                            unsigned char *y_src,
michael@0:                                            unsigned char *u_src,
michael@0:                                            unsigned char *v_src)
michael@0: {
michael@0:     int i;
michael@0:     unsigned char *src_ptr1, *src_ptr2;
michael@0:     unsigned char *dest_ptr1, *dest_ptr2;
michael@0: 
michael@0:     unsigned int Border;
michael@0:     int plane_stride;
michael@0:     int plane_height;
michael@0:     int plane_width;
michael@0: 
michael@0:     /***********/
michael@0:     /* Y Plane */
michael@0:     /***********/
michael@0:     Border = ybf->border;
michael@0:     plane_stride = ybf->y_stride;
michael@0:     plane_height = 16;
michael@0:     plane_width = ybf->y_width;
michael@0: 
michael@0:     /* copy the left and right most columns out */
michael@0:     src_ptr1 = y_src;
michael@0:     src_ptr2 = src_ptr1 + plane_width - 1;
michael@0:     dest_ptr1 = src_ptr1 - Border;
michael@0:     dest_ptr2 = src_ptr2 + 1;
michael@0: 
michael@0:     for (i = 0; i < plane_height; i++)
michael@0:     {
michael@0:         vpx_memset(dest_ptr1, src_ptr1[0], Border);
michael@0:         vpx_memset(dest_ptr2, src_ptr2[0], Border);
michael@0:         src_ptr1  += plane_stride;
michael@0:         src_ptr2  += plane_stride;
michael@0:         dest_ptr1 += plane_stride;
michael@0:         dest_ptr2 += plane_stride;
michael@0:     }
michael@0: 
michael@0:     /***********/
michael@0:     /* U Plane */
michael@0:     /***********/
michael@0:     plane_stride = ybf->uv_stride;
michael@0:     plane_height = 8;
michael@0:     plane_width = ybf->uv_width;
michael@0:     Border /= 2;
michael@0: 
michael@0:     /* copy the left and right most columns out */
michael@0:     src_ptr1 = u_src;
michael@0:     src_ptr2 = src_ptr1 + plane_width - 1;
michael@0:     dest_ptr1 = src_ptr1 - Border;
michael@0:     dest_ptr2 = src_ptr2 + 1;
michael@0: 
michael@0:     for (i = 0; i < plane_height; i++)
michael@0:     {
michael@0:         vpx_memset(dest_ptr1, src_ptr1[0], Border);
michael@0:         vpx_memset(dest_ptr2, src_ptr2[0], Border);
michael@0:         src_ptr1  += plane_stride;
michael@0:         src_ptr2  += plane_stride;
michael@0:         dest_ptr1 += plane_stride;
michael@0:         dest_ptr2 += plane_stride;
michael@0:     }
michael@0: 
michael@0:     /***********/
michael@0:     /* V Plane */
michael@0:     /***********/
michael@0: 
michael@0:     /* copy the left and right most columns out */
michael@0:     src_ptr1 = v_src;
michael@0:     src_ptr2 = src_ptr1 + plane_width - 1;
michael@0:     dest_ptr1 = src_ptr1 - Border;
michael@0:     dest_ptr2 = src_ptr2 + 1;
michael@0: 
michael@0:     for (i = 0; i < plane_height; i++)
michael@0:     {
michael@0:         vpx_memset(dest_ptr1, src_ptr1[0], Border);
michael@0:         vpx_memset(dest_ptr2, src_ptr2[0], Border);
michael@0:         src_ptr1  += plane_stride;
michael@0:         src_ptr2  += plane_stride;
michael@0:         dest_ptr1 += plane_stride;
michael@0:         dest_ptr2 += plane_stride;
michael@0:     }
michael@0: }
michael@0: 
michael@0: static void decode_mb_rows(VP8D_COMP *pbi)
michael@0: {
michael@0:     VP8_COMMON *const pc = & pbi->common;
michael@0:     MACROBLOCKD *const xd  = & pbi->mb;
michael@0: 
michael@0:     MODE_INFO *lf_mic = xd->mode_info_context;
michael@0: 
michael@0:     int ibc = 0;
michael@0:     int num_part = 1 << pc->multi_token_partition;
michael@0: 
michael@0:     int recon_yoffset, recon_uvoffset;
michael@0:     int mb_row, mb_col;
michael@0:     int mb_idx = 0;
michael@0: 
michael@0:     YV12_BUFFER_CONFIG *yv12_fb_new = pbi->dec_fb_ref[INTRA_FRAME];
michael@0: 
michael@0:     int recon_y_stride = yv12_fb_new->y_stride;
michael@0:     int recon_uv_stride = yv12_fb_new->uv_stride;
michael@0: 
michael@0:     unsigned char *ref_buffer[MAX_REF_FRAMES][3];
michael@0:     unsigned char *dst_buffer[3];
michael@0:     unsigned char *lf_dst[3];
michael@0:     unsigned char *eb_dst[3];
michael@0:     int i;
michael@0:     int ref_fb_corrupted[MAX_REF_FRAMES];
michael@0: 
michael@0:     ref_fb_corrupted[INTRA_FRAME] = 0;
michael@0: 
michael@0:     for(i = 1; i < MAX_REF_FRAMES; i++)
michael@0:     {
michael@0:         YV12_BUFFER_CONFIG *this_fb = pbi->dec_fb_ref[i];
michael@0: 
michael@0:         ref_buffer[i][0] = this_fb->y_buffer;
michael@0:         ref_buffer[i][1] = this_fb->u_buffer;
michael@0:         ref_buffer[i][2] = this_fb->v_buffer;
michael@0: 
michael@0:         ref_fb_corrupted[i] = this_fb->corrupted;
michael@0:     }
michael@0: 
michael@0:     /* Set up the buffer pointers */
michael@0:     eb_dst[0] = lf_dst[0] = dst_buffer[0] = yv12_fb_new->y_buffer;
michael@0:     eb_dst[1] = lf_dst[1] = dst_buffer[1] = yv12_fb_new->u_buffer;
michael@0:     eb_dst[2] = lf_dst[2] = dst_buffer[2] = yv12_fb_new->v_buffer;
michael@0: 
michael@0:     xd->up_available = 0;
michael@0: 
michael@0:     /* Initialize the loop filter for this frame. */
michael@0:     if(pc->filter_level)
michael@0:         vp8_loop_filter_frame_init(pc, xd, pc->filter_level);
michael@0: 
michael@0:     vp8_setup_intra_recon_top_line(yv12_fb_new);
michael@0: 
michael@0:     /* Decode the individual macro block */
michael@0:     for (mb_row = 0; mb_row < pc->mb_rows; mb_row++)
michael@0:     {
michael@0:         if (num_part > 1)
michael@0:         {
michael@0:             xd->current_bc = & pbi->mbc[ibc];
michael@0:             ibc++;
michael@0: 
michael@0:             if (ibc == num_part)
michael@0:                 ibc = 0;
michael@0:         }
michael@0: 
michael@0:         recon_yoffset = mb_row * recon_y_stride * 16;
michael@0:         recon_uvoffset = mb_row * recon_uv_stride * 8;
michael@0: 
michael@0:         /* reset contexts */
michael@0:         xd->above_context = pc->above_context;
michael@0:         vpx_memset(xd->left_context, 0, sizeof(ENTROPY_CONTEXT_PLANES));
michael@0: 
michael@0:         xd->left_available = 0;
michael@0: 
michael@0:         xd->mb_to_top_edge = -((mb_row * 16) << 3);
michael@0:         xd->mb_to_bottom_edge = ((pc->mb_rows - 1 - mb_row) * 16) << 3;
michael@0: 
michael@0:         xd->recon_above[0] = dst_buffer[0] + recon_yoffset;
michael@0:         xd->recon_above[1] = dst_buffer[1] + recon_uvoffset;
michael@0:         xd->recon_above[2] = dst_buffer[2] + recon_uvoffset;
michael@0: 
michael@0:         xd->recon_left[0] = xd->recon_above[0] - 1;
michael@0:         xd->recon_left[1] = xd->recon_above[1] - 1;
michael@0:         xd->recon_left[2] = xd->recon_above[2] - 1;
michael@0: 
michael@0:         xd->recon_above[0] -= xd->dst.y_stride;
michael@0:         xd->recon_above[1] -= xd->dst.uv_stride;
michael@0:         xd->recon_above[2] -= xd->dst.uv_stride;
michael@0: 
michael@0:         /* TODO: move to outside row loop */
michael@0:         xd->recon_left_stride[0] = xd->dst.y_stride;
michael@0:         xd->recon_left_stride[1] = xd->dst.uv_stride;
michael@0: 
michael@0:         setup_intra_recon_left(xd->recon_left[0], xd->recon_left[1],
michael@0:                                xd->recon_left[2], xd->dst.y_stride,
michael@0:                                xd->dst.uv_stride);
michael@0: 
michael@0:         for (mb_col = 0; mb_col < pc->mb_cols; mb_col++)
michael@0:         {
michael@0:             /* Distance of Mb to the various image edges.
michael@0:              * These are specified to 8th pel as they are always compared to values
michael@0:              * that are in 1/8th pel units
michael@0:              */
michael@0:             xd->mb_to_left_edge = -((mb_col * 16) << 3);
michael@0:             xd->mb_to_right_edge = ((pc->mb_cols - 1 - mb_col) * 16) << 3;
michael@0: 
michael@0: #if CONFIG_ERROR_CONCEALMENT
michael@0:             {
michael@0:                 int corrupt_residual = (!pbi->independent_partitions &&
michael@0:                                        pbi->frame_corrupt_residual) ||
michael@0:                                        vp8dx_bool_error(xd->current_bc);
michael@0:                 if (pbi->ec_active &&
michael@0:                     xd->mode_info_context->mbmi.ref_frame == INTRA_FRAME &&
michael@0:                     corrupt_residual)
michael@0:                 {
michael@0:                     /* We have an intra block with corrupt coefficients, better to
michael@0:                      * conceal with an inter block. Interpolate MVs from neighboring
michael@0:                      * MBs.
michael@0:                      *
michael@0:                      * Note that for the first mb with corrupt residual in a frame,
michael@0:                      * we might not discover that before decoding the residual. That
michael@0:                      * happens after this check, and therefore no inter concealment
michael@0:                      * will be done.
michael@0:                      */
michael@0:                     vp8_interpolate_motion(xd,
michael@0:                                            mb_row, mb_col,
michael@0:                                            pc->mb_rows, pc->mb_cols,
michael@0:                                            pc->mode_info_stride);
michael@0:                 }
michael@0:             }
michael@0: #endif
michael@0: 
michael@0:             xd->dst.y_buffer = dst_buffer[0] + recon_yoffset;
michael@0:             xd->dst.u_buffer = dst_buffer[1] + recon_uvoffset;
michael@0:             xd->dst.v_buffer = dst_buffer[2] + recon_uvoffset;
michael@0: 
michael@0:             xd->pre.y_buffer = ref_buffer[xd->mode_info_context->mbmi.ref_frame][0] + recon_yoffset;
michael@0:             xd->pre.u_buffer = ref_buffer[xd->mode_info_context->mbmi.ref_frame][1] + recon_uvoffset;
michael@0:             xd->pre.v_buffer = ref_buffer[xd->mode_info_context->mbmi.ref_frame][2] + recon_uvoffset;
michael@0: 
michael@0:             /* propagate errors from reference frames */
michael@0:             xd->corrupted |= ref_fb_corrupted[xd->mode_info_context->mbmi.ref_frame];
michael@0: 
michael@0:             decode_macroblock(pbi, xd, mb_idx);
michael@0: 
michael@0:             mb_idx++;
michael@0:             xd->left_available = 1;
michael@0: 
michael@0:             /* check if the boolean decoder has suffered an error */
michael@0:             xd->corrupted |= vp8dx_bool_error(xd->current_bc);
michael@0: 
michael@0:             xd->recon_above[0] += 16;
michael@0:             xd->recon_above[1] += 8;
michael@0:             xd->recon_above[2] += 8;
michael@0:             xd->recon_left[0] += 16;
michael@0:             xd->recon_left[1] += 8;
michael@0:             xd->recon_left[2] += 8;
michael@0: 
michael@0:             recon_yoffset += 16;
michael@0:             recon_uvoffset += 8;
michael@0: 
michael@0:             ++xd->mode_info_context;  /* next mb */
michael@0: 
michael@0:             xd->above_context++;
michael@0:         }
michael@0: 
michael@0:         /* adjust to the next row of mbs */
michael@0:         vp8_extend_mb_row(yv12_fb_new, xd->dst.y_buffer + 16,
michael@0:                           xd->dst.u_buffer + 8, xd->dst.v_buffer + 8);
michael@0: 
michael@0:         ++xd->mode_info_context;      /* skip prediction column */
michael@0:         xd->up_available = 1;
michael@0: 
michael@0:         if(pc->filter_level)
michael@0:         {
michael@0:             if(mb_row > 0)
michael@0:             {
michael@0:                 if (pc->filter_type == NORMAL_LOOPFILTER)
michael@0:                     vp8_loop_filter_row_normal(pc, lf_mic, mb_row-1,
michael@0:                                                recon_y_stride, recon_uv_stride,
michael@0:                                                lf_dst[0], lf_dst[1], lf_dst[2]);
michael@0:                 else
michael@0:                     vp8_loop_filter_row_simple(pc, lf_mic, mb_row-1,
michael@0:                                                recon_y_stride, recon_uv_stride,
michael@0:                                                lf_dst[0], lf_dst[1], lf_dst[2]);
michael@0: 
michael@0:                 if(mb_row > 1)
michael@0:                 {
michael@0:                     yv12_extend_frame_left_right_c(yv12_fb_new,
michael@0:                                                    eb_dst[0],
michael@0:                                                    eb_dst[1],
michael@0:                                                    eb_dst[2]);
michael@0: 
michael@0:                     eb_dst[0] += recon_y_stride  * 16;
michael@0:                     eb_dst[1] += recon_uv_stride *  8;
michael@0:                     eb_dst[2] += recon_uv_stride *  8;
michael@0: 
michael@0:                     if(mb_row == 2)
michael@0:                         yv12_extend_frame_top_c(yv12_fb_new);
michael@0: 
michael@0:                 }
michael@0: 
michael@0:                 lf_dst[0] += recon_y_stride  * 16;
michael@0:                 lf_dst[1] += recon_uv_stride *  8;
michael@0:                 lf_dst[2] += recon_uv_stride *  8;
michael@0:                 lf_mic += pc->mb_cols;
michael@0:                 lf_mic++;         /* Skip border mb */
michael@0:             }
michael@0:         }
michael@0:         else
michael@0:         {
michael@0:             if(mb_row > 0)
michael@0:             {
michael@0:                 /**/
michael@0:                 yv12_extend_frame_left_right_c(yv12_fb_new,
michael@0:                                                eb_dst[0],
michael@0:                                                eb_dst[1],
michael@0:                                                eb_dst[2]);
michael@0: 
michael@0:                 eb_dst[0] += recon_y_stride  * 16;
michael@0:                 eb_dst[1] += recon_uv_stride *  8;
michael@0:                 eb_dst[2] += recon_uv_stride *  8;
michael@0: 
michael@0:                 if(mb_row == 1)
michael@0:                     yv12_extend_frame_top_c(yv12_fb_new);
michael@0:             }
michael@0:         }
michael@0:     }
michael@0: 
michael@0:     if(pc->filter_level)
michael@0:     {
michael@0:         if (pc->filter_type == NORMAL_LOOPFILTER)
michael@0:             vp8_loop_filter_row_normal(pc, lf_mic, mb_row-1, recon_y_stride,
michael@0:                                        recon_uv_stride, lf_dst[0], lf_dst[1],
michael@0:                                        lf_dst[2]);
michael@0:         else
michael@0:             vp8_loop_filter_row_simple(pc, lf_mic, mb_row-1, recon_y_stride,
michael@0:                                        recon_uv_stride, lf_dst[0], lf_dst[1],
michael@0:                                        lf_dst[2]);
michael@0: 
michael@0:         yv12_extend_frame_left_right_c(yv12_fb_new,
michael@0:                                        eb_dst[0],
michael@0:                                        eb_dst[1],
michael@0:                                        eb_dst[2]);
michael@0:         eb_dst[0] += recon_y_stride  * 16;
michael@0:         eb_dst[1] += recon_uv_stride *  8;
michael@0:         eb_dst[2] += recon_uv_stride *  8;
michael@0:     }
michael@0:     yv12_extend_frame_left_right_c(yv12_fb_new,
michael@0:                                    eb_dst[0],
michael@0:                                    eb_dst[1],
michael@0:                                    eb_dst[2]);
michael@0: 
michael@0:     yv12_extend_frame_bottom_c(yv12_fb_new);
michael@0: 
michael@0: }
michael@0: 
michael@0: static unsigned int read_partition_size(VP8D_COMP *pbi,
michael@0:                                         const unsigned char *cx_size)
michael@0: {
michael@0:     unsigned char temp[3];
michael@0:     if (pbi->decrypt_cb)
michael@0:     {
michael@0:         pbi->decrypt_cb(pbi->decrypt_state, cx_size, temp, 3);
michael@0:         cx_size = temp;
michael@0:     }
michael@0:     return cx_size[0] + (cx_size[1] << 8) + (cx_size[2] << 16);
michael@0: }
michael@0: 
michael@0: static int read_is_valid(const unsigned char *start,
michael@0:                          size_t               len,
michael@0:                          const unsigned char *end)
michael@0: {
michael@0:     return (start + len > start && start + len <= end);
michael@0: }
michael@0: 
michael@0: static unsigned int read_available_partition_size(
michael@0:                                        VP8D_COMP *pbi,
michael@0:                                        const unsigned char *token_part_sizes,
michael@0:                                        const unsigned char *fragment_start,
michael@0:                                        const unsigned char *first_fragment_end,
michael@0:                                        const unsigned char *fragment_end,
michael@0:                                        int i,
michael@0:                                        int num_part)
michael@0: {
michael@0:     VP8_COMMON* pc = &pbi->common;
michael@0:     const unsigned char *partition_size_ptr = token_part_sizes + i * 3;
michael@0:     unsigned int partition_size = 0;
michael@0:     ptrdiff_t bytes_left = fragment_end - fragment_start;
michael@0:     /* Calculate the length of this partition. The last partition
michael@0:      * size is implicit. If the partition size can't be read, then
michael@0:      * either use the remaining data in the buffer (for EC mode)
michael@0:      * or throw an error.
michael@0:      */
michael@0:     if (i < num_part - 1)
michael@0:     {
michael@0:         if (read_is_valid(partition_size_ptr, 3, first_fragment_end))
michael@0:             partition_size = read_partition_size(pbi, partition_size_ptr);
michael@0:         else if (pbi->ec_active)
michael@0:             partition_size = (unsigned int)bytes_left;
michael@0:         else
michael@0:             vpx_internal_error(&pc->error, VPX_CODEC_CORRUPT_FRAME,
michael@0:                                "Truncated partition size data");
michael@0:     }
michael@0:     else
michael@0:         partition_size = (unsigned int)bytes_left;
michael@0: 
michael@0:     /* Validate the calculated partition length. If the buffer
michael@0:      * described by the partition can't be fully read, then restrict
michael@0:      * it to the portion that can be (for EC mode) or throw an error.
michael@0:      */
michael@0:     if (!read_is_valid(fragment_start, partition_size, fragment_end))
michael@0:     {
michael@0:         if (pbi->ec_active)
michael@0:             partition_size = (unsigned int)bytes_left;
michael@0:         else
michael@0:             vpx_internal_error(&pc->error, VPX_CODEC_CORRUPT_FRAME,
michael@0:                                "Truncated packet or corrupt partition "
michael@0:                                "%d length", i + 1);
michael@0:     }
michael@0:     return partition_size;
michael@0: }
michael@0: 
michael@0: 
michael@0: static void setup_token_decoder(VP8D_COMP *pbi,
michael@0:                                 const unsigned char* token_part_sizes)
michael@0: {
michael@0:     vp8_reader *bool_decoder = &pbi->mbc[0];
michael@0:     unsigned int partition_idx;
michael@0:     unsigned int fragment_idx;
michael@0:     unsigned int num_token_partitions;
michael@0:     const unsigned char *first_fragment_end = pbi->fragments.ptrs[0] +
michael@0:                                           pbi->fragments.sizes[0];
michael@0: 
michael@0:     TOKEN_PARTITION multi_token_partition =
michael@0:             (TOKEN_PARTITION)vp8_read_literal(&pbi->mbc[8], 2);
michael@0:     if (!vp8dx_bool_error(&pbi->mbc[8]))
michael@0:         pbi->common.multi_token_partition = multi_token_partition;
michael@0:     num_token_partitions = 1 << pbi->common.multi_token_partition;
michael@0: 
michael@0:     /* Check for partitions within the fragments and unpack the fragments
michael@0:      * so that each fragment pointer points to its corresponding partition. */
michael@0:     for (fragment_idx = 0; fragment_idx < pbi->fragments.count; ++fragment_idx)
michael@0:     {
michael@0:         unsigned int fragment_size = pbi->fragments.sizes[fragment_idx];
michael@0:         const unsigned char *fragment_end = pbi->fragments.ptrs[fragment_idx] +
michael@0:                                             fragment_size;
michael@0:         /* Special case for handling the first partition since we have already
michael@0:          * read its size. */
michael@0:         if (fragment_idx == 0)
michael@0:         {
michael@0:             /* Size of first partition + token partition sizes element */
michael@0:             ptrdiff_t ext_first_part_size = token_part_sizes -
michael@0:                 pbi->fragments.ptrs[0] + 3 * (num_token_partitions - 1);
michael@0:             fragment_size -= (unsigned int)ext_first_part_size;
michael@0:             if (fragment_size > 0)
michael@0:             {
michael@0:                 pbi->fragments.sizes[0] = (unsigned int)ext_first_part_size;
michael@0:                 /* The fragment contains an additional partition. Move to
michael@0:                  * next. */
michael@0:                 fragment_idx++;
michael@0:                 pbi->fragments.ptrs[fragment_idx] = pbi->fragments.ptrs[0] +
michael@0:                   pbi->fragments.sizes[0];
michael@0:             }
michael@0:         }
michael@0:         /* Split the chunk into partitions read from the bitstream */
michael@0:         while (fragment_size > 0)
michael@0:         {
michael@0:             ptrdiff_t partition_size = read_available_partition_size(
michael@0:                                                  pbi,
michael@0:                                                  token_part_sizes,
michael@0:                                                  pbi->fragments.ptrs[fragment_idx],
michael@0:                                                  first_fragment_end,
michael@0:                                                  fragment_end,
michael@0:                                                  fragment_idx - 1,
michael@0:                                                  num_token_partitions);
michael@0:             pbi->fragments.sizes[fragment_idx] = (unsigned int)partition_size;
michael@0:             fragment_size -= (unsigned int)partition_size;
michael@0:             assert(fragment_idx <= num_token_partitions);
michael@0:             if (fragment_size > 0)
michael@0:             {
michael@0:                 /* The fragment contains an additional partition.
michael@0:                  * Move to next. */
michael@0:                 fragment_idx++;
michael@0:                 pbi->fragments.ptrs[fragment_idx] =
michael@0:                     pbi->fragments.ptrs[fragment_idx - 1] + partition_size;
michael@0:             }
michael@0:         }
michael@0:     }
michael@0: 
michael@0:     pbi->fragments.count = num_token_partitions + 1;
michael@0: 
michael@0:     for (partition_idx = 1; partition_idx < pbi->fragments.count; ++partition_idx)
michael@0:     {
michael@0:         if (vp8dx_start_decode(bool_decoder,
michael@0:                                pbi->fragments.ptrs[partition_idx],
michael@0:                                pbi->fragments.sizes[partition_idx],
michael@0:                                pbi->decrypt_cb, pbi->decrypt_state))
michael@0:             vpx_internal_error(&pbi->common.error, VPX_CODEC_MEM_ERROR,
michael@0:                                "Failed to allocate bool decoder %d",
michael@0:                                partition_idx);
michael@0: 
michael@0:         bool_decoder++;
michael@0:     }
michael@0: 
michael@0: #if CONFIG_MULTITHREAD
michael@0:     /* Clamp number of decoder threads */
michael@0:     if (pbi->decoding_thread_count > num_token_partitions - 1)
michael@0:         pbi->decoding_thread_count = num_token_partitions - 1;
michael@0: #endif
michael@0: }
michael@0: 
michael@0: 
michael@0: static void init_frame(VP8D_COMP *pbi)
michael@0: {
michael@0:     VP8_COMMON *const pc = & pbi->common;
michael@0:     MACROBLOCKD *const xd  = & pbi->mb;
michael@0: 
michael@0:     if (pc->frame_type == KEY_FRAME)
michael@0:     {
michael@0:         /* Various keyframe initializations */
michael@0:         vpx_memcpy(pc->fc.mvc, vp8_default_mv_context, sizeof(vp8_default_mv_context));
michael@0: 
michael@0:         vp8_init_mbmode_probs(pc);
michael@0: 
michael@0:         vp8_default_coef_probs(pc);
michael@0: 
michael@0:         /* reset the segment feature data to 0 with delta coding (Default state). */
michael@0:         vpx_memset(xd->segment_feature_data, 0, sizeof(xd->segment_feature_data));
michael@0:         xd->mb_segement_abs_delta = SEGMENT_DELTADATA;
michael@0: 
michael@0:         /* reset the mode ref deltasa for loop filter */
michael@0:         vpx_memset(xd->ref_lf_deltas, 0, sizeof(xd->ref_lf_deltas));
michael@0:         vpx_memset(xd->mode_lf_deltas, 0, sizeof(xd->mode_lf_deltas));
michael@0: 
michael@0:         /* All buffers are implicitly updated on key frames. */
michael@0:         pc->refresh_golden_frame = 1;
michael@0:         pc->refresh_alt_ref_frame = 1;
michael@0:         pc->copy_buffer_to_gf = 0;
michael@0:         pc->copy_buffer_to_arf = 0;
michael@0: 
michael@0:         /* Note that Golden and Altref modes cannot be used on a key frame so
michael@0:          * ref_frame_sign_bias[] is undefined and meaningless
michael@0:          */
michael@0:         pc->ref_frame_sign_bias[GOLDEN_FRAME] = 0;
michael@0:         pc->ref_frame_sign_bias[ALTREF_FRAME] = 0;
michael@0:     }
michael@0:     else
michael@0:     {
michael@0:         /* To enable choice of different interploation filters */
michael@0:         if (!pc->use_bilinear_mc_filter)
michael@0:         {
michael@0:             xd->subpixel_predict        = vp8_sixtap_predict4x4;
michael@0:             xd->subpixel_predict8x4     = vp8_sixtap_predict8x4;
michael@0:             xd->subpixel_predict8x8     = vp8_sixtap_predict8x8;
michael@0:             xd->subpixel_predict16x16   = vp8_sixtap_predict16x16;
michael@0:         }
michael@0:         else
michael@0:         {
michael@0:             xd->subpixel_predict        = vp8_bilinear_predict4x4;
michael@0:             xd->subpixel_predict8x4     = vp8_bilinear_predict8x4;
michael@0:             xd->subpixel_predict8x8     = vp8_bilinear_predict8x8;
michael@0:             xd->subpixel_predict16x16   = vp8_bilinear_predict16x16;
michael@0:         }
michael@0: 
michael@0:         if (pbi->decoded_key_frame && pbi->ec_enabled && !pbi->ec_active)
michael@0:             pbi->ec_active = 1;
michael@0:     }
michael@0: 
michael@0:     xd->left_context = &pc->left_context;
michael@0:     xd->mode_info_context = pc->mi;
michael@0:     xd->frame_type = pc->frame_type;
michael@0:     xd->mode_info_context->mbmi.mode = DC_PRED;
michael@0:     xd->mode_info_stride = pc->mode_info_stride;
michael@0:     xd->corrupted = 0; /* init without corruption */
michael@0: 
michael@0:     xd->fullpixel_mask = 0xffffffff;
michael@0:     if(pc->full_pixel)
michael@0:         xd->fullpixel_mask = 0xfffffff8;
michael@0: 
michael@0: }
michael@0: 
michael@0: int vp8_decode_frame(VP8D_COMP *pbi)
michael@0: {
michael@0:     vp8_reader *const bc = &pbi->mbc[8];
michael@0:     VP8_COMMON *const pc = &pbi->common;
michael@0:     MACROBLOCKD *const xd  = &pbi->mb;
michael@0:     const unsigned char *data = pbi->fragments.ptrs[0];
michael@0:     const unsigned char *data_end =  data + pbi->fragments.sizes[0];
michael@0:     ptrdiff_t first_partition_length_in_bytes;
michael@0: 
michael@0:     int i, j, k, l;
michael@0:     const int *const mb_feature_data_bits = vp8_mb_feature_data_bits;
michael@0:     int corrupt_tokens = 0;
michael@0:     int prev_independent_partitions = pbi->independent_partitions;
michael@0: 
michael@0:     YV12_BUFFER_CONFIG *yv12_fb_new = pbi->dec_fb_ref[INTRA_FRAME];
michael@0: 
michael@0:     /* start with no corruption of current frame */
michael@0:     xd->corrupted = 0;
michael@0:     yv12_fb_new->corrupted = 0;
michael@0: 
michael@0:     if (data_end - data < 3)
michael@0:     {
michael@0:         if (!pbi->ec_active)
michael@0:         {
michael@0:             vpx_internal_error(&pc->error, VPX_CODEC_CORRUPT_FRAME,
michael@0:                                "Truncated packet");
michael@0:         }
michael@0: 
michael@0:         /* Declare the missing frame as an inter frame since it will
michael@0:            be handled as an inter frame when we have estimated its
michael@0:            motion vectors. */
michael@0:         pc->frame_type = INTER_FRAME;
michael@0:         pc->version = 0;
michael@0:         pc->show_frame = 1;
michael@0:         first_partition_length_in_bytes = 0;
michael@0:     }
michael@0:     else
michael@0:     {
michael@0:         unsigned char clear_buffer[10];
michael@0:         const unsigned char *clear = data;
michael@0:         if (pbi->decrypt_cb)
michael@0:         {
michael@0:             int n = (int)(data_end - data);
michael@0:             if (n > 10) n = 10;
michael@0:             pbi->decrypt_cb(pbi->decrypt_state, data, clear_buffer, n);
michael@0:             clear = clear_buffer;
michael@0:         }
michael@0: 
michael@0:         pc->frame_type = (FRAME_TYPE)(clear[0] & 1);
michael@0:         pc->version = (clear[0] >> 1) & 7;
michael@0:         pc->show_frame = (clear[0] >> 4) & 1;
michael@0:         first_partition_length_in_bytes =
michael@0:             (clear[0] | (clear[1] << 8) | (clear[2] << 16)) >> 5;
michael@0: 
michael@0:         if (!pbi->ec_active &&
michael@0:             (data + first_partition_length_in_bytes > data_end
michael@0:             || data + first_partition_length_in_bytes < data))
michael@0:             vpx_internal_error(&pc->error, VPX_CODEC_CORRUPT_FRAME,
michael@0:                                "Truncated packet or corrupt partition 0 length");
michael@0: 
michael@0:         data += 3;
michael@0:         clear += 3;
michael@0: 
michael@0:         vp8_setup_version(pc);
michael@0: 
michael@0: 
michael@0:         if (pc->frame_type == KEY_FRAME)
michael@0:         {
michael@0:             /* vet via sync code */
michael@0:             /* When error concealment is enabled we should only check the sync
michael@0:              * code if we have enough bits available
michael@0:              */
michael@0:             if (!pbi->ec_active || data + 3 < data_end)
michael@0:             {
michael@0:                 if (clear[0] != 0x9d || clear[1] != 0x01 || clear[2] != 0x2a)
michael@0:                     vpx_internal_error(&pc->error, VPX_CODEC_UNSUP_BITSTREAM,
michael@0:                                    "Invalid frame sync code");
michael@0:             }
michael@0: 
michael@0:             /* If error concealment is enabled we should only parse the new size
michael@0:              * if we have enough data. Otherwise we will end up with the wrong
michael@0:              * size.
michael@0:              */
michael@0:             if (!pbi->ec_active || data + 6 < data_end)
michael@0:             {
michael@0:                 pc->Width = (clear[3] | (clear[4] << 8)) & 0x3fff;
michael@0:                 pc->horiz_scale = clear[4] >> 6;
michael@0:                 pc->Height = (clear[5] | (clear[6] << 8)) & 0x3fff;
michael@0:                 pc->vert_scale = clear[6] >> 6;
michael@0:             }
michael@0:             data += 7;
michael@0:             clear += 7;
michael@0:         }
michael@0:         else
michael@0:         {
michael@0:           vpx_memcpy(&xd->pre, yv12_fb_new, sizeof(YV12_BUFFER_CONFIG));
michael@0:           vpx_memcpy(&xd->dst, yv12_fb_new, sizeof(YV12_BUFFER_CONFIG));
michael@0:         }
michael@0:     }
michael@0:     if ((!pbi->decoded_key_frame && pc->frame_type != KEY_FRAME))
michael@0:     {
michael@0:         return -1;
michael@0:     }
michael@0: 
michael@0:     init_frame(pbi);
michael@0: 
michael@0:     if (vp8dx_start_decode(bc, data, (unsigned int)(data_end - data),
michael@0:                            pbi->decrypt_cb, pbi->decrypt_state))
michael@0:         vpx_internal_error(&pc->error, VPX_CODEC_MEM_ERROR,
michael@0:                            "Failed to allocate bool decoder 0");
michael@0:     if (pc->frame_type == KEY_FRAME) {
michael@0:         (void)vp8_read_bit(bc);  // colorspace
michael@0:         pc->clamp_type  = (CLAMP_TYPE)vp8_read_bit(bc);
michael@0:     }
michael@0: 
michael@0:     /* Is segmentation enabled */
michael@0:     xd->segmentation_enabled = (unsigned char)vp8_read_bit(bc);
michael@0: 
michael@0:     if (xd->segmentation_enabled)
michael@0:     {
michael@0:         /* Signal whether or not the segmentation map is being explicitly updated this frame. */
michael@0:         xd->update_mb_segmentation_map = (unsigned char)vp8_read_bit(bc);
michael@0:         xd->update_mb_segmentation_data = (unsigned char)vp8_read_bit(bc);
michael@0: 
michael@0:         if (xd->update_mb_segmentation_data)
michael@0:         {
michael@0:             xd->mb_segement_abs_delta = (unsigned char)vp8_read_bit(bc);
michael@0: 
michael@0:             vpx_memset(xd->segment_feature_data, 0, sizeof(xd->segment_feature_data));
michael@0: 
michael@0:             /* For each segmentation feature (Quant and loop filter level) */
michael@0:             for (i = 0; i < MB_LVL_MAX; i++)
michael@0:             {
michael@0:                 for (j = 0; j < MAX_MB_SEGMENTS; j++)
michael@0:                 {
michael@0:                     /* Frame level data */
michael@0:                     if (vp8_read_bit(bc))
michael@0:                     {
michael@0:                         xd->segment_feature_data[i][j] = (signed char)vp8_read_literal(bc, mb_feature_data_bits[i]);
michael@0: 
michael@0:                         if (vp8_read_bit(bc))
michael@0:                             xd->segment_feature_data[i][j] = -xd->segment_feature_data[i][j];
michael@0:                     }
michael@0:                     else
michael@0:                         xd->segment_feature_data[i][j] = 0;
michael@0:                 }
michael@0:             }
michael@0:         }
michael@0: 
michael@0:         if (xd->update_mb_segmentation_map)
michael@0:         {
michael@0:             /* Which macro block level features are enabled */
michael@0:             vpx_memset(xd->mb_segment_tree_probs, 255, sizeof(xd->mb_segment_tree_probs));
michael@0: 
michael@0:             /* Read the probs used to decode the segment id for each macro block. */
michael@0:             for (i = 0; i < MB_FEATURE_TREE_PROBS; i++)
michael@0:             {
michael@0:                 /* If not explicitly set value is defaulted to 255 by memset above */
michael@0:                 if (vp8_read_bit(bc))
michael@0:                     xd->mb_segment_tree_probs[i] = (vp8_prob)vp8_read_literal(bc, 8);
michael@0:             }
michael@0:         }
michael@0:     }
michael@0:     else
michael@0:     {
michael@0:         /* No segmentation updates on this frame */
michael@0:         xd->update_mb_segmentation_map = 0;
michael@0:         xd->update_mb_segmentation_data = 0;
michael@0:     }
michael@0: 
michael@0:     /* Read the loop filter level and type */
michael@0:     pc->filter_type = (LOOPFILTERTYPE) vp8_read_bit(bc);
michael@0:     pc->filter_level = vp8_read_literal(bc, 6);
michael@0:     pc->sharpness_level = vp8_read_literal(bc, 3);
michael@0: 
michael@0:     /* Read in loop filter deltas applied at the MB level based on mode or ref frame. */
michael@0:     xd->mode_ref_lf_delta_update = 0;
michael@0:     xd->mode_ref_lf_delta_enabled = (unsigned char)vp8_read_bit(bc);
michael@0: 
michael@0:     if (xd->mode_ref_lf_delta_enabled)
michael@0:     {
michael@0:         /* Do the deltas need to be updated */
michael@0:         xd->mode_ref_lf_delta_update = (unsigned char)vp8_read_bit(bc);
michael@0: 
michael@0:         if (xd->mode_ref_lf_delta_update)
michael@0:         {
michael@0:             /* Send update */
michael@0:             for (i = 0; i < MAX_REF_LF_DELTAS; i++)
michael@0:             {
michael@0:                 if (vp8_read_bit(bc))
michael@0:                 {
michael@0:                     /*sign = vp8_read_bit( bc );*/
michael@0:                     xd->ref_lf_deltas[i] = (signed char)vp8_read_literal(bc, 6);
michael@0: 
michael@0:                     if (vp8_read_bit(bc))        /* Apply sign */
michael@0:                         xd->ref_lf_deltas[i] = xd->ref_lf_deltas[i] * -1;
michael@0:                 }
michael@0:             }
michael@0: 
michael@0:             /* Send update */
michael@0:             for (i = 0; i < MAX_MODE_LF_DELTAS; i++)
michael@0:             {
michael@0:                 if (vp8_read_bit(bc))
michael@0:                 {
michael@0:                     /*sign = vp8_read_bit( bc );*/
michael@0:                     xd->mode_lf_deltas[i] = (signed char)vp8_read_literal(bc, 6);
michael@0: 
michael@0:                     if (vp8_read_bit(bc))        /* Apply sign */
michael@0:                         xd->mode_lf_deltas[i] = xd->mode_lf_deltas[i] * -1;
michael@0:                 }
michael@0:             }
michael@0:         }
michael@0:     }
michael@0: 
michael@0:     setup_token_decoder(pbi, data + first_partition_length_in_bytes);
michael@0: 
michael@0:     xd->current_bc = &pbi->mbc[0];
michael@0: 
michael@0:     /* Read the default quantizers. */
michael@0:     {
michael@0:         int Q, q_update;
michael@0: 
michael@0:         Q = vp8_read_literal(bc, 7);  /* AC 1st order Q = default */
michael@0:         pc->base_qindex = Q;
michael@0:         q_update = 0;
michael@0:         pc->y1dc_delta_q = get_delta_q(bc, pc->y1dc_delta_q, &q_update);
michael@0:         pc->y2dc_delta_q = get_delta_q(bc, pc->y2dc_delta_q, &q_update);
michael@0:         pc->y2ac_delta_q = get_delta_q(bc, pc->y2ac_delta_q, &q_update);
michael@0:         pc->uvdc_delta_q = get_delta_q(bc, pc->uvdc_delta_q, &q_update);
michael@0:         pc->uvac_delta_q = get_delta_q(bc, pc->uvac_delta_q, &q_update);
michael@0: 
michael@0:         if (q_update)
michael@0:             vp8cx_init_de_quantizer(pbi);
michael@0: 
michael@0:         /* MB level dequantizer setup */
michael@0:         vp8_mb_init_dequantizer(pbi, &pbi->mb);
michael@0:     }
michael@0: 
michael@0:     /* Determine if the golden frame or ARF buffer should be updated and how.
michael@0:      * For all non key frames the GF and ARF refresh flags and sign bias
michael@0:      * flags must be set explicitly.
michael@0:      */
michael@0:     if (pc->frame_type != KEY_FRAME)
michael@0:     {
michael@0:         /* Should the GF or ARF be updated from the current frame */
michael@0:         pc->refresh_golden_frame = vp8_read_bit(bc);
michael@0: #if CONFIG_ERROR_CONCEALMENT
michael@0:         /* Assume we shouldn't refresh golden if the bit is missing */
michael@0:         xd->corrupted |= vp8dx_bool_error(bc);
michael@0:         if (pbi->ec_active && xd->corrupted)
michael@0:             pc->refresh_golden_frame = 0;
michael@0: #endif
michael@0: 
michael@0:         pc->refresh_alt_ref_frame = vp8_read_bit(bc);
michael@0: #if CONFIG_ERROR_CONCEALMENT
michael@0:         /* Assume we shouldn't refresh altref if the bit is missing */
michael@0:         xd->corrupted |= vp8dx_bool_error(bc);
michael@0:         if (pbi->ec_active && xd->corrupted)
michael@0:             pc->refresh_alt_ref_frame = 0;
michael@0: #endif
michael@0: 
michael@0:         /* Buffer to buffer copy flags. */
michael@0:         pc->copy_buffer_to_gf = 0;
michael@0: 
michael@0:         if (!pc->refresh_golden_frame)
michael@0:             pc->copy_buffer_to_gf = vp8_read_literal(bc, 2);
michael@0: 
michael@0: #if CONFIG_ERROR_CONCEALMENT
michael@0:         /* Assume we shouldn't copy to the golden if the bit is missing */
michael@0:         xd->corrupted |= vp8dx_bool_error(bc);
michael@0:         if (pbi->ec_active && xd->corrupted)
michael@0:             pc->copy_buffer_to_gf = 0;
michael@0: #endif
michael@0: 
michael@0:         pc->copy_buffer_to_arf = 0;
michael@0: 
michael@0:         if (!pc->refresh_alt_ref_frame)
michael@0:             pc->copy_buffer_to_arf = vp8_read_literal(bc, 2);
michael@0: 
michael@0: #if CONFIG_ERROR_CONCEALMENT
michael@0:         /* Assume we shouldn't copy to the alt-ref if the bit is missing */
michael@0:         xd->corrupted |= vp8dx_bool_error(bc);
michael@0:         if (pbi->ec_active && xd->corrupted)
michael@0:             pc->copy_buffer_to_arf = 0;
michael@0: #endif
michael@0: 
michael@0: 
michael@0:         pc->ref_frame_sign_bias[GOLDEN_FRAME] = vp8_read_bit(bc);
michael@0:         pc->ref_frame_sign_bias[ALTREF_FRAME] = vp8_read_bit(bc);
michael@0:     }
michael@0: 
michael@0:     pc->refresh_entropy_probs = vp8_read_bit(bc);
michael@0: #if CONFIG_ERROR_CONCEALMENT
michael@0:     /* Assume we shouldn't refresh the probabilities if the bit is
michael@0:      * missing */
michael@0:     xd->corrupted |= vp8dx_bool_error(bc);
michael@0:     if (pbi->ec_active && xd->corrupted)
michael@0:         pc->refresh_entropy_probs = 0;
michael@0: #endif
michael@0:     if (pc->refresh_entropy_probs == 0)
michael@0:     {
michael@0:         vpx_memcpy(&pc->lfc, &pc->fc, sizeof(pc->fc));
michael@0:     }
michael@0: 
michael@0:     pc->refresh_last_frame = pc->frame_type == KEY_FRAME  ||  vp8_read_bit(bc);
michael@0: 
michael@0: #if CONFIG_ERROR_CONCEALMENT
michael@0:     /* Assume we should refresh the last frame if the bit is missing */
michael@0:     xd->corrupted |= vp8dx_bool_error(bc);
michael@0:     if (pbi->ec_active && xd->corrupted)
michael@0:         pc->refresh_last_frame = 1;
michael@0: #endif
michael@0: 
michael@0:     if (0)
michael@0:     {
michael@0:         FILE *z = fopen("decodestats.stt", "a");
michael@0:         fprintf(z, "%6d F:%d,G:%d,A:%d,L:%d,Q:%d\n",
michael@0:                 pc->current_video_frame,
michael@0:                 pc->frame_type,
michael@0:                 pc->refresh_golden_frame,
michael@0:                 pc->refresh_alt_ref_frame,
michael@0:                 pc->refresh_last_frame,
michael@0:                 pc->base_qindex);
michael@0:         fclose(z);
michael@0:     }
michael@0: 
michael@0:     {
michael@0:         pbi->independent_partitions = 1;
michael@0: 
michael@0:         /* read coef probability tree */
michael@0:         for (i = 0; i < BLOCK_TYPES; i++)
michael@0:             for (j = 0; j < COEF_BANDS; j++)
michael@0:                 for (k = 0; k < PREV_COEF_CONTEXTS; k++)
michael@0:                     for (l = 0; l < ENTROPY_NODES; l++)
michael@0:                     {
michael@0: 
michael@0:                         vp8_prob *const p = pc->fc.coef_probs [i][j][k] + l;
michael@0: 
michael@0:                         if (vp8_read(bc, vp8_coef_update_probs [i][j][k][l]))
michael@0:                         {
michael@0:                             *p = (vp8_prob)vp8_read_literal(bc, 8);
michael@0: 
michael@0:                         }
michael@0:                         if (k > 0 && *p != pc->fc.coef_probs[i][j][k-1][l])
michael@0:                             pbi->independent_partitions = 0;
michael@0: 
michael@0:                     }
michael@0:     }
michael@0: 
michael@0:     /* clear out the coeff buffer */
michael@0:     vpx_memset(xd->qcoeff, 0, sizeof(xd->qcoeff));
michael@0: 
michael@0:     vp8_decode_mode_mvs(pbi);
michael@0: 
michael@0: #if CONFIG_ERROR_CONCEALMENT
michael@0:     if (pbi->ec_active &&
michael@0:             pbi->mvs_corrupt_from_mb < (unsigned int)pc->mb_cols * pc->mb_rows)
michael@0:     {
michael@0:         /* Motion vectors are missing in this frame. We will try to estimate
michael@0:          * them and then continue decoding the frame as usual */
michael@0:         vp8_estimate_missing_mvs(pbi);
michael@0:     }
michael@0: #endif
michael@0: 
michael@0:     vpx_memset(pc->above_context, 0, sizeof(ENTROPY_CONTEXT_PLANES) * pc->mb_cols);
michael@0:     pbi->frame_corrupt_residual = 0;
michael@0: 
michael@0: #if CONFIG_MULTITHREAD
michael@0:     if (pbi->b_multithreaded_rd && pc->multi_token_partition != ONE_PARTITION)
michael@0:     {
michael@0:         unsigned int thread;
michael@0:         vp8mt_decode_mb_rows(pbi, xd);
michael@0:         vp8_yv12_extend_frame_borders(yv12_fb_new);
michael@0:         for (thread = 0; thread < pbi->decoding_thread_count; ++thread)
michael@0:             corrupt_tokens |= pbi->mb_row_di[thread].mbd.corrupted;
michael@0:     }
michael@0:     else
michael@0: #endif
michael@0:     {
michael@0:         decode_mb_rows(pbi);
michael@0:         corrupt_tokens |= xd->corrupted;
michael@0:     }
michael@0: 
michael@0:     /* Collect information about decoder corruption. */
michael@0:     /* 1. Check first boolean decoder for errors. */
michael@0:     yv12_fb_new->corrupted = vp8dx_bool_error(bc);
michael@0:     /* 2. Check the macroblock information */
michael@0:     yv12_fb_new->corrupted |= corrupt_tokens;
michael@0: 
michael@0:     if (!pbi->decoded_key_frame)
michael@0:     {
michael@0:         if (pc->frame_type == KEY_FRAME &&
michael@0:             !yv12_fb_new->corrupted)
michael@0:             pbi->decoded_key_frame = 1;
michael@0:         else
michael@0:             vpx_internal_error(&pbi->common.error, VPX_CODEC_CORRUPT_FRAME,
michael@0:                                "A stream must start with a complete key frame");
michael@0:     }
michael@0: 
michael@0:     /* vpx_log("Decoder: Frame Decoded, Size Roughly:%d bytes  \n",bc->pos+pbi->bc2.pos); */
michael@0: 
michael@0:     if (pc->refresh_entropy_probs == 0)
michael@0:     {
michael@0:         vpx_memcpy(&pc->fc, &pc->lfc, sizeof(pc->fc));
michael@0:         pbi->independent_partitions = prev_independent_partitions;
michael@0:     }
michael@0: 
michael@0: #ifdef PACKET_TESTING
michael@0:     {
michael@0:         FILE *f = fopen("decompressor.VP8", "ab");
michael@0:         unsigned int size = pbi->bc2.pos + pbi->bc.pos + 8;
michael@0:         fwrite((void *) &size, 4, 1, f);
michael@0:         fwrite((void *) pbi->Source, size, 1, f);
michael@0:         fclose(f);
michael@0:     }
michael@0: #endif
michael@0: 
michael@0:     return 0;
michael@0: }