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: Chris@69: /* Generates excitation for CNG LPC synthesis */ Chris@69: static OPUS_INLINE void silk_CNG_exc( Chris@69: opus_int32 exc_Q14[], /* O CNG excitation signal Q10 */ Chris@69: opus_int32 exc_buf_Q14[], /* I Random samples buffer Q10 */ Chris@69: opus_int length, /* I Length */ Chris@69: opus_int32 *rand_seed /* I/O Seed to random index generator */ Chris@69: ) Chris@69: { Chris@69: opus_int32 seed; Chris@69: opus_int i, idx, exc_mask; Chris@69: Chris@69: exc_mask = CNG_BUF_MASK_MAX; Chris@69: while( exc_mask > length ) { Chris@69: exc_mask = silk_RSHIFT( exc_mask, 1 ); Chris@69: } Chris@69: Chris@69: seed = *rand_seed; Chris@69: for( i = 0; i < length; i++ ) { Chris@69: seed = silk_RAND( seed ); Chris@69: idx = (opus_int)( silk_RSHIFT( seed, 24 ) & exc_mask ); Chris@69: silk_assert( idx >= 0 ); Chris@69: silk_assert( idx <= CNG_BUF_MASK_MAX ); Chris@69: exc_Q14[ i ] = exc_buf_Q14[ idx ]; Chris@69: } Chris@69: *rand_seed = seed; Chris@69: } Chris@69: Chris@69: void silk_CNG_Reset( Chris@69: silk_decoder_state *psDec /* I/O Decoder state */ Chris@69: ) Chris@69: { Chris@69: opus_int i, NLSF_step_Q15, NLSF_acc_Q15; Chris@69: Chris@69: NLSF_step_Q15 = silk_DIV32_16( silk_int16_MAX, psDec->LPC_order + 1 ); Chris@69: NLSF_acc_Q15 = 0; Chris@69: for( i = 0; i < psDec->LPC_order; i++ ) { Chris@69: NLSF_acc_Q15 += NLSF_step_Q15; Chris@69: psDec->sCNG.CNG_smth_NLSF_Q15[ i ] = NLSF_acc_Q15; Chris@69: } Chris@69: psDec->sCNG.CNG_smth_Gain_Q16 = 0; Chris@69: psDec->sCNG.rand_seed = 3176576; Chris@69: } Chris@69: Chris@69: /* Updates CNG estimate, and applies the CNG when packet was lost */ Chris@69: void silk_CNG( Chris@69: silk_decoder_state *psDec, /* I/O Decoder state */ Chris@69: silk_decoder_control *psDecCtrl, /* I/O Decoder control */ Chris@69: opus_int16 frame[], /* I/O Signal */ Chris@69: opus_int length /* I Length of residual */ Chris@69: ) Chris@69: { Chris@69: opus_int i, subfr; Chris@69: opus_int32 LPC_pred_Q10, max_Gain_Q16, gain_Q16, gain_Q10; Chris@69: opus_int16 A_Q12[ MAX_LPC_ORDER ]; Chris@69: silk_CNG_struct *psCNG = &psDec->sCNG; Chris@69: SAVE_STACK; Chris@69: Chris@69: if( psDec->fs_kHz != psCNG->fs_kHz ) { Chris@69: /* Reset state */ Chris@69: silk_CNG_Reset( psDec ); Chris@69: Chris@69: psCNG->fs_kHz = psDec->fs_kHz; Chris@69: } Chris@69: if( psDec->lossCnt == 0 && psDec->prevSignalType == TYPE_NO_VOICE_ACTIVITY ) { Chris@69: /* Update CNG parameters */ Chris@69: Chris@69: /* Smoothing of LSF's */ Chris@69: for( i = 0; i < psDec->LPC_order; i++ ) { Chris@69: psCNG->CNG_smth_NLSF_Q15[ i ] += silk_SMULWB( (opus_int32)psDec->prevNLSF_Q15[ i ] - (opus_int32)psCNG->CNG_smth_NLSF_Q15[ i ], CNG_NLSF_SMTH_Q16 ); Chris@69: } Chris@69: /* Find the subframe with the highest gain */ Chris@69: max_Gain_Q16 = 0; Chris@69: subfr = 0; Chris@69: for( i = 0; i < psDec->nb_subfr; i++ ) { Chris@69: if( psDecCtrl->Gains_Q16[ i ] > max_Gain_Q16 ) { Chris@69: max_Gain_Q16 = psDecCtrl->Gains_Q16[ i ]; Chris@69: subfr = i; Chris@69: } Chris@69: } Chris@69: /* Update CNG excitation buffer with excitation from this subframe */ Chris@69: silk_memmove( &psCNG->CNG_exc_buf_Q14[ psDec->subfr_length ], psCNG->CNG_exc_buf_Q14, ( psDec->nb_subfr - 1 ) * psDec->subfr_length * sizeof( opus_int32 ) ); Chris@69: silk_memcpy( psCNG->CNG_exc_buf_Q14, &psDec->exc_Q14[ subfr * psDec->subfr_length ], psDec->subfr_length * sizeof( opus_int32 ) ); Chris@69: Chris@69: /* Smooth gains */ Chris@69: for( i = 0; i < psDec->nb_subfr; i++ ) { Chris@69: psCNG->CNG_smth_Gain_Q16 += silk_SMULWB( psDecCtrl->Gains_Q16[ i ] - psCNG->CNG_smth_Gain_Q16, CNG_GAIN_SMTH_Q16 ); Chris@69: } Chris@69: } Chris@69: Chris@69: /* Add CNG when packet is lost or during DTX */ Chris@69: if( psDec->lossCnt ) { Chris@69: VARDECL( opus_int32, CNG_sig_Q14 ); Chris@69: ALLOC( CNG_sig_Q14, length + MAX_LPC_ORDER, opus_int32 ); Chris@69: Chris@69: /* Generate CNG excitation */ Chris@69: gain_Q16 = silk_SMULWW( psDec->sPLC.randScale_Q14, psDec->sPLC.prevGain_Q16[1] ); Chris@69: if( gain_Q16 >= (1 << 21) || psCNG->CNG_smth_Gain_Q16 > (1 << 23) ) { Chris@69: gain_Q16 = silk_SMULTT( gain_Q16, gain_Q16 ); Chris@69: gain_Q16 = silk_SUB_LSHIFT32(silk_SMULTT( psCNG->CNG_smth_Gain_Q16, psCNG->CNG_smth_Gain_Q16 ), gain_Q16, 5 ); Chris@69: gain_Q16 = silk_LSHIFT32( silk_SQRT_APPROX( gain_Q16 ), 16 ); Chris@69: } else { Chris@69: gain_Q16 = silk_SMULWW( gain_Q16, gain_Q16 ); Chris@69: gain_Q16 = silk_SUB_LSHIFT32(silk_SMULWW( psCNG->CNG_smth_Gain_Q16, psCNG->CNG_smth_Gain_Q16 ), gain_Q16, 5 ); Chris@69: gain_Q16 = silk_LSHIFT32( silk_SQRT_APPROX( gain_Q16 ), 8 ); Chris@69: } Chris@69: gain_Q10 = silk_RSHIFT( gain_Q16, 6 ); Chris@69: Chris@69: silk_CNG_exc( CNG_sig_Q14 + MAX_LPC_ORDER, psCNG->CNG_exc_buf_Q14, length, &psCNG->rand_seed ); Chris@69: Chris@69: /* Convert CNG NLSF to filter representation */ Chris@69: silk_NLSF2A( A_Q12, psCNG->CNG_smth_NLSF_Q15, psDec->LPC_order, psDec->arch ); Chris@69: Chris@69: /* Generate CNG signal, by synthesis filtering */ Chris@69: silk_memcpy( CNG_sig_Q14, psCNG->CNG_synth_state, MAX_LPC_ORDER * sizeof( opus_int32 ) ); Chris@69: celt_assert( psDec->LPC_order == 10 || psDec->LPC_order == 16 ); Chris@69: for( i = 0; i < length; i++ ) { Chris@69: /* Avoids introducing a bias because silk_SMLAWB() always rounds to -inf */ Chris@69: LPC_pred_Q10 = silk_RSHIFT( psDec->LPC_order, 1 ); Chris@69: LPC_pred_Q10 = silk_SMLAWB( LPC_pred_Q10, CNG_sig_Q14[ MAX_LPC_ORDER + i - 1 ], A_Q12[ 0 ] ); Chris@69: LPC_pred_Q10 = silk_SMLAWB( LPC_pred_Q10, CNG_sig_Q14[ MAX_LPC_ORDER + i - 2 ], A_Q12[ 1 ] ); Chris@69: LPC_pred_Q10 = silk_SMLAWB( LPC_pred_Q10, CNG_sig_Q14[ MAX_LPC_ORDER + i - 3 ], A_Q12[ 2 ] ); Chris@69: LPC_pred_Q10 = silk_SMLAWB( LPC_pred_Q10, CNG_sig_Q14[ MAX_LPC_ORDER + i - 4 ], A_Q12[ 3 ] ); Chris@69: LPC_pred_Q10 = silk_SMLAWB( LPC_pred_Q10, CNG_sig_Q14[ MAX_LPC_ORDER + i - 5 ], A_Q12[ 4 ] ); Chris@69: LPC_pred_Q10 = silk_SMLAWB( LPC_pred_Q10, CNG_sig_Q14[ MAX_LPC_ORDER + i - 6 ], A_Q12[ 5 ] ); Chris@69: LPC_pred_Q10 = silk_SMLAWB( LPC_pred_Q10, CNG_sig_Q14[ MAX_LPC_ORDER + i - 7 ], A_Q12[ 6 ] ); Chris@69: LPC_pred_Q10 = silk_SMLAWB( LPC_pred_Q10, CNG_sig_Q14[ MAX_LPC_ORDER + i - 8 ], A_Q12[ 7 ] ); Chris@69: LPC_pred_Q10 = silk_SMLAWB( LPC_pred_Q10, CNG_sig_Q14[ MAX_LPC_ORDER + i - 9 ], A_Q12[ 8 ] ); Chris@69: LPC_pred_Q10 = silk_SMLAWB( LPC_pred_Q10, CNG_sig_Q14[ MAX_LPC_ORDER + i - 10 ], A_Q12[ 9 ] ); Chris@69: if( psDec->LPC_order == 16 ) { Chris@69: LPC_pred_Q10 = silk_SMLAWB( LPC_pred_Q10, CNG_sig_Q14[ MAX_LPC_ORDER + i - 11 ], A_Q12[ 10 ] ); Chris@69: LPC_pred_Q10 = silk_SMLAWB( LPC_pred_Q10, CNG_sig_Q14[ MAX_LPC_ORDER + i - 12 ], A_Q12[ 11 ] ); Chris@69: LPC_pred_Q10 = silk_SMLAWB( LPC_pred_Q10, CNG_sig_Q14[ MAX_LPC_ORDER + i - 13 ], A_Q12[ 12 ] ); Chris@69: LPC_pred_Q10 = silk_SMLAWB( LPC_pred_Q10, CNG_sig_Q14[ MAX_LPC_ORDER + i - 14 ], A_Q12[ 13 ] ); Chris@69: LPC_pred_Q10 = silk_SMLAWB( LPC_pred_Q10, CNG_sig_Q14[ MAX_LPC_ORDER + i - 15 ], A_Q12[ 14 ] ); Chris@69: LPC_pred_Q10 = silk_SMLAWB( LPC_pred_Q10, CNG_sig_Q14[ MAX_LPC_ORDER + i - 16 ], A_Q12[ 15 ] ); Chris@69: } Chris@69: Chris@69: /* Update states */ Chris@69: CNG_sig_Q14[ MAX_LPC_ORDER + i ] = silk_ADD_SAT32( CNG_sig_Q14[ MAX_LPC_ORDER + i ], silk_LSHIFT_SAT32( LPC_pred_Q10, 4 ) ); Chris@69: Chris@69: /* Scale with Gain and add to input signal */ Chris@69: frame[ i ] = (opus_int16)silk_ADD_SAT16( frame[ i ], silk_SAT16( silk_RSHIFT_ROUND( silk_SMULWW( CNG_sig_Q14[ MAX_LPC_ORDER + i ], gain_Q10 ), 8 ) ) ); Chris@69: Chris@69: } Chris@69: silk_memcpy( psCNG->CNG_synth_state, &CNG_sig_Q14[ length ], MAX_LPC_ORDER * sizeof( opus_int32 ) ); Chris@69: } else { Chris@69: silk_memset( psCNG->CNG_synth_state, 0, psDec->LPC_order * sizeof( opus_int32 ) ); Chris@69: } Chris@69: RESTORE_STACK; Chris@69: }