mono/mini/mini.h

   1 #ifndef __MONO_MINI_H__
   2 #define __MONO_MINI_H__
   3
   4 #include "config.h"
   5 #include <glib.h>
   6 #include <signal.h>
   7 #include <mono/metadata/loader.h>
   8 #include <mono/metadata/mempool.h>
   9 #include <mono/utils/monobitset.h>
  10 #include <mono/metadata/class.h>
  11 #include <mono/metadata/object.h>
  12 #include <mono/metadata/opcodes.h>
  13 #include <mono/metadata/tabledefs.h>
  14 #include <mono/metadata/domain-internals.h>
  15 #include "mono/metadata/class-internals.h"
  16 #include "mono/metadata/object-internals.h"
  17 #include <mono/metadata/profiler-private.h>
  18 #include <mono/metadata/debug-helpers.h>
  19 #include <mono/utils/mono-compiler.h>
  20
  21 #define MONO_BREAKPOINT_ARRAY_SIZE 64
  22
  23 /* C type matching the size of a machine register. Not always the same as 'int' */
  24 /* Note that member 'p' of MonoInst must be the same type, as OP_PCONST is defined
  25  * as one of the OP_ICONST types, so inst_c0 must be the same as inst_p0
  26  */
  27 #if SIZEOF_REGISTER == 4
  28 typedef gint32 mgreg_t;
  29 #elif SIZEOF_REGISTER == 8
  30 typedef gint64 mgreg_t;
  31 #endif
  32
  33 #include "mini-arch.h"
  34 #include "regalloc.h"
  35 #include "declsec.h"
  36 #include "unwind.h"
  37
  38 #ifndef G_LIKELY
  39 #define G_LIKELY(a) (a)
  40 #define G_UNLIKELY(a) (a)
  41 #endif
  42
  43 #ifndef G_MAXINT32
  44 #define G_MAXINT32 2147483647
  45 #endif
  46
  47 #ifndef G_MININT32
  48 #define G_MININT32 (-G_MAXINT32 - 1)
  49 #endif
  50
  51 #if DISABLE_LOGGING
  52 #define MINI_DEBUG(level,limit,code)
  53 #else
  54 #define MINI_DEBUG(level,limit,code) do {if (G_UNLIKELY ((level) >= (limit))) code} while (0)
  55 #endif
  56
  57 #if !defined(DISABLE_TASKLETS) && defined(MONO_ARCH_SUPPORT_TASKLETS) && defined(__GNUC__)
  58 #define MONO_SUPPORT_TASKLETS 1
  59 #endif
  60
  61 #if ENABLE_LLVM
  62 #define COMPILE_LLVM(cfg) ((cfg)->compile_llvm)
  63 #define LLVM_ENABLED TRUE
  64 #else
  65 #define COMPILE_LLVM(cfg) (0)
  66 #define LLVM_ENABLED FALSE
  67 #endif
  68
  69 #define NOT_IMPLEMENTED do { g_assert_not_reached (); } while (0)
  70
  71 /* for 32 bit systems */
  72 #if G_BYTE_ORDER == G_LITTLE_ENDIAN
  73 #define MINI_LS_WORD_IDX 0
  74 #define MINI_MS_WORD_IDX 1
  75 #else
  76 #define MINI_LS_WORD_IDX 1
  77 #define MINI_MS_WORD_IDX 0
  78 #endif
  79 #define MINI_LS_WORD_OFFSET (MINI_LS_WORD_IDX * 4)
  80 #define MINI_MS_WORD_OFFSET (MINI_MS_WORD_IDX * 4)
  81 #define inst_ls_word data.op[MINI_LS_WORD_IDX].const_val
  82 #define inst_ms_word data.op[MINI_MS_WORD_IDX].const_val
  83
  84 #define MONO_FAKE_IMT_METHOD ((MonoMethod*)GINT_TO_POINTER(-1))
  85 #define MONO_FAKE_VTABLE_METHOD ((MonoMethod*)GINT_TO_POINTER(-2))
  86
  87 #ifndef DISABLE_AOT
  88 #define MONO_USE_AOT_COMPILER
  89 #endif
  90
  91 /* Version number of the AOT file format */
  92 #define MONO_AOT_FILE_VERSION "61"
  93
  94 //TODO: This is x86/amd64 specific.
  95 #define mono_simd_shuffle_mask(a,b,c,d) ((a) | ((b) << 2) | ((c) << 4) | ((d) << 6))
  96
  97 /* Constants used to encode different types of methods in AOT */
  98 enum {
  99         MONO_AOT_METHODREF_MIN = 240,
 100         /* Method encoded using its name */
 101         MONO_AOT_METHODREF_WRAPPER_NAME = 250,
 102         /* Runtime provided methods on arrays */
 103         MONO_AOT_METHODREF_ARRAY = 251,
 104         MONO_AOT_METHODREF_NO_AOT_TRAMPOLINE = 252,
 105         /* Wrappers */
 106         MONO_AOT_METHODREF_WRAPPER = 253,
 107         /* Methods on generic instances */
 108         MONO_AOT_METHODREF_GINST = 254,
 109         /* Methods resolve using a METHODSPEC token */
 110         MONO_AOT_METHODREF_METHODSPEC = 255,
 111 };
 112
 113 /* Trampolines which we have a lot of */
 114 typedef enum {
 115         MONO_AOT_TRAMP_SPECIFIC = 0,
 116         MONO_AOT_TRAMP_STATIC_RGCTX = 1,
 117         MONO_AOT_TRAMP_IMT_THUNK = 2,
 118         MONO_AOT_TRAMP_NUM = 3
 119 } MonoAotTrampoline;
 120
 121 typedef enum {
 122         MONO_AOT_FILE_FLAG_WITH_LLVM = 1
 123 } MonoAotFileFlags;
 124
 125 /* This structure is stored in the AOT file */
 126 typedef struct MonoAotFileInfo
 127 {
 128         guint32 plt_got_offset_base;
 129         guint32 got_size;
 130         guint32 plt_size;
 131         guint32 nmethods;
 132         guint32 flags;
 133
 134         guint32 num_trampolines [MONO_AOT_TRAMP_NUM];
 135         guint32 trampoline_got_offset_base [MONO_AOT_TRAMP_NUM];
 136         guint32 trampoline_size [MONO_AOT_TRAMP_NUM];
 137 } MonoAotFileInfo;
 138
 139 /* Per-domain information maintained by the JIT */
 140 typedef struct
 141 {
 142         /* Maps MonoMethod's to a GSList of GOT slot addresses pointing to its code */
 143         GHashTable *jump_target_got_slot_hash;
 144         GHashTable *jump_target_hash;
 145         /* Maps methods/klasses to the address of the given type of trampoline */
 146         GHashTable *class_init_trampoline_hash;
 147         GHashTable *jump_trampoline_hash;
 148         GHashTable *jit_trampoline_hash;
 149         GHashTable *delegate_trampoline_hash;
 150         GHashTable *static_rgctx_trampoline_hash;
 151         GHashTable *llvm_vcall_trampoline_hash;
 152         /* maps MonoMethod -> MonoJitDynamicMethodInfo */
 153         GHashTable *dynamic_code_hash;
 154         GHashTable *method_code_hash;
 155         /* Maps methods to a RuntimeInvokeInfo structure */
 156         GHashTable *runtime_invoke_hash;
 157         /* Maps MonoMethod to a GPtrArray containing sequence point locations */
 158         GHashTable *seq_points;
 159         /* Debugger agent data */
 160         gpointer agent_info;
 161         /* Maps MonoMethod to an arch-specific structure */
 162         GHashTable *arch_seq_points;
 163 } MonoJitDomainInfo;
 164
 165 typedef struct {
 166         MonoJitInfo *ji;
 167         MonoCodeManager *code_mp;
 168 } MonoJitDynamicMethodInfo;
 169
 170 #define domain_jit_info(domain) ((MonoJitDomainInfo*)((domain)->runtime_info))
 171
 172 /* Arch-specific */
 173 typedef struct {
 174         int dummy;
 175 } MonoDynCallInfo;
 176
 177 /*
 178  * Possible frame types returned by the stack walker.
 179  */
 180 typedef enum {
 181         /* Normal managed frames */
 182         FRAME_TYPE_MANAGED = 0,
 183         /* Pseudo frame marking the start of a method invocation done by the soft debugger */
 184         FRAME_TYPE_DEBUGGER_INVOKE = 1,
 185         /* Frame for transitioning to native code */
 186         FRAME_TYPE_MANAGED_TO_NATIVE = 2,
 187         FRAME_TYPE_SENTINEL = 3
 188 } StackFrameType;
 189
 190 /*
 191  * Information about a stack frame
 192  */
 193 typedef struct {
 194         StackFrameType type;
 195         /*
 196          * For FRAME_TYPE_MANAGED.
 197          * For FRAME_TYPE_MANAGED_TO_NATIVE, the ji for the method which transitioned to
 198          * native code, if there is one, else NULL.
 199          */
 200         MonoJitInfo *ji;
 201         /*
 202          * For FRAME_TYPE_MANAGED_TO_NATIVE, it is either the method which transitioned
 203          * to native code, or the method which was JITted.
 204          */
 205         MonoMethod *method;
 206         /* The domain containing the code executed by this frame */
 207         MonoDomain *domain;
 208         gboolean managed;
 209         int native_offset;
 210         int il_offset;
 211 } StackFrameInfo;
 212
 213 #if 0
 214 #define mono_bitset_foreach_bit(set,b,n) \
 215         for (b = 0; b < n; b++)\
 216                 if (mono_bitset_test_fast(set,b))
 217 #define mono_bitset_foreach_bit_rev(set,b,n) \
 218         for (b = n - 1; b >= 0; b--)\
 219                 if (mono_bitset_test_fast(set,b))
 220 #else
 221 #define mono_bitset_foreach_bit(set,b,n) \
 222         for (b = mono_bitset_find_start (set); b < n && b >= 0; b = mono_bitset_find_first (set, b))
 223 #define mono_bitset_foreach_bit_rev(set,b,n) \
 224         for (b = mono_bitset_find_last (set, n - 1); b >= 0; b = b ? mono_bitset_find_last (set, b) : -1)
 225
 226 #endif
 227
 228 /*
 229  * Pull the list of opcodes
 230  */
 231 #define OPDEF(a,b,c,d,e,f,g,h,i,j) \
 232         a = i,
 233
 234 enum {
 235 #include "mono/cil/opcode.def"
 236         CEE_LASTOP
 237 };
 238 #undef OPDEF
 239
 240 #define MONO_VARINFO(cfg,varnum) (&(cfg)->vars [varnum])
 241
 242 #define MONO_INST_NULLIFY_SREGS(dest) do {                              \
 243                 (dest)->sreg1 = (dest)->sreg2 = (dest)->sreg3 = -1;     \
 244         } while (0)
 245
 246 #define MONO_INST_NEW(cfg,dest,op) do { \
 247                 (dest) = mono_mempool_alloc0 ((cfg)->mempool, sizeof (MonoInst));       \
 248                 (dest)->opcode = (op);  \
 249                 (dest)->dreg = -1;                          \
 250                 MONO_INST_NULLIFY_SREGS ((dest));           \
 251         (dest)->cil_code = (cfg)->ip;  \
 252         } while (0)
 253
 254 #define MONO_INST_NEW_CALL(cfg,dest,op) do {    \
 255                 (dest) = mono_mempool_alloc0 ((cfg)->mempool, sizeof (MonoCallInst));   \
 256                 (dest)->inst.opcode = (op);     \
 257                 (dest)->inst.dreg = -1;                                 \
 258                 MONO_INST_NULLIFY_SREGS (&(dest)->inst);                \
 259         (dest)->inst.cil_code = (cfg)->ip;  \
 260         } while (0)
 261
 262 #define MONO_INST_NEW_CALL_ARG(cfg,dest,op) do {        \
 263                 (dest) = mono_mempool_alloc0 ((cfg)->mempool, sizeof (MonoCallArgParm));        \
 264                 (dest)->ins.opcode = (op);      \
 265         } while (0)
 266
 267 #define MONO_ADD_INS(b,inst) do {       \
 268                 if ((b)->last_ins) {    \
 269                         (b)->last_ins->next = (inst);   \
 270             (inst)->prev = (b)->last_ins;   \
 271                         (b)->last_ins = (inst); \
 272                 } else {        \
 273                         (b)->code = (b)->last_ins = (inst);     \
 274                 }       \
 275         } while (0)
 276
 277 #define NULLIFY_INS(ins) do { \
 278         (ins)->opcode = OP_NOP; \
 279         (ins)->dreg = -1;                               \
 280         MONO_INST_NULLIFY_SREGS ((ins));                \
 281                 (ins)->ssa_op = MONO_SSA_NOP; \
 282     } while (0)
 283
 284 /* Remove INS from BB */
 285 #define MONO_REMOVE_INS(bb,ins) do { \
 286         if ((ins)->prev) \
 287             (ins)->prev->next = (ins)->next; \
 288         if ((ins)->next) \
 289             (ins)->next->prev = (ins)->prev; \
 290         if ((bb)->code == (ins)) \
 291             (bb)->code = (ins)->next; \
 292         if ((bb)->last_ins == (ins)) \
 293             (bb)->last_ins = (ins)->prev; \
 294     } while (0)
 295
 296 /* Remove INS from BB and nullify it */
 297 #define MONO_DELETE_INS(bb,ins) do { \
 298         MONO_REMOVE_INS ((bb), (ins)); \
 299         NULLIFY_INS ((ins)); \
 300     } while (0)
 301
 302 /*
 303  * this is used to determine when some branch optimizations are possible: we exclude FP compares
 304  * because they have weird semantics with NaNs.
 305  */
 306 #define MONO_IS_COND_BRANCH_OP(ins) (((ins)->opcode >= OP_LBEQ && (ins)->opcode <= OP_LBLT_UN) || ((ins)->opcode >= OP_FBEQ && (ins)->opcode <= OP_FBLT_UN) || ((ins)->opcode >= OP_IBEQ && (ins)->opcode <= OP_IBLT_UN))
 307 #define MONO_IS_COND_BRANCH_NOFP(ins) (MONO_IS_COND_BRANCH_OP(ins) && !(((ins)->opcode >= OP_FBEQ) && ((ins)->opcode <= OP_FBLT_UN)) && (!(ins)->inst_left || (ins)->inst_left->inst_left->type != STACK_R8))
 308
 309 #define MONO_IS_BRANCH_OP(ins) (MONO_IS_COND_BRANCH_OP(ins) || ((ins)->opcode == OP_BR) || ((ins)->opcode == OP_BR_REG) || ((ins)->opcode == OP_SWITCH))
 310
 311 #define MONO_IS_COND_EXC(ins) ((((ins)->opcode >= OP_COND_EXC_EQ) && ((ins)->opcode <= OP_COND_EXC_LT_UN)) || (((ins)->opcode >= OP_COND_EXC_IEQ) && ((ins)->opcode <= OP_COND_EXC_ILT_UN)))
 312
 313 #define MONO_IS_SETCC(ins) ((((ins)->opcode >= OP_CEQ) && ((ins)->opcode <= OP_CLT_UN)) || (((ins)->opcode >= OP_ICEQ) && ((ins)->opcode <= OP_ICLT_UN)) || (((ins)->opcode >= OP_LCEQ) && ((ins)->opcode <= OP_LCLT_UN)) || (((ins)->opcode >= OP_FCEQ) && ((ins)->opcode <= OP_FCLT_UN)))
 314
 315
 316 #define MONO_IS_LOAD_MEMBASE(ins) (((ins)->opcode >= OP_LOAD_MEMBASE) && ((ins)->opcode <= OP_LOADV_MEMBASE))
 317 #define MONO_IS_STORE_MEMBASE(ins) (((ins)->opcode >= OP_STORE_MEMBASE_REG) && ((ins)->opcode <= OP_STOREV_MEMBASE))
 318 #define MONO_IS_STORE_MEMINDEX(ins) (((ins)->opcode >= OP_STORE_MEMINDEX) && ((ins)->opcode <= OP_STORER8_MEMINDEX))
 319
 320 #define MONO_IS_CALL(ins) (((ins->opcode >= OP_VOIDCALL) && (ins->opcode <= OP_VOIDCALL_MEMBASE)) || ((ins->opcode >= OP_FCALL) && (ins->opcode <= OP_FCALL_MEMBASE)) || ((ins->opcode >= OP_LCALL) && (ins->opcode <= OP_LCALL_MEMBASE)) || ((ins->opcode >= OP_VCALL) && (ins->opcode <= OP_VCALL_MEMBASE)) || ((ins->opcode >= OP_CALL) && (ins->opcode <= OP_CALL_MEMBASE)) || ((ins->opcode >= OP_VCALL2) && (ins->opcode <= OP_VCALL2_MEMBASE)) || (ins->opcode == OP_TAILCALL))
 321
 322 #define MONO_IS_JUMP_TABLE(ins) (((ins)->opcode == OP_JUMP_TABLE) ? TRUE : ((((ins)->opcode == OP_AOTCONST) && (ins->inst_i1 == (gpointer)MONO_PATCH_INFO_SWITCH)) ? TRUE : ((ins)->opcode == OP_SWITCH) ? TRUE : ((((ins)->opcode == OP_GOT_ENTRY) && ((ins)->inst_right->inst_i1 == (gpointer)MONO_PATCH_INFO_SWITCH)) ? TRUE : FALSE)))
 323
 324 #define MONO_JUMP_TABLE_FROM_INS(ins) (((ins)->opcode == OP_JUMP_TABLE) ? (ins)->inst_p0 : (((ins)->opcode == OP_AOTCONST) && (ins->inst_i1 == (gpointer)MONO_PATCH_INFO_SWITCH) ? (ins)->inst_p0 : (((ins)->opcode == OP_SWITCH) ? (ins)->inst_p0 : ((((ins)->opcode == OP_GOT_ENTRY) && ((ins)->inst_right->inst_i1 == (gpointer)MONO_PATCH_INFO_SWITCH)) ? (ins)->inst_right->inst_p0 : NULL))))
 325
 326 /* FIXME: Add more instructions */
 327 #define MONO_INS_HAS_NO_SIDE_EFFECT(ins) (MONO_IS_MOVE (ins) || (ins->opcode == OP_ICONST) || (ins->opcode == OP_I8CONST) || MONO_IS_ZERO (ins) || (ins->opcode == OP_ADD_IMM) || (ins->opcode == OP_R8CONST) || (ins->opcode == OP_LADD_IMM) || (ins->opcode == OP_ISUB_IMM) || (ins->opcode == OP_IADD_IMM) || (ins->opcode == OP_INEG) || (ins->opcode == OP_LNEG) || (ins->opcode == OP_ISUB) || (ins->opcode == OP_CMOV_IGE) || (ins->opcode == OP_ISHL_IMM) || (ins->opcode == OP_ISHR_IMM) || (ins->opcode == OP_ISHR_UN_IMM) || (ins->opcode == OP_IAND_IMM) || (ins->opcode == OP_ICONV_TO_U1) || (ins->opcode == OP_ICONV_TO_I1) || (ins->opcode == OP_SEXT_I4) || (ins->opcode == OP_LCONV_TO_U1) || (ins->opcode == OP_ICONV_TO_U2) || (ins->opcode == OP_ICONV_TO_I2) || (ins->opcode == OP_LCONV_TO_I2))
 328
 329 #define MONO_METHOD_IS_FINAL(m) (((m)->flags & METHOD_ATTRIBUTE_FINAL) || ((m)->klass && ((m)->klass->flags & TYPE_ATTRIBUTE_SEALED)))
 330
 331
 332 #ifdef MONO_ARCH_SIMD_INTRINSICS
 333
 334 #define MONO_IS_PHI(ins) (((ins)->opcode == OP_PHI) || ((ins)->opcode == OP_FPHI) || ((ins)->opcode == OP_VPHI)  || ((ins)->opcode == OP_XPHI))
 335 #define MONO_IS_MOVE(ins) (((ins)->opcode == OP_MOVE) || ((ins)->opcode == OP_FMOVE) || ((ins)->opcode == OP_VMOVE) || ((ins)->opcode == OP_XMOVE))
 336 #define MONO_IS_NON_FP_MOVE(ins) (((ins)->opcode == OP_MOVE) || ((ins)->opcode == OP_VMOVE) || ((ins)->opcode == OP_XMOVE))
 337 #define MONO_IS_REAL_MOVE(ins) (((ins)->opcode == OP_MOVE) || ((ins)->opcode == OP_FMOVE) || ((ins)->opcode == OP_XMOVE))
 338 #define MONO_IS_ZERO(ins) (((ins)->opcode == OP_VZERO) || ((ins)->opcode == OP_XZERO))
 339
 340 #define MONO_CLASS_IS_SIMD(cfg, klass) (((cfg)->opt & MONO_OPT_SIMD) && (klass)->simd_type)
 341
 342 #else
 343
 344 #define MONO_IS_PHI(ins) (((ins)->opcode == OP_PHI) || ((ins)->opcode == OP_FPHI) || ((ins)->opcode == OP_VPHI))
 345 #define MONO_IS_MOVE(ins) (((ins)->opcode == OP_MOVE) || ((ins)->opcode == OP_FMOVE) || ((ins)->opcode == OP_VMOVE))
 346 #define MONO_IS_NON_FP_MOVE(ins) (((ins)->opcode == OP_MOVE) || ((ins)->opcode == OP_VMOVE))
 347 /*A real MOVE is one that isn't decomposed such as a VMOVE or LMOVE*/
 348 #define MONO_IS_REAL_MOVE(ins) (((ins)->opcode == OP_MOVE) || ((ins)->opcode == OP_FMOVE))
 349 #define MONO_IS_ZERO(ins) ((ins)->opcode == OP_VZERO)
 350
 351 #define MONO_CLASS_IS_SIMD(cfg, klass) (0)
 352
 353 #endif
 354
 355 typedef struct MonoInstList MonoInstList;
 356 typedef struct MonoInst MonoInst;
 357 typedef struct MonoCallInst MonoCallInst;
 358 typedef struct MonoCallArgParm MonoCallArgParm;
 359 typedef struct MonoEdge MonoEdge;
 360 typedef struct MonoMethodVar MonoMethodVar;
 361 typedef struct MonoBasicBlock MonoBasicBlock;
 362 typedef struct MonoLMF MonoLMF;
 363 typedef struct MonoSpillInfo MonoSpillInfo;
 364 typedef struct MonoTraceSpec MonoTraceSpec;
 365
 366 extern guint32 mono_jit_tls_id;
 367 extern MonoTraceSpec *mono_jit_trace_calls;
 368 extern gboolean mono_break_on_exc;
 369 extern int mono_exc_esp_offset;
 370 extern gboolean mono_compile_aot;
 371 extern gboolean mono_aot_only;
 372 extern gboolean mono_use_imt;
 373 extern MonoMethodDesc *mono_inject_async_exc_method;
 374 extern int mono_inject_async_exc_pos;
 375 extern MonoMethodDesc *mono_break_at_bb_method;
 376 extern int mono_break_at_bb_bb_num;
 377 extern gboolean check_for_pending_exc;
 378 extern gboolean disable_vtypes_in_regs;
 379 extern gboolean mono_verify_all;
 380 extern gboolean mono_dont_free_global_codeman;
 381 extern gboolean mono_do_x86_stack_align;
 382 extern const char *mono_build_date;
 383 extern gboolean mono_do_signal_chaining;
 384 extern gboolean mono_use_llvm;
 385
 386 #define INS_INFO(opcode) (&ins_info [((opcode) - OP_START - 1) * 4])
 387
 388 extern const char ins_info[];
 389 extern const gint8 ins_sreg_counts [];
 390
 391 #define mono_inst_get_num_src_registers(ins) (ins_sreg_counts [(ins)->opcode - OP_START - 1])
 392 #define mono_inst_get_src_registers(ins, regs) (((regs) [0] = (ins)->sreg1), ((regs) [1] = (ins)->sreg2), ((regs) [2] = (ins)->sreg3), mono_inst_get_num_src_registers ((ins)))
 393
 394 #define MONO_BB_FOR_EACH_INS(bb, ins) for ((ins) = (bb)->code; (ins); (ins) = (ins)->next)
 395
 396 #define MONO_BB_FOR_EACH_INS_SAFE(bb, n, ins) for ((ins) = (bb)->code, n = (ins) ? (ins)->next : NULL; (ins); (ins) = (n), (n) = (ins) ? (ins)->next : NULL)
 397
 398 #define MONO_BB_FOR_EACH_INS_REVERSE_SAFE(bb, p, ins) for ((ins) = (bb)->last_ins, p = (ins) ? (ins)->prev : NULL; (ins); (ins) = (p), (p) = (ins) ? (ins)->prev : NULL)
 399
 400 #define mono_bb_first_ins(bb) (bb)->code
 401
 402 struct MonoEdge {
 403         MonoEdge *next;
 404         MonoBasicBlock *bb;
 405         /* add edge type? */
 406 };
 407
 408 struct MonoSpillInfo {
 409         int offset;
 410 };
 411
 412 /*
 413  * The IR-level extended basic block.
 414  *
 415  * A basic block can have multiple exits just fine, as long as the point of
 416  * 'departure' is the last instruction in the basic block. Extended basic
 417  * blocks, on the other hand, may have instructions that leave the block
 418  * midstream. The important thing is that they cannot be _entered_
 419  * midstream, ie, execution of a basic block (or extened bb) always start
 420  * at the beginning of the block, never in the middle.
 421  */
 422 struct MonoBasicBlock {
 423         MonoInst *last_ins;
 424
 425         /* the next basic block in the order it appears in IL */
 426         MonoBasicBlock *next_bb;
 427
 428         /*
 429          * Before instruction selection it is the first tree in the
 430          * forest and the first item in the list of trees. After
 431          * instruction selection it is the first instruction and the
 432          * first item in the list of instructions.
 433          */
 434         MonoInst *code;
 435
 436         /* unique block number identification */
 437         gint32 block_num;
 438
 439         gint32 dfn;
 440
 441         /* Basic blocks: incoming and outgoing counts and pointers */
 442         /* Each bb should only appear once in each array */
 443         gint16 out_count, in_count;
 444         MonoBasicBlock **in_bb;
 445         MonoBasicBlock **out_bb;
 446
 447         /* Points to the start of the CIL code that initiated this BB */
 448         unsigned char* cil_code;
 449
 450         /* Length of the CIL block */
 451         gint32 cil_length;
 452
 453         /* The address of the generated code, used for fixups */
 454         int native_offset;
 455         int max_offset;
 456         int max_length;
 457
 458         /* Visited and reachable flags */
 459         guint32 flags;
 460
 461         /*
 462          * SSA and loop based flags
 463          */
 464         MonoBitSet *dominators;
 465         MonoBitSet *dfrontier;
 466         MonoBasicBlock *idom;
 467         GSList *dominated;
 468         /* fast dominator algorithm */
 469         MonoBasicBlock *df_parent, *ancestor, *child, *label;
 470         MonoEdge *bucket;
 471         int size, sdom, idomn;
 472
 473         /* loop nesting and recognition */
 474         GList *loop_blocks;
 475         gint8  nesting;
 476         gint8  loop_body_start;
 477
 478         /*
 479          * Whenever the bblock is rarely executed so it should be emitted after
 480          * the function epilog.
 481          */
 482         guint out_of_line : 1;
 483         /* Caches the result of uselessness calculation during optimize_branches */
 484         guint not_useless : 1;
 485         /* Whenever the decompose_array_access_opts () pass needs to process this bblock */
 486         guint has_array_access : 1;
 487         /* Whenever this bblock is extended, ie. it has branches inside it */
 488         guint extended : 1;
 489         /* Whenever this bblock contains a OP_JUMP_TABLE instruction */
 490         guint has_jump_table : 1;
 491         /* Whenever this bblock contains an OP_CALL_HANDLER instruction */
 492         guint has_call_handler : 1;
 493
 494         /* use for liveness analysis */
 495         MonoBitSet *gen_set;
 496         MonoBitSet *kill_set;
 497         MonoBitSet *live_in_set;
 498         MonoBitSet *live_out_set;
 499
 500         /* fields to deal with non-empty stack slots at bb boundary */
 501         guint16 out_scount, in_scount;
 502         MonoInst **out_stack;
 503         MonoInst **in_stack;
 504
 505         /* we use that to prevent merging of bblocks covered by different clauses*/
 506         guint real_offset;
 507
 508         /*
 509          * The region encodes whether the basic block is inside
 510          * a finally, catch, filter or none of these.
 511          *
 512          * If the value is -1, then it is neither finally, catch nor filter
 513          *
 514          * Otherwise the format is:
 515          *
 516          *  Bits: |     0-3      |       4-7      |     8-31
 517          *        |              |                |
 518          *        | clause-flags |   MONO_REGION  | clause-index
 519          *
 520          */
 521         guint region;
 522
 523         /* The current symbolic register number, used in local register allocation. */
 524         guint32 max_vreg;
 525 };
 526
 527 /* BBlock flags */
 528 enum {
 529         BB_VISITED            = 1 << 0,
 530         BB_REACHABLE          = 1 << 1,
 531         BB_EXCEPTION_DEAD_OBJ = 1 << 2,
 532         BB_EXCEPTION_UNSAFE   = 1 << 3,
 533         BB_EXCEPTION_HANDLER  = 1 << 4
 534 };
 535
 536 typedef struct MonoMemcpyArgs {
 537         int size, align;
 538 } MonoMemcpyArgs;
 539
 540 typedef enum {
 541         LLVMArgNone,
 542         LLVMArgInIReg,
 543         LLVMArgInFPReg,
 544         LLVMArgVtypeInReg,
 545         LLVMArgVtypeByVal,
 546         LLVMArgVtypeRetAddr /* On on cinfo->ret */
 547 } LLVMArgStorage;
 548
 549 typedef struct {
 550         LLVMArgStorage storage;
 551
 552         /* Only if storage == ArgValuetypeInReg */
 553         LLVMArgStorage pair_storage [2];
 554 } LLVMArgInfo;
 555
 556 typedef struct {
 557         LLVMArgInfo ret;
 558         /* args [0] is for the this argument if it exists */
 559         LLVMArgInfo args [1];
 560 } LLVMCallInfo;
 561
 562 #define MONO_MAX_SRC_REGS       3
 563
 564 struct MonoInst {
 565         guint16 opcode;
 566         guint8  type; /* stack type */
 567         guint   ssa_op : 3;
 568         guint8  flags  : 5;
 569
 570         /* used by the register allocator */
 571         gint32 dreg, sreg1, sreg2, sreg3;
 572
 573         MonoInst *next, *prev;
 574
 575         union {
 576                 union {
 577                         MonoInst *src;
 578                         MonoMethodVar *var;
 579                         mgreg_t const_val;
 580 #if (SIZEOF_REGISTER > SIZEOF_VOID_P) && (G_BYTE_ORDER == G_BIG_ENDIAN)
 581                         struct {
 582                                 gpointer p[SIZEOF_REGISTER/SIZEOF_VOID_P];
 583                         } pdata;
 584 #else
 585                         gpointer p;
 586 #endif
 587                         MonoMethod *method;
 588                         MonoMethodSignature *signature;
 589                         MonoBasicBlock **many_blocks;
 590                         MonoBasicBlock *target_block;
 591                         MonoInst **args;
 592                         MonoType *vtype;
 593                         MonoClass *klass;
 594                         int *phi_args;
 595                         MonoCallInst *call_inst;
 596                 } op [2];
 597                 gint64 i8const;
 598                 double r8const;
 599         } data;
 600
 601         const unsigned char* cil_code; /* for debugging and bblock splitting */
 602
 603         /* used mostly by the backend to store additional info it may need */
 604         union {
 605                 gint32 reg3;
 606                 gint32 arg_info;
 607                 gint32 size;
 608                 MonoMemcpyArgs *memcpy_args; /* in OP_MEMSET and OP_MEMCPY */
 609                 gpointer data;
 610                 gint shift_amount;
 611                 gboolean is_pinvoke; /* for variables in the unmanaged marshal format */
 612                 gboolean record_cast_details; /* For CEE_CASTCLASS */
 613                 MonoInst *spill_var; /* for OP_ICONV_TO_R8_RAW and OP_FCONV_TO_R8_X */
 614                 guint16 source_opcode; /*OP_XCONV_R8_TO_I4 needs to know which op was used to do proper widening*/
 615         } backend;
 616
 617         MonoClass *klass;
 618 };
 619
 620 struct MonoCallInst {
 621         MonoInst inst;
 622         MonoMethodSignature *signature;
 623         MonoMethod *method;
 624         MonoInst **args;
 625         MonoInst *out_args;
 626         MonoInst *vret_var;
 627         gconstpointer fptr;
 628         guint stack_usage;
 629         guint virtual : 1;
 630         guint tail_call : 1;
 631         /* If this is TRUE, 'fptr' points to a MonoJumpInfo instead of an address. */
 632         guint fptr_is_patch : 1;
 633         /*
 634          * If this is true, then the call returns a vtype in a register using the same
 635          * calling convention as OP_CALL.
 636          */
 637         guint vret_in_reg : 1;
 638         /* Whenever there is an IMT argument and it is dynamic */
 639         guint dynamic_imt_arg : 1;
 640         /* Whenever there is an RGCTX argument */
 641         guint32 rgctx_reg : 1;
 642         regmask_t used_iregs;
 643         regmask_t used_fregs;
 644         GSList *out_ireg_args;
 645         GSList *out_freg_args;
 646 #ifdef ENABLE_LLVM
 647         LLVMCallInfo *cinfo;
 648 #endif
 649 };
 650
 651 struct MonoCallArgParm {
 652         MonoInst ins;
 653         gint32 size;
 654         gint32 offset;
 655         gint32 offPrm;
 656 };
 657
 658 /*
 659  * flags for MonoInst
 660  * Note: some of the values overlap, because they can't appear
 661  * in the same MonoInst.
 662  */
 663 enum {
 664         MONO_INST_HAS_METHOD = 1,
 665         /* temp local created by a DUP: used only within a BB */
 666         MONO_INST_IS_TEMP    = 1,
 667         MONO_INST_INIT       = 1, /* in localloc */
 668         MONO_INST_SINGLE_STEP_LOC = 1, /* in SEQ_POINT */
 669         MONO_INST_IS_DEAD    = 2,
 670         MONO_INST_TAILCALL   = 4,
 671         MONO_INST_VOLATILE   = 4,
 672         MONO_INST_NOTYPECHECK    = 4,
 673         MONO_INST_UNALIGNED  = 8,
 674     MONO_INST_CFOLD_TAKEN = 8, /* On branches */
 675     MONO_INST_CFOLD_NOT_TAKEN = 16, /* On branches */
 676         MONO_INST_DEFINITION_HAS_SIDE_EFFECTS = 8,
 677         /* the address of the variable has been taken */
 678         MONO_INST_INDIRECT   = 16,
 679         MONO_INST_NORANGECHECK   = 16,
 680 };
 681
 682 #define inst_c0 data.op[0].const_val
 683 #define inst_c1 data.op[1].const_val
 684 #define inst_i0 data.op[0].src
 685 #define inst_i1 data.op[1].src
 686 #if (SIZEOF_REGISTER > SIZEOF_VOID_P) && (G_BYTE_ORDER == G_BIG_ENDIAN)
 687 #define inst_p0 data.op[0].pdata.p[SIZEOF_REGISTER/SIZEOF_VOID_P - 1]
 688 #define inst_p1 data.op[1].pdata.p[SIZEOF_REGISTER/SIZEOF_VOID_P - 1]
 689 #else
 690 #define inst_p0 data.op[0].p
 691 #define inst_p1 data.op[1].p
 692 #endif
 693 #define inst_l  data.i8const
 694 #define inst_r  data.r8const
 695 #define inst_left  data.op[0].src
 696 #define inst_right data.op[1].src
 697
 698 #define inst_newa_len   data.op[0].src
 699 #define inst_newa_class data.op[1].klass
 700
 701 #define inst_var    data.op[0].var
 702 #define inst_vtype  data.op[1].vtype
 703 /* in branch instructions */
 704 #define inst_many_bb   data.op[1].many_blocks
 705 #define inst_target_bb data.op[0].target_block
 706 #define inst_true_bb   data.op[1].many_blocks[0]
 707 #define inst_false_bb  data.op[1].many_blocks[1]
 708
 709 #define inst_basereg sreg1
 710 #define inst_indexreg sreg2
 711 #define inst_destbasereg dreg
 712 #define inst_offset data.op[0].const_val
 713 #define inst_imm    data.op[1].const_val
 714 #define inst_call   data.op[1].call_inst
 715
 716 #define inst_phi_args   data.op[1].phi_args
 717
 718 /* instruction description for use in regalloc/scheduling */
 719 enum {
 720         MONO_INST_DEST,
 721         MONO_INST_SRC1,         /* we depend on the SRCs to be consecutive */
 722         MONO_INST_SRC2,
 723         MONO_INST_SRC3,
 724         MONO_INST_LEN,
 725         MONO_INST_CLOB,
 726         /* Unused, commented out to reduce the size of the mdesc tables
 727         MONO_INST_FLAGS,
 728         MONO_INST_COST,
 729         MONO_INST_DELAY,
 730         MONO_INST_RES,
 731         */
 732         MONO_INST_MAX
 733 };
 734
 735 typedef union {
 736         struct {
 737                 guint16 tid; /* tree number */
 738                 guint16 bid; /* block number */
 739         } pos ;
 740         guint32 abs_pos;
 741 } MonoPosition;
 742
 743 typedef struct {
 744         MonoPosition first_use, last_use;
 745 } MonoLiveRange;
 746
 747 typedef struct MonoLiveRange2 MonoLiveRange2;
 748
 749 struct MonoLiveRange2 {
 750         int from, to;
 751         MonoLiveRange2 *next;
 752 };
 753
 754 typedef struct {
 755         /* List of live ranges sorted by 'from' */
 756         MonoLiveRange2 *range;
 757         MonoLiveRange2 *last_range;
 758 } MonoLiveInterval;
 759
 760 /*
 761  * Additional information about a variable
 762  */
 763 struct MonoMethodVar {
 764         guint           idx; /* inside cfg->varinfo, cfg->vars */
 765         MonoLiveRange   range; /* generated by liveness analysis */
 766         MonoLiveInterval *interval; /* generated by liveness analysis */
 767         int             reg; /* != -1 if allocated into a register */
 768         int             spill_costs;
 769         MonoBitSet     *def_in; /* used by SSA */
 770         MonoInst       *def;    /* used by SSA */
 771         MonoBasicBlock *def_bb; /* used by SSA */
 772         GList          *uses;   /* used by SSA */
 773         char            cpstate;  /* used by SSA conditional  constant propagation */
 774         /* The native offsets corresponding to the live range of the variable */
 775         gint32         live_range_start, live_range_end;
 776         /*
 777          * cfg->varinfo [idx]->dreg could be replaced for OP_REGVAR, this contains the
 778          * original vreg.
 779          */
 780         gint32         vreg;
 781 };
 782
 783 typedef struct {
 784         gpointer          end_of_stack;
 785         guint32           stack_size;
 786 #if !defined(HAVE_KW_THREAD) || !defined(MONO_ARCH_ENABLE_MONO_LMF_VAR)
 787         MonoLMF          *lmf;
 788 #endif
 789         MonoLMF          *first_lmf;
 790         gpointer         restore_stack_prot;
 791         guint32          handling_stack_ovf;
 792         gpointer         signal_stack;
 793         guint32          signal_stack_size;
 794         gpointer         stack_ovf_guard_base;
 795         guint32          stack_ovf_guard_size;
 796         void            (*abort_func) (MonoObject *object);
 797         /* Used to implement --debug=casts */
 798         MonoClass       *class_cast_from, *class_cast_to;
 799 } MonoJitTlsData;
 800
 801 typedef enum {
 802 #define PATCH_INFO(a,b) MONO_PATCH_INFO_ ## a,
 803 #include "patch-info.h"
 804 #undef PATCH_INFO
 805         MONO_PATCH_INFO_NUM
 806 } MonoJumpInfoType;
 807
 808 /*
 809  * We need to store the image which the token refers to along with the token,
 810  * since the image might not be the same as the image of the method which
 811  * contains the relocation, because of inlining.
 812  */
 813 typedef struct MonoJumpInfoToken {
 814         MonoImage *image;
 815         guint32 token;
 816         gboolean has_context;
 817         MonoGenericContext context;
 818 } MonoJumpInfoToken;
 819
 820 typedef struct MonoJumpInfoBBTable {
 821         MonoBasicBlock **table;
 822         int table_size;
 823 } MonoJumpInfoBBTable;
 824
 825 typedef struct MonoJumpInfoRgctxEntry MonoJumpInfoRgctxEntry;
 826
 827 /* Contains information describing an LLVM IMT trampoline */
 828 typedef struct MonoJumpInfoImtTramp {
 829         MonoMethod *method;
 830         int vt_offset;
 831 } MonoJumpInfoImtTramp;
 832
 833 typedef struct MonoJumpInfo MonoJumpInfo;
 834 struct MonoJumpInfo {
 835         MonoJumpInfo *next;
 836         union {
 837                 int i;
 838                 guint8 *p;
 839                 MonoInst *label;
 840         } ip;
 841
 842         MonoJumpInfoType type;
 843         union {
 844                 gconstpointer   target;
 845 #if SIZEOF_VOID_P == 8
 846                 gint64          offset;
 847 #else
 848                 int             offset;
 849 #endif
 850                 MonoBasicBlock *bb;
 851                 MonoInst       *inst;
 852                 MonoMethod     *method;
 853                 MonoClass      *klass;
 854                 MonoClassField *field;
 855                 MonoImage      *image;
 856                 MonoVTable     *vtable;
 857                 const char     *name;
 858                 MonoJumpInfoToken  *token;
 859                 MonoJumpInfoBBTable *table;
 860                 MonoJumpInfoRgctxEntry *rgctx_entry;
 861                 MonoJumpInfoImtTramp *imt_tramp;
 862         } data;
 863 };
 864
 865 /* Contains information describing an rgctx entry */
 866 struct MonoJumpInfoRgctxEntry {
 867         MonoMethod *method;
 868         gboolean in_mrgctx;
 869         MonoJumpInfo *data; /* describes the data to be loaded */
 870         int info_type;
 871 };
 872
 873 typedef enum {
 874         MONO_TRAMPOLINE_JIT,
 875         MONO_TRAMPOLINE_JUMP,
 876         MONO_TRAMPOLINE_CLASS_INIT,
 877         MONO_TRAMPOLINE_GENERIC_CLASS_INIT,
 878         MONO_TRAMPOLINE_RGCTX_LAZY_FETCH,
 879         MONO_TRAMPOLINE_AOT,
 880         MONO_TRAMPOLINE_AOT_PLT,
 881         MONO_TRAMPOLINE_DELEGATE,
 882         MONO_TRAMPOLINE_RESTORE_STACK_PROT,
 883         MONO_TRAMPOLINE_GENERIC_VIRTUAL_REMOTING,
 884         MONO_TRAMPOLINE_MONITOR_ENTER,
 885         MONO_TRAMPOLINE_MONITOR_EXIT,
 886 #ifdef MONO_ARCH_LLVM_SUPPORTED
 887         MONO_TRAMPOLINE_LLVM_VCALL,
 888 #endif
 889         MONO_TRAMPOLINE_NUM
 890 } MonoTrampolineType;
 891
 892 #define MONO_TRAMPOLINE_TYPE_MUST_RETURN(t)             \
 893         ((t) == MONO_TRAMPOLINE_CLASS_INIT ||           \
 894          (t) == MONO_TRAMPOLINE_GENERIC_CLASS_INIT ||   \
 895          (t) == MONO_TRAMPOLINE_RESTORE_STACK_PROT ||   \
 896          (t) == MONO_TRAMPOLINE_RGCTX_LAZY_FETCH ||     \
 897          (t) == MONO_TRAMPOLINE_MONITOR_ENTER ||        \
 898          (t) == MONO_TRAMPOLINE_MONITOR_EXIT)
 899
 900 /* optimization flags */
 901 #define OPTFLAG(id,shift,name,descr) MONO_OPT_ ## id = 1 << shift,
 902 enum {
 903 #include "optflags-def.h"
 904         MONO_OPT_LAST
 905 };
 906
 907 /* Bit-fields in the MonoBasicBlock.region */
 908 #define MONO_REGION_TRY       0
 909 #define MONO_REGION_FINALLY  16
 910 #define MONO_REGION_CATCH    32
 911 #define MONO_REGION_FAULT    64         /* Currently unused */
 912 #define MONO_REGION_FILTER  128
 913
 914 #define MONO_BBLOCK_IS_IN_REGION(bblock, regtype) (((bblock)->region & (0xf << 4)) == (regtype))
 915
 916 #define get_vreg_to_inst(cfg, vreg) ((vreg) < (cfg)->vreg_to_inst_len ? (cfg)->vreg_to_inst [(vreg)] : NULL)
 917
 918 #define vreg_is_volatile(cfg, vreg) (G_UNLIKELY (get_vreg_to_inst ((cfg), (vreg)) && (get_vreg_to_inst ((cfg), (vreg))->flags & (MONO_INST_VOLATILE|MONO_INST_INDIRECT))))
 919
 920 /*
 921  * Control Flow Graph and compilation unit information
 922  */
 923 typedef struct {
 924         MonoMethod      *method;
 925         MonoMemPool     *mempool;
 926         MonoInst       **varinfo;
 927         MonoMethodVar   *vars;
 928         MonoInst        *ret;
 929         MonoBasicBlock  *bb_entry;
 930         MonoBasicBlock  *bb_exit;
 931         MonoBasicBlock  *bb_init;
 932         MonoBasicBlock **bblocks;
 933         MonoBasicBlock **cil_offset_to_bb;
 934         MonoMemPool     *state_pool; /* used by instruction selection */
 935         MonoBasicBlock  *cbb;        /* used by instruction selection */
 936         MonoInst        *prev_ins;   /* in decompose */
 937         MonoJumpInfo    *patch_info;
 938         MonoJitInfo     *jit_info;
 939         MonoJitDynamicMethodInfo *dynamic_info;
 940         guint            num_bblocks, max_block_num;
 941         guint            locals_start;
 942         guint            num_varinfo; /* used items in varinfo */
 943         guint            varinfo_count; /* total storage in varinfo */
 944         gint             stack_offset;
 945         gint             max_ireg;
 946         gint             cil_offset_to_bb_len;
 947         gint             locals_min_stack_offset, locals_max_stack_offset;
 948         MonoRegState    *rs;
 949         MonoSpillInfo   *spill_info [16]; /* machine register spills */
 950         gint             spill_count;
 951         gint             spill_info_len [16];
 952         /* unsigned char   *cil_code; */
 953         MonoMethod      *inlined_method; /* the method which is currently inlined */
 954         MonoInst        *domainvar; /* a cache for the current domain */
 955         MonoInst        *got_var; /* Global Offset Table variable */
 956         MonoInst        **locals;
 957         MonoInst        *rgctx_var; /* Runtime generic context variable (for static generic methods) */
 958         MonoInst        **args;
 959         MonoType        **arg_types;
 960         MonoMethod      *current_method; /* The method currently processed by method_to_ir () */
 961         MonoMethod      *method_to_register; /* The method to register in JIT info tables */
 962         MonoGenericContext *generic_context;
 963
 964         /*
 965          * This variable represents the hidden argument holding the vtype
 966          * return address. If the method returns something other than a vtype, or
 967          * the vtype is returned in registers this is NULL.
 968          */
 969         MonoInst        *vret_addr;
 970
 971         /*
 972          * This is used to initialize the cil_code field of MonoInst's.
 973          */
 974         const unsigned char *ip;
 975
 976         struct MonoAliasingInformation *aliasing_info;
 977
 978         /* A hashtable of region ID-> SP var mappings */
 979         /* An SP var is a place to store the stack pointer (used by handlers)*/
 980         GHashTable      *spvars;
 981
 982         /* A hashtable of region ID -> EX var mappings */
 983         /* An EX var stores the exception object passed to catch/filter blocks */
 984         GHashTable      *exvars;
 985
 986         GList           *ldstr_list; /* used by AOT */
 987
 988         MonoDomain      *domain;
 989
 990         guint            real_offset;
 991         GHashTable      *cbb_hash;
 992
 993         /* The current virtual register number */
 994         guint32 next_vreg;
 995
 996         MonoGenericSharingContext *generic_sharing_context;
 997
 998         unsigned char   *cil_start;
 999         unsigned char   *native_code;
1000         guint            code_size;
1001         guint            code_len;
1002         guint            prolog_end;
1003         guint            epilog_begin;
1004         regmask_t        used_int_regs;
1005         guint32          opt;
1006         guint32          prof_options;
1007         guint32          flags;
1008         guint32          comp_done;
1009         guint32          verbose_level;
1010         guint32          stack_usage;
1011         guint32          param_area;
1012         guint32          frame_reg;
1013         gint32           sig_cookie;
1014         guint            disable_aot : 1;
1015         guint            disable_ssa : 1;
1016         guint            disable_llvm : 1;
1017         guint            enable_extended_bblocks : 1;
1018         guint            run_cctors : 1;
1019         guint            need_lmf_area : 1;
1020         guint            compile_aot : 1;
1021         guint            compile_llvm : 1;
1022         guint            got_var_allocated : 1;
1023         guint            ret_var_is_local : 1;
1024         guint            ret_var_set : 1;
1025         guint            globalra : 1;
1026         guint            unverifiable : 1;
1027         guint            skip_visibility : 1;
1028         guint            disable_reuse_registers : 1;
1029         guint            disable_reuse_stack_slots : 1;
1030         guint            disable_initlocals_opt : 1;
1031         guint            disable_omit_fp : 1;
1032         guint            disable_vreg_to_lvreg : 1;
1033         guint            disable_deadce_vars : 1;
1034         guint            extend_live_ranges : 1;
1035         guint            has_got_slots : 1;
1036         guint            uses_rgctx_reg : 1;
1037         guint            uses_vtable_reg : 1;
1038         guint            uses_simd_intrinsics : 1;
1039         guint            keep_cil_nops : 1;
1040         guint            gen_seq_points : 1;
1041         guint            explicit_null_checks : 1;
1042         gpointer         debug_info;
1043         guint32          lmf_offset;
1044     guint16          *intvars;
1045         MonoProfileCoverageInfo *coverage_info;
1046         GHashTable       *token_info_hash;
1047         MonoCompileArch  arch;
1048         guint32          inline_depth;
1049         guint32          exception_type;        /* MONO_EXCEPTION_* */
1050         guint32          exception_data;
1051         char*            exception_message;
1052         gpointer         exception_ptr;
1053
1054         guint8 *         encoded_unwind_ops;
1055         guint32          encoded_unwind_ops_len;
1056         GSList*          unwind_ops;
1057
1058         /* Fields used by the local reg allocator */
1059         void*            reginfo;
1060         int              reginfo_len;
1061
1062         /* Maps vregs to their associated MonoInst's */
1063         /* vregs with an associated MonoInst are 'global' while others are 'local' */
1064         MonoInst **vreg_to_inst;
1065
1066         /* Size of above array */
1067         guint32 vreg_to_inst_len;
1068
1069         /*
1070          * The original method to compile, differs from 'method' when doing generic
1071          * sharing.
1072          */
1073         MonoMethod *orig_method;
1074
1075         /* Patches which describe absolute addresses embedded into the native code */
1076         GHashTable *abs_patches;
1077
1078         /* If the arch passes valuetypes by address, then for methods
1079            which use JMP the arch code should use these local
1080            variables to store the addresses of incoming valuetypes.
1081            The addresses should be stored in mono_arch_emit_prolog()
1082            and can be used when emitting code for OP_JMP.  See
1083            mini-ppc.c. */
1084         MonoInst **tailcall_valuetype_addrs;
1085
1086         /* Used to implement iconv_to_r8_raw on archs that can't do raw
1087         copy between an ireg and a freg. This is an int32 var.*/
1088         MonoInst *iconv_raw_var;
1089
1090         /* Used to implement fconv_to_r8_x. This is a double (8 bytes) var.*/
1091         MonoInst *fconv_to_r8_x_var;
1092
1093         /*Use to implement simd constructors. This is a vector (16 bytes) var.*/
1094         MonoInst *simd_ctor_var;
1095
1096         /* Used to implement dyn_call */
1097         MonoInst *dyn_call_var;
1098
1099         /*
1100          * List of sequence points represented as IL offset+native offset pairs.
1101          * Allocated using glib.
1102          * IL offset can be -1 or 0xffffff to refer to the sequence points
1103          * inside the prolog and epilog used to implement method entry/exit events.
1104          */
1105         GPtrArray *seq_points;
1106
1107         /* Used by AOT */
1108         guint32 got_offset;
1109 } MonoCompile;
1110
1111 typedef enum {
1112         MONO_CFG_HAS_ALLOCA = 1 << 0,
1113         MONO_CFG_HAS_CALLS  = 1 << 1,
1114         MONO_CFG_HAS_LDELEMA  = 1 << 2,
1115         MONO_CFG_HAS_VARARGS  = 1 << 3,
1116         MONO_CFG_HAS_TAIL     = 1 << 4,
1117         MONO_CFG_HAS_FPOUT    = 1 << 5, /* there are fp values passed in int registers */
1118         MONO_CFG_HAS_SPILLUP  = 1 << 6, /* spill var slots are allocated from bottom to top */
1119         MONO_CFG_HAS_CHECK_THIS  = 1 << 7,
1120         MONO_CFG_HAS_ARRAY_ACCESS = 1 << 8
1121 } MonoCompileFlags;
1122
1123 typedef struct {
1124         gulong methods_compiled;
1125         gulong methods_aot;
1126         gulong methods_lookups;
1127         gulong method_trampolines;
1128         gulong allocate_var;
1129         gulong cil_code_size;
1130         gulong native_code_size;
1131         gulong code_reallocs;
1132         gulong max_code_size_ratio;
1133         gulong biggest_method_size;
1134         gulong allocated_code_size;
1135         gulong inlineable_methods;
1136         gulong inlined_methods;
1137         gulong basic_blocks;
1138         gulong max_basic_blocks;
1139         gulong locals_stack_size;
1140         gulong regvars;
1141         gulong cas_declsec_check;
1142         gulong cas_linkdemand_icall;
1143         gulong cas_linkdemand_pinvoke;
1144         gulong cas_linkdemand_aptc;
1145         gulong cas_linkdemand;
1146         gulong cas_demand_generation;
1147         gulong generic_virtual_invocations;
1148         char *max_ratio_method;
1149         char *biggest_method;
1150         gboolean enabled;
1151 } MonoJitStats;
1152
1153 extern MonoJitStats mono_jit_stats;
1154
1155 /* values for MonoInst.ssa_op */
1156 enum {
1157         MONO_SSA_NOP = 0,
1158         MONO_SSA_ADDRESS_TAKEN = 1,
1159         MONO_SSA_LOAD = 2,
1160         MONO_SSA_STORE = 4,
1161         MONO_SSA_LOAD_STORE = MONO_SSA_LOAD|MONO_SSA_STORE,
1162         MONO_SSA_INDIRECT_LOAD = MONO_SSA_LOAD|MONO_SSA_ADDRESS_TAKEN,
1163         MONO_SSA_INDIRECT_STORE = MONO_SSA_STORE|MONO_SSA_ADDRESS_TAKEN,
1164         MONO_SSA_INDIRECT_LOAD_STORE =
1165         MONO_SSA_LOAD|MONO_SSA_STORE|MONO_SSA_ADDRESS_TAKEN
1166 };
1167
1168 /* opcodes: value assigned after all the CIL opcodes */
1169 #ifdef MINI_OP
1170 #undef MINI_OP
1171 #endif
1172 #ifdef MINI_OP3
1173 #undef MINI_OP3
1174 #endif
1175 #define MINI_OP(a,b,dest,src1,src2) a,
1176 #define MINI_OP3(a,b,dest,src1,src2,src3) a,
1177 enum {
1178         OP_START = MONO_CEE_LAST - 1,
1179 #include "mini-ops.h"
1180         OP_LAST
1181 };
1182 #undef MINI_OP
1183 #undef MINI_OP3
1184
1185 #if SIZEOF_VOID_P == 8
1186 #define OP_PCONST OP_I8CONST
1187 #define OP_PADD OP_LADD
1188 #define OP_PADD_IMM OP_LADD_IMM
1189 #define OP_PSUB OP_LSUB
1190 #define OP_PMUL OP_LMUL
1191 #define OP_PMUL_IMM OP_LMUL_IMM
1192 #define OP_PNEG OP_LNEG
1193 #define OP_PCONV_TO_I1 OP_LCONV_TO_I1
1194 #define OP_PCONV_TO_U1 OP_LCONV_TO_U1
1195 #define OP_PCONV_TO_I2 OP_LCONV_TO_I2
1196 #define OP_PCONV_TO_U2 OP_LCONV_TO_U2
1197 #define OP_PCONV_TO_OVF_I1_UN OP_LCONV_TO_OVF_I1_UN
1198 #define OP_PCONV_TO_OVF_I1 OP_LCONV_TO_OVF_I1
1199 #define OP_PBEQ OP_LBEQ
1200 #define OP_PCEQ OP_LCEQ
1201 #define OP_PBNE_UN OP_LBNE_UN
1202 #define OP_PBGE_UN OP_LBGE_UN
1203 #define OP_PBLT_UN OP_LBLT_UN
1204 #define OP_PBGE OP_LBGE
1205 #define OP_STOREP_MEMBASE_REG OP_STOREI8_MEMBASE_REG
1206 #define OP_STOREP_MEMBASE_IMM OP_STOREI8_MEMBASE_IMM
1207 #else
1208 #define OP_PCONST OP_ICONST
1209 #define OP_PADD OP_IADD
1210 #define OP_PADD_IMM OP_IADD_IMM
1211 #define OP_PSUB OP_ISUB
1212 #define OP_PMUL OP_IMUL
1213 #define OP_PMUL_IMM OP_IMUL_IMM
1214 #define OP_PNEG OP_INEG
1215 #define OP_PCONV_TO_I1 OP_ICONV_TO_I1
1216 #define OP_PCONV_TO_U1 OP_ICONV_TO_U1
1217 #define OP_PCONV_TO_I2 OP_ICONV_TO_I2
1218 #define OP_PCONV_TO_U2 OP_ICONV_TO_U2
1219 #define OP_PCONV_TO_OVF_I1_UN OP_ICONV_TO_OVF_I1_UN
1220 #define OP_PCONV_TO_OVF_I1 OP_ICONV_TO_OVF_I1
1221 #define OP_PBEQ OP_IBEQ
1222 #define OP_PCEQ OP_ICEQ
1223 #define OP_PBNE_UN OP_IBNE_UN
1224 #define OP_PBGE_UN OP_IBGE_UN
1225 #define OP_PBLT_UN OP_IBLT_UN
1226 #define OP_PBGE OP_IBGE
1227 #define OP_STOREP_MEMBASE_REG OP_STOREI4_MEMBASE_REG
1228 #define OP_STOREP_MEMBASE_IMM OP_STOREI4_MEMBASE_IMM
1229 #endif
1230
1231 /* Opcodes to load/store regsize quantities */
1232 #ifdef __mono_ilp32__
1233 #define OP_LOADR_MEMBASE OP_LOADI8_MEMBASE
1234 #define OP_STORER_MEMBASE_REG OP_STOREI8_MEMBASE_REG
1235 #else
1236 #define OP_LOADR_MEMBASE OP_LOAD_MEMBASE
1237 #define OP_STORER_MEMBASE_REG OP_STORE_MEMBASE_REG
1238 #endif
1239
1240 typedef enum {
1241         STACK_INV,
1242         STACK_I4,
1243         STACK_I8,
1244         STACK_PTR,
1245         STACK_R8,
1246         STACK_MP,
1247         STACK_OBJ,
1248         STACK_VTYPE,
1249         STACK_MAX
1250 } MonoStackType;
1251
1252 typedef struct {
1253         union {
1254                 double   r8;
1255                 gint32   i4;
1256                 gint64   i8;
1257                 gpointer p;
1258                 MonoClass *klass;
1259         } data;
1260         int type;
1261 } StackSlot;
1262
1263 #if HAVE_ARRAY_ELEM_INIT
1264 extern const guint8 mono_burg_arity [];
1265 #else
1266 extern guint8 mono_burg_arity [];
1267 #endif
1268
1269 extern const char MONO_ARCH_CPU_SPEC [] MONO_INTERNAL;
1270 #define MONO_ARCH_CPU_SPEC_IDX_COMBINE(a) a ## _idx
1271 #define MONO_ARCH_CPU_SPEC_IDX(a) MONO_ARCH_CPU_SPEC_IDX_COMBINE(a)
1272 extern const guint16 MONO_ARCH_CPU_SPEC_IDX(MONO_ARCH_CPU_SPEC) [] MONO_INTERNAL;
1273 #define ins_get_spec(op) ((const char*)&MONO_ARCH_CPU_SPEC + MONO_ARCH_CPU_SPEC_IDX(MONO_ARCH_CPU_SPEC)[(op) - OP_LOAD])
1274
1275 enum {
1276         MONO_COMP_DOM = 1,
1277         MONO_COMP_IDOM = 2,
1278         MONO_COMP_DFRONTIER = 4,
1279         MONO_COMP_DOM_REV = 8,
1280         MONO_COMP_LIVENESS = 16,
1281         MONO_COMP_SSA = 32,
1282         MONO_COMP_SSA_DEF_USE = 64,
1283         MONO_COMP_REACHABILITY = 128,
1284         MONO_COMP_LOOPS = 256
1285 };
1286
1287 typedef enum {
1288         MONO_GRAPH_CFG = 1,
1289         MONO_GRAPH_DTREE = 2,
1290         MONO_GRAPH_CFG_CODE = 4,
1291         MONO_GRAPH_CFG_SSA = 8,
1292         MONO_GRAPH_CFG_OPTCODE = 16
1293 } MonoGraphOptions;
1294
1295 typedef struct {
1296         guint16 size;
1297         guint16 offset;
1298         guint8  pad;
1299 } MonoJitArgumentInfo;
1300
1301 typedef struct {
1302         gboolean handle_sigint;
1303         gboolean keep_delegates;
1304         gboolean collect_pagefault_stats;
1305         gboolean break_on_unverified;
1306         gboolean better_cast_details;
1307         gboolean mdb_optimizations;
1308         gboolean no_gdb_backtrace;
1309         gboolean suspend_on_sigsegv;
1310         gboolean dyn_runtime_invoke;
1311         gboolean gdb;
1312         gboolean gen_seq_points;
1313         gboolean explicit_null_checks;
1314 } MonoDebugOptions;
1315
1316 enum {
1317         BRANCH_NOT_TAKEN,
1318         BRANCH_TAKEN,
1319         BRANCH_UNDEF
1320 };
1321
1322 typedef enum {
1323         CMP_EQ,
1324         CMP_NE,
1325         CMP_LE,
1326         CMP_GE,
1327         CMP_LT,
1328         CMP_GT,
1329         CMP_LE_UN,
1330         CMP_GE_UN,
1331         CMP_LT_UN,
1332         CMP_GT_UN
1333 } CompRelation;
1334
1335 typedef enum {
1336         CMP_TYPE_L,
1337         CMP_TYPE_I,
1338         CMP_TYPE_F
1339 } CompType;
1340
1341 /* Implicit exceptions */
1342 enum {
1343         MONO_EXC_INDEX_OUT_OF_RANGE,
1344         MONO_EXC_OVERFLOW,
1345         MONO_EXC_ARITHMETIC,
1346         MONO_EXC_DIVIDE_BY_ZERO,
1347         MONO_EXC_INVALID_CAST,
1348         MONO_EXC_NULL_REF,
1349         MONO_EXC_ARRAY_TYPE_MISMATCH,
1350         MONO_EXC_INTRINS_NUM
1351 };
1352
1353 enum {
1354         MINI_TOKEN_SOURCE_CLASS,
1355         MINI_TOKEN_SOURCE_METHOD,
1356         MINI_TOKEN_SOURCE_FIELD
1357 };
1358
1359 /*
1360  * This structures contains information about a trampoline function required by
1361  * the AOT compiler in full-aot mode.
1362  */
1363 typedef struct
1364 {
1365         guint8 *code;
1366         guint32 code_size;
1367         char *name;
1368 } MonoAotTrampInfo;
1369
1370 typedef void (*MonoInstFunc) (MonoInst *tree, gpointer data);
1371
1372 /* main function */
1373 int         mono_main                      (int argc, char* argv[]);
1374 void        mono_set_defaults              (int verbose_level, guint32 opts);
1375 MonoDomain* mini_init                      (const char *filename, const char *runtime_version) MONO_INTERNAL;
1376 void        mini_cleanup                   (MonoDomain *domain) MONO_INTERNAL;
1377 MonoDebugOptions *mini_get_debug_options   (void) MONO_INTERNAL;
1378 char*       mono_get_runtime_build_info    (void) MONO_INTERNAL;
1379
1380 /* helper methods */
1381 void      mono_disable_optimizations       (guint32 opts) MONO_INTERNAL;
1382 MonoJumpInfoToken* mono_jump_info_token_new (MonoMemPool *mp, MonoImage *image, guint32 token) MONO_INTERNAL;
1383 MonoJumpInfoToken* mono_jump_info_token_new2 (MonoMemPool *mp, MonoImage *image, guint32 token, MonoGenericContext *context) MONO_INTERNAL;
1384 MonoInst* mono_find_spvar_for_region        (MonoCompile *cfg, int region) MONO_INTERNAL;
1385 void      mono_precompile_assemblies        (void) MONO_INTERNAL;
1386 int       mono_parse_default_optimizations  (const char* p);
1387 void      mono_bblock_add_inst              (MonoBasicBlock *bb, MonoInst *inst) MONO_INTERNAL;
1388 void      mono_bblock_insert_after_ins      (MonoBasicBlock *bb, MonoInst *ins, MonoInst *ins_to_insert) MONO_INTERNAL;
1389 void      mono_bblock_insert_before_ins     (MonoBasicBlock *bb, MonoInst *ins, MonoInst *ins_to_insert) MONO_INTERNAL;
1390 void      mono_verify_bblock                (MonoBasicBlock *bb) MONO_INTERNAL;
1391 void      mono_verify_cfg                   (MonoCompile *cfg) MONO_INTERNAL;
1392 void      mono_constant_fold                (MonoCompile *cfg) MONO_INTERNAL;
1393 MonoInst* mono_constant_fold_ins            (MonoCompile *cfg, MonoInst *ins, MonoInst *arg1, MonoInst *arg2, gboolean overwrite) MONO_INTERNAL;
1394 int       mono_eval_cond_branch             (MonoInst *branch) MONO_INTERNAL;
1395 int       mono_is_power_of_two              (guint32 val) MONO_INTERNAL;
1396 void      mono_cprop_local                  (MonoCompile *cfg, MonoBasicBlock *bb, MonoInst **acp, int acp_size) MONO_INTERNAL;
1397 MonoInst* mono_compile_create_var           (MonoCompile *cfg, MonoType *type, int opcode) MONO_INTERNAL;
1398 MonoInst* mono_compile_create_var_for_vreg  (MonoCompile *cfg, MonoType *type, int opcode, int vreg) MONO_INTERNAL;
1399 void      mono_compile_make_var_load        (MonoCompile *cfg, MonoInst *dest, gssize var_index) MONO_INTERNAL;
1400 MonoInst* mono_compile_create_var_load      (MonoCompile *cfg, gssize var_index) MONO_INTERNAL;
1401 MonoInst* mono_compile_create_var_store     (MonoCompile *cfg, gssize var_index, MonoInst *value) MONO_INTERNAL;
1402 MonoType* mono_type_from_stack_type         (MonoInst *ins) MONO_INTERNAL;
1403 guint32   mono_alloc_ireg                   (MonoCompile *cfg) MONO_INTERNAL;
1404 guint32   mono_alloc_freg                   (MonoCompile *cfg) MONO_INTERNAL;
1405 guint32   mono_alloc_preg                   (MonoCompile *cfg) MONO_INTERNAL;
1406 guint32   mono_alloc_dreg                   (MonoCompile *cfg, MonoStackType stack_type) MONO_INTERNAL;
1407
1408 void      mono_link_bblock                  (MonoCompile *cfg, MonoBasicBlock *from, MonoBasicBlock* to) MONO_INTERNAL;
1409 void      mono_unlink_bblock                (MonoCompile *cfg, MonoBasicBlock *from, MonoBasicBlock* to) MONO_INTERNAL;
1410 gboolean  mono_bblocks_linked               (MonoBasicBlock *bb1, MonoBasicBlock *bb2) MONO_INTERNAL;
1411 void      mono_remove_bblock                (MonoCompile *cfg, MonoBasicBlock *bb) MONO_INTERNAL;
1412 void      mono_nullify_basic_block          (MonoBasicBlock *bb) MONO_INTERNAL;
1413 void      mono_merge_basic_blocks           (MonoCompile *cfg, MonoBasicBlock *bb, MonoBasicBlock *bbn) MONO_INTERNAL;
1414 void      mono_optimize_branches            (MonoCompile *cfg) MONO_INTERNAL;
1415
1416 void      mono_blockset_print               (MonoCompile *cfg, MonoBitSet *set, const char *name, guint idom) MONO_INTERNAL;
1417 void      mono_print_ins_index              (int i, MonoInst *ins) MONO_INTERNAL;
1418 void      mono_print_ins                    (MonoInst *ins) MONO_INTERNAL;
1419 void      mono_print_bb                     (MonoBasicBlock *bb, const char *msg) MONO_INTERNAL;
1420 void      mono_print_code                   (MonoCompile *cfg, const char *msg) MONO_INTERNAL;
1421 void      mono_print_method_from_ip         (void *ip);
1422 char     *mono_pmip                         (void *ip);
1423 const char* mono_inst_name                  (int op);
1424 void      mono_inst_set_src_registers       (MonoInst *ins, int *regs) MONO_INTERNAL;
1425 int       mono_op_to_op_imm                 (int opcode) MONO_INTERNAL;
1426 int       mono_op_imm_to_op                 (int opcode) MONO_INTERNAL;
1427 int       mono_load_membase_to_load_mem     (int opcode) MONO_INTERNAL;
1428 guint     mono_type_to_load_membase         (MonoCompile *cfg, MonoType *type) MONO_INTERNAL;
1429 guint     mono_type_to_store_membase        (MonoCompile *cfg, MonoType *type) MONO_INTERNAL;
1430 guint     mini_type_to_stind                (MonoCompile* cfg, MonoType *type) MONO_INTERNAL;
1431 guint32   mono_reverse_branch_op            (guint32 opcode) MONO_INTERNAL;
1432 void      mono_disassemble_code             (MonoCompile *cfg, guint8 *code, int size, char *id) MONO_INTERNAL;
1433 void      mono_add_patch_info               (MonoCompile *cfg, int ip, MonoJumpInfoType type, gconstpointer target) MONO_INTERNAL;
1434 void      mono_remove_patch_info            (MonoCompile *cfg, int ip) MONO_INTERNAL;
1435 MonoJumpInfo* mono_patch_info_dup_mp        (MonoMemPool *mp, MonoJumpInfo *patch_info) MONO_INTERNAL;
1436 guint     mono_patch_info_hash (gconstpointer data) MONO_INTERNAL;
1437 gint      mono_patch_info_equal (gconstpointer ka, gconstpointer kb) MONO_INTERNAL;
1438 MonoJumpInfo *mono_patch_info_list_prepend  (MonoJumpInfo *list, int ip, MonoJumpInfoType type, gconstpointer target) MONO_INTERNAL;
1439 gpointer  mono_resolve_patch_target         (MonoMethod *method, MonoDomain *domain, guint8 *code, MonoJumpInfo *patch_info, gboolean run_cctors) MONO_INTERNAL;
1440 gpointer  mono_jit_find_compiled_method_with_jit_info (MonoDomain *domain, MonoMethod *method, MonoJitInfo **ji) MONO_INTERNAL;
1441 gpointer  mono_jit_find_compiled_method     (MonoDomain *domain, MonoMethod *method) MONO_INTERNAL;
1442 gpointer  mono_jit_compile_method           (MonoMethod *method) MONO_INTERNAL;
1443 MonoLMF * mono_get_lmf                      (void) MONO_INTERNAL;
1444 MonoLMF** mono_get_lmf_addr                 (void) MONO_INTERNAL;
1445 void      mono_set_lmf                      (MonoLMF *lmf) MONO_INTERNAL;
1446 void      mono_jit_thread_attach            (MonoDomain *domain);
1447 guint32   mono_get_jit_tls_key              (void) MONO_INTERNAL;
1448 gint32    mono_get_jit_tls_offset           (void) MONO_INTERNAL;
1449 gint32    mono_get_lmf_tls_offset           (void) MONO_INTERNAL;
1450 gint32    mono_get_lmf_addr_tls_offset      (void) MONO_INTERNAL;
1451 MonoInst* mono_get_jit_tls_intrinsic        (MonoCompile *cfg) MONO_INTERNAL;
1452 MonoInst* mono_get_domain_intrinsic         (MonoCompile* cfg) MONO_INTERNAL;
1453 GList    *mono_varlist_insert_sorted        (MonoCompile *cfg, GList *list, MonoMethodVar *mv, gboolean sort_end) MONO_INTERNAL;
1454 GList    *mono_varlist_sort                 (MonoCompile *cfg, GList *list, int sort_type) MONO_INTERNAL;
1455 void      mono_analyze_liveness             (MonoCompile *cfg) MONO_INTERNAL;
1456 void      mono_linear_scan                  (MonoCompile *cfg, GList *vars, GList *regs, regmask_t *used_mask) MONO_INTERNAL;
1457 void      mono_global_regalloc              (MonoCompile *cfg) MONO_INTERNAL;
1458 void      mono_create_jump_table            (MonoCompile *cfg, MonoInst *label, MonoBasicBlock **bbs, int num_blocks) MONO_INTERNAL;
1459 int       mono_compile_assembly             (MonoAssembly *ass, guint32 opts, const char *aot_options) MONO_INTERNAL;
1460 MonoCompile *mini_method_compile            (MonoMethod *method, guint32 opts, MonoDomain *domain, gboolean run_cctors, gboolean compile_aot, int parts) MONO_INTERNAL;
1461 void      mono_destroy_compile              (MonoCompile *cfg) MONO_INTERNAL;
1462 MonoJitICallInfo *mono_find_jit_opcode_emulation (int opcode) MONO_INTERNAL;
1463 void      mono_print_ins_index (int i, MonoInst *ins) MONO_INTERNAL;
1464 void      mono_print_ins (MonoInst *ins) MONO_INTERNAL;
1465 gboolean  mini_assembly_can_skip_verification (MonoDomain *domain, MonoMethod *method) MONO_INTERNAL;
1466 gboolean  mini_method_verify (MonoCompile *cfg, MonoMethod *method) MONO_INTERNAL;
1467 MonoInst *mono_get_got_var (MonoCompile *cfg) MONO_INTERNAL;
1468
1469 gboolean  mini_class_is_system_array (MonoClass *klass) MONO_INTERNAL;
1470 MonoMethodSignature *mono_get_element_address_signature (int arity) MONO_INTERNAL;
1471 MonoJitICallInfo    *mono_get_element_address_icall (int rank) MONO_INTERNAL;
1472 MonoJitICallInfo    *mono_get_array_new_va_icall (int rank) MONO_INTERNAL;
1473
1474 void      mono_linterval_add_range          (MonoCompile *cfg, MonoLiveInterval *interval, int from, int to) MONO_INTERNAL;
1475 void      mono_linterval_print              (MonoLiveInterval *interval) MONO_INTERNAL;
1476 void      mono_linterval_print_nl (MonoLiveInterval *interval) MONO_INTERNAL;
1477 gboolean  mono_linterval_covers             (MonoLiveInterval *interval, int pos) MONO_INTERNAL;
1478 gint32    mono_linterval_get_intersect_pos  (MonoLiveInterval *i1, MonoLiveInterval *i2) MONO_INTERNAL;
1479 void      mono_linterval_split              (MonoCompile *cfg, MonoLiveInterval *interval, MonoLiveInterval **i1, MonoLiveInterval **i2, int pos) MONO_INTERNAL;
1480 void      mono_liveness_handle_exception_clauses (MonoCompile *cfg) MONO_INTERNAL;
1481
1482 /* AOT */
1483 void      mono_aot_init                     (void) MONO_INTERNAL;
1484 gpointer  mono_aot_get_method               (MonoDomain *domain,
1485                                                                                          MonoMethod *method) MONO_INTERNAL;
1486 gpointer  mono_aot_get_method_from_token    (MonoDomain *domain, MonoImage *image, guint32 token) MONO_INTERNAL;
1487 gboolean  mono_aot_is_got_entry             (guint8 *code, guint8 *addr) MONO_INTERNAL;
1488 guint8*   mono_aot_get_plt_entry            (guint8 *code) MONO_INTERNAL;
1489 guint32   mono_aot_get_plt_info_offset      (mgreg_t *regs, guint8 *code) MONO_INTERNAL;
1490 gboolean  mono_aot_get_cached_class_info    (MonoClass *klass, MonoCachedClassInfo *res) MONO_INTERNAL;
1491 gboolean  mono_aot_get_class_from_name      (MonoImage *image, const char *name_space, const char *name, MonoClass **klass) MONO_INTERNAL;
1492 MonoJitInfo* mono_aot_find_jit_info         (MonoDomain *domain, MonoImage *image, gpointer addr) MONO_INTERNAL;
1493 gpointer mono_aot_plt_resolve               (gpointer aot_module, guint32 plt_info_offset, guint8 *code) MONO_INTERNAL;
1494 gpointer mono_aot_get_method_from_vt_slot   (MonoDomain *domain, MonoVTable *vtable, int slot) MONO_INTERNAL;
1495 gpointer mono_aot_create_specific_trampoline   (MonoImage *image, gpointer arg1, MonoTrampolineType tramp_type, MonoDomain *domain, guint32 *code_len) MONO_INTERNAL;
1496 gpointer mono_aot_get_named_code            (const char *name) MONO_INTERNAL;
1497 gpointer mono_aot_get_unbox_trampoline      (MonoMethod *method) MONO_INTERNAL;
1498 gpointer mono_aot_get_lazy_fetch_trampoline (guint32 slot) MONO_INTERNAL;
1499 gpointer mono_aot_get_static_rgctx_trampoline (gpointer ctx, gpointer addr) MONO_INTERNAL;
1500 gpointer mono_aot_get_imt_thunk             (MonoVTable *vtable, MonoDomain *domain, MonoIMTCheckItem **imt_entries, int count, gpointer fail_tramp) MONO_INTERNAL;
1501 guint8*  mono_aot_get_unwind_info           (MonoJitInfo *ji, guint32 *unwind_info_len) MONO_INTERNAL;
1502 guint32  mono_aot_method_hash               (MonoMethod *method) MONO_INTERNAL;
1503 char*    mono_aot_wrapper_name              (MonoMethod *method) MONO_INTERNAL;
1504 MonoAotTrampInfo* mono_aot_tramp_info_create (const char *name, guint8 *code, guint32 code_len) MONO_INTERNAL;
1505 guint    mono_aot_str_hash                  (gconstpointer v1) MONO_INTERNAL;
1506 MonoMethod* mono_aot_get_array_helper_from_wrapper (MonoMethod *method) MONO_INTERNAL;
1507 guint32  mono_aot_get_got_offset            (MonoJumpInfo *ji) MONO_INTERNAL;
1508 char*    mono_aot_get_method_name           (MonoCompile *cfg) MONO_INTERNAL;
1509 char*    mono_aot_get_plt_symbol            (MonoJumpInfoType type, gconstpointer data) MONO_INTERNAL;
1510 char*    mono_aot_get_method_debug_name     (MonoCompile *cfg) MONO_INTERNAL;
1511 MonoJumpInfo* mono_aot_patch_info_dup       (MonoJumpInfo* ji) MONO_INTERNAL;
1512
1513 /* This is an exported function */
1514 void     mono_aot_register_globals          (gpointer *globals);
1515 /* This too */
1516 void     mono_aot_register_module           (gpointer *aot_info);
1517
1518 void     mono_xdebug_init                   (char *xdebug_opts) MONO_INTERNAL;
1519 void     mono_save_xdebug_info              (MonoCompile *cfg) MONO_INTERNAL;
1520 void     mono_save_trampoline_xdebug_info   (const char *tramp_name, guint8 *code, guint32 code_size, GSList *unwind_info) MONO_INTERNAL;
1521 /* This is an exported function */
1522 void     mono_xdebug_emit                   (void) MONO_INTERNAL;
1523
1524 /* LLVM backend */
1525 void     mono_llvm_init                     (void) MONO_INTERNAL;
1526 void     mono_llvm_cleanup                  (void) MONO_INTERNAL;
1527 void     mono_llvm_emit_method              (MonoCompile *cfg) MONO_INTERNAL;
1528 void     mono_llvm_emit_call                (MonoCompile *cfg, MonoCallInst *call) MONO_INTERNAL;
1529 void     mono_llvm_create_aot_module        (const char *got_symbol) MONO_INTERNAL;
1530 void     mono_llvm_emit_aot_module          (const char *filename, int got_size) MONO_INTERNAL;
1531
1532 gboolean  mono_method_blittable             (MonoMethod *method) MONO_INTERNAL;
1533 gboolean  mono_method_same_domain           (MonoJitInfo *caller, MonoJitInfo *callee) MONO_INTERNAL;
1534
1535 void      mono_register_opcode_emulation    (int opcode, const char* name, const char *sigstr, gpointer func, gboolean no_throw) MONO_INTERNAL;
1536 void      mono_draw_graph                   (MonoCompile *cfg, MonoGraphOptions draw_options) MONO_INTERNAL;
1537 void      mono_add_ins_to_end               (MonoBasicBlock *bb, MonoInst *inst) MONO_INTERNAL;
1538 gpointer  mono_create_ftnptr                (MonoDomain *domain, gpointer addr) MONO_INTERNAL;
1539
1540 void      mono_replace_ins                  (MonoCompile *cfg, MonoBasicBlock *bb, MonoInst *ins, MonoInst **prev, MonoBasicBlock *first_bb, MonoBasicBlock *last_bb);
1541
1542 int               mono_find_method_opcode      (MonoMethod *method) MONO_INTERNAL;
1543 MonoJitICallInfo *mono_find_jit_icall_by_name  (const char *name) MONO_INTERNAL;
1544 MonoJitICallInfo *mono_find_jit_icall_by_addr  (gconstpointer addr) MONO_INTERNAL;
1545 MonoJitICallInfo *mono_register_jit_icall      (gconstpointer func, const char *name, MonoMethodSignature *sig, gboolean is_save) MONO_INTERNAL;
1546 gconstpointer     mono_icall_get_wrapper       (MonoJitICallInfo* callinfo) MONO_INTERNAL;
1547
1548 void              mono_trampolines_init (void) MONO_INTERNAL;
1549 void              mono_trampolines_cleanup (void) MONO_INTERNAL;
1550 guint8 *          mono_get_trampoline_code (MonoTrampolineType tramp_type) MONO_INTERNAL;
1551 gpointer          mono_create_specific_trampoline (gpointer arg1, MonoTrampolineType tramp_type, MonoDomain *domain, guint32 *code_len) MONO_INTERNAL;
1552 gpointer          mono_create_jump_trampoline (MonoDomain *domain,
1553                                                                                            MonoMethod *method,
1554                                                                                            gboolean add_sync_wrapper) MONO_INTERNAL;
1555 gpointer          mono_create_class_init_trampoline (MonoVTable *vtable) MONO_INTERNAL;
1556 gpointer          mono_create_generic_class_init_trampoline (void) MONO_INTERNAL;
1557 gpointer          mono_create_jit_trampoline (MonoMethod *method) MONO_INTERNAL;
1558 gpointer          mono_create_jit_trampoline_from_token (MonoImage *image, guint32 token) MONO_INTERNAL;
1559 gpointer          mono_create_jit_trampoline_in_domain (MonoDomain *domain, MonoMethod *method) MONO_INTERNAL;
1560 gpointer          mono_create_delegate_trampoline (MonoClass *klass) MONO_INTERNAL;
1561 gpointer          mono_create_rgctx_lazy_fetch_trampoline (guint32 offset) MONO_INTERNAL;
1562 gpointer          mono_create_monitor_enter_trampoline (void) MONO_INTERNAL;
1563 gpointer          mono_create_monitor_exit_trampoline (void) MONO_INTERNAL;
1564 gpointer          mono_create_static_rgctx_trampoline (MonoMethod *m, gpointer addr) MONO_INTERNAL;
1565 gpointer          mono_create_llvm_vcall_trampoline (MonoMethod *method) MONO_INTERNAL;
1566 gpointer          mono_create_llvm_imt_trampoline (MonoDomain *domain, MonoMethod *m, int vt_offset) MONO_INTERNAL;
1567 MonoVTable*       mono_find_class_init_trampoline_by_addr (gconstpointer addr) MONO_INTERNAL;
1568 guint32           mono_find_rgctx_lazy_fetch_trampoline_by_addr (gconstpointer addr) MONO_INTERNAL;
1569 gpointer          mono_magic_trampoline (mgreg_t *regs, guint8 *code, gpointer arg, guint8* tramp) MONO_INTERNAL;
1570 gpointer          mono_generic_virtual_remoting_trampoline (mgreg_t *regs, guint8 *code, MonoMethod *m, guint8 *tramp) MONO_INTERNAL;
1571 gpointer          mono_delegate_trampoline (mgreg_t *regs, guint8 *code, gpointer *tramp_data, guint8* tramp) MONO_INTERNAL;
1572 gpointer          mono_aot_trampoline (mgreg_t *regs, guint8 *code, guint8 *token_info,
1573                                                                            guint8* tramp) MONO_INTERNAL;
1574 gpointer          mono_aot_plt_trampoline (mgreg_t *regs, guint8 *code, guint8 *token_info,
1575                                                                                    guint8* tramp) MONO_INTERNAL;
1576 void              mono_class_init_trampoline (mgreg_t *regs, guint8 *code, MonoVTable *vtable, guint8 *tramp) MONO_INTERNAL;
1577 void              mono_generic_class_init_trampoline (mgreg_t *regs, guint8 *code, MonoVTable *vtable, guint8 *tramp) MONO_INTERNAL;
1578 void              mono_monitor_enter_trampoline (mgreg_t *regs, guint8 *code, MonoObject *obj, guint8 *tramp) MONO_INTERNAL;
1579 void              mono_monitor_exit_trampoline (mgreg_t *regs, guint8 *code, MonoObject *obj, guint8 *tramp) MONO_INTERNAL;
1580 gconstpointer     mono_get_trampoline_func (MonoTrampolineType tramp_type);
1581 gpointer          mini_get_vtable_trampoline (void) MONO_INTERNAL;
1582 gpointer*         mono_get_vcall_slot_addr (guint8* code, mgreg_t *regs) MONO_INTERNAL;
1583
1584 gboolean          mono_running_on_valgrind (void) MONO_INTERNAL;
1585 void*             mono_global_codeman_reserve (int size) MONO_INTERNAL;
1586 const char       *mono_regname_full (int reg, int bank) MONO_INTERNAL;
1587 gint32*           mono_allocate_stack_slots_full (MonoCompile *cfg, gboolean backward, guint32 *stack_size, guint32 *stack_align) MONO_INTERNAL;
1588 gint32*           mono_allocate_stack_slots (MonoCompile *cfg, guint32 *stack_size, guint32 *stack_align) MONO_INTERNAL;
1589 void              mono_local_regalloc (MonoCompile *cfg, MonoBasicBlock *bb) MONO_INTERNAL;
1590 MonoInst         *mono_branch_optimize_exception_target (MonoCompile *cfg, MonoBasicBlock *bb, const char * exname) MONO_INTERNAL;
1591 void              mono_remove_critical_edges (MonoCompile *cfg) MONO_INTERNAL;
1592 gboolean          mono_is_regsize_var (MonoType *t) MONO_INTERNAL;
1593 void              mini_emit_memcpy (MonoCompile *cfg, int destreg, int doffset, int srcreg, int soffset, int size, int align) MONO_INTERNAL;
1594 CompRelation      mono_opcode_to_cond (int opcode) MONO_INTERNAL;
1595 CompType          mono_opcode_to_type (int opcode, int cmp_opcode) MONO_INTERNAL;
1596 CompRelation      mono_negate_cond (CompRelation cond) MONO_INTERNAL;
1597 int               mono_op_imm_to_op (int opcode) MONO_INTERNAL;
1598 void              mono_decompose_op_imm (MonoCompile *cfg, MonoBasicBlock *bb, MonoInst *ins) MONO_INTERNAL;
1599 void              mono_peephole_ins (MonoBasicBlock *bb, MonoInst *ins) MONO_INTERNAL;
1600 MonoUnwindOp     *mono_create_unwind_op (int when,
1601                                                                                  int tag, int reg,
1602                                                                                  int val) MONO_INTERNAL;
1603 void              mono_emit_unwind_op (MonoCompile *cfg, int when,
1604                                                                            int tag, int reg,
1605                                                                            int val) MONO_INTERNAL;
1606
1607 int               mono_method_to_ir (MonoCompile *cfg, MonoMethod *method, MonoBasicBlock *start_bblock, MonoBasicBlock *end_bblock,
1608                                                                          MonoInst *return_var, GList *dont_inline, MonoInst **inline_args,
1609                                                                          guint inline_offset, gboolean is_virtual_call) MONO_INTERNAL;
1610
1611 MonoInst         *mono_decompose_opcode (MonoCompile *cfg, MonoInst *ins) MONO_INTERNAL;
1612 void              mono_decompose_long_opts (MonoCompile *cfg) MONO_INTERNAL;
1613 void              mono_decompose_vtype_opts (MonoCompile *cfg) MONO_INTERNAL;
1614 void              mono_decompose_array_access_opts (MonoCompile *cfg) MONO_INTERNAL;
1615 void              mono_decompose_soft_float (MonoCompile *cfg) MONO_INTERNAL;
1616 void              mono_handle_global_vregs (MonoCompile *cfg) MONO_INTERNAL;
1617 void              mono_spill_global_vars (MonoCompile *cfg, gboolean *need_local_opts) MONO_INTERNAL;
1618 void              mono_if_conversion (MonoCompile *cfg) MONO_INTERNAL;
1619
1620 /* methods that must be provided by the arch-specific port */
1621 void      mono_arch_init                        (void) MONO_INTERNAL;
1622 void      mono_arch_cleanup                     (void) MONO_INTERNAL;
1623 void      mono_arch_cpu_init                    (void) MONO_INTERNAL;
1624 guint32   mono_arch_cpu_optimizazions           (guint32 *exclude_mask) MONO_INTERNAL;
1625 void      mono_arch_instrument_mem_needs        (MonoMethod *method, int *stack, int *code) MONO_INTERNAL;
1626 void     *mono_arch_instrument_prolog           (MonoCompile *cfg, void *func, void *p, gboolean enable_arguments) MONO_INTERNAL;
1627 void     *mono_arch_instrument_epilog           (MonoCompile *cfg, void *func, void *p, gboolean enable_arguments) MONO_INTERNAL;
1628 void     *mono_arch_instrument_epilog_full     (MonoCompile *cfg, void *func, void *p, gboolean enable_arguments, gboolean preserve_argument_registers) MONO_INTERNAL;
1629 void      mono_codegen                          (MonoCompile *cfg) MONO_INTERNAL;
1630 void      mono_call_inst_add_outarg_reg         (MonoCompile *cfg, MonoCallInst *call, int vreg, int hreg, gboolean fp) MONO_INTERNAL;
1631 const char *mono_arch_regname                   (int reg) MONO_INTERNAL;
1632 const char *mono_arch_fregname                  (int reg) MONO_INTERNAL;
1633 gpointer  mono_arch_get_throw_exception         (void) MONO_INTERNAL;
1634 gpointer  mono_arch_get_rethrow_exception       (void) MONO_INTERNAL;
1635 gpointer  mono_arch_get_throw_exception_by_name (void) MONO_INTERNAL;
1636 gpointer  mono_arch_get_throw_corlib_exception  (void) MONO_INTERNAL;
1637 void      mono_arch_exceptions_init             (void) MONO_INTERNAL;
1638 guchar*   mono_arch_create_trampoline_code      (MonoTrampolineType tramp_type) MONO_INTERNAL;
1639 guchar*   mono_arch_create_trampoline_code_full (MonoTrampolineType tramp_type, guint32 *code_size, MonoJumpInfo **ji, GSList **out_unwind_ops, gboolean aot) MONO_INTERNAL;
1640 gpointer  mono_arch_create_rgctx_lazy_fetch_trampoline (guint32 slot) MONO_INTERNAL;
1641 gpointer  mono_arch_create_rgctx_lazy_fetch_trampoline_full (guint32 slot, guint32 *code_size, MonoJumpInfo **ji, gboolean aot) MONO_INTERNAL;
1642 gpointer  mono_arch_create_generic_class_init_trampoline (void) MONO_INTERNAL;
1643 gpointer  mono_arch_get_nullified_class_init_trampoline (guint32 *code_len) MONO_INTERNAL;
1644 gpointer  mono_arch_create_monitor_enter_trampoline (void) MONO_INTERNAL;
1645 gpointer  mono_arch_create_monitor_exit_trampoline (void) MONO_INTERNAL;
1646 gpointer  mono_arch_create_monitor_enter_trampoline_full (guint32 *code_size, MonoJumpInfo **ji, gboolean aot) MONO_INTERNAL;
1647 gpointer  mono_arch_create_monitor_exit_trampoline_full (guint32 *code_size, MonoJumpInfo **ji, gboolean aot) MONO_INTERNAL;
1648 gpointer  mono_arch_create_generic_class_init_trampoline_full (guint32 *code_size, MonoJumpInfo **ji, gboolean aot) MONO_INTERNAL;
1649 GList    *mono_arch_get_allocatable_int_vars    (MonoCompile *cfg) MONO_INTERNAL;
1650 GList    *mono_arch_get_global_int_regs         (MonoCompile *cfg) MONO_INTERNAL;
1651 GList    *mono_arch_get_global_fp_regs          (MonoCompile *cfg) MONO_INTERNAL;
1652 GList    *mono_arch_get_iregs_clobbered_by_call (MonoCallInst *call) MONO_INTERNAL;
1653 GList    *mono_arch_get_fregs_clobbered_by_call (MonoCallInst *call) MONO_INTERNAL;
1654 guint32   mono_arch_regalloc_cost               (MonoCompile *cfg, MonoMethodVar *vmv) MONO_INTERNAL;
1655 void      mono_arch_patch_code                  (MonoMethod *method, MonoDomain *domain, guint8 *code, MonoJumpInfo *ji, gboolean run_cctors) MONO_INTERNAL;
1656 void      mono_arch_flush_icache                (guint8 *code, gint size) MONO_INTERNAL;
1657 int       mono_arch_max_epilog_size             (MonoCompile *cfg) MONO_INTERNAL;
1658 guint8   *mono_arch_emit_prolog                 (MonoCompile *cfg) MONO_INTERNAL;
1659 void      mono_arch_emit_epilog                 (MonoCompile *cfg) MONO_INTERNAL;
1660 void      mono_arch_emit_exceptions             (MonoCompile *cfg) MONO_INTERNAL;
1661 void      mono_arch_lowering_pass               (MonoCompile *cfg, MonoBasicBlock *bb) MONO_INTERNAL;
1662 void      mono_arch_peephole_pass_1             (MonoCompile *cfg, MonoBasicBlock *bb) MONO_INTERNAL;
1663 void      mono_arch_peephole_pass_2             (MonoCompile *cfg, MonoBasicBlock *bb) MONO_INTERNAL;
1664 void      mono_arch_output_basic_block          (MonoCompile *cfg, MonoBasicBlock *bb) MONO_INTERNAL;
1665 gboolean  mono_arch_has_unwind_info             (gconstpointer addr) MONO_INTERNAL;
1666 void      mono_arch_setup_jit_tls_data          (MonoJitTlsData *tls) MONO_INTERNAL;
1667 void      mono_arch_free_jit_tls_data           (MonoJitTlsData *tls) MONO_INTERNAL;
1668 void      mono_arch_fill_argument_info          (MonoCompile *cfg) MONO_INTERNAL;
1669 void      mono_arch_allocate_vars               (MonoCompile *m) MONO_INTERNAL;
1670 int       mono_arch_get_argument_info           (MonoMethodSignature *csig, int param_count, MonoJitArgumentInfo *arg_info) MONO_INTERNAL;
1671 gboolean  mono_arch_print_tree                  (MonoInst *tree, int arity) MONO_INTERNAL;
1672 void      mono_arch_emit_call                   (MonoCompile *cfg, MonoCallInst *call) MONO_INTERNAL;
1673 void      mono_arch_emit_outarg_vt              (MonoCompile *cfg, MonoInst *ins, MonoInst *src) MONO_INTERNAL;
1674 void      mono_arch_emit_setret                 (MonoCompile *cfg, MonoMethod *method, MonoInst *val) MONO_INTERNAL;
1675 MonoDynCallInfo *mono_arch_dyn_call_prepare     (MonoMethodSignature *sig) MONO_INTERNAL;
1676 void      mono_arch_dyn_call_free               (MonoDynCallInfo *info) MONO_INTERNAL;
1677 void      mono_arch_start_dyn_call              (MonoDynCallInfo *info, gpointer **args, guint8 *ret, guint8 *buf, int buf_len) MONO_INTERNAL;
1678 void      mono_arch_finish_dyn_call             (MonoDynCallInfo *info, guint8 *buf) MONO_INTERNAL;
1679 MonoInst *mono_arch_emit_inst_for_method        (MonoCompile *cfg, MonoMethod *cmethod, MonoMethodSignature *fsig, MonoInst **args) MONO_INTERNAL;
1680 void      mono_arch_decompose_opts              (MonoCompile *cfg, MonoInst *ins) MONO_INTERNAL;
1681 void      mono_arch_decompose_long_opts         (MonoCompile *cfg, MonoInst *ins) MONO_INTERNAL;
1682 GSList*   mono_arch_get_delegate_invoke_impls   (void) MONO_INTERNAL;
1683 LLVMCallInfo* mono_arch_get_llvm_call_info      (MonoCompile *cfg, MonoMethodSignature *sig) MONO_INTERNAL;
1684 guint8*   mono_arch_emit_load_got_addr          (guint8 *start, guint8 *code, MonoCompile *cfg, MonoJumpInfo **ji) MONO_INTERNAL;
1685 guint8*   mono_arch_emit_load_aotconst (guint8 *start, guint8 *code, MonoJumpInfo **ji, int tramp_type, gconstpointer target) MONO_INTERNAL;
1686
1687 /* Soft Debug support */
1688 #ifdef MONO_ARCH_SOFT_DEBUG_SUPPORTED
1689 void      mono_arch_set_breakpoint              (MonoJitInfo *ji, guint8 *ip) MONO_INTERNAL;
1690 void      mono_arch_clear_breakpoint            (MonoJitInfo *ji, guint8 *ip) MONO_INTERNAL;
1691 void      mono_arch_start_single_stepping       (void) MONO_INTERNAL;
1692 void      mono_arch_stop_single_stepping        (void) MONO_INTERNAL;
1693 gboolean  mono_arch_is_single_step_event        (void *info, void *sigctx) MONO_INTERNAL;
1694 gboolean  mono_arch_is_breakpoint_event         (void *info, void *sigctx) MONO_INTERNAL;
1695 guint8*   mono_arch_get_ip_for_single_step      (MonoJitInfo *ji, MonoContext *ctx) MONO_INTERNAL;
1696 guint8*   mono_arch_get_ip_for_breakpoint       (MonoJitInfo *ji, MonoContext *ctx) MONO_INTERNAL;
1697 void     mono_arch_skip_breakpoint              (MonoContext *ctx) MONO_INTERNAL;
1698 void     mono_arch_skip_single_step             (MonoContext *ctx) MONO_INTERNAL;
1699 gpointer mono_arch_get_seq_point_info           (MonoDomain *domain, guint8 *code) MONO_INTERNAL;
1700 #endif
1701
1702 MonoJitInfo *mono_arch_find_jit_info            (MonoDomain *domain,
1703                                                  MonoJitTlsData *jit_tls,
1704                                                  MonoJitInfo *res,
1705                                                  MonoJitInfo *prev_ji,
1706                                                  MonoContext *ctx,
1707                                                  MonoContext *new_ctx,
1708                                                  MonoLMF **lmf,
1709                                                  gboolean *managed) MONO_INTERNAL;
1710 gboolean
1711 mono_arch_find_jit_info_ext (MonoDomain *domain, MonoJitTlsData *jit_tls,
1712                                                          MonoJitInfo *ji, MonoContext *ctx,
1713                                                          MonoContext *new_ctx, MonoLMF **lmf,
1714                                                          StackFrameInfo *frame_info) MONO_INTERNAL;
1715 gpointer mono_arch_get_call_filter              (void) MONO_INTERNAL;
1716 gpointer mono_arch_get_restore_context          (void) MONO_INTERNAL;
1717 gpointer mono_arch_get_call_filter_full         (guint32 *code_size, MonoJumpInfo **ji, gboolean aot) MONO_INTERNAL;
1718 gpointer mono_arch_get_restore_context_full     (guint32 *code_size, MonoJumpInfo **ji, gboolean aot) MONO_INTERNAL;
1719 gpointer  mono_arch_get_throw_exception_full    (guint32 *code_size, MonoJumpInfo **ji, gboolean aot) MONO_INTERNAL;
1720 gpointer  mono_arch_get_rethrow_exception_full  (guint32 *code_size, MonoJumpInfo **ji, gboolean aot) MONO_INTERNAL;
1721 gpointer  mono_arch_get_throw_exception_by_name_full (guint32 *code_size, MonoJumpInfo **ji, gboolean aot) MONO_INTERNAL;
1722 gpointer  mono_arch_get_throw_corlib_exception_full (guint32 *code_size, MonoJumpInfo **ji, gboolean aot) MONO_INTERNAL;
1723 gpointer  mono_arch_get_throw_pending_exception_full (guint32 *code_size, MonoJumpInfo **ji, gboolean aot) MONO_INTERNAL;
1724 gboolean mono_arch_handle_exception             (void *sigctx, gpointer obj, gboolean test_only) MONO_INTERNAL;
1725 void     mono_arch_handle_altstack_exception    (void *sigctx, gpointer fault_addr, gboolean stack_ovf) MONO_INTERNAL;
1726 gboolean mono_handle_soft_stack_ovf             (MonoJitTlsData *jit_tls, MonoJitInfo *ji, void *ctx, guint8* fault_addr) MONO_INTERNAL;
1727 gpointer mono_arch_ip_from_context              (void *sigctx) MONO_INTERNAL;
1728 void     mono_arch_sigctx_to_monoctx            (void *sigctx, MonoContext *ctx) MONO_INTERNAL;
1729 void     mono_arch_monoctx_to_sigctx            (MonoContext *mctx, void *ctx) MONO_INTERNAL;
1730 gpointer mono_arch_context_get_int_reg          (MonoContext *ctx, int reg) MONO_INTERNAL;
1731 void     mono_arch_flush_register_windows       (void) MONO_INTERNAL;
1732 gboolean mono_arch_is_inst_imm                  (gint64 imm) MONO_INTERNAL;
1733 MonoInst* mono_arch_get_domain_intrinsic        (MonoCompile* cfg) MONO_INTERNAL;
1734 gboolean mono_arch_is_int_overflow              (void *sigctx, void *info) MONO_INTERNAL;
1735 void     mono_arch_invalidate_method            (MonoJitInfo *ji, void *func, gpointer func_arg) MONO_INTERNAL;
1736 guint32  mono_arch_get_patch_offset             (guint8 *code) MONO_INTERNAL;
1737 gpointer mono_arch_get_vcall_slot               (guint8 *code, mgreg_t *regs, int *displacement) MONO_INTERNAL;
1738 gpointer*mono_arch_get_delegate_method_ptr_addr (guint8* code, mgreg_t *regs) MONO_INTERNAL;
1739 void     mono_arch_create_vars                  (MonoCompile *cfg) MONO_INTERNAL;
1740 void     mono_arch_save_unwind_info             (MonoCompile *cfg) MONO_INTERNAL;
1741 void     mono_arch_register_lowlevel_calls      (void) MONO_INTERNAL;
1742 gpointer mono_arch_get_unbox_trampoline         (MonoGenericSharingContext *gsctx, MonoMethod *m, gpointer addr) MONO_INTERNAL;
1743 gpointer mono_arch_get_static_rgctx_trampoline  (MonoMethod *m, MonoMethodRuntimeGenericContext *mrgctx, gpointer addr) MONO_INTERNAL;
1744 gpointer  mono_arch_get_llvm_imt_trampoline     (MonoDomain *domain, MonoMethod *method, int vt_offset) MONO_INTERNAL;
1745 void     mono_arch_patch_callsite               (guint8 *method_start, guint8 *code, guint8 *addr) MONO_INTERNAL;
1746 void     mono_arch_patch_plt_entry              (guint8 *code, gpointer *got, mgreg_t *regs, guint8 *addr) MONO_INTERNAL;
1747 void     mono_arch_nullify_class_init_trampoline(guint8 *code, mgreg_t *regs) MONO_INTERNAL;
1748 void     mono_arch_nullify_plt_entry            (guint8 *code, mgreg_t *regs) MONO_INTERNAL;
1749 int      mono_arch_get_this_arg_reg             (MonoMethodSignature *sig, MonoGenericSharingContext *gsctx, guint8 *code) MONO_INTERNAL;
1750 gpointer mono_arch_get_this_arg_from_call       (MonoGenericSharingContext *gsctx, MonoMethodSignature *sig, mgreg_t *regs, guint8 *code) MONO_INTERNAL;
1751 MonoObject* mono_arch_find_this_argument        (mgreg_t *regs, MonoMethod *method, MonoGenericSharingContext *gsctx) MONO_INTERNAL;
1752 gpointer mono_arch_get_delegate_invoke_impl     (MonoMethodSignature *sig, gboolean has_target) MONO_INTERNAL;
1753 gpointer mono_arch_create_specific_trampoline   (gpointer arg1, MonoTrampolineType tramp_type, MonoDomain *domain, guint32 *code_len) MONO_INTERNAL;
1754 void        mono_arch_emit_imt_argument         (MonoCompile *cfg, MonoCallInst *call, MonoInst *imt_arg) MONO_INTERNAL;
1755 MonoMethod* mono_arch_find_imt_method           (mgreg_t *regs, guint8 *code) MONO_INTERNAL;
1756 MonoVTable* mono_arch_find_static_call_vtable   (mgreg_t *regs, guint8 *code) MONO_INTERNAL;
1757 gpointer    mono_arch_build_imt_thunk           (MonoVTable *vtable, MonoDomain *domain, MonoIMTCheckItem **imt_entries, int count, gpointer fail_tramp) MONO_INTERNAL;
1758 void    mono_arch_notify_pending_exc            (void) MONO_INTERNAL;
1759
1760 /* Exception handling */
1761
1762 /* Same as MonoStackWalk, but pass the context/frame type as well */
1763 typedef gboolean (*MonoJitStackWalk)            (StackFrameInfo *frame, MonoContext *ctx, gpointer data);
1764
1765 void     mono_exceptions_init                   (void) MONO_INTERNAL;
1766 gboolean mono_handle_exception                  (MonoContext *ctx, gpointer obj,
1767                                                  gpointer original_ip, gboolean test_only) MONO_INTERNAL;
1768 void     mono_handle_native_sigsegv             (int signal, void *sigctx) MONO_INTERNAL;
1769 void     mono_print_thread_dump                 (void *sigctx);
1770 void     mono_jit_walk_stack                    (MonoStackWalk func, gboolean do_il_offset, gpointer user_data) MONO_INTERNAL;
1771 void     mono_jit_walk_stack_from_ctx           (MonoStackWalk func, MonoContext *ctx, gboolean do_il_offset, gpointer user_data) MONO_INTERNAL;
1772 void     mono_jit_walk_stack_from_ctx_in_thread (MonoJitStackWalk func, MonoDomain *domain, MonoContext *start_ctx, gboolean do_il_offset, MonoInternalThread *thread, MonoLMF *lmf, gpointer user_data) MONO_INTERNAL;
1773 void     mono_setup_altstack                    (MonoJitTlsData *tls) MONO_INTERNAL;
1774 void     mono_free_altstack                     (MonoJitTlsData *tls) MONO_INTERNAL;
1775 gpointer mono_altstack_restore_prot             (mgreg_t *regs, guint8 *code, gpointer *tramp_data, guint8* tramp) MONO_INTERNAL;
1776 MonoJitInfo* mini_jit_info_table_find           (MonoDomain *domain, char *addr, MonoDomain **out_domain) MONO_INTERNAL;
1777
1778 MonoJitInfo * mono_find_jit_info                (MonoDomain *domain, MonoJitTlsData *jit_tls, MonoJitInfo *res, MonoJitInfo *prev_ji, MonoContext *ctx, MonoContext *new_ctx, char **trace, MonoLMF **lmf, int *native_offset, gboolean *managed) MONO_INTERNAL;
1779
1780 gpointer mono_get_throw_exception               (void) MONO_INTERNAL;
1781 gpointer mono_get_rethrow_exception             (void) MONO_INTERNAL;
1782 gpointer mono_get_call_filter                   (void) MONO_INTERNAL;
1783 gpointer mono_get_restore_context               (void) MONO_INTERNAL;
1784 gpointer mono_get_throw_exception_by_name       (void) MONO_INTERNAL;
1785 gpointer mono_get_throw_corlib_exception        (void) MONO_INTERNAL;
1786
1787 /* the new function to do stack walks */
1788 typedef gboolean (*MonoStackFrameWalk)          (MonoDomain *domain, MonoContext *ctx, MonoJitInfo *ji, gpointer data);
1789 void      mono_walk_stack                       (MonoDomain *domain, MonoJitTlsData *jit_tls, MonoContext *start_ctx, MonoStackFrameWalk func, gpointer user_data);
1790
1791 MonoArray *ves_icall_get_trace                  (MonoException *exc, gint32 skip, MonoBoolean need_file_info) MONO_INTERNAL;
1792 MonoBoolean ves_icall_get_frame_info            (gint32 skip, MonoBoolean need_file_info,
1793                                                  MonoReflectionMethod **method,
1794                                                  gint32 *iloffset, gint32 *native_offset,
1795                                                  MonoString **file, gint32 *line, gint32 *column) MONO_INTERNAL;
1796 MonoString *ves_icall_System_Exception_get_trace (MonoException *exc) MONO_INTERNAL;
1797
1798 /* Dominator/SSA methods */
1799 void        mono_compile_dominator_info         (MonoCompile *cfg, int dom_flags) MONO_INTERNAL;
1800 void        mono_compute_natural_loops          (MonoCompile *cfg) MONO_INTERNAL;
1801 MonoBitSet* mono_compile_iterated_dfrontier     (MonoCompile *cfg, MonoBitSet *set) MONO_INTERNAL;
1802 void        mono_ssa_compute                    (MonoCompile *cfg) MONO_INTERNAL;
1803 void        mono_ssa_remove                     (MonoCompile *cfg) MONO_INTERNAL;
1804 void        mono_ssa_cprop                      (MonoCompile *cfg) MONO_INTERNAL;
1805 void        mono_ssa_deadce                     (MonoCompile *cfg) MONO_INTERNAL;
1806 void        mono_ssa_strength_reduction         (MonoCompile *cfg) MONO_INTERNAL;
1807 void        mono_free_loop_info                 (MonoCompile *cfg) MONO_INTERNAL;
1808
1809 void        mono_ssa_compute2                   (MonoCompile *cfg);
1810 void        mono_ssa_remove2                    (MonoCompile *cfg);
1811 void        mono_ssa_cprop2                     (MonoCompile *cfg);
1812 void        mono_ssa_deadce2                    (MonoCompile *cfg);
1813
1814 /* debugging support */
1815 void      mono_debug_init_method                (MonoCompile *cfg, MonoBasicBlock *start_block,
1816                                                  guint32 breakpoint_id) MONO_INTERNAL;
1817 void      mono_debug_open_method                (MonoCompile *cfg) MONO_INTERNAL;
1818 void      mono_debug_close_method               (MonoCompile *cfg) MONO_INTERNAL;
1819 void      mono_debug_open_block                 (MonoCompile *cfg, MonoBasicBlock *bb, guint32 address) MONO_INTERNAL;
1820 void      mono_debug_record_line_number         (MonoCompile *cfg, MonoInst *ins, guint32 address) MONO_INTERNAL;
1821 void      mono_debug_serialize_debug_info       (MonoCompile *cfg, guint8 **out_buf, guint32 *buf_len) MONO_INTERNAL;
1822 void      mono_debug_add_aot_method             (MonoDomain *domain,
1823                                                  MonoMethod *method, guint8 *code_start,
1824                                                  guint8 *debug_info, guint32 debug_info_len) MONO_INTERNAL;
1825 void      mono_debug_add_icall_wrapper          (MonoMethod *method, MonoJitICallInfo* info) MONO_INTERNAL;
1826 void      mono_debug_print_vars                 (gpointer ip, gboolean only_arguments);
1827 void      mono_debugger_run_finally             (MonoContext *start_ctx);
1828
1829 extern gssize mono_breakpoint_info_index [MONO_BREAKPOINT_ARRAY_SIZE];
1830
1831 gboolean mono_breakpoint_clean_code (guint8 *method_start, guint8 *code, int offset, guint8 *buf, int size);
1832
1833 #ifdef MONO_DEBUGGER_SUPPORTED
1834
1835 /* Mono Debugger support */
1836 void      mini_debugger_init                    (void);
1837 int       mini_debugger_main                    (MonoDomain *domain, MonoAssembly *assembly, int argc, char **argv);
1838 gboolean  mini_debug_running_inside_mdb         (void);
1839 void      mini_debugger_set_attach_ok           (void);
1840
1841 #endif
1842
1843 /* Tracing */
1844 MonoTraceSpec *mono_trace_parse_options         (const char *options) MONO_INTERNAL;
1845 void           mono_trace_set_assembly          (MonoAssembly *assembly) MONO_INTERNAL;
1846 gboolean       mono_trace_eval                  (MonoMethod *method) MONO_INTERNAL;
1847
1848 extern void
1849 mono_perform_abc_removal (MonoCompile *cfg) MONO_INTERNAL;
1850 extern void
1851 mono_perform_abc_removal (MonoCompile *cfg) MONO_INTERNAL;
1852 extern void
1853 mono_perform_ssapre (MonoCompile *cfg) MONO_INTERNAL;
1854 extern void
1855 mono_local_cprop (MonoCompile *cfg) MONO_INTERNAL;
1856 extern void
1857 mono_local_cprop (MonoCompile *cfg);
1858 extern void
1859 mono_local_deadce (MonoCompile *cfg);
1860
1861 /* CAS - stack walk */
1862 MonoSecurityFrame* ves_icall_System_Security_SecurityFrame_GetSecurityFrame (gint32 skip) MONO_INTERNAL;
1863 MonoArray* ves_icall_System_Security_SecurityFrame_GetSecurityStack (gint32 skip) MONO_INTERNAL;
1864
1865 /* Generic sharing */
1866
1867 MonoGenericSharingContext* mono_get_generic_context_from_code (guint8 *code) MONO_INTERNAL;
1868
1869 MonoGenericContext* mini_method_get_context (MonoMethod *method) MONO_INTERNAL;
1870
1871 int mono_method_check_context_used (MonoMethod *method) MONO_INTERNAL;
1872
1873 gboolean mono_generic_context_equal_deep (MonoGenericContext *context1, MonoGenericContext *context2) MONO_INTERNAL;
1874
1875 gpointer mono_helper_get_rgctx_other_ptr (MonoClass *caller_class, MonoVTable *vtable,
1876                                           guint32 token, guint32 token_source, guint32 rgctx_type,
1877                                           gint32 rgctx_index) MONO_INTERNAL;
1878
1879 void mono_generic_sharing_init (void) MONO_INTERNAL;
1880
1881 MonoClass* mini_class_get_container_class (MonoClass *class) MONO_INTERNAL;
1882 MonoGenericContext* mini_class_get_context (MonoClass *class) MONO_INTERNAL;
1883
1884 MonoType* mini_get_basic_type_from_generic (MonoGenericSharingContext *gsctx, MonoType *type) MONO_INTERNAL;
1885 MonoType* mini_type_get_underlying_type (MonoGenericSharingContext *gsctx, MonoType *type) MONO_INTERNAL;
1886
1887 int mini_type_stack_size (MonoGenericSharingContext *gsctx, MonoType *t, int *align) MONO_INTERNAL;
1888 int mini_type_stack_size_full (MonoGenericSharingContext *gsctx, MonoType *t, guint32 *align, gboolean pinvoke) MONO_INTERNAL;
1889 void type_to_eval_stack_type (MonoCompile *cfg, MonoType *type, MonoInst *inst) MONO_INTERNAL;
1890 guint mono_type_to_regmove (MonoCompile *cfg, MonoType *type) MONO_INTERNAL;
1891
1892 /* wapihandles.c */
1893 int mini_wapi_hps (int argc, char **argv) MONO_INTERNAL;
1894
1895 int mini_wapi_semdel (int argc, char **argv) MONO_INTERNAL;
1896
1897 int mini_wapi_seminfo (int argc, char **argv) MONO_INTERNAL;
1898
1899 /* SIMD support */
1900
1901 /*
1902 This enum MUST be kept in sync with its managed mirror Mono.Simd.AccelMode.
1903 The AccelMode values are masks while the ones here are the bit indexes.
1904  */
1905 enum {
1906         SIMD_VERSION_SSE1       = 0,
1907         SIMD_VERSION_SSE2       = 1,
1908         SIMD_VERSION_SSE3       = 2,
1909         SIMD_VERSION_SSSE3      = 3,
1910         SIMD_VERSION_SSE41      = 4,
1911         SIMD_VERSION_SSE42      = 5,
1912         SIMD_VERSION_SSE4a      = 6,
1913 };
1914
1915 enum {
1916         SIMD_COMP_EQ,
1917         SIMD_COMP_LT,
1918         SIMD_COMP_LE,
1919         SIMD_COMP_UNORD,
1920         SIMD_COMP_NEQ,
1921         SIMD_COMP_NLT,
1922         SIMD_COMP_NLE,
1923         SIMD_COMP_ORD
1924 };
1925
1926 enum {
1927         SIMD_PREFETCH_MODE_NTA,
1928         SIMD_PREFETCH_MODE_0,
1929         SIMD_PREFETCH_MODE_1,
1930         SIMD_PREFETCH_MODE_2,
1931 };
1932
1933 const char *mono_arch_xregname (int reg) MONO_INTERNAL;
1934 void        mono_simd_simplify_indirection (MonoCompile *cfg) MONO_INTERNAL;
1935 MonoInst*   mono_emit_simd_intrinsics (MonoCompile *cfg, MonoMethod *cmethod, MonoMethodSignature *fsig, MonoInst **args) MONO_INTERNAL;
1936 guint32     mono_arch_cpu_enumerate_simd_versions (void) MONO_INTERNAL;
1937 void        mono_simd_intrinsics_init (void) MONO_INTERNAL;
1938
1939 /*
1940  * Per-OS implementation functions.
1941  */
1942 void mono_runtime_install_handlers (void) MONO_INTERNAL;
1943 void mono_runtime_cleanup_handlers (void) MONO_INTERNAL;
1944 void mono_runtime_setup_stat_profiler (void) MONO_INTERNAL;
1945 void mono_runtime_shutdown_stat_profiler (void) MONO_INTERNAL;
1946 void mono_runtime_posix_install_handlers (void) MONO_INTERNAL;
1947 pid_t mono_runtime_syscall_fork (void) MONO_INTERNAL;
1948 gboolean mono_gdb_render_native_backtraces (void) MONO_INTERNAL;
1949
1950 /*
1951  * Signal handling
1952  */
1953 #ifdef MONO_GET_CONTEXT
1954 #define GET_CONTEXT MONO_GET_CONTEXT
1955 #endif
1956
1957 #ifndef GET_CONTEXT
1958 #ifdef HOST_WIN32
1959 #define GET_CONTEXT \
1960     void *ctx = context;
1961 #else
1962 #ifdef MONO_ARCH_USE_SIGACTION
1963 #define GET_CONTEXT \
1964     void *ctx = context;
1965 #elif defined(__sparc__)
1966 #define GET_CONTEXT \
1967     void *ctx = sigctx;
1968 #else
1969 #define GET_CONTEXT \
1970         void **_p = (void **)&_dummy; \
1971         struct sigcontext *ctx = (struct sigcontext *)++_p;
1972 #endif
1973 #endif
1974 #endif
1975
1976 #ifdef MONO_ARCH_USE_SIGACTION
1977 #define SIG_HANDLER_SIGNATURE(ftn) ftn (int _dummy, siginfo_t *info, void *context)
1978 #define SIG_HANDLER_PARAMS _dummy, info, context
1979 #elif defined(HOST_WIN32)
1980 #define SIG_HANDLER_SIGNATURE(ftn) ftn (int _dummy, EXCEPTION_RECORD *info, void *context)
1981 #define SIG_HANDLER_PARAMS _dummy, info, context
1982 #elif defined(__sparc__)
1983 #define SIG_HANDLER_SIGNATURE(ftn) ftn (int _dummy, void *sigctx)
1984 #define SIG_HANDLER_PARAMS _dummy, sigctx
1985 #else
1986 #define SIG_HANDLER_SIGNATURE(ftn) ftn (int _dummy)
1987 #define SIG_HANDLER_PARAMS _dummy
1988 #endif
1989
1990 void SIG_HANDLER_SIGNATURE (mono_sigfpe_signal_handler)  MONO_INTERNAL;
1991 void SIG_HANDLER_SIGNATURE (mono_sigill_signal_handler)  MONO_INTERNAL;
1992 void SIG_HANDLER_SIGNATURE (mono_sigsegv_signal_handler) MONO_INTERNAL;
1993 void SIG_HANDLER_SIGNATURE (mono_sigint_signal_handler)  MONO_INTERNAL;
1994 gboolean SIG_HANDLER_SIGNATURE (mono_chain_signal) MONO_INTERNAL;
1995
1996 /* for MONO_WRAPPER_UNKNOWN subtypes */
1997 enum {
1998         MONO_AOT_WRAPPER_MONO_ENTER,
1999         MONO_AOT_WRAPPER_MONO_EXIT,
2000         MONO_AOT_WRAPPER_LAST
2001 };
2002
2003 #endif /* __MONO_MINI_H__ */