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