* icall.c (ves_icall_MonoType_GetEvent): Handle events without
[mono.git] / mono / metadata / object.h
1 #ifndef _MONO_CLI_OBJECT_H_
2 #define _MONO_CLI_OBJECT_H_
3
4 #include <mono/metadata/class.h>
5 #include <mono/metadata/threads-types.h>
6
7 #if 1
8 #ifdef __GNUC__
9 #define mono_assert(expr)                  G_STMT_START{                  \
10      if (!(expr))                                                         \
11        {                                                                  \
12                 MonoException *ex;                                        \
13                 char *msg = g_strdup_printf ("file %s: line %d (%s): "    \
14                 "assertion failed: (%s)", __FILE__, __LINE__,             \
15                 __PRETTY_FUNCTION__, #expr);                              \
16                 ex = mono_get_exception_execution_engine (msg);           \
17                 g_free (msg);                                             \
18                 mono_raise_exception (ex);                                \
19        };                               }G_STMT_END
20
21 #define mono_assert_not_reached()                 G_STMT_START{           \
22      MonoException *ex;                                                   \
23      char *msg = g_strdup_printf ("file %s: line %d (%s): "               \
24      "should not be reached", __FILE__, __LINE__, __PRETTY_FUNCTION__);   \
25      ex = mono_get_exception_execution_engine (msg);                      \
26      g_free (msg);                                                        \
27      mono_raise_exception (ex);                                           \
28 }G_STMT_END
29 #else /* not GNUC */
30 #define mono_assert(expr)                  G_STMT_START{                  \
31      if (!(expr))                                                         \
32        {                                                                  \
33                 MonoException *ex;                                        \
34                 char *msg = g_strdup_printf ("file %s: line %d: "         \
35                 "assertion failed: (%s)", __FILE__, __LINE__,             \
36                 #expr);                                                   \
37                 ex = mono_get_exception_execution_engine (msg);           \
38                 g_free (msg);                                             \
39                 mono_raise_exception (ex);                                \
40        };                               }G_STMT_END
41
42 #define mono_assert_not_reached()                 G_STMT_START{           \
43      MonoException *ex;                                                   \
44      char *msg = g_strdup_printf ("file %s: line %d): "                   \
45      "should not be reached", __FILE__, __LINE__);                        \
46      ex = mono_get_exception_execution_engine (msg);                      \
47      g_free (msg);                                                        \
48      mono_raise_exception (ex);                                           \
49 }G_STMT_END
50 #endif
51 #else
52 #define mono_assert(expr) g_assert(expr)
53 #define mono_assert_not_reached() g_assert_not_reached() 
54 #endif
55
56 #define MONO_CHECK_ARG(arg, expr)               G_STMT_START{             \
57      if (!(expr))                                                         \
58        {                                                                  \
59                 MonoException *ex;                                        \
60                 char *msg = g_strdup_printf ("assertion `%s' failed",     \
61                 #expr);                                                   \
62                 if (arg) {} /* check if the name exists */                \
63                 ex = mono_get_exception_argument (#arg, msg);             \
64                 g_free (msg);                                             \
65                 mono_raise_exception (ex);                                \
66        };                               }G_STMT_END
67
68 #define MONO_CHECK_ARG_NULL(arg)            G_STMT_START{                 \
69      if (arg == NULL)                                                     \
70        {                                                                  \
71                 MonoException *ex;                                        \
72                 if (arg) {} /* check if the name exists */                \
73                 ex = mono_get_exception_argument_null (#arg);             \
74                 mono_raise_exception (ex);                                \
75        };                               }G_STMT_END
76
77 typedef guchar MonoBoolean;
78
79 typedef struct _MonoReflectionMethod MonoReflectionMethod;
80 typedef struct _MonoDelegate MonoDelegate;
81
82 typedef struct {
83         MonoVTable *vtable;
84         MonoThreadsSync *synchronisation;
85 } MonoObject;
86
87 typedef struct {
88         MonoObject obj;
89         MonoObject *identity;
90 } MonoMarshalByRefObject;
91
92 typedef struct {
93         guint32 length;
94         guint32 lower_bound;
95 } MonoArrayBounds;
96
97 typedef struct {
98         MonoObject obj;
99         /* bounds is NULL for szarrays */
100         MonoArrayBounds *bounds;
101         /* total number of elements of the array */
102         guint32 max_length; 
103         /* we use double to ensure proper alignment on platforms that need it */
104         double vector [MONO_ZERO_LEN_ARRAY];
105 } MonoArray;
106
107 typedef struct {
108         MonoObject object;
109         gint32 length;
110         gunichar2 chars [MONO_ZERO_LEN_ARRAY];
111 } MonoString;
112
113 typedef struct {
114         MonoObject object;
115         gint32 length;
116         MonoString *str;
117 } MonoStringBuilder;
118
119 typedef struct {
120         MonoObject object;
121         MonoType  *type;
122 } MonoReflectionType;
123
124 typedef struct {
125         MonoType *type;
126         gpointer  value;
127         MonoClass *klass;
128 } MonoTypedRef;
129
130 typedef struct {
131         gpointer args;
132 } MonoArgumentHandle;
133
134 typedef struct {
135         MonoMethodSignature *sig;
136         gpointer args;
137         gint32 next_arg;
138         gint32 num_args;
139 } MonoArgIterator;
140
141 typedef struct {
142         MonoObject object;
143         MonoArray  *trace_ips;
144         MonoObject *inner_ex;
145         MonoString *message;
146         MonoString *help_link;
147         MonoString *class_name;
148         MonoString *stack_trace;
149         MonoString *remote_stack_trace;
150         gint32      remote_stack_index;
151         gint32      hresult;
152         MonoString *source;
153 } MonoException;
154
155 typedef struct {
156         MonoException base;
157 } MonoSystemException;
158
159 typedef struct {
160         MonoSystemException base;
161         MonoString *param_name;
162 } MonoArgumentException;
163
164 typedef struct {
165         MonoSystemException base;
166         MonoString *msg;
167         MonoString *type_name;
168 } MonoTypeLoadException;
169
170 typedef struct {
171         MonoObject   object;
172         MonoObject  *async_state;
173         MonoObject  *handle;
174         MonoObject  *async_delegate;
175         gpointer     data;
176         MonoBoolean  sync_completed;
177         MonoBoolean  completed;
178         MonoBoolean  endinvoke_called;
179         MonoObject  *async_callback;
180 } MonoAsyncResult;
181
182 typedef struct {
183         MonoMarshalByRefObject object;
184         gpointer     handle;
185         MonoBoolean  disposed;
186 } MonoWaitHandle;
187
188 typedef struct {
189         MonoObject  object;
190         MonoReflectionType *class_to_proxy;     
191         MonoObject *context;
192         MonoObject *unwrapped_server;
193 } MonoRealProxy;
194
195 typedef struct {
196         MonoObject       object;
197         MonoRealProxy   *rp;    
198         MonoRemoteClass *remote_class;
199         MonoBoolean      custom_type_info;
200 } MonoTransparentProxy;
201
202 /* This is a copy of System.Runtime.Remoting.Messaging.CallType */
203 typedef enum {
204         CallType_Sync = 0,
205         CallType_BeginInvoke = 1,
206         CallType_EndInvoke = 2,
207         CallType_OneWay = 3
208 } MonoCallType;
209
210 typedef struct {
211         MonoObject obj;
212         MonoReflectionMethod *method;
213         MonoArray  *args;               
214         MonoArray  *names;              
215         MonoArray  *arg_types;  
216         MonoObject *ctx;
217         MonoObject *rval;
218         MonoObject *exc;
219         MonoAsyncResult *async_result;
220         guint32     call_type;
221 } MonoMethodMessage;
222
223 typedef struct {
224         MonoObject obj;
225         gint32 il_offset;
226         gint32 native_offset;
227         MonoReflectionMethod *method;
228         MonoString *filename;
229         gint32 line;
230         gint32 column;
231 } MonoStackFrame;
232
233 typedef struct {
234         MonoObject  obj;
235         HANDLE      handle;
236         MonoObject *culture_info;
237         MonoObject *ui_culture_info;
238         MonoBoolean threadpool_thread;
239         gunichar2  *name;
240         guint32     name_len;
241         guint32     state;
242         MonoException *abort_exc;
243         MonoObject *abort_state;
244         guint32 tid;
245         HANDLE      start_notify;
246         gpointer stack_ptr;
247         gpointer *static_data;
248         gpointer jit_data;
249         gpointer lock_data;
250         GSList *appdomain_refs;
251         MonoBoolean interruption_requested;
252 } MonoThread;
253
254 typedef struct {
255         MonoString *name;
256         MonoReflectionType *type;
257         MonoObject *value;
258 } MonoSerializationEntry;
259
260 typedef struct {
261         guint32 state;
262         MonoObject *additional;
263 } MonoStreamingContext;
264
265 typedef struct {
266         MonoObject obj;
267         MonoBoolean readOnly;
268         MonoString *AMDesignator;
269         MonoString *PMDesignator;
270         MonoString *DateSeparator;
271         MonoString *TimeSeparator;
272         MonoString *ShortDatePattern;
273         MonoString *LongDatePattern;
274         MonoString *ShortTimePattern;
275         MonoString *LongTimePattern;
276         MonoString *MonthDayPattern;
277         MonoString *YearMonthPattern;
278         MonoString *FullDateTimePattern;
279         MonoString *RFC1123Pattern;
280         MonoString *SortableDateTimePattern;
281         MonoString *UniversalSortableDateTimePattern;
282         guint32 FirstDayOfWeek;
283         MonoObject *Calendar;
284         guint32 CalendarWeekRule;
285         MonoArray *AbbreviatedDayNames;
286         MonoArray *DayNames;
287         MonoArray *MonthNames;
288         MonoArray *AbbreviatedMonthNames;
289         MonoArray *ShortDatePatterns;
290         MonoArray *LongDatePatterns;
291         MonoArray *ShortTimePatterns;
292         MonoArray *LongTimePatterns;
293 } MonoDateTimeFormatInfo;
294
295 typedef struct 
296 {
297         MonoObject obj;
298         MonoBoolean readOnly;
299         MonoString *decimalFormats;
300         MonoString *currencyFormats;
301         MonoString *percentFormats;
302         MonoString *digitPattern;
303         MonoString *zeroPattern;
304         gint32 currencyDecimalDigits;
305         MonoString *currencyDecimalSeparator;
306         MonoString *currencyGroupSeparator;
307         MonoArray *currencyGroupSizes;
308         gint32 currencyNegativePattern;
309         gint32 currencyPositivePattern;
310         MonoString *currencySymbol;
311         MonoString *naNSymbol;
312         MonoString *negativeInfinitySymbol;
313         MonoString *negativeSign;
314         guint32 numberDecimalDigits;
315         MonoString *numberDecimalSeparator;
316         MonoString *numberGroupSeparator;
317         MonoArray *numberGroupSizes;
318         gint32 numberNegativePattern;
319         gint32 percentDecimalDigits;
320         MonoString *percentDecimalSeparator;
321         MonoString *percentGroupSeparator;
322         MonoArray *percentGroupSizes;
323         gint32 percentNegativePattern;
324         gint32 percentPositivePattern;
325         MonoString *percentSymbol;
326         MonoString *perMilleSymbol;
327         MonoString *positiveInfinitySymbol;
328         MonoString *positiveSign;
329 } MonoNumberFormatInfo;
330
331 typedef struct {
332         MonoObject obj;
333         gint32 lcid;
334         MonoString *icu_name;
335         gpointer ICU_collator;
336 } MonoCompareInfo;
337
338 typedef struct {
339         MonoObject obj;
340         MonoBoolean is_read_only;
341         gint32 lcid;
342         gint32 parent_lcid;
343         gint32 specific_lcid;
344         gint32 datetime_index;
345         gint32 number_index;
346         MonoBoolean use_user_override;
347         MonoNumberFormatInfo *number_format;
348         MonoDateTimeFormatInfo *datetime_format;
349         MonoObject *textinfo;
350         MonoString *name;
351         MonoString *displayname;
352         MonoString *englishname;
353         MonoString *nativename;
354         MonoString *iso3lang;
355         MonoString *iso2lang;
356         MonoString *icu_name;
357         MonoString *win3lang;
358         MonoCompareInfo *compareinfo;
359         const gint32 *calendar_data;
360 } MonoCultureInfo;
361
362 typedef struct {
363         MonoObject obj;
364         MonoString *str;
365         gint32 options;
366         MonoArray *key;
367         gint32 lcid;
368 } MonoSortKey;
369
370 typedef MonoObject* (*MonoInvokeFunc)        (MonoMethod *method, void *obj, void **params, MonoObject **exc);
371 typedef gpointer    (*MonoCompileFunc)       (MonoMethod *method);
372 typedef void        (*MonoMainThreadFunc)    (gpointer user_data);
373
374 #define mono_object_class(obj) (((MonoObject*)(obj))->vtable->klass)
375 #define mono_object_domain(obj) (((MonoObject*)(obj))->vtable->domain)
376
377 #define mono_array_length(array) ((array)->max_length)
378 #define mono_array_addr(array,type,index) ( ((char*)(array)->vector) + sizeof (type) * (index) )
379 #define mono_array_addr_with_size(array,size,index) ( ((char*)(array)->vector) + (size) * (index) )
380 #define mono_array_get(array,type,index) ( *(type*)mono_array_addr ((array), type, (index)) ) 
381 #define mono_array_set(array,type,index,value)  \
382         do {    \
383                 type *__p = (type *) mono_array_addr ((array), type, (index));  \
384                 *__p = (value); \
385         } while (0)
386
387 #define mono_string_chars(s) ((gunichar2*)(s)->chars)
388 #define mono_string_length(s) ((s)->length)
389 #define mono_stringbuilder_capacity(sb) ((sb)->str->length)
390
391 MonoObject *
392 mono_object_new             (MonoDomain *domain, MonoClass *klass);
393
394 MonoObject *
395 mono_object_new_specific    (MonoVTable *vtable);
396
397 /* can be used for classes without finalizer in non-profiling mode */
398 MonoObject *
399 mono_object_new_fast        (MonoVTable *vtable);
400
401 MonoObject *
402 mono_object_new_alloc_specific (MonoVTable *vtable);
403
404 MonoObject *
405 mono_object_new_from_token  (MonoDomain *domain, MonoImage *image, guint32 token);
406
407 MonoArray*
408 mono_array_new              (MonoDomain *domain, MonoClass *eclass, guint32 n);
409
410 MonoArray*
411 mono_array_new_full         (MonoDomain *domain, MonoClass *array_class,
412                              guint32 *lengths, guint32 *lower_bounds);
413
414 MonoArray *
415 mono_array_new_specific     (MonoVTable *vtable, guint32 n);
416
417 MonoArray*
418 mono_array_clone            (MonoArray *array);
419
420 MonoString*
421 mono_string_new_utf16       (MonoDomain *domain, const guint16 *text, gint32 len);
422
423 MonoString*
424 mono_string_new_size        (MonoDomain *domain, gint32 len);
425
426 MonoString*
427 mono_ldstr                  (MonoDomain *domain, MonoImage *image, guint32 str_index);
428
429 MonoString*
430 mono_string_is_interned     (MonoString *str);
431
432 MonoString*
433 mono_string_intern          (MonoString *str);
434
435 MonoString*
436 mono_string_new             (MonoDomain *domain, const char *text);
437
438 MonoString*
439 mono_string_new_wrapper     (const char *text);
440
441 MonoString*
442 mono_string_new_len         (MonoDomain *domain, const char *text, guint length);
443
444 char *
445 mono_string_to_utf8         (MonoString *string_obj);
446
447 gunichar2 *
448 mono_string_to_utf16        (MonoString *string_obj);
449
450 MonoString *
451 mono_string_from_utf16      (gunichar2 *data);
452
453 void       
454 mono_object_free            (MonoObject *o);
455
456 MonoObject *
457 mono_value_box              (MonoDomain *domain, MonoClass *klass, gpointer val);
458
459 gpointer
460 mono_object_unbox           (MonoObject *obj);
461
462 MonoObject *
463 mono_object_clone           (MonoObject *obj);
464
465 MonoObject *
466 mono_object_isinst          (MonoObject *obj, MonoClass *klass);
467
468 MonoObject *
469 mono_object_isinst_mbyref   (MonoObject *obj, MonoClass *klass);
470
471 MonoObject *
472 mono_object_castclass_mbyref (MonoObject *obj, MonoClass *klass);
473
474 typedef void (*MonoExceptionFunc) (MonoException *ex);
475
476 void
477 mono_install_handler        (MonoExceptionFunc func);
478
479 void
480 mono_raise_exception        (MonoException *ex);
481
482 void
483 mono_runtime_object_init    (MonoObject *this_obj);
484
485 void
486 mono_runtime_class_init     (MonoVTable *vtable);
487
488 void        
489 mono_install_runtime_invoke (MonoInvokeFunc func);
490
491 void        
492 mono_install_compile_method (MonoCompileFunc func);
493
494 MonoMethod*
495 mono_object_get_virtual_method (MonoObject *obj, MonoMethod *method);
496
497 MonoObject*
498 mono_runtime_invoke         (MonoMethod *method, void *obj, void **params,
499                              MonoObject **exc);
500
501 MonoMethod *
502 mono_get_delegate_invoke    (MonoClass *klass);
503
504 MonoObject*
505 mono_runtime_delegate_invoke (MonoObject *delegate, void **params, 
506                               MonoObject **exc);
507
508 MonoObject*
509 mono_runtime_invoke_array   (MonoMethod *method, void *obj, MonoArray *params,
510                              MonoObject **exc);
511
512 MonoArray*
513 mono_runtime_get_main_args  (void);
514
515 void
516 mono_runtime_exec_managed_code (MonoDomain *domain,
517                                 MonoMainThreadFunc main_func,
518                                 gpointer main_args);
519
520 int
521 mono_runtime_run_main       (MonoMethod *method, int argc, char* argv[], 
522                              MonoObject **exc);
523
524 int
525 mono_runtime_exec_main      (MonoMethod *method, MonoArray *args,
526                              MonoObject **exc);
527
528 MonoAsyncResult *
529 mono_async_result_new       (MonoDomain *domain, HANDLE handle, 
530                              MonoObject *state, gpointer data);
531
532 MonoWaitHandle *
533 mono_wait_handle_new        (MonoDomain *domain, HANDLE handle);
534
535 void
536 mono_message_init           (MonoDomain *domain, MonoMethodMessage *this_obj, 
537                              MonoReflectionMethod *method, MonoArray *out_args);
538
539 MonoObject *
540 mono_remoting_invoke        (MonoObject *real_proxy, MonoMethodMessage *msg, 
541                              MonoObject **exc, MonoArray **out_args);
542
543 MonoObject *
544 mono_message_invoke         (MonoObject *target, MonoMethodMessage *msg, 
545                              MonoObject **exc, MonoArray **out_args);
546
547 MonoMethodMessage *
548 mono_method_call_message_new (MonoMethod *method, gpointer *params, MonoMethod *invoke, 
549                               MonoDelegate **cb, MonoObject **state);
550
551 gpointer
552 mono_load_remote_field (MonoObject *this_obj, MonoClass *klass, MonoClassField *field, gpointer *res);
553
554 MonoObject *
555 mono_load_remote_field_new (MonoObject *this_obj, MonoClass *klass, MonoClassField *field);
556
557 void
558 mono_store_remote_field (MonoObject *this_obj, MonoClass *klass, MonoClassField *field, gpointer val);
559
560 void
561 mono_store_remote_field_new (MonoObject *this_obj, MonoClass *klass, MonoClassField *field, MonoObject *arg);
562
563 void
564 mono_method_return_message_restore (MonoMethod *method, gpointer *params, MonoArray *out_args);
565
566 void
567 mono_unhandled_exception    (MonoObject *exc);
568
569 void
570 mono_print_unhandled_exception (MonoObject *exc);
571
572 void
573 mono_delegate_ctor          (MonoObject *this_obj, MonoObject *target, gpointer addr);
574
575 gpointer 
576 mono_compile_method        (MonoMethod *method);
577
578 MonoRemoteClass*
579 mono_remote_class (MonoDomain *domain, MonoString *class_name, MonoClass *proxy_class);
580
581 void
582 mono_upgrade_remote_class (MonoDomain *domain, MonoRemoteClass *remote_class, MonoClass *klass);
583
584 /* accessors for fields and properties */
585 void
586 mono_field_set_value (MonoObject *obj, MonoClassField *field, void *value);
587
588 void
589 mono_field_static_set_value (MonoVTable *vt, MonoClassField *field, void *value);
590
591 void
592 mono_field_get_value (MonoObject *obj, MonoClassField *field, void *value);
593
594 void
595 mono_field_static_get_value (MonoVTable *vt, MonoClassField *field, void *value);
596
597 MonoObject *
598 mono_field_get_value_object (MonoDomain *domain, MonoClassField *field, MonoObject *obj);
599
600 void
601 mono_property_set_value (MonoProperty *prop, void *obj, void **params, MonoObject **exc);
602
603 MonoObject*
604 mono_property_get_value (MonoProperty *prop, void *obj, void **params, MonoObject **exc);
605
606 void
607 mono_type_initialization_init (void);
608
609 #endif
610