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