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 /* keep the size of the structure a multiple of 8 */
  98 struct MonoLMF {
  99         /*
 100          * If the second lowest bit is set to 1, then this is a MonoLMFExt structure, and
 101          * the other fields are not valid.
 102          */
 103         gpointer    previous_lmf;
 104         gpointer    lmf_addr;
 105         /* This is only set in trampoline LMF frames */
 106         MonoMethod *method;
 107         gulong     esp;
 108         gulong     eip;
 109         /* all but sp and pc: matches the PUSH instruction layout in the trampolines
 110          * 0-4 should be considered undefined (execpt in the magic tramp)
 111          * sp is saved at IP.
 112          */
 113         gulong     iregs [14];
 114 };
 115
 116 typedef struct MonoCompileArch {
 117         gpointer seq_point_info_var, ss_trigger_page_var;
 118         gboolean omit_fp, omit_fp_computed;
 119         gpointer cinfo;
 120 } MonoCompileArch;
 121
 122 #define MONO_ARCH_EMULATE_FCONV_TO_I8 1
 123 #define MONO_ARCH_EMULATE_LCONV_TO_R8 1
 124 #define MONO_ARCH_EMULATE_LCONV_TO_R4 1
 125 #define MONO_ARCH_EMULATE_LCONV_TO_R8_UN 1
 126 #define MONO_ARCH_EMULATE_FREM 1
 127 #define MONO_ARCH_EMULATE_DIV 1
 128 #define MONO_ARCH_EMULATE_CONV_R8_UN 1
 129 #define MONO_ARCH_EMULATE_MUL_OVF 1
 130 //#define MONO_ARCH_BIGMUL_INTRINS 1
 131
 132 #define ARM_FIRST_ARG_REG 0
 133 #define ARM_LAST_ARG_REG 3
 134
 135 #define MONO_ARCH_USE_SIGACTION 1
 136 #define MONO_ARCH_NEED_DIV_CHECK 1
 137
 138 #define MONO_ARCH_HAVE_CREATE_DELEGATE_TRAMPOLINE
 139 #define MONO_ARCH_HAVE_XP_UNWIND 1
 140 #define MONO_ARCH_HAVE_GENERALIZED_IMT_THUNK 1
 141
 142 #define ARM_NUM_REG_ARGS (ARM_LAST_ARG_REG-ARM_FIRST_ARG_REG+1)
 143 #define ARM_NUM_REG_FPARGS 0
 144
 145 #define MONO_ARCH_HAVE_FULL_AOT_TRAMPOLINES 1
 146 #define MONO_ARCH_HAVE_IMT 1
 147 #define MONO_ARCH_HAVE_STATIC_RGCTX_TRAMPOLINE 1
 148 #define MONO_ARCH_HAVE_DECOMPOSE_LONG_OPTS 1
 149
 150 #define MONO_ARCH_AOT_SUPPORTED 1
 151 #define MONO_ARCH_LLVM_SUPPORTED 1
 152 #define MONO_ARCH_THIS_AS_FIRST_ARG 1
 153
 154 #define MONO_ARCH_GSHARED_SUPPORTED 1
 155 #define MONO_ARCH_DYN_CALL_SUPPORTED 1
 156 #define MONO_ARCH_DYN_CALL_PARAM_AREA 24
 157
 158 #define MONO_ARCH_SOFT_DEBUG_SUPPORTED 1
 159 #define MONO_ARCH_HAVE_EXCEPTIONS_INIT 1
 160 #define MONO_ARCH_HAVE_GET_TRAMPOLINES 1
 161
 162 /* Matches the HAVE_AEABI_READ_TP define in mini-arm.c */
 163 #if defined(__ARM_EABI__) && defined(__linux__) && !defined(PLATFORM_ANDROID)
 164 #define MONO_ARCH_HAVE_TLS_GET 1
 165 #endif
 166
 167 /* ARM doesn't have too many registers, so we have to use a callee saved one */
 168 #define MONO_ARCH_RGCTX_REG ARMREG_V5
 169 /* First argument reg */
 170 #define MONO_ARCH_VTABLE_REG ARMREG_R0
 171
 172 #define MONO_CONTEXT_SET_LLVM_EXC_REG(ctx, exc) do { (ctx)->regs [0] = (gsize)exc; } while (0)
 173
 174 #define MONO_INIT_CONTEXT_FROM_FUNC(ctx,func) do {      \
 175                 MONO_CONTEXT_SET_BP ((ctx), __builtin_frame_address (0));       \
 176                 MONO_CONTEXT_SET_SP ((ctx), __builtin_frame_address (0));       \
 177                 MONO_CONTEXT_SET_IP ((ctx), (func));    \
 178         } while (0)
 179
 180 #define MONO_ARCH_INIT_TOP_LMF_ENTRY(lmf)
 181
 182 void
 183 mono_arm_throw_exception (MonoObject *exc, unsigned long eip, unsigned long esp, gulong *int_regs, gdouble *fp_regs);
 184
 185 void
 186 mono_arm_throw_exception_by_token (guint32 type_token, unsigned long eip, unsigned long esp, gulong *int_regs, gdouble *fp_regs);
 187
 188 void
 189 mono_arm_resume_unwind (guint32 dummy1, unsigned long eip, unsigned long esp, gulong *int_regs, gdouble *fp_regs);
 190
 191 gboolean
 192 mono_arm_thumb_supported (void);
 193
 194 GSList*
 195 mono_arm_get_exception_trampolines (gboolean aot) MONO_INTERNAL;
 196
 197 guint8*
 198 mono_arm_get_thumb_plt_entry (guint8 *code) MONO_INTERNAL;
 199
 200 #endif /* __MONO_MINI_ARM_H__ */
 201