mirror of https://github.com/FFmpeg/FFmpeg.git
Originally committed as revision 7933 to svn://svn.ffmpeg.org/ffmpeg/trunkpull/126/head
parent
f70f03f623
commit
0900a85fe8
18 changed files with 5 additions and 3926 deletions
@ -1,73 +0,0 @@ |
||||
/*
|
||||
* a52.h |
||||
* Copyright (C) 2000-2003 Michel Lespinasse <walken@zoy.org> |
||||
* Copyright (C) 1999-2000 Aaron Holtzman <aholtzma@ess.engr.uvic.ca> |
||||
* |
||||
* This file is part of a52dec, a free ATSC A-52 stream decoder. |
||||
* See http://liba52.sourceforge.net/ for updates.
|
||||
* |
||||
* a52dec is free software; you can redistribute it and/or modify |
||||
* it under the terms of the GNU General Public License as published by |
||||
* the Free Software Foundation; either version 2 of the License, or |
||||
* (at your option) any later version. |
||||
* |
||||
* a52dec is distributed in the hope that it will be useful, |
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of |
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
||||
* GNU General Public License for more details. |
||||
* |
||||
* You should have received a copy of the GNU General Public License |
||||
* along with this program; if not, write to the Free Software |
||||
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA |
||||
*/ |
||||
|
||||
#ifndef A52_H |
||||
#define A52_H |
||||
|
||||
#include "../avcodec.h" |
||||
|
||||
#undef malloc |
||||
#undef free |
||||
#undef realloc |
||||
|
||||
#if defined(LIBA52_FIXED) |
||||
typedef int32_t sample_t; |
||||
typedef int32_t level_t; |
||||
#elif defined(LIBA52_DOUBLE) |
||||
typedef double sample_t; |
||||
typedef double level_t; |
||||
#else |
||||
typedef float sample_t; |
||||
typedef float level_t; |
||||
#endif |
||||
|
||||
typedef struct a52_state_s a52_state_t; |
||||
|
||||
#define A52_CHANNEL 0 |
||||
#define A52_MONO 1 |
||||
#define A52_STEREO 2 |
||||
#define A52_3F 3 |
||||
#define A52_2F1R 4 |
||||
#define A52_3F1R 5 |
||||
#define A52_2F2R 6 |
||||
#define A52_3F2R 7 |
||||
#define A52_CHANNEL1 8 |
||||
#define A52_CHANNEL2 9 |
||||
#define A52_DOLBY 10 |
||||
#define A52_CHANNEL_MASK 15 |
||||
|
||||
#define A52_LFE 16 |
||||
#define A52_ADJUST_LEVEL 32 |
||||
|
||||
a52_state_t * a52_init (uint32_t mm_accel); |
||||
sample_t * a52_samples (a52_state_t * state); |
||||
int a52_syncinfo (uint8_t * buf, int * flags, |
||||
int * sample_rate, int * bit_rate); |
||||
int a52_frame (a52_state_t * state, uint8_t * buf, int * flags, |
||||
level_t * level, sample_t bias); |
||||
void a52_dynrng (a52_state_t * state, |
||||
level_t (* call) (level_t, void *), void * data); |
||||
int a52_block (a52_state_t * state); |
||||
void a52_free (a52_state_t * state); |
||||
|
||||
#endif /* A52_H */ |
@ -1,162 +0,0 @@ |
||||
/*
|
||||
* a52_internal.h |
||||
* Copyright (C) 2000-2003 Michel Lespinasse <walken@zoy.org> |
||||
* Copyright (C) 1999-2000 Aaron Holtzman <aholtzma@ess.engr.uvic.ca> |
||||
* |
||||
* This file is part of a52dec, a free ATSC A-52 stream decoder. |
||||
* See http://liba52.sourceforge.net/ for updates.
|
||||
* |
||||
* a52dec is free software; you can redistribute it and/or modify |
||||
* it under the terms of the GNU General Public License as published by |
||||
* the Free Software Foundation; either version 2 of the License, or |
||||
* (at your option) any later version. |
||||
* |
||||
* a52dec is distributed in the hope that it will be useful, |
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of |
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
||||
* GNU General Public License for more details. |
||||
* |
||||
* You should have received a copy of the GNU General Public License |
||||
* along with this program; if not, write to the Free Software |
||||
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA |
||||
*/ |
||||
|
||||
typedef struct { |
||||
uint8_t bai; /* fine SNR offset, fast gain */ |
||||
uint8_t deltbae; /* delta bit allocation exists */ |
||||
int8_t deltba[50]; /* per-band delta bit allocation */ |
||||
} ba_t; |
||||
|
||||
typedef struct { |
||||
uint8_t exp[256]; /* decoded channel exponents */ |
||||
int8_t bap[256]; /* derived channel bit allocation */ |
||||
} expbap_t; |
||||
|
||||
struct a52_state_s { |
||||
uint8_t fscod; /* sample rate */ |
||||
uint8_t halfrate; /* halfrate factor */ |
||||
uint8_t acmod; /* coded channels */ |
||||
uint8_t lfeon; /* coded lfe channel */ |
||||
level_t clev; /* centre channel mix level */ |
||||
level_t slev; /* surround channels mix level */ |
||||
|
||||
int output; /* type of output */ |
||||
level_t level; /* output level */ |
||||
sample_t bias; /* output bias */ |
||||
|
||||
int dynrnge; /* apply dynamic range */ |
||||
level_t dynrng; /* dynamic range */ |
||||
void * dynrngdata; /* dynamic range callback funtion and data */ |
||||
level_t (* dynrngcall) (level_t range, void * dynrngdata); |
||||
|
||||
uint8_t chincpl; /* channel coupled */ |
||||
uint8_t phsflginu; /* phase flags in use (stereo only) */ |
||||
uint8_t cplstrtmant; /* coupling channel start mantissa */ |
||||
uint8_t cplendmant; /* coupling channel end mantissa */ |
||||
uint32_t cplbndstrc; /* coupling band structure */ |
||||
level_t cplco[5][18]; /* coupling coordinates */ |
||||
|
||||
/* derived information */ |
||||
uint8_t cplstrtbnd; /* coupling start band (for bit allocation) */ |
||||
uint8_t ncplbnd; /* number of coupling bands */ |
||||
|
||||
uint8_t rematflg; /* stereo rematrixing */ |
||||
|
||||
uint8_t endmant[5]; /* channel end mantissa */ |
||||
|
||||
uint16_t bai; /* bit allocation information */ |
||||
|
||||
uint32_t * buffer_start; |
||||
uint16_t lfsr_state; /* dither state */ |
||||
uint32_t bits_left; |
||||
uint32_t current_word; |
||||
|
||||
uint8_t csnroffst; /* coarse SNR offset */ |
||||
ba_t cplba; /* coupling bit allocation parameters */ |
||||
ba_t ba[5]; /* channel bit allocation parameters */ |
||||
ba_t lfeba; /* lfe bit allocation parameters */ |
||||
|
||||
uint8_t cplfleak; /* coupling fast leak init */ |
||||
uint8_t cplsleak; /* coupling slow leak init */ |
||||
|
||||
expbap_t cpl_expbap; |
||||
expbap_t fbw_expbap[5]; |
||||
expbap_t lfe_expbap; |
||||
|
||||
sample_t * samples; |
||||
int downmixed; |
||||
}; |
||||
|
||||
#define LEVEL_PLUS6DB 2.0 |
||||
#define LEVEL_PLUS3DB 1.4142135623730951 |
||||
#define LEVEL_3DB 0.7071067811865476 |
||||
#define LEVEL_45DB 0.5946035575013605 |
||||
#define LEVEL_6DB 0.5 |
||||
|
||||
#define EXP_REUSE (0) |
||||
#define EXP_D15 (1) |
||||
#define EXP_D25 (2) |
||||
#define EXP_D45 (3) |
||||
|
||||
#define DELTA_BIT_REUSE (0) |
||||
#define DELTA_BIT_NEW (1) |
||||
#define DELTA_BIT_NONE (2) |
||||
#define DELTA_BIT_RESERVED (3) |
||||
|
||||
void a52_bit_allocate (a52_state_t * state, ba_t * ba, int bndstart, |
||||
int start, int end, int fastleak, int slowleak, |
||||
expbap_t * expbap); |
||||
|
||||
int a52_downmix_init (int input, int flags, level_t * level, |
||||
level_t clev, level_t slev); |
||||
int a52_downmix_coeff (level_t * coeff, int acmod, int output, level_t level, |
||||
level_t clev, level_t slev); |
||||
void a52_downmix (sample_t * samples, int acmod, int output, sample_t bias, |
||||
level_t clev, level_t slev); |
||||
void a52_upmix (sample_t * samples, int acmod, int output); |
||||
|
||||
void a52_imdct_init (uint32_t mm_accel); |
||||
void a52_imdct_256 (sample_t * data, sample_t * delay, sample_t bias); |
||||
void a52_imdct_512 (sample_t * data, sample_t * delay, sample_t bias); |
||||
//extern void (* a52_imdct_256) (sample_t data[], sample_t delay[], sample_t bias);
|
||||
//extern void (* a52_imdct_512) (sample_t data[], sample_t delay[], sample_t bias);
|
||||
|
||||
#define ROUND(x) ((int)((x) + ((x) > 0 ? 0.5 : -0.5))) |
||||
|
||||
#ifndef LIBA52_FIXED |
||||
|
||||
typedef sample_t quantizer_t; |
||||
#define SAMPLE(x) (x) |
||||
#define LEVEL(x) (x) |
||||
#define MUL(a,b) ((a) * (b)) |
||||
#define MUL_L(a,b) ((a) * (b)) |
||||
#define MUL_C(a,b) ((a) * (b)) |
||||
#define DIV(a,b) ((a) / (b)) |
||||
#define BIAS(x) ((x) + bias) |
||||
|
||||
#else /* LIBA52_FIXED */ |
||||
|
||||
typedef int16_t quantizer_t; |
||||
#define SAMPLE(x) (sample_t)((x) * (1 << 30)) |
||||
#define LEVEL(x) (level_t)((x) * (1 << 26)) |
||||
|
||||
#if 0 |
||||
#define MUL(a,b) ((int)(((int64_t)(a) * (b) + (1 << 29)) >> 30)) |
||||
#define MUL_L(a,b) ((int)(((int64_t)(a) * (b) + (1 << 25)) >> 26)) |
||||
#elif 1 |
||||
#define MUL(a,b) \ |
||||
({ int32_t _ta=(a), _tb=(b), _tc; \
|
||||
_tc=(_ta & 0xffff)*(_tb >> 16)+(_ta >> 16)*(_tb & 0xffff); (int32_t)(((_tc >> 14))+ (((_ta >> 16)*(_tb >> 16)) << 2 )); }) |
||||
#define MUL_L(a,b) \ |
||||
({ int32_t _ta=(a), _tb=(b), _tc; \
|
||||
_tc=(_ta & 0xffff)*(_tb >> 16)+(_ta >> 16)*(_tb & 0xffff); (int32_t)((_tc >> 10) + (((_ta >> 16)*(_tb >> 16)) << 6)); }) |
||||
#else |
||||
#define MUL(a,b) (((a) >> 15) * ((b) >> 15)) |
||||
#define MUL_L(a,b) (((a) >> 13) * ((b) >> 13)) |
||||
#endif |
||||
|
||||
#define MUL_C(a,b) MUL_L (a, LEVEL (b)) |
||||
#define DIV(a,b) ((((int64_t)LEVEL (a)) << 26) / (b)) |
||||
#define BIAS(x) (x) |
||||
|
||||
#endif |
@ -1,32 +0,0 @@ |
||||
/*
|
||||
* a52_util.h |
||||
* Copyright (C) 2000-2003 Michel Lespinasse <walken@zoy.org> |
||||
* Copyright (C) 1999-2000 Aaron Holtzman <aholtzma@ess.engr.uvic.ca> |
||||
* |
||||
* This file is part of a52dec, a free ATSC A-52 stream decoder. |
||||
* See http://liba52.sourceforge.net/ for updates.
|
||||
* |
||||
* a52dec is free software; you can redistribute it and/or modify |
||||
* it under the terms of the GNU General Public License as published by |
||||
* the Free Software Foundation; either version 2 of the License, or |
||||
* (at your option) any later version. |
||||
* |
||||
* a52dec is distributed in the hope that it will be useful, |
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of |
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
||||
* GNU General Public License for more details. |
||||
* |
||||
* You should have received a copy of the GNU General Public License |
||||
* along with this program; if not, write to the Free Software |
||||
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA |
||||
*/ |
||||
|
||||
#ifndef A52_UTIL_H |
||||
#define A52_UTIL_H |
||||
|
||||
uint16_t a52_crc16_block(uint8_t *data,uint32_t num_bytes); |
||||
|
||||
void* a52_resample_init(uint32_t mm_accel,int flags,int chans); |
||||
extern int (* a52_resample) (float * _f, int16_t * s16); |
||||
|
||||
#endif /* A52_H */ |
@ -1,260 +0,0 @@ |
||||
/*
|
||||
* bit_allocate.c |
||||
* Copyright (C) 2000-2003 Michel Lespinasse <walken@zoy.org> |
||||
* Copyright (C) 1999-2000 Aaron Holtzman <aholtzma@ess.engr.uvic.ca> |
||||
* |
||||
* This file is part of a52dec, a free ATSC A-52 stream decoder. |
||||
* See http://liba52.sourceforge.net/ for updates.
|
||||
* |
||||
* a52dec is free software; you can redistribute it and/or modify |
||||
* it under the terms of the GNU General Public License as published by |
||||
* the Free Software Foundation; either version 2 of the License, or |
||||
* (at your option) any later version. |
||||
* |
||||
* a52dec is distributed in the hope that it will be useful, |
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of |
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
||||
* GNU General Public License for more details. |
||||
* |
||||
* You should have received a copy of the GNU General Public License |
||||
* along with this program; if not, write to the Free Software |
||||
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA |
||||
*/ |
||||
#include "a52.h" |
||||
#include "a52_internal.h" |
||||
|
||||
static int hthtab[3][50] = { |
||||
{0x730, 0x730, 0x7c0, 0x800, 0x820, 0x840, 0x850, 0x850, 0x860, 0x860, |
||||
0x860, 0x860, 0x860, 0x870, 0x870, 0x870, 0x880, 0x880, 0x890, 0x890, |
||||
0x8a0, 0x8a0, 0x8b0, 0x8b0, 0x8c0, 0x8c0, 0x8d0, 0x8e0, 0x8f0, 0x900, |
||||
0x910, 0x910, 0x910, 0x910, 0x900, 0x8f0, 0x8c0, 0x870, 0x820, 0x7e0, |
||||
0x7a0, 0x770, 0x760, 0x7a0, 0x7c0, 0x7c0, 0x6e0, 0x400, 0x3c0, 0x3c0}, |
||||
{0x710, 0x710, 0x7a0, 0x7f0, 0x820, 0x830, 0x840, 0x850, 0x850, 0x860, |
||||
0x860, 0x860, 0x860, 0x860, 0x870, 0x870, 0x870, 0x880, 0x880, 0x880, |
||||
0x890, 0x890, 0x8a0, 0x8a0, 0x8b0, 0x8b0, 0x8c0, 0x8c0, 0x8e0, 0x8f0, |
||||
0x900, 0x910, 0x910, 0x910, 0x910, 0x900, 0x8e0, 0x8b0, 0x870, 0x820, |
||||
0x7e0, 0x7b0, 0x760, 0x770, 0x7a0, 0x7c0, 0x780, 0x5d0, 0x3c0, 0x3c0}, |
||||
{0x680, 0x680, 0x750, 0x7b0, 0x7e0, 0x810, 0x820, 0x830, 0x840, 0x850, |
||||
0x850, 0x850, 0x860, 0x860, 0x860, 0x860, 0x860, 0x860, 0x860, 0x860, |
||||
0x870, 0x870, 0x870, 0x870, 0x880, 0x880, 0x880, 0x890, 0x8a0, 0x8b0, |
||||
0x8c0, 0x8d0, 0x8e0, 0x8f0, 0x900, 0x910, 0x910, 0x910, 0x900, 0x8f0, |
||||
0x8d0, 0x8b0, 0x840, 0x7f0, 0x790, 0x760, 0x7a0, 0x7c0, 0x7b0, 0x720} |
||||
}; |
||||
|
||||
static int8_t baptab[305] = { |
||||
16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, |
||||
16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, |
||||
16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, |
||||
16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, |
||||
16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, |
||||
16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, /* 93 padding elems */ |
||||
|
||||
16, 16, 16, 16, 16, 16, 16, 16, 16, 14, 14, 14, 14, 14, 14, 14, |
||||
14, 12, 12, 12, 12, 11, 11, 11, 11, 10, 10, 10, 10, 9, 9, 9, |
||||
9, 8, 8, 8, 8, 7, 7, 7, 7, 6, 6, 6, 6, 5, 5, 5, |
||||
5, 4, 4, -3, -3, 3, 3, 3, -2, -2, -1, -1, -1, -1, -1, 0, |
||||
|
||||
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, |
||||
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, |
||||
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, |
||||
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, |
||||
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, |
||||
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, |
||||
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, |
||||
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, |
||||
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, |
||||
0, 0, 0, 0 /* 148 padding elems */ |
||||
}; |
||||
|
||||
static int bndtab[30] = {21, 22, 23, 24, 25, 26, 27, 28, 31, 34, |
||||
37, 40, 43, 46, 49, 55, 61, 67, 73, 79, |
||||
85, 97, 109, 121, 133, 157, 181, 205, 229, 253}; |
||||
|
||||
static int8_t latab[256] = { |
||||
-64, -63, -62, -61, -60, -59, -58, -57, -56, -55, -54, -53, |
||||
-52, -52, -51, -50, -49, -48, -47, -47, -46, -45, -44, -44, |
||||
-43, -42, -41, -41, -40, -39, -38, -38, -37, -36, -36, -35, |
||||
-35, -34, -33, -33, -32, -32, -31, -30, -30, -29, -29, -28, |
||||
-28, -27, -27, -26, -26, -25, -25, -24, -24, -23, -23, -22, |
||||
-22, -21, -21, -21, -20, -20, -19, -19, -19, -18, -18, -18, |
||||
-17, -17, -17, -16, -16, -16, -15, -15, -15, -14, -14, -14, |
||||
-13, -13, -13, -13, -12, -12, -12, -12, -11, -11, -11, -11, |
||||
-10, -10, -10, -10, -10, -9, -9, -9, -9, -9, -8, -8, |
||||
-8, -8, -8, -8, -7, -7, -7, -7, -7, -7, -6, -6, |
||||
-6, -6, -6, -6, -6, -6, -5, -5, -5, -5, -5, -5, |
||||
-5, -5, -4, -4, -4, -4, -4, -4, -4, -4, -4, -4, |
||||
-4, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, -3, |
||||
-3, -3, -3, -2, -2, -2, -2, -2, -2, -2, -2, -2, |
||||
-2, -2, -2, -2, -2, -2, -2, -2, -2, -2, -1, -1, |
||||
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, |
||||
-1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, -1, |
||||
-1, -1, -1, -1, -1, -1, 0, 0, 0, 0, 0, 0, |
||||
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, |
||||
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, |
||||
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, |
||||
0, 0, 0, 0 |
||||
}; |
||||
|
||||
#define UPDATE_LEAK() \ |
||||
do { \
|
||||
fastleak += fdecay; \
|
||||
if (fastleak > psd + fgain) \
|
||||
fastleak = psd + fgain; \
|
||||
slowleak += sdecay; \
|
||||
if (slowleak > psd + sgain) \
|
||||
slowleak = psd + sgain; \
|
||||
} while (0) |
||||
|
||||
#define COMPUTE_MASK() \ |
||||
do { \
|
||||
if (psd > dbknee) \
|
||||
mask -= (psd - dbknee) >> 2; \
|
||||
if (mask > hth [i >> halfrate]) \
|
||||
mask = hth [i >> halfrate]; \
|
||||
mask -= snroffset + 128 * deltba[i]; \
|
||||
mask = (mask > 0) ? 0 : ((-mask) >> 5); \
|
||||
mask -= floor; \
|
||||
} while (0) |
||||
|
||||
void a52_bit_allocate (a52_state_t * state, ba_t * ba, int bndstart, |
||||
int start, int end, int fastleak, int slowleak, |
||||
expbap_t * expbap) |
||||
{ |
||||
static int slowgain[4] = {0x540, 0x4d8, 0x478, 0x410}; |
||||
static int dbpbtab[4] = {0xc00, 0x500, 0x300, 0x100}; |
||||
static int floortab[8] = {0x910, 0x950, 0x990, 0x9d0, |
||||
0xa10, 0xa90, 0xb10, 0x1400}; |
||||
|
||||
int i, j; |
||||
uint8_t * exp; |
||||
int8_t * bap; |
||||
int fdecay, fgain, sdecay, sgain, dbknee, floor, snroffset; |
||||
int psd, mask; |
||||
int8_t * deltba; |
||||
int * hth; |
||||
int halfrate; |
||||
|
||||
halfrate = state->halfrate; |
||||
fdecay = (63 + 20 * ((state->bai >> 7) & 3)) >> halfrate; /* fdcycod */ |
||||
fgain = 128 + 128 * (ba->bai & 7); /* fgaincod */ |
||||
sdecay = (15 + 2 * (state->bai >> 9)) >> halfrate; /* sdcycod */ |
||||
sgain = slowgain[(state->bai >> 5) & 3]; /* sgaincod */ |
||||
dbknee = dbpbtab[(state->bai >> 3) & 3]; /* dbpbcod */ |
||||
hth = hthtab[state->fscod]; |
||||
/*
|
||||
* if there is no delta bit allocation, make deltba point to an area |
||||
* known to contain zeroes. baptab+156 here. |
||||
*/ |
||||
deltba = (ba->deltbae == DELTA_BIT_NONE) ? baptab + 156 : ba->deltba; |
||||
floor = floortab[state->bai & 7]; /* floorcod */ |
||||
snroffset = 960 - 64 * state->csnroffst - 4 * (ba->bai >> 3) + floor; |
||||
floor >>= 5; |
||||
|
||||
exp = expbap->exp; |
||||
bap = expbap->bap; |
||||
|
||||
i = bndstart; |
||||
j = start; |
||||
if (start == 0) { /* not the coupling channel */ |
||||
int lowcomp; |
||||
|
||||
lowcomp = 0; |
||||
j = end - 1; |
||||
do { |
||||
if (i < j) { |
||||
if (exp[i+1] == exp[i] - 2) |
||||
lowcomp = 384; |
||||
else if (lowcomp && (exp[i+1] > exp[i])) |
||||
lowcomp -= 64; |
||||
} |
||||
psd = 128 * exp[i]; |
||||
mask = psd + fgain + lowcomp; |
||||
COMPUTE_MASK (); |
||||
bap[i] = (baptab+156)[mask + 4 * exp[i]]; |
||||
i++; |
||||
} while ((i < 3) || ((i < 7) && (exp[i] > exp[i-1]))); |
||||
fastleak = psd + fgain; |
||||
slowleak = psd + sgain; |
||||
|
||||
while (i < 7) { |
||||
if (i < j) { |
||||
if (exp[i+1] == exp[i] - 2) |
||||
lowcomp = 384; |
||||
else if (lowcomp && (exp[i+1] > exp[i])) |
||||
lowcomp -= 64; |
||||
} |
||||
psd = 128 * exp[i]; |
||||
UPDATE_LEAK (); |
||||
mask = ((fastleak + lowcomp < slowleak) ? |
||||
fastleak + lowcomp : slowleak); |
||||
COMPUTE_MASK (); |
||||
bap[i] = (baptab+156)[mask + 4 * exp[i]]; |
||||
i++; |
||||
} |
||||
|
||||
if (end == 7) /* lfe channel */ |
||||
return; |
||||
|
||||
do { |
||||
if (exp[i+1] == exp[i] - 2) |
||||
lowcomp = 320; |
||||
else if (lowcomp && (exp[i+1] > exp[i])) |
||||
lowcomp -= 64; |
||||
psd = 128 * exp[i]; |
||||
UPDATE_LEAK (); |
||||
mask = ((fastleak + lowcomp < slowleak) ? |
||||
fastleak + lowcomp : slowleak); |
||||
COMPUTE_MASK (); |
||||
bap[i] = (baptab+156)[mask + 4 * exp[i]]; |
||||
i++; |
||||
} while (i < 20); |
||||
|
||||
while (lowcomp > 128) { /* two iterations maximum */ |
||||
lowcomp -= 128; |
||||
psd = 128 * exp[i]; |
||||
UPDATE_LEAK (); |
||||
mask = ((fastleak + lowcomp < slowleak) ? |
||||
fastleak + lowcomp : slowleak); |
||||
COMPUTE_MASK (); |
||||
bap[i] = (baptab+156)[mask + 4 * exp[i]]; |
||||
i++; |
||||
} |
||||
j = i; |
||||
} |
||||
|
||||
do { |
||||
int startband, endband; |
||||
|
||||
startband = j; |
||||
endband = (bndtab[i-20] < end) ? bndtab[i-20] : end; |
||||
psd = 128 * exp[j++]; |
||||
while (j < endband) { |
||||
int next, delta; |
||||
|
||||
next = 128 * exp[j++]; |
||||
delta = next - psd; |
||||
switch (delta >> 9) { |
||||
case -6: case -5: case -4: case -3: case -2: |
||||
psd = next; |
||||
break; |
||||
case -1: |
||||
psd = next + latab[(-delta) >> 1]; |
||||
break; |
||||
case 0: |
||||
psd += latab[delta >> 1]; |
||||
break; |
||||
} |
||||
} |
||||
/* minpsd = -289 */ |
||||
UPDATE_LEAK (); |
||||
mask = (fastleak < slowleak) ? fastleak : slowleak; |
||||
COMPUTE_MASK (); |
||||
i++; |
||||
j = startband; |
||||
do { |
||||
/* max(mask+4*exp)=147=-(minpsd+fgain-deltba-snroffset)>>5+4*exp */ |
||||
/* min(mask+4*exp)=-156=-(sgain-deltba-snroffset)>>5 */ |
||||
bap[j] = (baptab+156)[mask + 4 * exp[j]]; |
||||
} while (++j < endband); |
||||
} while (j < end); |
||||
} |
@ -1,91 +0,0 @@ |
||||
/*
|
||||
* bitstream.c |
||||
* Copyright (C) 2000-2003 Michel Lespinasse <walken@zoy.org> |
||||
* Copyright (C) 1999-2000 Aaron Holtzman <aholtzma@ess.engr.uvic.ca> |
||||
* |
||||
* This file is part of a52dec, a free ATSC A-52 stream decoder. |
||||
* See http://liba52.sourceforge.net/ for updates.
|
||||
* |
||||
* a52dec is free software; you can redistribute it and/or modify |
||||
* it under the terms of the GNU General Public License as published by |
||||
* the Free Software Foundation; either version 2 of the License, or |
||||
* (at your option) any later version. |
||||
* |
||||
* a52dec is distributed in the hope that it will be useful, |
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of |
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
||||
* GNU General Public License for more details. |
||||
* |
||||
* You should have received a copy of the GNU General Public License |
||||
* along with this program; if not, write to the Free Software |
||||
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA |
||||
*/ |
||||
#include "a52.h" |
||||
#include "a52_internal.h" |
||||
#include "bitstream.h" |
||||
|
||||
#define BUFFER_SIZE 4096 |
||||
|
||||
void a52_bitstream_set_ptr (a52_state_t * state, uint8_t * buf) |
||||
{ |
||||
int align; |
||||
|
||||
align = (long)buf & 3; |
||||
state->buffer_start = (uint32_t *) (buf - align); |
||||
state->bits_left = 0; |
||||
state->current_word = 0; |
||||
bitstream_get (state, align * 8); |
||||
} |
||||
|
||||
static inline void bitstream_fill_current (a52_state_t * state) |
||||
{ |
||||
uint32_t tmp; |
||||
|
||||
tmp = *(state->buffer_start++); |
||||
state->current_word = swab32 (tmp); |
||||
} |
||||
|
||||
/*
|
||||
* The fast paths for _get is in the |
||||
* bitstream.h header file so it can be inlined. |
||||
* |
||||
* The "bottom half" of this routine is suffixed _bh |
||||
* |
||||
* -ah |
||||
*/ |
||||
|
||||
uint32_t a52_bitstream_get_bh (a52_state_t * state, uint32_t num_bits) |
||||
{ |
||||
uint32_t result; |
||||
|
||||
num_bits -= state->bits_left; |
||||
result = ((state->current_word << (32 - state->bits_left)) >> |
||||
(32 - state->bits_left)); |
||||
|
||||
bitstream_fill_current (state); |
||||
|
||||
if (num_bits != 0) |
||||
result = (result << num_bits) | (state->current_word >> (32 - num_bits)); |
||||
|
||||
state->bits_left = 32 - num_bits; |
||||
|
||||
return result; |
||||
} |
||||
|
||||
int32_t a52_bitstream_get_bh_2 (a52_state_t * state, uint32_t num_bits) |
||||
{ |
||||
int32_t result; |
||||
|
||||
num_bits -= state->bits_left; |
||||
result = ((((int32_t)state->current_word) << (32 - state->bits_left)) >> |
||||
(32 - state->bits_left)); |
||||
|
||||
bitstream_fill_current(state); |
||||
|
||||
if (num_bits != 0) |
||||
result = (result << num_bits) | (state->current_word >> (32 - num_bits)); |
||||
|
||||
state->bits_left = 32 - num_bits; |
||||
|
||||
return result; |
||||
} |
@ -1,77 +0,0 @@ |
||||
/*
|
||||
* bitstream.h |
||||
* Copyright (C) 2000-2003 Michel Lespinasse <walken@zoy.org> |
||||
* Copyright (C) 1999-2000 Aaron Holtzman <aholtzma@ess.engr.uvic.ca> |
||||
* |
||||
* This file is part of a52dec, a free ATSC A-52 stream decoder. |
||||
* See http://liba52.sourceforge.net/ for updates.
|
||||
* |
||||
* a52dec is free software; you can redistribute it and/or modify |
||||
* it under the terms of the GNU General Public License as published by |
||||
* the Free Software Foundation; either version 2 of the License, or |
||||
* (at your option) any later version. |
||||
* |
||||
* a52dec is distributed in the hope that it will be useful, |
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of |
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
||||
* GNU General Public License for more details. |
||||
* |
||||
* You should have received a copy of the GNU General Public License |
||||
* along with this program; if not, write to the Free Software |
||||
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA |
||||
*/ |
||||
|
||||
/* (stolen from the kernel) */ |
||||
#ifdef WORDS_BIGENDIAN |
||||
|
||||
# define swab32(x) (x) |
||||
|
||||
#else |
||||
|
||||
# if 0 && defined (__i386__) |
||||
|
||||
# define swab32(x) __i386_swab32(x) |
||||
static inline const uint32_t __i386_swab32(uint32_t x) |
||||
{ |
||||
__asm__("bswap %0" : "=r" (x) : "0" (x)); |
||||
return x; |
||||
} |
||||
|
||||
# else |
||||
|
||||
# define swab32(x)\ |
||||
((((uint8_t*)&x)[0] << 24) | (((uint8_t*)&x)[1] << 16) | \
|
||||
(((uint8_t*)&x)[2] << 8) | (((uint8_t*)&x)[3])) |
||||
|
||||
# endif |
||||
#endif |
||||
|
||||
void a52_bitstream_set_ptr (a52_state_t * state, uint8_t * buf); |
||||
uint32_t a52_bitstream_get_bh (a52_state_t * state, uint32_t num_bits); |
||||
int32_t a52_bitstream_get_bh_2 (a52_state_t * state, uint32_t num_bits); |
||||
|
||||
static inline uint32_t bitstream_get (a52_state_t * state, uint32_t num_bits) |
||||
{ |
||||
uint32_t result; |
||||
|
||||
if (num_bits < state->bits_left) { |
||||
result = (state->current_word << (32 - state->bits_left)) >> (32 - num_bits); |
||||
state->bits_left -= num_bits; |
||||
return result; |
||||
} |
||||
|
||||
return a52_bitstream_get_bh (state, num_bits); |
||||
} |
||||
|
||||
static inline int32_t bitstream_get_2 (a52_state_t * state, uint32_t num_bits) |
||||
{ |
||||
int32_t result; |
||||
|
||||
if (num_bits < state->bits_left) { |
||||
result = (((int32_t)state->current_word) << (32 - state->bits_left)) >> (32 - num_bits); |
||||
state->bits_left -= num_bits; |
||||
return result; |
||||
} |
||||
|
||||
return a52_bitstream_get_bh_2 (state, num_bits); |
||||
} |
@ -1,73 +0,0 @@ |
||||
/*
|
||||
* crc.c |
||||
* |
||||
* Copyright (C) Aaron Holtzman - May 1999 |
||||
* |
||||
* This file is part of ac3dec, a free Dolby AC-3 stream decoder. |
||||
* |
||||
* ac3dec is free software; you can redistribute it and/or modify |
||||
* it under the terms of the GNU General Public License as published by |
||||
* the Free Software Foundation; either version 2, or (at your option) |
||||
* any later version. |
||||
* |
||||
* ac3dec is distributed in the hope that it will be useful, |
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of |
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
||||
* GNU General Public License for more details. |
||||
* |
||||
* You should have received a copy of the GNU General Public License |
||||
* along with GNU Make; see the file COPYING. If not, write to |
||||
* the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. |
||||
* |
||||
*/ |
||||
|
||||
#include <stdlib.h> |
||||
#include <stdio.h> |
||||
#include <inttypes.h> |
||||
|
||||
static const uint16_t crc_lut[256] = |
||||
{ |
||||
0x0000,0x8005,0x800f,0x000a,0x801b,0x001e,0x0014,0x8011, |
||||
0x8033,0x0036,0x003c,0x8039,0x0028,0x802d,0x8027,0x0022, |
||||
0x8063,0x0066,0x006c,0x8069,0x0078,0x807d,0x8077,0x0072, |
||||
0x0050,0x8055,0x805f,0x005a,0x804b,0x004e,0x0044,0x8041, |
||||
0x80c3,0x00c6,0x00cc,0x80c9,0x00d8,0x80dd,0x80d7,0x00d2, |
||||
0x00f0,0x80f5,0x80ff,0x00fa,0x80eb,0x00ee,0x00e4,0x80e1, |
||||
0x00a0,0x80a5,0x80af,0x00aa,0x80bb,0x00be,0x00b4,0x80b1, |
||||
0x8093,0x0096,0x009c,0x8099,0x0088,0x808d,0x8087,0x0082, |
||||
0x8183,0x0186,0x018c,0x8189,0x0198,0x819d,0x8197,0x0192, |
||||
0x01b0,0x81b5,0x81bf,0x01ba,0x81ab,0x01ae,0x01a4,0x81a1, |
||||
0x01e0,0x81e5,0x81ef,0x01ea,0x81fb,0x01fe,0x01f4,0x81f1, |
||||
0x81d3,0x01d6,0x01dc,0x81d9,0x01c8,0x81cd,0x81c7,0x01c2, |
||||
0x0140,0x8145,0x814f,0x014a,0x815b,0x015e,0x0154,0x8151, |
||||
0x8173,0x0176,0x017c,0x8179,0x0168,0x816d,0x8167,0x0162, |
||||
0x8123,0x0126,0x012c,0x8129,0x0138,0x813d,0x8137,0x0132, |
||||
0x0110,0x8115,0x811f,0x011a,0x810b,0x010e,0x0104,0x8101, |
||||
0x8303,0x0306,0x030c,0x8309,0x0318,0x831d,0x8317,0x0312, |
||||
0x0330,0x8335,0x833f,0x033a,0x832b,0x032e,0x0324,0x8321, |
||||
0x0360,0x8365,0x836f,0x036a,0x837b,0x037e,0x0374,0x8371, |
||||
0x8353,0x0356,0x035c,0x8359,0x0348,0x834d,0x8347,0x0342, |
||||
0x03c0,0x83c5,0x83cf,0x03ca,0x83db,0x03de,0x03d4,0x83d1, |
||||
0x83f3,0x03f6,0x03fc,0x83f9,0x03e8,0x83ed,0x83e7,0x03e2, |
||||
0x83a3,0x03a6,0x03ac,0x83a9,0x03b8,0x83bd,0x83b7,0x03b2, |
||||
0x0390,0x8395,0x839f,0x039a,0x838b,0x038e,0x0384,0x8381, |
||||
0x0280,0x8285,0x828f,0x028a,0x829b,0x029e,0x0294,0x8291, |
||||
0x82b3,0x02b6,0x02bc,0x82b9,0x02a8,0x82ad,0x82a7,0x02a2, |
||||
0x82e3,0x02e6,0x02ec,0x82e9,0x02f8,0x82fd,0x82f7,0x02f2, |
||||
0x02d0,0x82d5,0x82df,0x02da,0x82cb,0x02ce,0x02c4,0x82c1, |
||||
0x8243,0x0246,0x024c,0x8249,0x0258,0x825d,0x8257,0x0252, |
||||
0x0270,0x8275,0x827f,0x027a,0x826b,0x026e,0x0264,0x8261, |
||||
0x0220,0x8225,0x822f,0x022a,0x823b,0x023e,0x0234,0x8231, |
||||
0x8213,0x0216,0x021c,0x8219,0x0208,0x820d,0x8207,0x0202 |
||||
}; |
||||
|
||||
uint16_t a52_crc16_block(uint8_t *data,uint32_t num_bytes) |
||||
{ |
||||
uint32_t i; |
||||
uint16_t state=0; |
||||
|
||||
for(i=0;i<num_bytes;i++) |
||||
state = crc_lut[data[i] ^ (state>>8)] ^ (state<<8); |
||||
|
||||
return state; |
||||
} |
@ -1,679 +0,0 @@ |
||||
/*
|
||||
* downmix.c |
||||
* Copyright (C) 2000-2003 Michel Lespinasse <walken@zoy.org> |
||||
* Copyright (C) 1999-2000 Aaron Holtzman <aholtzma@ess.engr.uvic.ca> |
||||
* |
||||
* This file is part of a52dec, a free ATSC A-52 stream decoder. |
||||
* See http://liba52.sourceforge.net/ for updates.
|
||||
* |
||||
* a52dec is free software; you can redistribute it and/or modify |
||||
* it under the terms of the GNU General Public License as published by |
||||
* the Free Software Foundation; either version 2 of the License, or |
||||
* (at your option) any later version. |
||||
* |
||||
* a52dec is distributed in the hope that it will be useful, |
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of |
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
||||
* GNU General Public License for more details. |
||||
* |
||||
* You should have received a copy of the GNU General Public License |
||||
* along with this program; if not, write to the Free Software |
||||
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA |
||||
*/ |
||||
#include "a52.h" |
||||
#include "a52_internal.h" |
||||
|
||||
#define CONVERT(acmod,output) (((output) << 3) + (acmod)) |
||||
|
||||
int a52_downmix_init (int input, int flags, level_t * level, |
||||
level_t clev, level_t slev) |
||||
{ |
||||
static uint8_t table[11][8] = { |
||||
{A52_CHANNEL, A52_DOLBY, A52_STEREO, A52_STEREO, |
||||
A52_STEREO, A52_STEREO, A52_STEREO, A52_STEREO}, |
||||
{A52_MONO, A52_MONO, A52_MONO, A52_MONO, |
||||
A52_MONO, A52_MONO, A52_MONO, A52_MONO}, |
||||
{A52_CHANNEL, A52_DOLBY, A52_STEREO, A52_STEREO, |
||||
A52_STEREO, A52_STEREO, A52_STEREO, A52_STEREO}, |
||||
{A52_CHANNEL, A52_DOLBY, A52_STEREO, A52_3F, |
||||
A52_STEREO, A52_3F, A52_STEREO, A52_3F}, |
||||
{A52_CHANNEL, A52_DOLBY, A52_STEREO, A52_STEREO, |
||||
A52_2F1R, A52_2F1R, A52_2F1R, A52_2F1R}, |
||||
{A52_CHANNEL, A52_DOLBY, A52_STEREO, A52_STEREO, |
||||
A52_2F1R, A52_3F1R, A52_2F1R, A52_3F1R}, |
||||
{A52_CHANNEL, A52_DOLBY, A52_STEREO, A52_3F, |
||||
A52_2F2R, A52_2F2R, A52_2F2R, A52_2F2R}, |
||||
{A52_CHANNEL, A52_DOLBY, A52_STEREO, A52_3F, |
||||
A52_2F2R, A52_3F2R, A52_2F2R, A52_3F2R}, |
||||
{A52_CHANNEL1, A52_MONO, A52_MONO, A52_MONO, |
||||
A52_MONO, A52_MONO, A52_MONO, A52_MONO}, |
||||
{A52_CHANNEL2, A52_MONO, A52_MONO, A52_MONO, |
||||
A52_MONO, A52_MONO, A52_MONO, A52_MONO}, |
||||
{A52_CHANNEL, A52_DOLBY, A52_STEREO, A52_DOLBY, |
||||
A52_DOLBY, A52_DOLBY, A52_DOLBY, A52_DOLBY} |
||||
}; |
||||
int output; |
||||
|
||||
output = flags & A52_CHANNEL_MASK; |
||||
if (output > A52_DOLBY) |
||||
return -1; |
||||
|
||||
output = table[output][input & 7]; |
||||
|
||||
if (output == A52_STEREO && |
||||
(input == A52_DOLBY || (input == A52_3F && clev == LEVEL (LEVEL_3DB)))) |
||||
output = A52_DOLBY; |
||||
|
||||
if (flags & A52_ADJUST_LEVEL) { |
||||
level_t adjust; |
||||
|
||||
switch (CONVERT (input & 7, output)) { |
||||
|
||||
case CONVERT (A52_3F, A52_MONO): |
||||
adjust = DIV (LEVEL_3DB, LEVEL (1) + clev); |
||||
break; |
||||
|
||||
case CONVERT (A52_STEREO, A52_MONO): |
||||
case CONVERT (A52_2F2R, A52_2F1R): |
||||
case CONVERT (A52_3F2R, A52_3F1R): |
||||
level_3db: |
||||
adjust = LEVEL (LEVEL_3DB); |
||||
break; |
||||
|
||||
case CONVERT (A52_3F2R, A52_2F1R): |
||||
if (clev < LEVEL (LEVEL_PLUS3DB - 1)) |
||||
goto level_3db; |
||||
/* break thru */ |
||||
case CONVERT (A52_3F, A52_STEREO): |
||||
case CONVERT (A52_3F1R, A52_2F1R): |
||||
case CONVERT (A52_3F1R, A52_2F2R): |
||||
case CONVERT (A52_3F2R, A52_2F2R): |
||||
adjust = DIV (1, LEVEL (1) + clev); |
||||
break; |
||||
|
||||
case CONVERT (A52_2F1R, A52_MONO): |
||||
adjust = DIV (LEVEL_PLUS3DB, LEVEL (2) + slev); |
||||
break; |
||||
|
||||
case CONVERT (A52_2F1R, A52_STEREO): |
||||
case CONVERT (A52_3F1R, A52_3F): |
||||
adjust = DIV (1, LEVEL (1) + MUL_C (slev, LEVEL_3DB)); |
||||
break; |
||||
|
||||
case CONVERT (A52_3F1R, A52_MONO): |
||||
adjust = DIV (LEVEL_3DB, LEVEL (1) + clev + MUL_C (slev, 0.5)); |
||||
break; |
||||
|
||||
case CONVERT (A52_3F1R, A52_STEREO): |
||||
adjust = DIV (1, LEVEL (1) + clev + MUL_C (slev, LEVEL_3DB)); |
||||
break; |
||||
|
||||
case CONVERT (A52_2F2R, A52_MONO): |
||||
adjust = DIV (LEVEL_3DB, LEVEL (1) + slev); |
||||
break; |
||||
|
||||
case CONVERT (A52_2F2R, A52_STEREO): |
||||
case CONVERT (A52_3F2R, A52_3F): |
||||
adjust = DIV (1, LEVEL (1) + slev); |
||||
break; |
||||
|
||||
case CONVERT (A52_3F2R, A52_MONO): |
||||
adjust = DIV (LEVEL_3DB, LEVEL (1) + clev + slev); |
||||
break; |
||||
|
||||
case CONVERT (A52_3F2R, A52_STEREO): |
||||
adjust = DIV (1, LEVEL (1) + clev + slev); |
||||
break; |
||||
|
||||
case CONVERT (A52_MONO, A52_DOLBY): |
||||
adjust = LEVEL (LEVEL_PLUS3DB); |
||||
break; |
||||
|
||||
case CONVERT (A52_3F, A52_DOLBY): |
||||
case CONVERT (A52_2F1R, A52_DOLBY): |
||||
adjust = LEVEL (1 / (1 + LEVEL_3DB)); |
||||
break; |
||||
|
||||
case CONVERT (A52_3F1R, A52_DOLBY): |
||||
case CONVERT (A52_2F2R, A52_DOLBY): |
||||
adjust = LEVEL (1 / (1 + 2 * LEVEL_3DB)); |
||||
break; |
||||
|
||||
case CONVERT (A52_3F2R, A52_DOLBY): |
||||
adjust = LEVEL (1 / (1 + 3 * LEVEL_3DB)); |
||||
break; |
||||
|
||||
default: |
||||
return output; |
||||
} |
||||
|
||||
*level = MUL_L (*level, adjust); |
||||
} |
||||
|
||||
return output; |
||||
} |
||||
|
||||
int a52_downmix_coeff (level_t * coeff, int acmod, int output, level_t level, |
||||
level_t clev, level_t slev) |
||||
{ |
||||
level_t level_3db; |
||||
|
||||
level_3db = MUL_C (level, LEVEL_3DB); |
||||
|
||||
switch (CONVERT (acmod, output & A52_CHANNEL_MASK)) { |
||||
|
||||
case CONVERT (A52_CHANNEL, A52_CHANNEL): |
||||
case CONVERT (A52_MONO, A52_MONO): |
||||
case CONVERT (A52_STEREO, A52_STEREO): |
||||
case CONVERT (A52_3F, A52_3F): |
||||
case CONVERT (A52_2F1R, A52_2F1R): |
||||
case CONVERT (A52_3F1R, A52_3F1R): |
||||
case CONVERT (A52_2F2R, A52_2F2R): |
||||
case CONVERT (A52_3F2R, A52_3F2R): |
||||
case CONVERT (A52_STEREO, A52_DOLBY): |
||||
coeff[0] = coeff[1] = coeff[2] = coeff[3] = coeff[4] = level; |
||||
return 0; |
||||
|
||||
case CONVERT (A52_CHANNEL, A52_MONO): |
||||
coeff[0] = coeff[1] = MUL_C (level, LEVEL_6DB); |
||||
return 3; |
||||
|
||||
case CONVERT (A52_STEREO, A52_MONO): |
||||
coeff[0] = coeff[1] = level_3db; |
||||
return 3; |
||||
|
||||
case CONVERT (A52_3F, A52_MONO): |
||||
coeff[0] = coeff[2] = level_3db; |
||||
coeff[1] = MUL_C (MUL_L (level_3db, clev), LEVEL_PLUS6DB); |
||||
return 7; |
||||
|
||||
case CONVERT (A52_2F1R, A52_MONO): |
||||
coeff[0] = coeff[1] = level_3db; |
||||
coeff[2] = MUL_L (level_3db, slev); |
||||
return 7; |
||||
|
||||
case CONVERT (A52_2F2R, A52_MONO): |
||||
coeff[0] = coeff[1] = level_3db; |
||||
coeff[2] = coeff[3] = MUL_L (level_3db, slev); |
||||
return 15; |
||||
|
||||
case CONVERT (A52_3F1R, A52_MONO): |
||||
coeff[0] = coeff[2] = level_3db; |
||||
coeff[1] = MUL_C (MUL_L (level_3db, clev), LEVEL_PLUS6DB); |
||||
coeff[3] = MUL_L (level_3db, slev); |
||||
return 15; |
||||
|
||||
case CONVERT (A52_3F2R, A52_MONO): |
||||
coeff[0] = coeff[2] = level_3db; |
||||
coeff[1] = MUL_C (MUL_L (level_3db, clev), LEVEL_PLUS6DB); |
||||
coeff[3] = coeff[4] = MUL_L (level_3db, slev); |
||||
return 31; |
||||
|
||||
case CONVERT (A52_MONO, A52_DOLBY): |
||||
coeff[0] = level_3db; |
||||
return 0; |
||||
|
||||
case CONVERT (A52_3F, A52_DOLBY): |
||||
coeff[0] = coeff[2] = coeff[3] = coeff[4] = level; |
||||
coeff[1] = level_3db; |
||||
return 7; |
||||
|
||||
case CONVERT (A52_3F, A52_STEREO): |
||||
case CONVERT (A52_3F1R, A52_2F1R): |
||||
case CONVERT (A52_3F2R, A52_2F2R): |
||||
coeff[0] = coeff[2] = coeff[3] = coeff[4] = level; |
||||
coeff[1] = MUL_L (level, clev); |
||||
return 7; |
||||
|
||||
case CONVERT (A52_2F1R, A52_DOLBY): |
||||
coeff[0] = coeff[1] = level; |
||||
coeff[2] = level_3db; |
||||
return 7; |
||||
|
||||
case CONVERT (A52_2F1R, A52_STEREO): |
||||
coeff[0] = coeff[1] = level; |
||||
coeff[2] = MUL_L (level_3db, slev); |
||||
return 7; |
||||
|
||||
case CONVERT (A52_3F1R, A52_DOLBY): |
||||
coeff[0] = coeff[2] = level; |
||||
coeff[1] = coeff[3] = level_3db; |
||||
return 15; |
||||
|
||||
case CONVERT (A52_3F1R, A52_STEREO): |
||||
coeff[0] = coeff[2] = level; |
||||
coeff[1] = MUL_L (level, clev); |
||||
coeff[3] = MUL_L (level_3db, slev); |
||||
return 15; |
||||
|
||||
case CONVERT (A52_2F2R, A52_DOLBY): |
||||
coeff[0] = coeff[1] = level; |
||||
coeff[2] = coeff[3] = level_3db; |
||||
return 15; |
||||
|
||||
case CONVERT (A52_2F2R, A52_STEREO): |
||||
coeff[0] = coeff[1] = level; |
||||
coeff[2] = coeff[3] = MUL_L (level, slev); |
||||
return 15; |
||||
|
||||
case CONVERT (A52_3F2R, A52_DOLBY): |
||||
coeff[0] = coeff[2] = level; |
||||
coeff[1] = coeff[3] = coeff[4] = level_3db; |
||||
return 31; |
||||
|
||||
case CONVERT (A52_3F2R, A52_2F1R): |
||||
coeff[0] = coeff[2] = level; |
||||
coeff[1] = MUL_L (level, clev); |
||||
coeff[3] = coeff[4] = level_3db; |
||||
return 31; |
||||
|
||||
case CONVERT (A52_3F2R, A52_STEREO): |
||||
coeff[0] = coeff[2] = level; |
||||
coeff[1] = MUL_L (level, clev); |
||||
coeff[3] = coeff[4] = MUL_L (level, slev); |
||||
return 31; |
||||
|
||||
case CONVERT (A52_3F1R, A52_3F): |
||||
coeff[0] = coeff[1] = coeff[2] = level; |
||||
coeff[3] = MUL_L (level_3db, slev); |
||||
return 13; |
||||
|
||||
case CONVERT (A52_3F2R, A52_3F): |
||||
coeff[0] = coeff[1] = coeff[2] = level; |
||||
coeff[3] = coeff[4] = MUL_L (level, slev); |
||||
return 29; |
||||
|
||||
case CONVERT (A52_2F2R, A52_2F1R): |
||||
coeff[0] = coeff[1] = level; |
||||
coeff[2] = coeff[3] = level_3db; |
||||
return 12; |
||||
|
||||
case CONVERT (A52_3F2R, A52_3F1R): |
||||
coeff[0] = coeff[1] = coeff[2] = level; |
||||
coeff[3] = coeff[4] = level_3db; |
||||
return 24; |
||||
|
||||
case CONVERT (A52_2F1R, A52_2F2R): |
||||
coeff[0] = coeff[1] = level; |
||||
coeff[2] = level_3db; |
||||
return 0; |
||||
|
||||
case CONVERT (A52_3F1R, A52_2F2R): |
||||
coeff[0] = coeff[2] = level; |
||||
coeff[1] = MUL_L (level, clev); |
||||
coeff[3] = level_3db; |
||||
return 7; |
||||
|
||||
case CONVERT (A52_3F1R, A52_3F2R): |
||||
coeff[0] = coeff[1] = coeff[2] = level; |
||||
coeff[3] = level_3db; |
||||
return 0; |
||||
|
||||
case CONVERT (A52_CHANNEL, A52_CHANNEL1): |
||||
coeff[0] = level; |
||||
coeff[1] = 0; |
||||
return 0; |
||||
|
||||
case CONVERT (A52_CHANNEL, A52_CHANNEL2): |
||||
coeff[0] = 0; |
||||
coeff[1] = level; |
||||
return 0; |
||||
} |
||||
|
||||
return -1; /* NOTREACHED */ |
||||
} |
||||
|
||||
static void mix2to1 (sample_t * dest, sample_t * src, sample_t bias) |
||||
{ |
||||
int i; |
||||
|
||||
for (i = 0; i < 256; i++) |
||||
dest[i] += BIAS (src[i]); |
||||
} |
||||
|
||||
static void mix3to1 (sample_t * samples, sample_t bias) |
||||
{ |
||||
int i; |
||||
|
||||
for (i = 0; i < 256; i++) |
||||
samples[i] += BIAS (samples[i + 256] + samples[i + 512]); |
||||
} |
||||
|
||||
static void mix4to1 (sample_t * samples, sample_t bias) |
||||
{ |
||||
int i; |
||||
|
||||
for (i = 0; i < 256; i++) |
||||
samples[i] += BIAS (samples[i + 256] + samples[i + 512] + |
||||
samples[i + 768]); |
||||
} |
||||
|
||||
static void mix5to1 (sample_t * samples, sample_t bias) |
||||
{ |
||||
int i; |
||||
|
||||
for (i = 0; i < 256; i++) |
||||
samples[i] += BIAS (samples[i + 256] + samples[i + 512] + |
||||
samples[i + 768] + samples[i + 1024]); |
||||
} |
||||
|
||||
static void mix3to2 (sample_t * samples, sample_t bias) |
||||
{ |
||||
int i; |
||||
sample_t common; |
||||
|
||||
for (i = 0; i < 256; i++) { |
||||
common = BIAS (samples[i + 256]); |
||||
samples[i] += common; |
||||
samples[i + 256] = samples[i + 512] + common; |
||||
} |
||||
} |
||||
|
||||
static void mix21to2 (sample_t * left, sample_t * right, sample_t bias) |
||||
{ |
||||
int i; |
||||
sample_t common; |
||||
|
||||
for (i = 0; i < 256; i++) { |
||||
common = BIAS (right[i + 256]); |
||||
left[i] += common; |
||||
right[i] += common; |
||||
} |
||||
} |
||||
|
||||
static void mix21toS (sample_t * samples, sample_t bias) |
||||
{ |
||||
int i; |
||||
sample_t surround; |
||||
|
||||
for (i = 0; i < 256; i++) { |
||||
surround = samples[i + 512]; |
||||
samples[i] += BIAS (-surround); |
||||
samples[i + 256] += BIAS (surround); |
||||
} |
||||
} |
||||
|
||||
static void mix31to2 (sample_t * samples, sample_t bias) |
||||
{ |
||||
int i; |
||||
sample_t common; |
||||
|
||||
for (i = 0; i < 256; i++) { |
||||
common = BIAS (samples[i + 256] + samples[i + 768]); |
||||
samples[i] += common; |
||||
samples[i + 256] = samples[i + 512] + common; |
||||
} |
||||
} |
||||
|
||||
static void mix31toS (sample_t * samples, sample_t bias) |
||||
{ |
||||
int i; |
||||
sample_t common, surround; |
||||
|
||||
for (i = 0; i < 256; i++) { |
||||
common = BIAS (samples[i + 256]); |
||||
surround = samples[i + 768]; |
||||
samples[i] += common - surround; |
||||
samples[i + 256] = samples[i + 512] + common + surround; |
||||
} |
||||
} |
||||
|
||||
static void mix22toS (sample_t * samples, sample_t bias) |
||||
{ |
||||
int i; |
||||
sample_t surround; |
||||
|
||||
for (i = 0; i < 256; i++) { |
||||
surround = samples[i + 512] + samples[i + 768]; |
||||
samples[i] += BIAS (-surround); |
||||
samples[i + 256] += BIAS (surround); |
||||
} |
||||
} |
||||
|
||||
static void mix32to2 (sample_t * samples, sample_t bias) |
||||
{ |
||||
int i; |
||||
sample_t common; |
||||
|
||||
for (i = 0; i < 256; i++) { |
||||
common = BIAS (samples[i + 256]); |
||||
samples[i] += common + samples[i + 768]; |
||||
samples[i + 256] = common + samples[i + 512] + samples[i + 1024]; |
||||
} |
||||
} |
||||
|
||||
static void mix32toS (sample_t * samples, sample_t bias) |
||||
{ |
||||
int i; |
||||
sample_t common, surround; |
||||
|
||||
for (i = 0; i < 256; i++) { |
||||
common = BIAS (samples[i + 256]); |
||||
surround = samples[i + 768] + samples[i + 1024]; |
||||
samples[i] += common - surround; |
||||
samples[i + 256] = samples[i + 512] + common + surround; |
||||
} |
||||
} |
||||
|
||||
static void move2to1 (sample_t * src, sample_t * dest, sample_t bias) |
||||
{ |
||||
int i; |
||||
|
||||
for (i = 0; i < 256; i++) |
||||
dest[i] = BIAS (src[i] + src[i + 256]); |
||||
} |
||||
|
||||
static void zero (sample_t * samples) |
||||
{ |
||||
int i; |
||||
|
||||
for (i = 0; i < 256; i++) |
||||
samples[i] = 0; |
||||
} |
||||
|
||||
void a52_downmix (sample_t * samples, int acmod, int output, sample_t bias, |
||||
level_t clev, level_t slev) |
||||
{ |
||||
switch (CONVERT (acmod, output & A52_CHANNEL_MASK)) { |
||||
|
||||
case CONVERT (A52_CHANNEL, A52_CHANNEL2): |
||||
memcpy (samples, samples + 256, 256 * sizeof (sample_t)); |
||||
break; |
||||
|
||||
case CONVERT (A52_CHANNEL, A52_MONO): |
||||
case CONVERT (A52_STEREO, A52_MONO): |
||||
mix_2to1: |
||||
mix2to1 (samples, samples + 256, bias); |
||||
break; |
||||
|
||||
case CONVERT (A52_2F1R, A52_MONO): |
||||
if (slev == 0) |
||||
goto mix_2to1; |
||||
case CONVERT (A52_3F, A52_MONO): |
||||
mix_3to1: |
||||
mix3to1 (samples, bias); |
||||
break; |
||||
|
||||
case CONVERT (A52_3F1R, A52_MONO): |
||||
if (slev == 0) |
||||
goto mix_3to1; |
||||
case CONVERT (A52_2F2R, A52_MONO): |
||||
if (slev == 0) |
||||
goto mix_2to1; |
||||
mix4to1 (samples, bias); |
||||
break; |
||||
|
||||
case CONVERT (A52_3F2R, A52_MONO): |
||||
if (slev == 0) |
||||
goto mix_3to1; |
||||
mix5to1 (samples, bias); |
||||
break; |
||||
|
||||
case CONVERT (A52_MONO, A52_DOLBY): |
||||
memcpy (samples + 256, samples, 256 * sizeof (sample_t)); |
||||
break; |
||||
|
||||
case CONVERT (A52_3F, A52_STEREO): |
||||
case CONVERT (A52_3F, A52_DOLBY): |
||||
mix_3to2: |
||||
mix3to2 (samples, bias); |
||||
break; |
||||
|
||||
case CONVERT (A52_2F1R, A52_STEREO): |
||||
if (slev == 0) |
||||
break; |
||||
mix21to2 (samples, samples + 256, bias); |
||||
break; |
||||
|
||||
case CONVERT (A52_2F1R, A52_DOLBY): |
||||
mix21toS (samples, bias); |
||||
break; |
||||
|
||||
case CONVERT (A52_3F1R, A52_STEREO): |
||||
if (slev == 0) |
||||
goto mix_3to2; |
||||
mix31to2 (samples, bias); |
||||
break; |
||||
|
||||
case CONVERT (A52_3F1R, A52_DOLBY): |
||||
mix31toS (samples, bias); |
||||
break; |
||||
|
||||
case CONVERT (A52_2F2R, A52_STEREO): |
||||
if (slev == 0) |
||||
break; |
||||
mix2to1 (samples, samples + 512, bias); |
||||
mix2to1 (samples + 256, samples + 768, bias); |
||||
break; |
||||
|
||||
case CONVERT (A52_2F2R, A52_DOLBY): |
||||
mix22toS (samples, bias); |
||||
break; |
||||
|
||||
case CONVERT (A52_3F2R, A52_STEREO): |
||||
if (slev == 0) |
||||
goto mix_3to2; |
||||
mix32to2 (samples, bias); |
||||
break; |
||||
|
||||
case CONVERT (A52_3F2R, A52_DOLBY): |
||||
mix32toS (samples, bias); |
||||
break; |
||||
|
||||
case CONVERT (A52_3F1R, A52_3F): |
||||
if (slev == 0) |
||||
break; |
||||
mix21to2 (samples, samples + 512, bias); |
||||
break; |
||||
|
||||
case CONVERT (A52_3F2R, A52_3F): |
||||
if (slev == 0) |
||||
break; |
||||
mix2to1 (samples, samples + 768, bias); |
||||
mix2to1 (samples + 512, samples + 1024, bias); |
||||
break; |
||||
|
||||
case CONVERT (A52_3F1R, A52_2F1R): |
||||
mix3to2 (samples, bias); |
||||
memcpy (samples + 512, samples + 768, 256 * sizeof (sample_t)); |
||||
break; |
||||
|
||||
case CONVERT (A52_2F2R, A52_2F1R): |
||||
mix2to1 (samples + 512, samples + 768, bias); |
||||
break; |
||||
|
||||
case CONVERT (A52_3F2R, A52_2F1R): |
||||
mix3to2 (samples, bias); |
||||
move2to1 (samples + 768, samples + 512, bias); |
||||
break; |
||||
|
||||
case CONVERT (A52_3F2R, A52_3F1R): |
||||
mix2to1 (samples + 768, samples + 1024, bias); |
||||
break; |
||||
|
||||
case CONVERT (A52_2F1R, A52_2F2R): |
||||
memcpy (samples + 768, samples + 512, 256 * sizeof (sample_t)); |
||||
break; |
||||
|
||||
case CONVERT (A52_3F1R, A52_2F2R): |
||||
mix3to2 (samples, bias); |
||||
memcpy (samples + 512, samples + 768, 256 * sizeof (sample_t)); |
||||
break; |
||||
|
||||
case CONVERT (A52_3F2R, A52_2F2R): |
||||
mix3to2 (samples, bias); |
||||
memcpy (samples + 512, samples + 768, 256 * sizeof (sample_t)); |
||||
memcpy (samples + 768, samples + 1024, 256 * sizeof (sample_t)); |
||||
break; |
||||
|
||||
case CONVERT (A52_3F1R, A52_3F2R): |
||||
memcpy (samples + 1024, samples + 768, 256 * sizeof (sample_t)); |
||||
break; |
||||
} |
||||
} |
||||
|
||||
void a52_upmix (sample_t * samples, int acmod, int output) |
||||
{ |
||||
switch (CONVERT (acmod, output & A52_CHANNEL_MASK)) { |
||||
|
||||
case CONVERT (A52_CHANNEL, A52_CHANNEL2): |
||||
memcpy (samples + 256, samples, 256 * sizeof (sample_t)); |
||||
break; |
||||
|
||||
case CONVERT (A52_3F2R, A52_MONO): |
||||
zero (samples + 1024); |
||||
case CONVERT (A52_3F1R, A52_MONO): |
||||
case CONVERT (A52_2F2R, A52_MONO): |
||||
zero (samples + 768); |
||||
case CONVERT (A52_3F, A52_MONO): |
||||
case CONVERT (A52_2F1R, A52_MONO): |
||||
zero (samples + 512); |
||||
case CONVERT (A52_CHANNEL, A52_MONO): |
||||
case CONVERT (A52_STEREO, A52_MONO): |
||||
zero (samples + 256); |
||||
break; |
||||
|
||||
case CONVERT (A52_3F2R, A52_STEREO): |
||||
case CONVERT (A52_3F2R, A52_DOLBY): |
||||
zero (samples + 1024); |
||||
case CONVERT (A52_3F1R, A52_STEREO): |
||||
case CONVERT (A52_3F1R, A52_DOLBY): |
||||
zero (samples + 768); |
||||
case CONVERT (A52_3F, A52_STEREO): |
||||
case CONVERT (A52_3F, A52_DOLBY): |
||||
mix_3to2: |
||||
memcpy (samples + 512, samples + 256, 256 * sizeof (sample_t)); |
||||
zero (samples + 256); |
||||
break; |
||||
|
||||
case CONVERT (A52_2F2R, A52_STEREO): |
||||
case CONVERT (A52_2F2R, A52_DOLBY): |
||||
zero (samples + 768); |
||||
case CONVERT (A52_2F1R, A52_STEREO): |
||||
case CONVERT (A52_2F1R, A52_DOLBY): |
||||
zero (samples + 512); |
||||
break; |
||||
|
||||
case CONVERT (A52_3F2R, A52_3F): |
||||
zero (samples + 1024); |
||||
case CONVERT (A52_3F1R, A52_3F): |
||||
case CONVERT (A52_2F2R, A52_2F1R): |
||||
zero (samples + 768); |
||||
break; |
||||
|
||||
case CONVERT (A52_3F2R, A52_3F1R): |
||||
zero (samples + 1024); |
||||
break; |
||||
|
||||
case CONVERT (A52_3F2R, A52_2F1R): |
||||
zero (samples + 1024); |
||||
case CONVERT (A52_3F1R, A52_2F1R): |
||||
mix_31to21: |
||||
memcpy (samples + 768, samples + 512, 256 * sizeof (sample_t)); |
||||
goto mix_3to2; |
||||
|
||||
case CONVERT (A52_3F2R, A52_2F2R): |
||||
memcpy (samples + 1024, samples + 768, 256 * sizeof (sample_t)); |
||||
goto mix_31to21; |
||||
} |
||||
} |
@ -1,411 +0,0 @@ |
||||
/*
|
||||
* imdct.c |
||||
* Copyright (C) 2000-2003 Michel Lespinasse <walken@zoy.org> |
||||
* Copyright (C) 1999-2000 Aaron Holtzman <aholtzma@ess.engr.uvic.ca> |
||||
* |
||||
* The ifft algorithms in this file have been largely inspired by Dan |
||||
* Bernstein's work, djbfft, available at http://cr.yp.to/djbfft.html
|
||||
* |
||||
* This file is part of a52dec, a free ATSC A-52 stream decoder. |
||||
* See http://liba52.sourceforge.net/ for updates.
|
||||
* |
||||
* a52dec is free software; you can redistribute it and/or modify |
||||
* it under the terms of the GNU General Public License as published by |
||||
* the Free Software Foundation; either version 2 of the License, or |
||||
* (at your option) any later version. |
||||
* |
||||
* a52dec is distributed in the hope that it will be useful, |
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of |
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
||||
* GNU General Public License for more details. |
||||
* |
||||
* You should have received a copy of the GNU General Public License |
||||
* along with this program; if not, write to the Free Software |
||||
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA |
||||
*/ |
||||
|
||||
#include "a52.h" |
||||
#include "a52_internal.h" |
||||
#include "mm_accel.h" |
||||
|
||||
typedef struct complex_s { |
||||
sample_t real; |
||||
sample_t imag; |
||||
} complex_t; |
||||
|
||||
static uint8_t fftorder[] = { |
||||
0,128, 64,192, 32,160,224, 96, 16,144, 80,208,240,112, 48,176, |
||||
8,136, 72,200, 40,168,232,104,248,120, 56,184, 24,152,216, 88, |
||||
4,132, 68,196, 36,164,228,100, 20,148, 84,212,244,116, 52,180, |
||||
252,124, 60,188, 28,156,220, 92, 12,140, 76,204,236,108, 44,172, |
||||
2,130, 66,194, 34,162,226, 98, 18,146, 82,210,242,114, 50,178, |
||||
10,138, 74,202, 42,170,234,106,250,122, 58,186, 26,154,218, 90, |
||||
254,126, 62,190, 30,158,222, 94, 14,142, 78,206,238,110, 46,174, |
||||
6,134, 70,198, 38,166,230,102,246,118, 54,182, 22,150,214, 86 |
||||
}; |
||||
|
||||
/* Root values for IFFT */ |
||||
static sample_t roots16[3]; |
||||
static sample_t roots32[7]; |
||||
static sample_t roots64[15]; |
||||
static sample_t roots128[31]; |
||||
|
||||
/* Twiddle factors for IMDCT */ |
||||
static complex_t pre1[128]; |
||||
static complex_t post1[64]; |
||||
static complex_t pre2[64]; |
||||
static complex_t post2[32]; |
||||
|
||||
static sample_t a52_imdct_window[256]; |
||||
|
||||
static void (* ifft128) (complex_t * buf); |
||||
static void (* ifft64) (complex_t * buf); |
||||
|
||||
static inline void ifft2 (complex_t * buf) |
||||
{ |
||||
sample_t r, i; |
||||
|
||||
r = buf[0].real; |
||||
i = buf[0].imag; |
||||
buf[0].real += buf[1].real; |
||||
buf[0].imag += buf[1].imag; |
||||
buf[1].real = r - buf[1].real; |
||||
buf[1].imag = i - buf[1].imag; |
||||
} |
||||
|
||||
static inline void ifft4 (complex_t * buf) |
||||
{ |
||||
sample_t tmp1, tmp2, tmp3, tmp4, tmp5, tmp6, tmp7, tmp8; |
||||
|
||||
tmp1 = buf[0].real + buf[1].real; |
||||
tmp2 = buf[3].real + buf[2].real; |
||||
tmp3 = buf[0].imag + buf[1].imag; |
||||
tmp4 = buf[2].imag + buf[3].imag; |
||||
tmp5 = buf[0].real - buf[1].real; |
||||
tmp6 = buf[0].imag - buf[1].imag; |
||||
tmp7 = buf[2].imag - buf[3].imag; |
||||
tmp8 = buf[3].real - buf[2].real; |
||||
|
||||
buf[0].real = tmp1 + tmp2; |
||||
buf[0].imag = tmp3 + tmp4; |
||||
buf[2].real = tmp1 - tmp2; |
||||
buf[2].imag = tmp3 - tmp4; |
||||
buf[1].real = tmp5 + tmp7; |
||||
buf[1].imag = tmp6 + tmp8; |
||||
buf[3].real = tmp5 - tmp7; |
||||
buf[3].imag = tmp6 - tmp8; |
||||
} |
||||
|
||||
/* basic radix-2 ifft butterfly */ |
||||
|
||||
#define BUTTERFLY_0(t0,t1,W0,W1,d0,d1) do { \ |
||||
t0 = MUL (W1, d1) + MUL (W0, d0); \
|
||||
t1 = MUL (W0, d1) - MUL (W1, d0); \
|
||||
} while (0) |
||||
|
||||
/* radix-2 ifft butterfly with bias */ |
||||
|
||||
#define BUTTERFLY_B(t0,t1,W0,W1,d0,d1) do { \ |
||||
t0 = BIAS (MUL (d1, W1) + MUL (d0, W0)); \
|
||||
t1 = BIAS (MUL (d1, W0) - MUL (d0, W1)); \
|
||||
} while (0) |
||||
|
||||
/* the basic split-radix ifft butterfly */ |
||||
|
||||
#define BUTTERFLY(a0,a1,a2,a3,wr,wi) do { \ |
||||
BUTTERFLY_0 (tmp5, tmp6, wr, wi, a2.real, a2.imag); \
|
||||
BUTTERFLY_0 (tmp8, tmp7, wr, wi, a3.imag, a3.real); \
|
||||
tmp1 = tmp5 + tmp7; \
|
||||
tmp2 = tmp6 + tmp8; \
|
||||
tmp3 = tmp6 - tmp8; \
|
||||
tmp4 = tmp7 - tmp5; \
|
||||
a2.real = a0.real - tmp1; \
|
||||
a2.imag = a0.imag - tmp2; \
|
||||
a3.real = a1.real - tmp3; \
|
||||
a3.imag = a1.imag - tmp4; \
|
||||
a0.real += tmp1; \
|
||||
a0.imag += tmp2; \
|
||||
a1.real += tmp3; \
|
||||
a1.imag += tmp4; \
|
||||
} while (0) |
||||
|
||||
/* split-radix ifft butterfly, specialized for wr=1 wi=0 */ |
||||
|
||||
#define BUTTERFLY_ZERO(a0,a1,a2,a3) do { \ |
||||
tmp1 = a2.real + a3.real; \
|
||||
tmp2 = a2.imag + a3.imag; \
|
||||
tmp3 = a2.imag - a3.imag; \
|
||||
tmp4 = a3.real - a2.real; \
|
||||
a2.real = a0.real - tmp1; \
|
||||
a2.imag = a0.imag - tmp2; \
|
||||
a3.real = a1.real - tmp3; \
|
||||
a3.imag = a1.imag - tmp4; \
|
||||
a0.real += tmp1; \
|
||||
a0.imag += tmp2; \
|
||||
a1.real += tmp3; \
|
||||
a1.imag += tmp4; \
|
||||
} while (0) |
||||
|
||||
/* split-radix ifft butterfly, specialized for wr=wi */ |
||||
|
||||
#define BUTTERFLY_HALF(a0,a1,a2,a3,w) do { \ |
||||
tmp5 = MUL (a2.real + a2.imag, w); \
|
||||
tmp6 = MUL (a2.imag - a2.real, w); \
|
||||
tmp7 = MUL (a3.real - a3.imag, w); \
|
||||
tmp8 = MUL (a3.imag + a3.real, w); \
|
||||
tmp1 = tmp5 + tmp7; \
|
||||
tmp2 = tmp6 + tmp8; \
|
||||
tmp3 = tmp6 - tmp8; \
|
||||
tmp4 = tmp7 - tmp5; \
|
||||
a2.real = a0.real - tmp1; \
|
||||
a2.imag = a0.imag - tmp2; \
|
||||
a3.real = a1.real - tmp3; \
|
||||
a3.imag = a1.imag - tmp4; \
|
||||
a0.real += tmp1; \
|
||||
a0.imag += tmp2; \
|
||||
a1.real += tmp3; \
|
||||
a1.imag += tmp4; \
|
||||
} while (0) |
||||
|
||||
static inline void ifft8 (complex_t * buf) |
||||
{ |
||||
sample_t tmp1, tmp2, tmp3, tmp4, tmp5, tmp6, tmp7, tmp8; |
||||
|
||||
ifft4 (buf); |
||||
ifft2 (buf + 4); |
||||
ifft2 (buf + 6); |
||||
BUTTERFLY_ZERO (buf[0], buf[2], buf[4], buf[6]); |
||||
BUTTERFLY_HALF (buf[1], buf[3], buf[5], buf[7], roots16[1]); |
||||
} |
||||
|
||||
static void ifft_pass (complex_t * buf, sample_t * weight, int n) |
||||
{ |
||||
complex_t * buf1; |
||||
complex_t * buf2; |
||||
complex_t * buf3; |
||||
sample_t tmp1, tmp2, tmp3, tmp4, tmp5, tmp6, tmp7, tmp8; |
||||
int i; |
||||
|
||||
buf++; |
||||
buf1 = buf + n; |
||||
buf2 = buf + 2 * n; |
||||
buf3 = buf + 3 * n; |
||||
|
||||
BUTTERFLY_ZERO (buf[-1], buf1[-1], buf2[-1], buf3[-1]); |
||||
|
||||
i = n - 1; |
||||
|
||||
do { |
||||
BUTTERFLY (buf[0], buf1[0], buf2[0], buf3[0], |
||||
weight[0], weight[2*i-n]); |
||||
buf++; |
||||
buf1++; |
||||
buf2++; |
||||
buf3++; |
||||
weight++; |
||||
} while (--i); |
||||
} |
||||
|
||||
static void ifft16 (complex_t * buf) |
||||
{ |
||||
ifft8 (buf); |
||||
ifft4 (buf + 8); |
||||
ifft4 (buf + 12); |
||||
ifft_pass (buf, roots16, 4); |
||||
} |
||||
|
||||
static void ifft32 (complex_t * buf) |
||||
{ |
||||
ifft16 (buf); |
||||
ifft8 (buf + 16); |
||||
ifft8 (buf + 24); |
||||
ifft_pass (buf, roots32, 8); |
||||
} |
||||
|
||||
static void ifft64_c (complex_t * buf) |
||||
{ |
||||
ifft32 (buf); |
||||
ifft16 (buf + 32); |
||||
ifft16 (buf + 48); |
||||
ifft_pass (buf, roots64, 16); |
||||
} |
||||
|
||||
static void ifft128_c (complex_t * buf) |
||||
{ |
||||
ifft32 (buf); |
||||
ifft16 (buf + 32); |
||||
ifft16 (buf + 48); |
||||
ifft_pass (buf, roots64, 16); |
||||
|
||||
ifft32 (buf + 64); |
||||
ifft32 (buf + 96); |
||||
ifft_pass (buf, roots128, 32); |
||||
} |
||||
|
||||
void a52_imdct_512 (sample_t * data, sample_t * delay, sample_t bias) |
||||
{ |
||||
int i, k; |
||||
sample_t t_r, t_i, a_r, a_i, b_r, b_i, w_1, w_2; |
||||
const sample_t * window = a52_imdct_window; |
||||
complex_t buf[128]; |
||||
|
||||
for (i = 0; i < 128; i++) { |
||||
k = fftorder[i]; |
||||
t_r = pre1[i].real; |
||||
t_i = pre1[i].imag; |
||||
BUTTERFLY_0 (buf[i].real, buf[i].imag, t_r, t_i, data[k], data[255-k]); |
||||
} |
||||
|
||||
ifft128 (buf); |
||||
|
||||
/* Post IFFT complex multiply plus IFFT complex conjugate*/ |
||||
/* Window and convert to real valued signal */ |
||||
for (i = 0; i < 64; i++) { |
||||
/* y[n] = z[n] * (xcos1[n] + j * xsin1[n]) ; */ |
||||
t_r = post1[i].real; |
||||
t_i = post1[i].imag; |
||||
BUTTERFLY_0 (a_r, a_i, t_i, t_r, buf[i].imag, buf[i].real); |
||||
BUTTERFLY_0 (b_r, b_i, t_r, t_i, buf[127-i].imag, buf[127-i].real); |
||||
|
||||
w_1 = window[2*i]; |
||||
w_2 = window[255-2*i]; |
||||
BUTTERFLY_B (data[255-2*i], data[2*i], w_2, w_1, a_r, delay[2*i]); |
||||
delay[2*i] = a_i; |
||||
|
||||
w_1 = window[2*i+1]; |
||||
w_2 = window[254-2*i]; |
||||
BUTTERFLY_B (data[2*i+1], data[254-2*i], w_1, w_2, b_r, delay[2*i+1]); |
||||
delay[2*i+1] = b_i; |
||||
} |
||||
} |
||||
|
||||
void a52_imdct_256 (sample_t * data, sample_t * delay, sample_t bias) |
||||
{ |
||||
int i, k; |
||||
sample_t t_r, t_i, a_r, a_i, b_r, b_i, c_r, c_i, d_r, d_i, w_1, w_2; |
||||
const sample_t * window = a52_imdct_window; |
||||
complex_t buf1[64], buf2[64]; |
||||
|
||||
/* Pre IFFT complex multiply plus IFFT cmplx conjugate */ |
||||
for (i = 0; i < 64; i++) { |
||||
k = fftorder[i]; |
||||
t_r = pre2[i].real; |
||||
t_i = pre2[i].imag; |
||||
BUTTERFLY_0 (buf1[i].real, buf1[i].imag, t_r, t_i, data[k], data[254-k]); |
||||
BUTTERFLY_0 (buf2[i].real, buf2[i].imag, t_r, t_i, data[k+1], data[255-k]); |
||||
} |
||||
|
||||
ifft64 (buf1); |
||||
ifft64 (buf2); |
||||
|
||||
/* Post IFFT complex multiply */ |
||||
/* Window and convert to real valued signal */ |
||||
for (i = 0; i < 32; i++) { |
||||
/* y1[n] = z1[n] * (xcos2[n] + j * xs in2[n]) ; */ |
||||
t_r = post2[i].real; |
||||
t_i = post2[i].imag; |
||||
BUTTERFLY_0 (a_r, a_i, t_i, t_r, buf1[i].imag, buf1[i].real); |
||||
BUTTERFLY_0 (b_r, b_i, t_r, t_i, buf1[63-i].imag, buf1[63-i].real); |
||||
BUTTERFLY_0 (c_r, c_i, t_i, t_r, buf2[i].imag, buf2[i].real); |
||||
BUTTERFLY_0 (d_r, d_i, t_r, t_i, buf2[63-i].imag, buf2[63-i].real); |
||||
|
||||
w_1 = window[2*i]; |
||||
w_2 = window[255-2*i]; |
||||
BUTTERFLY_B (data[255-2*i], data[2*i], w_2, w_1, a_r, delay[2*i]); |
||||
delay[2*i] = c_i; |
||||
|
||||
w_1 = window[128+2*i]; |
||||
w_2 = window[127-2*i]; |
||||
BUTTERFLY_B (data[128+2*i], data[127-2*i], w_1, w_2, a_i, delay[127-2*i]); |
||||
delay[127-2*i] = c_r; |
||||
|
||||
w_1 = window[2*i+1]; |
||||
w_2 = window[254-2*i]; |
||||
BUTTERFLY_B (data[254-2*i], data[2*i+1], w_2, w_1, b_i, delay[2*i+1]); |
||||
delay[2*i+1] = d_r; |
||||
|
||||
w_1 = window[129+2*i]; |
||||
w_2 = window[126-2*i]; |
||||
BUTTERFLY_B (data[129+2*i], data[126-2*i], w_1, w_2, b_r, delay[126-2*i]); |
||||
delay[126-2*i] = d_i; |
||||
} |
||||
} |
||||
|
||||
static double besselI0 (double x) |
||||
{ |
||||
double bessel = 1; |
||||
int i = 100; |
||||
|
||||
do |
||||
bessel = bessel * x / (i * i) + 1; |
||||
while (--i); |
||||
return bessel; |
||||
} |
||||
|
||||
void a52_imdct_init (uint32_t mm_accel) |
||||
{ |
||||
int i, k; |
||||
double sum; |
||||
double local_imdct_window[256]; |
||||
|
||||
/* compute imdct window - kaiser-bessel derived window, alpha = 5.0 */ |
||||
sum = 0; |
||||
for (i = 0; i < 256; i++) { |
||||
sum += besselI0 (i * (256 - i) * (5 * M_PI / 256) * (5 * M_PI / 256)); |
||||
local_imdct_window[i] = sum; |
||||
} |
||||
sum++; |
||||
for (i = 0; i < 256; i++) |
||||
a52_imdct_window[i] = SAMPLE (sqrt (local_imdct_window[i] / sum)); |
||||
|
||||
for (i = 0; i < 3; i++) |
||||
roots16[i] = SAMPLE (cos ((M_PI / 8) * (i + 1))); |
||||
|
||||
for (i = 0; i < 7; i++) |
||||
roots32[i] = SAMPLE (cos ((M_PI / 16) * (i + 1))); |
||||
|
||||
for (i = 0; i < 15; i++) |
||||
roots64[i] = SAMPLE (cos ((M_PI / 32) * (i + 1))); |
||||
|
||||
for (i = 0; i < 31; i++) |
||||
roots128[i] = SAMPLE (cos ((M_PI / 64) * (i + 1))); |
||||
|
||||
for (i = 0; i < 64; i++) { |
||||
k = fftorder[i] / 2 + 64; |
||||
pre1[i].real = SAMPLE (cos ((M_PI / 256) * (k - 0.25))); |
||||
pre1[i].imag = SAMPLE (sin ((M_PI / 256) * (k - 0.25))); |
||||
} |
||||
|
||||
for (i = 64; i < 128; i++) { |
||||
k = fftorder[i] / 2 + 64; |
||||
pre1[i].real = SAMPLE (-cos ((M_PI / 256) * (k - 0.25))); |
||||
pre1[i].imag = SAMPLE (-sin ((M_PI / 256) * (k - 0.25))); |
||||
} |
||||
|
||||
for (i = 0; i < 64; i++) { |
||||
post1[i].real = SAMPLE (cos ((M_PI / 256) * (i + 0.5))); |
||||
post1[i].imag = SAMPLE (sin ((M_PI / 256) * (i + 0.5))); |
||||
} |
||||
|
||||
for (i = 0; i < 64; i++) { |
||||
k = fftorder[i] / 4; |
||||
pre2[i].real = SAMPLE (cos ((M_PI / 128) * (k - 0.25))); |
||||
pre2[i].imag = SAMPLE (sin ((M_PI / 128) * (k - 0.25))); |
||||
} |
||||
|
||||
for (i = 0; i < 32; i++) { |
||||
post2[i].real = SAMPLE (cos ((M_PI / 128) * (i + 0.5))); |
||||
post2[i].imag = SAMPLE (sin ((M_PI / 128) * (i + 0.5))); |
||||
} |
||||
|
||||
#ifdef LIBA52_DJBFFT |
||||
if (mm_accel & MM_ACCEL_DJBFFT) { |
||||
ifft128 = (void (*) (complex_t *)) fftc4_un128; |
||||
ifft64 = (void (*) (complex_t *)) fftc4_un64; |
||||
} else |
||||
#endif |
||||
{ |
||||
ifft128 = ifft128_c; |
||||
ifft64 = ifft64_c; |
||||
} |
||||
} |
@ -1,42 +0,0 @@ |
||||
/*
|
||||
* mm_accel.h |
||||
* Copyright (C) 2000-2002 Michel Lespinasse <walken@zoy.org> |
||||
* Copyright (C) 1999-2000 Aaron Holtzman <aholtzma@ess.engr.uvic.ca> |
||||
* |
||||
* This file is part of a52dec, a free ATSC A-52 stream decoder. |
||||
* See http://liba52.sourceforge.net/ for updates.
|
||||
* |
||||
* a52dec is free software; you can redistribute it and/or modify |
||||
* it under the terms of the GNU General Public License as published by |
||||
* the Free Software Foundation; either version 2 of the License, or |
||||
* (at your option) any later version. |
||||
* |
||||
* a52dec is distributed in the hope that it will be useful, |
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of |
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
||||
* GNU General Public License for more details. |
||||
* |
||||
* You should have received a copy of the GNU General Public License |
||||
* along with this program; if not, write to the Free Software |
||||
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA |
||||
*/ |
||||
|
||||
#ifndef MM_ACCEL_H |
||||
#define MM_ACCEL_H |
||||
|
||||
/* generic accelerations */ |
||||
#define MM_ACCEL_DJBFFT 0x00000001 |
||||
|
||||
/* x86 accelerations */ |
||||
#define MM_ACCEL_X86_MMX 0x80000000 |
||||
#define MM_ACCEL_X86_3DNOW 0x40000000 |
||||
#define MM_ACCEL_X86_MMXEXT 0x20000000 |
||||
#define MM_ACCEL_X86_SSE 0x10000000 |
||||
#define MM_ACCEL_X86_3DNOWEXT 0x08000000 |
||||
|
||||
/* PPC accelerations */ |
||||
#define MM_ACCEL_PPC_ALTIVEC 0x00010000 |
||||
|
||||
uint32_t mm_accel (void); |
||||
|
||||
#endif /* MM_ACCEL_H */ |
@ -1,939 +0,0 @@ |
||||
/*
|
||||
* parse.c |
||||
* Copyright (C) 2000-2003 Michel Lespinasse <walken@zoy.org> |
||||
* Copyright (C) 1999-2000 Aaron Holtzman <aholtzma@ess.engr.uvic.ca> |
||||
* |
||||
* This file is part of a52dec, a free ATSC A-52 stream decoder. |
||||
* See http://liba52.sourceforge.net/ for updates.
|
||||
* |
||||
* a52dec is free software; you can redistribute it and/or modify |
||||
* it under the terms of the GNU General Public License as published by |
||||
* the Free Software Foundation; either version 2 of the License, or |
||||
* (at your option) any later version. |
||||
* |
||||
* a52dec is distributed in the hope that it will be useful, |
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of |
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
||||
* GNU General Public License for more details. |
||||
* |
||||
* You should have received a copy of the GNU General Public License |
||||
* along with this program; if not, write to the Free Software |
||||
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA |
||||
*/ |
||||
#include "a52.h" |
||||
#include "a52_internal.h" |
||||
#include "bitstream.h" |
||||
#include "tables.h" |
||||
|
||||
#if defined(HAVE_MEMALIGN) && !defined(__cplusplus) |
||||
/* some systems have memalign() but no declaration for it */ |
||||
void * memalign (size_t align, size_t size); |
||||
#else |
||||
/* assume malloc alignment is sufficient */ |
||||
#define memalign(align,size) malloc (size) |
||||
#endif |
||||
|
||||
typedef struct { |
||||
quantizer_t q1[2]; |
||||
quantizer_t q2[2]; |
||||
quantizer_t q4; |
||||
int q1_ptr; |
||||
int q2_ptr; |
||||
int q4_ptr; |
||||
} quantizer_set_t; |
||||
|
||||
static uint8_t halfrate[12] = {0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 2, 3}; |
||||
|
||||
a52_state_t * a52_init (uint32_t mm_accel) |
||||
{ |
||||
a52_state_t * state; |
||||
int i; |
||||
|
||||
state = (a52_state_t *) malloc (sizeof (a52_state_t)); |
||||
if (state == NULL) |
||||
return NULL; |
||||
|
||||
state->samples = (sample_t *) memalign (16, 256 * 12 * sizeof (sample_t)); |
||||
if (state->samples == NULL) { |
||||
free (state); |
||||
return NULL; |
||||
} |
||||
|
||||
for (i = 0; i < 256 * 12; i++) |
||||
state->samples[i] = 0; |
||||
|
||||
state->downmixed = 1; |
||||
|
||||
state->lfsr_state = 1; |
||||
|
||||
a52_imdct_init (mm_accel); |
||||
|
||||
return state; |
||||
} |
||||
|
||||
sample_t * a52_samples (a52_state_t * state) |
||||
{ |
||||
return state->samples; |
||||
} |
||||
|
||||
int a52_syncinfo (uint8_t * buf, int * flags, |
||||
int * sample_rate, int * bit_rate) |
||||
{ |
||||
static int rate[] = { 32, 40, 48, 56, 64, 80, 96, 112, |
||||
128, 160, 192, 224, 256, 320, 384, 448, |
||||
512, 576, 640}; |
||||
static uint8_t lfeon[8] = {0x10, 0x10, 0x04, 0x04, 0x04, 0x01, 0x04, 0x01}; |
||||
int frmsizecod; |
||||
int bitrate; |
||||
int half; |
||||
int acmod; |
||||
|
||||
if ((buf[0] != 0x0b) || (buf[1] != 0x77)) /* syncword */ |
||||
return 0; |
||||
|
||||
if (buf[5] >= 0x60) /* bsid >= 12 */ |
||||
return 0; |
||||
half = halfrate[buf[5] >> 3]; |
||||
|
||||
/* acmod, dsurmod and lfeon */ |
||||
acmod = buf[6] >> 5; |
||||
*flags = ((((buf[6] & 0xf8) == 0x50) ? A52_DOLBY : acmod) | |
||||
((buf[6] & lfeon[acmod]) ? A52_LFE : 0)); |
||||
|
||||
frmsizecod = buf[4] & 63; |
||||
if (frmsizecod >= 38) |
||||
return 0; |
||||
bitrate = rate [frmsizecod >> 1]; |
||||
*bit_rate = (bitrate * 1000) >> half; |
||||
|
||||
switch (buf[4] & 0xc0) { |
||||
case 0: |
||||
*sample_rate = 48000 >> half; |
||||
return 4 * bitrate; |
||||
case 0x40: |
||||
*sample_rate = 44100 >> half; |
||||
return 2 * (320 * bitrate / 147 + (frmsizecod & 1)); |
||||
case 0x80: |
||||
*sample_rate = 32000 >> half; |
||||
return 6 * bitrate; |
||||
default: |
||||
return 0; |
||||
} |
||||
} |
||||
|
||||
int a52_frame (a52_state_t * state, uint8_t * buf, int * flags, |
||||
level_t * level, sample_t bias) |
||||
{ |
||||
static level_t clev[4] = { LEVEL (LEVEL_3DB), LEVEL (LEVEL_45DB), |
||||
LEVEL (LEVEL_6DB), LEVEL (LEVEL_45DB) }; |
||||
static level_t slev[4] = { LEVEL (LEVEL_3DB), LEVEL (LEVEL_6DB), |
||||
0, LEVEL (LEVEL_6DB) }; |
||||
int chaninfo; |
||||
int acmod; |
||||
|
||||
state->fscod = buf[4] >> 6; |
||||
state->halfrate = halfrate[buf[5] >> 3]; |
||||
state->acmod = acmod = buf[6] >> 5; |
||||
|
||||
a52_bitstream_set_ptr (state, buf + 6); |
||||
bitstream_get (state, 3); /* skip acmod we already parsed */ |
||||
|
||||
if ((acmod == 2) && (bitstream_get (state, 2) == 2)) /* dsurmod */ |
||||
acmod = A52_DOLBY; |
||||
|
||||
state->clev = state->slev = 0; |
||||
|
||||
if ((acmod & 1) && (acmod != 1)) |
||||
state->clev = clev[bitstream_get (state, 2)]; /* cmixlev */ |
||||
|
||||
if (acmod & 4) |
||||
state->slev = slev[bitstream_get (state, 2)]; /* surmixlev */ |
||||
|
||||
state->lfeon = bitstream_get (state, 1); |
||||
|
||||
state->output = a52_downmix_init (acmod, *flags, level, |
||||
state->clev, state->slev); |
||||
if (state->output < 0) |
||||
return 1; |
||||
if (state->lfeon && (*flags & A52_LFE)) |
||||
state->output |= A52_LFE; |
||||
*flags = state->output; |
||||
/* the 2* compensates for differences in imdct */ |
||||
state->dynrng = state->level = MUL_C (*level, 2); |
||||
state->bias = bias; |
||||
state->dynrnge = 1; |
||||
state->dynrngcall = NULL; |
||||
state->cplba.deltbae = DELTA_BIT_NONE; |
||||
state->ba[0].deltbae = state->ba[1].deltbae = state->ba[2].deltbae = |
||||
state->ba[3].deltbae = state->ba[4].deltbae = DELTA_BIT_NONE; |
||||
|
||||
chaninfo = !acmod; |
||||
do { |
||||
bitstream_get (state, 5); /* dialnorm */ |
||||
if (bitstream_get (state, 1)) /* compre */ |
||||
bitstream_get (state, 8); /* compr */ |
||||
if (bitstream_get (state, 1)) /* langcode */ |
||||
bitstream_get (state, 8); /* langcod */ |
||||
if (bitstream_get (state, 1)) /* audprodie */ |
||||
bitstream_get (state, 7); /* mixlevel + roomtyp */ |
||||
} while (chaninfo--); |
||||
|
||||
bitstream_get (state, 2); /* copyrightb + origbs */ |
||||
|
||||
if (bitstream_get (state, 1)) /* timecod1e */ |
||||
bitstream_get (state, 14); /* timecod1 */ |
||||
if (bitstream_get (state, 1)) /* timecod2e */ |
||||
bitstream_get (state, 14); /* timecod2 */ |
||||
|
||||
if (bitstream_get (state, 1)) { /* addbsie */ |
||||
int addbsil; |
||||
|
||||
addbsil = bitstream_get (state, 6); |
||||
do { |
||||
bitstream_get (state, 8); /* addbsi */ |
||||
} while (addbsil--); |
||||
} |
||||
|
||||
return 0; |
||||
} |
||||
|
||||
void a52_dynrng (a52_state_t * state, |
||||
level_t (* call) (level_t, void *), void * data) |
||||
{ |
||||
state->dynrnge = 0; |
||||
if (call) { |
||||
state->dynrnge = 1; |
||||
state->dynrngcall = call; |
||||
state->dynrngdata = data; |
||||
} |
||||
} |
||||
|
||||
static int parse_exponents (a52_state_t * state, int expstr, int ngrps, |
||||
uint8_t exponent, uint8_t * dest) |
||||
{ |
||||
int exps; |
||||
|
||||
while (ngrps--) { |
||||
exps = bitstream_get (state, 7); |
||||
|
||||
exponent += exp_1[exps]; |
||||
if (exponent > 24) |
||||
return 1; |
||||
|
||||
switch (expstr) { |
||||
case EXP_D45: |
||||
*(dest++) = exponent; |
||||
*(dest++) = exponent; |
||||
case EXP_D25: |
||||
*(dest++) = exponent; |
||||
case EXP_D15: |
||||
*(dest++) = exponent; |
||||
} |
||||
|
||||
exponent += exp_2[exps]; |
||||
if (exponent > 24) |
||||
return 1; |
||||
|
||||
switch (expstr) { |
||||
case EXP_D45: |
||||
*(dest++) = exponent; |
||||
*(dest++) = exponent; |
||||
case EXP_D25: |
||||
*(dest++) = exponent; |
||||
case EXP_D15: |
||||
*(dest++) = exponent; |
||||
} |
||||
|
||||
exponent += exp_3[exps]; |
||||
if (exponent > 24) |
||||
return 1; |
||||
|
||||
switch (expstr) { |
||||
case EXP_D45: |
||||
*(dest++) = exponent; |
||||
*(dest++) = exponent; |
||||
case EXP_D25: |
||||
*(dest++) = exponent; |
||||
case EXP_D15: |
||||
*(dest++) = exponent; |
||||
} |
||||
} |
||||
|
||||
return 0; |
||||
} |
||||
|
||||
static int parse_deltba (a52_state_t * state, int8_t * deltba) |
||||
{ |
||||
int deltnseg, deltlen, delta, j; |
||||
|
||||
memset (deltba, 0, 50); |
||||
|
||||
deltnseg = bitstream_get (state, 3); |
||||
j = 0; |
||||
do { |
||||
j += bitstream_get (state, 5); |
||||
deltlen = bitstream_get (state, 4); |
||||
delta = bitstream_get (state, 3); |
||||
delta -= (delta >= 4) ? 3 : 4; |
||||
if (!deltlen) |
||||
continue; |
||||
if (j + deltlen >= 50) |
||||
return 1; |
||||
while (deltlen--) |
||||
deltba[j++] = delta; |
||||
} while (deltnseg--); |
||||
|
||||
return 0; |
||||
} |
||||
|
||||
static inline int zero_snr_offsets (int nfchans, a52_state_t * state) |
||||
{ |
||||
int i; |
||||
|
||||
if ((state->csnroffst) || |
||||
(state->chincpl && state->cplba.bai >> 3) || /* cplinu, fsnroffst */ |
||||
(state->lfeon && state->lfeba.bai >> 3)) /* fsnroffst */ |
||||
return 0; |
||||
for (i = 0; i < nfchans; i++) |
||||
if (state->ba[i].bai >> 3) /* fsnroffst */ |
||||
return 0; |
||||
return 1; |
||||
} |
||||
|
||||
static inline int16_t dither_gen (a52_state_t * state) |
||||
{ |
||||
int16_t nstate; |
||||
|
||||
nstate = dither_lut[state->lfsr_state >> 8] ^ (state->lfsr_state << 8); |
||||
|
||||
state->lfsr_state = (uint16_t) nstate; |
||||
|
||||
return (3 * nstate) >> 2; |
||||
} |
||||
|
||||
#ifndef LIBA52_FIXED |
||||
#define COEFF(c,t,l,s,e) (c) = (t) * (s)[e] |
||||
#else |
||||
#define COEFF(c,_t,_l,s,e) do { \ |
||||
quantizer_t t = (_t); \
|
||||
level_t l = (_l); \
|
||||
int shift = e - 5; \
|
||||
sample_t tmp = t * (l >> 16) + ((t * (l & 0xffff)) >> 16); \
|
||||
if (shift >= 0) \
|
||||
(c) = tmp >> shift; \
|
||||
else \
|
||||
(c) = tmp << -shift; \
|
||||
} while (0) |
||||
#endif |
||||
|
||||
static void coeff_get (a52_state_t * state, sample_t * coeff, |
||||
expbap_t * expbap, quantizer_set_t * quant, |
||||
level_t level, int dither, int end) |
||||
{ |
||||
int i; |
||||
uint8_t * exp; |
||||
int8_t * bap; |
||||
|
||||
#ifndef LIBA52_FIXED |
||||
sample_t factor[25]; |
||||
|
||||
for (i = 0; i <= 24; i++) |
||||
factor[i] = scale_factor[i] * level; |
||||
#endif |
||||
|
||||
exp = expbap->exp; |
||||
bap = expbap->bap; |
||||
|
||||
for (i = 0; i < end; i++) { |
||||
int bapi; |
||||
|
||||
bapi = bap[i]; |
||||
switch (bapi) { |
||||
case 0: |
||||
if (dither) { |
||||
COEFF (coeff[i], dither_gen (state), level, factor, exp[i]); |
||||
continue; |
||||
} else { |
||||
coeff[i] = 0; |
||||
continue; |
||||
} |
||||
|
||||
case -1: |
||||
if (quant->q1_ptr >= 0) { |
||||
COEFF (coeff[i], quant->q1[quant->q1_ptr--], level, |
||||
factor, exp[i]); |
||||
continue; |
||||
} else { |
||||
int code; |
||||
|
||||
code = bitstream_get (state, 5); |
||||
|
||||
quant->q1_ptr = 1; |
||||
quant->q1[0] = q_1_2[code]; |
||||
quant->q1[1] = q_1_1[code]; |
||||
COEFF (coeff[i], q_1_0[code], level, factor, exp[i]); |
||||
continue; |
||||
} |
||||
|
||||
case -2: |
||||
if (quant->q2_ptr >= 0) { |
||||
COEFF (coeff[i], quant->q2[quant->q2_ptr--], level, |
||||
factor, exp[i]); |
||||
continue; |
||||
} else { |
||||
int code; |
||||
|
||||
code = bitstream_get (state, 7); |
||||
|
||||
quant->q2_ptr = 1; |
||||
quant->q2[0] = q_2_2[code]; |
||||
quant->q2[1] = q_2_1[code]; |
||||
COEFF (coeff[i], q_2_0[code], level, factor, exp[i]); |
||||
continue; |
||||
} |
||||
|
||||
case 3: |
||||
COEFF (coeff[i], q_3[bitstream_get (state, 3)], level, |
||||
factor, exp[i]); |
||||
continue; |
||||
|
||||
case -3: |
||||
if (quant->q4_ptr == 0) { |
||||
quant->q4_ptr = -1; |
||||
COEFF (coeff[i], quant->q4, level, factor, exp[i]); |
||||
continue; |
||||
} else { |
||||
int code; |
||||
|
||||
code = bitstream_get (state, 7); |
||||
|
||||
quant->q4_ptr = 0; |
||||
quant->q4 = q_4_1[code]; |
||||
COEFF (coeff[i], q_4_0[code], level, factor, exp[i]); |
||||
continue; |
||||
} |
||||
|
||||
case 4: |
||||
COEFF (coeff[i], q_5[bitstream_get (state, 4)], level, |
||||
factor, exp[i]); |
||||
continue; |
||||
|
||||
default: |
||||
COEFF (coeff[i], bitstream_get_2 (state, bapi) << (16 - bapi), |
||||
level, factor, exp[i]); |
||||
} |
||||
} |
||||
} |
||||
|
||||
static void coeff_get_coupling (a52_state_t * state, int nfchans, |
||||
level_t * coeff, sample_t (* samples)[256], |
||||
quantizer_set_t * quant, uint8_t dithflag[5]) |
||||
{ |
||||
int cplbndstrc, bnd, i, i_end, ch; |
||||
uint8_t * exp; |
||||
int8_t * bap; |
||||
level_t cplco[5]; |
||||
|
||||
exp = state->cpl_expbap.exp; |
||||
bap = state->cpl_expbap.bap; |
||||
bnd = 0; |
||||
cplbndstrc = state->cplbndstrc; |
||||
i = state->cplstrtmant; |
||||
while (i < state->cplendmant) { |
||||
i_end = i + 12; |
||||
while (cplbndstrc & 1) { |
||||
cplbndstrc >>= 1; |
||||
i_end += 12; |
||||
} |
||||
cplbndstrc >>= 1; |
||||
for (ch = 0; ch < nfchans; ch++) |
||||
cplco[ch] = MUL_L (state->cplco[ch][bnd], coeff[ch]); |
||||
bnd++; |
||||
|
||||
while (i < i_end) { |
||||
quantizer_t cplcoeff; |
||||
int bapi; |
||||
|
||||
bapi = bap[i]; |
||||
switch (bapi) { |
||||
case 0: |
||||
for (ch = 0; ch < nfchans; ch++) |
||||
if ((state->chincpl >> ch) & 1) { |
||||
if (dithflag[ch]) |
||||
#ifndef LIBA52_FIXED |
||||
samples[ch][i] = (scale_factor[exp[i]] * |
||||
cplco[ch] * dither_gen (state)); |
||||
#else |
||||
COEFF (samples[ch][i], dither_gen (state), |
||||
cplco[ch], scale_factor, exp[i]); |
||||
#endif |
||||
else |
||||
samples[ch][i] = 0; |
||||
} |
||||
i++; |
||||
continue; |
||||
|
||||
case -1: |
||||
if (quant->q1_ptr >= 0) { |
||||
cplcoeff = quant->q1[quant->q1_ptr--]; |
||||
break; |
||||
} else { |
||||
int code; |
||||
|
||||
code = bitstream_get (state, 5); |
||||
|
||||
quant->q1_ptr = 1; |
||||
quant->q1[0] = q_1_2[code]; |
||||
quant->q1[1] = q_1_1[code]; |
||||
cplcoeff = q_1_0[code]; |
||||
break; |
||||
} |
||||
|
||||
case -2: |
||||
if (quant->q2_ptr >= 0) { |
||||
cplcoeff = quant->q2[quant->q2_ptr--]; |
||||
break; |
||||
} else { |
||||
int code; |
||||
|
||||
code = bitstream_get (state, 7); |
||||
|
||||
quant->q2_ptr = 1; |
||||
quant->q2[0] = q_2_2[code]; |
||||
quant->q2[1] = q_2_1[code]; |
||||
cplcoeff = q_2_0[code]; |
||||
break; |
||||
} |
||||
|
||||
case 3: |
||||
cplcoeff = q_3[bitstream_get (state, 3)]; |
||||
break; |
||||
|
||||
case -3: |
||||
if (quant->q4_ptr == 0) { |
||||
quant->q4_ptr = -1; |
||||
cplcoeff = quant->q4; |
||||
break; |
||||
} else { |
||||
int code; |
||||
|
||||
code = bitstream_get (state, 7); |
||||
|
||||
quant->q4_ptr = 0; |
||||
quant->q4 = q_4_1[code]; |
||||
cplcoeff = q_4_0[code]; |
||||
break; |
||||
} |
||||
|
||||
case 4: |
||||
cplcoeff = q_5[bitstream_get (state, 4)]; |
||||
break; |
||||
|
||||
default: |
||||
cplcoeff = bitstream_get_2 (state, bapi) << (16 - bapi); |
||||
} |
||||
#ifndef LIBA52_FIXED |
||||
cplcoeff *= scale_factor[exp[i]]; |
||||
#endif |
||||
for (ch = 0; ch < nfchans; ch++) |
||||
if ((state->chincpl >> ch) & 1) |
||||
#ifndef LIBA52_FIXED |
||||
samples[ch][i] = cplcoeff * cplco[ch]; |
||||
#else |
||||
COEFF (samples[ch][i], cplcoeff, cplco[ch], |
||||
scale_factor, exp[i]); |
||||
#endif |
||||
i++; |
||||
} |
||||
} |
||||
} |
||||
|
||||
int a52_block (a52_state_t * state) |
||||
{ |
||||
static const uint8_t nfchans_tbl[] = {2, 1, 2, 3, 3, 4, 4, 5, 1, 1, 2}; |
||||
static int rematrix_band[4] = {25, 37, 61, 253}; |
||||
int i, nfchans, chaninfo; |
||||
uint8_t cplexpstr, chexpstr[5], lfeexpstr, do_bit_alloc, done_cpl; |
||||
uint8_t blksw[5], dithflag[5]; |
||||
level_t coeff[5]; |
||||
int chanbias; |
||||
quantizer_set_t quant; |
||||
sample_t * samples; |
||||
|
||||
nfchans = nfchans_tbl[state->acmod]; |
||||
|
||||
for (i = 0; i < nfchans; i++) |
||||
blksw[i] = bitstream_get (state, 1); |
||||
|
||||
for (i = 0; i < nfchans; i++) |
||||
dithflag[i] = bitstream_get (state, 1); |
||||
|
||||
chaninfo = !state->acmod; |
||||
do { |
||||
if (bitstream_get (state, 1)) { /* dynrnge */ |
||||
int dynrng; |
||||
|
||||
dynrng = bitstream_get_2 (state, 8); |
||||
if (state->dynrnge) { |
||||
level_t range; |
||||
|
||||
#if !defined(LIBA52_FIXED) |
||||
range = ((((dynrng & 0x1f) | 0x20) << 13) * |
||||
scale_factor[3 - (dynrng >> 5)]); |
||||
#else |
||||
range = ((dynrng & 0x1f) | 0x20) << (21 + (dynrng >> 5)); |
||||
#endif |
||||
if (state->dynrngcall) |
||||
range = state->dynrngcall (range, state->dynrngdata); |
||||
state->dynrng = MUL_L (state->level, range); |
||||
} |
||||
} |
||||
} while (chaninfo--); |
||||
|
||||
if (bitstream_get (state, 1)) { /* cplstre */ |
||||
state->chincpl = 0; |
||||
if (bitstream_get (state, 1)) { /* cplinu */ |
||||
static uint8_t bndtab[16] = {31, 35, 37, 39, 41, 42, 43, 44, |
||||
45, 45, 46, 46, 47, 47, 48, 48}; |
||||
int cplbegf; |
||||
int cplendf; |
||||
int ncplsubnd; |
||||
|
||||
for (i = 0; i < nfchans; i++) |
||||
state->chincpl |= bitstream_get (state, 1) << i; |
||||
switch (state->acmod) { |
||||
case 0: case 1: |
||||
return 1; |
||||
case 2: |
||||
state->phsflginu = bitstream_get (state, 1); |
||||
} |
||||
cplbegf = bitstream_get (state, 4); |
||||
cplendf = bitstream_get (state, 4); |
||||
|
||||
if (cplendf + 3 - cplbegf < 0) |
||||
return 1; |
||||
state->ncplbnd = ncplsubnd = cplendf + 3 - cplbegf; |
||||
state->cplstrtbnd = bndtab[cplbegf]; |
||||
state->cplstrtmant = cplbegf * 12 + 37; |
||||
state->cplendmant = cplendf * 12 + 73; |
||||
|
||||
state->cplbndstrc = 0; |
||||
for (i = 0; i < ncplsubnd - 1; i++) |
||||
if (bitstream_get (state, 1)) { |
||||
state->cplbndstrc |= 1 << i; |
||||
state->ncplbnd--; |
||||
} |
||||
} |
||||
} |
||||
|
||||
if (state->chincpl) { /* cplinu */ |
||||
int j, cplcoe; |
||||
|
||||
cplcoe = 0; |
||||
for (i = 0; i < nfchans; i++) |
||||
if ((state->chincpl) >> i & 1) |
||||
if (bitstream_get (state, 1)) { /* cplcoe */ |
||||
int mstrcplco, cplcoexp, cplcomant; |
||||
|
||||
cplcoe = 1; |
||||
mstrcplco = 3 * bitstream_get (state, 2); |
||||
for (j = 0; j < state->ncplbnd; j++) { |
||||
cplcoexp = bitstream_get (state, 4); |
||||
cplcomant = bitstream_get (state, 4); |
||||
if (cplcoexp == 15) |
||||
cplcomant <<= 14; |
||||
else |
||||
cplcomant = (cplcomant | 0x10) << 13; |
||||
#ifndef LIBA52_FIXED |
||||
state->cplco[i][j] = |
||||
cplcomant * scale_factor[cplcoexp + mstrcplco]; |
||||
#else |
||||
state->cplco[i][j] = (cplcomant << 11) >> (cplcoexp + mstrcplco); |
||||
#endif |
||||
|
||||
} |
||||
} |
||||
if ((state->acmod == 2) && state->phsflginu && cplcoe) |
||||
for (j = 0; j < state->ncplbnd; j++) |
||||
if (bitstream_get (state, 1)) /* phsflg */ |
||||
state->cplco[1][j] = -state->cplco[1][j]; |
||||
} |
||||
|
||||
if ((state->acmod == 2) && (bitstream_get (state, 1))) { /* rematstr */ |
||||
int end; |
||||
|
||||
state->rematflg = 0; |
||||
end = (state->chincpl) ? state->cplstrtmant : 253; /* cplinu */ |
||||
i = 0; |
||||
do |
||||
state->rematflg |= bitstream_get (state, 1) << i; |
||||
while (rematrix_band[i++] < end); |
||||
} |
||||
|
||||
cplexpstr = EXP_REUSE; |
||||
lfeexpstr = EXP_REUSE; |
||||
if (state->chincpl) /* cplinu */ |
||||
cplexpstr = bitstream_get (state, 2); |
||||
for (i = 0; i < nfchans; i++) |
||||
chexpstr[i] = bitstream_get (state, 2); |
||||
if (state->lfeon) |
||||
lfeexpstr = bitstream_get (state, 1); |
||||
|
||||
for (i = 0; i < nfchans; i++) |
||||
if (chexpstr[i] != EXP_REUSE) { |
||||
if ((state->chincpl >> i) & 1) |
||||
state->endmant[i] = state->cplstrtmant; |
||||
else { |
||||
int chbwcod; |
||||
|
||||
chbwcod = bitstream_get (state, 6); |
||||
if (chbwcod > 60) |
||||
return 1; |
||||
state->endmant[i] = chbwcod * 3 + 73; |
||||
} |
||||
} |
||||
|
||||
do_bit_alloc = 0; |
||||
|
||||
if (cplexpstr != EXP_REUSE) { |
||||
int cplabsexp, ncplgrps; |
||||
|
||||
do_bit_alloc = 64; |
||||
ncplgrps = ((state->cplendmant - state->cplstrtmant) / |
||||
(3 << (cplexpstr - 1))); |
||||
cplabsexp = bitstream_get (state, 4) << 1; |
||||
if (parse_exponents (state, cplexpstr, ncplgrps, cplabsexp, |
||||
state->cpl_expbap.exp + state->cplstrtmant)) |
||||
return 1; |
||||
} |
||||
for (i = 0; i < nfchans; i++) |
||||
if (chexpstr[i] != EXP_REUSE) { |
||||
int grp_size, nchgrps; |
||||
|
||||
do_bit_alloc |= 1 << i; |
||||
grp_size = 3 << (chexpstr[i] - 1); |
||||
nchgrps = (state->endmant[i] + grp_size - 4) / grp_size; |
||||
state->fbw_expbap[i].exp[0] = bitstream_get (state, 4); |
||||
if (parse_exponents (state, chexpstr[i], nchgrps, |
||||
state->fbw_expbap[i].exp[0], |
||||
state->fbw_expbap[i].exp + 1)) |
||||
return 1; |
||||
bitstream_get (state, 2); /* gainrng */ |
||||
} |
||||
if (lfeexpstr != EXP_REUSE) { |
||||
do_bit_alloc |= 32; |
||||
state->lfe_expbap.exp[0] = bitstream_get (state, 4); |
||||
if (parse_exponents (state, lfeexpstr, 2, state->lfe_expbap.exp[0], |
||||
state->lfe_expbap.exp + 1)) |
||||
return 1; |
||||
} |
||||
|
||||
if (bitstream_get (state, 1)) { /* baie */ |
||||
do_bit_alloc = 127; |
||||
state->bai = bitstream_get (state, 11); |
||||
} |
||||
if (bitstream_get (state, 1)) { /* snroffste */ |
||||
do_bit_alloc = 127; |
||||
state->csnroffst = bitstream_get (state, 6); |
||||
if (state->chincpl) /* cplinu */ |
||||
state->cplba.bai = bitstream_get (state, 7); |
||||
for (i = 0; i < nfchans; i++) |
||||
state->ba[i].bai = bitstream_get (state, 7); |
||||
if (state->lfeon) |
||||
state->lfeba.bai = bitstream_get (state, 7); |
||||
} |
||||
if ((state->chincpl) && (bitstream_get (state, 1))) { /* cplleake */ |
||||
do_bit_alloc |= 64; |
||||
state->cplfleak = 9 - bitstream_get (state, 3); |
||||
state->cplsleak = 9 - bitstream_get (state, 3); |
||||
} |
||||
|
||||
if (bitstream_get (state, 1)) { /* deltbaie */ |
||||
do_bit_alloc = 127; |
||||
if (state->chincpl) /* cplinu */ |
||||
state->cplba.deltbae = bitstream_get (state, 2); |
||||
for (i = 0; i < nfchans; i++) |
||||
state->ba[i].deltbae = bitstream_get (state, 2); |
||||
if (state->chincpl && /* cplinu */ |
||||
(state->cplba.deltbae == DELTA_BIT_NEW) && |
||||
parse_deltba (state, state->cplba.deltba)) |
||||
return 1; |
||||
for (i = 0; i < nfchans; i++) |
||||
if ((state->ba[i].deltbae == DELTA_BIT_NEW) && |
||||
parse_deltba (state, state->ba[i].deltba)) |
||||
return 1; |
||||
} |
||||
|
||||
if (do_bit_alloc) { |
||||
if (zero_snr_offsets (nfchans, state)) { |
||||
memset (state->cpl_expbap.bap, 0, sizeof (state->cpl_expbap.bap)); |
||||
for (i = 0; i < nfchans; i++) |
||||
memset (state->fbw_expbap[i].bap, 0, |
||||
sizeof (state->fbw_expbap[i].bap)); |
||||
memset (state->lfe_expbap.bap, 0, sizeof (state->lfe_expbap.bap)); |
||||
} else { |
||||
if (state->chincpl && (do_bit_alloc & 64)) /* cplinu */ |
||||
a52_bit_allocate (state, &state->cplba, state->cplstrtbnd, |
||||
state->cplstrtmant, state->cplendmant, |
||||
state->cplfleak << 8, state->cplsleak << 8, |
||||
&state->cpl_expbap); |
||||
for (i = 0; i < nfchans; i++) |
||||
if (do_bit_alloc & (1 << i)) |
||||
a52_bit_allocate (state, state->ba + i, 0, 0, |
||||
state->endmant[i], 0, 0, |
||||
state->fbw_expbap +i); |
||||
if (state->lfeon && (do_bit_alloc & 32)) { |
||||
state->lfeba.deltbae = DELTA_BIT_NONE; |
||||
a52_bit_allocate (state, &state->lfeba, 0, 0, 7, 0, 0, |
||||
&state->lfe_expbap); |
||||
} |
||||
} |
||||
} |
||||
|
||||
if (bitstream_get (state, 1)) { /* skiple */ |
||||
i = bitstream_get (state, 9); /* skipl */ |
||||
while (i--) |
||||
bitstream_get (state, 8); |
||||
} |
||||
|
||||
samples = state->samples; |
||||
if (state->output & A52_LFE) |
||||
samples += 256; /* shift for LFE channel */ |
||||
|
||||
chanbias = a52_downmix_coeff (coeff, state->acmod, state->output, |
||||
state->dynrng, state->clev, state->slev); |
||||
|
||||
quant.q1_ptr = quant.q2_ptr = quant.q4_ptr = -1; |
||||
done_cpl = 0; |
||||
|
||||
for (i = 0; i < nfchans; i++) { |
||||
int j; |
||||
|
||||
coeff_get (state, samples + 256 * i, state->fbw_expbap +i, &quant, |
||||
coeff[i], dithflag[i], state->endmant[i]); |
||||
|
||||
if ((state->chincpl >> i) & 1) { |
||||
if (!done_cpl) { |
||||
done_cpl = 1; |
||||
coeff_get_coupling (state, nfchans, coeff, |
||||
(sample_t (*)[256])samples, &quant, |
||||
dithflag); |
||||
} |
||||
j = state->cplendmant; |
||||
} else |
||||
j = state->endmant[i]; |
||||
do |
||||
(samples + 256 * i)[j] = 0; |
||||
while (++j < 256); |
||||
} |
||||
|
||||
if (state->acmod == 2) { |
||||
int j, end, band, rematflg; |
||||
|
||||
end = ((state->endmant[0] < state->endmant[1]) ? |
||||
state->endmant[0] : state->endmant[1]); |
||||
|
||||
i = 0; |
||||
j = 13; |
||||
rematflg = state->rematflg; |
||||
do { |
||||
if (! (rematflg & 1)) { |
||||
rematflg >>= 1; |
||||
j = rematrix_band[i++]; |
||||
continue; |
||||
} |
||||
rematflg >>= 1; |
||||
band = rematrix_band[i++]; |
||||
if (band > end) |
||||
band = end; |
||||
do { |
||||
sample_t tmp0, tmp1; |
||||
|
||||
tmp0 = samples[j]; |
||||
tmp1 = (samples+256)[j]; |
||||
samples[j] = tmp0 + tmp1; |
||||
(samples+256)[j] = tmp0 - tmp1; |
||||
} while (++j < band); |
||||
} while (j < end); |
||||
} |
||||
|
||||
if (state->lfeon) { |
||||
if (state->output & A52_LFE) { |
||||
coeff_get (state, samples - 256, &state->lfe_expbap, &quant, |
||||
state->dynrng, 0, 7); |
||||
for (i = 7; i < 256; i++) |
||||
(samples-256)[i] = 0; |
||||
a52_imdct_512 (samples - 256, samples + 1536 - 256, state->bias); |
||||
} else { |
||||
/* just skip the LFE coefficients */ |
||||
coeff_get (state, samples + 1280, &state->lfe_expbap, &quant, |
||||
0, 0, 7); |
||||
} |
||||
} |
||||
|
||||
i = 0; |
||||
if (nfchans_tbl[state->output & A52_CHANNEL_MASK] < nfchans) |
||||
for (i = 1; i < nfchans; i++) |
||||
if (blksw[i] != blksw[0]) |
||||
break; |
||||
|
||||
if (i < nfchans) { |
||||
if (state->downmixed) { |
||||
state->downmixed = 0; |
||||
a52_upmix (samples + 1536, state->acmod, state->output); |
||||
} |
||||
|
||||
for (i = 0; i < nfchans; i++) { |
||||
sample_t bias; |
||||
|
||||
bias = 0; |
||||
if (!(chanbias & (1 << i))) |
||||
bias = state->bias; |
||||
|
||||
if (coeff[i]) { |
||||
if (blksw[i]) |
||||
a52_imdct_256 (samples + 256 * i, samples + 1536 + 256 * i, |
||||
bias); |
||||
else |
||||
a52_imdct_512 (samples + 256 * i, samples + 1536 + 256 * i, |
||||
bias); |
||||
} else { |
||||
int j; |
||||
|
||||
for (j = 0; j < 256; j++) |
||||
(samples + 256 * i)[j] = bias; |
||||
} |
||||
} |
||||
|
||||
a52_downmix (samples, state->acmod, state->output, state->bias, |
||||
state->clev, state->slev); |
||||
} else { |
||||
nfchans = nfchans_tbl[state->output & A52_CHANNEL_MASK]; |
||||
|
||||
a52_downmix (samples, state->acmod, state->output, 0, |
||||
state->clev, state->slev); |
||||
|
||||
if (!state->downmixed) { |
||||
state->downmixed = 1; |
||||
a52_downmix (samples + 1536, state->acmod, state->output, 0, |
||||
state->clev, state->slev); |
||||
} |
||||
|
||||
if (blksw[0]) |
||||
for (i = 0; i < nfchans; i++) |
||||
a52_imdct_256 (samples + 256 * i, samples + 1536 + 256 * i, |
||||
state->bias); |
||||
else |
||||
for (i = 0; i < nfchans; i++) |
||||
a52_imdct_512 (samples + 256 * i, samples + 1536 + 256 * i, |
||||
state->bias); |
||||
} |
||||
|
||||
return 0; |
||||
} |
||||
|
||||
void a52_free (a52_state_t * state) |
||||
{ |
||||
free (state->samples); |
||||
free (state); |
||||
} |
@ -1,63 +0,0 @@ |
||||
/*
|
||||
* copyright (C) 2001 Arpad Gereoffy |
||||
* |
||||
* This file is part of a52dec, a free ATSC A-52 stream decoder. |
||||
* See http://liba52.sourceforge.net/ for updates.
|
||||
* |
||||
* a52dec is free software; you can redistribute it and/or modify |
||||
* it under the terms of the GNU General Public License as published by |
||||
* the Free Software Foundation; either version 2 of the License, or |
||||
* (at your option) any later version. |
||||
* |
||||
* a52dec is distributed in the hope that it will be useful, |
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of |
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
||||
* GNU General Public License for more details. |
||||
* |
||||
* You should have received a copy of the GNU General Public License |
||||
* along with this program; if not, write to the Free Software |
||||
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA |
||||
*/ |
||||
|
||||
// a52_resample_init should find the requested converter (from type flags ->
|
||||
// given number of channels) and set up some function pointers...
|
||||
|
||||
// a52_resample() should do the conversion.
|
||||
|
||||
#include "a52.h" |
||||
#include "mm_accel.h" |
||||
#include "config.h" |
||||
#include "../../libpostproc/mangle.h" |
||||
|
||||
int (* a52_resample) (float * _f, int16_t * s16)=NULL; |
||||
|
||||
#include "resample_c.c" |
||||
|
||||
#ifdef ARCH_X86_32 |
||||
#include "resample_mmx.c" |
||||
#endif |
||||
|
||||
void* a52_resample_init(uint32_t mm_accel,int flags,int chans){ |
||||
void* tmp; |
||||
|
||||
#ifdef ARCH_X86_32 |
||||
if(mm_accel&MM_ACCEL_X86_MMX){ |
||||
tmp=a52_resample_MMX(flags,chans); |
||||
if(tmp){ |
||||
if(a52_resample==NULL) av_log(NULL, AV_LOG_INFO, "Using MMX optimized resampler\n"); |
||||
a52_resample=tmp; |
||||
return tmp; |
||||
} |
||||
} |
||||
#endif |
||||
|
||||
tmp=a52_resample_C(flags,chans); |
||||
if(tmp){ |
||||
if(a52_resample==NULL) av_log(NULL, AV_LOG_INFO, "No accelerated resampler found\n"); |
||||
a52_resample=tmp; |
||||
return tmp; |
||||
} |
||||
|
||||
av_log(NULL, AV_LOG_ERROR, "Unimplemented resampler for mode 0x%X -> %d channels conversion - Contact MPlayer developers!\n", flags, chans); |
||||
return NULL; |
||||
} |
@ -1,203 +0,0 @@ |
||||
/*
|
||||
* this code is based on a52dec/libao/audio_out_oss.c |
||||
* copyright (C) 2001 Arpad Gereoffy |
||||
* |
||||
* This file is part of a52dec, a free ATSC A-52 stream decoder. |
||||
* See http://liba52.sourceforge.net/ for updates.
|
||||
* |
||||
* a52dec is free software; you can redistribute it and/or modify |
||||
* it under the terms of the GNU General Public License as published by |
||||
* the Free Software Foundation; either version 2 of the License, or |
||||
* (at your option) any later version. |
||||
* |
||||
* a52dec is distributed in the hope that it will be useful, |
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of |
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
||||
* GNU General Public License for more details. |
||||
* |
||||
* You should have received a copy of the GNU General Public License |
||||
* along with this program; if not, write to the Free Software |
||||
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA |
||||
*/ |
||||
|
||||
static inline int16_t convert (int32_t i) |
||||
{ |
||||
if (i > 0x43c07fff) |
||||
return 32767; |
||||
else if (i < 0x43bf8000) |
||||
return -32768; |
||||
else |
||||
return i - 0x43c00000; |
||||
} |
||||
|
||||
static int a52_resample_MONO_to_5_C(float * _f, int16_t * s16){ |
||||
int i; |
||||
int32_t * f = (int32_t *) _f; |
||||
for (i = 0; i < 256; i++) { |
||||
s16[5*i] = s16[5*i+1] = s16[5*i+2] = s16[5*i+3] = 0; |
||||
s16[5*i+4] = convert (f[i]); |
||||
} |
||||
return 5*256; |
||||
} |
||||
|
||||
static int a52_resample_MONO_to_1_C(float * _f, int16_t * s16){ |
||||
int i; |
||||
int32_t * f = (int32_t *) _f; |
||||
for (i = 0; i < 256; i++) { |
||||
s16[i] = convert (f[i]); |
||||
} |
||||
return 1*256; |
||||
} |
||||
|
||||
static int a52_resample_STEREO_to_2_C(float * _f, int16_t * s16){ |
||||
int i; |
||||
int32_t * f = (int32_t *) _f; |
||||
for (i = 0; i < 256; i++) { |
||||
s16[2*i] = convert (f[i]); |
||||
s16[2*i+1] = convert (f[i+256]); |
||||
} |
||||
return 2*256; |
||||
} |
||||
|
||||
static int a52_resample_3F_to_5_C(float * _f, int16_t * s16){ |
||||
int i; |
||||
int32_t * f = (int32_t *) _f; |
||||
for (i = 0; i < 256; i++) { |
||||
s16[5*i] = convert (f[i]); |
||||
s16[5*i+1] = convert (f[i+512]); |
||||
s16[5*i+2] = s16[5*i+3] = 0; |
||||
s16[5*i+4] = convert (f[i+256]); |
||||
} |
||||
return 5*256; |
||||
} |
||||
|
||||
static int a52_resample_2F_2R_to_4_C(float * _f, int16_t * s16){ |
||||
int i; |
||||
int32_t * f = (int32_t *) _f; |
||||
for (i = 0; i < 256; i++) { |
||||
s16[4*i] = convert (f[i]); |
||||
s16[4*i+1] = convert (f[i+256]); |
||||
s16[4*i+2] = convert (f[i+512]); |
||||
s16[4*i+3] = convert (f[i+768]); |
||||
} |
||||
return 4*256; |
||||
} |
||||
|
||||
static int a52_resample_3F_2R_to_5_C(float * _f, int16_t * s16){ |
||||
int i; |
||||
int32_t * f = (int32_t *) _f; |
||||
for (i = 0; i < 256; i++) { |
||||
s16[5*i] = convert (f[i]); |
||||
s16[5*i+1] = convert (f[i+512]); |
||||
s16[5*i+2] = convert (f[i+768]); |
||||
s16[5*i+3] = convert (f[i+1024]); |
||||
s16[5*i+4] = convert (f[i+256]); |
||||
} |
||||
return 5*256; |
||||
} |
||||
|
||||
static int a52_resample_MONO_LFE_to_6_C(float * _f, int16_t * s16){ |
||||
int i; |
||||
int32_t * f = (int32_t *) _f; |
||||
for (i = 0; i < 256; i++) { |
||||
s16[6*i] = s16[6*i+1] = s16[6*i+2] = s16[6*i+3] = 0; |
||||
s16[6*i+4] = convert (f[i+256]); |
||||
s16[6*i+5] = convert (f[i]); |
||||
} |
||||
return 6*256; |
||||
} |
||||
|
||||
static int a52_resample_STEREO_LFE_to_6_C(float * _f, int16_t * s16){ |
||||
int i; |
||||
int32_t * f = (int32_t *) _f; |
||||
for (i = 0; i < 256; i++) { |
||||
s16[6*i] = convert (f[i+256]); |
||||
s16[6*i+1] = convert (f[i+512]); |
||||
s16[6*i+2] = s16[6*i+3] = s16[6*i+4] = 0; |
||||
s16[6*i+5] = convert (f[i]); |
||||
} |
||||
return 6*256; |
||||
} |
||||
|
||||
static int a52_resample_3F_LFE_to_6_C(float * _f, int16_t * s16){ |
||||
int i; |
||||
int32_t * f = (int32_t *) _f; |
||||
for (i = 0; i < 256; i++) { |
||||
s16[6*i] = convert (f[i+256]); |
||||
s16[6*i+1] = convert (f[i+768]); |
||||
s16[6*i+2] = s16[6*i+3] = 0; |
||||
s16[6*i+4] = convert (f[i+512]); |
||||
s16[6*i+5] = convert (f[i]); |
||||
} |
||||
return 6*256; |
||||
} |
||||
|
||||
static int a52_resample_2F_2R_LFE_to_6_C(float * _f, int16_t * s16){ |
||||
int i; |
||||
int32_t * f = (int32_t *) _f; |
||||
for (i = 0; i < 256; i++) { |
||||
s16[6*i] = convert (f[i+256]); |
||||
s16[6*i+1] = convert (f[i+512]); |
||||
s16[6*i+2] = convert (f[i+768]); |
||||
s16[6*i+3] = convert (f[i+1024]); |
||||
s16[6*i+4] = 0; |
||||
s16[6*i+5] = convert (f[i]); |
||||
} |
||||
return 6*256; |
||||
} |
||||
|
||||
static int a52_resample_3F_2R_LFE_to_6_C(float * _f, int16_t * s16){ |
||||
int i; |
||||
int32_t * f = (int32_t *) _f; |
||||
for (i = 0; i < 256; i++) { |
||||
s16[6*i] = convert (f[i+256]); |
||||
s16[6*i+1] = convert (f[i+768]); |
||||
s16[6*i+2] = convert (f[i+1024]); |
||||
s16[6*i+3] = convert (f[i+1280]); |
||||
s16[6*i+4] = convert (f[i+512]); |
||||
s16[6*i+5] = convert (f[i]); |
||||
} |
||||
return 6*256; |
||||
} |
||||
|
||||
|
||||
static void* a52_resample_C(int flags, int ch){ |
||||
switch (flags) { |
||||
case A52_MONO: |
||||
if(ch==5) return a52_resample_MONO_to_5_C; |
||||
if(ch==1) return a52_resample_MONO_to_1_C; |
||||
break; |
||||
case A52_CHANNEL: |
||||
case A52_STEREO: |
||||
case A52_DOLBY: |
||||
if(ch==2) return a52_resample_STEREO_to_2_C; |
||||
break; |
||||
case A52_3F: |
||||
if(ch==5) return a52_resample_3F_to_5_C; |
||||
break; |
||||
case A52_2F2R: |
||||
if(ch==4) return a52_resample_2F_2R_to_4_C; |
||||
break; |
||||
case A52_3F2R: |
||||
if(ch==5) return a52_resample_3F_2R_to_5_C; |
||||
break; |
||||
case A52_MONO | A52_LFE: |
||||
if(ch==6) return a52_resample_MONO_LFE_to_6_C; |
||||
break; |
||||
case A52_CHANNEL | A52_LFE: |
||||
case A52_STEREO | A52_LFE: |
||||
case A52_DOLBY | A52_LFE: |
||||
if(ch==6) return a52_resample_STEREO_LFE_to_6_C; |
||||
break; |
||||
case A52_3F | A52_LFE: |
||||
if(ch==6) return a52_resample_3F_LFE_to_6_C; |
||||
break; |
||||
case A52_2F2R | A52_LFE: |
||||
if(ch==6) return a52_resample_2F_2R_LFE_to_6_C; |
||||
break; |
||||
case A52_3F2R | A52_LFE: |
||||
if(ch==6) return a52_resample_3F_2R_LFE_to_6_C; |
||||
break; |
||||
} |
||||
return NULL; |
||||
} |
@ -1,537 +0,0 @@ |
||||
/*
|
||||
* resample_mmx.c |
||||
* Copyright (C) 2003 Michael Niedermayer <michaelni@gmx.at> |
||||
* |
||||
* This file is part of a52dec, a free ATSC A-52 stream decoder. |
||||
* See http://liba52.sourceforge.net/ for updates.
|
||||
* |
||||
* a52dec is free software; you can redistribute it and/or modify |
||||
* it under the terms of the GNU General Public License as published by |
||||
* the Free Software Foundation; either version 2 of the License, or |
||||
* (at your option) any later version. |
||||
* |
||||
* a52dec is distributed in the hope that it will be useful, |
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of |
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
||||
* GNU General Public License for more details. |
||||
* |
||||
* You should have received a copy of the GNU General Public License |
||||
* along with this program; if not, write to the Free Software |
||||
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA |
||||
*/ |
||||
|
||||
/* optimization TODO / NOTES
|
||||
movntq is slightly faster (0.5% with the current test.c benchmark) |
||||
(but thats just test.c so that needs to be testd in reallity) |
||||
and it would mean (C / MMX2 / MMX / 3DNOW) versions |
||||
*/ |
||||
|
||||
static uint64_t __attribute__((aligned(8))) attribute_used magicF2W= 0x43c0000043c00000LL; |
||||
static uint64_t __attribute__((aligned(8))) attribute_used wm1010= 0xFFFF0000FFFF0000LL; |
||||
static uint64_t __attribute__((aligned(8))) attribute_used wm0101= 0x0000FFFF0000FFFFLL; |
||||
static uint64_t __attribute__((aligned(8))) attribute_used wm1100= 0xFFFFFFFF00000000LL; |
||||
|
||||
static int a52_resample_MONO_to_5_MMX(float * _f, int16_t * s16){ |
||||
int32_t * f = (int32_t *) _f; |
||||
asm volatile( |
||||
"movl $-512, %%esi \n\t" |
||||
"movq "MANGLE(magicF2W)", %%mm7 \n\t" |
||||
"movq "MANGLE(wm1100)", %%mm3 \n\t" |
||||
"movq "MANGLE(wm0101)", %%mm4 \n\t" |
||||
"movq "MANGLE(wm1010)", %%mm5 \n\t" |
||||
"pxor %%mm6, %%mm6 \n\t" |
||||
"1: \n\t" |
||||
"movq (%1, %%esi, 2), %%mm0 \n\t" |
||||
"movq 8(%1, %%esi, 2), %%mm1 \n\t" |
||||
"leal (%%esi, %%esi, 4), %%edi \n\t" |
||||
"psubd %%mm7, %%mm0 \n\t" |
||||
"psubd %%mm7, %%mm1 \n\t" |
||||
"packssdw %%mm1, %%mm0 \n\t" |
||||
"movq %%mm0, %%mm1 \n\t" |
||||
"pand %%mm4, %%mm0 \n\t" |
||||
"pand %%mm5, %%mm1 \n\t" |
||||
"movq %%mm6, (%0, %%edi) \n\t" // 0 0 0 0
|
||||
"movd %%mm0, 8(%0, %%edi) \n\t" // A 0
|
||||
"pand %%mm3, %%mm0 \n\t" |
||||
"movd %%mm6, 12(%0, %%edi) \n\t" // 0 0
|
||||
"movd %%mm1, 16(%0, %%edi) \n\t" // 0 B
|
||||
"pand %%mm3, %%mm1 \n\t" |
||||
"movd %%mm6, 20(%0, %%edi) \n\t" // 0 0
|
||||
"movq %%mm0, 24(%0, %%edi) \n\t" // 0 0 C 0
|
||||
"movq %%mm1, 32(%0, %%edi) \n\t" // 0 0 0 B
|
||||
"addl $8, %%esi \n\t" |
||||
" jnz 1b \n\t" |
||||
"emms \n\t" |
||||
:: "r" (s16+1280), "r" (f+256) |
||||
:"%esi", "%edi", "memory" |
||||
); |
||||
return 5*256; |
||||
} |
||||
|
||||
static int a52_resample_STEREO_to_2_MMX(float * _f, int16_t * s16){ |
||||
int32_t * f = (int32_t *) _f; |
||||
/* benchmark scores are 0.3% better with SSE but we would need to set bias=0 and premultiply it
|
||||
#ifdef HAVE_SSE |
||||
asm volatile( |
||||
"movl $-1024, %%esi \n\t" |
||||
"1: \n\t" |
||||
"cvtps2pi (%1, %%esi), %%mm0 \n\t" |
||||
"cvtps2pi 1024(%1, %%esi), %%mm2\n\t" |
||||
"movq %%mm0, %%mm1 \n\t" |
||||
"punpcklwd %%mm2, %%mm0 \n\t" |
||||
"punpckhwd %%mm2, %%mm1 \n\t" |
||||
"movq %%mm0, (%0, %%esi) \n\t" |
||||
"movq %%mm1, 8(%0, %%esi) \n\t" |
||||
"addl $16, %%esi \n\t" |
||||
" jnz 1b \n\t" |
||||
"emms \n\t" |
||||
:: "r" (s16+512), "r" (f+256) |
||||
:"%esi", "memory" |
||||
);*/ |
||||
asm volatile( |
||||
"movl $-1024, %%esi \n\t" |
||||
"movq "MANGLE(magicF2W)", %%mm7 \n\t" |
||||
"1: \n\t" |
||||
"movq (%1, %%esi), %%mm0 \n\t" |
||||
"movq 8(%1, %%esi), %%mm1 \n\t" |
||||
"movq 1024(%1, %%esi), %%mm2 \n\t" |
||||
"movq 1032(%1, %%esi), %%mm3 \n\t" |
||||
"psubd %%mm7, %%mm0 \n\t" |
||||
"psubd %%mm7, %%mm1 \n\t" |
||||
"psubd %%mm7, %%mm2 \n\t" |
||||
"psubd %%mm7, %%mm3 \n\t" |
||||
"packssdw %%mm1, %%mm0 \n\t" |
||||
"packssdw %%mm3, %%mm2 \n\t" |
||||
"movq %%mm0, %%mm1 \n\t" |
||||
"punpcklwd %%mm2, %%mm0 \n\t" |
||||
"punpckhwd %%mm2, %%mm1 \n\t" |
||||
"movq %%mm0, (%0, %%esi) \n\t" |
||||
"movq %%mm1, 8(%0, %%esi) \n\t" |
||||
"addl $16, %%esi \n\t" |
||||
" jnz 1b \n\t" |
||||
"emms \n\t" |
||||
:: "r" (s16+512), "r" (f+256) |
||||
:"%esi", "memory" |
||||
); |
||||
return 2*256; |
||||
} |
||||
|
||||
static int a52_resample_3F_to_5_MMX(float * _f, int16_t * s16){ |
||||
int32_t * f = (int32_t *) _f; |
||||
asm volatile( |
||||
"movl $-1024, %%esi \n\t" |
||||
"movq "MANGLE(magicF2W)", %%mm7 \n\t" |
||||
"pxor %%mm6, %%mm6 \n\t" |
||||
"movq %%mm7, %%mm5 \n\t" |
||||
"punpckldq %%mm6, %%mm5 \n\t" |
||||
"1: \n\t" |
||||
"movd (%1, %%esi), %%mm0 \n\t" |
||||
"punpckldq 2048(%1, %%esi), %%mm0\n\t" |
||||
"movd 1024(%1, %%esi), %%mm1 \n\t" |
||||
"punpckldq 4(%1, %%esi), %%mm1 \n\t" |
||||
"movd 2052(%1, %%esi), %%mm2 \n\t" |
||||
"movq %%mm7, %%mm3 \n\t" |
||||
"punpckldq 1028(%1, %%esi), %%mm3\n\t" |
||||
"movd 8(%1, %%esi), %%mm4 \n\t" |
||||
"punpckldq 2056(%1, %%esi), %%mm4\n\t" |
||||
"leal (%%esi, %%esi, 4), %%edi \n\t" |
||||
"sarl $1, %%edi \n\t" |
||||
"psubd %%mm7, %%mm0 \n\t" |
||||
"psubd %%mm7, %%mm1 \n\t" |
||||
"psubd %%mm5, %%mm2 \n\t" |
||||
"psubd %%mm7, %%mm3 \n\t" |
||||
"psubd %%mm7, %%mm4 \n\t" |
||||
"packssdw %%mm6, %%mm0 \n\t" |
||||
"packssdw %%mm2, %%mm1 \n\t" |
||||
"packssdw %%mm4, %%mm3 \n\t" |
||||
"movq %%mm0, (%0, %%edi) \n\t" |
||||
"movq %%mm1, 8(%0, %%edi) \n\t" |
||||
"movq %%mm3, 16(%0, %%edi) \n\t" |
||||
|
||||
"movd 1032(%1, %%esi), %%mm1 \n\t" |
||||
"punpckldq 12(%1, %%esi), %%mm1\n\t" |
||||
"movd 2060(%1, %%esi), %%mm2 \n\t" |
||||
"movq %%mm7, %%mm3 \n\t" |
||||
"punpckldq 1036(%1, %%esi), %%mm3\n\t" |
||||
"pxor %%mm0, %%mm0 \n\t" |
||||
"psubd %%mm7, %%mm1 \n\t" |
||||
"psubd %%mm5, %%mm2 \n\t" |
||||
"psubd %%mm7, %%mm3 \n\t" |
||||
"packssdw %%mm1, %%mm0 \n\t" |
||||
"packssdw %%mm3, %%mm2 \n\t" |
||||
"movq %%mm0, 24(%0, %%edi) \n\t" |
||||
"movq %%mm2, 32(%0, %%edi) \n\t" |
||||
|
||||
"addl $16, %%esi \n\t" |
||||
" jnz 1b \n\t" |
||||
"emms \n\t" |
||||
:: "r" (s16+1280), "r" (f+256) |
||||
:"%esi", "%edi", "memory" |
||||
); |
||||
return 5*256; |
||||
} |
||||
|
||||
static int a52_resample_2F_2R_to_4_MMX(float * _f, int16_t * s16){ |
||||
int32_t * f = (int32_t *) _f; |
||||
asm volatile( |
||||
"movl $-1024, %%esi \n\t" |
||||
"movq "MANGLE(magicF2W)", %%mm7 \n\t" |
||||
"1: \n\t" |
||||
"movq (%1, %%esi), %%mm0 \n\t" |
||||
"movq 8(%1, %%esi), %%mm1 \n\t" |
||||
"movq 1024(%1, %%esi), %%mm2 \n\t" |
||||
"movq 1032(%1, %%esi), %%mm3 \n\t" |
||||
"psubd %%mm7, %%mm0 \n\t" |
||||
"psubd %%mm7, %%mm1 \n\t" |
||||
"psubd %%mm7, %%mm2 \n\t" |
||||
"psubd %%mm7, %%mm3 \n\t" |
||||
"packssdw %%mm1, %%mm0 \n\t" |
||||
"packssdw %%mm3, %%mm2 \n\t" |
||||
"movq 2048(%1, %%esi), %%mm3 \n\t" |
||||
"movq 2056(%1, %%esi), %%mm4 \n\t" |
||||
"movq 3072(%1, %%esi), %%mm5 \n\t" |
||||
"movq 3080(%1, %%esi), %%mm6 \n\t" |
||||
"psubd %%mm7, %%mm3 \n\t" |
||||
"psubd %%mm7, %%mm4 \n\t" |
||||
"psubd %%mm7, %%mm5 \n\t" |
||||
"psubd %%mm7, %%mm6 \n\t" |
||||
"packssdw %%mm4, %%mm3 \n\t" |
||||
"packssdw %%mm6, %%mm5 \n\t" |
||||
"movq %%mm0, %%mm1 \n\t" |
||||
"movq %%mm3, %%mm4 \n\t" |
||||
"punpcklwd %%mm2, %%mm0 \n\t" |
||||
"punpckhwd %%mm2, %%mm1 \n\t" |
||||
"punpcklwd %%mm5, %%mm3 \n\t" |
||||
"punpckhwd %%mm5, %%mm4 \n\t" |
||||
"movq %%mm0, %%mm2 \n\t" |
||||
"movq %%mm1, %%mm5 \n\t" |
||||
"punpckldq %%mm3, %%mm0 \n\t" |
||||
"punpckhdq %%mm3, %%mm2 \n\t" |
||||
"punpckldq %%mm4, %%mm1 \n\t" |
||||
"punpckhdq %%mm4, %%mm5 \n\t" |
||||
"movq %%mm0, (%0, %%esi,2) \n\t" |
||||
"movq %%mm2, 8(%0, %%esi,2) \n\t" |
||||
"movq %%mm1, 16(%0, %%esi,2) \n\t" |
||||
"movq %%mm5, 24(%0, %%esi,2) \n\t" |
||||
"addl $16, %%esi \n\t" |
||||
" jnz 1b \n\t" |
||||
"emms \n\t" |
||||
:: "r" (s16+1024), "r" (f+256) |
||||
:"%esi", "memory" |
||||
); |
||||
return 4*256; |
||||
} |
||||
|
||||
static int a52_resample_3F_2R_to_5_MMX(float * _f, int16_t * s16){ |
||||
int32_t * f = (int32_t *) _f; |
||||
asm volatile( |
||||
"movl $-1024, %%esi \n\t" |
||||
"movq "MANGLE(magicF2W)", %%mm7 \n\t" |
||||
"1: \n\t" |
||||
"movd (%1, %%esi), %%mm0 \n\t" |
||||
"punpckldq 2048(%1, %%esi), %%mm0\n\t" |
||||
"movd 3072(%1, %%esi), %%mm1 \n\t" |
||||
"punpckldq 4096(%1, %%esi), %%mm1\n\t" |
||||
"movd 1024(%1, %%esi), %%mm2 \n\t" |
||||
"punpckldq 4(%1, %%esi), %%mm2 \n\t" |
||||
"movd 2052(%1, %%esi), %%mm3 \n\t" |
||||
"punpckldq 3076(%1, %%esi), %%mm3\n\t" |
||||
"movd 4100(%1, %%esi), %%mm4 \n\t" |
||||
"punpckldq 1028(%1, %%esi), %%mm4\n\t" |
||||
"movd 8(%1, %%esi), %%mm5 \n\t" |
||||
"punpckldq 2056(%1, %%esi), %%mm5\n\t" |
||||
"leal (%%esi, %%esi, 4), %%edi \n\t" |
||||
"sarl $1, %%edi \n\t" |
||||
"psubd %%mm7, %%mm0 \n\t" |
||||
"psubd %%mm7, %%mm1 \n\t" |
||||
"psubd %%mm7, %%mm2 \n\t" |
||||
"psubd %%mm7, %%mm3 \n\t" |
||||
"psubd %%mm7, %%mm4 \n\t" |
||||
"psubd %%mm7, %%mm5 \n\t" |
||||
"packssdw %%mm1, %%mm0 \n\t" |
||||
"packssdw %%mm3, %%mm2 \n\t" |
||||
"packssdw %%mm5, %%mm4 \n\t" |
||||
"movq %%mm0, (%0, %%edi) \n\t" |
||||
"movq %%mm2, 8(%0, %%edi) \n\t" |
||||
"movq %%mm4, 16(%0, %%edi) \n\t" |
||||
|
||||
"movd 3080(%1, %%esi), %%mm0 \n\t" |
||||
"punpckldq 4104(%1, %%esi), %%mm0\n\t" |
||||
"movd 1032(%1, %%esi), %%mm1 \n\t" |
||||
"punpckldq 12(%1, %%esi), %%mm1\n\t" |
||||
"movd 2060(%1, %%esi), %%mm2 \n\t" |
||||
"punpckldq 3084(%1, %%esi), %%mm2\n\t" |
||||
"movd 4108(%1, %%esi), %%mm3 \n\t" |
||||
"punpckldq 1036(%1, %%esi), %%mm3\n\t" |
||||
"psubd %%mm7, %%mm0 \n\t" |
||||
"psubd %%mm7, %%mm1 \n\t" |
||||
"psubd %%mm7, %%mm2 \n\t" |
||||
"psubd %%mm7, %%mm3 \n\t" |
||||
"packssdw %%mm1, %%mm0 \n\t" |
||||
"packssdw %%mm3, %%mm2 \n\t" |
||||
"movq %%mm0, 24(%0, %%edi) \n\t" |
||||
"movq %%mm2, 32(%0, %%edi) \n\t" |
||||
|
||||
"addl $16, %%esi \n\t" |
||||
" jnz 1b \n\t" |
||||
"emms \n\t" |
||||
:: "r" (s16+1280), "r" (f+256) |
||||
:"%esi", "%edi", "memory" |
||||
); |
||||
return 5*256; |
||||
} |
||||
|
||||
static int a52_resample_MONO_LFE_to_6_MMX(float * _f, int16_t * s16){ |
||||
int32_t * f = (int32_t *) _f; |
||||
asm volatile( |
||||
"movl $-1024, %%esi \n\t" |
||||
"movq "MANGLE(magicF2W)", %%mm7 \n\t" |
||||
"pxor %%mm6, %%mm6 \n\t" |
||||
"1: \n\t" |
||||
"movq 1024(%1, %%esi), %%mm0 \n\t" |
||||
"movq 1032(%1, %%esi), %%mm1 \n\t" |
||||
"movq (%1, %%esi), %%mm2 \n\t" |
||||
"movq 8(%1, %%esi), %%mm3 \n\t" |
||||
"psubd %%mm7, %%mm0 \n\t" |
||||
"psubd %%mm7, %%mm1 \n\t" |
||||
"psubd %%mm7, %%mm2 \n\t" |
||||
"psubd %%mm7, %%mm3 \n\t" |
||||
"packssdw %%mm1, %%mm0 \n\t" |
||||
"packssdw %%mm3, %%mm2 \n\t" |
||||
"movq %%mm0, %%mm1 \n\t" |
||||
"punpcklwd %%mm2, %%mm0 \n\t" |
||||
"punpckhwd %%mm2, %%mm1 \n\t" |
||||
"leal (%%esi, %%esi, 2), %%edi \n\t" |
||||
"movq %%mm6, (%0, %%edi) \n\t" |
||||
"movd %%mm0, 8(%0, %%edi) \n\t" |
||||
"punpckhdq %%mm0, %%mm0 \n\t" |
||||
"movq %%mm6, 12(%0, %%edi) \n\t" |
||||
"movd %%mm0, 20(%0, %%edi) \n\t" |
||||
"movq %%mm6, 24(%0, %%edi) \n\t" |
||||
"movd %%mm1, 32(%0, %%edi) \n\t" |
||||
"punpckhdq %%mm1, %%mm1 \n\t" |
||||
"movq %%mm6, 36(%0, %%edi) \n\t" |
||||
"movd %%mm1, 44(%0, %%edi) \n\t" |
||||
"addl $16, %%esi \n\t" |
||||
" jnz 1b \n\t" |
||||
"emms \n\t" |
||||
:: "r" (s16+1536), "r" (f+256) |
||||
:"%esi", "%edi", "memory" |
||||
); |
||||
return 6*256; |
||||
} |
||||
|
||||
static int a52_resample_STEREO_LFE_to_6_MMX(float * _f, int16_t * s16){ |
||||
int32_t * f = (int32_t *) _f; |
||||
asm volatile( |
||||
"movl $-1024, %%esi \n\t" |
||||
"movq "MANGLE(magicF2W)", %%mm7 \n\t" |
||||
"pxor %%mm6, %%mm6 \n\t" |
||||
"1: \n\t" |
||||
"movq 1024(%1, %%esi), %%mm0 \n\t" |
||||
"movq 2048(%1, %%esi), %%mm1 \n\t" |
||||
"movq (%1, %%esi), %%mm5 \n\t" |
||||
"psubd %%mm7, %%mm0 \n\t" |
||||
"psubd %%mm7, %%mm1 \n\t" |
||||
"psubd %%mm7, %%mm5 \n\t" |
||||
"leal (%%esi, %%esi, 2), %%edi \n\t" |
||||
|
||||
"pxor %%mm4, %%mm4 \n\t" |
||||
"packssdw %%mm5, %%mm0 \n\t" // FfAa
|
||||
"packssdw %%mm4, %%mm1 \n\t" // 00Bb
|
||||
"punpckhwd %%mm0, %%mm4 \n\t" // F0f0
|
||||
"punpcklwd %%mm1, %%mm0 \n\t" // BAba
|
||||
"movq %%mm0, %%mm1 \n\t" // BAba
|
||||
"punpckldq %%mm4, %%mm3 \n\t" // f0XX
|
||||
"punpckldq %%mm6, %%mm0 \n\t" // 00ba
|
||||
"punpckhdq %%mm1, %%mm3 \n\t" // BAf0
|
||||
|
||||
"movq %%mm0, (%0, %%edi) \n\t" // 00ba
|
||||
"punpckhdq %%mm4, %%mm0 \n\t" // F000
|
||||
"movq %%mm3, 8(%0, %%edi) \n\t" // BAf0
|
||||
"movq %%mm0, 16(%0, %%edi) \n\t" // F000
|
||||
"addl $8, %%esi \n\t" |
||||
" jnz 1b \n\t" |
||||
"emms \n\t" |
||||
:: "r" (s16+1536), "r" (f+256) |
||||
:"%esi", "%edi", "memory" |
||||
); |
||||
return 6*256; |
||||
} |
||||
|
||||
static int a52_resample_3F_LFE_to_6_MMX(float * _f, int16_t * s16){ |
||||
int32_t * f = (int32_t *) _f; |
||||
asm volatile( |
||||
"movl $-1024, %%esi \n\t" |
||||
"movq "MANGLE(magicF2W)", %%mm7 \n\t" |
||||
"pxor %%mm6, %%mm6 \n\t" |
||||
"1: \n\t" |
||||
"movq 1024(%1, %%esi), %%mm0 \n\t" |
||||
"movq 3072(%1, %%esi), %%mm1 \n\t" |
||||
"movq 2048(%1, %%esi), %%mm4 \n\t" |
||||
"movq (%1, %%esi), %%mm5 \n\t" |
||||
"psubd %%mm7, %%mm0 \n\t" |
||||
"psubd %%mm7, %%mm1 \n\t" |
||||
"psubd %%mm7, %%mm4 \n\t" |
||||
"psubd %%mm7, %%mm5 \n\t" |
||||
"leal (%%esi, %%esi, 2), %%edi \n\t" |
||||
|
||||
"packssdw %%mm4, %%mm0 \n\t" // EeAa
|
||||
"packssdw %%mm5, %%mm1 \n\t" // FfBb
|
||||
"movq %%mm0, %%mm2 \n\t" // EeAa
|
||||
"punpcklwd %%mm1, %%mm0 \n\t" // BAba
|
||||
"punpckhwd %%mm1, %%mm2 \n\t" // FEfe
|
||||
"movq %%mm0, %%mm1 \n\t" // BAba
|
||||
"punpckldq %%mm6, %%mm0 \n\t" // 00ba
|
||||
"punpckhdq %%mm1, %%mm1 \n\t" // BABA
|
||||
|
||||
"movq %%mm0, (%0, %%edi) \n\t" |
||||
"punpckhdq %%mm2, %%mm0 \n\t" // FE00
|
||||
"punpckldq %%mm1, %%mm2 \n\t" // BAfe
|
||||
"movq %%mm2, 8(%0, %%edi) \n\t" |
||||
"movq %%mm0, 16(%0, %%edi) \n\t" |
||||
"addl $8, %%esi \n\t" |
||||
" jnz 1b \n\t" |
||||
"emms \n\t" |
||||
:: "r" (s16+1536), "r" (f+256) |
||||
:"%esi", "%edi", "memory" |
||||
); |
||||
return 6*256; |
||||
} |
||||
|
||||
static int a52_resample_2F_2R_LFE_to_6_MMX(float * _f, int16_t * s16){ |
||||
int32_t * f = (int32_t *) _f; |
||||
asm volatile( |
||||
"movl $-1024, %%esi \n\t" |
||||
"movq "MANGLE(magicF2W)", %%mm7 \n\t" |
||||
// "pxor %%mm6, %%mm6 \n\t"
|
||||
"1: \n\t" |
||||
"movq 1024(%1, %%esi), %%mm0 \n\t" |
||||
"movq 2048(%1, %%esi), %%mm1 \n\t" |
||||
"movq 3072(%1, %%esi), %%mm2 \n\t" |
||||
"movq 4096(%1, %%esi), %%mm3 \n\t" |
||||
"movq (%1, %%esi), %%mm5 \n\t" |
||||
"psubd %%mm7, %%mm0 \n\t" |
||||
"psubd %%mm7, %%mm1 \n\t" |
||||
"psubd %%mm7, %%mm2 \n\t" |
||||
"psubd %%mm7, %%mm3 \n\t" |
||||
"psubd %%mm7, %%mm5 \n\t" |
||||
"leal (%%esi, %%esi, 2), %%edi \n\t" |
||||
|
||||
"packssdw %%mm2, %%mm0 \n\t" // CcAa
|
||||
"packssdw %%mm3, %%mm1 \n\t" // DdBb
|
||||
"packssdw %%mm5, %%mm5 \n\t" // FfFf
|
||||
"movq %%mm0, %%mm2 \n\t" // CcAa
|
||||
"punpcklwd %%mm1, %%mm0 \n\t" // BAba
|
||||
"punpckhwd %%mm1, %%mm2 \n\t" // DCdc
|
||||
"pxor %%mm4, %%mm4 \n\t" // 0000
|
||||
"punpcklwd %%mm5, %%mm4 \n\t" // F0f0
|
||||
"movq %%mm0, %%mm1 \n\t" // BAba
|
||||
"movq %%mm4, %%mm3 \n\t" // F0f0
|
||||
"punpckldq %%mm2, %%mm0 \n\t" // dcba
|
||||
"punpckhdq %%mm1, %%mm1 \n\t" // BABA
|
||||
"punpckldq %%mm1, %%mm4 \n\t" // BAf0
|
||||
"punpckhdq %%mm3, %%mm2 \n\t" // F0DC
|
||||
|
||||
"movq %%mm0, (%0, %%edi) \n\t" |
||||
"movq %%mm4, 8(%0, %%edi) \n\t" |
||||
"movq %%mm2, 16(%0, %%edi) \n\t" |
||||
"addl $8, %%esi \n\t" |
||||
" jnz 1b \n\t" |
||||
"emms \n\t" |
||||
:: "r" (s16+1536), "r" (f+256) |
||||
:"%esi", "%edi", "memory" |
||||
); |
||||
return 6*256; |
||||
} |
||||
|
||||
static int a52_resample_3F_2R_LFE_to_6_MMX(float * _f, int16_t * s16){ |
||||
int32_t * f = (int32_t *) _f; |
||||
asm volatile( |
||||
"movl $-1024, %%esi \n\t" |
||||
"movq "MANGLE(magicF2W)", %%mm7 \n\t" |
||||
// "pxor %%mm6, %%mm6 \n\t"
|
||||
"1: \n\t" |
||||
"movq 1024(%1, %%esi), %%mm0 \n\t" |
||||
"movq 3072(%1, %%esi), %%mm1 \n\t" |
||||
"movq 4096(%1, %%esi), %%mm2 \n\t" |
||||
"movq 5120(%1, %%esi), %%mm3 \n\t" |
||||
"movq 2048(%1, %%esi), %%mm4 \n\t" |
||||
"movq (%1, %%esi), %%mm5 \n\t" |
||||
"psubd %%mm7, %%mm0 \n\t" |
||||
"psubd %%mm7, %%mm1 \n\t" |
||||
"psubd %%mm7, %%mm2 \n\t" |
||||
"psubd %%mm7, %%mm3 \n\t" |
||||
"psubd %%mm7, %%mm4 \n\t" |
||||
"psubd %%mm7, %%mm5 \n\t" |
||||
"leal (%%esi, %%esi, 2), %%edi \n\t" |
||||
|
||||
"packssdw %%mm2, %%mm0 \n\t" // CcAa
|
||||
"packssdw %%mm3, %%mm1 \n\t" // DdBb
|
||||
"packssdw %%mm4, %%mm4 \n\t" // EeEe
|
||||
"packssdw %%mm5, %%mm5 \n\t" // FfFf
|
||||
"movq %%mm0, %%mm2 \n\t" // CcAa
|
||||
"punpcklwd %%mm1, %%mm0 \n\t" // BAba
|
||||
"punpckhwd %%mm1, %%mm2 \n\t" // DCdc
|
||||
"punpcklwd %%mm5, %%mm4 \n\t" // FEfe
|
||||
"movq %%mm0, %%mm1 \n\t" // BAba
|
||||
"movq %%mm4, %%mm3 \n\t" // FEfe
|
||||
"punpckldq %%mm2, %%mm0 \n\t" // dcba
|
||||
"punpckhdq %%mm1, %%mm1 \n\t" // BABA
|
||||
"punpckldq %%mm1, %%mm4 \n\t" // BAfe
|
||||
"punpckhdq %%mm3, %%mm2 \n\t" // FEDC
|
||||
|
||||
"movq %%mm0, (%0, %%edi) \n\t" |
||||
"movq %%mm4, 8(%0, %%edi) \n\t" |
||||
"movq %%mm2, 16(%0, %%edi) \n\t" |
||||
"addl $8, %%esi \n\t" |
||||
" jnz 1b \n\t" |
||||
"emms \n\t" |
||||
:: "r" (s16+1536), "r" (f+256) |
||||
:"%esi", "%edi", "memory" |
||||
); |
||||
return 6*256; |
||||
} |
||||
|
||||
|
||||
static void* a52_resample_MMX(int flags, int ch){ |
||||
switch (flags) { |
||||
case A52_MONO: |
||||
if(ch==5) return a52_resample_MONO_to_5_MMX; |
||||
break; |
||||
case A52_CHANNEL: |
||||
case A52_STEREO: |
||||
case A52_DOLBY: |
||||
if(ch==2) return a52_resample_STEREO_to_2_MMX; |
||||
break; |
||||
case A52_3F: |
||||
if(ch==5) return a52_resample_3F_to_5_MMX; |
||||
break; |
||||
case A52_2F2R: |
||||
if(ch==4) return a52_resample_2F_2R_to_4_MMX; |
||||
break; |
||||
case A52_3F2R: |
||||
if(ch==5) return a52_resample_3F_2R_to_5_MMX; |
||||
break; |
||||
case A52_MONO | A52_LFE: |
||||
if(ch==6) return a52_resample_MONO_LFE_to_6_MMX; |
||||
break; |
||||
case A52_CHANNEL | A52_LFE: |
||||
case A52_STEREO | A52_LFE: |
||||
case A52_DOLBY | A52_LFE: |
||||
if(ch==6) return a52_resample_STEREO_LFE_to_6_MMX; |
||||
break; |
||||
case A52_3F | A52_LFE: |
||||
if(ch==6) return a52_resample_3F_LFE_to_6_MMX; |
||||
break; |
||||
case A52_2F2R | A52_LFE: |
||||
if(ch==6) return a52_resample_2F_2R_LFE_to_6_MMX; |
||||
break; |
||||
case A52_3F2R | A52_LFE: |
||||
if(ch==6) return a52_resample_3F_2R_LFE_to_6_MMX; |
||||
break; |
||||
} |
||||
return NULL; |
||||
} |
||||
|
||||
|
@ -1,246 +0,0 @@ |
||||
/*
|
||||
* tables.h |
||||
* Copyright (C) 2000-2003 Michel Lespinasse <walken@zoy.org> |
||||
* Copyright (C) 1999-2000 Aaron Holtzman <aholtzma@ess.engr.uvic.ca> |
||||
* |
||||
* This file is part of a52dec, a free ATSC A-52 stream decoder. |
||||
* See http://liba52.sourceforge.net/ for updates.
|
||||
* |
||||
* a52dec is free software; you can redistribute it and/or modify |
||||
* it under the terms of the GNU General Public License as published by |
||||
* the Free Software Foundation; either version 2 of the License, or |
||||
* (at your option) any later version. |
||||
* |
||||
* a52dec is distributed in the hope that it will be useful, |
||||
* but WITHOUT ANY WARRANTY; without even the implied warranty of |
||||
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
||||
* GNU General Public License for more details. |
||||
* |
||||
* You should have received a copy of the GNU General Public License |
||||
* along with this program; if not, write to the Free Software |
||||
* Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA |
||||
*/ |
||||
|
||||
static const int8_t exp_1[128] = { |
||||
-2,-2,-2,-2,-2,-2,-2,-2,-2,-2,-2,-2,-2,-2,-2,-2,-2,-2,-2,-2,-2,-2,-2,-2,-2, |
||||
-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1, |
||||
0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, |
||||
1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, |
||||
2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, 2, |
||||
25,25,25 |
||||
}; |
||||
static const int8_t exp_2[128] = { |
||||
-2,-2,-2,-2,-2,-1,-1,-1,-1,-1, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 2, 2, 2, 2, 2, |
||||
-2,-2,-2,-2,-2,-1,-1,-1,-1,-1, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 2, 2, 2, 2, 2, |
||||
-2,-2,-2,-2,-2,-1,-1,-1,-1,-1, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 2, 2, 2, 2, 2, |
||||
-2,-2,-2,-2,-2,-1,-1,-1,-1,-1, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 2, 2, 2, 2, 2, |
||||
-2,-2,-2,-2,-2,-1,-1,-1,-1,-1, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 2, 2, 2, 2, 2, |
||||
25,25,25 |
||||
}; |
||||
static const int8_t exp_3[128] = { |
||||
-2,-1, 0, 1, 2,-2,-1, 0, 1, 2,-2,-1, 0, 1, 2,-2,-1, 0, 1, 2,-2,-1, 0, 1, 2, |
||||
-2,-1, 0, 1, 2,-2,-1, 0, 1, 2,-2,-1, 0, 1, 2,-2,-1, 0, 1, 2,-2,-1, 0, 1, 2, |
||||
-2,-1, 0, 1, 2,-2,-1, 0, 1, 2,-2,-1, 0, 1, 2,-2,-1, 0, 1, 2,-2,-1, 0, 1, 2, |
||||
-2,-1, 0, 1, 2,-2,-1, 0, 1, 2,-2,-1, 0, 1, 2,-2,-1, 0, 1, 2,-2,-1, 0, 1, 2, |
||||
-2,-1, 0, 1, 2,-2,-1, 0, 1, 2,-2,-1, 0, 1, 2,-2,-1, 0, 1, 2,-2,-1, 0, 1, 2, |
||||
25,25,25 |
||||
}; |
||||
|
||||
#define Q(x) ROUND (32768.0 * x) |
||||
|
||||
#define Q0 Q (-2/3) |
||||
#define Q1 Q (0) |
||||
#define Q2 Q (2/3) |
||||
|
||||
static const quantizer_t q_1_0[32] = { |
||||
Q0, Q0, Q0, Q0, Q0, Q0, Q0, Q0, Q0, |
||||
Q1, Q1, Q1, Q1, Q1, Q1, Q1, Q1, Q1, |
||||
Q2, Q2, Q2, Q2, Q2, Q2, Q2, Q2, Q2, |
||||
0, 0, 0, 0, 0 |
||||
}; |
||||
|
||||
static const quantizer_t q_1_1[32] = { |
||||
Q0, Q0, Q0, Q1, Q1, Q1, Q2, Q2, Q2, |
||||
Q0, Q0, Q0, Q1, Q1, Q1, Q2, Q2, Q2, |
||||
Q0, Q0, Q0, Q1, Q1, Q1, Q2, Q2, Q2, |
||||
0, 0, 0, 0, 0 |
||||
}; |
||||
|
||||
static const quantizer_t q_1_2[32] = { |
||||
Q0, Q1, Q2, Q0, Q1, Q2, Q0, Q1, Q2, |
||||
Q0, Q1, Q2, Q0, Q1, Q2, Q0, Q1, Q2, |
||||
Q0, Q1, Q2, Q0, Q1, Q2, Q0, Q1, Q2, |
||||
0, 0, 0, 0, 0 |
||||
}; |
||||
|
||||
#undef Q0 |
||||
#undef Q1 |
||||
#undef Q2 |
||||
|
||||
#define Q0 Q (-4/5) |
||||
#define Q1 Q (-2/5) |
||||
#define Q2 Q (0) |
||||
#define Q3 Q (2/5) |
||||
#define Q4 Q (4/5) |
||||
|
||||
static const quantizer_t q_2_0[128] = { |
||||
Q0,Q0,Q0,Q0,Q0,Q0,Q0,Q0,Q0,Q0,Q0,Q0,Q0,Q0,Q0,Q0,Q0,Q0,Q0,Q0,Q0,Q0,Q0,Q0,Q0, |
||||
Q1,Q1,Q1,Q1,Q1,Q1,Q1,Q1,Q1,Q1,Q1,Q1,Q1,Q1,Q1,Q1,Q1,Q1,Q1,Q1,Q1,Q1,Q1,Q1,Q1, |
||||
Q2,Q2,Q2,Q2,Q2,Q2,Q2,Q2,Q2,Q2,Q2,Q2,Q2,Q2,Q2,Q2,Q2,Q2,Q2,Q2,Q2,Q2,Q2,Q2,Q2, |
||||
Q3,Q3,Q3,Q3,Q3,Q3,Q3,Q3,Q3,Q3,Q3,Q3,Q3,Q3,Q3,Q3,Q3,Q3,Q3,Q3,Q3,Q3,Q3,Q3,Q3, |
||||
Q4,Q4,Q4,Q4,Q4,Q4,Q4,Q4,Q4,Q4,Q4,Q4,Q4,Q4,Q4,Q4,Q4,Q4,Q4,Q4,Q4,Q4,Q4,Q4,Q4, |
||||
0,0,0 |
||||
}; |
||||
|
||||
static const quantizer_t q_2_1[128] = { |
||||
Q0,Q0,Q0,Q0,Q0,Q1,Q1,Q1,Q1,Q1,Q2,Q2,Q2,Q2,Q2,Q3,Q3,Q3,Q3,Q3,Q4,Q4,Q4,Q4,Q4, |
||||
Q0,Q0,Q0,Q0,Q0,Q1,Q1,Q1,Q1,Q1,Q2,Q2,Q2,Q2,Q2,Q3,Q3,Q3,Q3,Q3,Q4,Q4,Q4,Q4,Q4, |
||||
Q0,Q0,Q0,Q0,Q0,Q1,Q1,Q1,Q1,Q1,Q2,Q2,Q2,Q2,Q2,Q3,Q3,Q3,Q3,Q3,Q4,Q4,Q4,Q4,Q4, |
||||
Q0,Q0,Q0,Q0,Q0,Q1,Q1,Q1,Q1,Q1,Q2,Q2,Q2,Q2,Q2,Q3,Q3,Q3,Q3,Q3,Q4,Q4,Q4,Q4,Q4, |
||||
Q0,Q0,Q0,Q0,Q0,Q1,Q1,Q1,Q1,Q1,Q2,Q2,Q2,Q2,Q2,Q3,Q3,Q3,Q3,Q3,Q4,Q4,Q4,Q4,Q4, |
||||
0,0,0 |
||||
}; |
||||
|
||||
static const quantizer_t q_2_2[128] = { |
||||
Q0,Q1,Q2,Q3,Q4,Q0,Q1,Q2,Q3,Q4,Q0,Q1,Q2,Q3,Q4,Q0,Q1,Q2,Q3,Q4,Q0,Q1,Q2,Q3,Q4, |
||||
Q0,Q1,Q2,Q3,Q4,Q0,Q1,Q2,Q3,Q4,Q0,Q1,Q2,Q3,Q4,Q0,Q1,Q2,Q3,Q4,Q0,Q1,Q2,Q3,Q4, |
||||
Q0,Q1,Q2,Q3,Q4,Q0,Q1,Q2,Q3,Q4,Q0,Q1,Q2,Q3,Q4,Q0,Q1,Q2,Q3,Q4,Q0,Q1,Q2,Q3,Q4, |
||||
Q0,Q1,Q2,Q3,Q4,Q0,Q1,Q2,Q3,Q4,Q0,Q1,Q2,Q3,Q4,Q0,Q1,Q2,Q3,Q4,Q0,Q1,Q2,Q3,Q4, |
||||
Q0,Q1,Q2,Q3,Q4,Q0,Q1,Q2,Q3,Q4,Q0,Q1,Q2,Q3,Q4,Q0,Q1,Q2,Q3,Q4,Q0,Q1,Q2,Q3,Q4, |
||||
0,0,0 |
||||
}; |
||||
|
||||
#undef Q0 |
||||
#undef Q1 |
||||
#undef Q2 |
||||
#undef Q3 |
||||
#undef Q4 |
||||
|
||||
static const quantizer_t q_3[8] = { |
||||
Q (-6/7), Q (-4/7), Q (-2/7), Q (0), Q (2/7), Q (4/7), Q (6/7), 0 |
||||
}; |
||||
|
||||
#define Q0 Q (-10/11) |
||||
#define Q1 Q (-8/11) |
||||
#define Q2 Q (-6/11) |
||||
#define Q3 Q (-4/11) |
||||
#define Q4 Q (-2/11) |
||||
#define Q5 Q (0) |
||||
#define Q6 Q (2/11) |
||||
#define Q7 Q (4/11) |
||||
#define Q8 Q (6/11) |
||||
#define Q9 Q (8/11) |
||||
#define QA Q (10/11) |
||||
|
||||
static const quantizer_t q_4_0[128] = { |
||||
Q0, Q0, Q0, Q0, Q0, Q0, Q0, Q0, Q0, Q0, Q0, |
||||
Q1, Q1, Q1, Q1, Q1, Q1, Q1, Q1, Q1, Q1, Q1, |
||||
Q2, Q2, Q2, Q2, Q2, Q2, Q2, Q2, Q2, Q2, Q2, |
||||
Q3, Q3, Q3, Q3, Q3, Q3, Q3, Q3, Q3, Q3, Q3, |
||||
Q4, Q4, Q4, Q4, Q4, Q4, Q4, Q4, Q4, Q4, Q4, |
||||
Q5, Q5, Q5, Q5, Q5, Q5, Q5, Q5, Q5, Q5, Q5, |
||||
Q6, Q6, Q6, Q6, Q6, Q6, Q6, Q6, Q6, Q6, Q6, |
||||
Q7, Q7, Q7, Q7, Q7, Q7, Q7, Q7, Q7, Q7, Q7, |
||||
Q8, Q8, Q8, Q8, Q8, Q8, Q8, Q8, Q8, Q8, Q8, |
||||
Q9, Q9, Q9, Q9, Q9, Q9, Q9, Q9, Q9, Q9, Q9, |
||||
QA, QA, QA, QA, QA, QA, QA, QA, QA, QA, QA, |
||||
0, 0, 0, 0, 0, 0, 0 |
||||
}; |
||||
|
||||
static const quantizer_t q_4_1[128] = { |
||||
Q0, Q1, Q2, Q3, Q4, Q5, Q6, Q7, Q8, Q9, QA, |
||||
Q0, Q1, Q2, Q3, Q4, Q5, Q6, Q7, Q8, Q9, QA, |
||||
Q0, Q1, Q2, Q3, Q4, Q5, Q6, Q7, Q8, Q9, QA, |
||||
Q0, Q1, Q2, Q3, Q4, Q5, Q6, Q7, Q8, Q9, QA, |
||||
Q0, Q1, Q2, Q3, Q4, Q5, Q6, Q7, Q8, Q9, QA, |
||||
Q0, Q1, Q2, Q3, Q4, Q5, Q6, Q7, Q8, Q9, QA, |
||||
Q0, Q1, Q2, Q3, Q4, Q5, Q6, Q7, Q8, Q9, QA, |
||||
Q0, Q1, Q2, Q3, Q4, Q5, Q6, Q7, Q8, Q9, QA, |
||||
Q0, Q1, Q2, Q3, Q4, Q5, Q6, Q7, Q8, Q9, QA, |
||||
Q0, Q1, Q2, Q3, Q4, Q5, Q6, Q7, Q8, Q9, QA, |
||||
Q0, Q1, Q2, Q3, Q4, Q5, Q6, Q7, Q8, Q9, QA, |
||||
0, 0, 0, 0, 0, 0, 0 |
||||
}; |
||||
|
||||
#undef Q0 |
||||
#undef Q1 |
||||
#undef Q2 |
||||
#undef Q3 |
||||
#undef Q4 |
||||
#undef Q5 |
||||
#undef Q6 |
||||
#undef Q7 |
||||
#undef Q8 |
||||
#undef Q9 |
||||
#undef QA |
||||
|
||||
static const quantizer_t q_5[16] = { |
||||
Q (-14/15), Q (-12/15), Q (-10/15), Q (-8/15), Q (-6/15), |
||||
Q (-4/15), Q (-2/15), Q (0), Q (2/15), Q (4/15), |
||||
Q (6/15), Q (8/15), Q (10/15), Q (12/15), Q (14/15), 0 |
||||
}; |
||||
|
||||
#ifndef LIBA52_FIXED |
||||
static const sample_t scale_factor[25] = { |
||||
0.000030517578125, |
||||
0.0000152587890625, |
||||
0.00000762939453125, |
||||
0.000003814697265625, |
||||
0.0000019073486328125, |
||||
0.00000095367431640625, |
||||
0.000000476837158203125, |
||||
0.0000002384185791015625, |
||||
0.00000011920928955078125, |
||||
0.000000059604644775390625, |
||||
0.0000000298023223876953125, |
||||
0.00000001490116119384765625, |
||||
0.000000007450580596923828125, |
||||
0.0000000037252902984619140625, |
||||
0.00000000186264514923095703125, |
||||
0.000000000931322574615478515625, |
||||
0.0000000004656612873077392578125, |
||||
0.00000000023283064365386962890625, |
||||
0.000000000116415321826934814453125, |
||||
0.0000000000582076609134674072265625, |
||||
0.00000000002910383045673370361328125, |
||||
0.000000000014551915228366851806640625, |
||||
0.0000000000072759576141834259033203125, |
||||
0.00000000000363797880709171295166015625, |
||||
0.000000000001818989403545856475830078125 |
||||
}; |
||||
#endif |
||||
|
||||
static const uint16_t dither_lut[256] = { |
||||
0x0000, 0xa011, 0xe033, 0x4022, 0x6077, 0xc066, 0x8044, 0x2055, |
||||
0xc0ee, 0x60ff, 0x20dd, 0x80cc, 0xa099, 0x0088, 0x40aa, 0xe0bb, |
||||
0x21cd, 0x81dc, 0xc1fe, 0x61ef, 0x41ba, 0xe1ab, 0xa189, 0x0198, |
||||
0xe123, 0x4132, 0x0110, 0xa101, 0x8154, 0x2145, 0x6167, 0xc176, |
||||
0x439a, 0xe38b, 0xa3a9, 0x03b8, 0x23ed, 0x83fc, 0xc3de, 0x63cf, |
||||
0x8374, 0x2365, 0x6347, 0xc356, 0xe303, 0x4312, 0x0330, 0xa321, |
||||
0x6257, 0xc246, 0x8264, 0x2275, 0x0220, 0xa231, 0xe213, 0x4202, |
||||
0xa2b9, 0x02a8, 0x428a, 0xe29b, 0xc2ce, 0x62df, 0x22fd, 0x82ec, |
||||
0x8734, 0x2725, 0x6707, 0xc716, 0xe743, 0x4752, 0x0770, 0xa761, |
||||
0x47da, 0xe7cb, 0xa7e9, 0x07f8, 0x27ad, 0x87bc, 0xc79e, 0x678f, |
||||
0xa6f9, 0x06e8, 0x46ca, 0xe6db, 0xc68e, 0x669f, 0x26bd, 0x86ac, |
||||
0x6617, 0xc606, 0x8624, 0x2635, 0x0660, 0xa671, 0xe653, 0x4642, |
||||
0xc4ae, 0x64bf, 0x249d, 0x848c, 0xa4d9, 0x04c8, 0x44ea, 0xe4fb, |
||||
0x0440, 0xa451, 0xe473, 0x4462, 0x6437, 0xc426, 0x8404, 0x2415, |
||||
0xe563, 0x4572, 0x0550, 0xa541, 0x8514, 0x2505, 0x6527, 0xc536, |
||||
0x258d, 0x859c, 0xc5be, 0x65af, 0x45fa, 0xe5eb, 0xa5c9, 0x05d8, |
||||
0xae79, 0x0e68, 0x4e4a, 0xee5b, 0xce0e, 0x6e1f, 0x2e3d, 0x8e2c, |
||||
0x6e97, 0xce86, 0x8ea4, 0x2eb5, 0x0ee0, 0xaef1, 0xeed3, 0x4ec2, |
||||
0x8fb4, 0x2fa5, 0x6f87, 0xcf96, 0xefc3, 0x4fd2, 0x0ff0, 0xafe1, |
||||
0x4f5a, 0xef4b, 0xaf69, 0x0f78, 0x2f2d, 0x8f3c, 0xcf1e, 0x6f0f, |
||||
0xede3, 0x4df2, 0x0dd0, 0xadc1, 0x8d94, 0x2d85, 0x6da7, 0xcdb6, |
||||
0x2d0d, 0x8d1c, 0xcd3e, 0x6d2f, 0x4d7a, 0xed6b, 0xad49, 0x0d58, |
||||
0xcc2e, 0x6c3f, 0x2c1d, 0x8c0c, 0xac59, 0x0c48, 0x4c6a, 0xec7b, |
||||
0x0cc0, 0xacd1, 0xecf3, 0x4ce2, 0x6cb7, 0xcca6, 0x8c84, 0x2c95, |
||||
0x294d, 0x895c, 0xc97e, 0x696f, 0x493a, 0xe92b, 0xa909, 0x0918, |
||||
0xe9a3, 0x49b2, 0x0990, 0xa981, 0x89d4, 0x29c5, 0x69e7, 0xc9f6, |
||||
0x0880, 0xa891, 0xe8b3, 0x48a2, 0x68f7, 0xc8e6, 0x88c4, 0x28d5, |
||||
0xc86e, 0x687f, 0x285d, 0x884c, 0xa819, 0x0808, 0x482a, 0xe83b, |
||||
0x6ad7, 0xcac6, 0x8ae4, 0x2af5, 0x0aa0, 0xaab1, 0xea93, 0x4a82, |
||||
0xaa39, 0x0a28, 0x4a0a, 0xea1b, 0xca4e, 0x6a5f, 0x2a7d, 0x8a6c, |
||||
0x4b1a, 0xeb0b, 0xab29, 0x0b38, 0x2b6d, 0x8b7c, 0xcb5e, 0x6b4f, |
||||
0x8bf4, 0x2be5, 0x6bc7, 0xcbd6, 0xeb83, 0x4b92, 0x0bb0, 0xaba1 |
||||
}; |
Loading…
Reference in new issue