2008-08-29 Geoff Norton <gnorton@novell.com>
[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 <glib.h>
6
7 #if defined(ARM_FPU_NONE) || defined(ARM_FPU_VFP) || defined(__ARM_EABI__)
8 #define MONO_ARCH_SOFT_FLOAT 1
9 #endif
10
11 #define MONO_ARCH_CPU_SPEC arm_cpu_desc
12
13 #if G_BYTE_ORDER == G_LITTLE_ENDIAN
14 #define ARM_LSW_REG ARMREG_R0
15 #define ARM_MSW_REG ARMREG_R1
16 #else
17 #define ARM_LSW_REG ARMREG_R1
18 #define ARM_MSW_REG ARMREG_R0
19 #endif
20
21 #define MONO_MAX_IREGS 16
22 #define MONO_MAX_FREGS 16
23
24 #define MONO_SAVED_GREGS 10 /* r4-411, ip, lr */
25 #define MONO_SAVED_FREGS 8
26
27 /* r4-r11, ip, lr: registers saved in the LMF and MonoContext  */
28 #define MONO_ARM_REGSAVE_MASK 0x5ff0
29
30 /* Parameters used by the register allocator */
31
32 #define MONO_ARCH_CALLEE_REGS ((1<<ARMREG_R0) | (1<<ARMREG_R1) | (1<<ARMREG_R2) | (1<<ARMREG_R3) | (1<<ARMREG_IP))
33 #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))
34
35 #define MONO_ARCH_CALLEE_FREGS 0xf
36 #define MONO_ARCH_CALLEE_SAVED_FREGS 0
37
38 #define MONO_ARCH_USE_FPSTACK FALSE
39 #define MONO_ARCH_FPSTACK_SIZE 0
40
41 #define MONO_ARCH_INST_SREG2_MASK(ins) (0)
42
43 #ifdef MONO_ARCH_SOFT_FLOAT
44 #define MONO_ARCH_INST_FIXED_REG(desc) (((desc) == 'l' || (desc == 'f') || (desc == 'g')) ? ARM_LSW_REG: (((desc) == 'a') ? ARMREG_R0 : -1))
45 #define MONO_ARCH_INST_IS_REGPAIR(desc) ((desc) == 'l' || (desc) == 'L' || (desc) == 'f' || (desc) == 'g')
46 #define MONO_ARCH_INST_IS_FLOAT(desc) (FALSE)
47 #else
48 #define MONO_ARCH_INST_FIXED_REG(desc) (((desc) == 'l')? ARM_LSW_REG: (((desc) == 'a') ? ARMREG_R0 : -1))
49 #define MONO_ARCH_INST_IS_REGPAIR(desc) (desc == 'l' || desc == 'L')
50 #define MONO_ARCH_INST_IS_FLOAT(desc) ((desc == 'f') || (desc == 'g'))
51 #endif
52 #define MONO_ARCH_INST_REGPAIR_REG2(desc,hreg1) (desc == 'l'  || (desc == 'f') || (desc == 'g')? ARM_MSW_REG : -1)
53
54 #define MONO_ARCH_FRAME_ALIGNMENT 8
55
56 /* fixme: align to 16byte instead of 32byte (we align to 32byte to get 
57  * reproduceable results for benchmarks */
58 #define MONO_ARCH_CODE_ALIGNMENT 32
59
60 void arm_patch (guchar *code, const guchar *target);
61 guint8* mono_arm_emit_load_imm (guint8 *code, int dreg, guint32 val);
62 int mono_arm_is_rotated_imm8 (guint32 val, gint *rot_amount);
63
64 /* keep the size of the structure a multiple of 8 */
65 struct MonoLMF {
66         gpointer    previous_lmf;
67         gpointer    lmf_addr;
68         MonoMethod *method;
69         gulong     esp;
70         gulong     ebp;
71         gulong     eip;
72         gdouble    fregs [MONO_SAVED_FREGS]; /* 8..15 */
73         /* all but sp and pc: matches the PUSH instruction layout in the trampolines
74          * 0-4 should be considered undefined (execpt in the magic tramp)
75          */
76         gulong     iregs [14];
77 };
78
79 /* we define our own structure and we'll copy the data
80  * from sigcontext/ucontext/mach when we need it.
81  * This also makes us save stack space and time when copying
82  * We might also want to add an additional field to propagate
83  * the original context from the signal handler.
84  */
85 typedef struct {
86         gulong eip;          // pc 
87         gulong ebp;          // fp
88         gulong esp;          // sp
89         gulong regs [MONO_SAVED_GREGS];
90         double fregs [MONO_SAVED_FREGS];
91 } MonoContext;
92
93 typedef struct MonoCompileArch {
94         int dummy;
95 } MonoCompileArch;
96
97 #define MONO_ARCH_EMULATE_FCONV_TO_I8 1
98 #define MONO_ARCH_EMULATE_LCONV_TO_R8 1
99 #define MONO_ARCH_EMULATE_LCONV_TO_R4 1
100 #define MONO_ARCH_EMULATE_LCONV_TO_R8_UN 1
101 #define MONO_ARCH_EMULATE_FREM 1
102 #define MONO_ARCH_EMULATE_DIV 1
103 #define MONO_ARCH_EMULATE_CONV_R8_UN 1
104 //#define MONO_ARCH_BIGMUL_INTRINS 1
105
106 #define ARM_FIRST_ARG_REG 0
107 #define ARM_LAST_ARG_REG 3
108
109 #define MONO_ARCH_USE_SIGACTION 1
110 #define MONO_ARCH_NEED_DIV_CHECK 1
111
112 #define MONO_ARCH_HAVE_THROW_CORLIB_EXCEPTION 1
113 #define MONO_ARCH_HAVE_CREATE_TRAMPOLINE_FROM_TOKEN
114 #define MONO_ARCH_HAVE_CREATE_DELEGATE_TRAMPOLINE
115 #define MONO_ARCH_COMMON_VTABLE_TRAMPOLINE 1
116
117 #define MONO_ARCH_ENABLE_NORMALIZE_OPCODES 1
118
119 #define ARM_NUM_REG_ARGS (ARM_LAST_ARG_REG-ARM_FIRST_ARG_REG+1)
120 #define ARM_NUM_REG_FPARGS 0
121
122 #define MONO_ARCH_HAVE_FULL_AOT_TRAMPOLINES 1
123 #define MONO_ARCH_HAVE_IMT 1
124
125 #define MONO_ARCH_AOT_SUPPORTED 1
126
127 /* ARM doesn't have too many registers, so we have to use a callee saved one */
128 #define MONO_ARCH_RGCTX_REG ARMREG_V5
129 /* First argument reg */
130 #define MONO_ARCH_VTABLE_REG ARMREG_R0
131
132 /* we have the stack pointer, not the base pointer in sigcontext */
133 #define MONO_CONTEXT_SET_IP(ctx,ip) do { (ctx)->eip = (int)ip; } while (0); 
134 #define MONO_CONTEXT_SET_BP(ctx,bp) do { (ctx)->ebp = (int)bp; } while (0); 
135 #define MONO_CONTEXT_SET_SP(ctx,bp) do { (ctx)->esp = (int)bp; } while (0); 
136
137 #define MONO_CONTEXT_GET_IP(ctx) ((gpointer)((ctx)->eip))
138 #define MONO_CONTEXT_GET_BP(ctx) ((gpointer)((ctx)->ebp))
139 #define MONO_CONTEXT_GET_SP(ctx) ((gpointer)((ctx)->esp))
140
141 #define MONO_INIT_CONTEXT_FROM_FUNC(ctx,func) do {      \
142                 MONO_CONTEXT_SET_BP ((ctx), __builtin_frame_address (0));       \
143                 MONO_CONTEXT_SET_SP ((ctx), __builtin_frame_address (0));       \
144                 MONO_CONTEXT_SET_IP ((ctx), (func));    \
145         } while (0)
146
147 #if __APPLE__
148         #define UCONTEXT_REG_PC(ctx) ((ctx)->uc_mcontext->__ss.__pc)
149         #define UCONTEXT_REG_SP(ctx) ((ctx)->uc_mcontext->__ss.__sp)
150         #define UCONTEXT_REG_R4(ctx) ((ctx)->uc_mcontext->__ss.__r[4])
151 #else
152         #define UCONTEXT_REG_PC(ctx) ((ctx)->sig_ctx.arm_pc)
153         #define UCONTEXT_REG_SP(ctx) ((ctx)->sig_ctx.arm_sp)
154         #define UCONTEXT_REG_R4(ctx) ((ctx)->sig_ctx.arm_r4)
155 #endif
156
157 void
158 mono_arm_throw_exception (MonoObject *exc, unsigned long eip, unsigned long esp, gulong *int_regs, gdouble *fp_regs);
159
160 #endif /* __MONO_MINI_ARM_H__ */
161