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/utils/mono-compiler.h>
20 #include "mini-arch.h"
25 #define G_LIKELY(a) (a)
26 #define G_UNLIKELY(a) (a)
30 #define MINI_DEBUG(level,limit,code)
32 #define MINI_DEBUG(level,limit,code) do {if (G_UNLIKELY ((level) >= (limit))) code} while (0)
36 #define MONO_USE_AOT_COMPILER
39 /* for 32 bit systems */
40 #if G_BYTE_ORDER == G_LITTLE_ENDIAN
41 #define MINI_LS_WORD_OFFSET 0
42 #define MINI_MS_WORD_OFFSET 4
43 #define inst_ls_word data.op[0].const_val
44 #define inst_ms_word data.op[1].const_val
46 #define MINI_LS_WORD_OFFSET 4
47 #define MINI_MS_WORD_OFFSET 0
48 #define inst_ls_word data.op[1].const_val
49 #define inst_ms_word data.op[0].const_val
52 /* Version number of the AOT file format */
53 #define MONO_AOT_FILE_VERSION "32"
56 #define mono_bitset_foreach_bit(set,b,n) \
57 for (b = 0; b < n; b++)\
58 if (mono_bitset_test_fast(set,b))
59 #define mono_bitset_foreach_bit_rev(set,b,n) \
60 for (b = n - 1; b >= 0; b--)\
61 if (mono_bitset_test_fast(set,b))
63 #define mono_bitset_foreach_bit(set,b,n) \
64 for (b = mono_bitset_find_start (set); b < n && b >= 0; b = mono_bitset_find_first (set, b))
65 #define mono_bitset_foreach_bit_rev(set,b,n) \
66 for (b = mono_bitset_find_last (set, n - 1); b >= 0; b = b ? mono_bitset_find_last (set, b) : -1)
71 * Pull the list of opcodes
73 #define OPDEF(a,b,c,d,e,f,g,h,i,j) \
77 #include "mono/cil/opcode.def"
82 #define MONO_VARINFO(cfg,varnum) ((cfg)->vars [varnum])
84 #define MONO_INST_NEW(cfg,dest,op) do { \
85 (dest) = mono_mempool_alloc0 ((cfg)->mempool, sizeof (MonoInst)); \
86 (dest)->opcode = (op); \
89 #define MONO_INST_NEW_CALL(cfg,dest,op) do { \
90 (dest) = mono_mempool_alloc0 ((cfg)->mempool, sizeof (MonoCallInst)); \
91 (dest)->inst.opcode = (op); \
94 #define MONO_INST_NEW_CALL_ARG(cfg,dest,op) do { \
95 (dest) = mono_mempool_alloc0 ((cfg)->mempool, sizeof (MonoCallArgParm)); \
96 (dest)->ins.opcode = (op); \
99 #define MONO_ADD_INS(b,inst) do { \
100 if ((b)->last_ins) { \
101 (b)->last_ins->next = (inst); \
102 (b)->last_ins = (inst); \
104 (b)->code = (b)->last_ins = (inst); \
108 #define NULLIFY_INS(ins) do { \
109 (ins)->opcode = OP_NOP; \
110 (ins)->dreg = (ins)->sreg1 = (ins)->sreg2 = -1; \
111 (ins)->ssa_op = MONO_SSA_NOP; \
114 typedef struct MonoInst MonoInst;
115 typedef struct MonoCallInst MonoCallInst;
116 typedef struct MonoCallArgParm MonoCallArgParm;
117 typedef struct MonoEdge MonoEdge;
118 typedef struct MonoMethodVar MonoMethodVar;
119 typedef struct MonoBasicBlock MonoBasicBlock;
120 typedef struct MonoLMF MonoLMF;
121 typedef struct MonoSpillInfo MonoSpillInfo;
122 typedef struct MonoTraceSpec MonoTraceSpec;
124 extern guint32 mono_jit_tls_id;
125 extern MonoTraceSpec *mono_jit_trace_calls;
126 extern gboolean mono_break_on_exc;
127 extern int mono_exc_esp_offset;
129 #define mono_compile_aot 0
131 extern gboolean mono_compile_aot;
133 extern gboolean mono_use_security_manager;
141 struct MonoSpillInfo {
146 * This structure contains the information maintained by the verifier for each CIL
147 * stack slot. This information is also available in MonoInst, but the verifier needs to
148 * update the type information during stack merges, which could lead to problems if done
149 * on MonoInsts, so we use a dedicated structure instead.
157 * The IR-level basic block.
159 * A basic block can have multiple exits just fine, as long as the point of
160 * 'departure' is the last instruction in the basic block. Extended basic
161 * blocks, on the other hand, may have instructions that leave the block
162 * midstream. The important thing is that they cannot be _entered_
163 * midstream, ie, execution of a basic block (or extened bb) always start
164 * at the beginning of the block, never in the middle.
166 struct MonoBasicBlock {
169 /* the next basic block in the order it appears in IL */
170 MonoBasicBlock *next_bb;
173 * Before instruction selection it is the first tree in the
174 * forest and the first item in the list of trees. After
175 * instruction selection it is the first instruction and the
176 * first item in the list of instructions.
180 /* unique block number identification */
185 /* Basic blocks: incoming and outgoing counts and pointers */
186 /* Each bb should only appear once in each array */
187 gint16 out_count, in_count;
188 MonoBasicBlock **in_bb;
189 MonoBasicBlock **out_bb;
191 /* Points to the start of the CIL code that initiated this BB */
192 unsigned char* cil_code;
194 /* Length of the CIL block */
197 /* The address of the generated code, used for fixups */
201 /* Visited and reachable flags */
205 * SSA and loop based flags
207 MonoBitSet *dominators;
208 MonoBitSet *dfrontier;
209 MonoBasicBlock *idom;
211 /* fast dominator algorithm */
212 MonoBasicBlock *df_parent, *ancestor, *child, *label;
214 int size, sdom, idomn;
216 /* loop nesting and recognition */
219 gint8 loop_body_start;
222 * Whenever the bblock is rarely executed so it should be emitted after
223 * the function epilog.
225 guint out_of_line : 1;
226 /* Caches the result of uselessness calculation during optimize_branches */
227 guint not_useless : 1;
229 /* use for liveness analysis */
231 MonoBitSet *kill_set;
232 MonoBitSet *live_in_set;
233 MonoBitSet *live_out_set;
235 /* fields to deal with non-empty stack slots at bb boundary */
236 guint16 out_scount, in_scount;
237 MonoInst **out_stack;
239 MonoStackSlot *stack_state; /* Verification stack state on enter to bblock */
241 /* we use that to prevent merging of bblock covered by different clauses*/
245 * The region encodes whether the basic block is inside
246 * a finally, catch, filter or none of thoese.
248 * If the value is -1, then it is neither finally, catch nor filter
250 * Otherwise the format is:
252 * Bits: | 0-3 | 4-7 | 8-31
254 * | clause-flags | MONO_REGION | clause-index
259 /* The current symbolic register number, used in local register allocation. */
266 BB_REACHABLE = 1 << 1,
267 BB_EXCEPTION_DEAD_OBJ = 1 << 2,
268 BB_EXCEPTION_UNSAFE = 1 << 3,
269 BB_EXCEPTION_HANDLER = 1 << 4
280 MonoMethodSignature *signature;
281 MonoBasicBlock **many_blocks;
282 MonoBasicBlock *target_block;
287 MonoCallInst *call_inst;
293 guint8 type; /* stack type */
297 /* used by the register allocator */
298 gint32 dreg, sreg1, sreg2;
299 /* used mostly by the backend to store additional info it may need */
303 gint32 size; /* in OP_MEMSET and OP_MEMCPY */
305 gboolean is_pinvoke; /* for variables in the unmanaged marshal format */
311 const unsigned char* cil_code; /* for debugging and bblock splitting */
314 struct MonoCallInst {
316 MonoMethodSignature *signature;
323 regmask_t used_iregs;
324 regmask_t used_fregs;
325 GSList *out_ireg_args;
326 GSList *out_freg_args;
329 struct MonoCallArgParm {
338 * Note: some of the values overlap, because they can't appear
339 * in the same MonoInst.
342 MONO_INST_HAS_METHOD = 1,
343 /* temp local created by a DUP: used only within a BB */
344 MONO_INST_IS_TEMP = 1,
345 MONO_INST_INIT = 1, /* in localloc */
346 MONO_INST_IS_DEAD = 2,
347 MONO_INST_TAILCALL = 4,
348 MONO_INST_VOLATILE = 4,
349 MONO_INST_BRLABEL = 4,
350 MONO_INST_NOTYPECHECK = 4,
351 MONO_INST_UNALIGNED = 8,
352 MONO_INST_DEFINITION_HAS_SIDE_EFFECTS = 8,
353 /* the address of the variable has been taken */
354 MONO_INST_INDIRECT = 16,
355 MONO_INST_NORANGECHECK = 16
358 #define inst_c0 data.op[0].const_val
359 #define inst_c1 data.op[1].const_val
360 #define inst_i0 data.op[0].src
361 #define inst_i1 data.op[1].src
362 #define inst_p0 data.op[0].p
363 #define inst_p1 data.op[1].p
364 #define inst_l data.i8const
365 #define inst_r data.r8const
366 #define inst_left data.op[0].src
367 #define inst_right data.op[1].src
369 #define inst_newa_len data.op[0].src
370 #define inst_newa_class data.op[1].klass
372 #define inst_var data.op[0].var
373 #define inst_vtype data.op[1].vtype
374 /* in branch instructions */
375 #define inst_many_bb data.op[1].many_blocks
376 #define inst_target_bb data.op[0].target_block
377 #define inst_true_bb data.op[1].many_blocks[0]
378 #define inst_false_bb data.op[1].many_blocks[1]
380 #define inst_basereg sreg1
381 #define inst_indexreg sreg2
382 #define inst_destbasereg dreg
383 #define inst_offset data.op[0].const_val
384 #define inst_imm data.op[1].const_val
385 #define inst_call data.op[1].call_inst
387 #define inst_phi_args data.op[1].phi_args
389 /* instruction description for use in regalloc/scheduling */
396 /* Unused, commented out to reduce the size of the mdesc tables
407 guint16 tid; /* tree number */
408 guint16 bid; /* block number */
414 MonoPosition first_use, last_use;
418 * Additional information about a variable
420 struct MonoMethodVar {
421 guint idx; /* inside cfg->varinfo, cfg->vars */
423 MonoBitSet *dfrontier;
424 MonoLiveRange range; /* generated by liveness analysis */
425 int reg; /* != -1 if allocated into a register */
427 MonoBitSet *def_in; /* used by SSA */
428 MonoInst *def; /* used by SSA */
429 MonoBasicBlock *def_bb; /* used by SSA */
430 GList *uses; /* used by SSA */
431 char cpstate; /* used by SSA conditional constant propagation */
435 gpointer end_of_stack;
437 #if !defined(HAVE_KW_THREAD) || !defined(MONO_ARCH_ENABLE_MONO_LMF_VAR)
441 gpointer signal_stack;
442 guint32 signal_stack_size;
443 void (*abort_func) (MonoObject *object);
447 #define PATCH_INFO(a,b) MONO_PATCH_INFO_ ## a,
448 #include "patch-info.h"
454 * We need to store the image which the token refers to along with the token,
455 * since the image might not be the same as the image of the method which
456 * contains the relocation, because of inlining.
458 typedef struct MonoJumpInfoToken {
463 typedef struct MonoJumpInfoBBTable {
464 MonoBasicBlock **table;
466 } MonoJumpInfoBBTable;
468 typedef struct MonoJumpInfo MonoJumpInfo;
469 struct MonoJumpInfo {
477 MonoJumpInfoType type;
479 gconstpointer target;
480 #if SIZEOF_VOID_P == 8
489 MonoClassField *field;
493 MonoJumpInfoToken *token;
494 MonoJumpInfoBBTable *table;
499 MONO_TRAMPOLINE_GENERIC,
500 MONO_TRAMPOLINE_JUMP,
501 MONO_TRAMPOLINE_CLASS_INIT,
503 MONO_TRAMPOLINE_AOT_PLT,
504 MONO_TRAMPOLINE_DELEGATE,
506 } MonoTrampolineType;
508 /* optimization flags */
509 #define OPTFLAG(id,shift,name,descr) MONO_OPT_ ## id = 1 << shift,
511 #include "optflags-def.h"
515 /* Bit-fields in the MonoBasicBlock.region */
516 #define MONO_REGION_TRY 0
517 #define MONO_REGION_FINALLY 16
518 #define MONO_REGION_CATCH 32
519 #define MONO_REGION_FAULT 64 /* Currently unused */
520 #define MONO_REGION_FILTER 128
522 #define MONO_BBLOCK_IS_IN_REGION(bblock, regtype) (((bblock)->region & (0xf << 4)) == (regtype))
525 * Control Flow Graph and compilation unit information
529 MonoMemPool *mempool;
531 MonoMethodVar **vars;
533 MonoBasicBlock *bb_entry;
534 MonoBasicBlock *bb_exit;
535 MonoBasicBlock *bb_init;
536 MonoBasicBlock **bblocks;
537 MonoBasicBlock **cil_offset_to_bb;
538 MonoMemPool *state_pool; /* used by instruction selection */
539 MonoBasicBlock *cbb; /* used by instruction selection */
540 MonoInst *prev_ins; /* in decompose */
541 MonoJumpInfo *patch_info;
542 MonoJitInfo *jit_info;
543 MonoJitDynamicMethodInfo *dynamic_info;
546 guint num_varinfo; /* used items in varinfo */
547 guint varinfo_count; /* total storage in varinfo */
550 gint cil_offset_to_bb_len;
552 MonoSpillInfo *spill_info; /* machine register spills */
553 MonoSpillInfo *spill_info_float; /* fp register spills */
555 gint spill_info_len, spill_info_float_len;
556 /* unsigned char *cil_code; */
557 MonoMethod *inlined_method; /* the method which is currently inlined */
558 MonoInst *domainvar; /* a cache for the current domain */
559 MonoInst *got_var; /* Global Offset Table variable */
562 struct MonoAliasingInformation *aliasing_info;
564 /* A hashtable of region ID-> SP var mappings */
565 /* An SP var is a place to store the stack pointer (used by handlers)*/
568 /* A hashtable of region ID -> EX var mappings */
569 /* An EX var stores the exception object passed to catch/filter blocks */
572 GList *ldstr_list; /* used by AOT */
576 unsigned char *cil_start;
577 unsigned char *native_code;
582 regmask_t used_int_regs;
584 guint32 prof_options;
587 guint32 verbose_level;
592 guint disable_aot : 1;
593 guint disable_ssa : 1;
594 guint run_cctors : 1;
595 guint need_lmf_area : 1;
596 guint compile_aot : 1;
597 guint got_var_allocated : 1;
598 guint ret_var_is_local : 1;
599 guint dont_verify_stack_merge : 1;
600 guint unverifiable : 1;
601 guint skip_visibility : 1;
605 MonoProfileCoverageInfo *coverage_info;
606 GHashTable *token_info_hash;
607 MonoCompileArch arch;
608 guint32 exception_type; /* MONO_EXCEPTION_* */
609 guint32 exception_data;
610 char* exception_message;
611 gpointer exception_ptr;
613 /* Fields used by the local reg allocator */
616 void* reverse_inst_list;
617 int reginfo_len, reginfof_len;
618 int reverse_inst_list_len;
622 MONO_CFG_HAS_ALLOCA = 1 << 0,
623 MONO_CFG_HAS_CALLS = 1 << 1,
624 MONO_CFG_HAS_LDELEMA = 1 << 2,
625 MONO_CFG_HAS_VARARGS = 1 << 3,
626 MONO_CFG_HAS_TAIL = 1 << 4,
627 MONO_CFG_HAS_FPOUT = 1 << 5, /* there are fp values passed in int registers */
628 MONO_CFG_HAS_SPILLUP = 1 << 6 /* spill var slots are allocated from bottom to top */
632 gulong methods_compiled;
634 gulong methods_lookups;
635 gulong method_trampolines;
637 gulong analyze_stack_repeat;
638 gulong cil_code_size;
639 gulong native_code_size;
640 gulong code_reallocs;
641 gulong max_code_size_ratio;
642 gulong biggest_method_size;
643 gulong allocated_code_size;
644 gulong inlineable_methods;
645 gulong inlined_methods;
647 gulong max_basic_blocks;
648 gulong locals_stack_size;
649 gulong cas_declsec_check;
650 gulong cas_linkdemand_icall;
651 gulong cas_linkdemand_pinvoke;
652 gulong cas_linkdemand_aptc;
653 gulong cas_linkdemand;
654 gulong cas_demand_generation;
655 gulong generic_virtual_invocations;
656 MonoMethod *max_ratio_method;
657 MonoMethod *biggest_method;
661 extern MonoJitStats mono_jit_stats;
663 /* values for MonoInst.ssa_op */
666 MONO_SSA_ADDRESS_TAKEN = 1,
669 MONO_SSA_LOAD_STORE = MONO_SSA_LOAD|MONO_SSA_STORE,
670 MONO_SSA_INDIRECT_LOAD = MONO_SSA_LOAD|MONO_SSA_ADDRESS_TAKEN,
671 MONO_SSA_INDIRECT_STORE = MONO_SSA_STORE|MONO_SSA_ADDRESS_TAKEN,
672 MONO_SSA_INDIRECT_LOAD_STORE =
673 MONO_SSA_LOAD|MONO_SSA_STORE|MONO_SSA_ADDRESS_TAKEN
676 #define OP_CEQ (256+CEE_CEQ)
677 #define OP_CLT (256+CEE_CLT)
678 #define OP_CLT_UN (256+CEE_CLT_UN)
679 #define OP_CGT (256+CEE_CGT)
680 #define OP_CGT_UN (256+CEE_CGT_UN)
681 #define OP_LOCALLOC (256+CEE_LOCALLOC)
683 /* opcodes: value assigned after all the CIL opcodes */
687 #define MINI_OP(a,b) a,
689 OP_START = MONO_CEE_LAST - 1,
690 #include "mini-ops.h"
695 #if SIZEOF_VOID_P == 8
696 #define OP_PCONST OP_I8CONST
697 #define OP_PADD OP_LADD
698 #define OP_PNEG OP_LNEG
699 #define OP_PCONV_TO_U2 OP_LCONV_TO_U2
700 #define OP_PCONV_TO_OVF_I1_UN OP_LCONV_TO_OVF_I1_UN
701 #define OP_PCONV_TO_OVF_I1 OP_LCONV_TO_OVF_I1
702 #define OP_PCEQ CEE_CEQ
703 #define OP_STOREP_MEMBASE_REG OP_STOREI8_MEMBASE_REG
704 #define OP_STOREP_MEMBASE_IMM OP_STOREI8_MEMBASE_IMM
706 #define OP_PCONST OP_ICONST
707 #define OP_PADD CEE_ADD
708 #define OP_PNEG CEE_NEG
709 #define OP_PCONV_TO_U2 CEE_CONV_U2
710 #define OP_PCONV_TO_OVF_I1_UN CEE_CONV_OVF_I1_UN
711 #define OP_PCONV_TO_OVF_I1 CEE_CONV_OVF_I1
712 #define OP_PCEQ CEE_CEQ
713 #define OP_STOREP_MEMBASE_REG OP_STOREI4_MEMBASE_REG
714 #define OP_STOREP_MEMBASE_IMM OP_STOREI4_MEMBASE_IMM
740 #if HAVE_ARRAY_ELEM_INIT
741 extern const guint8 mono_burg_arity [];
743 extern guint8 mono_burg_arity [];
746 extern const char MONO_ARCH_CPU_SPEC [] MONO_INTERNAL;
747 #define MONO_ARCH_CPU_SPEC_IDX_COMBINE(a) a ## _idx
748 #define MONO_ARCH_CPU_SPEC_IDX(a) MONO_ARCH_CPU_SPEC_IDX_COMBINE(a)
749 extern const guint16 MONO_ARCH_CPU_SPEC_IDX(MONO_ARCH_CPU_SPEC) [] MONO_INTERNAL;
750 #define ins_get_spec(op) ((const char*)&MONO_ARCH_CPU_SPEC + MONO_ARCH_CPU_SPEC_IDX(MONO_ARCH_CPU_SPEC)[(op)])
755 MONO_COMP_DFRONTIER = 4,
756 MONO_COMP_DOM_REV = 8,
757 MONO_COMP_LIVENESS = 16,
759 MONO_COMP_SSA_DEF_USE = 64,
760 MONO_COMP_REACHABILITY = 128,
761 MONO_COMP_LOOPS = 256
766 MONO_GRAPH_DTREE = 2,
767 MONO_GRAPH_CFG_CODE = 4,
768 MONO_GRAPH_CFG_SSA = 8,
769 MONO_GRAPH_CFG_OPTCODE = 16
776 } MonoJitArgumentInfo;
779 gboolean handle_sigint;
780 gboolean keep_delegates;
781 gboolean collect_pagefault_stats;
782 gboolean break_on_unverified;
810 /* Implicit exceptions */
812 MONO_EXC_INDEX_OUT_OF_RANGE,
815 MONO_EXC_DIVIDE_BY_ZERO,
816 MONO_EXC_INVALID_CAST,
818 MONO_EXC_ARRAY_TYPE_MISMATCH,
822 typedef void (*MonoInstFunc) (MonoInst *tree, gpointer data);
825 int mono_main (int argc, char* argv[]);
826 void mono_set_defaults (int verbose_level, guint32 opts);
827 MonoDomain* mini_init (const char *filename, const char *runtime_version) MONO_INTERNAL;
828 void mini_cleanup (MonoDomain *domain) MONO_INTERNAL;
831 MonoJumpInfoToken * mono_jump_info_token_new (MonoMemPool *mp, MonoImage *image, guint32 token) MONO_INTERNAL;
832 MonoInst* mono_find_spvar_for_region (MonoCompile *cfg, int region) MONO_INTERNAL;
833 void mono_precompile_assemblies (void) MONO_INTERNAL;
834 int mono_parse_default_optimizations (const char* p);
835 void mono_bblock_add_inst (MonoBasicBlock *bb, MonoInst *inst) MONO_INTERNAL;
836 void mono_constant_fold (MonoCompile *cfg) MONO_INTERNAL;
837 void mono_constant_fold_inst (MonoInst *inst, gpointer data) MONO_INTERNAL;
838 int mono_eval_cond_branch (MonoInst *branch) MONO_INTERNAL;
839 int mono_is_power_of_two (guint32 val) MONO_INTERNAL;
840 void mono_cprop_local (MonoCompile *cfg, MonoBasicBlock *bb, MonoInst **acp, int acp_size) MONO_INTERNAL;
841 MonoInst* mono_compile_create_var (MonoCompile *cfg, MonoType *type, int opcode) MONO_INTERNAL;
842 void mono_compile_make_var_load (MonoCompile *cfg, MonoInst *dest, gssize var_index) MONO_INTERNAL;
843 MonoInst* mono_compile_create_var_load (MonoCompile *cfg, gssize var_index) MONO_INTERNAL;
844 MonoInst* mono_compile_create_var_store (MonoCompile *cfg, gssize var_index, MonoInst *value) MONO_INTERNAL;
845 MonoType* mono_type_from_stack_type (MonoInst *ins) MONO_INTERNAL;
846 void mono_blockset_print (MonoCompile *cfg, MonoBitSet *set, const char *name, guint idom) MONO_INTERNAL;
847 void mono_print_tree (MonoInst *tree) MONO_INTERNAL;
848 void mono_print_tree_nl (MonoInst *tree) MONO_INTERNAL;
849 void mono_print_code (MonoCompile *cfg) MONO_INTERNAL;
850 void mono_print_method_from_ip (void *ip);
851 char *mono_pmip (void *ip);
852 void mono_select_instructions (MonoCompile *cfg) MONO_INTERNAL;
853 const char* mono_inst_name (int op);
854 void mono_inst_foreach (MonoInst *tree, MonoInstFunc func, gpointer data) MONO_INTERNAL;
855 void mono_disassemble_code (MonoCompile *cfg, guint8 *code, int size, char *id) MONO_INTERNAL;
856 void mono_add_patch_info (MonoCompile *cfg, int ip, MonoJumpInfoType type, gconstpointer target) MONO_INTERNAL;
857 void mono_remove_patch_info (MonoCompile *cfg, int ip) MONO_INTERNAL;
858 MonoJumpInfo* mono_patch_info_dup_mp (MonoMemPool *mp, MonoJumpInfo *patch_info) MONO_INTERNAL;
859 guint mono_patch_info_hash (gconstpointer data) MONO_INTERNAL;
860 gint mono_patch_info_equal (gconstpointer ka, gconstpointer kb) MONO_INTERNAL;
861 gpointer mono_resolve_patch_target (MonoMethod *method, MonoDomain *domain, guint8 *code, MonoJumpInfo *patch_info, gboolean run_cctors) MONO_INTERNAL;
862 MonoLMF * mono_get_lmf (void) MONO_INTERNAL;
863 MonoLMF** mono_get_lmf_addr (void) MONO_INTERNAL;
864 void mono_jit_thread_attach (MonoDomain *domain);
865 guint32 mono_get_jit_tls_key (void) MONO_INTERNAL;
866 gint32 mono_get_lmf_tls_offset (void) MONO_INTERNAL;
867 gint32 mono_get_lmf_addr_tls_offset (void) MONO_INTERNAL;
868 GList *mono_varlist_insert_sorted (MonoCompile *cfg, GList *list, MonoMethodVar *mv, gboolean sort_end) MONO_INTERNAL;
869 GList *mono_varlist_sort (MonoCompile *cfg, GList *list, int sort_type) MONO_INTERNAL;
870 void mono_analyze_liveness (MonoCompile *cfg) MONO_INTERNAL;
871 void mono_liveness_handle_exception_clauses (MonoCompile *cfg) MONO_INTERNAL;
872 void mono_linear_scan (MonoCompile *cfg, GList *vars, GList *regs, regmask_t *used_mask) MONO_INTERNAL;
873 void mono_create_jump_table (MonoCompile *cfg, MonoInst *label, MonoBasicBlock **bbs, int num_blocks) MONO_INTERNAL;
874 int mono_compile_assembly (MonoAssembly *ass, guint32 opts, const char *aot_options) MONO_INTERNAL;
875 MonoCompile *mini_method_compile (MonoMethod *method, guint32 opts, MonoDomain *domain, gboolean run_cctors, gboolean compile_aot, int parts) MONO_INTERNAL;
876 void mono_destroy_compile (MonoCompile *cfg) MONO_INTERNAL;
877 MonoJitICallInfo *mono_find_jit_opcode_emulation (int opcode) MONO_INTERNAL;
878 void mono_print_ins (int i, MonoInst *ins) MONO_INTERNAL;
880 void mono_aot_init (void) MONO_INTERNAL;
881 gpointer mono_aot_get_method (MonoDomain *domain,
882 MonoMethod *method) MONO_INTERNAL;
883 gpointer mono_aot_get_method_from_token (MonoDomain *domain, MonoImage *image, guint32 token) MONO_INTERNAL;
884 gboolean mono_aot_is_got_entry (guint8 *code, guint8 *addr) MONO_INTERNAL;
885 guint8* mono_aot_get_plt_entry (guint8 *code) MONO_INTERNAL;
886 gboolean mono_aot_init_vtable (MonoVTable *vtable) MONO_INTERNAL;
887 gboolean mono_aot_get_cached_class_info (MonoClass *klass, MonoCachedClassInfo *res) MONO_INTERNAL;
888 gboolean mono_aot_get_class_from_name (MonoImage *image, const char *name_space, const char *name, MonoClass **klass) MONO_INTERNAL;
889 MonoJitInfo* mono_aot_find_jit_info (MonoDomain *domain, MonoImage *image, gpointer addr) MONO_INTERNAL;
890 void mono_aot_set_make_unreadable (gboolean unreadable) MONO_INTERNAL;
891 gboolean mono_aot_is_pagefault (void *ptr) MONO_INTERNAL;
892 void mono_aot_handle_pagefault (void *ptr) MONO_INTERNAL;
893 guint32 mono_aot_get_n_pagefaults (void) MONO_INTERNAL;
894 gpointer mono_aot_plt_resolve (gpointer aot_module, guint32 plt_info_offset, guint8 *code) MONO_INTERNAL;
896 gboolean mono_method_blittable (MonoMethod *method) MONO_INTERNAL;
897 gboolean mono_method_same_domain (MonoJitInfo *caller, MonoJitInfo *callee) MONO_INTERNAL;
899 void mono_register_opcode_emulation (int opcode, const char* name, const char *sigstr, gpointer func, gboolean no_throw) MONO_INTERNAL;
900 void mono_draw_graph (MonoCompile *cfg, MonoGraphOptions draw_options) MONO_INTERNAL;
901 void mono_add_varcopy_to_end (MonoCompile *cfg, MonoBasicBlock *bb, int src, int dest) MONO_INTERNAL;
902 void mono_add_ins_to_end (MonoBasicBlock *bb, MonoInst *inst) MONO_INTERNAL;
903 gpointer mono_create_ftnptr (MonoDomain *domain, gpointer addr) MONO_INTERNAL;
905 int mono_find_method_opcode (MonoMethod *method) MONO_INTERNAL;
906 MonoJitICallInfo *mono_find_jit_icall_by_name (const char *name) MONO_INTERNAL;
907 MonoJitICallInfo *mono_find_jit_icall_by_addr (gconstpointer addr) MONO_INTERNAL;
908 MonoJitICallInfo *mono_register_jit_icall (gconstpointer func, const char *name, MonoMethodSignature *sig, gboolean is_save) MONO_INTERNAL;
909 gconstpointer mono_icall_get_wrapper (MonoJitICallInfo* callinfo) MONO_INTERNAL;
911 guint8 * mono_get_trampoline_code (MonoTrampolineType tramp_type) MONO_INTERNAL;
912 gpointer mono_create_jump_trampoline (MonoDomain *domain,
914 gboolean add_sync_wrapper) MONO_INTERNAL;
915 gpointer mono_create_class_init_trampoline (MonoVTable *vtable) MONO_INTERNAL;
916 gpointer mono_create_jit_trampoline (MonoMethod *method) MONO_INTERNAL;
917 gpointer mono_create_jit_trampoline_from_token (MonoImage *image, guint32 token) MONO_INTERNAL;
918 MonoVTable* mono_find_class_init_trampoline_by_addr (gconstpointer addr) MONO_INTERNAL;
919 gpointer mono_magic_trampoline (gssize *regs, guint8 *code, MonoMethod *m, guint8* tramp) MONO_INTERNAL;
920 gpointer mono_delegate_trampoline (gssize *regs, guint8 *code, MonoClass *klass, guint8* tramp) MONO_INTERNAL;
921 gpointer mono_aot_trampoline (gssize *regs, guint8 *code, guint8 *token_info,
922 guint8* tramp) MONO_INTERNAL;
923 gpointer mono_aot_plt_trampoline (gssize *regs, guint8 *code, guint8 *token_info,
924 guint8* tramp) MONO_INTERNAL;
925 void mono_class_init_trampoline (gssize *regs, guint8 *code, MonoVTable *vtable, guint8 *tramp) MONO_INTERNAL;
926 gpointer mono_debugger_create_notification_function (void) MONO_INTERNAL;
929 gboolean mono_running_on_valgrind (void) MONO_INTERNAL;
930 void* mono_global_codeman_reserve (int size) MONO_INTERNAL;
931 const char *mono_regname_full (int reg, gboolean fp) MONO_INTERNAL;
932 gint32* mono_allocate_stack_slots_full (MonoCompile *cfg, gboolean backward, guint32 *stack_size, guint32 *stack_align) MONO_INTERNAL;
933 gint32* mono_allocate_stack_slots (MonoCompile *cfg, guint32 *stack_size, guint32 *stack_align) MONO_INTERNAL;
934 void mono_local_regalloc (MonoCompile *cfg, MonoBasicBlock *bb) MONO_INTERNAL;
935 MonoInst *mono_branch_optimize_exception_target (MonoCompile *cfg, MonoBasicBlock *bb, const char * exname) MONO_INTERNAL;
936 gboolean mono_is_regsize_var (MonoType *t) MONO_INTERNAL;
937 CompRelation mono_opcode_to_cond (int opcode) MONO_INTERNAL;
938 CompType mono_opcode_to_type (int opcode, int cmp_opcode) MONO_INTERNAL;
940 /* methods that must be provided by the arch-specific port */
941 void mono_arch_cpu_init (void) MONO_INTERNAL;
942 guint32 mono_arch_cpu_optimizazions (guint32 *exclude_mask) MONO_INTERNAL;
943 void mono_arch_instrument_mem_needs (MonoMethod *method, int *stack, int *code) MONO_INTERNAL;
944 void *mono_arch_instrument_prolog (MonoCompile *cfg, void *func, void *p, gboolean enable_arguments) MONO_INTERNAL;
945 void *mono_arch_instrument_epilog (MonoCompile *cfg, void *func, void *p, gboolean enable_arguments) MONO_INTERNAL;
946 MonoCallInst *mono_arch_call_opcode (MonoCompile *cfg, MonoBasicBlock* bb, MonoCallInst *call, int is_virtual) MONO_INTERNAL;
947 MonoInst *mono_arch_get_inst_for_method (MonoCompile *cfg, MonoMethod *cmethod, MonoMethodSignature *fsig, MonoInst **args) MONO_INTERNAL;
948 void mono_codegen (MonoCompile *cfg) MONO_INTERNAL;
949 void mono_call_inst_add_outarg_reg (MonoCompile *cfg, MonoCallInst *call, int vreg, int hreg, gboolean fp) MONO_INTERNAL;
950 const char *mono_arch_regname (int reg) MONO_INTERNAL;
951 const char *mono_arch_fregname (int reg) MONO_INTERNAL;
952 gpointer mono_arch_get_throw_exception (void) MONO_INTERNAL;
953 gpointer mono_arch_get_rethrow_exception (void) MONO_INTERNAL;
954 gpointer mono_arch_get_throw_exception_by_name (void) MONO_INTERNAL;
955 gpointer mono_arch_get_throw_corlib_exception (void) MONO_INTERNAL;
956 guchar* mono_arch_create_trampoline_code (MonoTrampolineType tramp_type) MONO_INTERNAL;
957 gpointer mono_arch_create_jit_trampoline (MonoMethod *method) MONO_INTERNAL;
958 MonoJitInfo *mono_arch_create_jump_trampoline (MonoMethod *method) MONO_INTERNAL;
959 gpointer mono_arch_create_class_init_trampoline(MonoVTable *vtable) MONO_INTERNAL;
960 GList *mono_arch_get_allocatable_int_vars (MonoCompile *cfg) MONO_INTERNAL;
961 GList *mono_arch_get_global_int_regs (MonoCompile *cfg) MONO_INTERNAL;
962 guint32 mono_arch_regalloc_cost (MonoCompile *cfg, MonoMethodVar *vmv) MONO_INTERNAL;
963 void mono_arch_patch_code (MonoMethod *method, MonoDomain *domain, guint8 *code, MonoJumpInfo *ji, gboolean run_cctors) MONO_INTERNAL;
964 void mono_arch_flush_icache (guint8 *code, gint size) MONO_INTERNAL;
965 int mono_arch_max_epilog_size (MonoCompile *cfg) MONO_INTERNAL;
966 guint8 *mono_arch_emit_prolog (MonoCompile *cfg) MONO_INTERNAL;
967 void mono_arch_emit_epilog (MonoCompile *cfg) MONO_INTERNAL;
968 void mono_arch_emit_exceptions (MonoCompile *cfg) MONO_INTERNAL;
969 void mono_arch_local_regalloc (MonoCompile *cfg, MonoBasicBlock *bb) MONO_INTERNAL;
970 void mono_arch_output_basic_block (MonoCompile *cfg, MonoBasicBlock *bb) MONO_INTERNAL;
971 gboolean mono_arch_has_unwind_info (gconstpointer addr) MONO_INTERNAL;
972 void mono_arch_setup_jit_tls_data (MonoJitTlsData *tls) MONO_INTERNAL;
973 void mono_arch_free_jit_tls_data (MonoJitTlsData *tls) MONO_INTERNAL;
974 void mono_arch_emit_this_vret_args (MonoCompile *cfg, MonoCallInst *inst, int this_reg, int this_type, int vt_reg) MONO_INTERNAL;
975 void mono_arch_allocate_vars (MonoCompile *m) MONO_INTERNAL;
976 int mono_arch_get_argument_info (MonoMethodSignature *csig, int param_count, MonoJitArgumentInfo *arg_info) MONO_INTERNAL;
977 gboolean mono_arch_print_tree (MonoInst *tree, int arity) MONO_INTERNAL;
978 MonoJitInfo *mono_arch_find_jit_info (MonoDomain *domain,
979 MonoJitTlsData *jit_tls,
981 MonoJitInfo *prev_ji,
983 MonoContext *new_ctx,
987 gboolean *managed) MONO_INTERNAL;
988 gpointer mono_arch_get_call_filter (void) MONO_INTERNAL;
989 gpointer mono_arch_get_restore_context (void) MONO_INTERNAL;
990 gboolean mono_arch_handle_exception (void *sigctx, gpointer obj, gboolean test_only) MONO_INTERNAL;
991 gpointer mono_arch_ip_from_context (void *sigctx) MONO_INTERNAL;
992 void mono_arch_sigctx_to_monoctx (void *sigctx, MonoContext *ctx) MONO_INTERNAL;
993 void mono_arch_monoctx_to_sigctx (MonoContext *mctx, void *ctx) MONO_INTERNAL;
994 void mono_arch_flush_register_windows (void) MONO_INTERNAL;
995 gboolean mono_arch_is_inst_imm (gint64 imm) MONO_INTERNAL;
996 MonoInst* mono_arch_get_domain_intrinsic (MonoCompile* cfg) MONO_INTERNAL;
997 MonoInst* mono_arch_get_thread_intrinsic (MonoCompile* cfg) MONO_INTERNAL;
998 gboolean mono_arch_is_int_overflow (void *sigctx, void *info) MONO_INTERNAL;
999 void mono_arch_invalidate_method (MonoJitInfo *ji, void *func, gpointer func_arg) MONO_INTERNAL;
1000 guint32 mono_arch_get_patch_offset (guint8 *code) MONO_INTERNAL;
1001 gpointer*mono_arch_get_vcall_slot_addr (guint8* code, gpointer *regs) MONO_INTERNAL;
1002 gpointer*mono_arch_get_delegate_method_ptr_addr (guint8* code, gpointer *regs) MONO_INTERNAL;
1003 void mono_arch_create_vars (MonoCompile *cfg) MONO_INTERNAL;
1004 void mono_arch_save_unwind_info (MonoCompile *cfg) MONO_INTERNAL;
1005 void mono_arch_register_lowlevel_calls (void) MONO_INTERNAL;
1006 gpointer mono_arch_get_unbox_trampoline (MonoMethod *m, gpointer addr) MONO_INTERNAL;
1007 void mono_arch_patch_callsite (guint8 *code, guint8 *addr) MONO_INTERNAL;
1008 void mono_arch_patch_plt_entry (guint8 *code, guint8 *addr) MONO_INTERNAL;
1009 void mono_arch_nullify_class_init_trampoline(guint8 *code, gssize *regs) MONO_INTERNAL;
1010 void mono_arch_nullify_plt_entry (guint8 *code) MONO_INTERNAL;
1011 void mono_arch_patch_delegate_trampoline (guint8 *code, guint8 *tramp, gssize *regs, guint8 *addr) MONO_INTERNAL;
1012 gpointer mono_arch_get_this_arg_from_call (MonoMethodSignature *sig, gssize *regs, guint8 *code);
1013 gpointer mono_arch_get_delegate_invoke_impl (MonoMethodSignature *sig, gboolean has_target);
1014 gpointer mono_arch_create_specific_trampoline (gpointer arg1, MonoTrampolineType tramp_type, MonoDomain *domain, guint32 *code_len) MONO_INTERNAL;
1015 void mono_arch_emit_imt_argument (MonoCompile *cfg, MonoCallInst *call) MONO_INTERNAL;
1016 MonoMethod* mono_arch_find_imt_method (gpointer *regs, guint8 *code) MONO_INTERNAL;
1017 MonoObject* mono_arch_find_this_argument (gpointer *regs, MonoMethod *method) MONO_INTERNAL;
1018 gpointer mono_arch_build_imt_thunk (MonoVTable *vtable, MonoDomain *domain, MonoIMTCheckItem **imt_entries, int count) MONO_INTERNAL;
1020 /* Exception handling */
1021 gboolean mono_handle_exception (MonoContext *ctx, gpointer obj,
1022 gpointer original_ip, gboolean test_only) MONO_INTERNAL;
1023 void mono_handle_native_sigsegv (int signal, void *sigctx) MONO_INTERNAL;
1024 void mono_print_thread_dump (void *sigctx);
1025 void mono_jit_walk_stack (MonoStackWalk func, gboolean do_il_offset, gpointer user_data) MONO_INTERNAL;
1026 void mono_jit_walk_stack_from_ctx (MonoStackWalk func, MonoContext *ctx, gboolean do_il_offset, gpointer user_data) MONO_INTERNAL;
1027 void mono_setup_altstack (MonoJitTlsData *tls) MONO_INTERNAL;
1028 void mono_free_altstack (MonoJitTlsData *tls) MONO_INTERNAL;
1030 /* the new function to do stack walks */
1031 typedef gboolean (*MonoStackFrameWalk) (MonoDomain *domain, MonoContext *ctx, MonoJitInfo *ji, gpointer data);
1032 void mono_walk_stack (MonoDomain *domain, MonoJitTlsData *jit_tls, MonoContext *start_ctx, MonoStackFrameWalk func, gpointer user_data);
1034 MonoArray *ves_icall_get_trace (MonoException *exc, gint32 skip, MonoBoolean need_file_info) MONO_INTERNAL;
1035 MonoBoolean ves_icall_get_frame_info (gint32 skip, MonoBoolean need_file_info,
1036 MonoReflectionMethod **method,
1037 gint32 *iloffset, gint32 *native_offset,
1038 MonoString **file, gint32 *line, gint32 *column) MONO_INTERNAL;
1039 MonoString *ves_icall_System_Exception_get_trace (MonoException *exc) MONO_INTERNAL;
1041 /* Dominator/SSA methods */
1042 void mono_compile_dominator_info (MonoCompile *cfg, int dom_flags) MONO_INTERNAL;
1043 void mono_compute_natural_loops (MonoCompile *cfg) MONO_INTERNAL;
1044 MonoBitSet* mono_compile_iterated_dfrontier (MonoCompile *cfg, MonoBitSet *set) MONO_INTERNAL;
1045 void mono_ssa_compute (MonoCompile *cfg) MONO_INTERNAL;
1046 void mono_ssa_remove (MonoCompile *cfg) MONO_INTERNAL;
1047 void mono_ssa_cprop (MonoCompile *cfg) MONO_INTERNAL;
1048 void mono_ssa_deadce (MonoCompile *cfg) MONO_INTERNAL;
1049 void mono_ssa_strength_reduction (MonoCompile *cfg) MONO_INTERNAL;
1050 void mono_free_loop_info (MonoCompile *cfg) MONO_INTERNAL;
1052 /* debugging support */
1053 void mono_debug_init_method (MonoCompile *cfg, MonoBasicBlock *start_block,
1054 guint32 breakpoint_id) MONO_INTERNAL;
1055 void mono_debug_open_method (MonoCompile *cfg) MONO_INTERNAL;
1056 void mono_debug_close_method (MonoCompile *cfg) MONO_INTERNAL;
1057 void mono_debug_open_block (MonoCompile *cfg, MonoBasicBlock *bb, guint32 address) MONO_INTERNAL;
1058 void mono_debug_record_line_number (MonoCompile *cfg, MonoInst *ins, guint32 address) MONO_INTERNAL;
1059 void mono_debug_serialize_debug_info (MonoCompile *cfg, guint8 **out_buf, guint32 *buf_len) MONO_INTERNAL;
1060 void mono_debug_add_aot_method (MonoDomain *domain,
1061 MonoMethod *method, guint8 *code_start,
1062 guint8 *debug_info, guint32 debug_info_len) MONO_INTERNAL;
1063 void mono_debug_add_icall_wrapper (MonoMethod *method, MonoJitICallInfo* info) MONO_INTERNAL;
1064 void mono_debug_print_vars (gpointer ip, gboolean only_arguments);
1065 void mono_debugger_run_finally (MonoContext *start_ctx);
1067 /* Mono Debugger support */
1068 void mono_debugger_init (void);
1069 int mono_debugger_main (MonoDomain *domain, MonoAssembly *assembly, int argc, char **argv);
1073 MonoTraceSpec *mono_trace_parse_options (char *options) MONO_INTERNAL;
1074 void mono_trace_set_assembly (MonoAssembly *assembly) MONO_INTERNAL;
1075 gboolean mono_trace_eval (MonoMethod *method) MONO_INTERNAL;
1078 mono_perform_abc_removal (MonoCompile *cfg) MONO_INTERNAL;
1080 mono_perform_ssapre (MonoCompile *cfg) MONO_INTERNAL;
1082 mono_local_cprop (MonoCompile *cfg) MONO_INTERNAL;
1084 /* CAS - stack walk */
1085 MonoSecurityFrame* ves_icall_System_Security_SecurityFrame_GetSecurityFrame (gint32 skip) MONO_INTERNAL;
1086 MonoArray* ves_icall_System_Security_SecurityFrame_GetSecurityStack (gint32 skip) MONO_INTERNAL;
1088 int mini_wapi_hps (int argc, char **argv);
1089 int mini_wapi_semdel (int argc, char **argv);
1090 int mini_wapi_seminfo (int argc, char **argv);
1092 #endif /* __MONO_MINI_H__ */