2008-01-04 Andreas Faerber <andreas.faerber@web.de>
[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/utils/mono-codeman.h>
9 #include <mono/utils/mono-hash.h>
10 #include <mono/utils/mono-compiler.h>
11 #include <mono/utils/mono-internal-hash.h>
12 #include <mono/io-layer/io-layer.h>
13
14 extern CRITICAL_SECTION mono_delegate_section;
15
16 /* This is a copy of System.AppDomainSetup */
17 typedef struct {
18         MonoObject object;
19         MonoString *application_base;
20         MonoString *application_name;
21         MonoString *cache_path;
22         MonoString *configuration_file;
23         MonoString *dynamic_base;
24         MonoString *license_file;
25         MonoString *private_bin_path;
26         MonoString *private_bin_path_probe;
27         MonoString *shadow_copy_directories;
28         MonoString *shadow_copy_files;
29         MonoBoolean publisher_policy;
30         MonoBoolean path_changed;
31         int loader_optimization;
32         MonoBoolean disallow_binding_redirects;
33         MonoBoolean disallow_code_downloads;
34         MonoObject *activation_arguments; /* it is System.Object in 1.x, ActivationArguments in 2.0 */
35         MonoObject *domain_initializer;
36         MonoArray *domain_initializer_args;
37         MonoObject *application_trust; /* it is System.Object in 1.x, ApplicationTrust in 2.0 */
38         MonoBoolean disallow_appbase_probe;
39         MonoArray *configuration_bytes;
40 } MonoAppDomainSetup;
41
42 typedef struct _MonoJitInfoTable MonoJitInfoTable;
43 typedef struct _MonoJitInfoTableChunk MonoJitInfoTableChunk;
44
45 #define MONO_JIT_INFO_TABLE_CHUNK_SIZE          64
46
47 struct _MonoJitInfoTableChunk
48 {
49         int                    refcount;
50         volatile int           num_elements;
51         volatile gint8        *last_code_end;
52         MonoJitInfo * volatile data [MONO_JIT_INFO_TABLE_CHUNK_SIZE];
53 };
54
55 struct _MonoJitInfoTable
56 {
57         int                     num_chunks;
58         MonoJitInfoTableChunk  *chunks [MONO_ZERO_LEN_ARRAY];
59 };
60
61 typedef GArray MonoAotModuleInfoTable;
62
63 typedef struct {
64         guint32  flags;
65         gint32   exvar_offset;
66         gpointer try_start;
67         gpointer try_end;
68         gpointer handler_start;
69         union {
70                 MonoClass *catch_class;
71                 gpointer filter;
72         } data;
73 } MonoJitExceptionInfo;
74
75 /*
76  * Will contain information on the generic type arguments in the
77  * future.  For now, all arguments are always reference types.
78  */
79 typedef struct {
80         int dummy;
81 } MonoGenericSharingContext;
82
83 struct _MonoJitInfo {
84         /* NOTE: These first two elements (method and
85            next_jit_code_hash) must be in the same order and at the
86            same offset as in RuntimeMethod, because of the jit_code_hash
87            internal hash table in MonoDomain. */
88         MonoMethod *method;
89         struct _MonoJitInfo *next_jit_code_hash;
90         gpointer    code_start;
91         guint32     used_regs;
92         int         code_size;
93         guint32     num_clauses:16;
94         /* Whenever the code is domain neutral or 'shared' */
95         gboolean    domain_neutral:1;
96         gboolean    cas_inited:1;
97         gboolean    cas_class_assert:1;
98         gboolean    cas_class_deny:1;
99         gboolean    cas_class_permitonly:1;
100         gboolean    cas_method_assert:1;
101         gboolean    cas_method_deny:1;
102         gboolean    cas_method_permitonly:1;
103         gboolean    has_generic_sharing_context:1;
104         MonoJitExceptionInfo clauses [MONO_ZERO_LEN_ARRAY];
105         /* There is an optional MonoGenericSharingContext* after the clauses */
106 };
107
108 typedef struct {
109         MonoJitInfo *ji;
110         MonoCodeManager *code_mp;
111 } MonoJitDynamicMethodInfo;
112
113 struct _MonoAppContext {
114         MonoObject obj;
115         gint32 domain_id;
116         gint32 context_id;
117         gpointer *static_data;
118 };
119
120 typedef enum {
121         MONO_APPDOMAIN_CREATED,
122         MONO_APPDOMAIN_UNLOADING,
123         MONO_APPDOMAIN_UNLOADED
124 } MonoAppDomainState;
125
126 typedef struct _MonoJitCodeHash MonoJitCodeHash;
127
128 struct _MonoDomain {
129         CRITICAL_SECTION    lock;
130         MonoMemPool        *mp;
131         MonoCodeManager    *code_mp;
132         /*
133          * keep all the managed objects close to each other for the precise GC
134          * For the Boehm GC we additionally keep close also other GC-tracked pointers.
135          */
136 #define MONO_DOMAIN_FIRST_OBJECT setup
137         MonoAppDomainSetup *setup;
138         MonoAppDomain      *domain;
139         MonoAppContext     *default_context;
140         MonoException      *out_of_memory_ex;
141         MonoException      *null_reference_ex;
142         MonoException      *stack_overflow_ex;
143 #define MONO_DOMAIN_FIRST_GC_TRACKED env
144         MonoGHashTable     *env;
145         MonoGHashTable     *ldstr_table;
146         /* hashtables for Reflection handles */
147         MonoGHashTable     *type_hash;
148         MonoGHashTable     *refobject_hash;
149         /* a GC-tracked array to keep references to the static fields of types */
150         gpointer           *static_data_array;
151         /* maps class -> type initialization exception object */
152         MonoGHashTable    *type_init_exception_hash;
153         /* maps delegate trampoline addr -> delegate object */
154         MonoGHashTable     *delegate_hash_table;
155 #define MONO_DOMAIN_LAST_GC_TRACKED delegate_hash_table
156         guint32            state;
157         /* Needed by Thread:GetDomainID() */
158         gint32             domain_id;
159         gint32             shadow_serial;
160         GSList             *domain_assemblies;
161         MonoAssembly       *entry_assembly;
162         char               *friendly_name;
163         GHashTable         *class_vtable_hash;
164         /* maps remote class key -> MonoRemoteClass */
165         GHashTable         *proxy_vtable_hash;
166         MonoInternalHashTable jit_code_hash;
167         /* maps MonoMethod -> MonoJitDynamicMethodInfo */
168         GHashTable         *dynamic_code_hash;
169         MonoJitInfoTable * 
170           volatile          jit_info_table;
171         /* Used when loading assemblies */
172         gchar **search_path;
173         gchar *private_bin_path;
174         
175         /* Used by remoting proxies */
176         MonoMethod         *create_proxy_for_type_method;
177         MonoMethod         *private_invoke_method;
178         /* Used to store offsets of thread and context static fields */
179         GHashTable         *special_static_fields;
180         GHashTable         *jump_target_hash;
181         GHashTable         *class_init_trampoline_hash;
182         GHashTable         *jump_trampoline_hash;
183         GHashTable         *jit_trampoline_hash;
184         GHashTable         *delegate_trampoline_hash;
185         /* 
186          * This must be a GHashTable, since these objects can't be finalized
187          * if the hashtable contains a GC visible reference to them.
188          */
189         GHashTable         *finalizable_objects_hash;
190         /* Used when accessing 'domain_assemblies' */
191         CRITICAL_SECTION    assemblies_lock;
192
193         GHashTable         *shared_generics_hash;
194 };
195
196 typedef struct  {
197         guint16 major, minor, build, revision;
198 } AssemblyVersionSet;
199
200 /* MonoRuntimeInfo: Contains information about versions supported by this runtime */
201 typedef struct  {
202         const char runtime_version [12];
203         const char framework_version [4];
204         const AssemblyVersionSet version_sets [2];
205 } MonoRuntimeInfo;
206
207 #define mono_domain_lock(domain)   EnterCriticalSection(&(domain)->lock)
208 #define mono_domain_unlock(domain) LeaveCriticalSection(&(domain)->lock)
209 #define mono_domain_assemblies_lock(domain)   EnterCriticalSection(&(domain)->assemblies_lock)
210 #define mono_domain_assemblies_unlock(domain) LeaveCriticalSection(&(domain)->assemblies_lock)
211
212 void 
213 mono_init_com_types (void) MONO_INTERNAL;
214
215 void 
216 mono_cleanup (void) MONO_INTERNAL;
217
218 void
219 mono_jit_info_table_add    (MonoDomain *domain, MonoJitInfo *ji) MONO_INTERNAL;
220
221 void
222 mono_jit_info_table_remove (MonoDomain *domain, MonoJitInfo *ji) MONO_INTERNAL;
223
224 void
225 mono_jit_info_add_aot_module (MonoImage *image, gpointer start, gpointer end) MONO_INTERNAL;
226
227 MonoGenericSharingContext*
228 mono_jit_info_get_generic_sharing_context (MonoJitInfo *ji) MONO_INTERNAL;
229
230 void
231 mono_jit_info_set_generic_sharing_context (MonoJitInfo *ji, MonoGenericSharingContext *gsctx) MONO_INTERNAL;
232
233 MonoJitInfo*
234 mono_domain_lookup_shared_generic (MonoDomain *domain, MonoMethod *method) MONO_INTERNAL;
235
236 void
237 mono_domain_register_shared_generic (MonoDomain *domain, MonoMethod *method, MonoJitInfo *jit_info) MONO_INTERNAL;
238
239
240 /* 
241  * Installs a new function which is used to return a MonoJitInfo for a method inside
242  * an AOT module.
243  */
244 typedef MonoJitInfo *(*MonoJitInfoFindInAot)         (MonoDomain *domain, MonoImage *image, gpointer addr);
245 void          mono_install_jit_info_find_in_aot (MonoJitInfoFindInAot func) MONO_INTERNAL;
246
247 void
248 mono_jit_code_hash_init (MonoInternalHashTable *jit_code_hash) MONO_INTERNAL;
249
250 MonoAppDomain *
251 ves_icall_System_AppDomain_getCurDomain            (void) MONO_INTERNAL;
252
253 MonoAppDomain *
254 ves_icall_System_AppDomain_getRootDomain           (void) MONO_INTERNAL;
255
256 MonoAppDomain *
257 ves_icall_System_AppDomain_createDomain            (MonoString         *friendly_name,
258                                                     MonoAppDomainSetup *setup) MONO_INTERNAL;
259
260 MonoObject *
261 ves_icall_System_AppDomain_GetData                 (MonoAppDomain *ad, 
262                                                     MonoString    *name) MONO_INTERNAL;
263
264 MonoReflectionAssembly *
265 ves_icall_System_AppDomain_LoadAssemblyRaw         (MonoAppDomain *ad,
266                                                     MonoArray *raw_assembly, 
267                                                     MonoArray *raw_symbol_store,
268                                                     MonoObject *evidence,
269                                                     MonoBoolean refonly) MONO_INTERNAL;
270
271 void
272 ves_icall_System_AppDomain_SetData                 (MonoAppDomain *ad, 
273                                                     MonoString    *name, 
274                                                     MonoObject    *data) MONO_INTERNAL;
275
276 MonoAppDomainSetup *
277 ves_icall_System_AppDomain_getSetup                (MonoAppDomain *ad) MONO_INTERNAL;
278
279 MonoString *
280 ves_icall_System_AppDomain_getFriendlyName         (MonoAppDomain *ad) MONO_INTERNAL;
281
282 MonoArray *
283 ves_icall_System_AppDomain_GetAssemblies           (MonoAppDomain *ad,
284                                                     MonoBoolean refonly) MONO_INTERNAL;
285
286 MonoReflectionAssembly *
287 ves_icall_System_Reflection_Assembly_LoadFrom      (MonoString *fname,
288                                                     MonoBoolean refonly) MONO_INTERNAL;
289
290 MonoReflectionAssembly *
291 ves_icall_System_AppDomain_LoadAssembly            (MonoAppDomain *ad, 
292                                                     MonoString *assRef,
293                                                     MonoObject    *evidence,
294                                                     MonoBoolean refonly) MONO_INTERNAL;
295
296 gboolean
297 ves_icall_System_AppDomain_InternalIsFinalizingForUnload (gint32 domain_id) MONO_INTERNAL;
298
299 void
300 ves_icall_System_AppDomain_InternalUnload          (gint32 domain_id) MONO_INTERNAL;
301
302 gint32
303 ves_icall_System_AppDomain_ExecuteAssembly         (MonoAppDomain *ad, 
304                                                     MonoString    *file, 
305                                                     MonoObject    *evidence,
306                                                     MonoArray     *args) MONO_INTERNAL;
307
308 MonoAppDomain * 
309 ves_icall_System_AppDomain_InternalSetDomain       (MonoAppDomain *ad) MONO_INTERNAL;
310
311 MonoAppDomain * 
312 ves_icall_System_AppDomain_InternalSetDomainByID   (gint32 domainid) MONO_INTERNAL;
313
314 void
315 ves_icall_System_AppDomain_InternalPushDomainRef (MonoAppDomain *ad) MONO_INTERNAL;
316
317 void
318 ves_icall_System_AppDomain_InternalPushDomainRefByID (gint32 domain_id) MONO_INTERNAL;
319
320 void
321 ves_icall_System_AppDomain_InternalPopDomainRef (void) MONO_INTERNAL;
322
323 MonoAppContext * 
324 ves_icall_System_AppDomain_InternalGetContext      (void) MONO_INTERNAL;
325
326 MonoAppContext * 
327 ves_icall_System_AppDomain_InternalGetDefaultContext      (void) MONO_INTERNAL;
328
329 MonoAppContext * 
330 ves_icall_System_AppDomain_InternalSetContext      (MonoAppContext *mc) MONO_INTERNAL;
331
332 gint32 
333 ves_icall_System_AppDomain_GetIDFromDomain (MonoAppDomain * ad) MONO_INTERNAL;
334
335 MonoString *
336 ves_icall_System_AppDomain_InternalGetProcessGuid (MonoString* newguid) MONO_INTERNAL;
337
338 MonoAssembly *
339 mono_assembly_load_corlib (const MonoRuntimeInfo *runtime, MonoImageOpenStatus *status) MONO_INTERNAL;
340
341 const MonoRuntimeInfo*
342 mono_get_runtime_info (void) MONO_INTERNAL;
343
344 gboolean
345 mono_assembly_name_parse (const char *name, MonoAssemblyName *aname) MONO_INTERNAL;
346
347 void
348 mono_assembly_name_free (MonoAssemblyName *aname) MONO_INTERNAL;
349
350 MonoImage *mono_assembly_open_from_bundle (const char *filename,
351                                            MonoImageOpenStatus *status,
352                                            gboolean refonly) MONO_INTERNAL;
353
354 void
355 mono_domain_add_class_static_data (MonoDomain *domain, MonoClass *klass, gpointer data, guint32 *bitmap);
356
357 MonoReflectionAssembly *
358 mono_try_assembly_resolve (MonoDomain *domain, MonoString *fname, gboolean refonly) MONO_INTERNAL;
359
360 MonoAssembly* mono_assembly_load_full_nosearch (MonoAssemblyName *aname, 
361                                                 const char       *basedir, 
362                                                 MonoImageOpenStatus *status,
363                                                 gboolean refonly) MONO_INTERNAL;
364
365 #endif /* __MONO_METADATA_DOMAIN_INTERNALS_H__ */