media/libopus/silk/NSQ.c

changeset 0
6474c204b198
     1.1 --- /dev/null	Thu Jan 01 00:00:00 1970 +0000
     1.2 +++ b/media/libopus/silk/NSQ.c	Wed Dec 31 06:09:35 2014 +0100
     1.3 @@ -0,0 +1,446 @@
     1.4 +/***********************************************************************
     1.5 +Copyright (c) 2006-2011, Skype Limited. All rights reserved.
     1.6 +Redistribution and use in source and binary forms, with or without
     1.7 +modification, are permitted provided that the following conditions
     1.8 +are met:
     1.9 +- Redistributions of source code must retain the above copyright notice,
    1.10 +this list of conditions and the following disclaimer.
    1.11 +- Redistributions in binary form must reproduce the above copyright
    1.12 +notice, this list of conditions and the following disclaimer in the
    1.13 +documentation and/or other materials provided with the distribution.
    1.14 +- Neither the name of Internet Society, IETF or IETF Trust, nor the
    1.15 +names of specific contributors, may be used to endorse or promote
    1.16 +products derived from this software without specific prior written
    1.17 +permission.
    1.18 +THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
    1.19 +AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
    1.20 +IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
    1.21 +ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
    1.22 +LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
    1.23 +CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
    1.24 +SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
    1.25 +INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
    1.26 +CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
    1.27 +ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
    1.28 +POSSIBILITY OF SUCH DAMAGE.
    1.29 +***********************************************************************/
    1.30 +
    1.31 +#ifdef HAVE_CONFIG_H
    1.32 +#include "config.h"
    1.33 +#endif
    1.34 +
    1.35 +#include "main.h"
    1.36 +#include "stack_alloc.h"
    1.37 +
    1.38 +static OPUS_INLINE void silk_nsq_scale_states(
    1.39 +    const silk_encoder_state *psEncC,           /* I    Encoder State                   */
    1.40 +    silk_nsq_state      *NSQ,                   /* I/O  NSQ state                       */
    1.41 +    const opus_int32    x_Q3[],                 /* I    input in Q3                     */
    1.42 +    opus_int32          x_sc_Q10[],             /* O    input scaled with 1/Gain        */
    1.43 +    const opus_int16    sLTP[],                 /* I    re-whitened LTP state in Q0     */
    1.44 +    opus_int32          sLTP_Q15[],             /* O    LTP state matching scaled input */
    1.45 +    opus_int            subfr,                  /* I    subframe number                 */
    1.46 +    const opus_int      LTP_scale_Q14,          /* I                                    */
    1.47 +    const opus_int32    Gains_Q16[ MAX_NB_SUBFR ], /* I                                 */
    1.48 +    const opus_int      pitchL[ MAX_NB_SUBFR ], /* I    Pitch lag                       */
    1.49 +    const opus_int      signal_type             /* I    Signal type                     */
    1.50 +);
    1.51 +
    1.52 +static OPUS_INLINE void silk_noise_shape_quantizer(
    1.53 +    silk_nsq_state      *NSQ,                   /* I/O  NSQ state                       */
    1.54 +    opus_int            signalType,             /* I    Signal type                     */
    1.55 +    const opus_int32    x_sc_Q10[],             /* I                                    */
    1.56 +    opus_int8           pulses[],               /* O                                    */
    1.57 +    opus_int16          xq[],                   /* O                                    */
    1.58 +    opus_int32          sLTP_Q15[],             /* I/O  LTP state                       */
    1.59 +    const opus_int16    a_Q12[],                /* I    Short term prediction coefs     */
    1.60 +    const opus_int16    b_Q14[],                /* I    Long term prediction coefs      */
    1.61 +    const opus_int16    AR_shp_Q13[],           /* I    Noise shaping AR coefs          */
    1.62 +    opus_int            lag,                    /* I    Pitch lag                       */
    1.63 +    opus_int32          HarmShapeFIRPacked_Q14, /* I                                    */
    1.64 +    opus_int            Tilt_Q14,               /* I    Spectral tilt                   */
    1.65 +    opus_int32          LF_shp_Q14,             /* I                                    */
    1.66 +    opus_int32          Gain_Q16,               /* I                                    */
    1.67 +    opus_int            Lambda_Q10,             /* I                                    */
    1.68 +    opus_int            offset_Q10,             /* I                                    */
    1.69 +    opus_int            length,                 /* I    Input length                    */
    1.70 +    opus_int            shapingLPCOrder,        /* I    Noise shaping AR filter order   */
    1.71 +    opus_int            predictLPCOrder         /* I    Prediction filter order         */
    1.72 +);
    1.73 +
    1.74 +void silk_NSQ(
    1.75 +    const silk_encoder_state    *psEncC,                                    /* I/O  Encoder State                   */
    1.76 +    silk_nsq_state              *NSQ,                                       /* I/O  NSQ state                       */
    1.77 +    SideInfoIndices             *psIndices,                                 /* I/O  Quantization Indices            */
    1.78 +    const opus_int32            x_Q3[],                                     /* I    Prefiltered input signal        */
    1.79 +    opus_int8                   pulses[],                                   /* O    Quantized pulse signal          */
    1.80 +    const opus_int16            PredCoef_Q12[ 2 * MAX_LPC_ORDER ],          /* I    Short term prediction coefs     */
    1.81 +    const opus_int16            LTPCoef_Q14[ LTP_ORDER * MAX_NB_SUBFR ],    /* I    Long term prediction coefs      */
    1.82 +    const opus_int16            AR2_Q13[ MAX_NB_SUBFR * MAX_SHAPE_LPC_ORDER ], /* I Noise shaping coefs             */
    1.83 +    const opus_int              HarmShapeGain_Q14[ MAX_NB_SUBFR ],          /* I    Long term shaping coefs         */
    1.84 +    const opus_int              Tilt_Q14[ MAX_NB_SUBFR ],                   /* I    Spectral tilt                   */
    1.85 +    const opus_int32            LF_shp_Q14[ MAX_NB_SUBFR ],                 /* I    Low frequency shaping coefs     */
    1.86 +    const opus_int32            Gains_Q16[ MAX_NB_SUBFR ],                  /* I    Quantization step sizes         */
    1.87 +    const opus_int              pitchL[ MAX_NB_SUBFR ],                     /* I    Pitch lags                      */
    1.88 +    const opus_int              Lambda_Q10,                                 /* I    Rate/distortion tradeoff        */
    1.89 +    const opus_int              LTP_scale_Q14                               /* I    LTP state scaling               */
    1.90 +)
    1.91 +{
    1.92 +    opus_int            k, lag, start_idx, LSF_interpolation_flag;
    1.93 +    const opus_int16    *A_Q12, *B_Q14, *AR_shp_Q13;
    1.94 +    opus_int16          *pxq;
    1.95 +    VARDECL( opus_int32, sLTP_Q15 );
    1.96 +    VARDECL( opus_int16, sLTP );
    1.97 +    opus_int32          HarmShapeFIRPacked_Q14;
    1.98 +    opus_int            offset_Q10;
    1.99 +    VARDECL( opus_int32, x_sc_Q10 );
   1.100 +    SAVE_STACK;
   1.101 +
   1.102 +    NSQ->rand_seed = psIndices->Seed;
   1.103 +
   1.104 +    /* Set unvoiced lag to the previous one, overwrite later for voiced */
   1.105 +    lag = NSQ->lagPrev;
   1.106 +
   1.107 +    silk_assert( NSQ->prev_gain_Q16 != 0 );
   1.108 +
   1.109 +    offset_Q10 = silk_Quantization_Offsets_Q10[ psIndices->signalType >> 1 ][ psIndices->quantOffsetType ];
   1.110 +
   1.111 +    if( psIndices->NLSFInterpCoef_Q2 == 4 ) {
   1.112 +        LSF_interpolation_flag = 0;
   1.113 +    } else {
   1.114 +        LSF_interpolation_flag = 1;
   1.115 +    }
   1.116 +
   1.117 +    ALLOC( sLTP_Q15,
   1.118 +           psEncC->ltp_mem_length + psEncC->frame_length, opus_int32 );
   1.119 +    ALLOC( sLTP, psEncC->ltp_mem_length + psEncC->frame_length, opus_int16 );
   1.120 +    ALLOC( x_sc_Q10, psEncC->subfr_length, opus_int32 );
   1.121 +    /* Set up pointers to start of sub frame */
   1.122 +    NSQ->sLTP_shp_buf_idx = psEncC->ltp_mem_length;
   1.123 +    NSQ->sLTP_buf_idx     = psEncC->ltp_mem_length;
   1.124 +    pxq                   = &NSQ->xq[ psEncC->ltp_mem_length ];
   1.125 +    for( k = 0; k < psEncC->nb_subfr; k++ ) {
   1.126 +        A_Q12      = &PredCoef_Q12[ (( k >> 1 ) | ( 1 - LSF_interpolation_flag )) * MAX_LPC_ORDER ];
   1.127 +        B_Q14      = &LTPCoef_Q14[ k * LTP_ORDER ];
   1.128 +        AR_shp_Q13 = &AR2_Q13[     k * MAX_SHAPE_LPC_ORDER ];
   1.129 +
   1.130 +        /* Noise shape parameters */
   1.131 +        silk_assert( HarmShapeGain_Q14[ k ] >= 0 );
   1.132 +        HarmShapeFIRPacked_Q14  =                          silk_RSHIFT( HarmShapeGain_Q14[ k ], 2 );
   1.133 +        HarmShapeFIRPacked_Q14 |= silk_LSHIFT( (opus_int32)silk_RSHIFT( HarmShapeGain_Q14[ k ], 1 ), 16 );
   1.134 +
   1.135 +        NSQ->rewhite_flag = 0;
   1.136 +        if( psIndices->signalType == TYPE_VOICED ) {
   1.137 +            /* Voiced */
   1.138 +            lag = pitchL[ k ];
   1.139 +
   1.140 +            /* Re-whitening */
   1.141 +            if( ( k & ( 3 - silk_LSHIFT( LSF_interpolation_flag, 1 ) ) ) == 0 ) {
   1.142 +                /* Rewhiten with new A coefs */
   1.143 +                start_idx = psEncC->ltp_mem_length - lag - psEncC->predictLPCOrder - LTP_ORDER / 2;
   1.144 +                silk_assert( start_idx > 0 );
   1.145 +
   1.146 +                silk_LPC_analysis_filter( &sLTP[ start_idx ], &NSQ->xq[ start_idx + k * psEncC->subfr_length ],
   1.147 +                    A_Q12, psEncC->ltp_mem_length - start_idx, psEncC->predictLPCOrder );
   1.148 +
   1.149 +                NSQ->rewhite_flag = 1;
   1.150 +                NSQ->sLTP_buf_idx = psEncC->ltp_mem_length;
   1.151 +            }
   1.152 +        }
   1.153 +
   1.154 +        silk_nsq_scale_states( psEncC, NSQ, x_Q3, x_sc_Q10, sLTP, sLTP_Q15, k, LTP_scale_Q14, Gains_Q16, pitchL, psIndices->signalType );
   1.155 +
   1.156 +        silk_noise_shape_quantizer( NSQ, psIndices->signalType, x_sc_Q10, pulses, pxq, sLTP_Q15, A_Q12, B_Q14,
   1.157 +            AR_shp_Q13, lag, HarmShapeFIRPacked_Q14, Tilt_Q14[ k ], LF_shp_Q14[ k ], Gains_Q16[ k ], Lambda_Q10,
   1.158 +            offset_Q10, psEncC->subfr_length, psEncC->shapingLPCOrder, psEncC->predictLPCOrder );
   1.159 +
   1.160 +        x_Q3   += psEncC->subfr_length;
   1.161 +        pulses += psEncC->subfr_length;
   1.162 +        pxq    += psEncC->subfr_length;
   1.163 +    }
   1.164 +
   1.165 +    /* Update lagPrev for next frame */
   1.166 +    NSQ->lagPrev = pitchL[ psEncC->nb_subfr - 1 ];
   1.167 +
   1.168 +    /* Save quantized speech and noise shaping signals */
   1.169 +    /* DEBUG_STORE_DATA( enc.pcm, &NSQ->xq[ psEncC->ltp_mem_length ], psEncC->frame_length * sizeof( opus_int16 ) ) */
   1.170 +    silk_memmove( NSQ->xq,           &NSQ->xq[           psEncC->frame_length ], psEncC->ltp_mem_length * sizeof( opus_int16 ) );
   1.171 +    silk_memmove( NSQ->sLTP_shp_Q14, &NSQ->sLTP_shp_Q14[ psEncC->frame_length ], psEncC->ltp_mem_length * sizeof( opus_int32 ) );
   1.172 +    RESTORE_STACK;
   1.173 +}
   1.174 +
   1.175 +/***********************************/
   1.176 +/* silk_noise_shape_quantizer  */
   1.177 +/***********************************/
   1.178 +static OPUS_INLINE void silk_noise_shape_quantizer(
   1.179 +    silk_nsq_state      *NSQ,                   /* I/O  NSQ state                       */
   1.180 +    opus_int            signalType,             /* I    Signal type                     */
   1.181 +    const opus_int32    x_sc_Q10[],             /* I                                    */
   1.182 +    opus_int8           pulses[],               /* O                                    */
   1.183 +    opus_int16          xq[],                   /* O                                    */
   1.184 +    opus_int32          sLTP_Q15[],             /* I/O  LTP state                       */
   1.185 +    const opus_int16    a_Q12[],                /* I    Short term prediction coefs     */
   1.186 +    const opus_int16    b_Q14[],                /* I    Long term prediction coefs      */
   1.187 +    const opus_int16    AR_shp_Q13[],           /* I    Noise shaping AR coefs          */
   1.188 +    opus_int            lag,                    /* I    Pitch lag                       */
   1.189 +    opus_int32          HarmShapeFIRPacked_Q14, /* I                                    */
   1.190 +    opus_int            Tilt_Q14,               /* I    Spectral tilt                   */
   1.191 +    opus_int32          LF_shp_Q14,             /* I                                    */
   1.192 +    opus_int32          Gain_Q16,               /* I                                    */
   1.193 +    opus_int            Lambda_Q10,             /* I                                    */
   1.194 +    opus_int            offset_Q10,             /* I                                    */
   1.195 +    opus_int            length,                 /* I    Input length                    */
   1.196 +    opus_int            shapingLPCOrder,        /* I    Noise shaping AR filter order   */
   1.197 +    opus_int            predictLPCOrder         /* I    Prediction filter order         */
   1.198 +)
   1.199 +{
   1.200 +    opus_int     i, j;
   1.201 +    opus_int32   LTP_pred_Q13, LPC_pred_Q10, n_AR_Q12, n_LTP_Q13;
   1.202 +    opus_int32   n_LF_Q12, r_Q10, rr_Q10, q1_Q0, q1_Q10, q2_Q10, rd1_Q20, rd2_Q20;
   1.203 +    opus_int32   exc_Q14, LPC_exc_Q14, xq_Q14, Gain_Q10;
   1.204 +    opus_int32   tmp1, tmp2, sLF_AR_shp_Q14;
   1.205 +    opus_int32   *psLPC_Q14, *shp_lag_ptr, *pred_lag_ptr;
   1.206 +
   1.207 +    shp_lag_ptr  = &NSQ->sLTP_shp_Q14[ NSQ->sLTP_shp_buf_idx - lag + HARM_SHAPE_FIR_TAPS / 2 ];
   1.208 +    pred_lag_ptr = &sLTP_Q15[ NSQ->sLTP_buf_idx - lag + LTP_ORDER / 2 ];
   1.209 +    Gain_Q10     = silk_RSHIFT( Gain_Q16, 6 );
   1.210 +
   1.211 +    /* Set up short term AR state */
   1.212 +    psLPC_Q14 = &NSQ->sLPC_Q14[ NSQ_LPC_BUF_LENGTH - 1 ];
   1.213 +
   1.214 +    for( i = 0; i < length; i++ ) {
   1.215 +        /* Generate dither */
   1.216 +        NSQ->rand_seed = silk_RAND( NSQ->rand_seed );
   1.217 +
   1.218 +        /* Short-term prediction */
   1.219 +        silk_assert( predictLPCOrder == 10 || predictLPCOrder == 16 );
   1.220 +        /* Avoids introducing a bias because silk_SMLAWB() always rounds to -inf */
   1.221 +        LPC_pred_Q10 = silk_RSHIFT( predictLPCOrder, 1 );
   1.222 +        LPC_pred_Q10 = silk_SMLAWB( LPC_pred_Q10, psLPC_Q14[  0 ], a_Q12[ 0 ] );
   1.223 +        LPC_pred_Q10 = silk_SMLAWB( LPC_pred_Q10, psLPC_Q14[ -1 ], a_Q12[ 1 ] );
   1.224 +        LPC_pred_Q10 = silk_SMLAWB( LPC_pred_Q10, psLPC_Q14[ -2 ], a_Q12[ 2 ] );
   1.225 +        LPC_pred_Q10 = silk_SMLAWB( LPC_pred_Q10, psLPC_Q14[ -3 ], a_Q12[ 3 ] );
   1.226 +        LPC_pred_Q10 = silk_SMLAWB( LPC_pred_Q10, psLPC_Q14[ -4 ], a_Q12[ 4 ] );
   1.227 +        LPC_pred_Q10 = silk_SMLAWB( LPC_pred_Q10, psLPC_Q14[ -5 ], a_Q12[ 5 ] );
   1.228 +        LPC_pred_Q10 = silk_SMLAWB( LPC_pred_Q10, psLPC_Q14[ -6 ], a_Q12[ 6 ] );
   1.229 +        LPC_pred_Q10 = silk_SMLAWB( LPC_pred_Q10, psLPC_Q14[ -7 ], a_Q12[ 7 ] );
   1.230 +        LPC_pred_Q10 = silk_SMLAWB( LPC_pred_Q10, psLPC_Q14[ -8 ], a_Q12[ 8 ] );
   1.231 +        LPC_pred_Q10 = silk_SMLAWB( LPC_pred_Q10, psLPC_Q14[ -9 ], a_Q12[ 9 ] );
   1.232 +        if( predictLPCOrder == 16 ) {
   1.233 +            LPC_pred_Q10 = silk_SMLAWB( LPC_pred_Q10, psLPC_Q14[ -10 ], a_Q12[ 10 ] );
   1.234 +            LPC_pred_Q10 = silk_SMLAWB( LPC_pred_Q10, psLPC_Q14[ -11 ], a_Q12[ 11 ] );
   1.235 +            LPC_pred_Q10 = silk_SMLAWB( LPC_pred_Q10, psLPC_Q14[ -12 ], a_Q12[ 12 ] );
   1.236 +            LPC_pred_Q10 = silk_SMLAWB( LPC_pred_Q10, psLPC_Q14[ -13 ], a_Q12[ 13 ] );
   1.237 +            LPC_pred_Q10 = silk_SMLAWB( LPC_pred_Q10, psLPC_Q14[ -14 ], a_Q12[ 14 ] );
   1.238 +            LPC_pred_Q10 = silk_SMLAWB( LPC_pred_Q10, psLPC_Q14[ -15 ], a_Q12[ 15 ] );
   1.239 +        }
   1.240 +
   1.241 +        /* Long-term prediction */
   1.242 +        if( signalType == TYPE_VOICED ) {
   1.243 +            /* Unrolled loop */
   1.244 +            /* Avoids introducing a bias because silk_SMLAWB() always rounds to -inf */
   1.245 +            LTP_pred_Q13 = 2;
   1.246 +            LTP_pred_Q13 = silk_SMLAWB( LTP_pred_Q13, pred_lag_ptr[  0 ], b_Q14[ 0 ] );
   1.247 +            LTP_pred_Q13 = silk_SMLAWB( LTP_pred_Q13, pred_lag_ptr[ -1 ], b_Q14[ 1 ] );
   1.248 +            LTP_pred_Q13 = silk_SMLAWB( LTP_pred_Q13, pred_lag_ptr[ -2 ], b_Q14[ 2 ] );
   1.249 +            LTP_pred_Q13 = silk_SMLAWB( LTP_pred_Q13, pred_lag_ptr[ -3 ], b_Q14[ 3 ] );
   1.250 +            LTP_pred_Q13 = silk_SMLAWB( LTP_pred_Q13, pred_lag_ptr[ -4 ], b_Q14[ 4 ] );
   1.251 +            pred_lag_ptr++;
   1.252 +        } else {
   1.253 +            LTP_pred_Q13 = 0;
   1.254 +        }
   1.255 +
   1.256 +        /* Noise shape feedback */
   1.257 +        silk_assert( ( shapingLPCOrder & 1 ) == 0 );   /* check that order is even */
   1.258 +        tmp2 = psLPC_Q14[ 0 ];
   1.259 +        tmp1 = NSQ->sAR2_Q14[ 0 ];
   1.260 +        NSQ->sAR2_Q14[ 0 ] = tmp2;
   1.261 +        n_AR_Q12 = silk_RSHIFT( shapingLPCOrder, 1 );
   1.262 +        n_AR_Q12 = silk_SMLAWB( n_AR_Q12, tmp2, AR_shp_Q13[ 0 ] );
   1.263 +        for( j = 2; j < shapingLPCOrder; j += 2 ) {
   1.264 +            tmp2 = NSQ->sAR2_Q14[ j - 1 ];
   1.265 +            NSQ->sAR2_Q14[ j - 1 ] = tmp1;
   1.266 +            n_AR_Q12 = silk_SMLAWB( n_AR_Q12, tmp1, AR_shp_Q13[ j - 1 ] );
   1.267 +            tmp1 = NSQ->sAR2_Q14[ j + 0 ];
   1.268 +            NSQ->sAR2_Q14[ j + 0 ] = tmp2;
   1.269 +            n_AR_Q12 = silk_SMLAWB( n_AR_Q12, tmp2, AR_shp_Q13[ j ] );
   1.270 +        }
   1.271 +        NSQ->sAR2_Q14[ shapingLPCOrder - 1 ] = tmp1;
   1.272 +        n_AR_Q12 = silk_SMLAWB( n_AR_Q12, tmp1, AR_shp_Q13[ shapingLPCOrder - 1 ] );
   1.273 +
   1.274 +        n_AR_Q12 = silk_LSHIFT32( n_AR_Q12, 1 );                                /* Q11 -> Q12 */
   1.275 +        n_AR_Q12 = silk_SMLAWB( n_AR_Q12, NSQ->sLF_AR_shp_Q14, Tilt_Q14 );
   1.276 +
   1.277 +        n_LF_Q12 = silk_SMULWB( NSQ->sLTP_shp_Q14[ NSQ->sLTP_shp_buf_idx - 1 ], LF_shp_Q14 );
   1.278 +        n_LF_Q12 = silk_SMLAWT( n_LF_Q12, NSQ->sLF_AR_shp_Q14, LF_shp_Q14 );
   1.279 +
   1.280 +        silk_assert( lag > 0 || signalType != TYPE_VOICED );
   1.281 +
   1.282 +        /* Combine prediction and noise shaping signals */
   1.283 +        tmp1 = silk_SUB32( silk_LSHIFT32( LPC_pred_Q10, 2 ), n_AR_Q12 );        /* Q12 */
   1.284 +        tmp1 = silk_SUB32( tmp1, n_LF_Q12 );                                    /* Q12 */
   1.285 +        if( lag > 0 ) {
   1.286 +            /* Symmetric, packed FIR coefficients */
   1.287 +            n_LTP_Q13 = silk_SMULWB( silk_ADD32( shp_lag_ptr[ 0 ], shp_lag_ptr[ -2 ] ), HarmShapeFIRPacked_Q14 );
   1.288 +            n_LTP_Q13 = silk_SMLAWT( n_LTP_Q13, shp_lag_ptr[ -1 ],                      HarmShapeFIRPacked_Q14 );
   1.289 +            n_LTP_Q13 = silk_LSHIFT( n_LTP_Q13, 1 );
   1.290 +            shp_lag_ptr++;
   1.291 +
   1.292 +            tmp2 = silk_SUB32( LTP_pred_Q13, n_LTP_Q13 );                       /* Q13 */
   1.293 +            tmp1 = silk_ADD_LSHIFT32( tmp2, tmp1, 1 );                          /* Q13 */
   1.294 +            tmp1 = silk_RSHIFT_ROUND( tmp1, 3 );                                /* Q10 */
   1.295 +        } else {
   1.296 +            tmp1 = silk_RSHIFT_ROUND( tmp1, 2 );                                /* Q10 */
   1.297 +        }
   1.298 +
   1.299 +        r_Q10 = silk_SUB32( x_sc_Q10[ i ], tmp1 );                              /* residual error Q10 */
   1.300 +
   1.301 +        /* Flip sign depending on dither */
   1.302 +        if ( NSQ->rand_seed < 0 ) {
   1.303 +           r_Q10 = -r_Q10;
   1.304 +        }
   1.305 +        r_Q10 = silk_LIMIT_32( r_Q10, -(31 << 10), 30 << 10 );
   1.306 +
   1.307 +        /* Find two quantization level candidates and measure their rate-distortion */
   1.308 +        q1_Q10 = silk_SUB32( r_Q10, offset_Q10 );
   1.309 +        q1_Q0 = silk_RSHIFT( q1_Q10, 10 );
   1.310 +        if( q1_Q0 > 0 ) {
   1.311 +            q1_Q10  = silk_SUB32( silk_LSHIFT( q1_Q0, 10 ), QUANT_LEVEL_ADJUST_Q10 );
   1.312 +            q1_Q10  = silk_ADD32( q1_Q10, offset_Q10 );
   1.313 +            q2_Q10  = silk_ADD32( q1_Q10, 1024 );
   1.314 +            rd1_Q20 = silk_SMULBB( q1_Q10, Lambda_Q10 );
   1.315 +            rd2_Q20 = silk_SMULBB( q2_Q10, Lambda_Q10 );
   1.316 +        } else if( q1_Q0 == 0 ) {
   1.317 +            q1_Q10  = offset_Q10;
   1.318 +            q2_Q10  = silk_ADD32( q1_Q10, 1024 - QUANT_LEVEL_ADJUST_Q10 );
   1.319 +            rd1_Q20 = silk_SMULBB( q1_Q10, Lambda_Q10 );
   1.320 +            rd2_Q20 = silk_SMULBB( q2_Q10, Lambda_Q10 );
   1.321 +        } else if( q1_Q0 == -1 ) {
   1.322 +            q2_Q10  = offset_Q10;
   1.323 +            q1_Q10  = silk_SUB32( q2_Q10, 1024 - QUANT_LEVEL_ADJUST_Q10 );
   1.324 +            rd1_Q20 = silk_SMULBB( -q1_Q10, Lambda_Q10 );
   1.325 +            rd2_Q20 = silk_SMULBB(  q2_Q10, Lambda_Q10 );
   1.326 +        } else {            /* Q1_Q0 < -1 */
   1.327 +            q1_Q10  = silk_ADD32( silk_LSHIFT( q1_Q0, 10 ), QUANT_LEVEL_ADJUST_Q10 );
   1.328 +            q1_Q10  = silk_ADD32( q1_Q10, offset_Q10 );
   1.329 +            q2_Q10  = silk_ADD32( q1_Q10, 1024 );
   1.330 +            rd1_Q20 = silk_SMULBB( -q1_Q10, Lambda_Q10 );
   1.331 +            rd2_Q20 = silk_SMULBB( -q2_Q10, Lambda_Q10 );
   1.332 +        }
   1.333 +        rr_Q10  = silk_SUB32( r_Q10, q1_Q10 );
   1.334 +        rd1_Q20 = silk_SMLABB( rd1_Q20, rr_Q10, rr_Q10 );
   1.335 +        rr_Q10  = silk_SUB32( r_Q10, q2_Q10 );
   1.336 +        rd2_Q20 = silk_SMLABB( rd2_Q20, rr_Q10, rr_Q10 );
   1.337 +
   1.338 +        if( rd2_Q20 < rd1_Q20 ) {
   1.339 +            q1_Q10 = q2_Q10;
   1.340 +        }
   1.341 +
   1.342 +        pulses[ i ] = (opus_int8)silk_RSHIFT_ROUND( q1_Q10, 10 );
   1.343 +
   1.344 +        /* Excitation */
   1.345 +        exc_Q14 = silk_LSHIFT( q1_Q10, 4 );
   1.346 +        if ( NSQ->rand_seed < 0 ) {
   1.347 +           exc_Q14 = -exc_Q14;
   1.348 +        }
   1.349 +
   1.350 +        /* Add predictions */
   1.351 +        LPC_exc_Q14 = silk_ADD_LSHIFT32( exc_Q14, LTP_pred_Q13, 1 );
   1.352 +        xq_Q14      = silk_ADD_LSHIFT32( LPC_exc_Q14, LPC_pred_Q10, 4 );
   1.353 +
   1.354 +        /* Scale XQ back to normal level before saving */
   1.355 +        xq[ i ] = (opus_int16)silk_SAT16( silk_RSHIFT_ROUND( silk_SMULWW( xq_Q14, Gain_Q10 ), 8 ) );
   1.356 +
   1.357 +        /* Update states */
   1.358 +        psLPC_Q14++;
   1.359 +        *psLPC_Q14 = xq_Q14;
   1.360 +        sLF_AR_shp_Q14 = silk_SUB_LSHIFT32( xq_Q14, n_AR_Q12, 2 );
   1.361 +        NSQ->sLF_AR_shp_Q14 = sLF_AR_shp_Q14;
   1.362 +
   1.363 +        NSQ->sLTP_shp_Q14[ NSQ->sLTP_shp_buf_idx ] = silk_SUB_LSHIFT32( sLF_AR_shp_Q14, n_LF_Q12, 2 );
   1.364 +        sLTP_Q15[ NSQ->sLTP_buf_idx ] = silk_LSHIFT( LPC_exc_Q14, 1 );
   1.365 +        NSQ->sLTP_shp_buf_idx++;
   1.366 +        NSQ->sLTP_buf_idx++;
   1.367 +
   1.368 +        /* Make dither dependent on quantized signal */
   1.369 +        NSQ->rand_seed = silk_ADD32_ovflw( NSQ->rand_seed, pulses[ i ] );
   1.370 +    }
   1.371 +
   1.372 +    /* Update LPC synth buffer */
   1.373 +    silk_memcpy( NSQ->sLPC_Q14, &NSQ->sLPC_Q14[ length ], NSQ_LPC_BUF_LENGTH * sizeof( opus_int32 ) );
   1.374 +}
   1.375 +
   1.376 +static OPUS_INLINE void silk_nsq_scale_states(
   1.377 +    const silk_encoder_state *psEncC,           /* I    Encoder State                   */
   1.378 +    silk_nsq_state      *NSQ,                   /* I/O  NSQ state                       */
   1.379 +    const opus_int32    x_Q3[],                 /* I    input in Q3                     */
   1.380 +    opus_int32          x_sc_Q10[],             /* O    input scaled with 1/Gain        */
   1.381 +    const opus_int16    sLTP[],                 /* I    re-whitened LTP state in Q0     */
   1.382 +    opus_int32          sLTP_Q15[],             /* O    LTP state matching scaled input */
   1.383 +    opus_int            subfr,                  /* I    subframe number                 */
   1.384 +    const opus_int      LTP_scale_Q14,          /* I                                    */
   1.385 +    const opus_int32    Gains_Q16[ MAX_NB_SUBFR ], /* I                                 */
   1.386 +    const opus_int      pitchL[ MAX_NB_SUBFR ], /* I    Pitch lag                       */
   1.387 +    const opus_int      signal_type             /* I    Signal type                     */
   1.388 +)
   1.389 +{
   1.390 +    opus_int   i, lag;
   1.391 +    opus_int32 gain_adj_Q16, inv_gain_Q31, inv_gain_Q23;
   1.392 +
   1.393 +    lag          = pitchL[ subfr ];
   1.394 +    inv_gain_Q31 = silk_INVERSE32_varQ( silk_max( Gains_Q16[ subfr ], 1 ), 47 );
   1.395 +    silk_assert( inv_gain_Q31 != 0 );
   1.396 +
   1.397 +    /* Calculate gain adjustment factor */
   1.398 +    if( Gains_Q16[ subfr ] != NSQ->prev_gain_Q16 ) {
   1.399 +        gain_adj_Q16 =  silk_DIV32_varQ( NSQ->prev_gain_Q16, Gains_Q16[ subfr ], 16 );
   1.400 +    } else {
   1.401 +        gain_adj_Q16 = (opus_int32)1 << 16;
   1.402 +    }
   1.403 +
   1.404 +    /* Scale input */
   1.405 +    inv_gain_Q23 = silk_RSHIFT_ROUND( inv_gain_Q31, 8 );
   1.406 +    for( i = 0; i < psEncC->subfr_length; i++ ) {
   1.407 +        x_sc_Q10[ i ] = silk_SMULWW( x_Q3[ i ], inv_gain_Q23 );
   1.408 +    }
   1.409 +
   1.410 +    /* Save inverse gain */
   1.411 +    NSQ->prev_gain_Q16 = Gains_Q16[ subfr ];
   1.412 +
   1.413 +    /* After rewhitening the LTP state is un-scaled, so scale with inv_gain_Q16 */
   1.414 +    if( NSQ->rewhite_flag ) {
   1.415 +        if( subfr == 0 ) {
   1.416 +            /* Do LTP downscaling */
   1.417 +            inv_gain_Q31 = silk_LSHIFT( silk_SMULWB( inv_gain_Q31, LTP_scale_Q14 ), 2 );
   1.418 +        }
   1.419 +        for( i = NSQ->sLTP_buf_idx - lag - LTP_ORDER / 2; i < NSQ->sLTP_buf_idx; i++ ) {
   1.420 +            silk_assert( i < MAX_FRAME_LENGTH );
   1.421 +            sLTP_Q15[ i ] = silk_SMULWB( inv_gain_Q31, sLTP[ i ] );
   1.422 +        }
   1.423 +    }
   1.424 +
   1.425 +    /* Adjust for changing gain */
   1.426 +    if( gain_adj_Q16 != (opus_int32)1 << 16 ) {
   1.427 +        /* Scale long-term shaping state */
   1.428 +        for( i = NSQ->sLTP_shp_buf_idx - psEncC->ltp_mem_length; i < NSQ->sLTP_shp_buf_idx; i++ ) {
   1.429 +            NSQ->sLTP_shp_Q14[ i ] = silk_SMULWW( gain_adj_Q16, NSQ->sLTP_shp_Q14[ i ] );
   1.430 +        }
   1.431 +
   1.432 +        /* Scale long-term prediction state */
   1.433 +        if( signal_type == TYPE_VOICED && NSQ->rewhite_flag == 0 ) {
   1.434 +            for( i = NSQ->sLTP_buf_idx - lag - LTP_ORDER / 2; i < NSQ->sLTP_buf_idx; i++ ) {
   1.435 +                sLTP_Q15[ i ] = silk_SMULWW( gain_adj_Q16, sLTP_Q15[ i ] );
   1.436 +            }
   1.437 +        }
   1.438 +
   1.439 +        NSQ->sLF_AR_shp_Q14 = silk_SMULWW( gain_adj_Q16, NSQ->sLF_AR_shp_Q14 );
   1.440 +
   1.441 +        /* Scale short-term prediction and shaping states */
   1.442 +        for( i = 0; i < NSQ_LPC_BUF_LENGTH; i++ ) {
   1.443 +            NSQ->sLPC_Q14[ i ] = silk_SMULWW( gain_adj_Q16, NSQ->sLPC_Q14[ i ] );
   1.444 +        }
   1.445 +        for( i = 0; i < MAX_SHAPE_LPC_ORDER; i++ ) {
   1.446 +            NSQ->sAR2_Q14[ i ] = silk_SMULWW( gain_adj_Q16, NSQ->sAR2_Q14[ i ] );
   1.447 +        }
   1.448 +    }
   1.449 +}

mercurial