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 <stdlib.h>
Chris@69: #include "main_FIX.h"
Chris@69: #include "stack_alloc.h"
Chris@69: #include "tuning_parameters.h"
Chris@69: 
Chris@69: /* Low Bitrate Redundancy (LBRR) encoding. Reuse all parameters but encode with lower bitrate           */
Chris@69: static OPUS_INLINE void silk_LBRR_encode_FIX(
Chris@69:     silk_encoder_state_FIX          *psEnc,                                 /* I/O  Pointer to Silk FIX encoder state                                           */
Chris@69:     silk_encoder_control_FIX        *psEncCtrl,                             /* I/O  Pointer to Silk FIX encoder control struct                                  */
Chris@69:     const opus_int16                x16[],                                  /* I    Input signal                                                                */
Chris@69:     opus_int                        condCoding                              /* I    The type of conditional coding used so far for this frame                   */
Chris@69: );
Chris@69: 
Chris@69: void silk_encode_do_VAD_FIX(
Chris@69:     silk_encoder_state_FIX          *psEnc,                                 /* I/O  Pointer to Silk FIX encoder state                                           */
Chris@69:     opus_int                        activity                                /* I    Decision of Opus voice activity detector                                    */
Chris@69: )
Chris@69: {
Chris@69:     const opus_int activity_threshold = SILK_FIX_CONST( SPEECH_ACTIVITY_DTX_THRES, 8 );
Chris@69: 
Chris@69:     /****************************/
Chris@69:     /* Voice Activity Detection */
Chris@69:     /****************************/
Chris@69:     silk_VAD_GetSA_Q8( &psEnc->sCmn, psEnc->sCmn.inputBuf + 1, psEnc->sCmn.arch );
Chris@69:     /* If Opus VAD is inactive and Silk VAD is active: lower Silk VAD to just under the threshold */
Chris@69:     if( activity == VAD_NO_ACTIVITY && psEnc->sCmn.speech_activity_Q8 >= activity_threshold ) {
Chris@69:         psEnc->sCmn.speech_activity_Q8 = activity_threshold - 1;
Chris@69:     }
Chris@69: 
Chris@69:     /**************************************************/
Chris@69:     /* Convert speech activity into VAD and DTX flags */
Chris@69:     /**************************************************/
Chris@69:     if( psEnc->sCmn.speech_activity_Q8 < activity_threshold ) {
Chris@69:         psEnc->sCmn.indices.signalType = TYPE_NO_VOICE_ACTIVITY;
Chris@69:         psEnc->sCmn.noSpeechCounter++;
Chris@69:         if( psEnc->sCmn.noSpeechCounter <= NB_SPEECH_FRAMES_BEFORE_DTX ) {
Chris@69:             psEnc->sCmn.inDTX = 0;
Chris@69:         } else if( psEnc->sCmn.noSpeechCounter > MAX_CONSECUTIVE_DTX + NB_SPEECH_FRAMES_BEFORE_DTX ) {
Chris@69:             psEnc->sCmn.noSpeechCounter = NB_SPEECH_FRAMES_BEFORE_DTX;
Chris@69:             psEnc->sCmn.inDTX           = 0;
Chris@69:         }
Chris@69:         psEnc->sCmn.VAD_flags[ psEnc->sCmn.nFramesEncoded ] = 0;
Chris@69:     } else {
Chris@69:         psEnc->sCmn.noSpeechCounter    = 0;
Chris@69:         psEnc->sCmn.inDTX              = 0;
Chris@69:         psEnc->sCmn.indices.signalType = TYPE_UNVOICED;
Chris@69:         psEnc->sCmn.VAD_flags[ psEnc->sCmn.nFramesEncoded ] = 1;
Chris@69:     }
Chris@69: }
Chris@69: 
Chris@69: /****************/
Chris@69: /* Encode frame */
Chris@69: /****************/
Chris@69: opus_int silk_encode_frame_FIX(
Chris@69:     silk_encoder_state_FIX          *psEnc,                                 /* I/O  Pointer to Silk FIX encoder state                                           */
Chris@69:     opus_int32                      *pnBytesOut,                            /* O    Pointer to number of payload bytes;                                         */
Chris@69:     ec_enc                          *psRangeEnc,                            /* I/O  compressor data structure                                                   */
Chris@69:     opus_int                        condCoding,                             /* I    The type of conditional coding to use                                       */
Chris@69:     opus_int                        maxBits,                                /* I    If > 0: maximum number of output bits                                       */
Chris@69:     opus_int                        useCBR                                  /* I    Flag to force constant-bitrate operation                                    */
Chris@69: )
Chris@69: {
Chris@69:     silk_encoder_control_FIX sEncCtrl;
Chris@69:     opus_int     i, iter, maxIter, found_upper, found_lower, ret = 0;
Chris@69:     opus_int16   *x_frame;
Chris@69:     ec_enc       sRangeEnc_copy, sRangeEnc_copy2;
Chris@69:     silk_nsq_state sNSQ_copy, sNSQ_copy2;
Chris@69:     opus_int32   seed_copy, nBits, nBits_lower, nBits_upper, gainMult_lower, gainMult_upper;
Chris@69:     opus_int32   gainsID, gainsID_lower, gainsID_upper;
Chris@69:     opus_int16   gainMult_Q8;
Chris@69:     opus_int16   ec_prevLagIndex_copy;
Chris@69:     opus_int     ec_prevSignalType_copy;
Chris@69:     opus_int8    LastGainIndex_copy2;
Chris@69:     opus_int     gain_lock[ MAX_NB_SUBFR ] = {0};
Chris@69:     opus_int16   best_gain_mult[ MAX_NB_SUBFR ];
Chris@69:     opus_int     best_sum[ MAX_NB_SUBFR ];
Chris@69:     SAVE_STACK;
Chris@69: 
Chris@69:     /* This is totally unnecessary but many compilers (including gcc) are too dumb to realise it */
Chris@69:     LastGainIndex_copy2 = nBits_lower = nBits_upper = gainMult_lower = gainMult_upper = 0;
Chris@69: 
Chris@69:     psEnc->sCmn.indices.Seed = psEnc->sCmn.frameCounter++ & 3;
Chris@69: 
Chris@69:     /**************************************************************/
Chris@69:     /* Set up Input Pointers, and insert frame in input buffer   */
Chris@69:     /*************************************************************/
Chris@69:     /* start of frame to encode */
Chris@69:     x_frame = psEnc->x_buf + psEnc->sCmn.ltp_mem_length;
Chris@69: 
Chris@69:     /***************************************/
Chris@69:     /* Ensure smooth bandwidth transitions */
Chris@69:     /***************************************/
Chris@69:     silk_LP_variable_cutoff( &psEnc->sCmn.sLP, psEnc->sCmn.inputBuf + 1, psEnc->sCmn.frame_length );
Chris@69: 
Chris@69:     /*******************************************/
Chris@69:     /* Copy new frame to front of input buffer */
Chris@69:     /*******************************************/
Chris@69:     silk_memcpy( x_frame + LA_SHAPE_MS * psEnc->sCmn.fs_kHz, psEnc->sCmn.inputBuf + 1, psEnc->sCmn.frame_length * sizeof( opus_int16 ) );
Chris@69: 
Chris@69:     if( !psEnc->sCmn.prefillFlag ) {
Chris@69:         VARDECL( opus_int16, res_pitch );
Chris@69:         VARDECL( opus_uint8, ec_buf_copy );
Chris@69:         opus_int16 *res_pitch_frame;
Chris@69: 
Chris@69:         ALLOC( res_pitch,
Chris@69:                psEnc->sCmn.la_pitch + psEnc->sCmn.frame_length
Chris@69:                    + psEnc->sCmn.ltp_mem_length, opus_int16 );
Chris@69:         /* start of pitch LPC residual frame */
Chris@69:         res_pitch_frame = res_pitch + psEnc->sCmn.ltp_mem_length;
Chris@69: 
Chris@69:         /*****************************************/
Chris@69:         /* Find pitch lags, initial LPC analysis */
Chris@69:         /*****************************************/
Chris@69:         silk_find_pitch_lags_FIX( psEnc, &sEncCtrl, res_pitch, x_frame - psEnc->sCmn.ltp_mem_length, psEnc->sCmn.arch );
Chris@69: 
Chris@69:         /************************/
Chris@69:         /* Noise shape analysis */
Chris@69:         /************************/
Chris@69:         silk_noise_shape_analysis_FIX( psEnc, &sEncCtrl, res_pitch_frame, x_frame, psEnc->sCmn.arch );
Chris@69: 
Chris@69:         /***************************************************/
Chris@69:         /* Find linear prediction coefficients (LPC + LTP) */
Chris@69:         /***************************************************/
Chris@69:         silk_find_pred_coefs_FIX( psEnc, &sEncCtrl, res_pitch_frame, x_frame, condCoding );
Chris@69: 
Chris@69:         /****************************************/
Chris@69:         /* Process gains                        */
Chris@69:         /****************************************/
Chris@69:         silk_process_gains_FIX( psEnc, &sEncCtrl, condCoding );
Chris@69: 
Chris@69:         /****************************************/
Chris@69:         /* Low Bitrate Redundant Encoding       */
Chris@69:         /****************************************/
Chris@69:         silk_LBRR_encode_FIX( psEnc, &sEncCtrl, x_frame, condCoding );
Chris@69: 
Chris@69:         /* Loop over quantizer and entropy coding to control bitrate */
Chris@69:         maxIter = 6;
Chris@69:         gainMult_Q8 = SILK_FIX_CONST( 1, 8 );
Chris@69:         found_lower = 0;
Chris@69:         found_upper = 0;
Chris@69:         gainsID = silk_gains_ID( psEnc->sCmn.indices.GainsIndices, psEnc->sCmn.nb_subfr );
Chris@69:         gainsID_lower = -1;
Chris@69:         gainsID_upper = -1;
Chris@69:         /* Copy part of the input state */
Chris@69:         silk_memcpy( &sRangeEnc_copy, psRangeEnc, sizeof( ec_enc ) );
Chris@69:         silk_memcpy( &sNSQ_copy, &psEnc->sCmn.sNSQ, sizeof( silk_nsq_state ) );
Chris@69:         seed_copy = psEnc->sCmn.indices.Seed;
Chris@69:         ec_prevLagIndex_copy = psEnc->sCmn.ec_prevLagIndex;
Chris@69:         ec_prevSignalType_copy = psEnc->sCmn.ec_prevSignalType;
Chris@69:         ALLOC( ec_buf_copy, 1275, opus_uint8 );
Chris@69:         for( iter = 0; ; iter++ ) {
Chris@69:             if( gainsID == gainsID_lower ) {
Chris@69:                 nBits = nBits_lower;
Chris@69:             } else if( gainsID == gainsID_upper ) {
Chris@69:                 nBits = nBits_upper;
Chris@69:             } else {
Chris@69:                 /* Restore part of the input state */
Chris@69:                 if( iter > 0 ) {
Chris@69:                     silk_memcpy( psRangeEnc, &sRangeEnc_copy, sizeof( ec_enc ) );
Chris@69:                     silk_memcpy( &psEnc->sCmn.sNSQ, &sNSQ_copy, sizeof( silk_nsq_state ) );
Chris@69:                     psEnc->sCmn.indices.Seed = seed_copy;
Chris@69:                     psEnc->sCmn.ec_prevLagIndex = ec_prevLagIndex_copy;
Chris@69:                     psEnc->sCmn.ec_prevSignalType = ec_prevSignalType_copy;
Chris@69:                 }
Chris@69: 
Chris@69:                 /*****************************************/
Chris@69:                 /* Noise shaping quantization            */
Chris@69:                 /*****************************************/
Chris@69:                 if( psEnc->sCmn.nStatesDelayedDecision > 1 || psEnc->sCmn.warping_Q16 > 0 ) {
Chris@69:                     silk_NSQ_del_dec( &psEnc->sCmn, &psEnc->sCmn.sNSQ, &psEnc->sCmn.indices, x_frame, psEnc->sCmn.pulses,
Chris@69:                            sEncCtrl.PredCoef_Q12[ 0 ], sEncCtrl.LTPCoef_Q14, sEncCtrl.AR_Q13, sEncCtrl.HarmShapeGain_Q14,
Chris@69:                            sEncCtrl.Tilt_Q14, sEncCtrl.LF_shp_Q14, sEncCtrl.Gains_Q16, sEncCtrl.pitchL, sEncCtrl.Lambda_Q10, sEncCtrl.LTP_scale_Q14,
Chris@69:                            psEnc->sCmn.arch );
Chris@69:                 } else {
Chris@69:                     silk_NSQ( &psEnc->sCmn, &psEnc->sCmn.sNSQ, &psEnc->sCmn.indices, x_frame, psEnc->sCmn.pulses,
Chris@69:                             sEncCtrl.PredCoef_Q12[ 0 ], sEncCtrl.LTPCoef_Q14, sEncCtrl.AR_Q13, sEncCtrl.HarmShapeGain_Q14,
Chris@69:                             sEncCtrl.Tilt_Q14, sEncCtrl.LF_shp_Q14, sEncCtrl.Gains_Q16, sEncCtrl.pitchL, sEncCtrl.Lambda_Q10, sEncCtrl.LTP_scale_Q14,
Chris@69:                             psEnc->sCmn.arch);
Chris@69:                 }
Chris@69: 
Chris@69:                 if ( iter == maxIter && !found_lower ) {
Chris@69:                     silk_memcpy( &sRangeEnc_copy2, psRangeEnc, sizeof( ec_enc ) );
Chris@69:                 }
Chris@69: 
Chris@69:                 /****************************************/
Chris@69:                 /* Encode Parameters                    */
Chris@69:                 /****************************************/
Chris@69:                 silk_encode_indices( &psEnc->sCmn, psRangeEnc, psEnc->sCmn.nFramesEncoded, 0, condCoding );
Chris@69: 
Chris@69:                 /****************************************/
Chris@69:                 /* Encode Excitation Signal             */
Chris@69:                 /****************************************/
Chris@69:                 silk_encode_pulses( psRangeEnc, psEnc->sCmn.indices.signalType, psEnc->sCmn.indices.quantOffsetType,
Chris@69:                     psEnc->sCmn.pulses, psEnc->sCmn.frame_length );
Chris@69: 
Chris@69:                 nBits = ec_tell( psRangeEnc );
Chris@69: 
Chris@69:                 /* If we still bust after the last iteration, do some damage control. */
Chris@69:                 if ( iter == maxIter && !found_lower && nBits > maxBits ) {
Chris@69:                     silk_memcpy( psRangeEnc, &sRangeEnc_copy2, sizeof( ec_enc ) );
Chris@69: 
Chris@69:                     /* Keep gains the same as the last frame. */
Chris@69:                     psEnc->sShape.LastGainIndex = sEncCtrl.lastGainIndexPrev;
Chris@69:                     for ( i = 0; i < psEnc->sCmn.nb_subfr; i++ ) {
Chris@69:                         psEnc->sCmn.indices.GainsIndices[ i ] = 4;
Chris@69:                     }
Chris@69:                     if (condCoding != CODE_CONDITIONALLY) {
Chris@69:                        psEnc->sCmn.indices.GainsIndices[ 0 ] = sEncCtrl.lastGainIndexPrev;
Chris@69:                     }
Chris@69:                     psEnc->sCmn.ec_prevLagIndex = ec_prevLagIndex_copy;
Chris@69:                     psEnc->sCmn.ec_prevSignalType = ec_prevSignalType_copy;
Chris@69:                     /* Clear all pulses. */
Chris@69:                     for ( i = 0; i < psEnc->sCmn.frame_length; i++ ) {
Chris@69:                         psEnc->sCmn.pulses[ i ] = 0;
Chris@69:                     }
Chris@69: 
Chris@69:                     silk_encode_indices( &psEnc->sCmn, psRangeEnc, psEnc->sCmn.nFramesEncoded, 0, condCoding );
Chris@69: 
Chris@69:                     silk_encode_pulses( psRangeEnc, psEnc->sCmn.indices.signalType, psEnc->sCmn.indices.quantOffsetType,
Chris@69:                         psEnc->sCmn.pulses, psEnc->sCmn.frame_length );
Chris@69: 
Chris@69:                     nBits = ec_tell( psRangeEnc );
Chris@69:                 }
Chris@69: 
Chris@69:                 if( useCBR == 0 && iter == 0 && nBits <= maxBits ) {
Chris@69:                     break;
Chris@69:                 }
Chris@69:             }
Chris@69: 
Chris@69:             if( iter == maxIter ) {
Chris@69:                 if( found_lower && ( gainsID == gainsID_lower || nBits > maxBits ) ) {
Chris@69:                     /* Restore output state from earlier iteration that did meet the bitrate budget */
Chris@69:                     silk_memcpy( psRangeEnc, &sRangeEnc_copy2, sizeof( ec_enc ) );
Chris@69:                     celt_assert( sRangeEnc_copy2.offs <= 1275 );
Chris@69:                     silk_memcpy( psRangeEnc->buf, ec_buf_copy, sRangeEnc_copy2.offs );
Chris@69:                     silk_memcpy( &psEnc->sCmn.sNSQ, &sNSQ_copy2, sizeof( silk_nsq_state ) );
Chris@69:                     psEnc->sShape.LastGainIndex = LastGainIndex_copy2;
Chris@69:                 }
Chris@69:                 break;
Chris@69:             }
Chris@69: 
Chris@69:             if( nBits > maxBits ) {
Chris@69:                 if( found_lower == 0 && iter >= 2 ) {
Chris@69:                     /* Adjust the quantizer's rate/distortion tradeoff and discard previous "upper" results */
Chris@69:                     sEncCtrl.Lambda_Q10 = silk_ADD_RSHIFT32( sEncCtrl.Lambda_Q10, sEncCtrl.Lambda_Q10, 1 );
Chris@69:                     found_upper = 0;
Chris@69:                     gainsID_upper = -1;
Chris@69:                 } else {
Chris@69:                     found_upper = 1;
Chris@69:                     nBits_upper = nBits;
Chris@69:                     gainMult_upper = gainMult_Q8;
Chris@69:                     gainsID_upper = gainsID;
Chris@69:                 }
Chris@69:             } else if( nBits < maxBits - 5 ) {
Chris@69:                 found_lower = 1;
Chris@69:                 nBits_lower = nBits;
Chris@69:                 gainMult_lower = gainMult_Q8;
Chris@69:                 if( gainsID != gainsID_lower ) {
Chris@69:                     gainsID_lower = gainsID;
Chris@69:                     /* Copy part of the output state */
Chris@69:                     silk_memcpy( &sRangeEnc_copy2, psRangeEnc, sizeof( ec_enc ) );
Chris@69:                     celt_assert( psRangeEnc->offs <= 1275 );
Chris@69:                     silk_memcpy( ec_buf_copy, psRangeEnc->buf, psRangeEnc->offs );
Chris@69:                     silk_memcpy( &sNSQ_copy2, &psEnc->sCmn.sNSQ, sizeof( silk_nsq_state ) );
Chris@69:                     LastGainIndex_copy2 = psEnc->sShape.LastGainIndex;
Chris@69:                 }
Chris@69:             } else {
Chris@69:                 /* Within 5 bits of budget: close enough */
Chris@69:                 break;
Chris@69:             }
Chris@69: 
Chris@69:             if ( !found_lower && nBits > maxBits ) {
Chris@69:                 int j;
Chris@69:                 for ( i = 0; i < psEnc->sCmn.nb_subfr; i++ ) {
Chris@69:                     int sum=0;
Chris@69:                     for ( j = i*psEnc->sCmn.subfr_length; j < (i+1)*psEnc->sCmn.subfr_length; j++ ) {
Chris@69:                         sum += abs( psEnc->sCmn.pulses[j] );
Chris@69:                     }
Chris@69:                     if ( iter == 0 || (sum < best_sum[i] && !gain_lock[i]) ) {
Chris@69:                         best_sum[i] = sum;
Chris@69:                         best_gain_mult[i] = gainMult_Q8;
Chris@69:                     } else {
Chris@69:                         gain_lock[i] = 1;
Chris@69:                     }
Chris@69:                 }
Chris@69:             }
Chris@69:             if( ( found_lower & found_upper ) == 0 ) {
Chris@69:                 /* Adjust gain according to high-rate rate/distortion curve */
Chris@69:                 if( nBits > maxBits ) {
Chris@69:                     if (gainMult_Q8 < 16384) {
Chris@69:                         gainMult_Q8 *= 2;
Chris@69:                     } else {
Chris@69:                         gainMult_Q8 = 32767;
Chris@69:                     }
Chris@69:                 } else {
Chris@69:                     opus_int32 gain_factor_Q16;
Chris@69:                     gain_factor_Q16 = silk_log2lin( silk_LSHIFT( nBits - maxBits, 7 ) / psEnc->sCmn.frame_length + SILK_FIX_CONST( 16, 7 ) );
Chris@69:                     gainMult_Q8 = silk_SMULWB( gain_factor_Q16, gainMult_Q8 );
Chris@69:                 }
Chris@69: 
Chris@69:             } else {
Chris@69:                 /* Adjust gain by interpolating */
Chris@69:                 gainMult_Q8 = gainMult_lower + silk_DIV32_16( silk_MUL( gainMult_upper - gainMult_lower, maxBits - nBits_lower ), nBits_upper - nBits_lower );
Chris@69:                 /* New gain multplier must be between 25% and 75% of old range (note that gainMult_upper < gainMult_lower) */
Chris@69:                 if( gainMult_Q8 > silk_ADD_RSHIFT32( gainMult_lower, gainMult_upper - gainMult_lower, 2 ) ) {
Chris@69:                     gainMult_Q8 = silk_ADD_RSHIFT32( gainMult_lower, gainMult_upper - gainMult_lower, 2 );
Chris@69:                 } else
Chris@69:                 if( gainMult_Q8 < silk_SUB_RSHIFT32( gainMult_upper, gainMult_upper - gainMult_lower, 2 ) ) {
Chris@69:                     gainMult_Q8 = silk_SUB_RSHIFT32( gainMult_upper, gainMult_upper - gainMult_lower, 2 );
Chris@69:                 }
Chris@69:             }
Chris@69: 
Chris@69:             for( i = 0; i < psEnc->sCmn.nb_subfr; i++ ) {
Chris@69:                 opus_int16 tmp;
Chris@69:                 if ( gain_lock[i] ) {
Chris@69:                     tmp = best_gain_mult[i];
Chris@69:                 } else {
Chris@69:                     tmp = gainMult_Q8;
Chris@69:                 }
Chris@69:                 sEncCtrl.Gains_Q16[ i ] = silk_LSHIFT_SAT32( silk_SMULWB( sEncCtrl.GainsUnq_Q16[ i ], tmp ), 8 );
Chris@69:             }
Chris@69: 
Chris@69:             /* Quantize gains */
Chris@69:             psEnc->sShape.LastGainIndex = sEncCtrl.lastGainIndexPrev;
Chris@69:             silk_gains_quant( psEnc->sCmn.indices.GainsIndices, sEncCtrl.Gains_Q16,
Chris@69:                   &psEnc->sShape.LastGainIndex, condCoding == CODE_CONDITIONALLY, psEnc->sCmn.nb_subfr );
Chris@69: 
Chris@69:             /* Unique identifier of gains vector */
Chris@69:             gainsID = silk_gains_ID( psEnc->sCmn.indices.GainsIndices, psEnc->sCmn.nb_subfr );
Chris@69:         }
Chris@69:     }
Chris@69: 
Chris@69:     /* Update input buffer */
Chris@69:     silk_memmove( psEnc->x_buf, &psEnc->x_buf[ psEnc->sCmn.frame_length ],
Chris@69:         ( psEnc->sCmn.ltp_mem_length + LA_SHAPE_MS * psEnc->sCmn.fs_kHz ) * sizeof( opus_int16 ) );
Chris@69: 
Chris@69:     /* Exit without entropy coding */
Chris@69:     if( psEnc->sCmn.prefillFlag ) {
Chris@69:         /* No payload */
Chris@69:         *pnBytesOut = 0;
Chris@69:         RESTORE_STACK;
Chris@69:         return ret;
Chris@69:     }
Chris@69: 
Chris@69:     /* Parameters needed for next frame */
Chris@69:     psEnc->sCmn.prevLag        = sEncCtrl.pitchL[ psEnc->sCmn.nb_subfr - 1 ];
Chris@69:     psEnc->sCmn.prevSignalType = psEnc->sCmn.indices.signalType;
Chris@69: 
Chris@69:     /****************************************/
Chris@69:     /* Finalize payload                     */
Chris@69:     /****************************************/
Chris@69:     psEnc->sCmn.first_frame_after_reset = 0;
Chris@69:     /* Payload size */
Chris@69:     *pnBytesOut = silk_RSHIFT( ec_tell( psRangeEnc ) + 7, 3 );
Chris@69: 
Chris@69:     RESTORE_STACK;
Chris@69:     return ret;
Chris@69: }
Chris@69: 
Chris@69: /* Low-Bitrate Redundancy (LBRR) encoding. Reuse all parameters but encode excitation at lower bitrate  */
Chris@69: static OPUS_INLINE void silk_LBRR_encode_FIX(
Chris@69:     silk_encoder_state_FIX          *psEnc,                                 /* I/O  Pointer to Silk FIX encoder state                                           */
Chris@69:     silk_encoder_control_FIX        *psEncCtrl,                             /* I/O  Pointer to Silk FIX encoder control struct                                  */
Chris@69:     const opus_int16                x16[],                                  /* I    Input signal                                                                */
Chris@69:     opus_int                        condCoding                              /* I    The type of conditional coding used so far for this frame                   */
Chris@69: )
Chris@69: {
Chris@69:     opus_int32   TempGains_Q16[ MAX_NB_SUBFR ];
Chris@69:     SideInfoIndices *psIndices_LBRR = &psEnc->sCmn.indices_LBRR[ psEnc->sCmn.nFramesEncoded ];
Chris@69:     silk_nsq_state sNSQ_LBRR;
Chris@69: 
Chris@69:     /*******************************************/
Chris@69:     /* Control use of inband LBRR              */
Chris@69:     /*******************************************/
Chris@69:     if( psEnc->sCmn.LBRR_enabled && psEnc->sCmn.speech_activity_Q8 > SILK_FIX_CONST( LBRR_SPEECH_ACTIVITY_THRES, 8 ) ) {
Chris@69:         psEnc->sCmn.LBRR_flags[ psEnc->sCmn.nFramesEncoded ] = 1;
Chris@69: 
Chris@69:         /* Copy noise shaping quantizer state and quantization indices from regular encoding */
Chris@69:         silk_memcpy( &sNSQ_LBRR, &psEnc->sCmn.sNSQ, sizeof( silk_nsq_state ) );
Chris@69:         silk_memcpy( psIndices_LBRR, &psEnc->sCmn.indices, sizeof( SideInfoIndices ) );
Chris@69: 
Chris@69:         /* Save original gains */
Chris@69:         silk_memcpy( TempGains_Q16, psEncCtrl->Gains_Q16, psEnc->sCmn.nb_subfr * sizeof( opus_int32 ) );
Chris@69: 
Chris@69:         if( psEnc->sCmn.nFramesEncoded == 0 || psEnc->sCmn.LBRR_flags[ psEnc->sCmn.nFramesEncoded - 1 ] == 0 ) {
Chris@69:             /* First frame in packet or previous frame not LBRR coded */
Chris@69:             psEnc->sCmn.LBRRprevLastGainIndex = psEnc->sShape.LastGainIndex;
Chris@69: 
Chris@69:             /* Increase Gains to get target LBRR rate */
Chris@69:             psIndices_LBRR->GainsIndices[ 0 ] = psIndices_LBRR->GainsIndices[ 0 ] + psEnc->sCmn.LBRR_GainIncreases;
Chris@69:             psIndices_LBRR->GainsIndices[ 0 ] = silk_min_int( psIndices_LBRR->GainsIndices[ 0 ], N_LEVELS_QGAIN - 1 );
Chris@69:         }
Chris@69: 
Chris@69:         /* Decode to get gains in sync with decoder         */
Chris@69:         /* Overwrite unquantized gains with quantized gains */
Chris@69:         silk_gains_dequant( psEncCtrl->Gains_Q16, psIndices_LBRR->GainsIndices,
Chris@69:             &psEnc->sCmn.LBRRprevLastGainIndex, condCoding == CODE_CONDITIONALLY, psEnc->sCmn.nb_subfr );
Chris@69: 
Chris@69:         /*****************************************/
Chris@69:         /* Noise shaping quantization            */
Chris@69:         /*****************************************/
Chris@69:         if( psEnc->sCmn.nStatesDelayedDecision > 1 || psEnc->sCmn.warping_Q16 > 0 ) {
Chris@69:             silk_NSQ_del_dec( &psEnc->sCmn, &sNSQ_LBRR, psIndices_LBRR, x16,
Chris@69:                 psEnc->sCmn.pulses_LBRR[ psEnc->sCmn.nFramesEncoded ], psEncCtrl->PredCoef_Q12[ 0 ], psEncCtrl->LTPCoef_Q14,
Chris@69:                 psEncCtrl->AR_Q13, psEncCtrl->HarmShapeGain_Q14, psEncCtrl->Tilt_Q14, psEncCtrl->LF_shp_Q14,
Chris@69:                 psEncCtrl->Gains_Q16, psEncCtrl->pitchL, psEncCtrl->Lambda_Q10, psEncCtrl->LTP_scale_Q14, psEnc->sCmn.arch );
Chris@69:         } else {
Chris@69:             silk_NSQ( &psEnc->sCmn, &sNSQ_LBRR, psIndices_LBRR, x16,
Chris@69:                 psEnc->sCmn.pulses_LBRR[ psEnc->sCmn.nFramesEncoded ], psEncCtrl->PredCoef_Q12[ 0 ], psEncCtrl->LTPCoef_Q14,
Chris@69:                 psEncCtrl->AR_Q13, psEncCtrl->HarmShapeGain_Q14, psEncCtrl->Tilt_Q14, psEncCtrl->LF_shp_Q14,
Chris@69:                 psEncCtrl->Gains_Q16, psEncCtrl->pitchL, psEncCtrl->Lambda_Q10, psEncCtrl->LTP_scale_Q14, psEnc->sCmn.arch );
Chris@69:         }
Chris@69: 
Chris@69:         /* Restore original gains */
Chris@69:         silk_memcpy( psEncCtrl->Gains_Q16, TempGains_Q16, psEnc->sCmn.nb_subfr * sizeof( opus_int32 ) );
Chris@69:     }
Chris@69: }