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.173
22a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    ANSI-C code for the Adaptive Multi-Rate - Wideband (AMR-WB) speech codec
23a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    Available from http://www.3gpp.org
24a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
25a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber(C) 2007, 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 Filename: dec_acelp_4p_in_64.cpp
35a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
36a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber     Date: 05/08/2007
37a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
38a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber------------------------------------------------------------------------------
39a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber REVISION HISTORY
40a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
41a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
42a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber Description:
43a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
44a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber------------------------------------------------------------------------------
45a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber INPUT AND OUTPUT DEFINITIONS
46a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
47a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber     int16 index[],    (i) : index (20): 5+5+5+5 = 20 bits.
48a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber                       (i) : index (36): 9+9+9+9 = 36 bits.
49a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber                       (i) : index (44): 13+9+13+9 = 44 bits.
50a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber                       (i) : index (52): 13+13+13+13 = 52 bits.
51a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber                       (i) : index (64): 2+2+2+2+14+14+14+14 = 64 bits.
52a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber                       (i) : index (72): 10+2+10+2+10+14+10+14 = 72 bits.
53a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber                       (i) : index (88): 11+11+11+11+11+11+11+11 = 88 bits.
54a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber     int16 nbbits,     (i) : 20, 36, 44, 52, 64, 72 or 88 bits
55a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber     int16 code[]      (o) Q9: algebraic (fixed) codebook excitation
56a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
57a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber------------------------------------------------------------------------------
58a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber FUNCTION DESCRIPTION
59a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
60a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber   20, 36, 44, 52, 64, 72, 88 bits algebraic codebook decoder.
61a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber   4 tracks x 16 positions per track = 64 samples.
62a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
63a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber   20 bits --> 4 pulses in a frame of 64 samples.
64a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber   36 bits --> 8 pulses in a frame of 64 samples.
65a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber   44 bits --> 10 pulses in a frame of 64 samples.
66a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber   52 bits --> 12 pulses in a frame of 64 samples.
67a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber   64 bits --> 16 pulses in a frame of 64 samples.
68a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber   72 bits --> 18 pulses in a frame of 64 samples.
69a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber   88 bits --> 24 pulses in a frame of 64 samples.
70a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
71a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber   All pulses can have two (2) possible amplitudes: +1 or -1.
72a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber   Each pulse can have sixteen (16) possible positions.
73a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
74a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber------------------------------------------------------------------------------
75a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber REQUIREMENTS
76a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
77a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
78a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber------------------------------------------------------------------------------
79a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber REFERENCES
80a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
81a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber------------------------------------------------------------------------------
82a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber PSEUDO-CODE
83a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
84a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber------------------------------------------------------------------------------
85a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber*/
86a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
87a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
88a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber/*----------------------------------------------------------------------------
89a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber; INCLUDES
90a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber----------------------------------------------------------------------------*/
91a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
92a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber#include "pv_amr_wb_type_defs.h"
93a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber#include "pvamrwbdecoder_basic_op.h"
94a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber#include "pvamrwbdecoder_cnst.h"
95a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber#include "pvamrwbdecoder_acelp.h"
96a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
97a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber#include "q_pulse.h"
98a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
99a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber/*----------------------------------------------------------------------------
100a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber; MACROS
101a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber; Define module specific macros here
102a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber----------------------------------------------------------------------------*/
103a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
104a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
105a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber/*----------------------------------------------------------------------------
106a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber; DEFINES
107a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber; Include all pre-processor statements here. Include conditional
108a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber; compile variables also.
109a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber----------------------------------------------------------------------------*/
110a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber#define L_CODE    64                       /* codevector length  */
111a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber#define NB_TRACK  4                        /* number of track    */
112a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber#define NB_POS    16                       /* number of position */
113a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
114a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber/*----------------------------------------------------------------------------
115a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber; LOCAL FUNCTION DEFINITIONS
116a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber; Function Prototype declaration
117a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber----------------------------------------------------------------------------*/
118a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber#ifdef __cplusplus
119a30d40083856cb4edd225faf8b488fab156e5976Andreas Huberextern "C"
120a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber{
121a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber#endif
122a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
123a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    void add_pulses(int16 pos[], int16 nb_pulse, int16 track, int16 code[]);
124a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
125a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber#ifdef __cplusplus
126a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber}
127a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber#endif
128a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
129a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber/*----------------------------------------------------------------------------
130a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber; LOCAL STORE/BUFFER/POINTER DEFINITIONS
131a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber; Variable declaration - defined here and used outside this module
132a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber----------------------------------------------------------------------------*/
133a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
134a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber/*----------------------------------------------------------------------------
135a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber; EXTERNAL FUNCTION REFERENCES
136a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber; Declare functions defined elsewhere and referenced in this module
137a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber----------------------------------------------------------------------------*/
138a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
139a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber/*----------------------------------------------------------------------------
140a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber; EXTERNAL GLOBAL STORE/BUFFER/POINTER REFERENCES
141a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber; Declare variables used in this module but defined elsewhere
142a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber----------------------------------------------------------------------------*/
143a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
144a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber/*----------------------------------------------------------------------------
145a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber; FUNCTION CODE
146a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber----------------------------------------------------------------------------*/
147a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
148a30d40083856cb4edd225faf8b488fab156e5976Andreas Hubervoid dec_acelp_4p_in_64(
149a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    int16 index[],  /* (i) : index (20): 5+5+5+5 = 20 bits.                 */
150a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    /* (i) : index (36): 9+9+9+9 = 36 bits.                 */
151a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    /* (i) : index (44): 13+9+13+9 = 44 bits.               */
152a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    /* (i) : index (52): 13+13+13+13 = 52 bits.             */
153a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    /* (i) : index (64): 2+2+2+2+14+14+14+14 = 64 bits.     */
154a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    /* (i) : index (72): 10+2+10+2+10+14+10+14 = 72 bits.   */
155a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    /* (i) : index (88): 11+11+11+11+11+11+11+11 = 88 bits. */
156a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    int16 nbbits,   /* (i) : 20, 36, 44, 52, 64, 72 or 88 bits              */
157a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    int16 code[]    /* (o) Q9: algebraic (fixed) codebook excitation        */
158a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber)
159a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber{
160a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    int16 k, pos[6];
161a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    int32 L_index;
162a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    pv_memset(code, 0, L_CODE*sizeof(*code));
163a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
164a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    /* decode the positions and signs of pulses and build the codeword */
165a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
166a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
167a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    switch (nbbits)
168a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    {
169a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber        case 20:
170a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber            for (k = 0; k < NB_TRACK; k++)
171a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber            {
172a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber                L_index = index[k];
173a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber                dec_1p_N1(L_index, 4, 0, pos);
174a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber                add_pulses(pos, 1, k, code);
175a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber            }
176a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber            break;
177a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
178a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber        case  36:
179a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber            for (k = 0; k < NB_TRACK; k++)
180a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber            {
181a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber                L_index = index[k];
182a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber                dec_2p_2N1(L_index, 4, 0, pos);
183a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber                add_pulses(pos, 2, k, code);
184a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber            }
185a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber            break;
186a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber        case 44:
187a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber            for (k = 0; k < NB_TRACK - 2; k++)
188a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber            {
189a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber                L_index = index[k];
190a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber                dec_3p_3N1(L_index, 4, 0, pos);
191a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber                add_pulses(pos, 3, k, code);
192a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber            }
193a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber            for (k = 2; k < NB_TRACK; k++)
194a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber            {
195a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber                L_index = index[k];
196a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber                dec_2p_2N1(L_index, 4, 0, pos);
197a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber                add_pulses(pos, 2, k, code);
198a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber            }
199a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber            break;
200a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber        case 52:
201a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber            for (k = 0; k < NB_TRACK; k++)
202a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber            {
203a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber                L_index = index[k];
204a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber                dec_3p_3N1(L_index, 4, 0, pos);
205a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber                add_pulses(pos, 3, k, code);
206a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber            }
207a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber            break;
208a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber        case 64:
209a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber            for (k = 0; k < NB_TRACK; k++)
210a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber            {
211a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber                L_index = ((int32)index[k] << 14) + index[k + NB_TRACK];
212a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber                dec_4p_4N(L_index, 4, 0, pos);
213a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber                add_pulses(pos, 4, k, code);
214a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber            }
215a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber            break;
216a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber        case 72:
217a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber            for (k = 0; k < NB_TRACK - 2; k++)
218a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber            {
219a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber                L_index = ((int32)index[k] << 10) + index[k + NB_TRACK];
220a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber                dec_5p_5N(L_index, 4, 0, pos);
221a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber                add_pulses(pos, 5, k, code);
222a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber            }
223a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber            for (k = 2; k < NB_TRACK; k++)
224a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber            {
225a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber                L_index = ((int32)index[k] << 14) + index[k + NB_TRACK];
226a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber                dec_4p_4N(L_index, 4, 0, pos);
227a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber                add_pulses(pos, 4, k, code);
228a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber            }
229a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber            break;
230a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber        case 88:
231a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber            for (k = 0; k < NB_TRACK; k++)
232a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber            {
233a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber                L_index = ((int32)index[k] << 11) + index[k + NB_TRACK];
234a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber                dec_6p_6N_2(L_index, 4, 0, pos);
235a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber                add_pulses(pos, 6, k, code);
236a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber            }
237a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber        default:
238a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber            break;
239a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    }
240a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
241a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
242a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber}
243a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
244a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
245a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
246a30d40083856cb4edd225faf8b488fab156e5976Andreas Hubervoid add_pulses(int16 pos[], int16 nb_pulse, int16 track, int16 code[])
247a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber{
248a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    int16 i, k;
249a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
250a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    for (k = 0; k < nb_pulse; k++)
251a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    {
252a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber        /* i = ((pos[k] & (NB_POS-1))*NB_TRACK) + track; */
253a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber        i = ((pos[k] & (NB_POS - 1)) << 2) + track;
254a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
255a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber        if ((pos[k] & NB_POS) == 0)
256a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber        {
257a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber            code[i] +=  512;
258a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber        }
259a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber        else
260a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber        {
261a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber            code[i] -=  512;
262a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber        }
263a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber    }
264a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber
265a30d40083856cb4edd225faf8b488fab156e5976Andreas Huber}
266