X-Git-Url: http://wien.tomnetworks.com/gitweb/?a=blobdiff_plain;f=mono%2Fmetadata%2Fdomain-internals.h;h=bb267cdf85a17a5ddd93ac0ab9185c40bad295fe;hb=15a72b59fc8f677df5577b75ca983bd2cb799014;hp=37402a55abe059731209345efb67bc12d2e19503;hpb=93703b4ef8bdcf1d6cf336e14f534454221730c5;p=mono.git diff --git a/mono/metadata/domain-internals.h b/mono/metadata/domain-internals.h index 37402a55abe..bb267cdf85a 100644 --- a/mono/metadata/domain-internals.h +++ b/mono/metadata/domain-internals.h @@ -5,12 +5,23 @@ #define __MONO_METADATA_DOMAIN_INTERNALS_H__ #include +#include #include #include #include +#include #include extern CRITICAL_SECTION mono_delegate_section; +extern CRITICAL_SECTION mono_strtod_mutex; + +/* + * If this is set, the memory belonging to appdomains is not freed when a domain is + * unloaded, and assemblies loaded by the appdomain are not unloaded either. This + * allows us to use typed gc in non-default appdomains too, leading to increased + * performance. + */ +extern gboolean mono_dont_free_domains; /* This is a copy of System.AppDomainSetup */ typedef struct { @@ -30,9 +41,35 @@ typedef struct { int loader_optimization; MonoBoolean disallow_binding_redirects; MonoBoolean disallow_code_downloads; + MonoObject *activation_arguments; /* it is System.Object in 1.x, ActivationArguments in 2.0 */ + MonoObject *domain_initializer; + MonoArray *domain_initializer_args; + MonoObject *application_trust; /* it is System.Object in 1.x, ApplicationTrust in 2.0 */ + MonoBoolean disallow_appbase_probe; + MonoArray *configuration_bytes; } MonoAppDomainSetup; -typedef GArray MonoJitInfoTable; +typedef struct _MonoJitInfoTable MonoJitInfoTable; +typedef struct _MonoJitInfoTableChunk MonoJitInfoTableChunk; + +#define MONO_JIT_INFO_TABLE_CHUNK_SIZE 64 + +struct _MonoJitInfoTableChunk +{ + int refcount; + volatile int num_elements; + volatile gint8 *last_code_end; + MonoJitInfo * volatile data [MONO_JIT_INFO_TABLE_CHUNK_SIZE]; +}; + +struct _MonoJitInfoTable +{ + MonoDomain *domain; + int num_chunks; + MonoJitInfoTableChunk *chunks [MONO_ZERO_LEN_ARRAY]; +}; + +typedef GArray MonoAotModuleInfoTable; typedef struct { guint32 flags; @@ -46,12 +83,35 @@ typedef struct { } data; } MonoJitExceptionInfo; +/* + * Will contain information on the generic type arguments in the + * future. For now, all arguments are always reference types. + */ +typedef struct { + int dummy; +} MonoGenericSharingContext; + +typedef struct +{ + MonoGenericSharingContext *generic_sharing_context; + gint32 this_offset; + guint8 this_reg; + gboolean has_this:1; + gboolean this_in_reg:1; +} MonoGenericJitInfo; + struct _MonoJitInfo { + /* NOTE: These first two elements (method and + next_jit_code_hash) must be in the same order and at the + same offset as in RuntimeMethod, because of the jit_code_hash + internal hash table in MonoDomain. */ MonoMethod *method; + struct _MonoJitInfo *next_jit_code_hash; gpointer code_start; + /* This might contain an id for the unwind info instead of a register mask */ guint32 used_regs; int code_size; - guint32 num_clauses:24; + guint32 num_clauses:15; /* Whenever the code is domain neutral or 'shared' */ gboolean domain_neutral:1; gboolean cas_inited:1; @@ -61,14 +121,17 @@ struct _MonoJitInfo { gboolean cas_method_assert:1; gboolean cas_method_deny:1; gboolean cas_method_permitonly:1; + gboolean has_generic_jit_info:1; + gboolean from_aot:1; + gboolean from_llvm:1; +#ifdef HAVE_SGEN_GC + /* FIXME: Embed this after the structure later */ + gpointer gc_info; +#endif MonoJitExceptionInfo clauses [MONO_ZERO_LEN_ARRAY]; + /* There is an optional MonoGenericJitInfo after the clauses */ }; -typedef struct { - MonoJitInfo *ji; - MonoCodeManager *code_mp; -} MonoJitDynamicMethodInfo; - struct _MonoAppContext { MonoObject obj; gint32 domain_id; @@ -76,13 +139,34 @@ struct _MonoAppContext { gpointer *static_data; }; +/* + * We have two unloading states because the domain + * must remain fully functional while AppDomain::DomainUnload is + * processed. + * After that unloading began and all domain facilities are teared down + * such as execution of new threadpool jobs. + */ typedef enum { MONO_APPDOMAIN_CREATED, + MONO_APPDOMAIN_UNLOADING_START, MONO_APPDOMAIN_UNLOADING, MONO_APPDOMAIN_UNLOADED } MonoAppDomainState; +typedef struct _MonoThunkFreeList { + guint32 size; + int length; /* only valid for the wait list */ + struct _MonoThunkFreeList *next; +} MonoThunkFreeList; + +typedef struct _MonoJitCodeHash MonoJitCodeHash; + struct _MonoDomain { + /* + * This lock must never be taken before the loader lock, + * i.e. if both are taken by the same thread, the loader lock + * must taken first. + */ CRITICAL_SECTION lock; MonoMemPool *mp; MonoCodeManager *code_mp; @@ -97,6 +181,12 @@ struct _MonoDomain { MonoException *out_of_memory_ex; MonoException *null_reference_ex; MonoException *stack_overflow_ex; + /* typeof (void) */ + MonoObject *typeof_void; + /* + * The fields between FIRST_GC_TRACKED and LAST_GC_TRACKED are roots, but + * not object references. + */ #define MONO_DOMAIN_FIRST_GC_TRACKED env MonoGHashTable *env; MonoGHashTable *ldstr_table; @@ -113,35 +203,66 @@ struct _MonoDomain { guint32 state; /* Needed by Thread:GetDomainID() */ gint32 domain_id; + gint32 shadow_serial; + unsigned char inet_family_hint; // used in socket-io.c as a cache GSList *domain_assemblies; MonoAssembly *entry_assembly; char *friendly_name; GHashTable *class_vtable_hash; /* maps remote class key -> MonoRemoteClass */ GHashTable *proxy_vtable_hash; - GHashTable *jit_code_hash; - /* maps MonoMethod -> MonoJitDynamicMethodInfo */ - GHashTable *dynamic_code_hash; - MonoJitInfoTable *jit_info_table; + /* Protected by 'jit_code_hash_lock' */ + MonoInternalHashTable jit_code_hash; + CRITICAL_SECTION jit_code_hash_lock; + int num_jit_info_tables; + MonoJitInfoTable * + volatile jit_info_table; + GSList *jit_info_free_queue; /* Used when loading assemblies */ gchar **search_path; + gchar *private_bin_path; + /* Used by remoting proxies */ MonoMethod *create_proxy_for_type_method; MonoMethod *private_invoke_method; /* Used to store offsets of thread and context static fields */ GHashTable *special_static_fields; - GHashTable *jump_target_hash; - GHashTable *class_init_trampoline_hash; - GHashTable *jump_trampoline_hash; - GHashTable *jit_trampoline_hash; - GHashTable *delegate_trampoline_hash; /* * This must be a GHashTable, since these objects can't be finalized * if the hashtable contains a GC visible reference to them. */ GHashTable *finalizable_objects_hash; +#ifndef HAVE_SGEN_GC + /* Maps MonoObjects to a GSList of WeakTrackResurrection GCHandles pointing to them */ + GHashTable *track_resurrection_objects_hash; + /* Maps WeakTrackResurrection GCHandles to the MonoObjects they point to */ + GHashTable *track_resurrection_handles_hash; +#endif + /* Protects the three hashes above */ + CRITICAL_SECTION finalizable_objects_hash_lock; /* Used when accessing 'domain_assemblies' */ CRITICAL_SECTION assemblies_lock; + + GHashTable *method_rgctx_hash; + + GHashTable *generic_virtual_cases; + MonoThunkFreeList **thunk_free_lists; + + /* Information maintained by the JIT engine */ + gpointer runtime_info; + + /*thread pool jobs, used to coordinate shutdown.*/ + int threadpool_jobs; + HANDLE cleanup_semaphore; + + /* Contains the compiled runtime invoke wrapper used by finalizers */ + gpointer finalize_runtime_invoke; + + /* Contains the compiled runtime invoke wrapper used by async resylt creation to capture thread context*/ + gpointer capture_context_runtime_invoke; + + /* Contains the compiled method used by async resylt creation to capture thread context*/ + gpointer capture_context_method; }; typedef struct { @@ -155,14 +276,40 @@ typedef struct { const AssemblyVersionSet version_sets [2]; } MonoRuntimeInfo; -#define mono_domain_lock(domain) EnterCriticalSection(&(domain)->lock) -#define mono_domain_unlock(domain) LeaveCriticalSection(&(domain)->lock) -#define mono_domain_assemblies_lock(domain) EnterCriticalSection(&(domain)->assemblies_lock) -#define mono_domain_assemblies_unlock(domain) LeaveCriticalSection(&(domain)->assemblies_lock) +#define mono_domain_lock(domain) mono_locks_acquire(&(domain)->lock, DomainLock) +#define mono_domain_unlock(domain) mono_locks_release(&(domain)->lock, DomainLock) +#define mono_domain_assemblies_lock(domain) mono_locks_acquire(&(domain)->assemblies_lock, DomainAssembliesLock) +#define mono_domain_assemblies_unlock(domain) mono_locks_release(&(domain)->assemblies_lock, DomainAssembliesLock) +#define mono_domain_jit_code_hash_lock(domain) mono_locks_acquire(&(domain)->jit_code_hash_lock, DomainJitCodeHashLock) +#define mono_domain_jit_code_hash_unlock(domain) mono_locks_release(&(domain)->jit_code_hash_lock, DomainJitCodeHashLock) + +typedef MonoDomain* (*MonoLoadFunc) (const char *filename, const char *runtime_version); + +void +mono_install_runtime_load (MonoLoadFunc func) MONO_INTERNAL; + +MonoDomain* +mono_runtime_load (const char *filename, const char *runtime_version) MONO_INTERNAL; + +typedef void (*MonoCreateDomainFunc) (MonoDomain *domain); + +void +mono_install_create_domain_hook (MonoCreateDomainFunc func) MONO_INTERNAL; + +typedef void (*MonoFreeDomainFunc) (MonoDomain *domain); + +void +mono_install_free_domain_hook (MonoFreeDomainFunc func) MONO_INTERNAL; + +void +mono_init_com_types (void) MONO_INTERNAL; void mono_cleanup (void) MONO_INTERNAL; +void +mono_close_exe_image (void) MONO_INTERNAL; + void mono_jit_info_table_add (MonoDomain *domain, MonoJitInfo *ji) MONO_INTERNAL; @@ -172,6 +319,45 @@ mono_jit_info_table_remove (MonoDomain *domain, MonoJitInfo *ji) MONO_INTERNAL; void mono_jit_info_add_aot_module (MonoImage *image, gpointer start, gpointer end) MONO_INTERNAL; +MonoGenericJitInfo* +mono_jit_info_get_generic_jit_info (MonoJitInfo *ji) MONO_INTERNAL; + +MonoGenericSharingContext* +mono_jit_info_get_generic_sharing_context (MonoJitInfo *ji) MONO_INTERNAL; + +void +mono_jit_info_set_generic_sharing_context (MonoJitInfo *ji, MonoGenericSharingContext *gsctx) MONO_INTERNAL; + +MonoJitInfo* +mono_domain_lookup_shared_generic (MonoDomain *domain, MonoMethod *method) MONO_INTERNAL; + +char * +mono_make_shadow_copy (const char *filename) MONO_INTERNAL; + +gboolean +mono_is_shadow_copy_enabled (MonoDomain *domain, const gchar *dir_name) MONO_INTERNAL; + +gpointer +mono_domain_alloc (MonoDomain *domain, guint size) MONO_INTERNAL; + +gpointer +mono_domain_alloc0 (MonoDomain *domain, guint size) MONO_INTERNAL; + +void* +mono_domain_code_reserve (MonoDomain *domain, int size) MONO_INTERNAL; + +void* +mono_domain_code_reserve_align (MonoDomain *domain, int size, int alignment) MONO_INTERNAL; + +void +mono_domain_code_commit (MonoDomain *domain, void *data, int size, int newsize) MONO_INTERNAL; + +void +mono_domain_code_foreach (MonoDomain *domain, MonoCodeManagerFunc func, void *user_data) MONO_INTERNAL; + +void +mono_domain_set_internal_with_options (MonoDomain *domain, gboolean migrate_exception) MONO_INTERNAL; + /* * Installs a new function which is used to return a MonoJitInfo for a method inside * an AOT module. @@ -179,6 +365,9 @@ mono_jit_info_add_aot_module (MonoImage *image, gpointer start, gpointer end) MO typedef MonoJitInfo *(*MonoJitInfoFindInAot) (MonoDomain *domain, MonoImage *image, gpointer addr); void mono_install_jit_info_find_in_aot (MonoJitInfoFindInAot func) MONO_INTERNAL; +void +mono_jit_code_hash_init (MonoInternalHashTable *jit_code_hash) MONO_INTERNAL; + MonoAppDomain * ves_icall_System_AppDomain_getCurDomain (void) MONO_INTERNAL; @@ -233,9 +422,8 @@ ves_icall_System_AppDomain_InternalUnload (gint32 domain_id) MONO_INTER gint32 ves_icall_System_AppDomain_ExecuteAssembly (MonoAppDomain *ad, - MonoString *file, - MonoObject *evidence, - MonoArray *args) MONO_INTERNAL; + MonoReflectionAssembly *refass, + MonoArray *args) MONO_INTERNAL; MonoAppDomain * ves_icall_System_AppDomain_InternalSetDomain (MonoAppDomain *ad) MONO_INTERNAL; @@ -273,13 +461,37 @@ mono_assembly_load_corlib (const MonoRuntimeInfo *runtime, MonoImageOpenStatus * const MonoRuntimeInfo* mono_get_runtime_info (void) MONO_INTERNAL; +void +mono_runtime_set_no_exec (gboolean val) MONO_INTERNAL; + +gboolean +mono_runtime_get_no_exec (void) MONO_INTERNAL; + gboolean mono_assembly_name_parse (const char *name, MonoAssemblyName *aname) MONO_INTERNAL; void mono_assembly_name_free (MonoAssemblyName *aname) MONO_INTERNAL; +MonoImage *mono_assembly_open_from_bundle (const char *filename, + MonoImageOpenStatus *status, + gboolean refonly) MONO_INTERNAL; + void mono_domain_add_class_static_data (MonoDomain *domain, MonoClass *klass, gpointer data, guint32 *bitmap); +MonoReflectionAssembly * +mono_try_assembly_resolve (MonoDomain *domain, MonoString *fname, gboolean refonly) MONO_INTERNAL; + +MonoAssembly* mono_assembly_load_full_nosearch (MonoAssemblyName *aname, + const char *basedir, + MonoImageOpenStatus *status, + gboolean refonly) MONO_INTERNAL; + +void mono_set_private_bin_path_from_config (MonoDomain *domain) MONO_INTERNAL; + +int mono_framework_version (void) MONO_INTERNAL; + +void mono_reflection_cleanup_domain (MonoDomain *domain) MONO_INTERNAL; + #endif /* __MONO_METADATA_DOMAIN_INTERNALS_H__ */