sbr_syntax.c
上传用户:xjjlds
上传日期:2015-12-05
资源大小:22823k
文件大小:28k
源码类别:

多媒体编程

开发平台:

Visual C++

  1. /*
  2. ** FAAD2 - Freeware Advanced Audio (AAC) Decoder including SBR decoding
  3. ** Copyright (C) 2003-2005 M. Bakker, Ahead Software 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. ** Software using this code must display the following message visibly in the
  23. ** software:
  24. ** "FAAD2 AAC/HE-AAC/HE-AACv2/DRM decoder (c) Ahead Software, www.nero.com"
  25. ** in, for example, the about-box or help/startup screen.
  26. **
  27. ** Commercial non-GPL licensing of this software is possible.
  28. ** For more info contact Ahead Software through Mpeg4AAClicense@nero.com.
  29. **
  30. ** $Id: sbr_syntax.c,v 1.3 2005/11/01 21:41:43 gabest Exp $
  31. **/
  32. #include "common.h"
  33. #include "structs.h"
  34. #ifdef SBR_DEC
  35. #include "sbr_syntax.h"
  36. #include "syntax.h"
  37. #include "sbr_huff.h"
  38. #include "sbr_fbt.h"
  39. #include "sbr_tf_grid.h"
  40. #include "sbr_e_nf.h"
  41. #include "bits.h"
  42. #ifdef PS_DEC
  43. #include "ps_dec.h"
  44. #endif
  45. #ifdef DRM_PS
  46. #include "drm_dec.h"
  47. #endif
  48. #include "analysis.h"
  49. /* static function declarations */
  50. static void sbr_header(bitfile *ld, sbr_info *sbr);
  51. static uint8_t calc_sbr_tables(sbr_info *sbr, uint8_t start_freq, uint8_t stop_freq,
  52.                                uint8_t samplerate_mode, uint8_t freq_scale,
  53.                                uint8_t alter_scale, uint8_t xover_band);
  54. static uint8_t sbr_data(bitfile *ld, sbr_info *sbr);
  55. static uint16_t sbr_extension(bitfile *ld, sbr_info *sbr,
  56.                               uint8_t bs_extension_id, uint16_t num_bits_left);
  57. static uint8_t sbr_single_channel_element(bitfile *ld, sbr_info *sbr);
  58. static uint8_t sbr_channel_pair_element(bitfile *ld, sbr_info *sbr);
  59. static uint8_t sbr_grid(bitfile *ld, sbr_info *sbr, uint8_t ch);
  60. static void sbr_dtdf(bitfile *ld, sbr_info *sbr, uint8_t ch);
  61. static void invf_mode(bitfile *ld, sbr_info *sbr, uint8_t ch);
  62. static void sinusoidal_coding(bitfile *ld, sbr_info *sbr, uint8_t ch);
  63. static void sbr_reset(sbr_info *sbr)
  64. {
  65. #if 0
  66.     printf("%dn", sbr->bs_start_freq_prev);
  67.     printf("%dn", sbr->bs_stop_freq_prev);
  68.     printf("%dn", sbr->bs_freq_scale_prev);
  69.     printf("%dn", sbr->bs_alter_scale_prev);
  70.     printf("%dn", sbr->bs_xover_band_prev);
  71.     printf("%dnn", sbr->bs_noise_bands_prev);
  72. #endif
  73.     /* if these are different from the previous frame: Reset = 1 */
  74.     if ((sbr->bs_start_freq != sbr->bs_start_freq_prev) ||
  75.         (sbr->bs_stop_freq != sbr->bs_stop_freq_prev) ||
  76.         (sbr->bs_freq_scale != sbr->bs_freq_scale_prev) ||
  77.         (sbr->bs_alter_scale != sbr->bs_alter_scale_prev) ||
  78.         (sbr->bs_xover_band != sbr->bs_xover_band_prev) ||
  79.         (sbr->bs_noise_bands != sbr->bs_noise_bands_prev))
  80.     {
  81.         sbr->Reset = 1;
  82.     } else {
  83.         sbr->Reset = 0;
  84.     }
  85.     sbr->bs_start_freq_prev = sbr->bs_start_freq;
  86.     sbr->bs_stop_freq_prev = sbr->bs_stop_freq;
  87.     sbr->bs_freq_scale_prev = sbr->bs_freq_scale;
  88.     sbr->bs_alter_scale_prev = sbr->bs_alter_scale;
  89.     sbr->bs_xover_band_prev = sbr->bs_xover_band;
  90.     sbr->bs_noise_bands_prev = sbr->bs_noise_bands;
  91. }
  92. static uint8_t calc_sbr_tables(sbr_info *sbr, uint8_t start_freq, uint8_t stop_freq,
  93.                                uint8_t samplerate_mode, uint8_t freq_scale,
  94.                                uint8_t alter_scale, uint8_t xover_band)
  95. {
  96.     uint8_t result = 0;
  97.     uint8_t k2;
  98.     /* calculate the Master Frequency Table */
  99.     sbr->k0 = qmf_start_channel(start_freq, samplerate_mode, sbr->sample_rate);
  100.     k2 = qmf_stop_channel(stop_freq, sbr->sample_rate, sbr->k0);
  101.     /* check k0 and k2 */
  102.     if (sbr->sample_rate >= 48000)
  103.     {
  104.         if ((k2 - sbr->k0) > 32)
  105.             result += 1;
  106.     } else if (sbr->sample_rate <= 32000) {
  107.         if ((k2 - sbr->k0) > 48)
  108.             result += 1;
  109.     } else { /* (sbr->sample_rate == 44100) */
  110.         if ((k2 - sbr->k0) > 45)
  111.             result += 1;
  112.     }
  113.     if (freq_scale == 0)
  114.     {
  115.         result += master_frequency_table_fs0(sbr, sbr->k0, k2, alter_scale);
  116.     } else {
  117.         result += master_frequency_table(sbr, sbr->k0, k2, freq_scale, alter_scale);
  118.     }
  119.     result += derived_frequency_table(sbr, xover_band, k2);
  120.     result = (result > 0) ? 1 : 0;
  121.     return result;
  122. }
  123. /* table 2 */
  124. uint8_t sbr_extension_data(bitfile *ld, sbr_info *sbr, uint16_t cnt)
  125. {
  126.     uint8_t result = 0;
  127.     uint16_t num_align_bits = 0;
  128.     uint16_t num_sbr_bits = (uint16_t)faad_get_processed_bits(ld);
  129.     uint8_t saved_start_freq, saved_samplerate_mode;
  130.     uint8_t saved_stop_freq, saved_freq_scale;
  131.     uint8_t saved_alter_scale, saved_xover_band;
  132. #ifdef DRM
  133.     if (!sbr->Is_DRM_SBR)
  134. #endif
  135.     {
  136.         uint8_t bs_extension_type = (uint8_t)faad_getbits(ld, 4
  137.             DEBUGVAR(1,198,"sbr_bitstream(): bs_extension_type"));
  138.         if (bs_extension_type == EXT_SBR_DATA_CRC)
  139.         {
  140.             sbr->bs_sbr_crc_bits = (uint16_t)faad_getbits(ld, 10
  141.                 DEBUGVAR(1,199,"sbr_bitstream(): bs_sbr_crc_bits"));
  142.         }
  143.     }
  144.     /* save old header values, in case the new ones are corrupted */
  145.     saved_start_freq = sbr->bs_start_freq;
  146.     saved_samplerate_mode = sbr->bs_samplerate_mode;
  147.     saved_stop_freq = sbr->bs_stop_freq;
  148.     saved_freq_scale = sbr->bs_freq_scale;
  149.     saved_alter_scale = sbr->bs_alter_scale;
  150.     saved_xover_band = sbr->bs_xover_band;
  151.     sbr->bs_header_flag = faad_get1bit(ld
  152.         DEBUGVAR(1,200,"sbr_bitstream(): bs_header_flag"));
  153.     if (sbr->bs_header_flag)
  154.         sbr_header(ld, sbr);
  155.     /* Reset? */
  156.     sbr_reset(sbr);
  157.     /* first frame should have a header */
  158.     //if (!(sbr->frame == 0 && sbr->bs_header_flag == 0))
  159.     if (sbr->header_count != 0)
  160.     {
  161.         if (sbr->Reset || (sbr->bs_header_flag && sbr->just_seeked))
  162.         {
  163.             uint8_t rt = calc_sbr_tables(sbr, sbr->bs_start_freq, sbr->bs_stop_freq,
  164.                 sbr->bs_samplerate_mode, sbr->bs_freq_scale,
  165.                 sbr->bs_alter_scale, sbr->bs_xover_band);
  166.             /* if an error occured with the new header values revert to the old ones */
  167.             if (rt > 0)
  168.             {
  169.                 calc_sbr_tables(sbr, saved_start_freq, saved_stop_freq,
  170.                     saved_samplerate_mode, saved_freq_scale,
  171.                     saved_alter_scale, saved_xover_band);
  172.             }
  173.         }
  174.         if (result == 0)
  175.         {
  176.             result = sbr_data(ld, sbr);
  177.             /* sbr_data() returning an error means that there was an error in
  178.                envelope_time_border_vector().
  179.                In this case the old time border vector is saved and all the previous
  180.                data normally read after sbr_grid() is saved.
  181.             */
  182.             /* to be on the safe side, calculate old sbr tables in case of error */
  183.             if ((result > 0) &&
  184.                 (sbr->Reset || (sbr->bs_header_flag && sbr->just_seeked)))
  185.             {
  186.                 calc_sbr_tables(sbr, saved_start_freq, saved_stop_freq,
  187.                     saved_samplerate_mode, saved_freq_scale,
  188.                     saved_alter_scale, saved_xover_band);          
  189.             }
  190.             /* we should be able to safely set result to 0 now, */
  191.             /* but practise indicates this doesn't work well */
  192.         }
  193.     } else {
  194.         result = 1;
  195.     }     
  196.            
  197.      
  198.     num_sbr_bits = (uint16_t)faad_get_processed_bits(ld) - num_sbr_bits;
  199.     /* check if we read more bits then were available for sbr */
  200.     if (8*cnt < num_sbr_bits) {
  201.             return 1;
  202.     }
  203. #ifdef DRM
  204.     if (!sbr->Is_DRM_SBR)
  205. #endif
  206.     {       
  207.         /* -4 does not apply, bs_extension_type is re-read in this function */
  208.         num_align_bits = 8*cnt /*- 4*/ - num_sbr_bits;
  209.         while (num_align_bits > 7)
  210.         {
  211.             faad_getbits(ld, 8
  212.                 DEBUGVAR(1,999,"sbr_bitstream(): num_align_bits"));
  213.             num_align_bits -= 8;
  214.         }
  215.         faad_getbits(ld, num_align_bits
  216.             DEBUGVAR(1,999,"sbr_bitstream(): num_align_bits"));
  217.     }
  218.     return result;
  219. }
  220. /* table 3 */
  221. static void sbr_header(bitfile *ld, sbr_info *sbr)
  222. {
  223.     uint8_t bs_header_extra_1, bs_header_extra_2;
  224.     sbr->header_count++;
  225.     sbr->bs_amp_res = faad_get1bit(ld
  226.         DEBUGVAR(1,203,"sbr_header(): bs_amp_res"));
  227.     /* bs_start_freq and bs_stop_freq must define a fequency band that does
  228.        not exceed 48 channels */
  229.     sbr->bs_start_freq = (uint8_t)faad_getbits(ld, 4
  230.         DEBUGVAR(1,204,"sbr_header(): bs_start_freq"));
  231.     sbr->bs_stop_freq = (uint8_t)faad_getbits(ld, 4
  232.         DEBUGVAR(1,205,"sbr_header(): bs_stop_freq"));
  233.     sbr->bs_xover_band = (uint8_t)faad_getbits(ld, 3
  234.         DEBUGVAR(1,206,"sbr_header(): bs_xover_band"));
  235.     faad_getbits(ld, 2
  236.         DEBUGVAR(1,207,"sbr_header(): bs_reserved_bits_hdr"));
  237.     bs_header_extra_1 = (uint8_t)faad_get1bit(ld
  238.         DEBUGVAR(1,208,"sbr_header(): bs_header_extra_1"));
  239.     bs_header_extra_2 = (uint8_t)faad_get1bit(ld
  240.         DEBUGVAR(1,209,"sbr_header(): bs_header_extra_2"));
  241.     if (bs_header_extra_1)
  242.     {
  243.         sbr->bs_freq_scale = (uint8_t)faad_getbits(ld, 2
  244.             DEBUGVAR(1,211,"sbr_header(): bs_freq_scale"));
  245.         sbr->bs_alter_scale = (uint8_t)faad_get1bit(ld
  246.             DEBUGVAR(1,212,"sbr_header(): bs_alter_scale"));
  247.         sbr->bs_noise_bands = (uint8_t)faad_getbits(ld, 2
  248.             DEBUGVAR(1,213,"sbr_header(): bs_noise_bands"));
  249.     } else {
  250.         /* Default values */
  251.         sbr->bs_freq_scale = 2;
  252.         sbr->bs_alter_scale = 1;
  253.         sbr->bs_noise_bands = 2;
  254.     }
  255.     if (bs_header_extra_2)
  256.     {
  257.         sbr->bs_limiter_bands = (uint8_t)faad_getbits(ld, 2
  258.             DEBUGVAR(1,214,"sbr_header(): bs_limiter_bands"));
  259.         sbr->bs_limiter_gains = (uint8_t)faad_getbits(ld, 2
  260.             DEBUGVAR(1,215,"sbr_header(): bs_limiter_gains"));
  261.         sbr->bs_interpol_freq = (uint8_t)faad_get1bit(ld
  262.             DEBUGVAR(1,216,"sbr_header(): bs_interpol_freq"));
  263.         sbr->bs_smoothing_mode = (uint8_t)faad_get1bit(ld
  264.             DEBUGVAR(1,217,"sbr_header(): bs_smoothing_mode"));
  265.     } else {
  266.         /* Default values */
  267.         sbr->bs_limiter_bands = 2;
  268.         sbr->bs_limiter_gains = 2;
  269.         sbr->bs_interpol_freq = 1;
  270.         sbr->bs_smoothing_mode = 1;
  271.     }
  272. #if 0
  273.     /* print the header to screen */
  274.     printf("bs_amp_res: %dn", sbr->bs_amp_res);
  275.     printf("bs_start_freq: %dn", sbr->bs_start_freq);
  276.     printf("bs_stop_freq: %dn", sbr->bs_stop_freq);
  277.     printf("bs_xover_band: %dn", sbr->bs_xover_band);
  278.     if (bs_header_extra_1)
  279.     {
  280.         printf("bs_freq_scale: %dn", sbr->bs_freq_scale);
  281.         printf("bs_alter_scale: %dn", sbr->bs_alter_scale);
  282.         printf("bs_noise_bands: %dn", sbr->bs_noise_bands);
  283.     }
  284.     if (bs_header_extra_2)
  285.     {
  286.         printf("bs_limiter_bands: %dn", sbr->bs_limiter_bands);
  287.         printf("bs_limiter_gains: %dn", sbr->bs_limiter_gains);
  288.         printf("bs_interpol_freq: %dn", sbr->bs_interpol_freq);
  289.         printf("bs_smoothing_mode: %dn", sbr->bs_smoothing_mode);
  290.     }
  291.     printf("n");
  292. #endif
  293. }
  294. /* table 4 */
  295. static uint8_t sbr_data(bitfile *ld, sbr_info *sbr)
  296. {
  297.     uint8_t result;
  298. #if 0
  299.     sbr->bs_samplerate_mode = faad_get1bit(ld
  300.         DEBUGVAR(1,219,"sbr_data(): bs_samplerate_mode"));
  301. #endif
  302.     sbr->rate = (sbr->bs_samplerate_mode) ? 2 : 1;
  303.     switch (sbr->id_aac)
  304.     {
  305.     case ID_SCE:
  306. if ((result = sbr_single_channel_element(ld, sbr)) > 0)
  307. return result;
  308.         break;
  309.     case ID_CPE:
  310. if ((result = sbr_channel_pair_element(ld, sbr)) > 0)
  311. return result;
  312.         break;
  313.     }
  314. return 0;
  315. }
  316. /* table 5 */
  317. static uint8_t sbr_single_channel_element(bitfile *ld, sbr_info *sbr)
  318. {
  319.     uint8_t result;
  320.     if (faad_get1bit(ld
  321.         DEBUGVAR(1,220,"sbr_single_channel_element(): bs_data_extra")))
  322.     {
  323.         faad_getbits(ld, 4
  324.             DEBUGVAR(1,221,"sbr_single_channel_element(): bs_reserved_bits_data"));
  325.     }
  326. #ifdef DRM
  327.     /* bs_coupling, from sbr_channel_pair_base_element(bs_amp_res) */
  328.     if (sbr->Is_DRM_SBR)
  329.     {
  330.         faad_get1bit(ld);
  331.     }
  332. #endif
  333.     if ((result = sbr_grid(ld, sbr, 0)) > 0)
  334.         return result;
  335.     sbr_dtdf(ld, sbr, 0);
  336.     invf_mode(ld, sbr, 0);
  337.     sbr_envelope(ld, sbr, 0);
  338.     sbr_noise(ld, sbr, 0);
  339. #ifndef FIXED_POINT
  340.     envelope_noise_dequantisation(sbr, 0);
  341. #endif
  342.     memset(sbr->bs_add_harmonic[0], 0, 64*sizeof(uint8_t));
  343.     sbr->bs_add_harmonic_flag[0] = faad_get1bit(ld
  344.         DEBUGVAR(1,223,"sbr_single_channel_element(): bs_add_harmonic_flag[0]"));
  345.     if (sbr->bs_add_harmonic_flag[0])
  346.         sinusoidal_coding(ld, sbr, 0);
  347.     sbr->bs_extended_data = faad_get1bit(ld
  348.         DEBUGVAR(1,224,"sbr_single_channel_element(): bs_extended_data[0]"));
  349.     if (sbr->bs_extended_data)
  350.     {
  351.         uint16_t nr_bits_left;
  352. #if (defined(PS_DEC) || defined(DRM_PS))
  353.         uint8_t ps_ext_read = 0;
  354. #endif
  355.         uint16_t cnt = (uint16_t)faad_getbits(ld, 4
  356.             DEBUGVAR(1,225,"sbr_single_channel_element(): bs_extension_size"));
  357.         if (cnt == 15)
  358.         {
  359.             cnt += (uint16_t)faad_getbits(ld, 8
  360.                 DEBUGVAR(1,226,"sbr_single_channel_element(): bs_esc_count"));
  361.         }
  362.         nr_bits_left = 8 * cnt;
  363.         while (nr_bits_left > 7)
  364.         {
  365.             uint16_t tmp_nr_bits = 0;
  366.             sbr->bs_extension_id = (uint8_t)faad_getbits(ld, 2
  367.                 DEBUGVAR(1,227,"sbr_single_channel_element(): bs_extension_id"));
  368.             tmp_nr_bits += 2;
  369.             /* allow only 1 PS extension element per extension data */
  370. #if (defined(PS_DEC) || defined(DRM_PS))
  371. #if (defined(PS_DEC) && defined(DRM_PS))
  372.             if (sbr->bs_extension_id == EXTENSION_ID_PS || sbr->bs_extension_id == DRM_PARAMETRIC_STEREO)
  373. #else
  374. #ifdef PS_DEC
  375.             if (sbr->bs_extension_id == EXTENSION_ID_PS)
  376. #else
  377. #ifdef DRM_PS
  378.             if (sbr->bs_extension_id == DRM_PARAMETRIC_STEREO)
  379. #endif
  380. #endif
  381. #endif
  382.             {
  383.                 if (ps_ext_read == 0)
  384.                 {
  385.                     ps_ext_read = 1;
  386.                 } else {
  387.                     /* to be safe make it 3, will switch to "default"
  388.                      * in sbr_extension() */
  389. #ifdef DRM
  390.                     return 1;
  391. #else
  392.                     sbr->bs_extension_id = 3;
  393. #endif
  394.                 }
  395.             }
  396. #endif
  397.             tmp_nr_bits += sbr_extension(ld, sbr, sbr->bs_extension_id, nr_bits_left);
  398.             /* check if the data read is bigger than the number of available bits */
  399.             if (tmp_nr_bits > nr_bits_left)
  400.                 return 1;
  401.             nr_bits_left -= tmp_nr_bits;
  402.         }
  403.         /* Corrigendum */
  404.         if (nr_bits_left > 0)
  405.         {
  406.             faad_getbits(ld, nr_bits_left
  407.                 DEBUGVAR(1,280,"sbr_single_channel_element(): nr_bits_left"));
  408.         }
  409.     }
  410.     return 0;
  411. }
  412. /* table 6 */
  413. static uint8_t sbr_channel_pair_element(bitfile *ld, sbr_info *sbr)
  414. {
  415.     uint8_t n, result;
  416.     if (faad_get1bit(ld
  417.         DEBUGVAR(1,228,"sbr_single_channel_element(): bs_data_extra")))
  418.     {
  419.         faad_getbits(ld, 4
  420.             DEBUGVAR(1,228,"sbr_channel_pair_element(): bs_reserved_bits_data"));
  421.         faad_getbits(ld, 4
  422.             DEBUGVAR(1,228,"sbr_channel_pair_element(): bs_reserved_bits_data"));
  423.     }
  424.     sbr->bs_coupling = faad_get1bit(ld
  425.         DEBUGVAR(1,228,"sbr_channel_pair_element(): bs_coupling"));
  426.     if (sbr->bs_coupling)
  427.     {
  428.         if ((result = sbr_grid(ld, sbr, 0)) > 0)
  429.             return result;
  430.         /* need to copy some data from left to right */
  431.         sbr->bs_frame_class[1] = sbr->bs_frame_class[0];
  432.         sbr->L_E[1] = sbr->L_E[0];
  433.         sbr->L_Q[1] = sbr->L_Q[0];
  434.         sbr->bs_pointer[1] = sbr->bs_pointer[0];
  435.         for (n = 0; n <= sbr->L_E[0]; n++)
  436.         {
  437.             sbr->t_E[1][n] = sbr->t_E[0][n];
  438.             sbr->f[1][n] = sbr->f[0][n];
  439.         }
  440.         for (n = 0; n <= sbr->L_Q[0]; n++)
  441.             sbr->t_Q[1][n] = sbr->t_Q[0][n];
  442.         sbr_dtdf(ld, sbr, 0);
  443.         sbr_dtdf(ld, sbr, 1);
  444.         invf_mode(ld, sbr, 0);
  445.         /* more copying */
  446.         for (n = 0; n < sbr->N_Q; n++)
  447.             sbr->bs_invf_mode[1][n] = sbr->bs_invf_mode[0][n];
  448.         sbr_envelope(ld, sbr, 0);
  449.         sbr_noise(ld, sbr, 0);
  450.         sbr_envelope(ld, sbr, 1);
  451.         sbr_noise(ld, sbr, 1);
  452.         memset(sbr->bs_add_harmonic[0], 0, 64*sizeof(uint8_t));
  453.         memset(sbr->bs_add_harmonic[1], 0, 64*sizeof(uint8_t));
  454.         sbr->bs_add_harmonic_flag[0] = faad_get1bit(ld
  455.             DEBUGVAR(1,231,"sbr_channel_pair_element(): bs_add_harmonic_flag[0]"));
  456.         if (sbr->bs_add_harmonic_flag[0])
  457.             sinusoidal_coding(ld, sbr, 0);
  458.         sbr->bs_add_harmonic_flag[1] = faad_get1bit(ld
  459.             DEBUGVAR(1,232,"sbr_channel_pair_element(): bs_add_harmonic_flag[1]"));
  460.         if (sbr->bs_add_harmonic_flag[1])
  461.             sinusoidal_coding(ld, sbr, 1);
  462.     } else {
  463.         uint8_t saved_t_E[6] = {0}, saved_t_Q[3] = {0};
  464.         uint8_t saved_L_E = sbr->L_E[0];
  465.         uint8_t saved_L_Q = sbr->L_Q[0];
  466.         uint8_t saved_frame_class = sbr->bs_frame_class[0];
  467.         for (n = 0; n < saved_L_E; n++)
  468.             saved_t_E[n] = sbr->t_E[0][n];
  469.         for (n = 0; n < saved_L_Q; n++)
  470.             saved_t_Q[n] = sbr->t_Q[0][n];
  471.         if ((result = sbr_grid(ld, sbr, 0)) > 0)
  472.             return result;
  473.         if ((result = sbr_grid(ld, sbr, 1)) > 0)
  474.         {
  475.             /* restore first channel data as well */
  476.             sbr->bs_frame_class[0] = saved_frame_class;
  477.             sbr->L_E[0] = saved_L_E;
  478.             sbr->L_Q[0] = saved_L_Q;
  479.             for (n = 0; n < 6; n++)
  480.                 sbr->t_E[0][n] = saved_t_E[n];
  481.             for (n = 0; n < 3; n++)
  482.                 sbr->t_Q[0][n] = saved_t_Q[n];
  483.             return result;
  484.         }
  485.         sbr_dtdf(ld, sbr, 0);
  486.         sbr_dtdf(ld, sbr, 1);
  487.         invf_mode(ld, sbr, 0);
  488.         invf_mode(ld, sbr, 1);
  489.         sbr_envelope(ld, sbr, 0);
  490.         sbr_envelope(ld, sbr, 1);
  491.         sbr_noise(ld, sbr, 0);
  492.         sbr_noise(ld, sbr, 1);
  493.         memset(sbr->bs_add_harmonic[0], 0, 64*sizeof(uint8_t));
  494.         memset(sbr->bs_add_harmonic[1], 0, 64*sizeof(uint8_t));
  495.         sbr->bs_add_harmonic_flag[0] = faad_get1bit(ld
  496.             DEBUGVAR(1,239,"sbr_channel_pair_element(): bs_add_harmonic_flag[0]"));
  497.         if (sbr->bs_add_harmonic_flag[0])
  498.             sinusoidal_coding(ld, sbr, 0);
  499.         sbr->bs_add_harmonic_flag[1] = faad_get1bit(ld
  500.             DEBUGVAR(1,240,"sbr_channel_pair_element(): bs_add_harmonic_flag[1]"));
  501.         if (sbr->bs_add_harmonic_flag[1])
  502.             sinusoidal_coding(ld, sbr, 1);
  503.     }
  504. #ifndef FIXED_POINT
  505.     envelope_noise_dequantisation(sbr, 0);
  506.     envelope_noise_dequantisation(sbr, 1);
  507.     if (sbr->bs_coupling)
  508.         unmap_envelope_noise(sbr);
  509. #endif
  510.     sbr->bs_extended_data = faad_get1bit(ld
  511.         DEBUGVAR(1,233,"sbr_channel_pair_element(): bs_extended_data[0]"));
  512.     if (sbr->bs_extended_data)
  513.     {
  514.         uint16_t nr_bits_left;
  515.         uint16_t cnt = (uint16_t)faad_getbits(ld, 4
  516.             DEBUGVAR(1,234,"sbr_channel_pair_element(): bs_extension_size"));
  517.         if (cnt == 15)
  518.         {
  519.             cnt += (uint16_t)faad_getbits(ld, 8
  520.                 DEBUGVAR(1,235,"sbr_channel_pair_element(): bs_esc_count"));
  521.         }
  522.         nr_bits_left = 8 * cnt;
  523.         while (nr_bits_left > 7)
  524.         {
  525.             uint16_t tmp_nr_bits = 0;
  526.             sbr->bs_extension_id = (uint8_t)faad_getbits(ld, 2
  527.                 DEBUGVAR(1,236,"sbr_channel_pair_element(): bs_extension_id"));
  528.             tmp_nr_bits += 2;
  529.             tmp_nr_bits += sbr_extension(ld, sbr, sbr->bs_extension_id, nr_bits_left);
  530.             /* check if the data read is bigger than the number of available bits */
  531.             if (tmp_nr_bits > nr_bits_left)
  532.                 return 1;
  533.             nr_bits_left -= tmp_nr_bits;
  534.         }
  535.         /* Corrigendum */
  536.         if (nr_bits_left > 0)
  537.         {
  538.             faad_getbits(ld, nr_bits_left
  539.                 DEBUGVAR(1,280,"sbr_channel_pair_element(): nr_bits_left"));
  540.         }
  541.     }
  542.     return 0;
  543. }
  544. /* integer log[2](x): input range [0,10) */
  545. static int8_t sbr_log2(const int8_t val)
  546. {
  547.     int8_t log2tab[] = { 0, 0, 1, 2, 2, 3, 3, 3, 3, 4 };
  548.     if (val < 10 && val >= 0)
  549.         return log2tab[val];
  550.     else
  551.         return 0;
  552. }
  553. /* table 7 */
  554. static uint8_t sbr_grid(bitfile *ld, sbr_info *sbr, uint8_t ch)
  555. {
  556.     uint8_t i, env, rel, result;
  557.     uint8_t bs_abs_bord, bs_abs_bord_1;
  558.     uint8_t bs_num_env = 0;
  559.     uint8_t saved_L_E = sbr->L_E[ch];
  560.     uint8_t saved_L_Q = sbr->L_Q[ch];
  561.     uint8_t saved_frame_class = sbr->bs_frame_class[ch];
  562.     sbr->bs_frame_class[ch] = (uint8_t)faad_getbits(ld, 2
  563.         DEBUGVAR(1,248,"sbr_grid(): bs_frame_class"));
  564.     switch (sbr->bs_frame_class[ch])
  565.     {
  566.     case FIXFIX:
  567.         i = (uint8_t)faad_getbits(ld, 2
  568.             DEBUGVAR(1,249,"sbr_grid(): bs_num_env_raw"));
  569.         bs_num_env = min(1 << i, 5);
  570.         i = (uint8_t)faad_get1bit(ld
  571.             DEBUGVAR(1,250,"sbr_grid(): bs_freq_res_flag"));
  572.         for (env = 0; env < bs_num_env; env++)
  573.             sbr->f[ch][env] = i;
  574.         sbr->abs_bord_lead[ch] = 0;
  575.         sbr->abs_bord_trail[ch] = sbr->numTimeSlots;
  576.         sbr->n_rel_lead[ch] = bs_num_env - 1;
  577.         sbr->n_rel_trail[ch] = 0;
  578.         break;
  579.     case FIXVAR:
  580.         bs_abs_bord = (uint8_t)faad_getbits(ld, 2
  581.             DEBUGVAR(1,251,"sbr_grid(): bs_abs_bord")) + sbr->numTimeSlots;
  582.         bs_num_env = (uint8_t)faad_getbits(ld, 2
  583.             DEBUGVAR(1,252,"sbr_grid(): bs_num_env")) + 1;
  584.         for (rel = 0; rel < bs_num_env-1; rel++)
  585.         {
  586.             sbr->bs_rel_bord[ch][rel] = 2 * (uint8_t)faad_getbits(ld, 2
  587.                 DEBUGVAR(1,253,"sbr_grid(): bs_rel_bord")) + 2;
  588.         }
  589.         i = sbr_log2(bs_num_env + 1);
  590.         sbr->bs_pointer[ch] = (uint8_t)faad_getbits(ld, i
  591.             DEBUGVAR(1,254,"sbr_grid(): bs_pointer"));
  592.         for (env = 0; env < bs_num_env; env++)
  593.         {
  594.             sbr->f[ch][bs_num_env - env - 1] = (uint8_t)faad_get1bit(ld
  595.                 DEBUGVAR(1,255,"sbr_grid(): bs_freq_res"));
  596.         }
  597.         sbr->abs_bord_lead[ch] = 0;
  598.         sbr->abs_bord_trail[ch] = bs_abs_bord;
  599.         sbr->n_rel_lead[ch] = 0;
  600.         sbr->n_rel_trail[ch] = bs_num_env - 1;
  601.         break;
  602.     case VARFIX:
  603.         bs_abs_bord = (uint8_t)faad_getbits(ld, 2
  604.             DEBUGVAR(1,256,"sbr_grid(): bs_abs_bord"));
  605.         bs_num_env = (uint8_t)faad_getbits(ld, 2
  606.             DEBUGVAR(1,257,"sbr_grid(): bs_num_env")) + 1;
  607.         for (rel = 0; rel < bs_num_env-1; rel++)
  608.         {
  609.             sbr->bs_rel_bord[ch][rel] = 2 * (uint8_t)faad_getbits(ld, 2
  610.                 DEBUGVAR(1,258,"sbr_grid(): bs_rel_bord")) + 2;
  611.         }
  612.         i = sbr_log2(bs_num_env + 1);
  613.         sbr->bs_pointer[ch] = (uint8_t)faad_getbits(ld, i
  614.             DEBUGVAR(1,259,"sbr_grid(): bs_pointer"));
  615.         for (env = 0; env < bs_num_env; env++)
  616.         {
  617.             sbr->f[ch][env] = (uint8_t)faad_get1bit(ld
  618.                 DEBUGVAR(1,260,"sbr_grid(): bs_freq_res"));
  619.         }
  620.         sbr->abs_bord_lead[ch] = bs_abs_bord;
  621.         sbr->abs_bord_trail[ch] = sbr->numTimeSlots;
  622.         sbr->n_rel_lead[ch] = bs_num_env - 1;
  623.         sbr->n_rel_trail[ch] = 0;
  624.         break;
  625.     case VARVAR:
  626.         bs_abs_bord = (uint8_t)faad_getbits(ld, 2
  627.             DEBUGVAR(1,261,"sbr_grid(): bs_abs_bord_0"));
  628.         bs_abs_bord_1 = (uint8_t)faad_getbits(ld, 2
  629.             DEBUGVAR(1,262,"sbr_grid(): bs_abs_bord_1")) + sbr->numTimeSlots;
  630.         sbr->bs_num_rel_0[ch] = (uint8_t)faad_getbits(ld, 2
  631.             DEBUGVAR(1,263,"sbr_grid(): bs_num_rel_0"));
  632.         sbr->bs_num_rel_1[ch] = (uint8_t)faad_getbits(ld, 2
  633.             DEBUGVAR(1,264,"sbr_grid(): bs_num_rel_1"));
  634.         bs_num_env = min(5, sbr->bs_num_rel_0[ch] + sbr->bs_num_rel_1[ch] + 1);
  635.         for (rel = 0; rel < sbr->bs_num_rel_0[ch]; rel++)
  636.         {
  637.             sbr->bs_rel_bord_0[ch][rel] = 2 * (uint8_t)faad_getbits(ld, 2
  638.                 DEBUGVAR(1,265,"sbr_grid(): bs_rel_bord")) + 2;
  639.         }
  640.         for(rel = 0; rel < sbr->bs_num_rel_1[ch]; rel++)
  641.         {
  642.             sbr->bs_rel_bord_1[ch][rel] = 2 * (uint8_t)faad_getbits(ld, 2
  643.                 DEBUGVAR(1,266,"sbr_grid(): bs_rel_bord")) + 2;
  644.         }
  645.         i = sbr_log2(sbr->bs_num_rel_0[ch] + sbr->bs_num_rel_1[ch] + 2);
  646.         sbr->bs_pointer[ch] = (uint8_t)faad_getbits(ld, i
  647.             DEBUGVAR(1,267,"sbr_grid(): bs_pointer"));
  648.         for (env = 0; env < bs_num_env; env++)
  649.         {
  650.             sbr->f[ch][env] = (uint8_t)faad_get1bit(ld
  651.                 DEBUGVAR(1,268,"sbr_grid(): bs_freq_res"));
  652.         }
  653.         sbr->abs_bord_lead[ch] = bs_abs_bord;
  654.         sbr->abs_bord_trail[ch] = bs_abs_bord_1;
  655.         sbr->n_rel_lead[ch] = sbr->bs_num_rel_0[ch];
  656.         sbr->n_rel_trail[ch] = sbr->bs_num_rel_1[ch];
  657.         break;
  658.     }
  659.     if (sbr->bs_frame_class[ch] == VARVAR)
  660.         sbr->L_E[ch] = min(bs_num_env, 5);
  661.     else
  662.         sbr->L_E[ch] = min(bs_num_env, 4);
  663.     if (sbr->L_E[ch] <= 0)
  664.         return 1;
  665.     if (sbr->L_E[ch] > 1)
  666.         sbr->L_Q[ch] = 2;
  667.     else
  668.         sbr->L_Q[ch] = 1;
  669.     /* TODO: this code can probably be integrated into the code above! */
  670.     if ((result = envelope_time_border_vector(sbr, ch)) > 0)
  671.     {
  672.         sbr->bs_frame_class[ch] = saved_frame_class;
  673.         sbr->L_E[ch] = saved_L_E;
  674.         sbr->L_Q[ch] = saved_L_Q;
  675.         return result;
  676.     }
  677.     noise_floor_time_border_vector(sbr, ch);
  678. #if 0
  679.     for (env = 0; env < bs_num_env; env++)
  680.     {
  681.         printf("freq_res[ch:%d][env:%d]: %dn", ch, env, sbr->f[ch][env]);
  682.     }
  683. #endif
  684.     return 0;
  685. }
  686. /* table 8 */
  687. static void sbr_dtdf(bitfile *ld, sbr_info *sbr, uint8_t ch)
  688. {
  689.     uint8_t i;
  690.     for (i = 0; i < sbr->L_E[ch]; i++)
  691.     {
  692.         sbr->bs_df_env[ch][i] = faad_get1bit(ld
  693.             DEBUGVAR(1,269,"sbr_dtdf(): bs_df_env"));
  694.     }
  695.     for (i = 0; i < sbr->L_Q[ch]; i++)
  696.     {
  697.         sbr->bs_df_noise[ch][i] = faad_get1bit(ld
  698.             DEBUGVAR(1,270,"sbr_dtdf(): bs_df_noise"));
  699.     }
  700. }
  701. /* table 9 */
  702. static void invf_mode(bitfile *ld, sbr_info *sbr, uint8_t ch)
  703. {
  704.     uint8_t n;
  705.     for (n = 0; n < sbr->N_Q; n++)
  706.     {
  707.         sbr->bs_invf_mode[ch][n] = (uint8_t)faad_getbits(ld, 2
  708.             DEBUGVAR(1,271,"invf_mode(): bs_invf_mode"));
  709.     }
  710. }
  711. static uint16_t sbr_extension(bitfile *ld, sbr_info *sbr,
  712.                               uint8_t bs_extension_id, uint16_t num_bits_left)
  713. {
  714. #ifdef PS_DEC
  715.     uint8_t header;
  716.     uint16_t ret;
  717. #endif
  718.     switch (bs_extension_id)
  719.     {
  720. #ifdef PS_DEC
  721.     case EXTENSION_ID_PS:
  722.         if (!sbr->ps)
  723.         {
  724.             sbr->ps = ps_init(get_sr_index(sbr->sample_rate));
  725.         }
  726.         ret = ps_data(sbr->ps, ld, &header);
  727.         /* enable PS if and only if: a header has been decoded */
  728.         if (sbr->ps_used == 0 && header == 1)
  729.         {
  730.             sbr->ps_used = 1;
  731.         }
  732.         return ret;
  733. #endif
  734. #ifdef DRM_PS
  735.     case DRM_PARAMETRIC_STEREO:
  736.         sbr->ps_used = 1;
  737.         if (!sbr->drm_ps)
  738.         {
  739.             sbr->drm_ps = drm_ps_init();
  740.         }
  741.         return drm_ps_data(sbr->drm_ps, ld);
  742. #endif
  743.     default:
  744.         sbr->bs_extension_data = (uint8_t)faad_getbits(ld, 6
  745.             DEBUGVAR(1,279,"sbr_single_channel_element(): bs_extension_data"));
  746.         return 6;
  747.     }
  748. }
  749. /* table 12 */
  750. static void sinusoidal_coding(bitfile *ld, sbr_info *sbr, uint8_t ch)
  751. {
  752.     uint8_t n;
  753.     for (n = 0; n < sbr->N_high; n++)
  754.     {
  755.         sbr->bs_add_harmonic[ch][n] = faad_get1bit(ld
  756.             DEBUGVAR(1,278,"sinusoidal_coding(): bs_add_harmonic"));
  757.     }
  758. }
  759. #endif /* SBR_DEC */