1a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber/* ------------------------------------------------------------------
2a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber * Copyright (C) 1998-2009 PacketVideo
3a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber *
4a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber * Licensed under the Apache License, Version 2.0 (the "License");
5a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber * you may not use this file except in compliance with the License.
6a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber * You may obtain a copy of the License at
7a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber *
8a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber *      http://www.apache.org/licenses/LICENSE-2.0
9a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber *
10a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber * Unless required by applicable law or agreed to in writing, software
11a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber * distributed under the License is distributed on an "AS IS" BASIS,
12a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either
13a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber * express or implied.
14a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber * See the License for the specific language governing permissions
15a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber * and limitations under the License.
16a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber * -------------------------------------------------------------------
17a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber */
18a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber/****************************************************************************************
19a30d40083856cb4edd225faf8b488fab156e5976Andreas HuberPortions of this file are derived from the following 3GPP standard:
20a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
21a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    3GPP TS 26.073
22a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    ANSI-C code for the Adaptive Multi-Rate (AMR) speech codec
23a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    Available from http://www.3gpp.org
24a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
25a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber(C) 2004, 3GPP Organizational Partners (ARIB, ATIS, CCSA, ETSI, TTA, TTC)
26a30d40083856cb4edd225faf8b488fab156e5976Andreas HuberPermission to distribute, modify and use this file under the standard license
27a30d40083856cb4edd225faf8b488fab156e5976Andreas Huberterms listed above has been obtained from the copyright holder.
28a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber****************************************************************************************/
29a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber/*
30a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber------------------------------------------------------------------------------
31a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
32a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
33a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
34a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber Pathname: ./audio/gsm-amr/c/src/d3_14pf.c
35a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber Functions: decode_3i40_14bits
36a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
37a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber     Date: 01/28/2002
38a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
39a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber------------------------------------------------------------------------------
40a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber REVISION HISTORY
41a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
42a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber Description: Modified to place file in the correct template format. Eliminated
43a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber use of special functions to perform simple mathematical operations.
44a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
45a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber Description: Per review comments...
46a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber (1) Removed include of "count.h" and "basic_op.h"
47a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber (2) Updated the pathname to indicate the correct file.  (Line 39)
48a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
49a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber Description:  Replaced "int" and/or "char" with OSCL defined types.
50a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
51a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber Description:
52a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
53a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber------------------------------------------------------------------------------
54a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber MODULE DESCRIPTION
55a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
56a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
57a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber FUNCTION:  decode_3i40_14bits (decod_ACELP())
58a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
59a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber PURPOSE:   Algebraic codebook decoder. For details about the encoding see
60a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber            c3_14pf.c
61a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber*/
62a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
63a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber/*----------------------------------------------------------------------------
64a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber; INCLUDES
65a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber----------------------------------------------------------------------------*/
66a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber#include "typedef.h"
67a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber#include "cnst.h"
68a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber#include "d3_14pf.h"
69a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
70a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber/*----------------------------------------------------------------------------
71a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber; MACROS
72a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber; Define module specific macros here
73a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber----------------------------------------------------------------------------*/
74a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
75a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber/*----------------------------------------------------------------------------
76a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber; DEFINES
77a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber; Include all pre-processor statements here. Include conditional
78a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber; compile variables also.
79a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber----------------------------------------------------------------------------*/
80a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber#define NB_PULSE 3           /* number of pulses  */
81a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
82a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
83a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber/*----------------------------------------------------------------------------
84a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber; LOCAL FUNCTION DEFINITIONS
85a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber; Function Prototype declaration
86a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber----------------------------------------------------------------------------*/
87a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
88a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber/*----------------------------------------------------------------------------
89a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber; LOCAL VARIABLE DEFINITIONS
90a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber; Variable declaration - defined here and used outside this module
91a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber----------------------------------------------------------------------------*/
92a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
93a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber/*
94a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber------------------------------------------------------------------------------
95a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber FUNCTION NAME: decode_3i40_14bits
96a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber------------------------------------------------------------------------------
97a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber INPUT AND OUTPUT DEFINITIONS
98a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
99a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber Inputs:
100a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    sign  -- Word16 -- signs of 3 pulses.
101a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    index -- Word16 -- Positions of the 3 pulses.
102a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
103a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber Outputs:
104a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    cod[] -- array of type Word16 -- algebraic (fixed) codebook excitation
105a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
106a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber Returns:
107a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    None
108a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
109a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber Global Variables Used:
110a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    None
111a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
112a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber Local Variables Needed:
113a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    None
114a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
115a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber------------------------------------------------------------------------------
116a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber FUNCTION DESCRIPTION
117a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
118a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
119a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber------------------------------------------------------------------------------
120a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber REQUIREMENTS
121a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
122a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber None
123a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
124a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber------------------------------------------------------------------------------
125a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber REFERENCES
126a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
127a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber d2_9pf.c, UMTS GSM AMR speech codec, R99 - Version 3.2.0, March 2, 2001
128a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
129a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber------------------------------------------------------------------------------
130a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber PSEUDO-CODE
131a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
132a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
133a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber------------------------------------------------------------------------------
134a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber RESOURCES USED [optional]
135a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
136a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber When the code is written for a specific target processor the
137a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber the resources used should be documented below.
138a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
139a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber HEAP MEMORY USED: x bytes
140a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
141a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber STACK MEMORY USED: x bytes
142a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
143a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber CLOCK CYCLES: (cycle count equation for this function) + (variable
144a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber                used to represent cycle count for each subroutine
145a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber                called)
146a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber     where: (cycle count variable) = cycle count for [subroutine
147a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber                                     name]
148a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
149a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber------------------------------------------------------------------------------
150a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber CAUTION [optional]
151a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber [State any special notes, constraints or cautions for users of this function]
152a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
153a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber------------------------------------------------------------------------------
154a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber*/
155a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
156a30d40083856cb4edd225faf8b488fab156e5976Andreas Hubervoid decode_3i40_14bits(
157a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    Word16 sign,   /* i : signs of 3 pulses.                       */
158a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    Word16 index,  /* i : Positions of the 3 pulses.               */
159a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    Word16 cod[]   /* o : algebraic (fixed) codebook excitation    */
160a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber)
161a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber{
162a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    Word16 i;
163a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    Word16 j;
164a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
165a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    Word16 pos[NB_PULSE];
166a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
167a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    /* Decode the positions */
168a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
169a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    i = index & 0x7;
170a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
171a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    pos[0] = i * 5;
172a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
173a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
174a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
175a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
176a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
177a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    index >>= 3;
178a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
179a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    j = index & 0x1;
180a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
181a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    index >>= 1;
182a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
183a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    i = index & 0x7;
184a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
185a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    pos[1] = i * 5 + j * 2 + 1;
186a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
187a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
188a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
189a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
190a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
191a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    index >>= 3;
192a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
193a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    j = index & 0x1;
194a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
195a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    index >>= 1;
196a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
197a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    i = index & 0x7;
198a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
199a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    pos[2] = i * 5 + j * 2 + 2;
200a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
201a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
202a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    /* decode the signs  and build the codeword */
203a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
204a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    for (i = 0; i < L_SUBFR; i++)
205a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    {
206a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber        cod[i] = 0;
207a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    }
208a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
209a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    for (j = 0; j < NB_PULSE; j++)
210a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    {
211a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber        i = sign & 1;
212a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
213a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber        /* This line is equivalent to...
214a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber         *
215a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber         *
216a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber         *  if (i == 1)
217a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber         *  {
218a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber         *      cod[pos[j]] = 8191;
219a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber         *  }
220a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber         *  if (i == 0)
221a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber         *  {
222a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber         *      cod[pos[j]] = -8192;
223a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber         *  }
224a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber         */
225a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
226a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber        cod[pos[j]] = i * 16383 - 8192;
227a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
228a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber        sign >>= 1;
229a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
230a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    }
231a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
232a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    return;
233a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber}
234