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