1510 lines
43 KiB
C
1510 lines
43 KiB
C
/*
|
|
* 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 <math.h>
|
|
#include <stdio.h>
|
|
#include <string.h>
|
|
#include <assert.h>
|
|
#include "onyx_int.h"
|
|
#include "tokenize.h"
|
|
#include "vpx_mem/vpx_mem.h"
|
|
|
|
#include "vp8/common/pred_common.h"
|
|
#include "vp8/common/seg_common.h"
|
|
|
|
/* Global event counters used for accumulating statistics across several
|
|
compressions, then generating context.c = initial stats. */
|
|
|
|
#ifdef ENTROPY_STATS
|
|
INT64 context_counters[BLOCK_TYPES] [COEF_BANDS] [PREV_COEF_CONTEXTS] [MAX_ENTROPY_TOKENS];
|
|
INT64 context_counters_8x8[BLOCK_TYPES_8X8] [COEF_BANDS] [PREV_COEF_CONTEXTS] [MAX_ENTROPY_TOKENS];
|
|
#if CONFIG_TX16X16
|
|
INT64 context_counters_16x16[BLOCK_TYPES_16X16] [COEF_BANDS] [PREV_COEF_CONTEXTS] [MAX_ENTROPY_TOKENS];
|
|
#endif
|
|
extern unsigned int tree_update_hist[BLOCK_TYPES][COEF_BANDS]
|
|
[PREV_COEF_CONTEXTS][ENTROPY_NODES][2];
|
|
extern unsigned int tree_update_hist_8x8[BLOCK_TYPES_8X8][COEF_BANDS]
|
|
[PREV_COEF_CONTEXTS][ENTROPY_NODES] [2];
|
|
#if CONFIG_TX16X16
|
|
extern unsigned int tree_update_hist_16x16[BLOCK_TYPES_16X16][COEF_BANDS]
|
|
[PREV_COEF_CONTEXTS][ENTROPY_NODES] [2];
|
|
#endif
|
|
#endif
|
|
void vp8_stuff_mb(VP8_COMP *cpi,
|
|
MACROBLOCKD *xd, TOKENEXTRA **t, int dry_run);
|
|
void vp8_stuff_mb_8x8(VP8_COMP *cpi,
|
|
MACROBLOCKD *xd, TOKENEXTRA **t, int dry_run);
|
|
#if CONFIG_TX16X16
|
|
void vp8_stuff_mb_16x16(VP8_COMP *cpi, MACROBLOCKD *xd,
|
|
TOKENEXTRA **t, int dry_run);
|
|
#endif
|
|
void vp8_fix_contexts(MACROBLOCKD *xd);
|
|
|
|
static TOKENVALUE dct_value_tokens[DCT_MAX_VALUE * 2];
|
|
const TOKENVALUE *vp8_dct_value_tokens_ptr;
|
|
static int dct_value_cost[DCT_MAX_VALUE * 2];
|
|
const int *vp8_dct_value_cost_ptr;
|
|
|
|
#ifdef ENC_DEBUG
|
|
extern int mb_row_debug;
|
|
extern int mb_col_debug;
|
|
extern int enc_debug;
|
|
#endif
|
|
|
|
static void fill_value_tokens() {
|
|
|
|
TOKENVALUE *const t = dct_value_tokens + DCT_MAX_VALUE;
|
|
vp8_extra_bit_struct *const e = vp8_extra_bits;
|
|
|
|
int i = -DCT_MAX_VALUE;
|
|
int sign = 1;
|
|
|
|
do {
|
|
if (!i)
|
|
sign = 0;
|
|
|
|
{
|
|
const int a = sign ? -i : i;
|
|
int eb = sign;
|
|
|
|
if (a > 4) {
|
|
int j = 4;
|
|
|
|
while (++j < 11 && e[j].base_val <= a) {}
|
|
|
|
t[i].Token = --j;
|
|
eb |= (a - e[j].base_val) << 1;
|
|
} else
|
|
t[i].Token = a;
|
|
|
|
t[i].Extra = eb;
|
|
}
|
|
|
|
// initialize the cost for extra bits for all possible coefficient value.
|
|
{
|
|
int cost = 0;
|
|
vp8_extra_bit_struct *p = vp8_extra_bits + t[i].Token;
|
|
|
|
if (p->base_val) {
|
|
const int extra = t[i].Extra;
|
|
const int Length = p->Len;
|
|
|
|
if (Length)
|
|
cost += vp8_treed_cost(p->tree, p->prob, extra >> 1, Length);
|
|
|
|
cost += vp8_cost_bit(vp8_prob_half, extra & 1); /* sign */
|
|
dct_value_cost[i + DCT_MAX_VALUE] = cost;
|
|
}
|
|
|
|
}
|
|
|
|
} while (++i < DCT_MAX_VALUE);
|
|
|
|
vp8_dct_value_tokens_ptr = dct_value_tokens + DCT_MAX_VALUE;
|
|
vp8_dct_value_cost_ptr = dct_value_cost + DCT_MAX_VALUE;
|
|
}
|
|
|
|
#if CONFIG_TX16X16
|
|
static void tokenize1st_order_b_16x16(MACROBLOCKD *xd,
|
|
const BLOCKD *const b,
|
|
TOKENEXTRA **tp,
|
|
const int type,
|
|
const FRAME_TYPE frametype,
|
|
ENTROPY_CONTEXT *a,
|
|
ENTROPY_CONTEXT *l,
|
|
VP8_COMP *cpi,
|
|
int dry_run) {
|
|
int pt; /* near block/prev token context index */
|
|
int c = 0; /* start at DC unless type 0 */
|
|
const int eob = b->eob; /* one beyond last nonzero coeff */
|
|
TOKENEXTRA *t = *tp; /* store tokens starting here */
|
|
int x;
|
|
const short *qcoeff_ptr = b->qcoeff;
|
|
|
|
int seg_eob = 256;
|
|
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);
|
|
|
|
VP8_COMBINEENTROPYCONTEXTS(pt, *a, *l);
|
|
|
|
do {
|
|
const int band = vp8_coef_bands_16x16[c];
|
|
int v;
|
|
|
|
x = DCT_EOB_TOKEN;
|
|
if (c < eob) {
|
|
int rc = vp8_default_zig_zag1d_16x16[c];
|
|
v = qcoeff_ptr[rc];
|
|
|
|
assert(-DCT_MAX_VALUE <= v && v < (DCT_MAX_VALUE));
|
|
|
|
t->Extra = vp8_dct_value_tokens_ptr[v].Extra;
|
|
x = vp8_dct_value_tokens_ptr[v].Token;
|
|
}
|
|
|
|
t->Token = x;
|
|
t->context_tree = cpi->common.fc.coef_probs_16x16[type][band][pt];
|
|
|
|
t->skip_eob_node = pt == 0 && ((band > 0 && type > 0) || (band > 1 && type == 0));
|
|
if (!dry_run)
|
|
++cpi->coef_counts_16x16[type][band][pt][x];
|
|
} while (pt = vp8_prev_token_class[x], ++t, c < eob && ++c < seg_eob);
|
|
|
|
*tp = t;
|
|
pt = (c != !type); /* 0 <-> all coeff data is zero */
|
|
*a = *l = pt;
|
|
}
|
|
#endif
|
|
|
|
static void tokenize2nd_order_b_8x8
|
|
(
|
|
MACROBLOCKD *xd,
|
|
const BLOCKD *const b,
|
|
TOKENEXTRA **tp,
|
|
const int type, /* which plane: 0=Y no DC, 1=Y2, 2=UV, 3=Y with DC */
|
|
const FRAME_TYPE frametype,
|
|
ENTROPY_CONTEXT *a,
|
|
ENTROPY_CONTEXT *l,
|
|
VP8_COMP *cpi,
|
|
int dry_run) {
|
|
int pt; /* near block/prev token context index */
|
|
int c = 0; /* start at DC */
|
|
const int eob = b->eob; /* one beyond last nonzero coeff */
|
|
TOKENEXTRA *t = *tp; /* store tokens starting here */
|
|
int x;
|
|
const short *qcoeff_ptr = b->qcoeff;
|
|
|
|
int seg_eob = 4;
|
|
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);
|
|
}
|
|
|
|
VP8_COMBINEENTROPYCONTEXTS(pt, *a, *l);
|
|
|
|
assert(eob <= 4);
|
|
|
|
do {
|
|
const int band = vp8_coef_bands[c];
|
|
int v = 0;
|
|
|
|
if (c < eob) {
|
|
int rc = vp8_default_zig_zag1d[c];
|
|
v = qcoeff_ptr[rc];
|
|
|
|
assert(-DCT_MAX_VALUE <= v && v < (DCT_MAX_VALUE));
|
|
|
|
t->Extra = vp8_dct_value_tokens_ptr[v].Extra;
|
|
x = vp8_dct_value_tokens_ptr[v].Token;
|
|
} else
|
|
x = DCT_EOB_TOKEN;
|
|
|
|
t->Token = x;
|
|
// printf("Token : %d\n", x);
|
|
t->context_tree = cpi->common.fc.coef_probs_8x8 [type] [band] [pt];
|
|
|
|
t->skip_eob_node = pt == 0 && ((band > 0 && type > 0) || (band > 1 && type == 0));
|
|
|
|
#ifdef ENC_DEBUG
|
|
if (t->skip_eob_node && vp8_coef_encodings[x].Len == 1)
|
|
printf("Trouble 2 x=%d Len=%d skip=%d eob=%d c=%d band=%d type=%d: [%d %d %d]\n",
|
|
x, vp8_coef_encodings[x].Len, t->skip_eob_node, eob, c, band, type,
|
|
cpi->count, mb_row_debug, mb_col_debug);
|
|
#endif
|
|
if (!dry_run)
|
|
++cpi->coef_counts_8x8 [type] [band] [pt] [x];
|
|
} while (pt = vp8_prev_token_class[x], ++t, c < eob && ++c < seg_eob);
|
|
|
|
|
|
*tp = t;
|
|
pt = (c != !type); /* 0 <-> all coeff data is zero */
|
|
*a = *l = pt;
|
|
|
|
}
|
|
|
|
static void tokenize2nd_order_b(MACROBLOCKD *xd,
|
|
TOKENEXTRA **tp,
|
|
VP8_COMP *cpi,
|
|
int dry_run) {
|
|
int pt; /* near block/prev token context index */
|
|
int c; /* start at DC */
|
|
TOKENEXTRA *t = *tp;/* store tokens starting here */
|
|
const BLOCKD *b;
|
|
const short *qcoeff_ptr;
|
|
ENTROPY_CONTEXT *a;
|
|
ENTROPY_CONTEXT *l;
|
|
int band, rc, v, token;
|
|
|
|
int seg_eob = 16;
|
|
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);
|
|
|
|
b = xd->block + 24;
|
|
qcoeff_ptr = b->qcoeff;
|
|
a = (ENTROPY_CONTEXT *)xd->above_context + 8;
|
|
l = (ENTROPY_CONTEXT *)xd->left_context + 8;
|
|
|
|
VP8_COMBINEENTROPYCONTEXTS(pt, *a, *l);
|
|
|
|
for (c = 0; c < b->eob; c++) {
|
|
rc = vp8_default_zig_zag1d[c];
|
|
band = vp8_coef_bands[c];
|
|
v = qcoeff_ptr[rc];
|
|
|
|
t->Extra = vp8_dct_value_tokens_ptr[v].Extra;
|
|
token = vp8_dct_value_tokens_ptr[v].Token;
|
|
|
|
t->Token = token;
|
|
t->context_tree = cpi->common.fc.coef_probs [1] [band] [pt];
|
|
|
|
t->skip_eob_node = ((pt == 0) && (band > 0));
|
|
|
|
if (!dry_run)
|
|
++cpi->coef_counts [1] [band] [pt] [token];
|
|
|
|
pt = vp8_prev_token_class[token];
|
|
t++;
|
|
}
|
|
|
|
if (c < seg_eob) {
|
|
band = vp8_coef_bands[c];
|
|
t->Token = DCT_EOB_TOKEN;
|
|
t->context_tree = cpi->common.fc.coef_probs [1] [band] [pt];
|
|
|
|
t->skip_eob_node = ((pt == 0) && (band > 0));
|
|
|
|
if (!dry_run)
|
|
++cpi->coef_counts [1] [band] [pt] [DCT_EOB_TOKEN];
|
|
|
|
t++;
|
|
}
|
|
|
|
|
|
*tp = t;
|
|
pt = (c != 0); /* 0 <-> all coeff data is zero */
|
|
*a = *l = pt;
|
|
|
|
}
|
|
|
|
static void tokenize1st_order_b_8x8
|
|
(
|
|
MACROBLOCKD *xd,
|
|
const BLOCKD *const b,
|
|
TOKENEXTRA **tp,
|
|
const int type, /* which plane: 0=Y no DC, 1=Y2, 2=UV, 3=Y with DC */
|
|
const FRAME_TYPE frametype,
|
|
ENTROPY_CONTEXT *a,
|
|
ENTROPY_CONTEXT *l,
|
|
VP8_COMP *cpi,
|
|
int dry_run) {
|
|
int pt; /* near block/prev token context index */
|
|
int c = type ? 0 : 1; /* start at DC unless type 0 */
|
|
TOKENEXTRA *t = *tp; /* store tokens starting here */
|
|
const short *qcoeff_ptr = b->qcoeff;
|
|
|
|
int seg_eob = 64;
|
|
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);
|
|
|
|
VP8_COMBINEENTROPYCONTEXTS(pt, *a, *l);
|
|
|
|
for (; c < b->eob; ++c) {
|
|
const int band = vp8_coef_bands_8x8[c];
|
|
int rc = vp8_default_zig_zag1d_8x8[c];
|
|
int v = qcoeff_ptr[rc], x;
|
|
|
|
assert(-DCT_MAX_VALUE <= v && v < (DCT_MAX_VALUE));
|
|
|
|
t->Extra = vp8_dct_value_tokens_ptr[v].Extra;
|
|
x = vp8_dct_value_tokens_ptr[v].Token;
|
|
|
|
t->Token = x;
|
|
t->context_tree = cpi->common.fc.coef_probs_8x8[type][band][pt];
|
|
|
|
t->skip_eob_node = pt == 0 && ((band > 0 && type > 0) || (band > 1 && type == 0));
|
|
|
|
if (!dry_run)
|
|
++cpi->coef_counts_8x8[type][band][pt][x];
|
|
|
|
pt = vp8_prev_token_class[x];
|
|
++t;
|
|
}
|
|
|
|
if (c < seg_eob) {
|
|
const int band = vp8_coef_bands_8x8[c];
|
|
t->Token = DCT_EOB_TOKEN;
|
|
|
|
t->context_tree = cpi->common.fc.coef_probs_8x8 [type] [band] [pt];
|
|
t->skip_eob_node = pt == 0 && ((band > 0 && type > 0) || (band > 1 && type == 0));
|
|
|
|
if (!dry_run)
|
|
++cpi->coef_counts_8x8[type][band][pt][DCT_EOB_TOKEN];
|
|
++t;
|
|
}
|
|
|
|
*tp = t;
|
|
pt = (c != !type); /* 0 <-> all coeff data is zero */
|
|
*a = *l = pt;
|
|
}
|
|
|
|
#if CONFIG_HYBRIDTRANSFORM
|
|
static void tokenize1st_order_ht( MACROBLOCKD *xd,
|
|
TOKENEXTRA **tp,
|
|
int type,
|
|
VP8_COMP *cpi,
|
|
int dry_run) {
|
|
unsigned int block;
|
|
const BLOCKD *b;
|
|
int pt; /* near block/prev token context index */
|
|
int c;
|
|
int token;
|
|
TOKENEXTRA *t = *tp;/* store tokens starting here */
|
|
const short *qcoeff_ptr;
|
|
ENTROPY_CONTEXT * a;
|
|
ENTROPY_CONTEXT * l;
|
|
int band, rc, v;
|
|
int tmp1, tmp2;
|
|
|
|
int const *pt_scan ;
|
|
|
|
int seg_eob = 16;
|
|
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 );
|
|
}
|
|
|
|
b = xd->block;
|
|
|
|
/* Luma */
|
|
for (block = 0; block < 16; block++, b++) {
|
|
B_PREDICTION_MODE b_mode;
|
|
|
|
if( xd->mode_info_context->mbmi.mode == B_PRED ) {
|
|
b_mode = b->bmi.as_mode.first;
|
|
}
|
|
|
|
// assign scanning order for luma components coded in intra4x4 mode
|
|
if( (xd->mode_info_context->mbmi.mode == B_PRED) &&
|
|
(type == PLANE_TYPE_Y_WITH_DC) ) {
|
|
switch(b_mode) {
|
|
case B_VE_PRED :
|
|
case B_VR_PRED :
|
|
pt_scan = vp8_row_scan;
|
|
break;
|
|
|
|
case B_HE_PRED :
|
|
case B_HD_PRED :
|
|
case B_HU_PRED :
|
|
pt_scan = vp8_col_scan;
|
|
break;
|
|
|
|
default :
|
|
pt_scan = vp8_default_zig_zag1d;
|
|
break;
|
|
}
|
|
} else {
|
|
pt_scan = vp8_default_zig_zag1d;
|
|
}
|
|
|
|
tmp1 = vp8_block2above[block];
|
|
tmp2 = vp8_block2left[block];
|
|
qcoeff_ptr = b->qcoeff;
|
|
a = (ENTROPY_CONTEXT *)xd->above_context + tmp1;
|
|
l = (ENTROPY_CONTEXT *)xd->left_context + tmp2;
|
|
VP8_COMBINEENTROPYCONTEXTS(pt, *a, *l);
|
|
|
|
c = type ? 0 : 1;
|
|
|
|
for (; c < b->eob; c++) {
|
|
rc = pt_scan[c];
|
|
band = vp8_coef_bands[c];
|
|
v = qcoeff_ptr[rc];
|
|
|
|
t->Extra = vp8_dct_value_tokens_ptr[v].Extra;
|
|
token = vp8_dct_value_tokens_ptr[v].Token;
|
|
|
|
t->Token = token;
|
|
t->context_tree = cpi->common.fc.coef_probs [type] [band] [pt];
|
|
|
|
t->skip_eob_node = pt == 0 &&
|
|
((band > 0 && type > 0) || (band > 1 && type == 0));
|
|
|
|
if (!dry_run)
|
|
++cpi->coef_counts [type] [band] [pt] [token];
|
|
|
|
pt = vp8_prev_token_class[token];
|
|
t++;
|
|
}
|
|
|
|
if (c < seg_eob) {
|
|
band = vp8_coef_bands[c];
|
|
t->Token = DCT_EOB_TOKEN;
|
|
t->context_tree = cpi->common.fc.coef_probs [type] [band] [pt];
|
|
|
|
t->skip_eob_node = pt == 0 &&
|
|
((band > 0 && type > 0) || (band > 1 && type == 0));
|
|
if (!dry_run)
|
|
++cpi->coef_counts [type] [band] [pt] [DCT_EOB_TOKEN];
|
|
|
|
t++;
|
|
}
|
|
|
|
*tp = t;
|
|
pt = (c != !type); /* 0 <-> all coeff data is zero */
|
|
*a = *l = pt;
|
|
}
|
|
|
|
// reset scanning order for chroma components
|
|
pt_scan = vp8_default_zig_zag1d ;
|
|
|
|
/* Chroma */
|
|
for (block = 16; block < 24; block++, b++) {
|
|
tmp1 = vp8_block2above[block];
|
|
tmp2 = vp8_block2left[block];
|
|
qcoeff_ptr = b->qcoeff;
|
|
a = (ENTROPY_CONTEXT *)xd->above_context + tmp1;
|
|
l = (ENTROPY_CONTEXT *)xd->left_context + tmp2;
|
|
|
|
VP8_COMBINEENTROPYCONTEXTS(pt, *a, *l);
|
|
|
|
for (c = 0; c < b->eob; c++) {
|
|
rc = pt_scan[c];
|
|
band = vp8_coef_bands[c];
|
|
v = qcoeff_ptr[rc];
|
|
|
|
t->Extra = vp8_dct_value_tokens_ptr[v].Extra;
|
|
token = vp8_dct_value_tokens_ptr[v].Token;
|
|
|
|
t->Token = token;
|
|
t->context_tree = cpi->common.fc.coef_probs [2] [band] [pt];
|
|
|
|
t->skip_eob_node = ((pt == 0) && (band > 0));
|
|
|
|
if (!dry_run)
|
|
++cpi->coef_counts [2] [band] [pt] [token];
|
|
|
|
pt = vp8_prev_token_class[token];
|
|
t++;
|
|
}
|
|
|
|
if (c < seg_eob) {
|
|
band = vp8_coef_bands[c];
|
|
t->Token = DCT_EOB_TOKEN;
|
|
t->context_tree = cpi->common.fc.coef_probs [2] [band] [pt];
|
|
|
|
t->skip_eob_node = ((pt == 0) && (band > 0));
|
|
if (!dry_run)
|
|
++cpi->coef_counts [2] [band] [pt] [DCT_EOB_TOKEN];
|
|
t++;
|
|
}
|
|
|
|
*tp = t;
|
|
pt = (c != 0); /* 0 <-> all coeff data is zero */
|
|
*a = *l = pt;
|
|
}
|
|
}
|
|
#endif
|
|
|
|
|
|
#if CONFIG_HYBRIDTRANSFORM8X8
|
|
static void tokenize1st_order_chroma
|
|
(
|
|
MACROBLOCKD *xd,
|
|
TOKENEXTRA **tp,
|
|
int type, /* which plane: 0=Y no DC, 1=Y2, 2=UV, 3=Y with DC */
|
|
VP8_COMP *cpi,
|
|
int dry_run) {
|
|
unsigned int block;
|
|
const BLOCKD *b;
|
|
int pt; /* near block/prev token context index */
|
|
int c;
|
|
int token;
|
|
TOKENEXTRA *t = *tp;/* store tokens starting here */
|
|
const short *qcoeff_ptr;
|
|
ENTROPY_CONTEXT *a;
|
|
ENTROPY_CONTEXT *l;
|
|
int band, rc, v;
|
|
int tmp1, tmp2;
|
|
|
|
int seg_eob = 16;
|
|
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);
|
|
}
|
|
|
|
b = xd->block;
|
|
b += 16;
|
|
|
|
/* Chroma */
|
|
for (block = 16; block < 24; block++, b++) {
|
|
tmp1 = vp8_block2above[block];
|
|
tmp2 = vp8_block2left[block];
|
|
qcoeff_ptr = b->qcoeff;
|
|
a = (ENTROPY_CONTEXT *)xd->above_context + tmp1;
|
|
l = (ENTROPY_CONTEXT *)xd->left_context + tmp2;
|
|
|
|
VP8_COMBINEENTROPYCONTEXTS(pt, *a, *l);
|
|
|
|
for (c = 0; c < b->eob; c++) {
|
|
rc = vp8_default_zig_zag1d[c];
|
|
band = vp8_coef_bands[c];
|
|
v = qcoeff_ptr[rc];
|
|
|
|
t->Extra = vp8_dct_value_tokens_ptr[v].Extra;
|
|
token = vp8_dct_value_tokens_ptr[v].Token;
|
|
|
|
t->Token = token;
|
|
t->context_tree = cpi->common.fc.coef_probs [2] [band] [pt];
|
|
|
|
t->skip_eob_node = ((pt == 0) && (band > 0));
|
|
|
|
if (!dry_run)
|
|
++cpi->coef_counts [2] [band] [pt] [token];
|
|
|
|
pt = vp8_prev_token_class[token];
|
|
t++;
|
|
}
|
|
|
|
if (c < seg_eob) {
|
|
band = vp8_coef_bands[c];
|
|
t->Token = DCT_EOB_TOKEN;
|
|
t->context_tree = cpi->common.fc.coef_probs [2] [band] [pt];
|
|
|
|
t->skip_eob_node = ((pt == 0) && (band > 0));
|
|
|
|
if (!dry_run)
|
|
++cpi->coef_counts [2] [band] [pt] [DCT_EOB_TOKEN];
|
|
|
|
t++;
|
|
}
|
|
*tp = t;
|
|
pt = (c != 0); /* 0 <-> all coeff data is zero */
|
|
*a = *l = pt;
|
|
}
|
|
}
|
|
#endif
|
|
|
|
static void tokenize1st_order_b
|
|
(
|
|
MACROBLOCKD *xd,
|
|
TOKENEXTRA **tp,
|
|
int type, /* which plane: 0=Y no DC, 1=Y2, 2=UV, 3=Y with DC */
|
|
VP8_COMP *cpi,
|
|
int dry_run) {
|
|
unsigned int block;
|
|
const BLOCKD *b;
|
|
int pt; /* near block/prev token context index */
|
|
int band, rc, v, c, token;
|
|
TOKENEXTRA *t = *tp;/* store tokens starting here */
|
|
const short *qcoeff_ptr;
|
|
ENTROPY_CONTEXT *a, *l;
|
|
|
|
int seg_eob = 16;
|
|
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);
|
|
}
|
|
|
|
b = xd->block;
|
|
/* Luma */
|
|
for (block = 0; block < 16; block++, b++) {
|
|
qcoeff_ptr = b->qcoeff;
|
|
a = (ENTROPY_CONTEXT *)xd->above_context + vp8_block2above[block];
|
|
l = (ENTROPY_CONTEXT *)xd->left_context + vp8_block2left[block];
|
|
VP8_COMBINEENTROPYCONTEXTS(pt, *a, *l);
|
|
|
|
c = type ? 0 : 1;
|
|
|
|
for (; c < b->eob; c++) {
|
|
rc = vp8_default_zig_zag1d[c];
|
|
band = vp8_coef_bands[c];
|
|
v = qcoeff_ptr[rc];
|
|
|
|
t->Extra = vp8_dct_value_tokens_ptr[v].Extra;
|
|
token = vp8_dct_value_tokens_ptr[v].Token;
|
|
|
|
t->Token = token;
|
|
t->context_tree = cpi->common.fc.coef_probs [type] [band] [pt];
|
|
|
|
t->skip_eob_node = pt == 0 &&
|
|
((band > 0 && type > 0) || (band > 1 && type == 0));
|
|
if (!dry_run)
|
|
++cpi->coef_counts [type] [band] [pt] [token];
|
|
|
|
pt = vp8_prev_token_class[token];
|
|
t++;
|
|
}
|
|
|
|
if (c < seg_eob) {
|
|
band = vp8_coef_bands[c];
|
|
t->Token = DCT_EOB_TOKEN;
|
|
t->context_tree = cpi->common.fc.coef_probs [type] [band] [pt];
|
|
|
|
t->skip_eob_node = pt == 0 &&
|
|
((band > 0 && type > 0) || (band > 1 && type == 0));
|
|
if (!dry_run)
|
|
++cpi->coef_counts [type] [band] [pt] [DCT_EOB_TOKEN];
|
|
|
|
t++;
|
|
}
|
|
*tp = t;
|
|
pt = (c != !type); /* 0 <-> all coeff data is zero */
|
|
*a = *l = pt;
|
|
|
|
}
|
|
/* Chroma */
|
|
for (block = 16; block < 24; block++, b++) {
|
|
qcoeff_ptr = b->qcoeff;
|
|
a = (ENTROPY_CONTEXT *)xd->above_context + vp8_block2above[block];
|
|
l = (ENTROPY_CONTEXT *)xd->left_context + vp8_block2left[block];
|
|
|
|
VP8_COMBINEENTROPYCONTEXTS(pt, *a, *l);
|
|
|
|
for (c = 0; c < b->eob; c++) {
|
|
rc = vp8_default_zig_zag1d[c];
|
|
band = vp8_coef_bands[c];
|
|
v = qcoeff_ptr[rc];
|
|
|
|
t->Extra = vp8_dct_value_tokens_ptr[v].Extra;
|
|
token = vp8_dct_value_tokens_ptr[v].Token;
|
|
|
|
t->Token = token;
|
|
t->context_tree = cpi->common.fc.coef_probs [2] [band] [pt];
|
|
|
|
t->skip_eob_node = ((pt == 0) && (band > 0));
|
|
|
|
if (!dry_run)
|
|
++cpi->coef_counts [2] [band] [pt] [token];
|
|
|
|
pt = vp8_prev_token_class[token];
|
|
t++;
|
|
}
|
|
|
|
if (c < seg_eob) {
|
|
band = vp8_coef_bands[c];
|
|
t->Token = DCT_EOB_TOKEN;
|
|
t->context_tree = cpi->common.fc.coef_probs [2] [band] [pt];
|
|
|
|
t->skip_eob_node = ((pt == 0) && (band > 0));
|
|
|
|
if (!dry_run)
|
|
++cpi->coef_counts [2] [band] [pt] [DCT_EOB_TOKEN];
|
|
|
|
t++;
|
|
}
|
|
*tp = t;
|
|
pt = (c != 0); /* 0 <-> all coeff data is zero */
|
|
*a = *l = pt;
|
|
}
|
|
}
|
|
|
|
|
|
int mby_is_skippable(MACROBLOCKD *xd, int has_y2_block) {
|
|
int skip = 1;
|
|
int i = 0;
|
|
|
|
if (has_y2_block) {
|
|
for (i = 0; i < 16; i++)
|
|
skip &= (xd->block[i].eob < 2);
|
|
skip &= (!xd->block[24].eob);
|
|
} else {
|
|
for (i = 0; i < 16; i++)
|
|
skip &= (!xd->block[i].eob);
|
|
}
|
|
return skip;
|
|
}
|
|
|
|
int mbuv_is_skippable(MACROBLOCKD *xd) {
|
|
int skip = 1;
|
|
int i;
|
|
|
|
for (i = 16; i < 24; i++)
|
|
skip &= (!xd->block[i].eob);
|
|
return skip;
|
|
}
|
|
|
|
int mb_is_skippable(MACROBLOCKD *xd, int has_y2_block) {
|
|
return (mby_is_skippable(xd, has_y2_block) &
|
|
mbuv_is_skippable(xd));
|
|
}
|
|
|
|
int mby_is_skippable_8x8(MACROBLOCKD *xd) {
|
|
int skip = 1;
|
|
int i = 0;
|
|
|
|
for (i = 0; i < 16; i += 4)
|
|
skip &= (xd->block[i].eob < 2);
|
|
skip &= (!xd->block[24].eob);
|
|
return skip;
|
|
}
|
|
|
|
int mbuv_is_skippable_8x8(MACROBLOCKD *xd) {
|
|
return (!xd->block[16].eob) & (!xd->block[20].eob);
|
|
}
|
|
|
|
int mb_is_skippable_8x8(MACROBLOCKD *xd) {
|
|
return (mby_is_skippable_8x8(xd) & mbuv_is_skippable_8x8(xd));
|
|
}
|
|
|
|
#if CONFIG_TX16X16
|
|
int mby_is_skippable_16x16(MACROBLOCKD *xd) {
|
|
int skip = 1;
|
|
//skip &= (xd->block[0].eob < 2); // I think this should be commented? No second order == DC must be coded
|
|
//skip &= (xd->block[0].eob < 1);
|
|
//skip &= (!xd->block[24].eob);
|
|
skip &= !xd->block[0].eob;
|
|
return skip;
|
|
}
|
|
|
|
int mb_is_skippable_16x16(MACROBLOCKD *xd) {
|
|
return (mby_is_skippable_16x16(xd) & mbuv_is_skippable_8x8(xd));
|
|
}
|
|
#endif
|
|
|
|
void vp8_tokenize_mb(VP8_COMP *cpi,
|
|
MACROBLOCKD *xd,
|
|
TOKENEXTRA **t,
|
|
int dry_run) {
|
|
int plane_type;
|
|
int has_y2_block;
|
|
int b;
|
|
int tx_type = xd->mode_info_context->mbmi.txfm_size;
|
|
int mb_skip_context = get_pred_context(&cpi->common, xd, PRED_MBSKIP);
|
|
TOKENEXTRA *t_backup = *t;
|
|
|
|
// If the MB is going to be skipped because of a segment level flag
|
|
// exclude this from the skip count stats used to calculate the
|
|
// transmitted skip probability;
|
|
int skip_inc;
|
|
int segment_id = xd->mode_info_context->mbmi.segment_id;
|
|
|
|
#if CONFIG_HYBRIDTRANSFORM
|
|
int QIndex = cpi->mb.q_index;
|
|
int active_ht = (QIndex < ACTIVE_HT) &&
|
|
(xd->mode_info_context->mbmi.mode == B_PRED);
|
|
#endif
|
|
|
|
if (!segfeature_active(xd, segment_id, SEG_LVL_EOB) ||
|
|
(get_segdata(xd, segment_id, SEG_LVL_EOB) != 0)) {
|
|
skip_inc = 1;
|
|
} else
|
|
skip_inc = 0;
|
|
|
|
has_y2_block = (xd->mode_info_context->mbmi.mode != B_PRED
|
|
&& xd->mode_info_context->mbmi.mode != I8X8_PRED
|
|
&& xd->mode_info_context->mbmi.mode != SPLITMV);
|
|
#if CONFIG_TX16X16
|
|
if (tx_type == TX_16X16) has_y2_block = 0; // Because of inter frames
|
|
#endif
|
|
|
|
switch (tx_type) {
|
|
#if CONFIG_TX16X16
|
|
case TX_16X16:
|
|
xd->mode_info_context->mbmi.mb_skip_coeff = mb_is_skippable_16x16(xd);
|
|
break;
|
|
#endif
|
|
case TX_8X8:
|
|
xd->mode_info_context->mbmi.mb_skip_coeff = mb_is_skippable_8x8(xd);
|
|
break;
|
|
default:
|
|
xd->mode_info_context->mbmi.mb_skip_coeff = mb_is_skippable(xd, has_y2_block);
|
|
break;
|
|
}
|
|
|
|
if (xd->mode_info_context->mbmi.mb_skip_coeff) {
|
|
if (!dry_run)
|
|
cpi->skip_true_count[mb_skip_context] += skip_inc;
|
|
if (!cpi->common.mb_no_coeff_skip) {
|
|
#if CONFIG_TX16X16
|
|
if (tx_type == TX_16X16)
|
|
vp8_stuff_mb_16x16(cpi, xd, t, dry_run);
|
|
else
|
|
#endif
|
|
if (tx_type == TX_8X8)
|
|
vp8_stuff_mb_8x8(cpi, xd, t, dry_run);
|
|
else
|
|
vp8_stuff_mb(cpi, xd, t, dry_run);
|
|
} else {
|
|
vp8_fix_contexts(xd);
|
|
}
|
|
if (dry_run)
|
|
*t = t_backup;
|
|
return;
|
|
}
|
|
|
|
if (!dry_run)
|
|
cpi->skip_false_count[mb_skip_context] += skip_inc;
|
|
|
|
plane_type = 3;
|
|
if (has_y2_block) {
|
|
if (tx_type == TX_8X8) {
|
|
ENTROPY_CONTEXT *A = (ENTROPY_CONTEXT *)xd->above_context;
|
|
ENTROPY_CONTEXT *L = (ENTROPY_CONTEXT *)xd->left_context;
|
|
tokenize2nd_order_b_8x8(xd,
|
|
xd->block + 24, t, 1, xd->frame_type,
|
|
A + vp8_block2above_8x8[24],
|
|
L + vp8_block2left_8x8[24],
|
|
cpi, dry_run);
|
|
} else
|
|
tokenize2nd_order_b(xd, t, cpi, dry_run);
|
|
|
|
plane_type = 0;
|
|
}
|
|
|
|
#if CONFIG_TX16X16
|
|
if (tx_type == TX_16X16) {
|
|
ENTROPY_CONTEXT * A = (ENTROPY_CONTEXT *)xd->above_context;
|
|
ENTROPY_CONTEXT * L = (ENTROPY_CONTEXT *)xd->left_context;
|
|
tokenize1st_order_b_16x16(xd, xd->block, t, 3,
|
|
xd->frame_type, A, L, cpi, dry_run);
|
|
for (b = 1; b < 16; b++) {
|
|
*(A + vp8_block2above[b]) = *(A);
|
|
*(L + vp8_block2left[b] ) = *(L);
|
|
}
|
|
for (b = 16; b < 24; b += 4) {
|
|
tokenize1st_order_b_8x8(xd, xd->block + b, t, 2, xd->frame_type,
|
|
A + vp8_block2above_8x8[b], L + vp8_block2left_8x8[b], cpi, dry_run);
|
|
*(A + vp8_block2above_8x8[b]+1) = *(A + vp8_block2above_8x8[b]);
|
|
*(L + vp8_block2left_8x8[b]+1 ) = *(L + vp8_block2left_8x8[b]);
|
|
}
|
|
vpx_memset(&A[8], 0, sizeof(A[8]));
|
|
vpx_memset(&L[8], 0, sizeof(L[8]));
|
|
}
|
|
else
|
|
#endif
|
|
if (tx_type == TX_8X8) {
|
|
ENTROPY_CONTEXT *A = (ENTROPY_CONTEXT *)xd->above_context;
|
|
ENTROPY_CONTEXT *L = (ENTROPY_CONTEXT *)xd->left_context;
|
|
for (b = 0; b < 16; b += 4) {
|
|
tokenize1st_order_b_8x8(xd,
|
|
xd->block + b, t, plane_type, xd->frame_type,
|
|
A + vp8_block2above_8x8[b],
|
|
L + vp8_block2left_8x8[b],
|
|
cpi, dry_run);
|
|
*(A + vp8_block2above_8x8[b] + 1) = *(A + vp8_block2above_8x8[b]);
|
|
*(L + vp8_block2left_8x8[b] + 1) = *(L + vp8_block2left_8x8[b]);
|
|
}
|
|
for (b = 16; b < 24; b += 4) {
|
|
tokenize1st_order_b_8x8(xd,
|
|
xd->block + b, t, 2, xd->frame_type,
|
|
A + vp8_block2above_8x8[b],
|
|
L + vp8_block2left_8x8[b],
|
|
cpi, dry_run);
|
|
*(A + vp8_block2above_8x8[b] + 1) = *(A + vp8_block2above_8x8[b]);
|
|
*(L + vp8_block2left_8x8[b] + 1) = *(L + vp8_block2left_8x8[b]);
|
|
}
|
|
} else {
|
|
#if CONFIG_HYBRIDTRANSFORM
|
|
if(active_ht) {
|
|
tokenize1st_order_ht(xd, t, plane_type, cpi, dry_run);
|
|
} else {
|
|
|
|
#if CONFIG_HYBRIDTRANSFORM8X8
|
|
if (xd->mode_info_context->mbmi.mode == I8X8_PRED) {
|
|
ENTROPY_CONTEXT *A = (ENTROPY_CONTEXT *)xd->above_context;
|
|
ENTROPY_CONTEXT *L = (ENTROPY_CONTEXT *)xd->left_context;
|
|
for (b = 0; b < 16; b += 4) {
|
|
tokenize1st_order_b_8x8(xd,
|
|
xd->block + b, t, PLANE_TYPE_Y_WITH_DC,
|
|
xd->frame_type,
|
|
A + vp8_block2above_8x8[b],
|
|
L + vp8_block2left_8x8[b],
|
|
cpi, dry_run);
|
|
*(A + vp8_block2above_8x8[b] + 1) = *(A + vp8_block2above_8x8[b]);
|
|
*(L + vp8_block2left_8x8[b] + 1) = *(L + vp8_block2left_8x8[b]);
|
|
}
|
|
tokenize1st_order_chroma(xd, t, PLANE_TYPE_UV, cpi, dry_run);
|
|
} else {
|
|
tokenize1st_order_b(xd, t, plane_type, cpi, dry_run);
|
|
}
|
|
#else
|
|
tokenize1st_order_b(xd, t, plane_type, cpi, dry_run);
|
|
#endif
|
|
|
|
}
|
|
#else
|
|
tokenize1st_order_b(xd, t, plane_type, cpi, dry_run);
|
|
#endif
|
|
}
|
|
if (dry_run)
|
|
*t = t_backup;
|
|
}
|
|
|
|
|
|
#ifdef ENTROPY_STATS
|
|
void init_context_counters(void) {
|
|
FILE *f = fopen("context.bin", "rb");
|
|
if (!f) {
|
|
vpx_memset(context_counters, 0, sizeof(context_counters));
|
|
vpx_memset(context_counters_8x8, 0, sizeof(context_counters_8x8));
|
|
#if CONFIG_TX16X16
|
|
vpx_memset(context_counters_16x16, 0, sizeof(context_counters_16x16));
|
|
#endif
|
|
} else {
|
|
fread(context_counters, sizeof(context_counters), 1, f);
|
|
fread(context_counters_8x8, sizeof(context_counters_8x8), 1, f);
|
|
#if CONFIG_TX16X16
|
|
fread(context_counters_16x16, sizeof(context_counters_16x16), 1, f);
|
|
#endif
|
|
fclose(f);
|
|
}
|
|
|
|
f = fopen("treeupdate.bin", "rb");
|
|
if (!f) {
|
|
vpx_memset(tree_update_hist, 0, sizeof(tree_update_hist));
|
|
vpx_memset(tree_update_hist_8x8, 0, sizeof(tree_update_hist_8x8));
|
|
#if CONFIG_TX16X16
|
|
vpx_memset(tree_update_hist_16x16, 0, sizeof(tree_update_hist_16x16));
|
|
#endif
|
|
} else {
|
|
fread(tree_update_hist, sizeof(tree_update_hist), 1, f);
|
|
fread(tree_update_hist_8x8, sizeof(tree_update_hist_8x8), 1, f);
|
|
#if CONFIG_TX16X16
|
|
fread(tree_update_hist_16x16, sizeof(tree_update_hist_16x16), 1, f);
|
|
#endif
|
|
fclose(f);
|
|
}
|
|
}
|
|
|
|
void print_context_counters() {
|
|
int type, band, pt, t;
|
|
FILE *f = fopen("context.c", "w");
|
|
|
|
fprintf(f, "#include \"entropy.h\"\n");
|
|
fprintf(f, "\n/* *** GENERATED FILE: DO NOT EDIT *** */\n\n");
|
|
fprintf(f, "static const unsigned int\n"
|
|
"vp8_default_coef_counts[BLOCK_TYPES]\n"
|
|
" [COEF_BANDS]\n"
|
|
" [PREV_COEF_CONTEXTS]\n"
|
|
" [MAX_ENTROPY_TOKENS]={\n");
|
|
|
|
# define Comma( X) (X? ",":"")
|
|
type = 0;
|
|
do {
|
|
fprintf(f, "%s\n { /* block Type %d */", Comma(type), type);
|
|
band = 0;
|
|
do {
|
|
fprintf(f, "%s\n { /* Coeff Band %d */", Comma(band), band);
|
|
pt = 0;
|
|
do {
|
|
fprintf(f, "%s\n {", Comma(pt));
|
|
|
|
t = 0;
|
|
do {
|
|
const INT64 x = context_counters [type] [band] [pt] [t];
|
|
const int y = (int) x;
|
|
assert(x == (INT64) y); /* no overflow handling yet */
|
|
fprintf(f, "%s %d", Comma(t), y);
|
|
} while (++t < MAX_ENTROPY_TOKENS);
|
|
fprintf(f, "}");
|
|
} while (++pt < PREV_COEF_CONTEXTS);
|
|
fprintf(f, "\n }");
|
|
} while (++band < COEF_BANDS);
|
|
fprintf(f, "\n }");
|
|
} while (++type < BLOCK_TYPES);
|
|
fprintf(f, "\n};\n");
|
|
|
|
fprintf(f, "static const unsigned int\nvp8_default_coef_counts_8x8"
|
|
"[BLOCK_TYPES_8X8] [COEF_BANDS]"
|
|
"[PREV_COEF_CONTEXTS] [MAX_ENTROPY_TOKENS] = {");
|
|
type = 0;
|
|
do {
|
|
fprintf(f, "%s\n { /* block Type %d */", Comma(type), type);
|
|
band = 0;
|
|
do {
|
|
fprintf(f, "%s\n { /* Coeff Band %d */", Comma(band), band);
|
|
pt = 0;
|
|
do {
|
|
fprintf(f, "%s\n {", Comma(pt));
|
|
t = 0;
|
|
do {
|
|
const INT64 x = context_counters_8x8 [type] [band] [pt] [t];
|
|
const int y = (int) x;
|
|
|
|
assert(x == (INT64) y); /* no overflow handling yet */
|
|
fprintf(f, "%s %d", Comma(t), y);
|
|
|
|
} while (++t < MAX_ENTROPY_TOKENS);
|
|
|
|
fprintf(f, "}");
|
|
} while (++pt < PREV_COEF_CONTEXTS);
|
|
|
|
fprintf(f, "\n }");
|
|
|
|
} while (++band < COEF_BANDS);
|
|
|
|
fprintf(f, "\n }");
|
|
} while (++type < BLOCK_TYPES_8X8);
|
|
fprintf(f, "\n};\n");
|
|
|
|
#if CONFIG_TX16X16
|
|
fprintf(f, "static const unsigned int\nvp8_default_coef_counts_16x16"
|
|
"[BLOCK_TYPES_16X16] [COEF_BANDS]"
|
|
"[PREV_COEF_CONTEXTS] [MAX_ENTROPY_TOKENS] = {");
|
|
type = 0;
|
|
do {
|
|
fprintf(f, "%s\n { /* block Type %d */", Comma(type), type);
|
|
band = 0;
|
|
do {
|
|
fprintf(f, "%s\n { /* Coeff Band %d */", Comma(band), band);
|
|
pt = 0;
|
|
do {
|
|
fprintf(f, "%s\n {", Comma(pt));
|
|
t = 0;
|
|
do {
|
|
const INT64 x = context_counters_16x16 [type] [band] [pt] [t];
|
|
const int y = (int) x;
|
|
|
|
assert(x == (INT64) y); /* no overflow handling yet */
|
|
fprintf(f, "%s %d", Comma(t), y);
|
|
|
|
} while (++t < MAX_ENTROPY_TOKENS);
|
|
|
|
fprintf(f, "}");
|
|
} while (++pt < PREV_COEF_CONTEXTS);
|
|
|
|
fprintf(f, "\n }");
|
|
|
|
} while (++band < COEF_BANDS);
|
|
|
|
fprintf(f, "\n }");
|
|
} while (++type < BLOCK_TYPES_16X16);
|
|
fprintf(f, "\n};\n");
|
|
#endif
|
|
|
|
fprintf(f, "static const vp8_prob\n"
|
|
"vp8_default_coef_probs[BLOCK_TYPES] [COEF_BANDS] \n"
|
|
"[PREV_COEF_CONTEXTS] [ENTROPY_NODES] = {");
|
|
type = 0;
|
|
do {
|
|
fprintf(f, "%s\n { /* block Type %d */", Comma(type), type);
|
|
band = 0;
|
|
do {
|
|
fprintf(f, "%s\n { /* Coeff Band %d */", Comma(band), band);
|
|
pt = 0;
|
|
do {
|
|
unsigned int branch_ct [ENTROPY_NODES] [2];
|
|
unsigned int coef_counts[MAX_ENTROPY_TOKENS];
|
|
vp8_prob coef_probs[ENTROPY_NODES];
|
|
for (t = 0; t < MAX_ENTROPY_TOKENS; ++t)
|
|
coef_counts[t] = context_counters [type] [band] [pt] [t];
|
|
vp8_tree_probs_from_distribution(
|
|
MAX_ENTROPY_TOKENS, vp8_coef_encodings, vp8_coef_tree,
|
|
coef_probs, branch_ct, coef_counts, 256, 1);
|
|
fprintf(f, "%s\n {", Comma(pt));
|
|
|
|
t = 0;
|
|
do {
|
|
fprintf(f, "%s %d", Comma(t), coef_probs[t]);
|
|
|
|
} while (++t < ENTROPY_NODES);
|
|
|
|
fprintf(f, "}");
|
|
} while (++pt < PREV_COEF_CONTEXTS);
|
|
fprintf(f, "\n }");
|
|
} while (++band < COEF_BANDS);
|
|
fprintf(f, "\n }");
|
|
} while (++type < BLOCK_TYPES);
|
|
fprintf(f, "\n};\n");
|
|
|
|
fprintf(f, "static const vp8_prob\n"
|
|
"vp8_default_coef_probs_8x8[BLOCK_TYPES_8X8] [COEF_BANDS]\n"
|
|
"[PREV_COEF_CONTEXTS] [ENTROPY_NODES] = {");
|
|
type = 0;
|
|
do {
|
|
fprintf(f, "%s\n { /* block Type %d */", Comma(type), type);
|
|
band = 0;
|
|
do {
|
|
fprintf(f, "%s\n { /* Coeff Band %d */", Comma(band), band);
|
|
pt = 0;
|
|
do {
|
|
unsigned int branch_ct [ENTROPY_NODES] [2];
|
|
unsigned int coef_counts[MAX_ENTROPY_TOKENS];
|
|
vp8_prob coef_probs[ENTROPY_NODES];
|
|
for (t = 0; t < MAX_ENTROPY_TOKENS; ++t)
|
|
coef_counts[t] = context_counters_8x8[type] [band] [pt] [t];
|
|
vp8_tree_probs_from_distribution(
|
|
MAX_ENTROPY_TOKENS, vp8_coef_encodings, vp8_coef_tree,
|
|
coef_probs, branch_ct, coef_counts, 256, 1);
|
|
fprintf(f, "%s\n {", Comma(pt));
|
|
|
|
t = 0;
|
|
do {
|
|
fprintf(f, "%s %d", Comma(t), coef_probs[t]);
|
|
} while (++t < ENTROPY_NODES);
|
|
fprintf(f, "}");
|
|
} while (++pt < PREV_COEF_CONTEXTS);
|
|
fprintf(f, "\n }");
|
|
} while (++band < COEF_BANDS);
|
|
fprintf(f, "\n }");
|
|
} while (++type < BLOCK_TYPES_8X8);
|
|
fprintf(f, "\n};\n");
|
|
|
|
#if CONFIG_TX16X16
|
|
fprintf(f, "static const vp8_prob\n"
|
|
"vp8_default_coef_probs_16x16[BLOCK_TYPES_16X16] [COEF_BANDS]\n"
|
|
"[PREV_COEF_CONTEXTS] [ENTROPY_NODES] = {");
|
|
type = 0;
|
|
do {
|
|
fprintf(f, "%s\n { /* block Type %d */", Comma(type), type);
|
|
band = 0;
|
|
do {
|
|
fprintf(f, "%s\n { /* Coeff Band %d */", Comma(band), band);
|
|
pt = 0;
|
|
do {
|
|
unsigned int branch_ct [ENTROPY_NODES] [2];
|
|
unsigned int coef_counts[MAX_ENTROPY_TOKENS];
|
|
vp8_prob coef_probs[ENTROPY_NODES];
|
|
for (t = 0; t < MAX_ENTROPY_TOKENS; ++t)
|
|
coef_counts[t] = context_counters_16x16[type] [band] [pt] [t];
|
|
vp8_tree_probs_from_distribution(
|
|
MAX_ENTROPY_TOKENS, vp8_coef_encodings, vp8_coef_tree,
|
|
coef_probs, branch_ct, coef_counts, 256, 1);
|
|
fprintf(f, "%s\n {", Comma(pt));
|
|
|
|
t = 0;
|
|
do {
|
|
fprintf(f, "%s %d", Comma(t), coef_probs[t]);
|
|
} while (++t < ENTROPY_NODES);
|
|
fprintf(f, "}");
|
|
} while (++pt < PREV_COEF_CONTEXTS);
|
|
fprintf(f, "\n }");
|
|
} while (++band < COEF_BANDS);
|
|
fprintf(f, "\n }");
|
|
} while (++type < BLOCK_TYPES_16X16);
|
|
fprintf(f, "\n};\n");
|
|
#endif
|
|
|
|
fclose(f);
|
|
|
|
f = fopen("context.bin", "wb");
|
|
fwrite(context_counters, sizeof(context_counters), 1, f);
|
|
fwrite(context_counters_8x8, sizeof(context_counters_8x8), 1, f);
|
|
#if CONFIG_TX16X16
|
|
fwrite(context_counters_16x16, sizeof(context_counters_16x16), 1, f);
|
|
#endif
|
|
fclose(f);
|
|
}
|
|
#endif
|
|
|
|
|
|
void vp8_tokenize_initialize() {
|
|
fill_value_tokens();
|
|
}
|
|
|
|
|
|
static __inline void stuff2nd_order_b_8x8(
|
|
const BLOCKD *const b,
|
|
TOKENEXTRA **tp,
|
|
const int type, /* which plane: 0=Y no DC, 1=Y2, 2=UV, 3=Y with DC */
|
|
const FRAME_TYPE frametype,
|
|
ENTROPY_CONTEXT *a,
|
|
ENTROPY_CONTEXT *l,
|
|
VP8_COMP *cpi,
|
|
int dry_run) {
|
|
int pt; /* near block/prev token context index */
|
|
TOKENEXTRA *t = *tp; /* store tokens starting here */
|
|
VP8_COMBINEENTROPYCONTEXTS(pt, *a, *l);
|
|
(void) frametype;
|
|
(void) type;
|
|
(void) b;
|
|
|
|
t->Token = DCT_EOB_TOKEN;
|
|
t->context_tree = cpi->common.fc.coef_probs_8x8 [1] [0] [pt];
|
|
// t->section = 11;
|
|
t->skip_eob_node = 0;
|
|
++t;
|
|
|
|
*tp = t;
|
|
if (!dry_run)
|
|
++cpi->coef_counts_8x8 [1] [0] [pt] [DCT_EOB_TOKEN];
|
|
pt = 0;
|
|
*a = *l = pt;
|
|
|
|
}
|
|
|
|
static __inline void stuff1st_order_b_8x8
|
|
(
|
|
const BLOCKD *const b,
|
|
TOKENEXTRA **tp,
|
|
const int type, /* which plane: 0=Y no DC, 1=Y2, 2=UV, 3=Y with DC */
|
|
const FRAME_TYPE frametype,
|
|
ENTROPY_CONTEXT *a,
|
|
ENTROPY_CONTEXT *l,
|
|
VP8_COMP *cpi,
|
|
int dry_run) {
|
|
int pt; /* near block/prev token context index */
|
|
TOKENEXTRA *t = *tp; /* store tokens starting here */
|
|
VP8_COMBINEENTROPYCONTEXTS(pt, *a, *l);
|
|
(void) frametype;
|
|
(void) type;
|
|
(void) b;
|
|
|
|
t->Token = DCT_EOB_TOKEN;
|
|
t->context_tree = cpi->common.fc.coef_probs_8x8 [0] [1] [pt];
|
|
// t->section = 8;
|
|
t->skip_eob_node = 0;
|
|
++t;
|
|
*tp = t;
|
|
if (!dry_run)
|
|
++cpi->coef_counts_8x8[0] [1] [pt] [DCT_EOB_TOKEN];
|
|
pt = 0; /* 0 <-> all coeff data is zero */
|
|
*a = *l = pt;
|
|
|
|
|
|
}
|
|
|
|
static __inline
|
|
void stuff1st_order_buv_8x8
|
|
(
|
|
const BLOCKD *const b,
|
|
TOKENEXTRA **tp,
|
|
const int type, /* which plane: 0=Y no DC, 1=Y2, 2=UV, 3=Y with DC */
|
|
const FRAME_TYPE frametype,
|
|
ENTROPY_CONTEXT *a,
|
|
ENTROPY_CONTEXT *l,
|
|
VP8_COMP *cpi,
|
|
int dry_run) {
|
|
int pt; /* near block/prev token context index */
|
|
TOKENEXTRA *t = *tp; /* store tokens starting here */
|
|
VP8_COMBINEENTROPYCONTEXTS(pt, *a, *l);
|
|
(void) frametype;
|
|
(void) type;
|
|
(void) b;
|
|
|
|
t->Token = DCT_EOB_TOKEN;
|
|
t->context_tree = cpi->common.fc.coef_probs_8x8 [2] [0] [pt];
|
|
// t->section = 13;
|
|
t->skip_eob_node = 0;
|
|
++t;
|
|
*tp = t;
|
|
if (!dry_run)
|
|
++cpi->coef_counts_8x8[2] [0] [pt] [DCT_EOB_TOKEN];
|
|
pt = 0; /* 0 <-> all coeff data is zero */
|
|
*a = *l = pt;
|
|
|
|
}
|
|
|
|
void vp8_stuff_mb_8x8(VP8_COMP *cpi,
|
|
MACROBLOCKD *xd,
|
|
TOKENEXTRA **t,
|
|
int dry_run) {
|
|
ENTROPY_CONTEXT *A = (ENTROPY_CONTEXT *)xd->above_context;
|
|
ENTROPY_CONTEXT *L = (ENTROPY_CONTEXT *)xd->left_context;
|
|
int plane_type;
|
|
int b;
|
|
TOKENEXTRA *t_backup = *t;
|
|
|
|
stuff2nd_order_b_8x8(xd->block + 24, t, 1, xd->frame_type,
|
|
A + vp8_block2above_8x8[24],
|
|
L + vp8_block2left_8x8[24], cpi, dry_run);
|
|
plane_type = 0;
|
|
|
|
for (b = 0; b < 16; b += 4) {
|
|
stuff1st_order_b_8x8(xd->block + b, t, plane_type, xd->frame_type,
|
|
A + vp8_block2above_8x8[b],
|
|
L + vp8_block2left_8x8[b],
|
|
cpi, dry_run);
|
|
*(A + vp8_block2above_8x8[b] + 1) = *(A + vp8_block2above_8x8[b]);
|
|
*(L + vp8_block2left_8x8[b] + 1) = *(L + vp8_block2left_8x8[b]);
|
|
}
|
|
|
|
for (b = 16; b < 24; b += 4) {
|
|
stuff1st_order_buv_8x8(xd->block + b, t, 2, xd->frame_type,
|
|
A + vp8_block2above[b],
|
|
L + vp8_block2left[b],
|
|
cpi, dry_run);
|
|
*(A + vp8_block2above_8x8[b] + 1) = *(A + vp8_block2above_8x8[b]);
|
|
*(L + vp8_block2left_8x8[b] + 1) = *(L + vp8_block2left_8x8[b]);
|
|
}
|
|
if (dry_run)
|
|
*t = t_backup;
|
|
}
|
|
|
|
|
|
#if CONFIG_TX16X16
|
|
static __inline
|
|
void stuff1st_order_b_16x16(const BLOCKD *const b,
|
|
TOKENEXTRA **tp,
|
|
const FRAME_TYPE frametype,
|
|
ENTROPY_CONTEXT *a,
|
|
ENTROPY_CONTEXT *l,
|
|
VP8_COMP *cpi,
|
|
int dry_run){
|
|
int pt; /* near block/prev token context index */
|
|
TOKENEXTRA *t = *tp; /* store tokens starting here */
|
|
VP8_COMBINEENTROPYCONTEXTS(pt, *a, *l);
|
|
(void) frametype;
|
|
(void) b;
|
|
|
|
t->Token = DCT_EOB_TOKEN;
|
|
t->context_tree = cpi->common.fc.coef_probs_16x16[3][1][pt];
|
|
t->skip_eob_node = 0;
|
|
++t;
|
|
*tp = t;
|
|
if (!dry_run)
|
|
++cpi->coef_counts_16x16[3][1][pt][DCT_EOB_TOKEN];
|
|
pt = 0; /* 0 <-> all coeff data is zero */
|
|
*a = *l = pt;
|
|
}
|
|
|
|
void vp8_stuff_mb_16x16(VP8_COMP *cpi,
|
|
MACROBLOCKD *xd,
|
|
TOKENEXTRA **t,
|
|
int dry_run) {
|
|
ENTROPY_CONTEXT * A = (ENTROPY_CONTEXT *)xd->above_context;
|
|
ENTROPY_CONTEXT * L = (ENTROPY_CONTEXT *)xd->left_context;
|
|
int b, i;
|
|
TOKENEXTRA *t_backup = *t;
|
|
|
|
stuff1st_order_b_16x16(xd->block, t, xd->frame_type, A, L, cpi, dry_run);
|
|
for (i = 1; i < 16; i++) {
|
|
*(A + vp8_block2above[i]) = *(A);
|
|
*(L + vp8_block2left[i]) = *(L);
|
|
}
|
|
for (b = 16; b < 24; b += 4) {
|
|
stuff1st_order_buv_8x8(xd->block + b, t, 2, xd->frame_type,
|
|
A + vp8_block2above[b],
|
|
L + vp8_block2left[b],
|
|
cpi, dry_run);
|
|
*(A + vp8_block2above_8x8[b]+1) = *(A + vp8_block2above_8x8[b]);
|
|
*(L + vp8_block2left_8x8[b]+1 ) = *(L + vp8_block2left_8x8[b]);
|
|
}
|
|
vpx_memset(&A[8], 0, sizeof(A[8]));
|
|
vpx_memset(&L[8], 0, sizeof(L[8]));
|
|
if (dry_run)
|
|
*t = t_backup;
|
|
}
|
|
#endif
|
|
|
|
static __inline void stuff2nd_order_b
|
|
(
|
|
TOKENEXTRA **tp,
|
|
ENTROPY_CONTEXT *a,
|
|
ENTROPY_CONTEXT *l,
|
|
VP8_COMP *cpi,
|
|
int dry_run) {
|
|
int pt; /* near block/prev token context index */
|
|
TOKENEXTRA *t = *tp; /* store tokens starting here */
|
|
VP8_COMBINEENTROPYCONTEXTS(pt, *a, *l);
|
|
|
|
t->Token = DCT_EOB_TOKEN;
|
|
t->context_tree = cpi->common.fc.coef_probs [1] [0] [pt];
|
|
t->skip_eob_node = 0;
|
|
++t;
|
|
*tp = t;
|
|
if (!dry_run)
|
|
++cpi->coef_counts [1] [0] [pt] [DCT_EOB_TOKEN];
|
|
|
|
pt = 0;
|
|
*a = *l = pt;
|
|
|
|
}
|
|
|
|
static __inline void stuff1st_order_b(TOKENEXTRA **tp,
|
|
ENTROPY_CONTEXT *a,
|
|
ENTROPY_CONTEXT *l,
|
|
VP8_COMP *cpi,
|
|
int dry_run) {
|
|
int pt; /* near block/prev token context index */
|
|
TOKENEXTRA *t = *tp; /* store tokens starting here */
|
|
VP8_COMBINEENTROPYCONTEXTS(pt, *a, *l);
|
|
|
|
t->Token = DCT_EOB_TOKEN;
|
|
t->context_tree = cpi->common.fc.coef_probs [0] [1] [pt];
|
|
t->skip_eob_node = 0;
|
|
++t;
|
|
*tp = t;
|
|
if (!dry_run)
|
|
++cpi->coef_counts[0] [1] [pt] [DCT_EOB_TOKEN];
|
|
pt = 0; /* 0 <-> all coeff data is zero */
|
|
*a = *l = pt;
|
|
|
|
}
|
|
static __inline
|
|
void stuff1st_order_buv
|
|
(
|
|
TOKENEXTRA **tp,
|
|
ENTROPY_CONTEXT *a,
|
|
ENTROPY_CONTEXT *l,
|
|
VP8_COMP *cpi,
|
|
int dry_run) {
|
|
int pt; /* near block/prev token context index */
|
|
TOKENEXTRA *t = *tp; /* store tokens starting here */
|
|
VP8_COMBINEENTROPYCONTEXTS(pt, *a, *l);
|
|
|
|
t->Token = DCT_EOB_TOKEN;
|
|
t->context_tree = cpi->common.fc.coef_probs [2] [0] [pt];
|
|
t->skip_eob_node = 0;
|
|
++t;
|
|
*tp = t;
|
|
if (!dry_run)
|
|
++cpi->coef_counts[2] [0] [pt] [DCT_EOB_TOKEN];
|
|
pt = 0; /* 0 <-> all coeff data is zero */
|
|
*a = *l = pt;
|
|
}
|
|
|
|
void vp8_stuff_mb(VP8_COMP *cpi, MACROBLOCKD *xd,
|
|
TOKENEXTRA **t, int dry_run) {
|
|
ENTROPY_CONTEXT *A = (ENTROPY_CONTEXT *)xd->above_context;
|
|
ENTROPY_CONTEXT *L = (ENTROPY_CONTEXT *)xd->left_context;
|
|
int plane_type;
|
|
int b;
|
|
TOKENEXTRA *t_backup = *t;
|
|
|
|
stuff2nd_order_b(t,
|
|
A + vp8_block2above[24],
|
|
L + vp8_block2left[24],
|
|
cpi, dry_run);
|
|
plane_type = 0;
|
|
|
|
for (b = 0; b < 16; b++)
|
|
stuff1st_order_b(t,
|
|
A + vp8_block2above[b],
|
|
L + vp8_block2left[b],
|
|
cpi, dry_run);
|
|
|
|
for (b = 16; b < 24; b++)
|
|
stuff1st_order_buv(t,
|
|
A + vp8_block2above[b],
|
|
L + vp8_block2left[b],
|
|
cpi, dry_run);
|
|
|
|
if (dry_run)
|
|
*t = t_backup;
|
|
}
|
|
void vp8_fix_contexts(MACROBLOCKD *xd) {
|
|
/* Clear entropy contexts for Y2 blocks */
|
|
if ((xd->mode_info_context->mbmi.mode != B_PRED
|
|
&& xd->mode_info_context->mbmi.mode != I8X8_PRED
|
|
&& xd->mode_info_context->mbmi.mode != SPLITMV)
|
|
#if CONFIG_TX16X16
|
|
|| xd->mode_info_context->mbmi.txfm_size == TX_16X16
|
|
#endif
|
|
) {
|
|
vpx_memset(xd->above_context, 0, sizeof(ENTROPY_CONTEXT_PLANES));
|
|
vpx_memset(xd->left_context, 0, sizeof(ENTROPY_CONTEXT_PLANES));
|
|
} else {
|
|
vpx_memset(xd->above_context, 0, sizeof(ENTROPY_CONTEXT_PLANES) - 1);
|
|
vpx_memset(xd->left_context, 0, sizeof(ENTROPY_CONTEXT_PLANES) - 1);
|
|
}
|
|
}
|