File: decode.c

package info (click to toggle)
mgetty 1.2.1-5
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 6,880 kB
  • sloc: ansic: 42,728; sh: 6,487; perl: 6,262; makefile: 1,457; tcl: 756; lisp: 283
file content (63 lines) | stat: -rw-r--r-- 1,832 bytes parent folder | download | duplicates (14)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
/*
 * Copyright 1992 by Jutta Degener and Carsten Bormann, Technische
 * Universitaet Berlin.  See the accompanying file "COPYRIGHT" for
 * details.  THERE IS ABSOLUTELY NO WARRANTY FOR THIS SOFTWARE.
 */

/* $Id: decode.c,v 1.4 1998/09/09 21:06:43 gert Exp $ */

#include <stdio.h>

#include  "private.h"
#include  "gsm.h"
#include  "proto.h"

/*
 *  4.3 FIXED POINT IMPLEMENTATION OF THE RPE-LTP DECODER
 */

static void Postprocessing P2((S,s),
     struct gsm_state    * S,
     register word       * s)
{
     register int        k;
     register word       msr = S->msr;
     register longword   ltmp;     /* for GSM_ADD */
     register word       tmp;

     for (k = 160; k--; s++) {
          tmp = GSM_MULT_R( msr, 28180 );
          msr = GSM_ADD(*s, tmp);          /* Deemphasis         */
          *s  = GSM_ADD(msr, msr) & 0xFFF8;  /* Truncation & Upscaling */
     }
     S->msr = msr;
}

void Gsm_Decoder P8((S,LARcr, Ncr,bcr,Mcr,xmaxcr,xMcr,s),
     struct gsm_state    * S,

     word      * LARcr,  /* [0..7]      IN   */

     word      * Ncr,         /* [0..3]           IN   */
     word      * bcr,         /* [0..3]      IN   */
     word      * Mcr,         /* [0..3]           IN   */
     word      * xmaxcr, /* [0..3]      IN   */
     word      * xMcr,        /* [0..13*4]        IN   */

     word      * s)      /* [0..159]         OUT  */
{
     int       j, k;
     word      erp[40], wt[160];
     word      * drp = S->dp0 + 120;

     for (j=0; j <= 3; j++, xmaxcr++, bcr++, Ncr++, Mcr++, xMcr += 13) {

          Gsm_RPE_Decoding( S, *xmaxcr, *Mcr, xMcr, erp );
          Gsm_Long_Term_Synthesis_Filtering( S, *Ncr, *bcr, erp, drp );

          for (k = 0; k <= 39; k++) wt[ j * 40 + k ] =  drp[ k ];
     }

     Gsm_Short_Term_Synthesis_Filter( S, LARcr, wt, s );
     Postprocessing(S, s);
}