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

   1 //
   2 // MonoTests.Remoting.ServerObject.cs
   3 //
   4 // Author: Lluis Sanchez Gual (lluis@ximian.com)
   5 //
   6 // 2003 (C) Copyright, Ximian, Inc.
   7 //
   8
   9 using System;
  10 using System.Runtime.Remoting;
  11 using System.Runtime.Remoting.Lifetime;
  12 using System.Collections;
  13 using NUnit.Framework;
  14
  15 namespace MonoTests.Remoting
  16 {
  17         // A list of ServerObject instances
  18
  19         [ContextHook("x", false)]
  20         public class ServerList:
  21                 ContextBoundObject,
  22                 IDisposable
  23         {
  24                 ArrayList values = new ArrayList();
  25                 public int NumVal = 0;
  26                 public string StrVal = "val";
  27
  28                 public ServerList()
  29                 {
  30                         Assert.IsTrue (RemotingServices.IsTransparentProxy(this));
  31                         CallSeq.Add ("List created");
  32                 }
  33
  34                 public void Dispose()
  35                 {
  36                         Assert.IsTrue (RemotingServices.IsTransparentProxy(this));
  37                         CallSeq.Add ("List disposed");
  38
  39                 }
  40
  41                 public void Add (ServerObject v)
  42                 {
  43                         Assert.IsTrue (RemotingServices.IsTransparentProxy(this));
  44                         values.Add (v);
  45                         CallSeq.Add ("Added " + v.Name);
  46                 }
  47
  48                 public void ProcessItems ()
  49                 {
  50                         Assert.IsTrue (RemotingServices.IsTransparentProxy(this));
  51                         CallSeq.Add ("Processing");
  52
  53                         int total = 0;
  54                         foreach (ServerObject ob in values)
  55                                 total += ob.GetValue();
  56
  57                         CallSeq.Add ("Total: " + total);
  58                 }
  59
  60                 public void Clear()
  61                 {
  62                         Assert.IsTrue (RemotingServices.IsTransparentProxy(this));
  63                         CallSeq.Add ("Clearing");
  64                         values.Clear();
  65                 }
  66
  67                 public void ParameterTest1 (int a, out string b)
  68                 {
  69                         Assert.IsTrue (RemotingServices.IsTransparentProxy(this));
  70                         b = "adeu " + a;
  71                 }
  72
  73                 public void ParameterTest2 (int a, out int b)
  74                 {
  75                         Assert.IsTrue (RemotingServices.IsTransparentProxy(this));
  76                         b = a+1;
  77                 }
  78
  79                 public ServerObject NewItem(string name)
  80                 {
  81                         Assert.IsTrue (RemotingServices.IsTransparentProxy(this));
  82                         ServerObject obj = new ServerObject(name);
  83                         Add (obj);
  84                         return obj;
  85                 }
  86
  87                 public ServerObject CreateItem(string name, int val)
  88                 {
  89                         Assert.IsTrue (RemotingServices.IsTransparentProxy(this));
  90                         ServerObject obj = new ServerObject(name);
  91                         obj.SetValue (val);
  92                         return obj;
  93                 }
  94
  95                 public ComplexData SetComplexData (ComplexData data)
  96                 {
  97                         Assert.IsTrue (RemotingServices.IsTransparentProxy(this));
  98                         CallSeq.Add ("Showing content of ComplexData");
  99                         data.Dump ();
 100                         return data;
 101                 }
 102
 103                 public override ObjRef CreateObjRef (Type type)
 104                 {
 105                         Assert.IsTrue (RemotingServices.IsTransparentProxy(this));
 106                         CallSeq.Add ("### ServerList.CreateObjRef");
 107                         return base.CreateObjRef (type);
 108                 }
 109         }
 110
 111         // A remotable object
 112
 113         public class ServerObject:
 114 //              ContextBoundObject
 115                 MarshalByRefObject
 116         {
 117                 int _value;
 118                 string _name;
 119
 120                 public ServerObject (string name)
 121                 {
 122                         _name = name;
 123                 }
 124
 125                 public string Name
 126                 {
 127                         get { return _name; }
 128                 }
 129
 130                 public void SetValue (int v)
 131                 {
 132                         CallSeq.Add ("ServerObject " + _name + ": setting " + v);
 133                         _value = v;
 134                 }
 135
 136                 public int GetValue ()
 137                 {
 138                         CallSeq.Add ("ServerObject " + _name + ": getting " + _value);
 139                         return _value;
 140                 }
 141
 142                 public override ObjRef CreateObjRef (Type type)
 143                 {
 144                         CallSeq.Add ("### ServerObject.CreateObjRef");
 145                         return base.CreateObjRef (type);
 146                 }
 147         }
 148
 149         // Some complex data for testing serialization
 150
 151         public enum AnEnum { a,b,c,d,e };
 152
 153         [Serializable]
 154         public class ComplexData
 155         {
 156                 public AnEnum Val = AnEnum.a;
 157
 158                 public object[] Info;
 159
 160                 public ComplexData (AnEnum va, object[] info)
 161                 {
 162                         Info = info;
 163                         Val = va;
 164                 }
 165
 166                 public void Dump ()
 167                 {
 168                         CallSeq.Add ("Content:");
 169                         CallSeq.Add ("Val: " + Val);
 170                         foreach (object ob in Info)
 171                                 CallSeq.Add ("Array item: " + ob);
 172                 }
 173         }
 174 }