3 * marshal.h: Routines for marshaling complex types in P/Invoke methods.
6 * Paolo Molaro (lupus@ximian.com)
8 * (C) 2002 Ximian, Inc. http://www.ximian.com
12 #ifndef __MONO_MARSHAL_H__
13 #define __MONO_MARSHAL_H__
15 #include <mono/metadata/class.h>
16 #include <mono/metadata/object-internals.h>
17 #include <mono/metadata/class-internals.h>
18 #include <mono/metadata/opcodes.h>
19 #include <mono/metadata/reflection.h>
20 #include <mono/metadata/method-builder.h>
22 #define mono_marshal_find_bitfield_offset(type, elem, byte_offset, bitmask) \
25 memset (&tmp, 0, sizeof (tmp)); \
27 mono_marshal_find_nonzero_bit_offset ((guint8*)&tmp, sizeof (tmp), (byte_offset), (bitmask)); \
31 * This structure holds the state kept by the emit_ marshalling functions.
32 * This is exported so it can be used by cominterop.c.
35 MonoMethodBuilder *mb;
36 MonoMethodSignature *sig;
37 MonoMethodPInvoke *piinfo;
38 int *orig_conv_args; /* Locals containing the original values of byref args */
40 MonoClass *retobj_class;
41 MonoMethodSignature *csig; /* Might need to be changed due to MarshalAs directives */
42 MonoImage *image; /* The image to use for looking up custom marshallers */
47 * This is invoked to convert arguments from the current types to
48 * the underlying types expected by the platform routine. If required,
49 * the methods create a temporary variable with the proper type, and return
50 * the location for it (either the passed argument, or the newly allocated
53 MARSHAL_ACTION_CONV_IN,
56 * This operation is called to push the actual value that was optionally
57 * converted on the first stage
62 * Convert byref arguments back or free resources allocated during the
65 MARSHAL_ACTION_CONV_OUT,
68 * The result from the unmanaged call is at the top of the stack when
69 * this action is invoked. The result should be stored in the
70 * third local variable slot.
72 MARSHAL_ACTION_CONV_RESULT,
74 MARSHAL_ACTION_MANAGED_CONV_IN,
75 MARSHAL_ACTION_MANAGED_CONV_OUT,
76 MARSHAL_ACTION_MANAGED_CONV_RESULT
81 /*type of the function pointer of methods returned by mono_marshal_get_runtime_invoke*/
82 typedef MonoObject *(*RuntimeInvokeFunction) (MonoObject *this, void **params, MonoObject **exc, void* compiled_method);
84 typedef void (*RuntimeInvokeDynamicFunction) (void *args, MonoObject **exc, void* compiled_method);
86 /* marshaling helper functions */
89 mono_marshal_init (void) MONO_INTERNAL;
92 mono_marshal_cleanup (void) MONO_INTERNAL;
95 mono_class_native_size (MonoClass *klass, guint32 *align) MONO_INTERNAL;
98 mono_marshal_load_type_info (MonoClass* klass) MONO_INTERNAL;
101 mono_marshal_type_size (MonoType *type, MonoMarshalSpec *mspec, guint32 *align,
102 gboolean as_field, gboolean unicode) MONO_INTERNAL;
105 mono_type_native_stack_size (MonoType *type, guint32 *alignment) MONO_INTERNAL;
108 mono_array_to_savearray (MonoArray *array) MONO_INTERNAL;
111 mono_array_to_lparray (MonoArray *array) MONO_INTERNAL;
114 mono_free_lparray (MonoArray *array, gpointer* nativeArray) MONO_INTERNAL;
117 mono_string_utf8_to_builder (MonoStringBuilder *sb, char *text) MONO_INTERNAL;
120 mono_string_utf16_to_builder (MonoStringBuilder *sb, gunichar2 *text) MONO_INTERNAL;
123 mono_string_builder_to_utf8 (MonoStringBuilder *sb) MONO_INTERNAL;
126 mono_string_builder_to_utf16 (MonoStringBuilder *sb) MONO_INTERNAL;
129 mono_string_to_ansibstr (MonoString *string_obj) MONO_INTERNAL;
132 mono_string_to_bstr (MonoString *string_obj) MONO_INTERNAL;
135 mono_string_to_byvalstr (gpointer dst, MonoString *src, int size) MONO_INTERNAL;
138 mono_string_to_byvalwstr (gpointer dst, MonoString *src, int size) MONO_INTERNAL;
141 mono_delegate_to_ftnptr (MonoDelegate *delegate) MONO_INTERNAL;
144 mono_ftnptr_to_delegate (MonoClass *klass, gpointer ftn) MONO_INTERNAL;
146 void mono_delegate_free_ftnptr (MonoDelegate *delegate) MONO_INTERNAL;
149 mono_marshal_set_last_error (void) MONO_INTERNAL;
152 mono_marshal_asany (MonoObject *obj, MonoMarshalNative string_encoding, int param_attrs) MONO_INTERNAL;
155 mono_marshal_free_asany (MonoObject *o, gpointer ptr, MonoMarshalNative string_encoding, int param_attrs) MONO_INTERNAL;
158 mono_type_to_ldind (MonoType *type) MONO_INTERNAL;
161 mono_type_to_stind (MonoType *type) MONO_INTERNAL;
163 /* functions to create various architecture independent helper functions */
166 mono_marshal_method_from_wrapper (MonoMethod *wrapper) MONO_INTERNAL;
169 mono_marshal_get_remoting_invoke (MonoMethod *method) MONO_INTERNAL;
172 mono_marshal_get_xappdomain_invoke (MonoMethod *method) MONO_INTERNAL;
175 mono_marshal_get_remoting_invoke_for_target (MonoMethod *method, MonoRemotingTarget target_type) MONO_INTERNAL;
178 mono_marshal_get_remoting_invoke_with_check (MonoMethod *method) MONO_INTERNAL;
181 mono_marshal_get_delegate_begin_invoke (MonoMethod *method) MONO_INTERNAL;
184 mono_marshal_get_delegate_end_invoke (MonoMethod *method) MONO_INTERNAL;
187 mono_marshal_get_delegate_invoke (MonoMethod *method, MonoDelegate *del) MONO_INTERNAL;
190 mono_marshal_get_runtime_invoke (MonoMethod *method, gboolean virtual) MONO_INTERNAL;
193 mono_marshal_get_runtime_invoke_dynamic (void) MONO_INTERNAL;
196 mono_marshal_get_string_ctor_signature (MonoMethod *method) MONO_INTERNAL;
199 mono_marshal_get_managed_wrapper (MonoMethod *method, MonoClass *delegate_klass, MonoObject **this_loc) MONO_INTERNAL;
202 mono_marshal_get_vtfixup_ftnptr (MonoImage *image, guint32 token, guint16 type) MONO_INTERNAL;
205 mono_marshal_get_icall_wrapper (MonoMethodSignature *sig, const char *name, gconstpointer func, gboolean check_exceptions) MONO_INTERNAL;
208 mono_marshal_get_native_wrapper (MonoMethod *method, gboolean check_exceptions, gboolean aot) MONO_INTERNAL;
211 mono_marshal_get_native_func_wrapper (MonoImage *image, MonoMethodSignature *sig, MonoMethodPInvoke *piinfo, MonoMarshalSpec **mspecs, gpointer func) MONO_INTERNAL;
214 mono_marshal_get_struct_to_ptr (MonoClass *klass) MONO_INTERNAL;
217 mono_marshal_get_ptr_to_struct (MonoClass *klass) MONO_INTERNAL;
220 mono_marshal_get_stfld_wrapper (MonoType *type) MONO_INTERNAL;
223 mono_marshal_get_ldfld_wrapper (MonoType *type) MONO_INTERNAL;
226 mono_marshal_get_ldflda_wrapper (MonoType *type) MONO_INTERNAL;
229 mono_marshal_get_ldfld_remote_wrapper (MonoClass *klass) MONO_INTERNAL;
232 mono_marshal_get_stfld_remote_wrapper (MonoClass *klass) MONO_INTERNAL;
235 mono_marshal_get_synchronized_wrapper (MonoMethod *method) MONO_INTERNAL;
238 mono_marshal_get_unbox_wrapper (MonoMethod *method) MONO_INTERNAL;
241 mono_marshal_get_isinst (MonoClass *klass) MONO_INTERNAL;
244 mono_marshal_get_castclass (MonoClass *klass) MONO_INTERNAL;
247 mono_marshal_get_proxy_cancast (MonoClass *klass) MONO_INTERNAL;
250 mono_marshal_get_stelemref (void) MONO_INTERNAL;
253 mono_marshal_get_array_address (int rank, int elem_size) MONO_INTERNAL;
256 mono_marshal_get_generic_array_helper (MonoClass *class, MonoClass *iface,
257 gchar *name, MonoMethod *method) MONO_INTERNAL;
260 mono_marshal_get_thunk_invoke_wrapper (MonoMethod *method) MONO_INTERNAL;
263 mono_marshal_free_dynamic_wrappers (MonoMethod *method) MONO_INTERNAL;
266 mono_marshal_free_inflated_wrappers (MonoMethod *method) MONO_INTERNAL;
268 /* marshaling internal calls */
271 mono_marshal_alloc (gulong size) MONO_INTERNAL;
274 mono_marshal_free (gpointer ptr) MONO_INTERNAL;
277 mono_marshal_free_array (gpointer *ptr, int size) MONO_INTERNAL;
280 mono_marshal_free_ccw (MonoObject* obj) MONO_INTERNAL;
283 mono_marshal_xdomain_copy_value (MonoObject *val) MONO_INTERNAL;
286 cominterop_release_all_rcws (void) MONO_INTERNAL;
289 ves_icall_System_Runtime_InteropServices_Marshal_copy_to_unmanaged (MonoArray *src, gint32 start_index,
290 gpointer dest, gint32 length) MONO_INTERNAL;
293 ves_icall_System_Runtime_InteropServices_Marshal_copy_from_unmanaged (gpointer src, gint32 start_index,
294 MonoArray *dest, gint32 length) MONO_INTERNAL;
297 ves_icall_System_Runtime_InteropServices_Marshal_ReadIntPtr (gpointer ptr, gint32 offset) MONO_INTERNAL;
300 ves_icall_System_Runtime_InteropServices_Marshal_ReadByte (gpointer ptr, gint32 offset) MONO_INTERNAL;
303 ves_icall_System_Runtime_InteropServices_Marshal_ReadInt16 (gpointer ptr, gint32 offset) MONO_INTERNAL;
306 ves_icall_System_Runtime_InteropServices_Marshal_ReadInt32 (gpointer ptr, gint32 offset) MONO_INTERNAL;
309 ves_icall_System_Runtime_InteropServices_Marshal_ReadInt64 (gpointer ptr, gint32 offset) MONO_INTERNAL;
312 ves_icall_System_Runtime_InteropServices_Marshal_WriteByte (gpointer ptr, gint32 offset, unsigned char val) MONO_INTERNAL;
315 ves_icall_System_Runtime_InteropServices_Marshal_WriteIntPtr (gpointer ptr, gint32 offset, gpointer val) MONO_INTERNAL;
318 ves_icall_System_Runtime_InteropServices_Marshal_WriteInt16 (gpointer ptr, gint32 offset, gint16 val) MONO_INTERNAL;
321 ves_icall_System_Runtime_InteropServices_Marshal_WriteInt32 (gpointer ptr, gint32 offset, gint32 val) MONO_INTERNAL;
324 ves_icall_System_Runtime_InteropServices_Marshal_WriteInt64 (gpointer ptr, gint32 offset, gint64 val) MONO_INTERNAL;
327 ves_icall_System_Runtime_InteropServices_Marshal_PtrToStringAnsi (char *ptr) MONO_INTERNAL;
330 ves_icall_System_Runtime_InteropServices_Marshal_PtrToStringAnsi_len (char *ptr, gint32 len) MONO_INTERNAL;
333 ves_icall_System_Runtime_InteropServices_Marshal_PtrToStringUni (guint16 *ptr) MONO_INTERNAL;
336 ves_icall_System_Runtime_InteropServices_Marshal_PtrToStringUni_len (guint16 *ptr, gint32 len) MONO_INTERNAL;
339 ves_icall_System_Runtime_InteropServices_Marshal_PtrToStringBSTR (gpointer ptr) MONO_INTERNAL;
342 ves_icall_System_Runtime_InteropServices_Marshal_GetComSlotForMethodInfoInternal (MonoReflectionMethod *m) MONO_INTERNAL;
345 ves_icall_System_Runtime_InteropServices_Marshal_GetLastWin32Error (void) MONO_INTERNAL;
348 ves_icall_System_Runtime_InteropServices_Marshal_SizeOf (MonoReflectionType *rtype) MONO_INTERNAL;
351 ves_icall_System_Runtime_InteropServices_Marshal_StructureToPtr (MonoObject *obj, gpointer dst, MonoBoolean delete_old) MONO_INTERNAL;
354 ves_icall_System_Runtime_InteropServices_Marshal_PtrToStructure (gpointer src, MonoObject *dst) MONO_INTERNAL;
357 ves_icall_System_Runtime_InteropServices_Marshal_PtrToStructure_type (gpointer src, MonoReflectionType *type) MONO_INTERNAL;
360 ves_icall_System_Runtime_InteropServices_Marshal_OffsetOf (MonoReflectionType *type, MonoString *field_name) MONO_INTERNAL;
363 ves_icall_System_Runtime_InteropServices_Marshal_StringToBSTR (MonoString *string) MONO_INTERNAL;
366 ves_icall_System_Runtime_InteropServices_Marshal_StringToHGlobalAnsi (MonoString *string) MONO_INTERNAL;
369 ves_icall_System_Runtime_InteropServices_Marshal_StringToHGlobalUni (MonoString *string) MONO_INTERNAL;
372 ves_icall_System_Runtime_InteropServices_Marshal_DestroyStructure (gpointer src, MonoReflectionType *type) MONO_INTERNAL;
375 ves_icall_System_Runtime_InteropServices_Marshal_AllocCoTaskMem (int size) MONO_INTERNAL;
378 ves_icall_System_Runtime_InteropServices_Marshal_FreeCoTaskMem (void *ptr) MONO_INTERNAL;
381 ves_icall_System_Runtime_InteropServices_Marshal_ReAllocCoTaskMem (gpointer ptr, int size) MONO_INTERNAL;
384 ves_icall_System_Runtime_InteropServices_Marshal_AllocHGlobal (int size) MONO_INTERNAL;
387 ves_icall_System_Runtime_InteropServices_Marshal_ReAllocHGlobal (gpointer ptr, int size) MONO_INTERNAL;
390 ves_icall_System_Runtime_InteropServices_Marshal_FreeHGlobal (void *ptr) MONO_INTERNAL;
393 ves_icall_System_Runtime_InteropServices_Marshal_FreeBSTR (void *ptr) MONO_INTERNAL;
396 ves_icall_System_Runtime_InteropServices_Marshal_UnsafeAddrOfPinnedArrayElement (MonoArray *arrayobj, int index) MONO_INTERNAL;
399 ves_icall_System_Runtime_InteropServices_Marshal_GetDelegateForFunctionPointerInternal (void *ftn, MonoReflectionType *type) MONO_INTERNAL;
402 ves_icall_System_Runtime_InteropServices_Marshal_AddRefInternal (gpointer pUnk) MONO_INTERNAL;
405 ves_icall_System_Runtime_InteropServices_Marshal_QueryInterfaceInternal (gpointer pUnk, gpointer riid, gpointer* ppv) MONO_INTERNAL;
408 ves_icall_System_Runtime_InteropServices_Marshal_ReleaseInternal (gpointer pUnk) MONO_INTERNAL;
411 ves_icall_System_Runtime_InteropServices_Marshal_GetIUnknownForObjectInternal (MonoObject* object) MONO_INTERNAL;
414 ves_icall_System_Runtime_InteropServices_Marshal_GetObjectForCCW (void* pUnk) MONO_INTERNAL;
417 ves_icall_System_Runtime_InteropServices_Marshal_GetIDispatchForObjectInternal (MonoObject* object) MONO_INTERNAL;
420 ves_icall_System_Runtime_InteropServices_Marshal_GetCCW (MonoObject* object, MonoReflectionType* type) MONO_INTERNAL;
423 ves_icall_System_Runtime_InteropServices_Marshal_IsComObject (MonoObject* object) MONO_INTERNAL;
426 ves_icall_System_Runtime_InteropServices_Marshal_ReleaseComObjectInternal (MonoObject* object) MONO_INTERNAL;
429 ves_icall_System_ComObject_CreateRCW (MonoReflectionType *type) MONO_INTERNAL;
432 ves_icall_System_ComObject_ReleaseInterfaces(MonoComObject* obj) MONO_INTERNAL;
435 ves_icall_System_ComObject_GetInterfaceInternal (MonoComObject* obj, MonoReflectionType* type, MonoBoolean throw_exception) MONO_INTERNAL;
438 ves_icall_Mono_Interop_ComInteropProxy_AddProxy (gpointer pUnk, MonoComInteropProxy* proxy) MONO_INTERNAL;
441 ves_icall_Mono_Interop_ComInteropProxy_FindProxy (gpointer pUnk) MONO_INTERNAL;
444 mono_win32_compat_CopyMemory (gpointer dest, gconstpointer source, gsize length);
447 mono_win32_compat_FillMemory (gpointer dest, gsize length, guchar fill);
450 mono_win32_compat_MoveMemory (gpointer dest, gconstpointer source, gsize length);
453 mono_win32_compat_ZeroMemory (gpointer dest, gsize length);
456 mono_marshal_find_nonzero_bit_offset (guint8 *buf, int len, int *byte_offset, guint8 *bitmask) MONO_INTERNAL;
459 mono_signature_no_pinvoke (MonoMethod *method) MONO_INTERNAL;
461 /* Called from cominterop.c */
464 mono_marshal_emit_native_wrapper (MonoImage *image, MonoMethodBuilder *mb, MonoMethodSignature *sig, MonoMethodPInvoke *piinfo, MonoMarshalSpec **mspecs, gpointer func, gboolean aot, gboolean check_exceptions) MONO_INTERNAL;
467 mono_marshal_emit_managed_wrapper (MonoMethodBuilder *mb, MonoMethodSignature *invoke_sig, MonoMarshalSpec **mspecs, EmitMarshalContext* m, MonoMethod *method, MonoObject** this_loc) MONO_INTERNAL;
470 mono_marshal_get_cache (GHashTable **var, GHashFunc hash_func, GCompareFunc equal_func) MONO_INTERNAL;
473 mono_marshal_find_in_cache (GHashTable *cache, gpointer key) MONO_INTERNAL;
476 mono_mb_create_and_cache (GHashTable *cache, gpointer key,
477 MonoMethodBuilder *mb, MonoMethodSignature *sig,
478 int max_stack) MONO_INTERNAL;
480 mono_marshal_emit_thread_interrupt_checkpoint (MonoMethodBuilder *mb) MONO_INTERNAL;
484 #endif /* __MONO_MARSHAL_H__ */