441 lines
12 KiB
C#
441 lines
12 KiB
C#
//
|
|
// marshal9.cs: tests for custom marshalling
|
|
//
|
|
|
|
using System;
|
|
using System.Runtime.InteropServices;
|
|
|
|
public class Marshal1 : ICustomMarshaler
|
|
{
|
|
int param;
|
|
|
|
public static int cleanup_managed_count = 0;
|
|
|
|
public static int cleanup_native_count = 0;
|
|
|
|
public static int native_to_managed_count = 0;
|
|
|
|
public static object native_to_managed_result = null;
|
|
|
|
public Marshal1 (int param) {
|
|
this.param = param;
|
|
}
|
|
|
|
public static ICustomMarshaler GetInstance (string s) {
|
|
int param = Int32.Parse (s);
|
|
return new Marshal1 (param);
|
|
}
|
|
|
|
public void CleanUpManagedData (object managedObj)
|
|
{
|
|
//Console.WriteLine ("CleanUpManagedData called");
|
|
cleanup_managed_count ++;
|
|
}
|
|
|
|
public void CleanUpNativeData (IntPtr pNativeData)
|
|
{
|
|
//Console.WriteLine("CleanUpNativeData:" + pNativeData);
|
|
/* Might be allocated in libtest.c using g_new0 so dont free it */
|
|
int alloc_type = Marshal.ReadInt32 (pNativeData);
|
|
if (alloc_type == 1)
|
|
Marshal.FreeHGlobal (pNativeData);
|
|
cleanup_native_count ++;
|
|
}
|
|
|
|
// I really do not understand the purpose of this method
|
|
// or when it would be called. In fact, Rotor never seems
|
|
// to call it.
|
|
public int GetNativeDataSize ()
|
|
{
|
|
//Console.WriteLine("GetNativeDataSize() called");
|
|
return 4;
|
|
}
|
|
|
|
public IntPtr MarshalManagedToNative (object managedObj)
|
|
{
|
|
int number;
|
|
IntPtr ptr;
|
|
|
|
number = Convert.ToInt32 (managedObj);
|
|
ptr = Marshal.AllocHGlobal (8);
|
|
Marshal.WriteInt32 (ptr, 1); /* Allocated by AllocHGlobal */
|
|
Marshal.WriteInt32(new IntPtr (ptr.ToInt64 () + 4), number);
|
|
|
|
//Console.WriteLine ("ToNative: " + ptr);
|
|
return ptr;
|
|
}
|
|
|
|
public object MarshalNativeToManaged (IntPtr pNativeData)
|
|
{
|
|
//Console.WriteLine ("ToManaged: " + pNativeData);
|
|
native_to_managed_count ++;
|
|
native_to_managed_result = param + Marshal.ReadInt32 (new IntPtr (pNativeData.ToInt64 () + 4));
|
|
return native_to_managed_result;
|
|
}
|
|
}
|
|
|
|
public class Tests
|
|
{
|
|
public static int Main (string[] args) {
|
|
return TestDriver.RunTests (typeof (Tests));
|
|
return 0;
|
|
}
|
|
|
|
[DllImport ("libtest")]
|
|
[return : MarshalAs(UnmanagedType.CustomMarshaler,MarshalTypeRef = typeof
|
|
(Marshal1), MarshalCookie = "5")]
|
|
private static extern object mono_test_marshal_pass_return_custom (int i,
|
|
[MarshalAs( UnmanagedType.CustomMarshaler, MarshalTypeRef = typeof (Marshal1), MarshalCookie = "5")] object number, int j);
|
|
|
|
public static int test_0_pass_return () {
|
|
|
|
Marshal1.cleanup_managed_count = 0;
|
|
Marshal1.cleanup_native_count = 0;
|
|
Marshal1.native_to_managed_count = 0;
|
|
|
|
int res = (int)mono_test_marshal_pass_return_custom (5, 10, 5);
|
|
|
|
if (Marshal1.cleanup_managed_count != 0)
|
|
return 1;
|
|
if (Marshal1.cleanup_native_count != 2)
|
|
return 2;
|
|
if (Marshal1.native_to_managed_count != 1)
|
|
return 3;
|
|
|
|
return res == 15 ? 0 : 3;
|
|
}
|
|
|
|
[DllImport ("libtest")]
|
|
private static extern int mono_test_marshal_pass_out_custom (int i,
|
|
[MarshalAs( UnmanagedType.CustomMarshaler, MarshalTypeRef = typeof (Marshal1), MarshalCookie = "5"), Out] out object number, int j);
|
|
|
|
public static int test_0_pass_out () {
|
|
|
|
Marshal1.cleanup_managed_count = 0;
|
|
Marshal1.cleanup_native_count = 0;
|
|
|
|
object o = 0;
|
|
int res = mono_test_marshal_pass_out_custom (5, out o, 5);
|
|
|
|
/* 10 + 5 + 5 + 5 */
|
|
if ((int)o != 25)
|
|
return 1;
|
|
|
|
if (Marshal1.cleanup_managed_count != 0)
|
|
return 2;
|
|
if (Marshal1.cleanup_native_count != 1)
|
|
return 3;
|
|
|
|
return 0;
|
|
}
|
|
|
|
[DllImport ("libtest")]
|
|
private static extern int mono_test_marshal_pass_inout_custom (int i,
|
|
[MarshalAs( UnmanagedType.CustomMarshaler, MarshalTypeRef = typeof (Marshal1), MarshalCookie = "5"), In, Out] object number, int j);
|
|
|
|
public static int test_0_pass_inout () {
|
|
Marshal1.cleanup_managed_count = 0;
|
|
Marshal1.cleanup_native_count = 0;
|
|
Marshal1.native_to_managed_result = null;
|
|
|
|
int res = mono_test_marshal_pass_inout_custom (5, 5, 5);
|
|
|
|
// The changes made by the [Out] custom marshaller are not visible to the caller
|
|
if ((int)Marshal1.native_to_managed_result != 20)
|
|
return 1;
|
|
|
|
if (Marshal1.cleanup_managed_count != 0)
|
|
return 2;
|
|
if (Marshal1.cleanup_native_count != 1)
|
|
return 3;
|
|
|
|
return 0;
|
|
}
|
|
|
|
[DllImport ("libtest")]
|
|
private static extern int mono_test_marshal_pass_out_byval_custom (int i,
|
|
[MarshalAs( UnmanagedType.CustomMarshaler, MarshalTypeRef = typeof (Marshal1), MarshalCookie = "5"), Out] object number, int j);
|
|
|
|
public static int test_0_pass_out_byval () {
|
|
Marshal1.cleanup_managed_count = 0;
|
|
Marshal1.cleanup_native_count = 0;
|
|
Marshal1.native_to_managed_result = null;
|
|
|
|
// MS.NET passes NULL and does no marshalling in this case
|
|
int res = mono_test_marshal_pass_out_byval_custom (5, 5, 5);
|
|
|
|
if (res != 0)
|
|
return 1;
|
|
|
|
if (Marshal1.native_to_managed_result != null)
|
|
return 2;
|
|
|
|
if (Marshal1.cleanup_managed_count != 0)
|
|
return 3;
|
|
if (Marshal1.cleanup_native_count != 0)
|
|
return 4;
|
|
|
|
return 0;
|
|
}
|
|
|
|
[DllImport ("libtest")]
|
|
private static extern int mono_test_marshal_pass_byref_custom (int i,
|
|
[MarshalAs( UnmanagedType.CustomMarshaler, MarshalTypeRef = typeof (Marshal1), MarshalCookie = "5")] ref object number, int j);
|
|
|
|
public static int test_0_pass_ref () {
|
|
|
|
Marshal1.cleanup_managed_count = 0;
|
|
Marshal1.cleanup_native_count = 0;
|
|
|
|
object o = 10;
|
|
int res = mono_test_marshal_pass_byref_custom (5, ref o, 5);
|
|
|
|
/* 10 + 5 + 5 + 5 */
|
|
if ((int)o != 25)
|
|
return 1;
|
|
|
|
if (Marshal1.cleanup_managed_count != 0)
|
|
return 2;
|
|
if (Marshal1.cleanup_native_count != 1)
|
|
return 3;
|
|
|
|
return 0;
|
|
}
|
|
|
|
[DllImport ("libtest")]
|
|
[return : MarshalAs(UnmanagedType.CustomMarshaler,MarshalTypeRef = typeof
|
|
(Marshal1), MarshalCookie = "5")]
|
|
private static extern object mono_test_marshal_pass_return_custom_null (int i,
|
|
[MarshalAs( UnmanagedType.CustomMarshaler, MarshalTypeRef = typeof (Marshal1), MarshalCookie = "5")] object number, int j);
|
|
|
|
public static int test_0_pass_return_null () {
|
|
|
|
Marshal1.cleanup_managed_count = 0;
|
|
Marshal1.cleanup_native_count = 0;
|
|
|
|
object o = mono_test_marshal_pass_return_custom_null (5, null, 5);
|
|
|
|
if (Marshal1.cleanup_managed_count != 0)
|
|
return 1;
|
|
if (Marshal1.cleanup_native_count != 0)
|
|
return 2;
|
|
|
|
return (o == null) ? 0 : 1;
|
|
}
|
|
|
|
[return : MarshalAs(UnmanagedType.CustomMarshaler,MarshalTypeRef = typeof
|
|
(Marshal1), MarshalCookie = "5")] public delegate object pass_return_int_delegate ([MarshalAs (UnmanagedType.CustomMarshaler, MarshalTypeRef = typeof (Marshal1), MarshalCookie = "5")] object o);
|
|
|
|
[DllImport ("libtest")]
|
|
private static extern int mono_test_marshal_pass_return_custom_in_delegate (pass_return_int_delegate del);
|
|
|
|
[DllImport ("libtest")]
|
|
private static extern int mono_test_marshal_pass_return_custom_null_in_delegate (pass_return_int_delegate del);
|
|
|
|
private static object pass_return_int (object i) {
|
|
return (int)i;
|
|
}
|
|
|
|
private static object pass_return_null (object i) {
|
|
return (i == null) ? null : new Object ();
|
|
}
|
|
|
|
public static int test_0_pass_return_delegate () {
|
|
|
|
Marshal1.cleanup_managed_count = 0;
|
|
Marshal1.cleanup_native_count = 0;
|
|
|
|
int res = mono_test_marshal_pass_return_custom_in_delegate (new pass_return_int_delegate (pass_return_int));
|
|
|
|
if (Marshal1.cleanup_managed_count != 2)
|
|
return 1;
|
|
if (Marshal1.cleanup_native_count != 0)
|
|
return 2;
|
|
|
|
return res == 15 ? 0 : 3;
|
|
}
|
|
|
|
public static int test_0_pass_return_null_delegate () {
|
|
|
|
Marshal1.cleanup_managed_count = 0;
|
|
Marshal1.cleanup_native_count = 0;
|
|
|
|
int res = mono_test_marshal_pass_return_custom_null_in_delegate (new pass_return_int_delegate (pass_return_null));
|
|
|
|
if (Marshal1.cleanup_managed_count != 0)
|
|
return 1;
|
|
if (Marshal1.cleanup_native_count != 0)
|
|
return 2;
|
|
|
|
return res == 15 ? 0 : 3;
|
|
}
|
|
|
|
/*
|
|
* Test custom marshaller class not implementing ICustomMarshaler
|
|
*/
|
|
|
|
public class Marshal2 {
|
|
}
|
|
|
|
[DllImport ("libtest")]
|
|
private static extern IntPtr mono_test_marshal_pass_return_custom2 (int i,
|
|
[MarshalAs( UnmanagedType.CustomMarshaler, MarshalTypeRef = typeof (Marshal3), MarshalCookie = "5")] object number, int j);
|
|
|
|
public static int test_0_not_icustommarshaller () {
|
|
try {
|
|
mono_test_marshal_pass_return_custom2 (5, 10, 5);
|
|
}
|
|
catch (ApplicationException) {
|
|
return 0;
|
|
}
|
|
return 1;
|
|
}
|
|
|
|
|
|
/*
|
|
* Test custom marshaller class missing GetInstance method
|
|
*/
|
|
|
|
public class Marshal3 : ICustomMarshaler {
|
|
public void CleanUpManagedData (object managedObj)
|
|
{
|
|
}
|
|
|
|
public void CleanUpNativeData (IntPtr pNativeData)
|
|
{
|
|
}
|
|
|
|
public int GetNativeDataSize ()
|
|
{
|
|
return 4;
|
|
}
|
|
|
|
public IntPtr MarshalManagedToNative (object managedObj)
|
|
{
|
|
return IntPtr.Zero;
|
|
}
|
|
|
|
public object MarshalNativeToManaged (IntPtr pNativeData)
|
|
{
|
|
return null;
|
|
}
|
|
}
|
|
|
|
public class Marshal4 : Marshal3 {
|
|
public static object GetInstance (string s) {
|
|
return null;
|
|
}
|
|
}
|
|
|
|
public class Marshal5 : Marshal3 {
|
|
public static ICustomMarshaler GetInstance (object s) {
|
|
return null;
|
|
}
|
|
}
|
|
|
|
[DllImport ("libtest", EntryPoint = "mono_test_marshal_pass_return_custom2")]
|
|
private static extern IntPtr mono_test_marshal_pass_return_custom3 (int i,
|
|
[MarshalAs( UnmanagedType.CustomMarshaler, MarshalTypeRef = typeof (Marshal3), MarshalCookie = "5")] object number, int j);
|
|
|
|
[DllImport ("libtest", EntryPoint = "mono_test_marshal_pass_return_custom2")]
|
|
private static extern IntPtr mono_test_marshal_pass_return_custom4 (int i,
|
|
[MarshalAs( UnmanagedType.CustomMarshaler, MarshalTypeRef = typeof (Marshal4), MarshalCookie = "5")] object number, int j);
|
|
|
|
[DllImport ("libtest", EntryPoint = "mono_test_marshal_pass_return_custom2")]
|
|
private static extern IntPtr mono_test_marshal_pass_return_custom5 (int i,
|
|
[MarshalAs( UnmanagedType.CustomMarshaler, MarshalTypeRef = typeof (Marshal5), MarshalCookie = "5")] object number, int j);
|
|
|
|
public static int test_0_missing_getinstance1 () {
|
|
try {
|
|
mono_test_marshal_pass_return_custom3 (5, 10, 5);
|
|
}
|
|
catch (ApplicationException) {
|
|
return 0;
|
|
}
|
|
return 1;
|
|
}
|
|
|
|
public static int test_0_missing_getinstance2 () {
|
|
try {
|
|
mono_test_marshal_pass_return_custom4 (5, 10, 5);
|
|
}
|
|
catch (ApplicationException) {
|
|
return 0;
|
|
}
|
|
return 1;
|
|
}
|
|
|
|
public static int test_0_missing_getinstance3 () {
|
|
try {
|
|
mono_test_marshal_pass_return_custom5 (5, 10, 5);
|
|
}
|
|
catch (ApplicationException) {
|
|
return 0;
|
|
}
|
|
return 1;
|
|
}
|
|
|
|
public class Marshal6 : ICustomMarshaler {
|
|
public static int managed_to_native_count = 0;
|
|
public static int native_to_managed_count = 0;
|
|
|
|
public static ICustomMarshaler GetInstance (string s)
|
|
{
|
|
return new Marshal6 ();
|
|
}
|
|
|
|
public void CleanUpManagedData (object managedObj)
|
|
{
|
|
}
|
|
|
|
public void CleanUpNativeData (IntPtr pNativeData)
|
|
{
|
|
}
|
|
|
|
public int GetNativeDataSize ()
|
|
{
|
|
return 4;
|
|
}
|
|
|
|
public IntPtr MarshalManagedToNative (object managedObj)
|
|
{
|
|
managed_to_native_count++;
|
|
return IntPtr.Zero;
|
|
}
|
|
|
|
public object MarshalNativeToManaged (IntPtr pNativeData)
|
|
{
|
|
native_to_managed_count++;
|
|
return null;
|
|
}
|
|
}
|
|
|
|
public delegate void custom_out_param_delegate ([MarshalAs (UnmanagedType.CustomMarshaler, MarshalTypeRef = typeof (Marshal6), MarshalCookie = "5")] out object o);
|
|
|
|
[DllImport ("libtest")]
|
|
private static extern int mono_test_marshal_custom_out_param_delegate (custom_out_param_delegate del);
|
|
|
|
// ICustomMarshaler.MarshalNativeToManaged should not be called when the
|
|
// parameter is marked as an out.
|
|
public static int test_0_native_to_managed_custom_parameter ()
|
|
{
|
|
Marshal6.managed_to_native_count = 0;
|
|
Marshal6.native_to_managed_count = 0;
|
|
|
|
int res = mono_test_marshal_custom_out_param_delegate (new custom_out_param_delegate (custom_out_param));
|
|
|
|
if (Marshal6.managed_to_native_count != 1)
|
|
return 1;
|
|
if (Marshal6.native_to_managed_count != 0)
|
|
return 2;
|
|
|
|
return 0;
|
|
}
|
|
|
|
private static void custom_out_param (out object i)
|
|
{
|
|
i = new object();
|
|
}
|
|
|
|
}
|