| /* |
| * Copyright (c) 2016, Alliance for Open Media. All rights reserved |
| * |
| * This source code is subject to the terms of the BSD 2 Clause License and |
| * the Alliance for Open Media Patent License 1.0. If the BSD 2 Clause License |
| * was not distributed with this source code in the LICENSE file, you can |
| * obtain it at www.aomedia.org/license/software. If the Alliance for Open |
| * Media Patent License 1.0 was not distributed with this source code in the |
| * PATENTS file, you can obtain it at www.aomedia.org/license/patent. |
| */ |
| |
| #include "./aom_config.h" |
| #include "aom_mem/aom_mem.h" |
| #include "aom_ports/mem.h" |
| #include "av1/common/blockd.h" |
| #include "av1/decoder/detokenize.h" |
| |
| #define ACCT_STR __func__ |
| |
| #include "av1/common/common.h" |
| #include "av1/common/entropy.h" |
| #include "av1/common/idct.h" |
| #include "av1/decoder/symbolrate.h" |
| |
| #define EOB_CONTEXT_NODE 0 |
| #define ZERO_CONTEXT_NODE 1 |
| #define ONE_CONTEXT_NODE 2 |
| #define LOW_VAL_CONTEXT_NODE 0 |
| #define TWO_CONTEXT_NODE 1 |
| #define THREE_CONTEXT_NODE 2 |
| #define HIGH_LOW_CONTEXT_NODE 3 |
| #define CAT_ONE_CONTEXT_NODE 4 |
| #define CAT_THREEFOUR_CONTEXT_NODE 5 |
| #define CAT_THREE_CONTEXT_NODE 6 |
| #define CAT_FIVE_CONTEXT_NODE 7 |
| |
| #define INCREMENT_COUNT(token) \ |
| do { \ |
| if (counts) ++coef_counts[band][ctx][token]; \ |
| } while (0) |
| |
| #if CONFIG_NEW_MULTISYMBOL |
| #define READ_COEFF(counts, prob_name, cdf_name, num, r) \ |
| read_coeff(counts, cdf_name, num, r); |
| static INLINE int read_coeff(FRAME_COUNTS *counts, |
| const aom_cdf_prob *const *cdf, int n, |
| aom_reader *r) { |
| #if !CONFIG_SYMBOLRATE |
| (void)counts; |
| #endif |
| int val = 0; |
| int i = 0; |
| int count = 0; |
| while (count < n) { |
| const int size = AOMMIN(n - count, 4); |
| val |= av1_read_record_cdf(counts, r, cdf[i++], 1 << size, ACCT_STR) |
| << count; |
| count += size; |
| } |
| return val; |
| } |
| #else |
| #define READ_COEFF(counts, prob_name, cdf_name, num, r) \ |
| read_coeff(counts, prob_name, num, r); |
| static INLINE int read_coeff(FRAME_COUNTS *counts, const aom_prob *probs, int n, |
| aom_reader *r) { |
| #if !CONFIG_SYMBOLRATE |
| (void)counts; |
| #endif |
| int i, val = 0; |
| for (i = 0; i < n; ++i) |
| val = (val << 1) | av1_read_record(counts, r, probs[i], ACCT_STR); |
| return val; |
| } |
| |
| #endif |
| |
| static int token_to_value(FRAME_COUNTS *counts, aom_reader *const r, int token, |
| TX_SIZE tx_size, int bit_depth) { |
| #if !CONFIG_HIGHBITDEPTH |
| assert(bit_depth == 8); |
| #endif // !CONFIG_HIGHBITDEPTH |
| |
| switch (token) { |
| case ZERO_TOKEN: |
| case ONE_TOKEN: |
| case TWO_TOKEN: |
| case THREE_TOKEN: |
| case FOUR_TOKEN: return token; |
| case CATEGORY1_TOKEN: |
| return CAT1_MIN_VAL + |
| READ_COEFF(counts, av1_cat1_prob, av1_cat1_cdf, 1, r); |
| case CATEGORY2_TOKEN: |
| return CAT2_MIN_VAL + |
| READ_COEFF(counts, av1_cat2_prob, av1_cat2_cdf, 2, r); |
| case CATEGORY3_TOKEN: |
| return CAT3_MIN_VAL + |
| READ_COEFF(counts, av1_cat3_prob, av1_cat3_cdf, 3, r); |
| case CATEGORY4_TOKEN: |
| return CAT4_MIN_VAL + |
| READ_COEFF(counts, av1_cat4_prob, av1_cat4_cdf, 4, r); |
| case CATEGORY5_TOKEN: |
| return CAT5_MIN_VAL + |
| READ_COEFF(counts, av1_cat5_prob, av1_cat5_cdf, 5, r); |
| case CATEGORY6_TOKEN: { |
| const int skip_bits = (int)sizeof(av1_cat6_prob) - |
| av1_get_cat6_extrabits_size(tx_size, bit_depth); |
| return CAT6_MIN_VAL + READ_COEFF(counts, av1_cat6_prob + skip_bits, |
| av1_cat6_cdf, 18 - skip_bits, r); |
| } |
| default: |
| assert(0); // Invalid token. |
| return -1; |
| } |
| } |
| |
| static int decode_coefs(MACROBLOCKD *xd, PLANE_TYPE type, tran_low_t *dqcoeff, |
| TX_SIZE tx_size, TX_TYPE tx_type, const int16_t *dq, |
| #if CONFIG_NEW_QUANT |
| dequant_val_type_nuq *dq_val, |
| #else |
| #if CONFIG_AOM_QM |
| qm_val_t *iqm[TX_SIZES_ALL], |
| #endif // CONFIG_AOM_QM |
| #endif // CONFIG_NEW_QUANT |
| int ctx, const int16_t *scan, const int16_t *nb, |
| int16_t *max_scan_line, aom_reader *r) { |
| FRAME_CONTEXT *ec_ctx = xd->tile_ctx; |
| const int max_eob = tx_size_2d[tx_size]; |
| const int ref = is_inter_block(&xd->mi[0]->mbmi); |
| #if CONFIG_AOM_QM && !CONFIG_NEW_QUANT |
| const qm_val_t *iqmatrix = iqm[tx_size]; |
| #endif // CONFIG_AOM_QM |
| (void)tx_type; |
| int band, c = 0; |
| const TX_SIZE tx_size_ctx = txsize_sqr_map[tx_size]; |
| aom_cdf_prob(*coef_head_cdfs)[COEFF_CONTEXTS][CDF_SIZE(ENTROPY_TOKENS)] = |
| ec_ctx->coef_head_cdfs[tx_size_ctx][type][ref]; |
| aom_cdf_prob(*coef_tail_cdfs)[COEFF_CONTEXTS][CDF_SIZE(ENTROPY_TOKENS)] = |
| ec_ctx->coef_tail_cdfs[tx_size_ctx][type][ref]; |
| int val = 0; |
| |
| uint8_t token_cache[MAX_TX_SQUARE]; |
| const uint8_t *band_translate = get_band_translate(tx_size); |
| int dq_shift; |
| int v, token; |
| int32_t dqv = dq[0]; |
| #if CONFIG_NEW_QUANT |
| const tran_low_t *dqv_val = &dq_val[0][0]; |
| #endif // CONFIG_NEW_QUANT |
| |
| dq_shift = av1_get_tx_scale(tx_size); |
| |
| band = *band_translate++; |
| |
| int more_data = 1; |
| while (more_data) { |
| int comb_token; |
| int last_pos = (c + 1 == max_eob); |
| int first_pos = (c == 0); |
| |
| #if CONFIG_NEW_QUANT |
| dqv_val = &dq_val[band][0]; |
| #endif // CONFIG_NEW_QUANT |
| |
| comb_token = last_pos ? 2 * av1_read_record_bit(xd->counts, r, ACCT_STR) + 2 |
| : av1_read_record_symbol( |
| xd->counts, r, coef_head_cdfs[band][ctx], |
| HEAD_TOKENS + first_pos, ACCT_STR) + |
| !first_pos; |
| if (first_pos) { |
| if (comb_token == 0) return 0; |
| } |
| token = comb_token >> 1; |
| |
| while (!token) { |
| *max_scan_line = AOMMAX(*max_scan_line, scan[c]); |
| token_cache[scan[c]] = 0; |
| #if CONFIG_SYMBOLRATE |
| av1_record_coeff(xd->counts, 0); |
| #endif |
| ++c; |
| dqv = dq[1]; |
| ctx = get_coef_context(nb, token_cache, c); |
| band = *band_translate++; |
| |
| last_pos = (c + 1 == max_eob); |
| |
| comb_token = |
| last_pos |
| ? 2 * av1_read_record_bit(xd->counts, r, ACCT_STR) + 2 |
| : av1_read_record_symbol(xd->counts, r, coef_head_cdfs[band][ctx], |
| HEAD_TOKENS, ACCT_STR) + |
| 1; |
| token = comb_token >> 1; |
| } |
| |
| more_data = comb_token & 1; |
| |
| if (token > ONE_TOKEN) |
| token += av1_read_record_symbol(xd->counts, r, coef_tail_cdfs[band][ctx], |
| TAIL_TOKENS, ACCT_STR); |
| #if CONFIG_NEW_QUANT |
| dqv_val = &dq_val[band][0]; |
| #endif // CONFIG_NEW_QUANT |
| |
| *max_scan_line = AOMMAX(*max_scan_line, scan[c]); |
| token_cache[scan[c]] = av1_pt_energy_class[token]; |
| |
| val = token_to_value(xd->counts, r, token, tx_size, xd->bd); |
| #if CONFIG_SYMBOLRATE |
| av1_record_coeff(xd->counts, val); |
| #endif |
| |
| #if CONFIG_NEW_QUANT |
| v = av1_dequant_abscoeff_nuq(val, dqv, dqv_val); |
| v = dq_shift ? ROUND_POWER_OF_TWO(v, dq_shift) : v; |
| #else |
| #if CONFIG_AOM_QM |
| // Apply quant matrix only for 2D transforms |
| if (IS_2D_TRANSFORM(tx_type) && iqmatrix != NULL) |
| dqv = ((iqmatrix[scan[c]] * (int)dqv) + (1 << (AOM_QM_BITS - 1))) >> |
| AOM_QM_BITS; |
| #endif |
| v = (val * dqv) >> dq_shift; |
| #endif |
| |
| v = (int)check_range(av1_read_record_bit(xd->counts, r, ACCT_STR) ? -v : v, |
| xd->bd); |
| |
| dqcoeff[scan[c]] = v; |
| |
| ++c; |
| more_data &= (c < max_eob); |
| if (!more_data) break; |
| dqv = dq[1]; |
| ctx = get_coef_context(nb, token_cache, c); |
| band = *band_translate++; |
| } |
| |
| return c; |
| } |
| |
| static void decode_color_map_tokens(Av1ColorMapParam *param, aom_reader *r) { |
| uint8_t color_order[PALETTE_MAX_SIZE]; |
| const int n = param->n_colors; |
| uint8_t *const color_map = param->color_map; |
| MapCdf color_map_cdf = param->map_cdf; |
| int plane_block_width = param->plane_width; |
| int plane_block_height = param->plane_height; |
| int rows = param->rows; |
| int cols = param->cols; |
| |
| // The first color index. |
| color_map[0] = av1_read_uniform(r, n); |
| assert(color_map[0] < n); |
| |
| #if CONFIG_PALETTE_THROUGHPUT |
| // Run wavefront on the palette map index decoding. |
| for (int i = 1; i < rows + cols - 1; ++i) { |
| for (int j = AOMMIN(i, cols - 1); j >= AOMMAX(0, i - rows + 1); --j) { |
| const int color_ctx = av1_get_palette_color_index_context( |
| color_map, plane_block_width, (i - j), j, n, color_order, NULL); |
| const int color_idx = aom_read_symbol( |
| r, color_map_cdf[n - PALETTE_MIN_SIZE][color_ctx], n, ACCT_STR); |
| assert(color_idx >= 0 && color_idx < n); |
| color_map[(i - j) * plane_block_width + j] = color_order[color_idx]; |
| } |
| } |
| // Copy last column to extra columns. |
| if (cols < plane_block_width) { |
| for (int i = 0; i < rows; ++i) { |
| memset(color_map + i * plane_block_width + cols, |
| color_map[i * plane_block_width + cols - 1], |
| (plane_block_width - cols)); |
| } |
| } |
| #else |
| for (int i = 0; i < rows; ++i) { |
| for (int j = (i == 0 ? 1 : 0); j < cols; ++j) { |
| const int color_ctx = av1_get_palette_color_index_context( |
| color_map, plane_block_width, i, j, n, color_order, NULL); |
| const int color_idx = aom_read_symbol( |
| r, color_map_cdf[n - PALETTE_MIN_SIZE][color_ctx], n, ACCT_STR); |
| assert(color_idx >= 0 && color_idx < n); |
| color_map[i * plane_block_width + j] = color_order[color_idx]; |
| } |
| memset(color_map + i * plane_block_width + cols, |
| color_map[i * plane_block_width + cols - 1], |
| (plane_block_width - cols)); // Copy last column to extra columns. |
| } |
| #endif // CONFIG_PALETTE_THROUGHPUT |
| // Copy last row to extra rows. |
| for (int i = rows; i < plane_block_height; ++i) { |
| memcpy(color_map + i * plane_block_width, |
| color_map + (rows - 1) * plane_block_width, plane_block_width); |
| } |
| } |
| |
| static void get_palette_params(const MACROBLOCKD *const xd, int plane, |
| BLOCK_SIZE bsize, Av1ColorMapParam *params) { |
| assert(plane == 0 || plane == 1); |
| const MB_MODE_INFO *const mbmi = &xd->mi[0]->mbmi; |
| const PALETTE_MODE_INFO *const pmi = &mbmi->palette_mode_info; |
| params->color_map = xd->plane[plane].color_index_map; |
| params->map_cdf = plane ? xd->tile_ctx->palette_uv_color_index_cdf |
| : xd->tile_ctx->palette_y_color_index_cdf; |
| params->n_colors = pmi->palette_size[plane]; |
| av1_get_block_dimensions(bsize, plane, xd, ¶ms->plane_width, |
| ¶ms->plane_height, ¶ms->rows, ¶ms->cols); |
| } |
| |
| #if CONFIG_MRC_TX && SIGNAL_ANY_MRC_MASK |
| static void get_mrc_params(const MACROBLOCKD *const xd, TX_SIZE tx_size, |
| Av1ColorMapParam *params) { |
| memset(params, 0, sizeof(*params)); |
| const MB_MODE_INFO *const mbmi = &xd->mi[0]->mbmi; |
| const int is_inter = is_inter_block(mbmi); |
| params->color_map = xd->mrc_mask; |
| params->map_cdf = is_inter ? xd->tile_ctx->mrc_mask_inter_cdf |
| : xd->tile_ctx->mrc_mask_intra_cdf; |
| params->n_colors = 2; |
| params->plane_width = tx_size_wide[tx_size]; |
| params->rows = tx_size_high[tx_size]; |
| params->cols = tx_size_wide[tx_size]; |
| } |
| #endif // CONFIG_MRC_TX && SIGNAL_ANY_MRC_MASK |
| |
| void av1_decode_palette_tokens(MACROBLOCKD *const xd, int plane, |
| aom_reader *r) { |
| const MB_MODE_INFO *const mbmi = &xd->mi[0]->mbmi; |
| assert(plane == 0 || plane == 1); |
| assert(mbmi->sb_type >= BLOCK_8X8); |
| Av1ColorMapParam color_map_params; |
| memset(&color_map_params, 0, sizeof(color_map_params)); |
| get_palette_params(xd, plane, mbmi->sb_type, &color_map_params); |
| decode_color_map_tokens(&color_map_params, r); |
| } |
| |
| #if CONFIG_MRC_TX && SIGNAL_ANY_MRC_MASK |
| static void decode_mrc_tokens(MACROBLOCKD *const xd, TX_TYPE tx_size, |
| aom_reader *r) { |
| const MB_MODE_INFO *const mbmi = &xd->mi[0]->mbmi; |
| const int is_inter = is_inter_block(mbmi); |
| if ((is_inter && !SIGNAL_MRC_MASK_INTER) || |
| (!is_inter && !SIGNAL_MRC_MASK_INTRA)) |
| return; |
| Av1ColorMapParam color_map_params; |
| get_mrc_params(xd, tx_size, &color_map_params); |
| decode_color_map_tokens(&color_map_params, r); |
| } |
| #endif // CONFIG_MRC_TX && SIGNAL_ANY_MRC_MASK |
| |
| int av1_decode_block_tokens(AV1_COMMON *cm, MACROBLOCKD *const xd, int plane, |
| const SCAN_ORDER *sc, int x, int y, TX_SIZE tx_size, |
| TX_TYPE tx_type, int16_t *max_scan_line, |
| aom_reader *r, int seg_id) { |
| struct macroblockd_plane *const pd = &xd->plane[plane]; |
| const int16_t *const dequant = pd->seg_dequant[seg_id]; |
| const int ctx = |
| get_entropy_context(tx_size, pd->above_context + x, pd->left_context + y); |
| #if CONFIG_NEW_QUANT |
| const int ref = is_inter_block(&xd->mi[0]->mbmi); |
| int dq = |
| get_dq_profile_from_ctx(xd->qindex[seg_id], ctx, ref, pd->plane_type); |
| #endif // CONFIG_NEW_QUANT |
| |
| #if CONFIG_MRC_TX && SIGNAL_ANY_MRC_MASK |
| if (tx_type == MRC_DCT) decode_mrc_tokens(xd, tx_size, r); |
| #endif // CONFIG_MRC_TX && SIGNAL_ANY_MRC_MASK |
| |
| const int eob = |
| decode_coefs(xd, pd->plane_type, pd->dqcoeff, tx_size, tx_type, dequant, |
| #if CONFIG_NEW_QUANT |
| pd->seg_dequant_nuq[seg_id][dq], |
| #else |
| #if CONFIG_AOM_QM |
| pd->seg_iqmatrix[seg_id], |
| #endif // CONFIG_AOM_QM |
| #endif // CONFIG_NEW_QUANT |
| ctx, sc->scan, sc->neighbors, max_scan_line, r); |
| av1_set_contexts(xd, pd, plane, tx_size, eob > 0, x, y); |
| #if CONFIG_ADAPT_SCAN |
| if (xd->counts) |
| av1_update_scan_count_facade(cm, xd->counts, tx_size, tx_type, pd->dqcoeff, |
| eob); |
| #else |
| (void)cm; |
| #endif |
| return eob; |
| } |