decode.c 1.6 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364
  1. /*
  2. * Copyright 1992 by Jutta Degener and Carsten Bormann, Technische
  3. * Universitaet Berlin. See the accompanying file "COPYRIGHT" for
  4. * details. THERE IS ABSOLUTELY NO WARRANTY FOR THIS SOFTWARE.
  5. */
  6. /* $Header: /tmp_amd/presto/export/kbs/jutta/src/gsm/RCS/decode.c,v 1.1 1992/10/28 00:15:50 jutta Exp $ */
  7. #include "config.h"
  8. #include <stdio.h>
  9. #include "private.h"
  10. #include "gsm.h"
  11. #include "proto.h"
  12. /*
  13. * 4.3 FIXED POINT IMPLEMENTATION OF THE RPE-LTP DECODER
  14. */
  15. static void Postprocessing P2((S,s),
  16. struct gsm_state * S,
  17. register word * s)
  18. {
  19. register int k;
  20. register word msr = S->msr;
  21. register longword ltmp; /* for GSM_ADD */
  22. register word tmp;
  23. for (k = 160; k--; s++) {
  24. tmp = GSM_MULT_R( msr, 28180 );
  25. msr = GSM_ADD(*s, tmp); /* Deemphasis */
  26. *s = GSM_ADD(msr, msr) & 0xFFF8; /* Truncation & Upscaling */
  27. }
  28. S->msr = msr;
  29. }
  30. void Gsm_Decoder P8((S,LARcr, Ncr,bcr,Mcr,xmaxcr,xMcr,s),
  31. struct gsm_state * S,
  32. word * LARcr, /* [0..7] IN */
  33. word * Ncr, /* [0..3] IN */
  34. word * bcr, /* [0..3] IN */
  35. word * Mcr, /* [0..3] IN */
  36. word * xmaxcr, /* [0..3] IN */
  37. word * xMcr, /* [0..13*4] IN */
  38. word * s) /* [0..159] OUT */
  39. {
  40. int j, k;
  41. word erp[40], wt[160];
  42. word * drp = S->dp0 + 120;
  43. for (j=0; j <= 3; j++, xmaxcr++, bcr++, Ncr++, Mcr++, xMcr += 13) {
  44. Gsm_RPE_Decoding( S, *xmaxcr, *Mcr, xMcr, erp );
  45. Gsm_Long_Term_Synthesis_Filtering( S, *Ncr, *bcr, erp, drp );
  46. for (k = 0; k <= 39; k++) wt[ j * 40 + k ] = drp[ k ];
  47. }
  48. Gsm_Short_Term_Synthesis_Filter( S, LARcr, wt, s );
  49. Postprocessing(S, s);
  50. }