X-Git-Url: http://wien.tomnetworks.com/gitweb/?a=blobdiff_plain;f=mono%2Fmini%2Fmini-x86.h;h=8a08a0920d17812ecb318efd68487fec61d2d39e;hb=475160aa78bf3c02b64de059d823e58a4faf2b35;hp=93af9c07d44815a81f5423716e5b33d6337a0fbe;hpb=d2db8246a3757b59cee42fa84dda6b75e939bfde;p=mono.git diff --git a/mono/mini/mini-x86.h b/mono/mini/mini-x86.h index 93af9c07d44..8a08a0920d1 100644 --- a/mono/mini/mini-x86.h +++ b/mono/mini/mini-x86.h @@ -43,33 +43,30 @@ LONG CALLBACK seh_handler(EXCEPTION_POINTERS* ep); #endif /* PLATFORM_WIN32 */ -#ifdef sun // Solaris x86 -# undef SIGSEGV_ON_ALTSTACK -# define MONO_ARCH_USE_SIGACTION 1 -struct sigcontext { - unsigned short gs, __gsh; - unsigned short fs, __fsh; - unsigned short es, __esh; - unsigned short ds, __dsh; - unsigned long edi; - unsigned long esi; - unsigned long ebp; - unsigned long esp; - unsigned long ebx; - unsigned long edx; - unsigned long ecx; - unsigned long eax; - unsigned long trapno; - unsigned long err; - unsigned long eip; - unsigned short cs, __csh; - unsigned long eflags; - unsigned long esp_at_signal; - unsigned short ss, __ssh; - unsigned long fpstate[95]; - unsigned long filler[5]; -}; -#endif // sun, Solaris x86 +#if defined( __linux__) || defined(__sun) || defined(__APPLE__) +#define MONO_ARCH_USE_SIGACTION +#endif + +#ifndef PLATFORM_WIN32 + +#ifdef HAVE_WORKING_SIGALTSTACK +#define MONO_ARCH_SIGSEGV_ON_ALTSTACK +#define MONO_ARCH_USE_SIGACTION + +/* FreeBSD and NetBSD need SA_STACK and MAP_ANON re-definitions */ +# if defined(__FreeBSD__) || defined(__NetBSD__) +# ifndef SA_STACK +# define SA_STACK SA_ONSTACK +# endif +# ifndef MAP_ANONYMOUS +# define MAP_ANONYMOUS MAP_ANON +# endif +# endif /* BSDs */ + +#endif /* HAVE_WORKING_SIGALTSTACK */ +#endif /* !PLATFORM_WIN32 */ + +#define MONO_ARCH_SIGNAL_STACK_SIZE (64 * 1024) /* Enables OP_LSHL, OP_LSHL_IMM, OP_LSHR, OP_LSHR_IMM, OP_LSHR_UN, OP_LSHR_UN_IMM */ #define MONO_ARCH_NO_EMULATE_LONG_SHIFT_OPS @@ -77,7 +74,36 @@ struct sigcontext { #define MONO_MAX_IREGS 8 #define MONO_MAX_FREGS 6 +/* Parameters used by the register allocator */ +#define MONO_ARCH_HAS_XP_LOCAL_REGALLOC + +#define MONO_ARCH_CALLEE_REGS X86_CALLEE_REGS +#define MONO_ARCH_CALLEE_SAVED_REGS X86_CALLER_REGS + +#define MONO_ARCH_CALLEE_FREGS 0 +#define MONO_ARCH_CALLEE_SAVED_FREGS 0 + +#define MONO_ARCH_USE_FPSTACK TRUE +#define MONO_ARCH_FPSTACK_SIZE 6 + +#define MONO_ARCH_INST_FIXED_REG(desc) (((desc == ' ') || (desc == 'i')) ? -1 : ((desc == 's') ? X86_ECX : ((desc == 'a') ? X86_EAX : ((desc == 'd') ? X86_EDX : ((desc == 'l') ? X86_EAX : -1))))) + +#define MONO_ARCH_INST_FIXED_MASK(desc) ((desc == 'y') ? (X86_BYTE_REGS) : 0) + +/* RDX is clobbered by the opcode implementation before accessing sreg2 */ +#define MONO_ARCH_INST_SREG2_MASK(ins) (((ins [MONO_INST_CLOB] == 'a') || (ins [MONO_INST_CLOB] == 'd')) ? (1 << X86_EDX) : 0) + +/* + * L is a generic register pair, while l means eax:rdx + */ +#define MONO_ARCH_INST_IS_REGPAIR(desc) (desc == 'l' || desc == 'L') +#define MONO_ARCH_INST_REGPAIR_REG2(desc,hreg1) (desc == 'l' ? X86_EDX : -1) + +#if defined(__APPLE__) +#define MONO_ARCH_FRAME_ALIGNMENT 16 +#else #define MONO_ARCH_FRAME_ALIGNMENT 4 +#endif /* fixme: align to 16byte instead of 32byte (we align to 32byte to get * reproduceable results for benchmarks */ @@ -87,6 +113,8 @@ struct sigcontext { #define MONO_ARCH_RETREG1 X86_EAX #define MONO_ARCH_RETREG2 X86_EDX +#define MONO_ARCH_AOT_PLT_OFFSET_REG X86_EAX + #define MONO_ARCH_ENCODE_LREG(r1,r2) (r1 | (r2<<3)) #define inst_dreg_low dreg&7 @@ -107,10 +135,45 @@ struct MonoLMF { guint32 eip; }; -typedef struct MonoCompileArch { -} MonoCompileArch; +typedef void* MonoCompileArch; + +#if defined(__FreeBSD__) || defined(__APPLE__) +#include +#endif + +#if defined(__FreeBSD__) + #define UCONTEXT_REG_EAX(ctx) ((ctx)->uc_mcontext.mc_eax) + #define UCONTEXT_REG_EBX(ctx) ((ctx)->uc_mcontext.mc_ebx) + #define UCONTEXT_REG_ECX(ctx) ((ctx)->uc_mcontext.mc_ecx) + #define UCONTEXT_REG_EDX(ctx) ((ctx)->uc_mcontext.mc_edx) + #define UCONTEXT_REG_EBP(ctx) ((ctx)->uc_mcontext.mc_ebp) + #define UCONTEXT_REG_ESP(ctx) ((ctx)->uc_mcontext.mc_esp) + #define UCONTEXT_REG_ESI(ctx) ((ctx)->uc_mcontext.mc_esi) + #define UCONTEXT_REG_EDI(ctx) ((ctx)->uc_mcontext.mc_edi) + #define UCONTEXT_REG_EIP(ctx) ((ctx)->uc_mcontext.mc_eip) +#elif defined(__APPLE__) + #define UCONTEXT_REG_EAX(ctx) ((ctx)->uc_mcontext->ss.eax) + #define UCONTEXT_REG_EBX(ctx) ((ctx)->uc_mcontext->ss.ebx) + #define UCONTEXT_REG_ECX(ctx) ((ctx)->uc_mcontext->ss.ecx) + #define UCONTEXT_REG_EDX(ctx) ((ctx)->uc_mcontext->ss.edx) + #define UCONTEXT_REG_EBP(ctx) ((ctx)->uc_mcontext->ss.ebp) + #define UCONTEXT_REG_ESP(ctx) ((ctx)->uc_mcontext->ss.esp) + #define UCONTEXT_REG_ESI(ctx) ((ctx)->uc_mcontext->ss.esi) + #define UCONTEXT_REG_EDI(ctx) ((ctx)->uc_mcontext->ss.edi) + #define UCONTEXT_REG_EIP(ctx) ((ctx)->uc_mcontext->ss.eip) +#else + #define UCONTEXT_REG_EAX(ctx) ((ctx)->uc_mcontext.gregs [REG_EAX]) + #define UCONTEXT_REG_EBX(ctx) ((ctx)->uc_mcontext.gregs [REG_EBX]) + #define UCONTEXT_REG_ECX(ctx) ((ctx)->uc_mcontext.gregs [REG_ECX]) + #define UCONTEXT_REG_EDX(ctx) ((ctx)->uc_mcontext.gregs [REG_EDX]) + #define UCONTEXT_REG_EBP(ctx) ((ctx)->uc_mcontext.gregs [REG_EBP]) + #define UCONTEXT_REG_ESP(ctx) ((ctx)->uc_mcontext.gregs [REG_ESP]) + #define UCONTEXT_REG_ESI(ctx) ((ctx)->uc_mcontext.gregs [REG_ESI]) + #define UCONTEXT_REG_EDI(ctx) ((ctx)->uc_mcontext.gregs [REG_EDI]) + #define UCONTEXT_REG_EIP(ctx) ((ctx)->uc_mcontext.gregs [REG_EIP]) +#endif -#if defined(__FreeBSD__) || defined(__NetBSD__) || defined(__OpenBSD__) +#if defined(__FreeBSD__) || defined(__NetBSD__) || defined(__OpenBSD__) || defined(__APPLE__) # define SC_EAX sc_eax # define SC_EBX sc_ebx # define SC_ECX sc_ecx @@ -132,32 +195,60 @@ typedef struct MonoCompileArch { # define SC_ESI esi #endif -typedef struct sigcontext MonoContext; +typedef struct { + guint32 eax; + guint32 ebx; + guint32 ecx; + guint32 edx; + guint32 ebp; + guint32 esp; + guint32 esi; + guint32 edi; + guint32 eip; +} MonoContext; + +#define MONO_CONTEXT_SET_IP(ctx,ip) do { (ctx)->eip = (long)(ip); } while (0); +#define MONO_CONTEXT_SET_BP(ctx,bp) do { (ctx)->ebp = (long)(bp); } while (0); +#define MONO_CONTEXT_SET_SP(ctx,sp) do { (ctx)->esp = (long)(sp); } while (0); + +#define MONO_CONTEXT_GET_IP(ctx) ((gpointer)((ctx)->eip)) +#define MONO_CONTEXT_GET_BP(ctx) ((gpointer)((ctx)->ebp)) +#define MONO_CONTEXT_GET_SP(ctx) ((gpointer)((ctx)->esp)) + +#ifdef _MSC_VER + +#define MONO_INIT_CONTEXT_FROM_FUNC(ctx, start_func) do { \ + unsigned int stackptr; \ + mono_arch_flush_register_windows (); \ + { \ + __asm mov stackptr, ebp \ + } \ + MONO_CONTEXT_SET_IP ((ctx), (start_func)); \ + MONO_CONTEXT_SET_BP ((ctx), stackptr); \ +} while (0) -#define MONO_CONTEXT_SET_IP(ctx,ip) do { (ctx)->SC_EIP = (long)(ip); } while (0); -#define MONO_CONTEXT_SET_BP(ctx,bp) do { (ctx)->SC_EBP = (long)(bp); } while (0); -#define MONO_CONTEXT_SET_SP(ctx,esp) do { (ctx)->SC_ESP = (long)(esp); } while (0); - -#define MONO_CONTEXT_GET_IP(ctx) ((gpointer)((ctx)->SC_EIP)) -#define MONO_CONTEXT_GET_BP(ctx) ((gpointer)((ctx)->SC_EBP)) -#define MONO_CONTEXT_GET_SP(ctx) ((gpointer)((ctx)->SC_ESP)) +#else -#ifndef PLATFORM_WIN32 -#ifdef HAVE_WORKING_SIGALTSTACK -#define MONO_ARCH_SIGSEGV_ON_ALTSTACK -/* NetBSD doesn't define SA_STACK */ -#ifndef SA_STACK -#define SA_STACK SA_ONSTACK -#endif -#endif +#define MONO_INIT_CONTEXT_FROM_FUNC(ctx,start_func) do { \ + mono_arch_flush_register_windows (); \ + MONO_CONTEXT_SET_IP ((ctx), (start_func)); \ + MONO_CONTEXT_SET_BP ((ctx), __builtin_frame_address (0)); \ + } while (0) #endif #define MONO_ARCH_BIGMUL_INTRINS 1 #define MONO_ARCH_NEED_DIV_CHECK 1 #define MONO_ARCH_HAVE_IS_INT_OVERFLOW 1 - #define MONO_ARCH_HAVE_INVALIDATE_METHOD 1 +#define MONO_ARCH_HAVE_PIC_AOT 1 +#define MONO_ARCH_NEED_GOT_VAR 1 +#define MONO_ARCH_HAVE_THROW_CORLIB_EXCEPTION 1 +#define MONO_ARCH_ENABLE_EMIT_STATE_OPT 1 +#define MONO_ARCH_HAVE_CREATE_TRAMPOLINE_FROM_TOKEN 1 +#define MONO_ARCH_HAVE_CREATE_SPECIFIC_TRAMPOLINE 1 +#define MONO_ARCH_HAVE_CREATE_DELEGATE_TRAMPOLINE 1 +#define MONO_ARCH_HAVE_CREATE_VARS 1 #endif /* __MONO_MINI_X86_H__ */