michael@0: /***********************************************************************
michael@0: Copyright (c) 2006-2011, Skype Limited. All rights reserved.
michael@0: Redistribution and use in source and binary forms, with or without
michael@0: modification, are permitted provided that the following conditions
michael@0: are met:
michael@0: - Redistributions of source code must retain the above copyright notice,
michael@0: this list of conditions and the following disclaimer.
michael@0: - Redistributions in binary form must reproduce the above copyright
michael@0: notice, this list of conditions and the following disclaimer in the
michael@0: documentation and/or other materials provided with the distribution.
michael@0: - Neither the name of Internet Society, IETF or IETF Trust, nor the
michael@0: names of specific contributors, may be used to endorse or promote
michael@0: products derived from this software without specific prior written
michael@0: permission.
michael@0: THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
michael@0: AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
michael@0: IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
michael@0: ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
michael@0: LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
michael@0: CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
michael@0: SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
michael@0: INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
michael@0: CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
michael@0: ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
michael@0: POSSIBILITY OF SUCH DAMAGE.
michael@0: ***********************************************************************/
michael@0: 
michael@0: #ifdef HAVE_CONFIG_H
michael@0: #include "config.h"
michael@0: #endif
michael@0: 
michael@0: #include "main_FIX.h"
michael@0: #include "tuning_parameters.h"
michael@0: 
michael@0: /* Processing of gains */
michael@0: void silk_process_gains_FIX(
michael@0:     silk_encoder_state_FIX          *psEnc,                                 /* I/O  Encoder state                                                               */
michael@0:     silk_encoder_control_FIX        *psEncCtrl,                             /* I/O  Encoder control                                                             */
michael@0:     opus_int                        condCoding                              /* I    The type of conditional coding to use                                       */
michael@0: )
michael@0: {
michael@0:     silk_shape_state_FIX *psShapeSt = &psEnc->sShape;
michael@0:     opus_int     k;
michael@0:     opus_int32   s_Q16, InvMaxSqrVal_Q16, gain, gain_squared, ResNrg, ResNrgPart, quant_offset_Q10;
michael@0: 
michael@0:     /* Gain reduction when LTP coding gain is high */
michael@0:     if( psEnc->sCmn.indices.signalType == TYPE_VOICED ) {
michael@0:         /*s = -0.5f * silk_sigmoid( 0.25f * ( psEncCtrl->LTPredCodGain - 12.0f ) ); */
michael@0:         s_Q16 = -silk_sigm_Q15( silk_RSHIFT_ROUND( psEncCtrl->LTPredCodGain_Q7 - SILK_FIX_CONST( 12.0, 7 ), 4 ) );
michael@0:         for( k = 0; k < psEnc->sCmn.nb_subfr; k++ ) {
michael@0:             psEncCtrl->Gains_Q16[ k ] = silk_SMLAWB( psEncCtrl->Gains_Q16[ k ], psEncCtrl->Gains_Q16[ k ], s_Q16 );
michael@0:         }
michael@0:     }
michael@0: 
michael@0:     /* Limit the quantized signal */
michael@0:     /* InvMaxSqrVal = pow( 2.0f, 0.33f * ( 21.0f - SNR_dB ) ) / subfr_length; */
michael@0:     InvMaxSqrVal_Q16 = silk_DIV32_16( silk_log2lin(
michael@0:         silk_SMULWB( SILK_FIX_CONST( 21 + 16 / 0.33, 7 ) - psEnc->sCmn.SNR_dB_Q7, SILK_FIX_CONST( 0.33, 16 ) ) ), psEnc->sCmn.subfr_length );
michael@0: 
michael@0:     for( k = 0; k < psEnc->sCmn.nb_subfr; k++ ) {
michael@0:         /* Soft limit on ratio residual energy and squared gains */
michael@0:         ResNrg     = psEncCtrl->ResNrg[ k ];
michael@0:         ResNrgPart = silk_SMULWW( ResNrg, InvMaxSqrVal_Q16 );
michael@0:         if( psEncCtrl->ResNrgQ[ k ] > 0 ) {
michael@0:             ResNrgPart = silk_RSHIFT_ROUND( ResNrgPart, psEncCtrl->ResNrgQ[ k ] );
michael@0:         } else {
michael@0:             if( ResNrgPart >= silk_RSHIFT( silk_int32_MAX, -psEncCtrl->ResNrgQ[ k ] ) ) {
michael@0:                 ResNrgPart = silk_int32_MAX;
michael@0:             } else {
michael@0:                 ResNrgPart = silk_LSHIFT( ResNrgPart, -psEncCtrl->ResNrgQ[ k ] );
michael@0:             }
michael@0:         }
michael@0:         gain = psEncCtrl->Gains_Q16[ k ];
michael@0:         gain_squared = silk_ADD_SAT32( ResNrgPart, silk_SMMUL( gain, gain ) );
michael@0:         if( gain_squared < silk_int16_MAX ) {
michael@0:             /* recalculate with higher precision */
michael@0:             gain_squared = silk_SMLAWW( silk_LSHIFT( ResNrgPart, 16 ), gain, gain );
michael@0:             silk_assert( gain_squared > 0 );
michael@0:             gain = silk_SQRT_APPROX( gain_squared );                    /* Q8   */
michael@0:             gain = silk_min( gain, silk_int32_MAX >> 8 );
michael@0:             psEncCtrl->Gains_Q16[ k ] = silk_LSHIFT_SAT32( gain, 8 );   /* Q16  */
michael@0:         } else {
michael@0:             gain = silk_SQRT_APPROX( gain_squared );                    /* Q0   */
michael@0:             gain = silk_min( gain, silk_int32_MAX >> 16 );
michael@0:             psEncCtrl->Gains_Q16[ k ] = silk_LSHIFT_SAT32( gain, 16 );  /* Q16  */
michael@0:         }
michael@0:     }
michael@0: 
michael@0:     /* Save unquantized gains and gain Index */
michael@0:     silk_memcpy( psEncCtrl->GainsUnq_Q16, psEncCtrl->Gains_Q16, psEnc->sCmn.nb_subfr * sizeof( opus_int32 ) );
michael@0:     psEncCtrl->lastGainIndexPrev = psShapeSt->LastGainIndex;
michael@0: 
michael@0:     /* Quantize gains */
michael@0:     silk_gains_quant( psEnc->sCmn.indices.GainsIndices, psEncCtrl->Gains_Q16,
michael@0:         &psShapeSt->LastGainIndex, condCoding == CODE_CONDITIONALLY, psEnc->sCmn.nb_subfr );
michael@0: 
michael@0:     /* Set quantizer offset for voiced signals. Larger offset when LTP coding gain is low or tilt is high (ie low-pass) */
michael@0:     if( psEnc->sCmn.indices.signalType == TYPE_VOICED ) {
michael@0:         if( psEncCtrl->LTPredCodGain_Q7 + silk_RSHIFT( psEnc->sCmn.input_tilt_Q15, 8 ) > SILK_FIX_CONST( 1.0, 7 ) ) {
michael@0:             psEnc->sCmn.indices.quantOffsetType = 0;
michael@0:         } else {
michael@0:             psEnc->sCmn.indices.quantOffsetType = 1;
michael@0:         }
michael@0:     }
michael@0: 
michael@0:     /* Quantizer boundary adjustment */
michael@0:     quant_offset_Q10 = silk_Quantization_Offsets_Q10[ psEnc->sCmn.indices.signalType >> 1 ][ psEnc->sCmn.indices.quantOffsetType ];
michael@0:     psEncCtrl->Lambda_Q10 = SILK_FIX_CONST( LAMBDA_OFFSET, 10 )
michael@0:                           + silk_SMULBB( SILK_FIX_CONST( LAMBDA_DELAYED_DECISIONS, 10 ), psEnc->sCmn.nStatesDelayedDecision )
michael@0:                           + silk_SMULWB( SILK_FIX_CONST( LAMBDA_SPEECH_ACT,        18 ), psEnc->sCmn.speech_activity_Q8     )
michael@0:                           + silk_SMULWB( SILK_FIX_CONST( LAMBDA_INPUT_QUALITY,     12 ), psEncCtrl->input_quality_Q14       )
michael@0:                           + silk_SMULWB( SILK_FIX_CONST( LAMBDA_CODING_QUALITY,    12 ), psEncCtrl->coding_quality_Q14      )
michael@0:                           + silk_SMULWB( SILK_FIX_CONST( LAMBDA_QUANT_OFFSET,      16 ), quant_offset_Q10                   );
michael@0: 
michael@0:     silk_assert( psEncCtrl->Lambda_Q10 > 0 );
michael@0:     silk_assert( psEncCtrl->Lambda_Q10 < SILK_FIX_CONST( 2, 10 ) );
michael@0: }