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