mono/mini/mini.h

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