mcs/class/System.Runtime.Remoting/Test/GenericTest.cs

   1 //
   2 // MonoTests.Remoting.GenericTest.cs
   3 //
   4 // Authors:
   5 //     Robert Jordan  <robertj@gmx.net>
   6 //
   7
   8
   9 using System;
  10 using System.Collections;
  11 using System.Runtime.Remoting;
  12 using System.Runtime.Remoting.Channels;
  13 using System.Runtime.Remoting.Channels.Tcp;
  14 using System.Runtime.Remoting.Channels.Http;
  15 using System.Runtime.Remoting.Channels.Ipc;
  16 using System.Threading;
  17 using NUnit.Framework;
  18
  19 using MonoTests.Helpers;
  20
  21 namespace MonoTests.Remoting
  22 {
  23         public interface INested
  24         {
  25                 int Test ();
  26                 int Test (int i);
  27                 int Test (int a, int b);
  28                 V Test <V> (V v);
  29                 V Test <V, T> (V v, T t);
  30         }
  31
  32         public interface ITest
  33         {
  34                 V TestIface<V> (V v);
  35                 int TestDirectIfaceImpl (int i);
  36                 INested GetNested ();
  37                 INested GetNestedMbr ();
  38         }
  39
  40         public class ServerBase<T> : MarshalByRefObject, ITest
  41         {
  42                 public virtual V TestVirt<V> (V v)
  43                 {
  44                         return default (V);
  45                 }
  46
  47                 public V TestIface<V> (V v)
  48                 {
  49                         return v;
  50                 }
  51
  52                 int ITest.TestDirectIfaceImpl (int i)
  53                 {
  54                         return i;
  55                 }
  56
  57                 public int TestDirectIfaceImpl (int i)
  58                 {
  59                         return -1;
  60                 }
  61
  62                 public INested GetNested ()
  63                 {
  64                         return new Nested ();
  65                 }
  66
  67                 public INested GetNested (string s)
  68                 {
  69                         return new Nested ();
  70                 }
  71
  72                 public INested GetNestedMbr ()
  73                 {
  74                         return new NestedMbr ();
  75                 }
  76         }
  77
  78         public class Server<T> : ServerBase<T>
  79         {
  80                 public override V TestVirt<V> (V v)
  81                 {
  82                         return v;
  83                 }
  84         }
  85
  86         [Serializable]
  87         public class Nested : INested
  88         {
  89                 public int Test ()
  90                 {
  91                         return 47;
  92                 }
  93
  94                 int INested.Test ()
  95                 {
  96                         return 42;
  97                 }
  98
  99                 public int Test (int i)
 100                 {
 101                         return i + 500;
 102                 }
 103
 104                 int INested.Test (int a, int b)
 105                 {
 106                         return a + b;
 107                 }
 108
 109                 public V Test <V> (V v)
 110                 {
 111                         return v;
 112                 }
 113
 114                 V INested.Test <V, T> (V v, T t)
 115                 {
 116                         return default (V);
 117                 }
 118         }
 119
 120         public class NestedMbr : MarshalByRefObject, INested
 121         {
 122                 public int Test ()
 123                 {
 124                         return 47;
 125                 }
 126
 127                 int INested.Test ()
 128                 {
 129                         return 42;
 130                 }
 131
 132                 public int Test (int i)
 133                 {
 134                         return i + 500;
 135                 }
 136
 137                 int INested.Test (int a, int b)
 138                 {
 139                         return a + b;
 140                 }
 141
 142                 public V Test <V> (V v)
 143                 {
 144                         return v;
 145                 }
 146
 147                 V INested.Test <V, T> (V v, T t)
 148                 {
 149                         return default (V);
 150                 }
 151         }
 152
 153
 154         [TestFixture]
 155         public class GenericTest
 156         {
 157                 // Under MS.NET, INested.Test<V>(V v) isn't supported over the
 158                 // xappdom channel anymore (as of .NET 3.5). The stacktrace
 159                 // looks like if INested.Test(int) is invoked in place of
 160                 // INested.Test<int>(int).
 161                 [Category("NotDotNet")]
 162                 [Test]
 163                 public void TestCrossAppDomainChannel ()
 164                 {
 165                         RunTests (RegisterAndConnect <Server<object>> ());
 166                 }
 167
 168                 [Test]
 169                 public void TestTcpChannel ()
 170                 {
 171                         var port = NetworkHelpers.FindFreePort ();
 172                         IDictionary props = new Hashtable ();
 173                         props ["name"] = Guid.NewGuid ().ToString("N");
 174                         props ["port"] = port;
 175                         TcpChannel chan = new TcpChannel (props, null, null);
 176                         ChannelServices.RegisterChannel (chan);
 177
 178                         try {
 179                                 Register <Server<object>> ("gentcptest.rem");
 180                                 RunTests (Connect <Server<object>> ($"tcp://localhost:{port}/gentcptest.rem"));
 181                         } finally {
 182                                 ChannelServices.UnregisterChannel (chan);
 183                         }
 184                 }
 185
 186                 static T RegisterAndConnect <T> () where T: MarshalByRefObject
 187                 {
 188                         AppDomain d = BaseCallTest.CreateDomain ("GenericTests");
 189                         return (T) d.CreateInstanceAndUnwrap (
 190                                 typeof (T).Assembly.FullName,
 191                                 typeof (T).FullName);
 192                 }
 193
 194                 static void Register <T> (string uri) where T: MarshalByRefObject
 195                 {
 196                         object obj = Activator.CreateInstance (typeof(T));
 197                         RemotingServices.Marshal ((MarshalByRefObject)obj, uri);
 198                 }
 199
 200                 static T Connect <T> (string uri) where T: MarshalByRefObject
 201                 {
 202                         return (T) RemotingServices.Connect (typeof (T), uri);
 203                 }
 204
 205                 static void RunTests (ServerBase<object> rem)
 206                 {
 207                         Assert.AreEqual (42, rem.TestIface<int>(42),
 208                                          "#1 calling TestIface on object instance");
 209
 210                         Assert.AreEqual (42, rem.TestVirt<int>(42),
 211                                          "#2 calling TestVirt");
 212
 213                         ITest i = rem;
 214                         Assert.AreEqual (42, i.TestIface<int>(42),
 215                                          "#3 calling TestIface on interface");
 216
 217                         Assert.AreEqual (42, i.TestDirectIfaceImpl (42),
 218                                          "#4 calling TestDirectIfaceImp");
 219
 220                         INested cao = rem.GetNested ();
 221                         Assert.AreEqual (42, cao.Test (),
 222                                          "#5a calling INested.Test ()");
 223
 224                         Assert.AreEqual (42 + 500, cao.Test (42),
 225                                          "#5 calling INested.Test (int)");
 226
 227                         Assert.AreEqual (42, cao.Test (21, 21),
 228                                          "#6 calling INested.Test (int, int)");
 229
 230                         Assert.AreEqual (42, cao.Test<int> (42),
 231                                          "#7 calling INested.Test<V>");
 232
 233                         Assert.AreEqual (0, cao.Test<int, string> (42, "bar"),
 234                                          "#8 calling INested.Test<V, T>");
 235
 236                         cao = rem.GetNestedMbr ();
 237                         Assert.AreEqual (42, cao.Test (),
 238                                          "#9a calling INested.Test ()");
 239
 240                         Assert.AreEqual (42 + 500, cao.Test (42),
 241                                          "#9 calling INested.Test (int)");
 242
 243                         Assert.AreEqual (42, cao.Test (21, 21),
 244                                          "#10 calling INested.Test (int, int)");
 245
 246                         Assert.AreEqual (42, cao.Test<int> (42),
 247                                          "#11 calling INested.Test<V>");
 248
 249                         Assert.AreEqual (0, cao.Test<int, string> (42, "bar"),
 250                                          "#12 calling INested.Test<V, T>");
 251                 }
 252         }
 253 }
 254