mono/metadata/object-internals.h

   1 #ifndef __MONO_OBJECT_INTERNALS_H__
   2 #define __MONO_OBJECT_INTERNALS_H__
   3
   4 #include <mono/metadata/object.h>
   5 #include <mono/metadata/threads.h>
   6 #include <mono/metadata/reflection.h>
   7 #include <mono/metadata/mempool.h>
   8 #include <mono/metadata/class-internals.h>
   9 #include <mono/metadata/threads-types.h>
  10 #include <mono/io-layer/io-layer.h>
  11 #include "mono/utils/mono-compiler.h"
  12 #include "mono/utils/mono-error.h"
  13
  14 /*
  15  * We should find a better place for this stuff. We can't put it in mono-compiler.h,
  16  * since that is included by libgc.
  17  */
  18 #ifndef G_LIKELY
  19 #define G_LIKELY(a) (a)
  20 #define G_UNLIKELY(a) (a)
  21 #endif
  22
  23 /*
  24  * glib defines this macro and uses it in the definition of G_LIKELY, and thus,
  25  * g_assert (). The macro expands to a complex piece of code, preventing some
  26  * gcc versions like 4.3.0 from handling the __builtin_expect construct properly,
  27  * causing the generation of the unlikely branch into the middle of the code.
  28  */
  29 #ifdef _G_BOOLEAN_EXPR
  30 #undef _G_BOOLEAN_EXPR
  31 #define _G_BOOLEAN_EXPR(expr) ((gsize)(expr) != 0)
  32 #endif
  33
  34 #if 1
  35 #ifdef __GNUC__
  36 #define mono_assert(expr)                  G_STMT_START{                  \
  37      if (!(expr))                                                         \
  38        {                                                                  \
  39                 MonoException *ex;                                        \
  40                 char *msg = g_strdup_printf ("file %s: line %d (%s): "    \
  41                 "assertion failed: (%s)", __FILE__, __LINE__,             \
  42                 __PRETTY_FUNCTION__, #expr);                              \
  43                 ex = mono_get_exception_execution_engine (msg);           \
  44                 g_free (msg);                                             \
  45                 mono_raise_exception (ex);                                \
  46        };                               }G_STMT_END
  47
  48 #define mono_assert_not_reached()                 G_STMT_START{           \
  49      MonoException *ex;                                                   \
  50      char *msg = g_strdup_printf ("file %s: line %d (%s): "               \
  51      "should not be reached", __FILE__, __LINE__, __PRETTY_FUNCTION__);   \
  52      ex = mono_get_exception_execution_engine (msg);                      \
  53      g_free (msg);                                                        \
  54      mono_raise_exception (ex);                                           \
  55 }G_STMT_END
  56 #else /* not GNUC */
  57 #define mono_assert(expr)                  G_STMT_START{                  \
  58      if (!(expr))                                                         \
  59        {                                                                  \
  60                 MonoException *ex;                                        \
  61                 char *msg = g_strdup_printf ("file %s: line %d: "         \
  62                 "assertion failed: (%s)", __FILE__, __LINE__,             \
  63                 #expr);                                                   \
  64                 ex = mono_get_exception_execution_engine (msg);           \
  65                 g_free (msg);                                             \
  66                 mono_raise_exception (ex);                                \
  67        };                               }G_STMT_END
  68
  69 #define mono_assert_not_reached()                 G_STMT_START{           \
  70      MonoException *ex;                                                   \
  71      char *msg = g_strdup_printf ("file %s: line %d): "                   \
  72      "should not be reached", __FILE__, __LINE__);                        \
  73      ex = mono_get_exception_execution_engine (msg);                      \
  74      g_free (msg);                                                        \
  75      mono_raise_exception (ex);                                           \
  76 }G_STMT_END
  77 #endif
  78 #else
  79 #define mono_assert(expr) g_assert(expr)
  80 #define mono_assert_not_reached() g_assert_not_reached()
  81 #endif
  82
  83 #define MONO_CHECK_ARG(arg, expr)               G_STMT_START{             \
  84      if (!(expr))                                                         \
  85        {                                                                  \
  86                 MonoException *ex;                                        \
  87                 char *msg = g_strdup_printf ("assertion `%s' failed",     \
  88                 #expr);                                                   \
  89                 if (arg) {} /* check if the name exists */                \
  90                 ex = mono_get_exception_argument (#arg, msg);             \
  91                 g_free (msg);                                             \
  92                 mono_raise_exception (ex);                                \
  93        };                               }G_STMT_END
  94
  95 #define MONO_CHECK_ARG_NULL(arg)            G_STMT_START{                 \
  96      if (arg == NULL)                                                     \
  97        {                                                                  \
  98                 MonoException *ex;                                        \
  99                 if (arg) {} /* check if the name exists */                \
 100                 ex = mono_get_exception_argument_null (#arg);             \
 101                 mono_raise_exception (ex);                                \
 102        };                               }G_STMT_END
 103
 104 /* 16 == default capacity */
 105 #define mono_stringbuilder_capacity(sb) ((sb)->str ? ((sb)->str->length) : 16)
 106
 107 /*
 108  * Macros which cache the results of lookups locally.
 109  * These should be used instead of the original versions, if the __GNUC__
 110  * restriction is acceptable.
 111  */
 112
 113 #ifdef __GNUC__
 114
 115 /* namespace and name should be a constant */
 116 #define mono_class_from_name_cached(image,namespace,name) ({ \
 117                         static MonoClass *tmp_klass; \
 118                         if (!tmp_klass) { \
 119                                 tmp_klass = mono_class_from_name ((image), (namespace), (name)); \
 120                                 g_assert (tmp_klass); \
 121                         }; \
 122                         tmp_klass; })
 123 /* name should be a compile-time constant */
 124 #define mono_class_get_field_from_name_cached(klass,name) ({ \
 125                         static MonoClassField *tmp_field; \
 126                         if (!tmp_field) { \
 127                                 tmp_field = mono_class_get_field_from_name ((klass), (name)); \
 128                                 g_assert (tmp_field); \
 129                         }; \
 130                         tmp_field; })
 131 /* eclass should be a run-time constant */
 132 #define mono_array_class_get_cached(eclass,rank) ({     \
 133                         static MonoClass *tmp_klass; \
 134                         if (!tmp_klass) { \
 135                                 tmp_klass = mono_array_class_get ((eclass), (rank));    \
 136                                 g_assert (tmp_klass); \
 137                         }; \
 138                         tmp_klass; })
 139 /* eclass should be a run-time constant */
 140 #define mono_array_new_cached(domain, eclass, size) mono_array_new_specific (mono_class_vtable ((domain), mono_array_class_get_cached ((eclass), 1)), (size))
 141
 142 #else
 143
 144 #define mono_class_from_name_cached(image,namespace,name) mono_class_from_name ((image), (namespace), (name))
 145 #define mono_class_get_field_from_name_cached(klass,name) mono_class_get_field_from_name ((klass), (name))
 146 #define mono_array_class_get_cached(eclass,rank) mono_array_class_get ((eclass), (rank))
 147 #define mono_array_new_cached(domain, eclass, size) mono_array_new_specific (mono_class_vtable ((domain), mono_array_class_get_cached ((eclass), 1)), (size))
 148
 149 #endif
 150
 151 #ifdef MONO_BIG_ARRAYS
 152 typedef uint64_t mono_array_size_t;
 153 typedef int64_t mono_array_lower_bound_t;
 154 #define MONO_ARRAY_MAX_INDEX G_MAXINT64
 155 #define MONO_ARRAY_MAX_SIZE  G_MAXUINT64
 156 #else
 157 typedef uint32_t mono_array_size_t;
 158 typedef int32_t mono_array_lower_bound_t;
 159 #define MONO_ARRAY_MAX_INDEX ((int32_t) 0x7fffffff)
 160 #define MONO_ARRAY_MAX_SIZE  ((uint32_t) 0xffffffff)
 161 #endif
 162
 163 typedef struct {
 164         mono_array_size_t length;
 165         mono_array_lower_bound_t lower_bound;
 166 } MonoArrayBounds;
 167
 168 struct _MonoArray {
 169         MonoObject obj;
 170         /* bounds is NULL for szarrays */
 171         MonoArrayBounds *bounds;
 172         /* total number of elements of the array */
 173         mono_array_size_t max_length;
 174         /* we use double to ensure proper alignment on platforms that need it */
 175         double vector [MONO_ZERO_LEN_ARRAY];
 176 };
 177
 178 struct _MonoString {
 179         MonoObject object;
 180         int32_t length;
 181         mono_unichar2 chars [MONO_ZERO_LEN_ARRAY];
 182 };
 183
 184 #define mono_object_class(obj) (((MonoObject*)(obj))->vtable->klass)
 185 #define mono_object_domain(obj) (((MonoObject*)(obj))->vtable->domain)
 186
 187 #define mono_string_chars_fast(s) ((mono_unichar2*)(s)->chars)
 188 #define mono_string_length_fast(s) ((s)->length)
 189
 190 #define mono_array_length_fast(array) ((array)->max_length)
 191 #define mono_array_addr_with_size_fast(array,size,index) ( ((char*)(array)->vector) + (size) * (index) )
 192
 193 typedef struct {
 194         MonoObject obj;
 195         MonoObject *identity;
 196 } MonoMarshalByRefObject;
 197
 198 /* This is a copy of System.AppDomain */
 199 struct _MonoAppDomain {
 200         MonoMarshalByRefObject mbr;
 201         MonoDomain *data;
 202 };
 203
 204 typedef struct {
 205         MonoObject object;
 206         gint32 length;
 207         MonoString *str;
 208         MonoString *cached_str;
 209         gint32 max_capacity;
 210 } MonoStringBuilder;
 211
 212 typedef struct {
 213         MonoType *type;
 214         gpointer  value;
 215         MonoClass *klass;
 216 } MonoTypedRef;
 217
 218 typedef struct {
 219         gpointer args;
 220 } MonoArgumentHandle;
 221
 222 typedef struct {
 223         MonoMethodSignature *sig;
 224         gpointer args;
 225         gint32 next_arg;
 226         gint32 num_args;
 227 } MonoArgIterator;
 228
 229 struct _MonoException {
 230         MonoObject object;
 231         /* Stores the IPs and the generic sharing infos
 232            (vtable/MRGCTX) of the frames. */
 233         MonoArray  *trace_ips;
 234         MonoObject *inner_ex;
 235         MonoString *message;
 236         MonoString *help_link;
 237         MonoString *class_name;
 238         MonoString *stack_trace;
 239         MonoString *remote_stack_trace;
 240         gint32      remote_stack_index;
 241         gint32      hresult;
 242         MonoString *source;
 243         MonoObject *_data;
 244 };
 245
 246 typedef struct {
 247         MonoException base;
 248 } MonoSystemException;
 249
 250 typedef struct {
 251         MonoSystemException base;
 252         MonoString *param_name;
 253 } MonoArgumentException;
 254
 255 typedef struct {
 256         MonoSystemException base;
 257         MonoString *msg;
 258         MonoString *type_name;
 259 } MonoTypeLoadException;
 260
 261 typedef struct {
 262         MonoObject   object;
 263         MonoObject  *async_state;
 264         MonoObject  *handle;
 265         MonoObject  *async_delegate;
 266         gpointer    *data;
 267         MonoObject  *object_data;
 268         MonoBoolean  sync_completed;
 269         MonoBoolean  completed;
 270         MonoBoolean  endinvoke_called;
 271         MonoObject  *async_callback;
 272         MonoObject  *execution_context;
 273         MonoObject  *original_context;
 274         gint64       add_time;
 275 } MonoAsyncResult;
 276
 277 typedef struct {
 278         MonoMarshalByRefObject object;
 279         gpointer     handle;
 280         MonoBoolean  disposed;
 281 } MonoWaitHandle;
 282
 283 /* This is a copy of System.Runtime.Remoting.Messaging.CallType */
 284 typedef enum {
 285         CallType_Sync = 0,
 286         CallType_BeginInvoke = 1,
 287         CallType_EndInvoke = 2,
 288         CallType_OneWay = 3
 289 } MonoCallType;
 290
 291 /* This corresponds to System.Type */
 292 struct _MonoReflectionType {
 293         MonoObject object;
 294         MonoType  *type;
 295 };
 296
 297 typedef struct {
 298         MonoReflectionType type;
 299         MonoObject *type_info;
 300 } MonoReflectionMonoType;
 301
 302 typedef struct {
 303         MonoObject  object;
 304         MonoReflectionType *class_to_proxy;
 305         MonoObject *context;
 306         MonoObject *unwrapped_server;
 307         gint32      target_domain_id;
 308         MonoString *target_uri;
 309         MonoObject *object_identity;
 310         MonoObject *obj_TP;
 311         MonoObject *stub_data;
 312 } MonoRealProxy;
 313
 314 typedef struct {
 315         MonoMarshalByRefObject object;
 316         gpointer iunknown;
 317         GHashTable* itf_hash;
 318 } MonoComObject;
 319
 320 typedef struct {
 321         MonoRealProxy real_proxy;
 322         MonoComObject *com_object;
 323         gint32 ref_count;
 324 } MonoComInteropProxy;
 325
 326 typedef struct {
 327         MonoObject       object;
 328         MonoRealProxy   *rp;
 329         MonoRemoteClass *remote_class;
 330         MonoBoolean      custom_type_info;
 331 } MonoTransparentProxy;
 332
 333 typedef struct {
 334         MonoObject obj;
 335         MonoReflectionMethod *method;
 336         MonoArray  *args;
 337         MonoArray  *names;
 338         MonoArray  *arg_types;
 339         MonoObject *ctx;
 340         MonoObject *rval;
 341         MonoObject *exc;
 342         MonoAsyncResult *async_result;
 343         guint32     call_type;
 344 } MonoMethodMessage;
 345
 346 typedef struct {
 347         MonoObject obj;
 348         gint32 il_offset;
 349         gint32 native_offset;
 350         MonoReflectionMethod *method;
 351         MonoString *filename;
 352         gint32 line;
 353         gint32 column;
 354         MonoString *internal_method_name;
 355 } MonoStackFrame;
 356
 357 typedef enum {
 358         MONO_THREAD_FLAG_DONT_MANAGE = 1, // Don't wait for or abort this thread
 359 } MonoThreadFlags;
 360
 361 struct _MonoInternalThread {
 362         MonoObject  obj;
 363         volatile int lock_thread_id; /* to be used as the pre-shifted thread id in thin locks. Used for appdomain_ref push/pop */
 364         HANDLE      handle;
 365         MonoArray  *cached_culture_info;
 366         gpointer    unused1;
 367         MonoBoolean threadpool_thread;
 368         gunichar2  *name;
 369         guint32     name_len;
 370         guint32     state;
 371         MonoException *abort_exc;
 372         int abort_state_handle;
 373         guint64 tid;    /* This is accessed as a gsize in the code (so it can hold a 64bit pointer on systems that need it), but needs to reserve 64 bits of space on all machines as it corresponds to a field in managed code */
 374         HANDLE      start_notify;
 375         gpointer stack_ptr;
 376         gpointer *static_data;
 377         gpointer jit_data;
 378         gpointer lock_data;
 379         MonoAppContext *current_appcontext;
 380         int stack_size;
 381         GSList *appdomain_refs;
 382         /* This is modified using atomic ops, so keep it a gint32 */
 383         gint32 interruption_requested;
 384         gpointer suspend_event;
 385         gpointer suspended_event;
 386         gpointer resume_event;
 387         CRITICAL_SECTION *synch_cs;
 388         MonoBoolean thread_dump_requested;
 389         gpointer end_stack; /* This is only used when running in the debugger. */
 390         MonoBoolean thread_interrupt_requested;
 391         guint8  apartment_state;
 392         gint32 critical_region_level;
 393         guint32 small_id; /* A small, unique id, used for the hazard pointer table. */
 394         MonoThreadManageCallback manage_callback;
 395         MonoException *pending_exception;
 396         MonoThread *root_domain_thread;
 397         gpointer interrupt_on_stop;
 398         gsize    flags;
 399         /*
 400          * These fields are used to avoid having to increment corlib versions
 401          * when a new field is added to the unmanaged MonoThread structure.
 402          */
 403         gpointer unused4;
 404         gpointer unused5;
 405         gpointer unused6;
 406 };
 407
 408 struct _MonoThread {
 409         MonoObject obj;
 410         struct _MonoInternalThread *internal_thread;
 411         MonoObject *start_obj;
 412         MonoObject *ec_to_set;
 413 };
 414
 415 typedef struct {
 416         MonoString *name;
 417         MonoReflectionType *type;
 418         MonoObject *value;
 419 } MonoSerializationEntry;
 420
 421 typedef struct {
 422         guint32 state;
 423         MonoObject *additional;
 424 } MonoStreamingContext;
 425
 426 typedef struct {
 427         MonoObject obj;
 428         MonoBoolean readOnly;
 429         MonoString *AMDesignator;
 430         MonoString *PMDesignator;
 431         MonoString *DateSeparator;
 432         MonoString *TimeSeparator;
 433         MonoString *ShortDatePattern;
 434         MonoString *LongDatePattern;
 435         MonoString *ShortTimePattern;
 436         MonoString *LongTimePattern;
 437         MonoString *MonthDayPattern;
 438         MonoString *YearMonthPattern;
 439         MonoString *FullDateTimePattern;
 440         MonoString *RFC1123Pattern;
 441         MonoString *SortableDateTimePattern;
 442         MonoString *UniversalSortableDateTimePattern;
 443         guint32 FirstDayOfWeek;
 444         MonoObject *Calendar;
 445         guint32 CalendarWeekRule;
 446         MonoArray *AbbreviatedDayNames;
 447         MonoArray *DayNames;
 448         MonoArray *MonthNames;
 449         MonoArray *AbbreviatedMonthNames;
 450         MonoArray *ShortDatePatterns;
 451         MonoArray *LongDatePatterns;
 452         MonoArray *ShortTimePatterns;
 453         MonoArray *LongTimePatterns;
 454         MonoArray *MonthDayPatterns;
 455         MonoArray *YearMonthPatterns;
 456         MonoArray *shortDayNames;
 457 } MonoDateTimeFormatInfo;
 458
 459 typedef struct
 460 {
 461         MonoObject obj;
 462         MonoBoolean readOnly;
 463         MonoString *decimalFormats;
 464         MonoString *currencyFormats;
 465         MonoString *percentFormats;
 466         MonoString *digitPattern;
 467         MonoString *zeroPattern;
 468         gint32 currencyDecimalDigits;
 469         MonoString *currencyDecimalSeparator;
 470         MonoString *currencyGroupSeparator;
 471         MonoArray *currencyGroupSizes;
 472         gint32 currencyNegativePattern;
 473         gint32 currencyPositivePattern;
 474         MonoString *currencySymbol;
 475         MonoString *naNSymbol;
 476         MonoString *negativeInfinitySymbol;
 477         MonoString *negativeSign;
 478         guint32 numberDecimalDigits;
 479         MonoString *numberDecimalSeparator;
 480         MonoString *numberGroupSeparator;
 481         MonoArray *numberGroupSizes;
 482         gint32 numberNegativePattern;
 483         gint32 percentDecimalDigits;
 484         MonoString *percentDecimalSeparator;
 485         MonoString *percentGroupSeparator;
 486         MonoArray *percentGroupSizes;
 487         gint32 percentNegativePattern;
 488         gint32 percentPositivePattern;
 489         MonoString *percentSymbol;
 490         MonoString *perMilleSymbol;
 491         MonoString *positiveInfinitySymbol;
 492         MonoString *positiveSign;
 493 } MonoNumberFormatInfo;
 494
 495 typedef struct {
 496         MonoObject obj;
 497         gint32 lcid;
 498         MonoString *icu_name;
 499         gpointer ICU_collator;
 500 } MonoCompareInfo;
 501
 502 typedef struct {
 503         MonoObject obj;
 504         MonoBoolean is_read_only;
 505         gint32 lcid;
 506         gint32 parent_lcid;
 507         gint32 specific_lcid;
 508         gint32 datetime_index;
 509         gint32 number_index;
 510         MonoBoolean use_user_override;
 511         MonoNumberFormatInfo *number_format;
 512         MonoDateTimeFormatInfo *datetime_format;
 513         MonoObject *textinfo;
 514         MonoString *name;
 515         MonoString *displayname;
 516         MonoString *englishname;
 517         MonoString *nativename;
 518         MonoString *iso3lang;
 519         MonoString *iso2lang;
 520         MonoString *icu_name;
 521         MonoString *win3lang;
 522         MonoString *territory;
 523         MonoCompareInfo *compareinfo;
 524         const gint32 *calendar_data;
 525         const void* text_info_data;
 526 } MonoCultureInfo;
 527
 528 typedef struct {
 529         MonoObject obj;
 530         gint32 region_id;
 531         MonoString *iso2name;
 532         MonoString *iso3name;
 533         MonoString *win3name;
 534         MonoString *english_name;
 535         MonoString *currency_symbol;
 536         MonoString *iso_currency_symbol;
 537         MonoString *currency_english_name;
 538 } MonoRegionInfo;
 539
 540 typedef struct {
 541         MonoObject obj;
 542         MonoString *str;
 543         gint32 options;
 544         MonoArray *key;
 545         gint32 lcid;
 546 } MonoSortKey;
 547
 548 typedef struct {
 549         MonoObject object;
 550         guint32 intType;
 551 } MonoInterfaceTypeAttribute;
 552
 553 /*
 554  * Callbacks supplied by the runtime and called by the modules in metadata/
 555  * This interface is easier to extend than adding a new function type +
 556  * a new 'install' function for every callback.
 557  */
 558 typedef struct {
 559         gpointer (*create_ftnptr) (MonoDomain *domain, gpointer addr);
 560         gpointer (*get_addr_from_ftnptr) (gpointer descr);
 561         char*    (*get_runtime_build_info) (void);
 562         gpointer (*get_vtable_trampoline) (int slot_index);
 563 } MonoRuntimeCallbacks;
 564
 565 /* used to free a dynamic method */
 566 typedef void        (*MonoFreeMethodFunc)        (MonoDomain *domain, MonoMethod *method);
 567
 568 /* Used to initialize the method pointers inside vtables */
 569 typedef gboolean    (*MonoInitVTableFunc)    (MonoVTable *vtable);
 570
 571 void mono_set_pending_exception (MonoException *exc) MONO_INTERNAL;
 572
 573 /* remoting and async support */
 574
 575 MonoAsyncResult *
 576 mono_async_result_new       (MonoDomain *domain, HANDLE handle,
 577                              MonoObject *state, gpointer data, MonoObject *object_data) MONO_INTERNAL;
 578
 579 MonoWaitHandle *
 580 mono_wait_handle_new        (MonoDomain *domain, HANDLE handle) MONO_INTERNAL;
 581
 582 HANDLE
 583 mono_wait_handle_get_handle (MonoWaitHandle *handle) MONO_INTERNAL;
 584
 585 void
 586 mono_message_init           (MonoDomain *domain, MonoMethodMessage *this_obj,
 587                              MonoReflectionMethod *method, MonoArray *out_args) MONO_INTERNAL;
 588
 589 MonoObject *
 590 mono_remoting_invoke        (MonoObject *real_proxy, MonoMethodMessage *msg,
 591                              MonoObject **exc, MonoArray **out_args) MONO_INTERNAL;
 592
 593 MonoObject *
 594 mono_message_invoke         (MonoObject *target, MonoMethodMessage *msg,
 595                              MonoObject **exc, MonoArray **out_args) MONO_INTERNAL;
 596
 597 MonoMethodMessage *
 598 mono_method_call_message_new (MonoMethod *method, gpointer *params, MonoMethod *invoke,
 599                               MonoDelegate **cb, MonoObject **state) MONO_INTERNAL;
 600
 601 void
 602 mono_method_return_message_restore (MonoMethod *method, gpointer *params, MonoArray *out_args) MONO_INTERNAL;
 603
 604 void
 605 mono_delegate_ctor_with_method (MonoObject *this, MonoObject *target, gpointer addr, MonoMethod *method) MONO_INTERNAL;
 606
 607 void
 608 mono_delegate_ctor          (MonoObject *this_obj, MonoObject *target, gpointer addr) MONO_INTERNAL;
 609
 610 void*
 611 mono_class_get_allocation_ftn (MonoVTable *vtable, gboolean for_box, gboolean *pass_size_in_words) MONO_INTERNAL;
 612
 613 void
 614 mono_runtime_free_method    (MonoDomain *domain, MonoMethod *method) MONO_INTERNAL;
 615
 616 /* runtime initialization functions */
 617 typedef void (*MonoExceptionFunc) (MonoException *ex);
 618
 619 void
 620 mono_install_handler        (MonoExceptionFunc func) MONO_INTERNAL;
 621
 622 void
 623 mono_install_runtime_invoke (MonoInvokeFunc func) MONO_INTERNAL;
 624
 625 void
 626 mono_install_compile_method (MonoCompileFunc func) MONO_INTERNAL;
 627
 628 void
 629 mono_install_free_method    (MonoFreeMethodFunc func) MONO_INTERNAL;
 630
 631 void
 632 mono_install_callbacks      (MonoRuntimeCallbacks *cbs) MONO_INTERNAL;
 633
 634 MonoRuntimeCallbacks*
 635 mono_get_runtime_callbacks (void) MONO_INTERNAL;
 636
 637 void
 638 mono_type_initialization_init (void) MONO_INTERNAL;
 639
 640 void
 641 mono_type_initialization_cleanup (void) MONO_INTERNAL;
 642
 643 guint32
 644 mono_thread_get_tls_key    (void) MONO_INTERNAL;
 645
 646 gint32
 647 mono_thread_get_tls_offset (void) MONO_INTERNAL;
 648
 649 guint32
 650 mono_domain_get_tls_key    (void) MONO_INTERNAL;
 651
 652 gint32
 653 mono_domain_get_tls_offset (void) MONO_INTERNAL;
 654
 655 /* Reflection and Reflection.Emit support */
 656
 657 /*
 658  * Handling System.Type objects:
 659  *
 660  *   Fields defined as System.Type in managed code should be defined as MonoObject*
 661  * in unmanaged structures, and the monotype_cast () function should be used for
 662  * casting them to MonoReflectionType* to avoid crashes/security issues when
 663  * encountering instances of user defined subclasses of System.Type.
 664  */
 665
 666 #define IS_MONOTYPE(obj) (!(obj) || (((MonoObject*)(obj))->vtable->klass->image == mono_defaults.corlib && ((MonoReflectionType*)(obj))->type != NULL))
 667
 668 /*
 669  * Make sure the argument, which should be a System.Type is a System.MonoType object
 670  * or equivalent, and not an instance of
 671  * a user defined subclass of System.Type. This should be used in places were throwing
 672  * an exception is safe.
 673  */
 674 #define CHECK_MONOTYPE(obj) do { \
 675         if (!IS_MONOTYPE (obj)) \
 676                 mono_raise_exception (mono_get_exception_not_supported ("User defined subclasses of System.Type are not yet supported")); \
 677         } while (0)
 678
 679 /* This should be used for accessing members of Type[] arrays */
 680 #define mono_type_array_get(arr,index) monotype_cast (mono_array_get ((arr), gpointer, (index)))
 681
 682 /*
 683  * Cast an object to MonoReflectionType, making sure it is a System.MonoType or
 684  * a subclass of it.
 685  */
 686 static inline MonoReflectionType*
 687 monotype_cast (MonoObject *obj)
 688 {
 689         g_assert (IS_MONOTYPE (obj));
 690
 691         return (MonoReflectionType*)obj;
 692 }
 693
 694 /*
 695  * The following structure must match the C# implementation in our corlib.
 696  */
 697
 698 struct _MonoReflectionMethod {
 699         MonoObject object;
 700         MonoMethod *method;
 701         MonoString *name;
 702         MonoReflectionType *reftype;
 703 };
 704
 705 typedef struct _MonoReflectionGenericMethod MonoReflectionGenericMethod;
 706 struct _MonoReflectionGenericMethod {
 707         MonoReflectionMethod method;
 708 };
 709
 710 struct _MonoDelegate {
 711         MonoObject object;
 712         /* The compiled code of the target method */
 713         gpointer method_ptr;
 714         /* The invoke code */
 715         gpointer invoke_impl;
 716         MonoObject *target;
 717         MonoMethod *method;
 718         gpointer delegate_trampoline;
 719         /*
 720          * If non-NULL, this points to a memory location which stores the address of
 721          * the compiled code of the method, or NULL if it is not yet compiled.
 722          */
 723         guint8 **method_code;
 724         MonoReflectionMethod *method_info;
 725         MonoReflectionMethod *original_method_info;
 726         MonoObject *data;
 727 };
 728
 729 typedef struct _MonoMulticastDelegate MonoMulticastDelegate;
 730 struct _MonoMulticastDelegate {
 731         MonoDelegate delegate;
 732         MonoMulticastDelegate *prev;
 733 };
 734
 735 struct _MonoReflectionField {
 736         MonoObject object;
 737         MonoClass *klass;
 738         MonoClassField *field;
 739         MonoString *name;
 740         MonoReflectionType *type;
 741         guint32 attrs;
 742 };
 743
 744 struct _MonoReflectionProperty {
 745         MonoObject object;
 746         MonoClass *klass;
 747         MonoProperty *property;
 748 };
 749
 750 /*This is System.EventInfo*/
 751 struct _MonoReflectionEvent {
 752         MonoObject object;
 753         MonoObject *cached_add_event;
 754 };
 755
 756 typedef struct {
 757         MonoReflectionEvent object;
 758         MonoClass *klass;
 759         MonoEvent *event;
 760 } MonoReflectionMonoEvent;
 761
 762 typedef struct {
 763         MonoObject object;
 764         MonoReflectionType *ClassImpl;
 765         MonoObject *DefaultValueImpl;
 766         MonoObject *MemberImpl;
 767         MonoString *NameImpl;
 768         gint32 PositionImpl;
 769         guint32 AttrsImpl;
 770         MonoObject *MarshalAsImpl;
 771 } MonoReflectionParameter;
 772
 773 struct _MonoReflectionMethodBody {
 774         MonoObject object;
 775         MonoArray *clauses;
 776         MonoArray *locals;
 777         MonoArray *il;
 778         MonoBoolean init_locals;
 779         guint32 local_var_sig_token;
 780         guint32 max_stack;
 781 };
 782
 783 struct _MonoReflectionAssembly {
 784         MonoObject object;
 785         MonoAssembly *assembly;
 786         MonoObject *resolve_event_holder;
 787         /* CAS related */
 788         MonoObject *evidence;   /* Evidence */
 789         MonoObject *minimum;    /* PermissionSet - for SecurityAction.RequestMinimum */
 790         MonoObject *optional;   /* PermissionSet - for SecurityAction.RequestOptional */
 791         MonoObject *refuse;     /* PermissionSet - for SecurityAction.RequestRefuse */
 792         MonoObject *granted;    /* PermissionSet - for the resolved assembly granted permissions */
 793         MonoObject *denied;     /* PermissionSet - for the resolved assembly denied permissions */
 794         /* */
 795         MonoBoolean from_byte_array;
 796         MonoString *name;
 797 };
 798
 799 typedef struct {
 800         MonoReflectionType *utype;
 801         MonoArray *values;
 802         MonoArray *names;
 803 } MonoEnumInfo;
 804
 805 typedef struct {
 806         MonoReflectionType *parent;
 807         MonoReflectionType *ret;
 808         guint32 attrs;
 809         guint32 implattrs;
 810         guint32 callconv;
 811 } MonoMethodInfo;
 812
 813 typedef struct {
 814         MonoReflectionType *parent;
 815         MonoString *name;
 816         MonoReflectionMethod *get;
 817         MonoReflectionMethod *set;
 818         guint32 attrs;
 819 } MonoPropertyInfo;
 820
 821 typedef struct {
 822         MonoReflectionType *declaring_type;
 823         MonoReflectionType *reflected_type;
 824         MonoString *name;
 825         MonoReflectionMethod *add_method;
 826         MonoReflectionMethod *remove_method;
 827         MonoReflectionMethod *raise_method;
 828         guint32 attrs;
 829         MonoArray *other_methods;
 830 } MonoEventInfo;
 831
 832 typedef struct {
 833         MonoString *name;
 834         MonoString *name_space;
 835         MonoReflectionType *etype;
 836         MonoReflectionType *nested_in;
 837         MonoReflectionAssembly *assembly;
 838         guint32 rank;
 839         MonoBoolean isprimitive;
 840 } MonoTypeInfo;
 841
 842 typedef struct {
 843         MonoObject *member;
 844         gint32 code_pos;
 845 } MonoReflectionILTokenInfo;
 846
 847 typedef struct {
 848         MonoObject object;
 849         MonoArray *code;
 850         gint32 code_len;
 851         gint32 max_stack;
 852         gint32 cur_stack;
 853         MonoArray *locals;
 854         MonoArray *ex_handlers;
 855         gint32 num_token_fixups;
 856         MonoArray *token_fixups;
 857 } MonoReflectionILGen;
 858
 859 typedef struct {
 860         MonoArray *handlers;
 861         gint32 start;
 862         gint32 len;
 863         gint32 label;
 864 } MonoILExceptionInfo;
 865
 866 typedef struct {
 867         MonoObject *extype;
 868         gint32 type;
 869         gint32 start;
 870         gint32 len;
 871         gint32 filter_offset;
 872 } MonoILExceptionBlock;
 873
 874 typedef struct {
 875         MonoObject object;
 876         MonoObject *catch_type;
 877         gint32 filter_offset;
 878         gint32 flags;
 879         gint32 try_offset;
 880         gint32 try_length;
 881         gint32 handler_offset;
 882         gint32 handler_length;
 883 } MonoReflectionExceptionHandlingClause;
 884
 885 typedef struct {
 886         MonoObject object;
 887         MonoReflectionType *local_type;
 888         MonoBoolean is_pinned;
 889         guint16 local_index;
 890 } MonoReflectionLocalVariableInfo;
 891
 892 typedef struct {
 893         /*
 894          * Must have the same layout as MonoReflectionLocalVariableInfo, since
 895          * LocalBuilder inherits from it under net 2.0.
 896          */
 897         MonoObject object;
 898         MonoObject *type;
 899         MonoBoolean is_pinned;
 900         guint16 local_index;
 901         MonoString *name;
 902 } MonoReflectionLocalBuilder;
 903
 904 typedef struct {
 905         MonoObject object;
 906         gint32 count;
 907         gint32 type;
 908         gint32 eltype;
 909         MonoString *guid;
 910         MonoString *mcookie;
 911         MonoString *marshaltype;
 912         MonoObject *marshaltyperef;
 913         gint32 param_num;
 914         MonoBoolean has_size;
 915 } MonoReflectionMarshal;
 916
 917 typedef struct {
 918         MonoObject object;
 919         MonoObject* methodb;
 920         MonoString *name;
 921         MonoArray *cattrs;
 922         MonoReflectionMarshal *marshal_info;
 923         guint32 attrs;
 924         int position;
 925         guint32 table_idx;
 926         MonoObject *def_value;
 927 } MonoReflectionParamBuilder;
 928
 929 typedef struct {
 930         MonoObject object;
 931         MonoMethod *mhandle;
 932         MonoReflectionILGen *ilgen;
 933         MonoArray *parameters;
 934         guint32 attrs;
 935         guint32 iattrs;
 936         guint32 table_idx;
 937         guint32 call_conv;
 938         MonoObject *type;
 939         MonoArray *pinfo;
 940         MonoArray *cattrs;
 941         MonoBoolean init_locals;
 942         MonoArray *param_modreq;
 943         MonoArray *param_modopt;
 944         MonoArray *permissions;
 945 } MonoReflectionCtorBuilder;
 946
 947 typedef struct {
 948         MonoObject object;
 949         MonoMethod *mhandle;
 950         MonoObject *rtype;
 951         MonoArray *parameters;
 952         guint32 attrs;
 953         guint32 iattrs;
 954         MonoString *name;
 955         guint32 table_idx;
 956         MonoArray *code;
 957         MonoReflectionILGen *ilgen;
 958         MonoObject *type;
 959         MonoArray *pinfo;
 960         MonoArray *cattrs;
 961         MonoReflectionMethod *override_method;
 962         MonoString *dll;
 963         MonoString *dllentry;
 964         guint32 charset;
 965         guint32 extra_flags;
 966         guint32 native_cc;
 967         guint32 call_conv;
 968         MonoBoolean init_locals;
 969         MonoGenericContainer *generic_container;
 970         MonoArray *generic_params;
 971         MonoArray *return_modreq;
 972         MonoArray *return_modopt;
 973         MonoArray *param_modreq;
 974         MonoArray *param_modopt;
 975         MonoArray *permissions;
 976 } MonoReflectionMethodBuilder;
 977
 978 typedef struct {
 979         MonoObject object;
 980         MonoMethod *mhandle;
 981         MonoReflectionType *parent;
 982         MonoReflectionType *ret;
 983         MonoArray *parameters;
 984         MonoString *name;
 985         guint32 table_idx;
 986         guint32 call_conv;
 987 } MonoReflectionArrayMethod;
 988
 989 typedef struct {
 990         MonoArray *data;
 991         MonoString *name;
 992         MonoString *filename;
 993         guint32 attrs;
 994         guint32 offset;
 995         MonoObject *stream;
 996 } MonoReflectionResource;
 997
 998 typedef struct {
 999         guint32 res_type;
1000         guint32 res_id;
1001         guint32 lang_id;
1002         MonoArray *res_data;
1003 } MonoReflectionWin32Resource;
1004
1005 typedef struct {
1006         guint32 action;
1007         MonoString *pset;
1008 } MonoReflectionPermissionSet;
1009
1010 typedef struct {
1011         MonoReflectionAssembly assembly;
1012         MonoDynamicAssembly *dynamic_assembly;
1013         MonoReflectionMethod *entry_point;
1014         MonoArray *modules;
1015         MonoString *name;
1016         MonoString *dir;
1017         MonoArray *cattrs;
1018         MonoArray *resources;
1019         MonoArray *public_key;
1020         MonoString *version;
1021         MonoString *culture;
1022         guint32 algid;
1023         guint32 flags;
1024         guint32 pekind;
1025         MonoBoolean delay_sign;
1026         guint32 access;
1027         MonoArray *loaded_modules;
1028         MonoArray *win32_resources;
1029         /* CAS related */
1030         MonoArray *permissions_minimum;
1031         MonoArray *permissions_optional;
1032         MonoArray *permissions_refused;
1033         gint32 pe_kind;
1034         gint32 machine;
1035         MonoBoolean corlib_internal;
1036         MonoArray *type_forwarders;
1037         MonoArray *pktoken; /* as hexadecimal byte[] */
1038 } MonoReflectionAssemblyBuilder;
1039
1040 typedef struct {
1041         MonoObject object;
1042         guint32 attrs;
1043         MonoObject *type;
1044         MonoString *name;
1045         MonoObject *def_value;
1046         gint32 offset;
1047         gint32 table_idx;
1048         MonoReflectionType *typeb;
1049         MonoArray *rva_data;
1050         MonoArray *cattrs;
1051         MonoReflectionMarshal *marshal_info;
1052         MonoClassField *handle;
1053         MonoArray *modreq;
1054         MonoArray *modopt;
1055 } MonoReflectionFieldBuilder;
1056
1057 typedef struct {
1058         MonoObject object;
1059         guint32 attrs;
1060         MonoString *name;
1061         MonoObject *type;
1062         MonoArray *parameters;
1063         MonoArray *cattrs;
1064         MonoObject *def_value;
1065         MonoReflectionMethodBuilder *set_method;
1066         MonoReflectionMethodBuilder *get_method;
1067         gint32 table_idx;
1068 } MonoReflectionPropertyBuilder;
1069
1070 struct _MonoReflectionModule {
1071         MonoObject      obj;
1072         MonoImage  *image;
1073         MonoReflectionAssembly *assembly;
1074         MonoString *fqname;
1075         MonoString *name;
1076         MonoString *scopename;
1077         MonoBoolean is_resource;
1078         guint32 token;
1079 };
1080
1081 typedef struct {
1082         MonoReflectionModule module;
1083         MonoDynamicImage *dynamic_image;
1084         gint32     num_types;
1085         MonoArray *types;
1086         MonoArray *cattrs;
1087         MonoArray *guid;
1088         guint32    table_idx;
1089         MonoReflectionAssemblyBuilder *assemblyb;
1090         MonoArray *global_methods;
1091         MonoArray *global_fields;
1092         gboolean is_main;
1093         MonoArray *resources;
1094 } MonoReflectionModuleBuilder;
1095
1096 typedef struct {
1097         MonoReflectionType type;
1098         MonoString *name;
1099         MonoString *nspace;
1100         MonoObject *parent;
1101         MonoReflectionType *nesting_type;
1102         MonoArray *interfaces;
1103         gint32     num_methods;
1104         MonoArray *methods;
1105         MonoArray *ctors;
1106         MonoArray *properties;
1107         gint32     num_fields;
1108         MonoArray *fields;
1109         MonoArray *events;
1110         MonoArray *cattrs;
1111         MonoArray *subtypes;
1112         guint32 attrs;
1113         guint32 table_idx;
1114         MonoReflectionModuleBuilder *module;
1115         gint32 class_size;
1116         gint32 packing_size;
1117         MonoGenericContainer *generic_container;
1118         MonoArray *generic_params;
1119         MonoArray *permissions;
1120         MonoReflectionType *created;
1121 } MonoReflectionTypeBuilder;
1122
1123 typedef struct {
1124         MonoReflectionType type;
1125         MonoReflectionType *element_type;
1126         int rank;
1127 } MonoReflectionArrayType;
1128
1129 typedef struct {
1130         MonoReflectionType type;
1131         MonoReflectionType *element_type;
1132 } MonoReflectionDerivedType;
1133
1134 typedef struct {
1135         MonoReflectionType type;
1136         MonoReflectionTypeBuilder *tbuilder;
1137         MonoReflectionMethodBuilder *mbuilder;
1138         MonoString *name;
1139         guint32 index;
1140         MonoReflectionType *base_type;
1141         MonoArray *iface_constraints;
1142         MonoArray *cattrs;
1143         guint32 attrs;
1144 } MonoReflectionGenericParam;
1145
1146 typedef struct _MonoReflectionGenericClass MonoReflectionGenericClass;
1147 struct _MonoReflectionGenericClass {
1148         MonoReflectionType type;
1149         MonoReflectionType *generic_type; /*Can be either a MonoType or a TypeBuilder*/
1150         MonoArray *type_arguments;
1151         guint32 initialized;
1152 };
1153
1154 typedef struct {
1155         MonoObject  obj;
1156         MonoString *name;
1157         MonoString *codebase;
1158         gint32 major, minor, build, revision;
1159         MonoObject  *cultureInfo;
1160         guint32     flags;
1161         guint32     hashalg;
1162         MonoObject  *keypair;
1163         MonoArray   *publicKey;
1164         MonoArray   *keyToken;
1165         guint32     versioncompat;
1166         MonoObject *version;
1167         guint32     processor_architecture;
1168 } MonoReflectionAssemblyName;
1169
1170 typedef struct {
1171         MonoObject  obj;
1172         MonoString *name;
1173         MonoReflectionType *type;
1174         MonoReflectionTypeBuilder *typeb;
1175         MonoArray *cattrs;
1176         MonoReflectionMethodBuilder *add_method;
1177         MonoReflectionMethodBuilder *remove_method;
1178         MonoReflectionMethodBuilder *raise_method;
1179         MonoArray *other_methods;
1180         guint32 attrs;
1181         guint32 table_idx;
1182 } MonoReflectionEventBuilder;
1183
1184 typedef struct {
1185         MonoObject  obj;
1186         MonoReflectionMethod *ctor;
1187         MonoArray *data;
1188 } MonoReflectionCustomAttr;
1189
1190 typedef struct {
1191         MonoObject object;
1192         gint32 call_conv;
1193         gint32 charset;
1194         MonoString *dll;
1195         MonoString *entry_point;
1196         MonoBoolean exact_spelling;
1197         MonoBoolean preserve_sig;
1198         MonoBoolean set_last_error;
1199         MonoBoolean best_fit_mapping;
1200         MonoBoolean throw_on_unmappable;
1201 } MonoReflectionDllImportAttribute;
1202
1203 typedef struct {
1204         MonoObject object;
1205         gint32 call_conv;
1206         gint32 charset;
1207         MonoBoolean set_last_error;
1208         MonoBoolean best_fit_mapping;
1209         MonoBoolean throw_on_unmappable;
1210 } MonoReflectionUnmanagedFunctionPointerAttribute;
1211
1212 typedef struct {
1213         MonoObject object;
1214         MonoString *guid;
1215 } MonoReflectionGuidAttribute;
1216
1217 typedef struct {
1218         MonoObject object;
1219         MonoMethod *mhandle;
1220         MonoString *name;
1221         MonoReflectionType *rtype;
1222         MonoArray *parameters;
1223         guint32 attrs;
1224         guint32 call_conv;
1225         MonoReflectionModule *module;
1226         MonoBoolean skip_visibility;
1227         MonoBoolean init_locals;
1228         MonoReflectionILGen *ilgen;
1229         gint32 nrefs;
1230         MonoArray *refs;
1231         GSList *referenced_by;
1232         MonoReflectionType *owner;
1233 } MonoReflectionDynamicMethod;
1234
1235 typedef struct {
1236         MonoObject object;
1237         MonoReflectionModuleBuilder *module;
1238         MonoArray *arguments;
1239         guint32 type;
1240         MonoReflectionType *return_type;
1241         guint32 call_conv;
1242         guint32 unmanaged_call_conv;
1243         MonoArray *modreqs;
1244         MonoArray *modopts;
1245 } MonoReflectionSigHelper;
1246
1247 typedef struct {
1248         MonoObject object;
1249         MonoReflectionGenericClass *inst;
1250         MonoObject *fb; /*can be either a MonoField or a FieldBuilder*/
1251 } MonoReflectionFieldOnTypeBuilderInst;
1252
1253 typedef struct {
1254         MonoObject object;
1255         MonoReflectionGenericClass *inst;
1256         MonoObject *cb; /*can be either a MonoCMethod or ConstructorBuilder*/
1257 } MonoReflectionCtorOnTypeBuilderInst;
1258
1259 typedef struct {
1260         MonoObject object;
1261         MonoReflectionType *inst;
1262         MonoObject *mb; /*can be either a MonoMethod or MethodBuilder*/
1263         MonoArray *method_args;
1264         MonoReflectionMethodBuilder *generic_method_definition;
1265 } MonoReflectionMethodOnTypeBuilderInst;
1266
1267 typedef struct {
1268         MonoObject object;
1269         MonoBoolean visible;
1270 } MonoReflectionComVisibleAttribute;
1271
1272 enum {
1273         RESOURCE_LOCATION_EMBEDDED = 1,
1274         RESOURCE_LOCATION_ANOTHER_ASSEMBLY = 2,
1275         RESOURCE_LOCATION_IN_MANIFEST = 4
1276 };
1277
1278 typedef struct {
1279         MonoObject object;
1280         MonoReflectionAssembly *assembly;
1281         MonoString *filename;
1282         guint32 location;
1283 } MonoManifestResourceInfo;
1284
1285 /* A boxed IntPtr */
1286 typedef struct {
1287         MonoObject object;
1288         gpointer m_value;
1289 } MonoIntPtr;
1290
1291 /* Keep in sync with System.GenericParameterAttributes */
1292 typedef enum {
1293         GENERIC_PARAMETER_ATTRIBUTE_NON_VARIANT         = 0,
1294         GENERIC_PARAMETER_ATTRIBUTE_COVARIANT           = 1,
1295         GENERIC_PARAMETER_ATTRIBUTE_CONTRAVARIANT       = 2,
1296         GENERIC_PARAMETER_ATTRIBUTE_VARIANCE_MASK       = 3,
1297
1298         GENERIC_PARAMETER_ATTRIBUTE_NO_SPECIAL_CONSTRAINT       = 0,
1299         GENERIC_PARAMETER_ATTRIBUTE_REFERENCE_TYPE_CONSTRAINT   = 4,
1300         GENERIC_PARAMETER_ATTRIBUTE_VALUE_TYPE_CONSTRAINT       = 8,
1301         GENERIC_PARAMETER_ATTRIBUTE_CONSTRUCTOR_CONSTRAINT      = 16,
1302         GENERIC_PARAMETER_ATTRIBUTE_SPECIAL_CONSTRAINTS_MASK    = 28
1303 } GenericParameterAttributes;
1304
1305 typedef struct {
1306         MonoType *type;
1307         MonoClassField *field;
1308         MonoProperty *prop;
1309 } CattrNamedArg;
1310
1311 void          mono_image_create_pefile (MonoReflectionModuleBuilder *module, HANDLE file) MONO_INTERNAL;
1312 void          mono_image_basic_init (MonoReflectionAssemblyBuilder *assembly) MONO_INTERNAL;
1313 MonoReflectionModule * mono_image_load_module_dynamic (MonoReflectionAssemblyBuilder *assembly, MonoString *file_name) MONO_INTERNAL;
1314 guint32       mono_image_insert_string (MonoReflectionModuleBuilder *module, MonoString *str) MONO_INTERNAL;
1315 guint32       mono_image_create_token  (MonoDynamicImage *assembly, MonoObject *obj, gboolean create_methodspec, gboolean register_token) MONO_INTERNAL;
1316 guint32       mono_image_create_method_token (MonoDynamicImage *assembly, MonoObject *obj, MonoArray *opt_param_types) MONO_INTERNAL;
1317 void          mono_image_module_basic_init (MonoReflectionModuleBuilder *module) MONO_INTERNAL;
1318 void          mono_image_register_token (MonoDynamicImage *assembly, guint32 token, MonoObject *obj) MONO_INTERNAL;
1319 void          mono_dynamic_image_free (MonoDynamicImage *image) MONO_INTERNAL;
1320 void          mono_image_set_wrappers_type (MonoReflectionModuleBuilder *mb, MonoReflectionType *type) MONO_INTERNAL;
1321
1322 void        mono_reflection_setup_internal_class  (MonoReflectionTypeBuilder *tb) MONO_INTERNAL;
1323
1324 void        mono_reflection_create_internal_class (MonoReflectionTypeBuilder *tb) MONO_INTERNAL;
1325
1326 void        mono_reflection_setup_generic_class   (MonoReflectionTypeBuilder *tb) MONO_INTERNAL;
1327
1328 void        mono_reflection_create_generic_class  (MonoReflectionTypeBuilder *tb) MONO_INTERNAL;
1329
1330 MonoReflectionType* mono_reflection_create_runtime_class  (MonoReflectionTypeBuilder *tb) MONO_INTERNAL;
1331
1332 void        mono_reflection_get_dynamic_overrides (MonoClass *klass, MonoMethod ***overrides, int *num_overrides) MONO_INTERNAL;
1333
1334 void mono_reflection_create_dynamic_method (MonoReflectionDynamicMethod *m) MONO_INTERNAL;
1335 void mono_reflection_destroy_dynamic_method (MonoReflectionDynamicMethod *mb) MONO_INTERNAL;
1336
1337 void        mono_reflection_initialize_generic_parameter (MonoReflectionGenericParam *gparam) MONO_INTERNAL;
1338 void        mono_reflection_create_unmanaged_type (MonoReflectionType *type) MONO_INTERNAL;
1339 void        mono_reflection_register_with_runtime (MonoReflectionType *type) MONO_INTERNAL;
1340
1341 void        mono_reflection_create_custom_attr_data_args (MonoImage *image, MonoMethod *method, const guchar *data, guint32 len, MonoArray **typed_args, MonoArray **named_args, CattrNamedArg **named_arg_info) MONO_INTERNAL;
1342
1343 MonoArray* mono_param_get_objects_internal  (MonoDomain *domain, MonoMethod *method, MonoClass *refclass) MONO_INTERNAL;
1344
1345 MonoClass*
1346 mono_class_bind_generic_parameters (MonoClass *klass, int type_argc, MonoType **types, gboolean is_dynamic) MONO_INTERNAL;
1347 MonoType*
1348 mono_reflection_bind_generic_parameters (MonoReflectionType *type, int type_argc, MonoType **types) MONO_INTERNAL;
1349 MonoReflectionMethod*
1350 mono_reflection_bind_generic_method_parameters (MonoReflectionMethod *method, MonoArray *types) MONO_INTERNAL;
1351 void
1352 mono_reflection_generic_class_initialize (MonoReflectionGenericClass *type, MonoArray *methods, MonoArray *ctors, MonoArray *fields, MonoArray *properties, MonoArray *events) MONO_INTERNAL;
1353 MonoReflectionEvent *
1354 mono_reflection_event_builder_get_event_info (MonoReflectionTypeBuilder *tb, MonoReflectionEventBuilder *eb) MONO_INTERNAL;
1355
1356 MonoArray  *mono_reflection_sighelper_get_signature_local (MonoReflectionSigHelper *sig) MONO_INTERNAL;
1357
1358 MonoArray  *mono_reflection_sighelper_get_signature_field (MonoReflectionSigHelper *sig) MONO_INTERNAL;
1359
1360 MonoReflectionMarshal* mono_reflection_marshal_from_marshal_spec (MonoDomain *domain, MonoClass *klass, MonoMarshalSpec *spec) MONO_INTERNAL;
1361
1362 gpointer
1363 mono_reflection_lookup_dynamic_token (MonoImage *image, guint32 token, gboolean valid_token, MonoClass **handle_class, MonoGenericContext *context) MONO_INTERNAL;
1364
1365 gboolean
1366 mono_reflection_call_is_assignable_to (MonoClass *klass, MonoClass *oklass) MONO_INTERNAL;
1367
1368 gboolean
1369 mono_reflection_is_valid_dynamic_token (MonoDynamicImage *image, guint32 token) MONO_INTERNAL;
1370
1371 MonoType*
1372 mono_reflection_type_get_handle (MonoReflectionType *ref) MONO_INTERNAL;
1373
1374 void
1375 mono_image_build_metadata (MonoReflectionModuleBuilder *module) MONO_INTERNAL;
1376
1377 int
1378 mono_get_constant_value_from_blob (MonoDomain* domain, MonoTypeEnum type, const char *blob, void *value) MONO_INTERNAL;
1379
1380 void
1381 mono_release_type_locks (MonoInternalThread *thread) MONO_INTERNAL;
1382
1383 char *
1384 mono_string_to_utf8_mp  (MonoMemPool *mp, MonoString *s, MonoError *error) MONO_INTERNAL;
1385
1386 char *
1387 mono_string_to_utf8_image (MonoImage *image, MonoString *s, MonoError *error) MONO_INTERNAL;
1388
1389
1390 MonoArray*
1391 mono_array_clone_in_domain (MonoDomain *domain, MonoArray *array) MONO_INTERNAL;
1392
1393 void
1394 mono_array_full_copy (MonoArray *src, MonoArray *dest) MONO_INTERNAL;
1395
1396 gboolean
1397 mono_array_calc_byte_len (MonoClass *class, uintptr_t len, uintptr_t *res) MONO_INTERNAL;
1398
1399 gpointer
1400 mono_remote_class_vtable (MonoDomain *domain, MonoRemoteClass *remote_class, MonoRealProxy *real_proxy) MONO_INTERNAL;
1401
1402 void
1403 mono_upgrade_remote_class (MonoDomain *domain, MonoObject *tproxy, MonoClass *klass) MONO_INTERNAL;
1404
1405 gpointer
1406 mono_create_ftnptr (MonoDomain *domain, gpointer addr) MONO_INTERNAL;
1407
1408 gpointer
1409 mono_get_addr_from_ftnptr (gpointer descr) MONO_INTERNAL;
1410
1411 void
1412 mono_nullable_init (guint8 *buf, MonoObject *value, MonoClass *klass) MONO_INTERNAL;
1413
1414 MonoObject*
1415 mono_nullable_box (guint8 *buf, MonoClass *klass) MONO_INTERNAL;
1416
1417 #ifdef MONO_SMALL_CONFIG
1418 #define MONO_IMT_SIZE 9
1419 #else
1420 #define MONO_IMT_SIZE 19
1421 #endif
1422
1423 typedef union {
1424         int vtable_slot;
1425         gpointer target_code;
1426 } MonoImtItemValue;
1427
1428 typedef struct _MonoImtBuilderEntry {
1429         gpointer key;
1430         struct _MonoImtBuilderEntry *next;
1431         MonoImtItemValue value;
1432         int children;
1433         guint8 has_target_code : 1;
1434 } MonoImtBuilderEntry;
1435
1436 typedef struct _MonoIMTCheckItem MonoIMTCheckItem;
1437
1438 struct _MonoIMTCheckItem {
1439         gpointer          key;
1440         int               check_target_idx;
1441         MonoImtItemValue  value;
1442         guint8           *jmp_code;
1443         guint8           *code_target;
1444         guint8            is_equals;
1445         guint8            compare_done;
1446         guint8            chunk_size;
1447         guint8            short_branch;
1448         guint8            has_target_code;
1449 };
1450
1451 typedef gpointer (*MonoImtThunkBuilder) (MonoVTable *vtable, MonoDomain *domain,
1452                 MonoIMTCheckItem **imt_entries, int count, gpointer fail_trunk);
1453
1454 void
1455 mono_install_imt_thunk_builder (MonoImtThunkBuilder func) MONO_INTERNAL;
1456
1457 void
1458 mono_install_imt_trampoline (gpointer tramp) MONO_INTERNAL;
1459
1460 void
1461 mono_vtable_build_imt_slot (MonoVTable* vtable, int imt_slot) MONO_INTERNAL;
1462
1463 guint32
1464 mono_method_get_imt_slot (MonoMethod *method) MONO_INTERNAL;
1465
1466 void
1467 mono_method_add_generic_virtual_invocation (MonoDomain *domain, MonoVTable *vtable,
1468                                                                                         gpointer *vtable_slot,
1469                                                                                         MonoMethod *method, gpointer code) MONO_INTERNAL;
1470
1471 gpointer
1472 mono_method_alloc_generic_virtual_thunk (MonoDomain *domain, int size) MONO_INTERNAL;
1473
1474 typedef enum {
1475         MONO_UNHANDLED_POLICY_LEGACY,
1476         MONO_UNHANDLED_POLICY_CURRENT
1477 } MonoRuntimeUnhandledExceptionPolicy;
1478
1479 MonoRuntimeUnhandledExceptionPolicy
1480 mono_runtime_unhandled_exception_policy_get (void) MONO_INTERNAL;
1481 void
1482 mono_runtime_unhandled_exception_policy_set (MonoRuntimeUnhandledExceptionPolicy policy) MONO_INTERNAL;
1483
1484 MonoVTable *
1485 mono_class_try_get_vtable (MonoDomain *domain, MonoClass *class) MONO_INTERNAL;
1486
1487 MonoException *
1488 mono_runtime_class_init_full (MonoVTable *vtable, gboolean raise_exception) MONO_INTERNAL;
1489
1490 void
1491 mono_method_clear_object (MonoDomain *domain, MonoMethod *method) MONO_INTERNAL;
1492
1493 void
1494 mono_class_compute_gc_descriptor (MonoClass *class) MONO_INTERNAL;
1495
1496 MonoObject*
1497 mono_object_xdomain_representation (MonoObject *obj, MonoDomain *target_domain, MonoObject **exc) MONO_INTERNAL;
1498
1499 char *
1500 mono_string_to_utf8_checked (MonoString *s, MonoError *error) MONO_INTERNAL;
1501
1502 gboolean
1503 mono_class_is_reflection_method_or_constructor (MonoClass *class) MONO_INTERNAL;
1504
1505 MonoObject *
1506 mono_get_object_from_blob (MonoDomain *domain, MonoType *type, const char *blob) MONO_INTERNAL;
1507
1508 gpointer
1509 mono_class_get_ref_info (MonoClass *klass) MONO_INTERNAL;
1510
1511 void
1512 mono_class_set_ref_info (MonoClass *klass, gpointer obj) MONO_INTERNAL;
1513
1514 void
1515 mono_class_free_ref_info (MonoClass *klass) MONO_INTERNAL;
1516
1517 #endif /* __MONO_OBJECT_INTERNALS_H__ */
1518
1519