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.
7
/* $Header: /tmp_amd/presto/export/kbs/jutta/src/gsm/RCS/decode.c,v 1.1 1992/10/28 00:15:50 jutta Exp $ */
17
* 4.3 FIXED POINT IMPLEMENTATION OF THE RPE-LTP DECODER
20
static void Postprocessing P2((S,s),
25
register word msr = S->msr;
26
register longword ltmp; /* for GSM_ADD */
29
for (k = 160; k--; s++) {
30
tmp = GSM_MULT_R( msr, 28180 );
31
msr = GSM_ADD(*s, tmp); /* Deemphasis */
32
*s = GSM_ADD(msr, msr) & 0xFFF8; /* Truncation & Upscaling */
37
void Gsm_Decoder P8((S,LARcr, Ncr,bcr,Mcr,xmaxcr,xMcr,s),
40
word * LARcr, /* [0..7] IN */
42
word * Ncr, /* [0..3] IN */
43
word * bcr, /* [0..3] IN */
44
word * Mcr, /* [0..3] IN */
45
word * xmaxcr, /* [0..3] IN */
46
word * xMcr, /* [0..13*4] IN */
48
word * s) /* [0..159] OUT */
51
word erp[40], wt[160];
52
word * drp = S->dp0 + 120;
54
for (j=0; j <= 3; j++, xmaxcr++, bcr++, Ncr++, Mcr++, xMcr += 13) {
56
Gsm_RPE_Decoding( S, *xmaxcr, *Mcr, xMcr, erp );
57
Gsm_Long_Term_Synthesis_Filtering( S, *Ncr, *bcr, erp, drp );
59
for (k = 0; k <= 39; k++) wt[ j * 40 + k ] = drp[ k ];
62
Gsm_Short_Term_Synthesis_Filter( S, LARcr, wt, s );