1 #ifndef __MONO_MINI_H__
2 #define __MONO_MINI_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>
21 #define MONO_BREAKPOINT_ARRAY_SIZE 64
23 #include "mini-arch.h"
28 #define G_LIKELY(a) (a)
29 #define G_UNLIKELY(a) (a)
33 #define G_MAXINT32 2147483647
37 #define G_MININT32 (-G_MAXINT32 - 1)
41 #define MINI_DEBUG(level,limit,code)
43 #define MINI_DEBUG(level,limit,code) do {if (G_UNLIKELY ((level) >= (limit))) code} while (0)
46 #define NOT_IMPLEMENTED do { g_assert_not_reached (); } while (0)
49 #define MONO_USE_AOT_COMPILER
52 /* for 32 bit systems */
53 #if G_BYTE_ORDER == G_LITTLE_ENDIAN
54 #define MINI_LS_WORD_IDX 0
55 #define MINI_MS_WORD_IDX 1
57 #define MINI_LS_WORD_IDX 1
58 #define MINI_MS_WORD_IDX 0
60 #define MINI_LS_WORD_OFFSET (MINI_LS_WORD_IDX * 4)
61 #define MINI_MS_WORD_OFFSET (MINI_MS_WORD_IDX * 4)
62 #define inst_ls_word data.op[MINI_LS_WORD_IDX].const_val
63 #define inst_ms_word data.op[MINI_MS_WORD_IDX].const_val
65 #define MONO_FAKE_IMT_METHOD ((MonoMethod*)GINT_TO_POINTER(-1))
66 #define MONO_FAKE_VTABLE_METHOD ((MonoMethod*)GINT_TO_POINTER(-2))
68 /* Version number of the AOT file format */
69 #define MONO_AOT_FILE_VERSION "33"
72 #define mono_bitset_foreach_bit(set,b,n) \
73 for (b = 0; b < n; b++)\
74 if (mono_bitset_test_fast(set,b))
75 #define mono_bitset_foreach_bit_rev(set,b,n) \
76 for (b = n - 1; b >= 0; b--)\
77 if (mono_bitset_test_fast(set,b))
79 #define mono_bitset_foreach_bit(set,b,n) \
80 for (b = mono_bitset_find_start (set); b < n && b >= 0; b = mono_bitset_find_first (set, b))
81 #define mono_bitset_foreach_bit_rev(set,b,n) \
82 for (b = mono_bitset_find_last (set, n - 1); b >= 0; b = b ? mono_bitset_find_last (set, b) : -1)
87 * Pull the list of opcodes
89 #define OPDEF(a,b,c,d,e,f,g,h,i,j) \
93 #include "mono/cil/opcode.def"
98 #define MONO_VARINFO(cfg,varnum) (&(cfg)->vars [varnum])
100 #define MONO_INST_NEW(cfg,dest,op) do { \
101 (dest) = mono_mempool_alloc0 ((cfg)->mempool, sizeof (MonoInst)); \
102 (dest)->opcode = (op); \
103 (dest)->cil_code = (cfg)->ip; \
106 #define MONO_INST_NEW_CALL(cfg,dest,op) do { \
107 (dest) = mono_mempool_alloc0 ((cfg)->mempool, sizeof (MonoCallInst)); \
108 (dest)->inst.opcode = (op); \
109 (dest)->inst.cil_code = (cfg)->ip; \
110 MONO_INST_LIST_INIT (&(dest)->out_args); \
113 #define MONO_INST_NEW_CALL_ARG(cfg,dest,op) do { \
114 (dest) = mono_mempool_alloc0 ((cfg)->mempool, sizeof (MonoCallArgParm)); \
115 (dest)->ins.opcode = (op); \
118 #define NULLIFY_INS(ins) do { \
119 (ins)->opcode = OP_NOP; \
120 (ins)->dreg = (ins)->sreg1 = (ins)->sreg2 = -1; \
121 (ins)->ssa_op = MONO_SSA_NOP; \
125 * this is used to determine when some branch optimizations are possible: we exclude FP compares
126 * because they have weird semantics with NaNs.
128 #define MONO_IS_COND_BRANCH_OP(ins) (((ins)->opcode >= CEE_BEQ && (ins)->opcode <= CEE_BLT_UN) || ((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))
129 #define MONO_IS_COND_BRANCH_NOFP(ins) (MONO_IS_COND_BRANCH_OP(ins) && (ins)->inst_left->inst_left->type != STACK_R8)
131 #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))
133 typedef struct MonoInstList MonoInstList;
134 typedef struct MonoInst MonoInst;
135 typedef struct MonoCallInst MonoCallInst;
136 typedef struct MonoCallArgParm MonoCallArgParm;
137 typedef struct MonoEdge MonoEdge;
138 typedef struct MonoMethodVar MonoMethodVar;
139 typedef struct MonoBasicBlock MonoBasicBlock;
140 typedef struct MonoLMF MonoLMF;
141 typedef struct MonoSpillInfo MonoSpillInfo;
142 typedef struct MonoTraceSpec MonoTraceSpec;
144 extern guint32 mono_jit_tls_id;
145 extern MonoTraceSpec *mono_jit_trace_calls;
146 extern gboolean mono_break_on_exc;
147 extern int mono_exc_esp_offset;
149 #define mono_compile_aot 0
151 extern gboolean mono_compile_aot;
153 extern MonoMethodDesc *mono_inject_async_exc_method;
154 extern int mono_inject_async_exc_pos;
155 extern MonoMethodDesc *mono_break_at_bb_method;
156 extern int mono_break_at_bb_bb_num;
157 extern gboolean check_for_pending_exc;
158 extern gboolean mono_verify_all;
160 struct MonoInstList {
161 struct MonoInstList *next, *prev;
164 #define MONO_INST_LIST_INIT(list) do { \
165 (list)->next = (list); \
166 (list)->prev = (list); \
170 MONO_INST_LIST_EMPTY (MonoInstList *list)
172 return list->next == list;
176 __MONO_INST_LIST_ADD (MonoInstList *new, MonoInstList *prev, MonoInstList *next)
186 MONO_INST_LIST_ADD (MonoInstList *new, MonoInstList *head)
188 __MONO_INST_LIST_ADD (new, head, head->next);
192 MONO_INST_LIST_ADD_TAIL (MonoInstList *new, MonoInstList *head)
194 __MONO_INST_LIST_ADD (new, head->prev, head);
198 __MONO_INST_LIST_DEL (MonoInstList *prev, MonoInstList *next)
205 __MONO_INST_LIST_SPLICE (MonoInstList *list, MonoInstList *head)
207 MonoInstList *first = list->next;
208 MonoInstList *last = list->prev;
209 MonoInstList *at = head->next;
219 MONO_INST_LIST_SPLICE (MonoInstList *list, MonoInstList *head)
221 if (!MONO_INST_LIST_EMPTY (list))
222 __MONO_INST_LIST_SPLICE (list, head);
226 MONO_INST_LIST_SPLICE_TAIL (MonoInstList *list, MonoInstList *head)
228 if (!MONO_INST_LIST_EMPTY (list))
229 __MONO_INST_LIST_SPLICE (list, head->prev);
233 MONO_INST_LIST_SPLICE_INIT (MonoInstList *list, MonoInstList *head)
235 if (!MONO_INST_LIST_EMPTY (list)) {
236 __MONO_INST_LIST_SPLICE (list, head);
237 MONO_INST_LIST_INIT (list);
242 MONO_INST_LIST_SPLICE_TAIL_INIT (MonoInstList *list, MonoInstList *head)
244 if (!MONO_INST_LIST_EMPTY (list)) {
245 __MONO_INST_LIST_SPLICE (list, head->prev);
246 MONO_INST_LIST_INIT (list);
250 /*#define mono_container_of(ptr, type, member) ({ \
251 const typeof( ((type *)0)->member ) *__mptr = (ptr); \
252 (type *)( (char *)__mptr - offsetof(type,member) );})
254 #define MONO_INST_LIST_ENTRY(ptr, type, member) \
255 mono_container_of(ptr, type, member)*/
257 #define MONO_INST_LIST_ENTRY(ptr, type, member) \
260 #define MONO_INST_LIST_FIRST_ENTRY(ptr, type, member) \
261 MONO_INST_LIST_ENTRY((ptr)->next, type, member)
263 #define MONO_INST_LIST_LAST_ENTRY(ptr, type, member) \
264 MONO_INST_LIST_ENTRY((ptr)->prev, type, member)
266 #define MONO_INST_LIST_FOR_EACH(pos, head) \
267 for (pos = (head)->next; pos != (head); pos = pos->next)
269 #define MONO_INST_LIST_FOR_EACH_PREV(pos, head) \
270 for (pos = (head)->prev; pos != (head); pos = pos->prev)
272 #define MONO_INST_LIST_FOR_EACH_SAFE(pos, n, head) \
273 for (pos = (head)->next, n = pos->next; pos != (head); \
274 pos = n, n = pos->next)
276 #define MONO_INST_LIST_FOR_EACH_PREV_SAFE(pos, n, head) \
277 for (pos = (head)->prev, n = pos->prev; pos != (head); \
278 pos = n, n = pos->prev)
280 #define MONO_INST_LIST_FOR_EACH_ENTRY(pos, head, member) \
281 for (pos = MONO_INST_LIST_ENTRY ((head)->next, MonoInst, member);\
282 &pos->member != (head);\
283 pos = MONO_INST_LIST_ENTRY (pos->member.next, MonoInst, member))
285 #define MONO_INST_LIST_FOR_EACH_ENTRY_REVERSE(pos, head, member) \
286 for (pos = MONO_INST_LIST_ENTRY ((head)->prev, MonoInst, member);\
287 &pos->member != (head);\
288 pos = MONO_INST_LIST_ENTRY (pos->member.prev, MonoInst, member))
290 #define MONO_INST_LIST_FOR_EACH_ENTRY_SAFE(pos, n, head, member) \
291 for (pos = MONO_INST_LIST_ENTRY ((head)->next, MonoInst, member),\
292 n = MONO_INST_LIST_ENTRY (pos->member.next, MonoInst, member);\
293 &pos->member != (head); \
294 pos = n, n = MONO_INST_LIST_ENTRY (n->member.next, MonoInst, member))
296 #define MONO_BB_FOR_EACH_INS(bb, ins) MONO_INST_LIST_FOR_EACH_ENTRY ((ins), &((bb)->ins_list), node)
298 #define MONO_BB_FOR_EACH_INS_SAFE(bb, next, ins) MONO_INST_LIST_FOR_EACH_ENTRY_SAFE ((ins), (next), &((bb)->ins_list), node)
300 #define MONO_BB_FOR_EACH_INS_REVERSE(bb, ins) MONO_INST_LIST_FOR_EACH_ENTRY_REVERSE ((ins), &((bb)->ins_list), node)
308 struct MonoSpillInfo {
313 * The IR-level basic block.
315 * A basic block can have multiple exits just fine, as long as the point of
316 * 'departure' is the last instruction in the basic block. Extended basic
317 * blocks, on the other hand, may have instructions that leave the block
318 * midstream. The important thing is that they cannot be _entered_
319 * midstream, ie, execution of a basic block (or extened bb) always start
320 * at the beginning of the block, never in the middle.
322 struct MonoBasicBlock {
323 MonoInstList ins_list;
325 /* the next basic block in the order it appears in IL */
326 MonoBasicBlock *next_bb;
328 /* unique block number identification */
333 /* Basic blocks: incoming and outgoing counts and pointers */
334 /* Each bb should only appear once in each array */
335 gint16 out_count, in_count;
336 MonoBasicBlock **in_bb;
337 MonoBasicBlock **out_bb;
339 /* Points to the start of the CIL code that initiated this BB */
340 unsigned char* cil_code;
342 /* Length of the CIL block */
345 /* The address of the generated code, used for fixups */
349 /* Visited and reachable flags */
353 * SSA and loop based flags
355 MonoBitSet *dominators;
356 MonoBitSet *dfrontier;
357 MonoBasicBlock *idom;
359 /* fast dominator algorithm */
360 MonoBasicBlock *df_parent, *ancestor, *child, *label;
362 int size, sdom, idomn;
364 /* loop nesting and recognition */
367 gint8 loop_body_start;
370 * Whenever the bblock is rarely executed so it should be emitted after
371 * the function epilog.
373 guint out_of_line : 1;
374 /* Caches the result of uselessness calculation during optimize_branches */
375 guint not_useless : 1;
377 /* use for liveness analysis */
379 MonoBitSet *kill_set;
380 MonoBitSet *live_in_set;
381 MonoBitSet *live_out_set;
383 /* fields to deal with non-empty stack slots at bb boundary */
384 guint16 out_scount, in_scount;
385 MonoInst **out_stack;
388 /* we use that to prevent merging of bblocks covered by different clauses*/
392 * The region encodes whether the basic block is inside
393 * a finally, catch, filter or none of these.
395 * If the value is -1, then it is neither finally, catch nor filter
397 * Otherwise the format is:
399 * Bits: | 0-3 | 4-7 | 8-31
401 * | clause-flags | MONO_REGION | clause-index
406 /* The current symbolic register number, used in local register allocation. */
413 BB_REACHABLE = 1 << 1,
414 BB_EXCEPTION_DEAD_OBJ = 1 << 2,
415 BB_EXCEPTION_UNSAFE = 1 << 3,
416 BB_EXCEPTION_HANDLER = 1 << 4
419 typedef struct MonoMemcpyArgs {
424 MonoInstList node; /* this must be the first field in this struct */
433 MonoMethodSignature *signature;
434 MonoBasicBlock **many_blocks;
435 MonoBasicBlock *target_block;
440 MonoCallInst *call_inst;
446 guint8 type; /* stack type */
450 /* used by the register allocator */
451 gint32 dreg, sreg1, sreg2;
452 /* used mostly by the backend to store additional info it may need */
457 MonoMemcpyArgs *memcpy_args; /* in OP_MEMSET and OP_MEMCPY */
459 gboolean is_pinvoke; /* for variables in the unmanaged marshal format */
460 gboolean record_cast_details; /* For CEE_CASTCLASS */
465 const unsigned char* cil_code; /* for debugging and bblock splitting */
469 MONO_ADD_INS (MonoBasicBlock *bb, MonoInst *inst)
471 MONO_INST_LIST_ADD_TAIL (&inst->node, &bb->ins_list);
475 MONO_DELETE_INS (MonoBasicBlock *bb, MonoInst *inst)
477 __MONO_INST_LIST_DEL (inst->node.prev, inst->node.next);
480 static inline MonoInst *
481 mono_inst_list_first (MonoInstList *head)
483 if (MONO_INST_LIST_EMPTY (head))
485 return MONO_INST_LIST_FIRST_ENTRY (head, MonoInst, node);
488 static inline MonoInst *
489 mono_inst_list_last (MonoInstList *head)
491 if (MONO_INST_LIST_EMPTY (head))
493 return MONO_INST_LIST_LAST_ENTRY (head, MonoInst, node);
496 static inline MonoInst *
497 mono_inst_list_next (MonoInstList *ins, MonoInstList *head)
499 if (ins->next == head)
501 return MONO_INST_LIST_ENTRY (ins->next, MonoInst, node);
504 static inline MonoInst *
505 mono_inst_list_prev (MonoInstList *ins, MonoInstList *head)
507 if (ins->prev == head)
509 return MONO_INST_LIST_ENTRY (ins->prev, MonoInst, node);
512 struct MonoCallInst {
514 MonoMethodSignature *signature;
517 MonoInstList out_args;
521 regmask_t used_iregs;
522 regmask_t used_fregs;
523 GSList *out_ireg_args;
524 GSList *out_freg_args;
527 struct MonoCallArgParm {
536 * Note: some of the values overlap, because they can't appear
537 * in the same MonoInst.
540 MONO_INST_HAS_METHOD = 1,
541 /* temp local created by a DUP: used only within a BB */
542 MONO_INST_IS_TEMP = 1,
543 MONO_INST_INIT = 1, /* in localloc */
544 MONO_INST_IS_DEAD = 2,
545 MONO_INST_TAILCALL = 4,
546 MONO_INST_VOLATILE = 4,
547 MONO_INST_BRLABEL = 4,
548 MONO_INST_NOTYPECHECK = 4,
549 MONO_INST_UNALIGNED = 8,
550 MONO_INST_DEFINITION_HAS_SIDE_EFFECTS = 8,
551 /* the address of the variable has been taken */
552 MONO_INST_INDIRECT = 16,
553 MONO_INST_NORANGECHECK = 16
556 #define inst_c0 data.op[0].const_val
557 #define inst_c1 data.op[1].const_val
558 #define inst_i0 data.op[0].src
559 #define inst_i1 data.op[1].src
560 #define inst_p0 data.op[0].p
561 #define inst_p1 data.op[1].p
562 #define inst_l data.i8const
563 #define inst_r data.r8const
564 #define inst_left data.op[0].src
565 #define inst_right data.op[1].src
567 #define inst_newa_len data.op[0].src
568 #define inst_newa_class data.op[1].klass
570 #define inst_var data.op[0].var
571 #define inst_vtype data.op[1].vtype
572 /* in branch instructions */
573 #define inst_many_bb data.op[1].many_blocks
574 #define inst_target_bb data.op[0].target_block
575 #define inst_true_bb data.op[1].many_blocks[0]
576 #define inst_false_bb data.op[1].many_blocks[1]
578 #define inst_basereg sreg1
579 #define inst_indexreg sreg2
580 #define inst_destbasereg dreg
581 #define inst_offset data.op[0].const_val
582 #define inst_imm data.op[1].const_val
583 #define inst_call data.op[1].call_inst
585 #define inst_phi_args data.op[1].phi_args
587 /* instruction description for use in regalloc/scheduling */
594 /* Unused, commented out to reduce the size of the mdesc tables
605 guint16 tid; /* tree number */
606 guint16 bid; /* block number */
612 MonoPosition first_use, last_use;
616 * Additional information about a variable
618 struct MonoMethodVar {
619 guint idx; /* inside cfg->varinfo, cfg->vars */
621 MonoBitSet *dfrontier;
622 MonoLiveRange range; /* generated by liveness analysis */
623 int reg; /* != -1 if allocated into a register */
625 MonoBitSet *def_in; /* used by SSA */
626 MonoInst *def; /* used by SSA */
627 MonoBasicBlock *def_bb; /* used by SSA */
628 GList *uses; /* used by SSA */
629 char cpstate; /* used by SSA conditional constant propagation */
633 gpointer end_of_stack;
635 #if !defined(HAVE_KW_THREAD) || !defined(MONO_ARCH_ENABLE_MONO_LMF_VAR)
639 gpointer signal_stack;
640 guint32 signal_stack_size;
641 gpointer stack_ovf_guard_base;
642 guint32 stack_ovf_guard_size;
643 void (*abort_func) (MonoObject *object);
644 /* Used to implement --debug=casts */
645 MonoClass *class_cast_from, *class_cast_to;
649 #define PATCH_INFO(a,b) MONO_PATCH_INFO_ ## a,
650 #include "patch-info.h"
656 * We need to store the image which the token refers to along with the token,
657 * since the image might not be the same as the image of the method which
658 * contains the relocation, because of inlining.
660 typedef struct MonoJumpInfoToken {
665 typedef struct MonoJumpInfoBBTable {
666 MonoBasicBlock **table;
668 } MonoJumpInfoBBTable;
670 typedef struct MonoJumpInfo MonoJumpInfo;
671 struct MonoJumpInfo {
679 MonoJumpInfoType type;
681 gconstpointer target;
682 #if SIZEOF_VOID_P == 8
691 MonoClassField *field;
695 MonoJumpInfoToken *token;
696 MonoJumpInfoBBTable *table;
701 MONO_TRAMPOLINE_GENERIC,
702 MONO_TRAMPOLINE_JUMP,
703 MONO_TRAMPOLINE_CLASS_INIT,
704 MONO_TRAMPOLINE_GENERIC_CLASS_INIT,
705 MONO_TRAMPOLINE_RGCTX_LAZY_FETCH,
707 MONO_TRAMPOLINE_AOT_PLT,
708 MONO_TRAMPOLINE_DELEGATE,
710 } MonoTrampolineType;
712 /* optimization flags */
713 #define OPTFLAG(id,shift,name,descr) MONO_OPT_ ## id = 1 << shift,
715 #include "optflags-def.h"
719 /* Bit-fields in the MonoBasicBlock.region */
720 #define MONO_REGION_TRY 0
721 #define MONO_REGION_FINALLY 16
722 #define MONO_REGION_CATCH 32
723 #define MONO_REGION_FAULT 64 /* Currently unused */
724 #define MONO_REGION_FILTER 128
726 #define MONO_BBLOCK_IS_IN_REGION(bblock, regtype) (((bblock)->region & (0xf << 4)) == (regtype))
729 * Control Flow Graph and compilation unit information
733 MonoMemPool *mempool;
737 MonoBasicBlock *bb_entry;
738 MonoBasicBlock *bb_exit;
739 MonoBasicBlock *bb_init;
740 MonoBasicBlock **bblocks;
741 MonoBasicBlock **cil_offset_to_bb;
742 MonoMemPool *state_pool; /* used by instruction selection */
743 MonoBasicBlock *cbb; /* used by instruction selection */
744 MonoInst *prev_ins; /* in decompose */
745 MonoJumpInfo *patch_info;
746 MonoJitInfo *jit_info;
747 MonoJitDynamicMethodInfo *dynamic_info;
750 guint num_varinfo; /* used items in varinfo */
751 guint varinfo_count; /* total storage in varinfo */
754 gint cil_offset_to_bb_len;
756 MonoSpillInfo *spill_info; /* machine register spills */
757 MonoSpillInfo *spill_info_float; /* fp register spills */
759 gint spill_info_len, spill_info_float_len;
760 /* unsigned char *cil_code; */
761 MonoMethod *inlined_method; /* the method which is currently inlined */
762 MonoInst *domainvar; /* a cache for the current domain */
763 MonoInst *got_var; /* Global Offset Table variable */
764 MonoInst *rgctx_var; /* Runtime generic context variable (for static generic methods) */
768 * This variable represents the hidden argument holding the vtype
769 * return address. If the method returns something other than a vtype, or
770 * the vtype is returned in registers this is NULL.
775 * This is used to initialize the cil_code field of MonoInst's.
777 const unsigned char *ip;
779 struct MonoAliasingInformation *aliasing_info;
781 /* A hashtable of region ID-> SP var mappings */
782 /* An SP var is a place to store the stack pointer (used by handlers)*/
785 /* A hashtable of region ID -> EX var mappings */
786 /* An EX var stores the exception object passed to catch/filter blocks */
789 GList *ldstr_list; /* used by AOT */
793 MonoGenericSharingContext *generic_sharing_context;
795 unsigned char *cil_start;
796 unsigned char *native_code;
801 regmask_t used_int_regs;
803 guint32 prof_options;
806 guint32 verbose_level;
811 guint disable_aot : 1;
812 guint disable_ssa : 1;
813 guint run_cctors : 1;
814 guint need_lmf_area : 1;
815 guint compile_aot : 1;
816 guint got_var_allocated : 1;
817 guint ret_var_is_local : 1;
818 guint unverifiable : 1;
819 guint skip_visibility : 1;
820 guint disable_reuse_registers : 1;
821 guint disable_reuse_stack_slots : 1;
822 guint disable_initlocals_opt : 1;
823 guint disable_omit_fp : 1;
826 MonoProfileCoverageInfo *coverage_info;
827 GHashTable *token_info_hash;
828 MonoCompileArch arch;
829 guint32 exception_type; /* MONO_EXCEPTION_* */
830 guint32 exception_data;
831 char* exception_message;
832 gpointer exception_ptr;
834 /* Fields used by the local reg allocator */
837 int reginfo_len, reginfof_len;
841 MONO_CFG_HAS_ALLOCA = 1 << 0,
842 MONO_CFG_HAS_CALLS = 1 << 1,
843 MONO_CFG_HAS_LDELEMA = 1 << 2,
844 MONO_CFG_HAS_VARARGS = 1 << 3,
845 MONO_CFG_HAS_TAIL = 1 << 4,
846 MONO_CFG_HAS_FPOUT = 1 << 5, /* there are fp values passed in int registers */
847 MONO_CFG_HAS_SPILLUP = 1 << 6 /* spill var slots are allocated from bottom to top */
851 gulong methods_compiled;
853 gulong methods_lookups;
854 gulong method_trampolines;
856 gulong analyze_stack_repeat;
857 gulong cil_code_size;
858 gulong native_code_size;
859 gulong code_reallocs;
860 gulong max_code_size_ratio;
861 gulong biggest_method_size;
862 gulong allocated_code_size;
863 gulong inlineable_methods;
864 gulong inlined_methods;
866 gulong max_basic_blocks;
867 gulong locals_stack_size;
868 gulong cas_declsec_check;
869 gulong cas_linkdemand_icall;
870 gulong cas_linkdemand_pinvoke;
871 gulong cas_linkdemand_aptc;
872 gulong cas_linkdemand;
873 gulong cas_demand_generation;
874 gulong generic_virtual_invocations;
875 MonoMethod *max_ratio_method;
876 MonoMethod *biggest_method;
880 extern MonoJitStats mono_jit_stats;
882 /* values for MonoInst.ssa_op */
885 MONO_SSA_ADDRESS_TAKEN = 1,
888 MONO_SSA_LOAD_STORE = MONO_SSA_LOAD|MONO_SSA_STORE,
889 MONO_SSA_INDIRECT_LOAD = MONO_SSA_LOAD|MONO_SSA_ADDRESS_TAKEN,
890 MONO_SSA_INDIRECT_STORE = MONO_SSA_STORE|MONO_SSA_ADDRESS_TAKEN,
891 MONO_SSA_INDIRECT_LOAD_STORE =
892 MONO_SSA_LOAD|MONO_SSA_STORE|MONO_SSA_ADDRESS_TAKEN
895 /* opcodes: value assigned after all the CIL opcodes */
899 #define MINI_OP(a,b) a,
901 OP_START = MONO_CEE_LAST - 1,
902 #include "mini-ops.h"
907 #if SIZEOF_VOID_P == 8
908 #define OP_PCONST OP_I8CONST
909 #define OP_PADD OP_LADD
910 #define OP_PNEG OP_LNEG
911 #define OP_PCONV_TO_I1 OP_LCONV_TO_I1
912 #define OP_PCONV_TO_U1 OP_LCONV_TO_U1
913 #define OP_PCONV_TO_I2 OP_LCONV_TO_I2
914 #define OP_PCONV_TO_U2 OP_LCONV_TO_U2
915 #define OP_PCONV_TO_OVF_I1_UN OP_LCONV_TO_OVF_I1_UN
916 #define OP_PCONV_TO_OVF_I1 OP_LCONV_TO_OVF_I1
917 #define OP_PCEQ CEE_CEQ
918 #define OP_STOREP_MEMBASE_REG OP_STOREI8_MEMBASE_REG
919 #define OP_STOREP_MEMBASE_IMM OP_STOREI8_MEMBASE_IMM
921 #define OP_PCONST OP_ICONST
922 #define OP_PADD CEE_ADD
923 #define OP_PNEG CEE_NEG
924 #define OP_PCONV_TO_I1 OP_ICONV_TO_I1
925 #define OP_PCONV_TO_U1 OP_ICONV_TO_U1
926 #define OP_PCONV_TO_I2 OP_ICONV_TO_I2
927 #define OP_PCONV_TO_U2 CEE_CONV_U2
928 #define OP_PCONV_TO_OVF_I1_UN CEE_CONV_OVF_I1_UN
929 #define OP_PCONV_TO_OVF_I1 CEE_CONV_OVF_I1
930 #define OP_PCEQ CEE_CEQ
931 #define OP_STOREP_MEMBASE_REG OP_STOREI4_MEMBASE_REG
932 #define OP_STOREP_MEMBASE_IMM OP_STOREI4_MEMBASE_IMM
958 #if HAVE_ARRAY_ELEM_INIT
959 extern const guint8 mono_burg_arity [];
961 extern guint8 mono_burg_arity [];
964 extern const char MONO_ARCH_CPU_SPEC [] MONO_INTERNAL;
965 #define MONO_ARCH_CPU_SPEC_IDX_COMBINE(a) a ## _idx
966 #define MONO_ARCH_CPU_SPEC_IDX(a) MONO_ARCH_CPU_SPEC_IDX_COMBINE(a)
967 extern const guint16 MONO_ARCH_CPU_SPEC_IDX(MONO_ARCH_CPU_SPEC) [] MONO_INTERNAL;
968 #define ins_get_spec(op) ((const char*)&MONO_ARCH_CPU_SPEC + MONO_ARCH_CPU_SPEC_IDX(MONO_ARCH_CPU_SPEC)[(op)])
973 MONO_COMP_DFRONTIER = 4,
974 MONO_COMP_DOM_REV = 8,
975 MONO_COMP_LIVENESS = 16,
977 MONO_COMP_SSA_DEF_USE = 64,
978 MONO_COMP_REACHABILITY = 128,
979 MONO_COMP_LOOPS = 256
984 MONO_GRAPH_DTREE = 2,
985 MONO_GRAPH_CFG_CODE = 4,
986 MONO_GRAPH_CFG_SSA = 8,
987 MONO_GRAPH_CFG_OPTCODE = 16
994 } MonoJitArgumentInfo;
997 gboolean handle_sigint;
998 gboolean keep_delegates;
999 gboolean collect_pagefault_stats;
1000 gboolean break_on_unverified;
1001 gboolean better_cast_details;
1002 gboolean mdb_optimizations;
1003 gboolean no_gdb_backtrace;
1031 /* Implicit exceptions */
1033 MONO_EXC_INDEX_OUT_OF_RANGE,
1035 MONO_EXC_ARITHMETIC,
1036 MONO_EXC_DIVIDE_BY_ZERO,
1037 MONO_EXC_INVALID_CAST,
1039 MONO_EXC_ARRAY_TYPE_MISMATCH,
1040 MONO_EXC_INTRINS_NUM
1044 MINI_GENERIC_CLASS_RELATION_OTHER_TABLE,
1045 MINI_GENERIC_CLASS_RELATION_OTHER
1049 MINI_TOKEN_SOURCE_CLASS,
1050 MINI_TOKEN_SOURCE_METHOD,
1051 MINI_TOKEN_SOURCE_FIELD
1054 typedef void (*MonoInstFunc) (MonoInst *tree, gpointer data);
1057 int mono_main (int argc, char* argv[]);
1058 void mono_set_defaults (int verbose_level, guint32 opts);
1059 MonoDomain* mini_init (const char *filename, const char *runtime_version) MONO_INTERNAL;
1060 void mini_cleanup (MonoDomain *domain) MONO_INTERNAL;
1061 MonoDebugOptions *mini_get_debug_options (void) MONO_INTERNAL;
1063 /* helper methods */
1064 MonoJumpInfoToken * mono_jump_info_token_new (MonoMemPool *mp, MonoImage *image, guint32 token) MONO_INTERNAL;
1065 MonoInst* mono_find_spvar_for_region (MonoCompile *cfg, int region) MONO_INTERNAL;
1066 void mono_precompile_assemblies (void) MONO_INTERNAL;
1067 int mono_parse_default_optimizations (const char* p);
1068 void mono_bblock_add_inst (MonoBasicBlock *bb, MonoInst *inst) MONO_INTERNAL;
1069 void mono_constant_fold (MonoCompile *cfg) MONO_INTERNAL;
1070 void mono_constant_fold_inst (MonoInst *inst, gpointer data) MONO_INTERNAL;
1071 int mono_eval_cond_branch (MonoInst *branch) MONO_INTERNAL;
1072 int mono_is_power_of_two (guint32 val) MONO_INTERNAL;
1073 void mono_cprop_local (MonoCompile *cfg, MonoBasicBlock *bb, MonoInst **acp, int acp_size) MONO_INTERNAL;
1074 MonoInst* mono_compile_create_var (MonoCompile *cfg, MonoType *type, int opcode) MONO_INTERNAL;
1075 void mono_compile_make_var_load (MonoCompile *cfg, MonoInst *dest, gssize var_index) MONO_INTERNAL;
1076 MonoInst* mono_compile_create_var_load (MonoCompile *cfg, gssize var_index) MONO_INTERNAL;
1077 MonoInst* mono_compile_create_var_store (MonoCompile *cfg, gssize var_index, MonoInst *value) MONO_INTERNAL;
1078 MonoType* mono_type_from_stack_type (MonoInst *ins) MONO_INTERNAL;
1079 void mono_blockset_print (MonoCompile *cfg, MonoBitSet *set, const char *name, guint idom) MONO_INTERNAL;
1080 void mono_print_tree (MonoInst *tree) MONO_INTERNAL;
1081 void mono_print_tree_nl (MonoInst *tree) MONO_INTERNAL;
1082 void mono_print_code (MonoCompile *cfg) MONO_INTERNAL;
1083 void mono_print_method_from_ip (void *ip);
1084 char *mono_pmip (void *ip);
1085 void mono_select_instructions (MonoCompile *cfg) MONO_INTERNAL;
1086 const char* mono_inst_name (int op);
1087 void mono_inst_foreach (MonoInst *tree, MonoInstFunc func, gpointer data) MONO_INTERNAL;
1088 void mono_disassemble_code (MonoCompile *cfg, guint8 *code, int size, char *id) MONO_INTERNAL;
1089 void mono_add_patch_info (MonoCompile *cfg, int ip, MonoJumpInfoType type, gconstpointer target) MONO_INTERNAL;
1090 void mono_remove_patch_info (MonoCompile *cfg, int ip) MONO_INTERNAL;
1091 MonoJumpInfo* mono_patch_info_dup_mp (MonoMemPool *mp, MonoJumpInfo *patch_info) MONO_INTERNAL;
1092 guint mono_patch_info_hash (gconstpointer data) MONO_INTERNAL;
1093 gint mono_patch_info_equal (gconstpointer ka, gconstpointer kb) MONO_INTERNAL;
1094 gpointer mono_resolve_patch_target (MonoMethod *method, MonoDomain *domain, guint8 *code, MonoJumpInfo *patch_info, gboolean run_cctors) MONO_INTERNAL;
1095 gpointer mono_jit_find_compiled_method (MonoDomain *domain, MonoMethod *method) MONO_INTERNAL;
1096 MonoLMF * mono_get_lmf (void) MONO_INTERNAL;
1097 MonoLMF** mono_get_lmf_addr (void) MONO_INTERNAL;
1098 void mono_jit_thread_attach (MonoDomain *domain);
1099 guint32 mono_get_jit_tls_key (void) MONO_INTERNAL;
1100 gint32 mono_get_jit_tls_offset (void) MONO_INTERNAL;
1101 gint32 mono_get_lmf_tls_offset (void) MONO_INTERNAL;
1102 gint32 mono_get_lmf_addr_tls_offset (void) MONO_INTERNAL;
1103 MonoInst* mono_get_jit_tls_intrinsic (MonoCompile *cfg) MONO_INTERNAL;
1104 GList *mono_varlist_insert_sorted (MonoCompile *cfg, GList *list, MonoMethodVar *mv, gboolean sort_end) MONO_INTERNAL;
1105 GList *mono_varlist_sort (MonoCompile *cfg, GList *list, int sort_type) MONO_INTERNAL;
1106 void mono_analyze_liveness (MonoCompile *cfg) MONO_INTERNAL;
1107 void mono_liveness_handle_exception_clauses (MonoCompile *cfg) MONO_INTERNAL;
1108 void mono_linear_scan (MonoCompile *cfg, GList *vars, GList *regs, regmask_t *used_mask) MONO_INTERNAL;
1109 void mono_create_jump_table (MonoCompile *cfg, MonoInst *label, MonoBasicBlock **bbs, int num_blocks) MONO_INTERNAL;
1110 int mono_compile_assembly (MonoAssembly *ass, guint32 opts, const char *aot_options) MONO_INTERNAL;
1111 MonoCompile *mini_method_compile (MonoMethod *method, guint32 opts, MonoDomain *domain, gboolean run_cctors, gboolean compile_aot, int parts) MONO_INTERNAL;
1112 void mono_destroy_compile (MonoCompile *cfg) MONO_INTERNAL;
1113 MonoJitICallInfo *mono_find_jit_opcode_emulation (int opcode) MONO_INTERNAL;
1114 void mono_print_ins_index (int i, MonoInst *ins) MONO_INTERNAL;
1115 void mono_print_ins (MonoInst *ins) MONO_INTERNAL;
1117 void mono_aot_init (void) MONO_INTERNAL;
1118 gpointer mono_aot_get_method (MonoDomain *domain,
1119 MonoMethod *method) MONO_INTERNAL;
1120 gpointer mono_aot_get_method_from_token (MonoDomain *domain, MonoImage *image, guint32 token) MONO_INTERNAL;
1121 gboolean mono_aot_is_got_entry (guint8 *code, guint8 *addr) MONO_INTERNAL;
1122 guint8* mono_aot_get_plt_entry (guint8 *code) MONO_INTERNAL;
1123 gboolean mono_aot_init_vtable (MonoVTable *vtable) MONO_INTERNAL;
1124 gboolean mono_aot_get_cached_class_info (MonoClass *klass, MonoCachedClassInfo *res) MONO_INTERNAL;
1125 gboolean mono_aot_get_class_from_name (MonoImage *image, const char *name_space, const char *name, MonoClass **klass) MONO_INTERNAL;
1126 MonoJitInfo* mono_aot_find_jit_info (MonoDomain *domain, MonoImage *image, gpointer addr) MONO_INTERNAL;
1127 void mono_aot_set_make_unreadable (gboolean unreadable) MONO_INTERNAL;
1128 gboolean mono_aot_is_pagefault (void *ptr) MONO_INTERNAL;
1129 void mono_aot_handle_pagefault (void *ptr) MONO_INTERNAL;
1130 guint32 mono_aot_get_n_pagefaults (void) MONO_INTERNAL;
1131 gpointer mono_aot_plt_resolve (gpointer aot_module, guint32 plt_info_offset, guint8 *code) MONO_INTERNAL;
1132 gpointer mono_aot_get_method_from_vt_slot (MonoDomain *domain, MonoVTable *vtable, int slot) MONO_INTERNAL;
1134 gboolean mono_method_blittable (MonoMethod *method) MONO_INTERNAL;
1135 gboolean mono_method_same_domain (MonoJitInfo *caller, MonoJitInfo *callee) MONO_INTERNAL;
1137 void mono_register_opcode_emulation (int opcode, const char* name, const char *sigstr, gpointer func, gboolean no_throw) MONO_INTERNAL;
1138 void mono_draw_graph (MonoCompile *cfg, MonoGraphOptions draw_options) MONO_INTERNAL;
1139 void mono_add_varcopy_to_end (MonoCompile *cfg, MonoBasicBlock *bb, int src, int dest) MONO_INTERNAL;
1140 void mono_add_ins_to_end (MonoBasicBlock *bb, MonoInst *inst) MONO_INTERNAL;
1141 gpointer mono_create_ftnptr (MonoDomain *domain, gpointer addr) MONO_INTERNAL;
1143 int mono_find_method_opcode (MonoMethod *method) MONO_INTERNAL;
1144 MonoJitICallInfo *mono_find_jit_icall_by_name (const char *name) MONO_INTERNAL;
1145 MonoJitICallInfo *mono_find_jit_icall_by_addr (gconstpointer addr) MONO_INTERNAL;
1146 MonoJitICallInfo *mono_register_jit_icall (gconstpointer func, const char *name, MonoMethodSignature *sig, gboolean is_save) MONO_INTERNAL;
1147 gconstpointer mono_icall_get_wrapper (MonoJitICallInfo* callinfo) MONO_INTERNAL;
1149 void mono_trampolines_init (void) MONO_INTERNAL;
1150 void mono_trampolines_cleanup (void) MONO_INTERNAL;
1151 guint8 * mono_get_trampoline_code (MonoTrampolineType tramp_type) MONO_INTERNAL;
1152 gpointer mono_create_jump_trampoline (MonoDomain *domain,
1154 gboolean add_sync_wrapper) MONO_INTERNAL;
1155 gpointer mono_create_class_init_trampoline (MonoVTable *vtable) MONO_INTERNAL;
1156 gpointer mono_create_jit_trampoline (MonoMethod *method) MONO_INTERNAL;
1157 gpointer mono_create_jit_trampoline_from_token (MonoImage *image, guint32 token) MONO_INTERNAL;
1158 gpointer mono_create_jit_trampoline_in_domain (MonoDomain *domain, MonoMethod *method) MONO_INTERNAL;
1159 gpointer mono_create_delegate_trampoline (MonoClass *klass) MONO_INTERNAL;
1160 MonoVTable* mono_find_class_init_trampoline_by_addr (gconstpointer addr) MONO_INTERNAL;
1161 MonoClass* mono_find_delegate_trampoline_by_addr (gconstpointer addr) MONO_INTERNAL;
1162 gpointer mono_magic_trampoline (gssize *regs, guint8 *code, MonoMethod *m, guint8* tramp) MONO_INTERNAL;
1163 gpointer mono_delegate_trampoline (gssize *regs, guint8 *code, MonoClass *klass, guint8* tramp) MONO_INTERNAL;
1164 gpointer mono_aot_trampoline (gssize *regs, guint8 *code, guint8 *token_info,
1165 guint8* tramp) MONO_INTERNAL;
1166 gpointer mono_aot_plt_trampoline (gssize *regs, guint8 *code, guint8 *token_info,
1167 guint8* tramp) MONO_INTERNAL;
1168 void mono_class_init_trampoline (gssize *regs, guint8 *code, MonoVTable *vtable, guint8 *tramp) MONO_INTERNAL;
1169 void mono_generic_class_init_trampoline (gssize *regs, guint8 *code, MonoVTable *vtable, guint8 *tramp) MONO_INTERNAL;
1170 gconstpointer mono_get_trampoline_func (MonoTrampolineType tramp_type);
1171 gpointer mini_get_vtable_trampoline (void) MONO_INTERNAL;
1174 gboolean mono_running_on_valgrind (void) MONO_INTERNAL;
1175 void* mono_global_codeman_reserve (int size) MONO_INTERNAL;
1176 const char *mono_regname_full (int reg, gboolean fp) MONO_INTERNAL;
1177 gint32* mono_allocate_stack_slots_full (MonoCompile *cfg, gboolean backward, guint32 *stack_size, guint32 *stack_align) MONO_INTERNAL;
1178 gint32* mono_allocate_stack_slots (MonoCompile *cfg, guint32 *stack_size, guint32 *stack_align) MONO_INTERNAL;
1179 void mono_local_regalloc (MonoCompile *cfg, MonoBasicBlock *bb) MONO_INTERNAL;
1180 MonoInst *mono_branch_optimize_exception_target (MonoCompile *cfg, MonoBasicBlock *bb, const char * exname) MONO_INTERNAL;
1181 gboolean mono_is_regsize_var (MonoType *t) MONO_INTERNAL;
1182 CompRelation mono_opcode_to_cond (int opcode) MONO_INTERNAL;
1183 CompType mono_opcode_to_type (int opcode, int cmp_opcode) MONO_INTERNAL;
1184 int mono_op_imm_to_op (int opcode) MONO_INTERNAL;
1185 void mono_decompose_op_imm (MonoCompile *cfg, MonoInst *ins) MONO_INTERNAL;
1186 void mono_peephole_ins (MonoBasicBlock *bb, MonoInst *ins) MONO_INTERNAL;
1188 /* methods that must be provided by the arch-specific port */
1189 void mono_arch_init (void) MONO_INTERNAL;
1190 void mono_arch_cleanup (void) MONO_INTERNAL;
1191 void mono_arch_cpu_init (void) MONO_INTERNAL;
1192 guint32 mono_arch_cpu_optimizazions (guint32 *exclude_mask) MONO_INTERNAL;
1193 void mono_arch_instrument_mem_needs (MonoMethod *method, int *stack, int *code) MONO_INTERNAL;
1194 void *mono_arch_instrument_prolog (MonoCompile *cfg, void *func, void *p, gboolean enable_arguments) MONO_INTERNAL;
1195 void *mono_arch_instrument_epilog (MonoCompile *cfg, void *func, void *p, gboolean enable_arguments) MONO_INTERNAL;
1196 MonoCallInst *mono_arch_call_opcode (MonoCompile *cfg, MonoBasicBlock* bb, MonoCallInst *call, int is_virtual) MONO_INTERNAL;
1197 MonoInst *mono_arch_get_inst_for_method (MonoCompile *cfg, MonoMethod *cmethod, MonoMethodSignature *fsig, MonoInst **args) MONO_INTERNAL;
1198 void mono_codegen (MonoCompile *cfg) MONO_INTERNAL;
1199 void mono_call_inst_add_outarg_reg (MonoCompile *cfg, MonoCallInst *call, int vreg, int hreg, gboolean fp) MONO_INTERNAL;
1200 const char *mono_arch_regname (int reg) MONO_INTERNAL;
1201 const char *mono_arch_fregname (int reg) MONO_INTERNAL;
1202 gpointer mono_arch_get_throw_exception (void) MONO_INTERNAL;
1203 gpointer mono_arch_get_rethrow_exception (void) MONO_INTERNAL;
1204 gpointer mono_arch_get_throw_exception_by_name (void) MONO_INTERNAL;
1205 gpointer mono_arch_get_throw_corlib_exception (void) MONO_INTERNAL;
1206 guchar* mono_arch_create_trampoline_code (MonoTrampolineType tramp_type) MONO_INTERNAL;
1207 gpointer mono_arch_create_jit_trampoline (MonoMethod *method) MONO_INTERNAL;
1208 MonoJitInfo *mono_arch_create_jump_trampoline (MonoMethod *method) MONO_INTERNAL;
1209 gpointer mono_arch_create_class_init_trampoline(MonoVTable *vtable) MONO_INTERNAL;
1210 gpointer mono_arch_create_rgctx_lazy_fetch_trampoline (guint32 slot) MONO_INTERNAL;
1211 guint32 mono_arch_get_rgctx_lazy_fetch_offset (gpointer *regs) MONO_INTERNAL;
1212 GList *mono_arch_get_allocatable_int_vars (MonoCompile *cfg) MONO_INTERNAL;
1213 GList *mono_arch_get_global_int_regs (MonoCompile *cfg) MONO_INTERNAL;
1214 guint32 mono_arch_regalloc_cost (MonoCompile *cfg, MonoMethodVar *vmv) MONO_INTERNAL;
1215 void mono_arch_patch_code (MonoMethod *method, MonoDomain *domain, guint8 *code, MonoJumpInfo *ji, gboolean run_cctors) MONO_INTERNAL;
1216 void mono_arch_flush_icache (guint8 *code, gint size) MONO_INTERNAL;
1217 int mono_arch_max_epilog_size (MonoCompile *cfg) MONO_INTERNAL;
1218 guint8 *mono_arch_emit_prolog (MonoCompile *cfg) MONO_INTERNAL;
1219 void mono_arch_emit_epilog (MonoCompile *cfg) MONO_INTERNAL;
1220 void mono_arch_emit_exceptions (MonoCompile *cfg) MONO_INTERNAL;
1221 void mono_arch_lowering_pass (MonoCompile *cfg, MonoBasicBlock *bb) MONO_INTERNAL;
1222 void mono_arch_peephole_pass_1 (MonoCompile *cfg, MonoBasicBlock *bb) MONO_INTERNAL;
1223 void mono_arch_peephole_pass_2 (MonoCompile *cfg, MonoBasicBlock *bb) MONO_INTERNAL;
1224 void mono_arch_output_basic_block (MonoCompile *cfg, MonoBasicBlock *bb) MONO_INTERNAL;
1225 gboolean mono_arch_has_unwind_info (gconstpointer addr) MONO_INTERNAL;
1226 void mono_arch_setup_jit_tls_data (MonoJitTlsData *tls) MONO_INTERNAL;
1227 void mono_arch_free_jit_tls_data (MonoJitTlsData *tls) MONO_INTERNAL;
1228 void mono_arch_emit_this_vret_args (MonoCompile *cfg, MonoCallInst *inst, int this_reg, int this_type, int vt_reg) MONO_INTERNAL;
1229 void mono_arch_allocate_vars (MonoCompile *m) MONO_INTERNAL;
1230 int mono_arch_get_argument_info (MonoMethodSignature *csig, int param_count, MonoJitArgumentInfo *arg_info) MONO_INTERNAL;
1231 gboolean mono_arch_print_tree (MonoInst *tree, int arity) MONO_INTERNAL;
1232 MonoJitInfo *mono_arch_find_jit_info (MonoDomain *domain,
1233 MonoJitTlsData *jit_tls,
1235 MonoJitInfo *prev_ji,
1237 MonoContext *new_ctx,
1241 gboolean *managed) MONO_INTERNAL;
1242 gpointer mono_arch_get_call_filter (void) MONO_INTERNAL;
1243 gpointer mono_arch_get_restore_context (void) MONO_INTERNAL;
1244 gboolean mono_arch_handle_exception (void *sigctx, gpointer obj, gboolean test_only) MONO_INTERNAL;
1245 void mono_arch_handle_altstack_exception (void *sigctx, gpointer fault_addr, gboolean stack_ovf) MONO_INTERNAL;
1246 gpointer mono_arch_ip_from_context (void *sigctx) MONO_INTERNAL;
1247 void mono_arch_sigctx_to_monoctx (void *sigctx, MonoContext *ctx) MONO_INTERNAL;
1248 void mono_arch_monoctx_to_sigctx (MonoContext *mctx, void *ctx) MONO_INTERNAL;
1249 gpointer mono_arch_context_get_int_reg (MonoContext *ctx, int reg) MONO_INTERNAL;
1250 void mono_arch_flush_register_windows (void) MONO_INTERNAL;
1251 gboolean mono_arch_is_inst_imm (gint64 imm) MONO_INTERNAL;
1252 MonoInst* mono_arch_get_domain_intrinsic (MonoCompile* cfg) MONO_INTERNAL;
1253 MonoInst* mono_arch_get_thread_intrinsic (MonoCompile* cfg) MONO_INTERNAL;
1254 gboolean mono_arch_is_int_overflow (void *sigctx, void *info) MONO_INTERNAL;
1255 void mono_arch_invalidate_method (MonoJitInfo *ji, void *func, gpointer func_arg) MONO_INTERNAL;
1256 guint32 mono_arch_get_patch_offset (guint8 *code) MONO_INTERNAL;
1257 gpointer*mono_arch_get_vcall_slot_addr (guint8* code, gpointer *regs) MONO_INTERNAL;
1258 gpointer mono_arch_get_vcall_slot (guint8 *code, gpointer *regs, int *displacement) MONO_INTERNAL;
1259 gpointer*mono_arch_get_delegate_method_ptr_addr (guint8* code, gpointer *regs) MONO_INTERNAL;
1260 void mono_arch_create_vars (MonoCompile *cfg) MONO_INTERNAL;
1261 void mono_arch_save_unwind_info (MonoCompile *cfg) MONO_INTERNAL;
1262 void mono_arch_register_lowlevel_calls (void) MONO_INTERNAL;
1263 gpointer mono_arch_get_unbox_trampoline (MonoMethod *m, gpointer addr) MONO_INTERNAL;
1264 void mono_arch_patch_callsite (guint8 *method_start, guint8 *code, guint8 *addr) MONO_INTERNAL;
1265 void mono_arch_patch_plt_entry (guint8 *code, guint8 *addr) MONO_INTERNAL;
1266 void mono_arch_nullify_class_init_trampoline(guint8 *code, gssize *regs) MONO_INTERNAL;
1267 void mono_arch_nullify_plt_entry (guint8 *code) MONO_INTERNAL;
1268 int mono_arch_get_this_arg_reg (MonoMethodSignature *sig, MonoGenericSharingContext *gsctx) MONO_INTERNAL;
1269 gpointer mono_arch_get_this_arg_from_call (MonoMethodSignature *sig, gssize *regs, guint8 *code) MONO_INTERNAL;
1270 MonoObject* mono_arch_find_this_argument (gpointer *regs, MonoMethod *method, MonoGenericSharingContext *gsctx) MONO_INTERNAL;
1271 gpointer mono_arch_get_delegate_invoke_impl (MonoMethodSignature *sig, gboolean has_target) MONO_INTERNAL;
1272 gpointer mono_arch_create_specific_trampoline (gpointer arg1, MonoTrampolineType tramp_type, MonoDomain *domain, guint32 *code_len) MONO_INTERNAL;
1273 void mono_arch_emit_imt_argument (MonoCompile *cfg, MonoCallInst *call) MONO_INTERNAL;
1274 MonoMethod* mono_arch_find_imt_method (gpointer *regs, guint8 *code) MONO_INTERNAL;
1275 MonoVTable* mono_arch_find_static_call_vtable (gpointer *regs, guint8 *code) MONO_INTERNAL;
1276 gpointer mono_arch_build_imt_thunk (MonoVTable *vtable, MonoDomain *domain, MonoIMTCheckItem **imt_entries, int count) MONO_INTERNAL;
1277 void mono_arch_notify_pending_exc (void) MONO_INTERNAL;
1279 /* Exception handling */
1280 void mono_exceptions_init (void) MONO_INTERNAL;
1281 gboolean mono_handle_exception (MonoContext *ctx, gpointer obj,
1282 gpointer original_ip, gboolean test_only) MONO_INTERNAL;
1283 void mono_handle_native_sigsegv (int signal, void *sigctx) MONO_INTERNAL;
1284 void mono_print_thread_dump (void *sigctx);
1285 void mono_jit_walk_stack (MonoStackWalk func, gboolean do_il_offset, gpointer user_data) MONO_INTERNAL;
1286 void mono_jit_walk_stack_from_ctx (MonoStackWalk func, MonoContext *ctx, gboolean do_il_offset, gpointer user_data) MONO_INTERNAL;
1287 void mono_setup_altstack (MonoJitTlsData *tls) MONO_INTERNAL;
1288 void mono_free_altstack (MonoJitTlsData *tls) MONO_INTERNAL;
1290 /* the new function to do stack walks */
1291 typedef gboolean (*MonoStackFrameWalk) (MonoDomain *domain, MonoContext *ctx, MonoJitInfo *ji, gpointer data);
1292 void mono_walk_stack (MonoDomain *domain, MonoJitTlsData *jit_tls, MonoContext *start_ctx, MonoStackFrameWalk func, gpointer user_data);
1294 MonoArray *ves_icall_get_trace (MonoException *exc, gint32 skip, MonoBoolean need_file_info) MONO_INTERNAL;
1295 MonoBoolean ves_icall_get_frame_info (gint32 skip, MonoBoolean need_file_info,
1296 MonoReflectionMethod **method,
1297 gint32 *iloffset, gint32 *native_offset,
1298 MonoString **file, gint32 *line, gint32 *column) MONO_INTERNAL;
1299 MonoString *ves_icall_System_Exception_get_trace (MonoException *exc) MONO_INTERNAL;
1301 /* Dominator/SSA methods */
1302 void mono_compile_dominator_info (MonoCompile *cfg, int dom_flags) MONO_INTERNAL;
1303 void mono_compute_natural_loops (MonoCompile *cfg) MONO_INTERNAL;
1304 MonoBitSet* mono_compile_iterated_dfrontier (MonoCompile *cfg, MonoBitSet *set) MONO_INTERNAL;
1305 void mono_ssa_compute (MonoCompile *cfg) MONO_INTERNAL;
1306 void mono_ssa_remove (MonoCompile *cfg) MONO_INTERNAL;
1307 void mono_ssa_cprop (MonoCompile *cfg) MONO_INTERNAL;
1308 void mono_ssa_deadce (MonoCompile *cfg) MONO_INTERNAL;
1309 void mono_ssa_strength_reduction (MonoCompile *cfg) MONO_INTERNAL;
1310 void mono_free_loop_info (MonoCompile *cfg) MONO_INTERNAL;
1312 /* debugging support */
1313 void mono_debug_init_method (MonoCompile *cfg, MonoBasicBlock *start_block,
1314 guint32 breakpoint_id) MONO_INTERNAL;
1315 void mono_debug_open_method (MonoCompile *cfg) MONO_INTERNAL;
1316 void mono_debug_close_method (MonoCompile *cfg) MONO_INTERNAL;
1317 void mono_debug_open_block (MonoCompile *cfg, MonoBasicBlock *bb, guint32 address) MONO_INTERNAL;
1318 void mono_debug_record_line_number (MonoCompile *cfg, MonoInst *ins, guint32 address) MONO_INTERNAL;
1319 void mono_debug_serialize_debug_info (MonoCompile *cfg, guint8 **out_buf, guint32 *buf_len) MONO_INTERNAL;
1320 void mono_debug_add_aot_method (MonoDomain *domain,
1321 MonoMethod *method, guint8 *code_start,
1322 guint8 *debug_info, guint32 debug_info_len) MONO_INTERNAL;
1323 void mono_debug_add_icall_wrapper (MonoMethod *method, MonoJitICallInfo* info) MONO_INTERNAL;
1324 void mono_debug_print_vars (gpointer ip, gboolean only_arguments);
1325 void mono_debugger_run_finally (MonoContext *start_ctx);
1327 extern gssize mono_breakpoint_info_index [MONO_BREAKPOINT_ARRAY_SIZE];
1329 gboolean mono_breakpoint_clean_code (guint8 *method_start, guint8 *code, int offset, guint8 *buf, int size);
1331 /* Mono Debugger support */
1332 void mono_debugger_init (void);
1333 int mono_debugger_main (MonoDomain *domain, MonoAssembly *assembly, int argc, char **argv);
1337 MonoTraceSpec *mono_trace_parse_options (char *options) MONO_INTERNAL;
1338 void mono_trace_set_assembly (MonoAssembly *assembly) MONO_INTERNAL;
1339 gboolean mono_trace_eval (MonoMethod *method) MONO_INTERNAL;
1342 mono_perform_abc_removal (MonoCompile *cfg) MONO_INTERNAL;
1344 mono_perform_ssapre (MonoCompile *cfg) MONO_INTERNAL;
1346 mono_local_cprop (MonoCompile *cfg) MONO_INTERNAL;
1348 /* CAS - stack walk */
1349 MonoSecurityFrame* ves_icall_System_Security_SecurityFrame_GetSecurityFrame (gint32 skip) MONO_INTERNAL;
1350 MonoArray* ves_icall_System_Security_SecurityFrame_GetSecurityStack (gint32 skip) MONO_INTERNAL;
1352 int mini_wapi_hps (int argc, char **argv);
1353 int mini_wapi_semdel (int argc, char **argv);
1354 int mini_wapi_seminfo (int argc, char **argv);
1356 /* Generic sharing */
1358 MonoGenericContext* mini_method_get_context (MonoMethod *method) MONO_INTERNAL;
1360 int mono_method_check_context_used (MonoMethod *method) MONO_INTERNAL;
1362 gboolean mono_generic_context_equal_deep (MonoGenericContext *context1, MonoGenericContext *context2) MONO_INTERNAL;
1364 gboolean mono_generic_context_is_sharable (MonoGenericContext *context, gboolean allow_type_vars) MONO_INTERNAL;
1366 gboolean mono_method_is_generic_impl (MonoMethod *method) MONO_INTERNAL;
1367 gboolean mono_method_is_generic_sharable_impl (MonoMethod *method) MONO_INTERNAL;
1369 MonoMethod* mono_method_get_declaring_generic_method (MonoMethod *method) MONO_INTERNAL;
1371 int mono_class_generic_class_relation (MonoClass *klass, int info_type, MonoClass *method_klass,
1372 MonoGenericContext *generic_context, int *arg_num) MONO_INTERNAL;
1374 gpointer mono_helper_get_rgctx_other_ptr (MonoClass *caller_class, MonoVTable *vtable,
1375 guint32 token, guint32 token_source, guint32 rgctx_type,
1376 gint32 rgctx_index) MONO_INTERNAL;
1378 void mono_generic_sharing_init (void) MONO_INTERNAL;
1380 MonoClass* mini_class_get_container_class (MonoClass *class) MONO_INTERNAL;
1381 MonoGenericContext* mini_class_get_context (MonoClass *class) MONO_INTERNAL;
1383 MonoType* mini_get_basic_type_from_generic (MonoGenericSharingContext *gsctx, MonoType *type) MONO_INTERNAL;
1385 int mini_type_stack_size (MonoGenericSharingContext *gsctx, MonoType *t, int *align) MONO_INTERNAL;
1389 #endif /* __MONO_MINI_H__ */