Mercurial > hg > sv-dependency-builds

annotate src/opus-1.3/silk/NSQ_del_dec.c @ 81:7029a4916348

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Merge build update
author Chris Cannam
date Thu, 31 Oct 2019 13:36:58 +0000
parents 7aeed7906520
children
rev   line source
Chris@69 1 /***********************************************************************
Chris@69 2 Copyright (c) 2006-2011, Skype Limited. All rights reserved.
Chris@69 3 Redistribution and use in source and binary forms, with or without
Chris@69 4 modification, are permitted provided that the following conditions
Chris@69 5 are met:
Chris@69 6 - Redistributions of source code must retain the above copyright notice,
Chris@69 7 this list of conditions and the following disclaimer.
Chris@69 8 - Redistributions in binary form must reproduce the above copyright
Chris@69 9 notice, this list of conditions and the following disclaimer in the
Chris@69 10 documentation and/or other materials provided with the distribution.
Chris@69 11 - Neither the name of Internet Society, IETF or IETF Trust, nor the
Chris@69 12 names of specific contributors, may be used to endorse or promote
Chris@69 13 products derived from this software without specific prior written
Chris@69 14 permission.
Chris@69 15 THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
Chris@69 16 AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
Chris@69 17 IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
Chris@69 18 ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
Chris@69 19 LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
Chris@69 20 CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
Chris@69 21 SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
Chris@69 22 INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
Chris@69 23 CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
Chris@69 24 ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
Chris@69 25 POSSIBILITY OF SUCH DAMAGE.
Chris@69 26 ***********************************************************************/
Chris@69 27
Chris@69 28 #ifdef HAVE_CONFIG_H
Chris@69 29 #include "config.h"
Chris@69 30 #endif
Chris@69 31
Chris@69 32 #include "main.h"
Chris@69 33 #include "stack_alloc.h"
Chris@69 34 #include "NSQ.h"
Chris@69 35
Chris@69 36
Chris@69 37 typedef struct {
Chris@69 38 opus_int32 sLPC_Q14[ MAX_SUB_FRAME_LENGTH + NSQ_LPC_BUF_LENGTH ];
Chris@69 39 opus_int32 RandState[ DECISION_DELAY ];
Chris@69 40 opus_int32 Q_Q10[ DECISION_DELAY ];
Chris@69 41 opus_int32 Xq_Q14[ DECISION_DELAY ];
Chris@69 42 opus_int32 Pred_Q15[ DECISION_DELAY ];
Chris@69 43 opus_int32 Shape_Q14[ DECISION_DELAY ];
Chris@69 44 opus_int32 sAR2_Q14[ MAX_SHAPE_LPC_ORDER ];
Chris@69 45 opus_int32 LF_AR_Q14;
Chris@69 46 opus_int32 Diff_Q14;
Chris@69 47 opus_int32 Seed;
Chris@69 48 opus_int32 SeedInit;
Chris@69 49 opus_int32 RD_Q10;
Chris@69 50 } NSQ_del_dec_struct;
Chris@69 51
Chris@69 52 typedef struct {
Chris@69 53 opus_int32 Q_Q10;
Chris@69 54 opus_int32 RD_Q10;
Chris@69 55 opus_int32 xq_Q14;
Chris@69 56 opus_int32 LF_AR_Q14;
Chris@69 57 opus_int32 Diff_Q14;
Chris@69 58 opus_int32 sLTP_shp_Q14;
Chris@69 59 opus_int32 LPC_exc_Q14;
Chris@69 60 } NSQ_sample_struct;
Chris@69 61
Chris@69 62 typedef NSQ_sample_struct NSQ_sample_pair[ 2 ];
Chris@69 63
Chris@69 64 #if defined(MIPSr1_ASM)
Chris@69 65 #include "mips/NSQ_del_dec_mipsr1.h"
Chris@69 66 #endif
Chris@69 67 static OPUS_INLINE void silk_nsq_del_dec_scale_states(
Chris@69 68 const silk_encoder_state *psEncC, /* I Encoder State */
Chris@69 69 silk_nsq_state *NSQ, /* I/O NSQ state */
Chris@69 70 NSQ_del_dec_struct psDelDec[], /* I/O Delayed decision states */
Chris@69 71 const opus_int16 x16[], /* I Input */
Chris@69 72 opus_int32 x_sc_Q10[], /* O Input scaled with 1/Gain in Q10 */
Chris@69 73 const opus_int16 sLTP[], /* I Re-whitened LTP state in Q0 */
Chris@69 74 opus_int32 sLTP_Q15[], /* O LTP state matching scaled input */
Chris@69 75 opus_int subfr, /* I Subframe number */
Chris@69 76 opus_int nStatesDelayedDecision, /* I Number of del dec states */
Chris@69 77 const opus_int LTP_scale_Q14, /* I LTP state scaling */
Chris@69 78 const opus_int32 Gains_Q16[ MAX_NB_SUBFR ], /* I */
Chris@69 79 const opus_int pitchL[ MAX_NB_SUBFR ], /* I Pitch lag */
Chris@69 80 const opus_int signal_type, /* I Signal type */
Chris@69 81 const opus_int decisionDelay /* I Decision delay */
Chris@69 82 );
Chris@69 83
Chris@69 84 /******************************************/
Chris@69 85 /* Noise shape quantizer for one subframe */
Chris@69 86 /******************************************/
Chris@69 87 static OPUS_INLINE void silk_noise_shape_quantizer_del_dec(
Chris@69 88 silk_nsq_state *NSQ, /* I/O NSQ state */
Chris@69 89 NSQ_del_dec_struct psDelDec[], /* I/O Delayed decision states */
Chris@69 90 opus_int signalType, /* I Signal type */
Chris@69 91 const opus_int32 x_Q10[], /* I */
Chris@69 92 opus_int8 pulses[], /* O */
Chris@69 93 opus_int16 xq[], /* O */
Chris@69 94 opus_int32 sLTP_Q15[], /* I/O LTP filter state */
Chris@69 95 opus_int32 delayedGain_Q10[], /* I/O Gain delay buffer */
Chris@69 96 const opus_int16 a_Q12[], /* I Short term prediction coefs */
Chris@69 97 const opus_int16 b_Q14[], /* I Long term prediction coefs */
Chris@69 98 const opus_int16 AR_shp_Q13[], /* I Noise shaping coefs */
Chris@69 99 opus_int lag, /* I Pitch lag */
Chris@69 100 opus_int32 HarmShapeFIRPacked_Q14, /* I */
Chris@69 101 opus_int Tilt_Q14, /* I Spectral tilt */
Chris@69 102 opus_int32 LF_shp_Q14, /* I */
Chris@69 103 opus_int32 Gain_Q16, /* I */
Chris@69 104 opus_int Lambda_Q10, /* I */
Chris@69 105 opus_int offset_Q10, /* I */
Chris@69 106 opus_int length, /* I Input length */
Chris@69 107 opus_int subfr, /* I Subframe number */
Chris@69 108 opus_int shapingLPCOrder, /* I Shaping LPC filter order */
Chris@69 109 opus_int predictLPCOrder, /* I Prediction filter order */
Chris@69 110 opus_int warping_Q16, /* I */
Chris@69 111 opus_int nStatesDelayedDecision, /* I Number of states in decision tree */
Chris@69 112 opus_int *smpl_buf_idx, /* I/O Index to newest samples in buffers */
Chris@69 113 opus_int decisionDelay, /* I */
Chris@69 114 int arch /* I */
Chris@69 115 );
Chris@69 116
Chris@69 117 void silk_NSQ_del_dec_c(
Chris@69 118 const silk_encoder_state *psEncC, /* I Encoder State */
Chris@69 119 silk_nsq_state *NSQ, /* I/O NSQ state */
Chris@69 120 SideInfoIndices *psIndices, /* I/O Quantization Indices */
Chris@69 121 const opus_int16 x16[], /* I Input */
Chris@69 122 opus_int8 pulses[], /* O Quantized pulse signal */
Chris@69 123 const opus_int16 PredCoef_Q12[ 2 * MAX_LPC_ORDER ], /* I Short term prediction coefs */
Chris@69 124 const opus_int16 LTPCoef_Q14[ LTP_ORDER * MAX_NB_SUBFR ], /* I Long term prediction coefs */
Chris@69 125 const opus_int16 AR_Q13[ MAX_NB_SUBFR * MAX_SHAPE_LPC_ORDER ], /* I Noise shaping coefs */
Chris@69 126 const opus_int HarmShapeGain_Q14[ MAX_NB_SUBFR ], /* I Long term shaping coefs */
Chris@69 127 const opus_int Tilt_Q14[ MAX_NB_SUBFR ], /* I Spectral tilt */
Chris@69 128 const opus_int32 LF_shp_Q14[ MAX_NB_SUBFR ], /* I Low frequency shaping coefs */
Chris@69 129 const opus_int32 Gains_Q16[ MAX_NB_SUBFR ], /* I Quantization step sizes */
Chris@69 130 const opus_int pitchL[ MAX_NB_SUBFR ], /* I Pitch lags */
Chris@69 131 const opus_int Lambda_Q10, /* I Rate/distortion tradeoff */
Chris@69 132 const opus_int LTP_scale_Q14 /* I LTP state scaling */
Chris@69 133 )
Chris@69 134 {
Chris@69 135 opus_int i, k, lag, start_idx, LSF_interpolation_flag, Winner_ind, subfr;
Chris@69 136 opus_int last_smple_idx, smpl_buf_idx, decisionDelay;
Chris@69 137 const opus_int16 *A_Q12, *B_Q14, *AR_shp_Q13;
Chris@69 138 opus_int16 *pxq;
Chris@69 139 VARDECL( opus_int32, sLTP_Q15 );
Chris@69 140 VARDECL( opus_int16, sLTP );
Chris@69 141 opus_int32 HarmShapeFIRPacked_Q14;
Chris@69 142 opus_int offset_Q10;
Chris@69 143 opus_int32 RDmin_Q10, Gain_Q10;
Chris@69 144 VARDECL( opus_int32, x_sc_Q10 );
Chris@69 145 VARDECL( opus_int32, delayedGain_Q10 );
Chris@69 146 VARDECL( NSQ_del_dec_struct, psDelDec );
Chris@69 147 NSQ_del_dec_struct *psDD;
Chris@69 148 SAVE_STACK;
Chris@69 149
Chris@69 150 /* Set unvoiced lag to the previous one, overwrite later for voiced */
Chris@69 151 lag = NSQ->lagPrev;
Chris@69 152
Chris@69 153 silk_assert( NSQ->prev_gain_Q16 != 0 );
Chris@69 154
Chris@69 155 /* Initialize delayed decision states */
Chris@69 156 ALLOC( psDelDec, psEncC->nStatesDelayedDecision, NSQ_del_dec_struct );
Chris@69 157 silk_memset( psDelDec, 0, psEncC->nStatesDelayedDecision * sizeof( NSQ_del_dec_struct ) );
Chris@69 158 for( k = 0; k < psEncC->nStatesDelayedDecision; k++ ) {
Chris@69 159 psDD = &psDelDec[ k ];
Chris@69 160 psDD->Seed = ( k + psIndices->Seed ) & 3;
Chris@69 161 psDD->SeedInit = psDD->Seed;
Chris@69 162 psDD->RD_Q10 = 0;
Chris@69 163 psDD->LF_AR_Q14 = NSQ->sLF_AR_shp_Q14;
Chris@69 164 psDD->Diff_Q14 = NSQ->sDiff_shp_Q14;
Chris@69 165 psDD->Shape_Q14[ 0 ] = NSQ->sLTP_shp_Q14[ psEncC->ltp_mem_length - 1 ];
Chris@69 166 silk_memcpy( psDD->sLPC_Q14, NSQ->sLPC_Q14, NSQ_LPC_BUF_LENGTH * sizeof( opus_int32 ) );
Chris@69 167 silk_memcpy( psDD->sAR2_Q14, NSQ->sAR2_Q14, sizeof( NSQ->sAR2_Q14 ) );
Chris@69 168 }
Chris@69 169
Chris@69 170 offset_Q10 = silk_Quantization_Offsets_Q10[ psIndices->signalType >> 1 ][ psIndices->quantOffsetType ];
Chris@69 171 smpl_buf_idx = 0; /* index of oldest samples */
Chris@69 172
Chris@69 173 decisionDelay = silk_min_int( DECISION_DELAY, psEncC->subfr_length );
Chris@69 174
Chris@69 175 /* For voiced frames limit the decision delay to lower than the pitch lag */
Chris@69 176 if( psIndices->signalType == TYPE_VOICED ) {
Chris@69 177 for( k = 0; k < psEncC->nb_subfr; k++ ) {
Chris@69 178 decisionDelay = silk_min_int( decisionDelay, pitchL[ k ] - LTP_ORDER / 2 - 1 );
Chris@69 179 }
Chris@69 180 } else {
Chris@69 181 if( lag > 0 ) {
Chris@69 182 decisionDelay = silk_min_int( decisionDelay, lag - LTP_ORDER / 2 - 1 );
Chris@69 183 }
Chris@69 184 }
Chris@69 185
Chris@69 186 if( psIndices->NLSFInterpCoef_Q2 == 4 ) {
Chris@69 187 LSF_interpolation_flag = 0;
Chris@69 188 } else {
Chris@69 189 LSF_interpolation_flag = 1;
Chris@69 190 }
Chris@69 191
Chris@69 192 ALLOC( sLTP_Q15, psEncC->ltp_mem_length + psEncC->frame_length, opus_int32 );
Chris@69 193 ALLOC( sLTP, psEncC->ltp_mem_length + psEncC->frame_length, opus_int16 );
Chris@69 194 ALLOC( x_sc_Q10, psEncC->subfr_length, opus_int32 );
Chris@69 195 ALLOC( delayedGain_Q10, DECISION_DELAY, opus_int32 );
Chris@69 196 /* Set up pointers to start of sub frame */
Chris@69 197 pxq = &NSQ->xq[ psEncC->ltp_mem_length ];
Chris@69 198 NSQ->sLTP_shp_buf_idx = psEncC->ltp_mem_length;
Chris@69 199 NSQ->sLTP_buf_idx = psEncC->ltp_mem_length;
Chris@69 200 subfr = 0;
Chris@69 201 for( k = 0; k < psEncC->nb_subfr; k++ ) {
Chris@69 202 A_Q12 = &PredCoef_Q12[ ( ( k >> 1 ) | ( 1 - LSF_interpolation_flag ) ) * MAX_LPC_ORDER ];
Chris@69 203 B_Q14 = &LTPCoef_Q14[ k * LTP_ORDER ];
Chris@69 204 AR_shp_Q13 = &AR_Q13[ k * MAX_SHAPE_LPC_ORDER ];
Chris@69 205
Chris@69 206 /* Noise shape parameters */
Chris@69 207 silk_assert( HarmShapeGain_Q14[ k ] >= 0 );
Chris@69 208 HarmShapeFIRPacked_Q14 = silk_RSHIFT( HarmShapeGain_Q14[ k ], 2 );
Chris@69 209 HarmShapeFIRPacked_Q14 |= silk_LSHIFT( (opus_int32)silk_RSHIFT( HarmShapeGain_Q14[ k ], 1 ), 16 );
Chris@69 210
Chris@69 211 NSQ->rewhite_flag = 0;
Chris@69 212 if( psIndices->signalType == TYPE_VOICED ) {
Chris@69 213 /* Voiced */
Chris@69 214 lag = pitchL[ k ];
Chris@69 215
Chris@69 216 /* Re-whitening */
Chris@69 217 if( ( k & ( 3 - silk_LSHIFT( LSF_interpolation_flag, 1 ) ) ) == 0 ) {
Chris@69 218 if( k == 2 ) {
Chris@69 219 /* RESET DELAYED DECISIONS */
Chris@69 220 /* Find winner */
Chris@69 221 RDmin_Q10 = psDelDec[ 0 ].RD_Q10;
Chris@69 222 Winner_ind = 0;
Chris@69 223 for( i = 1; i < psEncC->nStatesDelayedDecision; i++ ) {
Chris@69 224 if( psDelDec[ i ].RD_Q10 < RDmin_Q10 ) {
Chris@69 225 RDmin_Q10 = psDelDec[ i ].RD_Q10;
Chris@69 226 Winner_ind = i;
Chris@69 227 }
Chris@69 228 }
Chris@69 229 for( i = 0; i < psEncC->nStatesDelayedDecision; i++ ) {
Chris@69 230 if( i != Winner_ind ) {
Chris@69 231 psDelDec[ i ].RD_Q10 += ( silk_int32_MAX >> 4 );
Chris@69 232 silk_assert( psDelDec[ i ].RD_Q10 >= 0 );
Chris@69 233 }
Chris@69 234 }
Chris@69 235
Chris@69 236 /* Copy final part of signals from winner state to output and long-term filter states */
Chris@69 237 psDD = &psDelDec[ Winner_ind ];
Chris@69 238 last_smple_idx = smpl_buf_idx + decisionDelay;
Chris@69 239 for( i = 0; i < decisionDelay; i++ ) {
Chris@69 240 last_smple_idx = ( last_smple_idx - 1 ) % DECISION_DELAY;
Chris@69 241 if( last_smple_idx < 0 ) last_smple_idx += DECISION_DELAY;
Chris@69 242 pulses[ i - decisionDelay ] = (opus_int8)silk_RSHIFT_ROUND( psDD->Q_Q10[ last_smple_idx ], 10 );
Chris@69 243 pxq[ i - decisionDelay ] = (opus_int16)silk_SAT16( silk_RSHIFT_ROUND(
Chris@69 244 silk_SMULWW( psDD->Xq_Q14[ last_smple_idx ], Gains_Q16[ 1 ] ), 14 ) );
Chris@69 245 NSQ->sLTP_shp_Q14[ NSQ->sLTP_shp_buf_idx - decisionDelay + i ] = psDD->Shape_Q14[ last_smple_idx ];
Chris@69 246 }
Chris@69 247
Chris@69 248 subfr = 0;
Chris@69 249 }
Chris@69 250
Chris@69 251 /* Rewhiten with new A coefs */
Chris@69 252 start_idx = psEncC->ltp_mem_length - lag - psEncC->predictLPCOrder - LTP_ORDER / 2;
Chris@69 253 celt_assert( start_idx > 0 );
Chris@69 254
Chris@69 255 silk_LPC_analysis_filter( &sLTP[ start_idx ], &NSQ->xq[ start_idx + k * psEncC->subfr_length ],
Chris@69 256 A_Q12, psEncC->ltp_mem_length - start_idx, psEncC->predictLPCOrder, psEncC->arch );
Chris@69 257
Chris@69 258 NSQ->sLTP_buf_idx = psEncC->ltp_mem_length;
Chris@69 259 NSQ->rewhite_flag = 1;
Chris@69 260 }
Chris@69 261 }
Chris@69 262
Chris@69 263 silk_nsq_del_dec_scale_states( psEncC, NSQ, psDelDec, x16, x_sc_Q10, sLTP, sLTP_Q15, k,
Chris@69 264 psEncC->nStatesDelayedDecision, LTP_scale_Q14, Gains_Q16, pitchL, psIndices->signalType, decisionDelay );
Chris@69 265
Chris@69 266 silk_noise_shape_quantizer_del_dec( NSQ, psDelDec, psIndices->signalType, x_sc_Q10, pulses, pxq, sLTP_Q15,
Chris@69 267 delayedGain_Q10, A_Q12, B_Q14, AR_shp_Q13, lag, HarmShapeFIRPacked_Q14, Tilt_Q14[ k ], LF_shp_Q14[ k ],
Chris@69 268 Gains_Q16[ k ], Lambda_Q10, offset_Q10, psEncC->subfr_length, subfr++, psEncC->shapingLPCOrder,
Chris@69 269 psEncC->predictLPCOrder, psEncC->warping_Q16, psEncC->nStatesDelayedDecision, &smpl_buf_idx, decisionDelay, psEncC->arch );
Chris@69 270
Chris@69 271 x16 += psEncC->subfr_length;
Chris@69 272 pulses += psEncC->subfr_length;
Chris@69 273 pxq += psEncC->subfr_length;
Chris@69 274 }
Chris@69 275
Chris@69 276 /* Find winner */
Chris@69 277 RDmin_Q10 = psDelDec[ 0 ].RD_Q10;
Chris@69 278 Winner_ind = 0;
Chris@69 279 for( k = 1; k < psEncC->nStatesDelayedDecision; k++ ) {
Chris@69 280 if( psDelDec[ k ].RD_Q10 < RDmin_Q10 ) {
Chris@69 281 RDmin_Q10 = psDelDec[ k ].RD_Q10;
Chris@69 282 Winner_ind = k;
Chris@69 283 }
Chris@69 284 }
Chris@69 285
Chris@69 286 /* Copy final part of signals from winner state to output and long-term filter states */
Chris@69 287 psDD = &psDelDec[ Winner_ind ];
Chris@69 288 psIndices->Seed = psDD->SeedInit;
Chris@69 289 last_smple_idx = smpl_buf_idx + decisionDelay;
Chris@69 290 Gain_Q10 = silk_RSHIFT32( Gains_Q16[ psEncC->nb_subfr - 1 ], 6 );
Chris@69 291 for( i = 0; i < decisionDelay; i++ ) {
Chris@69 292 last_smple_idx = ( last_smple_idx - 1 ) % DECISION_DELAY;
Chris@69 293 if( last_smple_idx < 0 ) last_smple_idx += DECISION_DELAY;
Chris@69 294
Chris@69 295 pulses[ i - decisionDelay ] = (opus_int8)silk_RSHIFT_ROUND( psDD->Q_Q10[ last_smple_idx ], 10 );
Chris@69 296 pxq[ i - decisionDelay ] = (opus_int16)silk_SAT16( silk_RSHIFT_ROUND(
Chris@69 297 silk_SMULWW( psDD->Xq_Q14[ last_smple_idx ], Gain_Q10 ), 8 ) );
Chris@69 298 NSQ->sLTP_shp_Q14[ NSQ->sLTP_shp_buf_idx - decisionDelay + i ] = psDD->Shape_Q14[ last_smple_idx ];
Chris@69 299 }
Chris@69 300 silk_memcpy( NSQ->sLPC_Q14, &psDD->sLPC_Q14[ psEncC->subfr_length ], NSQ_LPC_BUF_LENGTH * sizeof( opus_int32 ) );
Chris@69 301 silk_memcpy( NSQ->sAR2_Q14, psDD->sAR2_Q14, sizeof( psDD->sAR2_Q14 ) );
Chris@69 302
Chris@69 303 /* Update states */
Chris@69 304 NSQ->sLF_AR_shp_Q14 = psDD->LF_AR_Q14;
Chris@69 305 NSQ->sDiff_shp_Q14 = psDD->Diff_Q14;
Chris@69 306 NSQ->lagPrev = pitchL[ psEncC->nb_subfr - 1 ];
Chris@69 307
Chris@69 308 /* Save quantized speech signal */
Chris@69 309 silk_memmove( NSQ->xq, &NSQ->xq[ psEncC->frame_length ], psEncC->ltp_mem_length * sizeof( opus_int16 ) );
Chris@69 310 silk_memmove( NSQ->sLTP_shp_Q14, &NSQ->sLTP_shp_Q14[ psEncC->frame_length ], psEncC->ltp_mem_length * sizeof( opus_int32 ) );
Chris@69 311 RESTORE_STACK;
Chris@69 312 }
Chris@69 313
Chris@69 314 /******************************************/
Chris@69 315 /* Noise shape quantizer for one subframe */
Chris@69 316 /******************************************/
Chris@69 317 #ifndef OVERRIDE_silk_noise_shape_quantizer_del_dec
Chris@69 318 static OPUS_INLINE void silk_noise_shape_quantizer_del_dec(
Chris@69 319 silk_nsq_state *NSQ, /* I/O NSQ state */
Chris@69 320 NSQ_del_dec_struct psDelDec[], /* I/O Delayed decision states */
Chris@69 321 opus_int signalType, /* I Signal type */
Chris@69 322 const opus_int32 x_Q10[], /* I */
Chris@69 323 opus_int8 pulses[], /* O */
Chris@69 324 opus_int16 xq[], /* O */
Chris@69 325 opus_int32 sLTP_Q15[], /* I/O LTP filter state */
Chris@69 326 opus_int32 delayedGain_Q10[], /* I/O Gain delay buffer */
Chris@69 327 const opus_int16 a_Q12[], /* I Short term prediction coefs */
Chris@69 328 const opus_int16 b_Q14[], /* I Long term prediction coefs */
Chris@69 329 const opus_int16 AR_shp_Q13[], /* I Noise shaping coefs */
Chris@69 330 opus_int lag, /* I Pitch lag */
Chris@69 331 opus_int32 HarmShapeFIRPacked_Q14, /* I */
Chris@69 332 opus_int Tilt_Q14, /* I Spectral tilt */
Chris@69 333 opus_int32 LF_shp_Q14, /* I */
Chris@69 334 opus_int32 Gain_Q16, /* I */
Chris@69 335 opus_int Lambda_Q10, /* I */
Chris@69 336 opus_int offset_Q10, /* I */
Chris@69 337 opus_int length, /* I Input length */
Chris@69 338 opus_int subfr, /* I Subframe number */
Chris@69 339 opus_int shapingLPCOrder, /* I Shaping LPC filter order */
Chris@69 340 opus_int predictLPCOrder, /* I Prediction filter order */
Chris@69 341 opus_int warping_Q16, /* I */
Chris@69 342 opus_int nStatesDelayedDecision, /* I Number of states in decision tree */
Chris@69 343 opus_int *smpl_buf_idx, /* I/O Index to newest samples in buffers */
Chris@69 344 opus_int decisionDelay, /* I */
Chris@69 345 int arch /* I */
Chris@69 346 )
Chris@69 347 {
Chris@69 348 opus_int i, j, k, Winner_ind, RDmin_ind, RDmax_ind, last_smple_idx;
Chris@69 349 opus_int32 Winner_rand_state;
Chris@69 350 opus_int32 LTP_pred_Q14, LPC_pred_Q14, n_AR_Q14, n_LTP_Q14;
Chris@69 351 opus_int32 n_LF_Q14, r_Q10, rr_Q10, rd1_Q10, rd2_Q10, RDmin_Q10, RDmax_Q10;
Chris@69 352 opus_int32 q1_Q0, q1_Q10, q2_Q10, exc_Q14, LPC_exc_Q14, xq_Q14, Gain_Q10;
Chris@69 353 opus_int32 tmp1, tmp2, sLF_AR_shp_Q14;
Chris@69 354 opus_int32 *pred_lag_ptr, *shp_lag_ptr, *psLPC_Q14;
Chris@69 355 #ifdef silk_short_prediction_create_arch_coef
Chris@69 356 opus_int32 a_Q12_arch[MAX_LPC_ORDER];
Chris@69 357 #endif
Chris@69 358
Chris@69 359 VARDECL( NSQ_sample_pair, psSampleState );
Chris@69 360 NSQ_del_dec_struct *psDD;
Chris@69 361 NSQ_sample_struct *psSS;
Chris@69 362 SAVE_STACK;
Chris@69 363
Chris@69 364 celt_assert( nStatesDelayedDecision > 0 );
Chris@69 365 ALLOC( psSampleState, nStatesDelayedDecision, NSQ_sample_pair );
Chris@69 366
Chris@69 367 shp_lag_ptr = &NSQ->sLTP_shp_Q14[ NSQ->sLTP_shp_buf_idx - lag + HARM_SHAPE_FIR_TAPS / 2 ];
Chris@69 368 pred_lag_ptr = &sLTP_Q15[ NSQ->sLTP_buf_idx - lag + LTP_ORDER / 2 ];
Chris@69 369 Gain_Q10 = silk_RSHIFT( Gain_Q16, 6 );
Chris@69 370
Chris@69 371 #ifdef silk_short_prediction_create_arch_coef
Chris@69 372 silk_short_prediction_create_arch_coef(a_Q12_arch, a_Q12, predictLPCOrder);
Chris@69 373 #endif
Chris@69 374
Chris@69 375 for( i = 0; i < length; i++ ) {
Chris@69 376 /* Perform common calculations used in all states */
Chris@69 377
Chris@69 378 /* Long-term prediction */
Chris@69 379 if( signalType == TYPE_VOICED ) {
Chris@69 380 /* Unrolled loop */
Chris@69 381 /* Avoids introducing a bias because silk_SMLAWB() always rounds to -inf */
Chris@69 382 LTP_pred_Q14 = 2;
Chris@69 383 LTP_pred_Q14 = silk_SMLAWB( LTP_pred_Q14, pred_lag_ptr[ 0 ], b_Q14[ 0 ] );
Chris@69 384 LTP_pred_Q14 = silk_SMLAWB( LTP_pred_Q14, pred_lag_ptr[ -1 ], b_Q14[ 1 ] );
Chris@69 385 LTP_pred_Q14 = silk_SMLAWB( LTP_pred_Q14, pred_lag_ptr[ -2 ], b_Q14[ 2 ] );
Chris@69 386 LTP_pred_Q14 = silk_SMLAWB( LTP_pred_Q14, pred_lag_ptr[ -3 ], b_Q14[ 3 ] );
Chris@69 387 LTP_pred_Q14 = silk_SMLAWB( LTP_pred_Q14, pred_lag_ptr[ -4 ], b_Q14[ 4 ] );
Chris@69 388 LTP_pred_Q14 = silk_LSHIFT( LTP_pred_Q14, 1 ); /* Q13 -> Q14 */
Chris@69 389 pred_lag_ptr++;
Chris@69 390 } else {
Chris@69 391 LTP_pred_Q14 = 0;
Chris@69 392 }
Chris@69 393
Chris@69 394 /* Long-term shaping */
Chris@69 395 if( lag > 0 ) {
Chris@69 396 /* Symmetric, packed FIR coefficients */
Chris@69 397 n_LTP_Q14 = silk_SMULWB( silk_ADD32( shp_lag_ptr[ 0 ], shp_lag_ptr[ -2 ] ), HarmShapeFIRPacked_Q14 );
Chris@69 398 n_LTP_Q14 = silk_SMLAWT( n_LTP_Q14, shp_lag_ptr[ -1 ], HarmShapeFIRPacked_Q14 );
Chris@69 399 n_LTP_Q14 = silk_SUB_LSHIFT32( LTP_pred_Q14, n_LTP_Q14, 2 ); /* Q12 -> Q14 */
Chris@69 400 shp_lag_ptr++;
Chris@69 401 } else {
Chris@69 402 n_LTP_Q14 = 0;
Chris@69 403 }
Chris@69 404
Chris@69 405 for( k = 0; k < nStatesDelayedDecision; k++ ) {
Chris@69 406 /* Delayed decision state */
Chris@69 407 psDD = &psDelDec[ k ];
Chris@69 408
Chris@69 409 /* Sample state */
Chris@69 410 psSS = psSampleState[ k ];
Chris@69 411
Chris@69 412 /* Generate dither */
Chris@69 413 psDD->Seed = silk_RAND( psDD->Seed );
Chris@69 414
Chris@69 415 /* Pointer used in short term prediction and shaping */
Chris@69 416 psLPC_Q14 = &psDD->sLPC_Q14[ NSQ_LPC_BUF_LENGTH - 1 + i ];
Chris@69 417 /* Short-term prediction */
Chris@69 418 LPC_pred_Q14 = silk_noise_shape_quantizer_short_prediction(psLPC_Q14, a_Q12, a_Q12_arch, predictLPCOrder, arch);
Chris@69 419 LPC_pred_Q14 = silk_LSHIFT( LPC_pred_Q14, 4 ); /* Q10 -> Q14 */
Chris@69 420
Chris@69 421 /* Noise shape feedback */
Chris@69 422 celt_assert( ( shapingLPCOrder & 1 ) == 0 ); /* check that order is even */
Chris@69 423 /* Output of lowpass section */
Chris@69 424 tmp2 = silk_SMLAWB( psDD->Diff_Q14, psDD->sAR2_Q14[ 0 ], warping_Q16 );
Chris@69 425 /* Output of allpass section */
Chris@69 426 tmp1 = silk_SMLAWB( psDD->sAR2_Q14[ 0 ], psDD->sAR2_Q14[ 1 ] - tmp2, warping_Q16 );
Chris@69 427 psDD->sAR2_Q14[ 0 ] = tmp2;
Chris@69 428 n_AR_Q14 = silk_RSHIFT( shapingLPCOrder, 1 );
Chris@69 429 n_AR_Q14 = silk_SMLAWB( n_AR_Q14, tmp2, AR_shp_Q13[ 0 ] );
Chris@69 430 /* Loop over allpass sections */
Chris@69 431 for( j = 2; j < shapingLPCOrder; j += 2 ) {
Chris@69 432 /* Output of allpass section */
Chris@69 433 tmp2 = silk_SMLAWB( psDD->sAR2_Q14[ j - 1 ], psDD->sAR2_Q14[ j + 0 ] - tmp1, warping_Q16 );
Chris@69 434 psDD->sAR2_Q14[ j - 1 ] = tmp1;
Chris@69 435 n_AR_Q14 = silk_SMLAWB( n_AR_Q14, tmp1, AR_shp_Q13[ j - 1 ] );
Chris@69 436 /* Output of allpass section */
Chris@69 437 tmp1 = silk_SMLAWB( psDD->sAR2_Q14[ j + 0 ], psDD->sAR2_Q14[ j + 1 ] - tmp2, warping_Q16 );
Chris@69 438 psDD->sAR2_Q14[ j + 0 ] = tmp2;
Chris@69 439 n_AR_Q14 = silk_SMLAWB( n_AR_Q14, tmp2, AR_shp_Q13[ j ] );
Chris@69 440 }
Chris@69 441 psDD->sAR2_Q14[ shapingLPCOrder - 1 ] = tmp1;
Chris@69 442 n_AR_Q14 = silk_SMLAWB( n_AR_Q14, tmp1, AR_shp_Q13[ shapingLPCOrder - 1 ] );
Chris@69 443
Chris@69 444 n_AR_Q14 = silk_LSHIFT( n_AR_Q14, 1 ); /* Q11 -> Q12 */
Chris@69 445 n_AR_Q14 = silk_SMLAWB( n_AR_Q14, psDD->LF_AR_Q14, Tilt_Q14 ); /* Q12 */
Chris@69 446 n_AR_Q14 = silk_LSHIFT( n_AR_Q14, 2 ); /* Q12 -> Q14 */
Chris@69 447
Chris@69 448 n_LF_Q14 = silk_SMULWB( psDD->Shape_Q14[ *smpl_buf_idx ], LF_shp_Q14 ); /* Q12 */
Chris@69 449 n_LF_Q14 = silk_SMLAWT( n_LF_Q14, psDD->LF_AR_Q14, LF_shp_Q14 ); /* Q12 */
Chris@69 450 n_LF_Q14 = silk_LSHIFT( n_LF_Q14, 2 ); /* Q12 -> Q14 */
Chris@69 451
Chris@69 452 /* Input minus prediction plus noise feedback */
Chris@69 453 /* r = x[ i ] - LTP_pred - LPC_pred + n_AR + n_Tilt + n_LF + n_LTP */
Chris@69 454 tmp1 = silk_ADD32( n_AR_Q14, n_LF_Q14 ); /* Q14 */
Chris@69 455 tmp2 = silk_ADD32( n_LTP_Q14, LPC_pred_Q14 ); /* Q13 */
Chris@69 456 tmp1 = silk_SUB32( tmp2, tmp1 ); /* Q13 */
Chris@69 457 tmp1 = silk_RSHIFT_ROUND( tmp1, 4 ); /* Q10 */
Chris@69 458
Chris@69 459 r_Q10 = silk_SUB32( x_Q10[ i ], tmp1 ); /* residual error Q10 */
Chris@69 460
Chris@69 461 /* Flip sign depending on dither */
Chris@69 462 if ( psDD->Seed < 0 ) {
Chris@69 463 r_Q10 = -r_Q10;
Chris@69 464 }
Chris@69 465 r_Q10 = silk_LIMIT_32( r_Q10, -(31 << 10), 30 << 10 );
Chris@69 466
Chris@69 467 /* Find two quantization level candidates and measure their rate-distortion */
Chris@69 468 q1_Q10 = silk_SUB32( r_Q10, offset_Q10 );
Chris@69 469 q1_Q0 = silk_RSHIFT( q1_Q10, 10 );
Chris@69 470 if (Lambda_Q10 > 2048) {
Chris@69 471 /* For aggressive RDO, the bias becomes more than one pulse. */
Chris@69 472 int rdo_offset = Lambda_Q10/2 - 512;
Chris@69 473 if (q1_Q10 > rdo_offset) {
Chris@69 474 q1_Q0 = silk_RSHIFT( q1_Q10 - rdo_offset, 10 );
Chris@69 475 } else if (q1_Q10 < -rdo_offset) {
Chris@69 476 q1_Q0 = silk_RSHIFT( q1_Q10 + rdo_offset, 10 );
Chris@69 477 } else if (q1_Q10 < 0) {
Chris@69 478 q1_Q0 = -1;
Chris@69 479 } else {
Chris@69 480 q1_Q0 = 0;
Chris@69 481 }
Chris@69 482 }
Chris@69 483 if( q1_Q0 > 0 ) {
Chris@69 484 q1_Q10 = silk_SUB32( silk_LSHIFT( q1_Q0, 10 ), QUANT_LEVEL_ADJUST_Q10 );
Chris@69 485 q1_Q10 = silk_ADD32( q1_Q10, offset_Q10 );
Chris@69 486 q2_Q10 = silk_ADD32( q1_Q10, 1024 );
Chris@69 487 rd1_Q10 = silk_SMULBB( q1_Q10, Lambda_Q10 );
Chris@69 488 rd2_Q10 = silk_SMULBB( q2_Q10, Lambda_Q10 );
Chris@69 489 } else if( q1_Q0 == 0 ) {
Chris@69 490 q1_Q10 = offset_Q10;
Chris@69 491 q2_Q10 = silk_ADD32( q1_Q10, 1024 - QUANT_LEVEL_ADJUST_Q10 );
Chris@69 492 rd1_Q10 = silk_SMULBB( q1_Q10, Lambda_Q10 );
Chris@69 493 rd2_Q10 = silk_SMULBB( q2_Q10, Lambda_Q10 );
Chris@69 494 } else if( q1_Q0 == -1 ) {
Chris@69 495 q2_Q10 = offset_Q10;
Chris@69 496 q1_Q10 = silk_SUB32( q2_Q10, 1024 - QUANT_LEVEL_ADJUST_Q10 );
Chris@69 497 rd1_Q10 = silk_SMULBB( -q1_Q10, Lambda_Q10 );
Chris@69 498 rd2_Q10 = silk_SMULBB( q2_Q10, Lambda_Q10 );
Chris@69 499 } else { /* q1_Q0 < -1 */
Chris@69 500 q1_Q10 = silk_ADD32( silk_LSHIFT( q1_Q0, 10 ), QUANT_LEVEL_ADJUST_Q10 );
Chris@69 501 q1_Q10 = silk_ADD32( q1_Q10, offset_Q10 );
Chris@69 502 q2_Q10 = silk_ADD32( q1_Q10, 1024 );
Chris@69 503 rd1_Q10 = silk_SMULBB( -q1_Q10, Lambda_Q10 );
Chris@69 504 rd2_Q10 = silk_SMULBB( -q2_Q10, Lambda_Q10 );
Chris@69 505 }
Chris@69 506 rr_Q10 = silk_SUB32( r_Q10, q1_Q10 );
Chris@69 507 rd1_Q10 = silk_RSHIFT( silk_SMLABB( rd1_Q10, rr_Q10, rr_Q10 ), 10 );
Chris@69 508 rr_Q10 = silk_SUB32( r_Q10, q2_Q10 );
Chris@69 509 rd2_Q10 = silk_RSHIFT( silk_SMLABB( rd2_Q10, rr_Q10, rr_Q10 ), 10 );
Chris@69 510
Chris@69 511 if( rd1_Q10 < rd2_Q10 ) {
Chris@69 512 psSS[ 0 ].RD_Q10 = silk_ADD32( psDD->RD_Q10, rd1_Q10 );
Chris@69 513 psSS[ 1 ].RD_Q10 = silk_ADD32( psDD->RD_Q10, rd2_Q10 );
Chris@69 514 psSS[ 0 ].Q_Q10 = q1_Q10;
Chris@69 515 psSS[ 1 ].Q_Q10 = q2_Q10;
Chris@69 516 } else {
Chris@69 517 psSS[ 0 ].RD_Q10 = silk_ADD32( psDD->RD_Q10, rd2_Q10 );
Chris@69 518 psSS[ 1 ].RD_Q10 = silk_ADD32( psDD->RD_Q10, rd1_Q10 );
Chris@69 519 psSS[ 0 ].Q_Q10 = q2_Q10;
Chris@69 520 psSS[ 1 ].Q_Q10 = q1_Q10;
Chris@69 521 }
Chris@69 522
Chris@69 523 /* Update states for best quantization */
Chris@69 524
Chris@69 525 /* Quantized excitation */
Chris@69 526 exc_Q14 = silk_LSHIFT32( psSS[ 0 ].Q_Q10, 4 );
Chris@69 527 if ( psDD->Seed < 0 ) {
Chris@69 528 exc_Q14 = -exc_Q14;
Chris@69 529 }
Chris@69 530
Chris@69 531 /* Add predictions */
Chris@69 532 LPC_exc_Q14 = silk_ADD32( exc_Q14, LTP_pred_Q14 );
Chris@69 533 xq_Q14 = silk_ADD32( LPC_exc_Q14, LPC_pred_Q14 );
Chris@69 534
Chris@69 535 /* Update states */
Chris@69 536 psSS[ 0 ].Diff_Q14 = silk_SUB_LSHIFT32( xq_Q14, x_Q10[ i ], 4 );
Chris@69 537 sLF_AR_shp_Q14 = silk_SUB32( psSS[ 0 ].Diff_Q14, n_AR_Q14 );
Chris@69 538 psSS[ 0 ].sLTP_shp_Q14 = silk_SUB32( sLF_AR_shp_Q14, n_LF_Q14 );
Chris@69 539 psSS[ 0 ].LF_AR_Q14 = sLF_AR_shp_Q14;
Chris@69 540 psSS[ 0 ].LPC_exc_Q14 = LPC_exc_Q14;
Chris@69 541 psSS[ 0 ].xq_Q14 = xq_Q14;
Chris@69 542
Chris@69 543 /* Update states for second best quantization */
Chris@69 544
Chris@69 545 /* Quantized excitation */
Chris@69 546 exc_Q14 = silk_LSHIFT32( psSS[ 1 ].Q_Q10, 4 );
Chris@69 547 if ( psDD->Seed < 0 ) {
Chris@69 548 exc_Q14 = -exc_Q14;
Chris@69 549 }
Chris@69 550
Chris@69 551 /* Add predictions */
Chris@69 552 LPC_exc_Q14 = silk_ADD32( exc_Q14, LTP_pred_Q14 );
Chris@69 553 xq_Q14 = silk_ADD32( LPC_exc_Q14, LPC_pred_Q14 );
Chris@69 554
Chris@69 555 /* Update states */
Chris@69 556 psSS[ 1 ].Diff_Q14 = silk_SUB_LSHIFT32( xq_Q14, x_Q10[ i ], 4 );
Chris@69 557 sLF_AR_shp_Q14 = silk_SUB32( psSS[ 1 ].Diff_Q14, n_AR_Q14 );
Chris@69 558 psSS[ 1 ].sLTP_shp_Q14 = silk_SUB32( sLF_AR_shp_Q14, n_LF_Q14 );
Chris@69 559 psSS[ 1 ].LF_AR_Q14 = sLF_AR_shp_Q14;
Chris@69 560 psSS[ 1 ].LPC_exc_Q14 = LPC_exc_Q14;
Chris@69 561 psSS[ 1 ].xq_Q14 = xq_Q14;
Chris@69 562 }
Chris@69 563
Chris@69 564 *smpl_buf_idx = ( *smpl_buf_idx - 1 ) % DECISION_DELAY;
Chris@69 565 if( *smpl_buf_idx < 0 ) *smpl_buf_idx += DECISION_DELAY;
Chris@69 566 last_smple_idx = ( *smpl_buf_idx + decisionDelay ) % DECISION_DELAY;
Chris@69 567
Chris@69 568 /* Find winner */
Chris@69 569 RDmin_Q10 = psSampleState[ 0 ][ 0 ].RD_Q10;
Chris@69 570 Winner_ind = 0;
Chris@69 571 for( k = 1; k < nStatesDelayedDecision; k++ ) {
Chris@69 572 if( psSampleState[ k ][ 0 ].RD_Q10 < RDmin_Q10 ) {
Chris@69 573 RDmin_Q10 = psSampleState[ k ][ 0 ].RD_Q10;
Chris@69 574 Winner_ind = k;
Chris@69 575 }
Chris@69 576 }
Chris@69 577
Chris@69 578 /* Increase RD values of expired states */
Chris@69 579 Winner_rand_state = psDelDec[ Winner_ind ].RandState[ last_smple_idx ];
Chris@69 580 for( k = 0; k < nStatesDelayedDecision; k++ ) {
Chris@69 581 if( psDelDec[ k ].RandState[ last_smple_idx ] != Winner_rand_state ) {
Chris@69 582 psSampleState[ k ][ 0 ].RD_Q10 = silk_ADD32( psSampleState[ k ][ 0 ].RD_Q10, silk_int32_MAX >> 4 );
Chris@69 583 psSampleState[ k ][ 1 ].RD_Q10 = silk_ADD32( psSampleState[ k ][ 1 ].RD_Q10, silk_int32_MAX >> 4 );
Chris@69 584 silk_assert( psSampleState[ k ][ 0 ].RD_Q10 >= 0 );
Chris@69 585 }
Chris@69 586 }
Chris@69 587
Chris@69 588 /* Find worst in first set and best in second set */
Chris@69 589 RDmax_Q10 = psSampleState[ 0 ][ 0 ].RD_Q10;
Chris@69 590 RDmin_Q10 = psSampleState[ 0 ][ 1 ].RD_Q10;
Chris@69 591 RDmax_ind = 0;
Chris@69 592 RDmin_ind = 0;
Chris@69 593 for( k = 1; k < nStatesDelayedDecision; k++ ) {
Chris@69 594 /* find worst in first set */
Chris@69 595 if( psSampleState[ k ][ 0 ].RD_Q10 > RDmax_Q10 ) {
Chris@69 596 RDmax_Q10 = psSampleState[ k ][ 0 ].RD_Q10;
Chris@69 597 RDmax_ind = k;
Chris@69 598 }
Chris@69 599 /* find best in second set */
Chris@69 600 if( psSampleState[ k ][ 1 ].RD_Q10 < RDmin_Q10 ) {
Chris@69 601 RDmin_Q10 = psSampleState[ k ][ 1 ].RD_Q10;
Chris@69 602 RDmin_ind = k;
Chris@69 603 }
Chris@69 604 }
Chris@69 605
Chris@69 606 /* Replace a state if best from second set outperforms worst in first set */
Chris@69 607 if( RDmin_Q10 < RDmax_Q10 ) {
Chris@69 608 silk_memcpy( ( (opus_int32 *)&psDelDec[ RDmax_ind ] ) + i,
Chris@69 609 ( (opus_int32 *)&psDelDec[ RDmin_ind ] ) + i, sizeof( NSQ_del_dec_struct ) - i * sizeof( opus_int32) );
Chris@69 610 silk_memcpy( &psSampleState[ RDmax_ind ][ 0 ], &psSampleState[ RDmin_ind ][ 1 ], sizeof( NSQ_sample_struct ) );
Chris@69 611 }
Chris@69 612
Chris@69 613 /* Write samples from winner to output and long-term filter states */
Chris@69 614 psDD = &psDelDec[ Winner_ind ];
Chris@69 615 if( subfr > 0 || i >= decisionDelay ) {
Chris@69 616 pulses[ i - decisionDelay ] = (opus_int8)silk_RSHIFT_ROUND( psDD->Q_Q10[ last_smple_idx ], 10 );
Chris@69 617 xq[ i - decisionDelay ] = (opus_int16)silk_SAT16( silk_RSHIFT_ROUND(
Chris@69 618 silk_SMULWW( psDD->Xq_Q14[ last_smple_idx ], delayedGain_Q10[ last_smple_idx ] ), 8 ) );
Chris@69 619 NSQ->sLTP_shp_Q14[ NSQ->sLTP_shp_buf_idx - decisionDelay ] = psDD->Shape_Q14[ last_smple_idx ];
Chris@69 620 sLTP_Q15[ NSQ->sLTP_buf_idx - decisionDelay ] = psDD->Pred_Q15[ last_smple_idx ];
Chris@69 621 }
Chris@69 622 NSQ->sLTP_shp_buf_idx++;
Chris@69 623 NSQ->sLTP_buf_idx++;
Chris@69 624
Chris@69 625 /* Update states */
Chris@69 626 for( k = 0; k < nStatesDelayedDecision; k++ ) {
Chris@69 627 psDD = &psDelDec[ k ];
Chris@69 628 psSS = &psSampleState[ k ][ 0 ];
Chris@69 629 psDD->LF_AR_Q14 = psSS->LF_AR_Q14;
Chris@69 630 psDD->Diff_Q14 = psSS->Diff_Q14;
Chris@69 631 psDD->sLPC_Q14[ NSQ_LPC_BUF_LENGTH + i ] = psSS->xq_Q14;
Chris@69 632 psDD->Xq_Q14[ *smpl_buf_idx ] = psSS->xq_Q14;
Chris@69 633 psDD->Q_Q10[ *smpl_buf_idx ] = psSS->Q_Q10;
Chris@69 634 psDD->Pred_Q15[ *smpl_buf_idx ] = silk_LSHIFT32( psSS->LPC_exc_Q14, 1 );
Chris@69 635 psDD->Shape_Q14[ *smpl_buf_idx ] = psSS->sLTP_shp_Q14;
Chris@69 636 psDD->Seed = silk_ADD32_ovflw( psDD->Seed, silk_RSHIFT_ROUND( psSS->Q_Q10, 10 ) );
Chris@69 637 psDD->RandState[ *smpl_buf_idx ] = psDD->Seed;
Chris@69 638 psDD->RD_Q10 = psSS->RD_Q10;
Chris@69 639 }
Chris@69 640 delayedGain_Q10[ *smpl_buf_idx ] = Gain_Q10;
Chris@69 641 }
Chris@69 642 /* Update LPC states */
Chris@69 643 for( k = 0; k < nStatesDelayedDecision; k++ ) {
Chris@69 644 psDD = &psDelDec[ k ];
Chris@69 645 silk_memcpy( psDD->sLPC_Q14, &psDD->sLPC_Q14[ length ], NSQ_LPC_BUF_LENGTH * sizeof( opus_int32 ) );
Chris@69 646 }
Chris@69 647 RESTORE_STACK;
Chris@69 648 }
Chris@69 649 #endif /* OVERRIDE_silk_noise_shape_quantizer_del_dec */
Chris@69 650
Chris@69 651 static OPUS_INLINE void silk_nsq_del_dec_scale_states(
Chris@69 652 const silk_encoder_state *psEncC, /* I Encoder State */
Chris@69 653 silk_nsq_state *NSQ, /* I/O NSQ state */
Chris@69 654 NSQ_del_dec_struct psDelDec[], /* I/O Delayed decision states */
Chris@69 655 const opus_int16 x16[], /* I Input */
Chris@69 656 opus_int32 x_sc_Q10[], /* O Input scaled with 1/Gain in Q10 */
Chris@69 657 const opus_int16 sLTP[], /* I Re-whitened LTP state in Q0 */
Chris@69 658 opus_int32 sLTP_Q15[], /* O LTP state matching scaled input */
Chris@69 659 opus_int subfr, /* I Subframe number */
Chris@69 660 opus_int nStatesDelayedDecision, /* I Number of del dec states */
Chris@69 661 const opus_int LTP_scale_Q14, /* I LTP state scaling */
Chris@69 662 const opus_int32 Gains_Q16[ MAX_NB_SUBFR ], /* I */
Chris@69 663 const opus_int pitchL[ MAX_NB_SUBFR ], /* I Pitch lag */
Chris@69 664 const opus_int signal_type, /* I Signal type */
Chris@69 665 const opus_int decisionDelay /* I Decision delay */
Chris@69 666 )
Chris@69 667 {
Chris@69 668 opus_int i, k, lag;
Chris@69 669 opus_int32 gain_adj_Q16, inv_gain_Q31, inv_gain_Q26;
Chris@69 670 NSQ_del_dec_struct *psDD;
Chris@69 671
Chris@69 672 lag = pitchL[ subfr ];
Chris@69 673 inv_gain_Q31 = silk_INVERSE32_varQ( silk_max( Gains_Q16[ subfr ], 1 ), 47 );
Chris@69 674 silk_assert( inv_gain_Q31 != 0 );
Chris@69 675
Chris@69 676 /* Scale input */
Chris@69 677 inv_gain_Q26 = silk_RSHIFT_ROUND( inv_gain_Q31, 5 );
Chris@69 678 for( i = 0; i < psEncC->subfr_length; i++ ) {
Chris@69 679 x_sc_Q10[ i ] = silk_SMULWW( x16[ i ], inv_gain_Q26 );
Chris@69 680 }
Chris@69 681
Chris@69 682 /* After rewhitening the LTP state is un-scaled, so scale with inv_gain_Q16 */
Chris@69 683 if( NSQ->rewhite_flag ) {
Chris@69 684 if( subfr == 0 ) {
Chris@69 685 /* Do LTP downscaling */
Chris@69 686 inv_gain_Q31 = silk_LSHIFT( silk_SMULWB( inv_gain_Q31, LTP_scale_Q14 ), 2 );
Chris@69 687 }
Chris@69 688 for( i = NSQ->sLTP_buf_idx - lag - LTP_ORDER / 2; i < NSQ->sLTP_buf_idx; i++ ) {
Chris@69 689 silk_assert( i < MAX_FRAME_LENGTH );
Chris@69 690 sLTP_Q15[ i ] = silk_SMULWB( inv_gain_Q31, sLTP[ i ] );
Chris@69 691 }
Chris@69 692 }
Chris@69 693
Chris@69 694 /* Adjust for changing gain */
Chris@69 695 if( Gains_Q16[ subfr ] != NSQ->prev_gain_Q16 ) {
Chris@69 696 gain_adj_Q16 = silk_DIV32_varQ( NSQ->prev_gain_Q16, Gains_Q16[ subfr ], 16 );
Chris@69 697
Chris@69 698 /* Scale long-term shaping state */
Chris@69 699 for( i = NSQ->sLTP_shp_buf_idx - psEncC->ltp_mem_length; i < NSQ->sLTP_shp_buf_idx; i++ ) {
Chris@69 700 NSQ->sLTP_shp_Q14[ i ] = silk_SMULWW( gain_adj_Q16, NSQ->sLTP_shp_Q14[ i ] );
Chris@69 701 }
Chris@69 702
Chris@69 703 /* Scale long-term prediction state */
Chris@69 704 if( signal_type == TYPE_VOICED && NSQ->rewhite_flag == 0 ) {
Chris@69 705 for( i = NSQ->sLTP_buf_idx - lag - LTP_ORDER / 2; i < NSQ->sLTP_buf_idx - decisionDelay; i++ ) {
Chris@69 706 sLTP_Q15[ i ] = silk_SMULWW( gain_adj_Q16, sLTP_Q15[ i ] );
Chris@69 707 }
Chris@69 708 }
Chris@69 709
Chris@69 710 for( k = 0; k < nStatesDelayedDecision; k++ ) {
Chris@69 711 psDD = &psDelDec[ k ];
Chris@69 712
Chris@69 713 /* Scale scalar states */
Chris@69 714 psDD->LF_AR_Q14 = silk_SMULWW( gain_adj_Q16, psDD->LF_AR_Q14 );
Chris@69 715 psDD->Diff_Q14 = silk_SMULWW( gain_adj_Q16, psDD->Diff_Q14 );
Chris@69 716
Chris@69 717 /* Scale short-term prediction and shaping states */
Chris@69 718 for( i = 0; i < NSQ_LPC_BUF_LENGTH; i++ ) {
Chris@69 719 psDD->sLPC_Q14[ i ] = silk_SMULWW( gain_adj_Q16, psDD->sLPC_Q14[ i ] );
Chris@69 720 }
Chris@69 721 for( i = 0; i < MAX_SHAPE_LPC_ORDER; i++ ) {
Chris@69 722 psDD->sAR2_Q14[ i ] = silk_SMULWW( gain_adj_Q16, psDD->sAR2_Q14[ i ] );
Chris@69 723 }
Chris@69 724 for( i = 0; i < DECISION_DELAY; i++ ) {
Chris@69 725 psDD->Pred_Q15[ i ] = silk_SMULWW( gain_adj_Q16, psDD->Pred_Q15[ i ] );
Chris@69 726 psDD->Shape_Q14[ i ] = silk_SMULWW( gain_adj_Q16, psDD->Shape_Q14[ i ] );
Chris@69 727 }
Chris@69 728 }
Chris@69 729
Chris@69 730 /* Save inverse gain */
Chris@69 731 NSQ->prev_gain_Q16 = Gains_Q16[ subfr ];
Chris@69 732 }
Chris@69 733 }