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