/* * Copyright (c) 2010 The WebM project authors. All Rights Reserved. * * Use of this source code is governed by a BSD-style license * that can be found in the LICENSE file in the root of the source * tree. An additional intellectual property rights grant can be found * in the file PATENTS. All contributing project authors may * be found in the AUTHORS file in the root of the source tree. */ #include "vp8/common/type_aliases.h" #include "vp8/common/blockd.h" #include "onyxd_int.h" #include "vpx_mem/vpx_mem.h" #include "vpx_ports/mem.h" #include "detokenize.h" #include "vp8/common/seg_common.h" #define BOOL_DATA UINT8 #define OCB_X PREV_COEF_CONTEXTS * ENTROPY_NODES DECLARE_ALIGNED(16, int, coef_bands_x[16]) = { 0 * OCB_X, 1 * OCB_X, 2 * OCB_X, 3 * OCB_X, 6 * OCB_X, 4 * OCB_X, 5 * OCB_X, 6 * OCB_X, 6 * OCB_X, 6 * OCB_X, 6 * OCB_X, 6 * OCB_X, 6 * OCB_X, 7 * OCB_X, 7 * OCB_X, 7 * OCB_X }; DECLARE_ALIGNED(16, int, coef_bands_x_8x8[64]) = { 0 * OCB_X, 1 * OCB_X, 2 * OCB_X, 3 * OCB_X, 5 * OCB_X, 4 * OCB_X, 4 * OCB_X, 5 * OCB_X, 5 * OCB_X, 3 * OCB_X, 6 * OCB_X, 3 * OCB_X, 5 * OCB_X, 4 * OCB_X, 6 * OCB_X, 6 * OCB_X, 6 * OCB_X, 5 * OCB_X, 5 * OCB_X, 6 * OCB_X, 6 * OCB_X, 6 * OCB_X, 6 * OCB_X, 6 * OCB_X, 6 * OCB_X, 6 * OCB_X, 6 * OCB_X, 6 * OCB_X, 6 * OCB_X, 6 * OCB_X, 6 * OCB_X, 6 * OCB_X, 6 * OCB_X, 6 * OCB_X, 6 * OCB_X, 6 * OCB_X, 7 * OCB_X, 7 * OCB_X, 7 * OCB_X, 7 * OCB_X, 7 * OCB_X, 7 * OCB_X, 7 * OCB_X, 7 * OCB_X, 7 * OCB_X, 7 * OCB_X, 7 * OCB_X, 7 * OCB_X, 7 * OCB_X, 7 * OCB_X, 7 * OCB_X, 7 * OCB_X, 7 * OCB_X, 7 * OCB_X, 7 * OCB_X, 7 * OCB_X, 7 * OCB_X, 7 * OCB_X, 7 * OCB_X, 7 * OCB_X, 7 * OCB_X, 7 * OCB_X, 7 * OCB_X, 7 * OCB_X, }; #define EOB_CONTEXT_NODE 0 #define ZERO_CONTEXT_NODE 1 #define ONE_CONTEXT_NODE 2 #define LOW_VAL_CONTEXT_NODE 3 #define TWO_CONTEXT_NODE 4 #define THREE_CONTEXT_NODE 5 #define HIGH_LOW_CONTEXT_NODE 6 #define CAT_ONE_CONTEXT_NODE 7 #define CAT_THREEFOUR_CONTEXT_NODE 8 #define CAT_THREE_CONTEXT_NODE 9 #define CAT_FIVE_CONTEXT_NODE 10 #define CAT1_MIN_VAL 5 #define CAT2_MIN_VAL 7 #define CAT3_MIN_VAL 11 #define CAT4_MIN_VAL 19 #define CAT5_MIN_VAL 35 #define CAT6_MIN_VAL 67 #define CAT1_PROB0 159 #define CAT2_PROB0 145 #define CAT2_PROB1 165 #define CAT3_PROB0 140 #define CAT3_PROB1 148 #define CAT3_PROB2 173 #define CAT4_PROB0 135 #define CAT4_PROB1 140 #define CAT4_PROB2 155 #define CAT4_PROB3 176 #define CAT5_PROB0 130 #define CAT5_PROB1 134 #define CAT5_PROB2 141 #define CAT5_PROB3 157 #define CAT5_PROB4 180 static const unsigned char cat6_prob[14] = { 254, 254, 252, 249, 243, 230, 196, 177, 153, 140, 133, 130, 129, 0 }; void vp8_reset_mb_tokens_context(MACROBLOCKD *x) { /* Clear entropy contexts for Y2 blocks */ if (x->mode_info_context->mbmi.mode != B_PRED && x->mode_info_context->mbmi.mode != I8X8_PRED && x->mode_info_context->mbmi.mode != SPLITMV) { vpx_memset(x->above_context, 0, sizeof(ENTROPY_CONTEXT_PLANES)); vpx_memset(x->left_context, 0, sizeof(ENTROPY_CONTEXT_PLANES)); } else { vpx_memset(x->above_context, 0, sizeof(ENTROPY_CONTEXT_PLANES) - 1); vpx_memset(x->left_context, 0, sizeof(ENTROPY_CONTEXT_PLANES) - 1); } } DECLARE_ALIGNED(16, extern const unsigned char, vp8_norm[256]); // #define PREV_CONTEXT_INC(val) (2+((val)>2)) // #define PREV_CONTEXT_INC(val) (vp8_prev_token_class[(val)]) #if CONFIG_EXPANDED_COEF_CONTEXT #define PREV_CONTEXT_INC(val) (vp8_prev_token_class[(val)>10?10:(val)]) #else #define PREV_CONTEXT_INC(val) (2) #endif #if CONFIG_ADAPTIVE_ENTROPY int get_token(int v) { if (v < 0) v = -v; if (v == 0) return ZERO_TOKEN; else if (v == 1) return ONE_TOKEN; else if (v == 2) return TWO_TOKEN; else if (v == 3) return THREE_TOKEN; else if (v == 4) return FOUR_TOKEN; else if (v <= 6) return DCT_VAL_CATEGORY1; else if (v <= 10) return DCT_VAL_CATEGORY2; else if (v <= 18) return DCT_VAL_CATEGORY3; else if (v <= 34) return DCT_VAL_CATEGORY4; else if (v <= 66) return DCT_VAL_CATEGORY5; else return DCT_VAL_CATEGORY6; } #if CONFIG_HYBRIDTRANSFORM void static count_tokens_adaptive_scan(const MACROBLOCKD *xd, INT16 *qcoeff_ptr, int block, int type, ENTROPY_CONTEXT *a, ENTROPY_CONTEXT *l, int eob, int seg_eob, FRAME_CONTEXT *fc) { int c, pt, token, band; const int *scan; int QIndex = xd->q_index; int active_ht = (QIndex < ACTIVE_HT) && (xd->mode_info_context->mbmi.mode == B_PRED); if(active_ht) { switch(xd->block[block].bmi.as_mode.tx_type) { case ADST_DCT : scan = vp8_row_scan; break; case DCT_ADST : scan = vp8_col_scan; break; default : scan = vp8_default_zig_zag1d; break; } } else { scan = vp8_default_zig_zag1d; } VP8_COMBINEENTROPYCONTEXTS(pt, *a, *l); for (c = !type; c < eob; ++c) { int rc = scan[c]; int v = qcoeff_ptr[rc]; band = vp8_coef_bands[c]; token = get_token(v); fc->coef_counts[type][band][pt][token]++; pt = vp8_prev_token_class[token]; } if (eob < seg_eob) { band = vp8_coef_bands[c]; fc->coef_counts[type][band][pt][DCT_EOB_TOKEN]++; } } #endif void static count_tokens(INT16 *qcoeff_ptr, int block, int type, ENTROPY_CONTEXT *a, ENTROPY_CONTEXT *l, int eob, int seg_eob, FRAME_CONTEXT *const fc) { int c, pt, token, band; VP8_COMBINEENTROPYCONTEXTS(pt, *a, *l); for (c = !type; c < eob; ++c) { int rc = vp8_default_zig_zag1d[c]; int v = qcoeff_ptr[rc]; band = vp8_coef_bands[c]; token = get_token(v); fc->coef_counts[type][band][pt][token]++; pt = vp8_prev_token_class[token]; } if (eob < seg_eob) { band = vp8_coef_bands[c]; fc->coef_counts[type][band][pt][DCT_EOB_TOKEN]++; } } void static count_tokens_8x8(INT16 *qcoeff_ptr, int block, int type, ENTROPY_CONTEXT *a, ENTROPY_CONTEXT *l, int eob, int seg_eob, FRAME_CONTEXT *fc) { int c, pt, token, band; VP8_COMBINEENTROPYCONTEXTS(pt, *a, *l); for (c = !type; c < eob; ++c) { int rc = (type == 1 ? vp8_default_zig_zag1d[c] : vp8_default_zig_zag1d_8x8[c]); int v = qcoeff_ptr[rc]; band = (type == 1 ? vp8_coef_bands[c] : vp8_coef_bands_8x8[c]); token = get_token(v); fc->coef_counts_8x8[type][band][pt][token]++; pt = vp8_prev_token_class[token]; } if (eob < seg_eob) { band = (type == 1 ? vp8_coef_bands[c] : vp8_coef_bands_8x8[c]); fc->coef_counts_8x8[type][band][pt][DCT_EOB_TOKEN]++; } } #endif static int vp8_get_signed(BOOL_DECODER *br, int value_to_sign) { const int split = (br->range + 1) >> 1; const VP8_BD_VALUE bigsplit = (VP8_BD_VALUE)split << (VP8_BD_VALUE_SIZE - 8); int v; if (br->count < 0) vp8dx_bool_decoder_fill(br); if (br->value < bigsplit) { br->range = split; v = value_to_sign; } else { br->range = br->range - split; br->value = br->value - bigsplit; v = -value_to_sign; } br->range += br->range; br->value += br->value; --br->count; return v; } #define WRITE_COEF_CONTINUE(val) \ { \ Prob = coef_probs + (ENTROPY_NODES*PREV_CONTEXT_INC(val));\ qcoeff_ptr[scan[c]] = (INT16) vp8_get_signed(br, val); \ c++; \ continue; \ } #define ADJUST_COEF(prob, bits_count) \ do { \ if (vp8_read(br, prob)) \ val += (UINT16)(1 << bits_count);\ } while (0); static int vp8_decode_coefs(VP8D_COMP *dx, const MACROBLOCKD *xd, ENTROPY_CONTEXT *a, ENTROPY_CONTEXT *l, int type, int seg_eob, INT16 *qcoeff_ptr, int i, const int *const scan, int block_type, const int *coef_bands) { FRAME_CONTEXT *const fc = &dx->common.fc; BOOL_DECODER *br = xd->current_bc; int tmp, c = (type == 0); const vp8_prob *Prob; const vp8_prob *coef_probs = (block_type == TX_4X4) ? fc->coef_probs[type][0][0] : fc->coef_probs_8x8[type][0][0]; VP8_COMBINEENTROPYCONTEXTS(tmp, *a, *l); Prob = coef_probs + tmp * ENTROPY_NODES; while (1) { int val; const uint8_t *cat6 = cat6_prob; if (c == seg_eob) break; Prob += coef_bands[c]; if (!vp8_read(br, Prob[EOB_CONTEXT_NODE])) break; SKIP_START: if (c == seg_eob) break; if (!vp8_read(br, Prob[ZERO_CONTEXT_NODE])) { ++c; Prob = coef_probs + coef_bands[c]; goto SKIP_START; } // ONE_CONTEXT_NODE_0_ if (!vp8_read(br, Prob[ONE_CONTEXT_NODE])) { Prob = coef_probs + ENTROPY_NODES; qcoeff_ptr[scan[c]] = (INT16) vp8_get_signed(br, 1); ++c; continue; } // LOW_VAL_CONTEXT_NODE_0_ if (!vp8_read(br, Prob[LOW_VAL_CONTEXT_NODE])) { if (!vp8_read(br, Prob[TWO_CONTEXT_NODE])) { WRITE_COEF_CONTINUE(2); } if (!vp8_read(br, Prob[THREE_CONTEXT_NODE])) { WRITE_COEF_CONTINUE(3); } WRITE_COEF_CONTINUE(4); } // HIGH_LOW_CONTEXT_NODE_0_ if (!vp8_read(br, Prob[HIGH_LOW_CONTEXT_NODE])) { if (!vp8_read(br, Prob[CAT_ONE_CONTEXT_NODE])) { val = CAT1_MIN_VAL; ADJUST_COEF(CAT1_PROB0, 0); WRITE_COEF_CONTINUE(val); } val = CAT2_MIN_VAL; ADJUST_COEF(CAT2_PROB1, 1); ADJUST_COEF(CAT2_PROB0, 0); WRITE_COEF_CONTINUE(val); } // CAT_THREEFOUR_CONTEXT_NODE_0_ if (!vp8_read(br, Prob[CAT_THREEFOUR_CONTEXT_NODE])) { if (!vp8_read(br, Prob[CAT_THREE_CONTEXT_NODE])) { val = CAT3_MIN_VAL; ADJUST_COEF(CAT3_PROB2, 2); ADJUST_COEF(CAT3_PROB1, 1); ADJUST_COEF(CAT3_PROB0, 0); WRITE_COEF_CONTINUE(val); } val = CAT4_MIN_VAL; ADJUST_COEF(CAT4_PROB3, 3); ADJUST_COEF(CAT4_PROB2, 2); ADJUST_COEF(CAT4_PROB1, 1); ADJUST_COEF(CAT4_PROB0, 0); WRITE_COEF_CONTINUE(val); } // CAT_FIVE_CONTEXT_NODE_0_: if (!vp8_read(br, Prob[CAT_FIVE_CONTEXT_NODE])) { val = CAT5_MIN_VAL; ADJUST_COEF(CAT5_PROB4, 4); ADJUST_COEF(CAT5_PROB3, 3); ADJUST_COEF(CAT5_PROB2, 2); ADJUST_COEF(CAT5_PROB1, 1); ADJUST_COEF(CAT5_PROB0, 0); WRITE_COEF_CONTINUE(val); } val = 0; while (*cat6) { val = (val << 1) | vp8_read(br, *cat6++); } val += CAT6_MIN_VAL; WRITE_COEF_CONTINUE(val); } #if CONFIG_ADAPTIVE_ENTROPY if (block_type == TX_4X4) #if CONFIG_HYBRIDTRANSFORM count_tokens_adaptive_scan(xd, qcoeff_ptr, i, type, a, l, c, seg_eob, fc); #else count_tokens(qcoeff_ptr, i, type, a, l, c, seg_eob, fc); #endif else count_tokens_8x8(qcoeff_ptr, i, type, a, l, c, seg_eob, fc); #endif return c; } int vp8_decode_mb_tokens_8x8(VP8D_COMP *pbi, MACROBLOCKD *xd) { ENTROPY_CONTEXT *const A = (ENTROPY_CONTEXT *)xd->above_context; ENTROPY_CONTEXT *const L = (ENTROPY_CONTEXT *)xd->left_context; char *const eobs = xd->eobs; int c, i, type, eobtotal = 0, seg_eob; const int segment_id = xd->mode_info_context->mbmi.segment_id; const int seg_active = segfeature_active(xd, segment_id, SEG_LVL_EOB); INT16 *qcoeff_ptr = &xd->qcoeff[0]; if (xd->mode_info_context->mbmi.mode != B_PRED && xd->mode_info_context->mbmi.mode != SPLITMV) { ENTROPY_CONTEXT *const a = A + vp8_block2above_8x8[24]; ENTROPY_CONTEXT *const l = L + vp8_block2left_8x8[24]; const int *const scan = vp8_default_zig_zag1d; type = PLANE_TYPE_Y2; if (seg_active) seg_eob = get_segdata(xd, segment_id, SEG_LVL_EOB); else seg_eob = 4; c = vp8_decode_coefs(pbi, xd, a, l, type, seg_eob, qcoeff_ptr + 24 * 16, 24, scan, TX_8X8, coef_bands_x); a[0] = l[0] = ((eobs[24] = c) != !type); eobtotal += c - 4; type = PLANE_TYPE_Y_NO_DC; } else type = PLANE_TYPE_Y_WITH_DC; if (seg_active) seg_eob = get_segdata(xd, segment_id, SEG_LVL_EOB); else seg_eob = 64; for (i = 0; i < 24; i += 4) { ENTROPY_CONTEXT *const a = A + vp8_block2above_8x8[i]; ENTROPY_CONTEXT *const l = L + vp8_block2left_8x8[i]; const int *const scan = vp8_default_zig_zag1d_8x8; if (i == 16) type = PLANE_TYPE_UV; c = vp8_decode_coefs(pbi, xd, a, l, type, seg_eob, qcoeff_ptr, i, scan, TX_8X8, coef_bands_x_8x8); a[0] = l[0] = ((eobs[i] = c) != !type); a[1] = a[0]; l[1] = l[0]; eobtotal += c; qcoeff_ptr += 64; } return eobtotal; } int vp8_decode_mb_tokens(VP8D_COMP *dx, MACROBLOCKD *xd) { ENTROPY_CONTEXT *const A = (ENTROPY_CONTEXT *)xd->above_context; ENTROPY_CONTEXT *const L = (ENTROPY_CONTEXT *)xd->left_context; char *const eobs = xd->eobs; #if CONFIG_HYBRIDTRANSFORM const int *scan = vp8_default_zig_zag1d; int QIndex = xd->q_index; int active_ht = (QIndex < ACTIVE_HT) && (xd->mode_info_context->mbmi.mode == B_PRED); #else const int *const scan = vp8_default_zig_zag1d; #endif int c, i, type, eobtotal = 0, seg_eob = 16; INT16 *qcoeff_ptr = &xd->qcoeff[0]; int segment_id = xd->mode_info_context->mbmi.segment_id; if (segfeature_active(xd, segment_id, SEG_LVL_EOB)) seg_eob = get_segdata(xd, segment_id, SEG_LVL_EOB); if (xd->mode_info_context->mbmi.mode != B_PRED && xd->mode_info_context->mbmi.mode != I8X8_PRED && xd->mode_info_context->mbmi.mode != SPLITMV) { ENTROPY_CONTEXT *const a = A + vp8_block2above[24]; ENTROPY_CONTEXT *const l = L + vp8_block2left[24]; type = PLANE_TYPE_Y2; c = vp8_decode_coefs(dx, xd, a, l, type, seg_eob, qcoeff_ptr + 24 * 16, 24, scan, TX_4X4, coef_bands_x); a[0] = l[0] = ((eobs[24] = c) != !type); eobtotal += c - 16; type = PLANE_TYPE_Y_NO_DC; } else { type = PLANE_TYPE_Y_WITH_DC; } for (i = 0; i < 24; ++i) { ENTROPY_CONTEXT *const a = A + vp8_block2above[i]; ENTROPY_CONTEXT *const l = L + vp8_block2left[i]; if (i == 16) type = PLANE_TYPE_UV; #if CONFIG_HYBRIDTRANSFORM if (type == PLANE_TYPE_Y_WITH_DC && xd->mode_info_context->mbmi.mode == B_PRED && active_ht) { BLOCKD *b = &xd->block[i]; switch(b->bmi.as_mode.first) { case B_TM_PRED : case B_RD_PRED : b->bmi.as_mode.tx_type = ADST_ADST; scan = vp8_default_zig_zag1d; break; case B_VE_PRED : case B_VR_PRED : b->bmi.as_mode.tx_type = ADST_DCT; scan = vp8_row_scan; break ; case B_HE_PRED : case B_HD_PRED : case B_HU_PRED : b->bmi.as_mode.tx_type = DCT_ADST; scan = vp8_col_scan; break; default : b->bmi.as_mode.tx_type = DCT_DCT; scan = vp8_default_zig_zag1d; break; } } if (type == PLANE_TYPE_UV) { scan = vp8_default_zig_zag1d; } #endif c = vp8_decode_coefs(dx, xd, a, l, type, seg_eob, qcoeff_ptr, i, scan, TX_4X4, coef_bands_x); a[0] = l[0] = ((eobs[i] = c) != !type); eobtotal += c; qcoeff_ptr += 16; } return eobtotal; }