LSPDEC.C
上传用户:meifeng08
上传日期:2013-06-18
资源大小:5304k
文件大小:3k
源码类别:

语音压缩

开发平台:

C/C++

  1. /* Version 3.3    Last modified: December 26, 1995 */
  2. #include "typedef.h"
  3. #include "ld8k.h"
  4. #include "basic_op.h"
  5. #include "tab_ld8k.h"
  6. /* static memory */
  7. static Word16 freq_prev[MA_NP][M];   /* Q13 */
  8. static Word16 freq_prev_reset[M] = { /* Q13 */
  9.   2339, 4679, 7018, 9358, 11698, 14037, 16377, 18717, 21056, 23396
  10. };     /* PI*(float)(j+1)/(float)(M+1) */
  11. /* static memory for frame erase operation */
  12. static Word16 prev_ma;                  /* previous MA prediction coef.*/
  13. static Word16 prev_lsp[M];           /* previous LSP vector */
  14. /*----------------------------------------------------------------------------
  15.  * Lsp_decw_reset -   set the previous LSP vectors
  16.  *----------------------------------------------------------------------------
  17.  */
  18. void Lsp_decw_reset(
  19.   void
  20. )
  21. {
  22.   Word16 i;
  23.   for(i=0; i<MA_NP; i++)
  24.     Copy( &freq_prev_reset[0], &freq_prev[i][0], M );
  25.   prev_ma = 0;
  26.   Copy( freq_prev_reset, prev_lsp, M);
  27. }
  28. /*----------------------------------------------------------------------------
  29.  * Lsp_iqua_cs -  LSP main quantization routine
  30.  *----------------------------------------------------------------------------
  31.  */
  32. void Lsp_iqua_cs(
  33.  Word16 prm[],          /* (i)     : indexes of the selected LSP */
  34.  Word16 lsp_q[],        /* (o) Q13 : Quantized LSP parameters    */
  35.  Word16 erase           /* (i)     : frame erase information     */
  36. )
  37. {
  38.   Word16 mode_index;
  39.   Word16 code0;
  40.   Word16 code1;
  41.   Word16 code2;
  42.   Word16 buf[M];     /* Q13 */
  43.   if( erase==0 ) {  /* Not frame erasure */
  44.     mode_index = shr(prm[0] ,NC0_B) & (Word16)1;
  45.     code0 = prm[0] & (Word16)(NC0 - 1);
  46.     code1 = shr(prm[1] ,NC1_B) & (Word16)(NC1 - 1);
  47.     code2 = prm[1] & (Word16)(NC1 - 1);
  48.     /* compose quantized LSP (lsp_q) from indexes */
  49.     Lsp_get_quant(lspcb1, lspcb2, code0, code1, code2,
  50.       fg[mode_index], freq_prev, lsp_q, fg_sum[mode_index]);
  51.     /* save parameters to use in case of the frame erased situation */
  52.     Copy(lsp_q, prev_lsp, M);
  53.     prev_ma = mode_index;
  54.   }
  55.   else {           /* Frame erased */
  56.     /* use revious LSP */
  57.     Copy(prev_lsp, lsp_q, M);
  58.     /* update freq_prev */
  59.     Lsp_prev_extract(prev_lsp, buf,
  60.       fg[prev_ma], freq_prev, fg_sum_inv[prev_ma]);
  61.     Lsp_prev_update(buf, freq_prev);
  62.   }
  63.   return;
  64. }
  65. /*-------------------------------------------------------------------*
  66.  * Function  D_lsp:                                                  *
  67.  *           ~~~~~~                                                  *
  68.  *-------------------------------------------------------------------*/
  69. void D_lsp(
  70.   Word16 prm[],          /* (i)     : indexes of the selected LSP */
  71.   Word16 lsp_q[],        /* (o) Q15 : Quantized LSP parameters    */
  72.   Word16 erase           /* (i)     : frame erase information     */
  73. )
  74. {
  75.   Word16 lsf_q[M];       /* domain 0.0<= lsf_q <PI in Q13 */
  76.   Lsp_iqua_cs(prm, lsf_q, erase);
  77.   /* Convert LSFs to LSPs */
  78.   Lsf_lsp2(lsf_q, lsp_q, M);
  79.   return;
  80. }