cannam@154
|
1 /* Copyright (c) 2003-2008 Jean-Marc Valin
|
cannam@154
|
2 Copyright (c) 2007-2008 CSIRO
|
cannam@154
|
3 Copyright (c) 2007-2009 Xiph.Org Foundation
|
cannam@154
|
4 Written by Jean-Marc Valin */
|
cannam@154
|
5 /**
|
cannam@154
|
6 @file arch.h
|
cannam@154
|
7 @brief Various architecture definitions for CELT
|
cannam@154
|
8 */
|
cannam@154
|
9 /*
|
cannam@154
|
10 Redistribution and use in source and binary forms, with or without
|
cannam@154
|
11 modification, are permitted provided that the following conditions
|
cannam@154
|
12 are met:
|
cannam@154
|
13
|
cannam@154
|
14 - Redistributions of source code must retain the above copyright
|
cannam@154
|
15 notice, this list of conditions and the following disclaimer.
|
cannam@154
|
16
|
cannam@154
|
17 - Redistributions in binary form must reproduce the above copyright
|
cannam@154
|
18 notice, this list of conditions and the following disclaimer in the
|
cannam@154
|
19 documentation and/or other materials provided with the distribution.
|
cannam@154
|
20
|
cannam@154
|
21 THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
|
cannam@154
|
22 ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
|
cannam@154
|
23 LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
|
cannam@154
|
24 A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER
|
cannam@154
|
25 OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
|
cannam@154
|
26 EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
|
cannam@154
|
27 PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
|
cannam@154
|
28 PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
|
cannam@154
|
29 LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
|
cannam@154
|
30 NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
|
cannam@154
|
31 SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
cannam@154
|
32 */
|
cannam@154
|
33
|
cannam@154
|
34 #ifndef ARCH_H
|
cannam@154
|
35 #define ARCH_H
|
cannam@154
|
36
|
cannam@154
|
37 #include "opus_types.h"
|
cannam@154
|
38 #include "opus_defines.h"
|
cannam@154
|
39
|
cannam@154
|
40 # if !defined(__GNUC_PREREQ)
|
cannam@154
|
41 # if defined(__GNUC__)&&defined(__GNUC_MINOR__)
|
cannam@154
|
42 # define __GNUC_PREREQ(_maj,_min) \
|
cannam@154
|
43 ((__GNUC__<<16)+__GNUC_MINOR__>=((_maj)<<16)+(_min))
|
cannam@154
|
44 # else
|
cannam@154
|
45 # define __GNUC_PREREQ(_maj,_min) 0
|
cannam@154
|
46 # endif
|
cannam@154
|
47 # endif
|
cannam@154
|
48
|
cannam@154
|
49 #if OPUS_GNUC_PREREQ(3, 0)
|
cannam@154
|
50 #define opus_likely(x) (__builtin_expect(!!(x), 1))
|
cannam@154
|
51 #define opus_unlikely(x) (__builtin_expect(!!(x), 0))
|
cannam@154
|
52 #else
|
cannam@154
|
53 #define opus_likely(x) (!!(x))
|
cannam@154
|
54 #define opus_unlikely(x) (!!(x))
|
cannam@154
|
55 #endif
|
cannam@154
|
56
|
cannam@154
|
57 #define CELT_SIG_SCALE 32768.f
|
cannam@154
|
58
|
cannam@154
|
59 #define CELT_FATAL(str) celt_fatal(str, __FILE__, __LINE__);
|
cannam@154
|
60
|
cannam@154
|
61 #if defined(ENABLE_ASSERTIONS) || defined(ENABLE_HARDENING)
|
cannam@154
|
62 #ifdef __GNUC__
|
cannam@154
|
63 __attribute__((noreturn))
|
cannam@154
|
64 #endif
|
cannam@154
|
65 void celt_fatal(const char *str, const char *file, int line);
|
cannam@154
|
66
|
cannam@154
|
67 #if defined(CELT_C) && !defined(OVERRIDE_celt_fatal)
|
cannam@154
|
68 #include <stdio.h>
|
cannam@154
|
69 #include <stdlib.h>
|
cannam@154
|
70 #ifdef __GNUC__
|
cannam@154
|
71 __attribute__((noreturn))
|
cannam@154
|
72 #endif
|
cannam@154
|
73 void celt_fatal(const char *str, const char *file, int line)
|
cannam@154
|
74 {
|
cannam@154
|
75 fprintf (stderr, "Fatal (internal) error in %s, line %d: %s\n", file, line, str);
|
cannam@154
|
76 abort();
|
cannam@154
|
77 }
|
cannam@154
|
78 #endif
|
cannam@154
|
79
|
cannam@154
|
80 #define celt_assert(cond) {if (!(cond)) {CELT_FATAL("assertion failed: " #cond);}}
|
cannam@154
|
81 #define celt_assert2(cond, message) {if (!(cond)) {CELT_FATAL("assertion failed: " #cond "\n" message);}}
|
cannam@154
|
82 #define MUST_SUCCEED(call) celt_assert((call) == OPUS_OK)
|
cannam@154
|
83 #else
|
cannam@154
|
84 #define celt_assert(cond)
|
cannam@154
|
85 #define celt_assert2(cond, message)
|
cannam@154
|
86 #define MUST_SUCCEED(call) do {if((call) != OPUS_OK) {RESTORE_STACK; return OPUS_INTERNAL_ERROR;} } while (0)
|
cannam@154
|
87 #endif
|
cannam@154
|
88
|
cannam@154
|
89 #if defined(ENABLE_ASSERTIONS)
|
cannam@154
|
90 #define celt_sig_assert(cond) {if (!(cond)) {CELT_FATAL("signal assertion failed: " #cond);}}
|
cannam@154
|
91 #else
|
cannam@154
|
92 #define celt_sig_assert(cond)
|
cannam@154
|
93 #endif
|
cannam@154
|
94
|
cannam@154
|
95 #define IMUL32(a,b) ((a)*(b))
|
cannam@154
|
96
|
cannam@154
|
97 #define MIN16(a,b) ((a) < (b) ? (a) : (b)) /**< Minimum 16-bit value. */
|
cannam@154
|
98 #define MAX16(a,b) ((a) > (b) ? (a) : (b)) /**< Maximum 16-bit value. */
|
cannam@154
|
99 #define MIN32(a,b) ((a) < (b) ? (a) : (b)) /**< Minimum 32-bit value. */
|
cannam@154
|
100 #define MAX32(a,b) ((a) > (b) ? (a) : (b)) /**< Maximum 32-bit value. */
|
cannam@154
|
101 #define IMIN(a,b) ((a) < (b) ? (a) : (b)) /**< Minimum int value. */
|
cannam@154
|
102 #define IMAX(a,b) ((a) > (b) ? (a) : (b)) /**< Maximum int value. */
|
cannam@154
|
103 #define UADD32(a,b) ((a)+(b))
|
cannam@154
|
104 #define USUB32(a,b) ((a)-(b))
|
cannam@154
|
105
|
cannam@154
|
106 /* Set this if opus_int64 is a native type of the CPU. */
|
cannam@154
|
107 /* Assume that all LP64 architectures have fast 64-bit types; also x86_64
|
cannam@154
|
108 (which can be ILP32 for x32) and Win64 (which is LLP64). */
|
cannam@154
|
109 #if defined(__x86_64__) || defined(__LP64__) || defined(_WIN64)
|
cannam@154
|
110 #define OPUS_FAST_INT64 1
|
cannam@154
|
111 #else
|
cannam@154
|
112 #define OPUS_FAST_INT64 0
|
cannam@154
|
113 #endif
|
cannam@154
|
114
|
cannam@154
|
115 #define PRINT_MIPS(file)
|
cannam@154
|
116
|
cannam@154
|
117 #ifdef FIXED_POINT
|
cannam@154
|
118
|
cannam@154
|
119 typedef opus_int16 opus_val16;
|
cannam@154
|
120 typedef opus_int32 opus_val32;
|
cannam@154
|
121 typedef opus_int64 opus_val64;
|
cannam@154
|
122
|
cannam@154
|
123 typedef opus_val32 celt_sig;
|
cannam@154
|
124 typedef opus_val16 celt_norm;
|
cannam@154
|
125 typedef opus_val32 celt_ener;
|
cannam@154
|
126
|
cannam@154
|
127 #define celt_isnan(x) 0
|
cannam@154
|
128
|
cannam@154
|
129 #define Q15ONE 32767
|
cannam@154
|
130
|
cannam@154
|
131 #define SIG_SHIFT 12
|
cannam@154
|
132 /* Safe saturation value for 32-bit signals. Should be less than
|
cannam@154
|
133 2^31*(1-0.85) to avoid blowing up on DC at deemphasis.*/
|
cannam@154
|
134 #define SIG_SAT (300000000)
|
cannam@154
|
135
|
cannam@154
|
136 #define NORM_SCALING 16384
|
cannam@154
|
137
|
cannam@154
|
138 #define DB_SHIFT 10
|
cannam@154
|
139
|
cannam@154
|
140 #define EPSILON 1
|
cannam@154
|
141 #define VERY_SMALL 0
|
cannam@154
|
142 #define VERY_LARGE16 ((opus_val16)32767)
|
cannam@154
|
143 #define Q15_ONE ((opus_val16)32767)
|
cannam@154
|
144
|
cannam@154
|
145 #define SCALEIN(a) (a)
|
cannam@154
|
146 #define SCALEOUT(a) (a)
|
cannam@154
|
147
|
cannam@154
|
148 #define ABS16(x) ((x) < 0 ? (-(x)) : (x))
|
cannam@154
|
149 #define ABS32(x) ((x) < 0 ? (-(x)) : (x))
|
cannam@154
|
150
|
cannam@154
|
151 static OPUS_INLINE opus_int16 SAT16(opus_int32 x) {
|
cannam@154
|
152 return x > 32767 ? 32767 : x < -32768 ? -32768 : (opus_int16)x;
|
cannam@154
|
153 }
|
cannam@154
|
154
|
cannam@154
|
155 #ifdef FIXED_DEBUG
|
cannam@154
|
156 #include "fixed_debug.h"
|
cannam@154
|
157 #else
|
cannam@154
|
158
|
cannam@154
|
159 #include "fixed_generic.h"
|
cannam@154
|
160
|
cannam@154
|
161 #ifdef OPUS_ARM_PRESUME_AARCH64_NEON_INTR
|
cannam@154
|
162 #include "arm/fixed_arm64.h"
|
cannam@154
|
163 #elif OPUS_ARM_INLINE_EDSP
|
cannam@154
|
164 #include "arm/fixed_armv5e.h"
|
cannam@154
|
165 #elif defined (OPUS_ARM_INLINE_ASM)
|
cannam@154
|
166 #include "arm/fixed_armv4.h"
|
cannam@154
|
167 #elif defined (BFIN_ASM)
|
cannam@154
|
168 #include "fixed_bfin.h"
|
cannam@154
|
169 #elif defined (TI_C5X_ASM)
|
cannam@154
|
170 #include "fixed_c5x.h"
|
cannam@154
|
171 #elif defined (TI_C6X_ASM)
|
cannam@154
|
172 #include "fixed_c6x.h"
|
cannam@154
|
173 #endif
|
cannam@154
|
174
|
cannam@154
|
175 #endif
|
cannam@154
|
176
|
cannam@154
|
177 #else /* FIXED_POINT */
|
cannam@154
|
178
|
cannam@154
|
179 typedef float opus_val16;
|
cannam@154
|
180 typedef float opus_val32;
|
cannam@154
|
181 typedef float opus_val64;
|
cannam@154
|
182
|
cannam@154
|
183 typedef float celt_sig;
|
cannam@154
|
184 typedef float celt_norm;
|
cannam@154
|
185 typedef float celt_ener;
|
cannam@154
|
186
|
cannam@154
|
187 #ifdef FLOAT_APPROX
|
cannam@154
|
188 /* This code should reliably detect NaN/inf even when -ffast-math is used.
|
cannam@154
|
189 Assumes IEEE 754 format. */
|
cannam@154
|
190 static OPUS_INLINE int celt_isnan(float x)
|
cannam@154
|
191 {
|
cannam@154
|
192 union {float f; opus_uint32 i;} in;
|
cannam@154
|
193 in.f = x;
|
cannam@154
|
194 return ((in.i>>23)&0xFF)==0xFF && (in.i&0x007FFFFF)!=0;
|
cannam@154
|
195 }
|
cannam@154
|
196 #else
|
cannam@154
|
197 #ifdef __FAST_MATH__
|
cannam@154
|
198 #error Cannot build libopus with -ffast-math unless FLOAT_APPROX is defined. This could result in crashes on extreme (e.g. NaN) input
|
cannam@154
|
199 #endif
|
cannam@154
|
200 #define celt_isnan(x) ((x)!=(x))
|
cannam@154
|
201 #endif
|
cannam@154
|
202
|
cannam@154
|
203 #define Q15ONE 1.0f
|
cannam@154
|
204
|
cannam@154
|
205 #define NORM_SCALING 1.f
|
cannam@154
|
206
|
cannam@154
|
207 #define EPSILON 1e-15f
|
cannam@154
|
208 #define VERY_SMALL 1e-30f
|
cannam@154
|
209 #define VERY_LARGE16 1e15f
|
cannam@154
|
210 #define Q15_ONE ((opus_val16)1.f)
|
cannam@154
|
211
|
cannam@154
|
212 /* This appears to be the same speed as C99's fabsf() but it's more portable. */
|
cannam@154
|
213 #define ABS16(x) ((float)fabs(x))
|
cannam@154
|
214 #define ABS32(x) ((float)fabs(x))
|
cannam@154
|
215
|
cannam@154
|
216 #define QCONST16(x,bits) (x)
|
cannam@154
|
217 #define QCONST32(x,bits) (x)
|
cannam@154
|
218
|
cannam@154
|
219 #define NEG16(x) (-(x))
|
cannam@154
|
220 #define NEG32(x) (-(x))
|
cannam@154
|
221 #define NEG32_ovflw(x) (-(x))
|
cannam@154
|
222 #define EXTRACT16(x) (x)
|
cannam@154
|
223 #define EXTEND32(x) (x)
|
cannam@154
|
224 #define SHR16(a,shift) (a)
|
cannam@154
|
225 #define SHL16(a,shift) (a)
|
cannam@154
|
226 #define SHR32(a,shift) (a)
|
cannam@154
|
227 #define SHL32(a,shift) (a)
|
cannam@154
|
228 #define PSHR32(a,shift) (a)
|
cannam@154
|
229 #define VSHR32(a,shift) (a)
|
cannam@154
|
230
|
cannam@154
|
231 #define PSHR(a,shift) (a)
|
cannam@154
|
232 #define SHR(a,shift) (a)
|
cannam@154
|
233 #define SHL(a,shift) (a)
|
cannam@154
|
234 #define SATURATE(x,a) (x)
|
cannam@154
|
235 #define SATURATE16(x) (x)
|
cannam@154
|
236
|
cannam@154
|
237 #define ROUND16(a,shift) (a)
|
cannam@154
|
238 #define SROUND16(a,shift) (a)
|
cannam@154
|
239 #define HALF16(x) (.5f*(x))
|
cannam@154
|
240 #define HALF32(x) (.5f*(x))
|
cannam@154
|
241
|
cannam@154
|
242 #define ADD16(a,b) ((a)+(b))
|
cannam@154
|
243 #define SUB16(a,b) ((a)-(b))
|
cannam@154
|
244 #define ADD32(a,b) ((a)+(b))
|
cannam@154
|
245 #define SUB32(a,b) ((a)-(b))
|
cannam@154
|
246 #define ADD32_ovflw(a,b) ((a)+(b))
|
cannam@154
|
247 #define SUB32_ovflw(a,b) ((a)-(b))
|
cannam@154
|
248 #define MULT16_16_16(a,b) ((a)*(b))
|
cannam@154
|
249 #define MULT16_16(a,b) ((opus_val32)(a)*(opus_val32)(b))
|
cannam@154
|
250 #define MAC16_16(c,a,b) ((c)+(opus_val32)(a)*(opus_val32)(b))
|
cannam@154
|
251
|
cannam@154
|
252 #define MULT16_32_Q15(a,b) ((a)*(b))
|
cannam@154
|
253 #define MULT16_32_Q16(a,b) ((a)*(b))
|
cannam@154
|
254
|
cannam@154
|
255 #define MULT32_32_Q31(a,b) ((a)*(b))
|
cannam@154
|
256
|
cannam@154
|
257 #define MAC16_32_Q15(c,a,b) ((c)+(a)*(b))
|
cannam@154
|
258 #define MAC16_32_Q16(c,a,b) ((c)+(a)*(b))
|
cannam@154
|
259
|
cannam@154
|
260 #define MULT16_16_Q11_32(a,b) ((a)*(b))
|
cannam@154
|
261 #define MULT16_16_Q11(a,b) ((a)*(b))
|
cannam@154
|
262 #define MULT16_16_Q13(a,b) ((a)*(b))
|
cannam@154
|
263 #define MULT16_16_Q14(a,b) ((a)*(b))
|
cannam@154
|
264 #define MULT16_16_Q15(a,b) ((a)*(b))
|
cannam@154
|
265 #define MULT16_16_P15(a,b) ((a)*(b))
|
cannam@154
|
266 #define MULT16_16_P13(a,b) ((a)*(b))
|
cannam@154
|
267 #define MULT16_16_P14(a,b) ((a)*(b))
|
cannam@154
|
268 #define MULT16_32_P16(a,b) ((a)*(b))
|
cannam@154
|
269
|
cannam@154
|
270 #define DIV32_16(a,b) (((opus_val32)(a))/(opus_val16)(b))
|
cannam@154
|
271 #define DIV32(a,b) (((opus_val32)(a))/(opus_val32)(b))
|
cannam@154
|
272
|
cannam@154
|
273 #define SCALEIN(a) ((a)*CELT_SIG_SCALE)
|
cannam@154
|
274 #define SCALEOUT(a) ((a)*(1/CELT_SIG_SCALE))
|
cannam@154
|
275
|
cannam@154
|
276 #define SIG2WORD16(x) (x)
|
cannam@154
|
277
|
cannam@154
|
278 #endif /* !FIXED_POINT */
|
cannam@154
|
279
|
cannam@154
|
280 #ifndef GLOBAL_STACK_SIZE
|
cannam@154
|
281 #ifdef FIXED_POINT
|
cannam@154
|
282 #define GLOBAL_STACK_SIZE 120000
|
cannam@154
|
283 #else
|
cannam@154
|
284 #define GLOBAL_STACK_SIZE 120000
|
cannam@154
|
285 #endif
|
cannam@154
|
286 #endif
|
cannam@154
|
287
|
cannam@154
|
288 #endif /* ARCH_H */
|