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

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

语音压缩

开发平台：

C/C++

LSPDEC.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 "ld8a.h"
  12. #include "basic_op.h"
  13. #include "tab_ld8a.h"
  15. /* static memory */
  17. static Word16 freq_prev[MA_NP][M];   /* Q13 */
  18. static Word16 freq_prev_reset[M] = { /* Q13 */
  19.   2339, 4679, 7018, 9358, 11698, 14037, 16377, 18717, 21056, 23396
  20. };     /* PI*(float)(j+1)/(float)(M+1) */
  22. /* static memory for frame erase operation */
  23. static Word16 prev_ma;                  /* previous MA prediction coef.*/
  24. static Word16 prev_lsp[M];              /* previous LSP vector         */
  27. /*----------------------------------------------------------------------------
  28.  * Lsp_decw_reset -   set the previous LSP vectors
  29.  *----------------------------------------------------------------------------
  30.  */
  31. void Lsp_decw_reset(
  32.   void
  33. )
  34. {
  35.   Word16 i;
  37.   for(i=0; i<MA_NP; i++)
  38.     Copy( &freq_prev_reset[0], &freq_prev[i][0], M );
  40.   prev_ma = 0;
  42.   Copy( freq_prev_reset, prev_lsp, M);
  43. }
  47. /*----------------------------------------------------------------------------
  48.  * Lsp_iqua_cs -  LSP main quantization routine
  49.  *----------------------------------------------------------------------------
  50.  */
  51. void Lsp_iqua_cs(
  52.  Word16 prm[],          /* (i)     : indexes of the selected LSP */
  53.  Word16 lsp_q[],        /* (o) Q13 : Quantized LSP parameters    */
  54.  Word16 erase           /* (i)     : frame erase information     */
  55. )
  56. {
  57.   Word16 mode_index;
  58.   Word16 code0;
  59.   Word16 code1;
  60.   Word16 code2;
  61.   Word16 buf[M];     /* Q13 */
  63.   if( erase==0 ) {  /* Not frame erasure */
  64.     mode_index = shr(prm[0] ,NC0_B) & (Word16)1;
  65.     code0 = prm[0] & (Word16)(NC0 - 1);
  66.     code1 = shr(prm[1] ,NC1_B) & (Word16)(NC1 - 1);
  67.     code2 = prm[1] & (Word16)(NC1 - 1);
  69.     /* compose quantized LSP (lsp_q) from indexes */
  71.     Lsp_get_quant(lspcb1, lspcb2, code0, code1, code2,
  72.       fg[mode_index], freq_prev, lsp_q, fg_sum[mode_index]);
  74.     /* save parameters to use in case of the frame erased situation */
  76.     Copy(lsp_q, prev_lsp, M);
  77.     prev_ma = mode_index;
  78.   }
  79.   else {           /* Frame erased */
  80.     /* use revious LSP */
  82.     Copy(prev_lsp, lsp_q, M);
  84.     /* update freq_prev */
  86.     Lsp_prev_extract(prev_lsp, buf,
  87.       fg[prev_ma], freq_prev, fg_sum_inv[prev_ma]);
  88.     Lsp_prev_update(buf, freq_prev);
  89.   }
  91.   return;
  92. }
  96. /*-------------------------------------------------------------------*
  97.  * Function  D_lsp:                                                  *
  98.  *           ~~~~~~                                                  *
  99.  *-------------------------------------------------------------------*/
  101. void D_lsp(
  102.   Word16 prm[],          /* (i)     : indexes of the selected LSP */
  103.   Word16 lsp_q[],        /* (o) Q15 : Quantized LSP parameters    */
  104.   Word16 erase           /* (i)     : frame erase information     */
  105. )
  106. {
  107.   Word16 lsf_q[M];       /* domain 0.0<= lsf_q <PI in Q13 */
  110.   Lsp_iqua_cs(prm, lsf_q, erase);
  112.   /* Convert LSFs to LSPs */
  114.   Lsf_lsp2(lsf_q, lsp_q, M);
  116.   return;
  117. }