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