mono/mini/mini-amd64.h

   1 #ifndef __MONO_MINI_AMD64_H__
   2 #define __MONO_MINI_AMD64_H__
   3
   4 #include <mono/arch/amd64/amd64-codegen.h>
   5 #include <glib.h>
   6
   7 #ifdef PLATFORM_WIN32
   8 #include <windows.h>
   9 /* use SIG* defines if possible */
  10 #ifdef HAVE_SIGNAL_H
  11 #include <signal.h>
  12 #endif
  13
  14 /* sigcontext surrogate */
  15 struct sigcontext {
  16         guint64 eax;
  17         guint64 ebx;
  18         guint64 ecx;
  19         guint64 edx;
  20         guint64 ebp;
  21         guint64 esp;
  22     guint64 esi;
  23         guint64 edi;
  24         guint64 eip;
  25 };
  26
  27 typedef void (* MonoW32ExceptionHandler) (int);
  28 void win32_seh_init(void);
  29 void win32_seh_cleanup(void);
  30 void win32_seh_set_handler(int type, MonoW32ExceptionHandler handler);
  31
  32 #ifndef SIGFPE
  33 #define SIGFPE 4
  34 #endif
  35
  36 #ifndef SIGILL
  37 #define SIGILL 8
  38 #endif
  39
  40 #ifndef SIGSEGV
  41 #define SIGSEGV 11
  42 #endif
  43
  44 LONG CALLBACK seh_handler(EXCEPTION_POINTERS* ep);
  45
  46 #endif /* PLATFORM_WIN32 */
  47
  48 #ifdef sun    // Solaris x86
  49 #  undef SIGSEGV_ON_ALTSTACK
  50 #  define MONO_ARCH_USE_SIGACTION 1
  51 struct sigcontext {
  52         unsigned short gs, __gsh;
  53         unsigned short fs, __fsh;
  54         unsigned short es, __esh;
  55         unsigned short ds, __dsh;
  56         unsigned long edi;
  57         unsigned long esi;
  58         unsigned long ebp;
  59         unsigned long esp;
  60         unsigned long ebx;
  61         unsigned long edx;
  62         unsigned long ecx;
  63         unsigned long eax;
  64         unsigned long trapno;
  65         unsigned long err;
  66         unsigned long eip;
  67         unsigned short cs, __csh;
  68         unsigned long eflags;
  69         unsigned long esp_at_signal;
  70         unsigned short ss, __ssh;
  71         unsigned long fpstate[95];
  72       unsigned long filler[5];
  73 };
  74 #endif  // sun, Solaris x86
  75
  76 #define MONO_ARCH_SIGNAL_STACK_SIZE (64 * 1024)
  77
  78 #define MONO_MAX_IREGS 16
  79
  80 #define MONO_MAX_FREGS AMD64_XMM_NREG
  81
  82 #define MONO_ARCH_HAS_XP_LOCAL_REGALLOC
  83
  84 /* xmm15 is reserved for use by some opcodes */
  85 #define MONO_ARCH_CALLEE_FREGS 0xef
  86 #define MONO_ARCH_CALLEE_SAVED_FREGS 0
  87
  88 #define MONO_ARCH_CALLEE_REGS AMD64_CALLEE_REGS
  89 #define MONO_ARCH_CALLEE_SAVED_REGS AMD64_CALLEE_SAVED_REGS
  90
  91 /* Setting this to FALSE means using SSE2 instructions for fp arithmetic */
  92 #define MONO_ARCH_USE_FPSTACK FALSE
  93 #define MONO_ARCH_FPSTACK_SIZE 6
  94
  95 #define MONO_ARCH_INST_FIXED_REG(desc) ((desc == 's') ? AMD64_RCX : ((desc == 'a') ? AMD64_RAX : ((desc == 'd') ? AMD64_RDX : -1)))
  96
  97 /* RDX is clobbered by the opcode implementation before accessing sreg2 */
  98 #define MONO_ARCH_INST_SREG2_MASK(ins) (((ins [MONO_INST_CLOB] == 'a') || (ins [MONO_INST_CLOB] == 'd')) ? (1 << AMD64_RDX) : 0)
  99
 100 #define MONO_ARCH_INST_IS_REGPAIR(desc) FALSE
 101 #define MONO_ARCH_INST_REGPAIR_REG2(desc,hreg1) (-1)
 102
 103 #define MONO_ARCH_FRAME_ALIGNMENT 16
 104
 105 /* fixme: align to 16byte instead of 32byte (we align to 32byte to get
 106  * reproduceable results for benchmarks */
 107 #define MONO_ARCH_CODE_ALIGNMENT 32
 108
 109 #define MONO_ARCH_BASEREG X86_EBP
 110 #define MONO_ARCH_RETREG1 X86_EAX
 111 #define MONO_ARCH_RETREG2 X86_EDX
 112
 113 #define MONO_ARCH_ENCODE_LREG(r1,r2) (r1 | (r2<<3))
 114
 115 #define inst_dreg_low dreg&7
 116 #define inst_dreg_high dreg>>3
 117 #define inst_sreg1_low sreg1&7
 118 #define inst_sreg1_high sreg1>>3
 119 #define inst_sreg2_low sreg2&7
 120 #define inst_sreg2_high sreg2>>3
 121
 122 struct MonoLMF {
 123         gpointer    previous_lmf;
 124         gpointer    lmf_addr;
 125         MonoMethod *method;
 126         guint64     rip;
 127         guint64     rbx;
 128         guint64     ebp;
 129         guint64     rsp;
 130         guint64     r12;
 131         guint64     r13;
 132         guint64     r14;
 133         guint64     r15;
 134 };
 135
 136 typedef struct MonoCompileArch {
 137         gint32 lmf_offset;
 138         gint32 localloc_offset;
 139         gint32 reg_save_area_offset;
 140         gint32 stack_alloc_size;
 141         gboolean omit_fp, omit_fp_computed;
 142 } MonoCompileArch;
 143
 144 typedef struct {
 145         guint64 rax;
 146         guint64 rbx;
 147         guint64 rcx;
 148         guint64 rdx;
 149         guint64 rbp;
 150         guint64 rsp;
 151     guint64 rsi;
 152         guint64 rdi;
 153         guint64 rip;
 154         guint64 r12;
 155         guint64 r13;
 156         guint64 r14;
 157         guint64 r15;
 158 } MonoContext;
 159
 160 #if defined(__FreeBSD__) || defined(__NetBSD__) || defined(__OpenBSD__)
 161 # define SC_EAX sc_eax
 162 # define SC_EBX sc_ebx
 163 # define SC_ECX sc_ecx
 164 # define SC_EDX sc_edx
 165 # define SC_EBP sc_ebp
 166 # define SC_EIP sc_eip
 167 # define SC_ESP sc_esp
 168 # define SC_EDI sc_edi
 169 # define SC_ESI sc_esi
 170 #else
 171 # define SC_EAX rax
 172 # define SC_EBX rbx
 173 # define SC_ECX rcx
 174 # define SC_EDX rdx
 175 # define SC_EBP rbp
 176 # define SC_EIP rip
 177 # define SC_ESP rsp
 178 # define SC_EDI rdi
 179 # define SC_ESI rsi
 180
 181 # define SC_RIP rip
 182 # define SC_RSP rsp
 183 # define SC_RBP rbp
 184 # define SC_RBX rbx
 185 # define SC_R12 r12
 186 # define SC_R13 r13
 187 # define SC_R14 r14
 188 # define SC_R15 r15
 189
 190 #endif
 191
 192 #define MONO_CONTEXT_SET_IP(ctx,ip) do { (ctx)->rip = (long)(ip); } while (0);
 193 #define MONO_CONTEXT_SET_BP(ctx,bp) do { (ctx)->rbp = (long)(bp); } while (0);
 194 #define MONO_CONTEXT_SET_SP(ctx,esp) do { (ctx)->rsp = (long)(esp); } while (0);
 195
 196 #define MONO_CONTEXT_GET_IP(ctx) ((gpointer)((ctx)->rip))
 197 #define MONO_CONTEXT_GET_BP(ctx) ((gpointer)((ctx)->rbp))
 198 #define MONO_CONTEXT_GET_SP(ctx) ((gpointer)((ctx)->rsp))
 199
 200 #define MONO_INIT_CONTEXT_FROM_FUNC(ctx,start_func) do {        \
 201                 mono_arch_flush_register_windows ();    \
 202                 MONO_CONTEXT_SET_IP ((ctx), (start_func));      \
 203                 MONO_CONTEXT_SET_BP ((ctx), __builtin_frame_address (0));       \
 204         } while (0)
 205
 206 #define MONO_ARCH_USE_SIGACTION 1
 207
 208 /*
 209  * some icalls like mono_array_new_va needs to be called using a different
 210  * calling convention.
 211  */
 212 #define MONO_ARCH_VARARG_ICALLS 1
 213
 214 #ifndef PLATFORM_WIN32
 215
 216 #ifdef HAVE_WORKING_SIGALTSTACK
 217
 218 #define MONO_ARCH_SIGSEGV_ON_ALTSTACK
 219
 220 /* NetBSD doesn't define SA_STACK */
 221 #ifndef SA_STACK
 222 #define SA_STACK SA_ONSTACK
 223 #endif
 224 #endif
 225
 226 #endif
 227
 228 #define MONO_ARCH_NO_EMULATE_LONG_SHIFT_OPS
 229 #define MONO_ARCH_NO_EMULATE_LONG_MUL_OPTS
 230
 231 #define MONO_ARCH_EMULATE_CONV_R8_UN    1
 232 #define MONO_ARCH_EMULATE_LCONV_TO_R8_UN 1
 233 #define MONO_ARCH_EMULATE_FREM 1
 234 #define MONO_ARCH_HAVE_IS_INT_OVERFLOW 1
 235
 236 #define MONO_ARCH_ENABLE_EMIT_STATE_OPT 1
 237 #define MONO_ARCH_ENABLE_REGALLOC_IN_EH_BLOCKS 1
 238 #define MONO_ARCH_HAVE_INVALIDATE_METHOD 1
 239 #define MONO_ARCH_HAVE_THROW_CORLIB_EXCEPTION 1
 240 #define MONO_ARCH_HAVE_PIC_AOT 1
 241 #define MONO_ARCH_HAVE_CREATE_TRAMPOLINE_FROM_TOKEN 1
 242 #define MONO_ARCH_HAVE_CREATE_SPECIFIC_TRAMPOLINE 1
 243 #define MONO_ARCH_HAVE_CREATE_DELEGATE_TRAMPOLINE 1
 244 #define MONO_ARCH_HAVE_CREATE_VARS 1
 245
 246 gboolean
 247 mono_amd64_is_sse2 (void);
 248
 249 #endif /* __MONO_MINI_AMD64_H__ */
 250