src/lib/doslib/ext/faad/pssyntax.c

   1 /*
   2 ** FAAD2 - Freeware Advanced Audio (AAC) Decoder including SBR decoding
   3 ** Copyright (C) 2003-2005 M. Bakker, Nero AG, http://www.nero.com
   4 **
   5 ** This program is free software; you can redistribute it and/or modify
   6 ** it under the terms of the GNU General Public License as published by
   7 ** the Free Software Foundation; either version 2 of the License, or
   8 ** (at your option) any later version.
   9 **
  10 ** This program is distributed in the hope that it will be useful,
  11 ** but WITHOUT ANY WARRANTY; without even the implied warranty of
  12 ** MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13 ** GNU General Public License for more details.
  14 **
  15 ** You should have received a copy of the GNU General Public License
  16 ** along with this program; if not, write to the Free Software
  17 ** Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
  18 **
  19 ** Any non-GPL usage of this software or parts of this software is strictly
  20 ** forbidden.
  21 **
  22 ** The "appropriate copyright message" mentioned in section 2c of the GPLv2
  23 ** must read: "Code from FAAD2 is copyright (c) Nero AG, www.nero.com"
  24 **
  25 ** Commercial non-GPL licensing of this software is possible.
  26 ** For more info contact Nero AG through Mpeg4AAClicense@nero.com.
  27 **
  28 ** $Id: ps_syntax.c,v 1.11 2007/11/01 12:33:33 menno Exp $
  29 **/
  30
  31 #include "common.h"
  32
  33 #ifdef PS_DEC
  34
  35 #include "bits.h"
  36 #include "ps_dec.h"
  37
  38 /* type definitaions */
  39 typedef const int8_t (*ps_huff_tab)[2];
  40
  41 /* static data tables */
  42 static const uint8_t nr_iid_par_tab[] = {
  43     10, 20, 34, 10, 20, 34, 0, 0
  44 };
  45 static const uint8_t nr_ipdopd_par_tab[] = {
  46     5, 11, 17, 5, 11, 17, 0, 0
  47 };
  48 static const uint8_t nr_icc_par_tab[] = {
  49     10, 20, 34, 10, 20, 34, 0, 0
  50 };
  51 static const uint8_t num_env_tab[][4] = {
  52     { 0, 1, 2, 4 },
  53     { 1, 2, 3, 4 }
  54 };
  55
  56 /* binary lookup huffman tables */
  57 static const int8_t f_huff_iid_def[][2] = {
  58     { /*0*/ -31, 1 },             /* index 0: 1 bits: x */
  59     { 2, 3 },                     /* index 1: 2 bits: 1x */
  60     { /*1*/ -30, /*-1*/ -32 },    /* index 2: 3 bits: 10x */
  61     { 4, 5 },                     /* index 3: 3 bits: 11x */
  62     { /*2*/ -29, /*-2*/ -33 },    /* index 4: 4 bits: 110x */
  63     { 6, 7 },                     /* index 5: 4 bits: 111x */
  64     { /*3*/ -28, /*-3*/ -34 },    /* index 6: 5 bits: 1110x */
  65     { 8, 9 },                     /* index 7: 5 bits: 1111x */
  66     { /*-4*/ -35, /*4*/ -27 },    /* index 8: 6 bits: 11110x */
  67     { /*5*/ -26, 10 },            /* index 9: 6 bits: 11111x */
  68     { /*-5*/ -36, 11 },           /* index 10: 7 bits: 111111x */
  69     { /*6*/ -25, 12 },            /* index 11: 8 bits: 1111111x */
  70     { /*-6*/ -37, 13 },           /* index 12: 9 bits: 11111111x */
  71     { /*-7*/ -38, 14 },           /* index 13: 10 bits: 111111111x */
  72     { /*7*/ -24, 15 },            /* index 14: 11 bits: 1111111111x */
  73     { 16, 17 },                   /* index 15: 12 bits: 11111111111x */
  74     { /*8*/ -23, /*-8*/ -39 },    /* index 16: 13 bits: 111111111110x */
  75     { 18, 19 },                   /* index 17: 13 bits: 111111111111x */
  76     { /*9*/ -22, /*10*/ -21 },    /* index 18: 14 bits: 1111111111110x */
  77     { 20, 21 },                   /* index 19: 14 bits: 1111111111111x */
  78     { /*-9*/ -40, /*11*/ -20 },   /* index 20: 15 bits: 11111111111110x */
  79     { 22, 23 },                   /* index 21: 15 bits: 11111111111111x */
  80     { /*-10*/ -41, 24 },          /* index 22: 16 bits: 111111111111110x */
  81     { 25, 26 },                   /* index 23: 16 bits: 111111111111111x */
  82     { /*-11*/ -42, /*-14*/ -45 }, /* index 24: 17 bits: 1111111111111101x */
  83     { /*-13*/ -44, /*-12*/ -43 }, /* index 25: 17 bits: 1111111111111110x */
  84     { /*12*/ -19, 27 },           /* index 26: 17 bits: 1111111111111111x */
  85     { /*13*/ -18, /*14*/ -17 }    /* index 27: 18 bits: 11111111111111111x */
  86 };
  87
  88 static const int8_t t_huff_iid_def[][2] = {
  89     { /*0*/ -31, 1 },             /* index 0: 1 bits: x */
  90     { /*-1*/ -32, 2 },            /* index 1: 2 bits: 1x */
  91     { /*1*/ -30, 3 },             /* index 2: 3 bits: 11x */
  92     { /*-2*/ -33, 4 },            /* index 3: 4 bits: 111x */
  93     { /*2*/ -29, 5 },             /* index 4: 5 bits: 1111x */
  94     { /*-3*/ -34, 6 },            /* index 5: 6 bits: 11111x */
  95     { /*3*/ -28, 7 },             /* index 6: 7 bits: 111111x */
  96     { /*-4*/ -35, 8 },            /* index 7: 8 bits: 1111111x */
  97     { /*4*/ -27, 9 },             /* index 8: 9 bits: 11111111x */
  98     { /*-5*/ -36, 10 },           /* index 9: 10 bits: 111111111x */
  99     { /*5*/ -26, 11 },            /* index 10: 11 bits: 1111111111x */
 100     { /*-6*/ -37, 12 },           /* index 11: 12 bits: 11111111111x */
 101     { /*6*/ -25, 13 },            /* index 12: 13 bits: 111111111111x */
 102     { /*7*/ -24, 14 },            /* index 13: 14 bits: 1111111111111x */
 103     { /*-7*/ -38, 15 },           /* index 14: 15 bits: 11111111111111x */
 104     { 16, 17 },                   /* index 15: 16 bits: 111111111111111x */
 105     { /*8*/ -23, /*-8*/ -39 },    /* index 16: 17 bits: 1111111111111110x */
 106     { 18, 19 },                   /* index 17: 17 bits: 1111111111111111x */
 107     { 20, 21 },                   /* index 18: 18 bits: 11111111111111110x */
 108     { 22, 23 },                   /* index 19: 18 bits: 11111111111111111x */
 109     { /*9*/ -22, /*-14*/ -45 },   /* index 20: 19 bits: 111111111111111100x */
 110     { /*-13*/ -44, /*-12*/ -43 }, /* index 21: 19 bits: 111111111111111101x */
 111     { 24, 25 },                   /* index 22: 19 bits: 111111111111111110x */
 112     { 26, 27 },                   /* index 23: 19 bits: 111111111111111111x */
 113     { /*-11*/ -42, /*-10*/ -41 }, /* index 24: 20 bits: 1111111111111111100x */
 114     { /*-9*/ -40, /*10*/ -21 },   /* index 25: 20 bits: 1111111111111111101x */
 115     { /*11*/ -20, /*12*/ -19 },   /* index 26: 20 bits: 1111111111111111110x */
 116     { /*13*/ -18, /*14*/ -17 }    /* index 27: 20 bits: 1111111111111111111x */
 117 };
 118
 119 static const int8_t f_huff_iid_fine[][2] = {
 120     { 1, /*0*/ -31 },             /* index 0: 1 bits: x */
 121     { 2, 3 },                     /* index 1: 2 bits: 0x */
 122     { 4, /*-1*/ -32 },            /* index 2: 3 bits: 00x */
 123     { /*1*/ -30, 5 },             /* index 3: 3 bits: 01x */
 124     { /*-2*/ -33, /*2*/ -29 },    /* index 4: 4 bits: 000x */
 125     { 6, 7 },                     /* index 5: 4 bits: 011x */
 126     { /*-3*/ -34, /*3*/ -28 },    /* index 6: 5 bits: 0110x */
 127     { 8, 9 },                     /* index 7: 5 bits: 0111x */
 128     { /*-4*/ -35, /*4*/ -27 },    /* index 8: 6 bits: 01110x */
 129     { 10, 11 },                   /* index 9: 6 bits: 01111x */
 130     { /*-5*/ -36, /*5*/ -26 },    /* index 10: 7 bits: 011110x */
 131     { 12, 13 },                   /* index 11: 7 bits: 011111x */
 132     { /*-6*/ -37, /*6*/ -25 },    /* index 12: 8 bits: 0111110x */
 133     { 14, 15 },                   /* index 13: 8 bits: 0111111x */
 134     { /*7*/ -24, 16 },            /* index 14: 9 bits: 01111110x */
 135     { 17, 18 },                   /* index 15: 9 bits: 01111111x */
 136     { 19, /*-8*/ -39 },           /* index 16: 10 bits: 011111101x */
 137     { /*8*/ -23, 20 },            /* index 17: 10 bits: 011111110x */
 138     { 21, /*-7*/ -38 },           /* index 18: 10 bits: 011111111x */
 139     { /*10*/ -21, 22 },           /* index 19: 11 bits: 0111111010x */
 140     { 23, /*-9*/ -40 },           /* index 20: 11 bits: 0111111101x */
 141     { /*9*/ -22, 24 },            /* index 21: 11 bits: 0111111110x */
 142     { /*-11*/ -42, /*11*/ -20 },  /* index 22: 12 bits: 01111110101x */
 143     { 25, 26 },                   /* index 23: 12 bits: 01111111010x */
 144     { 27, /*-10*/ -41 },          /* index 24: 12 bits: 01111111101x */
 145     { 28, /*-12*/ -43 },          /* index 25: 13 bits: 011111110100x */
 146     { /*12*/ -19, 29 },           /* index 26: 13 bits: 011111110101x */
 147     { 30, 31 },                   /* index 27: 13 bits: 011111111010x */
 148     { 32, /*-14*/ -45 },          /* index 28: 14 bits: 0111111101000x */
 149     { /*14*/ -17, 33 },           /* index 29: 14 bits: 0111111101011x */
 150     { 34, /*-13*/ -44 },          /* index 30: 14 bits: 0111111110100x */
 151     { /*13*/ -18, 35 },           /* index 31: 14 bits: 0111111110101x */
 152     { 36, 37 },                   /* index 32: 15 bits: 01111111010000x */
 153     { 38, /*-15*/ -46 },          /* index 33: 15 bits: 01111111010111x */
 154     { /*15*/ -16, 39 },           /* index 34: 15 bits: 01111111101000x */
 155     { 40, 41 },                   /* index 35: 15 bits: 01111111101011x */
 156     { 42, 43 },                   /* index 36: 16 bits: 011111110100000x */
 157     { /*-17*/ -48, /*17*/ -14 },  /* index 37: 16 bits: 011111110100001x */
 158     { 44, 45 },                   /* index 38: 16 bits: 011111110101110x */
 159     { 46, 47 },                   /* index 39: 16 bits: 011111111010001x */
 160     { 48, 49 },                   /* index 40: 16 bits: 011111111010110x */
 161     { /*-16*/ -47, /*16*/ -15 },  /* index 41: 16 bits: 011111111010111x */
 162     { /*-21*/ -52, /*21*/ -10 },  /* index 42: 17 bits: 0111111101000000x */
 163     { /*-19*/ -50, /*19*/ -12 },  /* index 43: 17 bits: 0111111101000001x */
 164     { /*-18*/ -49, /*18*/ -13 },  /* index 44: 17 bits: 0111111101011100x */
 165     { 50, 51 },                   /* index 45: 17 bits: 0111111101011101x */
 166     { 52, 53 },                   /* index 46: 17 bits: 0111111110100010x */
 167     { 54, 55 },                   /* index 47: 17 bits: 0111111110100011x */
 168     { 56, 57 },                   /* index 48: 17 bits: 0111111110101100x */
 169     { 58, 59 },                   /* index 49: 17 bits: 0111111110101101x */
 170     { /*-26*/ -57, /*-25*/ -56 }, /* index 50: 18 bits: 01111111010111010x */
 171     { /*-28*/ -59, /*-27*/ -58 }, /* index 51: 18 bits: 01111111010111011x */
 172     { /*-22*/ -53, /*22*/ -9 },   /* index 52: 18 bits: 01111111101000100x */
 173     { /*-24*/ -55, /*-23*/ -54 }, /* index 53: 18 bits: 01111111101000101x */
 174     { /*25*/ -6, /*26*/ -5 },     /* index 54: 18 bits: 01111111101000110x */
 175     { /*23*/ -8, /*24*/ -7 },     /* index 55: 18 bits: 01111111101000111x */
 176     { /*29*/ -2, /*30*/ -1 },     /* index 56: 18 bits: 01111111101011000x */
 177     { /*27*/ -4, /*28*/ -3 },     /* index 57: 18 bits: 01111111101011001x */
 178     { /*-30*/ -61, /*-29*/ -60 }, /* index 58: 18 bits: 01111111101011010x */
 179     { /*-20*/ -51, /*20*/ -11 }   /* index 59: 18 bits: 01111111101011011x */
 180 };
 181
 182 static const int8_t t_huff_iid_fine[][2] = {
 183     { 1, /*0*/ -31 },             /* index 0: 1 bits: x */
 184     { /*1*/ -30, 2 },             /* index 1: 2 bits: 0x */
 185     { 3, /*-1*/ -32 },            /* index 2: 3 bits: 01x */
 186     { 4, 5 },                     /* index 3: 4 bits: 010x */
 187     { 6, 7 },                     /* index 4: 5 bits: 0100x */
 188     { /*-2*/ -33, /*2*/ -29 },    /* index 5: 5 bits: 0101x */
 189     { 8, /*-3*/ -34 },            /* index 6: 6 bits: 01000x */
 190     { /*3*/ -28, 9 },             /* index 7: 6 bits: 01001x */
 191     { /*-4*/ -35, /*4*/ -27 },    /* index 8: 7 bits: 010000x */
 192     { 10, 11 },                   /* index 9: 7 bits: 010011x */
 193     { /*5*/ -26, 12 },            /* index 10: 8 bits: 0100110x */
 194     { 13, 14 },                   /* index 11: 8 bits: 0100111x */
 195     { /*-6*/ -37, /*6*/ -25 },    /* index 12: 9 bits: 01001101x */
 196     { 15, 16 },                   /* index 13: 9 bits: 01001110x */
 197     { 17, /*-5*/ -36 },           /* index 14: 9 bits: 01001111x */
 198     { 18, /*-7*/ -38 },           /* index 15: 10 bits: 010011100x */
 199     { /*7*/ -24, 19 },            /* index 16: 10 bits: 010011101x */
 200     { 20, 21 },                   /* index 17: 10 bits: 010011110x */
 201     { /*9*/ -22, 22 },            /* index 18: 11 bits: 0100111000x */
 202     { 23, 24 },                   /* index 19: 11 bits: 0100111011x */
 203     { /*-8*/ -39, /*8*/ -23 },    /* index 20: 11 bits: 0100111100x */
 204     { 25, 26 },                   /* index 21: 11 bits: 0100111101x */
 205     { /*11*/ -20, 27 },           /* index 22: 12 bits: 01001110001x */
 206     { 28, 29 },                   /* index 23: 12 bits: 01001110110x */
 207     { /*-10*/ -41, /*10*/ -21 },  /* index 24: 12 bits: 01001110111x */
 208     { 30, 31 },                   /* index 25: 12 bits: 01001111010x */
 209     { 32, /*-9*/ -40 },           /* index 26: 12 bits: 01001111011x */
 210     { 33, /*-13*/ -44 },          /* index 27: 13 bits: 010011100011x */
 211     { /*13*/ -18, 34 },           /* index 28: 13 bits: 010011101100x */
 212     { 35, 36 },                   /* index 29: 13 bits: 010011101101x */
 213     { 37, /*-12*/ -43 },          /* index 30: 13 bits: 010011110100x */
 214     { /*12*/ -19, 38 },           /* index 31: 13 bits: 010011110101x */
 215     { 39, /*-11*/ -42 },          /* index 32: 13 bits: 010011110110x */
 216     { 40, 41 },                   /* index 33: 14 bits: 0100111000110x */
 217     { 42, 43 },                   /* index 34: 14 bits: 0100111011001x */
 218     { 44, 45 },                   /* index 35: 14 bits: 0100111011010x */
 219     { 46, /*-15*/ -46 },          /* index 36: 14 bits: 0100111011011x */
 220     { /*15*/ -16, 47 },           /* index 37: 14 bits: 0100111101000x */
 221     { /*-14*/ -45, /*14*/ -17 },  /* index 38: 14 bits: 0100111101011x */
 222     { 48, 49 },                   /* index 39: 14 bits: 0100111101100x */
 223     { /*-21*/ -52, /*-20*/ -51 }, /* index 40: 15 bits: 01001110001100x */
 224     { /*18*/ -13, /*19*/ -12 },   /* index 41: 15 bits: 01001110001101x */
 225     { /*-19*/ -50, /*-18*/ -49 }, /* index 42: 15 bits: 01001110110010x */
 226     { 50, 51 },                   /* index 43: 15 bits: 01001110110011x */
 227     { 52, 53 },                   /* index 44: 15 bits: 01001110110100x */
 228     { 54, 55 },                   /* index 45: 15 bits: 01001110110101x */
 229     { 56, /*-17*/ -48 },          /* index 46: 15 bits: 01001110110110x */
 230     { /*17*/ -14, 57 },           /* index 47: 15 bits: 01001111010001x */
 231     { 58, /*-16*/ -47 },          /* index 48: 15 bits: 01001111011000x */
 232     { /*16*/ -15, 59 },           /* index 49: 15 bits: 01001111011001x */
 233     { /*-26*/ -57, /*26*/ -5 },   /* index 50: 16 bits: 010011101100110x */
 234     { /*-28*/ -59, /*-27*/ -58 }, /* index 51: 16 bits: 010011101100111x */
 235     { /*29*/ -2, /*30*/ -1 },     /* index 52: 16 bits: 010011101101000x */
 236     { /*27*/ -4, /*28*/ -3 },     /* index 53: 16 bits: 010011101101001x */
 237     { /*-30*/ -61, /*-29*/ -60 }, /* index 54: 16 bits: 010011101101010x */
 238     { /*-25*/ -56, /*25*/ -6 },   /* index 55: 16 bits: 010011101101011x */
 239     { /*-24*/ -55, /*24*/ -7 },   /* index 56: 16 bits: 010011101101100x */
 240     { /*-23*/ -54, /*23*/ -8 },   /* index 57: 16 bits: 010011110100011x */
 241     { /*-22*/ -53, /*22*/ -9 },   /* index 58: 16 bits: 010011110110000x */
 242     { /*20*/ -11, /*21*/ -10 }    /* index 59: 16 bits: 010011110110011x */
 243 };
 244
 245 static const int8_t f_huff_icc[][2] = {
 246     { /*0*/ -31, 1 },            /* index 0: 1 bits: x */
 247     { /*1*/ -30, 2 },            /* index 1: 2 bits: 1x */
 248     { /*-1*/ -32, 3 },           /* index 2: 3 bits: 11x */
 249     { /*2*/ -29, 4 },            /* index 3: 4 bits: 111x */
 250     { /*-2*/ -33, 5 },           /* index 4: 5 bits: 1111x */
 251     { /*3*/ -28, 6 },            /* index 5: 6 bits: 11111x */
 252     { /*-3*/ -34, 7 },           /* index 6: 7 bits: 111111x */
 253     { /*4*/ -27, 8 },            /* index 7: 8 bits: 1111111x */
 254     { /*5*/ -26, 9 },            /* index 8: 9 bits: 11111111x */
 255     { /*-4*/ -35, 10 },          /* index 9: 10 bits: 111111111x */
 256     { /*6*/ -25, 11 },           /* index 10: 11 bits: 1111111111x */
 257     { /*-5*/ -36, 12 },          /* index 11: 12 bits: 11111111111x */
 258     { /*7*/ -24, 13 },           /* index 12: 13 bits: 111111111111x */
 259     { /*-6*/ -37, /*-7*/ -38 }   /* index 13: 14 bits: 1111111111111x */
 260 };
 261
 262 static const int8_t t_huff_icc[][2] = {
 263     { /*0*/ -31, 1 },            /* index 0: 1 bits: x */
 264     { /*1*/ -30, 2 },            /* index 1: 2 bits: 1x */
 265     { /*-1*/ -32, 3 },           /* index 2: 3 bits: 11x */
 266     { /*2*/ -29, 4 },            /* index 3: 4 bits: 111x */
 267     { /*-2*/ -33, 5 },           /* index 4: 5 bits: 1111x */
 268     { /*3*/ -28, 6 },            /* index 5: 6 bits: 11111x */
 269     { /*-3*/ -34, 7 },           /* index 6: 7 bits: 111111x */
 270     { /*4*/ -27, 8 },            /* index 7: 8 bits: 1111111x */
 271     { /*-4*/ -35, 9 },           /* index 8: 9 bits: 11111111x */
 272     { /*5*/ -26, 10 },           /* index 9: 10 bits: 111111111x */
 273     { /*-5*/ -36, 11 },          /* index 10: 11 bits: 1111111111x */
 274     { /*6*/ -25, 12 },           /* index 11: 12 bits: 11111111111x */
 275     { /*-6*/ -37, 13 },          /* index 12: 13 bits: 111111111111x */
 276     { /*-7*/ -38, /*7*/ -24 }    /* index 13: 14 bits: 1111111111111x */
 277 };
 278
 279 static const int8_t f_huff_ipd[][2] = {
 280     { 1, /*0*/ -31 },         /* index 0: 1 bits: x */
 281     { 2, 3 },                 /* index 1: 2 bits: 0x */
 282     { /*1*/ -30, 4 },         /* index 2: 3 bits: 00x */
 283     { 5, 6 },                 /* index 3: 3 bits: 01x */
 284     { /*4*/ -27, /*5*/ -26 }, /* index 4: 4 bits: 001x */
 285     { /*3*/ -28, /*6*/ -25 }, /* index 5: 4 bits: 010x */
 286     { /*2*/ -29, /*7*/ -24 }  /* index 6: 4 bits: 011x */
 287 };
 288
 289 static const int8_t t_huff_ipd[][2] = {
 290     { 1, /*0*/ -31 },         /* index 0: 1 bits: x */
 291     { 2, 3 },                 /* index 1: 2 bits: 0x */
 292     { 4, 5 },                 /* index 2: 3 bits: 00x */
 293     { /*1*/ -30, /*7*/ -24 }, /* index 3: 3 bits: 01x */
 294     { /*5*/ -26, 6 },         /* index 4: 4 bits: 000x */
 295     { /*2*/ -29, /*6*/ -25 }, /* index 5: 4 bits: 001x */
 296     { /*4*/ -27, /*3*/ -28 }  /* index 6: 5 bits: 0001x */
 297 };
 298
 299 static const int8_t f_huff_opd[][2] = {
 300     { 1, /*0*/ -31 },         /* index 0: 1 bits: x */
 301     { 2, 3 },                 /* index 1: 2 bits: 0x */
 302     { /*7*/ -24, /*1*/ -30 }, /* index 2: 3 bits: 00x */
 303     { 4, 5 },                 /* index 3: 3 bits: 01x */
 304     { /*3*/ -28, /*6*/ -25 }, /* index 4: 4 bits: 010x */
 305     { /*2*/ -29, 6 },         /* index 5: 4 bits: 011x */
 306     { /*5*/ -26, /*4*/ -27 }  /* index 6: 5 bits: 0111x */
 307 };
 308
 309 static const int8_t t_huff_opd[][2] = {
 310     { 1, /*0*/ -31 },         /* index 0: 1 bits: x */
 311     { 2, 3 },                 /* index 1: 2 bits: 0x */
 312     { 4, 5 },                 /* index 2: 3 bits: 00x */
 313     { /*1*/ -30, /*7*/ -24 }, /* index 3: 3 bits: 01x */
 314     { /*5*/ -26, /*2*/ -29 }, /* index 4: 4 bits: 000x */
 315     { /*6*/ -25, 6 },         /* index 5: 4 bits: 001x */
 316     { /*4*/ -27, /*3*/ -28 }  /* index 6: 5 bits: 0011x */
 317 };
 318
 319 /* static function declarations */
 320 static uint16_t ps_extension(ps_info *ps, bitfile *ld,
 321                              const uint8_t ps_extension_id,
 322                              const uint16_t num_bits_left);
 323 static void huff_data(bitfile *ld, const uint8_t dt, const uint8_t nr_par,
 324                       ps_huff_tab t_huff, ps_huff_tab f_huff, int8_t *par);
 325 static INLINE int8_t ps_huff_dec(bitfile *ld, ps_huff_tab t_huff);
 326
 327
 328 uint16_t ps_data(ps_info *ps, bitfile *ld, uint8_t *header)
 329 {
 330     uint8_t tmp, n;
 331     uint16_t bits = (uint16_t)faad_get_processed_bits(ld);
 332
 333     *header = 0;
 334
 335     /* check for new PS header */
 336     if (faad_get1bit(ld
 337         DEBUGVAR(1,1000,"ps_data(): enable_ps_header")))
 338     {
 339         *header = 1;
 340
 341         ps->header_read = 1;
 342
 343         ps->use34hybrid_bands = 0;
 344
 345         /* Inter-channel Intensity Difference (IID) parameters enabled */
 346         ps->enable_iid = (uint8_t)faad_get1bit(ld
 347             DEBUGVAR(1,1001,"ps_data(): enable_iid"));
 348
 349         if (ps->enable_iid)
 350         {
 351             ps->iid_mode = (uint8_t)faad_getbits(ld, 3
 352                 DEBUGVAR(1,1002,"ps_data(): iid_mode"));
 353
 354             ps->nr_iid_par = nr_iid_par_tab[ps->iid_mode];
 355             ps->nr_ipdopd_par = nr_ipdopd_par_tab[ps->iid_mode];
 356
 357             if (ps->iid_mode == 2 || ps->iid_mode == 5)
 358                 ps->use34hybrid_bands = 1;
 359
 360             /* IPD freq res equal to IID freq res */
 361             ps->ipd_mode = ps->iid_mode;
 362         }
 363
 364         /* Inter-channel Coherence (ICC) parameters enabled */
 365         ps->enable_icc = (uint8_t)faad_get1bit(ld
 366             DEBUGVAR(1,1003,"ps_data(): enable_icc"));
 367
 368         if (ps->enable_icc)
 369         {
 370             ps->icc_mode = (uint8_t)faad_getbits(ld, 3
 371                 DEBUGVAR(1,1004,"ps_data(): icc_mode"));
 372
 373             ps->nr_icc_par = nr_icc_par_tab[ps->icc_mode];
 374
 375             if (ps->icc_mode == 2 || ps->icc_mode == 5)
 376                 ps->use34hybrid_bands = 1;
 377         }
 378
 379         /* PS extension layer enabled */
 380         ps->enable_ext = (uint8_t)faad_get1bit(ld
 381             DEBUGVAR(1,1005,"ps_data(): enable_ext"));
 382     }
 383
 384     /* we are here, but no header has been read yet */
 385     if (ps->header_read == 0)
 386     {
 387         ps->ps_data_available = 0;
 388         return 1;
 389     }
 390
 391     ps->frame_class = (uint8_t)faad_get1bit(ld
 392         DEBUGVAR(1,1006,"ps_data(): frame_class"));
 393     tmp = (uint8_t)faad_getbits(ld, 2
 394         DEBUGVAR(1,1007,"ps_data(): num_env_idx"));
 395
 396     ps->num_env = num_env_tab[ps->frame_class][tmp];
 397
 398     if (ps->frame_class)
 399     {
 400         for (n = 1; n < ps->num_env+1; n++)
 401         {
 402             ps->border_position[n] = (uint8_t)faad_getbits(ld, 5
 403                 DEBUGVAR(1,1008,"ps_data(): border_position")) + 1;
 404         }
 405     }
 406
 407     if (ps->enable_iid)
 408     {
 409         for (n = 0; n < ps->num_env; n++)
 410         {
 411             ps->iid_dt[n] = (uint8_t)faad_get1bit(ld
 412                 DEBUGVAR(1,1009,"ps_data(): iid_dt"));
 413
 414             /* iid_data */
 415             if (ps->iid_mode < 3)
 416             {
 417                 huff_data(ld, ps->iid_dt[n], ps->nr_iid_par, t_huff_iid_def,
 418                     f_huff_iid_def, ps->iid_index[n]);
 419             } else {
 420                 huff_data(ld, ps->iid_dt[n], ps->nr_iid_par, t_huff_iid_fine,
 421                     f_huff_iid_fine, ps->iid_index[n]);
 422             }
 423         }
 424     }
 425
 426     if (ps->enable_icc)
 427     {
 428         for (n = 0; n < ps->num_env; n++)
 429         {
 430             ps->icc_dt[n] = (uint8_t)faad_get1bit(ld
 431                 DEBUGVAR(1,1010,"ps_data(): icc_dt"));
 432
 433             /* icc_data */
 434             huff_data(ld, ps->icc_dt[n], ps->nr_icc_par, t_huff_icc,
 435                 f_huff_icc, ps->icc_index[n]);
 436         }
 437     }
 438
 439     if (ps->enable_ext)
 440     {
 441         uint16_t num_bits_left;
 442         uint16_t cnt = (uint16_t)faad_getbits(ld, 4
 443             DEBUGVAR(1,1011,"ps_data(): ps_extension_size"));
 444         if (cnt == 15)
 445         {
 446             cnt += (uint16_t)faad_getbits(ld, 8
 447                 DEBUGVAR(1,1012,"ps_data(): esc_count"));
 448         }
 449
 450         num_bits_left = 8 * cnt;
 451         while (num_bits_left > 7)
 452         {
 453             uint8_t ps_extension_id = (uint8_t)faad_getbits(ld, 2
 454                 DEBUGVAR(1,1013,"ps_data(): ps_extension_size"));
 455
 456             num_bits_left -= 2;
 457             num_bits_left -= ps_extension(ps, ld, ps_extension_id, num_bits_left);
 458         }
 459
 460         faad_getbits(ld, num_bits_left
 461             DEBUGVAR(1,1014,"ps_data(): fill_bits"));
 462     }
 463
 464     bits = (uint16_t)faad_get_processed_bits(ld) - bits;
 465
 466     ps->ps_data_available = 1;
 467
 468     return bits;
 469 }
 470
 471 static uint16_t ps_extension(ps_info *ps, bitfile *ld,
 472                              const uint8_t ps_extension_id,
 473                              const uint16_t num_bits_left)
 474 {
 475     uint8_t n;
 476     uint16_t bits = (uint16_t)faad_get_processed_bits(ld);
 477
 478     if (ps_extension_id == 0)
 479     {
 480         ps->enable_ipdopd = (uint8_t)faad_get1bit(ld
 481             DEBUGVAR(1,1015,"ps_extension(): enable_ipdopd"));
 482
 483         if (ps->enable_ipdopd)
 484         {
 485             for (n = 0; n < ps->num_env; n++)
 486             {
 487                 ps->ipd_dt[n] = (uint8_t)faad_get1bit(ld
 488                     DEBUGVAR(1,1016,"ps_extension(): ipd_dt"));
 489
 490                 /* ipd_data */
 491                 huff_data(ld, ps->ipd_dt[n], ps->nr_ipdopd_par, t_huff_ipd,
 492                     f_huff_ipd, ps->ipd_index[n]);
 493
 494                 ps->opd_dt[n] = (uint8_t)faad_get1bit(ld
 495                     DEBUGVAR(1,1017,"ps_extension(): opd_dt"));
 496
 497                 /* opd_data */
 498                 huff_data(ld, ps->opd_dt[n], ps->nr_ipdopd_par, t_huff_opd,
 499                     f_huff_opd, ps->opd_index[n]);
 500             }
 501         }
 502         faad_get1bit(ld
 503             DEBUGVAR(1,1018,"ps_extension(): reserved_ps"));
 504     }
 505
 506     /* return number of bits read */
 507     bits = (uint16_t)faad_get_processed_bits(ld) - bits;
 508
 509     return bits;
 510 }
 511
 512 /* read huffman data coded in either the frequency or the time direction */
 513 static void huff_data(bitfile *ld, const uint8_t dt, const uint8_t nr_par,
 514                       ps_huff_tab t_huff, ps_huff_tab f_huff, int8_t *par)
 515 {
 516     uint8_t n;
 517
 518     if (dt)
 519     {
 520         /* coded in time direction */
 521         for (n = 0; n < nr_par; n++)
 522         {
 523             par[n] = ps_huff_dec(ld, t_huff);
 524         }
 525     } else {
 526         /* coded in frequency direction */
 527         par[0] = ps_huff_dec(ld, f_huff);
 528
 529         for (n = 1; n < nr_par; n++)
 530         {
 531             par[n] = ps_huff_dec(ld, f_huff);
 532         }
 533     }
 534 }
 535
 536 /* binary search huffman decoding */
 537 static INLINE int8_t ps_huff_dec(bitfile *ld, ps_huff_tab t_huff)
 538 {
 539     uint8_t bit;
 540     int16_t index = 0;
 541
 542     while (index >= 0)
 543     {
 544         bit = (uint8_t)faad_get1bit(ld);
 545         index = t_huff[index][bit];
 546     }
 547
 548     return index + 31;
 549 }
 550
 551 #endif