#define __MONO_METADATA_DOMAIN_INTERNALS_H__
#include <mono/metadata/appdomain.h>
+#include <mono/metadata/lock-tracer.h>
#include <mono/utils/mono-codeman.h>
#include <mono/utils/mono-hash.h>
#include <mono/utils/mono-compiler.h>
+#include <mono/utils/mono-internal-hash.h>
#include <mono/io-layer/io-layer.h>
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 {
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;
} 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;
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;
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;
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;
MonoGHashTable *type_init_exception_hash;
/* maps delegate trampoline addr -> delegate object */
MonoGHashTable *delegate_hash_table;
-#define MONO_DOMAIN_LAST_GC_TRACKED delegate_hash_table
+ /* typeof (void) */
+ MonoObject *typeof_void;
+#define MONO_DOMAIN_LAST_GC_TRACKED typeof_void
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;
/* 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;
};
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;
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;
+
/*
* Installs a new function which is used to return a MonoJitInfo for a method inside
* an AOT module.
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;
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;
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;
+
#endif /* __MONO_METADATA_DOMAIN_INTERNALS_H__ */
projects / mono.git / blobdiff