forked from mia/Aegisub
453 lines
12 KiB
C
453 lines
12 KiB
C
/*
|
|
** Target architecture selection.
|
|
** Copyright (C) 2005-2017 Mike Pall. See Copyright Notice in luajit.h
|
|
*/
|
|
|
|
#ifndef _LJ_ARCH_H
|
|
#define _LJ_ARCH_H
|
|
|
|
#include "lua.h"
|
|
|
|
/* Target endianess. */
|
|
#define LUAJIT_LE 0
|
|
#define LUAJIT_BE 1
|
|
|
|
/* Target architectures. */
|
|
#define LUAJIT_ARCH_X86 1
|
|
#define LUAJIT_ARCH_x86 1
|
|
#define LUAJIT_ARCH_X64 2
|
|
#define LUAJIT_ARCH_x64 2
|
|
#define LUAJIT_ARCH_ARM 3
|
|
#define LUAJIT_ARCH_arm 3
|
|
#define LUAJIT_ARCH_PPC 4
|
|
#define LUAJIT_ARCH_ppc 4
|
|
#define LUAJIT_ARCH_PPCSPE 5
|
|
#define LUAJIT_ARCH_ppcspe 5
|
|
#define LUAJIT_ARCH_MIPS 6
|
|
#define LUAJIT_ARCH_mips 6
|
|
|
|
/* Target OS. */
|
|
#define LUAJIT_OS_OTHER 0
|
|
#define LUAJIT_OS_WINDOWS 1
|
|
#define LUAJIT_OS_LINUX 2
|
|
#define LUAJIT_OS_OSX 3
|
|
#define LUAJIT_OS_BSD 4
|
|
#define LUAJIT_OS_POSIX 5
|
|
|
|
/* Select native target if no target defined. */
|
|
#ifndef LUAJIT_TARGET
|
|
|
|
#if defined(__i386) || defined(__i386__) || defined(_M_IX86)
|
|
#define LUAJIT_TARGET LUAJIT_ARCH_X86
|
|
#elif defined(__x86_64__) || defined(__x86_64) || defined(_M_X64) || defined(_M_AMD64)
|
|
#define LUAJIT_TARGET LUAJIT_ARCH_X64
|
|
#elif defined(__arm__) || defined(__arm) || defined(__ARM__) || defined(__ARM)
|
|
#define LUAJIT_TARGET LUAJIT_ARCH_ARM
|
|
#elif defined(__ppc__) || defined(__ppc) || defined(__PPC__) || defined(__PPC) || defined(__powerpc__) || defined(__powerpc) || defined(__POWERPC__) || defined(__POWERPC) || defined(_M_PPC)
|
|
#ifdef __NO_FPRS__
|
|
#define LUAJIT_TARGET LUAJIT_ARCH_PPCSPE
|
|
#else
|
|
#define LUAJIT_TARGET LUAJIT_ARCH_PPC
|
|
#endif
|
|
#elif defined(__mips__) || defined(__mips) || defined(__MIPS__) || defined(__MIPS)
|
|
#define LUAJIT_TARGET LUAJIT_ARCH_MIPS
|
|
#else
|
|
#error "No support for this architecture (yet)"
|
|
#endif
|
|
|
|
#endif
|
|
|
|
/* Select native OS if no target OS defined. */
|
|
#ifndef LUAJIT_OS
|
|
|
|
#if defined(_WIN32) && !defined(_XBOX_VER)
|
|
#define LUAJIT_OS LUAJIT_OS_WINDOWS
|
|
#elif defined(__linux__)
|
|
#define LUAJIT_OS LUAJIT_OS_LINUX
|
|
#elif defined(__MACH__) && defined(__APPLE__)
|
|
#define LUAJIT_OS LUAJIT_OS_OSX
|
|
#elif (defined(__FreeBSD__) || defined(__FreeBSD_kernel__) || \
|
|
defined(__NetBSD__) || defined(__OpenBSD__) || \
|
|
defined(__DragonFly__)) && !defined(__ORBIS__)
|
|
#define LUAJIT_OS LUAJIT_OS_BSD
|
|
#elif (defined(__sun__) && defined(__svr4__))
|
|
#define LUAJIT_OS LUAJIT_OS_POSIX
|
|
#elif defined(__CYGWIN__)
|
|
#define LJ_TARGET_CYGWIN 1
|
|
#define LUAJIT_OS LUAJIT_OS_POSIX
|
|
#else
|
|
#define LUAJIT_OS LUAJIT_OS_OTHER
|
|
#endif
|
|
|
|
#endif
|
|
|
|
/* Set target OS properties. */
|
|
#if LUAJIT_OS == LUAJIT_OS_WINDOWS
|
|
#define LJ_OS_NAME "Windows"
|
|
#elif LUAJIT_OS == LUAJIT_OS_LINUX
|
|
#define LJ_OS_NAME "Linux"
|
|
#elif LUAJIT_OS == LUAJIT_OS_OSX
|
|
#define LJ_OS_NAME "OSX"
|
|
#elif LUAJIT_OS == LUAJIT_OS_BSD
|
|
#define LJ_OS_NAME "BSD"
|
|
#elif LUAJIT_OS == LUAJIT_OS_POSIX
|
|
#define LJ_OS_NAME "POSIX"
|
|
#else
|
|
#define LJ_OS_NAME "Other"
|
|
#endif
|
|
|
|
#define LJ_TARGET_WINDOWS (LUAJIT_OS == LUAJIT_OS_WINDOWS)
|
|
#define LJ_TARGET_LINUX (LUAJIT_OS == LUAJIT_OS_LINUX)
|
|
#define LJ_TARGET_OSX (LUAJIT_OS == LUAJIT_OS_OSX)
|
|
#define LJ_TARGET_IOS (LJ_TARGET_OSX && LUAJIT_TARGET == LUAJIT_ARCH_ARM)
|
|
#define LJ_TARGET_POSIX (LUAJIT_OS > LUAJIT_OS_WINDOWS)
|
|
#define LJ_TARGET_DLOPEN LJ_TARGET_POSIX
|
|
|
|
#ifdef __CELLOS_LV2__
|
|
#define LJ_TARGET_PS3 1
|
|
#define LJ_TARGET_CONSOLE 1
|
|
#endif
|
|
|
|
#ifdef __ORBIS__
|
|
#define LJ_TARGET_PS4 1
|
|
#define LJ_TARGET_CONSOLE 1
|
|
#undef NULL
|
|
#define NULL ((void*)0)
|
|
#endif
|
|
|
|
#ifdef __psp2__
|
|
#define LJ_TARGET_PSVITA 1
|
|
#define LJ_TARGET_CONSOLE 1
|
|
#endif
|
|
|
|
#if _XBOX_VER >= 200
|
|
#define LJ_TARGET_XBOX360 1
|
|
#define LJ_TARGET_CONSOLE 1
|
|
#endif
|
|
|
|
#define LJ_NUMMODE_SINGLE 0 /* Single-number mode only. */
|
|
#define LJ_NUMMODE_SINGLE_DUAL 1 /* Default to single-number mode. */
|
|
#define LJ_NUMMODE_DUAL 2 /* Dual-number mode only. */
|
|
#define LJ_NUMMODE_DUAL_SINGLE 3 /* Default to dual-number mode. */
|
|
|
|
/* Set target architecture properties. */
|
|
#if LUAJIT_TARGET == LUAJIT_ARCH_X86
|
|
|
|
#define LJ_ARCH_NAME "x86"
|
|
#define LJ_ARCH_BITS 32
|
|
#define LJ_ARCH_ENDIAN LUAJIT_LE
|
|
#if LJ_TARGET_WINDOWS || LJ_TARGET_CYGWIN
|
|
#define LJ_ABI_WIN 1
|
|
#else
|
|
#define LJ_ABI_WIN 0
|
|
#endif
|
|
#define LJ_TARGET_X86 1
|
|
#define LJ_TARGET_X86ORX64 1
|
|
#define LJ_TARGET_EHRETREG 0
|
|
#define LJ_TARGET_MASKSHIFT 1
|
|
#define LJ_TARGET_MASKROT 1
|
|
#define LJ_TARGET_UNALIGNED 1
|
|
#define LJ_ARCH_NUMMODE LJ_NUMMODE_SINGLE_DUAL
|
|
|
|
#elif LUAJIT_TARGET == LUAJIT_ARCH_X64
|
|
|
|
#define LJ_ARCH_NAME "x64"
|
|
#define LJ_ARCH_BITS 64
|
|
#define LJ_ARCH_ENDIAN LUAJIT_LE
|
|
#if LJ_TARGET_WINDOWS || LJ_TARGET_CYGWIN
|
|
#define LJ_ABI_WIN 1
|
|
#else
|
|
#define LJ_ABI_WIN 0
|
|
#endif
|
|
#define LJ_TARGET_X64 1
|
|
#define LJ_TARGET_X86ORX64 1
|
|
#define LJ_TARGET_EHRETREG 0
|
|
#define LJ_TARGET_JUMPRANGE 31 /* +-2^31 = +-2GB */
|
|
#define LJ_TARGET_MASKSHIFT 1
|
|
#define LJ_TARGET_MASKROT 1
|
|
#define LJ_TARGET_UNALIGNED 1
|
|
#define LJ_ARCH_NUMMODE LJ_NUMMODE_SINGLE_DUAL
|
|
|
|
#elif LUAJIT_TARGET == LUAJIT_ARCH_ARM
|
|
|
|
#define LJ_ARCH_NAME "arm"
|
|
#define LJ_ARCH_BITS 32
|
|
#define LJ_ARCH_ENDIAN LUAJIT_LE
|
|
#if !defined(LJ_ARCH_HASFPU) && __SOFTFP__
|
|
#define LJ_ARCH_HASFPU 0
|
|
#endif
|
|
#if !defined(LJ_ABI_SOFTFP) && !__ARM_PCS_VFP
|
|
#define LJ_ABI_SOFTFP 1
|
|
#endif
|
|
#define LJ_ABI_EABI 1
|
|
#define LJ_TARGET_ARM 1
|
|
#define LJ_TARGET_EHRETREG 0
|
|
#define LJ_TARGET_JUMPRANGE 25 /* +-2^25 = +-32MB */
|
|
#define LJ_TARGET_MASKSHIFT 0
|
|
#define LJ_TARGET_MASKROT 1
|
|
#define LJ_TARGET_UNIFYROT 2 /* Want only IR_BROR. */
|
|
#define LJ_ARCH_NUMMODE LJ_NUMMODE_DUAL
|
|
|
|
#if __ARM_ARCH____ARM_ARCH_8__ || __ARM_ARCH_8A__
|
|
#define LJ_ARCH_VERSION 80
|
|
#elif __ARM_ARCH_7__ || __ARM_ARCH_7A__ || __ARM_ARCH_7R__ || __ARM_ARCH_7S__ || __ARM_ARCH_7VE__
|
|
#define LJ_ARCH_VERSION 70
|
|
#elif __ARM_ARCH_6T2__
|
|
#define LJ_ARCH_VERSION 61
|
|
#elif __ARM_ARCH_6__ || __ARM_ARCH_6J__ || __ARM_ARCH_6K__ || __ARM_ARCH_6Z__ || __ARM_ARCH_6ZK__
|
|
#define LJ_ARCH_VERSION 60
|
|
#else
|
|
#define LJ_ARCH_VERSION 50
|
|
#endif
|
|
|
|
#elif LUAJIT_TARGET == LUAJIT_ARCH_PPC
|
|
|
|
#define LJ_ARCH_NAME "ppc"
|
|
#if _LP64
|
|
#define LJ_ARCH_BITS 64
|
|
#else
|
|
#define LJ_ARCH_BITS 32
|
|
#endif
|
|
#define LJ_ARCH_ENDIAN LUAJIT_BE
|
|
#define LJ_TARGET_PPC 1
|
|
#define LJ_TARGET_EHRETREG 3
|
|
#define LJ_TARGET_JUMPRANGE 25 /* +-2^25 = +-32MB */
|
|
#define LJ_TARGET_MASKSHIFT 0
|
|
#define LJ_TARGET_MASKROT 1
|
|
#define LJ_TARGET_UNIFYROT 1 /* Want only IR_BROL. */
|
|
#define LJ_ARCH_NUMMODE LJ_NUMMODE_DUAL_SINGLE
|
|
|
|
#if _ARCH_PWR7
|
|
#define LJ_ARCH_VERSION 70
|
|
#elif _ARCH_PWR6
|
|
#define LJ_ARCH_VERSION 60
|
|
#elif _ARCH_PWR5X
|
|
#define LJ_ARCH_VERSION 51
|
|
#elif _ARCH_PWR5
|
|
#define LJ_ARCH_VERSION 50
|
|
#elif _ARCH_PWR4
|
|
#define LJ_ARCH_VERSION 40
|
|
#else
|
|
#define LJ_ARCH_VERSION 0
|
|
#endif
|
|
#if __PPC64__ || __powerpc64__ || LJ_TARGET_CONSOLE
|
|
#define LJ_ARCH_PPC64 1
|
|
#define LJ_ARCH_NOFFI 1
|
|
#endif
|
|
#if _ARCH_PPCSQ
|
|
#define LJ_ARCH_SQRT 1
|
|
#endif
|
|
#if _ARCH_PWR5X
|
|
#define LJ_ARCH_ROUND 1
|
|
#endif
|
|
#if __PPU__
|
|
#define LJ_ARCH_CELL 1
|
|
#endif
|
|
#if LJ_TARGET_XBOX360
|
|
#define LJ_ARCH_XENON 1
|
|
#endif
|
|
|
|
#elif LUAJIT_TARGET == LUAJIT_ARCH_PPCSPE
|
|
|
|
#define LJ_ARCH_NAME "ppcspe"
|
|
#define LJ_ARCH_BITS 32
|
|
#define LJ_ARCH_ENDIAN LUAJIT_BE
|
|
#ifndef LJ_ABI_SOFTFP
|
|
#define LJ_ABI_SOFTFP 1
|
|
#endif
|
|
#define LJ_ABI_EABI 1
|
|
#define LJ_TARGET_PPCSPE 1
|
|
#define LJ_TARGET_EHRETREG 3
|
|
#define LJ_TARGET_JUMPRANGE 25 /* +-2^25 = +-32MB */
|
|
#define LJ_TARGET_MASKSHIFT 0
|
|
#define LJ_TARGET_MASKROT 1
|
|
#define LJ_TARGET_UNIFYROT 1 /* Want only IR_BROL. */
|
|
#define LJ_ARCH_NUMMODE LJ_NUMMODE_SINGLE
|
|
#define LJ_ARCH_NOFFI 1 /* NYI: comparisons, calls. */
|
|
#define LJ_ARCH_NOJIT 1
|
|
|
|
#elif LUAJIT_TARGET == LUAJIT_ARCH_MIPS
|
|
|
|
#if defined(__MIPSEL__) || defined(__MIPSEL) || defined(_MIPSEL)
|
|
#define LJ_ARCH_NAME "mipsel"
|
|
#define LJ_ARCH_ENDIAN LUAJIT_LE
|
|
#else
|
|
#define LJ_ARCH_NAME "mips"
|
|
#define LJ_ARCH_ENDIAN LUAJIT_BE
|
|
#endif
|
|
#define LJ_ARCH_BITS 32
|
|
#define LJ_TARGET_MIPS 1
|
|
#define LJ_TARGET_EHRETREG 4
|
|
#define LJ_TARGET_JUMPRANGE 27 /* 2*2^27 = 256MB-aligned region */
|
|
#define LJ_TARGET_MASKSHIFT 1
|
|
#define LJ_TARGET_MASKROT 1
|
|
#define LJ_TARGET_UNIFYROT 2 /* Want only IR_BROR. */
|
|
#define LJ_ARCH_NUMMODE LJ_NUMMODE_SINGLE
|
|
|
|
#if _MIPS_ARCH_MIPS32R2
|
|
#define LJ_ARCH_VERSION 20
|
|
#else
|
|
#define LJ_ARCH_VERSION 10
|
|
#endif
|
|
|
|
#else
|
|
#error "No target architecture defined"
|
|
#endif
|
|
|
|
#ifndef LJ_PAGESIZE
|
|
#define LJ_PAGESIZE 4096
|
|
#endif
|
|
|
|
/* Check for minimum required compiler versions. */
|
|
#if defined(__GNUC__)
|
|
#if LJ_TARGET_X86
|
|
#if (__GNUC__ < 3) || ((__GNUC__ == 3) && __GNUC_MINOR__ < 4)
|
|
#error "Need at least GCC 3.4 or newer"
|
|
#endif
|
|
#elif LJ_TARGET_X64
|
|
#if __GNUC__ < 4
|
|
#error "Need at least GCC 4.0 or newer"
|
|
#endif
|
|
#elif LJ_TARGET_ARM
|
|
#if (__GNUC__ < 4) || ((__GNUC__ == 4) && __GNUC_MINOR__ < 2)
|
|
#error "Need at least GCC 4.2 or newer"
|
|
#endif
|
|
#elif !LJ_TARGET_PS3
|
|
#if (__GNUC__ < 4) || ((__GNUC__ == 4) && __GNUC_MINOR__ < 3)
|
|
#error "Need at least GCC 4.3 or newer"
|
|
#endif
|
|
#endif
|
|
#endif
|
|
|
|
/* Check target-specific constraints. */
|
|
#ifndef _BUILDVM_H
|
|
#if LJ_TARGET_X64
|
|
#if __USING_SJLJ_EXCEPTIONS__
|
|
#error "Need a C compiler with native exception handling on x64"
|
|
#endif
|
|
#elif LJ_TARGET_ARM
|
|
#if defined(__ARMEB__)
|
|
#error "No support for big-endian ARM"
|
|
#endif
|
|
#if __ARM_ARCH_6M__ || __ARM_ARCH_7M__ || __ARM_ARCH_7EM__
|
|
#error "No support for Cortex-M CPUs"
|
|
#endif
|
|
#if !(__ARM_EABI__ || LJ_TARGET_IOS)
|
|
#error "Only ARM EABI or iOS 3.0+ ABI is supported"
|
|
#endif
|
|
#elif LJ_TARGET_PPC || LJ_TARGET_PPCSPE
|
|
#if defined(_SOFT_FLOAT) || defined(_SOFT_DOUBLE)
|
|
#error "No support for PowerPC CPUs without double-precision FPU"
|
|
#endif
|
|
#if defined(_LITTLE_ENDIAN)
|
|
#error "No support for little-endian PowerPC"
|
|
#endif
|
|
#if defined(_LP64)
|
|
#error "No support for PowerPC 64 bit mode"
|
|
#endif
|
|
#elif LJ_TARGET_MIPS
|
|
#if defined(__mips_soft_float)
|
|
#error "No support for MIPS CPUs without FPU"
|
|
#endif
|
|
#if defined(_LP64)
|
|
#error "No support for MIPS64"
|
|
#endif
|
|
#endif
|
|
#endif
|
|
|
|
/* Enable or disable the dual-number mode for the VM. */
|
|
#if (LJ_ARCH_NUMMODE == LJ_NUMMODE_SINGLE && LUAJIT_NUMMODE == 2) || \
|
|
(LJ_ARCH_NUMMODE == LJ_NUMMODE_DUAL && LUAJIT_NUMMODE == 1)
|
|
#error "No support for this number mode on this architecture"
|
|
#endif
|
|
#if LJ_ARCH_NUMMODE == LJ_NUMMODE_DUAL || \
|
|
(LJ_ARCH_NUMMODE == LJ_NUMMODE_DUAL_SINGLE && LUAJIT_NUMMODE != 1) || \
|
|
(LJ_ARCH_NUMMODE == LJ_NUMMODE_SINGLE_DUAL && LUAJIT_NUMMODE == 2)
|
|
#define LJ_DUALNUM 1
|
|
#else
|
|
#define LJ_DUALNUM 0
|
|
#endif
|
|
|
|
#if LJ_TARGET_IOS || LJ_TARGET_CONSOLE
|
|
/* Runtime code generation is restricted on iOS. Complain to Apple, not me. */
|
|
/* Ditto for the consoles. Complain to Sony or MS, not me. */
|
|
#ifndef LUAJIT_ENABLE_JIT
|
|
#define LJ_OS_NOJIT 1
|
|
#endif
|
|
#endif
|
|
|
|
/* Disable or enable the JIT compiler. */
|
|
#if defined(LUAJIT_DISABLE_JIT) || defined(LJ_ARCH_NOJIT) || defined(LJ_OS_NOJIT)
|
|
#define LJ_HASJIT 0
|
|
#else
|
|
#define LJ_HASJIT 1
|
|
#endif
|
|
|
|
/* Disable or enable the FFI extension. */
|
|
#if defined(LUAJIT_DISABLE_FFI) || defined(LJ_ARCH_NOFFI)
|
|
#define LJ_HASFFI 0
|
|
#else
|
|
#define LJ_HASFFI 1
|
|
#endif
|
|
|
|
#ifndef LJ_ARCH_HASFPU
|
|
#define LJ_ARCH_HASFPU 1
|
|
#endif
|
|
#ifndef LJ_ABI_SOFTFP
|
|
#define LJ_ABI_SOFTFP 0
|
|
#endif
|
|
#define LJ_SOFTFP (!LJ_ARCH_HASFPU)
|
|
|
|
#if LJ_ARCH_ENDIAN == LUAJIT_BE
|
|
#define LJ_LE 0
|
|
#define LJ_BE 1
|
|
#define LJ_ENDIAN_SELECT(le, be) be
|
|
#define LJ_ENDIAN_LOHI(lo, hi) hi lo
|
|
#else
|
|
#define LJ_LE 1
|
|
#define LJ_BE 0
|
|
#define LJ_ENDIAN_SELECT(le, be) le
|
|
#define LJ_ENDIAN_LOHI(lo, hi) lo hi
|
|
#endif
|
|
|
|
#if LJ_ARCH_BITS == 32
|
|
#define LJ_32 1
|
|
#define LJ_64 0
|
|
#else
|
|
#define LJ_32 0
|
|
#define LJ_64 1
|
|
#endif
|
|
|
|
#ifndef LJ_TARGET_UNALIGNED
|
|
#define LJ_TARGET_UNALIGNED 0
|
|
#endif
|
|
|
|
/* Various workarounds for embedded operating systems. */
|
|
#if (defined(__ANDROID__) && !defined(LJ_TARGET_X86ORX64)) || defined(__symbian__) || LJ_TARGET_XBOX360
|
|
#define LUAJIT_NO_LOG2
|
|
#endif
|
|
#if defined(__symbian__)
|
|
#define LUAJIT_NO_EXP2
|
|
#endif
|
|
#if LJ_TARGET_CONSOLE || (LJ_TARGET_IOS && __IPHONE_OS_VERSION_MIN_REQUIRED >= __IPHONE_8_0)
|
|
#define LJ_NO_SYSTEM 1
|
|
#endif
|
|
|
|
#if !defined(LUAJIT_NO_UNWIND) && __GNU_COMPACT_EH__
|
|
/* NYI: no support for compact unwind specification, yet. */
|
|
#define LUAJIT_NO_UNWIND 1
|
|
#endif
|
|
|
|
#if defined(LUAJIT_NO_UNWIND) || defined(__symbian__) || LJ_TARGET_IOS || LJ_TARGET_PS3 || LJ_TARGET_PS4
|
|
#define LJ_NO_UNWIND 1
|
|
#endif
|
|
|
|
/* Compatibility with Lua 5.1 vs. 5.2. */
|
|
#ifdef LUAJIT_ENABLE_LUA52COMPAT
|
|
#define LJ_52 1
|
|
#else
|
|
#define LJ_52 0
|
|
#endif
|
|
|
|
#endif
|