mono/metadata/object.h

   1 #ifndef _MONO_CLI_OBJECT_H_
   2 #define _MONO_CLI_OBJECT_H_
   3
   4 #include <mono/metadata/class.h>
   5 #include <mono/metadata/threads-types.h>
   6
   7 #if 1
   8 #define mono_assert(expr)                  G_STMT_START{                  \
   9      if (!(expr))                                                         \
  10        {                                                                  \
  11                 MonoException *ex;                                        \
  12                 char *msg = g_strdup_printf ("file %s: line %d (%s): "    \
  13                 "assertion failed: (%s)", __FILE__, __LINE__,             \
  14                 __PRETTY_FUNCTION__, #expr);                              \
  15                 ex = mono_get_exception_execution_engine (msg);           \
  16                 g_free (msg);                                             \
  17                 mono_raise_exception (ex);                                \
  18        };                               }G_STMT_END
  19
  20 #define mono_assert_not_reached()                 G_STMT_START{           \
  21      MonoException *ex;                                                   \
  22      char *msg = g_strdup_printf ("file %s: line %d (%s): "               \
  23      "should not be reached", __FILE__, __LINE__, __PRETTY_FUNCTION__);   \
  24      ex = mono_get_exception_execution_engine (msg);                      \
  25      g_free (msg);                                                        \
  26      mono_raise_exception (ex);                                           \
  27 }G_STMT_END
  28 #else
  29 #define mono_assert(expr) g_assert(expr)
  30 #define mono_assert_not_reached() g_assert_not_reached()
  31 #endif
  32
  33 #define MONO_CHECK_ARG(arg, expr)               G_STMT_START{             \
  34      if (!(expr))                                                         \
  35        {                                                                  \
  36                 MonoException *ex;                                        \
  37                 char *msg = g_strdup_printf ("assertion `%s' failed",     \
  38                 #expr);                                                   \
  39                 if (arg) {} /* check if the name exists */                \
  40                 ex = mono_get_exception_argument (#arg, msg);             \
  41                 g_free (msg);                                             \
  42                 mono_raise_exception (ex);                                \
  43        };                               }G_STMT_END
  44
  45 #define MONO_CHECK_ARG_NULL(arg)            G_STMT_START{                 \
  46      if (arg == NULL)                                                     \
  47        {                                                                  \
  48                 MonoException *ex;                                        \
  49                 if (arg) {} /* check if the name exists */                \
  50                 ex = mono_get_exception_argument_null (#arg);             \
  51                 mono_raise_exception (ex);                                \
  52        };                               }G_STMT_END
  53
  54 typedef guchar MonoBoolean;
  55
  56 typedef struct _MonoReflectionMethod MonoReflectionMethod;
  57 typedef struct _MonoDelegate MonoDelegate;
  58
  59 typedef struct {
  60         MonoVTable *vtable;
  61         MonoThreadsSync *synchronisation;
  62 } MonoObject;
  63
  64 typedef struct {
  65         MonoObject obj;
  66         MonoObject *identity;
  67 } MonoMarshalByRefObject;
  68
  69 typedef struct {
  70         guint32 length;
  71         guint32 lower_bound;
  72 } MonoArrayBounds;
  73
  74 typedef struct {
  75         MonoObject obj;
  76         /* bounds is NULL for szarrays */
  77         MonoArrayBounds *bounds;
  78         /* total number of elements of the array */
  79         guint32 max_length;
  80         /* we use double to ensure proper alignment on platforms that need it */
  81         double vector [MONO_ZERO_LEN_ARRAY];
  82 } MonoArray;
  83
  84 typedef struct {
  85         MonoObject object;
  86         gint32 length;
  87         gunichar2 chars [MONO_ZERO_LEN_ARRAY];
  88 } MonoString;
  89
  90 typedef struct {
  91         MonoObject object;
  92         gint32 capacity;
  93         gint32 length;
  94         MonoArray *chars;
  95 } MonoStringBuilder;
  96
  97 typedef struct {
  98         MonoObject object;
  99         MonoType  *type;
 100 } MonoReflectionType;
 101
 102 typedef struct {
 103         MonoObject object;
 104         MonoArray  *trace_ips;
 105         MonoObject *inner_ex;
 106         MonoString *message;
 107         MonoString *help_link;
 108         MonoString *class_name;
 109         MonoString *stack_trace;
 110         MonoString *remote_stack_trace;
 111         gint32     *remote_stack_index;
 112         gint32      hresult;
 113         MonoString *source;
 114 } MonoException;
 115
 116 typedef struct {
 117         MonoException base;
 118 } MonoSystemException;
 119
 120 typedef struct {
 121         MonoSystemException base;
 122         MonoString *param_name;
 123 } MonoArgumentException;
 124
 125 typedef struct {
 126         MonoObject   object;
 127         MonoObject  *async_state;
 128         MonoObject  *handle;
 129         MonoObject  *async_delegate;
 130         gpointer     data;
 131         MonoBoolean  sync_completed;
 132         MonoBoolean  completed;
 133         MonoBoolean  endinvoke_called;
 134 } MonoAsyncResult;
 135
 136 typedef struct {
 137         MonoMarshalByRefObject object;
 138         gpointer     handle;
 139         MonoBoolean  disposed;
 140 } MonoWaitHandle;
 141
 142 typedef struct {
 143         MonoObject  object;
 144         MonoReflectionType *class_to_proxy;
 145 } MonoRealProxy;
 146
 147 typedef struct {
 148         MonoObject     object;
 149         MonoRealProxy *rp;
 150         MonoClass     *klass;
 151 } MonoTransparentProxy;
 152
 153 typedef struct {
 154         MonoObject obj;
 155         MonoReflectionMethod *method;
 156         MonoArray  *args;
 157         MonoArray  *names;
 158         MonoArray  *arg_types;
 159         MonoObject *ctx;
 160         MonoObject *rval;
 161         MonoObject *exc;
 162 } MonoMethodMessage;
 163
 164 typedef struct {
 165         MonoObject obj;
 166         gint32 il_offset;
 167         gint32 native_offset;
 168         MonoReflectionMethod *method;
 169         MonoString *filename;
 170         gint32 line;
 171         gint32 column;
 172 } MonoStackFrame;
 173
 174 typedef struct {
 175         MonoObject  obj;
 176         HANDLE      handle;
 177         MonoObject *culture_info;
 178         MonoBoolean threadpool_thread;
 179         guint32     state;
 180         MonoException *abort_exc;
 181         MonoObject *abort_state;
 182         guint32 tid;
 183 } MonoThread;
 184
 185 typedef struct {
 186         MonoString *name;
 187         MonoReflectionType *type;
 188         MonoObject *value;
 189 } MonoSerializationEntry;
 190
 191 typedef struct {
 192         guint32 state;
 193         MonoObject *additional;
 194 } MonoStreamingContext;
 195
 196 typedef MonoObject* (*MonoInvokeFunc)        (MonoMethod *method, void *obj, void **params, MonoObject **exc);
 197 typedef gpointer    (*MonoCompileFunc)       (MonoMethod *method);
 198
 199 #define mono_object_class(obj) (((MonoObject*)(obj))->vtable->klass)
 200 #define mono_object_domain(obj) (((MonoObject*)(obj))->vtable->domain)
 201
 202 #define mono_array_length(array) ((array)->max_length)
 203 #define mono_array_addr(array,type,index) ( ((char*)(array)->vector) + sizeof (type) * (index) )
 204 #define mono_array_addr_with_size(array,size,index) ( ((char*)(array)->vector) + (size) * (index) )
 205 #define mono_array_get(array,type,index) ( *(type*)mono_array_addr ((array), type, (index)) )
 206 #define mono_array_set(array,type,index,value)  \
 207         do {    \
 208                 type *__p = (type *) mono_array_addr ((array), type, (index));  \
 209                 *__p = (value); \
 210         } while (0)
 211
 212 #define mono_string_chars(s) ((gunichar2*)(s)->chars)
 213 #define mono_string_length(s) ((s)->length)
 214
 215 void *
 216 mono_object_allocate        (size_t size);
 217
 218 MonoObject *
 219 mono_object_new             (MonoDomain *domain, MonoClass *klass);
 220
 221 MonoObject *
 222 mono_object_new_specific    (MonoVTable *vtable);
 223
 224 MonoObject *
 225 mono_object_new_from_token  (MonoDomain *domain, MonoImage *image, guint32 token);
 226
 227 MonoArray*
 228 mono_array_new              (MonoDomain *domain, MonoClass *eclass, guint32 n);
 229
 230 MonoArray*
 231 mono_array_new_full         (MonoDomain *domain, MonoClass *array_class,
 232                              guint32 *lengths, guint32 *lower_bounds);
 233
 234 MonoArray *
 235 mono_array_new_specific     (MonoVTable *vtable, guint32 n);
 236
 237 MonoArray*
 238 mono_array_clone            (MonoArray *array);
 239
 240 MonoString*
 241 mono_string_new_utf16       (MonoDomain *domain, const guint16 *text, gint32 len);
 242
 243 MonoString*
 244 mono_string_new_size        (MonoDomain *domain, gint32 len);
 245
 246 MonoString*
 247 mono_ldstr                  (MonoDomain *domain, MonoImage *image, guint32 str_index);
 248
 249 MonoString*
 250 mono_string_is_interned     (MonoString *str);
 251
 252 MonoString*
 253 mono_string_intern          (MonoString *str);
 254
 255 MonoString*
 256 mono_string_new             (MonoDomain *domain, const char *text);
 257
 258 MonoString*
 259 mono_string_new_wrapper     (const char *text);
 260
 261 MonoString*
 262 mono_string_new_len         (MonoDomain *domain, const char *text, guint length);
 263
 264 char *
 265 mono_string_to_utf8         (MonoString *string_obj);
 266
 267 gunichar2 *
 268 mono_string_to_utf16        (MonoString *string_obj);
 269
 270 MonoString *
 271 mono_string_from_utf16      (gunichar2 *data);
 272
 273 void
 274 mono_object_free            (MonoObject *o);
 275
 276 MonoObject *
 277 mono_value_box              (MonoDomain *domain, MonoClass *klass, gpointer val);
 278
 279 MonoObject *
 280 mono_object_clone           (MonoObject *obj);
 281
 282 MonoObject *
 283 mono_object_isinst          (MonoObject *obj, MonoClass *klass);
 284
 285 typedef void (*MonoExceptionFunc) (MonoException *ex);
 286
 287 void
 288 mono_install_handler        (MonoExceptionFunc func);
 289
 290 void
 291 mono_raise_exception        (MonoException *ex);
 292
 293 void
 294 mono_runtime_object_init    (MonoObject *this_obj);
 295
 296 void
 297 mono_runtime_class_init     (MonoClass *klass);
 298
 299 void
 300 mono_install_runtime_invoke (MonoInvokeFunc func);
 301
 302 void
 303 mono_install_compile_method (MonoCompileFunc func);
 304
 305 MonoMethod*
 306 mono_object_get_virtual_method (MonoObject *obj, MonoMethod *method);
 307
 308 MonoObject*
 309 mono_runtime_invoke         (MonoMethod *method, void *obj, void **params,
 310                              MonoObject **exc);
 311
 312 MonoMethod *
 313 mono_get_delegate_invoke    (MonoClass *klass);
 314
 315 MonoObject*
 316 mono_runtime_delegate_invoke (MonoObject *delegate, void **params,
 317                               MonoObject **exc);
 318
 319 MonoObject*
 320 mono_runtime_invoke_array   (MonoMethod *method, void *obj, MonoArray *params,
 321                              MonoObject **exc);
 322
 323 MonoArray*
 324 mono_runtime_get_main_args  (void);
 325
 326 int
 327 mono_runtime_run_main       (MonoMethod *method, int argc, char* argv[],
 328                              MonoObject **exc);
 329
 330 int
 331 mono_runtime_exec_main      (MonoMethod *method, MonoArray *args,
 332                              MonoObject **exc);
 333
 334 MonoAsyncResult *
 335 mono_async_result_new       (MonoDomain *domain, HANDLE handle,
 336                              MonoObject *state, gpointer data);
 337
 338 MonoWaitHandle *
 339 mono_wait_handle_new        (MonoDomain *domain, HANDLE handle);
 340
 341 void
 342 mono_message_init           (MonoDomain *domain, MonoMethodMessage *this_obj,
 343                              MonoReflectionMethod *method, MonoArray *out_args);
 344
 345 MonoObject *
 346 mono_remoting_invoke        (MonoObject *real_proxy, MonoMethodMessage *msg,
 347                              MonoObject **exc, MonoArray **out_args);
 348
 349 MonoObject *
 350 mono_message_invoke         (MonoObject *target, MonoMethodMessage *msg,
 351                              MonoObject **exc, MonoArray **out_args);
 352
 353 MonoMethodMessage *
 354 mono_method_call_message_new (MonoMethod *method, gpointer *params, MonoMethod *invoke,
 355                               MonoDelegate **cb, MonoObject **state);
 356
 357 gpointer
 358 mono_load_remote_field (MonoObject *this_obj, MonoClass *klass, MonoClassField *field, gpointer *res);
 359
 360 void
 361 mono_store_remote_field (MonoObject *this_obj, MonoClass *klass, MonoClassField *field, gpointer val);
 362
 363 void
 364 mono_method_return_message_restore (MonoMethod *method, gpointer *params, MonoArray *out_args);
 365
 366 void
 367 mono_unhandled_exception    (MonoObject *exc);
 368
 369 void
 370 mono_print_unhandled_exception (MonoObject *exc);
 371
 372 void
 373 mono_delegate_ctor          (MonoObject *this_obj, MonoObject *target, gpointer addr);
 374
 375 gpointer
 376 mono_compile_method        (MonoMethod *method);
 377
 378 /* accessors for fields and properties */
 379 void
 380 mono_field_set_value (MonoObject *obj, MonoClassField *field, void *value);
 381
 382 void
 383 mono_field_static_set_value (MonoVTable *vt, MonoClassField *field, void *value);
 384
 385 void
 386 mono_field_get_value (MonoObject *obj, MonoClassField *field, void *value);
 387
 388 void
 389 mono_field_static_get_value (MonoVTable *vt, MonoClassField *field, void *value);
 390
 391 void
 392 mono_property_set_value (MonoProperty *prop, void *obj, void **params, MonoObject **exc);
 393
 394 MonoObject*
 395 mono_property_get_value (MonoProperty *prop, void *obj, void **params, MonoObject **exc);
 396
 397 #endif
 398