1 /*
2 ** Copyright 2003-2010, VisualOn, Inc.
3 **
4 ** Licensed under the Apache License, Version 2.0 (the "License");
5 ** you may not use this file except in compliance with the License.
6 ** You may obtain a copy of the License at
7 **
8 ** http://www.apache.org/licenses/LICENSE-2.0
9 **
10 ** Unless required by applicable law or agreed to in writing, software
11 ** distributed under the License is distributed on an "AS IS" BASIS,
12 ** WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
13 ** See the License for the specific language governing permissions and
14 ** limitations under the License.
15 */
16
17 /***********************************************************************
18 * File: scale.c *
19 * *
20 * Description: Scale signal to get maximum of dynamic *
21 * *
22 ************************************************************************/
23
24 #include "typedef.h"
25 #include "basic_op.h"
26
Scale_sig(Word16 x[],Word16 lg,Word16 exp)27 void Scale_sig(
28 Word16 x[], /* (i/o) : signal to scale */
29 Word16 lg, /* (i) : size of x[] */
30 Word16 exp /* (i) : exponent: x = round(x << exp) */
31 )
32 {
33 Word32 i;
34 Word32 L_tmp;
35 if(exp > 0)
36 {
37 for (i = lg - 1 ; i >= 0; i--)
38 {
39 L_tmp = L_shl2(x[i], 16 + exp);
40 x[i] = extract_h(L_add(L_tmp, 0x8000));
41 }
42 }
43 else
44 {
45 exp = -exp;
46 for (i = lg - 1; i >= 0; i--)
47 {
48 L_tmp = x[i] << 16;
49 L_tmp >>= exp;
50 x[i] = (L_tmp + 0x8000)>>16;
51 }
52 }
53 return;
54 }
55
56
57
58