2008-07-09 Zoltan Varga <vargaz@gmail.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: -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: -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 #define MONO_ARCH_AOT_PLT_OFFSET_REG ARMREG_IP
61
62 void arm_patch (guchar *code, const guchar *target);
63 guint8* mono_arm_emit_load_imm (guint8 *code, int dreg, guint32 val);
64
65 /* keep the size of the structure a multiple of 8 */
66 struct MonoLMF {
67         gpointer    previous_lmf;
68         gpointer    lmf_addr;
69         MonoMethod *method;
70         gulong     esp;
71         gulong     ebp;
72         gulong     eip;
73         gdouble    fregs [MONO_SAVED_FREGS]; /* 8..15 */
74         /* all but sp and pc: matches the PUSH instruction layout in the trampolines
75          * 0-4 should be considered undefined (execpt in the magic tramp)
76          */
77         gulong     iregs [14];
78 };
79
80 /* we define our own structure and we'll copy the data
81  * from sigcontext/ucontext/mach when we need it.
82  * This also makes us save stack space and time when copying
83  * We might also want to add an additional field to propagate
84  * the original context from the signal handler.
85  */
86 typedef struct {
87         gulong eip;          // pc 
88         gulong ebp;          // fp
89         gulong esp;          // sp
90         gulong regs [MONO_SAVED_GREGS];
91         double fregs [MONO_SAVED_FREGS];
92 } MonoContext;
93
94 typedef struct MonoCompileArch {
95         int dummy;
96 } MonoCompileArch;
97
98 #define MONO_ARCH_EMULATE_FCONV_TO_I8 1
99 #define MONO_ARCH_EMULATE_LCONV_TO_R8 1
100 #define MONO_ARCH_EMULATE_LCONV_TO_R4 1
101 #define MONO_ARCH_EMULATE_LCONV_TO_R8_UN 1
102 #define MONO_ARCH_EMULATE_FREM 1
103 #define MONO_ARCH_EMULATE_DIV 1
104 #define MONO_ARCH_EMULATE_CONV_R8_UN 1
105 //#define MONO_ARCH_BIGMUL_INTRINS 1
106
107 #define ARM_FIRST_ARG_REG 0
108 #define ARM_LAST_ARG_REG 3
109
110 #define MONO_ARCH_USE_SIGACTION 1
111 #define MONO_ARCH_NEED_DIV_CHECK 1
112
113 #define MONO_ARCH_HAVE_THROW_CORLIB_EXCEPTION 1
114 #define MONO_ARCH_HAVE_CREATE_TRAMPOLINE_FROM_TOKEN
115 #define MONO_ARCH_HAVE_CREATE_DELEGATE_TRAMPOLINE
116 #define MONO_ARCH_COMMON_VTABLE_TRAMPOLINE 1
117
118 #define MONO_ARCH_ENABLE_NORMALIZE_OPCODES 1
119
120 #define ARM_NUM_REG_ARGS (ARM_LAST_ARG_REG-ARM_FIRST_ARG_REG+1)
121 #define ARM_NUM_REG_FPARGS 0
122
123 #define MONO_ARCH_HAVE_FULL_AOT_TRAMPOLINES 1
124 #define MONO_ARCH_HAVE_IMT 1
125
126 #define MONO_ARCH_AOT_SUPPORTED 1
127
128 /* we have the stack pointer, not the base pointer in sigcontext */
129 #define MONO_CONTEXT_SET_IP(ctx,ip) do { (ctx)->eip = (int)ip; } while (0); 
130 #define MONO_CONTEXT_SET_BP(ctx,bp) do { (ctx)->ebp = (int)bp; } while (0); 
131 #define MONO_CONTEXT_SET_SP(ctx,bp) do { (ctx)->esp = (int)bp; } while (0); 
132
133 #define MONO_CONTEXT_GET_IP(ctx) ((gpointer)((ctx)->eip))
134 #define MONO_CONTEXT_GET_BP(ctx) ((gpointer)((ctx)->ebp))
135 #define MONO_CONTEXT_GET_SP(ctx) ((gpointer)((ctx)->esp))
136
137 #define MONO_INIT_CONTEXT_FROM_FUNC(ctx,func) do {      \
138                 MONO_CONTEXT_SET_BP ((ctx), __builtin_frame_address (0));       \
139                 MONO_CONTEXT_SET_SP ((ctx), __builtin_frame_address (0));       \
140                 MONO_CONTEXT_SET_IP ((ctx), (func));    \
141         } while (0)
142
143 #if __APPLE__
144         #define UCONTEXT_REG_PC(ctx) ((ctx)->uc_mcontext->__ss.__pc)
145         #define UCONTEXT_REG_SP(ctx) ((ctx)->uc_mcontext->__ss.__sp)
146         #define UCONTEXT_REG_R4(ctx) ((ctx)->uc_mcontext->__ss.__r[4])
147 #else
148         #define UCONTEXT_REG_PC(ctx) ((ctx)->sig_ctx.arm_pc)
149         #define UCONTEXT_REG_SP(ctx) ((ctx)->sig_ctx.arm_sp)
150         #define UCONTEXT_REG_R4(ctx) ((ctx)->sig_ctx.arm_r4)
151 #endif
152
153 #endif /* __MONO_MINI_ARM_H__ */
154