3
* MIPS Technologies, Inc., California.
5
* Redistribution and use in source and binary forms, with or without
6
* modification, are permitted provided that the following conditions
8
* 1. Redistributions of source code must retain the above copyright
9
* notice, this list of conditions and the following disclaimer.
10
* 2. Redistributions in binary form must reproduce the above copyright
11
* notice, this list of conditions and the following disclaimer in the
12
* documentation and/or other materials provided with the distribution.
13
* 3. Neither the name of the MIPS Technologies, Inc., nor the names of its
14
* contributors may be used to endorse or promote products derived from
15
* this software without specific prior written permission.
17
* THIS SOFTWARE IS PROVIDED BY THE MIPS TECHNOLOGIES, INC. ``AS IS'' AND
18
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20
* ARE DISCLAIMED. IN NO EVENT SHALL THE MIPS TECHNOLOGIES, INC. BE LIABLE
21
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29
* AAC decoder fixed-point implementation
31
* Copyright (c) 2005-2006 Oded Shimon ( ods15 ods15 dyndns org )
32
* Copyright (c) 2006-2007 Maxim Gavrilov ( maxim.gavrilov gmail com )
34
* This file is part of FFmpeg.
36
* FFmpeg is free software; you can redistribute it and/or
37
* modify it under the terms of the GNU Lesser General Public
38
* License as published by the Free Software Foundation; either
39
* version 2.1 of the License, or (at your option) any later version.
41
* FFmpeg is distributed in the hope that it will be useful,
42
* but WITHOUT ANY WARRANTY; without even the implied warranty of
43
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
44
* Lesser General Public License for more details.
46
* You should have received a copy of the GNU Lesser General Public
47
* License along with FFmpeg; if not, write to the Free Software
48
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
54
* @author Oded Shimon ( ods15 ods15 dyndns org )
55
* @author Maxim Gavrilov ( maxim.gavrilov gmail com )
57
* Fixed point implementation
58
* @author Stanislav Ocovaj ( stanislav.ocovaj imgtec com )
62
#define FFT_FIXED_32 1
65
#include "libavutil/fixed_dsp.h"
66
#include "libavutil/opt.h"
77
#include "aacdectab.h"
78
#include "cbrt_tablegen.h"
81
#include "mpeg4audio.h"
82
#include "aacadtsdec.h"
83
#include "libavutil/intfloat.h"
88
static av_always_inline void reset_predict_state(PredictorState *ps)
98
ps->var0.mant = 0x20000000;
100
ps->var1.mant = 0x20000000;
104
static const int exp2tab[4] = { Q31(1.0000000000/2), Q31(1.1892071150/2), Q31(1.4142135624/2), Q31(1.6817928305/2) }; // 2^0, 2^0.25, 2^0.5, 2^0.75
106
static inline int *DEC_SPAIR(int *dst, unsigned idx)
108
dst[0] = (idx & 15) - 4;
109
dst[1] = (idx >> 4 & 15) - 4;
114
static inline int *DEC_SQUAD(int *dst, unsigned idx)
116
dst[0] = (idx & 3) - 1;
117
dst[1] = (idx >> 2 & 3) - 1;
118
dst[2] = (idx >> 4 & 3) - 1;
119
dst[3] = (idx >> 6 & 3) - 1;
124
static inline int *DEC_UPAIR(int *dst, unsigned idx, unsigned sign)
126
dst[0] = (idx & 15) * (1 - (sign & 0xFFFFFFFE));
127
dst[1] = (idx >> 4 & 15) * (1 - ((sign & 1) << 1));
132
static inline int *DEC_UQUAD(int *dst, unsigned idx, unsigned sign)
134
unsigned nz = idx >> 12;
136
dst[0] = (idx & 3) * (1 + (((int)sign >> 31) << 1));
139
dst[1] = (idx >> 2 & 3) * (1 + (((int)sign >> 31) << 1));
142
dst[2] = (idx >> 4 & 3) * (1 + (((int)sign >> 31) << 1));
145
dst[3] = (idx >> 6 & 3) * (1 + (((int)sign >> 31) << 1));
150
static void vector_pow43(int *coefs, int len)
154
for (i=0; i<len; i++) {
157
coef = -(int)cbrt_tab[-coef];
159
coef = (int)cbrt_tab[coef];
164
static void subband_scale(int *dst, int *src, int scale, int offset, int len)
166
int ssign = scale < 0 ? -1 : 1;
167
int s = FFABS(scale);
169
int i, out, c = exp2tab[s & 3];
171
s = offset - (s >> 2);
175
for (i=0; i<len; i++) {
176
out = (int)(((int64_t)src[i] * c) >> 32);
177
dst[i] = ((int)(out+round) >> s) * ssign;
183
for (i=0; i<len; i++) {
184
out = (int)((int64_t)((int64_t)src[i] * c + round) >> s);
185
dst[i] = out * ssign;
190
static void noise_scale(int *coefs, int scale, int band_energy, int len)
192
int ssign = scale < 0 ? -1 : 1;
193
int s = FFABS(scale);
195
int i, out, c = exp2tab[s & 3];
198
while (band_energy > 0x7fff) {
203
s = 21 + nlz - (s >> 2);
207
for (i=0; i<len; i++) {
208
out = (int)(((int64_t)coefs[i] * c) >> 32);
209
coefs[i] = ((int)(out+round) >> s) * ssign;
215
for (i=0; i<len; i++) {
216
out = (int)((int64_t)((int64_t)coefs[i] * c + round) >> s);
217
coefs[i] = out * ssign;
222
static av_always_inline SoftFloat flt16_round(SoftFloat pf)
229
tmp.mant = (pf.mant ^ s) - s;
230
tmp.mant = (tmp.mant + 0x00200000U) & 0xFFC00000U;
231
tmp.mant = (tmp.mant ^ s) - s;
236
static av_always_inline SoftFloat flt16_even(SoftFloat pf)
243
tmp.mant = (pf.mant ^ s) - s;
244
tmp.mant = (tmp.mant + 0x001FFFFFU + (tmp.mant & 0x00400000U >> 16)) & 0xFFC00000U;
245
tmp.mant = (tmp.mant ^ s) - s;
250
static av_always_inline SoftFloat flt16_trunc(SoftFloat pf)
257
pun.mant = (pf.mant ^ s) - s;
258
pun.mant = pun.mant & 0xFFC00000U;
259
pun.mant = (pun.mant ^ s) - s;
264
static av_always_inline void predict(PredictorState *ps, int *coef,
267
const SoftFloat a = { 1023410176, 0 }; // 61.0 / 64
268
const SoftFloat alpha = { 973078528, 0 }; // 29.0 / 32
272
SoftFloat r0 = ps->r0, r1 = ps->r1;
273
SoftFloat cor0 = ps->cor0, cor1 = ps->cor1;
274
SoftFloat var0 = ps->var0, var1 = ps->var1;
277
if (var0.exp > 1 || (var0.exp == 1 && var0.mant > 0x20000000)) {
278
k1 = av_mul_sf(cor0, flt16_even(av_div_sf(a, var0)));
285
if (var1.exp > 1 || (var1.exp == 1 && var1.mant > 0x20000000)) {
286
k2 = av_mul_sf(cor1, flt16_even(av_div_sf(a, var1)));
293
tmp = av_mul_sf(k1, r0);
294
pv = flt16_round(av_add_sf(tmp, av_mul_sf(k2, r1)));
296
int shift = 28 - pv.exp;
299
*coef += (pv.mant + (1 << (shift - 1))) >> shift;
302
e0 = av_int2sf(*coef, 2);
303
e1 = av_sub_sf(e0, tmp);
305
ps->cor1 = flt16_trunc(av_add_sf(av_mul_sf(alpha, cor1), av_mul_sf(r1, e1)));
306
tmp = av_add_sf(av_mul_sf(r1, r1), av_mul_sf(e1, e1));
308
ps->var1 = flt16_trunc(av_add_sf(av_mul_sf(alpha, var1), tmp));
309
ps->cor0 = flt16_trunc(av_add_sf(av_mul_sf(alpha, cor0), av_mul_sf(r0, e0)));
310
tmp = av_add_sf(av_mul_sf(r0, r0), av_mul_sf(e0, e0));
312
ps->var0 = flt16_trunc(av_add_sf(av_mul_sf(alpha, var0), tmp));
314
ps->r1 = flt16_trunc(av_mul_sf(a, av_sub_sf(r0, av_mul_sf(k1, e0))));
315
ps->r0 = flt16_trunc(av_mul_sf(a, e0));
319
static const int cce_scale_fixed[8] = {
321
Q30(1.0905077327), //2^(1/8)
322
Q30(1.1892071150), //2^(2/8)
323
Q30(1.2968395547), //2^(3/8)
324
Q30(1.4142135624), //2^(4/8)
325
Q30(1.5422108254), //2^(5/8)
326
Q30(1.6817928305), //2^(6/8)
327
Q30(1.8340080864), //2^(7/8)
331
* Apply dependent channel coupling (applied before IMDCT).
333
* @param index index into coupling gain array
335
static void apply_dependent_coupling_fixed(AACContext *ac,
336
SingleChannelElement *target,
337
ChannelElement *cce, int index)
339
IndividualChannelStream *ics = &cce->ch[0].ics;
340
const uint16_t *offsets = ics->swb_offset;
341
int *dest = target->coeffs;
342
const int *src = cce->ch[0].coeffs;
343
int g, i, group, k, idx = 0;
344
if (ac->oc[1].m4ac.object_type == AOT_AAC_LTP) {
345
av_log(ac->avctx, AV_LOG_ERROR,
346
"Dependent coupling is not supported together with LTP\n");
349
for (g = 0; g < ics->num_window_groups; g++) {
350
for (i = 0; i < ics->max_sfb; i++, idx++) {
351
if (cce->ch[0].band_type[idx] != ZERO_BT) {
352
const int gain = cce->coup.gain[index][idx];
353
int shift, round, c, tmp;
356
c = -cce_scale_fixed[-gain & 7];
357
shift = (-gain-1024) >> 3;
360
c = cce_scale_fixed[gain & 7];
361
shift = (gain-1024) >> 3;
366
round = 1 << (shift - 1);
368
for (group = 0; group < ics->group_len[g]; group++) {
369
for (k = offsets[i]; k < offsets[i + 1]; k++) {
370
tmp = (int)(((int64_t)src[group * 128 + k] * c + \
371
(int64_t)0x1000000000) >> 37);
372
dest[group * 128 + k] += (tmp + round) >> shift;
377
for (group = 0; group < ics->group_len[g]; group++) {
378
for (k = offsets[i]; k < offsets[i + 1]; k++) {
379
tmp = (int)(((int64_t)src[group * 128 + k] * c + \
380
(int64_t)0x1000000000) >> 37);
381
dest[group * 128 + k] += tmp << shift;
387
dest += ics->group_len[g] * 128;
388
src += ics->group_len[g] * 128;
393
* Apply independent channel coupling (applied after IMDCT).
395
* @param index index into coupling gain array
397
static void apply_independent_coupling_fixed(AACContext *ac,
398
SingleChannelElement *target,
399
ChannelElement *cce, int index)
401
int i, c, shift, round, tmp;
402
const int gain = cce->coup.gain[index][0];
403
const int *src = cce->ch[0].ret;
404
int *dest = target->ret;
405
const int len = 1024 << (ac->oc[1].m4ac.sbr == 1);
407
c = cce_scale_fixed[gain & 7];
408
shift = (gain-1024) >> 3;
411
round = 1 << (shift - 1);
413
for (i = 0; i < len; i++) {
414
tmp = (int)(((int64_t)src[i] * c + (int64_t)0x1000000000) >> 37);
415
dest[i] += (tmp + round) >> shift;
419
for (i = 0; i < len; i++) {
420
tmp = (int)(((int64_t)src[i] * c + (int64_t)0x1000000000) >> 37);
421
dest[i] += tmp << shift;
426
#include "aacdec_template.c"
428
AVCodec ff_aac_fixed_decoder = {
430
.long_name = NULL_IF_CONFIG_SMALL("AAC (Advanced Audio Coding)"),
431
.type = AVMEDIA_TYPE_AUDIO,
432
.id = AV_CODEC_ID_AAC,
433
.priv_data_size = sizeof(AACContext),
434
.init = aac_decode_init,
435
.close = aac_decode_close,
436
.decode = aac_decode_frame,
437
.sample_fmts = (const enum AVSampleFormat[]) {
438
AV_SAMPLE_FMT_S32P, AV_SAMPLE_FMT_NONE
440
.capabilities = AV_CODEC_CAP_CHANNEL_CONF | AV_CODEC_CAP_DR1,
441
.channel_layouts = aac_channel_layout,