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 "stack_alloc.h" Chris@69: #include "NSQ.h" Chris@69: Chris@69: Chris@69: static OPUS_INLINE void silk_nsq_scale_states( Chris@69: const silk_encoder_state *psEncC, /* I Encoder State */ Chris@69: silk_nsq_state *NSQ, /* I/O NSQ state */ Chris@69: const opus_int16 x16[], /* I input */ Chris@69: opus_int32 x_sc_Q10[], /* O input scaled with 1/Gain */ Chris@69: const opus_int16 sLTP[], /* I re-whitened LTP state in Q0 */ Chris@69: opus_int32 sLTP_Q15[], /* O LTP state matching scaled input */ Chris@69: opus_int subfr, /* I subframe number */ Chris@69: const opus_int LTP_scale_Q14, /* I */ Chris@69: const opus_int32 Gains_Q16[ MAX_NB_SUBFR ], /* I */ Chris@69: const opus_int pitchL[ MAX_NB_SUBFR ], /* I Pitch lag */ Chris@69: const opus_int signal_type /* I Signal type */ Chris@69: ); Chris@69: Chris@69: #if !defined(OPUS_X86_MAY_HAVE_SSE4_1) Chris@69: static OPUS_INLINE void silk_noise_shape_quantizer( Chris@69: silk_nsq_state *NSQ, /* I/O NSQ state */ Chris@69: opus_int signalType, /* I Signal type */ Chris@69: const opus_int32 x_sc_Q10[], /* I */ Chris@69: opus_int8 pulses[], /* O */ Chris@69: opus_int16 xq[], /* O */ Chris@69: opus_int32 sLTP_Q15[], /* I/O LTP state */ Chris@69: const opus_int16 a_Q12[], /* I Short term prediction coefs */ Chris@69: const opus_int16 b_Q14[], /* I Long term prediction coefs */ Chris@69: const opus_int16 AR_shp_Q13[], /* I Noise shaping AR coefs */ Chris@69: opus_int lag, /* I Pitch lag */ Chris@69: opus_int32 HarmShapeFIRPacked_Q14, /* I */ Chris@69: opus_int Tilt_Q14, /* I Spectral tilt */ Chris@69: opus_int32 LF_shp_Q14, /* I */ Chris@69: opus_int32 Gain_Q16, /* I */ Chris@69: opus_int Lambda_Q10, /* I */ Chris@69: opus_int offset_Q10, /* I */ Chris@69: opus_int length, /* I Input length */ Chris@69: opus_int shapingLPCOrder, /* I Noise shaping AR filter order */ Chris@69: opus_int predictLPCOrder, /* I Prediction filter order */ Chris@69: int arch /* I Architecture */ Chris@69: ); Chris@69: #endif Chris@69: Chris@69: void silk_NSQ_c Chris@69: ( Chris@69: const silk_encoder_state *psEncC, /* I Encoder State */ Chris@69: silk_nsq_state *NSQ, /* I/O NSQ state */ Chris@69: SideInfoIndices *psIndices, /* I/O Quantization Indices */ Chris@69: const opus_int16 x16[], /* I Input */ Chris@69: opus_int8 pulses[], /* O Quantized pulse signal */ Chris@69: const opus_int16 PredCoef_Q12[ 2 * MAX_LPC_ORDER ], /* I Short term prediction coefs */ Chris@69: const opus_int16 LTPCoef_Q14[ LTP_ORDER * MAX_NB_SUBFR ], /* I Long term prediction coefs */ Chris@69: const opus_int16 AR_Q13[ MAX_NB_SUBFR * MAX_SHAPE_LPC_ORDER ], /* I Noise shaping coefs */ Chris@69: const opus_int HarmShapeGain_Q14[ MAX_NB_SUBFR ], /* I Long term shaping coefs */ Chris@69: const opus_int Tilt_Q14[ MAX_NB_SUBFR ], /* I Spectral tilt */ Chris@69: const opus_int32 LF_shp_Q14[ MAX_NB_SUBFR ], /* I Low frequency shaping coefs */ Chris@69: const opus_int32 Gains_Q16[ MAX_NB_SUBFR ], /* I Quantization step sizes */ Chris@69: const opus_int pitchL[ MAX_NB_SUBFR ], /* I Pitch lags */ Chris@69: const opus_int Lambda_Q10, /* I Rate/distortion tradeoff */ Chris@69: const opus_int LTP_scale_Q14 /* I LTP state scaling */ Chris@69: ) Chris@69: { Chris@69: opus_int k, lag, start_idx, LSF_interpolation_flag; Chris@69: const opus_int16 *A_Q12, *B_Q14, *AR_shp_Q13; Chris@69: opus_int16 *pxq; Chris@69: VARDECL( opus_int32, sLTP_Q15 ); Chris@69: VARDECL( opus_int16, sLTP ); Chris@69: opus_int32 HarmShapeFIRPacked_Q14; Chris@69: opus_int offset_Q10; Chris@69: VARDECL( opus_int32, x_sc_Q10 ); Chris@69: SAVE_STACK; Chris@69: Chris@69: NSQ->rand_seed = psIndices->Seed; Chris@69: Chris@69: /* Set unvoiced lag to the previous one, overwrite later for voiced */ Chris@69: lag = NSQ->lagPrev; Chris@69: Chris@69: silk_assert( NSQ->prev_gain_Q16 != 0 ); Chris@69: Chris@69: offset_Q10 = silk_Quantization_Offsets_Q10[ psIndices->signalType >> 1 ][ psIndices->quantOffsetType ]; Chris@69: Chris@69: if( psIndices->NLSFInterpCoef_Q2 == 4 ) { Chris@69: LSF_interpolation_flag = 0; Chris@69: } else { Chris@69: LSF_interpolation_flag = 1; Chris@69: } Chris@69: Chris@69: ALLOC( sLTP_Q15, psEncC->ltp_mem_length + psEncC->frame_length, opus_int32 ); Chris@69: ALLOC( sLTP, psEncC->ltp_mem_length + psEncC->frame_length, opus_int16 ); Chris@69: ALLOC( x_sc_Q10, psEncC->subfr_length, opus_int32 ); Chris@69: /* Set up pointers to start of sub frame */ Chris@69: NSQ->sLTP_shp_buf_idx = psEncC->ltp_mem_length; Chris@69: NSQ->sLTP_buf_idx = psEncC->ltp_mem_length; Chris@69: pxq = &NSQ->xq[ psEncC->ltp_mem_length ]; Chris@69: for( k = 0; k < psEncC->nb_subfr; k++ ) { Chris@69: A_Q12 = &PredCoef_Q12[ (( k >> 1 ) | ( 1 - LSF_interpolation_flag )) * MAX_LPC_ORDER ]; Chris@69: B_Q14 = <PCoef_Q14[ k * LTP_ORDER ]; Chris@69: AR_shp_Q13 = &AR_Q13[ k * MAX_SHAPE_LPC_ORDER ]; Chris@69: Chris@69: /* Noise shape parameters */ Chris@69: silk_assert( HarmShapeGain_Q14[ k ] >= 0 ); Chris@69: HarmShapeFIRPacked_Q14 = silk_RSHIFT( HarmShapeGain_Q14[ k ], 2 ); Chris@69: HarmShapeFIRPacked_Q14 |= silk_LSHIFT( (opus_int32)silk_RSHIFT( HarmShapeGain_Q14[ k ], 1 ), 16 ); Chris@69: Chris@69: NSQ->rewhite_flag = 0; Chris@69: if( psIndices->signalType == TYPE_VOICED ) { Chris@69: /* Voiced */ Chris@69: lag = pitchL[ k ]; Chris@69: Chris@69: /* Re-whitening */ Chris@69: if( ( k & ( 3 - silk_LSHIFT( LSF_interpolation_flag, 1 ) ) ) == 0 ) { Chris@69: /* Rewhiten with new A coefs */ Chris@69: start_idx = psEncC->ltp_mem_length - lag - psEncC->predictLPCOrder - LTP_ORDER / 2; Chris@69: celt_assert( start_idx > 0 ); Chris@69: Chris@69: silk_LPC_analysis_filter( &sLTP[ start_idx ], &NSQ->xq[ start_idx + k * psEncC->subfr_length ], Chris@69: A_Q12, psEncC->ltp_mem_length - start_idx, psEncC->predictLPCOrder, psEncC->arch ); Chris@69: Chris@69: NSQ->rewhite_flag = 1; Chris@69: NSQ->sLTP_buf_idx = psEncC->ltp_mem_length; Chris@69: } Chris@69: } Chris@69: Chris@69: silk_nsq_scale_states( psEncC, NSQ, x16, x_sc_Q10, sLTP, sLTP_Q15, k, LTP_scale_Q14, Gains_Q16, pitchL, psIndices->signalType ); Chris@69: Chris@69: silk_noise_shape_quantizer( NSQ, psIndices->signalType, x_sc_Q10, pulses, pxq, sLTP_Q15, A_Q12, B_Q14, Chris@69: AR_shp_Q13, lag, HarmShapeFIRPacked_Q14, Tilt_Q14[ k ], LF_shp_Q14[ k ], Gains_Q16[ k ], Lambda_Q10, Chris@69: offset_Q10, psEncC->subfr_length, psEncC->shapingLPCOrder, psEncC->predictLPCOrder, psEncC->arch ); Chris@69: Chris@69: x16 += psEncC->subfr_length; Chris@69: pulses += psEncC->subfr_length; Chris@69: pxq += psEncC->subfr_length; Chris@69: } Chris@69: Chris@69: /* Update lagPrev for next frame */ Chris@69: NSQ->lagPrev = pitchL[ psEncC->nb_subfr - 1 ]; Chris@69: Chris@69: /* Save quantized speech and noise shaping signals */ Chris@69: silk_memmove( NSQ->xq, &NSQ->xq[ psEncC->frame_length ], psEncC->ltp_mem_length * sizeof( opus_int16 ) ); Chris@69: silk_memmove( NSQ->sLTP_shp_Q14, &NSQ->sLTP_shp_Q14[ psEncC->frame_length ], psEncC->ltp_mem_length * sizeof( opus_int32 ) ); Chris@69: RESTORE_STACK; Chris@69: } Chris@69: Chris@69: /***********************************/ Chris@69: /* silk_noise_shape_quantizer */ Chris@69: /***********************************/ Chris@69: Chris@69: #if !defined(OPUS_X86_MAY_HAVE_SSE4_1) Chris@69: static OPUS_INLINE Chris@69: #endif Chris@69: void silk_noise_shape_quantizer( Chris@69: silk_nsq_state *NSQ, /* I/O NSQ state */ Chris@69: opus_int signalType, /* I Signal type */ Chris@69: const opus_int32 x_sc_Q10[], /* I */ Chris@69: opus_int8 pulses[], /* O */ Chris@69: opus_int16 xq[], /* O */ Chris@69: opus_int32 sLTP_Q15[], /* I/O LTP state */ Chris@69: const opus_int16 a_Q12[], /* I Short term prediction coefs */ Chris@69: const opus_int16 b_Q14[], /* I Long term prediction coefs */ Chris@69: const opus_int16 AR_shp_Q13[], /* I Noise shaping AR coefs */ Chris@69: opus_int lag, /* I Pitch lag */ Chris@69: opus_int32 HarmShapeFIRPacked_Q14, /* I */ Chris@69: opus_int Tilt_Q14, /* I Spectral tilt */ Chris@69: opus_int32 LF_shp_Q14, /* I */ Chris@69: opus_int32 Gain_Q16, /* I */ Chris@69: opus_int Lambda_Q10, /* I */ Chris@69: opus_int offset_Q10, /* I */ Chris@69: opus_int length, /* I Input length */ Chris@69: opus_int shapingLPCOrder, /* I Noise shaping AR filter order */ Chris@69: opus_int predictLPCOrder, /* I Prediction filter order */ Chris@69: int arch /* I Architecture */ Chris@69: ) Chris@69: { Chris@69: opus_int i; Chris@69: opus_int32 LTP_pred_Q13, LPC_pred_Q10, n_AR_Q12, n_LTP_Q13; Chris@69: opus_int32 n_LF_Q12, r_Q10, rr_Q10, q1_Q0, q1_Q10, q2_Q10, rd1_Q20, rd2_Q20; Chris@69: opus_int32 exc_Q14, LPC_exc_Q14, xq_Q14, Gain_Q10; Chris@69: opus_int32 tmp1, tmp2, sLF_AR_shp_Q14; Chris@69: opus_int32 *psLPC_Q14, *shp_lag_ptr, *pred_lag_ptr; Chris@69: #ifdef silk_short_prediction_create_arch_coef Chris@69: opus_int32 a_Q12_arch[MAX_LPC_ORDER]; Chris@69: #endif Chris@69: Chris@69: shp_lag_ptr = &NSQ->sLTP_shp_Q14[ NSQ->sLTP_shp_buf_idx - lag + HARM_SHAPE_FIR_TAPS / 2 ]; Chris@69: pred_lag_ptr = &sLTP_Q15[ NSQ->sLTP_buf_idx - lag + LTP_ORDER / 2 ]; Chris@69: Gain_Q10 = silk_RSHIFT( Gain_Q16, 6 ); Chris@69: Chris@69: /* Set up short term AR state */ Chris@69: psLPC_Q14 = &NSQ->sLPC_Q14[ NSQ_LPC_BUF_LENGTH - 1 ]; Chris@69: Chris@69: #ifdef silk_short_prediction_create_arch_coef Chris@69: silk_short_prediction_create_arch_coef(a_Q12_arch, a_Q12, predictLPCOrder); Chris@69: #endif Chris@69: Chris@69: for( i = 0; i < length; i++ ) { Chris@69: /* Generate dither */ Chris@69: NSQ->rand_seed = silk_RAND( NSQ->rand_seed ); Chris@69: Chris@69: /* Short-term prediction */ Chris@69: LPC_pred_Q10 = silk_noise_shape_quantizer_short_prediction(psLPC_Q14, a_Q12, a_Q12_arch, predictLPCOrder, arch); Chris@69: Chris@69: /* Long-term prediction */ Chris@69: if( signalType == TYPE_VOICED ) { Chris@69: /* Unrolled loop */ Chris@69: /* Avoids introducing a bias because silk_SMLAWB() always rounds to -inf */ Chris@69: LTP_pred_Q13 = 2; Chris@69: LTP_pred_Q13 = silk_SMLAWB( LTP_pred_Q13, pred_lag_ptr[ 0 ], b_Q14[ 0 ] ); Chris@69: LTP_pred_Q13 = silk_SMLAWB( LTP_pred_Q13, pred_lag_ptr[ -1 ], b_Q14[ 1 ] ); Chris@69: LTP_pred_Q13 = silk_SMLAWB( LTP_pred_Q13, pred_lag_ptr[ -2 ], b_Q14[ 2 ] ); Chris@69: LTP_pred_Q13 = silk_SMLAWB( LTP_pred_Q13, pred_lag_ptr[ -3 ], b_Q14[ 3 ] ); Chris@69: LTP_pred_Q13 = silk_SMLAWB( LTP_pred_Q13, pred_lag_ptr[ -4 ], b_Q14[ 4 ] ); Chris@69: pred_lag_ptr++; Chris@69: } else { Chris@69: LTP_pred_Q13 = 0; Chris@69: } Chris@69: Chris@69: /* Noise shape feedback */ Chris@69: celt_assert( ( shapingLPCOrder & 1 ) == 0 ); /* check that order is even */ Chris@69: n_AR_Q12 = silk_NSQ_noise_shape_feedback_loop(&NSQ->sDiff_shp_Q14, NSQ->sAR2_Q14, AR_shp_Q13, shapingLPCOrder, arch); Chris@69: Chris@69: n_AR_Q12 = silk_SMLAWB( n_AR_Q12, NSQ->sLF_AR_shp_Q14, Tilt_Q14 ); Chris@69: Chris@69: n_LF_Q12 = silk_SMULWB( NSQ->sLTP_shp_Q14[ NSQ->sLTP_shp_buf_idx - 1 ], LF_shp_Q14 ); Chris@69: n_LF_Q12 = silk_SMLAWT( n_LF_Q12, NSQ->sLF_AR_shp_Q14, LF_shp_Q14 ); Chris@69: Chris@69: celt_assert( lag > 0 || signalType != TYPE_VOICED ); Chris@69: Chris@69: /* Combine prediction and noise shaping signals */ Chris@69: tmp1 = silk_SUB32( silk_LSHIFT32( LPC_pred_Q10, 2 ), n_AR_Q12 ); /* Q12 */ Chris@69: tmp1 = silk_SUB32( tmp1, n_LF_Q12 ); /* Q12 */ Chris@69: if( lag > 0 ) { Chris@69: /* Symmetric, packed FIR coefficients */ Chris@69: n_LTP_Q13 = silk_SMULWB( silk_ADD32( shp_lag_ptr[ 0 ], shp_lag_ptr[ -2 ] ), HarmShapeFIRPacked_Q14 ); Chris@69: n_LTP_Q13 = silk_SMLAWT( n_LTP_Q13, shp_lag_ptr[ -1 ], HarmShapeFIRPacked_Q14 ); Chris@69: n_LTP_Q13 = silk_LSHIFT( n_LTP_Q13, 1 ); Chris@69: shp_lag_ptr++; Chris@69: Chris@69: tmp2 = silk_SUB32( LTP_pred_Q13, n_LTP_Q13 ); /* Q13 */ Chris@69: tmp1 = silk_ADD_LSHIFT32( tmp2, tmp1, 1 ); /* Q13 */ Chris@69: tmp1 = silk_RSHIFT_ROUND( tmp1, 3 ); /* Q10 */ Chris@69: } else { Chris@69: tmp1 = silk_RSHIFT_ROUND( tmp1, 2 ); /* Q10 */ Chris@69: } Chris@69: Chris@69: r_Q10 = silk_SUB32( x_sc_Q10[ i ], tmp1 ); /* residual error Q10 */ Chris@69: Chris@69: /* Flip sign depending on dither */ Chris@69: if( NSQ->rand_seed < 0 ) { Chris@69: r_Q10 = -r_Q10; Chris@69: } Chris@69: r_Q10 = silk_LIMIT_32( r_Q10, -(31 << 10), 30 << 10 ); Chris@69: Chris@69: /* Find two quantization level candidates and measure their rate-distortion */ Chris@69: q1_Q10 = silk_SUB32( r_Q10, offset_Q10 ); Chris@69: q1_Q0 = silk_RSHIFT( q1_Q10, 10 ); Chris@69: if (Lambda_Q10 > 2048) { Chris@69: /* For aggressive RDO, the bias becomes more than one pulse. */ Chris@69: int rdo_offset = Lambda_Q10/2 - 512; Chris@69: if (q1_Q10 > rdo_offset) { Chris@69: q1_Q0 = silk_RSHIFT( q1_Q10 - rdo_offset, 10 ); Chris@69: } else if (q1_Q10 < -rdo_offset) { Chris@69: q1_Q0 = silk_RSHIFT( q1_Q10 + rdo_offset, 10 ); Chris@69: } else if (q1_Q10 < 0) { Chris@69: q1_Q0 = -1; Chris@69: } else { Chris@69: q1_Q0 = 0; Chris@69: } Chris@69: } Chris@69: if( q1_Q0 > 0 ) { Chris@69: q1_Q10 = silk_SUB32( silk_LSHIFT( q1_Q0, 10 ), QUANT_LEVEL_ADJUST_Q10 ); Chris@69: q1_Q10 = silk_ADD32( q1_Q10, offset_Q10 ); Chris@69: q2_Q10 = silk_ADD32( q1_Q10, 1024 ); Chris@69: rd1_Q20 = silk_SMULBB( q1_Q10, Lambda_Q10 ); Chris@69: rd2_Q20 = silk_SMULBB( q2_Q10, Lambda_Q10 ); Chris@69: } else if( q1_Q0 == 0 ) { Chris@69: q1_Q10 = offset_Q10; Chris@69: q2_Q10 = silk_ADD32( q1_Q10, 1024 - QUANT_LEVEL_ADJUST_Q10 ); Chris@69: rd1_Q20 = silk_SMULBB( q1_Q10, Lambda_Q10 ); Chris@69: rd2_Q20 = silk_SMULBB( q2_Q10, Lambda_Q10 ); Chris@69: } else if( q1_Q0 == -1 ) { Chris@69: q2_Q10 = offset_Q10; Chris@69: q1_Q10 = silk_SUB32( q2_Q10, 1024 - QUANT_LEVEL_ADJUST_Q10 ); Chris@69: rd1_Q20 = silk_SMULBB( -q1_Q10, Lambda_Q10 ); Chris@69: rd2_Q20 = silk_SMULBB( q2_Q10, Lambda_Q10 ); Chris@69: } else { /* Q1_Q0 < -1 */ Chris@69: q1_Q10 = silk_ADD32( silk_LSHIFT( q1_Q0, 10 ), QUANT_LEVEL_ADJUST_Q10 ); Chris@69: q1_Q10 = silk_ADD32( q1_Q10, offset_Q10 ); Chris@69: q2_Q10 = silk_ADD32( q1_Q10, 1024 ); Chris@69: rd1_Q20 = silk_SMULBB( -q1_Q10, Lambda_Q10 ); Chris@69: rd2_Q20 = silk_SMULBB( -q2_Q10, Lambda_Q10 ); Chris@69: } Chris@69: rr_Q10 = silk_SUB32( r_Q10, q1_Q10 ); Chris@69: rd1_Q20 = silk_SMLABB( rd1_Q20, rr_Q10, rr_Q10 ); Chris@69: rr_Q10 = silk_SUB32( r_Q10, q2_Q10 ); Chris@69: rd2_Q20 = silk_SMLABB( rd2_Q20, rr_Q10, rr_Q10 ); Chris@69: Chris@69: if( rd2_Q20 < rd1_Q20 ) { Chris@69: q1_Q10 = q2_Q10; Chris@69: } Chris@69: Chris@69: pulses[ i ] = (opus_int8)silk_RSHIFT_ROUND( q1_Q10, 10 ); Chris@69: Chris@69: /* Excitation */ Chris@69: exc_Q14 = silk_LSHIFT( q1_Q10, 4 ); Chris@69: if ( NSQ->rand_seed < 0 ) { Chris@69: exc_Q14 = -exc_Q14; Chris@69: } Chris@69: Chris@69: /* Add predictions */ Chris@69: LPC_exc_Q14 = silk_ADD_LSHIFT32( exc_Q14, LTP_pred_Q13, 1 ); Chris@69: xq_Q14 = silk_ADD_LSHIFT32( LPC_exc_Q14, LPC_pred_Q10, 4 ); Chris@69: Chris@69: /* Scale XQ back to normal level before saving */ Chris@69: xq[ i ] = (opus_int16)silk_SAT16( silk_RSHIFT_ROUND( silk_SMULWW( xq_Q14, Gain_Q10 ), 8 ) ); Chris@69: Chris@69: /* Update states */ Chris@69: psLPC_Q14++; Chris@69: *psLPC_Q14 = xq_Q14; Chris@69: NSQ->sDiff_shp_Q14 = silk_SUB_LSHIFT32( xq_Q14, x_sc_Q10[ i ], 4 ); Chris@69: sLF_AR_shp_Q14 = silk_SUB_LSHIFT32( NSQ->sDiff_shp_Q14, n_AR_Q12, 2 ); Chris@69: NSQ->sLF_AR_shp_Q14 = sLF_AR_shp_Q14; Chris@69: Chris@69: NSQ->sLTP_shp_Q14[ NSQ->sLTP_shp_buf_idx ] = silk_SUB_LSHIFT32( sLF_AR_shp_Q14, n_LF_Q12, 2 ); Chris@69: sLTP_Q15[ NSQ->sLTP_buf_idx ] = silk_LSHIFT( LPC_exc_Q14, 1 ); Chris@69: NSQ->sLTP_shp_buf_idx++; Chris@69: NSQ->sLTP_buf_idx++; Chris@69: Chris@69: /* Make dither dependent on quantized signal */ Chris@69: NSQ->rand_seed = silk_ADD32_ovflw( NSQ->rand_seed, pulses[ i ] ); Chris@69: } Chris@69: Chris@69: /* Update LPC synth buffer */ Chris@69: silk_memcpy( NSQ->sLPC_Q14, &NSQ->sLPC_Q14[ length ], NSQ_LPC_BUF_LENGTH * sizeof( opus_int32 ) ); Chris@69: } Chris@69: Chris@69: static OPUS_INLINE void silk_nsq_scale_states( Chris@69: const silk_encoder_state *psEncC, /* I Encoder State */ Chris@69: silk_nsq_state *NSQ, /* I/O NSQ state */ Chris@69: const opus_int16 x16[], /* I input */ Chris@69: opus_int32 x_sc_Q10[], /* O input scaled with 1/Gain */ Chris@69: const opus_int16 sLTP[], /* I re-whitened LTP state in Q0 */ Chris@69: opus_int32 sLTP_Q15[], /* O LTP state matching scaled input */ Chris@69: opus_int subfr, /* I subframe number */ Chris@69: const opus_int LTP_scale_Q14, /* I */ Chris@69: const opus_int32 Gains_Q16[ MAX_NB_SUBFR ], /* I */ Chris@69: const opus_int pitchL[ MAX_NB_SUBFR ], /* I Pitch lag */ Chris@69: const opus_int signal_type /* I Signal type */ Chris@69: ) Chris@69: { Chris@69: opus_int i, lag; Chris@69: opus_int32 gain_adj_Q16, inv_gain_Q31, inv_gain_Q26; Chris@69: Chris@69: lag = pitchL[ subfr ]; Chris@69: inv_gain_Q31 = silk_INVERSE32_varQ( silk_max( Gains_Q16[ subfr ], 1 ), 47 ); Chris@69: silk_assert( inv_gain_Q31 != 0 ); Chris@69: Chris@69: /* Scale input */ Chris@69: inv_gain_Q26 = silk_RSHIFT_ROUND( inv_gain_Q31, 5 ); Chris@69: for( i = 0; i < psEncC->subfr_length; i++ ) { Chris@69: x_sc_Q10[ i ] = silk_SMULWW( x16[ i ], inv_gain_Q26 ); Chris@69: } Chris@69: Chris@69: /* After rewhitening the LTP state is un-scaled, so scale with inv_gain_Q16 */ Chris@69: if( NSQ->rewhite_flag ) { Chris@69: if( subfr == 0 ) { Chris@69: /* Do LTP downscaling */ Chris@69: inv_gain_Q31 = silk_LSHIFT( silk_SMULWB( inv_gain_Q31, LTP_scale_Q14 ), 2 ); Chris@69: } Chris@69: for( i = NSQ->sLTP_buf_idx - lag - LTP_ORDER / 2; i < NSQ->sLTP_buf_idx; i++ ) { Chris@69: silk_assert( i < MAX_FRAME_LENGTH ); Chris@69: sLTP_Q15[ i ] = silk_SMULWB( inv_gain_Q31, sLTP[ i ] ); Chris@69: } Chris@69: } Chris@69: Chris@69: /* Adjust for changing gain */ Chris@69: if( Gains_Q16[ subfr ] != NSQ->prev_gain_Q16 ) { Chris@69: gain_adj_Q16 = silk_DIV32_varQ( NSQ->prev_gain_Q16, Gains_Q16[ subfr ], 16 ); Chris@69: Chris@69: /* Scale long-term shaping state */ Chris@69: for( i = NSQ->sLTP_shp_buf_idx - psEncC->ltp_mem_length; i < NSQ->sLTP_shp_buf_idx; i++ ) { Chris@69: NSQ->sLTP_shp_Q14[ i ] = silk_SMULWW( gain_adj_Q16, NSQ->sLTP_shp_Q14[ i ] ); Chris@69: } Chris@69: Chris@69: /* Scale long-term prediction state */ Chris@69: if( signal_type == TYPE_VOICED && NSQ->rewhite_flag == 0 ) { Chris@69: for( i = NSQ->sLTP_buf_idx - lag - LTP_ORDER / 2; i < NSQ->sLTP_buf_idx; i++ ) { Chris@69: sLTP_Q15[ i ] = silk_SMULWW( gain_adj_Q16, sLTP_Q15[ i ] ); Chris@69: } Chris@69: } Chris@69: Chris@69: NSQ->sLF_AR_shp_Q14 = silk_SMULWW( gain_adj_Q16, NSQ->sLF_AR_shp_Q14 ); Chris@69: NSQ->sDiff_shp_Q14 = silk_SMULWW( gain_adj_Q16, NSQ->sDiff_shp_Q14 ); Chris@69: Chris@69: /* Scale short-term prediction and shaping states */ Chris@69: for( i = 0; i < NSQ_LPC_BUF_LENGTH; i++ ) { Chris@69: NSQ->sLPC_Q14[ i ] = silk_SMULWW( gain_adj_Q16, NSQ->sLPC_Q14[ i ] ); Chris@69: } Chris@69: for( i = 0; i < MAX_SHAPE_LPC_ORDER; i++ ) { Chris@69: NSQ->sAR2_Q14[ i ] = silk_SMULWW( gain_adj_Q16, NSQ->sAR2_Q14[ i ] ); Chris@69: } Chris@69: Chris@69: /* Save inverse gain */ Chris@69: NSQ->prev_gain_Q16 = Gains_Q16[ subfr ]; Chris@69: } Chris@69: }