2008-12-05 Zoltan Varga <vargaz@gmail.com>
[mono.git] / 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 #define MONO_BREAKPOINT_ARRAY_SIZE 64
22
23 #include "mini-arch.h"
24 #include "regalloc.h"
25 #include "declsec.h"
26 #include "unwind.h"
27
28 #ifndef G_LIKELY
29 #define G_LIKELY(a) (a)
30 #define G_UNLIKELY(a) (a)
31 #endif
32
33 #ifndef G_MAXINT32
34 #define G_MAXINT32 2147483647
35 #endif
36
37 #ifndef G_MININT32
38 #define G_MININT32 (-G_MAXINT32 - 1)
39 #endif
40
41 #if DISABLE_LOGGING
42 #define MINI_DEBUG(level,limit,code)
43 #else
44 #define MINI_DEBUG(level,limit,code) do {if (G_UNLIKELY ((level) >= (limit))) code} while (0)
45 #endif
46
47 #define NOT_IMPLEMENTED do { g_assert_not_reached (); } while (0)
48
49 #ifndef DISABLE_AOT
50 #define MONO_USE_AOT_COMPILER
51 #endif
52
53 /* for 32 bit systems */
54 #if G_BYTE_ORDER == G_LITTLE_ENDIAN
55 #define MINI_LS_WORD_IDX 0
56 #define MINI_MS_WORD_IDX 1
57 #else
58 #define MINI_LS_WORD_IDX 1
59 #define MINI_MS_WORD_IDX 0
60 #endif
61 #define MINI_LS_WORD_OFFSET (MINI_LS_WORD_IDX * 4)
62 #define MINI_MS_WORD_OFFSET (MINI_MS_WORD_IDX * 4)
63 #define inst_ls_word data.op[MINI_LS_WORD_IDX].const_val
64 #define inst_ms_word data.op[MINI_MS_WORD_IDX].const_val
65
66 #define MONO_FAKE_IMT_METHOD ((MonoMethod*)GINT_TO_POINTER(-1))
67 #define MONO_FAKE_VTABLE_METHOD ((MonoMethod*)GINT_TO_POINTER(-2))
68
69 /* Version number of the AOT file format */
70 #define MONO_AOT_FILE_VERSION "45"
71  
72 /* Per-domain information maintained by the JIT */
73 typedef struct
74 {
75         /* Maps MonoMethod's to a GSList of GOT slot addresses pointing to its code */
76         GHashTable *jump_target_got_slot_hash;
77         GHashTable *jump_target_hash;
78         /* Maps methods/klasses to the address of the given type of trampoline */
79         GHashTable *class_init_trampoline_hash;
80         GHashTable *jump_trampoline_hash;
81         GHashTable *jit_trampoline_hash;
82         GHashTable *delegate_trampoline_hash;
83         /* maps MonoMethod -> MonoJitDynamicMethodInfo */
84         GHashTable *dynamic_code_hash;
85         GHashTable *method_code_hash;
86 } MonoJitDomainInfo;
87
88 typedef struct {
89         MonoJitInfo *ji;
90         MonoCodeManager *code_mp;
91 } MonoJitDynamicMethodInfo;
92
93 #define domain_jit_info(domain) ((MonoJitDomainInfo*)((domain)->runtime_info))
94
95 #if 0
96 #define mono_bitset_foreach_bit(set,b,n) \
97         for (b = 0; b < n; b++)\
98                 if (mono_bitset_test_fast(set,b))
99 #define mono_bitset_foreach_bit_rev(set,b,n) \
100         for (b = n - 1; b >= 0; b--)\
101                 if (mono_bitset_test_fast(set,b))
102 #else
103 #define mono_bitset_foreach_bit(set,b,n) \
104         for (b = mono_bitset_find_start (set); b < n && b >= 0; b = mono_bitset_find_first (set, b))
105 #define mono_bitset_foreach_bit_rev(set,b,n) \
106         for (b = mono_bitset_find_last (set, n - 1); b >= 0; b = b ? mono_bitset_find_last (set, b) : -1)
107  
108 #endif
109
110 /*
111  * Pull the list of opcodes
112  */
113 #define OPDEF(a,b,c,d,e,f,g,h,i,j) \
114         a = i,
115
116 enum {
117 #include "mono/cil/opcode.def"
118         CEE_LASTOP
119 };
120 #undef OPDEF
121
122 #define MONO_VARINFO(cfg,varnum) (&(cfg)->vars [varnum])
123
124 #define MONO_INST_NEW(cfg,dest,op) do { \
125                 (dest) = mono_mempool_alloc0 ((cfg)->mempool, sizeof (MonoInst));       \
126                 (dest)->opcode = (op);  \
127         (dest)->dreg = (dest)->sreg1 = (dest)->sreg2 = -1;  \
128         (dest)->cil_code = (cfg)->ip;  \
129         (dest)->cil_code = (cfg)->ip; \
130         } while (0)
131
132 #define MONO_INST_NEW_CALL(cfg,dest,op) do {    \
133                 (dest) = mono_mempool_alloc0 ((cfg)->mempool, sizeof (MonoCallInst));   \
134                 (dest)->inst.opcode = (op);     \
135         (dest)->inst.dreg = (dest)->inst.sreg1 = (dest)->inst.sreg2 = -1;  \
136         (dest)->inst.cil_code = (cfg)->ip;  \
137         } while (0)
138
139 #define MONO_INST_NEW_CALL_ARG(cfg,dest,op) do {        \
140                 (dest) = mono_mempool_alloc0 ((cfg)->mempool, sizeof (MonoCallArgParm));        \
141                 (dest)->ins.opcode = (op);      \
142         } while (0)
143
144 #define MONO_ADD_INS(b,inst) do {       \
145                 if ((b)->last_ins) {    \
146                         (b)->last_ins->next = (inst);   \
147             (inst)->prev = (b)->last_ins;   \
148                         (b)->last_ins = (inst); \
149                 } else {        \
150                         (b)->code = (b)->last_ins = (inst);     \
151                 }       \
152         } while (0)
153
154 #define NULLIFY_INS(ins) do { \
155         (ins)->opcode = OP_NOP; \
156         (ins)->dreg = (ins)->sreg1 = (ins)->sreg2 = -1; \
157                 (ins)->ssa_op = MONO_SSA_NOP; \
158     } while (0)
159
160 /* Remove INS from BB */
161 #define MONO_REMOVE_INS(bb,ins) do { \
162         if ((ins)->prev) \
163             (ins)->prev->next = (ins)->next; \
164         if ((ins)->next) \
165             (ins)->next->prev = (ins)->prev; \
166         if ((bb)->code == (ins)) \
167             (bb)->code = (ins)->next; \
168         if ((bb)->last_ins == (ins)) \
169             (bb)->last_ins = (ins)->prev; \
170     } while (0)
171
172 /* Remove INS from BB and nullify it */
173 #define MONO_DELETE_INS(bb,ins) do { \
174         MONO_REMOVE_INS ((bb), (ins)); \
175         NULLIFY_INS ((ins)); \
176     } while (0)
177
178 /* 
179  * this is used to determine when some branch optimizations are possible: we exclude FP compares
180  * because they have weird semantics with NaNs.
181  */
182 #define MONO_IS_COND_BRANCH_OP(ins) (((ins)->opcode >= OP_LBEQ && (ins)->opcode <= OP_LBLT_UN) || ((ins)->opcode >= OP_FBEQ && (ins)->opcode <= OP_FBLT_UN) || ((ins)->opcode >= OP_IBEQ && (ins)->opcode <= OP_IBLT_UN))
183 #define MONO_IS_COND_BRANCH_NOFP(ins) (MONO_IS_COND_BRANCH_OP(ins) && !(((ins)->opcode >= OP_FBEQ) && ((ins)->opcode <= OP_FBLT_UN)) && (!(ins)->inst_left || (ins)->inst_left->inst_left->type != STACK_R8))
184
185 #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))
186
187 #define MONO_IS_COND_EXC(ins) ((((ins)->opcode >= OP_COND_EXC_EQ) && ((ins)->opcode <= OP_COND_EXC_LT_UN)) || (((ins)->opcode >= OP_COND_EXC_IEQ) && ((ins)->opcode <= OP_COND_EXC_ILT_UN)))
188
189 #define MONO_IS_SETCC(ins) ((((ins)->opcode >= OP_CEQ) && ((ins)->opcode <= OP_CLT_UN)) || (((ins)->opcode >= OP_ICEQ) && ((ins)->opcode <= OP_ICLT_UN)) || (((ins)->opcode >= OP_LCEQ) && ((ins)->opcode <= OP_LCLT_UN)) || (((ins)->opcode >= OP_FCEQ) && ((ins)->opcode <= OP_FCLT_UN)))
190
191 #define MONO_IS_PHI(ins) (((ins)->opcode == OP_PHI) || ((ins)->opcode == OP_FPHI) || ((ins)->opcode == OP_VPHI))
192
193 #define MONO_IS_LOAD_MEMBASE(ins) (((ins)->opcode >= OP_LOAD_MEMBASE) && ((ins)->opcode <= OP_LOADV_MEMBASE))
194 #define MONO_IS_STORE_MEMBASE(ins) (((ins)->opcode >= OP_STORE_MEMBASE_REG) && ((ins)->opcode <= OP_STOREV_MEMBASE))
195 #define MONO_IS_STORE_MEMINDEX(ins) (((ins)->opcode >= OP_STORE_MEMINDEX) && ((ins)->opcode <= OP_STORER8_MEMINDEX))
196
197 #define MONO_IS_CALL(ins) (((ins->opcode >= OP_VOIDCALL) && (ins->opcode <= OP_VOIDCALL_MEMBASE)) || ((ins->opcode >= OP_FCALL) && (ins->opcode <= OP_FCALL_MEMBASE)) || ((ins->opcode >= OP_LCALL) && (ins->opcode <= OP_LCALL_MEMBASE)) || ((ins->opcode >= OP_VCALL) && (ins->opcode <= OP_VCALL_MEMBASE)) || ((ins->opcode >= OP_CALL) && (ins->opcode <= OP_CALL_MEMBASE)) || ((ins->opcode >= OP_VCALL2) && (ins->opcode <= OP_VCALL2_MEMBASE)) || (ins->opcode == OP_TAILCALL))
198
199 #define MONO_IS_JUMP_TABLE(ins) (((ins)->opcode == OP_JUMP_TABLE) ? TRUE : ((((ins)->opcode == OP_AOTCONST) && (ins->inst_i1 == (gpointer)MONO_PATCH_INFO_SWITCH)) ? TRUE : ((ins)->opcode == OP_SWITCH) ? TRUE : ((((ins)->opcode == OP_GOT_ENTRY) && ((ins)->inst_right->inst_i1 == (gpointer)MONO_PATCH_INFO_SWITCH)) ? TRUE : FALSE)))
200
201 #define MONO_JUMP_TABLE_FROM_INS(ins) (((ins)->opcode == OP_JUMP_TABLE) ? (ins)->inst_p0 : (((ins)->opcode == OP_AOTCONST) && (ins->inst_i1 == (gpointer)MONO_PATCH_INFO_SWITCH) ? (ins)->inst_p0 : (((ins)->opcode == OP_SWITCH) ? (ins)->inst_p0 : ((((ins)->opcode == OP_GOT_ENTRY) && ((ins)->inst_right->inst_i1 == (gpointer)MONO_PATCH_INFO_SWITCH)) ? (ins)->inst_right->inst_p0 : NULL))))
202
203 /* FIXME: Add more instructions */
204 #define MONO_INS_HAS_NO_SIDE_EFFECT(ins) (MONO_IS_MOVE (ins) || (ins->opcode == OP_ICONST) || (ins->opcode == OP_I8CONST) || MONO_IS_ZERO (ins) || (ins->opcode == OP_ADD_IMM) || (ins->opcode == OP_R8CONST) || (ins->opcode == OP_LADD_IMM) || (ins->opcode == OP_ISUB_IMM) || (ins->opcode == OP_IADD_IMM) || (ins->opcode == OP_INEG) || (ins->opcode == OP_LNEG) || (ins->opcode == OP_ISUB) || (ins->opcode == OP_CMOV_IGE) || (ins->opcode == OP_ISHL_IMM) || (ins->opcode == OP_ISHR_IMM) || (ins->opcode == OP_ISHR_UN_IMM) || (ins->opcode == OP_IAND_IMM) || (ins->opcode == OP_ICONV_TO_U1) || (ins->opcode == OP_ICONV_TO_I1) || (ins->opcode == OP_SEXT_I4) || (ins->opcode == OP_LCONV_TO_U1) || (ins->opcode == OP_ICONV_TO_U2) || (ins->opcode == OP_ICONV_TO_I2) || (ins->opcode == OP_LCONV_TO_I2))
205
206
207
208 #ifdef MONO_ARCH_SIMD_INTRINSICS
209
210 #define MONO_IS_MOVE(ins) (((ins)->opcode == OP_MOVE) || ((ins)->opcode == OP_FMOVE) || ((ins)->opcode == OP_VMOVE) || ((ins)->opcode == OP_XMOVE))
211 #define MONO_IS_NON_FP_MOVE(ins) (((ins)->opcode == OP_MOVE) || ((ins)->opcode == OP_VMOVE) || ((ins)->opcode == OP_XMOVE))
212 #define MONO_IS_REAL_MOVE(ins) (((ins)->opcode == OP_MOVE) || ((ins)->opcode == OP_FMOVE) || ((ins)->opcode == OP_XMOVE))
213 #define MONO_IS_ZERO(ins) (((ins)->opcode == OP_VZERO) || ((ins)->opcode == OP_XZERO))
214
215 #define MONO_CLASS_IS_SIMD(cfg, klass) (((cfg)->opt & MONO_OPT_SIMD) && (klass)->simd_type)
216
217 #else
218
219 #define MONO_IS_MOVE(ins) (((ins)->opcode == OP_MOVE) || ((ins)->opcode == OP_FMOVE) || ((ins)->opcode == OP_VMOVE))
220 #define MONO_IS_NON_FP_MOVE(ins) (((ins)->opcode == OP_MOVE) || ((ins)->opcode == OP_VMOVE))
221 /*A real MOVE is one that isn't decomposed such as a VMOVE or LMOVE*/
222 #define MONO_IS_REAL_MOVE(ins) (((ins)->opcode == OP_MOVE) || ((ins)->opcode == OP_FMOVE))
223 #define MONO_IS_ZERO(ins) ((ins)->opcode == OP_VZERO)
224
225 #define MONO_CLASS_IS_SIMD(cfg, klass) (0)
226
227 #endif
228
229 typedef struct MonoInstList MonoInstList;
230 typedef struct MonoInst MonoInst;
231 typedef struct MonoCallInst MonoCallInst;
232 typedef struct MonoCallArgParm MonoCallArgParm;
233 typedef struct MonoEdge MonoEdge;
234 typedef struct MonoMethodVar MonoMethodVar;
235 typedef struct MonoBasicBlock MonoBasicBlock;
236 typedef struct MonoLMF MonoLMF;
237 typedef struct MonoSpillInfo MonoSpillInfo;
238 typedef struct MonoTraceSpec MonoTraceSpec;
239
240 extern guint32 mono_jit_tls_id;
241 extern MonoTraceSpec *mono_jit_trace_calls;
242 extern gboolean mono_break_on_exc;
243 extern int mono_exc_esp_offset;
244 extern gboolean mono_compile_aot;
245 extern gboolean mono_aot_only;
246 extern gboolean mono_use_imt;
247 extern MonoMethodDesc *mono_inject_async_exc_method;
248 extern int mono_inject_async_exc_pos;
249 extern MonoMethodDesc *mono_break_at_bb_method;
250 extern int mono_break_at_bb_bb_num;
251 extern gboolean check_for_pending_exc;
252 extern gboolean disable_vtypes_in_regs;
253 extern gboolean mono_verify_all;
254 extern gboolean mono_dont_free_global_codeman;
255 extern gboolean mono_do_x86_stack_align;
256 extern const char *mono_build_date;
257
258 #define INS_INFO(opcode) (&ins_info [((opcode) - OP_START - 1) * 3])
259
260 extern const char ins_info[];
261
262 #define MONO_BB_FOR_EACH_INS(bb, ins) for ((ins) = (bb)->code; (ins); (ins) = (ins)->next)
263
264 #define MONO_BB_FOR_EACH_INS_SAFE(bb, n, ins) for ((ins) = (bb)->code, n = (ins) ? (ins)->next : NULL; (ins); (ins) = (n), (n) = (ins) ? (ins)->next : NULL)
265
266 #define MONO_BB_FOR_EACH_INS_REVERSE_SAFE(bb, p, ins) for ((ins) = (bb)->last_ins, p = (ins) ? (ins)->prev : NULL; (ins); (ins) = (p), (p) = (ins) ? (ins)->prev : NULL)
267
268 #define mono_bb_first_ins(bb) (bb)->code
269
270 struct MonoEdge {
271         MonoEdge *next;
272         MonoBasicBlock *bb;
273         /* add edge type? */
274 };
275
276 struct MonoSpillInfo {
277         int offset;
278 };
279
280 /*
281  * The IR-level extended basic block.  
282  *
283  * A basic block can have multiple exits just fine, as long as the point of
284  * 'departure' is the last instruction in the basic block. Extended basic
285  * blocks, on the other hand, may have instructions that leave the block
286  * midstream. The important thing is that they cannot be _entered_
287  * midstream, ie, execution of a basic block (or extened bb) always start
288  * at the beginning of the block, never in the middle.
289  */
290 struct MonoBasicBlock {
291         MonoInst *last_ins;
292
293         /* the next basic block in the order it appears in IL */
294         MonoBasicBlock *next_bb;
295
296         /*
297          * Before instruction selection it is the first tree in the
298          * forest and the first item in the list of trees. After
299          * instruction selection it is the first instruction and the
300          * first item in the list of instructions.
301          */
302         MonoInst *code;
303
304         /* unique block number identification */
305         gint32 block_num;
306         
307         gint32 dfn;
308
309         /* Basic blocks: incoming and outgoing counts and pointers */
310         /* Each bb should only appear once in each array */
311         gint16 out_count, in_count;
312         MonoBasicBlock **in_bb;
313         MonoBasicBlock **out_bb;
314
315         /* Points to the start of the CIL code that initiated this BB */
316         unsigned char* cil_code;
317
318         /* Length of the CIL block */
319         gint32 cil_length;
320
321         /* The address of the generated code, used for fixups */
322         int native_offset;
323         int max_offset;
324
325         /* Visited and reachable flags */
326         guint32 flags;
327
328         /*
329          * SSA and loop based flags
330          */
331         MonoBitSet *dominators;
332         MonoBitSet *dfrontier;
333         MonoBasicBlock *idom;
334         GSList *dominated;
335         /* fast dominator algorithm */
336         MonoBasicBlock *df_parent, *ancestor, *child, *label;
337         MonoEdge *bucket;
338         int size, sdom, idomn;
339         
340         /* loop nesting and recognition */
341         GList *loop_blocks;
342         gint8  nesting;
343         gint8  loop_body_start;
344
345         /* 
346          * Whenever the bblock is rarely executed so it should be emitted after
347          * the function epilog.
348          */
349         guint out_of_line : 1;
350         /* Caches the result of uselessness calculation during optimize_branches */
351         guint not_useless : 1;
352         /* Whenever the decompose_array_access_opts () pass needs to process this bblock */
353         guint has_array_access : 1;
354         /* Whenever this bblock is extended, ie. it has branches inside it */
355         guint extended : 1;
356         
357         /* use for liveness analysis */
358         MonoBitSet *gen_set;
359         MonoBitSet *kill_set;
360         MonoBitSet *live_in_set;
361         MonoBitSet *live_out_set;
362
363         /* fields to deal with non-empty stack slots at bb boundary */
364         guint16 out_scount, in_scount;
365         MonoInst **out_stack;
366         MonoInst **in_stack;
367
368         /* we use that to prevent merging of bblocks covered by different clauses*/
369         guint real_offset;
370
371         /*
372          * The region encodes whether the basic block is inside
373          * a finally, catch, filter or none of these.
374          *
375          * If the value is -1, then it is neither finally, catch nor filter
376          *
377          * Otherwise the format is:
378          *
379          *  Bits: |     0-3      |       4-7      |     8-31
380          *        |              |                |
381          *        | clause-flags |   MONO_REGION  | clause-index 
382          *
383          */
384         guint region;
385
386         /* The current symbolic register number, used in local register allocation. */
387         guint32 max_vreg;
388 };
389
390 /* BBlock flags */
391 enum {
392         BB_VISITED            = 1 << 0,
393         BB_REACHABLE          = 1 << 1,
394         BB_EXCEPTION_DEAD_OBJ = 1 << 2,
395         BB_EXCEPTION_UNSAFE   = 1 << 3,
396         BB_EXCEPTION_HANDLER  = 1 << 4
397 };
398
399 typedef struct MonoMemcpyArgs {
400         int size, align;
401 } MonoMemcpyArgs;
402
403 struct MonoInst {
404         guint16 opcode;
405         guint8  type; /* stack type */
406         guint   ssa_op : 3;
407         guint8  flags  : 5;
408         
409         /* used by the register allocator */
410         gint32 dreg, sreg1, sreg2;
411
412         MonoInst *next, *prev;
413
414         union {
415                 union {
416                         MonoInst *src;
417                         MonoMethodVar *var;
418                         gssize const_val;
419                         gpointer p;
420                         MonoMethod *method;
421                         MonoMethodSignature *signature;
422                         MonoBasicBlock **many_blocks;
423                         MonoBasicBlock *target_block;
424                         MonoInst **args;
425                         MonoType *vtype;
426                         MonoClass *klass;
427                         int *phi_args;
428                         MonoCallInst *call_inst;
429                 } op [2];
430                 gint64 i8const;
431                 double r8const;
432         } data;
433
434         const unsigned char* cil_code; /* for debugging and bblock splitting */
435
436         /* used mostly by the backend to store additional info it may need */
437         union {
438                 gint32 reg3;
439                 gint32 arg_info;
440                 gint32 size;
441                 MonoMemcpyArgs *memcpy_args; /* in OP_MEMSET and OP_MEMCPY */
442                 gpointer data;
443                 gint shift_amount;
444                 gboolean is_pinvoke; /* for variables in the unmanaged marshal format */
445                 gboolean record_cast_details; /* For CEE_CASTCLASS */
446                 MonoInst *spill_var; /* for OP_ICONV_TO_R8_RAW and OP_FCONV_TO_R8_X */
447                 guint16 source_opcode; /*OP_XCONV_R8_TO_I4 needs to know which op was used to do proper widening*/
448         } backend;
449         
450         MonoClass *klass;
451 };
452         
453 struct MonoCallInst {
454         MonoInst inst;
455         MonoMethodSignature *signature;
456         MonoMethod *method;
457         MonoInst **args;
458         MonoInst *out_args;
459         MonoInst *vret_var;
460         gconstpointer fptr;
461         guint stack_usage;
462         guint virtual : 1;
463         guint tail_call : 1;
464         /* If this is TRUE, 'fptr' points to a MonoJumpInfo instead of an address. */
465         guint fptr_is_patch : 1;
466         /*
467          * If this is true, then the call returns a vtype in a register using the same 
468          * calling convention as OP_CALL.
469          */
470         guint vret_in_reg : 1;
471         /* Whenever there is an IMT argument and it is dynamic */
472         guint dynamic_imt_arg : 1;
473         regmask_t used_iregs;
474         regmask_t used_fregs;
475         GSList *out_ireg_args;
476         GSList *out_freg_args;
477 };
478
479 struct MonoCallArgParm {
480         MonoInst ins;
481         gint32 size;
482         gint32 offset;
483         gint32 offPrm;
484 };
485
486 /* 
487  * flags for MonoInst
488  * Note: some of the values overlap, because they can't appear
489  * in the same MonoInst.
490  */
491 enum {
492         MONO_INST_HAS_METHOD = 1,
493         /* temp local created by a DUP: used only within a BB */
494         MONO_INST_IS_TEMP    = 1,
495         MONO_INST_INIT       = 1, /* in localloc */
496         MONO_INST_IS_DEAD    = 2,
497         MONO_INST_TAILCALL   = 4,
498         MONO_INST_VOLATILE   = 4,
499         MONO_INST_BRLABEL    = 4,
500         MONO_INST_NOTYPECHECK    = 4,
501         MONO_INST_UNALIGNED  = 8,
502     MONO_INST_CFOLD_TAKEN = 8, /* On branches */
503     MONO_INST_CFOLD_NOT_TAKEN = 16, /* On branches */
504         MONO_INST_DEFINITION_HAS_SIDE_EFFECTS = 8,
505         /* the address of the variable has been taken */
506         MONO_INST_INDIRECT   = 16,
507         MONO_INST_NORANGECHECK   = 16
508 };
509
510 #define inst_c0 data.op[0].const_val
511 #define inst_c1 data.op[1].const_val
512 #define inst_i0 data.op[0].src
513 #define inst_i1 data.op[1].src
514 #define inst_p0 data.op[0].p
515 #define inst_p1 data.op[1].p
516 #define inst_l  data.i8const
517 #define inst_r  data.r8const
518 #define inst_left  data.op[0].src
519 #define inst_right data.op[1].src
520
521 #define inst_newa_len   data.op[0].src
522 #define inst_newa_class data.op[1].klass
523
524 #define inst_var    data.op[0].var
525 #define inst_vtype  data.op[1].vtype
526 /* in branch instructions */
527 #define inst_many_bb   data.op[1].many_blocks
528 #define inst_target_bb data.op[0].target_block
529 #define inst_true_bb   data.op[1].many_blocks[0]
530 #define inst_false_bb  data.op[1].many_blocks[1]
531
532 #define inst_basereg sreg1
533 #define inst_indexreg sreg2
534 #define inst_destbasereg dreg
535 #define inst_offset data.op[0].const_val
536 #define inst_imm    data.op[1].const_val
537 #define inst_call   data.op[1].call_inst
538
539 #define inst_phi_args   data.op[1].phi_args
540
541 /* instruction description for use in regalloc/scheduling */
542 enum {
543         MONO_INST_DEST,
544         MONO_INST_SRC1,
545         MONO_INST_SRC2,
546         MONO_INST_LEN,
547         MONO_INST_CLOB,
548         /* Unused, commented out to reduce the size of the mdesc tables
549         MONO_INST_FLAGS,
550         MONO_INST_COST,
551         MONO_INST_DELAY,
552         MONO_INST_RES,
553         */
554         MONO_INST_MAX
555 };
556
557 typedef union {
558         struct {
559                 guint16 tid; /* tree number */
560                 guint16 bid; /* block number */
561         } pos ;
562         guint32 abs_pos; 
563 } MonoPosition;
564
565 typedef struct {
566         MonoPosition first_use, last_use;
567 } MonoLiveRange;
568
569 typedef struct MonoLiveRange2 MonoLiveRange2;
570
571 struct MonoLiveRange2 {
572         int from, to;
573         MonoLiveRange2 *next;
574 };
575
576 typedef struct {
577         /* List of live ranges sorted by 'from' */
578         MonoLiveRange2 *range;
579         MonoLiveRange2 *last_range;
580 } MonoLiveInterval;
581
582 /*
583  * Additional information about a variable
584  */
585 struct MonoMethodVar {
586         guint           idx; /* inside cfg->varinfo, cfg->vars */
587         MonoLiveRange   range; /* generated by liveness analysis */
588         MonoLiveInterval *interval; /* generated by liveness analysis */
589         int             reg; /* != -1 if allocated into a register */
590         int             spill_costs;
591         MonoBitSet     *def_in; /* used by SSA */
592         MonoInst       *def;    /* used by SSA */
593         MonoBasicBlock *def_bb; /* used by SSA */
594         GList          *uses;   /* used by SSA */
595         char            cpstate;  /* used by SSA conditional  constant propagation */
596 };
597
598 typedef struct {
599         gpointer          end_of_stack;
600         guint32           stack_size;
601 #if !defined(HAVE_KW_THREAD) || !defined(MONO_ARCH_ENABLE_MONO_LMF_VAR)
602         MonoLMF          *lmf;
603 #endif
604         MonoLMF          *first_lmf;
605         gpointer         restore_stack_prot;
606         guint32          handling_stack_ovf;
607         gpointer         signal_stack;
608         guint32          signal_stack_size;
609         gpointer         stack_ovf_guard_base;
610         guint32          stack_ovf_guard_size;
611         void            (*abort_func) (MonoObject *object);
612         /* Used to implement --debug=casts */
613         MonoClass       *class_cast_from, *class_cast_to;
614 } MonoJitTlsData;
615
616 typedef enum {
617 #define PATCH_INFO(a,b) MONO_PATCH_INFO_ ## a,
618 #include "patch-info.h"
619 #undef PATCH_INFO
620         MONO_PATCH_INFO_NUM
621 } MonoJumpInfoType;
622
623 /*
624  * We need to store the image which the token refers to along with the token,
625  * since the image might not be the same as the image of the method which
626  * contains the relocation, because of inlining.
627  */
628 typedef struct MonoJumpInfoToken {
629         MonoImage *image;
630         guint32 token;
631         gboolean has_context;
632         MonoGenericContext context;
633 } MonoJumpInfoToken;
634
635 typedef struct MonoJumpInfoBBTable {
636         MonoBasicBlock **table;
637         int table_size;
638 } MonoJumpInfoBBTable;
639
640 typedef struct MonoJumpInfoRgctxEntry MonoJumpInfoRgctxEntry;
641
642 typedef struct MonoJumpInfo MonoJumpInfo;
643 struct MonoJumpInfo {
644         MonoJumpInfo *next;
645         union {
646                 int i;
647                 guint8 *p;
648                 MonoInst *label;
649         } ip;
650
651         MonoJumpInfoType type;
652         union {
653                 gconstpointer   target;
654 #if SIZEOF_VOID_P == 8
655                 gint64          offset;
656 #else
657                 int             offset;
658 #endif
659                 MonoBasicBlock *bb;
660                 MonoInst       *inst;
661                 MonoMethod     *method;
662                 MonoClass      *klass;
663                 MonoClassField *field;
664                 MonoImage      *image;
665                 MonoVTable     *vtable;
666                 const char     *name;
667                 MonoJumpInfoToken  *token;
668                 MonoJumpInfoBBTable *table;
669                 MonoJumpInfoRgctxEntry *rgctx_entry;
670         } data;
671 };
672  
673 /* Contains information describing an rgctx entry */
674 struct MonoJumpInfoRgctxEntry {
675         MonoMethod *method;
676         gboolean in_mrgctx;
677         MonoJumpInfo *data; /* describes the data to be loaded */
678         int info_type;
679 };
680
681 typedef enum {
682         MONO_TRAMPOLINE_JIT,
683         MONO_TRAMPOLINE_JUMP,
684         MONO_TRAMPOLINE_CLASS_INIT,
685         MONO_TRAMPOLINE_GENERIC_CLASS_INIT,
686         MONO_TRAMPOLINE_RGCTX_LAZY_FETCH,
687         MONO_TRAMPOLINE_AOT,
688         MONO_TRAMPOLINE_AOT_PLT,
689         MONO_TRAMPOLINE_DELEGATE,
690         MONO_TRAMPOLINE_RESTORE_STACK_PROT,
691         MONO_TRAMPOLINE_GENERIC_VIRTUAL_REMOTING,
692         MONO_TRAMPOLINE_MONITOR_ENTER,
693         MONO_TRAMPOLINE_MONITOR_EXIT,
694         MONO_TRAMPOLINE_NUM
695 } MonoTrampolineType;
696
697 #define MONO_TRAMPOLINE_TYPE_MUST_RETURN(t)             \
698         ((t) == MONO_TRAMPOLINE_CLASS_INIT ||           \
699          (t) == MONO_TRAMPOLINE_GENERIC_CLASS_INIT ||   \
700          (t) == MONO_TRAMPOLINE_RESTORE_STACK_PROT ||   \
701          (t) == MONO_TRAMPOLINE_RGCTX_LAZY_FETCH ||     \
702          (t) == MONO_TRAMPOLINE_MONITOR_ENTER ||        \
703          (t) == MONO_TRAMPOLINE_MONITOR_EXIT)
704
705 /* optimization flags */
706 #define OPTFLAG(id,shift,name,descr) MONO_OPT_ ## id = 1 << shift,
707 enum {
708 #include "optflags-def.h"
709         MONO_OPT_LAST
710 };
711
712 /* Bit-fields in the MonoBasicBlock.region */
713 #define MONO_REGION_TRY       0
714 #define MONO_REGION_FINALLY  16
715 #define MONO_REGION_CATCH    32
716 #define MONO_REGION_FAULT    64         /* Currently unused */
717 #define MONO_REGION_FILTER  128
718
719 #define MONO_BBLOCK_IS_IN_REGION(bblock, regtype) (((bblock)->region & (0xf << 4)) == (regtype))
720
721 #define get_vreg_to_inst(cfg, vreg) ((vreg) < (cfg)->vreg_to_inst_len ? (cfg)->vreg_to_inst [(vreg)] : NULL)
722
723 #define vreg_is_volatile(cfg, vreg) (G_UNLIKELY (get_vreg_to_inst ((cfg), (vreg)) && (get_vreg_to_inst ((cfg), (vreg))->flags & (MONO_INST_VOLATILE|MONO_INST_INDIRECT))))
724
725 /*
726  * Control Flow Graph and compilation unit information
727  */
728 typedef struct {
729         MonoMethod      *method;
730         MonoMemPool     *mempool;
731         MonoInst       **varinfo;
732         MonoMethodVar   *vars;
733         MonoInst        *ret;
734         MonoBasicBlock  *bb_entry;
735         MonoBasicBlock  *bb_exit;
736         MonoBasicBlock  *bb_init;
737         MonoBasicBlock **bblocks;
738         MonoBasicBlock **cil_offset_to_bb;
739         MonoMemPool     *state_pool; /* used by instruction selection */
740         MonoBasicBlock  *cbb;        /* used by instruction selection */
741         MonoInst        *prev_ins;   /* in decompose */
742         MonoJumpInfo    *patch_info;
743         MonoJitInfo     *jit_info;
744         MonoJitDynamicMethodInfo *dynamic_info;
745         guint            num_bblocks;
746         guint            locals_start;
747         guint            num_varinfo; /* used items in varinfo */
748         guint            varinfo_count; /* total storage in varinfo */
749         gint             stack_offset;
750         gint             max_ireg;
751         gint             cil_offset_to_bb_len;
752         MonoRegState    *rs;
753         MonoSpillInfo   *spill_info [16]; /* machine register spills */
754         gint             spill_count;
755         gint             spill_info_len [16];
756         /* unsigned char   *cil_code; */
757         MonoMethod      *inlined_method; /* the method which is currently inlined */
758         MonoInst        *domainvar; /* a cache for the current domain */
759         MonoInst        *got_var; /* Global Offset Table variable */
760         MonoInst        **locals;
761         MonoInst        *rgctx_var; /* Runtime generic context variable (for static generic methods) */
762         MonoInst        **args;
763         MonoType        **arg_types;
764         MonoMethod      *current_method; /* The method currently processed by method_to_ir () */
765         MonoGenericContext *generic_context;
766
767         /* 
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.
771          */
772         MonoInst        *vret_addr;
773
774         /*
775          * This is used to initialize the cil_code field of MonoInst's.
776          */
777         const unsigned char *ip;
778         
779         struct MonoAliasingInformation *aliasing_info;
780
781         /* A hashtable of region ID-> SP var mappings */
782         /* An SP var is a place to store the stack pointer (used by handlers)*/
783         GHashTable      *spvars;
784
785         /* A hashtable of region ID -> EX var mappings */
786         /* An EX var stores the exception object passed to catch/filter blocks */
787         GHashTable      *exvars;
788
789         GList           *ldstr_list; /* used by AOT */
790         
791         MonoDomain      *domain;
792
793         guint            real_offset;
794         GHashTable      *cbb_hash;
795
796         /* The current virtual register number */
797         guint32 next_vreg;
798
799         MonoGenericSharingContext *generic_sharing_context;
800
801         unsigned char   *cil_start;
802         unsigned char   *native_code;
803         guint            code_size;
804         guint            code_len;
805         guint            prolog_end;
806         guint            epilog_begin;
807         regmask_t        used_int_regs;
808         guint32          opt;
809         guint32          prof_options;
810         guint32          flags;
811         guint32          comp_done;
812         guint32          verbose_level;
813         guint32          stack_usage;
814         guint32          param_area;
815         guint32          frame_reg;
816         gint32           sig_cookie;
817         guint            disable_aot : 1;
818         guint            disable_ssa : 1;
819         guint            enable_extended_bblocks : 1;
820         guint            run_cctors : 1;
821         guint            need_lmf_area : 1;
822         guint            compile_aot : 1;
823         guint            got_var_allocated : 1;
824         guint            ret_var_is_local : 1;
825         guint            ret_var_set : 1;
826         guint            globalra : 1;
827         guint            unverifiable : 1;
828         guint            skip_visibility : 1;
829         guint            disable_reuse_registers : 1;
830         guint            disable_reuse_stack_slots : 1;
831         guint            disable_initlocals_opt : 1;
832         guint            disable_omit_fp : 1;
833         guint            disable_vreg_to_lvreg : 1;
834         guint            has_got_slots : 1;
835         guint            uses_rgctx_reg : 1;
836         guint            uses_vtable_reg : 1;
837         guint            uses_simd_intrinsics : 1;
838         guint            keep_cil_nops : 1;
839         gpointer         debug_info;
840         guint32          lmf_offset;
841     guint16          *intvars;
842         MonoProfileCoverageInfo *coverage_info;
843         GHashTable       *token_info_hash;
844         MonoCompileArch  arch;
845         guint32          exception_type;        /* MONO_EXCEPTION_* */
846         guint32          exception_data;
847         char*            exception_message;
848         gpointer         exception_ptr;
849
850         GSList*          unwind_ops;
851
852         /* Fields used by the local reg allocator */
853         void*            reginfo;
854         int              reginfo_len;
855
856         /* Maps vregs to their associated MonoInst's */
857         /* vregs with an associated MonoInst are 'global' while others are 'local' */
858         MonoInst **vreg_to_inst;
859
860         /* Size of above array */
861         guint32 vreg_to_inst_len;
862
863         /* 
864          * The original method to compile, differs from 'method' when doing generic
865          * sharing.
866          */
867         MonoMethod *orig_method;
868
869         /* Patches which describe absolute addresses embedded into the native code */
870         GHashTable *abs_patches;
871
872         /* If the arch passes valuetypes by address, then for methods
873            which use JMP the arch code should use these local
874            variables to store the addresses of incoming valuetypes.
875            The addresses should be stored in mono_arch_emit_prolog()
876            and can be used when emitting code for OP_JMP.  See
877            mini-ppc.c. */
878         MonoInst **tailcall_valuetype_addrs;
879
880         /* Used to implement iconv_to_r8_raw on archs that can't do raw
881         copy between an ireg and a freg. This is an int32 var.*/
882         MonoInst *iconv_raw_var;
883
884         /* Used to implement fconv_to_r8_x. This is a double (8 bytes) var.*/
885         MonoInst *fconv_to_r8_x_var;
886
887         /*Use to implement simd constructors. This is a vector (16 bytes) var.*/
888         MonoInst *simd_ctor_var;
889
890         /* Used by AOT */
891         guint32 got_offset;
892 } MonoCompile;
893
894 typedef enum {
895         MONO_CFG_HAS_ALLOCA = 1 << 0,
896         MONO_CFG_HAS_CALLS  = 1 << 1,
897         MONO_CFG_HAS_LDELEMA  = 1 << 2,
898         MONO_CFG_HAS_VARARGS  = 1 << 3,
899         MONO_CFG_HAS_TAIL     = 1 << 4,
900         MONO_CFG_HAS_FPOUT    = 1 << 5, /* there are fp values passed in int registers */
901         MONO_CFG_HAS_SPILLUP  = 1 << 6, /* spill var slots are allocated from bottom to top */
902         MONO_CFG_HAS_CHECK_THIS  = 1 << 7,
903         MONO_CFG_HAS_ARRAY_ACCESS = 1 << 8
904 } MonoCompileFlags;
905
906 typedef struct {
907         gulong methods_compiled;
908         gulong methods_aot;
909         gulong methods_lookups;
910         gulong method_trampolines;
911         gulong allocate_var;
912         gulong cil_code_size;
913         gulong native_code_size;
914         gulong code_reallocs;
915         gulong max_code_size_ratio;
916         gulong biggest_method_size;
917         gulong allocated_code_size;
918         gulong inlineable_methods;
919         gulong inlined_methods;
920         gulong basic_blocks;
921         gulong max_basic_blocks;
922         gulong locals_stack_size;
923         gulong regvars;
924         gulong cas_declsec_check;
925         gulong cas_linkdemand_icall;
926         gulong cas_linkdemand_pinvoke;
927         gulong cas_linkdemand_aptc;
928         gulong cas_linkdemand;
929         gulong cas_demand_generation;
930         gulong generic_virtual_invocations;
931         char *max_ratio_method;
932         char *biggest_method;
933         gboolean enabled;
934 } MonoJitStats;
935
936 extern MonoJitStats mono_jit_stats;
937
938 /* values for MonoInst.ssa_op */
939 enum {
940         MONO_SSA_NOP = 0,
941         MONO_SSA_ADDRESS_TAKEN = 1,
942         MONO_SSA_LOAD = 2,
943         MONO_SSA_STORE = 4,
944         MONO_SSA_LOAD_STORE = MONO_SSA_LOAD|MONO_SSA_STORE,
945         MONO_SSA_INDIRECT_LOAD = MONO_SSA_LOAD|MONO_SSA_ADDRESS_TAKEN,
946         MONO_SSA_INDIRECT_STORE = MONO_SSA_STORE|MONO_SSA_ADDRESS_TAKEN,
947         MONO_SSA_INDIRECT_LOAD_STORE =
948         MONO_SSA_LOAD|MONO_SSA_STORE|MONO_SSA_ADDRESS_TAKEN
949 };
950
951 /* opcodes: value assigned after all the CIL opcodes */
952 #ifdef MINI_OP
953 #undef MINI_OP
954 #endif
955 #define MINI_OP(a,b,dest,src1,src2) a,
956 enum {
957         OP_START = MONO_CEE_LAST - 1,
958 #include "mini-ops.h"
959         OP_LAST
960 };
961 #undef MINI_OP
962
963 #if SIZEOF_VOID_P == 8
964 #define OP_PCONST OP_I8CONST
965 #define OP_PADD OP_LADD
966 #define OP_PADD_IMM OP_LADD_IMM
967 #define OP_PSUB OP_LSUB
968 #define OP_PMUL OP_LMUL
969 #define OP_PMUL_IMM OP_LMUL_IMM
970 #define OP_PNEG OP_LNEG
971 #define OP_PCONV_TO_I1 OP_LCONV_TO_I1
972 #define OP_PCONV_TO_U1 OP_LCONV_TO_U1
973 #define OP_PCONV_TO_I2 OP_LCONV_TO_I2
974 #define OP_PCONV_TO_U2 OP_LCONV_TO_U2
975 #define OP_PCONV_TO_OVF_I1_UN OP_LCONV_TO_OVF_I1_UN
976 #define OP_PCONV_TO_OVF_I1 OP_LCONV_TO_OVF_I1
977 #define OP_PBEQ OP_LBEQ
978 #define OP_PCEQ OP_LCEQ
979 #define OP_PBNE_UN OP_LBNE_UN
980 #define OP_PBGE_UN OP_LBGE_UN
981 #define OP_PBLT_UN OP_LBLT_UN
982 #define OP_PBGE OP_LBGE
983 #define OP_STOREP_MEMBASE_REG OP_STOREI8_MEMBASE_REG
984 #define OP_STOREP_MEMBASE_IMM OP_STOREI8_MEMBASE_IMM
985 #else
986 #define OP_PCONST OP_ICONST
987 #define OP_PADD OP_IADD
988 #define OP_PADD_IMM OP_IADD_IMM
989 #define OP_PSUB OP_ISUB
990 #define OP_PMUL OP_IMUL
991 #define OP_PMUL_IMM OP_IMUL_IMM
992 #define OP_PNEG OP_INEG
993 #define OP_PCONV_TO_I1 OP_ICONV_TO_I1
994 #define OP_PCONV_TO_U1 OP_ICONV_TO_U1
995 #define OP_PCONV_TO_I2 OP_ICONV_TO_I2
996 #define OP_PCONV_TO_U2 OP_ICONV_TO_U2
997 #define OP_PCONV_TO_OVF_I1_UN OP_ICONV_TO_OVF_I1_UN
998 #define OP_PCONV_TO_OVF_I1 OP_ICONV_TO_OVF_I1
999 #define OP_PBEQ OP_IBEQ
1000 #define OP_PCEQ OP_ICEQ
1001 #define OP_PBNE_UN OP_IBNE_UN
1002 #define OP_PBGE_UN OP_IBGE_UN
1003 #define OP_PBLT_UN OP_IBLT_UN
1004 #define OP_PBGE OP_IBGE
1005 #define OP_STOREP_MEMBASE_REG OP_STOREI4_MEMBASE_REG
1006 #define OP_STOREP_MEMBASE_IMM OP_STOREI4_MEMBASE_IMM
1007 #endif
1008
1009 typedef enum {
1010         STACK_INV,
1011         STACK_I4,
1012         STACK_I8,
1013         STACK_PTR,
1014         STACK_R8,
1015         STACK_MP,
1016         STACK_OBJ,
1017         STACK_VTYPE,
1018         STACK_MAX
1019 } MonoStackType;
1020
1021 typedef struct {
1022         union {
1023                 double   r8;
1024                 gint32   i4;
1025                 gint64   i8;
1026                 gpointer p;
1027                 MonoClass *klass;
1028         } data;
1029         int type;
1030 } StackSlot;
1031
1032 #if HAVE_ARRAY_ELEM_INIT
1033 extern const guint8 mono_burg_arity [];
1034 #else
1035 extern guint8 mono_burg_arity [];
1036 #endif
1037
1038 extern const char MONO_ARCH_CPU_SPEC [] MONO_INTERNAL;
1039 #define MONO_ARCH_CPU_SPEC_IDX_COMBINE(a) a ## _idx
1040 #define MONO_ARCH_CPU_SPEC_IDX(a) MONO_ARCH_CPU_SPEC_IDX_COMBINE(a)
1041 extern const guint16 MONO_ARCH_CPU_SPEC_IDX(MONO_ARCH_CPU_SPEC) [] MONO_INTERNAL;
1042 #define ins_get_spec(op) ((const char*)&MONO_ARCH_CPU_SPEC + MONO_ARCH_CPU_SPEC_IDX(MONO_ARCH_CPU_SPEC)[(op) - OP_LOAD])
1043
1044 enum {
1045         MONO_COMP_DOM = 1,
1046         MONO_COMP_IDOM = 2,
1047         MONO_COMP_DFRONTIER = 4,
1048         MONO_COMP_DOM_REV = 8,
1049         MONO_COMP_LIVENESS = 16,
1050         MONO_COMP_SSA = 32,
1051         MONO_COMP_SSA_DEF_USE = 64,
1052         MONO_COMP_REACHABILITY = 128,
1053         MONO_COMP_LOOPS = 256
1054 };
1055
1056 typedef enum {
1057         MONO_GRAPH_CFG = 1,
1058         MONO_GRAPH_DTREE = 2,
1059         MONO_GRAPH_CFG_CODE = 4,
1060         MONO_GRAPH_CFG_SSA = 8,
1061         MONO_GRAPH_CFG_OPTCODE = 16
1062 } MonoGraphOptions;
1063
1064 typedef struct {
1065         guint16 size;
1066         guint16 offset;
1067         guint8  pad;
1068 } MonoJitArgumentInfo;
1069
1070 typedef struct {
1071         gboolean handle_sigint;
1072         gboolean keep_delegates;
1073         gboolean collect_pagefault_stats;
1074         gboolean break_on_unverified;
1075         gboolean better_cast_details;
1076         gboolean mdb_optimizations;
1077         gboolean no_gdb_backtrace;
1078 } MonoDebugOptions;
1079
1080 enum {
1081         BRANCH_NOT_TAKEN,
1082         BRANCH_TAKEN,
1083         BRANCH_UNDEF
1084 };
1085
1086 typedef enum {
1087         CMP_EQ,
1088         CMP_NE,
1089         CMP_LE,
1090         CMP_GE,
1091         CMP_LT,
1092         CMP_GT,
1093         CMP_LE_UN,
1094         CMP_GE_UN,
1095         CMP_LT_UN,
1096         CMP_GT_UN
1097 } CompRelation;
1098
1099 typedef enum {
1100         CMP_TYPE_L,
1101         CMP_TYPE_I,
1102         CMP_TYPE_F
1103 } CompType;
1104
1105 /* Implicit exceptions */
1106 enum {
1107         MONO_EXC_INDEX_OUT_OF_RANGE,
1108         MONO_EXC_OVERFLOW,
1109         MONO_EXC_ARITHMETIC,
1110         MONO_EXC_DIVIDE_BY_ZERO,
1111         MONO_EXC_INVALID_CAST,
1112         MONO_EXC_NULL_REF,
1113         MONO_EXC_ARRAY_TYPE_MISMATCH,
1114         MONO_EXC_INTRINS_NUM
1115 };
1116
1117 enum {
1118         MINI_TOKEN_SOURCE_CLASS,
1119         MINI_TOKEN_SOURCE_METHOD,
1120         MINI_TOKEN_SOURCE_FIELD
1121 };
1122
1123 typedef void (*MonoInstFunc) (MonoInst *tree, gpointer data);
1124
1125 /* main function */
1126 int         mono_main                      (int argc, char* argv[]);
1127 void        mono_set_defaults              (int verbose_level, guint32 opts);
1128 MonoDomain* mini_init                      (const char *filename, const char *runtime_version) MONO_INTERNAL;
1129 void        mini_cleanup                   (MonoDomain *domain) MONO_INTERNAL;
1130 MonoDebugOptions *mini_get_debug_options   (void) MONO_INTERNAL;
1131 char*       mono_get_runtime_build_info    (void) MONO_INTERNAL;
1132
1133 /* helper methods */
1134 MonoJumpInfoToken* mono_jump_info_token_new (MonoMemPool *mp, MonoImage *image, guint32 token) MONO_INTERNAL;
1135 MonoJumpInfoToken* mono_jump_info_token_new2 (MonoMemPool *mp, MonoImage *image, guint32 token, MonoGenericContext *context) MONO_INTERNAL;
1136 MonoInst* mono_find_spvar_for_region        (MonoCompile *cfg, int region) MONO_INTERNAL;
1137 void      mono_precompile_assemblies        (void) MONO_INTERNAL;
1138 int       mono_parse_default_optimizations  (const char* p);
1139 void      mono_bblock_add_inst              (MonoBasicBlock *bb, MonoInst *inst) MONO_INTERNAL;
1140 void      mono_bblock_insert_after_ins      (MonoBasicBlock *bb, MonoInst *ins, MonoInst *ins_to_insert) MONO_INTERNAL;
1141 void      mono_bblock_insert_before_ins     (MonoBasicBlock *bb, MonoInst *ins, MonoInst *ins_to_insert) MONO_INTERNAL;
1142 void      mono_verify_bblock                (MonoBasicBlock *bb) MONO_INTERNAL;
1143 void      mono_verify_cfg                   (MonoCompile *cfg) MONO_INTERNAL;
1144 void      mono_constant_fold                (MonoCompile *cfg) MONO_INTERNAL;
1145 MonoInst* mono_constant_fold_ins            (MonoCompile *cfg, MonoInst *ins, MonoInst *arg1, MonoInst *arg2, gboolean overwrite) MONO_INTERNAL;
1146 int       mono_eval_cond_branch             (MonoInst *branch) MONO_INTERNAL;
1147 int       mono_is_power_of_two              (guint32 val) MONO_INTERNAL;
1148 void      mono_cprop_local                  (MonoCompile *cfg, MonoBasicBlock *bb, MonoInst **acp, int acp_size) MONO_INTERNAL;
1149 MonoInst* mono_compile_create_var           (MonoCompile *cfg, MonoType *type, int opcode) MONO_INTERNAL;
1150 MonoInst* mono_compile_create_var_for_vreg  (MonoCompile *cfg, MonoType *type, int opcode, int vreg) MONO_INTERNAL;
1151 void      mono_compile_make_var_load        (MonoCompile *cfg, MonoInst *dest, gssize var_index) MONO_INTERNAL;
1152 MonoInst* mono_compile_create_var_load      (MonoCompile *cfg, gssize var_index) MONO_INTERNAL;
1153 MonoInst* mono_compile_create_var_store     (MonoCompile *cfg, gssize var_index, MonoInst *value) MONO_INTERNAL;
1154 MonoType* mono_type_from_stack_type         (MonoInst *ins) MONO_INTERNAL;
1155 guint32   mono_alloc_ireg                   (MonoCompile *cfg) MONO_INTERNAL;
1156 guint32   mono_alloc_freg                   (MonoCompile *cfg) MONO_INTERNAL;
1157 guint32   mono_alloc_preg                   (MonoCompile *cfg) MONO_INTERNAL;
1158 guint32   mono_alloc_dreg                   (MonoCompile *cfg, MonoStackType stack_type) MONO_INTERNAL;
1159
1160 void      mono_link_bblock                  (MonoCompile *cfg, MonoBasicBlock *from, MonoBasicBlock* to) MONO_INTERNAL;
1161 void      mono_unlink_bblock                (MonoCompile *cfg, MonoBasicBlock *from, MonoBasicBlock* to) MONO_INTERNAL;
1162 gboolean  mono_bblocks_linked               (MonoBasicBlock *bb1, MonoBasicBlock *bb2) MONO_INTERNAL;
1163 void      mono_remove_bblock                (MonoCompile *cfg, MonoBasicBlock *bb) MONO_INTERNAL;
1164 void      mono_nullify_basic_block          (MonoBasicBlock *bb) MONO_INTERNAL;
1165 void      mono_merge_basic_blocks           (MonoCompile *cfg, MonoBasicBlock *bb, MonoBasicBlock *bbn) MONO_INTERNAL;
1166 void      mono_optimize_branches            (MonoCompile *cfg) MONO_INTERNAL;
1167
1168 void      mono_blockset_print               (MonoCompile *cfg, MonoBitSet *set, const char *name, guint idom) MONO_INTERNAL;
1169 void      mono_print_ins_index              (int i, MonoInst *ins) MONO_INTERNAL;
1170 void      mono_print_ins                    (MonoInst *ins) MONO_INTERNAL;
1171 void      mono_print_bb                     (MonoBasicBlock *bb, const char *msg) MONO_INTERNAL;
1172 void      mono_print_code                   (MonoCompile *cfg, const char *msg) MONO_INTERNAL;
1173 void      mono_print_method_from_ip         (void *ip);
1174 char     *mono_pmip                         (void *ip);
1175 const char* mono_inst_name                  (int op);
1176 int       mono_op_to_op_imm                 (int opcode) MONO_INTERNAL;
1177 int       mono_op_imm_to_op                 (int opcode) MONO_INTERNAL;
1178 int       mono_load_membase_to_load_mem     (int opcode) MONO_INTERNAL;
1179 guint     mono_type_to_load_membase         (MonoCompile *cfg, MonoType *type) MONO_INTERNAL;
1180 guint     mono_type_to_store_membase        (MonoCompile *cfg, MonoType *type) MONO_INTERNAL;
1181 guint     mini_type_to_stind                (MonoCompile* cfg, MonoType *type) MONO_INTERNAL;
1182 guint32   mono_reverse_branch_op            (guint32 opcode) MONO_INTERNAL;
1183 void      mono_disassemble_code             (MonoCompile *cfg, guint8 *code, int size, char *id) MONO_INTERNAL;
1184 void      mono_add_patch_info               (MonoCompile *cfg, int ip, MonoJumpInfoType type, gconstpointer target) MONO_INTERNAL;
1185 void      mono_remove_patch_info            (MonoCompile *cfg, int ip) MONO_INTERNAL;
1186 MonoJumpInfo* mono_patch_info_dup_mp        (MonoMemPool *mp, MonoJumpInfo *patch_info) MONO_INTERNAL;
1187 guint     mono_patch_info_hash (gconstpointer data) MONO_INTERNAL;
1188 gint      mono_patch_info_equal (gconstpointer ka, gconstpointer kb) MONO_INTERNAL;
1189 MonoJumpInfo *mono_patch_info_list_prepend  (MonoJumpInfo *list, int ip, MonoJumpInfoType type, gconstpointer target) MONO_INTERNAL;
1190 gpointer  mono_resolve_patch_target         (MonoMethod *method, MonoDomain *domain, guint8 *code, MonoJumpInfo *patch_info, gboolean run_cctors) MONO_INTERNAL;
1191 gpointer  mono_jit_find_compiled_method     (MonoDomain *domain, MonoMethod *method) MONO_INTERNAL;
1192 MonoLMF * mono_get_lmf                      (void) MONO_INTERNAL;
1193 MonoLMF** mono_get_lmf_addr                 (void) MONO_INTERNAL;
1194 void      mono_jit_thread_attach            (MonoDomain *domain);
1195 guint32   mono_get_jit_tls_key              (void) MONO_INTERNAL;
1196 gint32    mono_get_jit_tls_offset           (void) MONO_INTERNAL;
1197 gint32    mono_get_lmf_tls_offset           (void) MONO_INTERNAL;
1198 gint32    mono_get_lmf_addr_tls_offset      (void) MONO_INTERNAL;
1199 MonoInst* mono_get_jit_tls_intrinsic        (MonoCompile *cfg) MONO_INTERNAL;
1200 GList    *mono_varlist_insert_sorted        (MonoCompile *cfg, GList *list, MonoMethodVar *mv, gboolean sort_end) MONO_INTERNAL;
1201 GList    *mono_varlist_sort                 (MonoCompile *cfg, GList *list, int sort_type) MONO_INTERNAL;
1202 void      mono_analyze_liveness             (MonoCompile *cfg) MONO_INTERNAL;
1203 void      mono_linear_scan                  (MonoCompile *cfg, GList *vars, GList *regs, regmask_t *used_mask) MONO_INTERNAL;
1204 void      mono_global_regalloc              (MonoCompile *cfg) MONO_INTERNAL;
1205 void      mono_create_jump_table            (MonoCompile *cfg, MonoInst *label, MonoBasicBlock **bbs, int num_blocks) MONO_INTERNAL;
1206 int       mono_compile_assembly             (MonoAssembly *ass, guint32 opts, const char *aot_options) MONO_INTERNAL;
1207 MonoCompile *mini_method_compile            (MonoMethod *method, guint32 opts, MonoDomain *domain, gboolean run_cctors, gboolean compile_aot, int parts) MONO_INTERNAL;
1208 void      mono_destroy_compile              (MonoCompile *cfg) MONO_INTERNAL;
1209 MonoJitICallInfo *mono_find_jit_opcode_emulation (int opcode) MONO_INTERNAL;
1210 void      mono_print_ins_index (int i, MonoInst *ins) MONO_INTERNAL;
1211 void      mono_print_ins (MonoInst *ins) MONO_INTERNAL;
1212 gboolean  mini_assembly_can_skip_verification (MonoDomain *domain, MonoMethod *method) MONO_INTERNAL;
1213 gboolean  mini_method_verify (MonoCompile *cfg, MonoMethod *method) MONO_INTERNAL;
1214
1215 gboolean  mini_class_is_system_array (MonoClass *klass) MONO_INTERNAL;
1216 MonoMethodSignature *mono_get_element_address_signature (int arity) MONO_INTERNAL;
1217 MonoJitICallInfo    *mono_get_element_address_icall (int rank) MONO_INTERNAL;
1218 MonoJitICallInfo    *mono_get_array_new_va_icall (int rank) MONO_INTERNAL;
1219
1220 void      mono_linterval_add_range          (MonoCompile *cfg, MonoLiveInterval *interval, int from, int to) MONO_INTERNAL;
1221 void      mono_linterval_print              (MonoLiveInterval *interval) MONO_INTERNAL;
1222 void      mono_linterval_print_nl (MonoLiveInterval *interval) MONO_INTERNAL;
1223 gboolean  mono_linterval_covers             (MonoLiveInterval *interval, int pos) MONO_INTERNAL;
1224 gint32    mono_linterval_get_intersect_pos  (MonoLiveInterval *i1, MonoLiveInterval *i2) MONO_INTERNAL;
1225 void      mono_linterval_split              (MonoCompile *cfg, MonoLiveInterval *interval, MonoLiveInterval **i1, MonoLiveInterval **i2, int pos) MONO_INTERNAL;
1226 void      mono_liveness_handle_exception_clauses (MonoCompile *cfg) MONO_INTERNAL;
1227
1228 /* AOT */
1229 void      mono_aot_init                     (void) MONO_INTERNAL;
1230 gpointer  mono_aot_get_method               (MonoDomain *domain,
1231                                                                                          MonoMethod *method) MONO_INTERNAL;
1232 gpointer  mono_aot_get_method_from_token    (MonoDomain *domain, MonoImage *image, guint32 token) MONO_INTERNAL;
1233 gboolean  mono_aot_is_got_entry             (guint8 *code, guint8 *addr) MONO_INTERNAL;
1234 guint8*   mono_aot_get_plt_entry            (guint8 *code) MONO_INTERNAL;
1235 guint32   mono_aot_get_plt_info_offset      (gssize *regs, guint8 *code) MONO_INTERNAL;
1236 gboolean  mono_aot_get_cached_class_info    (MonoClass *klass, MonoCachedClassInfo *res) MONO_INTERNAL;
1237 gboolean  mono_aot_get_class_from_name      (MonoImage *image, const char *name_space, const char *name, MonoClass **klass) MONO_INTERNAL;
1238 MonoJitInfo* mono_aot_find_jit_info         (MonoDomain *domain, MonoImage *image, gpointer addr) MONO_INTERNAL;
1239 gpointer mono_aot_plt_resolve               (gpointer aot_module, guint32 plt_info_offset, guint8 *code) MONO_INTERNAL;
1240 gpointer mono_aot_get_method_from_vt_slot   (MonoDomain *domain, MonoVTable *vtable, int slot) MONO_INTERNAL;
1241 gpointer mono_aot_create_specific_trampoline   (MonoImage *image, gpointer arg1, MonoTrampolineType tramp_type, MonoDomain *domain, guint32 *code_len) MONO_INTERNAL;
1242 gpointer mono_aot_get_named_code            (const char *name) MONO_INTERNAL;
1243 gpointer mono_aot_get_unbox_trampoline      (MonoMethod *method) MONO_INTERNAL;
1244 gpointer mono_aot_get_lazy_fetch_trampoline (guint32 slot) MONO_INTERNAL;
1245 /* This is an exported function */
1246 void     mono_aot_register_globals          (gpointer *globals);
1247 /* This too */
1248 void     mono_aot_register_module           (gpointer *aot_info);
1249
1250 void     mono_save_xdebug_info              (MonoMethod *method, guint8 *code, guint32 code_size, MonoInst **args, GSList *unwind_info) MONO_INTERNAL;
1251 /* This is an exported function */
1252 void     mono_xdebug_emit                   (void) MONO_INTERNAL;
1253
1254 gboolean  mono_method_blittable             (MonoMethod *method) MONO_INTERNAL;
1255 gboolean  mono_method_same_domain           (MonoJitInfo *caller, MonoJitInfo *callee) MONO_INTERNAL;
1256
1257 void      mono_register_opcode_emulation    (int opcode, const char* name, const char *sigstr, gpointer func, gboolean no_throw) MONO_INTERNAL;
1258 void      mono_draw_graph                   (MonoCompile *cfg, MonoGraphOptions draw_options) MONO_INTERNAL;
1259 void      mono_add_ins_to_end               (MonoBasicBlock *bb, MonoInst *inst) MONO_INTERNAL;
1260 gpointer  mono_create_ftnptr                (MonoDomain *domain, gpointer addr) MONO_INTERNAL;
1261
1262 void      mono_replace_ins                  (MonoCompile *cfg, MonoBasicBlock *bb, MonoInst *ins, MonoInst **prev, MonoBasicBlock *first_bb, MonoBasicBlock *last_bb);
1263
1264 int               mono_find_method_opcode      (MonoMethod *method) MONO_INTERNAL;
1265 MonoJitICallInfo *mono_find_jit_icall_by_name  (const char *name) MONO_INTERNAL;
1266 MonoJitICallInfo *mono_find_jit_icall_by_addr  (gconstpointer addr) MONO_INTERNAL;
1267 MonoJitICallInfo *mono_register_jit_icall      (gconstpointer func, const char *name, MonoMethodSignature *sig, gboolean is_save) MONO_INTERNAL;
1268 gconstpointer     mono_icall_get_wrapper       (MonoJitICallInfo* callinfo) MONO_INTERNAL;
1269
1270 void              mono_trampolines_init (void) MONO_INTERNAL;
1271 void              mono_trampolines_cleanup (void) MONO_INTERNAL;
1272 guint8 *          mono_get_trampoline_code (MonoTrampolineType tramp_type) MONO_INTERNAL;
1273 gpointer          mono_create_specific_trampoline (gpointer arg1, MonoTrampolineType tramp_type, MonoDomain *domain, guint32 *code_len) MONO_INTERNAL;
1274 gpointer          mono_create_jump_trampoline (MonoDomain *domain, 
1275                                                                                            MonoMethod *method, 
1276                                                                                            gboolean add_sync_wrapper) MONO_INTERNAL;
1277 gpointer          mono_create_class_init_trampoline (MonoVTable *vtable) MONO_INTERNAL;
1278 gpointer          mono_create_generic_class_init_trampoline (void) MONO_INTERNAL;
1279 gpointer          mono_create_jit_trampoline (MonoMethod *method) MONO_INTERNAL;
1280 gpointer          mono_create_jit_trampoline_from_token (MonoImage *image, guint32 token) MONO_INTERNAL;
1281 gpointer          mono_create_jit_trampoline_in_domain (MonoDomain *domain, MonoMethod *method) MONO_INTERNAL;
1282 gpointer          mono_create_delegate_trampoline (MonoClass *klass) MONO_INTERNAL;
1283 gpointer          mono_create_rgctx_lazy_fetch_trampoline (guint32 offset) MONO_INTERNAL;
1284 gpointer          mono_create_monitor_enter_trampoline (void) MONO_INTERNAL;
1285 gpointer          mono_create_monitor_exit_trampoline (void) MONO_INTERNAL;
1286 MonoVTable*       mono_find_class_init_trampoline_by_addr (gconstpointer addr) MONO_INTERNAL;
1287 MonoClass*        mono_find_delegate_trampoline_by_addr (gconstpointer addr) MONO_INTERNAL;
1288 guint32           mono_find_rgctx_lazy_fetch_trampoline_by_addr (gconstpointer addr) MONO_INTERNAL;
1289 gpointer          mono_magic_trampoline (gssize *regs, guint8 *code, MonoMethod *m, guint8* tramp) MONO_INTERNAL;
1290 gpointer          mono_generic_virtual_remoting_trampoline (gssize *regs, guint8 *code, MonoMethod *m, guint8 *tramp) MONO_INTERNAL;
1291 gpointer          mono_delegate_trampoline (gssize *regs, guint8 *code, gpointer *tramp_data, guint8* tramp) MONO_INTERNAL;
1292 gpointer          mono_aot_trampoline (gssize *regs, guint8 *code, guint8 *token_info, 
1293                                                                            guint8* tramp) MONO_INTERNAL;
1294 gpointer          mono_aot_plt_trampoline (gssize *regs, guint8 *code, guint8 *token_info, 
1295                                                                                    guint8* tramp) MONO_INTERNAL;
1296 void              mono_class_init_trampoline (gssize *regs, guint8 *code, MonoVTable *vtable, guint8 *tramp) MONO_INTERNAL;
1297 void              mono_generic_class_init_trampoline (gssize *regs, guint8 *code, MonoVTable *vtable, guint8 *tramp) MONO_INTERNAL;
1298 void              mono_monitor_enter_trampoline (gssize *regs, guint8 *code, MonoObject *obj, guint8 *tramp) MONO_INTERNAL;
1299 void              mono_monitor_exit_trampoline (gssize *regs, guint8 *code, MonoObject *obj, guint8 *tramp) MONO_INTERNAL;
1300 gconstpointer     mono_get_trampoline_func (MonoTrampolineType tramp_type);
1301 gpointer          mini_get_vtable_trampoline (void) MONO_INTERNAL;
1302
1303 gboolean          mono_running_on_valgrind (void) MONO_INTERNAL;
1304 void*             mono_global_codeman_reserve (int size) MONO_INTERNAL;
1305 const char       *mono_regname_full (int reg, int bank) MONO_INTERNAL;
1306 gint32*           mono_allocate_stack_slots_full (MonoCompile *cfg, gboolean backward, guint32 *stack_size, guint32 *stack_align) MONO_INTERNAL;
1307 gint32*           mono_allocate_stack_slots (MonoCompile *cfg, guint32 *stack_size, guint32 *stack_align) MONO_INTERNAL;
1308 void              mono_local_regalloc (MonoCompile *cfg, MonoBasicBlock *bb) MONO_INTERNAL;
1309 MonoInst         *mono_branch_optimize_exception_target (MonoCompile *cfg, MonoBasicBlock *bb, const char * exname) MONO_INTERNAL;
1310 void              mono_remove_critical_edges (MonoCompile *cfg) MONO_INTERNAL;
1311 gboolean          mono_is_regsize_var (MonoType *t) MONO_INTERNAL;
1312 void              mini_emit_memcpy (MonoCompile *cfg, int destreg, int doffset, int srcreg, int soffset, int size, int align) MONO_INTERNAL;
1313 CompRelation      mono_opcode_to_cond (int opcode) MONO_INTERNAL;
1314 CompType          mono_opcode_to_type (int opcode, int cmp_opcode) MONO_INTERNAL;
1315 CompRelation      mono_negate_cond (CompRelation cond) MONO_INTERNAL;
1316 int               mono_op_imm_to_op (int opcode) MONO_INTERNAL;
1317 void              mono_decompose_op_imm (MonoCompile *cfg, MonoBasicBlock *bb, MonoInst *ins) MONO_INTERNAL;
1318 void              mono_peephole_ins (MonoBasicBlock *bb, MonoInst *ins) MONO_INTERNAL;
1319 void              mono_emit_unwind_op (MonoCompile *cfg, int when, 
1320                                                                            int tag, int reg, 
1321                                                                            int val) MONO_INTERNAL;
1322
1323 int               mono_method_to_ir (MonoCompile *cfg, MonoMethod *method, MonoBasicBlock *start_bblock, MonoBasicBlock *end_bblock, 
1324                                                                          MonoInst *return_var, GList *dont_inline, MonoInst **inline_args, 
1325                                                                          guint inline_offset, gboolean is_virtual_call) MONO_INTERNAL;
1326
1327 void              mono_decompose_opcode (MonoCompile *cfg, MonoInst *ins) MONO_INTERNAL;
1328 void              mono_decompose_long_opts (MonoCompile *cfg) MONO_INTERNAL;
1329 void              mono_decompose_vtype_opts (MonoCompile *cfg) MONO_INTERNAL;
1330 void              mono_decompose_array_access_opts (MonoCompile *cfg) MONO_INTERNAL;
1331 void              mono_decompose_soft_float (MonoCompile *cfg) MONO_INTERNAL;
1332 void              mono_handle_global_vregs (MonoCompile *cfg) MONO_INTERNAL;
1333 void              mono_spill_global_vars (MonoCompile *cfg, gboolean *need_local_opts) MONO_INTERNAL;
1334 void              mono_if_conversion (MonoCompile *cfg) MONO_INTERNAL;
1335
1336 /* methods that must be provided by the arch-specific port */
1337 void      mono_arch_init                        (void) MONO_INTERNAL;
1338 void      mono_arch_cleanup                     (void) MONO_INTERNAL;
1339 void      mono_arch_cpu_init                    (void) MONO_INTERNAL;
1340 guint32   mono_arch_cpu_optimizazions           (guint32 *exclude_mask) MONO_INTERNAL;
1341 void      mono_arch_instrument_mem_needs        (MonoMethod *method, int *stack, int *code) MONO_INTERNAL;
1342 void     *mono_arch_instrument_prolog           (MonoCompile *cfg, void *func, void *p, gboolean enable_arguments) MONO_INTERNAL;
1343 void     *mono_arch_instrument_epilog           (MonoCompile *cfg, void *func, void *p, gboolean enable_arguments) MONO_INTERNAL;
1344 void      mono_codegen                          (MonoCompile *cfg) MONO_INTERNAL;
1345 void      mono_call_inst_add_outarg_reg         (MonoCompile *cfg, MonoCallInst *call, int vreg, int hreg, gboolean fp) MONO_INTERNAL;
1346 const char *mono_arch_regname                   (int reg) MONO_INTERNAL;
1347 const char *mono_arch_fregname                  (int reg) MONO_INTERNAL;
1348 gpointer  mono_arch_get_throw_exception         (void) MONO_INTERNAL;
1349 gpointer  mono_arch_get_rethrow_exception       (void) MONO_INTERNAL;
1350 gpointer  mono_arch_get_throw_exception_by_name (void) MONO_INTERNAL;
1351 gpointer  mono_arch_get_throw_corlib_exception  (void) MONO_INTERNAL;
1352 guchar*   mono_arch_create_trampoline_code      (MonoTrampolineType tramp_type) MONO_INTERNAL;
1353 guchar*   mono_arch_create_trampoline_code_full (MonoTrampolineType tramp_type, guint32 *code_size, MonoJumpInfo **ji, gboolean aot) MONO_INTERNAL;
1354 gpointer  mono_arch_create_rgctx_lazy_fetch_trampoline (guint32 slot) MONO_INTERNAL;
1355 gpointer  mono_arch_create_rgctx_lazy_fetch_trampoline_full (guint32 slot, guint32 *code_size, MonoJumpInfo **ji, gboolean aot) MONO_INTERNAL;
1356 gpointer  mono_arch_create_generic_class_init_trampoline (void) MONO_INTERNAL;
1357 gpointer  mono_arch_get_nullified_class_init_trampoline (guint32 *code_len) MONO_INTERNAL;
1358 gpointer  mono_arch_create_monitor_enter_trampoline (void) MONO_INTERNAL;
1359 gpointer  mono_arch_create_monitor_exit_trampoline (void) MONO_INTERNAL;
1360 gpointer  mono_arch_create_monitor_enter_trampoline_full (guint32 *code_size, MonoJumpInfo **ji, gboolean aot) MONO_INTERNAL;
1361 gpointer  mono_arch_create_monitor_exit_trampoline_full (guint32 *code_size, MonoJumpInfo **ji, gboolean aot) MONO_INTERNAL;
1362 GList    *mono_arch_get_allocatable_int_vars    (MonoCompile *cfg) MONO_INTERNAL;
1363 GList    *mono_arch_get_global_int_regs         (MonoCompile *cfg) MONO_INTERNAL;
1364 GList    *mono_arch_get_global_fp_regs          (MonoCompile *cfg) MONO_INTERNAL;
1365 GList    *mono_arch_get_iregs_clobbered_by_call (MonoCallInst *call) MONO_INTERNAL;
1366 GList    *mono_arch_get_fregs_clobbered_by_call (MonoCallInst *call) MONO_INTERNAL;
1367 guint32   mono_arch_regalloc_cost               (MonoCompile *cfg, MonoMethodVar *vmv) MONO_INTERNAL;
1368 void      mono_arch_patch_code                  (MonoMethod *method, MonoDomain *domain, guint8 *code, MonoJumpInfo *ji, gboolean run_cctors) MONO_INTERNAL;
1369 void      mono_arch_flush_icache                (guint8 *code, gint size) MONO_INTERNAL;
1370 int       mono_arch_max_epilog_size             (MonoCompile *cfg) MONO_INTERNAL;
1371 guint8   *mono_arch_emit_prolog                 (MonoCompile *cfg) MONO_INTERNAL;
1372 void      mono_arch_emit_epilog                 (MonoCompile *cfg) MONO_INTERNAL;
1373 void      mono_arch_emit_exceptions             (MonoCompile *cfg) MONO_INTERNAL;
1374 void      mono_arch_lowering_pass               (MonoCompile *cfg, MonoBasicBlock *bb) MONO_INTERNAL;
1375 void      mono_arch_peephole_pass_1             (MonoCompile *cfg, MonoBasicBlock *bb) MONO_INTERNAL;
1376 void      mono_arch_peephole_pass_2             (MonoCompile *cfg, MonoBasicBlock *bb) MONO_INTERNAL;
1377 void      mono_arch_output_basic_block          (MonoCompile *cfg, MonoBasicBlock *bb) MONO_INTERNAL;
1378 gboolean  mono_arch_has_unwind_info             (gconstpointer addr) MONO_INTERNAL;
1379 void      mono_arch_setup_jit_tls_data          (MonoJitTlsData *tls) MONO_INTERNAL;
1380 void      mono_arch_free_jit_tls_data           (MonoJitTlsData *tls) MONO_INTERNAL;
1381 void      mono_arch_fill_argument_info          (MonoCompile *cfg) MONO_INTERNAL;
1382 void      mono_arch_allocate_vars               (MonoCompile *m) MONO_INTERNAL;
1383 int       mono_arch_get_argument_info           (MonoMethodSignature *csig, int param_count, MonoJitArgumentInfo *arg_info) MONO_INTERNAL;
1384 gboolean  mono_arch_print_tree                  (MonoInst *tree, int arity) MONO_INTERNAL;
1385 void      mono_arch_emit_call                   (MonoCompile *cfg, MonoCallInst *call) MONO_INTERNAL;
1386 void      mono_arch_emit_outarg_vt              (MonoCompile *cfg, MonoInst *ins, MonoInst *src) MONO_INTERNAL;
1387 void      mono_arch_emit_setret                 (MonoCompile *cfg, MonoMethod *method, MonoInst *val) MONO_INTERNAL;
1388 MonoInst *mono_arch_emit_inst_for_method        (MonoCompile *cfg, MonoMethod *cmethod, MonoMethodSignature *fsig, MonoInst **args) MONO_INTERNAL;
1389 void      mono_arch_decompose_opts              (MonoCompile *cfg, MonoInst *ins) MONO_INTERNAL;
1390 void      mono_arch_decompose_long_opts         (MonoCompile *cfg, MonoInst *ins) MONO_INTERNAL;
1391
1392 MonoJitInfo *mono_arch_find_jit_info            (MonoDomain *domain, 
1393                                                  MonoJitTlsData *jit_tls, 
1394                                                  MonoJitInfo *res, 
1395                                                  MonoJitInfo *prev_ji, 
1396                                                  MonoContext *ctx, 
1397                                                  MonoContext *new_ctx, 
1398                                                  MonoLMF **lmf, 
1399                                                  gboolean *managed) MONO_INTERNAL;
1400 gpointer mono_arch_get_call_filter              (void) MONO_INTERNAL;
1401 gpointer mono_arch_get_restore_context          (void) MONO_INTERNAL;
1402 gpointer mono_arch_get_call_filter_full         (guint32 *code_size, MonoJumpInfo **ji, gboolean aot) MONO_INTERNAL;
1403 gpointer mono_arch_get_restore_context_full     (guint32 *code_size, MonoJumpInfo **ji, gboolean aot) MONO_INTERNAL;
1404 gpointer  mono_arch_get_throw_exception_full    (guint32 *code_size, MonoJumpInfo **ji, gboolean aot) MONO_INTERNAL;
1405 gpointer  mono_arch_get_rethrow_exception_full  (guint32 *code_size, MonoJumpInfo **ji, gboolean aot) MONO_INTERNAL;
1406 gpointer  mono_arch_get_throw_exception_by_name_full (guint32 *code_size, MonoJumpInfo **ji, gboolean aot) MONO_INTERNAL;
1407 gpointer  mono_arch_get_throw_corlib_exception_full (guint32 *code_size, MonoJumpInfo **ji, gboolean aot) MONO_INTERNAL;
1408 gboolean mono_arch_handle_exception             (void *sigctx, gpointer obj, gboolean test_only) MONO_INTERNAL;
1409 void     mono_arch_handle_altstack_exception    (void *sigctx, gpointer fault_addr, gboolean stack_ovf) MONO_INTERNAL;
1410 gboolean mono_handle_soft_stack_ovf             (MonoJitTlsData *jit_tls, MonoJitInfo *ji, void *ctx, guint8* fault_addr) MONO_INTERNAL;
1411 gpointer mono_arch_ip_from_context              (void *sigctx) MONO_INTERNAL;
1412 void     mono_arch_sigctx_to_monoctx            (void *sigctx, MonoContext *ctx) MONO_INTERNAL;
1413 void     mono_arch_monoctx_to_sigctx            (MonoContext *mctx, void *ctx) MONO_INTERNAL;
1414 gpointer mono_arch_context_get_int_reg          (MonoContext *ctx, int reg) MONO_INTERNAL;
1415 void     mono_arch_flush_register_windows       (void) MONO_INTERNAL;
1416 gboolean mono_arch_is_inst_imm                  (gint64 imm) MONO_INTERNAL;
1417 MonoInst* mono_arch_get_domain_intrinsic        (MonoCompile* cfg) MONO_INTERNAL;
1418 MonoInst* mono_arch_get_thread_intrinsic        (MonoCompile* cfg) MONO_INTERNAL;
1419 gboolean mono_arch_is_int_overflow              (void *sigctx, void *info) MONO_INTERNAL;
1420 void     mono_arch_invalidate_method            (MonoJitInfo *ji, void *func, gpointer func_arg) MONO_INTERNAL;
1421 guint32  mono_arch_get_patch_offset             (guint8 *code) MONO_INTERNAL;
1422 gpointer*mono_arch_get_vcall_slot_addr          (guint8* code, gpointer *regs) MONO_INTERNAL;
1423 gpointer mono_arch_get_vcall_slot               (guint8 *code, gpointer *regs, int *displacement) MONO_INTERNAL;
1424 gpointer*mono_arch_get_delegate_method_ptr_addr (guint8* code, gpointer *regs) MONO_INTERNAL;
1425 void     mono_arch_create_vars                  (MonoCompile *cfg) MONO_INTERNAL;
1426 void     mono_arch_save_unwind_info             (MonoCompile *cfg) MONO_INTERNAL;
1427 void     mono_arch_register_lowlevel_calls      (void) MONO_INTERNAL;
1428 gpointer mono_arch_get_unbox_trampoline         (MonoGenericSharingContext *gsctx, MonoMethod *m, gpointer addr) MONO_INTERNAL;
1429 void     mono_arch_patch_callsite               (guint8 *method_start, guint8 *code, guint8 *addr) MONO_INTERNAL;
1430 void     mono_arch_patch_plt_entry              (guint8 *code, guint8 *addr) MONO_INTERNAL;
1431 void     mono_arch_nullify_class_init_trampoline(guint8 *code, gssize *regs) MONO_INTERNAL;
1432 void     mono_arch_nullify_plt_entry            (guint8 *code) MONO_INTERNAL;
1433 int      mono_arch_get_this_arg_reg             (MonoMethodSignature *sig, MonoGenericSharingContext *gsctx, guint8 *code) MONO_INTERNAL;
1434 gpointer mono_arch_get_this_arg_from_call       (MonoGenericSharingContext *gsctx, MonoMethodSignature *sig, gssize *regs, guint8 *code) MONO_INTERNAL;
1435 MonoObject* mono_arch_find_this_argument        (gpointer *regs, MonoMethod *method, MonoGenericSharingContext *gsctx) MONO_INTERNAL;
1436 gpointer mono_arch_get_delegate_invoke_impl     (MonoMethodSignature *sig, gboolean has_target) MONO_INTERNAL;
1437 gpointer mono_arch_create_specific_trampoline   (gpointer arg1, MonoTrampolineType tramp_type, MonoDomain *domain, guint32 *code_len) MONO_INTERNAL;
1438 void        mono_arch_emit_imt_argument         (MonoCompile *cfg, MonoCallInst *call, MonoInst *imt_arg) MONO_INTERNAL;
1439 MonoMethod* mono_arch_find_imt_method           (gpointer *regs, guint8 *code) MONO_INTERNAL;
1440 MonoVTable* mono_arch_find_static_call_vtable   (gpointer *regs, guint8 *code) MONO_INTERNAL;
1441 gpointer    mono_arch_build_imt_thunk           (MonoVTable *vtable, MonoDomain *domain, MonoIMTCheckItem **imt_entries, int count, gpointer fail_tramp) MONO_INTERNAL;
1442 void    mono_arch_notify_pending_exc            (void) MONO_INTERNAL;
1443 void    mono_arch_fixup_jinfo                   (MonoCompile *cfg) MONO_INTERNAL;
1444
1445 /* Exception handling */
1446 void     mono_exceptions_init                   (void) MONO_INTERNAL;
1447 gboolean mono_handle_exception                  (MonoContext *ctx, gpointer obj,
1448                                                  gpointer original_ip, gboolean test_only) MONO_INTERNAL;
1449 void     mono_handle_native_sigsegv             (int signal, void *sigctx) MONO_INTERNAL;
1450 void     mono_print_thread_dump                 (void *sigctx);
1451 void     mono_jit_walk_stack                    (MonoStackWalk func, gboolean do_il_offset, gpointer user_data) MONO_INTERNAL;
1452 void     mono_jit_walk_stack_from_ctx           (MonoStackWalk func, MonoContext *ctx, gboolean do_il_offset, gpointer user_data) MONO_INTERNAL;
1453 void     mono_setup_altstack                    (MonoJitTlsData *tls) MONO_INTERNAL;
1454 void     mono_free_altstack                     (MonoJitTlsData *tls) MONO_INTERNAL;
1455 gpointer mono_altstack_restore_prot             (gssize *regs, guint8 *code, gpointer *tramp_data, guint8* tramp) MONO_INTERNAL;
1456
1457 MonoJitInfo * mono_find_jit_info                (MonoDomain *domain, MonoJitTlsData *jit_tls, MonoJitInfo *res, MonoJitInfo *prev_ji, MonoContext *ctx, MonoContext *new_ctx, char **trace, MonoLMF **lmf, int *native_offset, gboolean *managed) MONO_INTERNAL;
1458
1459 gpointer mono_get_throw_exception               (void) MONO_INTERNAL;
1460 gpointer mono_get_rethrow_exception             (void) MONO_INTERNAL;
1461 gpointer mono_get_call_filter                   (void) MONO_INTERNAL;
1462 gpointer mono_get_restore_context               (void) MONO_INTERNAL;
1463 gpointer mono_get_throw_exception_by_name       (void) MONO_INTERNAL;
1464 gpointer mono_get_throw_corlib_exception        (void) MONO_INTERNAL;
1465
1466 /* the new function to do stack walks */
1467 typedef gboolean (*MonoStackFrameWalk)          (MonoDomain *domain, MonoContext *ctx, MonoJitInfo *ji, gpointer data);
1468 void      mono_walk_stack                       (MonoDomain *domain, MonoJitTlsData *jit_tls, MonoContext *start_ctx, MonoStackFrameWalk func, gpointer user_data);
1469
1470 MonoArray *ves_icall_get_trace                  (MonoException *exc, gint32 skip, MonoBoolean need_file_info) MONO_INTERNAL;
1471 MonoBoolean ves_icall_get_frame_info            (gint32 skip, MonoBoolean need_file_info, 
1472                                                  MonoReflectionMethod **method, 
1473                                                  gint32 *iloffset, gint32 *native_offset,
1474                                                  MonoString **file, gint32 *line, gint32 *column) MONO_INTERNAL;
1475 MonoString *ves_icall_System_Exception_get_trace (MonoException *exc) MONO_INTERNAL;
1476
1477 /* Dominator/SSA methods */
1478 void        mono_compile_dominator_info         (MonoCompile *cfg, int dom_flags) MONO_INTERNAL;
1479 void        mono_compute_natural_loops          (MonoCompile *cfg) MONO_INTERNAL;
1480 MonoBitSet* mono_compile_iterated_dfrontier     (MonoCompile *cfg, MonoBitSet *set) MONO_INTERNAL;
1481 void        mono_ssa_compute                    (MonoCompile *cfg) MONO_INTERNAL;
1482 void        mono_ssa_remove                     (MonoCompile *cfg) MONO_INTERNAL;
1483 void        mono_ssa_cprop                      (MonoCompile *cfg) MONO_INTERNAL;
1484 void        mono_ssa_deadce                     (MonoCompile *cfg) MONO_INTERNAL;
1485 void        mono_ssa_strength_reduction         (MonoCompile *cfg) MONO_INTERNAL;
1486 void        mono_free_loop_info                 (MonoCompile *cfg) MONO_INTERNAL;
1487
1488 void        mono_ssa_compute2                   (MonoCompile *cfg);
1489 void        mono_ssa_remove2                    (MonoCompile *cfg);
1490 void        mono_ssa_cprop2                     (MonoCompile *cfg);
1491 void        mono_ssa_deadce2                    (MonoCompile *cfg);
1492
1493 /* debugging support */
1494 void      mono_debug_init_method                (MonoCompile *cfg, MonoBasicBlock *start_block,
1495                                                  guint32 breakpoint_id) MONO_INTERNAL;
1496 void      mono_debug_open_method                (MonoCompile *cfg) MONO_INTERNAL;
1497 void      mono_debug_close_method               (MonoCompile *cfg) MONO_INTERNAL;
1498 void      mono_debug_open_block                 (MonoCompile *cfg, MonoBasicBlock *bb, guint32 address) MONO_INTERNAL;
1499 void      mono_debug_record_line_number         (MonoCompile *cfg, MonoInst *ins, guint32 address) MONO_INTERNAL;
1500 void      mono_debug_serialize_debug_info       (MonoCompile *cfg, guint8 **out_buf, guint32 *buf_len) MONO_INTERNAL;
1501 void      mono_debug_add_aot_method             (MonoDomain *domain,
1502                                                  MonoMethod *method, guint8 *code_start, 
1503                                                  guint8 *debug_info, guint32 debug_info_len) MONO_INTERNAL;
1504 void      mono_debug_add_icall_wrapper          (MonoMethod *method, MonoJitICallInfo* info) MONO_INTERNAL;
1505 void      mono_debug_print_vars                 (gpointer ip, gboolean only_arguments);
1506 void      mono_debugger_run_finally             (MonoContext *start_ctx);
1507
1508 extern gssize mono_breakpoint_info_index [MONO_BREAKPOINT_ARRAY_SIZE];
1509
1510 gboolean mono_breakpoint_clean_code (guint8 *method_start, guint8 *code, int offset, guint8 *buf, int size);
1511
1512 /* Mono Debugger support */
1513 void      mono_debugger_init                    (void);
1514 int       mono_debugger_main                    (MonoDomain *domain, MonoAssembly *assembly, int argc, char **argv);
1515
1516
1517 /* Tracing */
1518 MonoTraceSpec *mono_trace_parse_options         (const char *options) MONO_INTERNAL;
1519 void           mono_trace_set_assembly          (MonoAssembly *assembly) MONO_INTERNAL;
1520 gboolean       mono_trace_eval                  (MonoMethod *method) MONO_INTERNAL;
1521
1522 extern void
1523 mono_perform_abc_removal (MonoCompile *cfg) MONO_INTERNAL;
1524 extern void
1525 mono_perform_abc_removal (MonoCompile *cfg) MONO_INTERNAL;
1526 extern void
1527 mono_perform_ssapre (MonoCompile *cfg) MONO_INTERNAL;
1528 extern void
1529 mono_local_cprop (MonoCompile *cfg) MONO_INTERNAL;
1530 extern void
1531 mono_local_cprop (MonoCompile *cfg);
1532 extern void
1533 mono_local_deadce (MonoCompile *cfg);
1534
1535 /* CAS - stack walk */
1536 MonoSecurityFrame* ves_icall_System_Security_SecurityFrame_GetSecurityFrame (gint32 skip) MONO_INTERNAL;
1537 MonoArray* ves_icall_System_Security_SecurityFrame_GetSecurityStack (gint32 skip) MONO_INTERNAL;
1538
1539 /* Generic sharing */
1540
1541 MonoGenericSharingContext* mono_get_generic_context_from_code (guint8 *code) MONO_INTERNAL;
1542
1543 MonoGenericContext* mini_method_get_context (MonoMethod *method) MONO_INTERNAL;
1544
1545 int mono_method_check_context_used (MonoMethod *method) MONO_INTERNAL;
1546
1547 gboolean mono_generic_context_equal_deep (MonoGenericContext *context1, MonoGenericContext *context2) MONO_INTERNAL;
1548
1549 gpointer mono_helper_get_rgctx_other_ptr (MonoClass *caller_class, MonoVTable *vtable,
1550                                           guint32 token, guint32 token_source, guint32 rgctx_type,
1551                                           gint32 rgctx_index) MONO_INTERNAL;
1552
1553 void mono_generic_sharing_init (void) MONO_INTERNAL;
1554
1555 MonoClass* mini_class_get_container_class (MonoClass *class) MONO_INTERNAL;
1556 MonoGenericContext* mini_class_get_context (MonoClass *class) MONO_INTERNAL;
1557
1558 MonoType* mini_get_basic_type_from_generic (MonoGenericSharingContext *gsctx, MonoType *type) MONO_INTERNAL;
1559 MonoType* mini_type_get_underlying_type (MonoGenericSharingContext *gsctx, MonoType *type) MONO_INTERNAL;
1560
1561 int mini_type_stack_size (MonoGenericSharingContext *gsctx, MonoType *t, int *align) MONO_INTERNAL;
1562 int mini_type_stack_size_full (MonoGenericSharingContext *gsctx, MonoType *t, guint32 *align, gboolean pinvoke) MONO_INTERNAL;
1563 void type_to_eval_stack_type (MonoCompile *cfg, MonoType *type, MonoInst *inst) MONO_INTERNAL;
1564 guint mono_type_to_regmove (MonoCompile *cfg, MonoType *type) MONO_INTERNAL;
1565
1566 /* wapihandles.c */
1567 int mini_wapi_hps (int argc, char **argv) MONO_INTERNAL;
1568
1569 int mini_wapi_semdel (int argc, char **argv) MONO_INTERNAL;
1570
1571 int mini_wapi_seminfo (int argc, char **argv) MONO_INTERNAL;
1572
1573 /* SIMD support */
1574
1575 /*
1576 This enum MUST be kept in sync with its managed mirror Mono.Simd.AccelMode.
1577 The AccelMode values are masks while the ones here are the bit indexes.
1578  */
1579 enum {
1580         SIMD_VERSION_SSE1       = 0,
1581         SIMD_VERSION_SSE2       = 1,
1582         SIMD_VERSION_SSE3       = 2,
1583         SIMD_VERSION_SSSE3      = 3,
1584         SIMD_VERSION_SSE41      = 4,
1585         SIMD_VERSION_SSE42      = 5,
1586         SIMD_VERSION_SSE4a      = 6,
1587 };
1588
1589 enum {
1590         SIMD_COMP_EQ,
1591         SIMD_COMP_LT,
1592         SIMD_COMP_LE,
1593         SIMD_COMP_UNORD,
1594         SIMD_COMP_NEQ,
1595         SIMD_COMP_NLT,
1596         SIMD_COMP_NLE,
1597         SIMD_COMP_ORD
1598 };
1599
1600 enum {
1601         SIMD_PREFETCH_MODE_NTA,
1602         SIMD_PREFETCH_MODE_0,
1603         SIMD_PREFETCH_MODE_1,
1604         SIMD_PREFETCH_MODE_2,
1605 };
1606
1607 const char *mono_arch_xregname (int reg) MONO_INTERNAL;
1608 void mono_simd_simplify_indirection (MonoCompile *cfg) MONO_INTERNAL;
1609 MonoInst* mono_emit_simd_intrinsics (MonoCompile *cfg, MonoMethod *cmethod, MonoMethodSignature *fsig, MonoInst **args) MONO_INTERNAL;
1610 guint32   mono_arch_cpu_enumerate_simd_versions (void) MONO_INTERNAL;
1611 void mono_simd_intrinsics_init (void) MONO_INTERNAL;
1612
1613 /* for MONO_WRAPPER_UNKNOWN subtypes */
1614 enum {
1615         MONO_AOT_WRAPPER_MONO_ENTER,
1616         MONO_AOT_WRAPPER_MONO_EXIT,
1617         MONO_AOT_WRAPPER_LAST
1618 };
1619
1620 #endif /* __MONO_MINI_H__ */