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

源码开发语言/平台
当前位置：首页 > 源码/资料 > 通讯/手机编程 > 语音压缩 > 查看源码
DEC_GAIN.C
资源名称：G711-729.rar　[点击查看]
上传用户：meifeng08
上传日期：2013-06-18
资源大小：5304k
文件大小：5k
源码类别：

语音压缩

开发平台：

C/C++

DEC_GAIN.C：源码内容
  1. /*
  2.    ITU-T G.729A Speech Coder    ANSI-C Source Code
  3.    Version 1.1    Last modified: September 1996
  5.    Copyright (c) 1996,
  6.    AT&T, France Telecom, NTT, Universite de Sherbrooke
  7.    All rights reserved.
  8. */
  10. #include "typedef.h"
  11. #include "basic_op.h"
  12. #include "ld8a.h"
  13. #include "tab_ld8a.h"
  15. /*---------------------------------------------------------------------------*
  16.  * Function  Dec_gain                                                        *
  17.  * ~~~~~~~~~~~~~~~~~~                                                        *
  18.  * Decode the pitch and codebook gains                                       *
  19.  *                                                                           *
  20.  *---------------------------------------------------------------------------*
  21.  * input arguments:                                                          *
  22.  *                                                                           *
  23.  *   index      :Quantization index                                          *
  24.  *   code[]     :Innovative code vector                                      *
  25.  *   L_subfr    :Subframe size                                               *
  26.  *   bfi        :Bad frame indicator                                         *
  27.  *                                                                           *
  28.  * output arguments:                                                         *
  29.  *                                                                           *
  30.  *   gain_pit   :Quantized pitch gain                                        *
  31.  *   gain_cod   :Quantized codebook gain                                     *
  32.  *                                                                           *
  33.  *---------------------------------------------------------------------------*/
  34. void Dec_gain(
  35.    Word16 index,        /* (i)     :Index of quantization.         */
  36.    Word16 code[],       /* (i) Q13 :Innovative vector.             */
  37.    Word16 L_subfr,      /* (i)     :Subframe length.               */
  38.    Word16 bfi,          /* (i)     :Bad frame indicator            */
  39.    Word16 *gain_pit,    /* (o) Q14 :Pitch gain.                    */
  40.    Word16 *gain_cod     /* (o) Q1  :Code gain.                     */
  41. )
  42. {
  43.    Word16  index1, index2, tmp;
  44.    Word16  gcode0, exp_gcode0;
  45.    Word32  L_gbk12, L_acc, L_accb;
  46.    void    Gain_predict( Word16 past_qua_en[], Word16 code[], Word16 L_subfr,
  47.                         Word16 *gcode0, Word16 *exp_gcode0 );
  48.    void    Gain_update( Word16 past_qua_en[], Word32 L_gbk12 );
  49.    void    Gain_update_erasure( Word16 past_qua_en[] );
  51.         /* Gain predictor, Past quantized energies = -14.0 in Q10 */
  53.    static Word16 past_qua_en[4] = { -14336, -14336, -14336, -14336 };
  56.    /*-------------- Case of erasure. ---------------*/
  58.    if(bfi != 0){
  59.       *gain_pit = mult( *gain_pit, 29491 );      /* *0.9 in Q15 */
  60.       if (sub( *gain_pit, 29491) > 0) *gain_pit = 29491;
  61.       *gain_cod = mult( *gain_cod, 32111 );      /* *0.98 in Q15 */
  63.      /*----------------------------------------------*
  64.       * update table of past quantized energies      *
  65.       *                              (frame erasure) *
  66.       *----------------------------------------------*/
  67.       Gain_update_erasure(past_qua_en);
  69.       return;
  70.    }
  72.    /*-------------- Decode pitch gain ---------------*/
  74.    index1 = imap1[ shr(index,NCODE2_B) ] ;
  75.    index2 = imap2[ index & (NCODE2-1) ] ;
  76.    *gain_pit = add( gbk1[index1][0], gbk2[index2][0] );
  78.    /*-------------- Decode codebook gain ---------------*/
  80.   /*---------------------------------------------------*
  81.    *-  energy due to innovation                       -*
  82.    *-  predicted energy                               -*
  83.    *-  predicted codebook gain => gcode0[exp_gcode0]  -*
  84.    *---------------------------------------------------*/
  86.    Gain_predict( past_qua_en, code, L_subfr, &gcode0, &exp_gcode0 );
  88.   /*-----------------------------------------------------------------*
  89.    * *gain_code = (gbk1[indice1][1]+gbk2[indice2][1]) * gcode0;      *
  90.    *-----------------------------------------------------------------*/
  92.    L_acc = L_deposit_l( gbk1[index1][1] );
  93.    L_accb = L_deposit_l( gbk2[index2][1] );
  94.    L_gbk12 = L_add( L_acc, L_accb );                       /* Q13 */
  95.    tmp = extract_l( L_shr( L_gbk12,1 ) );                  /* Q12 */
  96.    L_acc = L_mult(tmp, gcode0);             /* Q[exp_gcode0+12+1] */
  98.    L_acc = L_shl(L_acc, add( negate(exp_gcode0),(-12-1+1+16) ));
  99.    *gain_cod = extract_h( L_acc );                          /* Q1 */
  101.   /*----------------------------------------------*
  102.    * update table of past quantized energies      *
  103.    *----------------------------------------------*/
  104.    Gain_update( past_qua_en, L_gbk12 );
  106.    return;
  108. }