2006-01-03 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 G_BYTE_ORDER == G_LITTLE_ENDIAN
8 #define ARM_LSW_REG ARMREG_R0
9 #define ARM_MSW_REG ARMREG_R1
10 #else
11 #define ARM_LSW_REG ARMREG_R1
12 #define ARM_MSW_REG ARMREG_R0
13 #endif
14
15 #define MONO_MAX_IREGS 16
16 #define MONO_MAX_FREGS 16
17
18 #define MONO_SAVED_GREGS 10 /* r4-411, ip, lr */
19 #define MONO_SAVED_FREGS 8
20
21 /* r4-r11, ip, lr: registers saved in the LMF and MonoContext  */
22 #define MONO_ARM_REGSAVE_MASK 0x5ff0
23
24 /* Parameters used by the register allocator */
25 #define MONO_ARCH_HAS_XP_LOCAL_REGALLOC
26
27 #define MONO_ARCH_CALLEE_REGS ((1<<ARMREG_R0) | (1<<ARMREG_R1) | (1<<ARMREG_R2) | (1<<ARMREG_R3) | (1<<ARMREG_IP))
28 #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))
29
30 #define MONO_ARCH_CALLEE_FREGS 0xf
31 #define MONO_ARCH_CALLEE_SAVED_FREGS 0
32
33 #define MONO_ARCH_USE_FPSTACK FALSE
34 #define MONO_ARCH_FPSTACK_SIZE 0
35
36 #define MONO_ARCH_INST_FIXED_REG(desc) (((desc) == 'l')? ARM_LSW_REG: -1)
37 #define MONO_ARCH_INST_SREG2_MASK(ins) (0)
38
39 #define MONO_ARCH_INST_IS_REGPAIR(desc) (desc == 'l' || desc == 'L')
40 #define MONO_ARCH_INST_REGPAIR_REG2(desc,hreg1) (desc == 'l' ? ARM_MSW_REG : -1)
41 #define MONO_ARCH_INST_IS_FLOAT(desc) ((desc == 'f') || (desc == 'g'))
42
43 #define MONO_ARCH_FRAME_ALIGNMENT 8
44
45 /* fixme: align to 16byte instead of 32byte (we align to 32byte to get 
46  * reproduceable results for benchmarks */
47 #define MONO_ARCH_CODE_ALIGNMENT 32
48
49 void arm_patch (guchar *code, const guchar *target);
50 guint8* mono_arm_emit_load_imm (guint8 *code, int dreg, guint32 val);
51
52 /* keep the size of the structure a multiple of 8 */
53 struct MonoLMF {
54         gpointer    previous_lmf;
55         gpointer    lmf_addr;
56         MonoMethod *method;
57         gulong     esp;
58         gulong     ebp;
59         gulong     eip;
60         gdouble    fregs [MONO_SAVED_FREGS]; /* 8..15 */
61         /* all but sp and pc: matches the PUSH instruction layout in the trampolines
62          * 0-4 should be considered undefined (execpt in the magic tramp)
63          */
64         gulong     iregs [14];
65 };
66
67 /* we define our own structure and we'll copy the data
68  * from sigcontext/ucontext/mach when we need it.
69  * This also makes us save stack space and time when copying
70  * We might also want to add an additional field to propagate
71  * the original context from the signal handler.
72  */
73 typedef struct {
74         gulong eip;          // pc 
75         gulong ebp;          // fp
76         gulong esp;          // sp
77         gulong regs [MONO_SAVED_GREGS];
78         double fregs [MONO_SAVED_FREGS];
79 } MonoContext;
80
81 typedef struct MonoCompileArch {
82 } MonoCompileArch;
83
84 #define MONO_ARCH_EMULATE_FCONV_TO_I8 1
85 #define MONO_ARCH_EMULATE_LCONV_TO_R8 1
86 #define MONO_ARCH_EMULATE_LCONV_TO_R4 1
87 #define MONO_ARCH_EMULATE_LCONV_TO_R8_UN 1
88 #define MONO_ARCH_EMULATE_FREM 1
89 #define MONO_ARCH_EMULATE_DIV 1
90 #define MONO_ARCH_EMULATE_CONV_R8_UN 1
91 //#define MONO_ARCH_BIGMUL_INTRINS 1
92
93 #define ARM_FIRST_ARG_REG 0
94 #define ARM_LAST_ARG_REG 3
95
96 #define MONO_ARCH_USE_SIGACTION 1
97 #define MONO_ARCH_NEED_DIV_CHECK 1
98
99 #define ARM_NUM_REG_ARGS (ARM_LAST_ARG_REG-ARM_FIRST_ARG_REG+1)
100 #define ARM_NUM_REG_FPARGS 0
101
102 /* we have the stack pointer, not the base pointer in sigcontext */
103 #define MONO_CONTEXT_SET_IP(ctx,ip) do { (ctx)->eip = (int)ip; } while (0); 
104 #define MONO_CONTEXT_SET_BP(ctx,bp) do { (ctx)->ebp = (int)bp; } while (0); 
105 #define MONO_CONTEXT_SET_SP(ctx,bp) do { (ctx)->esp = (int)bp; } while (0); 
106
107 #define MONO_CONTEXT_GET_IP(ctx) ((gpointer)((ctx)->eip))
108 #define MONO_CONTEXT_GET_BP(ctx) ((gpointer)((ctx)->ebp))
109 #define MONO_CONTEXT_GET_SP(ctx) ((gpointer)((ctx)->esp))
110
111 #define MONO_INIT_CONTEXT_FROM_FUNC(ctx,func) do {      \
112                 MONO_CONTEXT_SET_BP ((ctx), __builtin_frame_address (0));       \
113                 MONO_CONTEXT_SET_IP ((ctx), (func));    \
114         } while (0)
115
116 /* __builtin_frame_address (1) is miscompiled with optimizations by gcc, this is just as good. */
117 #define MONO_INIT_CONTEXT_FROM_CALLER(ctx) do { \
118                 MONO_CONTEXT_SET_IP ((ctx), __builtin_return_address (0)); \
119                 MONO_CONTEXT_SET_BP ((ctx), __builtin_frame_address (0)); \
120         } while (0)
121
122 #endif /* __MONO_MINI_ARM_H__ */
123