开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > Windows编程 > 多媒体编程 > 查看源码
parse.c
资源名称：fullMPCcode.rar　[点击查看]
上传用户：xjjlds
上传日期：2015-12-05
资源大小：22823k
文件大小：23k
源码类别：

多媒体编程

开发平台：

Visual C++

parse.c：源码内容
  1. /*
  2.  * parse.c
  3.  * Copyright (C) 2000-2002 Michel Lespinasse <walken@zoy.org>
  4.  * Copyright (C) 1999-2000 Aaron Holtzman <aholtzma@ess.engr.uvic.ca>
  5.  *
  6.  * This file is part of a52dec, a free ATSC A-52 stream decoder.
  7.  * See http://liba52.sourceforge.net/ for updates.
  8.  *
  9.  * a52dec is free software; you can redistribute it and/or modify
  10.  * it under the terms of the GNU General Public License as published by
  11.  * the Free Software Foundation; either version 2 of the License, or
  12.  * (at your option) any later version.
  13.  *
  14.  * a52dec is distributed in the hope that it will be useful,
  15.  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  16.  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  17.  * GNU General Public License for more details.
  18.  *
  19.  * You should have received a copy of the GNU General Public License
  20.  * along with this program; if not, write to the Free Software
  21.  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  22.  */
  24. #include "config.h"
  26. //#include <stdlib.h>
  28. void    __cdecl free(void *);
  29. void *  __cdecl malloc(size_t);
  31. #include <string.h>
  32. #include <inttypes.h>
  34. #include "a52.h"
  35. #include "a52_internal.h"
  36. #include "bitstream.h"
  37. #include "tables.h"
  39. #ifdef HAVE_MEMALIGN
  40. /* some systems have memalign() but no declaration for it */
  41. void * memalign (size_t align, size_t size);
  42. #else
  43. /* assume malloc alignment is sufficient */
  44. #define memalign(align,size) malloc (size)
  45. #endif
  47. typedef struct {
  48.     sample_t q1[2];
  49.     sample_t q2[2];
  50.     sample_t q4;
  51.     int q1_ptr;
  52.     int q2_ptr;
  53.     int q4_ptr;
  54. } quantizer_t;
  56. static uint8_t halfrate[12] = {0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 2, 3};
  58. a52_state_t * a52_init (uint32_t mm_accel)
  59. {
  60.     a52_state_t * state;
  61.     int i;
  63.     state = malloc (sizeof (a52_state_t));
  64.     if (state == NULL)
  65. return NULL;
  67.     state->samples = memalign (16, 256 * 12 * sizeof (sample_t));
  68.     if (state->samples == NULL) {
  69. free (state);
  70. return NULL;
  71.     }
  73.     for (i = 0; i < 256 * 12; i++)
  74. state->samples[i] = 0;
  76.     state->downmixed = 1;
  78.     state->lfsr_state = 1;
  80.     a52_imdct_init (mm_accel);
  82.     return state;
  83. }
  85. sample_t * a52_samples (a52_state_t * state)
  86. {
  87.     return state->samples;
  88. }
  90. int a52_syncinfo (uint8_t * buf, int * flags,
  91.   int * sample_rate, int * bit_rate)
  92. {
  93.     static int rate[] = { 32,  40,  48,  56,  64,  80,  96, 112,
  94.  128, 160, 192, 224, 256, 320, 384, 448,
  95.  512, 576, 640};
  96.     static uint8_t lfeon[8] = {0x10, 0x10, 0x04, 0x04, 0x04, 0x01, 0x04, 0x01};
  97.     int frmsizecod;
  98.     int bitrate;
  99.     int half;
  100.     int acmod;
  102.     if ((buf[0] != 0x0b) || (buf[1] != 0x77)) /* syncword */
  103. return 0;
  105.     if (buf[5] >= 0x60) /* bsid >= 12 */
  106. return 0;
  107.     half = halfrate[buf[5] >> 3];
  109.     /* acmod, dsurmod and lfeon */
  110.     acmod = buf[6] >> 5;
  111.     *flags = ((((buf[6] & 0xf8) == 0x50) ? A52_DOLBY : acmod) |
  112.       ((buf[6] & lfeon[acmod]) ? A52_LFE : 0));
  114.     frmsizecod = buf[4] & 63;
  115.     if (frmsizecod >= 38)
  116. return 0;
  117.     bitrate = rate [frmsizecod >> 1];
  118.     *bit_rate = (bitrate * 1000) >> half;
  120.     switch (buf[4] & 0xc0) {
  121.     case 0:
  122. *sample_rate = 48000 >> half;
  123. return 4 * bitrate;
  124.     case 0x40:
  125. *sample_rate = 44100 >> half;
  126. return 2 * (320 * bitrate / 147 + (frmsizecod & 1));
  127.     case 0x80:
  128. *sample_rate = 32000 >> half;
  129. return 6 * bitrate;
  130.     default:
  131. return 0;
  132.     }
  133. }
  135. int a52_frame (a52_state_t * state, uint8_t * buf, int * flags,
  136.        sample_t * level, sample_t bias)
  137. {
  138.     static sample_t clev[4] = {LEVEL_3DB, LEVEL_45DB, LEVEL_6DB, LEVEL_45DB};
  139.     static sample_t slev[4] = {LEVEL_3DB, LEVEL_6DB, 0, LEVEL_6DB};
  140.     int chaninfo;
  141.     int acmod;
  143.     state->fscod = buf[4] >> 6;
  144.     state->halfrate = halfrate[buf[5] >> 3];
  145.     state->acmod = acmod = buf[6] >> 5;
  147.     a52_bitstream_set_ptr (state, buf + 6);
  148.     bitstream_get (state, 3); /* skip acmod we already parsed */
  150.     if ((acmod == 2) && (bitstream_get (state, 2) == 2)) /* dsurmod */
  151. acmod = A52_DOLBY;
  153.     if ((acmod & 1) && (acmod != 1))
  154. state->clev = clev[bitstream_get (state, 2)]; /* cmixlev */
  156.     if (acmod & 4)
  157. state->slev = slev[bitstream_get (state, 2)]; /* surmixlev */
  159.     state->lfeon = bitstream_get (state, 1);
  161.     state->output = a52_downmix_init (acmod, *flags, level,
  162.       state->clev, state->slev);
  163.     if (state->output < 0)
  164. return 1;
  165.     if (state->lfeon && (*flags & A52_LFE))
  166. state->output |= A52_LFE;
  167.     *flags = state->output;
  168.     /* the 2* compensates for differences in imdct */
  169.     state->dynrng = state->level = 2 * *level;
  170.     state->bias = bias;
  171.     state->dynrnge = 1;
  172.     state->dynrngcall = NULL;
  173.     state->cplba.deltbae = DELTA_BIT_NONE;
  174.     state->ba[0].deltbae = state->ba[1].deltbae = state->ba[2].deltbae =
  175. state->ba[3].deltbae = state->ba[4].deltbae = DELTA_BIT_NONE;
  177.     chaninfo = !acmod;
  178.     do {
  179. bitstream_get (state, 5); /* dialnorm */
  180. if (bitstream_get (state, 1)) /* compre */
  181.     bitstream_get (state, 8); /* compr */
  182. if (bitstream_get (state, 1)) /* langcode */
  183.     bitstream_get (state, 8); /* langcod */
  184. if (bitstream_get (state, 1)) /* audprodie */
  185.     bitstream_get (state, 7); /* mixlevel + roomtyp */
  186.     } while (chaninfo--);
  188.     bitstream_get (state, 2); /* copyrightb + origbs */
  190.     if (bitstream_get (state, 1)) /* timecod1e */
  191. bitstream_get (state, 14); /* timecod1 */
  192.     if (bitstream_get (state, 1)) /* timecod2e */
  193. bitstream_get (state, 14); /* timecod2 */
  195.     if (bitstream_get (state, 1)) { /* addbsie */
  196. int addbsil;
  198. addbsil = bitstream_get (state, 6);
  199. do {
  200.     bitstream_get (state, 8); /* addbsi */
  201. } while (addbsil--);
  202.     }
  204.     return 0;
  205. }
  207. void a52_dynrng (a52_state_t * state,
  208.  sample_t (* call) (sample_t, void *), void * data)
  209. {
  210.     state->dynrnge = 0;
  211.     if (call) {
  212. state->dynrnge = 1;
  213. state->dynrngcall = call;
  214. state->dynrngdata = data;
  215.     }
  216. }
  218. static int parse_exponents (a52_state_t * state, int expstr, int ngrps,
  219.     uint8_t exponent, uint8_t * dest)
  220. {
  221.     int exps;
  223.     while (ngrps--) {
  224. exps = bitstream_get (state, 7);
  226. exponent += exp_1[exps];
  227. if (exponent > 24)
  228.     return 1;
  230. switch (expstr) {
  231. case EXP_D45:
  232.     *(dest++) = exponent;
  233.     *(dest++) = exponent;
  234. case EXP_D25:
  235.     *(dest++) = exponent;
  236. case EXP_D15:
  237.     *(dest++) = exponent;
  238. }
  240. exponent += exp_2[exps];
  241. if (exponent > 24)
  242.     return 1;
  244. switch (expstr) {
  245. case EXP_D45:
  246.     *(dest++) = exponent;
  247.     *(dest++) = exponent;
  248. case EXP_D25:
  249.     *(dest++) = exponent;
  250. case EXP_D15:
  251.     *(dest++) = exponent;
  252. }
  254. exponent += exp_3[exps];
  255. if (exponent > 24)
  256.     return 1;
  258. switch (expstr) {
  259. case EXP_D45:
  260.     *(dest++) = exponent;
  261.     *(dest++) = exponent;
  262. case EXP_D25:
  263.     *(dest++) = exponent;
  264. case EXP_D15:
  265.     *(dest++) = exponent;
  266. }
  267.     }
  269.     return 0;
  270. }
  272. static int parse_deltba (a52_state_t * state, int8_t * deltba)
  273. {
  274.     int deltnseg, deltlen, delta, j;
  276.     memset (deltba, 0, 50);
  278.     deltnseg = bitstream_get (state, 3);
  279.     j = 0;
  280.     do {
  281. j += bitstream_get (state, 5);
  282. deltlen = bitstream_get (state, 4);
  283. delta = bitstream_get (state, 3);
  284. delta -= (delta >= 4) ? 3 : 4;
  285. if (!deltlen)
  286.     continue;
  287. if (j + deltlen >= 50)
  288.     return 1;
  289. while (deltlen--)
  290.     deltba[j++] = delta;
  291.     } while (deltnseg--);
  293.     return 0;
  294. }
  296. static inline int zero_snr_offsets (int nfchans, a52_state_t * state)
  297. {
  298.     int i;
  300.     if ((state->csnroffst) ||
  301. (state->chincpl && state->cplba.bai >> 3) || /* cplinu, fsnroffst */
  302. (state->lfeon && state->lfeba.bai >> 3)) /* fsnroffst */
  303. return 0;
  304.     for (i = 0; i < nfchans; i++)
  305. if (state->ba[i].bai >> 3) /* fsnroffst */
  306.     return 0;
  307.     return 1;
  308. }
  310. static inline int16_t dither_gen (a52_state_t * state)
  311. {
  312.     int16_t nstate;
  314.     nstate = dither_lut[state->lfsr_state >> 8] ^ (state->lfsr_state << 8);
  316.     state->lfsr_state = (uint16_t) nstate;
  318.     return nstate;
  319. }
  321. static void coeff_get (a52_state_t * state, sample_t * coeff,
  322.        expbap_t * expbap, quantizer_t * quantizer,
  323.        sample_t level, int dither, int end)
  324. {
  325.     int i;
  326.     uint8_t * exp;
  327.     int8_t * bap;
  328.     sample_t factor[25];
  330.     for (i = 0; i <= 24; i++)
  331. factor[i] = scale_factor[i] * level;
  333.     exp = expbap->exp;
  334.     bap = expbap->bap;
  336.     for (i = 0; i < end; i++) {
  337. int bapi;
  339. bapi = bap[i];
  340. switch (bapi) {
  341. case 0:
  342.     if (dither) {
  343. coeff[i] = dither_gen (state) * LEVEL_3DB * factor[exp[i]];
  344. continue;
  345.     } else {
  346. coeff[i] = 0;
  347. continue;
  348.     }
  350. case -1:
  351.     if (quantizer->q1_ptr >= 0) {
  352. coeff[i] = quantizer->q1[quantizer->q1_ptr--] * factor[exp[i]];
  353. continue;
  354.     } else {
  355. int code;
  357. code = bitstream_get (state, 5);
  359. quantizer->q1_ptr = 1;
  360. quantizer->q1[0] = q_1_2[code];
  361. quantizer->q1[1] = q_1_1[code];
  362. coeff[i] = q_1_0[code] * factor[exp[i]];
  363. continue;
  364.     }
  366. case -2:
  367.     if (quantizer->q2_ptr >= 0) {
  368. coeff[i] = quantizer->q2[quantizer->q2_ptr--] * factor[exp[i]];
  369. continue;
  370.     } else {
  371. int code;
  373. code = bitstream_get (state, 7);
  375. quantizer->q2_ptr = 1;
  376. quantizer->q2[0] = q_2_2[code];
  377. quantizer->q2[1] = q_2_1[code];
  378. coeff[i] = q_2_0[code] * factor[exp[i]];
  379. continue;
  380.     }
  382. case 3:
  383.     coeff[i] = q_3[bitstream_get (state, 3)] * factor[exp[i]];
  384.     continue;
  386. case -3:
  387.     if (quantizer->q4_ptr == 0) {
  388. quantizer->q4_ptr = -1;
  389. coeff[i] = quantizer->q4 * factor[exp[i]];
  390. continue;
  391.     } else {
  392. int code;
  394. code = bitstream_get (state, 7);
  396. quantizer->q4_ptr = 0;
  397. quantizer->q4 = q_4_1[code];
  398. coeff[i] = q_4_0[code] * factor[exp[i]];
  399. continue;
  400.     }
  402. case 4:
  403.     coeff[i] = q_5[bitstream_get (state, 4)] * factor[exp[i]];
  404.     continue;
  406. default:
  407.     coeff[i] = ((bitstream_get_2 (state, bapi) << (16 - bapi)) *
  408.   factor[exp[i]]);
  409. }
  410.     }
  411. }
  413. static void coeff_get_coupling (a52_state_t * state, int nfchans,
  414. sample_t * coeff, sample_t (* samples)[256],
  415. quantizer_t * quantizer, uint8_t dithflag[5])
  416. {
  417.     int cplbndstrc, bnd, i, i_end, ch;
  418.     uint8_t * exp;
  419.     int8_t * bap;
  420.     sample_t cplco[5];
  422.     exp = state->cpl_expbap.exp;
  423.     bap = state->cpl_expbap.bap;
  424.     bnd = 0;
  425.     cplbndstrc = state->cplbndstrc;
  426.     i = state->cplstrtmant;
  427.     while (i < state->cplendmant) {
  428. i_end = i + 12;
  429. while (cplbndstrc & 1) {
  430.     cplbndstrc >>= 1;
  431.     i_end += 12;
  432. }
  433. cplbndstrc >>= 1;
  434. for (ch = 0; ch < nfchans; ch++)
  435.     cplco[ch] = state->cplco[ch][bnd] * coeff[ch];
  436. bnd++;
  438. while (i < i_end) {
  439.     sample_t cplcoeff;
  440.     int bapi;
  442.     bapi = bap[i];
  443.     switch (bapi) {
  444.     case 0:
  445. cplcoeff = LEVEL_3DB * scale_factor[exp[i]];
  446. for (ch = 0; ch < nfchans; ch++)
  447.     if ((state->chincpl >> ch) & 1) {
  448. if (dithflag[ch])
  449.     samples[ch][i] = (cplcoeff * cplco[ch] *
  450.       dither_gen (state));
  451. else
  452.     samples[ch][i] = 0;
  453.     }
  454. i++;
  455. continue;
  457.     case -1:
  458. if (quantizer->q1_ptr >= 0) {
  459.     cplcoeff = quantizer->q1[quantizer->q1_ptr--];
  460.     break;
  461. } else {
  462.     int code;
  464.     code = bitstream_get (state, 5);
  466.     quantizer->q1_ptr = 1;
  467.     quantizer->q1[0] = q_1_2[code];
  468.     quantizer->q1[1] = q_1_1[code];
  469.     cplcoeff = q_1_0[code];
  470.     break;
  471. }
  473.     case -2:
  474. if (quantizer->q2_ptr >= 0) {
  475.     cplcoeff = quantizer->q2[quantizer->q2_ptr--];
  476.     break;
  477. } else {
  478.     int code;
  480.     code = bitstream_get (state, 7);
  482.     quantizer->q2_ptr = 1;
  483.     quantizer->q2[0] = q_2_2[code];
  484.     quantizer->q2[1] = q_2_1[code];
  485.     cplcoeff = q_2_0[code];
  486.     break;
  487. }
  489.     case 3:
  490. cplcoeff = q_3[bitstream_get (state, 3)];
  491. break;
  493.     case -3:
  494. if (quantizer->q4_ptr == 0) {
  495.     quantizer->q4_ptr = -1;
  496.     cplcoeff = quantizer->q4;
  497.     break;
  498. } else {
  499.     int code;
  501.     code = bitstream_get (state, 7);
  503.     quantizer->q4_ptr = 0;
  504.     quantizer->q4 = q_4_1[code];
  505.     cplcoeff = q_4_0[code];
  506.     break;
  507. }
  509.     case 4:
  510. cplcoeff = q_5[bitstream_get (state, 4)];
  511. break;
  513.     default:
  514. cplcoeff = bitstream_get_2 (state, bapi) << (16 - bapi);
  515.     }
  517.     cplcoeff *= scale_factor[exp[i]];
  518.     for (ch = 0; ch < nfchans; ch++)
  519. if ((state->chincpl >> ch) & 1)
  520.     samples[ch][i] = cplcoeff * cplco[ch];
  521.     i++;
  522. }
  523.     }
  524. }
  526. int a52_block (a52_state_t * state)
  527. {
  528.     static const uint8_t nfchans_tbl[] = {2, 1, 2, 3, 3, 4, 4, 5, 1, 1, 2};
  529.     static int rematrix_band[4] = {25, 37, 61, 253};
  530.     int i, nfchans, chaninfo;
  531.     uint8_t cplexpstr, chexpstr[5], lfeexpstr, do_bit_alloc, done_cpl;
  532.     uint8_t blksw[5], dithflag[5];
  533.     sample_t coeff[5];
  534.     int chanbias;
  535.     quantizer_t quantizer;
  536.     sample_t * samples;
  538.     nfchans = nfchans_tbl[state->acmod];
  540.     for (i = 0; i < nfchans; i++)
  541. blksw[i] = bitstream_get (state, 1);
  543.     for (i = 0; i < nfchans; i++)
  544. dithflag[i] = bitstream_get (state, 1);
  546.     chaninfo = !state->acmod;
  547.     do {
  548. if (bitstream_get (state, 1)) { /* dynrnge */
  549.     int dynrng;
  551.     dynrng = bitstream_get_2 (state, 8);
  552.     if (state->dynrnge) {
  553. sample_t range;
  555. range = ((((dynrng & 0x1f) | 0x20) << 13) *
  556.  scale_factor[3 - (dynrng >> 5)]);
  557. if (state->dynrngcall)
  558.     range = state->dynrngcall (range, state->dynrngdata);
  559. state->dynrng = state->level * range;
  560.     }
  561. }
  562.     } while (chaninfo--);
  564.     if (bitstream_get (state, 1)) { /* cplstre */
  565. state->chincpl = 0;
  566. if (bitstream_get (state, 1)) { /* cplinu */
  567.     static uint8_t bndtab[16] = {31, 35, 37, 39, 41, 42, 43, 44,
  568.  45, 45, 46, 46, 47, 47, 48, 48};
  569.     int cplbegf;
  570.     int cplendf;
  571.     int ncplsubnd;
  573.     for (i = 0; i < nfchans; i++)
  574. state->chincpl |= bitstream_get (state, 1) << i;
  575.     switch (state->acmod) {
  576.     case 0: case 1:
  577. return 1;
  578.     case 2:
  579. state->phsflginu = bitstream_get (state, 1);
  580.     }
  581.     cplbegf = bitstream_get (state, 4);
  582.     cplendf = bitstream_get (state, 4);
  584.     if (cplendf + 3 - cplbegf < 0)
  585. return 1;
  586.     state->ncplbnd = ncplsubnd = cplendf + 3 - cplbegf;
  587.     state->cplstrtbnd = bndtab[cplbegf];
  588.     state->cplstrtmant = cplbegf * 12 + 37;
  589.     state->cplendmant = cplendf * 12 + 73;
  591.     state->cplbndstrc = 0;
  592.     for (i = 0; i < ncplsubnd - 1; i++)
  593. if (bitstream_get (state, 1)) {
  594.     state->cplbndstrc |= 1 << i;
  595.     state->ncplbnd--;
  596. }
  597. }
  598.     }
  600.     if (state->chincpl) { /* cplinu */
  601. int j, cplcoe;
  603. cplcoe = 0;
  604. for (i = 0; i < nfchans; i++)
  605.     if ((state->chincpl) >> i & 1)
  606. if (bitstream_get (state, 1)) { /* cplcoe */
  607.     int mstrcplco, cplcoexp, cplcomant;
  609.     cplcoe = 1;
  610.     mstrcplco = 3 * bitstream_get (state, 2);
  611.     for (j = 0; j < state->ncplbnd; j++) {
  612. cplcoexp = bitstream_get (state, 4);
  613. cplcomant = bitstream_get (state, 4);
  614. if (cplcoexp == 15)
  615.     cplcomant <<= 14;
  616. else
  617.     cplcomant = (cplcomant | 0x10) << 13;
  618. state->cplco[i][j] =
  619.     cplcomant * scale_factor[cplcoexp + mstrcplco];
  620.     }
  621. }
  622. if ((state->acmod == 2) && state->phsflginu && cplcoe)
  623.     for (j = 0; j < state->ncplbnd; j++)
  624. if (bitstream_get (state, 1)) /* phsflg */
  625.     state->cplco[1][j] = -state->cplco[1][j];
  626.     }
  628.     if ((state->acmod == 2) && (bitstream_get (state, 1))) { /* rematstr */
  629. int end;
  631. state->rematflg = 0;
  632. end = (state->chincpl) ? state->cplstrtmant : 253; /* cplinu */
  633. i = 0;
  634. do
  635.     state->rematflg |= bitstream_get (state, 1) << i;
  636. while (rematrix_band[i++] < end);
  637.     }
  639.     cplexpstr = EXP_REUSE;
  640.     lfeexpstr = EXP_REUSE;
  641.     if (state->chincpl) /* cplinu */
  642. cplexpstr = bitstream_get (state, 2);
  643.     for (i = 0; i < nfchans; i++)
  644. chexpstr[i] = bitstream_get (state, 2);
  645.     if (state->lfeon) 
  646. lfeexpstr = bitstream_get (state, 1);
  648.     for (i = 0; i < nfchans; i++)
  649. if (chexpstr[i] != EXP_REUSE) {
  650.     if ((state->chincpl >> i) & 1)
  651. state->endmant[i] = state->cplstrtmant;
  652.     else {
  653. int chbwcod;
  655. chbwcod = bitstream_get (state, 6);
  656. if (chbwcod > 60)
  657.     return 1;
  658. state->endmant[i] = chbwcod * 3 + 73;
  659.     }
  660. }
  662.     do_bit_alloc = 0;
  664.     if (cplexpstr != EXP_REUSE) {
  665. int cplabsexp, ncplgrps;
  667. do_bit_alloc = 64;
  668. ncplgrps = ((state->cplendmant - state->cplstrtmant) /
  669.     (3 << (cplexpstr - 1)));
  670. cplabsexp = bitstream_get (state, 4) << 1;
  671. if (parse_exponents (state, cplexpstr, ncplgrps, cplabsexp,
  672.      state->cpl_expbap.exp + state->cplstrtmant))
  673.     return 1;
  674.     }
  675.     for (i = 0; i < nfchans; i++)
  676. if (chexpstr[i] != EXP_REUSE) {
  677.     int grp_size, nchgrps;
  679.     do_bit_alloc |= 1 << i;
  680.     grp_size = 3 << (chexpstr[i] - 1);
  681.     nchgrps = (state->endmant[i] + grp_size - 4) / grp_size;
  682.     state->fbw_expbap[i].exp[0] = bitstream_get (state, 4);
  683.     if (parse_exponents (state, chexpstr[i], nchgrps,
  684.  state->fbw_expbap[i].exp[0],
  685.  state->fbw_expbap[i].exp + 1))
  686. return 1;
  687.     bitstream_get (state, 2); /* gainrng */
  688. }
  689.     if (lfeexpstr != EXP_REUSE) {
  690. do_bit_alloc |= 32;
  691. state->lfe_expbap.exp[0] = bitstream_get (state, 4);
  692. if (parse_exponents (state, lfeexpstr, 2, state->lfe_expbap.exp[0],
  693.      state->lfe_expbap.exp + 1))
  694.     return 1;
  695.     }
  697.     if (bitstream_get (state, 1)) { /* baie */
  698. do_bit_alloc = -1;
  699. state->bai = bitstream_get (state, 11);
  700.     }
  701.     if (bitstream_get (state, 1)) { /* snroffste */
  702. do_bit_alloc = -1;
  703. state->csnroffst = bitstream_get (state, 6);
  704. if (state->chincpl) /* cplinu */
  705.     state->cplba.bai = bitstream_get (state, 7);
  706. for (i = 0; i < nfchans; i++)
  707.     state->ba[i].bai = bitstream_get (state, 7);
  708. if (state->lfeon)
  709.     state->lfeba.bai = bitstream_get (state, 7);
  710.     }
  711.     if ((state->chincpl) && (bitstream_get (state, 1))) { /* cplleake */
  712. do_bit_alloc |= 64;
  713. state->cplfleak = 9 - bitstream_get (state, 3);
  714. state->cplsleak = 9 - bitstream_get (state, 3);
  715.     }
  717.     if (bitstream_get (state, 1)) { /* deltbaie */
  718. do_bit_alloc = -1;
  719. if (state->chincpl) /* cplinu */
  720.     state->cplba.deltbae = bitstream_get (state, 2);
  721. for (i = 0; i < nfchans; i++)
  722.     state->ba[i].deltbae = bitstream_get (state, 2);
  723. if (state->chincpl && /* cplinu */
  724.     (state->cplba.deltbae == DELTA_BIT_NEW) &&
  725.     parse_deltba (state, state->cplba.deltba))
  726.     return 1;
  727. for (i = 0; i < nfchans; i++)
  728.     if ((state->ba[i].deltbae == DELTA_BIT_NEW) &&
  729. parse_deltba (state, state->ba[i].deltba))
  730. return 1;
  731.     }
  733.     if (do_bit_alloc) {
  734. if (zero_snr_offsets (nfchans, state)) {
  735.     memset (state->cpl_expbap.bap, 0, sizeof (state->cpl_expbap.bap));
  736.     for (i = 0; i < nfchans; i++)
  737. memset (state->fbw_expbap[i].bap, 0,
  738. sizeof (state->fbw_expbap[i].bap));
  739.     memset (state->lfe_expbap.bap, 0, sizeof (state->lfe_expbap.bap));
  740. } else {
  741.     if (state->chincpl && (do_bit_alloc & 64)) /* cplinu */
  742. a52_bit_allocate (state, &state->cplba, state->cplstrtbnd,
  743.   state->cplstrtmant, state->cplendmant,
  744.   state->cplfleak << 8, state->cplsleak << 8,
  745.   &state->cpl_expbap);
  746.     for (i = 0; i < nfchans; i++)
  747. if (do_bit_alloc & (1 << i))
  748.     a52_bit_allocate (state, state->ba + i, 0, 0,
  749.       state->endmant[i], 0, 0,
  750.       state->fbw_expbap +i);
  751.     if (state->lfeon && (do_bit_alloc & 32)) {
  752. state->lfeba.deltbae = DELTA_BIT_NONE;
  753. a52_bit_allocate (state, &state->lfeba, 0, 0, 7, 0, 0,
  754.   &state->lfe_expbap);
  755.     }
  756. }
  757.     }
  759.     if (bitstream_get (state, 1)) { /* skiple */
  760. i = bitstream_get (state, 9); /* skipl */
  761. while (i--)
  762.     bitstream_get (state, 8);
  763.     }
  765.     samples = state->samples;
  766.     if (state->output & A52_LFE)
  767. samples += 256; /* shift for LFE channel */
  769.     chanbias = a52_downmix_coeff (coeff, state->acmod, state->output,
  770.   state->dynrng, state->clev, state->slev);
  772.     quantizer.q1_ptr = quantizer.q2_ptr = quantizer.q4_ptr = -1;
  773.     done_cpl = 0;
  775.     for (i = 0; i < nfchans; i++) {
  776. int j;
  778. coeff_get (state, samples + 256 * i, state->fbw_expbap +i, &quantizer,
  779.    coeff[i], dithflag[i], state->endmant[i]);
  781. if ((state->chincpl >> i) & 1) {
  782.     if (!done_cpl) {
  783. done_cpl = 1;
  784. coeff_get_coupling (state, nfchans, coeff,
  785.     (sample_t (*)[256])samples, &quantizer,
  786.     dithflag);
  787.     }
  788.     j = state->cplendmant;
  789. } else
  790.     j = state->endmant[i];
  791. do
  792.     (samples + 256 * i)[j] = 0;
  793. while (++j < 256);
  794.     }
  796.     if (state->acmod == 2) {
  797. int j, end, band, rematflg;
  799. end = ((state->endmant[0] < state->endmant[1]) ?
  800.        state->endmant[0] : state->endmant[1]);
  802. i = 0;
  803. j = 13;
  804. rematflg = state->rematflg;
  805. do {
  806.     if (! (rematflg & 1)) {
  807. rematflg >>= 1;
  808. j = rematrix_band[i++];
  809. continue;
  810.     }
  811.     rematflg >>= 1;
  812.     band = rematrix_band[i++];
  813.     if (band > end)
  814. band = end;
  815.     do {
  816. sample_t tmp0, tmp1;
  818. tmp0 = samples[j];
  819. tmp1 = (samples+256)[j];
  820. samples[j] = tmp0 + tmp1;
  821. (samples+256)[j] = tmp0 - tmp1;
  822.     } while (++j < band);
  823. } while (j < end);
  824.     }
  826.     if (state->lfeon) {
  827. if (state->output & A52_LFE) {
  828.     coeff_get (state, samples - 256, &state->lfe_expbap, &quantizer,
  829.        state->dynrng, 0, 7);
  830.     for (i = 7; i < 256; i++)
  831. (samples-256)[i] = 0;
  832.     a52_imdct_512 (samples - 256, samples + 1536 - 256, state->bias);
  833. } else {
  834.     /* just skip the LFE coefficients */
  835.     coeff_get (state, samples + 1280, &state->lfe_expbap, &quantizer,
  836.        0, 0, 7);
  837. }
  838.     }
  840.     i = 0;
  841.     if (nfchans_tbl[state->output & A52_CHANNEL_MASK] < nfchans)
  842. for (i = 1; i < nfchans; i++)
  843.     if (blksw[i] != blksw[0])
  844. break;
  846.     if (i < nfchans) {
  847. if (state->downmixed) {
  848.     state->downmixed = 0;
  849.     a52_upmix (samples + 1536, state->acmod, state->output);
  850. }
  852. for (i = 0; i < nfchans; i++) {
  853.     sample_t bias;
  855.     bias = 0;
  856.     if (!(chanbias & (1 << i)))
  857. bias = state->bias;
  859.     if (coeff[i]) {
  860. if (blksw[i])
  861.     a52_imdct_256 (samples + 256 * i, samples + 1536 + 256 * i,
  862.    bias);
  863. else 
  864.     a52_imdct_512 (samples + 256 * i, samples + 1536 + 256 * i,
  865.    bias);
  866.     } else {
  867. int j;
  869. for (j = 0; j < 256; j++)
  870.     (samples + 256 * i)[j] = bias;
  871.     }
  872. }
  874. a52_downmix (samples, state->acmod, state->output, state->bias,
  875.      state->clev, state->slev);
  876.     } else {
  877. nfchans = nfchans_tbl[state->output & A52_CHANNEL_MASK];
  879. a52_downmix (samples, state->acmod, state->output, 0,
  880.      state->clev, state->slev);
  882. if (!state->downmixed) {
  883.     state->downmixed = 1;
  884.     a52_downmix (samples + 1536, state->acmod, state->output, 0,
  885.  state->clev, state->slev);
  886. }
  888. if (blksw[0])
  889.     for (i = 0; i < nfchans; i++)
  890. a52_imdct_256 (samples + 256 * i, samples + 1536 + 256 * i,
  891.        state->bias);
  892. else 
  893.     for (i = 0; i < nfchans; i++)
  894. a52_imdct_512 (samples + 256 * i, samples + 1536 + 256 * i,
  895.        state->bias);
  896.     }
  898.     return 0;
  899. }
  901. void a52_free (a52_state_t * state)
  902. {
  903.     free (state->samples);
  904.     free (state);
  905. }