1815 lines
70 KiB
C
Executable file
1815 lines
70 KiB
C
Executable file
/*
|
|
* ATRAC3+ compatible decoder
|
|
*
|
|
* Copyright (c) 2010-2013 Maxim Poliakovski
|
|
*
|
|
* This file is part of FFmpeg.
|
|
*
|
|
* FFmpeg is free software; you can redistribute it and/or
|
|
* modify it under the terms of the GNU Lesser General Public
|
|
* License as published by the Free Software Foundation; either
|
|
* version 2.1 of the License, or (at your option) any later version.
|
|
*
|
|
* FFmpeg is distributed in the hope that it will be useful,
|
|
* but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
* Lesser General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU Lesser General Public
|
|
* License along with FFmpeg; if not, write to the Free Software
|
|
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
|
|
*/
|
|
|
|
/**
|
|
* @file
|
|
* Bitstream parser for ATRAC3+ decoder.
|
|
*/
|
|
|
|
#include "libavutil/avassert.h"
|
|
#include "avcodec.h"
|
|
#include "get_bits.h"
|
|
#include "atrac3plus.h"
|
|
#include "atrac3plus_data.h"
|
|
|
|
static VLC_TYPE tables_data[154276][2];
|
|
static VLC wl_vlc_tabs[4];
|
|
static VLC sf_vlc_tabs[8];
|
|
static VLC ct_vlc_tabs[4];
|
|
static VLC spec_vlc_tabs[112];
|
|
static VLC gain_vlc_tabs[11];
|
|
static VLC tone_vlc_tabs[7];
|
|
|
|
/**
|
|
* Generate canonical VLC table from given descriptor.
|
|
*
|
|
* @param[in] cb ptr to codebook descriptor
|
|
* @param[in] xlat ptr to translation table or NULL
|
|
* @param[in,out] tab_offset starting offset to the generated vlc table
|
|
* @param[out] out_vlc ptr to vlc table to be generated
|
|
*/
|
|
static av_cold void build_canonical_huff(const uint8_t *cb, const uint8_t *xlat,
|
|
int *tab_offset, VLC *out_vlc)
|
|
{
|
|
int i, b;
|
|
uint16_t codes[256];
|
|
uint8_t bits[256];
|
|
unsigned code = 0;
|
|
int index = 0;
|
|
int min_len = *cb++; // get shortest codeword length
|
|
int max_len = *cb++; // get longest codeword length
|
|
|
|
for (b = min_len; b <= max_len; b++) {
|
|
for (i = *cb++; i > 0; i--) {
|
|
av_assert0(index < 256);
|
|
bits[index] = b;
|
|
codes[index] = code++;
|
|
index++;
|
|
}
|
|
code <<= 1;
|
|
}
|
|
|
|
out_vlc->table = &tables_data[*tab_offset];
|
|
out_vlc->table_allocated = 1 << max_len;
|
|
|
|
ff_init_vlc_sparse(out_vlc, max_len, index, bits, 1, 1, codes, 2, 2,
|
|
xlat, 1, 1, INIT_VLC_USE_NEW_STATIC);
|
|
|
|
*tab_offset += 1 << max_len;
|
|
}
|
|
|
|
av_cold void ff_atrac3p_init_vlcs(void)
|
|
{
|
|
int i, wl_vlc_offs, ct_vlc_offs, sf_vlc_offs, tab_offset;
|
|
|
|
static const uint8_t wl_nb_bits[4] = { 2, 3, 5, 5 };
|
|
static const uint8_t wl_nb_codes[4] = { 3, 5, 8, 8 };
|
|
static const uint8_t * const wl_bits[4] = {
|
|
atrac3p_wl_huff_bits1, atrac3p_wl_huff_bits2,
|
|
atrac3p_wl_huff_bits3, atrac3p_wl_huff_bits4
|
|
};
|
|
static const uint8_t * const wl_codes[4] = {
|
|
atrac3p_wl_huff_code1, atrac3p_wl_huff_code2,
|
|
atrac3p_wl_huff_code3, atrac3p_wl_huff_code4
|
|
};
|
|
static const uint8_t * const wl_xlats[4] = {
|
|
atrac3p_wl_huff_xlat1, atrac3p_wl_huff_xlat2, NULL, NULL
|
|
};
|
|
|
|
static const uint8_t ct_nb_bits[4] = { 3, 4, 4, 4 };
|
|
static const uint8_t ct_nb_codes[4] = { 4, 8, 8, 8 };
|
|
static const uint8_t * const ct_bits[4] = {
|
|
atrac3p_ct_huff_bits1, atrac3p_ct_huff_bits2,
|
|
atrac3p_ct_huff_bits2, atrac3p_ct_huff_bits3
|
|
};
|
|
static const uint8_t * const ct_codes[4] = {
|
|
atrac3p_ct_huff_code1, atrac3p_ct_huff_code2,
|
|
atrac3p_ct_huff_code2, atrac3p_ct_huff_code3
|
|
};
|
|
static const uint8_t * const ct_xlats[4] = {
|
|
NULL, NULL, atrac3p_ct_huff_xlat1, NULL
|
|
};
|
|
|
|
static const uint8_t sf_nb_bits[8] = { 9, 9, 9, 9, 6, 6, 7, 7 };
|
|
static const uint8_t sf_nb_codes[8] = { 64, 64, 64, 64, 16, 16, 16, 16 };
|
|
static const uint8_t * const sf_bits[8] = {
|
|
atrac3p_sf_huff_bits1, atrac3p_sf_huff_bits1, atrac3p_sf_huff_bits2,
|
|
atrac3p_sf_huff_bits3, atrac3p_sf_huff_bits4, atrac3p_sf_huff_bits4,
|
|
atrac3p_sf_huff_bits5, atrac3p_sf_huff_bits6
|
|
};
|
|
static const uint16_t * const sf_codes[8] = {
|
|
atrac3p_sf_huff_code1, atrac3p_sf_huff_code1, atrac3p_sf_huff_code2,
|
|
atrac3p_sf_huff_code3, atrac3p_sf_huff_code4, atrac3p_sf_huff_code4,
|
|
atrac3p_sf_huff_code5, atrac3p_sf_huff_code6
|
|
};
|
|
static const uint8_t * const sf_xlats[8] = {
|
|
atrac3p_sf_huff_xlat1, atrac3p_sf_huff_xlat2, NULL, NULL,
|
|
atrac3p_sf_huff_xlat4, atrac3p_sf_huff_xlat5, NULL, NULL
|
|
};
|
|
|
|
static const uint8_t * const gain_cbs[11] = {
|
|
atrac3p_huff_gain_npoints1_cb, atrac3p_huff_gain_npoints1_cb,
|
|
atrac3p_huff_gain_lev1_cb, atrac3p_huff_gain_lev2_cb,
|
|
atrac3p_huff_gain_lev3_cb, atrac3p_huff_gain_lev4_cb,
|
|
atrac3p_huff_gain_loc3_cb, atrac3p_huff_gain_loc1_cb,
|
|
atrac3p_huff_gain_loc4_cb, atrac3p_huff_gain_loc2_cb,
|
|
atrac3p_huff_gain_loc5_cb
|
|
};
|
|
static const uint8_t * const gain_xlats[11] = {
|
|
NULL, atrac3p_huff_gain_npoints2_xlat, atrac3p_huff_gain_lev1_xlat,
|
|
atrac3p_huff_gain_lev2_xlat, atrac3p_huff_gain_lev3_xlat,
|
|
atrac3p_huff_gain_lev4_xlat, atrac3p_huff_gain_loc3_xlat,
|
|
atrac3p_huff_gain_loc1_xlat, atrac3p_huff_gain_loc4_xlat,
|
|
atrac3p_huff_gain_loc2_xlat, atrac3p_huff_gain_loc5_xlat
|
|
};
|
|
|
|
static const uint8_t * const tone_cbs[7] = {
|
|
atrac3p_huff_tonebands_cb, atrac3p_huff_numwavs1_cb,
|
|
atrac3p_huff_numwavs2_cb, atrac3p_huff_wav_ampsf1_cb,
|
|
atrac3p_huff_wav_ampsf2_cb, atrac3p_huff_wav_ampsf3_cb,
|
|
atrac3p_huff_freq_cb
|
|
};
|
|
static const uint8_t * const tone_xlats[7] = {
|
|
NULL, NULL, atrac3p_huff_numwavs2_xlat, atrac3p_huff_wav_ampsf1_xlat,
|
|
atrac3p_huff_wav_ampsf2_xlat, atrac3p_huff_wav_ampsf3_xlat,
|
|
atrac3p_huff_freq_xlat
|
|
};
|
|
|
|
for (i = 0, wl_vlc_offs = 0, ct_vlc_offs = 2508; i < 4; i++) {
|
|
wl_vlc_tabs[i].table = &tables_data[wl_vlc_offs];
|
|
wl_vlc_tabs[i].table_allocated = 1 << wl_nb_bits[i];
|
|
ct_vlc_tabs[i].table = &tables_data[ct_vlc_offs];
|
|
ct_vlc_tabs[i].table_allocated = 1 << ct_nb_bits[i];
|
|
|
|
ff_init_vlc_sparse(&wl_vlc_tabs[i], wl_nb_bits[i], wl_nb_codes[i],
|
|
wl_bits[i], 1, 1,
|
|
wl_codes[i], 1, 1,
|
|
wl_xlats[i], 1, 1,
|
|
INIT_VLC_USE_NEW_STATIC);
|
|
|
|
ff_init_vlc_sparse(&ct_vlc_tabs[i], ct_nb_bits[i], ct_nb_codes[i],
|
|
ct_bits[i], 1, 1,
|
|
ct_codes[i], 1, 1,
|
|
ct_xlats[i], 1, 1,
|
|
INIT_VLC_USE_NEW_STATIC);
|
|
|
|
wl_vlc_offs += wl_vlc_tabs[i].table_allocated;
|
|
ct_vlc_offs += ct_vlc_tabs[i].table_allocated;
|
|
}
|
|
|
|
for (i = 0, sf_vlc_offs = 76; i < 8; i++) {
|
|
sf_vlc_tabs[i].table = &tables_data[sf_vlc_offs];
|
|
sf_vlc_tabs[i].table_allocated = 1 << sf_nb_bits[i];
|
|
|
|
ff_init_vlc_sparse(&sf_vlc_tabs[i], sf_nb_bits[i], sf_nb_codes[i],
|
|
sf_bits[i], 1, 1,
|
|
sf_codes[i], 2, 2,
|
|
sf_xlats[i], 1, 1,
|
|
INIT_VLC_USE_NEW_STATIC);
|
|
sf_vlc_offs += sf_vlc_tabs[i].table_allocated;
|
|
}
|
|
|
|
tab_offset = 2564;
|
|
|
|
/* build huffman tables for spectrum decoding */
|
|
for (i = 0; i < 112; i++) {
|
|
if (atrac3p_spectra_tabs[i].cb)
|
|
build_canonical_huff(atrac3p_spectra_tabs[i].cb,
|
|
atrac3p_spectra_tabs[i].xlat,
|
|
&tab_offset, &spec_vlc_tabs[i]);
|
|
else
|
|
spec_vlc_tabs[i].table = 0;
|
|
}
|
|
|
|
/* build huffman tables for gain data decoding */
|
|
for (i = 0; i < 11; i++)
|
|
build_canonical_huff(gain_cbs[i], gain_xlats[i], &tab_offset, &gain_vlc_tabs[i]);
|
|
|
|
/* build huffman tables for tone decoding */
|
|
for (i = 0; i < 7; i++)
|
|
build_canonical_huff(tone_cbs[i], tone_xlats[i], &tab_offset, &tone_vlc_tabs[i]);
|
|
}
|
|
|
|
/**
|
|
* Decode number of coded quantization units.
|
|
*
|
|
* @param[in] gb the GetBit context
|
|
* @param[in,out] chan ptr to the channel parameters
|
|
* @param[in,out] ctx ptr to the channel unit context
|
|
* @param[in] avctx ptr to the AVCodecContext
|
|
* @return result code: 0 = OK, otherwise - error code
|
|
*/
|
|
static int num_coded_units(GetBitContext *gb, Atrac3pChanParams *chan,
|
|
Atrac3pChanUnitCtx *ctx, AVCodecContext *avctx)
|
|
{
|
|
chan->fill_mode = get_bits(gb, 2);
|
|
if (!chan->fill_mode) {
|
|
chan->num_coded_vals = ctx->num_quant_units;
|
|
} else {
|
|
chan->num_coded_vals = get_bits(gb, 5);
|
|
if (chan->num_coded_vals > ctx->num_quant_units) {
|
|
av_log(avctx, AV_LOG_ERROR,
|
|
"Invalid number of transmitted units!\n");
|
|
return AVERROR_INVALIDDATA;
|
|
}
|
|
|
|
if (chan->fill_mode == 3)
|
|
chan->split_point = get_bits(gb, 2) + (chan->ch_num << 1) + 1;
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
/**
|
|
* Add weighting coefficients to the decoded word-length information.
|
|
*
|
|
* @param[in,out] ctx ptr to the channel unit context
|
|
* @param[in,out] chan ptr to the channel parameters
|
|
* @param[in] wtab_idx index of the table of weights
|
|
* @param[in] avctx ptr to the AVCodecContext
|
|
* @return result code: 0 = OK, otherwise - error code
|
|
*/
|
|
static int add_wordlen_weights(Atrac3pChanUnitCtx *ctx,
|
|
Atrac3pChanParams *chan, int wtab_idx,
|
|
AVCodecContext *avctx)
|
|
{
|
|
int i;
|
|
const int8_t *weights_tab =
|
|
&atrac3p_wl_weights[chan->ch_num * 3 + wtab_idx - 1][0];
|
|
|
|
for (i = 0; i < ctx->num_quant_units; i++) {
|
|
chan->qu_wordlen[i] += weights_tab[i];
|
|
if (chan->qu_wordlen[i] < 0 || chan->qu_wordlen[i] > 7) {
|
|
av_log(avctx, AV_LOG_ERROR,
|
|
"WL index out of range: pos=%d, val=%d!\n",
|
|
i, chan->qu_wordlen[i]);
|
|
return AVERROR_INVALIDDATA;
|
|
}
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
/**
|
|
* Subtract weighting coefficients from decoded scalefactors.
|
|
*
|
|
* @param[in,out] ctx ptr to the channel unit context
|
|
* @param[in,out] chan ptr to the channel parameters
|
|
* @param[in] wtab_idx index of table of weights
|
|
* @param[in] avctx ptr to the AVCodecContext
|
|
* @return result code: 0 = OK, otherwise - error code
|
|
*/
|
|
static int subtract_sf_weights(Atrac3pChanUnitCtx *ctx,
|
|
Atrac3pChanParams *chan, int wtab_idx,
|
|
AVCodecContext *avctx)
|
|
{
|
|
int i;
|
|
const int8_t *weights_tab = &atrac3p_sf_weights[wtab_idx - 1][0];
|
|
|
|
for (i = 0; i < ctx->used_quant_units; i++) {
|
|
chan->qu_sf_idx[i] -= weights_tab[i];
|
|
if (chan->qu_sf_idx[i] < 0 || chan->qu_sf_idx[i] > 63) {
|
|
av_log(avctx, AV_LOG_ERROR,
|
|
"SF index out of range: pos=%d, val=%d!\n",
|
|
i, chan->qu_sf_idx[i]);
|
|
return AVERROR_INVALIDDATA;
|
|
}
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
/**
|
|
* Unpack vector quantization tables.
|
|
*
|
|
* @param[in] start_val start value for the unpacked table
|
|
* @param[in] shape_vec ptr to table to unpack
|
|
* @param[out] dst ptr to output array
|
|
* @param[in] num_values number of values to unpack
|
|
*/
|
|
static inline void unpack_vq_shape(int start_val, const int8_t *shape_vec,
|
|
int *dst, int num_values)
|
|
{
|
|
int i;
|
|
|
|
if (num_values) {
|
|
dst[0] = dst[1] = dst[2] = start_val;
|
|
for (i = 3; i < num_values; i++)
|
|
dst[i] = start_val - shape_vec[atrac3p_qu_num_to_seg[i] - 1];
|
|
}
|
|
}
|
|
|
|
#define UNPACK_SF_VQ_SHAPE(gb, dst, num_vals) \
|
|
start_val = get_bits((gb), 6); \
|
|
unpack_vq_shape(start_val, &atrac3p_sf_shapes[get_bits((gb), 6)][0], \
|
|
(dst), (num_vals))
|
|
|
|
/**
|
|
* Decode word length for each quantization unit of a channel.
|
|
*
|
|
* @param[in] gb the GetBit context
|
|
* @param[in,out] ctx ptr to the channel unit context
|
|
* @param[in] ch_num channel to process
|
|
* @param[in] avctx ptr to the AVCodecContext
|
|
* @return result code: 0 = OK, otherwise - error code
|
|
*/
|
|
static int decode_channel_wordlen(GetBitContext *gb, Atrac3pChanUnitCtx *ctx,
|
|
int ch_num, AVCodecContext *avctx)
|
|
{
|
|
int i, weight_idx = 0, delta, diff, pos, delta_bits, min_val, flag,
|
|
ret, start_val;
|
|
VLC *vlc_tab;
|
|
Atrac3pChanParams *chan = &ctx->channels[ch_num];
|
|
Atrac3pChanParams *ref_chan = &ctx->channels[0];
|
|
|
|
chan->fill_mode = 0;
|
|
|
|
switch (get_bits(gb, 2)) { /* switch according to coding mode */
|
|
case 0: /* coded using constant number of bits */
|
|
for (i = 0; i < ctx->num_quant_units; i++)
|
|
chan->qu_wordlen[i] = get_bits(gb, 3);
|
|
break;
|
|
case 1:
|
|
if (ch_num) {
|
|
if ((ret = num_coded_units(gb, chan, ctx, avctx)) < 0)
|
|
return ret;
|
|
|
|
if (chan->num_coded_vals) {
|
|
vlc_tab = &wl_vlc_tabs[get_bits(gb, 2)];
|
|
|
|
for (i = 0; i < chan->num_coded_vals; i++) {
|
|
delta = get_vlc2(gb, vlc_tab->table, vlc_tab->bits, 1);
|
|
chan->qu_wordlen[i] = (ref_chan->qu_wordlen[i] + delta) & 7;
|
|
}
|
|
}
|
|
} else {
|
|
weight_idx = get_bits(gb, 2);
|
|
if ((ret = num_coded_units(gb, chan, ctx, avctx)) < 0)
|
|
return ret;
|
|
|
|
if (chan->num_coded_vals) {
|
|
pos = get_bits(gb, 5);
|
|
if (pos > chan->num_coded_vals) {
|
|
av_log(avctx, AV_LOG_ERROR,
|
|
"WL mode 1: invalid position!\n");
|
|
return AVERROR_INVALIDDATA;
|
|
}
|
|
|
|
delta_bits = get_bits(gb, 2);
|
|
min_val = get_bits(gb, 3);
|
|
|
|
for (i = 0; i < pos; i++)
|
|
chan->qu_wordlen[i] = get_bits(gb, 3);
|
|
|
|
for (i = pos; i < chan->num_coded_vals; i++)
|
|
chan->qu_wordlen[i] = (min_val + get_bitsz(gb, delta_bits)) & 7;
|
|
}
|
|
}
|
|
break;
|
|
case 2:
|
|
if ((ret = num_coded_units(gb, chan, ctx, avctx)) < 0)
|
|
return ret;
|
|
|
|
if (ch_num && chan->num_coded_vals) {
|
|
vlc_tab = &wl_vlc_tabs[get_bits(gb, 2)];
|
|
delta = get_vlc2(gb, vlc_tab->table, vlc_tab->bits, 1);
|
|
chan->qu_wordlen[0] = (ref_chan->qu_wordlen[0] + delta) & 7;
|
|
|
|
for (i = 1; i < chan->num_coded_vals; i++) {
|
|
diff = ref_chan->qu_wordlen[i] - ref_chan->qu_wordlen[i - 1];
|
|
delta = get_vlc2(gb, vlc_tab->table, vlc_tab->bits, 1);
|
|
chan->qu_wordlen[i] = (chan->qu_wordlen[i - 1] + diff + delta) & 7;
|
|
}
|
|
} else if (chan->num_coded_vals) {
|
|
flag = get_bits(gb, 1);
|
|
vlc_tab = &wl_vlc_tabs[get_bits(gb, 1)];
|
|
|
|
start_val = get_bits(gb, 3);
|
|
unpack_vq_shape(start_val,
|
|
&atrac3p_wl_shapes[start_val][get_bits(gb, 4)][0],
|
|
chan->qu_wordlen, chan->num_coded_vals);
|
|
|
|
if (!flag) {
|
|
for (i = 0; i < chan->num_coded_vals; i++) {
|
|
delta = get_vlc2(gb, vlc_tab->table, vlc_tab->bits, 1);
|
|
chan->qu_wordlen[i] = (chan->qu_wordlen[i] + delta) & 7;
|
|
}
|
|
} else {
|
|
for (i = 0; i < (chan->num_coded_vals & - 2); i += 2)
|
|
if (!get_bits1(gb)) {
|
|
chan->qu_wordlen[i] = (chan->qu_wordlen[i] +
|
|
get_vlc2(gb, vlc_tab->table,
|
|
vlc_tab->bits, 1)) & 7;
|
|
chan->qu_wordlen[i + 1] = (chan->qu_wordlen[i + 1] +
|
|
get_vlc2(gb, vlc_tab->table,
|
|
vlc_tab->bits, 1)) & 7;
|
|
}
|
|
|
|
if (chan->num_coded_vals & 1)
|
|
chan->qu_wordlen[i] = (chan->qu_wordlen[i] +
|
|
get_vlc2(gb, vlc_tab->table,
|
|
vlc_tab->bits, 1)) & 7;
|
|
}
|
|
}
|
|
break;
|
|
case 3:
|
|
weight_idx = get_bits(gb, 2);
|
|
if ((ret = num_coded_units(gb, chan, ctx, avctx)) < 0)
|
|
return ret;
|
|
|
|
if (chan->num_coded_vals) {
|
|
vlc_tab = &wl_vlc_tabs[get_bits(gb, 2)];
|
|
|
|
/* first coefficient is coded directly */
|
|
chan->qu_wordlen[0] = get_bits(gb, 3);
|
|
|
|
for (i = 1; i < chan->num_coded_vals; i++) {
|
|
delta = get_vlc2(gb, vlc_tab->table, vlc_tab->bits, 1);
|
|
chan->qu_wordlen[i] = (chan->qu_wordlen[i - 1] + delta) & 7;
|
|
}
|
|
}
|
|
break;
|
|
}
|
|
|
|
if (chan->fill_mode == 2) {
|
|
for (i = chan->num_coded_vals; i < ctx->num_quant_units; i++)
|
|
chan->qu_wordlen[i] = ch_num ? get_bits1(gb) : 1;
|
|
} else if (chan->fill_mode == 3) {
|
|
pos = ch_num ? chan->num_coded_vals + chan->split_point
|
|
: ctx->num_quant_units - chan->split_point;
|
|
if (pos > FF_ARRAY_ELEMS(chan->qu_wordlen)) {
|
|
av_log(avctx, AV_LOG_ERROR, "Split point beyond array\n");
|
|
pos = FF_ARRAY_ELEMS(chan->qu_wordlen);
|
|
}
|
|
for (i = chan->num_coded_vals; i < pos; i++)
|
|
chan->qu_wordlen[i] = 1;
|
|
}
|
|
|
|
if (weight_idx)
|
|
return add_wordlen_weights(ctx, chan, weight_idx, avctx);
|
|
|
|
return 0;
|
|
}
|
|
|
|
/**
|
|
* Decode scale factor indexes for each quant unit of a channel.
|
|
*
|
|
* @param[in] gb the GetBit context
|
|
* @param[in,out] ctx ptr to the channel unit context
|
|
* @param[in] ch_num channel to process
|
|
* @param[in] avctx ptr to the AVCodecContext
|
|
* @return result code: 0 = OK, otherwise - error code
|
|
*/
|
|
static int decode_channel_sf_idx(GetBitContext *gb, Atrac3pChanUnitCtx *ctx,
|
|
int ch_num, AVCodecContext *avctx)
|
|
{
|
|
int i, weight_idx = 0, delta, diff, num_long_vals,
|
|
delta_bits, min_val, vlc_sel, start_val;
|
|
VLC *vlc_tab;
|
|
Atrac3pChanParams *chan = &ctx->channels[ch_num];
|
|
Atrac3pChanParams *ref_chan = &ctx->channels[0];
|
|
|
|
switch (get_bits(gb, 2)) { /* switch according to coding mode */
|
|
case 0: /* coded using constant number of bits */
|
|
for (i = 0; i < ctx->used_quant_units; i++)
|
|
chan->qu_sf_idx[i] = get_bits(gb, 6);
|
|
break;
|
|
case 1:
|
|
if (ch_num) {
|
|
vlc_tab = &sf_vlc_tabs[get_bits(gb, 2)];
|
|
|
|
for (i = 0; i < ctx->used_quant_units; i++) {
|
|
delta = get_vlc2(gb, vlc_tab->table, vlc_tab->bits, 1);
|
|
chan->qu_sf_idx[i] = (ref_chan->qu_sf_idx[i] + delta) & 0x3F;
|
|
}
|
|
} else {
|
|
weight_idx = get_bits(gb, 2);
|
|
if (weight_idx == 3) {
|
|
UNPACK_SF_VQ_SHAPE(gb, chan->qu_sf_idx, ctx->used_quant_units);
|
|
|
|
num_long_vals = get_bits(gb, 5);
|
|
delta_bits = get_bits(gb, 2);
|
|
min_val = get_bits(gb, 4) - 7;
|
|
|
|
for (i = 0; i < num_long_vals; i++)
|
|
chan->qu_sf_idx[i] = (chan->qu_sf_idx[i] +
|
|
get_bits(gb, 4) - 7) & 0x3F;
|
|
|
|
/* all others are: min_val + delta */
|
|
for (i = num_long_vals; i < ctx->used_quant_units; i++)
|
|
chan->qu_sf_idx[i] = (chan->qu_sf_idx[i] + min_val +
|
|
get_bitsz(gb, delta_bits)) & 0x3F;
|
|
} else {
|
|
num_long_vals = get_bits(gb, 5);
|
|
delta_bits = get_bits(gb, 3);
|
|
min_val = get_bits(gb, 6);
|
|
if (num_long_vals > ctx->used_quant_units || delta_bits == 7) {
|
|
av_log(avctx, AV_LOG_ERROR,
|
|
"SF mode 1: invalid parameters!\n");
|
|
return AVERROR_INVALIDDATA;
|
|
}
|
|
|
|
/* read full-precision SF indexes */
|
|
for (i = 0; i < num_long_vals; i++)
|
|
chan->qu_sf_idx[i] = get_bits(gb, 6);
|
|
|
|
/* all others are: min_val + delta */
|
|
for (i = num_long_vals; i < ctx->used_quant_units; i++)
|
|
chan->qu_sf_idx[i] = (min_val +
|
|
get_bitsz(gb, delta_bits)) & 0x3F;
|
|
}
|
|
}
|
|
break;
|
|
case 2:
|
|
if (ch_num) {
|
|
vlc_tab = &sf_vlc_tabs[get_bits(gb, 2)];
|
|
|
|
delta = get_vlc2(gb, vlc_tab->table, vlc_tab->bits, 1);
|
|
chan->qu_sf_idx[0] = (ref_chan->qu_sf_idx[0] + delta) & 0x3F;
|
|
|
|
for (i = 1; i < ctx->used_quant_units; i++) {
|
|
diff = ref_chan->qu_sf_idx[i] - ref_chan->qu_sf_idx[i - 1];
|
|
delta = get_vlc2(gb, vlc_tab->table, vlc_tab->bits, 1);
|
|
chan->qu_sf_idx[i] = (chan->qu_sf_idx[i - 1] + diff + delta) & 0x3F;
|
|
}
|
|
} else {
|
|
vlc_tab = &sf_vlc_tabs[get_bits(gb, 2) + 4];
|
|
|
|
UNPACK_SF_VQ_SHAPE(gb, chan->qu_sf_idx, ctx->used_quant_units);
|
|
|
|
for (i = 0; i < ctx->used_quant_units; i++) {
|
|
delta = get_vlc2(gb, vlc_tab->table, vlc_tab->bits, 1);
|
|
chan->qu_sf_idx[i] = (chan->qu_sf_idx[i] +
|
|
sign_extend(delta, 4)) & 0x3F;
|
|
}
|
|
}
|
|
break;
|
|
case 3:
|
|
if (ch_num) {
|
|
/* copy coefficients from reference channel */
|
|
for (i = 0; i < ctx->used_quant_units; i++)
|
|
chan->qu_sf_idx[i] = ref_chan->qu_sf_idx[i];
|
|
} else {
|
|
weight_idx = get_bits(gb, 2);
|
|
vlc_sel = get_bits(gb, 2);
|
|
vlc_tab = &sf_vlc_tabs[vlc_sel];
|
|
|
|
if (weight_idx == 3) {
|
|
vlc_tab = &sf_vlc_tabs[vlc_sel + 4];
|
|
|
|
UNPACK_SF_VQ_SHAPE(gb, chan->qu_sf_idx, ctx->used_quant_units);
|
|
|
|
diff = (get_bits(gb, 4) + 56) & 0x3F;
|
|
chan->qu_sf_idx[0] = (chan->qu_sf_idx[0] + diff) & 0x3F;
|
|
|
|
for (i = 1; i < ctx->used_quant_units; i++) {
|
|
delta = get_vlc2(gb, vlc_tab->table, vlc_tab->bits, 1);
|
|
diff = (diff + sign_extend(delta, 4)) & 0x3F;
|
|
chan->qu_sf_idx[i] = (diff + chan->qu_sf_idx[i]) & 0x3F;
|
|
}
|
|
} else {
|
|
/* 1st coefficient is coded directly */
|
|
chan->qu_sf_idx[0] = get_bits(gb, 6);
|
|
|
|
for (i = 1; i < ctx->used_quant_units; i++) {
|
|
delta = get_vlc2(gb, vlc_tab->table, vlc_tab->bits, 1);
|
|
chan->qu_sf_idx[i] = (chan->qu_sf_idx[i - 1] + delta) & 0x3F;
|
|
}
|
|
}
|
|
}
|
|
break;
|
|
}
|
|
|
|
if (weight_idx && weight_idx < 3)
|
|
return subtract_sf_weights(ctx, chan, weight_idx, avctx);
|
|
|
|
return 0;
|
|
}
|
|
|
|
/**
|
|
* Decode word length information for each channel.
|
|
*
|
|
* @param[in] gb the GetBit context
|
|
* @param[in,out] ctx ptr to the channel unit context
|
|
* @param[in] num_channels number of channels to process
|
|
* @param[in] avctx ptr to the AVCodecContext
|
|
* @return result code: 0 = OK, otherwise - error code
|
|
*/
|
|
static int decode_quant_wordlen(GetBitContext *gb, Atrac3pChanUnitCtx *ctx,
|
|
int num_channels, AVCodecContext *avctx)
|
|
{
|
|
int ch_num, i, ret;
|
|
|
|
for (ch_num = 0; ch_num < num_channels; ch_num++) {
|
|
memset(ctx->channels[ch_num].qu_wordlen, 0,
|
|
sizeof(ctx->channels[ch_num].qu_wordlen));
|
|
|
|
if ((ret = decode_channel_wordlen(gb, ctx, ch_num, avctx)) < 0)
|
|
return ret;
|
|
}
|
|
|
|
/* scan for last non-zero coeff in both channels and
|
|
* set number of quant units having coded spectrum */
|
|
for (i = ctx->num_quant_units - 1; i >= 0; i--)
|
|
if (ctx->channels[0].qu_wordlen[i] ||
|
|
(num_channels == 2 && ctx->channels[1].qu_wordlen[i]))
|
|
break;
|
|
ctx->used_quant_units = i + 1;
|
|
|
|
return 0;
|
|
}
|
|
|
|
/**
|
|
* Decode scale factor indexes for each channel.
|
|
*
|
|
* @param[in] gb the GetBit context
|
|
* @param[in,out] ctx ptr to the channel unit context
|
|
* @param[in] num_channels number of channels to process
|
|
* @param[in] avctx ptr to the AVCodecContext
|
|
* @return result code: 0 = OK, otherwise - error code
|
|
*/
|
|
static int decode_scale_factors(GetBitContext *gb, Atrac3pChanUnitCtx *ctx,
|
|
int num_channels, AVCodecContext *avctx)
|
|
{
|
|
int ch_num, ret;
|
|
|
|
if (!ctx->used_quant_units)
|
|
return 0;
|
|
|
|
for (ch_num = 0; ch_num < num_channels; ch_num++) {
|
|
memset(ctx->channels[ch_num].qu_sf_idx, 0,
|
|
sizeof(ctx->channels[ch_num].qu_sf_idx));
|
|
|
|
if ((ret = decode_channel_sf_idx(gb, ctx, ch_num, avctx)) < 0)
|
|
return ret;
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
/**
|
|
* Decode number of code table values.
|
|
*
|
|
* @param[in] gb the GetBit context
|
|
* @param[in,out] ctx ptr to the channel unit context
|
|
* @param[in] avctx ptr to the AVCodecContext
|
|
* @return result code: 0 = OK, otherwise - error code
|
|
*/
|
|
static int get_num_ct_values(GetBitContext *gb, Atrac3pChanUnitCtx *ctx,
|
|
AVCodecContext *avctx)
|
|
{
|
|
int num_coded_vals;
|
|
|
|
if (get_bits1(gb)) {
|
|
num_coded_vals = get_bits(gb, 5);
|
|
if (num_coded_vals > ctx->used_quant_units) {
|
|
av_log(avctx, AV_LOG_ERROR,
|
|
"Invalid number of code table indexes: %d!\n", num_coded_vals);
|
|
return AVERROR_INVALIDDATA;
|
|
}
|
|
return num_coded_vals;
|
|
} else
|
|
return ctx->used_quant_units;
|
|
}
|
|
|
|
#define DEC_CT_IDX_COMMON(OP) \
|
|
num_vals = get_num_ct_values(gb, ctx, avctx); \
|
|
if (num_vals < 0) \
|
|
return num_vals; \
|
|
\
|
|
for (i = 0; i < num_vals; i++) { \
|
|
if (chan->qu_wordlen[i]) { \
|
|
chan->qu_tab_idx[i] = OP; \
|
|
} else if (ch_num && ref_chan->qu_wordlen[i]) \
|
|
/* get clone master flag */ \
|
|
chan->qu_tab_idx[i] = get_bits1(gb); \
|
|
}
|
|
|
|
#define CODING_DIRECT get_bits(gb, num_bits)
|
|
|
|
#define CODING_VLC get_vlc2(gb, vlc_tab->table, vlc_tab->bits, 1)
|
|
|
|
#define CODING_VLC_DELTA \
|
|
(!i) ? CODING_VLC \
|
|
: (pred + get_vlc2(gb, delta_vlc->table, \
|
|
delta_vlc->bits, 1)) & mask; \
|
|
pred = chan->qu_tab_idx[i]
|
|
|
|
#define CODING_VLC_DIFF \
|
|
(ref_chan->qu_tab_idx[i] + \
|
|
get_vlc2(gb, vlc_tab->table, vlc_tab->bits, 1)) & mask
|
|
|
|
/**
|
|
* Decode code table indexes for each quant unit of a channel.
|
|
*
|
|
* @param[in] gb the GetBit context
|
|
* @param[in,out] ctx ptr to the channel unit context
|
|
* @param[in] ch_num channel to process
|
|
* @param[in] avctx ptr to the AVCodecContext
|
|
* @return result code: 0 = OK, otherwise - error code
|
|
*/
|
|
static int decode_channel_code_tab(GetBitContext *gb, Atrac3pChanUnitCtx *ctx,
|
|
int ch_num, AVCodecContext *avctx)
|
|
{
|
|
int i, num_vals, num_bits, pred;
|
|
int mask = ctx->use_full_table ? 7 : 3; /* mask for modular arithmetic */
|
|
VLC *vlc_tab, *delta_vlc;
|
|
Atrac3pChanParams *chan = &ctx->channels[ch_num];
|
|
Atrac3pChanParams *ref_chan = &ctx->channels[0];
|
|
|
|
chan->table_type = get_bits1(gb);
|
|
|
|
switch (get_bits(gb, 2)) { /* switch according to coding mode */
|
|
case 0: /* directly coded */
|
|
num_bits = ctx->use_full_table + 2;
|
|
DEC_CT_IDX_COMMON(CODING_DIRECT);
|
|
break;
|
|
case 1: /* entropy-coded */
|
|
vlc_tab = ctx->use_full_table ? &ct_vlc_tabs[1]
|
|
: ct_vlc_tabs;
|
|
DEC_CT_IDX_COMMON(CODING_VLC);
|
|
break;
|
|
case 2: /* entropy-coded delta */
|
|
if (ctx->use_full_table) {
|
|
vlc_tab = &ct_vlc_tabs[1];
|
|
delta_vlc = &ct_vlc_tabs[2];
|
|
} else {
|
|
vlc_tab = ct_vlc_tabs;
|
|
delta_vlc = ct_vlc_tabs;
|
|
}
|
|
pred = 0;
|
|
DEC_CT_IDX_COMMON(CODING_VLC_DELTA);
|
|
break;
|
|
case 3: /* entropy-coded difference to master */
|
|
if (ch_num) {
|
|
vlc_tab = ctx->use_full_table ? &ct_vlc_tabs[3]
|
|
: ct_vlc_tabs;
|
|
DEC_CT_IDX_COMMON(CODING_VLC_DIFF);
|
|
}
|
|
break;
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
/**
|
|
* Decode code table indexes for each channel.
|
|
*
|
|
* @param[in] gb the GetBit context
|
|
* @param[in,out] ctx ptr to the channel unit context
|
|
* @param[in] num_channels number of channels to process
|
|
* @param[in] avctx ptr to the AVCodecContext
|
|
* @return result code: 0 = OK, otherwise - error code
|
|
*/
|
|
static int decode_code_table_indexes(GetBitContext *gb, Atrac3pChanUnitCtx *ctx,
|
|
int num_channels, AVCodecContext *avctx)
|
|
{
|
|
int ch_num, ret;
|
|
|
|
if (!ctx->used_quant_units)
|
|
return 0;
|
|
|
|
ctx->use_full_table = get_bits1(gb);
|
|
|
|
for (ch_num = 0; ch_num < num_channels; ch_num++) {
|
|
memset(ctx->channels[ch_num].qu_tab_idx, 0,
|
|
sizeof(ctx->channels[ch_num].qu_tab_idx));
|
|
|
|
if ((ret = decode_channel_code_tab(gb, ctx, ch_num, avctx)) < 0)
|
|
return ret;
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
/**
|
|
* Decode huffman-coded spectral lines for a given quant unit.
|
|
*
|
|
* This is a generalized version for all known coding modes.
|
|
* Its speed can be improved by creating separate functions for each mode.
|
|
*
|
|
* @param[in] gb the GetBit context
|
|
* @param[in] tab code table telling how to decode spectral lines
|
|
* @param[in] vlc_tab ptr to the huffman table associated with the code table
|
|
* @param[out] out pointer to buffer where decoded data should be stored
|
|
* @param[in] num_specs number of spectral lines to decode
|
|
*/
|
|
static void decode_qu_spectra(GetBitContext *gb, const Atrac3pSpecCodeTab *tab,
|
|
VLC *vlc_tab, int16_t *out, const int num_specs)
|
|
{
|
|
int i, j, pos, cf;
|
|
int group_size = tab->group_size;
|
|
int num_coeffs = tab->num_coeffs;
|
|
int bits = tab->bits;
|
|
int is_signed = tab->is_signed;
|
|
unsigned val;
|
|
|
|
for (pos = 0; pos < num_specs;) {
|
|
if (group_size == 1 || get_bits1(gb)) {
|
|
for (j = 0; j < group_size; j++) {
|
|
val = get_vlc2(gb, vlc_tab->table, vlc_tab->bits, 1);
|
|
|
|
for (i = 0; i < num_coeffs; i++) {
|
|
cf = av_mod_uintp2(val, bits);
|
|
if (is_signed)
|
|
cf = sign_extend(cf, bits);
|
|
else if (cf && get_bits1(gb))
|
|
cf = -cf;
|
|
|
|
out[pos++] = cf;
|
|
val >>= bits;
|
|
}
|
|
}
|
|
} else /* group skipped */
|
|
pos += group_size * num_coeffs;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Decode huffman-coded IMDCT spectrum for all channels.
|
|
*
|
|
* @param[in] gb the GetBit context
|
|
* @param[in,out] ctx ptr to the channel unit context
|
|
* @param[in] num_channels number of channels to process
|
|
* @param[in] avctx ptr to the AVCodecContext
|
|
*/
|
|
static void decode_spectrum(GetBitContext *gb, Atrac3pChanUnitCtx *ctx,
|
|
int num_channels, AVCodecContext *avctx)
|
|
{
|
|
int i, ch_num, qu, wordlen, codetab, tab_index, num_specs;
|
|
const Atrac3pSpecCodeTab *tab;
|
|
Atrac3pChanParams *chan;
|
|
|
|
for (ch_num = 0; ch_num < num_channels; ch_num++) {
|
|
chan = &ctx->channels[ch_num];
|
|
|
|
memset(chan->spectrum, 0, sizeof(chan->spectrum));
|
|
|
|
/* set power compensation level to disabled */
|
|
memset(chan->power_levs, ATRAC3P_POWER_COMP_OFF, sizeof(chan->power_levs));
|
|
|
|
for (qu = 0; qu < ctx->used_quant_units; qu++) {
|
|
num_specs = ff_atrac3p_qu_to_spec_pos[qu + 1] -
|
|
ff_atrac3p_qu_to_spec_pos[qu];
|
|
|
|
wordlen = chan->qu_wordlen[qu];
|
|
codetab = chan->qu_tab_idx[qu];
|
|
if (wordlen) {
|
|
if (!ctx->use_full_table)
|
|
codetab = atrac3p_ct_restricted_to_full[chan->table_type][wordlen - 1][codetab];
|
|
|
|
tab_index = (chan->table_type * 8 + codetab) * 7 + wordlen - 1;
|
|
tab = &atrac3p_spectra_tabs[tab_index];
|
|
|
|
/* this allows reusing VLC tables */
|
|
if (tab->redirect >= 0)
|
|
tab_index = tab->redirect;
|
|
|
|
decode_qu_spectra(gb, tab, &spec_vlc_tabs[tab_index],
|
|
&chan->spectrum[ff_atrac3p_qu_to_spec_pos[qu]],
|
|
num_specs);
|
|
} else if (ch_num && ctx->channels[0].qu_wordlen[qu] && !codetab) {
|
|
/* copy coefficients from master */
|
|
memcpy(&chan->spectrum[ff_atrac3p_qu_to_spec_pos[qu]],
|
|
&ctx->channels[0].spectrum[ff_atrac3p_qu_to_spec_pos[qu]],
|
|
num_specs *
|
|
sizeof(chan->spectrum[ff_atrac3p_qu_to_spec_pos[qu]]));
|
|
chan->qu_wordlen[qu] = ctx->channels[0].qu_wordlen[qu];
|
|
}
|
|
}
|
|
|
|
/* Power compensation levels only present in the bitstream
|
|
* if there are more than 2 quant units. The lowest two units
|
|
* correspond to the frequencies 0...351 Hz, whose shouldn't
|
|
* be affected by the power compensation. */
|
|
if (ctx->used_quant_units > 2) {
|
|
num_specs = atrac3p_subband_to_num_powgrps[ctx->num_coded_subbands - 1];
|
|
for (i = 0; i < num_specs; i++)
|
|
chan->power_levs[i] = get_bits(gb, 4);
|
|
}
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Retrieve specified amount of flag bits from the input bitstream.
|
|
* The data can be shortened in the case of the following two common conditions:
|
|
* if all bits are zero then only one signal bit = 0 will be stored,
|
|
* if all bits are ones then two signal bits = 1,0 will be stored.
|
|
* Otherwise, all necessary bits will be directly stored
|
|
* prefixed by two signal bits = 1,1.
|
|
*
|
|
* @param[in] gb ptr to the GetBitContext
|
|
* @param[out] out where to place decoded flags
|
|
* @param[in] num_flags number of flags to process
|
|
* @return: 0 = all flag bits are zero, 1 = there is at least one non-zero flag bit
|
|
*/
|
|
static int get_subband_flags(GetBitContext *gb, uint8_t *out, int num_flags)
|
|
{
|
|
int i, result;
|
|
|
|
memset(out, 0, num_flags);
|
|
|
|
result = get_bits1(gb);
|
|
if (result) {
|
|
if (get_bits1(gb))
|
|
for (i = 0; i < num_flags; i++)
|
|
out[i] = get_bits1(gb);
|
|
else
|
|
memset(out, 1, num_flags);
|
|
}
|
|
|
|
return result;
|
|
}
|
|
|
|
/**
|
|
* Decode mdct window shape flags for all channels.
|
|
*
|
|
* @param[in] gb the GetBit context
|
|
* @param[in,out] ctx ptr to the channel unit context
|
|
* @param[in] num_channels number of channels to process
|
|
*/
|
|
static void decode_window_shape(GetBitContext *gb, Atrac3pChanUnitCtx *ctx,
|
|
int num_channels)
|
|
{
|
|
int ch_num;
|
|
|
|
for (ch_num = 0; ch_num < num_channels; ch_num++)
|
|
get_subband_flags(gb, ctx->channels[ch_num].wnd_shape,
|
|
ctx->num_subbands);
|
|
}
|
|
|
|
/**
|
|
* Decode number of gain control points.
|
|
*
|
|
* @param[in] gb the GetBit context
|
|
* @param[in,out] ctx ptr to the channel unit context
|
|
* @param[in] ch_num channel to process
|
|
* @param[in] coded_subbands number of subbands to process
|
|
* @return result code: 0 = OK, otherwise - error code
|
|
*/
|
|
static int decode_gainc_npoints(GetBitContext *gb, Atrac3pChanUnitCtx *ctx,
|
|
int ch_num, int coded_subbands)
|
|
{
|
|
int i, delta, delta_bits, min_val;
|
|
Atrac3pChanParams *chan = &ctx->channels[ch_num];
|
|
Atrac3pChanParams *ref_chan = &ctx->channels[0];
|
|
|
|
switch (get_bits(gb, 2)) { /* switch according to coding mode */
|
|
case 0: /* fixed-length coding */
|
|
for (i = 0; i < coded_subbands; i++)
|
|
chan->gain_data[i].num_points = get_bits(gb, 3);
|
|
break;
|
|
case 1: /* variable-length coding */
|
|
for (i = 0; i < coded_subbands; i++)
|
|
chan->gain_data[i].num_points =
|
|
get_vlc2(gb, gain_vlc_tabs[0].table,
|
|
gain_vlc_tabs[0].bits, 1);
|
|
break;
|
|
case 2:
|
|
if (ch_num) { /* VLC modulo delta to master channel */
|
|
for (i = 0; i < coded_subbands; i++) {
|
|
delta = get_vlc2(gb, gain_vlc_tabs[1].table,
|
|
gain_vlc_tabs[1].bits, 1);
|
|
chan->gain_data[i].num_points =
|
|
(ref_chan->gain_data[i].num_points + delta) & 7;
|
|
}
|
|
} else { /* VLC modulo delta to previous */
|
|
chan->gain_data[0].num_points =
|
|
get_vlc2(gb, gain_vlc_tabs[0].table,
|
|
gain_vlc_tabs[0].bits, 1);
|
|
|
|
for (i = 1; i < coded_subbands; i++) {
|
|
delta = get_vlc2(gb, gain_vlc_tabs[1].table,
|
|
gain_vlc_tabs[1].bits, 1);
|
|
chan->gain_data[i].num_points =
|
|
(chan->gain_data[i - 1].num_points + delta) & 7;
|
|
}
|
|
}
|
|
break;
|
|
case 3:
|
|
if (ch_num) { /* copy data from master channel */
|
|
for (i = 0; i < coded_subbands; i++)
|
|
chan->gain_data[i].num_points =
|
|
ref_chan->gain_data[i].num_points;
|
|
} else { /* shorter delta to min */
|
|
delta_bits = get_bits(gb, 2);
|
|
min_val = get_bits(gb, 3);
|
|
|
|
for (i = 0; i < coded_subbands; i++) {
|
|
chan->gain_data[i].num_points = min_val + get_bitsz(gb, delta_bits);
|
|
if (chan->gain_data[i].num_points > 7)
|
|
return AVERROR_INVALIDDATA;
|
|
}
|
|
}
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
/**
|
|
* Implements coding mode 3 (slave) for gain compensation levels.
|
|
*
|
|
* @param[out] dst ptr to the output array
|
|
* @param[in] ref ptr to the reference channel
|
|
*/
|
|
static inline void gainc_level_mode3s(AtracGainInfo *dst, AtracGainInfo *ref)
|
|
{
|
|
int i;
|
|
|
|
for (i = 0; i < dst->num_points; i++)
|
|
dst->lev_code[i] = (i >= ref->num_points) ? 7 : ref->lev_code[i];
|
|
}
|
|
|
|
/**
|
|
* Implements coding mode 1 (master) for gain compensation levels.
|
|
*
|
|
* @param[in] gb the GetBit context
|
|
* @param[in] ctx ptr to the channel unit context
|
|
* @param[out] dst ptr to the output array
|
|
*/
|
|
static inline void gainc_level_mode1m(GetBitContext *gb,
|
|
Atrac3pChanUnitCtx *ctx,
|
|
AtracGainInfo *dst)
|
|
{
|
|
int i, delta;
|
|
|
|
if (dst->num_points > 0)
|
|
dst->lev_code[0] = get_vlc2(gb, gain_vlc_tabs[2].table,
|
|
gain_vlc_tabs[2].bits, 1);
|
|
|
|
for (i = 1; i < dst->num_points; i++) {
|
|
delta = get_vlc2(gb, gain_vlc_tabs[3].table,
|
|
gain_vlc_tabs[3].bits, 1);
|
|
dst->lev_code[i] = (dst->lev_code[i - 1] + delta) & 0xF;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Decode level code for each gain control point.
|
|
*
|
|
* @param[in] gb the GetBit context
|
|
* @param[in,out] ctx ptr to the channel unit context
|
|
* @param[in] ch_num channel to process
|
|
* @param[in] coded_subbands number of subbands to process
|
|
* @return result code: 0 = OK, otherwise - error code
|
|
*/
|
|
static int decode_gainc_levels(GetBitContext *gb, Atrac3pChanUnitCtx *ctx,
|
|
int ch_num, int coded_subbands)
|
|
{
|
|
int sb, i, delta, delta_bits, min_val, pred;
|
|
Atrac3pChanParams *chan = &ctx->channels[ch_num];
|
|
Atrac3pChanParams *ref_chan = &ctx->channels[0];
|
|
|
|
switch (get_bits(gb, 2)) { /* switch according to coding mode */
|
|
case 0: /* fixed-length coding */
|
|
for (sb = 0; sb < coded_subbands; sb++)
|
|
for (i = 0; i < chan->gain_data[sb].num_points; i++)
|
|
chan->gain_data[sb].lev_code[i] = get_bits(gb, 4);
|
|
break;
|
|
case 1:
|
|
if (ch_num) { /* VLC modulo delta to master channel */
|
|
for (sb = 0; sb < coded_subbands; sb++)
|
|
for (i = 0; i < chan->gain_data[sb].num_points; i++) {
|
|
delta = get_vlc2(gb, gain_vlc_tabs[5].table,
|
|
gain_vlc_tabs[5].bits, 1);
|
|
pred = (i >= ref_chan->gain_data[sb].num_points)
|
|
? 7 : ref_chan->gain_data[sb].lev_code[i];
|
|
chan->gain_data[sb].lev_code[i] = (pred + delta) & 0xF;
|
|
}
|
|
} else { /* VLC modulo delta to previous */
|
|
for (sb = 0; sb < coded_subbands; sb++)
|
|
gainc_level_mode1m(gb, ctx, &chan->gain_data[sb]);
|
|
}
|
|
break;
|
|
case 2:
|
|
if (ch_num) { /* VLC modulo delta to previous or clone master */
|
|
for (sb = 0; sb < coded_subbands; sb++)
|
|
if (chan->gain_data[sb].num_points > 0) {
|
|
if (get_bits1(gb))
|
|
gainc_level_mode1m(gb, ctx, &chan->gain_data[sb]);
|
|
else
|
|
gainc_level_mode3s(&chan->gain_data[sb],
|
|
&ref_chan->gain_data[sb]);
|
|
}
|
|
} else { /* VLC modulo delta to lev_codes of previous subband */
|
|
if (chan->gain_data[0].num_points > 0)
|
|
gainc_level_mode1m(gb, ctx, &chan->gain_data[0]);
|
|
|
|
for (sb = 1; sb < coded_subbands; sb++)
|
|
for (i = 0; i < chan->gain_data[sb].num_points; i++) {
|
|
delta = get_vlc2(gb, gain_vlc_tabs[4].table,
|
|
gain_vlc_tabs[4].bits, 1);
|
|
pred = (i >= chan->gain_data[sb - 1].num_points)
|
|
? 7 : chan->gain_data[sb - 1].lev_code[i];
|
|
chan->gain_data[sb].lev_code[i] = (pred + delta) & 0xF;
|
|
}
|
|
}
|
|
break;
|
|
case 3:
|
|
if (ch_num) { /* clone master */
|
|
for (sb = 0; sb < coded_subbands; sb++)
|
|
gainc_level_mode3s(&chan->gain_data[sb],
|
|
&ref_chan->gain_data[sb]);
|
|
} else { /* shorter delta to min */
|
|
delta_bits = get_bits(gb, 2);
|
|
min_val = get_bits(gb, 4);
|
|
|
|
for (sb = 0; sb < coded_subbands; sb++)
|
|
for (i = 0; i < chan->gain_data[sb].num_points; i++) {
|
|
chan->gain_data[sb].lev_code[i] = min_val + get_bitsz(gb, delta_bits);
|
|
if (chan->gain_data[sb].lev_code[i] > 15)
|
|
return AVERROR_INVALIDDATA;
|
|
}
|
|
}
|
|
break;
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
/**
|
|
* Implements coding mode 0 for gain compensation locations.
|
|
*
|
|
* @param[in] gb the GetBit context
|
|
* @param[in] ctx ptr to the channel unit context
|
|
* @param[out] dst ptr to the output array
|
|
* @param[in] pos position of the value to be processed
|
|
*/
|
|
static inline void gainc_loc_mode0(GetBitContext *gb, Atrac3pChanUnitCtx *ctx,
|
|
AtracGainInfo *dst, int pos)
|
|
{
|
|
int delta_bits;
|
|
|
|
if (!pos || dst->loc_code[pos - 1] < 15)
|
|
dst->loc_code[pos] = get_bits(gb, 5);
|
|
else if (dst->loc_code[pos - 1] >= 30)
|
|
dst->loc_code[pos] = 31;
|
|
else {
|
|
delta_bits = av_log2(30 - dst->loc_code[pos - 1]) + 1;
|
|
dst->loc_code[pos] = dst->loc_code[pos - 1] +
|
|
get_bits(gb, delta_bits) + 1;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Implements coding mode 1 for gain compensation locations.
|
|
*
|
|
* @param[in] gb the GetBit context
|
|
* @param[in] ctx ptr to the channel unit context
|
|
* @param[out] dst ptr to the output array
|
|
*/
|
|
static inline void gainc_loc_mode1(GetBitContext *gb, Atrac3pChanUnitCtx *ctx,
|
|
AtracGainInfo *dst)
|
|
{
|
|
int i;
|
|
VLC *tab;
|
|
|
|
if (dst->num_points > 0) {
|
|
/* 1st coefficient is stored directly */
|
|
dst->loc_code[0] = get_bits(gb, 5);
|
|
|
|
for (i = 1; i < dst->num_points; i++) {
|
|
/* switch VLC according to the curve direction
|
|
* (ascending/descending) */
|
|
tab = (dst->lev_code[i] <= dst->lev_code[i - 1])
|
|
? &gain_vlc_tabs[7]
|
|
: &gain_vlc_tabs[9];
|
|
dst->loc_code[i] = dst->loc_code[i - 1] +
|
|
get_vlc2(gb, tab->table, tab->bits, 1);
|
|
}
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Decode location code for each gain control point.
|
|
*
|
|
* @param[in] gb the GetBit context
|
|
* @param[in,out] ctx ptr to the channel unit context
|
|
* @param[in] ch_num channel to process
|
|
* @param[in] coded_subbands number of subbands to process
|
|
* @param[in] avctx ptr to the AVCodecContext
|
|
* @return result code: 0 = OK, otherwise - error code
|
|
*/
|
|
static int decode_gainc_loc_codes(GetBitContext *gb, Atrac3pChanUnitCtx *ctx,
|
|
int ch_num, int coded_subbands,
|
|
AVCodecContext *avctx)
|
|
{
|
|
int sb, i, delta, delta_bits, min_val, pred, more_than_ref;
|
|
AtracGainInfo *dst, *ref;
|
|
VLC *tab;
|
|
Atrac3pChanParams *chan = &ctx->channels[ch_num];
|
|
Atrac3pChanParams *ref_chan = &ctx->channels[0];
|
|
|
|
switch (get_bits(gb, 2)) { /* switch according to coding mode */
|
|
case 0: /* sequence of numbers in ascending order */
|
|
for (sb = 0; sb < coded_subbands; sb++)
|
|
for (i = 0; i < chan->gain_data[sb].num_points; i++)
|
|
gainc_loc_mode0(gb, ctx, &chan->gain_data[sb], i);
|
|
break;
|
|
case 1:
|
|
if (ch_num) {
|
|
for (sb = 0; sb < coded_subbands; sb++) {
|
|
if (chan->gain_data[sb].num_points <= 0)
|
|
continue;
|
|
dst = &chan->gain_data[sb];
|
|
ref = &ref_chan->gain_data[sb];
|
|
|
|
/* 1st value is vlc-coded modulo delta to master */
|
|
delta = get_vlc2(gb, gain_vlc_tabs[10].table,
|
|
gain_vlc_tabs[10].bits, 1);
|
|
pred = ref->num_points > 0 ? ref->loc_code[0] : 0;
|
|
dst->loc_code[0] = (pred + delta) & 0x1F;
|
|
|
|
for (i = 1; i < dst->num_points; i++) {
|
|
more_than_ref = i >= ref->num_points;
|
|
if (dst->lev_code[i] > dst->lev_code[i - 1]) {
|
|
/* ascending curve */
|
|
if (more_than_ref) {
|
|
delta =
|
|
get_vlc2(gb, gain_vlc_tabs[9].table,
|
|
gain_vlc_tabs[9].bits, 1);
|
|
dst->loc_code[i] = dst->loc_code[i - 1] + delta;
|
|
} else {
|
|
if (get_bits1(gb))
|
|
gainc_loc_mode0(gb, ctx, dst, i); // direct coding
|
|
else
|
|
dst->loc_code[i] = ref->loc_code[i]; // clone master
|
|
}
|
|
} else { /* descending curve */
|
|
tab = more_than_ref ? &gain_vlc_tabs[7]
|
|
: &gain_vlc_tabs[10];
|
|
delta = get_vlc2(gb, tab->table, tab->bits, 1);
|
|
if (more_than_ref)
|
|
dst->loc_code[i] = dst->loc_code[i - 1] + delta;
|
|
else
|
|
dst->loc_code[i] = (ref->loc_code[i] + delta) & 0x1F;
|
|
}
|
|
}
|
|
}
|
|
} else /* VLC delta to previous */
|
|
for (sb = 0; sb < coded_subbands; sb++)
|
|
gainc_loc_mode1(gb, ctx, &chan->gain_data[sb]);
|
|
break;
|
|
case 2:
|
|
if (ch_num) {
|
|
for (sb = 0; sb < coded_subbands; sb++) {
|
|
if (chan->gain_data[sb].num_points <= 0)
|
|
continue;
|
|
dst = &chan->gain_data[sb];
|
|
ref = &ref_chan->gain_data[sb];
|
|
if (dst->num_points > ref->num_points || get_bits1(gb))
|
|
gainc_loc_mode1(gb, ctx, dst);
|
|
else /* clone master for the whole subband */
|
|
for (i = 0; i < chan->gain_data[sb].num_points; i++)
|
|
dst->loc_code[i] = ref->loc_code[i];
|
|
}
|
|
} else {
|
|
/* data for the first subband is coded directly */
|
|
for (i = 0; i < chan->gain_data[0].num_points; i++)
|
|
gainc_loc_mode0(gb, ctx, &chan->gain_data[0], i);
|
|
|
|
for (sb = 1; sb < coded_subbands; sb++) {
|
|
if (chan->gain_data[sb].num_points <= 0)
|
|
continue;
|
|
dst = &chan->gain_data[sb];
|
|
|
|
/* 1st value is vlc-coded modulo delta to the corresponding
|
|
* value of the previous subband if any or zero */
|
|
delta = get_vlc2(gb, gain_vlc_tabs[6].table,
|
|
gain_vlc_tabs[6].bits, 1);
|
|
pred = dst[-1].num_points > 0
|
|
? dst[-1].loc_code[0] : 0;
|
|
dst->loc_code[0] = (pred + delta) & 0x1F;
|
|
|
|
for (i = 1; i < dst->num_points; i++) {
|
|
more_than_ref = i >= dst[-1].num_points;
|
|
/* Select VLC table according to curve direction and
|
|
* presence of prediction. */
|
|
tab = &gain_vlc_tabs[(dst->lev_code[i] > dst->lev_code[i - 1]) *
|
|
2 + more_than_ref + 6];
|
|
delta = get_vlc2(gb, tab->table, tab->bits, 1);
|
|
if (more_than_ref)
|
|
dst->loc_code[i] = dst->loc_code[i - 1] + delta;
|
|
else
|
|
dst->loc_code[i] = (dst[-1].loc_code[i] + delta) & 0x1F;
|
|
}
|
|
}
|
|
}
|
|
break;
|
|
case 3:
|
|
if (ch_num) { /* clone master or direct or direct coding */
|
|
for (sb = 0; sb < coded_subbands; sb++)
|
|
for (i = 0; i < chan->gain_data[sb].num_points; i++) {
|
|
if (i >= ref_chan->gain_data[sb].num_points)
|
|
gainc_loc_mode0(gb, ctx, &chan->gain_data[sb], i);
|
|
else
|
|
chan->gain_data[sb].loc_code[i] =
|
|
ref_chan->gain_data[sb].loc_code[i];
|
|
}
|
|
} else { /* shorter delta to min */
|
|
delta_bits = get_bits(gb, 2) + 1;
|
|
min_val = get_bits(gb, 5);
|
|
|
|
for (sb = 0; sb < coded_subbands; sb++)
|
|
for (i = 0; i < chan->gain_data[sb].num_points; i++)
|
|
chan->gain_data[sb].loc_code[i] = min_val + i +
|
|
get_bits(gb, delta_bits);
|
|
}
|
|
break;
|
|
}
|
|
|
|
/* Validate decoded information */
|
|
for (sb = 0; sb < coded_subbands; sb++) {
|
|
dst = &chan->gain_data[sb];
|
|
for (i = 0; i < chan->gain_data[sb].num_points; i++) {
|
|
if (dst->loc_code[i] < 0 || dst->loc_code[i] > 31 ||
|
|
(i && dst->loc_code[i] <= dst->loc_code[i - 1])) {
|
|
av_log(avctx, AV_LOG_ERROR,
|
|
"Invalid gain location: ch=%d, sb=%d, pos=%d, val=%d\n",
|
|
ch_num, sb, i, dst->loc_code[i]);
|
|
return AVERROR_INVALIDDATA;
|
|
}
|
|
}
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
/**
|
|
* Decode gain control data for all channels.
|
|
*
|
|
* @param[in] gb the GetBit context
|
|
* @param[in,out] ctx ptr to the channel unit context
|
|
* @param[in] num_channels number of channels to process
|
|
* @param[in] avctx ptr to the AVCodecContext
|
|
* @return result code: 0 = OK, otherwise - error code
|
|
*/
|
|
static int decode_gainc_data(GetBitContext *gb, Atrac3pChanUnitCtx *ctx,
|
|
int num_channels, AVCodecContext *avctx)
|
|
{
|
|
int ch_num, coded_subbands, sb, ret;
|
|
|
|
for (ch_num = 0; ch_num < num_channels; ch_num++) {
|
|
memset(ctx->channels[ch_num].gain_data, 0,
|
|
sizeof(*ctx->channels[ch_num].gain_data) * ATRAC3P_SUBBANDS);
|
|
|
|
if (get_bits1(gb)) { /* gain control data present? */
|
|
coded_subbands = get_bits(gb, 4) + 1;
|
|
if (get_bits1(gb)) /* is high band gain data replication on? */
|
|
ctx->channels[ch_num].num_gain_subbands = get_bits(gb, 4) + 1;
|
|
else
|
|
ctx->channels[ch_num].num_gain_subbands = coded_subbands;
|
|
|
|
if ((ret = decode_gainc_npoints(gb, ctx, ch_num, coded_subbands)) < 0 ||
|
|
(ret = decode_gainc_levels(gb, ctx, ch_num, coded_subbands)) < 0 ||
|
|
(ret = decode_gainc_loc_codes(gb, ctx, ch_num, coded_subbands, avctx)) < 0)
|
|
return ret;
|
|
|
|
if (coded_subbands > 0) { /* propagate gain data if requested */
|
|
for (sb = coded_subbands; sb < ctx->channels[ch_num].num_gain_subbands; sb++)
|
|
ctx->channels[ch_num].gain_data[sb] =
|
|
ctx->channels[ch_num].gain_data[sb - 1];
|
|
}
|
|
} else {
|
|
ctx->channels[ch_num].num_gain_subbands = 0;
|
|
}
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
/**
|
|
* Decode envelope for all tones of a channel.
|
|
*
|
|
* @param[in] gb the GetBit context
|
|
* @param[in,out] ctx ptr to the channel unit context
|
|
* @param[in] ch_num channel to process
|
|
* @param[in] band_has_tones ptr to an array of per-band-flags:
|
|
* 1 - tone data present
|
|
*/
|
|
static void decode_tones_envelope(GetBitContext *gb, Atrac3pChanUnitCtx *ctx,
|
|
int ch_num, int band_has_tones[])
|
|
{
|
|
int sb;
|
|
Atrac3pWavesData *dst = ctx->channels[ch_num].tones_info;
|
|
Atrac3pWavesData *ref = ctx->channels[0].tones_info;
|
|
|
|
if (!ch_num || !get_bits1(gb)) { /* mode 0: fixed-length coding */
|
|
for (sb = 0; sb < ctx->waves_info->num_tone_bands; sb++) {
|
|
if (!band_has_tones[sb])
|
|
continue;
|
|
dst[sb].pend_env.has_start_point = get_bits1(gb);
|
|
dst[sb].pend_env.start_pos = dst[sb].pend_env.has_start_point
|
|
? get_bits(gb, 5) : -1;
|
|
dst[sb].pend_env.has_stop_point = get_bits1(gb);
|
|
dst[sb].pend_env.stop_pos = dst[sb].pend_env.has_stop_point
|
|
? get_bits(gb, 5) : 32;
|
|
}
|
|
} else { /* mode 1(slave only): copy master */
|
|
for (sb = 0; sb < ctx->waves_info->num_tone_bands; sb++) {
|
|
if (!band_has_tones[sb])
|
|
continue;
|
|
dst[sb].pend_env.has_start_point = ref[sb].pend_env.has_start_point;
|
|
dst[sb].pend_env.has_stop_point = ref[sb].pend_env.has_stop_point;
|
|
dst[sb].pend_env.start_pos = ref[sb].pend_env.start_pos;
|
|
dst[sb].pend_env.stop_pos = ref[sb].pend_env.stop_pos;
|
|
}
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Decode number of tones for each subband of a channel.
|
|
*
|
|
* @param[in] gb the GetBit context
|
|
* @param[in,out] ctx ptr to the channel unit context
|
|
* @param[in] ch_num channel to process
|
|
* @param[in] band_has_tones ptr to an array of per-band-flags:
|
|
* 1 - tone data present
|
|
* @param[in] avctx ptr to the AVCodecContext
|
|
* @return result code: 0 = OK, otherwise - error code
|
|
*/
|
|
static int decode_band_numwavs(GetBitContext *gb, Atrac3pChanUnitCtx *ctx,
|
|
int ch_num, int band_has_tones[],
|
|
AVCodecContext *avctx)
|
|
{
|
|
int mode, sb, delta;
|
|
Atrac3pWavesData *dst = ctx->channels[ch_num].tones_info;
|
|
Atrac3pWavesData *ref = ctx->channels[0].tones_info;
|
|
|
|
mode = get_bits(gb, ch_num + 1);
|
|
switch (mode) {
|
|
case 0: /** fixed-length coding */
|
|
for (sb = 0; sb < ctx->waves_info->num_tone_bands; sb++)
|
|
if (band_has_tones[sb])
|
|
dst[sb].num_wavs = get_bits(gb, 4);
|
|
break;
|
|
case 1: /** variable-length coding */
|
|
for (sb = 0; sb < ctx->waves_info->num_tone_bands; sb++)
|
|
if (band_has_tones[sb])
|
|
dst[sb].num_wavs =
|
|
get_vlc2(gb, tone_vlc_tabs[1].table,
|
|
tone_vlc_tabs[1].bits, 1);
|
|
break;
|
|
case 2: /** VLC modulo delta to master (slave only) */
|
|
for (sb = 0; sb < ctx->waves_info->num_tone_bands; sb++)
|
|
if (band_has_tones[sb]) {
|
|
delta = get_vlc2(gb, tone_vlc_tabs[2].table,
|
|
tone_vlc_tabs[2].bits, 1);
|
|
delta = sign_extend(delta, 3);
|
|
dst[sb].num_wavs = (ref[sb].num_wavs + delta) & 0xF;
|
|
}
|
|
break;
|
|
case 3: /** copy master (slave only) */
|
|
for (sb = 0; sb < ctx->waves_info->num_tone_bands; sb++)
|
|
if (band_has_tones[sb])
|
|
dst[sb].num_wavs = ref[sb].num_wavs;
|
|
break;
|
|
}
|
|
|
|
/** initialize start tone index for each subband */
|
|
for (sb = 0; sb < ctx->waves_info->num_tone_bands; sb++)
|
|
if (band_has_tones[sb]) {
|
|
if (ctx->waves_info->tones_index + dst[sb].num_wavs > 48) {
|
|
av_log(avctx, AV_LOG_ERROR,
|
|
"Too many tones: %d (max. 48), frame: %d!\n",
|
|
ctx->waves_info->tones_index + dst[sb].num_wavs,
|
|
avctx->frame_number);
|
|
return AVERROR_INVALIDDATA;
|
|
}
|
|
dst[sb].start_index = ctx->waves_info->tones_index;
|
|
ctx->waves_info->tones_index += dst[sb].num_wavs;
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
/**
|
|
* Decode frequency information for each subband of a channel.
|
|
*
|
|
* @param[in] gb the GetBit context
|
|
* @param[in,out] ctx ptr to the channel unit context
|
|
* @param[in] ch_num channel to process
|
|
* @param[in] band_has_tones ptr to an array of per-band-flags:
|
|
* 1 - tone data present
|
|
*/
|
|
static void decode_tones_frequency(GetBitContext *gb, Atrac3pChanUnitCtx *ctx,
|
|
int ch_num, int band_has_tones[])
|
|
{
|
|
int sb, i, direction, nbits, pred, delta;
|
|
Atrac3pWaveParam *iwav, *owav;
|
|
Atrac3pWavesData *dst = ctx->channels[ch_num].tones_info;
|
|
Atrac3pWavesData *ref = ctx->channels[0].tones_info;
|
|
|
|
if (!ch_num || !get_bits1(gb)) { /* mode 0: fixed-length coding */
|
|
for (sb = 0; sb < ctx->waves_info->num_tone_bands; sb++) {
|
|
if (!band_has_tones[sb] || !dst[sb].num_wavs)
|
|
continue;
|
|
iwav = &ctx->waves_info->waves[dst[sb].start_index];
|
|
direction = (dst[sb].num_wavs > 1) ? get_bits1(gb) : 0;
|
|
if (direction) { /** packed numbers in descending order */
|
|
if (dst[sb].num_wavs)
|
|
iwav[dst[sb].num_wavs - 1].freq_index = get_bits(gb, 10);
|
|
for (i = dst[sb].num_wavs - 2; i >= 0 ; i--) {
|
|
nbits = av_log2(iwav[i+1].freq_index) + 1;
|
|
iwav[i].freq_index = get_bits(gb, nbits);
|
|
}
|
|
} else { /** packed numbers in ascending order */
|
|
for (i = 0; i < dst[sb].num_wavs; i++) {
|
|
if (!i || iwav[i - 1].freq_index < 512)
|
|
iwav[i].freq_index = get_bits(gb, 10);
|
|
else {
|
|
nbits = av_log2(1023 - iwav[i - 1].freq_index) + 1;
|
|
iwav[i].freq_index = get_bits(gb, nbits) +
|
|
1024 - (1 << nbits);
|
|
}
|
|
}
|
|
}
|
|
}
|
|
} else { /* mode 1: VLC modulo delta to master (slave only) */
|
|
for (sb = 0; sb < ctx->waves_info->num_tone_bands; sb++) {
|
|
if (!band_has_tones[sb] || !dst[sb].num_wavs)
|
|
continue;
|
|
iwav = &ctx->waves_info->waves[ref[sb].start_index];
|
|
owav = &ctx->waves_info->waves[dst[sb].start_index];
|
|
for (i = 0; i < dst[sb].num_wavs; i++) {
|
|
delta = get_vlc2(gb, tone_vlc_tabs[6].table,
|
|
tone_vlc_tabs[6].bits, 1);
|
|
delta = sign_extend(delta, 8);
|
|
pred = (i < ref[sb].num_wavs) ? iwav[i].freq_index :
|
|
(ref[sb].num_wavs ? iwav[ref[sb].num_wavs - 1].freq_index : 0);
|
|
owav[i].freq_index = (pred + delta) & 0x3FF;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Decode amplitude information for each subband of a channel.
|
|
*
|
|
* @param[in] gb the GetBit context
|
|
* @param[in,out] ctx ptr to the channel unit context
|
|
* @param[in] ch_num channel to process
|
|
* @param[in] band_has_tones ptr to an array of per-band-flags:
|
|
* 1 - tone data present
|
|
*/
|
|
static void decode_tones_amplitude(GetBitContext *gb, Atrac3pChanUnitCtx *ctx,
|
|
int ch_num, int band_has_tones[])
|
|
{
|
|
int mode, sb, j, i, diff, maxdiff, fi, delta, pred;
|
|
Atrac3pWaveParam *wsrc, *wref;
|
|
int refwaves[48] = { 0 };
|
|
Atrac3pWavesData *dst = ctx->channels[ch_num].tones_info;
|
|
Atrac3pWavesData *ref = ctx->channels[0].tones_info;
|
|
|
|
if (ch_num) {
|
|
for (sb = 0; sb < ctx->waves_info->num_tone_bands; sb++) {
|
|
if (!band_has_tones[sb] || !dst[sb].num_wavs)
|
|
continue;
|
|
wsrc = &ctx->waves_info->waves[dst[sb].start_index];
|
|
wref = &ctx->waves_info->waves[ref[sb].start_index];
|
|
for (j = 0; j < dst[sb].num_wavs; j++) {
|
|
for (i = 0, fi = 0, maxdiff = 1024; i < ref[sb].num_wavs; i++) {
|
|
diff = FFABS(wsrc[j].freq_index - wref[i].freq_index);
|
|
if (diff < maxdiff) {
|
|
maxdiff = diff;
|
|
fi = i;
|
|
}
|
|
}
|
|
|
|
if (maxdiff < 8)
|
|
refwaves[dst[sb].start_index + j] = fi + ref[sb].start_index;
|
|
else if (j < ref[sb].num_wavs)
|
|
refwaves[dst[sb].start_index + j] = j + ref[sb].start_index;
|
|
else
|
|
refwaves[dst[sb].start_index + j] = -1;
|
|
}
|
|
}
|
|
}
|
|
|
|
mode = get_bits(gb, ch_num + 1);
|
|
|
|
switch (mode) {
|
|
case 0: /** fixed-length coding */
|
|
for (sb = 0; sb < ctx->waves_info->num_tone_bands; sb++) {
|
|
if (!band_has_tones[sb] || !dst[sb].num_wavs)
|
|
continue;
|
|
if (ctx->waves_info->amplitude_mode)
|
|
for (i = 0; i < dst[sb].num_wavs; i++)
|
|
ctx->waves_info->waves[dst[sb].start_index + i].amp_sf = get_bits(gb, 6);
|
|
else
|
|
ctx->waves_info->waves[dst[sb].start_index].amp_sf = get_bits(gb, 6);
|
|
}
|
|
break;
|
|
case 1: /** min + VLC delta */
|
|
for (sb = 0; sb < ctx->waves_info->num_tone_bands; sb++) {
|
|
if (!band_has_tones[sb] || !dst[sb].num_wavs)
|
|
continue;
|
|
if (ctx->waves_info->amplitude_mode)
|
|
for (i = 0; i < dst[sb].num_wavs; i++)
|
|
ctx->waves_info->waves[dst[sb].start_index + i].amp_sf =
|
|
get_vlc2(gb, tone_vlc_tabs[3].table,
|
|
tone_vlc_tabs[3].bits, 1) + 20;
|
|
else
|
|
ctx->waves_info->waves[dst[sb].start_index].amp_sf =
|
|
get_vlc2(gb, tone_vlc_tabs[4].table,
|
|
tone_vlc_tabs[4].bits, 1) + 24;
|
|
}
|
|
break;
|
|
case 2: /** VLC modulo delta to master (slave only) */
|
|
for (sb = 0; sb < ctx->waves_info->num_tone_bands; sb++) {
|
|
if (!band_has_tones[sb] || !dst[sb].num_wavs)
|
|
continue;
|
|
for (i = 0; i < dst[sb].num_wavs; i++) {
|
|
delta = get_vlc2(gb, tone_vlc_tabs[5].table,
|
|
tone_vlc_tabs[5].bits, 1);
|
|
delta = sign_extend(delta, 5);
|
|
pred = refwaves[dst[sb].start_index + i] >= 0 ?
|
|
ctx->waves_info->waves[refwaves[dst[sb].start_index + i]].amp_sf : 34;
|
|
ctx->waves_info->waves[dst[sb].start_index + i].amp_sf = (pred + delta) & 0x3F;
|
|
}
|
|
}
|
|
break;
|
|
case 3: /** clone master (slave only) */
|
|
for (sb = 0; sb < ctx->waves_info->num_tone_bands; sb++) {
|
|
if (!band_has_tones[sb])
|
|
continue;
|
|
for (i = 0; i < dst[sb].num_wavs; i++)
|
|
ctx->waves_info->waves[dst[sb].start_index + i].amp_sf =
|
|
refwaves[dst[sb].start_index + i] >= 0
|
|
? ctx->waves_info->waves[refwaves[dst[sb].start_index + i]].amp_sf
|
|
: 32;
|
|
}
|
|
break;
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Decode phase information for each subband of a channel.
|
|
*
|
|
* @param[in] gb the GetBit context
|
|
* @param[in,out] ctx ptr to the channel unit context
|
|
* @param[in] ch_num channel to process
|
|
* @param[in] band_has_tones ptr to an array of per-band-flags:
|
|
* 1 - tone data present
|
|
*/
|
|
static void decode_tones_phase(GetBitContext *gb, Atrac3pChanUnitCtx *ctx,
|
|
int ch_num, int band_has_tones[])
|
|
{
|
|
int sb, i;
|
|
Atrac3pWaveParam *wparam;
|
|
Atrac3pWavesData *dst = ctx->channels[ch_num].tones_info;
|
|
|
|
for (sb = 0; sb < ctx->waves_info->num_tone_bands; sb++) {
|
|
if (!band_has_tones[sb])
|
|
continue;
|
|
wparam = &ctx->waves_info->waves[dst[sb].start_index];
|
|
for (i = 0; i < dst[sb].num_wavs; i++)
|
|
wparam[i].phase_index = get_bits(gb, 5);
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Decode tones info for all channels.
|
|
*
|
|
* @param[in] gb the GetBit context
|
|
* @param[in,out] ctx ptr to the channel unit context
|
|
* @param[in] num_channels number of channels to process
|
|
* @param[in] avctx ptr to the AVCodecContext
|
|
* @return result code: 0 = OK, otherwise - error code
|
|
*/
|
|
static int decode_tones_info(GetBitContext *gb, Atrac3pChanUnitCtx *ctx,
|
|
int num_channels, AVCodecContext *avctx)
|
|
{
|
|
int ch_num, i, ret;
|
|
int band_has_tones[16];
|
|
|
|
for (ch_num = 0; ch_num < num_channels; ch_num++)
|
|
memset(ctx->channels[ch_num].tones_info, 0,
|
|
sizeof(*ctx->channels[ch_num].tones_info) * ATRAC3P_SUBBANDS);
|
|
|
|
ctx->waves_info->tones_present = get_bits1(gb);
|
|
if (!ctx->waves_info->tones_present)
|
|
return 0;
|
|
|
|
memset(ctx->waves_info->waves, 0, sizeof(ctx->waves_info->waves));
|
|
|
|
ctx->waves_info->amplitude_mode = get_bits1(gb);
|
|
if (!ctx->waves_info->amplitude_mode) {
|
|
avpriv_report_missing_feature(avctx, "GHA amplitude mode 0");
|
|
return AVERROR_PATCHWELCOME;
|
|
}
|
|
|
|
ctx->waves_info->num_tone_bands =
|
|
get_vlc2(gb, tone_vlc_tabs[0].table,
|
|
tone_vlc_tabs[0].bits, 1) + 1;
|
|
|
|
if (num_channels == 2) {
|
|
get_subband_flags(gb, ctx->waves_info->tone_sharing, ctx->waves_info->num_tone_bands);
|
|
get_subband_flags(gb, ctx->waves_info->tone_master, ctx->waves_info->num_tone_bands);
|
|
get_subband_flags(gb, ctx->waves_info->invert_phase, ctx->waves_info->num_tone_bands);
|
|
}
|
|
|
|
ctx->waves_info->tones_index = 0;
|
|
|
|
for (ch_num = 0; ch_num < num_channels; ch_num++) {
|
|
for (i = 0; i < ctx->waves_info->num_tone_bands; i++)
|
|
band_has_tones[i] = !ch_num ? 1 : !ctx->waves_info->tone_sharing[i];
|
|
|
|
decode_tones_envelope(gb, ctx, ch_num, band_has_tones);
|
|
if ((ret = decode_band_numwavs(gb, ctx, ch_num, band_has_tones,
|
|
avctx)) < 0)
|
|
return ret;
|
|
|
|
decode_tones_frequency(gb, ctx, ch_num, band_has_tones);
|
|
decode_tones_amplitude(gb, ctx, ch_num, band_has_tones);
|
|
decode_tones_phase(gb, ctx, ch_num, band_has_tones);
|
|
}
|
|
|
|
if (num_channels == 2) {
|
|
for (i = 0; i < ctx->waves_info->num_tone_bands; i++) {
|
|
if (ctx->waves_info->tone_sharing[i])
|
|
ctx->channels[1].tones_info[i] = ctx->channels[0].tones_info[i];
|
|
|
|
if (ctx->waves_info->tone_master[i])
|
|
FFSWAP(Atrac3pWavesData, ctx->channels[0].tones_info[i],
|
|
ctx->channels[1].tones_info[i]);
|
|
}
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
int ff_atrac3p_decode_channel_unit(GetBitContext *gb, Atrac3pChanUnitCtx *ctx,
|
|
int num_channels, AVCodecContext *avctx)
|
|
{
|
|
int ret;
|
|
|
|
/* parse sound header */
|
|
ctx->num_quant_units = get_bits(gb, 5) + 1;
|
|
if (ctx->num_quant_units > 28 && ctx->num_quant_units < 32) {
|
|
av_log(avctx, AV_LOG_ERROR,
|
|
"Invalid number of quantization units: %d!\n",
|
|
ctx->num_quant_units);
|
|
return AVERROR_INVALIDDATA;
|
|
}
|
|
|
|
ctx->mute_flag = get_bits1(gb);
|
|
|
|
/* decode various sound parameters */
|
|
if ((ret = decode_quant_wordlen(gb, ctx, num_channels, avctx)) < 0)
|
|
return ret;
|
|
|
|
ctx->num_subbands = atrac3p_qu_to_subband[ctx->num_quant_units - 1] + 1;
|
|
ctx->num_coded_subbands = ctx->used_quant_units
|
|
? atrac3p_qu_to_subband[ctx->used_quant_units - 1] + 1
|
|
: 0;
|
|
|
|
if ((ret = decode_scale_factors(gb, ctx, num_channels, avctx)) < 0)
|
|
return ret;
|
|
|
|
if ((ret = decode_code_table_indexes(gb, ctx, num_channels, avctx)) < 0)
|
|
return ret;
|
|
|
|
decode_spectrum(gb, ctx, num_channels, avctx);
|
|
|
|
if (num_channels == 2) {
|
|
get_subband_flags(gb, ctx->swap_channels, ctx->num_coded_subbands);
|
|
get_subband_flags(gb, ctx->negate_coeffs, ctx->num_coded_subbands);
|
|
}
|
|
|
|
decode_window_shape(gb, ctx, num_channels);
|
|
|
|
if ((ret = decode_gainc_data(gb, ctx, num_channels, avctx)) < 0)
|
|
return ret;
|
|
|
|
if ((ret = decode_tones_info(gb, ctx, num_channels, avctx)) < 0)
|
|
return ret;
|
|
|
|
/* decode global noise info */
|
|
ctx->noise_present = get_bits1(gb);
|
|
if (ctx->noise_present) {
|
|
ctx->noise_level_index = get_bits(gb, 4);
|
|
ctx->noise_table_index = get_bits(gb, 4);
|
|
}
|
|
|
|
return 0;
|
|
}
|