#define _MONO_CLI_OBJECT_H_
#include <mono/metadata/class.h>
-#include <mono/metadata/threads-types.h>
-
-#if 1
-#define mono_assert(expr) G_STMT_START{ \
- if (!(expr)) \
- { \
- MonoException *ex; \
- char *msg = g_strdup_printf ("file %s: line %d (%s): " \
- "assertion failed: (%s)", __FILE__, __LINE__, \
- __PRETTY_FUNCTION__, #expr); \
- ex = mono_get_exception_execution_engine (msg); \
- g_free (msg); \
- mono_raise_exception (ex); \
- }; }G_STMT_END
-
-#define mono_assert_not_reached() G_STMT_START{ \
- MonoException *ex; \
- char *msg = g_strdup_printf ("file %s: line %d (%s): " \
- "should not be reached", __FILE__, __LINE__, __PRETTY_FUNCTION__); \
- ex = mono_get_exception_execution_engine (msg); \
- g_free (msg); \
- mono_raise_exception (ex); \
-}G_STMT_END
-#else
-#define mono_assert(expr) g_assert(expr)
-#define mono_assert_not_reached() g_assert_not_reached()
-#endif
-
-#define MONO_CHECK_ARG(arg, expr) G_STMT_START{ \
- if (!(expr)) \
- { \
- MonoException *ex; \
- char *msg = g_strdup_printf ("assertion `%s' failed", \
- #expr); \
- if (arg) {} /* check if the name exists */ \
- ex = mono_get_exception_argument (#arg, msg); \
- g_free (msg); \
- mono_raise_exception (ex); \
- }; }G_STMT_END
-
-#define MONO_CHECK_ARG_NULL(arg) G_STMT_START{ \
- if (arg == NULL) \
- { \
- MonoException *ex; \
- if (arg) {} /* check if the name exists */ \
- ex = mono_get_exception_argument_null (#arg); \
- mono_raise_exception (ex); \
- }; }G_STMT_END
typedef guchar MonoBoolean;
+typedef struct _MonoReflectionMethod MonoReflectionMethod;
+typedef struct _MonoReflectionAssembly MonoReflectionAssembly;
+typedef struct _MonoReflectionModule MonoReflectionModule;
+typedef struct _MonoReflectionField MonoReflectionField;
+typedef struct _MonoReflectionProperty MonoReflectionProperty;
+typedef struct _MonoReflectionEvent MonoReflectionEvent;
+typedef struct _MonoReflectionType MonoReflectionType;
+typedef struct _MonoDelegate MonoDelegate;
+typedef struct _MonoException MonoException;
+typedef struct _MonoThreadsSync MonoThreadsSync;
+typedef struct _MonoThread MonoThread;
+typedef struct _MonoDynamicAssembly MonoDynamicAssembly;
+typedef struct _MonoDynamicImage MonoDynamicImage;
+
typedef struct {
MonoVTable *vtable;
MonoThreadsSync *synchronisation;
typedef struct {
MonoObject obj;
+ /* bounds is NULL for szarrays */
MonoArrayBounds *bounds;
- /* used by single dimensional arrays to speed up bound checking */
+ /* total number of elements of the array */
guint32 max_length;
/* we use double to ensure proper alignment on platforms that need it */
double vector [MONO_ZERO_LEN_ARRAY];
} MonoArray;
typedef struct {
- MonoObject obj;
- MonoArray *c_str;
+ MonoObject object;
gint32 length;
+ gunichar2 chars [MONO_ZERO_LEN_ARRAY];
} MonoString;
-typedef struct {
- MonoObject object;
- MonoObject *inner_ex;
- MonoString *message;
- MonoString *help_link;
- MonoString *class_name;
- MonoString *stack_trace;
- gint32 hresult;
- MonoString *source;
-} MonoException;
+typedef MonoObject* (*MonoInvokeFunc) (MonoMethod *method, void *obj, void **params, MonoObject **exc);
+typedef gpointer (*MonoCompileFunc) (MonoMethod *method);
+typedef void (*MonoMainThreadFunc) (gpointer user_data);
-typedef struct {
- MonoException base;
-} MonoSystemException;
-
-typedef struct {
- MonoSystemException base;
- MonoString *param_name;
-} MonoArgumentException;
+#define mono_object_class(obj) (((MonoObject*)(obj))->vtable->klass)
+#define mono_object_domain(obj) (((MonoObject*)(obj))->vtable->domain)
-typedef struct {
- MonoObject object;
- MonoObject *target_type;
- MonoObject *target;
- MonoString *method;
- gpointer method_ptr;
-} MonoDelegate;
-
-typedef void (*MonoRuntimeObjectInit) (MonoObject *o);
-typedef gint32 (*MonoRuntimeExecMain) (MonoMethod *method, MonoArray *args);
-
-extern MonoRuntimeObjectInit mono_runtime_object_init;
-extern MonoRuntimeExecMain mono_runtime_exec_main;
-
-#define mono_array_length(array) ((array)->bounds->length)
+#define mono_array_length(array) ((array)->max_length)
#define mono_array_addr(array,type,index) ( ((char*)(array)->vector) + sizeof (type) * (index) )
#define mono_array_addr_with_size(array,size,index) ( ((char*)(array)->vector) + (size) * (index) )
#define mono_array_get(array,type,index) ( *(type*)mono_array_addr ((array), type, (index)) )
*__p = (value); \
} while (0)
-#define mono_string_chars(s) ((gushort*)(s)->c_str->vector)
+#define mono_string_chars(s) ((gunichar2*)(s)->chars)
+#define mono_string_length(s) ((s)->length)
+
+MonoObject *
+mono_object_new (MonoDomain *domain, MonoClass *klass);
+
+MonoObject *
+mono_object_new_specific (MonoVTable *vtable);
-void *
-mono_object_allocate (size_t size);
+/* can be used for classes without finalizer in non-profiling mode */
+MonoObject *
+mono_object_new_fast (MonoVTable *vtable);
MonoObject *
-mono_object_new (MonoDomain *domain, MonoClass *klass);
+mono_object_new_alloc_specific (MonoVTable *vtable);
+
+void*
+mono_class_get_allocation_ftn (MonoVTable *vtable, gboolean *pass_size_in_words);
MonoObject *
mono_object_new_from_token (MonoDomain *domain, MonoImage *image, guint32 token);
MonoArray*
-mono_array_new (MonoDomain *domain, MonoClass *eclass, guint32 n);
+mono_array_new (MonoDomain *domain, MonoClass *eclass, guint32 n);
MonoArray*
-mono_array_new_full (MonoDomain *domain, MonoClass *array_class,
+mono_array_new_full (MonoDomain *domain, MonoClass *array_class,
guint32 *lengths, guint32 *lower_bounds);
+MonoArray *
+mono_array_new_specific (MonoVTable *vtable, guint32 n);
+
MonoArray*
-mono_array_clone (MonoArray *array);
+mono_array_clone (MonoArray *array);
MonoString*
-mono_string_new_utf16 (MonoDomain *domain, const guint16 *text, gint32 len);
+mono_string_new_utf16 (MonoDomain *domain, const guint16 *text, gint32 len);
MonoString*
-mono_ldstr (MonoDomain *domain, MonoImage *image, guint32 index);
+mono_string_new_size (MonoDomain *domain, gint32 len);
MonoString*
-mono_string_is_interned (MonoString *str);
+mono_ldstr (MonoDomain *domain, MonoImage *image, guint32 str_index);
MonoString*
-mono_string_intern (MonoString *str);
+mono_string_is_interned (MonoString *str);
MonoString*
-mono_string_new (MonoDomain *domain, const char *text);
+mono_string_intern (MonoString *str);
MonoString*
-mono_string_new_len (MonoDomain *domain, const char *text, guint length);
+mono_string_new (MonoDomain *domain, const char *text);
-char *
-mono_string_to_utf8 (MonoString *string_obj);
+MonoString*
+mono_string_new_wrapper (const char *text);
+
+MonoString*
+mono_string_new_len (MonoDomain *domain, const char *text, guint length);
char *
-mono_string_to_utf16 (MonoString *string_obj);
+mono_string_to_utf8 (MonoString *string_obj);
+
+gunichar2 *
+mono_string_to_utf16 (MonoString *string_obj);
-void
-mono_object_free (MonoObject *o);
+MonoString *
+mono_string_from_utf16 (gunichar2 *data);
MonoObject *
-mono_value_box (MonoDomain *domain, MonoClass *klass, gpointer val);
-
+mono_value_box (MonoDomain *domain, MonoClass *klass, gpointer val);
+
+MonoDomain*
+mono_object_get_domain (MonoObject *obj);
+
+MonoClass*
+mono_object_get_class (MonoObject *obj);
+
+gpointer
+mono_object_unbox (MonoObject *obj);
+
MonoObject *
-mono_object_clone (MonoObject *obj);
+mono_object_clone (MonoObject *obj);
MonoObject *
-mono_object_isinst (MonoObject *obj, MonoClass *klass);
+mono_object_isinst (MonoObject *obj, MonoClass *klass);
-typedef void (*MonoExceptionFunc) (MonoException *ex);
+MonoObject *
+mono_object_isinst_mbyref (MonoObject *obj, MonoClass *klass);
+
+MonoObject *
+mono_object_castclass_mbyref (MonoObject *obj, MonoClass *klass);
+
+gboolean
+mono_monitor_try_enter (MonoObject *obj, guint32 ms);
+
+gboolean
+mono_monitor_enter (MonoObject *obj);
+
+void
+mono_monitor_exit (MonoObject *obj);
void
-mono_install_handler (MonoExceptionFunc func);
+mono_raise_exception (MonoException *ex);
void
-mono_raise_exception (MonoException *ex);
+mono_runtime_object_init (MonoObject *this_obj);
void
-mono_install_runtime_object_init (MonoRuntimeObjectInit func);
+mono_runtime_class_init (MonoVTable *vtable);
+
+MonoMethod*
+mono_object_get_virtual_method (MonoObject *obj, MonoMethod *method);
+
+MonoObject*
+mono_runtime_invoke (MonoMethod *method, void *obj, void **params,
+ MonoObject **exc);
+
+MonoMethod *
+mono_get_delegate_invoke (MonoClass *klass);
+
+MonoObject*
+mono_runtime_delegate_invoke (MonoObject *delegate, void **params,
+ MonoObject **exc);
+
+MonoObject*
+mono_runtime_invoke_array (MonoMethod *method, void *obj, MonoArray *params,
+ MonoObject **exc);
+
+MonoArray*
+mono_runtime_get_main_args (void);
+
+void
+mono_runtime_exec_managed_code (MonoDomain *domain,
+ MonoMainThreadFunc main_func,
+ gpointer main_args);
+
+int
+mono_runtime_run_main (MonoMethod *method, int argc, char* argv[],
+ MonoObject **exc);
+
+int
+mono_runtime_exec_main (MonoMethod *method, MonoArray *args,
+ MonoObject **exc);
+
+gpointer
+mono_load_remote_field (MonoObject *this_obj, MonoClass *klass, MonoClassField *field, gpointer *res);
+
+MonoObject *
+mono_load_remote_field_new (MonoObject *this_obj, MonoClass *klass, MonoClassField *field);
+
+void
+mono_store_remote_field (MonoObject *this_obj, MonoClass *klass, MonoClassField *field, gpointer val);
+
+void
+mono_store_remote_field_new (MonoObject *this_obj, MonoClass *klass, MonoClassField *field, MonoObject *arg);
+
+void
+mono_unhandled_exception (MonoObject *exc);
void
-mono_install_runtime_exec_main (MonoRuntimeExecMain func);
+mono_print_unhandled_exception (MonoObject *exc);
+
+gpointer
+mono_compile_method (MonoMethod *method);
+
+MonoRemoteClass*
+mono_remote_class (MonoDomain *domain, MonoString *class_name, MonoClass *proxy_class);
+
+void
+mono_upgrade_remote_class (MonoDomain *domain, MonoRemoteClass *remote_class, MonoClass *klass);
+
+/* accessors for fields and properties */
+void
+mono_field_set_value (MonoObject *obj, MonoClassField *field, void *value);
+
+void
+mono_field_static_set_value (MonoVTable *vt, MonoClassField *field, void *value);
+
+void
+mono_field_get_value (MonoObject *obj, MonoClassField *field, void *value);
+
+void
+mono_field_static_get_value (MonoVTable *vt, MonoClassField *field, void *value);
+
+MonoObject *
+mono_field_get_value_object (MonoDomain *domain, MonoClassField *field, MonoObject *obj);
+
+void
+mono_property_set_value (MonoProperty *prop, void *obj, void **params, MonoObject **exc);
+
+MonoObject*
+mono_property_get_value (MonoProperty *prop, void *obj, void **params, MonoObject **exc);
+
+/* GC handles support */
+guint32 mono_gchandle_new (MonoObject *obj, gboolean pinned);
+guint32 mono_gchandle_new_weakref (MonoObject *obj, gboolean track_resurrection);
+MonoObject* mono_gchandle_get_target (guint32 gchandle);
+void mono_gchandle_free (guint32 gchandle);
#endif
projects / mono.git / blobdiff