Coverage Report

Created: 2026-09-14 08:00

next uncovered line (L), next uncovered region (R), next uncovered branch (B)
/src/opus/silk/x86/NSQ_del_dec_avx2.c
Line
Count
Source
1
/***********************************************************************
2
Copyright (c) 2021 Google Inc.
3
Redistribution and use in source and binary forms, with or without
4
modification, are permitted provided that the following conditions
5
are met:
6
- Redistributions of source code must retain the above copyright notice,
7
this list of conditions and the following disclaimer.
8
- Redistributions in binary form must reproduce the above copyright
9
notice, this list of conditions and the following disclaimer in the
10
documentation and/or other materials provided with the distribution.
11
- Neither the name of Internet Society, IETF or IETF Trust, nor the
12
names of specific contributors, may be used to endorse or promote
13
products derived from this software without specific prior written
14
permission.
15
THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
16
AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
17
IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
18
ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
19
LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
20
CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
21
SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
22
INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
23
CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
24
ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
25
POSSIBILITY OF SUCH DAMAGE.
26
***********************************************************************/
27
28
#ifdef HAVE_CONFIG_H
29
#include "config.h"
30
#endif
31
32
#ifdef OPUS_CHECK_ASM
33
#include <string.h>
34
#endif
35
36
#include "opus_defines.h"
37
#include <immintrin.h>
38
39
#include "main.h"
40
#include "stack_alloc.h"
41
#include "NSQ.h"
42
#include "celt/x86/x86cpu.h"
43
44
/* Returns TRUE if all assumptions met */
45
static OPUS_INLINE int verify_assumptions(const silk_encoder_state *psEncC)
46
0
{
47
    /* This optimization is based on these assumptions        */
48
    /* These assumptions are fundamental and hence assert are */
49
    /* used. Should any assert triggers, we have to re-visit  */
50
    /* all related code to make sure it still functions the   */
51
    /* same as the C implementation.                          */
52
0
    silk_assert(MAX_DEL_DEC_STATES  <= 4      &&
53
0
                MAX_FRAME_LENGTH     % 4 == 0 &&
54
0
                MAX_SUB_FRAME_LENGTH % 4 == 0 &&
55
0
                LTP_MEM_LENGTH_MS    % 4 == 0 );
56
0
    silk_assert(psEncC->fs_kHz ==  8 ||
57
0
                psEncC->fs_kHz == 12 ||
58
0
                psEncC->fs_kHz == 16 );
59
0
    silk_assert(psEncC->nb_subfr <= MAX_NB_SUBFR &&
60
0
                psEncC->nb_subfr > 0             );
61
0
    silk_assert(psEncC->nStatesDelayedDecision <= MAX_DEL_DEC_STATES &&
62
0
                psEncC->nStatesDelayedDecision > 0                   );
63
0
    silk_assert(psEncC->ltp_mem_length == psEncC->fs_kHz * LTP_MEM_LENGTH_MS);
64
65
    /* Regressions were observed on certain AMD Zen CPUs when      */
66
    /* nStatesDelayedDecision is 1 or 2. Ideally we should detect  */
67
    /* these CPUs and enable this optimization on others; however, */
68
    /* there is no good way to do so under current OPUS framework. */
69
0
    return psEncC->nStatesDelayedDecision == 3 ||
70
0
           psEncC->nStatesDelayedDecision == 4;
71
0
}
72
73
/* Intrinsics not defined on MSVC */
74
#ifdef _MSC_VER
75
#include <intsafe.h>
76
static inline int __builtin_sadd_overflow(opus_int32 a, opus_int32 b, opus_int32* res)
77
{
78
    *res = a+b;
79
    return (*res ^ a) & (*res ^ b) & 0x80000000;
80
}
81
static inline int __builtin_ctz(unsigned int x)
82
{
83
    DWORD res = 0;
84
    return _BitScanForward(&res, x) ? res : 32;
85
}
86
#endif
87
88
static OPUS_INLINE __m128i silk_cvtepi64_epi32_high(__m256i num)
89
0
{
90
0
    return _mm256_castsi256_si128(_mm256_permutevar8x32_epi32(num, _mm256_set_epi32(0, 0, 0, 0, 7, 5, 3, 1)));
91
0
}
92
93
static OPUS_INLINE opus_int16 silk_sat16(opus_int32 num)
94
0
{
95
0
    num = num > silk_int16_MAX ? silk_int16_MAX : num;
96
0
    num = num < silk_int16_MIN ? silk_int16_MIN : num;
97
0
    return num;
98
0
}
99
100
static OPUS_INLINE opus_int64 silk_sar_round_smulww(opus_int32 a, opus_int32 b, int bits)
101
0
{
102
0
#ifndef OPUS_CHECK_ASM
103
0
    opus_int64 t;
104
0
#endif
105
0
    silk_assert(bits > 0 && bits < 63);
106
#ifdef OPUS_CHECK_ASM
107
    return silk_RSHIFT_ROUND(silk_SMULWW(a, b), bits);
108
#else
109
    /* This code is more correct, but it won't overflow like the C code in some rare cases. */
110
0
    silk_assert(bits > 0 && bits < 63);
111
0
    t = ((opus_int64)a) * ((opus_int64)b);
112
0
    bits += 16;
113
0
    t += 1ull << (bits-1);
114
0
    return t >> bits;
115
0
#endif
116
0
}
117
118
static OPUS_INLINE opus_int32 silk_add_sat32(opus_int32 a, opus_int32 b)
119
0
{
120
0
    opus_int32 sum;
121
0
    if (__builtin_sadd_overflow(a, b, &sum))
122
0
    {
123
0
        return a >= 0 ? silk_int32_MAX : silk_int32_MIN;
124
0
    }
125
0
    return sum;
126
0
}
127
128
static OPUS_INLINE __m128i silk_mm_srai_round_epi32(__m128i a, int bits)
129
0
{
130
0
    silk_assert(bits > 0 && bits < 31);
131
0
    return _mm_srai_epi32(_mm_add_epi32(_mm_srai_epi32(a, bits - 1), _mm_set1_epi32(1)), 1);
132
0
}
133
134
/* add/subtract with output saturated */
135
static OPUS_INLINE __m128i silk_mm_add_sat_epi32(__m128i a, __m128i b)
136
0
{
137
0
    __m128i r = _mm_add_epi32(a, b);
138
0
    __m128i OF = _mm_and_si128(_mm_xor_si128(a, r), _mm_xor_si128(b, r));           /* OF = (sum ^ a) & (sum ^ b)   */
139
0
    __m128i SAT = _mm_add_epi32(_mm_srli_epi32(a, 31), _mm_set1_epi32(0x7FFFFFFF)); /* SAT = (a >> 31) + 0x7FFFFFFF */
140
0
    return _mm_blendv_epi8(r, SAT, _mm_srai_epi32(OF, 31));
141
0
}
142
static OPUS_INLINE __m128i silk_mm_sub_sat_epi32(__m128i a, __m128i b)
143
0
{
144
0
    __m128i r = _mm_sub_epi32(a, b);
145
0
    __m128i OF = _mm_andnot_si128(_mm_xor_si128(b, r), _mm_xor_si128(a, r));        /* OF = (sum ^ a) & (sum ^ ~b) = (sum ^ a) & ~(sum ^ b) */
146
0
    __m128i SAT = _mm_add_epi32(_mm_srli_epi32(a, 31), _mm_set1_epi32(0x7FFFFFFF)); /* SAT = (a >> 31) + 0x7FFFFFFF                         */
147
0
    return _mm_blendv_epi8(r, SAT, _mm_srai_epi32(OF, 31));
148
0
}
149
static OPUS_INLINE __m256i silk_mm256_sub_sat_epi32(__m256i a, __m256i b)
150
0
{
151
0
    __m256i r = _mm256_sub_epi32(a, b);
152
0
    __m256i OF = _mm256_andnot_si256(_mm256_xor_si256(b, r), _mm256_xor_si256(a, r));        /* OF = (sum ^ a) & (sum ^ ~b) = (sum ^ a) & ~(sum ^ b) */
153
0
    __m256i SAT = _mm256_add_epi32(_mm256_srli_epi32(a, 31), _mm256_set1_epi32(0x7FFFFFFF)); /* SAT = (a >> 31) + 0x7FFFFFFF                         */
154
0
    return _mm256_blendv_epi8(r, SAT, _mm256_srai_epi32(OF, 31));
155
0
}
156
157
static OPUS_INLINE __m128i silk_mm_limit_epi32(__m128i num, opus_int32 limit1, opus_int32 limit2)
158
0
{
159
0
    opus_int32 lo = limit1 < limit2 ? limit1 : limit2;
160
0
    opus_int32 hi = limit1 > limit2 ? limit1 : limit2;
161
162
0
    num = _mm_min_epi32(num, _mm_set1_epi32(hi));
163
0
    num = _mm_max_epi32(num, _mm_set1_epi32(lo));
164
0
    return num;
165
0
}
166
167
/* cond < 0 ? -num : num */
168
static OPUS_INLINE __m128i silk_mm_sign_epi32(__m128i num, __m128i cond)
169
0
{
170
0
    return _mm_sign_epi32(num, _mm_or_si128(cond, _mm_set1_epi32(1)));
171
0
}
172
static OPUS_INLINE __m256i silk_mm256_sign_epi32(__m256i num, __m256i cond)
173
0
{
174
0
    return _mm256_sign_epi32(num, _mm256_or_si256(cond, _mm256_set1_epi32(1)));
175
0
}
176
177
/* (a32 * b32) >> 16 */
178
static OPUS_INLINE __m128i silk_mm_smulww_epi32(__m128i a, opus_int32 b)
179
0
{
180
0
    return silk_cvtepi64_epi32_high(_mm256_slli_epi64(_mm256_mul_epi32(_mm256_cvtepi32_epi64(a), _mm256_set1_epi32(b)), 16));
181
0
}
182
183
/* (a32 * (opus_int32)((opus_int16)(b32))) >> 16 output have to be 32bit int */
184
static OPUS_INLINE __m128i silk_mm_smulwb_epi32(__m128i a, opus_int32 b)
185
0
{
186
0
    return silk_cvtepi64_epi32_high(_mm256_mul_epi32(_mm256_cvtepi32_epi64(a), _mm256_set1_epi32((opus_uint32)b<<16)));
187
0
}
188
189
/* (opus_int32)((opus_int16)(a3))) * (opus_int32)((opus_int16)(b32)) output have to be 32bit int */
190
static OPUS_INLINE __m256i silk_mm256_smulbb_epi32(__m256i a, __m256i b)
191
0
{
192
0
    const char FF = (char)0xFF;
193
0
    __m256i msk = _mm256_set_epi8(
194
0
        FF, FF, FF, FF, FF, FF, FF, FF, 13, 12, 9, 8, 5, 4, 1, 0,
195
0
        FF, FF, FF, FF, FF, FF, FF, FF, 13, 12, 9, 8, 5, 4, 1, 0);
196
0
    __m256i lo = _mm256_mullo_epi16(a, b);
197
0
    __m256i hi = _mm256_mulhi_epi16(a, b);
198
0
    lo = _mm256_shuffle_epi8(lo, msk);
199
0
    hi = _mm256_shuffle_epi8(hi, msk);
200
0
    return _mm256_unpacklo_epi16(lo, hi);
201
0
}
202
203
static OPUS_INLINE __m256i silk_mm256_reverse_epi32(__m256i v)
204
0
{
205
0
    v = _mm256_shuffle_epi32(v, 0x1B);
206
0
    v = _mm256_permute4x64_epi64(v, 0x4E);
207
0
    return v;
208
0
}
209
210
static OPUS_INLINE opus_int32 silk_mm256_hsum_epi32(__m256i v)
211
0
{
212
0
    __m128i sum = _mm_add_epi32(_mm256_extracti128_si256(v, 1), _mm256_extracti128_si256(v, 0));
213
0
    sum = _mm_add_epi32(sum, _mm_shuffle_epi32(sum, 0x4E));
214
0
    sum = _mm_add_epi32(sum, _mm_shuffle_epi32(sum, 0xB1));
215
0
    return _mm_cvtsi128_si32(sum);
216
0
}
217
218
static OPUS_INLINE __m128i silk_mm_hmin_epi32(__m128i num)
219
0
{
220
0
    num = _mm_min_epi32(num, _mm_shuffle_epi32(num, 0x4E)); /* 0123 -> 2301 */
221
0
    num = _mm_min_epi32(num, _mm_shuffle_epi32(num, 0xB1)); /* 0123 -> 1032 */
222
0
    return num;
223
0
}
224
225
static OPUS_INLINE __m128i silk_mm_hmax_epi32(__m128i num)
226
0
{
227
0
    num = _mm_max_epi32(num, _mm_shuffle_epi32(num, 0x4E)); /* 0123 -> 2310 */
228
0
    num = _mm_max_epi32(num, _mm_shuffle_epi32(num, 0xB1)); /* 0123 -> 1032 */
229
0
    return num;
230
0
}
231
232
static OPUS_INLINE __m128i silk_mm_mask_hmin_epi32(__m128i num, __m128i mask)
233
0
{
234
0
    num = _mm_blendv_epi8(num, _mm_set1_epi32(silk_int32_MAX), mask);
235
0
    return silk_mm_hmin_epi32(num);
236
0
}
237
238
static OPUS_INLINE __m128i silk_mm_mask_hmax_epi32(__m128i num, __m128i mask)
239
0
{
240
0
    num = _mm_blendv_epi8(num, _mm_set1_epi32(silk_int32_MIN), mask);
241
0
    return silk_mm_hmax_epi32(num);
242
0
}
243
244
static OPUS_INLINE __m128i silk_mm256_rand_epi32(__m128i seed)
245
0
{
246
0
    seed = _mm_mullo_epi32(seed, _mm_set1_epi32(RAND_MULTIPLIER));
247
0
    seed = _mm_add_epi32(seed, _mm_set1_epi32(RAND_INCREMENT));
248
0
    return seed;
249
0
}
250
251
static OPUS_INLINE opus_int32 silk_index_of_first_equal_epi32(__m128i a, __m128i b)
252
0
{
253
0
    unsigned int mask = _mm_movemask_epi8(_mm_cmpeq_epi32(a, b)) & 0x1111;
254
0
    silk_assert(mask != 0);
255
0
    return __builtin_ctz(mask) >> 2;
256
0
}
257
258
static __m128i silk_index_to_selector(opus_int32 index)
259
0
{
260
0
    silk_assert(index < 4);
261
0
    index <<= 2;
262
0
    return _mm_set_epi8(
263
0
        index + 3, index + 2, index + 1, index + 0,
264
0
        index + 3, index + 2, index + 1, index + 0,
265
0
        index + 3, index + 2, index + 1, index + 0,
266
0
        index + 3, index + 2, index + 1, index + 0);
267
0
}
268
269
static opus_int32 silk_select_winner(__m128i num, __m128i selector)
270
0
{
271
0
    return _mm_cvtsi128_si32(_mm_shuffle_epi8(num, selector));
272
0
}
273
274
typedef struct
275
{
276
    __m128i RandState;
277
    __m128i Q_Q10;
278
    __m128i Xq_Q14;
279
    __m128i Pred_Q15;
280
    __m128i Shape_Q14;
281
} NSQ_del_dec_sample_struct;
282
283
typedef struct
284
{
285
    __m128i sLPC_Q14[MAX_SUB_FRAME_LENGTH + NSQ_LPC_BUF_LENGTH];
286
    __m128i LF_AR_Q14;
287
    __m128i Seed;
288
    __m128i SeedInit;
289
    __m128i RD_Q10;
290
    __m128i Diff_Q14;
291
    __m128i sAR2_Q14[MAX_SHAPE_LPC_ORDER];
292
    NSQ_del_dec_sample_struct Samples[DECISION_DELAY];
293
} NSQ_del_dec_struct;
294
295
static OPUS_INLINE void silk_nsq_del_dec_scale_states_avx2(
296
    const silk_encoder_state *psEncC,          /* I    Encoder State                   */
297
    silk_nsq_state *NSQ,                       /* I/O  NSQ state                       */
298
    NSQ_del_dec_struct *psDelDec,              /* I/O  Delayed decision states         */
299
    const opus_int16 x16[],                    /* I    Input                           */
300
    opus_int32 x_sc_Q10[MAX_SUB_FRAME_LENGTH], /* O    Input scaled with 1/Gain in Q10 */
301
    const opus_int16 sLTP[],                   /* I    Re-whitened LTP state in Q0     */
302
    opus_int32 sLTP_Q15[],                     /* O    LTP state matching scaled input */
303
    opus_int subfr,                            /* I    Subframe number                 */
304
    const opus_int LTP_scale_Q14,              /* I    LTP state scaling               */
305
    const opus_int32 Gains_Q16[MAX_NB_SUBFR],  /* I                                    */
306
    const opus_int pitchL[MAX_NB_SUBFR],       /* I    Pitch lag                       */
307
    const opus_int signal_type,                /* I    Signal type                     */
308
    const opus_int decisionDelay               /* I    Decision delay                  */
309
);
310
311
/*******************************************/
312
/* LPC analysis filter                     */
313
/* NB! State is kept internally and the    */
314
/* filter always starts with zero state    */
315
/* first d output samples are set to zero  */
316
/*******************************************/
317
static OPUS_INLINE void silk_LPC_analysis_filter_avx2(
318
    opus_int16                  *out,               /* O    Output signal                           */
319
    const opus_int16            *in,                /* I    Input signal                            */
320
    const opus_int16            *B,                 /* I    MA prediction coefficients, Q12 [order] */
321
    const opus_int32            len,                /* I    Signal length                           */
322
    const opus_int32            order               /* I    Filter order                            */
323
);
324
325
/******************************************/
326
/* Noise shape quantizer for one subframe */
327
/******************************************/
328
static OPUS_INLINE void silk_noise_shape_quantizer_del_dec_avx2(
329
    silk_nsq_state *NSQ,                        /* I/O  NSQ state                          */
330
    NSQ_del_dec_struct psDelDec[],              /* I/O  Delayed decision states            */
331
    opus_int signalType,                        /* I    Signal type                        */
332
    const opus_int32 x_Q10[],                   /* I                                       */
333
    opus_int8 pulses[],                         /* O                                       */
334
    opus_int16 xq[],                            /* O                                       */
335
    opus_int32 sLTP_Q15[],                      /* I/O  LTP filter state                   */
336
    opus_int32 delayedGain_Q10[DECISION_DELAY], /* I/O  Gain delay buffer                  */
337
    const opus_int16 a_Q12[],                   /* I    Short term prediction coefs        */
338
    const opus_int16 b_Q14[],                   /* I    Long term prediction coefs         */
339
    const opus_int16 AR_shp_Q13[],              /* I    Noise shaping coefs                */
340
    opus_int lag,                               /* I    Pitch lag                          */
341
    opus_int32 HarmShapeFIRPacked_Q14,          /* I                                       */
342
    opus_int Tilt_Q14,                          /* I    Spectral tilt                      */
343
    opus_int32 LF_shp_Q14,                      /* I                                       */
344
    opus_int32 Gain_Q16,                        /* I                                       */
345
    opus_int Lambda_Q10,                        /* I                                       */
346
    opus_int offset_Q10,                        /* I                                       */
347
    opus_int length,                            /* I    Input length                       */
348
    opus_int subfr,                             /* I    Subframe number                    */
349
    opus_int shapingLPCOrder,                   /* I    Shaping LPC filter order           */
350
    opus_int predictLPCOrder,                   /* I    Prediction filter order            */
351
    opus_int warping_Q16,                       /* I                                       */
352
    __m128i MaskDelDec,                         /* I    Mask of states in decision tree    */
353
    opus_int *smpl_buf_idx,                     /* I/O  Index to newest samples in buffers */
354
    opus_int decisionDelay                      /* I                                       */
355
);
356
357
void silk_NSQ_del_dec_avx2(
358
    const silk_encoder_state *psEncC,                            /* I    Encoder State               */
359
    silk_nsq_state *NSQ,                                         /* I/O  NSQ state                   */
360
    SideInfoIndices *psIndices,                                  /* I/O  Quantization Indices        */
361
    const opus_int16 x16[],                                      /* I    Input                       */
362
    opus_int8 pulses[],                                          /* O    Quantized pulse signal      */
363
    const opus_int16 *PredCoef_Q12,                              /* I    Short term prediction coefs */
364
    const opus_int16 LTPCoef_Q14[LTP_ORDER * MAX_NB_SUBFR],      /* I    Long term prediction coefs  */
365
    const opus_int16 AR_Q13[MAX_NB_SUBFR * MAX_SHAPE_LPC_ORDER], /* I    Noise shaping coefs         */
366
    const opus_int HarmShapeGain_Q14[MAX_NB_SUBFR],              /* I    Long term shaping coefs     */
367
    const opus_int Tilt_Q14[MAX_NB_SUBFR],                       /* I    Spectral tilt               */
368
    const opus_int32 LF_shp_Q14[MAX_NB_SUBFR],                   /* I    Low frequency shaping coefs */
369
    const opus_int32 Gains_Q16[MAX_NB_SUBFR],                    /* I    Quantization step sizes     */
370
    const opus_int32 pitchL[MAX_NB_SUBFR],                       /* I    Pitch lags                  */
371
    const opus_int Lambda_Q10,                                   /* I    Rate/distortion tradeoff    */
372
    const opus_int LTP_scale_Q14                                 /* I    LTP state scaling           */
373
)
374
0
{
375
#ifdef OPUS_CHECK_ASM
376
    silk_nsq_state NSQ_c;
377
    SideInfoIndices psIndices_c;
378
    opus_int8 pulses_c[MAX_FRAME_LENGTH];
379
    const opus_int8 *const pulses_a = pulses;
380
381
    silk_memcpy(&NSQ_c, NSQ, sizeof(NSQ_c));
382
    silk_memcpy(&psIndices_c, psIndices, sizeof(psIndices_c));
383
    silk_memcpy(pulses_c, pulses, sizeof(pulses_c));
384
    silk_NSQ_del_dec_c(psEncC, &NSQ_c, &psIndices_c, x16, pulses_c, PredCoef_Q12, LTPCoef_Q14, AR_Q13, HarmShapeGain_Q14, Tilt_Q14, LF_shp_Q14, Gains_Q16,
385
                       pitchL, Lambda_Q10, LTP_scale_Q14);
386
#endif
387
388
0
    if (!verify_assumptions(psEncC))
389
0
    {
390
0
        silk_NSQ_del_dec_c(psEncC, NSQ, psIndices, x16, pulses, PredCoef_Q12, LTPCoef_Q14, AR_Q13, HarmShapeGain_Q14, Tilt_Q14, LF_shp_Q14, Gains_Q16, pitchL, Lambda_Q10, LTP_scale_Q14);
391
0
        return;
392
0
    }
393
394
0
    opus_int i, k, lag, start_idx, LSF_interpolation_flag, Winner_ind, subfr;
395
0
    opus_int last_smple_idx, smpl_buf_idx, decisionDelay;
396
0
    const opus_int16 *A_Q12, *B_Q14, *AR_shp_Q13;
397
0
    opus_int16 *pxq;
398
0
    VARDECL(opus_int32, sLTP_Q15);
399
0
    VARDECL(opus_int16, sLTP);
400
0
    opus_int32 HarmShapeFIRPacked_Q14;
401
0
    opus_int offset_Q10;
402
0
    opus_int32 Gain_Q10;
403
0
    opus_int32 x_sc_Q10[MAX_SUB_FRAME_LENGTH];
404
0
    opus_int32 delayedGain_Q10[DECISION_DELAY];
405
0
    NSQ_del_dec_struct psDelDec = {0};
406
0
    NSQ_del_dec_sample_struct *psSample;
407
0
    __m128i RDmin_Q10, MaskDelDec, Winner_selector;
408
0
    SAVE_STACK;
409
410
0
    MaskDelDec = _mm_cvtepi8_epi32(_mm_cvtsi32_si128(0xFFFFFF00ul << ((psEncC->nStatesDelayedDecision - 1) << 3)));
411
412
    /* Set unvoiced lag to the previous one, overwrite later for voiced */
413
0
    lag = NSQ->lagPrev;
414
415
0
    silk_assert(NSQ->prev_gain_Q16 != 0);
416
0
    psDelDec.Seed = _mm_and_si128(
417
0
        _mm_add_epi32(_mm_set_epi32(3, 2, 1, 0), _mm_set1_epi32(psIndices->Seed)),
418
0
        _mm_set1_epi32(3));
419
0
    psDelDec.SeedInit = psDelDec.Seed;
420
0
    psDelDec.RD_Q10 = _mm_setzero_si128();
421
0
    psDelDec.LF_AR_Q14 = _mm_set1_epi32(NSQ->sLF_AR_shp_Q14);
422
0
    psDelDec.Diff_Q14 = _mm_set1_epi32(NSQ->sDiff_shp_Q14);
423
0
    psDelDec.Samples[0].Shape_Q14 = _mm_set1_epi32(NSQ->sLTP_shp_Q14[psEncC->ltp_mem_length - 1]);
424
0
    for (i = 0; i < NSQ_LPC_BUF_LENGTH; i++)
425
0
    {
426
0
        psDelDec.sLPC_Q14[i] = _mm_set1_epi32(NSQ->sLPC_Q14[i]);
427
0
    }
428
0
    for (i = 0; i < MAX_SHAPE_LPC_ORDER; i++)
429
0
    {
430
0
        psDelDec.sAR2_Q14[i] = _mm_set1_epi32(NSQ->sAR2_Q14[i]);
431
0
    }
432
433
0
    offset_Q10 = silk_Quantization_Offsets_Q10[psIndices->signalType >> 1][psIndices->quantOffsetType];
434
0
    smpl_buf_idx = 0; /* index of oldest samples */
435
436
0
    decisionDelay = silk_min_int(DECISION_DELAY, psEncC->subfr_length);
437
438
    /* For voiced frames limit the decision delay to lower than the pitch lag */
439
0
    if (psIndices->signalType == TYPE_VOICED)
440
0
    {
441
0
        for (k = 0; k < psEncC->nb_subfr; k++)
442
0
        {
443
0
            decisionDelay = silk_min_int(decisionDelay, pitchL[k] - LTP_ORDER / 2 - 1);
444
0
        }
445
0
    }
446
0
    else
447
0
    {
448
0
        if (lag > 0)
449
0
        {
450
0
            decisionDelay = silk_min_int(decisionDelay, lag - LTP_ORDER / 2 - 1);
451
0
        }
452
0
    }
453
454
0
    if (psIndices->NLSFInterpCoef_Q2 == 4)
455
0
    {
456
0
        LSF_interpolation_flag = 0;
457
0
    }
458
0
    else
459
0
    {
460
0
        LSF_interpolation_flag = 1;
461
0
    }
462
463
0
    ALLOC(sLTP_Q15, psEncC->ltp_mem_length + psEncC->frame_length, opus_int32);
464
0
    ALLOC(sLTP, psEncC->ltp_mem_length + psEncC->frame_length, opus_int16);
465
    /* Set up pointers to start of sub frame */
466
0
    pxq = &NSQ->xq[psEncC->ltp_mem_length];
467
0
    NSQ->sLTP_shp_buf_idx = psEncC->ltp_mem_length;
468
0
    NSQ->sLTP_buf_idx = psEncC->ltp_mem_length;
469
0
    subfr = 0;
470
0
    for (k = 0; k < psEncC->nb_subfr; k++)
471
0
    {
472
0
        A_Q12 = &PredCoef_Q12[((k >> 1) | (1 ^ LSF_interpolation_flag)) * MAX_LPC_ORDER];
473
0
        B_Q14 = &LTPCoef_Q14[k * LTP_ORDER];
474
0
        AR_shp_Q13 = &AR_Q13[k * MAX_SHAPE_LPC_ORDER];
475
476
        /* Noise shape parameters */
477
0
        silk_assert(HarmShapeGain_Q14[k] >= 0);
478
0
        HarmShapeFIRPacked_Q14  =                          silk_RSHIFT( HarmShapeGain_Q14[ k ], 2 );
479
0
        HarmShapeFIRPacked_Q14 |= silk_LSHIFT( (opus_int32)silk_RSHIFT( HarmShapeGain_Q14[ k ], 1 ), 16 );
480
481
0
        NSQ->rewhite_flag = 0;
482
0
        if (psIndices->signalType == TYPE_VOICED)
483
0
        {
484
            /* Voiced */
485
0
            lag = pitchL[k];
486
487
            /* Re-whitening */
488
0
            if ((k & (3 ^ (LSF_interpolation_flag << 1))) == 0)
489
0
            {
490
0
                if (k == 2)
491
0
                {
492
                    /* RESET DELAYED DECISIONS */
493
                    /* Find winner */
494
0
                    RDmin_Q10 = silk_mm_mask_hmin_epi32(psDelDec.RD_Q10, MaskDelDec);
495
0
                    Winner_ind = silk_index_of_first_equal_epi32(RDmin_Q10, psDelDec.RD_Q10);
496
0
                    Winner_selector = silk_index_to_selector(Winner_ind);
497
0
                    psDelDec.RD_Q10 = _mm_add_epi32(
498
0
                        psDelDec.RD_Q10,
499
0
                        _mm_blendv_epi8(
500
0
                            _mm_set1_epi32(silk_int32_MAX >> 4),
501
0
                            _mm_setzero_si128(),
502
0
                            _mm_cvtepi8_epi32(_mm_cvtsi32_si128(0xFFU << (unsigned)(Winner_ind << 3)))));
503
504
                    /* Copy final part of signals from winner state to output and long-term filter states */
505
0
                    last_smple_idx = smpl_buf_idx + decisionDelay;
506
0
                    for (i = 0; i < decisionDelay; i++)
507
0
                    {
508
0
                        last_smple_idx = (last_smple_idx + DECISION_DELAY - 1) % DECISION_DELAY;
509
0
                        psSample = &psDelDec.Samples[last_smple_idx];
510
0
                        pulses[i - decisionDelay] =
511
0
                            (opus_int8)silk_RSHIFT_ROUND(silk_select_winner(psSample->Q_Q10, Winner_selector), 10);
512
0
                        pxq[i - decisionDelay] =
513
0
                            silk_sat16((opus_int32)silk_sar_round_smulww(silk_select_winner(psSample->Xq_Q14, Winner_selector), Gains_Q16[1], 14));
514
0
                        NSQ->sLTP_shp_Q14[NSQ->sLTP_shp_buf_idx - decisionDelay + i] =
515
0
                            silk_select_winner(psSample->Shape_Q14, Winner_selector);
516
0
                    }
517
518
0
                    subfr = 0;
519
0
                }
520
521
                /* Rewhiten with new A coefs */
522
0
                start_idx = psEncC->ltp_mem_length - lag - psEncC->predictLPCOrder - LTP_ORDER / 2;
523
0
                silk_assert(start_idx > 0);
524
525
0
                silk_LPC_analysis_filter_avx2(&sLTP[start_idx], &NSQ->xq[start_idx + k * psEncC->subfr_length],
526
0
                                              A_Q12, psEncC->ltp_mem_length - start_idx, psEncC->predictLPCOrder);
527
528
0
                NSQ->sLTP_buf_idx = psEncC->ltp_mem_length;
529
0
                NSQ->rewhite_flag = 1;
530
0
            }
531
0
        }
532
533
0
        silk_nsq_del_dec_scale_states_avx2(psEncC, NSQ, &psDelDec, x16, x_sc_Q10, sLTP, sLTP_Q15, k,
534
0
                                           LTP_scale_Q14, Gains_Q16, pitchL, psIndices->signalType, decisionDelay);
535
536
0
        silk_noise_shape_quantizer_del_dec_avx2(NSQ, &psDelDec, psIndices->signalType, x_sc_Q10, pulses, pxq, sLTP_Q15,
537
0
                                                delayedGain_Q10, A_Q12, B_Q14, AR_shp_Q13, lag, HarmShapeFIRPacked_Q14, Tilt_Q14[k], LF_shp_Q14[k],
538
0
                                                Gains_Q16[k], Lambda_Q10, offset_Q10, psEncC->subfr_length, subfr++, psEncC->shapingLPCOrder,
539
0
                                                psEncC->predictLPCOrder, psEncC->warping_Q16, MaskDelDec, &smpl_buf_idx, decisionDelay);
540
541
0
        x16 += psEncC->subfr_length;
542
0
        pulses += psEncC->subfr_length;
543
0
        pxq += psEncC->subfr_length;
544
0
    }
545
546
    /* Find winner */
547
0
    RDmin_Q10 = silk_mm_mask_hmin_epi32(psDelDec.RD_Q10, MaskDelDec);
548
0
    Winner_selector = silk_index_to_selector(silk_index_of_first_equal_epi32(RDmin_Q10, psDelDec.RD_Q10));
549
550
    /* Copy final part of signals from winner state to output and long-term filter states */
551
0
    psIndices->Seed = silk_select_winner(psDelDec.SeedInit, Winner_selector);
552
0
    last_smple_idx = smpl_buf_idx + decisionDelay;
553
0
    Gain_Q10 = Gains_Q16[psEncC->nb_subfr - 1] >> 6;
554
0
    for (i = 0; i < decisionDelay; i++)
555
0
    {
556
0
        last_smple_idx = (last_smple_idx + DECISION_DELAY - 1) % DECISION_DELAY;
557
0
        psSample = &psDelDec.Samples[last_smple_idx];
558
559
0
        pulses[i - decisionDelay] =
560
0
            (opus_int8)silk_RSHIFT_ROUND(silk_select_winner(psSample->Q_Q10, Winner_selector), 10);
561
0
        pxq[i - decisionDelay] =
562
0
            silk_sat16((opus_int32)silk_sar_round_smulww(silk_select_winner(psSample->Xq_Q14, Winner_selector), Gain_Q10, 8));
563
0
        NSQ->sLTP_shp_Q14[NSQ->sLTP_shp_buf_idx - decisionDelay + i] =
564
0
            silk_select_winner(psSample->Shape_Q14, Winner_selector);
565
0
    }
566
0
    for (i = 0; i < NSQ_LPC_BUF_LENGTH; i++)
567
0
    {
568
0
        NSQ->sLPC_Q14[i] = silk_select_winner(psDelDec.sLPC_Q14[i], Winner_selector);
569
0
    }
570
0
    for (i = 0; i < MAX_SHAPE_LPC_ORDER; i++)
571
0
    {
572
0
        NSQ->sAR2_Q14[i] = silk_select_winner(psDelDec.sAR2_Q14[i], Winner_selector);
573
0
    }
574
575
    /* Update states */
576
0
    NSQ->sLF_AR_shp_Q14 = silk_select_winner(psDelDec.LF_AR_Q14, Winner_selector);
577
0
    NSQ->sDiff_shp_Q14 = silk_select_winner(psDelDec.Diff_Q14, Winner_selector);
578
0
    NSQ->lagPrev = pitchL[psEncC->nb_subfr - 1];
579
580
    /* Save quantized speech signal */
581
0
    silk_memmove(NSQ->xq, &NSQ->xq[psEncC->frame_length], psEncC->ltp_mem_length * sizeof(opus_int16));
582
0
    silk_memmove(NSQ->sLTP_shp_Q14, &NSQ->sLTP_shp_Q14[psEncC->frame_length], psEncC->ltp_mem_length * sizeof(opus_int32));
583
584
#ifdef OPUS_CHECK_ASM
585
    silk_assert(!memcmp(&NSQ_c, NSQ, sizeof(NSQ_c)));
586
    silk_assert(!memcmp(&psIndices_c, psIndices, sizeof(psIndices_c)));
587
    silk_assert(!memcmp(pulses_c, pulses_a, sizeof(pulses_c)));
588
#endif
589
590
0
    RESTORE_STACK;
591
0
}
592
593
static OPUS_INLINE __m128i silk_noise_shape_quantizer_short_prediction_x4(const __m128i *buf32, const opus_int16 *coef16, opus_int order)
594
0
{
595
0
    __m256i out;
596
0
    silk_assert(order == 10 || order == 16);
597
598
    /* Avoids introducing a bias because silk_SMLAWB() always rounds to -inf */
599
0
    out = _mm256_set1_epi32(order >> 1);
600
0
    out = _mm256_add_epi32(out, _mm256_mul_epi32(_mm256_cvtepi32_epi64(buf32[-0]), _mm256_set1_epi32(silk_LSHIFT(coef16[0], 16)))); /* High DWORD */
601
0
    out = _mm256_add_epi32(out, _mm256_mul_epi32(_mm256_cvtepi32_epi64(buf32[-1]), _mm256_set1_epi32(silk_LSHIFT(coef16[1], 16)))); /* High DWORD */
602
0
    out = _mm256_add_epi32(out, _mm256_mul_epi32(_mm256_cvtepi32_epi64(buf32[-2]), _mm256_set1_epi32(silk_LSHIFT(coef16[2], 16)))); /* High DWORD */
603
0
    out = _mm256_add_epi32(out, _mm256_mul_epi32(_mm256_cvtepi32_epi64(buf32[-3]), _mm256_set1_epi32(silk_LSHIFT(coef16[3], 16)))); /* High DWORD */
604
0
    out = _mm256_add_epi32(out, _mm256_mul_epi32(_mm256_cvtepi32_epi64(buf32[-4]), _mm256_set1_epi32(silk_LSHIFT(coef16[4], 16)))); /* High DWORD */
605
0
    out = _mm256_add_epi32(out, _mm256_mul_epi32(_mm256_cvtepi32_epi64(buf32[-5]), _mm256_set1_epi32(silk_LSHIFT(coef16[5], 16)))); /* High DWORD */
606
0
    out = _mm256_add_epi32(out, _mm256_mul_epi32(_mm256_cvtepi32_epi64(buf32[-6]), _mm256_set1_epi32(silk_LSHIFT(coef16[6], 16)))); /* High DWORD */
607
0
    out = _mm256_add_epi32(out, _mm256_mul_epi32(_mm256_cvtepi32_epi64(buf32[-7]), _mm256_set1_epi32(silk_LSHIFT(coef16[7], 16)))); /* High DWORD */
608
0
    out = _mm256_add_epi32(out, _mm256_mul_epi32(_mm256_cvtepi32_epi64(buf32[-8]), _mm256_set1_epi32(silk_LSHIFT(coef16[8], 16)))); /* High DWORD */
609
0
    out = _mm256_add_epi32(out, _mm256_mul_epi32(_mm256_cvtepi32_epi64(buf32[-9]), _mm256_set1_epi32(silk_LSHIFT(coef16[9], 16)))); /* High DWORD */
610
611
0
    if (order == 16)
612
0
    {
613
0
        out = _mm256_add_epi32(out, _mm256_mul_epi32(_mm256_cvtepi32_epi64(buf32[-10]), _mm256_set1_epi32(silk_LSHIFT(coef16[10], 16)))); /* High DWORD */
614
0
        out = _mm256_add_epi32(out, _mm256_mul_epi32(_mm256_cvtepi32_epi64(buf32[-11]), _mm256_set1_epi32(silk_LSHIFT(coef16[11], 16)))); /* High DWORD */
615
0
        out = _mm256_add_epi32(out, _mm256_mul_epi32(_mm256_cvtepi32_epi64(buf32[-12]), _mm256_set1_epi32(silk_LSHIFT(coef16[12], 16)))); /* High DWORD */
616
0
        out = _mm256_add_epi32(out, _mm256_mul_epi32(_mm256_cvtepi32_epi64(buf32[-13]), _mm256_set1_epi32(silk_LSHIFT(coef16[13], 16)))); /* High DWORD */
617
0
        out = _mm256_add_epi32(out, _mm256_mul_epi32(_mm256_cvtepi32_epi64(buf32[-14]), _mm256_set1_epi32(silk_LSHIFT(coef16[14], 16)))); /* High DWORD */
618
0
        out = _mm256_add_epi32(out, _mm256_mul_epi32(_mm256_cvtepi32_epi64(buf32[-15]), _mm256_set1_epi32(silk_LSHIFT(coef16[15], 16)))); /* High DWORD */
619
0
    }
620
0
    return silk_cvtepi64_epi32_high(out);
621
0
}
622
623
/******************************************/
624
/* Noise shape quantizer for one subframe */
625
/******************************************/
626
static OPUS_INLINE void silk_noise_shape_quantizer_del_dec_avx2(
627
    silk_nsq_state *NSQ,                        /* I/O  NSQ state                          */
628
    NSQ_del_dec_struct *psDelDec,               /* I/O  Delayed decision states            */
629
    opus_int signalType,                        /* I    Signal type                        */
630
    const opus_int32 x_Q10[],                   /* I                                       */
631
    opus_int8 pulses[],                         /* O                                       */
632
    opus_int16 xq[],                            /* O                                       */
633
    opus_int32 sLTP_Q15[],                      /* I/O  LTP filter state                   */
634
    opus_int32 delayedGain_Q10[DECISION_DELAY], /* I/O  Gain delay buffer                  */
635
    const opus_int16 a_Q12[],                   /* I    Short term prediction coefs        */
636
    const opus_int16 b_Q14[],                   /* I    Long term prediction coefs         */
637
    const opus_int16 AR_shp_Q13[],              /* I    Noise shaping coefs                */
638
    opus_int lag,                               /* I    Pitch lag                          */
639
    opus_int32 HarmShapeFIRPacked_Q14,          /* I                                       */
640
    opus_int Tilt_Q14,                          /* I    Spectral tilt                      */
641
    opus_int32 LF_shp_Q14,                      /* I                                       */
642
    opus_int32 Gain_Q16,                        /* I                                       */
643
    opus_int Lambda_Q10,                        /* I                                       */
644
    opus_int offset_Q10,                        /* I                                       */
645
    opus_int length,                            /* I    Input length                       */
646
    opus_int subfr,                             /* I    Subframe number                    */
647
    opus_int shapingLPCOrder,                   /* I    Shaping LPC filter order           */
648
    opus_int predictLPCOrder,                   /* I    Prediction filter order            */
649
    opus_int warping_Q16,                       /* I                                       */
650
    __m128i MaskDelDec,                         /* I    Mask of states in decision tree    */
651
    opus_int *smpl_buf_idx,                     /* I/O  Index to newest samples in buffers */
652
    opus_int decisionDelay                      /* I                                       */
653
)
654
0
{
655
0
    int i;
656
0
    opus_int32 *shp_lag_ptr = &NSQ->sLTP_shp_Q14[NSQ->sLTP_shp_buf_idx - lag + HARM_SHAPE_FIR_TAPS / 2];
657
0
    opus_int32 *pred_lag_ptr = &sLTP_Q15[NSQ->sLTP_buf_idx - lag + LTP_ORDER / 2];
658
0
    opus_int32 Gain_Q10 = Gain_Q16 >> 6;
659
660
0
    for (i = 0; i < length; i++)
661
0
    {
662
        /* Perform common calculations used in all states */
663
        /* NSQ_sample_struct */
664
        /* Low  128 bits => 1st set */
665
        /* High 128 bits => 2nd set */
666
0
        int j;
667
0
        __m256i SS_Q_Q10;
668
0
        __m256i SS_RD_Q10;
669
0
        __m256i SS_xq_Q14;
670
0
        __m256i SS_LF_AR_Q14;
671
0
        __m256i SS_Diff_Q14;
672
0
        __m256i SS_sLTP_shp_Q14;
673
0
        __m256i SS_LPC_exc_Q14;
674
0
        __m256i exc_Q14;
675
0
        __m256i q_Q10, rr_Q10, rd_Q10;
676
0
        __m256i mask;
677
0
        __m128i LPC_pred_Q14, n_AR_Q14;
678
0
        __m128i RDmin_Q10, RDmax_Q10;
679
0
        __m128i n_LF_Q14;
680
0
        __m128i r_Q10, q1_Q0, q1_Q10, q2_Q10;
681
0
        __m128i Winner_rand_state, Winner_selector;
682
0
        __m128i tmp0, tmp1;
683
0
        NSQ_del_dec_sample_struct *psLastSample, *psSample;
684
0
        opus_int32 RDmin_ind, RDmax_ind, last_smple_idx;
685
0
        opus_int32 LTP_pred_Q14, n_LTP_Q14;
686
687
        /* Long-term prediction */
688
0
        if (signalType == TYPE_VOICED)
689
0
        {
690
            /* Unrolled loop */
691
            /* Avoids introducing a bias because silk_SMLAWB() always rounds to -inf */
692
0
            LTP_pred_Q14 = 2;
693
0
            LTP_pred_Q14 += silk_SMULWB(pred_lag_ptr[-0], b_Q14[0]);
694
0
            LTP_pred_Q14 += silk_SMULWB(pred_lag_ptr[-1], b_Q14[1]);
695
0
            LTP_pred_Q14 += silk_SMULWB(pred_lag_ptr[-2], b_Q14[2]);
696
0
            LTP_pred_Q14 += silk_SMULWB(pred_lag_ptr[-3], b_Q14[3]);
697
0
            LTP_pred_Q14 += silk_SMULWB(pred_lag_ptr[-4], b_Q14[4]);
698
0
            LTP_pred_Q14 = silk_LSHIFT(LTP_pred_Q14, 1); /* Q13 -> Q14 */
699
0
            pred_lag_ptr++;
700
0
        }
701
0
        else
702
0
        {
703
0
            LTP_pred_Q14 = 0;
704
0
        }
705
706
        /* Long-term shaping */
707
0
        if (lag > 0)
708
0
        {
709
            /* Symmetric, packed FIR coefficients */
710
0
            n_LTP_Q14 = silk_add_sat32(shp_lag_ptr[0], shp_lag_ptr[-2]);
711
0
            n_LTP_Q14 = silk_SMULWB(n_LTP_Q14, HarmShapeFIRPacked_Q14);
712
0
            n_LTP_Q14 = n_LTP_Q14 + silk_SMULWT(shp_lag_ptr[-1], HarmShapeFIRPacked_Q14);
713
0
            n_LTP_Q14 = LTP_pred_Q14 - (silk_LSHIFT(n_LTP_Q14, 2)); /* Q12 -> Q14 */
714
0
            shp_lag_ptr++;
715
0
        }
716
0
        else
717
0
        {
718
0
            n_LTP_Q14 = 0;
719
0
        }
720
721
        /* BEGIN Updating Delayed Decision States */
722
723
        /* Generate dither */
724
0
        psDelDec->Seed = silk_mm256_rand_epi32(psDelDec->Seed);
725
726
        /* Short-term prediction */
727
0
        LPC_pred_Q14 = silk_noise_shape_quantizer_short_prediction_x4(&psDelDec->sLPC_Q14[NSQ_LPC_BUF_LENGTH - 1 + i], a_Q12, predictLPCOrder);
728
0
        LPC_pred_Q14 = _mm_slli_epi32(LPC_pred_Q14, 4); /* Q10 -> Q14 */
729
730
        /* Noise shape feedback */
731
0
        silk_assert(shapingLPCOrder > 0);
732
0
        silk_assert((shapingLPCOrder & 1) == 0); /* check that order is even */
733
        /* Output of lowpass section */
734
0
        tmp0 = _mm_add_epi32(psDelDec->Diff_Q14, silk_mm_smulwb_epi32(psDelDec->sAR2_Q14[0], warping_Q16));
735
0
        n_AR_Q14 = _mm_set1_epi32(shapingLPCOrder >> 1);
736
0
        for (j = 0; j < shapingLPCOrder - 1; j++)
737
0
        {
738
            /* Output of allpass section */
739
0
            tmp1 = psDelDec->sAR2_Q14[j];
740
0
            psDelDec->sAR2_Q14[j] = tmp0;
741
0
            n_AR_Q14 = _mm_add_epi32(n_AR_Q14, silk_mm_smulwb_epi32(tmp0, AR_shp_Q13[j]));
742
0
            tmp0 = _mm_add_epi32(tmp1, silk_mm_smulwb_epi32(_mm_sub_epi32(psDelDec->sAR2_Q14[j + 1], tmp0), warping_Q16));
743
0
        }
744
0
        psDelDec->sAR2_Q14[shapingLPCOrder - 1] = tmp0;
745
0
        n_AR_Q14 = _mm_add_epi32(n_AR_Q14, silk_mm_smulwb_epi32(tmp0, AR_shp_Q13[shapingLPCOrder - 1]));
746
747
0
        n_AR_Q14 = _mm_slli_epi32(n_AR_Q14, 1);                                                  /* Q11 -> Q12 */
748
0
        n_AR_Q14 = _mm_add_epi32(n_AR_Q14, silk_mm_smulwb_epi32(psDelDec->LF_AR_Q14, Tilt_Q14)); /* Q12 */
749
0
        n_AR_Q14 = _mm_slli_epi32(n_AR_Q14, 2);                                                  /* Q12 -> Q14 */
750
751
0
        tmp0 = silk_mm_smulwb_epi32(psDelDec->Samples[*smpl_buf_idx].Shape_Q14, LF_shp_Q14); /* Q12 */
752
0
        tmp1 = silk_mm_smulwb_epi32(psDelDec->LF_AR_Q14, LF_shp_Q14 >> 16);                  /* Q12 */
753
0
        n_LF_Q14 = _mm_add_epi32(tmp0, tmp1);                                                /* Q12 */
754
0
        n_LF_Q14 = _mm_slli_epi32(n_LF_Q14, 2);                                              /* Q12 -> Q14 */
755
756
        /* Input minus prediction plus noise feedback                       */
757
        /* r = x[ i ] - LTP_pred - LPC_pred + n_AR + n_Tilt + n_LF + n_LTP  */
758
0
        tmp0 = silk_mm_add_sat_epi32(n_AR_Q14, n_LF_Q14);              /* Q14 */
759
0
        tmp1 = _mm_add_epi32(_mm_set1_epi32(n_LTP_Q14), LPC_pred_Q14); /* Q13 */
760
0
        tmp0 = silk_mm_sub_sat_epi32(tmp1, tmp0);                      /* Q13 */
761
0
        tmp0 = silk_mm_srai_round_epi32(tmp0, 4);                      /* Q10 */
762
763
0
        r_Q10 = _mm_sub_epi32(_mm_set1_epi32(x_Q10[i]), tmp0); /* residual error Q10 */
764
765
        /* Flip sign depending on dither */
766
0
        r_Q10 = silk_mm_sign_epi32(r_Q10, psDelDec->Seed);
767
0
        r_Q10 = silk_mm_limit_epi32(r_Q10, -(31 << 10), 30 << 10);
768
769
        /* Find two quantization level candidates and measure their rate-distortion */
770
0
        q1_Q10 = _mm_sub_epi32(r_Q10, _mm_set1_epi32(offset_Q10));
771
0
        q1_Q0 = _mm_srai_epi32(q1_Q10, 10);
772
0
        if (Lambda_Q10 > 2048)
773
0
        {
774
            /* For aggressive RDO, the bias becomes more than one pulse. */
775
0
            tmp0 = _mm_sub_epi32(_mm_abs_epi32(q1_Q10), _mm_set1_epi32(Lambda_Q10 / 2 - 512)); /* rdo_offset */
776
0
            q1_Q0 = _mm_srai_epi32(q1_Q10, 31);
777
0
            tmp1 = _mm_cmpgt_epi32(tmp0, _mm_setzero_si128());
778
0
            tmp0 = _mm_srai_epi32(silk_mm_sign_epi32(tmp0, q1_Q10), 10);
779
0
            q1_Q0 = _mm_blendv_epi8(q1_Q0, tmp0, tmp1);
780
0
        }
781
782
0
        tmp0 = _mm_sign_epi32(_mm_set1_epi32(QUANT_LEVEL_ADJUST_Q10), q1_Q0);
783
0
        q1_Q10 = _mm_sub_epi32(_mm_slli_epi32(q1_Q0, 10), tmp0);
784
0
        q1_Q10 = _mm_add_epi32(q1_Q10, _mm_set1_epi32(offset_Q10));
785
786
        /* check if q1_Q0 is 0 or -1 */
787
0
        tmp0 = _mm_add_epi32(_mm_srli_epi32(q1_Q0, 31), q1_Q0);
788
0
        tmp1 = _mm_cmpeq_epi32(tmp0, _mm_setzero_si128());
789
0
        tmp0 = _mm_blendv_epi8(_mm_set1_epi32(1024), _mm_set1_epi32(1024 - QUANT_LEVEL_ADJUST_Q10), tmp1);
790
0
        q2_Q10 = _mm_add_epi32(q1_Q10, tmp0);
791
0
        q_Q10 = _mm256_set_m128i(q2_Q10, q1_Q10);
792
793
0
        rr_Q10 = _mm256_sub_epi32(_mm256_broadcastsi128_si256(r_Q10), q_Q10);
794
0
        rd_Q10 = _mm256_abs_epi32(q_Q10);
795
0
        rr_Q10 = silk_mm256_smulbb_epi32(rr_Q10, rr_Q10);
796
0
        rd_Q10 = silk_mm256_smulbb_epi32(rd_Q10, _mm256_set1_epi32(Lambda_Q10));
797
0
        rd_Q10 = _mm256_add_epi32(rd_Q10, rr_Q10);
798
0
        rd_Q10 = _mm256_srai_epi32(rd_Q10, 10);
799
800
0
        mask = _mm256_broadcastsi128_si256(_mm_cmplt_epi32(_mm256_extracti128_si256(rd_Q10, 0), _mm256_extracti128_si256(rd_Q10, 1)));
801
0
        SS_RD_Q10 = _mm256_add_epi32(
802
0
            _mm256_broadcastsi128_si256(psDelDec->RD_Q10),
803
0
            _mm256_blendv_epi8(
804
0
                _mm256_permute2x128_si256(rd_Q10, rd_Q10, 0x1),
805
0
                rd_Q10,
806
0
                mask));
807
0
        SS_Q_Q10 = _mm256_blendv_epi8(
808
0
            _mm256_permute2x128_si256(q_Q10, q_Q10, 0x1),
809
0
            q_Q10,
810
0
            mask);
811
812
        /* Update states for best and second best quantization */
813
814
        /* Quantized excitation */
815
0
        exc_Q14 = silk_mm256_sign_epi32(_mm256_slli_epi32(SS_Q_Q10, 4), _mm256_broadcastsi128_si256(psDelDec->Seed));
816
817
        /* Add predictions */
818
0
        exc_Q14 = _mm256_add_epi32(exc_Q14, _mm256_set1_epi32(LTP_pred_Q14));
819
0
        SS_LPC_exc_Q14 = _mm256_slli_epi32(exc_Q14, 1);
820
0
        SS_xq_Q14 = _mm256_add_epi32(exc_Q14, _mm256_broadcastsi128_si256(LPC_pred_Q14));
821
822
        /* Update states */
823
0
        SS_Diff_Q14 = _mm256_sub_epi32(SS_xq_Q14, _mm256_set1_epi32(silk_LSHIFT(x_Q10[i], 4)));
824
0
        SS_LF_AR_Q14 = _mm256_sub_epi32(SS_Diff_Q14, _mm256_broadcastsi128_si256(n_AR_Q14));
825
0
        SS_sLTP_shp_Q14 = silk_mm256_sub_sat_epi32(SS_LF_AR_Q14, _mm256_broadcastsi128_si256(n_LF_Q14));
826
827
        /* END Updating Delayed Decision States */
828
829
0
        *smpl_buf_idx = (*smpl_buf_idx + DECISION_DELAY - 1) % DECISION_DELAY;
830
0
        last_smple_idx = (*smpl_buf_idx + decisionDelay) % DECISION_DELAY;
831
0
        psLastSample = &psDelDec->Samples[last_smple_idx];
832
833
        /* Find winner */
834
0
        RDmin_Q10 = silk_mm_mask_hmin_epi32(_mm256_castsi256_si128(SS_RD_Q10), MaskDelDec);
835
0
        Winner_selector = silk_index_to_selector(silk_index_of_first_equal_epi32(RDmin_Q10, _mm256_castsi256_si128(SS_RD_Q10)));
836
837
        /* Increase RD values of expired states */
838
0
        Winner_rand_state = _mm_shuffle_epi8(psLastSample->RandState, Winner_selector);
839
840
0
        SS_RD_Q10 = _mm256_blendv_epi8(
841
0
            _mm256_add_epi32(SS_RD_Q10, _mm256_set1_epi32(silk_int32_MAX >> 4)),
842
0
            SS_RD_Q10,
843
0
            _mm256_broadcastsi128_si256(_mm_cmpeq_epi32(psLastSample->RandState, Winner_rand_state)));
844
845
        /* find worst in first set */
846
0
        RDmax_Q10 = silk_mm_mask_hmax_epi32(_mm256_extracti128_si256(SS_RD_Q10, 0), MaskDelDec);
847
        /* find best in second set */
848
0
        RDmin_Q10 = silk_mm_mask_hmin_epi32(_mm256_extracti128_si256(SS_RD_Q10, 1), MaskDelDec);
849
850
        /* Replace a state if best from second set outperforms worst in first set */
851
0
        tmp0 = _mm_cmplt_epi32(RDmin_Q10, RDmax_Q10);
852
0
        if (!_mm_test_all_zeros(tmp0, tmp0))
853
0
        {
854
0
            int t;
855
0
            RDmax_ind = silk_index_of_first_equal_epi32(RDmax_Q10, _mm256_extracti128_si256(SS_RD_Q10, 0));
856
0
            RDmin_ind = silk_index_of_first_equal_epi32(RDmin_Q10, _mm256_extracti128_si256(SS_RD_Q10, 1));
857
0
            tmp1 = _mm_cvtepi8_epi32(_mm_cvtsi32_si128(0xFFU << (unsigned)(RDmax_ind << 3)));
858
0
            tmp0 = _mm_blendv_epi8(
859
0
                _mm_set_epi8(0xF, 0xE, 0xD, 0xC, 0xB, 0xA, 0x9, 0x8, 0x7, 0x6, 0x5, 0x4, 0x3, 0x2, 0x1, 0x0),
860
0
                silk_index_to_selector(RDmin_ind),
861
0
                tmp1);
862
0
            for (t = i; t < MAX_SUB_FRAME_LENGTH + NSQ_LPC_BUF_LENGTH; t++)
863
0
            {
864
0
                psDelDec->sLPC_Q14[t] = _mm_shuffle_epi8(psDelDec->sLPC_Q14[t], tmp0);
865
0
            }
866
0
            psDelDec->Seed = _mm_shuffle_epi8(psDelDec->Seed, tmp0);
867
0
            psDelDec->SeedInit = _mm_shuffle_epi8(psDelDec->SeedInit, tmp0);
868
0
            for (t = 0; t < MAX_SHAPE_LPC_ORDER; t++)
869
0
            {
870
0
                psDelDec->sAR2_Q14[t] = _mm_shuffle_epi8(psDelDec->sAR2_Q14[t], tmp0);
871
0
            }
872
0
            for (t = 0; t < DECISION_DELAY; t++)
873
0
            {
874
0
                psDelDec->Samples[t].RandState = _mm_shuffle_epi8(psDelDec->Samples[t].RandState, tmp0);
875
0
                psDelDec->Samples[t].Q_Q10 = _mm_shuffle_epi8(psDelDec->Samples[t].Q_Q10, tmp0);
876
0
                psDelDec->Samples[t].Xq_Q14 = _mm_shuffle_epi8(psDelDec->Samples[t].Xq_Q14, tmp0);
877
0
                psDelDec->Samples[t].Pred_Q15 = _mm_shuffle_epi8(psDelDec->Samples[t].Pred_Q15, tmp0);
878
0
                psDelDec->Samples[t].Shape_Q14 = _mm_shuffle_epi8(psDelDec->Samples[t].Shape_Q14, tmp0);
879
0
            }
880
0
            mask = _mm256_castsi128_si256(_mm_blendv_epi8(_mm_set_epi32(0x3, 0x2, 0x1, 0x0), _mm_set1_epi32(RDmin_ind + 4), tmp1));
881
0
            SS_Q_Q10 = _mm256_permutevar8x32_epi32(SS_Q_Q10, mask);
882
0
            SS_RD_Q10 = _mm256_permutevar8x32_epi32(SS_RD_Q10, mask);
883
0
            SS_xq_Q14 = _mm256_permutevar8x32_epi32(SS_xq_Q14, mask);
884
0
            SS_LF_AR_Q14 = _mm256_permutevar8x32_epi32(SS_LF_AR_Q14, mask);
885
0
            SS_Diff_Q14 = _mm256_permutevar8x32_epi32(SS_Diff_Q14, mask);
886
0
            SS_sLTP_shp_Q14 = _mm256_permutevar8x32_epi32(SS_sLTP_shp_Q14, mask);
887
0
            SS_LPC_exc_Q14 = _mm256_permutevar8x32_epi32(SS_LPC_exc_Q14, mask);
888
0
        }
889
890
        /* Write samples from winner to output and long-term filter states */
891
0
        if (subfr > 0 || i >= decisionDelay)
892
0
        {
893
0
            pulses[i - decisionDelay] =
894
0
                (opus_int8)silk_RSHIFT_ROUND(silk_select_winner(psLastSample->Q_Q10, Winner_selector), 10);
895
0
            xq[i - decisionDelay] =
896
0
                silk_sat16((opus_int32)silk_sar_round_smulww(silk_select_winner(psLastSample->Xq_Q14, Winner_selector), delayedGain_Q10[last_smple_idx], 8));
897
0
            NSQ->sLTP_shp_Q14[NSQ->sLTP_shp_buf_idx - decisionDelay] =
898
0
                silk_select_winner(psLastSample->Shape_Q14, Winner_selector);
899
0
            sLTP_Q15[NSQ->sLTP_buf_idx - decisionDelay] =
900
0
                silk_select_winner(psLastSample->Pred_Q15, Winner_selector);
901
0
        }
902
0
        NSQ->sLTP_shp_buf_idx++;
903
0
        NSQ->sLTP_buf_idx++;
904
905
        /* Update states */
906
0
        psSample = &psDelDec->Samples[*smpl_buf_idx];
907
0
        psDelDec->Seed = _mm_add_epi32(psDelDec->Seed, silk_mm_srai_round_epi32(_mm256_castsi256_si128(SS_Q_Q10), 10));
908
0
        psDelDec->LF_AR_Q14 = _mm256_castsi256_si128(SS_LF_AR_Q14);
909
0
        psDelDec->Diff_Q14 = _mm256_castsi256_si128(SS_Diff_Q14);
910
0
        psDelDec->sLPC_Q14[i + NSQ_LPC_BUF_LENGTH] = _mm256_castsi256_si128(SS_xq_Q14);
911
0
        psDelDec->RD_Q10 = _mm256_castsi256_si128(SS_RD_Q10);
912
0
        psSample->Xq_Q14 = _mm256_castsi256_si128(SS_xq_Q14);
913
0
        psSample->Q_Q10 = _mm256_castsi256_si128(SS_Q_Q10);
914
0
        psSample->Pred_Q15 = _mm256_castsi256_si128(SS_LPC_exc_Q14);
915
0
        psSample->Shape_Q14 = _mm256_castsi256_si128(SS_sLTP_shp_Q14);
916
0
        psSample->RandState = psDelDec->Seed;
917
0
        delayedGain_Q10[*smpl_buf_idx] = Gain_Q10;
918
0
    }
919
    /* Update LPC states */
920
0
    for (i = 0; i < NSQ_LPC_BUF_LENGTH; i++)
921
0
    {
922
0
        psDelDec->sLPC_Q14[i] = (&psDelDec->sLPC_Q14[length])[i];
923
0
    }
924
0
}
925
926
static OPUS_INLINE void silk_nsq_del_dec_scale_states_avx2(
927
    const silk_encoder_state *psEncC,          /* I    Encoder State                   */
928
    silk_nsq_state *NSQ,                       /* I/O  NSQ state                       */
929
    NSQ_del_dec_struct *psDelDec,              /* I/O  Delayed decision states         */
930
    const opus_int16 x16[],                    /* I    Input                           */
931
    opus_int32 x_sc_Q10[MAX_SUB_FRAME_LENGTH], /* O    Input scaled with 1/Gain in Q10 */
932
    const opus_int16 sLTP[],                   /* I    Re-whitened LTP state in Q0     */
933
    opus_int32 sLTP_Q15[],                     /* O    LTP state matching scaled input */
934
    opus_int subfr,                            /* I    Subframe number                 */
935
    const opus_int LTP_scale_Q14,              /* I    LTP state scaling               */
936
    const opus_int32 Gains_Q16[MAX_NB_SUBFR],  /* I                                    */
937
    const opus_int pitchL[MAX_NB_SUBFR],       /* I    Pitch lag                       */
938
    const opus_int signal_type,                /* I    Signal type                     */
939
    const opus_int decisionDelay               /* I    Decision delay                  */
940
)
941
0
{
942
0
    int i;
943
0
    opus_int lag;
944
0
    opus_int32 gain_adj_Q16, inv_gain_Q31, inv_gain_Q26;
945
0
    NSQ_del_dec_sample_struct *psSample;
946
947
0
    lag = pitchL[subfr];
948
0
    inv_gain_Q31 = silk_INVERSE32_varQ(silk_max(Gains_Q16[subfr], 1), 47);
949
0
    silk_assert(inv_gain_Q31 != 0);
950
951
    /* Scale input */
952
0
    inv_gain_Q26 = silk_RSHIFT_ROUND(inv_gain_Q31, 5);
953
0
    for (i = 0; i < psEncC->subfr_length; i+=4)
954
0
    {
955
0
        __m256i x = _mm256_cvtepi16_epi64(_mm_loadu_si64(&x16[i]));
956
0
        x = _mm256_slli_epi64(_mm256_mul_epi32(x, _mm256_set1_epi32(inv_gain_Q26)), 16);
957
0
        _mm_storeu_si128((__m128i*)(void*)&x_sc_Q10[i], silk_cvtepi64_epi32_high(x));
958
0
    }
959
960
    /* After rewhitening the LTP state is un-scaled, so scale with inv_gain_Q16 */
961
0
    if (NSQ->rewhite_flag)
962
0
    {
963
0
        if (subfr == 0)
964
0
        {
965
            /* Do LTP downscaling */
966
0
            inv_gain_Q31 = silk_LSHIFT(silk_SMULWB(inv_gain_Q31, LTP_scale_Q14), 2);
967
0
        }
968
0
        for (i = NSQ->sLTP_buf_idx - lag - LTP_ORDER / 2; i < NSQ->sLTP_buf_idx; i++)
969
0
        {
970
0
            silk_assert(i < MAX_FRAME_LENGTH);
971
0
            sLTP_Q15[i] = silk_SMULWB(inv_gain_Q31, sLTP[i]);
972
0
        }
973
0
    }
974
975
    /* Adjust for changing gain */
976
0
    if (Gains_Q16[subfr] != NSQ->prev_gain_Q16)
977
0
    {
978
0
        gain_adj_Q16 = silk_DIV32_varQ(NSQ->prev_gain_Q16, Gains_Q16[subfr], 16);
979
980
        /* Scale long-term shaping state */
981
0
        for (i = NSQ->sLTP_shp_buf_idx - psEncC->ltp_mem_length; i < NSQ->sLTP_shp_buf_idx; i+=4)
982
0
        {
983
0
      opus_int32 *p = &NSQ->sLTP_shp_Q14[i];
984
0
            _mm_storeu_si128((__m128i*)(void*)p, silk_mm_smulww_epi32(_mm_loadu_si128((__m128i*)(void*)p), gain_adj_Q16));
985
0
        }
986
987
        /* Scale long-term prediction state */
988
0
        if (signal_type == TYPE_VOICED && NSQ->rewhite_flag == 0)
989
0
        {
990
0
            for (i = NSQ->sLTP_buf_idx - lag - LTP_ORDER / 2; i < NSQ->sLTP_buf_idx - decisionDelay; i++)
991
0
            {
992
0
                sLTP_Q15[i] = ((opus_int64)sLTP_Q15[i]) * ((opus_int64)gain_adj_Q16) >> 16;
993
0
            }
994
0
        }
995
996
        /* Scale scalar states */
997
0
        psDelDec->LF_AR_Q14 = silk_mm_smulww_epi32(psDelDec->LF_AR_Q14, gain_adj_Q16);
998
0
        psDelDec->Diff_Q14 = silk_mm_smulww_epi32(psDelDec->Diff_Q14, gain_adj_Q16);
999
1000
        /* Scale short-term prediction and shaping states */
1001
0
        for (i = 0; i < NSQ_LPC_BUF_LENGTH; i++)
1002
0
        {
1003
0
            psDelDec->sLPC_Q14[i] = silk_mm_smulww_epi32(psDelDec->sLPC_Q14[i], gain_adj_Q16);
1004
0
        }
1005
0
        for (i = 0; i < DECISION_DELAY; i++)
1006
0
        {
1007
0
            psSample = &psDelDec->Samples[i];
1008
0
            psSample->Pred_Q15 = silk_mm_smulww_epi32(psSample->Pred_Q15, gain_adj_Q16);
1009
0
            psSample->Shape_Q14 = silk_mm_smulww_epi32(psSample->Shape_Q14, gain_adj_Q16);
1010
0
        }
1011
0
        for (i = 0; i < MAX_SHAPE_LPC_ORDER; i++)
1012
0
        {
1013
0
            psDelDec->sAR2_Q14[i] = silk_mm_smulww_epi32(psDelDec->sAR2_Q14[i], gain_adj_Q16);
1014
0
        }
1015
1016
        /* Save inverse gain */
1017
0
        NSQ->prev_gain_Q16 = Gains_Q16[subfr];
1018
0
    }
1019
0
}
1020
1021
static OPUS_INLINE void silk_LPC_analysis_filter_avx2(
1022
    opus_int16                  *out,               /* O    Output signal                           */
1023
    const opus_int16            *in,                /* I    Input signal                            */
1024
    const opus_int16            *B,                 /* I    MA prediction coefficients, Q12 [order] */
1025
    const opus_int32            len,                /* I    Signal length                           */
1026
    const opus_int32            order               /* I    Filter order                            */
1027
)
1028
0
{
1029
0
    int i;
1030
0
    opus_int32       out32_Q12, out32;
1031
0
    silk_assert(order == 10 || order == 16);
1032
1033
0
    for(i = order; i < len; i++ )
1034
0
    {
1035
0
        const opus_int16 *in_ptr = &in[ i ];
1036
        /* Allowing wrap around so that two wraps can cancel each other. The rare
1037
           cases where the result wraps around can only be triggered by invalid streams*/
1038
1039
0
        __m256i in_v = _mm256_cvtepi16_epi32(_mm_loadu_si128((__m128i*)(void*)&in_ptr[-8]));
1040
0
        __m256i B_v  = _mm256_cvtepi16_epi32(_mm_loadu_si128((__m128i*)(void*)&      B[0]));
1041
0
        __m256i sum = _mm256_mullo_epi32(in_v, silk_mm256_reverse_epi32(B_v));
1042
0
        if (order > 10)
1043
0
        {
1044
0
            in_v = _mm256_cvtepi16_epi32(_mm_loadu_si128((__m128i*)(void*)&in_ptr[-16]));
1045
0
            B_v  = _mm256_cvtepi16_epi32(_mm_loadu_si128((__m128i*)(void*)&B       [8]));
1046
0
            B_v  = silk_mm256_reverse_epi32(B_v);
1047
0
        }
1048
0
        else
1049
0
        {
1050
0
            in_v = _mm256_cvtepi16_epi32(_mm_loadu_si32(&in_ptr[-10]));
1051
0
            B_v  = _mm256_cvtepi16_epi32(_mm_loadu_si32(&B       [8]));
1052
0
            B_v  = _mm256_shuffle_epi32(B_v, 0x01);
1053
0
        }
1054
0
        sum = _mm256_add_epi32(sum, _mm256_mullo_epi32(in_v, B_v));
1055
1056
0
        out32_Q12 = silk_mm256_hsum_epi32(sum);
1057
1058
        /* Subtract prediction */
1059
0
        out32_Q12 = silk_SUB32_ovflw( silk_LSHIFT( (opus_int32)*in_ptr, 12 ), out32_Q12 );
1060
1061
        /* Scale to Q0 */
1062
0
        out32 = silk_RSHIFT_ROUND(out32_Q12, 12);
1063
1064
        /* Saturate output */
1065
0
        out[ i ] = silk_sat16(out32);
1066
0
    }
1067
1068
    /* Set first d output samples to zero */
1069
0
    silk_memset( out, 0, order * sizeof( opus_int16 ) );
1070
0
}