amrnbdec: allow sample rates other than 8khz
[ffmpeg.git] / libavcodec / amrnbdec.c
1 /*
2  * AMR narrowband decoder
3  * Copyright (c) 2006-2007 Robert Swain
4  * Copyright (c) 2009 Colin McQuillan
5  *
6  * This file is part of FFmpeg.
7  *
8  * FFmpeg is free software; you can redistribute it and/or
9  * modify it under the terms of the GNU Lesser General Public
10  * License as published by the Free Software Foundation; either
11  * version 2.1 of the License, or (at your option) any later version.
12  *
13  * FFmpeg is distributed in the hope that it will be useful,
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
16  * Lesser General Public License for more details.
17  *
18  * You should have received a copy of the GNU Lesser General Public
19  * License along with FFmpeg; if not, write to the Free Software
20  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
21  */
22
23
24 /**
25  * @file
26  * AMR narrowband decoder
27  *
28  * This decoder uses floats for simplicity and so is not bit-exact. One
29  * difference is that differences in phase can accumulate. The test sequences
30  * in 3GPP TS 26.074 can still be useful.
31  *
32  * - Comparing this file's output to the output of the ref decoder gives a
33  *   PSNR of 30 to 80. Plotting the output samples shows a difference in
34  *   phase in some areas.
35  *
36  * - Comparing both decoders against their input, this decoder gives a similar
37  *   PSNR. If the test sequence homing frames are removed (this decoder does
38  *   not detect them), the PSNR is at least as good as the reference on 140
39  *   out of 169 tests.
40  */
41
42
43 #include <string.h>
44 #include <math.h>
45
46 #include "libavutil/audioconvert.h"
47 #include "avcodec.h"
48 #include "dsputil.h"
49 #include "libavutil/common.h"
50 #include "libavutil/avassert.h"
51 #include "celp_math.h"
52 #include "celp_filters.h"
53 #include "acelp_filters.h"
54 #include "acelp_vectors.h"
55 #include "acelp_pitch_delay.h"
56 #include "lsp.h"
57 #include "amr.h"
58
59 #include "amrnbdata.h"
60
61 #define AMR_BLOCK_SIZE              160   ///< samples per frame
62 #define AMR_SAMPLE_BOUND        32768.0   ///< threshold for synthesis overflow
63
64 /**
65  * Scale from constructed speech to [-1,1]
66  *
67  * AMR is designed to produce 16-bit PCM samples (3GPP TS 26.090 4.2) but
68  * upscales by two (section 6.2.2).
69  *
70  * Fundamentally, this scale is determined by energy_mean through
71  * the fixed vector contribution to the excitation vector.
72  */
73 #define AMR_SAMPLE_SCALE  (2.0 / 32768.0)
74
75 /** Prediction factor for 12.2kbit/s mode */
76 #define PRED_FAC_MODE_12k2             0.65
77
78 #define LSF_R_FAC          (8000.0 / 32768.0) ///< LSF residual tables to Hertz
79 #define MIN_LSF_SPACING    (50.0488 / 8000.0) ///< Ensures stability of LPC filter
80 #define PITCH_LAG_MIN_MODE_12k2          18   ///< Lower bound on decoded lag search in 12.2kbit/s mode
81
82 /** Initial energy in dB. Also used for bad frames (unimplemented). */
83 #define MIN_ENERGY -14.0
84
85 /** Maximum sharpening factor
86  *
87  * The specification says 0.8, which should be 13107, but the reference C code
88  * uses 13017 instead. (Amusingly the same applies to SHARP_MAX in g729dec.c.)
89  */
90 #define SHARP_MAX 0.79449462890625
91
92 /** Number of impulse response coefficients used for tilt factor */
93 #define AMR_TILT_RESPONSE   22
94 /** Tilt factor = 1st reflection coefficient * gamma_t */
95 #define AMR_TILT_GAMMA_T   0.8
96 /** Adaptive gain control factor used in post-filter */
97 #define AMR_AGC_ALPHA      0.9
98
99 typedef struct AMRContext {
100     AVFrame                         avframe; ///< AVFrame for decoded samples
101     AMRNBFrame                        frame; ///< decoded AMR parameters (lsf coefficients, codebook indexes, etc)
102     uint8_t             bad_frame_indicator; ///< bad frame ? 1 : 0
103     enum Mode                cur_frame_mode;
104
105     int16_t     prev_lsf_r[LP_FILTER_ORDER]; ///< residual LSF vector from previous subframe
106     double          lsp[4][LP_FILTER_ORDER]; ///< lsp vectors from current frame
107     double   prev_lsp_sub4[LP_FILTER_ORDER]; ///< lsp vector for the 4th subframe of the previous frame
108
109     float         lsf_q[4][LP_FILTER_ORDER]; ///< Interpolated LSF vector for fixed gain smoothing
110     float          lsf_avg[LP_FILTER_ORDER]; ///< vector of averaged lsf vector
111
112     float           lpc[4][LP_FILTER_ORDER]; ///< lpc coefficient vectors for 4 subframes
113
114     uint8_t                   pitch_lag_int; ///< integer part of pitch lag from current subframe
115
116     float excitation_buf[PITCH_DELAY_MAX + LP_FILTER_ORDER + 1 + AMR_SUBFRAME_SIZE]; ///< current excitation and all necessary excitation history
117     float                       *excitation; ///< pointer to the current excitation vector in excitation_buf
118
119     float   pitch_vector[AMR_SUBFRAME_SIZE]; ///< adaptive code book (pitch) vector
120     float   fixed_vector[AMR_SUBFRAME_SIZE]; ///< algebraic codebook (fixed) vector (must be kept zero between frames)
121
122     float               prediction_error[4]; ///< quantified prediction errors {20log10(^gamma_gc)} for previous four subframes
123     float                     pitch_gain[5]; ///< quantified pitch gains for the current and previous four subframes
124     float                     fixed_gain[5]; ///< quantified fixed gains for the current and previous four subframes
125
126     float                              beta; ///< previous pitch_gain, bounded by [0.0,SHARP_MAX]
127     uint8_t                      diff_count; ///< the number of subframes for which diff has been above 0.65
128     uint8_t                      hang_count; ///< the number of subframes since a hangover period started
129
130     float            prev_sparse_fixed_gain; ///< previous fixed gain; used by anti-sparseness processing to determine "onset"
131     uint8_t               prev_ir_filter_nr; ///< previous impulse response filter "impNr": 0 - strong, 1 - medium, 2 - none
132     uint8_t                 ir_filter_onset; ///< flag for impulse response filter strength
133
134     float                postfilter_mem[10]; ///< previous intermediate values in the formant filter
135     float                          tilt_mem; ///< previous input to tilt compensation filter
136     float                    postfilter_agc; ///< previous factor used for adaptive gain control
137     float                  high_pass_mem[2]; ///< previous intermediate values in the high-pass filter
138
139     float samples_in[LP_FILTER_ORDER + AMR_SUBFRAME_SIZE]; ///< floating point samples
140
141     ACELPFContext                     acelpf_ctx; ///< context for filters for ACELP-based codecs
142     ACELPVContext                     acelpv_ctx; ///< context for vector operations for ACELP-based codecs
143     CELPFContext                       celpf_ctx; ///< context for filters for CELP-based codecs
144     CELPMContext                       celpm_ctx; ///< context for fixed point math operations
145
146 } AMRContext;
147
148 /** Double version of ff_weighted_vector_sumf() */
149 static void weighted_vector_sumd(double *out, const double *in_a,
150                                  const double *in_b, double weight_coeff_a,
151                                  double weight_coeff_b, int length)
152 {
153     int i;
154
155     for (i = 0; i < length; i++)
156         out[i] = weight_coeff_a * in_a[i]
157                + weight_coeff_b * in_b[i];
158 }
159
160 static av_cold int amrnb_decode_init(AVCodecContext *avctx)
161 {
162     AMRContext *p = avctx->priv_data;
163     int i;
164
165     if (avctx->channels > 1) {
166         av_log_missing_feature(avctx, "multi-channel AMR", 0);
167         return AVERROR_PATCHWELCOME;
168     }
169
170     avctx->channels       = 1;
171     avctx->channel_layout = AV_CH_LAYOUT_MONO;
172     if (!avctx->sample_rate)
173         avctx->sample_rate = 8000;
174     avctx->sample_fmt     = AV_SAMPLE_FMT_FLT;
175
176     // p->excitation always points to the same position in p->excitation_buf
177     p->excitation = &p->excitation_buf[PITCH_DELAY_MAX + LP_FILTER_ORDER + 1];
178
179     for (i = 0; i < LP_FILTER_ORDER; i++) {
180         p->prev_lsp_sub4[i] =    lsp_sub4_init[i] * 1000 / (float)(1 << 15);
181         p->lsf_avg[i] = p->lsf_q[3][i] = lsp_avg_init[i] / (float)(1 << 15);
182     }
183
184     for (i = 0; i < 4; i++)
185         p->prediction_error[i] = MIN_ENERGY;
186
187     avcodec_get_frame_defaults(&p->avframe);
188     avctx->coded_frame = &p->avframe;
189
190     ff_acelp_filter_init(&p->acelpf_ctx);
191     ff_acelp_vectors_init(&p->acelpv_ctx);
192     ff_celp_filter_init(&p->celpf_ctx);
193     ff_celp_math_init(&p->celpm_ctx);
194
195     return 0;
196 }
197
198
199 /**
200  * Unpack an RFC4867 speech frame into the AMR frame mode and parameters.
201  *
202  * The order of speech bits is specified by 3GPP TS 26.101.
203  *
204  * @param p the context
205  * @param buf               pointer to the input buffer
206  * @param buf_size          size of the input buffer
207  *
208  * @return the frame mode
209  */
210 static enum Mode unpack_bitstream(AMRContext *p, const uint8_t *buf,
211                                   int buf_size)
212 {
213     enum Mode mode;
214
215     // Decode the first octet.
216     mode = buf[0] >> 3 & 0x0F;                      // frame type
217     p->bad_frame_indicator = (buf[0] & 0x4) != 0x4; // quality bit
218
219     if (mode >= N_MODES || buf_size < frame_sizes_nb[mode] + 1) {
220         return NO_DATA;
221     }
222
223     if (mode < MODE_DTX)
224         ff_amr_bit_reorder((uint16_t *) &p->frame, sizeof(AMRNBFrame), buf + 1,
225                            amr_unpacking_bitmaps_per_mode[mode]);
226
227     return mode;
228 }
229
230
231 /// @name AMR pitch LPC coefficient decoding functions
232 /// @{
233
234 /**
235  * Interpolate the LSF vector (used for fixed gain smoothing).
236  * The interpolation is done over all four subframes even in MODE_12k2.
237  *
238  * @param[in]     ctx       The Context
239  * @param[in,out] lsf_q     LSFs in [0,1] for each subframe
240  * @param[in]     lsf_new   New LSFs in [0,1] for subframe 4
241  */
242 static void interpolate_lsf(ACELPVContext *ctx, float lsf_q[4][LP_FILTER_ORDER], float *lsf_new)
243 {
244     int i;
245
246     for (i = 0; i < 4; i++)
247         ctx->weighted_vector_sumf(lsf_q[i], lsf_q[3], lsf_new,
248                                 0.25 * (3 - i), 0.25 * (i + 1),
249                                 LP_FILTER_ORDER);
250 }
251
252 /**
253  * Decode a set of 5 split-matrix quantized lsf indexes into an lsp vector.
254  *
255  * @param p the context
256  * @param lsp output LSP vector
257  * @param lsf_no_r LSF vector without the residual vector added
258  * @param lsf_quantizer pointers to LSF dictionary tables
259  * @param quantizer_offset offset in tables
260  * @param sign for the 3 dictionary table
261  * @param update store data for computing the next frame's LSFs
262  */
263 static void lsf2lsp_for_mode12k2(AMRContext *p, double lsp[LP_FILTER_ORDER],
264                                  const float lsf_no_r[LP_FILTER_ORDER],
265                                  const int16_t *lsf_quantizer[5],
266                                  const int quantizer_offset,
267                                  const int sign, const int update)
268 {
269     int16_t lsf_r[LP_FILTER_ORDER]; // residual LSF vector
270     float lsf_q[LP_FILTER_ORDER]; // quantified LSF vector
271     int i;
272
273     for (i = 0; i < LP_FILTER_ORDER >> 1; i++)
274         memcpy(&lsf_r[i << 1], &lsf_quantizer[i][quantizer_offset],
275                2 * sizeof(*lsf_r));
276
277     if (sign) {
278         lsf_r[4] *= -1;
279         lsf_r[5] *= -1;
280     }
281
282     if (update)
283         memcpy(p->prev_lsf_r, lsf_r, LP_FILTER_ORDER * sizeof(*lsf_r));
284
285     for (i = 0; i < LP_FILTER_ORDER; i++)
286         lsf_q[i] = lsf_r[i] * (LSF_R_FAC / 8000.0) + lsf_no_r[i] * (1.0 / 8000.0);
287
288     ff_set_min_dist_lsf(lsf_q, MIN_LSF_SPACING, LP_FILTER_ORDER);
289
290     if (update)
291         interpolate_lsf(&p->acelpv_ctx, p->lsf_q, lsf_q);
292
293     ff_acelp_lsf2lspd(lsp, lsf_q, LP_FILTER_ORDER);
294 }
295
296 /**
297  * Decode a set of 5 split-matrix quantized lsf indexes into 2 lsp vectors.
298  *
299  * @param p                 pointer to the AMRContext
300  */
301 static void lsf2lsp_5(AMRContext *p)
302 {
303     const uint16_t *lsf_param = p->frame.lsf;
304     float lsf_no_r[LP_FILTER_ORDER]; // LSFs without the residual vector
305     const int16_t *lsf_quantizer[5];
306     int i;
307
308     lsf_quantizer[0] = lsf_5_1[lsf_param[0]];
309     lsf_quantizer[1] = lsf_5_2[lsf_param[1]];
310     lsf_quantizer[2] = lsf_5_3[lsf_param[2] >> 1];
311     lsf_quantizer[3] = lsf_5_4[lsf_param[3]];
312     lsf_quantizer[4] = lsf_5_5[lsf_param[4]];
313
314     for (i = 0; i < LP_FILTER_ORDER; i++)
315         lsf_no_r[i] = p->prev_lsf_r[i] * LSF_R_FAC * PRED_FAC_MODE_12k2 + lsf_5_mean[i];
316
317     lsf2lsp_for_mode12k2(p, p->lsp[1], lsf_no_r, lsf_quantizer, 0, lsf_param[2] & 1, 0);
318     lsf2lsp_for_mode12k2(p, p->lsp[3], lsf_no_r, lsf_quantizer, 2, lsf_param[2] & 1, 1);
319
320     // interpolate LSP vectors at subframes 1 and 3
321     weighted_vector_sumd(p->lsp[0], p->prev_lsp_sub4, p->lsp[1], 0.5, 0.5, LP_FILTER_ORDER);
322     weighted_vector_sumd(p->lsp[2], p->lsp[1]       , p->lsp[3], 0.5, 0.5, LP_FILTER_ORDER);
323 }
324
325 /**
326  * Decode a set of 3 split-matrix quantized lsf indexes into an lsp vector.
327  *
328  * @param p                 pointer to the AMRContext
329  */
330 static void lsf2lsp_3(AMRContext *p)
331 {
332     const uint16_t *lsf_param = p->frame.lsf;
333     int16_t lsf_r[LP_FILTER_ORDER]; // residual LSF vector
334     float lsf_q[LP_FILTER_ORDER]; // quantified LSF vector
335     const int16_t *lsf_quantizer;
336     int i, j;
337
338     lsf_quantizer = (p->cur_frame_mode == MODE_7k95 ? lsf_3_1_MODE_7k95 : lsf_3_1)[lsf_param[0]];
339     memcpy(lsf_r, lsf_quantizer, 3 * sizeof(*lsf_r));
340
341     lsf_quantizer = lsf_3_2[lsf_param[1] << (p->cur_frame_mode <= MODE_5k15)];
342     memcpy(lsf_r + 3, lsf_quantizer, 3 * sizeof(*lsf_r));
343
344     lsf_quantizer = (p->cur_frame_mode <= MODE_5k15 ? lsf_3_3_MODE_5k15 : lsf_3_3)[lsf_param[2]];
345     memcpy(lsf_r + 6, lsf_quantizer, 4 * sizeof(*lsf_r));
346
347     // calculate mean-removed LSF vector and add mean
348     for (i = 0; i < LP_FILTER_ORDER; i++)
349         lsf_q[i] = (lsf_r[i] + p->prev_lsf_r[i] * pred_fac[i]) * (LSF_R_FAC / 8000.0) + lsf_3_mean[i] * (1.0 / 8000.0);
350
351     ff_set_min_dist_lsf(lsf_q, MIN_LSF_SPACING, LP_FILTER_ORDER);
352
353     // store data for computing the next frame's LSFs
354     interpolate_lsf(&p->acelpv_ctx, p->lsf_q, lsf_q);
355     memcpy(p->prev_lsf_r, lsf_r, LP_FILTER_ORDER * sizeof(*lsf_r));
356
357     ff_acelp_lsf2lspd(p->lsp[3], lsf_q, LP_FILTER_ORDER);
358
359     // interpolate LSP vectors at subframes 1, 2 and 3
360     for (i = 1; i <= 3; i++)
361         for(j = 0; j < LP_FILTER_ORDER; j++)
362             p->lsp[i-1][j] = p->prev_lsp_sub4[j] +
363                 (p->lsp[3][j] - p->prev_lsp_sub4[j]) * 0.25 * i;
364 }
365
366 /// @}
367
368
369 /// @name AMR pitch vector decoding functions
370 /// @{
371
372 /**
373  * Like ff_decode_pitch_lag(), but with 1/6 resolution
374  */
375 static void decode_pitch_lag_1_6(int *lag_int, int *lag_frac, int pitch_index,
376                                  const int prev_lag_int, const int subframe)
377 {
378     if (subframe == 0 || subframe == 2) {
379         if (pitch_index < 463) {
380             *lag_int  = (pitch_index + 107) * 10923 >> 16;
381             *lag_frac = pitch_index - *lag_int * 6 + 105;
382         } else {
383             *lag_int  = pitch_index - 368;
384             *lag_frac = 0;
385         }
386     } else {
387         *lag_int  = ((pitch_index + 5) * 10923 >> 16) - 1;
388         *lag_frac = pitch_index - *lag_int * 6 - 3;
389         *lag_int += av_clip(prev_lag_int - 5, PITCH_LAG_MIN_MODE_12k2,
390                             PITCH_DELAY_MAX - 9);
391     }
392 }
393
394 static void decode_pitch_vector(AMRContext *p,
395                                 const AMRNBSubframe *amr_subframe,
396                                 const int subframe)
397 {
398     int pitch_lag_int, pitch_lag_frac;
399     enum Mode mode = p->cur_frame_mode;
400
401     if (p->cur_frame_mode == MODE_12k2) {
402         decode_pitch_lag_1_6(&pitch_lag_int, &pitch_lag_frac,
403                              amr_subframe->p_lag, p->pitch_lag_int,
404                              subframe);
405     } else
406         ff_decode_pitch_lag(&pitch_lag_int, &pitch_lag_frac,
407                             amr_subframe->p_lag,
408                             p->pitch_lag_int, subframe,
409                             mode != MODE_4k75 && mode != MODE_5k15,
410                             mode <= MODE_6k7 ? 4 : (mode == MODE_7k95 ? 5 : 6));
411
412     p->pitch_lag_int = pitch_lag_int; // store previous lag in a uint8_t
413
414     pitch_lag_frac <<= (p->cur_frame_mode != MODE_12k2);
415
416     pitch_lag_int += pitch_lag_frac > 0;
417
418     /* Calculate the pitch vector by interpolating the past excitation at the
419        pitch lag using a b60 hamming windowed sinc function.   */
420     p->acelpf_ctx.acelp_interpolatef(p->excitation,
421                           p->excitation + 1 - pitch_lag_int,
422                           ff_b60_sinc, 6,
423                           pitch_lag_frac + 6 - 6*(pitch_lag_frac > 0),
424                           10, AMR_SUBFRAME_SIZE);
425
426     memcpy(p->pitch_vector, p->excitation, AMR_SUBFRAME_SIZE * sizeof(float));
427 }
428
429 /// @}
430
431
432 /// @name AMR algebraic code book (fixed) vector decoding functions
433 /// @{
434
435 /**
436  * Decode a 10-bit algebraic codebook index from a 10.2 kbit/s frame.
437  */
438 static void decode_10bit_pulse(int code, int pulse_position[8],
439                                int i1, int i2, int i3)
440 {
441     // coded using 7+3 bits with the 3 LSBs being, individually, the LSB of 1 of
442     // the 3 pulses and the upper 7 bits being coded in base 5
443     const uint8_t *positions = base_five_table[code >> 3];
444     pulse_position[i1] = (positions[2] << 1) + ( code       & 1);
445     pulse_position[i2] = (positions[1] << 1) + ((code >> 1) & 1);
446     pulse_position[i3] = (positions[0] << 1) + ((code >> 2) & 1);
447 }
448
449 /**
450  * Decode the algebraic codebook index to pulse positions and signs and
451  * construct the algebraic codebook vector for MODE_10k2.
452  *
453  * @param fixed_index          positions of the eight pulses
454  * @param fixed_sparse         pointer to the algebraic codebook vector
455  */
456 static void decode_8_pulses_31bits(const int16_t *fixed_index,
457                                    AMRFixed *fixed_sparse)
458 {
459     int pulse_position[8];
460     int i, temp;
461
462     decode_10bit_pulse(fixed_index[4], pulse_position, 0, 4, 1);
463     decode_10bit_pulse(fixed_index[5], pulse_position, 2, 6, 5);
464
465     // coded using 5+2 bits with the 2 LSBs being, individually, the LSB of 1 of
466     // the 2 pulses and the upper 5 bits being coded in base 5
467     temp = ((fixed_index[6] >> 2) * 25 + 12) >> 5;
468     pulse_position[3] = temp % 5;
469     pulse_position[7] = temp / 5;
470     if (pulse_position[7] & 1)
471         pulse_position[3] = 4 - pulse_position[3];
472     pulse_position[3] = (pulse_position[3] << 1) + ( fixed_index[6]       & 1);
473     pulse_position[7] = (pulse_position[7] << 1) + ((fixed_index[6] >> 1) & 1);
474
475     fixed_sparse->n = 8;
476     for (i = 0; i < 4; i++) {
477         const int pos1   = (pulse_position[i]     << 2) + i;
478         const int pos2   = (pulse_position[i + 4] << 2) + i;
479         const float sign = fixed_index[i] ? -1.0 : 1.0;
480         fixed_sparse->x[i    ] = pos1;
481         fixed_sparse->x[i + 4] = pos2;
482         fixed_sparse->y[i    ] = sign;
483         fixed_sparse->y[i + 4] = pos2 < pos1 ? -sign : sign;
484     }
485 }
486
487 /**
488  * Decode the algebraic codebook index to pulse positions and signs,
489  * then construct the algebraic codebook vector.
490  *
491  *                              nb of pulses | bits encoding pulses
492  * For MODE_4k75 or MODE_5k15,             2 | 1-3, 4-6, 7
493  *                  MODE_5k9,              2 | 1,   2-4, 5-6, 7-9
494  *                  MODE_6k7,              3 | 1-3, 4,   5-7, 8,  9-11
495  *      MODE_7k4 or MODE_7k95,             4 | 1-3, 4-6, 7-9, 10, 11-13
496  *
497  * @param fixed_sparse pointer to the algebraic codebook vector
498  * @param pulses       algebraic codebook indexes
499  * @param mode         mode of the current frame
500  * @param subframe     current subframe number
501  */
502 static void decode_fixed_sparse(AMRFixed *fixed_sparse, const uint16_t *pulses,
503                                 const enum Mode mode, const int subframe)
504 {
505     av_assert1(MODE_4k75 <= (signed)mode && mode <= MODE_12k2);
506
507     if (mode == MODE_12k2) {
508         ff_decode_10_pulses_35bits(pulses, fixed_sparse, gray_decode, 5, 3);
509     } else if (mode == MODE_10k2) {
510         decode_8_pulses_31bits(pulses, fixed_sparse);
511     } else {
512         int *pulse_position = fixed_sparse->x;
513         int i, pulse_subset;
514         const int fixed_index = pulses[0];
515
516         if (mode <= MODE_5k15) {
517             pulse_subset      = ((fixed_index >> 3) & 8)     + (subframe << 1);
518             pulse_position[0] = ( fixed_index       & 7) * 5 + track_position[pulse_subset];
519             pulse_position[1] = ((fixed_index >> 3) & 7) * 5 + track_position[pulse_subset + 1];
520             fixed_sparse->n = 2;
521         } else if (mode == MODE_5k9) {
522             pulse_subset      = ((fixed_index & 1) << 1) + 1;
523             pulse_position[0] = ((fixed_index >> 1) & 7) * 5 + pulse_subset;
524             pulse_subset      = (fixed_index  >> 4) & 3;
525             pulse_position[1] = ((fixed_index >> 6) & 7) * 5 + pulse_subset + (pulse_subset == 3 ? 1 : 0);
526             fixed_sparse->n = pulse_position[0] == pulse_position[1] ? 1 : 2;
527         } else if (mode == MODE_6k7) {
528             pulse_position[0] = (fixed_index        & 7) * 5;
529             pulse_subset      = (fixed_index  >> 2) & 2;
530             pulse_position[1] = ((fixed_index >> 4) & 7) * 5 + pulse_subset + 1;
531             pulse_subset      = (fixed_index  >> 6) & 2;
532             pulse_position[2] = ((fixed_index >> 8) & 7) * 5 + pulse_subset + 2;
533             fixed_sparse->n = 3;
534         } else { // mode <= MODE_7k95
535             pulse_position[0] = gray_decode[ fixed_index        & 7];
536             pulse_position[1] = gray_decode[(fixed_index >> 3)  & 7] + 1;
537             pulse_position[2] = gray_decode[(fixed_index >> 6)  & 7] + 2;
538             pulse_subset      = (fixed_index >> 9) & 1;
539             pulse_position[3] = gray_decode[(fixed_index >> 10) & 7] + pulse_subset + 3;
540             fixed_sparse->n = 4;
541         }
542         for (i = 0; i < fixed_sparse->n; i++)
543             fixed_sparse->y[i] = (pulses[1] >> i) & 1 ? 1.0 : -1.0;
544     }
545 }
546
547 /**
548  * Apply pitch lag to obtain the sharpened fixed vector (section 6.1.2)
549  *
550  * @param p the context
551  * @param subframe unpacked amr subframe
552  * @param mode mode of the current frame
553  * @param fixed_sparse sparse respresentation of the fixed vector
554  */
555 static void pitch_sharpening(AMRContext *p, int subframe, enum Mode mode,
556                              AMRFixed *fixed_sparse)
557 {
558     // The spec suggests the current pitch gain is always used, but in other
559     // modes the pitch and codebook gains are joinly quantized (sec 5.8.2)
560     // so the codebook gain cannot depend on the quantized pitch gain.
561     if (mode == MODE_12k2)
562         p->beta = FFMIN(p->pitch_gain[4], 1.0);
563
564     fixed_sparse->pitch_lag  = p->pitch_lag_int;
565     fixed_sparse->pitch_fac  = p->beta;
566
567     // Save pitch sharpening factor for the next subframe
568     // MODE_4k75 only updates on the 2nd and 4th subframes - this follows from
569     // the fact that the gains for two subframes are jointly quantized.
570     if (mode != MODE_4k75 || subframe & 1)
571         p->beta = av_clipf(p->pitch_gain[4], 0.0, SHARP_MAX);
572 }
573 /// @}
574
575
576 /// @name AMR gain decoding functions
577 /// @{
578
579 /**
580  * fixed gain smoothing
581  * Note that where the spec specifies the "spectrum in the q domain"
582  * in section 6.1.4, in fact frequencies should be used.
583  *
584  * @param p the context
585  * @param lsf LSFs for the current subframe, in the range [0,1]
586  * @param lsf_avg averaged LSFs
587  * @param mode mode of the current frame
588  *
589  * @return fixed gain smoothed
590  */
591 static float fixed_gain_smooth(AMRContext *p , const float *lsf,
592                                const float *lsf_avg, const enum Mode mode)
593 {
594     float diff = 0.0;
595     int i;
596
597     for (i = 0; i < LP_FILTER_ORDER; i++)
598         diff += fabs(lsf_avg[i] - lsf[i]) / lsf_avg[i];
599
600     // If diff is large for ten subframes, disable smoothing for a 40-subframe
601     // hangover period.
602     p->diff_count++;
603     if (diff <= 0.65)
604         p->diff_count = 0;
605
606     if (p->diff_count > 10) {
607         p->hang_count = 0;
608         p->diff_count--; // don't let diff_count overflow
609     }
610
611     if (p->hang_count < 40) {
612         p->hang_count++;
613     } else if (mode < MODE_7k4 || mode == MODE_10k2) {
614         const float smoothing_factor = av_clipf(4.0 * diff - 1.6, 0.0, 1.0);
615         const float fixed_gain_mean = (p->fixed_gain[0] + p->fixed_gain[1] +
616                                        p->fixed_gain[2] + p->fixed_gain[3] +
617                                        p->fixed_gain[4]) * 0.2;
618         return smoothing_factor * p->fixed_gain[4] +
619                (1.0 - smoothing_factor) * fixed_gain_mean;
620     }
621     return p->fixed_gain[4];
622 }
623
624 /**
625  * Decode pitch gain and fixed gain factor (part of section 6.1.3).
626  *
627  * @param p the context
628  * @param amr_subframe unpacked amr subframe
629  * @param mode mode of the current frame
630  * @param subframe current subframe number
631  * @param fixed_gain_factor decoded gain correction factor
632  */
633 static void decode_gains(AMRContext *p, const AMRNBSubframe *amr_subframe,
634                          const enum Mode mode, const int subframe,
635                          float *fixed_gain_factor)
636 {
637     if (mode == MODE_12k2 || mode == MODE_7k95) {
638         p->pitch_gain[4]   = qua_gain_pit [amr_subframe->p_gain    ]
639             * (1.0 / 16384.0);
640         *fixed_gain_factor = qua_gain_code[amr_subframe->fixed_gain]
641             * (1.0 /  2048.0);
642     } else {
643         const uint16_t *gains;
644
645         if (mode >= MODE_6k7) {
646             gains = gains_high[amr_subframe->p_gain];
647         } else if (mode >= MODE_5k15) {
648             gains = gains_low [amr_subframe->p_gain];
649         } else {
650             // gain index is only coded in subframes 0,2 for MODE_4k75
651             gains = gains_MODE_4k75[(p->frame.subframe[subframe & 2].p_gain << 1) + (subframe & 1)];
652         }
653
654         p->pitch_gain[4]   = gains[0] * (1.0 / 16384.0);
655         *fixed_gain_factor = gains[1] * (1.0 /  4096.0);
656     }
657 }
658
659 /// @}
660
661
662 /// @name AMR preprocessing functions
663 /// @{
664
665 /**
666  * Circularly convolve a sparse fixed vector with a phase dispersion impulse
667  * response filter (D.6.2 of G.729 and 6.1.5 of AMR).
668  *
669  * @param out vector with filter applied
670  * @param in source vector
671  * @param filter phase filter coefficients
672  *
673  *  out[n] = sum(i,0,len-1){ in[i] * filter[(len + n - i)%len] }
674  */
675 static void apply_ir_filter(float *out, const AMRFixed *in,
676                             const float *filter)
677 {
678     float filter1[AMR_SUBFRAME_SIZE],     ///< filters at pitch lag*1 and *2
679           filter2[AMR_SUBFRAME_SIZE];
680     int   lag = in->pitch_lag;
681     float fac = in->pitch_fac;
682     int i;
683
684     if (lag < AMR_SUBFRAME_SIZE) {
685         ff_celp_circ_addf(filter1, filter, filter, lag, fac,
686                           AMR_SUBFRAME_SIZE);
687
688         if (lag < AMR_SUBFRAME_SIZE >> 1)
689             ff_celp_circ_addf(filter2, filter, filter1, lag, fac,
690                               AMR_SUBFRAME_SIZE);
691     }
692
693     memset(out, 0, sizeof(float) * AMR_SUBFRAME_SIZE);
694     for (i = 0; i < in->n; i++) {
695         int   x = in->x[i];
696         float y = in->y[i];
697         const float *filterp;
698
699         if (x >= AMR_SUBFRAME_SIZE - lag) {
700             filterp = filter;
701         } else if (x >= AMR_SUBFRAME_SIZE - (lag << 1)) {
702             filterp = filter1;
703         } else
704             filterp = filter2;
705
706         ff_celp_circ_addf(out, out, filterp, x, y, AMR_SUBFRAME_SIZE);
707     }
708 }
709
710 /**
711  * Reduce fixed vector sparseness by smoothing with one of three IR filters.
712  * Also know as "adaptive phase dispersion".
713  *
714  * This implements 3GPP TS 26.090 section 6.1(5).
715  *
716  * @param p the context
717  * @param fixed_sparse algebraic codebook vector
718  * @param fixed_vector unfiltered fixed vector
719  * @param fixed_gain smoothed gain
720  * @param out space for modified vector if necessary
721  */
722 static const float *anti_sparseness(AMRContext *p, AMRFixed *fixed_sparse,
723                                     const float *fixed_vector,
724                                     float fixed_gain, float *out)
725 {
726     int ir_filter_nr;
727
728     if (p->pitch_gain[4] < 0.6) {
729         ir_filter_nr = 0;      // strong filtering
730     } else if (p->pitch_gain[4] < 0.9) {
731         ir_filter_nr = 1;      // medium filtering
732     } else
733         ir_filter_nr = 2;      // no filtering
734
735     // detect 'onset'
736     if (fixed_gain > 2.0 * p->prev_sparse_fixed_gain) {
737         p->ir_filter_onset = 2;
738     } else if (p->ir_filter_onset)
739         p->ir_filter_onset--;
740
741     if (!p->ir_filter_onset) {
742         int i, count = 0;
743
744         for (i = 0; i < 5; i++)
745             if (p->pitch_gain[i] < 0.6)
746                 count++;
747         if (count > 2)
748             ir_filter_nr = 0;
749
750         if (ir_filter_nr > p->prev_ir_filter_nr + 1)
751             ir_filter_nr--;
752     } else if (ir_filter_nr < 2)
753         ir_filter_nr++;
754
755     // Disable filtering for very low level of fixed_gain.
756     // Note this step is not specified in the technical description but is in
757     // the reference source in the function Ph_disp.
758     if (fixed_gain < 5.0)
759         ir_filter_nr = 2;
760
761     if (p->cur_frame_mode != MODE_7k4 && p->cur_frame_mode < MODE_10k2
762          && ir_filter_nr < 2) {
763         apply_ir_filter(out, fixed_sparse,
764                         (p->cur_frame_mode == MODE_7k95 ?
765                              ir_filters_lookup_MODE_7k95 :
766                              ir_filters_lookup)[ir_filter_nr]);
767         fixed_vector = out;
768     }
769
770     // update ir filter strength history
771     p->prev_ir_filter_nr       = ir_filter_nr;
772     p->prev_sparse_fixed_gain  = fixed_gain;
773
774     return fixed_vector;
775 }
776
777 /// @}
778
779
780 /// @name AMR synthesis functions
781 /// @{
782
783 /**
784  * Conduct 10th order linear predictive coding synthesis.
785  *
786  * @param p             pointer to the AMRContext
787  * @param lpc           pointer to the LPC coefficients
788  * @param fixed_gain    fixed codebook gain for synthesis
789  * @param fixed_vector  algebraic codebook vector
790  * @param samples       pointer to the output speech samples
791  * @param overflow      16-bit overflow flag
792  */
793 static int synthesis(AMRContext *p, float *lpc,
794                      float fixed_gain, const float *fixed_vector,
795                      float *samples, uint8_t overflow)
796 {
797     int i;
798     float excitation[AMR_SUBFRAME_SIZE];
799
800     // if an overflow has been detected, the pitch vector is scaled down by a
801     // factor of 4
802     if (overflow)
803         for (i = 0; i < AMR_SUBFRAME_SIZE; i++)
804             p->pitch_vector[i] *= 0.25;
805
806     p->acelpv_ctx.weighted_vector_sumf(excitation, p->pitch_vector, fixed_vector,
807                             p->pitch_gain[4], fixed_gain, AMR_SUBFRAME_SIZE);
808
809     // emphasize pitch vector contribution
810     if (p->pitch_gain[4] > 0.5 && !overflow) {
811         float energy = p->celpm_ctx.dot_productf(excitation, excitation,
812                                                 AMR_SUBFRAME_SIZE);
813         float pitch_factor =
814             p->pitch_gain[4] *
815             (p->cur_frame_mode == MODE_12k2 ?
816                 0.25 * FFMIN(p->pitch_gain[4], 1.0) :
817                 0.5  * FFMIN(p->pitch_gain[4], SHARP_MAX));
818
819         for (i = 0; i < AMR_SUBFRAME_SIZE; i++)
820             excitation[i] += pitch_factor * p->pitch_vector[i];
821
822         ff_scale_vector_to_given_sum_of_squares(excitation, excitation, energy,
823                                                 AMR_SUBFRAME_SIZE);
824     }
825
826     p->celpf_ctx.celp_lp_synthesis_filterf(samples, lpc, excitation,
827                                  AMR_SUBFRAME_SIZE,
828                                  LP_FILTER_ORDER);
829
830     // detect overflow
831     for (i = 0; i < AMR_SUBFRAME_SIZE; i++)
832         if (fabsf(samples[i]) > AMR_SAMPLE_BOUND) {
833             return 1;
834         }
835
836     return 0;
837 }
838
839 /// @}
840
841
842 /// @name AMR update functions
843 /// @{
844
845 /**
846  * Update buffers and history at the end of decoding a subframe.
847  *
848  * @param p             pointer to the AMRContext
849  */
850 static void update_state(AMRContext *p)
851 {
852     memcpy(p->prev_lsp_sub4, p->lsp[3], LP_FILTER_ORDER * sizeof(p->lsp[3][0]));
853
854     memmove(&p->excitation_buf[0], &p->excitation_buf[AMR_SUBFRAME_SIZE],
855             (PITCH_DELAY_MAX + LP_FILTER_ORDER + 1) * sizeof(float));
856
857     memmove(&p->pitch_gain[0], &p->pitch_gain[1], 4 * sizeof(float));
858     memmove(&p->fixed_gain[0], &p->fixed_gain[1], 4 * sizeof(float));
859
860     memmove(&p->samples_in[0], &p->samples_in[AMR_SUBFRAME_SIZE],
861             LP_FILTER_ORDER * sizeof(float));
862 }
863
864 /// @}
865
866
867 /// @name AMR Postprocessing functions
868 /// @{
869
870 /**
871  * Get the tilt factor of a formant filter from its transfer function
872  *
873  * @param p     The Context
874  * @param lpc_n LP_FILTER_ORDER coefficients of the numerator
875  * @param lpc_d LP_FILTER_ORDER coefficients of the denominator
876  */
877 static float tilt_factor(AMRContext *p, float *lpc_n, float *lpc_d)
878 {
879     float rh0, rh1; // autocorrelation at lag 0 and 1
880
881     // LP_FILTER_ORDER prior zeros are needed for ff_celp_lp_synthesis_filterf
882     float impulse_buffer[LP_FILTER_ORDER + AMR_TILT_RESPONSE] = { 0 };
883     float *hf = impulse_buffer + LP_FILTER_ORDER; // start of impulse response
884
885     hf[0] = 1.0;
886     memcpy(hf + 1, lpc_n, sizeof(float) * LP_FILTER_ORDER);
887     p->celpf_ctx.celp_lp_synthesis_filterf(hf, lpc_d, hf,
888                                  AMR_TILT_RESPONSE,
889                                  LP_FILTER_ORDER);
890
891     rh0 = p->celpm_ctx.dot_productf(hf, hf,     AMR_TILT_RESPONSE);
892     rh1 = p->celpm_ctx.dot_productf(hf, hf + 1, AMR_TILT_RESPONSE - 1);
893
894     // The spec only specifies this check for 12.2 and 10.2 kbit/s
895     // modes. But in the ref source the tilt is always non-negative.
896     return rh1 >= 0.0 ? rh1 / rh0 * AMR_TILT_GAMMA_T : 0.0;
897 }
898
899 /**
900  * Perform adaptive post-filtering to enhance the quality of the speech.
901  * See section 6.2.1.
902  *
903  * @param p             pointer to the AMRContext
904  * @param lpc           interpolated LP coefficients for this subframe
905  * @param buf_out       output of the filter
906  */
907 static void postfilter(AMRContext *p, float *lpc, float *buf_out)
908 {
909     int i;
910     float *samples          = p->samples_in + LP_FILTER_ORDER; // Start of input
911
912     float speech_gain       = p->celpm_ctx.dot_productf(samples, samples,
913                                                        AMR_SUBFRAME_SIZE);
914
915     float pole_out[AMR_SUBFRAME_SIZE + LP_FILTER_ORDER];  // Output of pole filter
916     const float *gamma_n, *gamma_d;                       // Formant filter factor table
917     float lpc_n[LP_FILTER_ORDER], lpc_d[LP_FILTER_ORDER]; // Transfer function coefficients
918
919     if (p->cur_frame_mode == MODE_12k2 || p->cur_frame_mode == MODE_10k2) {
920         gamma_n = ff_pow_0_7;
921         gamma_d = ff_pow_0_75;
922     } else {
923         gamma_n = ff_pow_0_55;
924         gamma_d = ff_pow_0_7;
925     }
926
927     for (i = 0; i < LP_FILTER_ORDER; i++) {
928          lpc_n[i] = lpc[i] * gamma_n[i];
929          lpc_d[i] = lpc[i] * gamma_d[i];
930     }
931
932     memcpy(pole_out, p->postfilter_mem, sizeof(float) * LP_FILTER_ORDER);
933     p->celpf_ctx.celp_lp_synthesis_filterf(pole_out + LP_FILTER_ORDER, lpc_d, samples,
934                                  AMR_SUBFRAME_SIZE, LP_FILTER_ORDER);
935     memcpy(p->postfilter_mem, pole_out + AMR_SUBFRAME_SIZE,
936            sizeof(float) * LP_FILTER_ORDER);
937
938     p->celpf_ctx.celp_lp_zero_synthesis_filterf(buf_out, lpc_n,
939                                       pole_out + LP_FILTER_ORDER,
940                                       AMR_SUBFRAME_SIZE, LP_FILTER_ORDER);
941
942     ff_tilt_compensation(&p->tilt_mem, tilt_factor(p, lpc_n, lpc_d), buf_out,
943                          AMR_SUBFRAME_SIZE);
944
945     ff_adaptive_gain_control(buf_out, buf_out, speech_gain, AMR_SUBFRAME_SIZE,
946                              AMR_AGC_ALPHA, &p->postfilter_agc);
947 }
948
949 /// @}
950
951 static int amrnb_decode_frame(AVCodecContext *avctx, void *data,
952                               int *got_frame_ptr, AVPacket *avpkt)
953 {
954
955     AMRContext *p = avctx->priv_data;        // pointer to private data
956     const uint8_t *buf = avpkt->data;
957     int buf_size       = avpkt->size;
958     float *buf_out;                          // pointer to the output data buffer
959     int i, subframe, ret;
960     float fixed_gain_factor;
961     AMRFixed fixed_sparse = {0};             // fixed vector up to anti-sparseness processing
962     float spare_vector[AMR_SUBFRAME_SIZE];   // extra stack space to hold result from anti-sparseness processing
963     float synth_fixed_gain;                  // the fixed gain that synthesis should use
964     const float *synth_fixed_vector;         // pointer to the fixed vector that synthesis should use
965
966     /* get output buffer */
967     p->avframe.nb_samples = AMR_BLOCK_SIZE;
968     if ((ret = avctx->get_buffer(avctx, &p->avframe)) < 0) {
969         av_log(avctx, AV_LOG_ERROR, "get_buffer() failed\n");
970         return ret;
971     }
972     buf_out = (float *)p->avframe.data[0];
973
974     p->cur_frame_mode = unpack_bitstream(p, buf, buf_size);
975     if (p->cur_frame_mode == NO_DATA) {
976         av_log(avctx, AV_LOG_ERROR, "Corrupt bitstream\n");
977         return AVERROR_INVALIDDATA;
978     }
979     if (p->cur_frame_mode == MODE_DTX) {
980         av_log_missing_feature(avctx, "dtx mode", 0);
981         av_log(avctx, AV_LOG_INFO, "Note: libopencore_amrnb supports dtx\n");
982         return AVERROR_PATCHWELCOME;
983     }
984
985     if (p->cur_frame_mode == MODE_12k2) {
986         lsf2lsp_5(p);
987     } else
988         lsf2lsp_3(p);
989
990     for (i = 0; i < 4; i++)
991         ff_acelp_lspd2lpc(p->lsp[i], p->lpc[i], 5);
992
993     for (subframe = 0; subframe < 4; subframe++) {
994         const AMRNBSubframe *amr_subframe = &p->frame.subframe[subframe];
995
996         decode_pitch_vector(p, amr_subframe, subframe);
997
998         decode_fixed_sparse(&fixed_sparse, amr_subframe->pulses,
999                             p->cur_frame_mode, subframe);
1000
1001         // The fixed gain (section 6.1.3) depends on the fixed vector
1002         // (section 6.1.2), but the fixed vector calculation uses
1003         // pitch sharpening based on the on the pitch gain (section 6.1.3).
1004         // So the correct order is: pitch gain, pitch sharpening, fixed gain.
1005         decode_gains(p, amr_subframe, p->cur_frame_mode, subframe,
1006                      &fixed_gain_factor);
1007
1008         pitch_sharpening(p, subframe, p->cur_frame_mode, &fixed_sparse);
1009
1010         if (fixed_sparse.pitch_lag == 0) {
1011             av_log(avctx, AV_LOG_ERROR, "The file is corrupted, pitch_lag = 0 is not allowed\n");
1012             return AVERROR_INVALIDDATA;
1013         }
1014         ff_set_fixed_vector(p->fixed_vector, &fixed_sparse, 1.0,
1015                             AMR_SUBFRAME_SIZE);
1016
1017         p->fixed_gain[4] =
1018             ff_amr_set_fixed_gain(fixed_gain_factor,
1019                        p->celpm_ctx.dot_productf(p->fixed_vector,
1020                                                            p->fixed_vector,
1021                                                            AMR_SUBFRAME_SIZE) /
1022                                   AMR_SUBFRAME_SIZE,
1023                        p->prediction_error,
1024                        energy_mean[p->cur_frame_mode], energy_pred_fac);
1025
1026         // The excitation feedback is calculated without any processing such
1027         // as fixed gain smoothing. This isn't mentioned in the specification.
1028         for (i = 0; i < AMR_SUBFRAME_SIZE; i++)
1029             p->excitation[i] *= p->pitch_gain[4];
1030         ff_set_fixed_vector(p->excitation, &fixed_sparse, p->fixed_gain[4],
1031                             AMR_SUBFRAME_SIZE);
1032
1033         // In the ref decoder, excitation is stored with no fractional bits.
1034         // This step prevents buzz in silent periods. The ref encoder can
1035         // emit long sequences with pitch factor greater than one. This
1036         // creates unwanted feedback if the excitation vector is nonzero.
1037         // (e.g. test sequence T19_795.COD in 3GPP TS 26.074)
1038         for (i = 0; i < AMR_SUBFRAME_SIZE; i++)
1039             p->excitation[i] = truncf(p->excitation[i]);
1040
1041         // Smooth fixed gain.
1042         // The specification is ambiguous, but in the reference source, the
1043         // smoothed value is NOT fed back into later fixed gain smoothing.
1044         synth_fixed_gain = fixed_gain_smooth(p, p->lsf_q[subframe],
1045                                              p->lsf_avg, p->cur_frame_mode);
1046
1047         synth_fixed_vector = anti_sparseness(p, &fixed_sparse, p->fixed_vector,
1048                                              synth_fixed_gain, spare_vector);
1049
1050         if (synthesis(p, p->lpc[subframe], synth_fixed_gain,
1051                       synth_fixed_vector, &p->samples_in[LP_FILTER_ORDER], 0))
1052             // overflow detected -> rerun synthesis scaling pitch vector down
1053             // by a factor of 4, skipping pitch vector contribution emphasis
1054             // and adaptive gain control
1055             synthesis(p, p->lpc[subframe], synth_fixed_gain,
1056                       synth_fixed_vector, &p->samples_in[LP_FILTER_ORDER], 1);
1057
1058         postfilter(p, p->lpc[subframe], buf_out + subframe * AMR_SUBFRAME_SIZE);
1059
1060         // update buffers and history
1061         ff_clear_fixed_vector(p->fixed_vector, &fixed_sparse, AMR_SUBFRAME_SIZE);
1062         update_state(p);
1063     }
1064
1065     p->acelpf_ctx.acelp_apply_order_2_transfer_function(buf_out,
1066                                              buf_out, highpass_zeros,
1067                                              highpass_poles,
1068                                              highpass_gain * AMR_SAMPLE_SCALE,
1069                                              p->high_pass_mem, AMR_BLOCK_SIZE);
1070
1071     /* Update averaged lsf vector (used for fixed gain smoothing).
1072      *
1073      * Note that lsf_avg should not incorporate the current frame's LSFs
1074      * for fixed_gain_smooth.
1075      * The specification has an incorrect formula: the reference decoder uses
1076      * qbar(n-1) rather than qbar(n) in section 6.1(4) equation 71. */
1077     p->acelpv_ctx.weighted_vector_sumf(p->lsf_avg, p->lsf_avg, p->lsf_q[3],
1078                             0.84, 0.16, LP_FILTER_ORDER);
1079
1080     *got_frame_ptr   = 1;
1081     *(AVFrame *)data = p->avframe;
1082
1083     /* return the amount of bytes consumed if everything was OK */
1084     return frame_sizes_nb[p->cur_frame_mode] + 1; // +7 for rounding and +8 for TOC
1085 }
1086
1087
1088 AVCodec ff_amrnb_decoder = {
1089     .name           = "amrnb",
1090     .type           = AVMEDIA_TYPE_AUDIO,
1091     .id             = AV_CODEC_ID_AMR_NB,
1092     .priv_data_size = sizeof(AMRContext),
1093     .init           = amrnb_decode_init,
1094     .decode         = amrnb_decode_frame,
1095     .capabilities   = CODEC_CAP_DR1,
1096     .long_name      = NULL_IF_CONFIG_SMALL("AMR-NB (Adaptive Multi-Rate NarrowBand)"),
1097     .sample_fmts    = (const enum AVSampleFormat[]){ AV_SAMPLE_FMT_FLT,
1098                                                      AV_SAMPLE_FMT_NONE },
1099 };