xref: /aosp_15_r20/external/libopus/silk/NSQ.c (revision a58d3d2adb790c104798cd88c8a3aff4fa8b82cc)
1*a58d3d2aSXin Li /***********************************************************************
2*a58d3d2aSXin Li Copyright (c) 2006-2011, Skype Limited. All rights reserved.
3*a58d3d2aSXin Li Redistribution and use in source and binary forms, with or without
4*a58d3d2aSXin Li modification, are permitted provided that the following conditions
5*a58d3d2aSXin Li are met:
6*a58d3d2aSXin Li - Redistributions of source code must retain the above copyright notice,
7*a58d3d2aSXin Li this list of conditions and the following disclaimer.
8*a58d3d2aSXin Li - Redistributions in binary form must reproduce the above copyright
9*a58d3d2aSXin Li notice, this list of conditions and the following disclaimer in the
10*a58d3d2aSXin Li documentation and/or other materials provided with the distribution.
11*a58d3d2aSXin Li - Neither the name of Internet Society, IETF or IETF Trust, nor the
12*a58d3d2aSXin Li names of specific contributors, may be used to endorse or promote
13*a58d3d2aSXin Li products derived from this software without specific prior written
14*a58d3d2aSXin Li permission.
15*a58d3d2aSXin Li THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
16*a58d3d2aSXin Li AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
17*a58d3d2aSXin Li IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
18*a58d3d2aSXin Li ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
19*a58d3d2aSXin Li LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
20*a58d3d2aSXin Li CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
21*a58d3d2aSXin Li SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
22*a58d3d2aSXin Li INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
23*a58d3d2aSXin Li CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
24*a58d3d2aSXin Li ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
25*a58d3d2aSXin Li POSSIBILITY OF SUCH DAMAGE.
26*a58d3d2aSXin Li ***********************************************************************/
27*a58d3d2aSXin Li 
28*a58d3d2aSXin Li #ifdef HAVE_CONFIG_H
29*a58d3d2aSXin Li #include "config.h"
30*a58d3d2aSXin Li #endif
31*a58d3d2aSXin Li 
32*a58d3d2aSXin Li #include "main.h"
33*a58d3d2aSXin Li #include "stack_alloc.h"
34*a58d3d2aSXin Li #include "NSQ.h"
35*a58d3d2aSXin Li 
36*a58d3d2aSXin Li 
37*a58d3d2aSXin Li static OPUS_INLINE void silk_nsq_scale_states(
38*a58d3d2aSXin Li     const silk_encoder_state *psEncC,           /* I    Encoder State                   */
39*a58d3d2aSXin Li     silk_nsq_state      *NSQ,                   /* I/O  NSQ state                       */
40*a58d3d2aSXin Li     const opus_int16    x16[],                  /* I    input                           */
41*a58d3d2aSXin Li     opus_int32          x_sc_Q10[],             /* O    input scaled with 1/Gain        */
42*a58d3d2aSXin Li     const opus_int16    sLTP[],                 /* I    re-whitened LTP state in Q0     */
43*a58d3d2aSXin Li     opus_int32          sLTP_Q15[],             /* O    LTP state matching scaled input */
44*a58d3d2aSXin Li     opus_int            subfr,                  /* I    subframe number                 */
45*a58d3d2aSXin Li     const opus_int      LTP_scale_Q14,          /* I                                    */
46*a58d3d2aSXin Li     const opus_int32    Gains_Q16[ MAX_NB_SUBFR ], /* I                                 */
47*a58d3d2aSXin Li     const opus_int      pitchL[ MAX_NB_SUBFR ], /* I    Pitch lag                       */
48*a58d3d2aSXin Li     const opus_int      signal_type             /* I    Signal type                     */
49*a58d3d2aSXin Li );
50*a58d3d2aSXin Li 
51*a58d3d2aSXin Li #if !defined(OPUS_X86_MAY_HAVE_SSE4_1)
52*a58d3d2aSXin Li static OPUS_INLINE void silk_noise_shape_quantizer(
53*a58d3d2aSXin Li     silk_nsq_state      *NSQ,                   /* I/O  NSQ state                       */
54*a58d3d2aSXin Li     opus_int            signalType,             /* I    Signal type                     */
55*a58d3d2aSXin Li     const opus_int32    x_sc_Q10[],             /* I                                    */
56*a58d3d2aSXin Li     opus_int8           pulses[],               /* O                                    */
57*a58d3d2aSXin Li     opus_int16          xq[],                   /* O                                    */
58*a58d3d2aSXin Li     opus_int32          sLTP_Q15[],             /* I/O  LTP state                       */
59*a58d3d2aSXin Li     const opus_int16    a_Q12[],                /* I    Short term prediction coefs     */
60*a58d3d2aSXin Li     const opus_int16    b_Q14[],                /* I    Long term prediction coefs      */
61*a58d3d2aSXin Li     const opus_int16    AR_shp_Q13[],           /* I    Noise shaping AR coefs          */
62*a58d3d2aSXin Li     opus_int            lag,                    /* I    Pitch lag                       */
63*a58d3d2aSXin Li     opus_int32          HarmShapeFIRPacked_Q14, /* I                                    */
64*a58d3d2aSXin Li     opus_int            Tilt_Q14,               /* I    Spectral tilt                   */
65*a58d3d2aSXin Li     opus_int32          LF_shp_Q14,             /* I                                    */
66*a58d3d2aSXin Li     opus_int32          Gain_Q16,               /* I                                    */
67*a58d3d2aSXin Li     opus_int            Lambda_Q10,             /* I                                    */
68*a58d3d2aSXin Li     opus_int            offset_Q10,             /* I                                    */
69*a58d3d2aSXin Li     opus_int            length,                 /* I    Input length                    */
70*a58d3d2aSXin Li     opus_int            shapingLPCOrder,        /* I    Noise shaping AR filter order   */
71*a58d3d2aSXin Li     opus_int            predictLPCOrder,        /* I    Prediction filter order         */
72*a58d3d2aSXin Li     int                 arch                    /* I    Architecture                    */
73*a58d3d2aSXin Li );
74*a58d3d2aSXin Li #endif
75*a58d3d2aSXin Li 
silk_NSQ_c(const silk_encoder_state * psEncC,silk_nsq_state * NSQ,SideInfoIndices * psIndices,const opus_int16 x16[],opus_int8 pulses[],const opus_int16 * PredCoef_Q12,const opus_int16 LTPCoef_Q14[LTP_ORDER * MAX_NB_SUBFR],const opus_int16 AR_Q13[MAX_NB_SUBFR * MAX_SHAPE_LPC_ORDER],const opus_int HarmShapeGain_Q14[MAX_NB_SUBFR],const opus_int Tilt_Q14[MAX_NB_SUBFR],const opus_int32 LF_shp_Q14[MAX_NB_SUBFR],const opus_int32 Gains_Q16[MAX_NB_SUBFR],const opus_int pitchL[MAX_NB_SUBFR],const opus_int Lambda_Q10,const opus_int LTP_scale_Q14)76*a58d3d2aSXin Li void silk_NSQ_c
77*a58d3d2aSXin Li (
78*a58d3d2aSXin Li     const silk_encoder_state    *psEncC,                                      /* I    Encoder State                   */
79*a58d3d2aSXin Li     silk_nsq_state              *NSQ,                                         /* I/O  NSQ state                       */
80*a58d3d2aSXin Li     SideInfoIndices             *psIndices,                                   /* I/O  Quantization Indices            */
81*a58d3d2aSXin Li     const opus_int16            x16[],                                        /* I    Input                           */
82*a58d3d2aSXin Li     opus_int8                   pulses[],                                     /* O    Quantized pulse signal          */
83*a58d3d2aSXin Li     const opus_int16            *PredCoef_Q12,                                /* I    Short term prediction coefs     */
84*a58d3d2aSXin Li     const opus_int16            LTPCoef_Q14[ LTP_ORDER * MAX_NB_SUBFR ],      /* I    Long term prediction coefs      */
85*a58d3d2aSXin Li     const opus_int16            AR_Q13[ MAX_NB_SUBFR * MAX_SHAPE_LPC_ORDER ], /* I    Noise shaping coefs             */
86*a58d3d2aSXin Li     const opus_int              HarmShapeGain_Q14[ MAX_NB_SUBFR ],            /* I    Long term shaping coefs         */
87*a58d3d2aSXin Li     const opus_int              Tilt_Q14[ MAX_NB_SUBFR ],                     /* I    Spectral tilt                   */
88*a58d3d2aSXin Li     const opus_int32            LF_shp_Q14[ MAX_NB_SUBFR ],                   /* I    Low frequency shaping coefs     */
89*a58d3d2aSXin Li     const opus_int32            Gains_Q16[ MAX_NB_SUBFR ],                    /* I    Quantization step sizes         */
90*a58d3d2aSXin Li     const opus_int              pitchL[ MAX_NB_SUBFR ],                       /* I    Pitch lags                      */
91*a58d3d2aSXin Li     const opus_int              Lambda_Q10,                                   /* I    Rate/distortion tradeoff        */
92*a58d3d2aSXin Li     const opus_int              LTP_scale_Q14                                 /* I    LTP state scaling               */
93*a58d3d2aSXin Li )
94*a58d3d2aSXin Li {
95*a58d3d2aSXin Li     opus_int            k, lag, start_idx, LSF_interpolation_flag;
96*a58d3d2aSXin Li     const opus_int16    *A_Q12, *B_Q14, *AR_shp_Q13;
97*a58d3d2aSXin Li     opus_int16          *pxq;
98*a58d3d2aSXin Li     VARDECL( opus_int32, sLTP_Q15 );
99*a58d3d2aSXin Li     VARDECL( opus_int16, sLTP );
100*a58d3d2aSXin Li     opus_int32          HarmShapeFIRPacked_Q14;
101*a58d3d2aSXin Li     opus_int            offset_Q10;
102*a58d3d2aSXin Li     VARDECL( opus_int32, x_sc_Q10 );
103*a58d3d2aSXin Li     SAVE_STACK;
104*a58d3d2aSXin Li 
105*a58d3d2aSXin Li     NSQ->rand_seed = psIndices->Seed;
106*a58d3d2aSXin Li 
107*a58d3d2aSXin Li     /* Set unvoiced lag to the previous one, overwrite later for voiced */
108*a58d3d2aSXin Li     lag = NSQ->lagPrev;
109*a58d3d2aSXin Li 
110*a58d3d2aSXin Li     silk_assert( NSQ->prev_gain_Q16 != 0 );
111*a58d3d2aSXin Li 
112*a58d3d2aSXin Li     offset_Q10 = silk_Quantization_Offsets_Q10[ psIndices->signalType >> 1 ][ psIndices->quantOffsetType ];
113*a58d3d2aSXin Li 
114*a58d3d2aSXin Li     if( psIndices->NLSFInterpCoef_Q2 == 4 ) {
115*a58d3d2aSXin Li         LSF_interpolation_flag = 0;
116*a58d3d2aSXin Li     } else {
117*a58d3d2aSXin Li         LSF_interpolation_flag = 1;
118*a58d3d2aSXin Li     }
119*a58d3d2aSXin Li 
120*a58d3d2aSXin Li     ALLOC( sLTP_Q15, psEncC->ltp_mem_length + psEncC->frame_length, opus_int32 );
121*a58d3d2aSXin Li     ALLOC( sLTP, psEncC->ltp_mem_length + psEncC->frame_length, opus_int16 );
122*a58d3d2aSXin Li     ALLOC( x_sc_Q10, psEncC->subfr_length, opus_int32 );
123*a58d3d2aSXin Li     /* Set up pointers to start of sub frame */
124*a58d3d2aSXin Li     NSQ->sLTP_shp_buf_idx = psEncC->ltp_mem_length;
125*a58d3d2aSXin Li     NSQ->sLTP_buf_idx     = psEncC->ltp_mem_length;
126*a58d3d2aSXin Li     pxq                   = &NSQ->xq[ psEncC->ltp_mem_length ];
127*a58d3d2aSXin Li     for( k = 0; k < psEncC->nb_subfr; k++ ) {
128*a58d3d2aSXin Li         A_Q12      = &PredCoef_Q12[ (( k >> 1 ) | ( 1 - LSF_interpolation_flag )) * MAX_LPC_ORDER ];
129*a58d3d2aSXin Li         B_Q14      = &LTPCoef_Q14[ k * LTP_ORDER ];
130*a58d3d2aSXin Li         AR_shp_Q13 = &AR_Q13[ k * MAX_SHAPE_LPC_ORDER ];
131*a58d3d2aSXin Li 
132*a58d3d2aSXin Li         /* Noise shape parameters */
133*a58d3d2aSXin Li         silk_assert( HarmShapeGain_Q14[ k ] >= 0 );
134*a58d3d2aSXin Li         HarmShapeFIRPacked_Q14  =                          silk_RSHIFT( HarmShapeGain_Q14[ k ], 2 );
135*a58d3d2aSXin Li         HarmShapeFIRPacked_Q14 |= silk_LSHIFT( (opus_int32)silk_RSHIFT( HarmShapeGain_Q14[ k ], 1 ), 16 );
136*a58d3d2aSXin Li 
137*a58d3d2aSXin Li         NSQ->rewhite_flag = 0;
138*a58d3d2aSXin Li         if( psIndices->signalType == TYPE_VOICED ) {
139*a58d3d2aSXin Li             /* Voiced */
140*a58d3d2aSXin Li             lag = pitchL[ k ];
141*a58d3d2aSXin Li 
142*a58d3d2aSXin Li             /* Re-whitening */
143*a58d3d2aSXin Li             if( ( k & ( 3 - silk_LSHIFT( LSF_interpolation_flag, 1 ) ) ) == 0 ) {
144*a58d3d2aSXin Li                 /* Rewhiten with new A coefs */
145*a58d3d2aSXin Li                 start_idx = psEncC->ltp_mem_length - lag - psEncC->predictLPCOrder - LTP_ORDER / 2;
146*a58d3d2aSXin Li                 celt_assert( start_idx > 0 );
147*a58d3d2aSXin Li 
148*a58d3d2aSXin Li                 silk_LPC_analysis_filter( &sLTP[ start_idx ], &NSQ->xq[ start_idx + k * psEncC->subfr_length ],
149*a58d3d2aSXin Li                     A_Q12, psEncC->ltp_mem_length - start_idx, psEncC->predictLPCOrder, psEncC->arch );
150*a58d3d2aSXin Li 
151*a58d3d2aSXin Li                 NSQ->rewhite_flag = 1;
152*a58d3d2aSXin Li                 NSQ->sLTP_buf_idx = psEncC->ltp_mem_length;
153*a58d3d2aSXin Li             }
154*a58d3d2aSXin Li         }
155*a58d3d2aSXin Li 
156*a58d3d2aSXin Li         silk_nsq_scale_states( psEncC, NSQ, x16, x_sc_Q10, sLTP, sLTP_Q15, k, LTP_scale_Q14, Gains_Q16, pitchL, psIndices->signalType );
157*a58d3d2aSXin Li 
158*a58d3d2aSXin Li         silk_noise_shape_quantizer( NSQ, psIndices->signalType, x_sc_Q10, pulses, pxq, sLTP_Q15, A_Q12, B_Q14,
159*a58d3d2aSXin Li             AR_shp_Q13, lag, HarmShapeFIRPacked_Q14, Tilt_Q14[ k ], LF_shp_Q14[ k ], Gains_Q16[ k ], Lambda_Q10,
160*a58d3d2aSXin Li             offset_Q10, psEncC->subfr_length, psEncC->shapingLPCOrder, psEncC->predictLPCOrder, psEncC->arch );
161*a58d3d2aSXin Li 
162*a58d3d2aSXin Li         x16    += psEncC->subfr_length;
163*a58d3d2aSXin Li         pulses += psEncC->subfr_length;
164*a58d3d2aSXin Li         pxq    += psEncC->subfr_length;
165*a58d3d2aSXin Li     }
166*a58d3d2aSXin Li 
167*a58d3d2aSXin Li     /* Update lagPrev for next frame */
168*a58d3d2aSXin Li     NSQ->lagPrev = pitchL[ psEncC->nb_subfr - 1 ];
169*a58d3d2aSXin Li 
170*a58d3d2aSXin Li     /* Save quantized speech and noise shaping signals */
171*a58d3d2aSXin Li     silk_memmove( NSQ->xq,           &NSQ->xq[           psEncC->frame_length ], psEncC->ltp_mem_length * sizeof( opus_int16 ) );
172*a58d3d2aSXin Li     silk_memmove( NSQ->sLTP_shp_Q14, &NSQ->sLTP_shp_Q14[ psEncC->frame_length ], psEncC->ltp_mem_length * sizeof( opus_int32 ) );
173*a58d3d2aSXin Li     RESTORE_STACK;
174*a58d3d2aSXin Li }
175*a58d3d2aSXin Li 
176*a58d3d2aSXin Li /******************************/
177*a58d3d2aSXin Li /* silk_noise_shape_quantizer */
178*a58d3d2aSXin Li /******************************/
179*a58d3d2aSXin Li 
180*a58d3d2aSXin Li #if !defined(OPUS_X86_MAY_HAVE_SSE4_1)
181*a58d3d2aSXin Li static OPUS_INLINE
182*a58d3d2aSXin Li #endif
silk_noise_shape_quantizer(silk_nsq_state * NSQ,opus_int signalType,const opus_int32 x_sc_Q10[],opus_int8 pulses[],opus_int16 xq[],opus_int32 sLTP_Q15[],const opus_int16 a_Q12[],const opus_int16 b_Q14[],const opus_int16 AR_shp_Q13[],opus_int lag,opus_int32 HarmShapeFIRPacked_Q14,opus_int Tilt_Q14,opus_int32 LF_shp_Q14,opus_int32 Gain_Q16,opus_int Lambda_Q10,opus_int offset_Q10,opus_int length,opus_int shapingLPCOrder,opus_int predictLPCOrder,int arch)183*a58d3d2aSXin Li void silk_noise_shape_quantizer(
184*a58d3d2aSXin Li     silk_nsq_state      *NSQ,                   /* I/O  NSQ state                       */
185*a58d3d2aSXin Li     opus_int            signalType,             /* I    Signal type                     */
186*a58d3d2aSXin Li     const opus_int32    x_sc_Q10[],             /* I                                    */
187*a58d3d2aSXin Li     opus_int8           pulses[],               /* O                                    */
188*a58d3d2aSXin Li     opus_int16          xq[],                   /* O                                    */
189*a58d3d2aSXin Li     opus_int32          sLTP_Q15[],             /* I/O  LTP state                       */
190*a58d3d2aSXin Li     const opus_int16    a_Q12[],                /* I    Short term prediction coefs     */
191*a58d3d2aSXin Li     const opus_int16    b_Q14[],                /* I    Long term prediction coefs      */
192*a58d3d2aSXin Li     const opus_int16    AR_shp_Q13[],           /* I    Noise shaping AR coefs          */
193*a58d3d2aSXin Li     opus_int            lag,                    /* I    Pitch lag                       */
194*a58d3d2aSXin Li     opus_int32          HarmShapeFIRPacked_Q14, /* I                                    */
195*a58d3d2aSXin Li     opus_int            Tilt_Q14,               /* I    Spectral tilt                   */
196*a58d3d2aSXin Li     opus_int32          LF_shp_Q14,             /* I                                    */
197*a58d3d2aSXin Li     opus_int32          Gain_Q16,               /* I                                    */
198*a58d3d2aSXin Li     opus_int            Lambda_Q10,             /* I                                    */
199*a58d3d2aSXin Li     opus_int            offset_Q10,             /* I                                    */
200*a58d3d2aSXin Li     opus_int            length,                 /* I    Input length                    */
201*a58d3d2aSXin Li     opus_int            shapingLPCOrder,        /* I    Noise shaping AR filter order   */
202*a58d3d2aSXin Li     opus_int            predictLPCOrder,        /* I    Prediction filter order         */
203*a58d3d2aSXin Li     int                 arch                    /* I    Architecture                    */
204*a58d3d2aSXin Li )
205*a58d3d2aSXin Li {
206*a58d3d2aSXin Li     opus_int     i;
207*a58d3d2aSXin Li     opus_int32   LTP_pred_Q13, LPC_pred_Q10, n_AR_Q12, n_LTP_Q13;
208*a58d3d2aSXin Li     opus_int32   n_LF_Q12, r_Q10, rr_Q10, q1_Q0, q1_Q10, q2_Q10, rd1_Q20, rd2_Q20;
209*a58d3d2aSXin Li     opus_int32   exc_Q14, LPC_exc_Q14, xq_Q14, Gain_Q10;
210*a58d3d2aSXin Li     opus_int32   tmp1, tmp2, sLF_AR_shp_Q14;
211*a58d3d2aSXin Li     opus_int32   *psLPC_Q14, *shp_lag_ptr, *pred_lag_ptr;
212*a58d3d2aSXin Li #ifdef silk_short_prediction_create_arch_coef
213*a58d3d2aSXin Li     opus_int32   a_Q12_arch[MAX_LPC_ORDER];
214*a58d3d2aSXin Li #endif
215*a58d3d2aSXin Li 
216*a58d3d2aSXin Li     shp_lag_ptr  = &NSQ->sLTP_shp_Q14[ NSQ->sLTP_shp_buf_idx - lag + HARM_SHAPE_FIR_TAPS / 2 ];
217*a58d3d2aSXin Li     pred_lag_ptr = &sLTP_Q15[ NSQ->sLTP_buf_idx - lag + LTP_ORDER / 2 ];
218*a58d3d2aSXin Li     Gain_Q10     = silk_RSHIFT( Gain_Q16, 6 );
219*a58d3d2aSXin Li 
220*a58d3d2aSXin Li     /* Set up short term AR state */
221*a58d3d2aSXin Li     psLPC_Q14 = &NSQ->sLPC_Q14[ NSQ_LPC_BUF_LENGTH - 1 ];
222*a58d3d2aSXin Li 
223*a58d3d2aSXin Li #ifdef silk_short_prediction_create_arch_coef
224*a58d3d2aSXin Li     silk_short_prediction_create_arch_coef(a_Q12_arch, a_Q12, predictLPCOrder);
225*a58d3d2aSXin Li #endif
226*a58d3d2aSXin Li 
227*a58d3d2aSXin Li     for( i = 0; i < length; i++ ) {
228*a58d3d2aSXin Li         /* Generate dither */
229*a58d3d2aSXin Li         NSQ->rand_seed = silk_RAND( NSQ->rand_seed );
230*a58d3d2aSXin Li 
231*a58d3d2aSXin Li         /* Short-term prediction */
232*a58d3d2aSXin Li         LPC_pred_Q10 = silk_noise_shape_quantizer_short_prediction(psLPC_Q14, a_Q12, a_Q12_arch, predictLPCOrder, arch);
233*a58d3d2aSXin Li 
234*a58d3d2aSXin Li         /* Long-term prediction */
235*a58d3d2aSXin Li         if( signalType == TYPE_VOICED ) {
236*a58d3d2aSXin Li             /* Unrolled loop */
237*a58d3d2aSXin Li             /* Avoids introducing a bias because silk_SMLAWB() always rounds to -inf */
238*a58d3d2aSXin Li             LTP_pred_Q13 = 2;
239*a58d3d2aSXin Li             LTP_pred_Q13 = silk_SMLAWB( LTP_pred_Q13, pred_lag_ptr[  0 ], b_Q14[ 0 ] );
240*a58d3d2aSXin Li             LTP_pred_Q13 = silk_SMLAWB( LTP_pred_Q13, pred_lag_ptr[ -1 ], b_Q14[ 1 ] );
241*a58d3d2aSXin Li             LTP_pred_Q13 = silk_SMLAWB( LTP_pred_Q13, pred_lag_ptr[ -2 ], b_Q14[ 2 ] );
242*a58d3d2aSXin Li             LTP_pred_Q13 = silk_SMLAWB( LTP_pred_Q13, pred_lag_ptr[ -3 ], b_Q14[ 3 ] );
243*a58d3d2aSXin Li             LTP_pred_Q13 = silk_SMLAWB( LTP_pred_Q13, pred_lag_ptr[ -4 ], b_Q14[ 4 ] );
244*a58d3d2aSXin Li             pred_lag_ptr++;
245*a58d3d2aSXin Li         } else {
246*a58d3d2aSXin Li             LTP_pred_Q13 = 0;
247*a58d3d2aSXin Li         }
248*a58d3d2aSXin Li 
249*a58d3d2aSXin Li         /* Noise shape feedback */
250*a58d3d2aSXin Li         celt_assert( ( shapingLPCOrder & 1 ) == 0 );   /* check that order is even */
251*a58d3d2aSXin Li         n_AR_Q12 = silk_NSQ_noise_shape_feedback_loop(&NSQ->sDiff_shp_Q14, NSQ->sAR2_Q14, AR_shp_Q13, shapingLPCOrder, arch);
252*a58d3d2aSXin Li 
253*a58d3d2aSXin Li         n_AR_Q12 = silk_SMLAWB( n_AR_Q12, NSQ->sLF_AR_shp_Q14, Tilt_Q14 );
254*a58d3d2aSXin Li 
255*a58d3d2aSXin Li         n_LF_Q12 = silk_SMULWB( NSQ->sLTP_shp_Q14[ NSQ->sLTP_shp_buf_idx - 1 ], LF_shp_Q14 );
256*a58d3d2aSXin Li         n_LF_Q12 = silk_SMLAWT( n_LF_Q12, NSQ->sLF_AR_shp_Q14, LF_shp_Q14 );
257*a58d3d2aSXin Li 
258*a58d3d2aSXin Li         celt_assert( lag > 0 || signalType != TYPE_VOICED );
259*a58d3d2aSXin Li 
260*a58d3d2aSXin Li         /* Combine prediction and noise shaping signals */
261*a58d3d2aSXin Li         tmp1 = silk_SUB32_ovflw( silk_LSHIFT32( LPC_pred_Q10, 2 ), n_AR_Q12 );  /* Q12 */
262*a58d3d2aSXin Li         tmp1 = silk_SUB32_ovflw( tmp1, n_LF_Q12 );                              /* Q12 */
263*a58d3d2aSXin Li         if( lag > 0 ) {
264*a58d3d2aSXin Li             /* Symmetric, packed FIR coefficients */
265*a58d3d2aSXin Li             n_LTP_Q13 = silk_SMULWB( silk_ADD_SAT32( shp_lag_ptr[ 0 ], shp_lag_ptr[ -2 ] ), HarmShapeFIRPacked_Q14 );
266*a58d3d2aSXin Li             n_LTP_Q13 = silk_SMLAWT( n_LTP_Q13, shp_lag_ptr[ -1 ],                      HarmShapeFIRPacked_Q14 );
267*a58d3d2aSXin Li             n_LTP_Q13 = silk_LSHIFT( n_LTP_Q13, 1 );
268*a58d3d2aSXin Li             shp_lag_ptr++;
269*a58d3d2aSXin Li 
270*a58d3d2aSXin Li             tmp2 = silk_SUB32( LTP_pred_Q13, n_LTP_Q13 );                       /* Q13 */
271*a58d3d2aSXin Li             tmp1 = silk_ADD32_ovflw( tmp2, silk_LSHIFT32( tmp1, 1 ) );          /* Q13 */
272*a58d3d2aSXin Li             tmp1 = silk_RSHIFT_ROUND( tmp1, 3 );                                /* Q10 */
273*a58d3d2aSXin Li         } else {
274*a58d3d2aSXin Li             tmp1 = silk_RSHIFT_ROUND( tmp1, 2 );                                /* Q10 */
275*a58d3d2aSXin Li         }
276*a58d3d2aSXin Li 
277*a58d3d2aSXin Li         r_Q10 = silk_SUB32( x_sc_Q10[ i ], tmp1 );                              /* residual error Q10 */
278*a58d3d2aSXin Li 
279*a58d3d2aSXin Li         /* Flip sign depending on dither */
280*a58d3d2aSXin Li         if( NSQ->rand_seed < 0 ) {
281*a58d3d2aSXin Li             r_Q10 = -r_Q10;
282*a58d3d2aSXin Li         }
283*a58d3d2aSXin Li         r_Q10 = silk_LIMIT_32( r_Q10, -(31 << 10), 30 << 10 );
284*a58d3d2aSXin Li 
285*a58d3d2aSXin Li         /* Find two quantization level candidates and measure their rate-distortion */
286*a58d3d2aSXin Li         q1_Q10 = silk_SUB32( r_Q10, offset_Q10 );
287*a58d3d2aSXin Li         q1_Q0 = silk_RSHIFT( q1_Q10, 10 );
288*a58d3d2aSXin Li         if (Lambda_Q10 > 2048) {
289*a58d3d2aSXin Li             /* For aggressive RDO, the bias becomes more than one pulse. */
290*a58d3d2aSXin Li             int rdo_offset = Lambda_Q10/2 - 512;
291*a58d3d2aSXin Li             if (q1_Q10 > rdo_offset) {
292*a58d3d2aSXin Li                 q1_Q0 = silk_RSHIFT( q1_Q10 - rdo_offset, 10 );
293*a58d3d2aSXin Li             } else if (q1_Q10 < -rdo_offset) {
294*a58d3d2aSXin Li                 q1_Q0 = silk_RSHIFT( q1_Q10 + rdo_offset, 10 );
295*a58d3d2aSXin Li             } else if (q1_Q10 < 0) {
296*a58d3d2aSXin Li                 q1_Q0 = -1;
297*a58d3d2aSXin Li             } else {
298*a58d3d2aSXin Li                 q1_Q0 = 0;
299*a58d3d2aSXin Li             }
300*a58d3d2aSXin Li         }
301*a58d3d2aSXin Li         if( q1_Q0 > 0 ) {
302*a58d3d2aSXin Li             q1_Q10  = silk_SUB32( silk_LSHIFT( q1_Q0, 10 ), QUANT_LEVEL_ADJUST_Q10 );
303*a58d3d2aSXin Li             q1_Q10  = silk_ADD32( q1_Q10, offset_Q10 );
304*a58d3d2aSXin Li             q2_Q10  = silk_ADD32( q1_Q10, 1024 );
305*a58d3d2aSXin Li             rd1_Q20 = silk_SMULBB( q1_Q10, Lambda_Q10 );
306*a58d3d2aSXin Li             rd2_Q20 = silk_SMULBB( q2_Q10, Lambda_Q10 );
307*a58d3d2aSXin Li         } else if( q1_Q0 == 0 ) {
308*a58d3d2aSXin Li             q1_Q10  = offset_Q10;
309*a58d3d2aSXin Li             q2_Q10  = silk_ADD32( q1_Q10, 1024 - QUANT_LEVEL_ADJUST_Q10 );
310*a58d3d2aSXin Li             rd1_Q20 = silk_SMULBB( q1_Q10, Lambda_Q10 );
311*a58d3d2aSXin Li             rd2_Q20 = silk_SMULBB( q2_Q10, Lambda_Q10 );
312*a58d3d2aSXin Li         } else if( q1_Q0 == -1 ) {
313*a58d3d2aSXin Li             q2_Q10  = offset_Q10;
314*a58d3d2aSXin Li             q1_Q10  = silk_SUB32( q2_Q10, 1024 - QUANT_LEVEL_ADJUST_Q10 );
315*a58d3d2aSXin Li             rd1_Q20 = silk_SMULBB( -q1_Q10, Lambda_Q10 );
316*a58d3d2aSXin Li             rd2_Q20 = silk_SMULBB(  q2_Q10, Lambda_Q10 );
317*a58d3d2aSXin Li         } else {            /* Q1_Q0 < -1 */
318*a58d3d2aSXin Li             q1_Q10  = silk_ADD32( silk_LSHIFT( q1_Q0, 10 ), QUANT_LEVEL_ADJUST_Q10 );
319*a58d3d2aSXin Li             q1_Q10  = silk_ADD32( q1_Q10, offset_Q10 );
320*a58d3d2aSXin Li             q2_Q10  = silk_ADD32( q1_Q10, 1024 );
321*a58d3d2aSXin Li             rd1_Q20 = silk_SMULBB( -q1_Q10, Lambda_Q10 );
322*a58d3d2aSXin Li             rd2_Q20 = silk_SMULBB( -q2_Q10, Lambda_Q10 );
323*a58d3d2aSXin Li         }
324*a58d3d2aSXin Li         rr_Q10  = silk_SUB32( r_Q10, q1_Q10 );
325*a58d3d2aSXin Li         rd1_Q20 = silk_SMLABB( rd1_Q20, rr_Q10, rr_Q10 );
326*a58d3d2aSXin Li         rr_Q10  = silk_SUB32( r_Q10, q2_Q10 );
327*a58d3d2aSXin Li         rd2_Q20 = silk_SMLABB( rd2_Q20, rr_Q10, rr_Q10 );
328*a58d3d2aSXin Li 
329*a58d3d2aSXin Li         if( rd2_Q20 < rd1_Q20 ) {
330*a58d3d2aSXin Li             q1_Q10 = q2_Q10;
331*a58d3d2aSXin Li         }
332*a58d3d2aSXin Li 
333*a58d3d2aSXin Li         pulses[ i ] = (opus_int8)silk_RSHIFT_ROUND( q1_Q10, 10 );
334*a58d3d2aSXin Li 
335*a58d3d2aSXin Li         /* Excitation */
336*a58d3d2aSXin Li         exc_Q14 = silk_LSHIFT( q1_Q10, 4 );
337*a58d3d2aSXin Li         if ( NSQ->rand_seed < 0 ) {
338*a58d3d2aSXin Li            exc_Q14 = -exc_Q14;
339*a58d3d2aSXin Li         }
340*a58d3d2aSXin Li 
341*a58d3d2aSXin Li         /* Add predictions */
342*a58d3d2aSXin Li         LPC_exc_Q14 = silk_ADD_LSHIFT32( exc_Q14, LTP_pred_Q13, 1 );
343*a58d3d2aSXin Li         xq_Q14      = silk_ADD32_ovflw( LPC_exc_Q14, silk_LSHIFT32( LPC_pred_Q10, 4 ) );
344*a58d3d2aSXin Li 
345*a58d3d2aSXin Li         /* Scale XQ back to normal level before saving */
346*a58d3d2aSXin Li         xq[ i ] = (opus_int16)silk_SAT16( silk_RSHIFT_ROUND( silk_SMULWW( xq_Q14, Gain_Q10 ), 8 ) );
347*a58d3d2aSXin Li 
348*a58d3d2aSXin Li         /* Update states */
349*a58d3d2aSXin Li         psLPC_Q14++;
350*a58d3d2aSXin Li         *psLPC_Q14 = xq_Q14;
351*a58d3d2aSXin Li         NSQ->sDiff_shp_Q14 = silk_SUB_LSHIFT32( xq_Q14, x_sc_Q10[ i ], 4 );
352*a58d3d2aSXin Li         sLF_AR_shp_Q14 = silk_SUB32_ovflw( NSQ->sDiff_shp_Q14, silk_LSHIFT32( n_AR_Q12, 2 ) );
353*a58d3d2aSXin Li         NSQ->sLF_AR_shp_Q14 = sLF_AR_shp_Q14;
354*a58d3d2aSXin Li 
355*a58d3d2aSXin Li         NSQ->sLTP_shp_Q14[ NSQ->sLTP_shp_buf_idx ] = silk_SUB32_ovflw(sLF_AR_shp_Q14, silk_LSHIFT32(n_LF_Q12, 2));
356*a58d3d2aSXin Li         sLTP_Q15[ NSQ->sLTP_buf_idx ] = silk_LSHIFT( LPC_exc_Q14, 1 );
357*a58d3d2aSXin Li         NSQ->sLTP_shp_buf_idx++;
358*a58d3d2aSXin Li         NSQ->sLTP_buf_idx++;
359*a58d3d2aSXin Li 
360*a58d3d2aSXin Li         /* Make dither dependent on quantized signal */
361*a58d3d2aSXin Li         NSQ->rand_seed = silk_ADD32_ovflw( NSQ->rand_seed, pulses[ i ] );
362*a58d3d2aSXin Li     }
363*a58d3d2aSXin Li 
364*a58d3d2aSXin Li     /* Update LPC synth buffer */
365*a58d3d2aSXin Li     silk_memcpy( NSQ->sLPC_Q14, &NSQ->sLPC_Q14[ length ], NSQ_LPC_BUF_LENGTH * sizeof( opus_int32 ) );
366*a58d3d2aSXin Li }
367*a58d3d2aSXin Li 
silk_nsq_scale_states(const silk_encoder_state * psEncC,silk_nsq_state * NSQ,const opus_int16 x16[],opus_int32 x_sc_Q10[],const opus_int16 sLTP[],opus_int32 sLTP_Q15[],opus_int subfr,const opus_int LTP_scale_Q14,const opus_int32 Gains_Q16[MAX_NB_SUBFR],const opus_int pitchL[MAX_NB_SUBFR],const opus_int signal_type)368*a58d3d2aSXin Li static OPUS_INLINE void silk_nsq_scale_states(
369*a58d3d2aSXin Li     const silk_encoder_state *psEncC,           /* I    Encoder State                   */
370*a58d3d2aSXin Li     silk_nsq_state      *NSQ,                   /* I/O  NSQ state                       */
371*a58d3d2aSXin Li     const opus_int16    x16[],                  /* I    input                           */
372*a58d3d2aSXin Li     opus_int32          x_sc_Q10[],             /* O    input scaled with 1/Gain        */
373*a58d3d2aSXin Li     const opus_int16    sLTP[],                 /* I    re-whitened LTP state in Q0     */
374*a58d3d2aSXin Li     opus_int32          sLTP_Q15[],             /* O    LTP state matching scaled input */
375*a58d3d2aSXin Li     opus_int            subfr,                  /* I    subframe number                 */
376*a58d3d2aSXin Li     const opus_int      LTP_scale_Q14,          /* I                                    */
377*a58d3d2aSXin Li     const opus_int32    Gains_Q16[ MAX_NB_SUBFR ], /* I                                 */
378*a58d3d2aSXin Li     const opus_int      pitchL[ MAX_NB_SUBFR ], /* I    Pitch lag                       */
379*a58d3d2aSXin Li     const opus_int      signal_type             /* I    Signal type                     */
380*a58d3d2aSXin Li )
381*a58d3d2aSXin Li {
382*a58d3d2aSXin Li     opus_int   i, lag;
383*a58d3d2aSXin Li     opus_int32 gain_adj_Q16, inv_gain_Q31, inv_gain_Q26;
384*a58d3d2aSXin Li 
385*a58d3d2aSXin Li     lag          = pitchL[ subfr ];
386*a58d3d2aSXin Li     inv_gain_Q31 = silk_INVERSE32_varQ( silk_max( Gains_Q16[ subfr ], 1 ), 47 );
387*a58d3d2aSXin Li     silk_assert( inv_gain_Q31 != 0 );
388*a58d3d2aSXin Li 
389*a58d3d2aSXin Li     /* Scale input */
390*a58d3d2aSXin Li     inv_gain_Q26 = silk_RSHIFT_ROUND( inv_gain_Q31, 5 );
391*a58d3d2aSXin Li     for( i = 0; i < psEncC->subfr_length; i++ ) {
392*a58d3d2aSXin Li         x_sc_Q10[ i ] = silk_SMULWW( x16[ i ], inv_gain_Q26 );
393*a58d3d2aSXin Li     }
394*a58d3d2aSXin Li 
395*a58d3d2aSXin Li     /* After rewhitening the LTP state is un-scaled, so scale with inv_gain_Q16 */
396*a58d3d2aSXin Li     if( NSQ->rewhite_flag ) {
397*a58d3d2aSXin Li         if( subfr == 0 ) {
398*a58d3d2aSXin Li             /* Do LTP downscaling */
399*a58d3d2aSXin Li             inv_gain_Q31 = silk_LSHIFT( silk_SMULWB( inv_gain_Q31, LTP_scale_Q14 ), 2 );
400*a58d3d2aSXin Li         }
401*a58d3d2aSXin Li         for( i = NSQ->sLTP_buf_idx - lag - LTP_ORDER / 2; i < NSQ->sLTP_buf_idx; i++ ) {
402*a58d3d2aSXin Li             silk_assert( i < MAX_FRAME_LENGTH );
403*a58d3d2aSXin Li             sLTP_Q15[ i ] = silk_SMULWB( inv_gain_Q31, sLTP[ i ] );
404*a58d3d2aSXin Li         }
405*a58d3d2aSXin Li     }
406*a58d3d2aSXin Li 
407*a58d3d2aSXin Li     /* Adjust for changing gain */
408*a58d3d2aSXin Li     if( Gains_Q16[ subfr ] != NSQ->prev_gain_Q16 ) {
409*a58d3d2aSXin Li         gain_adj_Q16 =  silk_DIV32_varQ( NSQ->prev_gain_Q16, Gains_Q16[ subfr ], 16 );
410*a58d3d2aSXin Li 
411*a58d3d2aSXin Li         /* Scale long-term shaping state */
412*a58d3d2aSXin Li         for( i = NSQ->sLTP_shp_buf_idx - psEncC->ltp_mem_length; i < NSQ->sLTP_shp_buf_idx; i++ ) {
413*a58d3d2aSXin Li             NSQ->sLTP_shp_Q14[ i ] = silk_SMULWW( gain_adj_Q16, NSQ->sLTP_shp_Q14[ i ] );
414*a58d3d2aSXin Li         }
415*a58d3d2aSXin Li 
416*a58d3d2aSXin Li         /* Scale long-term prediction state */
417*a58d3d2aSXin Li         if( signal_type == TYPE_VOICED && NSQ->rewhite_flag == 0 ) {
418*a58d3d2aSXin Li             for( i = NSQ->sLTP_buf_idx - lag - LTP_ORDER / 2; i < NSQ->sLTP_buf_idx; i++ ) {
419*a58d3d2aSXin Li                 sLTP_Q15[ i ] = silk_SMULWW( gain_adj_Q16, sLTP_Q15[ i ] );
420*a58d3d2aSXin Li             }
421*a58d3d2aSXin Li         }
422*a58d3d2aSXin Li 
423*a58d3d2aSXin Li         NSQ->sLF_AR_shp_Q14 = silk_SMULWW( gain_adj_Q16, NSQ->sLF_AR_shp_Q14 );
424*a58d3d2aSXin Li         NSQ->sDiff_shp_Q14 = silk_SMULWW( gain_adj_Q16, NSQ->sDiff_shp_Q14 );
425*a58d3d2aSXin Li 
426*a58d3d2aSXin Li         /* Scale short-term prediction and shaping states */
427*a58d3d2aSXin Li         for( i = 0; i < NSQ_LPC_BUF_LENGTH; i++ ) {
428*a58d3d2aSXin Li             NSQ->sLPC_Q14[ i ] = silk_SMULWW( gain_adj_Q16, NSQ->sLPC_Q14[ i ] );
429*a58d3d2aSXin Li         }
430*a58d3d2aSXin Li         for( i = 0; i < MAX_SHAPE_LPC_ORDER; i++ ) {
431*a58d3d2aSXin Li             NSQ->sAR2_Q14[ i ] = silk_SMULWW( gain_adj_Q16, NSQ->sAR2_Q14[ i ] );
432*a58d3d2aSXin Li         }
433*a58d3d2aSXin Li 
434*a58d3d2aSXin Li         /* Save inverse gain */
435*a58d3d2aSXin Li         NSQ->prev_gain_Q16 = Gains_Q16[ subfr ];
436*a58d3d2aSXin Li     }
437*a58d3d2aSXin Li }
438