1b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber/* ------------------------------------------------------------------
2b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber * Copyright (C) 1998-2009 PacketVideo
3b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber *
4b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber * Licensed under the Apache License, Version 2.0 (the "License");
5b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber * you may not use this file except in compliance with the License.
6b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber * You may obtain a copy of the License at
7b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber *
8b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber *      http://www.apache.org/licenses/LICENSE-2.0
9b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber *
10b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber * Unless required by applicable law or agreed to in writing, software
11b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber * distributed under the License is distributed on an "AS IS" BASIS,
12b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either
13b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber * express or implied.
14b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber * See the License for the specific language governing permissions
15b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber * and limitations under the License.
16b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber * -------------------------------------------------------------------
17b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber */
18b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber/****************************************************************************************
19b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas HuberPortions of this file are derived from the following 3GPP standard:
20b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber
21b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber    3GPP TS 26.073
22b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber    ANSI-C code for the Adaptive Multi-Rate (AMR) speech codec
23b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber    Available from http://www.3gpp.org
24b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber
25b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber(C) 2004, 3GPP Organizational Partners (ARIB, ATIS, CCSA, ETSI, TTA, TTC)
26b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas HuberPermission to distribute, modify and use this file under the standard license
27b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huberterms listed above has been obtained from the copyright holder.
28b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber****************************************************************************************/
29b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber/*
30b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber
31b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber
32b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber
33b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber
34b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber Filename: /audio/gsm_amr/c/src/l_extract.c
35b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber
36b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber     Date: 09/07/2000
37b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber
38b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber------------------------------------------------------------------------------
39b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber REVISION HISTORY
40b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber
41b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber Description: Updated template. Changed function interface to pass in a
42b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber              pointer to overflow flag into the function instead of using a
43b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber              global flag. Changed names of function parameters for clarity.
44b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber              Removed inclusion of unwanted header files.
45b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber
46b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber Description:
47b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber
48b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber------------------------------------------------------------------------------
49b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber*/
50b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber
51b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber/*----------------------------------------------------------------------------
52b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber; INCLUDES
53b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber----------------------------------------------------------------------------*/
54b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber#include    "basic_op.h"
55b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber
56b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber/*----------------------------------------------------------------------------
57b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber; MACROS
58b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber; [Define module specific macros here]
59b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber----------------------------------------------------------------------------*/
60b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber
61b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber/*----------------------------------------------------------------------------
62b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber; DEFINES
63b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber; [Include all pre-processor statements here. Include conditional
64b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber; compile variables also.]
65b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber----------------------------------------------------------------------------*/
66b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber
67b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber/*----------------------------------------------------------------------------
68b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber; LOCAL FUNCTION DEFINITIONS
69b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber; [List function prototypes here]
70b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber----------------------------------------------------------------------------*/
71b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber
72b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber/*----------------------------------------------------------------------------
73b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber; LOCAL VARIABLE DEFINITIONS
74b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber; [Variable declaration - defined here and used outside this module]
75b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber----------------------------------------------------------------------------*/
76b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber
77b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber
78b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber/*
79b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber------------------------------------------------------------------------------
80b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber FUNCTION NAME: L_extract
81b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber------------------------------------------------------------------------------
82b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber INPUT AND OUTPUT DEFINITIONS
83b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber
84b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber Inputs:
85b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber    L_var = 32 bit signed integer (Word32) whose value falls
86b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber           in the range : 0x8000 0000 <= L_32 <= 0x7fff ffff.
87b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber
88b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber    pL_var_hi =  pointer to the most significant word of L_var (Word16).
89b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber
90b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber    pL_var_lo =  pointer to the least significant word of L_var shifted
91b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber              to the left by 1 (Word16).
92b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber
93b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber    pOverflow = pointer to overflow (Flag)
94b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber
95b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber Outputs:
96b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber    pOverflow -> 1 if the 32 bit add operation resulted in overflow
97b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber    pL_var_hi -> MS word of L_32.
98b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber    pL_var_lo -> LS word of L_32 shifted left by 1.
99b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber
100b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber Returns:
101b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber    None
102b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber
103b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber Global Variables Used:
104b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber    None
105b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber
106b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber Local Variables Needed:
107b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber    None
108b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber
109b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber------------------------------------------------------------------------------
110b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber FUNCTION DESCRIPTION
111b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber
112b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber This function extracts two 16-bit double precision format (DPF) numbers
113b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber from a 32-bit integer. The MS word of L_var will be stored in the location
114b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber pointed to by pL_var_hi and the shifted LS word of L_var will be stored in
115b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber the location pointed to by pL_var_lo.
116b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber
117b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber------------------------------------------------------------------------------
118b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber REQUIREMENTS
119b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber
120b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber None
121b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber
122b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber------------------------------------------------------------------------------
123b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber REFERENCES
124b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber
125b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber [1] L_extract() function in oper_32b.c,  UMTS GSM AMR speech codec, R99 -
126b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber Version 3.2.0, March 2, 2001
127b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber
128b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber------------------------------------------------------------------------------
129b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber PSEUDO-CODE
130b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber
131b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber
132b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber------------------------------------------------------------------------------
133b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber RESOURCES USED [optional]
134b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber
135b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber When the code is written for a specific target processor the
136b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber the resources used should be documented below.
137b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber
138b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber HEAP MEMORY USED: x bytes
139b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber
140b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber STACK MEMORY USED: x bytes
141b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber
142b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber CLOCK CYCLES: (cycle count equation for this function) + (variable
143b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber                used to represent cycle count for each subroutine
144b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber                called)
145b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber     where: (cycle count variable) = cycle count for [subroutine
146b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber                                     name]
147b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber
148b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber------------------------------------------------------------------------------
149b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber CAUTION [optional]
150b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber [State any special notes, constraints or cautions for users of this function]
151b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber
152b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber------------------------------------------------------------------------------
153b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber*/
154b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber
155b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber/*----------------------------------------------------------------------------
156b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber; FUNCTION CODE
157b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber----------------------------------------------------------------------------*/
158b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Hubervoid L_Extract(Word32 L_var,
159b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber               Word16 *pL_var_hi,
160b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber               Word16 *pL_var_lo,
161b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber               Flag   *pOverflow)
162b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber{
163b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber
164b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber    Word32  temp;
165b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber
166b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber    OSCL_UNUSED_ARG(pOverflow);
167b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber
168b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber    temp = (L_var >> 16);
169b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber
170b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber    *(pL_var_hi) = (Word16) temp;
171b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber    *(pL_var_lo) = (Word16)((L_var >> 1) - (temp << 15));
172b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber
173b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber    return;
174b841f14f8e51f2365945281fbfa54ef6a1b1b5a6Andreas Huber}
175