Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
tree: ee0bc0d176
Fetching contributors…

Cannot retrieve contributors at this time

441 lines (336 sloc) 11.971 kb
//
// 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();
}
}
Jump to Line
Something went wrong with that request. Please try again.