mirror of
https://github.com/alliedmodders/amxmodx.git
synced 2024-12-26 14:55:36 +03:00
d4de0e6f1e
I was über lazy at first, so took libs from SM. But actually it's quite easy to compile, so let's update to latest version \o/.
524 lines
16 KiB
C
524 lines
16 KiB
C
/*
|
|
* Stack-less Just-In-Time compiler
|
|
*
|
|
* Copyright 2009-2012 Zoltan Herczeg (hzmester@freemail.hu). All rights reserved.
|
|
*
|
|
* Redistribution and use in source and binary forms, with or without modification, are
|
|
* permitted provided that the following conditions are met:
|
|
*
|
|
* 1. Redistributions of source code must retain the above copyright notice, this list of
|
|
* conditions and the following disclaimer.
|
|
*
|
|
* 2. Redistributions in binary form must reproduce the above copyright notice, this list
|
|
* of conditions and the following disclaimer in the documentation and/or other materials
|
|
* provided with the distribution.
|
|
*
|
|
* THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDER(S) AND CONTRIBUTORS ``AS IS'' AND ANY
|
|
* EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
|
|
* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT
|
|
* SHALL THE COPYRIGHT HOLDER(S) OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
|
|
* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED
|
|
* TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR
|
|
* BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
|
|
* CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
|
|
* ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
|
|
*/
|
|
|
|
#ifndef _SLJIT_CONFIG_INTERNAL_H_
|
|
#define _SLJIT_CONFIG_INTERNAL_H_
|
|
|
|
/*
|
|
SLJIT defines the following macros depending on the target architecture:
|
|
|
|
Feature detection (boolean) macros:
|
|
SLJIT_32BIT_ARCHITECTURE : 32 bit architecture
|
|
SLJIT_64BIT_ARCHITECTURE : 64 bit architecture
|
|
SLJIT_WORD_SHIFT : the shift required to apply when accessing a sljit_sw/sljit_uw array by index
|
|
SLJIT_DOUBLE_SHIFT : the shift required to apply when accessing a double array by index
|
|
SLJIT_LITTLE_ENDIAN : little endian architecture
|
|
SLJIT_BIG_ENDIAN : big endian architecture
|
|
SLJIT_UNALIGNED : allows unaligned memory accesses for non-fpu operations (only!)
|
|
SLJIT_INDIRECT_CALL : see SLJIT_FUNC_OFFSET() for more information
|
|
SLJIT_RETURN_ADDRESS_OFFSET : a return instruction always adds this offset to the return address
|
|
|
|
Types and useful macros:
|
|
sljit_sb, sljit_ub : signed and unsigned 8 bit byte
|
|
sljit_sh, sljit_uh : signed and unsigned 16 bit half-word (short) type
|
|
sljit_si, sljit_ui : signed and unsigned 32 bit integer type
|
|
sljit_sw, sljit_uw : signed and unsigned machine word, enough to store a pointer
|
|
sljit_p : unsgined pointer value (usually the same as sljit_uw, but
|
|
some 64 bit ABIs may use 32 bit pointers)
|
|
sljit_s : single precision floating point value
|
|
sljit_d : double precision floating point value
|
|
SLJIT_CALL : C calling convention define for both calling JIT form C and C callbacks for JIT
|
|
SLJIT_W(number) : defining 64 bit constants on 64 bit architectures (compiler independent helper)
|
|
*/
|
|
|
|
#if !((defined SLJIT_CONFIG_X86_32 && SLJIT_CONFIG_X86_32) \
|
|
|| (defined SLJIT_CONFIG_X86_64 && SLJIT_CONFIG_X86_64) \
|
|
|| (defined SLJIT_CONFIG_ARM_V5 && SLJIT_CONFIG_ARM_V5) \
|
|
|| (defined SLJIT_CONFIG_ARM_V7 && SLJIT_CONFIG_ARM_V7) \
|
|
|| (defined SLJIT_CONFIG_ARM_THUMB2 && SLJIT_CONFIG_ARM_THUMB2) \
|
|
|| (defined SLJIT_CONFIG_ARM_64 && SLJIT_CONFIG_ARM_64) \
|
|
|| (defined SLJIT_CONFIG_PPC_32 && SLJIT_CONFIG_PPC_32) \
|
|
|| (defined SLJIT_CONFIG_PPC_64 && SLJIT_CONFIG_PPC_64) \
|
|
|| (defined SLJIT_CONFIG_MIPS_32 && SLJIT_CONFIG_MIPS_32) \
|
|
|| (defined SLJIT_CONFIG_MIPS_64 && SLJIT_CONFIG_MIPS_64) \
|
|
|| (defined SLJIT_CONFIG_SPARC_32 && SLJIT_CONFIG_SPARC_32) \
|
|
|| (defined SLJIT_CONFIG_TILEGX && SLJIT_CONFIG_TILEGX) \
|
|
|| (defined SLJIT_CONFIG_AUTO && SLJIT_CONFIG_AUTO) \
|
|
|| (defined SLJIT_CONFIG_UNSUPPORTED && SLJIT_CONFIG_UNSUPPORTED))
|
|
#error "An architecture must be selected"
|
|
#endif
|
|
|
|
/* Sanity check. */
|
|
#if (defined SLJIT_CONFIG_X86_32 && SLJIT_CONFIG_X86_32) \
|
|
+ (defined SLJIT_CONFIG_X86_64 && SLJIT_CONFIG_X86_64) \
|
|
+ (defined SLJIT_CONFIG_ARM_V5 && SLJIT_CONFIG_ARM_V5) \
|
|
+ (defined SLJIT_CONFIG_ARM_V7 && SLJIT_CONFIG_ARM_V7) \
|
|
+ (defined SLJIT_CONFIG_ARM_THUMB2 && SLJIT_CONFIG_ARM_THUMB2) \
|
|
+ (defined SLJIT_CONFIG_ARM_64 && SLJIT_CONFIG_ARM_64) \
|
|
+ (defined SLJIT_CONFIG_PPC_32 && SLJIT_CONFIG_PPC_32) \
|
|
+ (defined SLJIT_CONFIG_PPC_64 && SLJIT_CONFIG_PPC_64) \
|
|
+ (defined SLJIT_CONFIG_TILEGX && SLJIT_CONFIG_TILEGX) \
|
|
+ (defined SLJIT_CONFIG_MIPS_32 && SLJIT_CONFIG_MIPS_32) \
|
|
+ (defined SLJIT_CONFIG_MIPS_64 && SLJIT_CONFIG_MIPS_64) \
|
|
+ (defined SLJIT_CONFIG_SPARC_32 && SLJIT_CONFIG_SPARC_32) \
|
|
+ (defined SLJIT_CONFIG_AUTO && SLJIT_CONFIG_AUTO) \
|
|
+ (defined SLJIT_CONFIG_UNSUPPORTED && SLJIT_CONFIG_UNSUPPORTED) >= 2
|
|
#error "Multiple architectures are selected"
|
|
#endif
|
|
|
|
/* Auto select option (requires compiler support) */
|
|
#if (defined SLJIT_CONFIG_AUTO && SLJIT_CONFIG_AUTO)
|
|
|
|
#ifndef _WIN32
|
|
|
|
#if defined(__i386__) || defined(__i386)
|
|
#define SLJIT_CONFIG_X86_32 1
|
|
#elif defined(__x86_64__)
|
|
#define SLJIT_CONFIG_X86_64 1
|
|
#elif defined(__arm__) || defined(__ARM__)
|
|
#ifdef __thumb2__
|
|
#define SLJIT_CONFIG_ARM_THUMB2 1
|
|
#elif defined(__ARM_ARCH_7__) || defined(__ARM_ARCH_7A__) || defined(__ARM_ARCH_7R__)
|
|
#define SLJIT_CONFIG_ARM_V7 1
|
|
#else
|
|
#define SLJIT_CONFIG_ARM_V5 1
|
|
#endif
|
|
#elif defined (__aarch64__)
|
|
#define SLJIT_CONFIG_ARM_64 1
|
|
#elif defined(__ppc64__) || defined(__powerpc64__) || defined(_ARCH_PPC64) || (defined(_POWER) && defined(__64BIT__))
|
|
#define SLJIT_CONFIG_PPC_64 1
|
|
#elif defined(__ppc__) || defined(__powerpc__) || defined(_ARCH_PPC) || defined(_ARCH_PWR) || defined(_ARCH_PWR2) || defined(_POWER)
|
|
#define SLJIT_CONFIG_PPC_32 1
|
|
#elif defined(__mips__) && !defined(_LP64)
|
|
#define SLJIT_CONFIG_MIPS_32 1
|
|
#elif defined(__mips64)
|
|
#define SLJIT_CONFIG_MIPS_64 1
|
|
#elif defined(__sparc__) || defined(__sparc)
|
|
#define SLJIT_CONFIG_SPARC_32 1
|
|
#elif defined(__tilegx__)
|
|
#define SLJIT_CONFIG_TILEGX 1
|
|
#else
|
|
/* Unsupported architecture */
|
|
#define SLJIT_CONFIG_UNSUPPORTED 1
|
|
#endif
|
|
|
|
#else /* !_WIN32 */
|
|
|
|
#if defined(_M_X64) || defined(__x86_64__)
|
|
#define SLJIT_CONFIG_X86_64 1
|
|
#elif defined(_ARM_)
|
|
#define SLJIT_CONFIG_ARM_V5 1
|
|
#else
|
|
#define SLJIT_CONFIG_X86_32 1
|
|
#endif
|
|
|
|
#endif /* !WIN32 */
|
|
#endif /* SLJIT_CONFIG_AUTO */
|
|
|
|
#if (defined SLJIT_CONFIG_UNSUPPORTED && SLJIT_CONFIG_UNSUPPORTED)
|
|
#undef SLJIT_EXECUTABLE_ALLOCATOR
|
|
#endif
|
|
|
|
#if !(defined SLJIT_STD_MACROS_DEFINED && SLJIT_STD_MACROS_DEFINED)
|
|
|
|
/* These libraries are needed for the macros below. */
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
|
|
#endif /* STD_MACROS_DEFINED */
|
|
|
|
/* General macros:
|
|
Note: SLJIT is designed to be independent from them as possible.
|
|
|
|
In release mode (SLJIT_DEBUG is not defined) only the following macros are needed:
|
|
*/
|
|
|
|
#ifndef SLJIT_MALLOC
|
|
#define SLJIT_MALLOC(size) malloc(size)
|
|
#endif
|
|
|
|
#ifndef SLJIT_FREE
|
|
#define SLJIT_FREE(ptr) free(ptr)
|
|
#endif
|
|
|
|
#ifndef SLJIT_MEMMOVE
|
|
#define SLJIT_MEMMOVE(dest, src, len) memmove(dest, src, len)
|
|
#endif
|
|
|
|
#ifndef SLJIT_ZEROMEM
|
|
#define SLJIT_ZEROMEM(dest, len) memset(dest, 0, len)
|
|
#endif
|
|
|
|
#if !defined(SLJIT_LIKELY) && !defined(SLJIT_UNLIKELY)
|
|
|
|
#if defined(__GNUC__) && (__GNUC__ >= 3)
|
|
#define SLJIT_LIKELY(x) __builtin_expect((x), 1)
|
|
#define SLJIT_UNLIKELY(x) __builtin_expect((x), 0)
|
|
#else
|
|
#define SLJIT_LIKELY(x) (x)
|
|
#define SLJIT_UNLIKELY(x) (x)
|
|
#endif
|
|
|
|
#endif /* !defined(SLJIT_LIKELY) && !defined(SLJIT_UNLIKELY) */
|
|
|
|
#ifndef SLJIT_INLINE
|
|
/* Inline functions. Some old compilers do not support them. */
|
|
#if defined(__SUNPRO_C) && __SUNPRO_C <= 0x510
|
|
#define SLJIT_INLINE
|
|
#else
|
|
#define SLJIT_INLINE __inline
|
|
#endif
|
|
#endif /* !SLJIT_INLINE */
|
|
|
|
#ifndef SLJIT_CONST
|
|
/* Const variables. */
|
|
#define SLJIT_CONST const
|
|
#endif
|
|
|
|
#ifndef SLJIT_UNUSED_ARG
|
|
/* Unused arguments. */
|
|
#define SLJIT_UNUSED_ARG(arg) (void)arg
|
|
#endif
|
|
|
|
#if (defined SLJIT_CONFIG_STATIC && SLJIT_CONFIG_STATIC)
|
|
/* Static ABI functions. For all-in-one programs. */
|
|
|
|
#if defined(__GNUC__)
|
|
/* Disable unused warnings in gcc. */
|
|
#define SLJIT_API_FUNC_ATTRIBUTE static __attribute__((unused))
|
|
#else
|
|
#define SLJIT_API_FUNC_ATTRIBUTE static
|
|
#endif
|
|
|
|
#else
|
|
#define SLJIT_API_FUNC_ATTRIBUTE
|
|
#endif /* (defined SLJIT_CONFIG_STATIC && SLJIT_CONFIG_STATIC) */
|
|
|
|
#ifndef SLJIT_CACHE_FLUSH
|
|
|
|
#if (defined SLJIT_CONFIG_X86_32 && SLJIT_CONFIG_X86_32) || (defined SLJIT_CONFIG_X86_64 && SLJIT_CONFIG_X86_64)
|
|
|
|
/* Not required to implement on archs with unified caches. */
|
|
#define SLJIT_CACHE_FLUSH(from, to)
|
|
|
|
#elif defined __APPLE__
|
|
|
|
/* Supported by all macs since Mac OS 10.5.
|
|
However, it does not work on non-jailbroken iOS devices,
|
|
although the compilation is successful. */
|
|
|
|
#define SLJIT_CACHE_FLUSH(from, to) \
|
|
sys_icache_invalidate((char*)(from), (char*)(to) - (char*)(from))
|
|
|
|
#elif defined __ANDROID__
|
|
|
|
/* Android lacks __clear_cache; instead, cacheflush should be used. */
|
|
|
|
#define SLJIT_CACHE_FLUSH(from, to) \
|
|
cacheflush((long)(from), (long)(to), 0)
|
|
|
|
#elif (defined SLJIT_CONFIG_PPC_32 && SLJIT_CONFIG_PPC_32) || (defined SLJIT_CONFIG_PPC_64 && SLJIT_CONFIG_PPC_64)
|
|
|
|
/* The __clear_cache() implementation of GCC is a dummy function on PowerPC. */
|
|
#define SLJIT_CACHE_FLUSH(from, to) \
|
|
ppc_cache_flush((from), (to))
|
|
|
|
#elif (defined SLJIT_CONFIG_SPARC_32 && SLJIT_CONFIG_SPARC_32)
|
|
|
|
/* The __clear_cache() implementation of GCC is a dummy function on Sparc. */
|
|
#define SLJIT_CACHE_FLUSH(from, to) \
|
|
sparc_cache_flush((from), (to))
|
|
|
|
#else
|
|
|
|
/* Calls __ARM_NR_cacheflush on ARM-Linux. */
|
|
#define SLJIT_CACHE_FLUSH(from, to) \
|
|
__clear_cache((char*)(from), (char*)(to))
|
|
|
|
#endif
|
|
|
|
#endif /* !SLJIT_CACHE_FLUSH */
|
|
|
|
/* 8 bit byte type. */
|
|
typedef unsigned char sljit_ub;
|
|
typedef signed char sljit_sb;
|
|
|
|
/* 16 bit half-word type. */
|
|
typedef unsigned short int sljit_uh;
|
|
typedef signed short int sljit_sh;
|
|
|
|
/* 32 bit integer type. */
|
|
typedef unsigned int sljit_ui;
|
|
typedef signed int sljit_si;
|
|
|
|
/* Machine word type. Can encapsulate a pointer.
|
|
32 bit for 32 bit machines.
|
|
64 bit for 64 bit machines. */
|
|
#if (defined SLJIT_CONFIG_UNSUPPORTED && SLJIT_CONFIG_UNSUPPORTED)
|
|
/* Just to have something. */
|
|
#define SLJIT_WORD_SHIFT 0
|
|
typedef unsigned long int sljit_uw;
|
|
typedef long int sljit_sw;
|
|
#elif !(defined SLJIT_CONFIG_X86_64 && SLJIT_CONFIG_X86_64) \
|
|
&& !(defined SLJIT_CONFIG_ARM_64 && SLJIT_CONFIG_ARM_64) \
|
|
&& !(defined SLJIT_CONFIG_PPC_64 && SLJIT_CONFIG_PPC_64) \
|
|
&& !(defined SLJIT_CONFIG_MIPS_64 && SLJIT_CONFIG_MIPS_64) \
|
|
&& !(defined SLJIT_CONFIG_TILEGX && SLJIT_CONFIG_TILEGX)
|
|
#define SLJIT_32BIT_ARCHITECTURE 1
|
|
#define SLJIT_WORD_SHIFT 2
|
|
typedef unsigned int sljit_uw;
|
|
typedef int sljit_sw;
|
|
#else
|
|
#define SLJIT_64BIT_ARCHITECTURE 1
|
|
#define SLJIT_WORD_SHIFT 3
|
|
#ifdef _WIN32
|
|
typedef unsigned __int64 sljit_uw;
|
|
typedef __int64 sljit_sw;
|
|
#else
|
|
typedef unsigned long int sljit_uw;
|
|
typedef long int sljit_sw;
|
|
#endif
|
|
#endif
|
|
|
|
typedef sljit_uw sljit_p;
|
|
|
|
/* Floating point types. */
|
|
typedef float sljit_s;
|
|
typedef double sljit_d;
|
|
|
|
/* Shift for pointer sized data. */
|
|
#define SLJIT_POINTER_SHIFT SLJIT_WORD_SHIFT
|
|
|
|
/* Shift for double precision sized data. */
|
|
#define SLJIT_DOUBLE_SHIFT 3
|
|
|
|
#ifndef SLJIT_W
|
|
|
|
/* Defining long constants. */
|
|
#if (defined SLJIT_64BIT_ARCHITECTURE && SLJIT_64BIT_ARCHITECTURE)
|
|
#define SLJIT_W(w) (w##ll)
|
|
#else
|
|
#define SLJIT_W(w) (w)
|
|
#endif
|
|
|
|
#endif /* !SLJIT_W */
|
|
|
|
#ifndef SLJIT_CALL
|
|
|
|
/* ABI (Application Binary Interface) types. */
|
|
#if (defined SLJIT_CONFIG_X86_32 && SLJIT_CONFIG_X86_32)
|
|
|
|
#if defined(__GNUC__) && !defined(__APPLE__)
|
|
|
|
#define SLJIT_CALL __attribute__ ((fastcall))
|
|
#define SLJIT_X86_32_FASTCALL 1
|
|
|
|
#elif defined(_MSC_VER)
|
|
|
|
#define SLJIT_CALL __fastcall
|
|
#define SLJIT_X86_32_FASTCALL 1
|
|
|
|
#elif defined(__BORLANDC__)
|
|
|
|
#define SLJIT_CALL __msfastcall
|
|
#define SLJIT_X86_32_FASTCALL 1
|
|
|
|
#else /* Unknown compiler. */
|
|
|
|
/* The cdecl attribute is the default. */
|
|
#define SLJIT_CALL
|
|
|
|
#endif
|
|
|
|
#else /* Non x86-32 architectures. */
|
|
|
|
#define SLJIT_CALL
|
|
|
|
#endif /* SLJIT_CONFIG_X86_32 */
|
|
|
|
#endif /* !SLJIT_CALL */
|
|
|
|
#if !defined(SLJIT_BIG_ENDIAN) && !defined(SLJIT_LITTLE_ENDIAN)
|
|
|
|
/* These macros are useful for the applications. */
|
|
#if (defined SLJIT_CONFIG_PPC_32 && SLJIT_CONFIG_PPC_32) \
|
|
|| (defined SLJIT_CONFIG_PPC_64 && SLJIT_CONFIG_PPC_64)
|
|
|
|
#ifdef __LITTLE_ENDIAN__
|
|
#define SLJIT_LITTLE_ENDIAN 1
|
|
#else
|
|
#define SLJIT_BIG_ENDIAN 1
|
|
#endif
|
|
|
|
#elif (defined SLJIT_CONFIG_MIPS_32 && SLJIT_CONFIG_MIPS_32) \
|
|
|| (defined SLJIT_CONFIG_MIPS_64 && SLJIT_CONFIG_MIPS_64)
|
|
|
|
#ifdef __MIPSEL__
|
|
#define SLJIT_LITTLE_ENDIAN 1
|
|
#else
|
|
#define SLJIT_BIG_ENDIAN 1
|
|
#endif
|
|
|
|
#elif (defined SLJIT_CONFIG_SPARC_32 && SLJIT_CONFIG_SPARC_32)
|
|
|
|
#define SLJIT_BIG_ENDIAN 1
|
|
|
|
#else
|
|
#define SLJIT_LITTLE_ENDIAN 1
|
|
#endif
|
|
|
|
#endif /* !defined(SLJIT_BIG_ENDIAN) && !defined(SLJIT_LITTLE_ENDIAN) */
|
|
|
|
/* Sanity check. */
|
|
#if (defined SLJIT_BIG_ENDIAN && SLJIT_BIG_ENDIAN) && (defined SLJIT_LITTLE_ENDIAN && SLJIT_LITTLE_ENDIAN)
|
|
#error "Exactly one endianness must be selected"
|
|
#endif
|
|
|
|
#if !(defined SLJIT_BIG_ENDIAN && SLJIT_BIG_ENDIAN) && !(defined SLJIT_LITTLE_ENDIAN && SLJIT_LITTLE_ENDIAN)
|
|
#error "Exactly one endianness must be selected"
|
|
#endif
|
|
|
|
#ifndef SLJIT_INDIRECT_CALL
|
|
#if ((defined SLJIT_CONFIG_PPC_64 && SLJIT_CONFIG_PPC_64) && (defined SLJIT_BIG_ENDIAN && SLJIT_BIG_ENDIAN)) \
|
|
|| ((defined SLJIT_CONFIG_PPC_32 && SLJIT_CONFIG_PPC_32) && defined _AIX)
|
|
/* It seems certain ppc compilers use an indirect addressing for functions
|
|
which makes things complicated. */
|
|
#define SLJIT_INDIRECT_CALL 1
|
|
#endif
|
|
#endif /* SLJIT_INDIRECT_CALL */
|
|
|
|
#ifndef SLJIT_RETURN_ADDRESS_OFFSET
|
|
#if (defined SLJIT_CONFIG_SPARC_32 && SLJIT_CONFIG_SPARC_32)
|
|
#define SLJIT_RETURN_ADDRESS_OFFSET 8
|
|
#else
|
|
#define SLJIT_RETURN_ADDRESS_OFFSET 0
|
|
#endif
|
|
#endif /* SLJIT_RETURN_ADDRESS_OFFSET */
|
|
|
|
#ifndef SLJIT_SSE2
|
|
|
|
#if (defined SLJIT_CONFIG_X86_32 && SLJIT_CONFIG_X86_32) || (defined SLJIT_CONFIG_X86_64 && SLJIT_CONFIG_X86_64)
|
|
/* Turn on SSE2 support on x86. */
|
|
#define SLJIT_SSE2 1
|
|
|
|
#if (defined SLJIT_CONFIG_X86_32 && SLJIT_CONFIG_X86_32)
|
|
/* Auto detect SSE2 support using CPUID.
|
|
On 64 bit x86 cpus, sse2 must be present. */
|
|
#define SLJIT_DETECT_SSE2 1
|
|
#endif
|
|
|
|
#endif /* (defined SLJIT_CONFIG_X86_32 && SLJIT_CONFIG_X86_32) || (defined SLJIT_CONFIG_X86_64 && SLJIT_CONFIG_X86_64) */
|
|
|
|
#endif /* !SLJIT_SSE2 */
|
|
|
|
#ifndef SLJIT_UNALIGNED
|
|
|
|
#if (defined SLJIT_CONFIG_X86_32 && SLJIT_CONFIG_X86_32) \
|
|
|| (defined SLJIT_CONFIG_X86_64 && SLJIT_CONFIG_X86_64) \
|
|
|| (defined SLJIT_CONFIG_ARM_V7 && SLJIT_CONFIG_ARM_V7) \
|
|
|| (defined SLJIT_CONFIG_ARM_THUMB2 && SLJIT_CONFIG_ARM_THUMB2) \
|
|
|| (defined SLJIT_CONFIG_ARM_64 && SLJIT_CONFIG_ARM_64) \
|
|
|| (defined SLJIT_CONFIG_PPC_32 && SLJIT_CONFIG_PPC_32) \
|
|
|| (defined SLJIT_CONFIG_PPC_64 && SLJIT_CONFIG_PPC_64)
|
|
#define SLJIT_UNALIGNED 1
|
|
#endif
|
|
|
|
#endif /* !SLJIT_UNALIGNED */
|
|
|
|
#if (defined SLJIT_EXECUTABLE_ALLOCATOR && SLJIT_EXECUTABLE_ALLOCATOR)
|
|
SLJIT_API_FUNC_ATTRIBUTE void* sljit_malloc_exec(sljit_uw size);
|
|
SLJIT_API_FUNC_ATTRIBUTE void sljit_free_exec(void* ptr);
|
|
SLJIT_API_FUNC_ATTRIBUTE void sljit_free_unused_memory_exec(void);
|
|
#define SLJIT_MALLOC_EXEC(size) sljit_malloc_exec(size)
|
|
#define SLJIT_FREE_EXEC(ptr) sljit_free_exec(ptr)
|
|
#endif
|
|
|
|
#if (defined SLJIT_VERBOSE && SLJIT_VERBOSE)
|
|
#include <stdio.h>
|
|
#endif
|
|
|
|
#if (defined SLJIT_DEBUG && SLJIT_DEBUG)
|
|
|
|
#if !defined(SLJIT_ASSERT) || !defined(SLJIT_ASSERT_STOP)
|
|
|
|
/* SLJIT_HALT_PROCESS must halt the process. */
|
|
#ifndef SLJIT_HALT_PROCESS
|
|
#include <stdlib.h>
|
|
|
|
#define SLJIT_HALT_PROCESS() \
|
|
abort();
|
|
#endif /* !SLJIT_HALT_PROCESS */
|
|
|
|
#include <stdio.h>
|
|
|
|
#endif /* !SLJIT_ASSERT || !SLJIT_ASSERT_STOP */
|
|
|
|
/* Feel free to redefine these two macros. */
|
|
#ifndef SLJIT_ASSERT
|
|
|
|
#define SLJIT_ASSERT(x) \
|
|
do { \
|
|
if (SLJIT_UNLIKELY(!(x))) { \
|
|
printf("Assertion failed at " __FILE__ ":%d\n", __LINE__); \
|
|
SLJIT_HALT_PROCESS(); \
|
|
} \
|
|
} while (0)
|
|
|
|
#endif /* !SLJIT_ASSERT */
|
|
|
|
#ifndef SLJIT_ASSERT_STOP
|
|
|
|
#define SLJIT_ASSERT_STOP() \
|
|
do { \
|
|
printf("Should never been reached " __FILE__ ":%d\n", __LINE__); \
|
|
SLJIT_HALT_PROCESS(); \
|
|
} while (0)
|
|
|
|
#endif /* !SLJIT_ASSERT_STOP */
|
|
|
|
#else /* (defined SLJIT_DEBUG && SLJIT_DEBUG) */
|
|
|
|
/* Forcing empty, but valid statements. */
|
|
#undef SLJIT_ASSERT
|
|
#undef SLJIT_ASSERT_STOP
|
|
|
|
#define SLJIT_ASSERT(x) \
|
|
do { } while (0)
|
|
#define SLJIT_ASSERT_STOP() \
|
|
do { } while (0)
|
|
|
|
#endif /* (defined SLJIT_DEBUG && SLJIT_DEBUG) */
|
|
|
|
#ifndef SLJIT_COMPILE_ASSERT
|
|
|
|
/* Should be improved eventually. */
|
|
#define SLJIT_COMPILE_ASSERT(x, description) \
|
|
SLJIT_ASSERT(x)
|
|
|
|
#endif /* !SLJIT_COMPILE_ASSERT */
|
|
|
|
#endif
|