#ifndef __MONO_MINI_X86_H__ #define __MONO_MINI_X86_H__ #include #ifdef PLATFORM_WIN32 #include /* use SIG* defines if possible */ #ifdef HAVE_SIGNAL_H #include #endif /* sigcontext surrogate */ struct sigcontext { unsigned int eax; unsigned int ebx; unsigned int ecx; unsigned int edx; unsigned int ebp; unsigned int esp; unsigned int esi; unsigned int edi; unsigned int eip; }; typedef void (* MonoW32ExceptionHandler) (int); void win32_seh_init(void); void win32_seh_cleanup(void); void win32_seh_set_handler(int type, MonoW32ExceptionHandler handler); #ifndef SIGFPE #define SIGFPE 4 #endif #ifndef SIGILL #define SIGILL 8 #endif #ifndef SIGSEGV #define SIGSEGV 11 #endif LONG CALLBACK seh_handler(EXCEPTION_POINTERS* ep); #endif /* PLATFORM_WIN32 */ #if defined( __linux__) || defined(__sun) || defined(__APPLE__) || defined(__NetBSD__) #define MONO_ARCH_USE_SIGACTION #endif #ifndef PLATFORM_WIN32 #ifdef HAVE_WORKING_SIGALTSTACK /* * solaris doesn't have pthread_getattr_np () needed by the sigaltstack setup * code. */ #ifndef __sun #define MONO_ARCH_SIGSEGV_ON_ALTSTACK #endif #define MONO_ARCH_USE_SIGACTION #endif /* HAVE_WORKING_SIGALTSTACK */ #endif /* !PLATFORM_WIN32 */ /* we should lower this size and make sure we don't call heavy stack users in the segv handler */ #define MONO_ARCH_SIGNAL_STACK_SIZE (16 * 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 #define MONO_ARCH_CPU_SPEC x86_desc #define MONO_MAX_IREGS 8 #define MONO_MAX_FREGS 6 /* Parameters used by the register allocator */ #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 */ #define MONO_ARCH_CODE_ALIGNMENT 32 #define MONO_ARCH_BASEREG X86_EBP #define MONO_ARCH_RETREG1 X86_EAX #define MONO_ARCH_RETREG2 X86_EDX #define MONO_ARCH_ENCODE_LREG(r1,r2) (r1 | (r2<<3)) #define inst_dreg_low dreg&7 #define inst_dreg_high dreg>>3 #define inst_sreg1_low sreg1&7 #define inst_sreg1_high sreg1>>3 #define inst_sreg2_low sreg2&7 #define inst_sreg2_high sreg2>>3 struct MonoLMF { /* Offset by 1 if this is a trampoline LMF frame */ guint32 previous_lmf; gpointer lmf_addr; /* Only set in trampoline LMF frames */ MonoMethod *method; /* Only set in trampoline LMF frames */ guint32 esp; guint32 ebx; guint32 edi; guint32 esi; guint32 ebp; guint32 eip; }; 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__) && defined(_STRUCT_MCONTEXT) #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) #elif defined(__APPLE__) && !defined(_STRUCT_MCONTEXT) #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) #elif defined(__NetBSD__) #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]) #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__) || defined(__APPLE__) # define SC_EAX sc_eax # define SC_EBX sc_ebx # define SC_ECX sc_ecx # define SC_EDX sc_edx # define SC_EBP sc_ebp # define SC_EIP sc_eip # define SC_ESP sc_esp # define SC_EDI sc_edi # define SC_ESI sc_esi #else # define SC_EAX eax # define SC_EBX ebx # define SC_ECX ecx # define SC_EDX edx # define SC_EBP ebp # define SC_EIP eip # define SC_ESP esp # define SC_EDI edi # define SC_ESI esi #endif 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); \ MONO_CONTEXT_SET_SP ((ctx), stackptr); \ } while (0) #else #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)); \ MONO_CONTEXT_SET_SP ((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_NEED_GOT_VAR 1 #define MONO_ARCH_HAVE_THROW_CORLIB_EXCEPTION 1 #define MONO_ARCH_ENABLE_EMIT_STATE_OPT 1 #define MONO_ARCH_ENABLE_MONO_LMF_VAR 1 #define MONO_ARCH_HAVE_CREATE_TRAMPOLINE_FROM_TOKEN 1 #define MONO_ARCH_HAVE_CREATE_DELEGATE_TRAMPOLINE 1 #define MONO_ARCH_HAVE_ATOMIC_ADD 1 #define MONO_ARCH_HAVE_ATOMIC_EXCHANGE 1 #define MONO_ARCH_HAVE_ATOMIC_CAS_IMM 1 #define MONO_ARCH_HAVE_IMT 1 #define MONO_ARCH_HAVE_TLS_GET 1 #define MONO_ARCH_IMT_REG X86_EDX #define MONO_ARCH_VTABLE_REG X86_EDX #define MONO_ARCH_COMMON_VTABLE_TRAMPOLINE 1 #define MONO_ARCH_RGCTX_REG X86_EDX #define MONO_ARCH_ENABLE_NORMALIZE_OPCODES 1 #if !defined(__APPLE__) #define MONO_ARCH_AOT_SUPPORTED 1 #endif typedef struct { guint8 *address; guint8 saved_byte; } MonoBreakpointInfo; extern MonoBreakpointInfo mono_breakpoint_info [MONO_BREAKPOINT_ARRAY_SIZE]; #endif /* __MONO_MINI_X86_H__ */