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