Chris@69: /*********************************************************************** Chris@69: Copyright (c) 2006-2011, Skype Limited. All rights reserved. Chris@69: Redistribution and use in source and binary forms, with or without Chris@69: modification, are permitted provided that the following conditions Chris@69: are met: Chris@69: - Redistributions of source code must retain the above copyright notice, Chris@69: this list of conditions and the following disclaimer. Chris@69: - Redistributions in binary form must reproduce the above copyright Chris@69: notice, this list of conditions and the following disclaimer in the Chris@69: documentation and/or other materials provided with the distribution. Chris@69: - Neither the name of Internet Society, IETF or IETF Trust, nor the Chris@69: names of specific contributors, may be used to endorse or promote Chris@69: products derived from this software without specific prior written Chris@69: permission. Chris@69: THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" Chris@69: AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE Chris@69: IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE Chris@69: ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE Chris@69: LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR Chris@69: CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF Chris@69: SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS Chris@69: INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN Chris@69: CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) Chris@69: ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE Chris@69: POSSIBILITY OF SUCH DAMAGE. Chris@69: ***********************************************************************/ Chris@69: Chris@69: #ifdef HAVE_CONFIG_H Chris@69: #include "config.h" Chris@69: #endif Chris@69: Chris@69: #include "main.h" Chris@69: #include "tuning_parameters.h" Chris@69: Chris@69: void silk_quant_LTP_gains( Chris@69: opus_int16 B_Q14[ MAX_NB_SUBFR * LTP_ORDER ], /* O Quantized LTP gains */ Chris@69: opus_int8 cbk_index[ MAX_NB_SUBFR ], /* O Codebook Index */ Chris@69: opus_int8 *periodicity_index, /* O Periodicity Index */ Chris@69: opus_int32 *sum_log_gain_Q7, /* I/O Cumulative max prediction gain */ Chris@69: opus_int *pred_gain_dB_Q7, /* O LTP prediction gain */ Chris@69: const opus_int32 XX_Q17[ MAX_NB_SUBFR*LTP_ORDER*LTP_ORDER ], /* I Correlation matrix in Q18 */ Chris@69: const opus_int32 xX_Q17[ MAX_NB_SUBFR*LTP_ORDER ], /* I Correlation vector in Q18 */ Chris@69: const opus_int subfr_len, /* I Number of samples per subframe */ Chris@69: const opus_int nb_subfr, /* I Number of subframes */ Chris@69: int arch /* I Run-time architecture */ Chris@69: ) Chris@69: { Chris@69: opus_int j, k, cbk_size; Chris@69: opus_int8 temp_idx[ MAX_NB_SUBFR ]; Chris@69: const opus_uint8 *cl_ptr_Q5; Chris@69: const opus_int8 *cbk_ptr_Q7; Chris@69: const opus_uint8 *cbk_gain_ptr_Q7; Chris@69: const opus_int32 *XX_Q17_ptr, *xX_Q17_ptr; Chris@69: opus_int32 res_nrg_Q15_subfr, res_nrg_Q15, rate_dist_Q7_subfr, rate_dist_Q7, min_rate_dist_Q7; Chris@69: opus_int32 sum_log_gain_tmp_Q7, best_sum_log_gain_Q7, max_gain_Q7; Chris@69: opus_int gain_Q7; Chris@69: Chris@69: /***************************************************/ Chris@69: /* iterate over different codebooks with different */ Chris@69: /* rates/distortions, and choose best */ Chris@69: /***************************************************/ Chris@69: min_rate_dist_Q7 = silk_int32_MAX; Chris@69: best_sum_log_gain_Q7 = 0; Chris@69: for( k = 0; k < 3; k++ ) { Chris@69: /* Safety margin for pitch gain control, to take into account factors Chris@69: such as state rescaling/rewhitening. */ Chris@69: opus_int32 gain_safety = SILK_FIX_CONST( 0.4, 7 ); Chris@69: Chris@69: cl_ptr_Q5 = silk_LTP_gain_BITS_Q5_ptrs[ k ]; Chris@69: cbk_ptr_Q7 = silk_LTP_vq_ptrs_Q7[ k ]; Chris@69: cbk_gain_ptr_Q7 = silk_LTP_vq_gain_ptrs_Q7[ k ]; Chris@69: cbk_size = silk_LTP_vq_sizes[ k ]; Chris@69: Chris@69: /* Set up pointers to first subframe */ Chris@69: XX_Q17_ptr = XX_Q17; Chris@69: xX_Q17_ptr = xX_Q17; Chris@69: Chris@69: res_nrg_Q15 = 0; Chris@69: rate_dist_Q7 = 0; Chris@69: sum_log_gain_tmp_Q7 = *sum_log_gain_Q7; Chris@69: for( j = 0; j < nb_subfr; j++ ) { Chris@69: max_gain_Q7 = silk_log2lin( ( SILK_FIX_CONST( MAX_SUM_LOG_GAIN_DB / 6.0, 7 ) - sum_log_gain_tmp_Q7 ) Chris@69: + SILK_FIX_CONST( 7, 7 ) ) - gain_safety; Chris@69: silk_VQ_WMat_EC( Chris@69: &temp_idx[ j ], /* O index of best codebook vector */ Chris@69: &res_nrg_Q15_subfr, /* O residual energy */ Chris@69: &rate_dist_Q7_subfr, /* O best weighted quantization error + mu * rate */ Chris@69: &gain_Q7, /* O sum of absolute LTP coefficients */ Chris@69: XX_Q17_ptr, /* I correlation matrix */ Chris@69: xX_Q17_ptr, /* I correlation vector */ Chris@69: cbk_ptr_Q7, /* I codebook */ Chris@69: cbk_gain_ptr_Q7, /* I codebook effective gains */ Chris@69: cl_ptr_Q5, /* I code length for each codebook vector */ Chris@69: subfr_len, /* I number of samples per subframe */ Chris@69: max_gain_Q7, /* I maximum sum of absolute LTP coefficients */ Chris@69: cbk_size, /* I number of vectors in codebook */ Chris@69: arch /* I Run-time architecture */ Chris@69: ); Chris@69: Chris@69: res_nrg_Q15 = silk_ADD_POS_SAT32( res_nrg_Q15, res_nrg_Q15_subfr ); Chris@69: rate_dist_Q7 = silk_ADD_POS_SAT32( rate_dist_Q7, rate_dist_Q7_subfr ); Chris@69: sum_log_gain_tmp_Q7 = silk_max(0, sum_log_gain_tmp_Q7 Chris@69: + silk_lin2log( gain_safety + gain_Q7 ) - SILK_FIX_CONST( 7, 7 )); Chris@69: Chris@69: XX_Q17_ptr += LTP_ORDER * LTP_ORDER; Chris@69: xX_Q17_ptr += LTP_ORDER; Chris@69: } Chris@69: Chris@69: if( rate_dist_Q7 <= min_rate_dist_Q7 ) { Chris@69: min_rate_dist_Q7 = rate_dist_Q7; Chris@69: *periodicity_index = (opus_int8)k; Chris@69: silk_memcpy( cbk_index, temp_idx, nb_subfr * sizeof( opus_int8 ) ); Chris@69: best_sum_log_gain_Q7 = sum_log_gain_tmp_Q7; Chris@69: } Chris@69: } Chris@69: Chris@69: cbk_ptr_Q7 = silk_LTP_vq_ptrs_Q7[ *periodicity_index ]; Chris@69: for( j = 0; j < nb_subfr; j++ ) { Chris@69: for( k = 0; k < LTP_ORDER; k++ ) { Chris@69: B_Q14[ j * LTP_ORDER + k ] = silk_LSHIFT( cbk_ptr_Q7[ cbk_index[ j ] * LTP_ORDER + k ], 7 ); Chris@69: } Chris@69: } Chris@69: Chris@69: if( nb_subfr == 2 ) { Chris@69: res_nrg_Q15 = silk_RSHIFT32( res_nrg_Q15, 1 ); Chris@69: } else { Chris@69: res_nrg_Q15 = silk_RSHIFT32( res_nrg_Q15, 2 ); Chris@69: } Chris@69: Chris@69: *sum_log_gain_Q7 = best_sum_log_gain_Q7; Chris@69: *pred_gain_dB_Q7 = (opus_int)silk_SMULBB( -3, silk_lin2log( res_nrg_Q15 ) - ( 15 << 7 ) ); Chris@69: }