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                         props ["bindTo"] = "127.0.0.1";
 176                         TcpChannel chan = new TcpChannel (props, null, null);
 177                         ChannelServices.RegisterChannel (chan);
 178
 179                         try {
 180                                 Register <Server<object>> ("gentcptest.rem");
 181                                 RunTests (Connect <Server<object>> ($"tcp://localhost:{port}/gentcptest.rem"));
 182                         } finally {
 183                                 ChannelServices.UnregisterChannel (chan);
 184                         }
 185                 }
 186
 187                 static T RegisterAndConnect <T> () where T: MarshalByRefObject
 188                 {
 189                         AppDomain d = BaseCallTest.CreateDomain ("GenericTests");
 190                         return (T) d.CreateInstanceAndUnwrap (
 191                                 typeof (T).Assembly.FullName,
 192                                 typeof (T).FullName);
 193                 }
 194
 195                 static void Register <T> (string uri) where T: MarshalByRefObject
 196                 {
 197                         object obj = Activator.CreateInstance (typeof(T));
 198                         RemotingServices.Marshal ((MarshalByRefObject)obj, uri);
 199                 }
 200
 201                 static T Connect <T> (string uri) where T: MarshalByRefObject
 202                 {
 203                         return (T) RemotingServices.Connect (typeof (T), uri);
 204                 }
 205
 206                 static void RunTests (ServerBase<object> rem)
 207                 {
 208                         Assert.AreEqual (42, rem.TestIface<int>(42),
 209                                          "#1 calling TestIface on object instance");
 210
 211                         Assert.AreEqual (42, rem.TestVirt<int>(42),
 212                                          "#2 calling TestVirt");
 213
 214                         ITest i = rem;
 215                         Assert.AreEqual (42, i.TestIface<int>(42),
 216                                          "#3 calling TestIface on interface");
 217
 218                         Assert.AreEqual (42, i.TestDirectIfaceImpl (42),
 219                                          "#4 calling TestDirectIfaceImp");
 220
 221                         INested cao = rem.GetNested ();
 222                         Assert.AreEqual (42, cao.Test (),
 223                                          "#5a calling INested.Test ()");
 224
 225                         Assert.AreEqual (42 + 500, cao.Test (42),
 226                                          "#5 calling INested.Test (int)");
 227
 228                         Assert.AreEqual (42, cao.Test (21, 21),
 229                                          "#6 calling INested.Test (int, int)");
 230
 231                         Assert.AreEqual (42, cao.Test<int> (42),
 232                                          "#7 calling INested.Test<V>");
 233
 234                         Assert.AreEqual (0, cao.Test<int, string> (42, "bar"),
 235                                          "#8 calling INested.Test<V, T>");
 236
 237                         cao = rem.GetNestedMbr ();
 238                         Assert.AreEqual (42, cao.Test (),
 239                                          "#9a calling INested.Test ()");
 240
 241                         Assert.AreEqual (42 + 500, cao.Test (42),
 242                                          "#9 calling INested.Test (int)");
 243
 244                         Assert.AreEqual (42, cao.Test (21, 21),
 245                                          "#10 calling INested.Test (int, int)");
 246
 247                         Assert.AreEqual (42, cao.Test<int> (42),
 248                                          "#11 calling INested.Test<V>");
 249
 250                         Assert.AreEqual (0, cao.Test<int, string> (42, "bar"),
 251                                          "#12 calling INested.Test<V, T>");
 252                 }
 253         }
 254 }
 255