mono/mini/mini.h

   1 #ifndef __MONO_MINI_H__
   2 #define __MONO_MINI_H__
   3
   4 #include "config.h"
   5 #include <glib.h>
   6 #include <signal.h>
   7 #include <mono/metadata/loader.h>
   8 #include <mono/metadata/mempool.h>
   9 #include <mono/utils/monobitset.h>
  10 #include <mono/metadata/class.h>
  11 #include <mono/metadata/object.h>
  12 #include <mono/metadata/opcodes.h>
  13 #include <mono/metadata/tabledefs.h>
  14 #include <mono/metadata/domain-internals.h>
  15 #include "mono/metadata/class-internals.h"
  16 #include "mono/metadata/object-internals.h"
  17 #include <mono/metadata/profiler-private.h>
  18 #include <mono/metadata/debug-helpers.h>
  19 #include <mono/utils/mono-compiler.h>
  20
  21 #include "mini-arch.h"
  22 #include "regalloc.h"
  23 #include "declsec.h"
  24
  25 #ifndef G_LIKELY
  26 #define G_LIKELY(a) (a)
  27 #define G_UNLIKELY(a) (a)
  28 #endif
  29
  30 #if DISABLE_LOGGING
  31 #define MINI_DEBUG(level,limit,code)
  32 #else
  33 #define MINI_DEBUG(level,limit,code) do {if (G_UNLIKELY ((level) >= (limit))) code} while (0)
  34 #endif
  35
  36 #ifndef DISABLE_AOT
  37 #define MONO_USE_AOT_COMPILER
  38 #endif
  39
  40 /* for 32 bit systems */
  41 #if G_BYTE_ORDER == G_LITTLE_ENDIAN
  42 #define MINI_LS_WORD_IDX 0
  43 #define MINI_MS_WORD_IDX 1
  44 #else
  45 #define MINI_LS_WORD_IDX 1
  46 #define MINI_MS_WORD_IDX 0
  47 #endif
  48 #define MINI_LS_WORD_OFFSET (MINI_LS_WORD_IDX * 4)
  49 #define MINI_MS_WORD_OFFSET (MINI_MS_WORD_IDX * 4)
  50 #define inst_ls_word data.op[MINI_LS_WORD_IDX].const_val
  51 #define inst_ms_word data.op[MINI_MS_WORD_IDX].const_val
  52
  53 /* Version number of the AOT file format */
  54 #define MONO_AOT_FILE_VERSION "32"
  55
  56 #if 0
  57 #define mono_bitset_foreach_bit(set,b,n) \
  58         for (b = 0; b < n; b++)\
  59                 if (mono_bitset_test_fast(set,b))
  60 #define mono_bitset_foreach_bit_rev(set,b,n) \
  61         for (b = n - 1; b >= 0; b--)\
  62                 if (mono_bitset_test_fast(set,b))
  63 #else
  64 #define mono_bitset_foreach_bit(set,b,n) \
  65         for (b = mono_bitset_find_start (set); b < n && b >= 0; b = mono_bitset_find_first (set, b))
  66 #define mono_bitset_foreach_bit_rev(set,b,n) \
  67         for (b = mono_bitset_find_last (set, n - 1); b >= 0; b = b ? mono_bitset_find_last (set, b) : -1)
  68
  69 #endif
  70
  71 /*
  72  * Pull the list of opcodes
  73  */
  74 #define OPDEF(a,b,c,d,e,f,g,h,i,j) \
  75         a = i,
  76
  77 enum {
  78 #include "mono/cil/opcode.def"
  79         CEE_LASTOP
  80 };
  81 #undef OPDEF
  82
  83 #define MONO_VARINFO(cfg,varnum) ((cfg)->vars [varnum])
  84
  85 #define MONO_INST_NEW(cfg,dest,op) do { \
  86                 (dest) = mono_mempool_alloc0 ((cfg)->mempool, sizeof (MonoInst));       \
  87                 (dest)->opcode = (op);  \
  88         } while (0)
  89
  90 #define MONO_INST_NEW_CALL(cfg,dest,op) do {    \
  91                 (dest) = mono_mempool_alloc0 ((cfg)->mempool, sizeof (MonoCallInst));   \
  92                 (dest)->inst.opcode = (op);     \
  93         } while (0)
  94
  95 #define MONO_INST_NEW_CALL_ARG(cfg,dest,op) do {        \
  96                 (dest) = mono_mempool_alloc0 ((cfg)->mempool, sizeof (MonoCallArgParm));        \
  97                 (dest)->ins.opcode = (op);      \
  98         } while (0)
  99
 100 #define MONO_ADD_INS(b,inst) do {       \
 101                 if ((b)->last_ins) {    \
 102                         (b)->last_ins->next = (inst);   \
 103                         (b)->last_ins = (inst); \
 104                 } else {        \
 105                         (b)->code = (b)->last_ins = (inst);     \
 106                 }       \
 107         } while (0)
 108
 109 #define NULLIFY_INS(ins) do { \
 110         (ins)->opcode = OP_NOP; \
 111         (ins)->dreg = (ins)->sreg1 = (ins)->sreg2 = -1; \
 112                 (ins)->ssa_op = MONO_SSA_NOP; \
 113     } while (0)
 114
 115 typedef struct MonoInst MonoInst;
 116 typedef struct MonoCallInst MonoCallInst;
 117 typedef struct MonoCallArgParm MonoCallArgParm;
 118 typedef struct MonoEdge MonoEdge;
 119 typedef struct MonoMethodVar MonoMethodVar;
 120 typedef struct MonoBasicBlock MonoBasicBlock;
 121 typedef struct MonoLMF MonoLMF;
 122 typedef struct MonoSpillInfo MonoSpillInfo;
 123 typedef struct MonoTraceSpec MonoTraceSpec;
 124
 125 extern guint32 mono_jit_tls_id;
 126 extern MonoTraceSpec *mono_jit_trace_calls;
 127 extern gboolean mono_break_on_exc;
 128 extern int mono_exc_esp_offset;
 129 #ifdef DISABLE_AOT
 130 #define mono_compile_aot 0
 131 #else
 132 extern gboolean mono_compile_aot;
 133 #endif
 134 extern MonoMethodDesc *mono_inject_async_exc_method;
 135 extern int mono_inject_async_exc_pos;
 136
 137 struct MonoEdge {
 138         MonoEdge *next;
 139         MonoBasicBlock *bb;
 140         /* add edge type? */
 141 };
 142
 143 struct MonoSpillInfo {
 144         int offset;
 145 };
 146
 147 /*
 148  * This structure contains the information maintained by the verifier for each CIL
 149  * stack slot. This information is also available in MonoInst, but the verifier needs to
 150  * update the type information during stack merges, which could lead to problems if done
 151  * on MonoInsts, so we use a dedicated structure instead.
 152  */
 153 typedef struct {
 154         int type;
 155         MonoClass *klass;
 156 } MonoStackSlot;
 157
 158 /*
 159  * The IR-level basic block.
 160  *
 161  * A basic block can have multiple exits just fine, as long as the point of
 162  * 'departure' is the last instruction in the basic block. Extended basic
 163  * blocks, on the other hand, may have instructions that leave the block
 164  * midstream. The important thing is that they cannot be _entered_
 165  * midstream, ie, execution of a basic block (or extened bb) always start
 166  * at the beginning of the block, never in the middle.
 167  */
 168 struct MonoBasicBlock {
 169         MonoInst *last_ins;
 170
 171         /* the next basic block in the order it appears in IL */
 172         MonoBasicBlock *next_bb;
 173
 174         /*
 175          * Before instruction selection it is the first tree in the
 176          * forest and the first item in the list of trees. After
 177          * instruction selection it is the first instruction and the
 178          * first item in the list of instructions.
 179          */
 180         MonoInst *code;
 181
 182         /* unique block number identification */
 183         gint32 block_num;
 184
 185         gint32 dfn;
 186
 187         /* Basic blocks: incoming and outgoing counts and pointers */
 188         /* Each bb should only appear once in each array */
 189         gint16 out_count, in_count;
 190         MonoBasicBlock **in_bb;
 191         MonoBasicBlock **out_bb;
 192
 193         /* Points to the start of the CIL code that initiated this BB */
 194         unsigned char* cil_code;
 195
 196         /* Length of the CIL block */
 197         gint32 cil_length;
 198
 199         /* The address of the generated code, used for fixups */
 200         int native_offset;
 201         int max_offset;
 202
 203         /* Visited and reachable flags */
 204         guint32 flags;
 205
 206         /*
 207          * SSA and loop based flags
 208          */
 209         MonoBitSet *dominators;
 210         MonoBitSet *dfrontier;
 211         MonoBasicBlock *idom;
 212         GSList *dominated;
 213         /* fast dominator algorithm */
 214         MonoBasicBlock *df_parent, *ancestor, *child, *label;
 215         MonoEdge *bucket;
 216         int size, sdom, idomn;
 217
 218         /* loop nesting and recognition */
 219         GList *loop_blocks;
 220         gint8  nesting;
 221         gint8  loop_body_start;
 222
 223         /*
 224          * Whenever the bblock is rarely executed so it should be emitted after
 225          * the function epilog.
 226          */
 227         guint out_of_line : 1;
 228         /* Caches the result of uselessness calculation during optimize_branches */
 229         guint not_useless : 1;
 230
 231         /* use for liveness analysis */
 232         MonoBitSet *gen_set;
 233         MonoBitSet *kill_set;
 234         MonoBitSet *live_in_set;
 235         MonoBitSet *live_out_set;
 236
 237         /* fields to deal with non-empty stack slots at bb boundary */
 238         guint16 out_scount, in_scount;
 239         MonoInst **out_stack;
 240         MonoInst **in_stack;
 241         MonoStackSlot *stack_state; /* Verification stack state on enter to bblock */
 242
 243         /* we use that to prevent merging of bblock covered by different clauses*/
 244         guint real_offset;
 245
 246         /*
 247          * The region encodes whether the basic block is inside
 248          * a finally, catch, filter or none of thoese.
 249          *
 250          * If the value is -1, then it is neither finally, catch nor filter
 251          *
 252          * Otherwise the format is:
 253          *
 254          *  Bits: |     0-3      |       4-7      |     8-31
 255          *        |              |                |
 256          *        | clause-flags |   MONO_REGION  | clause-index
 257          *
 258          */
 259         guint region;
 260
 261         /* The current symbolic register number, used in local register allocation. */
 262         guint32 max_vreg;
 263 };
 264
 265 /* BBlock flags */
 266 enum {
 267         BB_VISITED            = 1 << 0,
 268         BB_REACHABLE          = 1 << 1,
 269         BB_EXCEPTION_DEAD_OBJ = 1 << 2,
 270         BB_EXCEPTION_UNSAFE   = 1 << 3,
 271         BB_EXCEPTION_HANDLER  = 1 << 4
 272 };
 273
 274 typedef struct MonoMemcpyArgs {
 275         int size, align;
 276 } MonoMemcpyArgs;
 277
 278 struct MonoInst {
 279         union {
 280                 union {
 281                         MonoInst *src;
 282                         MonoMethodVar *var;
 283                         gssize const_val;
 284                         gpointer p;
 285                         MonoMethod *method;
 286                         MonoMethodSignature *signature;
 287                         MonoBasicBlock **many_blocks;
 288                         MonoBasicBlock *target_block;
 289                         MonoInst **args;
 290                         MonoType *vtype;
 291                         MonoClass *klass;
 292                         int *phi_args;
 293                         MonoCallInst *call_inst;
 294                 } op [2];
 295                 gint64 i8const;
 296                 double r8const;
 297         } data;
 298         guint16 opcode;
 299         guint8  type; /* stack type */
 300         guint   ssa_op : 3;
 301         guint8  flags  : 5;
 302
 303         /* used by the register allocator */
 304         gint32 dreg, sreg1, sreg2;
 305         /* used mostly by the backend to store additional info it may need */
 306         union {
 307                 gint32 reg3;
 308                 gint32 arg_info;
 309                 gint32 size;
 310                 MonoMemcpyArgs *memcpy_args; /* in OP_MEMSET and OP_MEMCPY */
 311                 gint shift_amount;
 312                 gboolean is_pinvoke; /* for variables in the unmanaged marshal format */
 313                 gpointer data;
 314         } backend;
 315
 316         MonoInst *next;
 317         MonoClass *klass;
 318         const unsigned char* cil_code; /* for debugging and bblock splitting */
 319 };
 320
 321 struct MonoCallInst {
 322         MonoInst inst;
 323         MonoMethodSignature *signature;
 324         MonoMethod *method;
 325         MonoInst **args;
 326         MonoInst *out_args;
 327         gconstpointer fptr;
 328         guint stack_usage;
 329         gboolean virtual;
 330         regmask_t used_iregs;
 331         regmask_t used_fregs;
 332         GSList *out_ireg_args;
 333         GSList *out_freg_args;
 334 };
 335
 336 struct MonoCallArgParm {
 337         MonoInst ins;
 338         gint32 size;
 339         gint32 offset;
 340         gint32 offPrm;
 341 };
 342
 343 /*
 344  * flags for MonoInst
 345  * Note: some of the values overlap, because they can't appear
 346  * in the same MonoInst.
 347  */
 348 enum {
 349         MONO_INST_HAS_METHOD = 1,
 350         /* temp local created by a DUP: used only within a BB */
 351         MONO_INST_IS_TEMP    = 1,
 352         MONO_INST_INIT       = 1, /* in localloc */
 353         MONO_INST_IS_DEAD    = 2,
 354         MONO_INST_TAILCALL   = 4,
 355         MONO_INST_VOLATILE   = 4,
 356         MONO_INST_BRLABEL    = 4,
 357         MONO_INST_NOTYPECHECK    = 4,
 358         MONO_INST_UNALIGNED  = 8,
 359         MONO_INST_DEFINITION_HAS_SIDE_EFFECTS = 8,
 360         /* the address of the variable has been taken */
 361         MONO_INST_INDIRECT   = 16,
 362         MONO_INST_NORANGECHECK   = 16
 363 };
 364
 365 #define inst_c0 data.op[0].const_val
 366 #define inst_c1 data.op[1].const_val
 367 #define inst_i0 data.op[0].src
 368 #define inst_i1 data.op[1].src
 369 #define inst_p0 data.op[0].p
 370 #define inst_p1 data.op[1].p
 371 #define inst_l  data.i8const
 372 #define inst_r  data.r8const
 373 #define inst_left  data.op[0].src
 374 #define inst_right data.op[1].src
 375
 376 #define inst_newa_len   data.op[0].src
 377 #define inst_newa_class data.op[1].klass
 378
 379 #define inst_var    data.op[0].var
 380 #define inst_vtype  data.op[1].vtype
 381 /* in branch instructions */
 382 #define inst_many_bb   data.op[1].many_blocks
 383 #define inst_target_bb data.op[0].target_block
 384 #define inst_true_bb   data.op[1].many_blocks[0]
 385 #define inst_false_bb  data.op[1].many_blocks[1]
 386
 387 #define inst_basereg sreg1
 388 #define inst_indexreg sreg2
 389 #define inst_destbasereg dreg
 390 #define inst_offset data.op[0].const_val
 391 #define inst_imm    data.op[1].const_val
 392 #define inst_call   data.op[1].call_inst
 393
 394 #define inst_phi_args   data.op[1].phi_args
 395
 396 /* instruction description for use in regalloc/scheduling */
 397 enum {
 398         MONO_INST_DEST,
 399         MONO_INST_SRC1,
 400         MONO_INST_SRC2,
 401         MONO_INST_LEN,
 402         MONO_INST_CLOB,
 403         /* Unused, commented out to reduce the size of the mdesc tables
 404         MONO_INST_FLAGS,
 405         MONO_INST_COST,
 406         MONO_INST_DELAY,
 407         MONO_INST_RES,
 408         */
 409         MONO_INST_MAX
 410 };
 411
 412 typedef union {
 413         struct {
 414                 guint16 tid; /* tree number */
 415                 guint16 bid; /* block number */
 416         } pos ;
 417         guint32 abs_pos;
 418 } MonoPosition;
 419
 420 typedef struct {
 421         MonoPosition first_use, last_use;
 422 } MonoLiveRange;
 423
 424 /*
 425  * Additional information about a variable
 426  */
 427 struct MonoMethodVar {
 428         guint           idx; /* inside cfg->varinfo, cfg->vars */
 429         guint           last_name;
 430         MonoBitSet     *dfrontier;
 431         MonoLiveRange   range; /* generated by liveness analysis */
 432         int             reg; /* != -1 if allocated into a register */
 433         int             spill_costs;
 434         MonoBitSet     *def_in; /* used by SSA */
 435         MonoInst       *def;    /* used by SSA */
 436         MonoBasicBlock *def_bb; /* used by SSA */
 437         GList          *uses;   /* used by SSA */
 438         char            cpstate;  /* used by SSA conditional  constant propagation */
 439 };
 440
 441 typedef struct {
 442         gpointer          end_of_stack;
 443         guint32           stack_size;
 444 #if !defined(HAVE_KW_THREAD) || !defined(MONO_ARCH_ENABLE_MONO_LMF_VAR)
 445         MonoLMF          *lmf;
 446 #endif
 447         MonoLMF          *first_lmf;
 448         gpointer         signal_stack;
 449         guint32          signal_stack_size;
 450         gpointer         stack_ovf_guard_base;
 451         guint32          stack_ovf_guard_size;
 452         void            (*abort_func) (MonoObject *object);
 453 } MonoJitTlsData;
 454
 455 typedef enum {
 456 #define PATCH_INFO(a,b) MONO_PATCH_INFO_ ## a,
 457 #include "patch-info.h"
 458 #undef PATCH_INFO
 459         MONO_PATCH_INFO_NUM
 460 } MonoJumpInfoType;
 461
 462 /*
 463  * We need to store the image which the token refers to along with the token,
 464  * since the image might not be the same as the image of the method which
 465  * contains the relocation, because of inlining.
 466  */
 467 typedef struct MonoJumpInfoToken {
 468         MonoImage *image;
 469         guint32 token;
 470 } MonoJumpInfoToken;
 471
 472 typedef struct MonoJumpInfoBBTable {
 473         MonoBasicBlock **table;
 474         int table_size;
 475 } MonoJumpInfoBBTable;
 476
 477 typedef struct MonoJumpInfo MonoJumpInfo;
 478 struct MonoJumpInfo {
 479         MonoJumpInfo *next;
 480         union {
 481                 int i;
 482                 guint8 *p;
 483                 MonoInst *label;
 484         } ip;
 485
 486         MonoJumpInfoType type;
 487         union {
 488                 gconstpointer   target;
 489 #if SIZEOF_VOID_P == 8
 490                 gint64          offset;
 491 #else
 492                 int             offset;
 493 #endif
 494                 MonoBasicBlock *bb;
 495                 MonoInst       *inst;
 496                 MonoMethod     *method;
 497                 MonoClass      *klass;
 498                 MonoClassField *field;
 499                 MonoImage      *image;
 500                 MonoVTable     *vtable;
 501                 const char     *name;
 502                 MonoJumpInfoToken  *token;
 503                 MonoJumpInfoBBTable *table;
 504         } data;
 505 };
 506
 507 typedef enum {
 508         MONO_TRAMPOLINE_GENERIC,
 509         MONO_TRAMPOLINE_JUMP,
 510         MONO_TRAMPOLINE_CLASS_INIT,
 511         MONO_TRAMPOLINE_AOT,
 512         MONO_TRAMPOLINE_AOT_PLT,
 513         MONO_TRAMPOLINE_DELEGATE,
 514         MONO_TRAMPOLINE_NUM
 515 } MonoTrampolineType;
 516
 517 /* optimization flags */
 518 #define OPTFLAG(id,shift,name,descr) MONO_OPT_ ## id = 1 << shift,
 519 enum {
 520 #include "optflags-def.h"
 521         MONO_OPT_LAST
 522 };
 523
 524 /* Bit-fields in the MonoBasicBlock.region */
 525 #define MONO_REGION_TRY       0
 526 #define MONO_REGION_FINALLY  16
 527 #define MONO_REGION_CATCH    32
 528 #define MONO_REGION_FAULT    64         /* Currently unused */
 529 #define MONO_REGION_FILTER  128
 530
 531 #define MONO_BBLOCK_IS_IN_REGION(bblock, regtype) (((bblock)->region & (0xf << 4)) == (regtype))
 532
 533 /*
 534  * Control Flow Graph and compilation unit information
 535  */
 536 typedef struct {
 537         MonoMethod      *method;
 538         MonoMemPool     *mempool;
 539         MonoInst       **varinfo;
 540         MonoMethodVar  **vars;
 541         MonoInst        *ret;
 542         MonoBasicBlock  *bb_entry;
 543         MonoBasicBlock  *bb_exit;
 544         MonoBasicBlock  *bb_init;
 545         MonoBasicBlock **bblocks;
 546         MonoBasicBlock **cil_offset_to_bb;
 547         MonoMemPool     *state_pool; /* used by instruction selection */
 548         MonoBasicBlock  *cbb;        /* used by instruction selection */
 549         MonoInst        *prev_ins;   /* in decompose */
 550         MonoJumpInfo    *patch_info;
 551         MonoJitInfo     *jit_info;
 552         MonoJitDynamicMethodInfo *dynamic_info;
 553         guint            num_bblocks;
 554         guint            locals_start;
 555         guint            num_varinfo; /* used items in varinfo */
 556         guint            varinfo_count; /* total storage in varinfo */
 557         gint             stack_offset;
 558         gint             max_ireg;
 559         gint             cil_offset_to_bb_len;
 560         MonoRegState    *rs;
 561         MonoSpillInfo   *spill_info; /* machine register spills */
 562         MonoSpillInfo   *spill_info_float; /* fp register spills */
 563         gint             spill_count;
 564         gint             spill_info_len, spill_info_float_len;
 565         /* unsigned char   *cil_code; */
 566         MonoMethod      *inlined_method; /* the method which is currently inlined */
 567         MonoInst        *domainvar; /* a cache for the current domain */
 568         MonoInst        *got_var; /* Global Offset Table variable */
 569         MonoInst        **args;
 570
 571         struct MonoAliasingInformation *aliasing_info;
 572
 573         /* A hashtable of region ID-> SP var mappings */
 574         /* An SP var is a place to store the stack pointer (used by handlers)*/
 575         GHashTable      *spvars;
 576
 577         /* A hashtable of region ID -> EX var mappings */
 578         /* An EX var stores the exception object passed to catch/filter blocks */
 579         GHashTable      *exvars;
 580
 581         GList           *ldstr_list; /* used by AOT */
 582
 583         MonoDomain      *domain;
 584
 585         unsigned char   *cil_start;
 586         unsigned char   *native_code;
 587         guint            code_size;
 588         guint            code_len;
 589         guint            prolog_end;
 590         guint            epilog_begin;
 591         regmask_t        used_int_regs;
 592         guint32          opt;
 593         guint32          prof_options;
 594         guint32          flags;
 595         guint32          comp_done;
 596         guint32          verbose_level;
 597         guint32          stack_usage;
 598         guint32          param_area;
 599         guint32          frame_reg;
 600         gint32           sig_cookie;
 601         guint            disable_aot : 1;
 602         guint            disable_ssa : 1;
 603         guint            run_cctors : 1;
 604         guint            need_lmf_area : 1;
 605         guint            compile_aot : 1;
 606         guint            got_var_allocated : 1;
 607         guint            ret_var_is_local : 1;
 608         guint            dont_verify_stack_merge : 1;
 609         guint            unverifiable : 1;
 610         guint            skip_visibility : 1;
 611         guint            generic_shared : 1;
 612         gpointer         debug_info;
 613         guint32          lmf_offset;
 614         guint16          *intvars;
 615         MonoProfileCoverageInfo *coverage_info;
 616         GHashTable       *token_info_hash;
 617         MonoCompileArch  arch;
 618         guint32          exception_type;        /* MONO_EXCEPTION_* */
 619         guint32          exception_data;
 620         char*            exception_message;
 621         gpointer         exception_ptr;
 622
 623         /* Fields used by the local reg allocator */
 624         void*            reginfo;
 625         void*            reginfof;
 626         void*            reverse_inst_list;
 627         int              reginfo_len, reginfof_len;
 628         int              reverse_inst_list_len;
 629 } MonoCompile;
 630
 631 typedef enum {
 632         MONO_CFG_HAS_ALLOCA = 1 << 0,
 633         MONO_CFG_HAS_CALLS  = 1 << 1,
 634         MONO_CFG_HAS_LDELEMA  = 1 << 2,
 635         MONO_CFG_HAS_VARARGS  = 1 << 3,
 636         MONO_CFG_HAS_TAIL     = 1 << 4,
 637         MONO_CFG_HAS_FPOUT    = 1 << 5, /* there are fp values passed in int registers */
 638         MONO_CFG_HAS_SPILLUP  = 1 << 6  /* spill var slots are allocated from bottom to top */
 639 } MonoCompileFlags;
 640
 641 typedef struct {
 642         gulong methods_compiled;
 643         gulong methods_aot;
 644         gulong methods_lookups;
 645         gulong method_trampolines;
 646         gulong allocate_var;
 647         gulong analyze_stack_repeat;
 648         gulong cil_code_size;
 649         gulong native_code_size;
 650         gulong code_reallocs;
 651         gulong max_code_size_ratio;
 652         gulong biggest_method_size;
 653         gulong allocated_code_size;
 654         gulong inlineable_methods;
 655         gulong inlined_methods;
 656         gulong basic_blocks;
 657         gulong max_basic_blocks;
 658         gulong locals_stack_size;
 659         gulong cas_declsec_check;
 660         gulong cas_linkdemand_icall;
 661         gulong cas_linkdemand_pinvoke;
 662         gulong cas_linkdemand_aptc;
 663         gulong cas_linkdemand;
 664         gulong cas_demand_generation;
 665         gulong generic_virtual_invocations;
 666         MonoMethod *max_ratio_method;
 667         MonoMethod *biggest_method;
 668         gboolean enabled;
 669 } MonoJitStats;
 670
 671 extern MonoJitStats mono_jit_stats;
 672
 673 /* values for MonoInst.ssa_op */
 674 enum {
 675         MONO_SSA_NOP = 0,
 676         MONO_SSA_ADDRESS_TAKEN = 1,
 677         MONO_SSA_LOAD = 2,
 678         MONO_SSA_STORE = 4,
 679         MONO_SSA_LOAD_STORE = MONO_SSA_LOAD|MONO_SSA_STORE,
 680         MONO_SSA_INDIRECT_LOAD = MONO_SSA_LOAD|MONO_SSA_ADDRESS_TAKEN,
 681         MONO_SSA_INDIRECT_STORE = MONO_SSA_STORE|MONO_SSA_ADDRESS_TAKEN,
 682         MONO_SSA_INDIRECT_LOAD_STORE =
 683         MONO_SSA_LOAD|MONO_SSA_STORE|MONO_SSA_ADDRESS_TAKEN
 684 };
 685
 686 #define OP_CEQ    (256+CEE_CEQ)
 687 #define OP_CLT    (256+CEE_CLT)
 688 #define OP_CLT_UN (256+CEE_CLT_UN)
 689 #define OP_CGT    (256+CEE_CGT)
 690 #define OP_CGT_UN (256+CEE_CGT_UN)
 691 #define OP_LOCALLOC (256+CEE_LOCALLOC)
 692
 693 /* opcodes: value assigned after all the CIL opcodes */
 694 #ifdef MINI_OP
 695 #undef MINI_OP
 696 #endif
 697 #define MINI_OP(a,b) a,
 698 enum {
 699         OP_START = MONO_CEE_LAST - 1,
 700 #include "mini-ops.h"
 701         OP_LAST
 702 };
 703 #undef MINI_OP
 704
 705 #if SIZEOF_VOID_P == 8
 706 #define OP_PCONST OP_I8CONST
 707 #define OP_PADD OP_LADD
 708 #define OP_PNEG OP_LNEG
 709 #define OP_PCONV_TO_U2 OP_LCONV_TO_U2
 710 #define OP_PCONV_TO_OVF_I1_UN OP_LCONV_TO_OVF_I1_UN
 711 #define OP_PCONV_TO_OVF_I1 OP_LCONV_TO_OVF_I1
 712 #define OP_PCEQ CEE_CEQ
 713 #define OP_STOREP_MEMBASE_REG OP_STOREI8_MEMBASE_REG
 714 #define OP_STOREP_MEMBASE_IMM OP_STOREI8_MEMBASE_IMM
 715 #else
 716 #define OP_PCONST OP_ICONST
 717 #define OP_PADD CEE_ADD
 718 #define OP_PNEG CEE_NEG
 719 #define OP_PCONV_TO_U2 CEE_CONV_U2
 720 #define OP_PCONV_TO_OVF_I1_UN CEE_CONV_OVF_I1_UN
 721 #define OP_PCONV_TO_OVF_I1 CEE_CONV_OVF_I1
 722 #define OP_PCEQ CEE_CEQ
 723 #define OP_STOREP_MEMBASE_REG OP_STOREI4_MEMBASE_REG
 724 #define OP_STOREP_MEMBASE_IMM OP_STOREI4_MEMBASE_IMM
 725 #endif
 726
 727 typedef enum {
 728         STACK_INV,
 729         STACK_I4,
 730         STACK_I8,
 731         STACK_PTR,
 732         STACK_R8,
 733         STACK_MP,
 734         STACK_OBJ,
 735         STACK_VTYPE,
 736         STACK_MAX
 737 } MonoStackType;
 738
 739 typedef struct {
 740         union {
 741                 double   r8;
 742                 gint32   i4;
 743                 gint64   i8;
 744                 gpointer p;
 745                 MonoClass *klass;
 746         } data;
 747         int type;
 748 } StackSlot;
 749
 750 #if HAVE_ARRAY_ELEM_INIT
 751 extern const guint8 mono_burg_arity [];
 752 #else
 753 extern guint8 mono_burg_arity [];
 754 #endif
 755
 756 extern const char MONO_ARCH_CPU_SPEC [] MONO_INTERNAL;
 757 #define MONO_ARCH_CPU_SPEC_IDX_COMBINE(a) a ## _idx
 758 #define MONO_ARCH_CPU_SPEC_IDX(a) MONO_ARCH_CPU_SPEC_IDX_COMBINE(a)
 759 extern const guint16 MONO_ARCH_CPU_SPEC_IDX(MONO_ARCH_CPU_SPEC) [] MONO_INTERNAL;
 760 #define ins_get_spec(op) ((const char*)&MONO_ARCH_CPU_SPEC + MONO_ARCH_CPU_SPEC_IDX(MONO_ARCH_CPU_SPEC)[(op)])
 761
 762 enum {
 763         MONO_COMP_DOM = 1,
 764         MONO_COMP_IDOM = 2,
 765         MONO_COMP_DFRONTIER = 4,
 766         MONO_COMP_DOM_REV = 8,
 767         MONO_COMP_LIVENESS = 16,
 768         MONO_COMP_SSA = 32,
 769         MONO_COMP_SSA_DEF_USE = 64,
 770         MONO_COMP_REACHABILITY = 128,
 771         MONO_COMP_LOOPS = 256
 772 };
 773
 774 typedef enum {
 775         MONO_GRAPH_CFG = 1,
 776         MONO_GRAPH_DTREE = 2,
 777         MONO_GRAPH_CFG_CODE = 4,
 778         MONO_GRAPH_CFG_SSA = 8,
 779         MONO_GRAPH_CFG_OPTCODE = 16
 780 } MonoGraphOptions;
 781
 782 typedef struct {
 783         guint16 size;
 784         guint16 offset;
 785         guint8  pad;
 786 } MonoJitArgumentInfo;
 787
 788 typedef struct {
 789         gboolean handle_sigint;
 790         gboolean keep_delegates;
 791         gboolean collect_pagefault_stats;
 792         gboolean break_on_unverified;
 793 } MonoDebugOptions;
 794
 795 enum {
 796         BRANCH_NOT_TAKEN,
 797         BRANCH_TAKEN,
 798         BRANCH_UNDEF
 799 };
 800
 801 typedef enum {
 802         CMP_EQ,
 803         CMP_NE,
 804         CMP_LE,
 805         CMP_GE,
 806         CMP_LT,
 807         CMP_GT,
 808         CMP_LE_UN,
 809         CMP_GE_UN,
 810         CMP_LT_UN,
 811         CMP_GT_UN
 812 } CompRelation;
 813
 814 typedef enum {
 815         CMP_TYPE_L,
 816         CMP_TYPE_I,
 817         CMP_TYPE_F
 818 } CompType;
 819
 820 /* Implicit exceptions */
 821 enum {
 822         MONO_EXC_INDEX_OUT_OF_RANGE,
 823         MONO_EXC_OVERFLOW,
 824         MONO_EXC_ARITHMETIC,
 825         MONO_EXC_DIVIDE_BY_ZERO,
 826         MONO_EXC_INVALID_CAST,
 827         MONO_EXC_NULL_REF,
 828         MONO_EXC_ARRAY_TYPE_MISMATCH,
 829         MONO_EXC_INTRINS_NUM
 830 };
 831
 832 /*
 833  * Flags for which contexts were used in inflating a generic.
 834  */
 835 enum {
 836         MONO_GENERIC_CONTEXT_USED_CLASS = 1,
 837         MONO_GENERIC_CONTEXT_USED_METHOD = 2
 838 };
 839
 840 #define MONO_GENERIC_CONTEXT_USED_BOTH          (MONO_GENERIC_CONTEXT_USED_CLASS | MONO_GENERIC_CONTEXT_USED_METHOD)
 841
 842 typedef void (*MonoInstFunc) (MonoInst *tree, gpointer data);
 843
 844 /* main function */
 845 int         mono_main                      (int argc, char* argv[]);
 846 void        mono_set_defaults              (int verbose_level, guint32 opts);
 847 MonoDomain* mini_init                      (const char *filename, const char *runtime_version) MONO_INTERNAL;
 848 void        mini_cleanup                   (MonoDomain *domain) MONO_INTERNAL;
 849
 850 /* helper methods */
 851 MonoJumpInfoToken * mono_jump_info_token_new (MonoMemPool *mp, MonoImage *image, guint32 token) MONO_INTERNAL;
 852 MonoInst* mono_find_spvar_for_region        (MonoCompile *cfg, int region) MONO_INTERNAL;
 853 void      mono_precompile_assemblies        (void) MONO_INTERNAL;
 854 int       mono_parse_default_optimizations  (const char* p);
 855 void      mono_bblock_add_inst              (MonoBasicBlock *bb, MonoInst *inst) MONO_INTERNAL;
 856 void      mono_constant_fold                (MonoCompile *cfg) MONO_INTERNAL;
 857 void      mono_constant_fold_inst           (MonoInst *inst, gpointer data) MONO_INTERNAL;
 858 int       mono_eval_cond_branch             (MonoInst *branch) MONO_INTERNAL;
 859 int       mono_is_power_of_two              (guint32 val) MONO_INTERNAL;
 860 void      mono_cprop_local                  (MonoCompile *cfg, MonoBasicBlock *bb, MonoInst **acp, int acp_size) MONO_INTERNAL;
 861 MonoInst* mono_compile_create_var           (MonoCompile *cfg, MonoType *type, int opcode) MONO_INTERNAL;
 862 void      mono_compile_make_var_load        (MonoCompile *cfg, MonoInst *dest, gssize var_index) MONO_INTERNAL;
 863 MonoInst* mono_compile_create_var_load      (MonoCompile *cfg, gssize var_index) MONO_INTERNAL;
 864 MonoInst* mono_compile_create_var_store     (MonoCompile *cfg, gssize var_index, MonoInst *value) MONO_INTERNAL;
 865 MonoType* mono_type_from_stack_type         (MonoInst *ins) MONO_INTERNAL;
 866 void      mono_blockset_print               (MonoCompile *cfg, MonoBitSet *set, const char *name, guint idom) MONO_INTERNAL;
 867 void      mono_print_tree                   (MonoInst *tree) MONO_INTERNAL;
 868 void      mono_print_tree_nl                (MonoInst *tree) MONO_INTERNAL;
 869 void      mono_print_code                   (MonoCompile *cfg) MONO_INTERNAL;
 870 void      mono_print_method_from_ip         (void *ip);
 871 char     *mono_pmip                         (void *ip);
 872 void      mono_select_instructions          (MonoCompile *cfg) MONO_INTERNAL;
 873 const char* mono_inst_name                  (int op);
 874 void      mono_inst_foreach                 (MonoInst *tree, MonoInstFunc func, gpointer data) MONO_INTERNAL;
 875 void      mono_disassemble_code             (MonoCompile *cfg, guint8 *code, int size, char *id) MONO_INTERNAL;
 876 void      mono_add_patch_info               (MonoCompile *cfg, int ip, MonoJumpInfoType type, gconstpointer target) MONO_INTERNAL;
 877 void      mono_remove_patch_info            (MonoCompile *cfg, int ip) MONO_INTERNAL;
 878 MonoJumpInfo* mono_patch_info_dup_mp        (MonoMemPool *mp, MonoJumpInfo *patch_info) MONO_INTERNAL;
 879 guint     mono_patch_info_hash (gconstpointer data) MONO_INTERNAL;
 880 gint      mono_patch_info_equal (gconstpointer ka, gconstpointer kb) MONO_INTERNAL;
 881 gpointer  mono_resolve_patch_target         (MonoMethod *method, MonoDomain *domain, guint8 *code, MonoJumpInfo *patch_info, gboolean run_cctors) MONO_INTERNAL;
 882 MonoLMF * mono_get_lmf                      (void) MONO_INTERNAL;
 883 MonoLMF** mono_get_lmf_addr                 (void) MONO_INTERNAL;
 884 void      mono_jit_thread_attach            (MonoDomain *domain);
 885 guint32   mono_get_jit_tls_key              (void) MONO_INTERNAL;
 886 gint32    mono_get_lmf_tls_offset           (void) MONO_INTERNAL;
 887 gint32    mono_get_lmf_addr_tls_offset      (void) MONO_INTERNAL;
 888 GList    *mono_varlist_insert_sorted        (MonoCompile *cfg, GList *list, MonoMethodVar *mv, gboolean sort_end) MONO_INTERNAL;
 889 GList    *mono_varlist_sort                 (MonoCompile *cfg, GList *list, int sort_type) MONO_INTERNAL;
 890 void      mono_analyze_liveness             (MonoCompile *cfg) MONO_INTERNAL;
 891 void      mono_liveness_handle_exception_clauses (MonoCompile *cfg) MONO_INTERNAL;
 892 void      mono_linear_scan                  (MonoCompile *cfg, GList *vars, GList *regs, regmask_t *used_mask) MONO_INTERNAL;
 893 void      mono_create_jump_table            (MonoCompile *cfg, MonoInst *label, MonoBasicBlock **bbs, int num_blocks) MONO_INTERNAL;
 894 int       mono_compile_assembly             (MonoAssembly *ass, guint32 opts, const char *aot_options) MONO_INTERNAL;
 895 MonoCompile *mini_method_compile            (MonoMethod *method, guint32 opts, MonoDomain *domain, gboolean run_cctors, gboolean compile_aot, int parts) MONO_INTERNAL;
 896 void      mono_destroy_compile              (MonoCompile *cfg) MONO_INTERNAL;
 897 MonoJitICallInfo *mono_find_jit_opcode_emulation (int opcode) MONO_INTERNAL;
 898 void      mono_print_ins (int i, MonoInst *ins) MONO_INTERNAL;
 899
 900 void      mono_aot_init                     (void) MONO_INTERNAL;
 901 gpointer  mono_aot_get_method               (MonoDomain *domain,
 902                                                                                          MonoMethod *method) MONO_INTERNAL;
 903 gpointer  mono_aot_get_method_from_token    (MonoDomain *domain, MonoImage *image, guint32 token) MONO_INTERNAL;
 904 gboolean  mono_aot_is_got_entry             (guint8 *code, guint8 *addr) MONO_INTERNAL;
 905 guint8*   mono_aot_get_plt_entry            (guint8 *code) MONO_INTERNAL;
 906 gboolean  mono_aot_init_vtable              (MonoVTable *vtable) MONO_INTERNAL;
 907 gboolean  mono_aot_get_cached_class_info    (MonoClass *klass, MonoCachedClassInfo *res) MONO_INTERNAL;
 908 gboolean  mono_aot_get_class_from_name      (MonoImage *image, const char *name_space, const char *name, MonoClass **klass) MONO_INTERNAL;
 909 MonoJitInfo* mono_aot_find_jit_info         (MonoDomain *domain, MonoImage *image, gpointer addr) MONO_INTERNAL;
 910 void mono_aot_set_make_unreadable           (gboolean unreadable) MONO_INTERNAL;
 911 gboolean mono_aot_is_pagefault              (void *ptr) MONO_INTERNAL;
 912 void mono_aot_handle_pagefault              (void *ptr) MONO_INTERNAL;
 913 guint32 mono_aot_get_n_pagefaults           (void) MONO_INTERNAL;
 914 gpointer mono_aot_plt_resolve               (gpointer aot_module, guint32 plt_info_offset, guint8 *code) MONO_INTERNAL;
 915
 916 gboolean  mono_method_blittable             (MonoMethod *method) MONO_INTERNAL;
 917 gboolean  mono_method_same_domain           (MonoJitInfo *caller, MonoJitInfo *callee) MONO_INTERNAL;
 918
 919 void      mono_register_opcode_emulation    (int opcode, const char* name, const char *sigstr, gpointer func, gboolean no_throw) MONO_INTERNAL;
 920 void      mono_draw_graph                   (MonoCompile *cfg, MonoGraphOptions draw_options) MONO_INTERNAL;
 921 void      mono_add_varcopy_to_end           (MonoCompile *cfg, MonoBasicBlock *bb, int src, int dest) MONO_INTERNAL;
 922 void      mono_add_ins_to_end               (MonoBasicBlock *bb, MonoInst *inst) MONO_INTERNAL;
 923 gpointer  mono_create_ftnptr                (MonoDomain *domain, gpointer addr) MONO_INTERNAL;
 924
 925 int               mono_find_method_opcode      (MonoMethod *method) MONO_INTERNAL;
 926 MonoJitICallInfo *mono_find_jit_icall_by_name  (const char *name) MONO_INTERNAL;
 927 MonoJitICallInfo *mono_find_jit_icall_by_addr  (gconstpointer addr) MONO_INTERNAL;
 928 MonoJitICallInfo *mono_register_jit_icall      (gconstpointer func, const char *name, MonoMethodSignature *sig, gboolean is_save) MONO_INTERNAL;
 929 gconstpointer     mono_icall_get_wrapper       (MonoJitICallInfo* callinfo) MONO_INTERNAL;
 930
 931 guint8 *          mono_get_trampoline_code (MonoTrampolineType tramp_type) MONO_INTERNAL;
 932 gpointer          mono_create_jump_trampoline (MonoDomain *domain,
 933                                                                                            MonoMethod *method,
 934                                                                                            gboolean add_sync_wrapper) MONO_INTERNAL;
 935 gpointer          mono_create_class_init_trampoline (MonoVTable *vtable) MONO_INTERNAL;
 936 gpointer          mono_create_jit_trampoline (MonoMethod *method) MONO_INTERNAL;
 937 gpointer          mono_create_jit_trampoline_from_token (MonoImage *image, guint32 token) MONO_INTERNAL;
 938 MonoVTable*       mono_find_class_init_trampoline_by_addr (gconstpointer addr) MONO_INTERNAL;
 939 gpointer          mono_magic_trampoline (gssize *regs, guint8 *code, MonoMethod *m, guint8* tramp) MONO_INTERNAL;
 940 gpointer          mono_delegate_trampoline (gssize *regs, guint8 *code, MonoClass *klass, guint8* tramp) MONO_INTERNAL;
 941 gpointer          mono_aot_trampoline (gssize *regs, guint8 *code, guint8 *token_info,
 942                                                                            guint8* tramp) MONO_INTERNAL;
 943 gpointer          mono_aot_plt_trampoline (gssize *regs, guint8 *code, guint8 *token_info,
 944                                                                                    guint8* tramp) MONO_INTERNAL;
 945 void              mono_class_init_trampoline (gssize *regs, guint8 *code, MonoVTable *vtable, guint8 *tramp) MONO_INTERNAL;
 946 gpointer          mono_debugger_create_notification_function (void) MONO_INTERNAL;
 947
 948
 949 gboolean          mono_running_on_valgrind (void) MONO_INTERNAL;
 950 void*             mono_global_codeman_reserve (int size) MONO_INTERNAL;
 951 const char       *mono_regname_full (int reg, gboolean fp) MONO_INTERNAL;
 952 gint32*           mono_allocate_stack_slots_full (MonoCompile *cfg, gboolean backward, guint32 *stack_size, guint32 *stack_align) MONO_INTERNAL;
 953 gint32*           mono_allocate_stack_slots (MonoCompile *cfg, guint32 *stack_size, guint32 *stack_align) MONO_INTERNAL;
 954 void              mono_local_regalloc (MonoCompile *cfg, MonoBasicBlock *bb) MONO_INTERNAL;
 955 MonoInst         *mono_branch_optimize_exception_target (MonoCompile *cfg, MonoBasicBlock *bb, const char * exname) MONO_INTERNAL;
 956 gboolean          mono_is_regsize_var (MonoType *t) MONO_INTERNAL;
 957 CompRelation      mono_opcode_to_cond (int opcode) MONO_INTERNAL;
 958 CompType          mono_opcode_to_type (int opcode, int cmp_opcode) MONO_INTERNAL;
 959
 960 /* methods that must be provided by the arch-specific port */
 961 void      mono_arch_init                        (void) MONO_INTERNAL;
 962 void      mono_arch_cleanup                     (void) MONO_INTERNAL;
 963 void      mono_arch_cpu_init                    (void) MONO_INTERNAL;
 964 guint32   mono_arch_cpu_optimizazions           (guint32 *exclude_mask) MONO_INTERNAL;
 965 void      mono_arch_instrument_mem_needs        (MonoMethod *method, int *stack, int *code) MONO_INTERNAL;
 966 void     *mono_arch_instrument_prolog           (MonoCompile *cfg, void *func, void *p, gboolean enable_arguments) MONO_INTERNAL;
 967 void     *mono_arch_instrument_epilog           (MonoCompile *cfg, void *func, void *p, gboolean enable_arguments) MONO_INTERNAL;
 968 MonoCallInst *mono_arch_call_opcode             (MonoCompile *cfg, MonoBasicBlock* bb, MonoCallInst *call, int is_virtual) MONO_INTERNAL;
 969 MonoInst *mono_arch_get_inst_for_method         (MonoCompile *cfg, MonoMethod *cmethod, MonoMethodSignature *fsig, MonoInst **args) MONO_INTERNAL;
 970 void      mono_codegen                          (MonoCompile *cfg) MONO_INTERNAL;
 971 void      mono_call_inst_add_outarg_reg         (MonoCompile *cfg, MonoCallInst *call, int vreg, int hreg, gboolean fp) MONO_INTERNAL;
 972 const char *mono_arch_regname                   (int reg) MONO_INTERNAL;
 973 const char *mono_arch_fregname                  (int reg) MONO_INTERNAL;
 974 gpointer  mono_arch_get_throw_exception         (void) MONO_INTERNAL;
 975 gpointer  mono_arch_get_rethrow_exception       (void) MONO_INTERNAL;
 976 gpointer  mono_arch_get_throw_exception_by_name (void) MONO_INTERNAL;
 977 gpointer  mono_arch_get_throw_corlib_exception  (void) MONO_INTERNAL;
 978 guchar*   mono_arch_create_trampoline_code      (MonoTrampolineType tramp_type) MONO_INTERNAL;
 979 gpointer  mono_arch_create_jit_trampoline       (MonoMethod *method) MONO_INTERNAL;
 980 MonoJitInfo *mono_arch_create_jump_trampoline      (MonoMethod *method) MONO_INTERNAL;
 981 gpointer  mono_arch_create_class_init_trampoline(MonoVTable *vtable) MONO_INTERNAL;
 982 GList    *mono_arch_get_allocatable_int_vars    (MonoCompile *cfg) MONO_INTERNAL;
 983 GList    *mono_arch_get_global_int_regs         (MonoCompile *cfg) MONO_INTERNAL;
 984 guint32   mono_arch_regalloc_cost               (MonoCompile *cfg, MonoMethodVar *vmv) MONO_INTERNAL;
 985 void      mono_arch_patch_code                  (MonoMethod *method, MonoDomain *domain, guint8 *code, MonoJumpInfo *ji, gboolean run_cctors) MONO_INTERNAL;
 986 void      mono_arch_flush_icache                (guint8 *code, gint size) MONO_INTERNAL;
 987 int       mono_arch_max_epilog_size             (MonoCompile *cfg) MONO_INTERNAL;
 988 guint8   *mono_arch_emit_prolog                 (MonoCompile *cfg) MONO_INTERNAL;
 989 void      mono_arch_emit_epilog                 (MonoCompile *cfg) MONO_INTERNAL;
 990 void      mono_arch_emit_exceptions             (MonoCompile *cfg) MONO_INTERNAL;
 991 void      mono_arch_local_regalloc              (MonoCompile *cfg, MonoBasicBlock *bb) MONO_INTERNAL;
 992 void      mono_arch_output_basic_block          (MonoCompile *cfg, MonoBasicBlock *bb) MONO_INTERNAL;
 993 gboolean  mono_arch_has_unwind_info             (gconstpointer addr) MONO_INTERNAL;
 994 void      mono_arch_setup_jit_tls_data          (MonoJitTlsData *tls) MONO_INTERNAL;
 995 void      mono_arch_free_jit_tls_data           (MonoJitTlsData *tls) MONO_INTERNAL;
 996 void      mono_arch_emit_this_vret_args         (MonoCompile *cfg, MonoCallInst *inst, int this_reg, int this_type, int vt_reg) MONO_INTERNAL;
 997 void      mono_arch_allocate_vars               (MonoCompile *m) MONO_INTERNAL;
 998 int       mono_arch_get_argument_info           (MonoMethodSignature *csig, int param_count, MonoJitArgumentInfo *arg_info) MONO_INTERNAL;
 999 gboolean  mono_arch_print_tree                  (MonoInst *tree, int arity) MONO_INTERNAL;
1000 MonoJitInfo *mono_arch_find_jit_info            (MonoDomain *domain,
1001                                                  MonoJitTlsData *jit_tls,
1002                                                  MonoJitInfo *res,
1003                                                  MonoJitInfo *prev_ji,
1004                                                  MonoContext *ctx,
1005                                                  MonoContext *new_ctx,
1006                                                  char **trace,
1007                                                  MonoLMF **lmf,
1008                                                  int *native_offset,
1009                                                  gboolean *managed) MONO_INTERNAL;
1010 gpointer mono_arch_get_call_filter              (void) MONO_INTERNAL;
1011 gpointer mono_arch_get_restore_context          (void) MONO_INTERNAL;
1012 gboolean mono_arch_handle_exception             (void *sigctx, gpointer obj, gboolean test_only) MONO_INTERNAL;
1013 void     mono_arch_handle_altstack_exception    (void *sigctx, gpointer fault_addr, gboolean stack_ovf) MONO_INTERNAL;
1014 gpointer mono_arch_ip_from_context              (void *sigctx) MONO_INTERNAL;
1015 void     mono_arch_sigctx_to_monoctx            (void *sigctx, MonoContext *ctx) MONO_INTERNAL;
1016 void     mono_arch_monoctx_to_sigctx            (MonoContext *mctx, void *ctx) MONO_INTERNAL;
1017 void     mono_arch_flush_register_windows       (void) MONO_INTERNAL;
1018 gboolean mono_arch_is_inst_imm                  (gint64 imm) MONO_INTERNAL;
1019 MonoInst* mono_arch_get_domain_intrinsic        (MonoCompile* cfg) MONO_INTERNAL;
1020 MonoInst* mono_arch_get_thread_intrinsic        (MonoCompile* cfg) MONO_INTERNAL;
1021 gboolean mono_arch_is_int_overflow              (void *sigctx, void *info) MONO_INTERNAL;
1022 void     mono_arch_invalidate_method            (MonoJitInfo *ji, void *func, gpointer func_arg) MONO_INTERNAL;
1023 guint32  mono_arch_get_patch_offset             (guint8 *code) MONO_INTERNAL;
1024 gpointer*mono_arch_get_vcall_slot_addr          (guint8* code, gpointer *regs) MONO_INTERNAL;
1025 gpointer*mono_arch_get_delegate_method_ptr_addr (guint8* code, gpointer *regs) MONO_INTERNAL;
1026 void     mono_arch_create_vars                  (MonoCompile *cfg) MONO_INTERNAL;
1027 void     mono_arch_save_unwind_info             (MonoCompile *cfg) MONO_INTERNAL;
1028 void     mono_arch_register_lowlevel_calls      (void) MONO_INTERNAL;
1029 gpointer mono_arch_get_unbox_trampoline         (MonoMethod *m, gpointer addr) MONO_INTERNAL;
1030 void     mono_arch_patch_callsite               (guint8 *code, guint8 *addr) MONO_INTERNAL;
1031 void     mono_arch_patch_plt_entry              (guint8 *code, guint8 *addr) MONO_INTERNAL;
1032 void     mono_arch_nullify_class_init_trampoline(guint8 *code, gssize *regs) MONO_INTERNAL;
1033 void     mono_arch_nullify_plt_entry            (guint8 *code) MONO_INTERNAL;
1034 void     mono_arch_patch_delegate_trampoline    (guint8 *code, guint8 *tramp, gssize *regs, guint8 *addr) MONO_INTERNAL;
1035 gpointer mono_arch_get_this_arg_from_call       (MonoMethodSignature *sig, gssize *regs, guint8 *code);
1036 gpointer mono_arch_get_delegate_invoke_impl     (MonoMethodSignature *sig, gboolean has_target);
1037 gpointer mono_arch_create_specific_trampoline   (gpointer arg1, MonoTrampolineType tramp_type, MonoDomain *domain, guint32 *code_len) MONO_INTERNAL;
1038 void        mono_arch_emit_imt_argument         (MonoCompile *cfg, MonoCallInst *call) MONO_INTERNAL;
1039 MonoMethod* mono_arch_find_imt_method           (gpointer *regs, guint8 *code) MONO_INTERNAL;
1040 MonoObject* mono_arch_find_this_argument        (gpointer *regs, MonoMethod *method) MONO_INTERNAL;
1041 gpointer    mono_arch_build_imt_thunk           (MonoVTable *vtable, MonoDomain *domain, MonoIMTCheckItem **imt_entries, int count) MONO_INTERNAL;
1042
1043 /* Exception handling */
1044 gboolean mono_handle_exception                  (MonoContext *ctx, gpointer obj,
1045                                                  gpointer original_ip, gboolean test_only) MONO_INTERNAL;
1046 void     mono_handle_native_sigsegv             (int signal, void *sigctx) MONO_INTERNAL;
1047 void     mono_print_thread_dump                 (void *sigctx);
1048 void     mono_jit_walk_stack                    (MonoStackWalk func, gboolean do_il_offset, gpointer user_data) MONO_INTERNAL;
1049 void     mono_jit_walk_stack_from_ctx           (MonoStackWalk func, MonoContext *ctx, gboolean do_il_offset, gpointer user_data) MONO_INTERNAL;
1050 void     mono_setup_altstack                    (MonoJitTlsData *tls) MONO_INTERNAL;
1051 void     mono_free_altstack                     (MonoJitTlsData *tls) MONO_INTERNAL;
1052
1053 /* the new function to do stack walks */
1054 typedef gboolean (*MonoStackFrameWalk)          (MonoDomain *domain, MonoContext *ctx, MonoJitInfo *ji, gpointer data);
1055 void      mono_walk_stack                       (MonoDomain *domain, MonoJitTlsData *jit_tls, MonoContext *start_ctx, MonoStackFrameWalk func, gpointer user_data);
1056
1057 MonoArray *ves_icall_get_trace                  (MonoException *exc, gint32 skip, MonoBoolean need_file_info) MONO_INTERNAL;
1058 MonoBoolean ves_icall_get_frame_info            (gint32 skip, MonoBoolean need_file_info,
1059                                                  MonoReflectionMethod **method,
1060                                                  gint32 *iloffset, gint32 *native_offset,
1061                                                  MonoString **file, gint32 *line, gint32 *column) MONO_INTERNAL;
1062 MonoString *ves_icall_System_Exception_get_trace (MonoException *exc) MONO_INTERNAL;
1063
1064 /* Dominator/SSA methods */
1065 void        mono_compile_dominator_info         (MonoCompile *cfg, int dom_flags) MONO_INTERNAL;
1066 void        mono_compute_natural_loops          (MonoCompile *cfg) MONO_INTERNAL;
1067 MonoBitSet* mono_compile_iterated_dfrontier     (MonoCompile *cfg, MonoBitSet *set) MONO_INTERNAL;
1068 void        mono_ssa_compute                    (MonoCompile *cfg) MONO_INTERNAL;
1069 void        mono_ssa_remove                     (MonoCompile *cfg) MONO_INTERNAL;
1070 void        mono_ssa_cprop                      (MonoCompile *cfg) MONO_INTERNAL;
1071 void        mono_ssa_deadce                     (MonoCompile *cfg) MONO_INTERNAL;
1072 void        mono_ssa_strength_reduction         (MonoCompile *cfg) MONO_INTERNAL;
1073 void        mono_free_loop_info                 (MonoCompile *cfg) MONO_INTERNAL;
1074
1075 /* debugging support */
1076 void      mono_debug_init_method                (MonoCompile *cfg, MonoBasicBlock *start_block,
1077                                                  guint32 breakpoint_id) MONO_INTERNAL;
1078 void      mono_debug_open_method                (MonoCompile *cfg) MONO_INTERNAL;
1079 void      mono_debug_close_method               (MonoCompile *cfg) MONO_INTERNAL;
1080 void      mono_debug_open_block                 (MonoCompile *cfg, MonoBasicBlock *bb, guint32 address) MONO_INTERNAL;
1081 void      mono_debug_record_line_number         (MonoCompile *cfg, MonoInst *ins, guint32 address) MONO_INTERNAL;
1082 void      mono_debug_serialize_debug_info       (MonoCompile *cfg, guint8 **out_buf, guint32 *buf_len) MONO_INTERNAL;
1083 void      mono_debug_add_aot_method             (MonoDomain *domain,
1084                                                  MonoMethod *method, guint8 *code_start,
1085                                                  guint8 *debug_info, guint32 debug_info_len) MONO_INTERNAL;
1086 void      mono_debug_add_icall_wrapper          (MonoMethod *method, MonoJitICallInfo* info) MONO_INTERNAL;
1087 void      mono_debug_print_vars                 (gpointer ip, gboolean only_arguments);
1088 void      mono_debugger_run_finally             (MonoContext *start_ctx);
1089
1090 /* Mono Debugger support */
1091 void      mono_debugger_init                    (void);
1092 int       mono_debugger_main                    (MonoDomain *domain, MonoAssembly *assembly, int argc, char **argv);
1093
1094
1095 /* Tracing */
1096 MonoTraceSpec *mono_trace_parse_options         (char *options) MONO_INTERNAL;
1097 void           mono_trace_set_assembly          (MonoAssembly *assembly) MONO_INTERNAL;
1098 gboolean       mono_trace_eval                  (MonoMethod *method) MONO_INTERNAL;
1099
1100 extern void
1101 mono_perform_abc_removal (MonoCompile *cfg) MONO_INTERNAL;
1102 extern void
1103 mono_perform_ssapre (MonoCompile *cfg) MONO_INTERNAL;
1104 extern void
1105 mono_local_cprop (MonoCompile *cfg) MONO_INTERNAL;
1106
1107 /* CAS - stack walk */
1108 MonoSecurityFrame* ves_icall_System_Security_SecurityFrame_GetSecurityFrame (gint32 skip) MONO_INTERNAL;
1109 MonoArray* ves_icall_System_Security_SecurityFrame_GetSecurityStack (gint32 skip) MONO_INTERNAL;
1110
1111 int mini_wapi_hps     (int argc, char **argv);
1112 int mini_wapi_semdel  (int argc, char **argv);
1113 int mini_wapi_seminfo (int argc, char **argv);
1114
1115 /* Generic sharing */
1116
1117 int mono_method_check_context_used (MonoMethod *method, MonoGenericContext *context) MONO_INTERNAL;
1118 int mono_class_check_context_used (MonoClass *class, MonoGenericContext *context) MONO_INTERNAL;
1119
1120 gboolean mono_method_is_generic_impl (MonoMethod *method) MONO_INTERNAL;
1121 gboolean mono_method_is_generic_sharable_impl (MonoMethod *method) MONO_INTERNAL;
1122
1123 MonoGenericContext* mono_make_shared_context (MonoCompile *cfg, MonoGenericContext *context) MONO_INTERNAL;
1124
1125
1126 #endif /* __MONO_MINI_H__ */