Merge branch 'master' of github.com:mono/mono
[mono.git] / mono / metadata / domain-internals.h
1 /*
2  * Appdomain-related internal data structures and functions.
3  */
4 #ifndef __MONO_METADATA_DOMAIN_INTERNALS_H__
5 #define __MONO_METADATA_DOMAIN_INTERNALS_H__
6
7 #include <mono/metadata/appdomain.h>
8 #include <mono/metadata/mempool.h>
9 #include <mono/metadata/lock-tracer.h>
10 #include <mono/utils/mono-codeman.h>
11 #include <mono/metadata/mono-hash.h>
12 #include <mono/utils/mono-compiler.h>
13 #include <mono/utils/mono-internal-hash.h>
14 #include <mono/io-layer/io-layer.h>
15 #include <mono/metadata/mempool-internals.h>
16
17 extern CRITICAL_SECTION mono_delegate_section;
18 extern CRITICAL_SECTION mono_strtod_mutex;
19
20 /*
21  * If this is set, the memory belonging to appdomains is not freed when a domain is
22  * unloaded, and assemblies loaded by the appdomain are not unloaded either. This
23  * allows us to use typed gc in non-default appdomains too, leading to increased
24  * performance.
25  */ 
26 extern gboolean mono_dont_free_domains;
27
28 /* This is a copy of System.AppDomainSetup */
29 typedef struct {
30         MonoObject object;
31         MonoString *application_base;
32         MonoString *application_name;
33         MonoString *cache_path;
34         MonoString *configuration_file;
35         MonoString *dynamic_base;
36         MonoString *license_file;
37         MonoString *private_bin_path;
38         MonoString *private_bin_path_probe;
39         MonoString *shadow_copy_directories;
40         MonoString *shadow_copy_files;
41         MonoBoolean publisher_policy;
42         MonoBoolean path_changed;
43         int loader_optimization;
44         MonoBoolean disallow_binding_redirects;
45         MonoBoolean disallow_code_downloads;
46         MonoObject *activation_arguments; /* it is System.Object in 1.x, ActivationArguments in 2.0 */
47         MonoObject *domain_initializer;
48         MonoObject *application_trust; /* it is System.Object in 1.x, ApplicationTrust in 2.0 */
49         MonoArray *domain_initializer_args;
50         MonoBoolean disallow_appbase_probe;
51         MonoArray *configuration_bytes;
52         MonoArray *serialized_non_primitives;
53 } MonoAppDomainSetup;
54
55 typedef struct _MonoJitInfoTable MonoJitInfoTable;
56 typedef struct _MonoJitInfoTableChunk MonoJitInfoTableChunk;
57
58 #define MONO_JIT_INFO_TABLE_CHUNK_SIZE          64
59
60 struct _MonoJitInfoTableChunk
61 {
62         int                    refcount;
63         volatile int           num_elements;
64         volatile gint8        *last_code_end;
65         MonoJitInfo * volatile data [MONO_JIT_INFO_TABLE_CHUNK_SIZE];
66 };
67
68 struct _MonoJitInfoTable
69 {
70         MonoDomain             *domain;
71         int                     num_chunks;
72         MonoJitInfoTableChunk  *chunks [MONO_ZERO_LEN_ARRAY];
73 };
74
75 #define MONO_SIZEOF_JIT_INFO_TABLE (sizeof (struct _MonoJitInfoTable) - MONO_ZERO_LEN_ARRAY * SIZEOF_VOID_P)
76
77 typedef GArray MonoAotModuleInfoTable;
78
79 typedef struct {
80         guint32  flags;
81         gint32   exvar_offset;
82         gpointer try_start;
83         gpointer try_end;
84         gpointer handler_start;
85         union {
86                 MonoClass *catch_class;
87                 gpointer filter;
88                 gpointer handler_end;
89         } data;
90 } MonoJitExceptionInfo;
91
92 /*
93  * Will contain information on the generic type arguments in the
94  * future.  For now, all arguments are always reference types.
95  */
96 typedef struct {
97         int dummy;
98 } MonoGenericSharingContext;
99
100 typedef struct
101 {
102         MonoGenericSharingContext *generic_sharing_context;
103         gint32 this_offset;
104         guint8 this_reg;
105         gboolean has_this:1;
106         gboolean this_in_reg:1;
107 } MonoGenericJitInfo;
108
109 /*
110 A try block hole is used to represent a non-contiguous part of
111 of a segment of native code protected by a given .try block.
112 Usually, a try block is defined as a contiguous segment of code.
113 But in some cases it's needed to have some parts of it to not be protected.
114 For example, given "try {} finally {}", the code in the .try block to call
115 the finally part looks like:
116
117 try {
118     ...
119         call finally_block
120         adjust stack
121         jump outside try block
122         ...
123 } finally {
124         ...
125 }
126
127 The instructions between the call and the jump should not be under the try block since they happen
128 after the finally block executes, which means if an async exceptions happens at that point we would
129 execute the finally clause twice. So, to avoid this, we introduce a hole in the try block to signal
130 that those instructions are not protected.
131 */
132 typedef struct
133 {
134         guint32 offset;
135         guint16 clause;
136         guint16 length;
137 } MonoTryBlockHoleJitInfo;
138
139 typedef struct
140 {
141         guint16 num_holes;
142         MonoTryBlockHoleJitInfo holes [MONO_ZERO_LEN_ARRAY];
143 } MonoTryBlockHoleTableJitInfo;
144
145 struct _MonoJitInfo {
146         /* NOTE: These first two elements (method and
147            next_jit_code_hash) must be in the same order and at the
148            same offset as in RuntimeMethod, because of the jit_code_hash
149            internal hash table in MonoDomain. */
150         MonoMethod *method;
151         struct _MonoJitInfo *next_jit_code_hash;
152         gpointer    code_start;
153         /* This might contain an id for the unwind info instead of a register mask */
154         guint32     used_regs;
155         int         code_size;
156         guint32     num_clauses:15;
157         /* Whenever the code is domain neutral or 'shared' */
158         gboolean    domain_neutral:1;
159         gboolean    cas_inited:1;
160         gboolean    cas_class_assert:1;
161         gboolean    cas_class_deny:1;
162         gboolean    cas_class_permitonly:1;
163         gboolean    cas_method_assert:1;
164         gboolean    cas_method_deny:1;
165         gboolean    cas_method_permitonly:1;
166         gboolean    has_generic_jit_info:1;
167         gboolean    has_try_block_holes:1;
168         gboolean    from_aot:1;
169         gboolean    from_llvm:1;
170
171         /* FIXME: Embed this after the structure later*/
172         gpointer    gc_info; /* Currently only used by SGen */
173         
174         MonoJitExceptionInfo clauses [MONO_ZERO_LEN_ARRAY];
175         /* There is an optional MonoGenericJitInfo after the clauses */
176         /* There is an optional MonoTryBlockHoleTableJitInfo after MonoGenericJitInfo clauses*/
177 };
178
179 #define MONO_SIZEOF_JIT_INFO (offsetof (struct _MonoJitInfo, clauses))
180
181 struct _MonoAppContext {
182         MonoObject obj;
183         gint32 domain_id;
184         gint32 context_id;
185         gpointer *static_data;
186 };
187
188 /*
189  * We have two unloading states because the domain
190  * must remain fully functional while AppDomain::DomainUnload is
191  * processed.
192  * After that unloading began and all domain facilities are teared down
193  * such as execution of new threadpool jobs.  
194  */
195 typedef enum {
196         MONO_APPDOMAIN_CREATED,
197         MONO_APPDOMAIN_UNLOADING_START,
198         MONO_APPDOMAIN_UNLOADING,
199         MONO_APPDOMAIN_UNLOADED
200 } MonoAppDomainState;
201
202 typedef struct _MonoThunkFreeList {
203         guint32 size;
204         int length;             /* only valid for the wait list */
205         struct _MonoThunkFreeList *next;
206 } MonoThunkFreeList;
207
208 typedef struct _MonoJitCodeHash MonoJitCodeHash;
209
210 struct _MonoDomain {
211         /*
212          * This lock must never be taken before the loader lock,
213          * i.e. if both are taken by the same thread, the loader lock
214          * must taken first.
215          */
216         CRITICAL_SECTION    lock;
217         MonoMemPool        *mp;
218         MonoCodeManager    *code_mp;
219         /*
220          * keep all the managed objects close to each other for the precise GC
221          * For the Boehm GC we additionally keep close also other GC-tracked pointers.
222          */
223 #define MONO_DOMAIN_FIRST_OBJECT setup
224         MonoAppDomainSetup *setup;
225         MonoAppDomain      *domain;
226         MonoAppContext     *default_context;
227         MonoException      *out_of_memory_ex;
228         MonoException      *null_reference_ex;
229         MonoException      *stack_overflow_ex;
230         /* typeof (void) */
231         MonoObject         *typeof_void;
232         /* Ephemeron Tombstone*/
233         MonoObject         *ephemeron_tombstone;
234         /* new MonoType [0] */
235         MonoArray          *empty_types;
236         /* 
237          * The fields between FIRST_GC_TRACKED and LAST_GC_TRACKED are roots, but
238          * not object references.
239          */
240 #define MONO_DOMAIN_FIRST_GC_TRACKED env
241         MonoGHashTable     *env;
242         MonoGHashTable     *ldstr_table;
243         /* hashtables for Reflection handles */
244         MonoGHashTable     *type_hash;
245         MonoGHashTable     *refobject_hash;
246         /* a GC-tracked array to keep references to the static fields of types */
247         gpointer           *static_data_array;
248         /* maps class -> type initialization exception object */
249         MonoGHashTable    *type_init_exception_hash;
250         /* maps delegate trampoline addr -> delegate object */
251         MonoGHashTable     *delegate_hash_table;
252 #define MONO_DOMAIN_LAST_GC_TRACKED delegate_hash_table
253         guint32            state;
254         /* Needed by Thread:GetDomainID() */
255         gint32             domain_id;
256         gint32             shadow_serial;
257         unsigned char      inet_family_hint; // used in socket-io.c as a cache
258         GSList             *domain_assemblies;
259         MonoAssembly       *entry_assembly;
260         char               *friendly_name;
261         GPtrArray          *class_vtable_array;
262         /* maps remote class key -> MonoRemoteClass */
263         GHashTable         *proxy_vtable_hash;
264         /* Protected by 'jit_code_hash_lock' */
265         MonoInternalHashTable jit_code_hash;
266         CRITICAL_SECTION    jit_code_hash_lock;
267         int                 num_jit_info_tables;
268         MonoJitInfoTable * 
269           volatile          jit_info_table;
270         GSList             *jit_info_free_queue;
271         /* Used when loading assemblies */
272         gchar **search_path;
273         gchar *private_bin_path;
274         
275         /* Used by remoting proxies */
276         MonoMethod         *create_proxy_for_type_method;
277         MonoMethod         *private_invoke_method;
278         /* Used to store offsets of thread and context static fields */
279         GHashTable         *special_static_fields;
280         /* 
281          * This must be a GHashTable, since these objects can't be finalized
282          * if the hashtable contains a GC visible reference to them.
283          */
284         GHashTable         *finalizable_objects_hash;
285
286         /* These two are boehm only */
287         /* Maps MonoObjects to a GSList of WeakTrackResurrection GCHandles pointing to them */
288         GHashTable         *track_resurrection_objects_hash;
289         /* Maps WeakTrackResurrection GCHandles to the MonoObjects they point to */
290         GHashTable         *track_resurrection_handles_hash;
291
292         /* Protects the three hashes above */
293         CRITICAL_SECTION   finalizable_objects_hash_lock;
294         /* Used when accessing 'domain_assemblies' */
295         CRITICAL_SECTION    assemblies_lock;
296
297         GHashTable         *method_rgctx_hash;
298
299         GHashTable         *generic_virtual_cases;
300         MonoThunkFreeList **thunk_free_lists;
301
302         /* Information maintained by the JIT engine */
303         gpointer runtime_info;
304
305         /*thread pool jobs, used to coordinate shutdown.*/
306         volatile int                    threadpool_jobs;
307         HANDLE                          cleanup_semaphore;
308         
309         /* Contains the compiled runtime invoke wrapper used by finalizers */
310         gpointer            finalize_runtime_invoke;
311
312         /* Contains the compiled runtime invoke wrapper used by async resylt creation to capture thread context*/
313         gpointer            capture_context_runtime_invoke;
314
315         /* Contains the compiled method used by async resylt creation to capture thread context*/
316         gpointer            capture_context_method;
317
318         /* Assembly bindings, the per-domain part */
319         GSList *assembly_bindings;
320         gboolean assembly_bindings_parsed;
321 };
322
323 typedef struct  {
324         guint16 major, minor, build, revision;
325 } AssemblyVersionSet;
326
327 /* MonoRuntimeInfo: Contains information about versions supported by this runtime */
328 typedef struct  {
329         const char runtime_version [12];
330         const char framework_version [4];
331         const AssemblyVersionSet version_sets [3];
332 } MonoRuntimeInfo;
333
334 #define mono_domain_lock(domain) mono_locks_acquire(&(domain)->lock, DomainLock)
335 #define mono_domain_unlock(domain) mono_locks_release(&(domain)->lock, DomainLock)
336 #define mono_domain_assemblies_lock(domain) mono_locks_acquire(&(domain)->assemblies_lock, DomainAssembliesLock)
337 #define mono_domain_assemblies_unlock(domain) mono_locks_release(&(domain)->assemblies_lock, DomainAssembliesLock)
338 #define mono_domain_jit_code_hash_lock(domain) mono_locks_acquire(&(domain)->jit_code_hash_lock, DomainJitCodeHashLock)
339 #define mono_domain_jit_code_hash_unlock(domain) mono_locks_release(&(domain)->jit_code_hash_lock, DomainJitCodeHashLock)
340
341 typedef MonoDomain* (*MonoLoadFunc) (const char *filename, const char *runtime_version);
342
343 void
344 mono_install_runtime_load  (MonoLoadFunc func) MONO_INTERNAL;
345
346 MonoDomain*
347 mono_runtime_load (const char *filename, const char *runtime_version) MONO_INTERNAL;
348
349 typedef void (*MonoCreateDomainFunc) (MonoDomain *domain);
350
351 void
352 mono_install_create_domain_hook (MonoCreateDomainFunc func) MONO_INTERNAL;
353
354 typedef void (*MonoFreeDomainFunc) (MonoDomain *domain);
355
356 void
357 mono_install_free_domain_hook (MonoFreeDomainFunc func) MONO_INTERNAL;
358
359 void 
360 mono_init_com_types (void) MONO_INTERNAL;
361
362 void 
363 mono_cleanup (void) MONO_INTERNAL;
364
365 void
366 mono_close_exe_image (void) MONO_INTERNAL;
367
368 void
369 mono_jit_info_table_add    (MonoDomain *domain, MonoJitInfo *ji) MONO_INTERNAL;
370
371 void
372 mono_jit_info_table_remove (MonoDomain *domain, MonoJitInfo *ji) MONO_INTERNAL;
373
374 void
375 mono_jit_info_add_aot_module (MonoImage *image, gpointer start, gpointer end) MONO_INTERNAL;
376
377 MonoGenericJitInfo*
378 mono_jit_info_get_generic_jit_info (MonoJitInfo *ji) MONO_INTERNAL;
379
380 MonoGenericSharingContext*
381 mono_jit_info_get_generic_sharing_context (MonoJitInfo *ji) MONO_INTERNAL;
382
383 void
384 mono_jit_info_set_generic_sharing_context (MonoJitInfo *ji, MonoGenericSharingContext *gsctx) MONO_INTERNAL;
385
386 MonoJitInfo*
387 mono_domain_lookup_shared_generic (MonoDomain *domain, MonoMethod *method) MONO_INTERNAL;
388
389 char *
390 mono_make_shadow_copy (const char *filename) MONO_INTERNAL;
391
392 gboolean
393 mono_is_shadow_copy_enabled (MonoDomain *domain, const gchar *dir_name) MONO_INTERNAL;
394
395 gpointer
396 mono_domain_alloc  (MonoDomain *domain, guint size) MONO_INTERNAL;
397
398 gpointer
399 mono_domain_alloc0 (MonoDomain *domain, guint size) MONO_INTERNAL;
400
401 void*
402 mono_domain_code_reserve (MonoDomain *domain, int size) MONO_LLVM_INTERNAL;
403
404 void*
405 mono_domain_code_reserve_align (MonoDomain *domain, int size, int alignment) MONO_INTERNAL;
406
407 void
408 mono_domain_code_commit (MonoDomain *domain, void *data, int size, int newsize) MONO_INTERNAL;
409
410 void
411 mono_domain_code_foreach (MonoDomain *domain, MonoCodeManagerFunc func, void *user_data) MONO_INTERNAL;
412
413 void
414 mono_domain_unset (void) MONO_INTERNAL;
415
416 void
417 mono_domain_set_internal_with_options (MonoDomain *domain, gboolean migrate_exception) MONO_INTERNAL;
418
419 MonoTryBlockHoleTableJitInfo*
420 mono_jit_info_get_try_block_hole_table_info (MonoJitInfo *ji) MONO_INTERNAL;
421
422 /* 
423  * Installs a new function which is used to return a MonoJitInfo for a method inside
424  * an AOT module.
425  */
426 typedef MonoJitInfo *(*MonoJitInfoFindInAot)         (MonoDomain *domain, MonoImage *image, gpointer addr);
427 void          mono_install_jit_info_find_in_aot (MonoJitInfoFindInAot func) MONO_INTERNAL;
428
429 void
430 mono_jit_code_hash_init (MonoInternalHashTable *jit_code_hash) MONO_INTERNAL;
431
432 MonoAppDomain *
433 ves_icall_System_AppDomain_getCurDomain            (void) MONO_INTERNAL;
434
435 MonoAppDomain *
436 ves_icall_System_AppDomain_getRootDomain           (void) MONO_INTERNAL;
437
438 MonoAppDomain *
439 ves_icall_System_AppDomain_createDomain            (MonoString         *friendly_name,
440                                                     MonoAppDomainSetup *setup) MONO_INTERNAL;
441
442 MonoObject *
443 ves_icall_System_AppDomain_GetData                 (MonoAppDomain *ad, 
444                                                     MonoString    *name) MONO_INTERNAL;
445
446 MonoReflectionAssembly *
447 ves_icall_System_AppDomain_LoadAssemblyRaw         (MonoAppDomain *ad,
448                                                     MonoArray *raw_assembly, 
449                                                     MonoArray *raw_symbol_store,
450                                                     MonoObject *evidence,
451                                                     MonoBoolean refonly) MONO_INTERNAL;
452
453 void
454 ves_icall_System_AppDomain_SetData                 (MonoAppDomain *ad, 
455                                                     MonoString    *name, 
456                                                     MonoObject    *data) MONO_INTERNAL;
457
458 MonoAppDomainSetup *
459 ves_icall_System_AppDomain_getSetup                (MonoAppDomain *ad) MONO_INTERNAL;
460
461 MonoString *
462 ves_icall_System_AppDomain_getFriendlyName         (MonoAppDomain *ad) MONO_INTERNAL;
463
464 MonoArray *
465 ves_icall_System_AppDomain_GetAssemblies           (MonoAppDomain *ad,
466                                                     MonoBoolean refonly) MONO_INTERNAL;
467
468 MonoReflectionAssembly *
469 ves_icall_System_Reflection_Assembly_LoadFrom      (MonoString *fname,
470                                                     MonoBoolean refonly) MONO_INTERNAL;
471
472 MonoReflectionAssembly *
473 ves_icall_System_AppDomain_LoadAssembly            (MonoAppDomain *ad, 
474                                                     MonoString *assRef,
475                                                     MonoObject    *evidence,
476                                                     MonoBoolean refonly) MONO_INTERNAL;
477
478 gboolean
479 ves_icall_System_AppDomain_InternalIsFinalizingForUnload (gint32 domain_id) MONO_INTERNAL;
480
481 void
482 ves_icall_System_AppDomain_InternalUnload          (gint32 domain_id) MONO_INTERNAL;
483
484 gint32
485 ves_icall_System_AppDomain_ExecuteAssembly         (MonoAppDomain *ad, 
486                                                                                                         MonoReflectionAssembly *refass,
487                                                                                                         MonoArray     *args) MONO_INTERNAL;
488
489 MonoAppDomain * 
490 ves_icall_System_AppDomain_InternalSetDomain       (MonoAppDomain *ad) MONO_INTERNAL;
491
492 MonoAppDomain * 
493 ves_icall_System_AppDomain_InternalSetDomainByID   (gint32 domainid) MONO_INTERNAL;
494
495 void
496 ves_icall_System_AppDomain_InternalPushDomainRef (MonoAppDomain *ad) MONO_INTERNAL;
497
498 void
499 ves_icall_System_AppDomain_InternalPushDomainRefByID (gint32 domain_id) MONO_INTERNAL;
500
501 void
502 ves_icall_System_AppDomain_InternalPopDomainRef (void) MONO_INTERNAL;
503
504 MonoAppContext * 
505 ves_icall_System_AppDomain_InternalGetContext      (void) MONO_INTERNAL;
506
507 MonoAppContext * 
508 ves_icall_System_AppDomain_InternalGetDefaultContext      (void) MONO_INTERNAL;
509
510 MonoAppContext * 
511 ves_icall_System_AppDomain_InternalSetContext      (MonoAppContext *mc) MONO_INTERNAL;
512
513 gint32 
514 ves_icall_System_AppDomain_GetIDFromDomain (MonoAppDomain * ad) MONO_INTERNAL;
515
516 MonoString *
517 ves_icall_System_AppDomain_InternalGetProcessGuid (MonoString* newguid) MONO_INTERNAL;
518
519 MonoAssembly *
520 mono_assembly_load_corlib (const MonoRuntimeInfo *runtime, MonoImageOpenStatus *status) MONO_INTERNAL;
521
522 const MonoRuntimeInfo*
523 mono_get_runtime_info (void) MONO_INTERNAL;
524
525 void
526 mono_runtime_set_no_exec (gboolean val) MONO_INTERNAL;
527
528 gboolean
529 mono_runtime_get_no_exec (void) MONO_INTERNAL;
530
531 gboolean
532 mono_assembly_name_parse (const char *name, MonoAssemblyName *aname) MONO_INTERNAL;
533
534 MonoImage *mono_assembly_open_from_bundle (const char *filename,
535                                            MonoImageOpenStatus *status,
536                                            gboolean refonly) MONO_INTERNAL;
537
538 void
539 mono_domain_add_class_static_data (MonoDomain *domain, MonoClass *klass, gpointer data, guint32 *bitmap);
540
541 MonoReflectionAssembly *
542 mono_try_assembly_resolve (MonoDomain *domain, MonoString *fname, gboolean refonly) MONO_INTERNAL;
543
544 MonoAssembly* mono_assembly_load_full_nosearch (MonoAssemblyName *aname, 
545                                                 const char       *basedir, 
546                                                 MonoImageOpenStatus *status,
547                                                 gboolean refonly) MONO_INTERNAL;
548
549 void mono_set_private_bin_path_from_config (MonoDomain *domain) MONO_INTERNAL;
550
551 int mono_framework_version (void) MONO_INTERNAL;
552
553 void mono_reflection_cleanup_domain (MonoDomain *domain) MONO_INTERNAL;
554
555 #endif /* __MONO_METADATA_DOMAIN_INTERNALS_H__ */