1 #ifndef __MONO_MINI_IA64_H__
2 #define __MONO_MINI_IA64_H__
6 #include <mono/arch/ia64/ia64-codegen.h>
8 /* FIXME: regset -> 128 bits ! */
10 #define MONO_MAX_IREGS 128
11 #define MONO_MAX_FREGS 128
13 /* Parameters used by the register allocator */
15 #define MONO_ARCH_HAS_XP_LOCAL_REGALLOC
17 /* r8..r11, r14..r29 */
18 #define MONO_ARCH_CALLEE_REGS ((regmask_t)(0x700UL) | (regmask_t)(0x3fffc000UL))
20 /* f6..f15, f33..f127 */
21 /* FIXME: Use the upper 64 bits as well */
22 #define MONO_ARCH_CALLEE_FREGS ((regmask_t)(0xfffffffe00000000UL) | ((regmask_t)(0x3ffUL) << 6))
24 #define MONO_ARCH_CALLEE_SAVED_REGS ~(MONO_ARCH_CALLEE_REGS)
26 #define MONO_ARCH_CALLEE_SAVED_FREGS 0
28 #define MONO_ARCH_USE_FPSTACK FALSE
29 #define MONO_ARCH_FPSTACK_SIZE 0
31 #define MONO_ARCH_INST_FIXED_REG(desc) ((desc == 'r') ? IA64_R8 : ((desc == 'g') ? 8 : -1))
32 #define MONO_ARCH_INST_IS_FLOAT(desc) ((desc == 'f') || (desc == 'g'))
33 #define MONO_ARCH_INST_SREG2_MASK(ins) (0)
34 #define MONO_ARCH_INST_IS_REGPAIR(desc) FALSE
35 #define MONO_ARCH_INST_REGPAIR_REG2(desc,hreg1) (-1)
37 #define MONO_ARCH_IS_GLOBAL_IREG(reg) (is_hard_ireg (reg) && ((reg) >= cfg->arch.reg_local0) && ((reg) < cfg->arch.reg_out0))
39 #define MONO_ARCH_FRAME_ALIGNMENT 16
41 #define MONO_ARCH_CODE_ALIGNMENT 16
43 #define MONO_ARCH_RETREG1 IA64_R8
44 #define MONO_ARCH_FRETREG1 8
46 #define MONO_ARCH_SIGNAL_STACK_SIZE SIGSTKSZ
52 typedef struct MonoContext {
56 typedef struct MonoCompileArch {
57 gint32 stack_alloc_size;
59 gint32 localloc_offset;
64 gint32 reg_saved_ar_pfs;
67 gint32 reg_saved_return_val;
68 guint32 prolog_end_offset, epilog_begin_offset, epilog_end_offset;
69 void *ret_var_addr_local;
70 unw_dyn_region_info_t *r_pro, *r_epilog;
72 Ia64CodegenState code;
74 GHashTable *branch_targets;
77 static inline unw_word_t
78 mono_ia64_context_get_ip (MonoContext *ctx)
83 err = unw_get_reg (&ctx->cursor, UNW_IA64_IP, &ip);
86 /* Subtrack 1 so ip points into the actual instruction */
90 static inline unw_word_t
91 mono_ia64_context_get_sp (MonoContext *ctx)
96 err = unw_get_reg (&ctx->cursor, UNW_IA64_SP, &sp);
102 static inline unw_word_t
103 mono_ia64_context_get_fp (MonoContext *ctx)
105 unw_cursor_t new_cursor;
112 err = unw_get_reg (&ctx->cursor, UNW_IA64_SP, &sp);
115 err = unw_get_reg (&ctx->cursor, UNW_IA64_IP, &ip);
119 /* fp is the SP of the parent frame */
120 new_cursor = ctx->cursor;
122 err = unw_step (&new_cursor);
125 err = unw_get_reg (&new_cursor, UNW_IA64_SP, &fp);
131 #define MONO_CONTEXT_SET_IP(ctx,eip) do { int err = unw_set_reg (&(ctx)->cursor, UNW_IA64_IP, (unw_word_t)(eip)); g_assert (err == 0); } while (0)
132 #define MONO_CONTEXT_SET_BP(ctx,ebp) do { } while (0)
133 #define MONO_CONTEXT_SET_SP(ctx,esp) do { int err = unw_set_reg (&(ctx)->cursor, UNW_IA64_SP, (unw_word_t)(esp)); g_assert (err == 0); } while (0)
135 #define MONO_CONTEXT_GET_IP(ctx) ((gpointer)(mono_ia64_context_get_ip ((ctx))))
136 #define MONO_CONTEXT_GET_BP(ctx) ((gpointer)(mono_ia64_context_get_fp ((ctx))))
137 #define MONO_CONTEXT_GET_SP(ctx) ((gpointer)(mono_ia64_context_get_sp ((ctx))))
139 #define MONO_INIT_CONTEXT_FROM_FUNC(ctx,start_func) do { \
140 MONO_INIT_CONTEXT_FROM_CURRENT (ctx); \
143 #define MONO_INIT_CONTEXT_FROM_CURRENT(ctx) do { \
145 res = unw_getcontext (&unw_ctx); \
146 g_assert (res == 0); \
147 res = unw_init_local (&(ctx)->cursor, &unw_ctx); \
148 g_assert (res == 0); \
151 #define MONO_ARCH_CONTEXT_DEF unw_context_t unw_ctx;
153 #define MONO_ARCH_USE_SIGACTION 1
155 #ifdef HAVE_WORKING_SIGALTSTACK
156 #define MONO_ARCH_SIGSEGV_ON_ALTSTACK
159 unw_dyn_region_info_t* mono_ia64_create_unwind_region (Ia64CodegenState *code);
161 #define MONO_ARCH_NO_EMULATE_LONG_SHIFT_OPS 1
162 #define MONO_ARCH_NO_EMULATE_MUL_IMM 1
164 #define MONO_ARCH_EMULATE_CONV_R8_UN 1
165 #define MONO_ARCH_EMULATE_LCONV_TO_R8_UN 1
166 #define MONO_ARCH_EMULATE_FREM 1
167 #define MONO_ARCH_EMULATE_MUL_DIV 1
168 #define MONO_ARCH_EMULATE_LONG_MUL_OPTS 1
169 #define MONO_ARCH_NEED_DIV_CHECK 1
171 #define MONO_ARCH_HAVE_IS_INT_OVERFLOW 1
173 #define MONO_ARCH_ENABLE_EMIT_STATE_OPT 1
174 #define MONO_ARCH_HAVE_INVALIDATE_METHOD 1
175 #define MONO_ARCH_HAVE_THROW_CORLIB_EXCEPTION 1
176 #define MONO_ARCH_HAVE_PIC_AOT 1
177 #define MONO_ARCH_HAVE_CREATE_TRAMPOLINE_FROM_TOKEN 1
178 #define MONO_ARCH_HAVE_CREATE_SPECIFIC_TRAMPOLINE 1
179 #define MONO_ARCH_HAVE_CREATE_DELEGATE_TRAMPOLINE 1
180 #define MONO_ARCH_HAVE_SAVE_UNWIND_INFO 1
181 #define MONO_ARCH_HAVE_CREATE_VARS 1
183 #endif /* __MONO_MINI_IA64_H__ */