Implement the new interrupt machinery for ARM
[mono.git] / mono / mini / mini-arm.h
1 #ifndef __MONO_MINI_ARM_H__
2 #define __MONO_MINI_ARM_H__
3
4 #include <mono/arch/arm/arm-codegen.h>
5 #include <mono/utils/mono-context.h>
6 #include <glib.h>
7
8 #if defined(ARM_FPU_NONE) || (defined(__ARM_EABI__) && !defined(ARM_FPU_VFP))
9 #define MONO_ARCH_SOFT_FLOAT 1
10 #endif
11
12 #if defined(__ARM_EABI__)
13 #if G_BYTE_ORDER == G_LITTLE_ENDIAN
14 #define ARM_ARCHITECTURE "armel"
15 #else
16 #define ARM_ARCHITECTURE "armeb"
17 #endif
18 #else
19 #define ARM_ARCHITECTURE "arm"
20 #endif
21
22 #if defined(ARM_FPU_FPA)
23 #define ARM_FP_MODEL "fpa"
24 #elif defined(ARM_FPU_VFP)
25 #define ARM_FP_MODEL "vfp"
26 #elif defined(ARM_FPU_NONE)
27 #define ARM_FP_MODEL "soft-float"
28 #else
29 #error "At least one of ARM_FPU_NONE or ARM_FPU_FPA or ARM_FPU_VFP must be defined."
30 #endif
31
32 #define MONO_ARCH_ARCHITECTURE ARM_ARCHITECTURE "," ARM_FP_MODEL
33
34 #define MONO_ARCH_CPU_SPEC arm_cpu_desc
35
36 #if G_BYTE_ORDER == G_LITTLE_ENDIAN
37 #define ARM_LSW_REG ARMREG_R0
38 #define ARM_MSW_REG ARMREG_R1
39 #else
40 #define ARM_LSW_REG ARMREG_R1
41 #define ARM_MSW_REG ARMREG_R0
42 #endif
43
44 #define MONO_MAX_IREGS 16
45 #define MONO_MAX_FREGS 16
46
47 #define MONO_SAVED_GREGS 10 /* r4-r11, ip, lr */
48 #define MONO_SAVED_FREGS 8
49
50 /* r4-r11, ip, lr: registers saved in the LMF  */
51 #define MONO_ARM_REGSAVE_MASK 0x5ff0
52 #define MONO_ARM_FIRST_SAVED_REG ARMREG_R4
53 #define MONO_ARM_NUM_SAVED_REGS 10
54
55 /* Parameters used by the register allocator */
56
57 #define MONO_ARCH_CALLEE_REGS ((1<<ARMREG_R0) | (1<<ARMREG_R1) | (1<<ARMREG_R2) | (1<<ARMREG_R3) | (1<<ARMREG_IP))
58 #define MONO_ARCH_CALLEE_SAVED_REGS ((1<<ARMREG_V1) | (1<<ARMREG_V2) | (1<<ARMREG_V3) | (1<<ARMREG_V4) | (1<<ARMREG_V5) | (1<<ARMREG_V6) | (1<<ARMREG_V7))
59
60 #ifdef ARM_FPU_VFP
61 /* Every double precision vfp register, d0/d1 is reserved for a scratch reg */
62 #define MONO_ARCH_CALLEE_FREGS 0x55555550
63 #else
64 #define MONO_ARCH_CALLEE_FREGS 0xf
65 #endif
66 #define MONO_ARCH_CALLEE_SAVED_FREGS 0
67
68 #define MONO_ARCH_USE_FPSTACK FALSE
69 #define MONO_ARCH_FPSTACK_SIZE 0
70
71 #define MONO_ARCH_INST_SREG2_MASK(ins) (0)
72
73 #ifdef MONO_ARCH_SOFT_FLOAT
74 #define MONO_ARCH_INST_FIXED_REG(desc) (((desc) == 'l' || (desc == 'f') || (desc == 'g')) ? ARM_LSW_REG: (((desc) == 'a') ? ARMREG_R0 : -1))
75 #define MONO_ARCH_INST_IS_REGPAIR(desc) ((desc) == 'l' || (desc) == 'L' || (desc) == 'f' || (desc) == 'g')
76 #define MONO_ARCH_INST_IS_FLOAT(desc) (FALSE)
77 #else
78 #define MONO_ARCH_INST_FIXED_REG(desc) (((desc) == 'l')? ARM_LSW_REG: (((desc) == 'a') ? ARMREG_R0 : -1))
79 #define MONO_ARCH_INST_IS_REGPAIR(desc) (desc == 'l' || desc == 'L')
80 #define MONO_ARCH_INST_IS_FLOAT(desc) ((desc == 'f') || (desc == 'g'))
81 #endif
82 #define MONO_ARCH_INST_REGPAIR_REG2(desc,hreg1) (desc == 'l'  || (desc == 'f') || (desc == 'g')? ARM_MSW_REG : -1)
83
84 #define MONO_ARCH_FRAME_ALIGNMENT 8
85
86 /* fixme: align to 16byte instead of 32byte (we align to 32byte to get 
87  * reproduceable results for benchmarks */
88 #define MONO_ARCH_CODE_ALIGNMENT 32
89
90 void arm_patch (guchar *code, const guchar *target);
91 guint8* mono_arm_emit_load_imm (guint8 *code, int dreg, guint32 val);
92 int mono_arm_is_rotated_imm8 (guint32 val, gint *rot_amount);
93
94 void
95 mono_arm_throw_exception_by_token (guint32 type_token, unsigned long eip, unsigned long esp, gulong *int_regs, gdouble *fp_regs);
96
97 typedef enum {
98         MONO_ARM_FPU_NONE = 0,
99         MONO_ARM_FPU_FPA = 1,
100         MONO_ARM_FPU_VFP = 2
101 } MonoArmFPU;
102
103 /* keep the size of the structure a multiple of 8 */
104 struct MonoLMF {
105         /* 
106          * If the second lowest bit is set to 1, then this is a MonoLMFExt structure, and
107          * the other fields are not valid.
108          */
109         gpointer    previous_lmf;
110         gpointer    lmf_addr;
111         /* This is only set in trampoline LMF frames */
112         MonoMethod *method;
113         gulong     sp;
114         gulong     ip;
115         gulong     fp;
116         /* all but sp and pc: matches the PUSH instruction layout in the trampolines
117          * 0-4 should be considered undefined (execpt in the magic tramp)
118          * sp is saved at IP.
119          */
120         gulong     iregs [14];
121 };
122
123 typedef struct MonoCompileArch {
124         gpointer seq_point_info_var, ss_trigger_page_var;
125         gpointer seq_point_read_var, seq_point_ss_method_var;
126         gpointer seq_point_bp_method_var;
127         gboolean omit_fp, omit_fp_computed;
128         gpointer cinfo;
129 } MonoCompileArch;
130
131 #define MONO_ARCH_EMULATE_FCONV_TO_I8 1
132 #define MONO_ARCH_EMULATE_LCONV_TO_R8 1
133 #define MONO_ARCH_EMULATE_LCONV_TO_R4 1
134 #define MONO_ARCH_EMULATE_LCONV_TO_R8_UN 1
135 #define MONO_ARCH_EMULATE_FREM 1
136 #define MONO_ARCH_EMULATE_DIV 1
137 #define MONO_ARCH_EMULATE_CONV_R8_UN 1
138 #define MONO_ARCH_EMULATE_MUL_OVF 1
139 //#define MONO_ARCH_BIGMUL_INTRINS 1
140
141 #define ARM_FIRST_ARG_REG 0
142 #define ARM_LAST_ARG_REG 3
143
144 #define MONO_ARCH_USE_SIGACTION 1
145 #define MONO_ARCH_NEED_DIV_CHECK 1
146
147 #define MONO_ARCH_HAVE_CREATE_DELEGATE_TRAMPOLINE
148 #define MONO_ARCH_HAVE_XP_UNWIND 1
149 #define MONO_ARCH_HAVE_GENERALIZED_IMT_THUNK 1
150
151 #define ARM_NUM_REG_ARGS (ARM_LAST_ARG_REG-ARM_FIRST_ARG_REG+1)
152 #define ARM_NUM_REG_FPARGS 0
153
154 #define MONO_ARCH_HAVE_FULL_AOT_TRAMPOLINES 1
155 #define MONO_ARCH_HAVE_IMT 1
156 #define MONO_ARCH_HAVE_STATIC_RGCTX_TRAMPOLINE 1
157 #define MONO_ARCH_HAVE_DECOMPOSE_LONG_OPTS 1
158
159 #define MONO_ARCH_AOT_SUPPORTED 1
160 #define MONO_ARCH_LLVM_SUPPORTED 1
161 #define MONO_ARCH_THIS_AS_FIRST_ARG 1
162
163 #define MONO_ARCH_GSHARED_SUPPORTED 1
164 #define MONO_ARCH_DYN_CALL_SUPPORTED 1
165 #define MONO_ARCH_DYN_CALL_PARAM_AREA 24
166
167 #define MONO_ARCH_SOFT_DEBUG_SUPPORTED 1
168 #define MONO_ARCH_HAVE_EXCEPTIONS_INIT 1
169 #define MONO_ARCH_HAVE_GET_TRAMPOLINES 1
170 #define MONO_ARCH_HAVE_CONTEXT_SET_INT_REG 1
171 #define MONO_ARCH_HAVE_SIGCTX_TO_MONOCTX 1
172 #define MONO_ARCH_GC_MAPS_SUPPORTED 1
173 #define MONO_ARCH_HAVE_SETUP_ASYNC_CALLBACK 1
174
175 /* Matches the HAVE_AEABI_READ_TP define in mini-arm.c */
176 #if defined(__ARM_EABI__) && defined(__linux__) && !defined(TARGET_ANDROID)
177 #define MONO_ARCH_HAVE_TLS_GET 1
178 #endif
179
180 /* ARM doesn't have too many registers, so we have to use a callee saved one */
181 #define MONO_ARCH_RGCTX_REG ARMREG_V5
182 /* First argument reg */
183 #define MONO_ARCH_VTABLE_REG ARMREG_R0
184
185 #define MONO_CONTEXT_SET_LLVM_EXC_REG(ctx, exc) do { (ctx)->regs [0] = (gsize)exc; } while (0)
186
187 #define MONO_INIT_CONTEXT_FROM_FUNC(ctx,func) do {      \
188                 MONO_CONTEXT_SET_BP ((ctx), __builtin_frame_address (0));       \
189                 MONO_CONTEXT_SET_SP ((ctx), __builtin_frame_address (0));       \
190                 MONO_CONTEXT_SET_IP ((ctx), (func));    \
191         } while (0)
192
193 #define MONO_ARCH_INIT_TOP_LMF_ENTRY(lmf)
194
195 void
196 mono_arm_throw_exception (MonoObject *exc, unsigned long eip, unsigned long esp, gulong *int_regs, gdouble *fp_regs);
197
198 void
199 mono_arm_throw_exception_by_token (guint32 type_token, unsigned long eip, unsigned long esp, gulong *int_regs, gdouble *fp_regs);
200
201 void
202 mono_arm_resume_unwind (guint32 dummy1, unsigned long eip, unsigned long esp, gulong *int_regs, gdouble *fp_regs);
203
204 gboolean
205 mono_arm_thumb_supported (void);
206
207 GSList*
208 mono_arm_get_exception_trampolines (gboolean aot) MONO_INTERNAL;
209
210 guint8*
211 mono_arm_get_thumb_plt_entry (guint8 *code) MONO_INTERNAL;
212
213 #endif /* __MONO_MINI_ARM_H__ */
214