/[pcre]/code/trunk/sljit/sljitConfigInternal.h
ViewVC logotype

Contents of /code/trunk/sljit/sljitConfigInternal.h

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1512 - (show annotations)
Sun Nov 9 07:27:16 2014 UTC (4 years, 9 months ago) by zherczeg
File MIME type: text/plain
File size: 22984 byte(s)
JIT compiler update.
1 /*
2 * Stack-less Just-In-Time compiler
3 *
4 * Copyright 2009-2012 Zoltan Herczeg (hzmester@freemail.hu). All rights reserved.
5 *
6 * Redistribution and use in source and binary forms, with or without modification, are
7 * permitted provided that the following conditions are met:
8 *
9 * 1. Redistributions of source code must retain the above copyright notice, this list of
10 * conditions and the following disclaimer.
11 *
12 * 2. Redistributions in binary form must reproduce the above copyright notice, this list
13 * of conditions and the following disclaimer in the documentation and/or other materials
14 * provided with the distribution.
15 *
16 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDER(S) AND CONTRIBUTORS ``AS IS'' AND ANY
17 * EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
18 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT
19 * SHALL THE COPYRIGHT HOLDER(S) OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
20 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED
21 * TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR
22 * BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
23 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
24 * ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
25 */
26
27 #ifndef _SLJIT_CONFIG_INTERNAL_H_
28 #define _SLJIT_CONFIG_INTERNAL_H_
29
30 /*
31 SLJIT defines the following architecture dependent types and macros:
32
33 Types:
34 sljit_sb, sljit_ub : signed and unsigned 8 bit byte
35 sljit_sh, sljit_uh : signed and unsigned 16 bit half-word (short) type
36 sljit_si, sljit_ui : signed and unsigned 32 bit integer type
37 sljit_sw, sljit_uw : signed and unsigned machine word, enough to store a pointer
38 sljit_p : unsgined pointer value (usually the same as sljit_uw, but
39 some 64 bit ABIs may use 32 bit pointers)
40 sljit_s : single precision floating point value
41 sljit_d : double precision floating point value
42
43 Macros for feature detection (boolean):
44 SLJIT_32BIT_ARCHITECTURE : 32 bit architecture
45 SLJIT_64BIT_ARCHITECTURE : 64 bit architecture
46 SLJIT_LITTLE_ENDIAN : little endian architecture
47 SLJIT_BIG_ENDIAN : big endian architecture
48 SLJIT_UNALIGNED : allows unaligned memory accesses for non-fpu operations (only!)
49 SLJIT_INDIRECT_CALL : see SLJIT_FUNC_OFFSET() for more information
50
51 Constants:
52 SLJIT_NUMBER_OF_REGISTERS : number of available registers
53 SLJIT_NUMBER_OF_SCRATCH_REGISTERS : number of available scratch registers
54 SLJIT_NUMBER_OF_SAVED_REGISTERS : number of available saved registers
55 SLJIT_NUMBER_OF_FLOAT_REGISTERS : number of available floating point registers
56 SLJIT_NUMBER_OF_SCRATCH_FLOAT_REGISTERS : number of available floating point scratch registers
57 SLJIT_NUMBER_OF_SAVED_FLOAT_REGISTERS : number of available floating point saved registers
58 SLJIT_WORD_SHIFT : the shift required to apply when accessing a sljit_sw/sljit_uw array by index
59 SLJIT_DOUBLE_SHIFT : the shift required to apply when accessing
60 a double precision floating point array by index
61 SLJIT_SINGLE_SHIFT : the shift required to apply when accessing
62 a single precision floating point array by index
63 SLJIT_LOCALS_OFFSET : local space starting offset (SLJIT_SP + SLJIT_LOCALS_OFFSET)
64 SLJIT_RETURN_ADDRESS_OFFSET : a return instruction always adds this offset to the return address
65
66 Other macros:
67 SLJIT_CALL : C calling convention define for both calling JIT form C and C callbacks for JIT
68 SLJIT_W(number) : defining 64 bit constants on 64 bit architectures (compiler independent helper)
69 */
70
71 /*****************/
72 /* Sanity check. */
73 /*****************/
74
75 #if !((defined SLJIT_CONFIG_X86_32 && SLJIT_CONFIG_X86_32) \
76 || (defined SLJIT_CONFIG_X86_64 && SLJIT_CONFIG_X86_64) \
77 || (defined SLJIT_CONFIG_ARM_V5 && SLJIT_CONFIG_ARM_V5) \
78 || (defined SLJIT_CONFIG_ARM_V7 && SLJIT_CONFIG_ARM_V7) \
79 || (defined SLJIT_CONFIG_ARM_THUMB2 && SLJIT_CONFIG_ARM_THUMB2) \
80 || (defined SLJIT_CONFIG_ARM_64 && SLJIT_CONFIG_ARM_64) \
81 || (defined SLJIT_CONFIG_PPC_32 && SLJIT_CONFIG_PPC_32) \
82 || (defined SLJIT_CONFIG_PPC_64 && SLJIT_CONFIG_PPC_64) \
83 || (defined SLJIT_CONFIG_MIPS_32 && SLJIT_CONFIG_MIPS_32) \
84 || (defined SLJIT_CONFIG_MIPS_64 && SLJIT_CONFIG_MIPS_64) \
85 || (defined SLJIT_CONFIG_SPARC_32 && SLJIT_CONFIG_SPARC_32) \
86 || (defined SLJIT_CONFIG_TILEGX && SLJIT_CONFIG_TILEGX) \
87 || (defined SLJIT_CONFIG_AUTO && SLJIT_CONFIG_AUTO) \
88 || (defined SLJIT_CONFIG_UNSUPPORTED && SLJIT_CONFIG_UNSUPPORTED))
89 #error "An architecture must be selected"
90 #endif
91
92 #if (defined SLJIT_CONFIG_X86_32 && SLJIT_CONFIG_X86_32) \
93 + (defined SLJIT_CONFIG_X86_64 && SLJIT_CONFIG_X86_64) \
94 + (defined SLJIT_CONFIG_ARM_V5 && SLJIT_CONFIG_ARM_V5) \
95 + (defined SLJIT_CONFIG_ARM_V7 && SLJIT_CONFIG_ARM_V7) \
96 + (defined SLJIT_CONFIG_ARM_THUMB2 && SLJIT_CONFIG_ARM_THUMB2) \
97 + (defined SLJIT_CONFIG_ARM_64 && SLJIT_CONFIG_ARM_64) \
98 + (defined SLJIT_CONFIG_PPC_32 && SLJIT_CONFIG_PPC_32) \
99 + (defined SLJIT_CONFIG_PPC_64 && SLJIT_CONFIG_PPC_64) \
100 + (defined SLJIT_CONFIG_TILEGX && SLJIT_CONFIG_TILEGX) \
101 + (defined SLJIT_CONFIG_MIPS_32 && SLJIT_CONFIG_MIPS_32) \
102 + (defined SLJIT_CONFIG_MIPS_64 && SLJIT_CONFIG_MIPS_64) \
103 + (defined SLJIT_CONFIG_SPARC_32 && SLJIT_CONFIG_SPARC_32) \
104 + (defined SLJIT_CONFIG_AUTO && SLJIT_CONFIG_AUTO) \
105 + (defined SLJIT_CONFIG_UNSUPPORTED && SLJIT_CONFIG_UNSUPPORTED) >= 2
106 #error "Multiple architectures are selected"
107 #endif
108
109 /********************************************************/
110 /* Automatic CPU detection (requires compiler support). */
111 /********************************************************/
112
113 #if (defined SLJIT_CONFIG_AUTO && SLJIT_CONFIG_AUTO)
114
115 #ifndef _WIN32
116
117 #if defined(__i386__) || defined(__i386)
118 #define SLJIT_CONFIG_X86_32 1
119 #elif defined(__x86_64__)
120 #define SLJIT_CONFIG_X86_64 1
121 #elif defined(__arm__) || defined(__ARM__)
122 #ifdef __thumb2__
123 #define SLJIT_CONFIG_ARM_THUMB2 1
124 #elif defined(__ARM_ARCH_7__) || defined(__ARM_ARCH_7A__) || defined(__ARM_ARCH_7R__)
125 #define SLJIT_CONFIG_ARM_V7 1
126 #else
127 #define SLJIT_CONFIG_ARM_V5 1
128 #endif
129 #elif defined (__aarch64__)
130 #define SLJIT_CONFIG_ARM_64 1
131 #elif defined(__ppc64__) || defined(__powerpc64__) || defined(_ARCH_PPC64) || (defined(_POWER) && defined(__64BIT__))
132 #define SLJIT_CONFIG_PPC_64 1
133 #elif defined(__ppc__) || defined(__powerpc__) || defined(_ARCH_PPC) || defined(_ARCH_PWR) || defined(_ARCH_PWR2) || defined(_POWER)
134 #define SLJIT_CONFIG_PPC_32 1
135 #elif defined(__mips__) && !defined(_LP64)
136 #define SLJIT_CONFIG_MIPS_32 1
137 #elif defined(__mips64)
138 #define SLJIT_CONFIG_MIPS_64 1
139 #elif defined(__sparc__) || defined(__sparc)
140 #define SLJIT_CONFIG_SPARC_32 1
141 #elif defined(__tilegx__)
142 #define SLJIT_CONFIG_TILEGX 1
143 #else
144 /* Unsupported architecture */
145 #define SLJIT_CONFIG_UNSUPPORTED 1
146 #endif
147
148 #else /* !_WIN32 */
149
150 #if defined(_M_X64) || defined(__x86_64__)
151 #define SLJIT_CONFIG_X86_64 1
152 #elif defined(_ARM_)
153 #define SLJIT_CONFIG_ARM_V5 1
154 #else
155 #define SLJIT_CONFIG_X86_32 1
156 #endif
157
158 #endif /* !WIN32 */
159 #endif /* SLJIT_CONFIG_AUTO */
160
161 #if (defined SLJIT_CONFIG_UNSUPPORTED && SLJIT_CONFIG_UNSUPPORTED)
162 #undef SLJIT_EXECUTABLE_ALLOCATOR
163 #endif
164
165 /******************************/
166 /* CPU family type detection. */
167 /******************************/
168
169 #if (defined SLJIT_CONFIG_ARM_V5 && SLJIT_CONFIG_ARM_V5) || (defined SLJIT_CONFIG_ARM_V7 && SLJIT_CONFIG_ARM_V7) \
170 || (defined SLJIT_CONFIG_ARM_THUMB2 && SLJIT_CONFIG_ARM_THUMB2)
171 #define SLJIT_CONFIG_ARM_32 1
172 #endif
173
174 #if (defined SLJIT_CONFIG_X86_32 && SLJIT_CONFIG_X86_32) || (defined SLJIT_CONFIG_X86_64 && SLJIT_CONFIG_X86_64)
175 #define SLJIT_CONFIG_X86 1
176 #elif (defined SLJIT_CONFIG_ARM_32 && SLJIT_CONFIG_ARM_32) || (defined SLJIT_CONFIG_ARM_64 && SLJIT_CONFIG_ARM_64)
177 #define SLJIT_CONFIG_ARM 1
178 #elif (defined SLJIT_CONFIG_PPC_32 && SLJIT_CONFIG_PPC_32) || (defined SLJIT_CONFIG_PPC_64 && SLJIT_CONFIG_PPC_64)
179 #define SLJIT_CONFIG_PPC 1
180 #elif (defined SLJIT_CONFIG_MIPS_32 && SLJIT_CONFIG_MIPS_32) || (defined SLJIT_CONFIG_MIPS_64 && SLJIT_CONFIG_MIPS_64)
181 #define SLJIT_CONFIG_MIPS 1
182 #elif (defined SLJIT_CONFIG_SPARC_32 && SLJIT_CONFIG_SPARC_32) || (defined SLJIT_CONFIG_SPARC_64 && SLJIT_CONFIG_SPARC_64)
183 #define SLJIT_CONFIG_SPARC 1
184 #endif
185
186 /**********************************/
187 /* External function definitions. */
188 /**********************************/
189
190 #if !(defined SLJIT_STD_MACROS_DEFINED && SLJIT_STD_MACROS_DEFINED)
191
192 /* These libraries are needed for the macros below. */
193 #include <stdlib.h>
194 #include <string.h>
195
196 #endif /* SLJIT_STD_MACROS_DEFINED */
197
198 /* General macros:
199 Note: SLJIT is designed to be independent from them as possible.
200
201 In release mode (SLJIT_DEBUG is not defined) only the following
202 external functions are needed:
203 */
204
205 #ifndef SLJIT_MALLOC
206 #define SLJIT_MALLOC(size, allocator_data) malloc(size)
207 #endif
208
209 #ifndef SLJIT_FREE
210 #define SLJIT_FREE(ptr, allocator_data) free(ptr)
211 #endif
212
213 #ifndef SLJIT_MEMMOVE
214 #define SLJIT_MEMMOVE(dest, src, len) memmove(dest, src, len)
215 #endif
216
217 #ifndef SLJIT_ZEROMEM
218 #define SLJIT_ZEROMEM(dest, len) memset(dest, 0, len)
219 #endif
220
221 /***************************/
222 /* Compiler helper macros. */
223 /***************************/
224
225 #if !defined(SLJIT_LIKELY) && !defined(SLJIT_UNLIKELY)
226
227 #if defined(__GNUC__) && (__GNUC__ >= 3)
228 #define SLJIT_LIKELY(x) __builtin_expect((x), 1)
229 #define SLJIT_UNLIKELY(x) __builtin_expect((x), 0)
230 #else
231 #define SLJIT_LIKELY(x) (x)
232 #define SLJIT_UNLIKELY(x) (x)
233 #endif
234
235 #endif /* !defined(SLJIT_LIKELY) && !defined(SLJIT_UNLIKELY) */
236
237 #ifndef SLJIT_INLINE
238 /* Inline functions. Some old compilers do not support them. */
239 #if defined(__SUNPRO_C) && __SUNPRO_C <= 0x510
240 #define SLJIT_INLINE
241 #else
242 #define SLJIT_INLINE __inline
243 #endif
244 #endif /* !SLJIT_INLINE */
245
246 #ifndef SLJIT_NOINLINE
247 /* Not inline functions. */
248 #if defined(__GNUC__)
249 #define SLJIT_NOINLINE __attribute__ ((noinline))
250 #else
251 #define SLJIT_NOINLINE
252 #endif
253 #endif /* !SLJIT_INLINE */
254
255 #ifndef SLJIT_CONST
256 /* Const variables. */
257 #define SLJIT_CONST const
258 #endif
259
260 #ifndef SLJIT_UNUSED_ARG
261 /* Unused arguments. */
262 #define SLJIT_UNUSED_ARG(arg) (void)arg
263 #endif
264
265 /*********************************/
266 /* Type of public API functions. */
267 /*********************************/
268
269 #if (defined SLJIT_CONFIG_STATIC && SLJIT_CONFIG_STATIC)
270 /* Static ABI functions. For all-in-one programs. */
271
272 #if defined(__GNUC__)
273 /* Disable unused warnings in gcc. */
274 #define SLJIT_API_FUNC_ATTRIBUTE static __attribute__((unused))
275 #else
276 #define SLJIT_API_FUNC_ATTRIBUTE static
277 #endif
278
279 #else
280 #define SLJIT_API_FUNC_ATTRIBUTE
281 #endif /* (defined SLJIT_CONFIG_STATIC && SLJIT_CONFIG_STATIC) */
282
283 /****************************/
284 /* Instruction cache flush. */
285 /****************************/
286
287 #ifndef SLJIT_CACHE_FLUSH
288
289 #if (defined SLJIT_CONFIG_X86 && SLJIT_CONFIG_X86)
290
291 /* Not required to implement on archs with unified caches. */
292 #define SLJIT_CACHE_FLUSH(from, to)
293
294 #elif defined __APPLE__
295
296 /* Supported by all macs since Mac OS 10.5.
297 However, it does not work on non-jailbroken iOS devices,
298 although the compilation is successful. */
299
300 #define SLJIT_CACHE_FLUSH(from, to) \
301 sys_icache_invalidate((char*)(from), (char*)(to) - (char*)(from))
302
303 #elif defined __ANDROID__
304
305 /* Android lacks __clear_cache; instead, cacheflush should be used. */
306
307 #define SLJIT_CACHE_FLUSH(from, to) \
308 cacheflush((long)(from), (long)(to), 0)
309
310 #elif (defined SLJIT_CONFIG_PPC && SLJIT_CONFIG_PPC)
311
312 /* The __clear_cache() implementation of GCC is a dummy function on PowerPC. */
313 #define SLJIT_CACHE_FLUSH(from, to) \
314 ppc_cache_flush((from), (to))
315
316 #elif (defined SLJIT_CONFIG_SPARC_32 && SLJIT_CONFIG_SPARC_32)
317
318 /* The __clear_cache() implementation of GCC is a dummy function on Sparc. */
319 #define SLJIT_CACHE_FLUSH(from, to) \
320 sparc_cache_flush((from), (to))
321
322 #else
323
324 /* Calls __ARM_NR_cacheflush on ARM-Linux. */
325 #define SLJIT_CACHE_FLUSH(from, to) \
326 __clear_cache((char*)(from), (char*)(to))
327
328 #endif
329
330 #endif /* !SLJIT_CACHE_FLUSH */
331
332 /******************************************************/
333 /* Byte/half/int/word/single/double type definitions. */
334 /******************************************************/
335
336 /* 8 bit byte type. */
337 typedef unsigned char sljit_ub;
338 typedef signed char sljit_sb;
339
340 /* 16 bit half-word type. */
341 typedef unsigned short int sljit_uh;
342 typedef signed short int sljit_sh;
343
344 /* 32 bit integer type. */
345 typedef unsigned int sljit_ui;
346 typedef signed int sljit_si;
347
348 /* Machine word type. Enough for storing a pointer.
349 32 bit for 32 bit machines.
350 64 bit for 64 bit machines. */
351 #if (defined SLJIT_CONFIG_UNSUPPORTED && SLJIT_CONFIG_UNSUPPORTED)
352 /* Just to have something. */
353 #define SLJIT_WORD_SHIFT 0
354 typedef unsigned long int sljit_uw;
355 typedef long int sljit_sw;
356 #elif !(defined SLJIT_CONFIG_X86_64 && SLJIT_CONFIG_X86_64) \
357 && !(defined SLJIT_CONFIG_ARM_64 && SLJIT_CONFIG_ARM_64) \
358 && !(defined SLJIT_CONFIG_PPC_64 && SLJIT_CONFIG_PPC_64) \
359 && !(defined SLJIT_CONFIG_MIPS_64 && SLJIT_CONFIG_MIPS_64) \
360 && !(defined SLJIT_CONFIG_TILEGX && SLJIT_CONFIG_TILEGX)
361 #define SLJIT_32BIT_ARCHITECTURE 1
362 #define SLJIT_WORD_SHIFT 2
363 typedef unsigned int sljit_uw;
364 typedef int sljit_sw;
365 #else
366 #define SLJIT_64BIT_ARCHITECTURE 1
367 #define SLJIT_WORD_SHIFT 3
368 #ifdef _WIN32
369 typedef unsigned __int64 sljit_uw;
370 typedef __int64 sljit_sw;
371 #else
372 typedef unsigned long int sljit_uw;
373 typedef long int sljit_sw;
374 #endif
375 #endif
376
377 typedef sljit_uw sljit_p;
378
379 /* Floating point types. */
380 typedef float sljit_s;
381 typedef double sljit_d;
382
383 /* Shift for pointer sized data. */
384 #define SLJIT_POINTER_SHIFT SLJIT_WORD_SHIFT
385
386 /* Shift for double precision sized data. */
387 #define SLJIT_DOUBLE_SHIFT 3
388 #define SLJIT_SINGLE_SHIFT 2
389
390 #ifndef SLJIT_W
391
392 /* Defining long constants. */
393 #if (defined SLJIT_64BIT_ARCHITECTURE && SLJIT_64BIT_ARCHITECTURE)
394 #define SLJIT_W(w) (w##ll)
395 #else
396 #define SLJIT_W(w) (w)
397 #endif
398
399 #endif /* !SLJIT_W */
400
401 /*************************/
402 /* Endianness detection. */
403 /*************************/
404
405 #if !defined(SLJIT_BIG_ENDIAN) && !defined(SLJIT_LITTLE_ENDIAN)
406
407 /* These macros are mostly useful for the applications. */
408 #if (defined SLJIT_CONFIG_PPC_32 && SLJIT_CONFIG_PPC_32) \
409 || (defined SLJIT_CONFIG_PPC_64 && SLJIT_CONFIG_PPC_64)
410
411 #ifdef __LITTLE_ENDIAN__
412 #define SLJIT_LITTLE_ENDIAN 1
413 #else
414 #define SLJIT_BIG_ENDIAN 1
415 #endif
416
417 #elif (defined SLJIT_CONFIG_MIPS_32 && SLJIT_CONFIG_MIPS_32) \
418 || (defined SLJIT_CONFIG_MIPS_64 && SLJIT_CONFIG_MIPS_64)
419
420 #ifdef __MIPSEL__
421 #define SLJIT_LITTLE_ENDIAN 1
422 #else
423 #define SLJIT_BIG_ENDIAN 1
424 #endif
425
426 #elif (defined SLJIT_CONFIG_SPARC_32 && SLJIT_CONFIG_SPARC_32)
427
428 #define SLJIT_BIG_ENDIAN 1
429
430 #else
431 #define SLJIT_LITTLE_ENDIAN 1
432 #endif
433
434 #endif /* !defined(SLJIT_BIG_ENDIAN) && !defined(SLJIT_LITTLE_ENDIAN) */
435
436 /* Sanity check. */
437 #if (defined SLJIT_BIG_ENDIAN && SLJIT_BIG_ENDIAN) && (defined SLJIT_LITTLE_ENDIAN && SLJIT_LITTLE_ENDIAN)
438 #error "Exactly one endianness must be selected"
439 #endif
440
441 #if !(defined SLJIT_BIG_ENDIAN && SLJIT_BIG_ENDIAN) && !(defined SLJIT_LITTLE_ENDIAN && SLJIT_LITTLE_ENDIAN)
442 #error "Exactly one endianness must be selected"
443 #endif
444
445 #ifndef SLJIT_UNALIGNED
446
447 #if (defined SLJIT_CONFIG_X86_32 && SLJIT_CONFIG_X86_32) \
448 || (defined SLJIT_CONFIG_X86_64 && SLJIT_CONFIG_X86_64) \
449 || (defined SLJIT_CONFIG_ARM_V7 && SLJIT_CONFIG_ARM_V7) \
450 || (defined SLJIT_CONFIG_ARM_THUMB2 && SLJIT_CONFIG_ARM_THUMB2) \
451 || (defined SLJIT_CONFIG_ARM_64 && SLJIT_CONFIG_ARM_64) \
452 || (defined SLJIT_CONFIG_PPC_32 && SLJIT_CONFIG_PPC_32) \
453 || (defined SLJIT_CONFIG_PPC_64 && SLJIT_CONFIG_PPC_64)
454 #define SLJIT_UNALIGNED 1
455 #endif
456
457 #endif /* !SLJIT_UNALIGNED */
458
459 #if (defined SLJIT_CONFIG_X86_32 && SLJIT_CONFIG_X86_32)
460 /* Auto detect SSE2 support using CPUID.
461 On 64 bit x86 cpus, sse2 must be present. */
462 #define SLJIT_DETECT_SSE2 1
463 #endif
464
465 /*****************************************************************************************/
466 /* Calling convention of functions generated by SLJIT or called from the generated code. */
467 /*****************************************************************************************/
468
469 #ifndef SLJIT_CALL
470
471 #if (defined SLJIT_CONFIG_X86_32 && SLJIT_CONFIG_X86_32)
472
473 #if defined(__GNUC__) && !defined(__APPLE__)
474
475 #define SLJIT_CALL __attribute__ ((fastcall))
476 #define SLJIT_X86_32_FASTCALL 1
477
478 #elif defined(_MSC_VER)
479
480 #define SLJIT_CALL __fastcall
481 #define SLJIT_X86_32_FASTCALL 1
482
483 #elif defined(__BORLANDC__)
484
485 #define SLJIT_CALL __msfastcall
486 #define SLJIT_X86_32_FASTCALL 1
487
488 #else /* Unknown compiler. */
489
490 /* The cdecl attribute is the default. */
491 #define SLJIT_CALL
492
493 #endif
494
495 #else /* Non x86-32 architectures. */
496
497 #define SLJIT_CALL
498
499 #endif /* SLJIT_CONFIG_X86_32 */
500
501 #endif /* !SLJIT_CALL */
502
503 #ifndef SLJIT_INDIRECT_CALL
504 #if ((defined SLJIT_CONFIG_PPC_64 && SLJIT_CONFIG_PPC_64) && (defined SLJIT_BIG_ENDIAN && SLJIT_BIG_ENDIAN)) \
505 || ((defined SLJIT_CONFIG_PPC_32 && SLJIT_CONFIG_PPC_32) && defined _AIX)
506 /* It seems certain ppc compilers use an indirect addressing for functions
507 which makes things complicated. */
508 #define SLJIT_INDIRECT_CALL 1
509 #endif
510 #endif /* SLJIT_INDIRECT_CALL */
511
512 /* The offset which needs to be substracted from the return address to
513 determine the next executed instruction after return. */
514 #ifndef SLJIT_RETURN_ADDRESS_OFFSET
515 #if (defined SLJIT_CONFIG_SPARC_32 && SLJIT_CONFIG_SPARC_32)
516 #define SLJIT_RETURN_ADDRESS_OFFSET 8
517 #else
518 #define SLJIT_RETURN_ADDRESS_OFFSET 0
519 #endif
520 #endif /* SLJIT_RETURN_ADDRESS_OFFSET */
521
522 /***************************************************/
523 /* Functions of the built-in executable allocator. */
524 /***************************************************/
525
526 #if (defined SLJIT_EXECUTABLE_ALLOCATOR && SLJIT_EXECUTABLE_ALLOCATOR)
527 SLJIT_API_FUNC_ATTRIBUTE void* sljit_malloc_exec(sljit_uw size);
528 SLJIT_API_FUNC_ATTRIBUTE void sljit_free_exec(void* ptr);
529 SLJIT_API_FUNC_ATTRIBUTE void sljit_free_unused_memory_exec(void);
530 #define SLJIT_MALLOC_EXEC(size) sljit_malloc_exec(size)
531 #define SLJIT_FREE_EXEC(ptr) sljit_free_exec(ptr)
532 #endif
533
534 /**********************************************/
535 /* Registers and locals offset determination. */
536 /**********************************************/
537
538 #if (defined SLJIT_CONFIG_X86_32 && SLJIT_CONFIG_X86_32)
539
540 #define SLJIT_NUMBER_OF_REGISTERS 10
541 #define SLJIT_NUMBER_OF_SAVED_REGISTERS 7
542 #if (defined SLJIT_X86_32_FASTCALL && SLJIT_X86_32_FASTCALL)
543 #define SLJIT_LOCALS_OFFSET_BASE ((2 + 4) * sizeof(sljit_sw))
544 #else
545 /* Maximum 3 arguments are passed on the stack, +1 for double alignment. */
546 #define SLJIT_LOCALS_OFFSET_BASE ((3 + 1 + 4) * sizeof(sljit_sw))
547 #endif /* SLJIT_X86_32_FASTCALL */
548
549 #elif (defined SLJIT_CONFIG_X86_64 && SLJIT_CONFIG_X86_64)
550
551 #ifndef _WIN64
552 #define SLJIT_NUMBER_OF_REGISTERS 12
553 #define SLJIT_NUMBER_OF_SAVED_REGISTERS 6
554 #define SLJIT_LOCALS_OFFSET_BASE (sizeof(sljit_sw))
555 #else
556 #define SLJIT_NUMBER_OF_REGISTERS 12
557 #define SLJIT_NUMBER_OF_SAVED_REGISTERS 8
558 #define SLJIT_LOCALS_OFFSET_BASE ((4 + 2) * sizeof(sljit_sw))
559 #endif /* _WIN64 */
560
561 #elif (defined SLJIT_CONFIG_ARM_V5 && SLJIT_CONFIG_ARM_V5) || (defined SLJIT_CONFIG_ARM_V7 && SLJIT_CONFIG_ARM_V7)
562
563 #define SLJIT_NUMBER_OF_REGISTERS 11
564 #define SLJIT_NUMBER_OF_SAVED_REGISTERS 8
565 #define SLJIT_LOCALS_OFFSET_BASE 0
566
567 #elif (defined SLJIT_CONFIG_ARM_THUMB2 && SLJIT_CONFIG_ARM_THUMB2)
568
569 #define SLJIT_NUMBER_OF_REGISTERS 11
570 #define SLJIT_NUMBER_OF_SAVED_REGISTERS 7
571 #define SLJIT_LOCALS_OFFSET_BASE 0
572
573 #elif (defined SLJIT_CONFIG_ARM_64 && SLJIT_CONFIG_ARM_64)
574
575 #define SLJIT_NUMBER_OF_REGISTERS 25
576 #define SLJIT_NUMBER_OF_SAVED_REGISTERS 10
577 #define SLJIT_LOCALS_OFFSET_BASE (2 * sizeof(sljit_sw))
578
579 #elif (defined SLJIT_CONFIG_PPC && SLJIT_CONFIG_PPC)
580
581 #define SLJIT_NUMBER_OF_REGISTERS 22
582 #define SLJIT_NUMBER_OF_SAVED_REGISTERS 17
583 #if (defined SLJIT_CONFIG_PPC_64 && SLJIT_CONFIG_PPC_64) || (defined _AIX)
584 #define SLJIT_LOCALS_OFFSET_BASE ((6 + 8) * sizeof(sljit_sw))
585 #elif (defined SLJIT_CONFIG_PPC_32 && SLJIT_CONFIG_PPC_32)
586 /* Add +1 for double alignment. */
587 #define SLJIT_LOCALS_OFFSET_BASE ((3 + 1) * sizeof(sljit_sw))
588 #else
589 #define SLJIT_LOCALS_OFFSET_BASE (3 * sizeof(sljit_sw))
590 #endif /* SLJIT_CONFIG_PPC_64 || _AIX */
591
592 #elif (defined SLJIT_CONFIG_MIPS && SLJIT_CONFIG_MIPS)
593
594 #define SLJIT_NUMBER_OF_REGISTERS 17
595 #define SLJIT_NUMBER_OF_SAVED_REGISTERS 8
596 #if (defined SLJIT_CONFIG_MIPS_32 && SLJIT_CONFIG_MIPS_32)
597 #define SLJIT_LOCALS_OFFSET_BASE (4 * sizeof(sljit_sw))
598 #else
599 #define SLJIT_LOCALS_OFFSET_BASE 0
600 #endif
601
602 #elif (defined SLJIT_CONFIG_SPARC && SLJIT_CONFIG_SPARC)
603
604 #define SLJIT_NUMBER_OF_REGISTERS 18
605 #define SLJIT_NUMBER_OF_SAVED_REGISTERS 14
606 #if (defined SLJIT_CONFIG_SPARC_32 && SLJIT_CONFIG_SPARC_32)
607 /* Add +1 for double alignment. */
608 #define SLJIT_LOCALS_OFFSET_BASE ((23 + 1) * sizeof(sljit_sw))
609 #endif
610
611 #elif (defined SLJIT_CONFIG_UNSUPPORTED && SLJIT_CONFIG_UNSUPPORTED)
612
613 #define SLJIT_NUMBER_OF_REGISTERS 0
614 #define SLJIT_NUMBER_OF_SAVED_REGISTERS 0
615 #define SLJIT_LOCALS_OFFSET_BASE 0
616
617 #endif
618
619 #define SLJIT_LOCALS_OFFSET (SLJIT_LOCALS_OFFSET_BASE)
620
621 #define SLJIT_NUMBER_OF_SCRATCH_REGISTERS \
622 (SLJIT_NUMBER_OF_REGISTERS - SLJIT_NUMBER_OF_SAVED_REGISTERS)
623
624 #define SLJIT_NUMBER_OF_FLOAT_REGISTERS 6
625 #if (defined SLJIT_CONFIG_X86_64 && SLJIT_CONFIG_X86_64) && (defined _WIN64)
626 #define SLJIT_NUMBER_OF_SAVED_FLOAT_REGISTERS 1
627 #else
628 #define SLJIT_NUMBER_OF_SAVED_FLOAT_REGISTERS 0
629 #endif
630
631 #define SLJIT_NUMBER_OF_SCRATCH_FLOAT_REGISTERS \
632 (SLJIT_NUMBER_OF_FLOAT_REGISTERS - SLJIT_NUMBER_OF_SAVED_FLOAT_REGISTERS)
633
634 /*************************************/
635 /* Debug and verbose related macros. */
636 /*************************************/
637
638 #if (defined SLJIT_VERBOSE && SLJIT_VERBOSE)
639 #include <stdio.h>
640 #endif
641
642 #if (defined SLJIT_DEBUG && SLJIT_DEBUG)
643
644 #if !defined(SLJIT_ASSERT) || !defined(SLJIT_ASSERT_STOP)
645
646 /* SLJIT_HALT_PROCESS must halt the process. */
647 #ifndef SLJIT_HALT_PROCESS
648 #include <stdlib.h>
649
650 #define SLJIT_HALT_PROCESS() \
651 abort();
652 #endif /* !SLJIT_HALT_PROCESS */
653
654 #include <stdio.h>
655
656 #endif /* !SLJIT_ASSERT || !SLJIT_ASSERT_STOP */
657
658 /* Feel free to redefine these two macros. */
659 #ifndef SLJIT_ASSERT
660
661 #define SLJIT_ASSERT(x) \
662 do { \
663 if (SLJIT_UNLIKELY(!(x))) { \
664 printf("Assertion failed at " __FILE__ ":%d\n", __LINE__); \
665 SLJIT_HALT_PROCESS(); \
666 } \
667 } while (0)
668
669 #endif /* !SLJIT_ASSERT */
670
671 #ifndef SLJIT_ASSERT_STOP
672
673 #define SLJIT_ASSERT_STOP() \
674 do { \
675 printf("Should never been reached " __FILE__ ":%d\n", __LINE__); \
676 SLJIT_HALT_PROCESS(); \
677 } while (0)
678
679 #endif /* !SLJIT_ASSERT_STOP */
680
681 #else /* (defined SLJIT_DEBUG && SLJIT_DEBUG) */
682
683 /* Forcing empty, but valid statements. */
684 #undef SLJIT_ASSERT
685 #undef SLJIT_ASSERT_STOP
686
687 #define SLJIT_ASSERT(x) \
688 do { } while (0)
689 #define SLJIT_ASSERT_STOP() \
690 do { } while (0)
691
692 #endif /* (defined SLJIT_DEBUG && SLJIT_DEBUG) */
693
694 #ifndef SLJIT_COMPILE_ASSERT
695
696 /* Should be improved eventually. */
697 #define SLJIT_COMPILE_ASSERT(x, description) \
698 SLJIT_ASSERT(x)
699
700 #endif /* !SLJIT_COMPILE_ASSERT */
701
702 #endif

  ViewVC Help
Powered by ViewVC 1.1.5