mcs/class/corlib/System.Runtime.Remoting.Messaging/StackBuilderSink.cs

   1 //
   2 // System.Runtime.Remoting.StackBuilderSink.cs
   3 //
   4 // Author: Lluis Sanchez Gual (lsg@ctv.es)
   5 //
   6 // (C) 2002, Lluis Sanchez Gual
   7 //
   8
   9 //
  10 // Copyright (C) 2004 Novell, Inc (http://www.novell.com)
  11 //
  12 // Permission is hereby granted, free of charge, to any person obtaining
  13 // a copy of this software and associated documentation files (the
  14 // "Software"), to deal in the Software without restriction, including
  15 // without limitation the rights to use, copy, modify, merge, publish,
  16 // distribute, sublicense, and/or sell copies of the Software, and to
  17 // permit persons to whom the Software is furnished to do so, subject to
  18 // the following conditions:
  19 //
  20 // The above copyright notice and this permission notice shall be
  21 // included in all copies or substantial portions of the Software.
  22 //
  23 // THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
  24 // EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
  25 // MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
  26 // NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
  27 // LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
  28 // OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
  29 // WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
  30 //
  31
  32 using System;
  33 using System.Threading;
  34 using System.Reflection;
  35 using System.Runtime.Remoting.Proxies;
  36
  37 namespace System.Runtime.Remoting.Messaging
  38 {
  39         // Sink that calls the real method of the object
  40
  41         internal class StackBuilderSink: IMessageSink
  42         {
  43                 MarshalByRefObject _target;
  44                 RealProxy _rp;
  45
  46                 public StackBuilderSink (MarshalByRefObject obj, bool forceInternalExecute)
  47                 {
  48                         _target = obj;
  49                         if (!forceInternalExecute && RemotingServices.IsTransparentProxy (obj))
  50                                 _rp = RemotingServices.GetRealProxy (obj);
  51                 }
  52
  53                 public IMessage SyncProcessMessage (IMessage msg)
  54                 {
  55                         CheckParameters (msg);
  56
  57                         // Makes the real call to the object
  58                         if (_rp != null) return _rp.Invoke (msg);
  59                         else return RemotingServices.InternalExecuteMessage (_target, (IMethodCallMessage)msg);
  60                 }
  61
  62                 public IMessageCtrl AsyncProcessMessage (IMessage msg, IMessageSink replySink)
  63                 {
  64                         object[] parms = new object[] {msg, replySink};
  65                         ThreadPool.QueueUserWorkItem (new WaitCallback ((data) => {
  66                                 try {
  67                                         ExecuteAsyncMessage (data);
  68                                 } catch {}
  69                                 }
  70                                 ), parms);
  71                         return null;
  72                 }
  73
  74                 void ExecuteAsyncMessage (object ob)
  75                 {
  76                         object[] parms = (object[]) ob;
  77                         IMethodCallMessage msg = (IMethodCallMessage) parms[0];
  78                         IMessageSink replySink = (IMessageSink)parms[1];
  79
  80                         CheckParameters (msg);
  81
  82                         IMessage res;
  83                         if (_rp != null) res = _rp.Invoke (msg);
  84                         else res = RemotingServices.InternalExecuteMessage (_target, msg);
  85
  86                         replySink.SyncProcessMessage (res);
  87                 }
  88
  89                 public IMessageSink NextSink
  90                 {
  91                         get { return null; }
  92                 }
  93
  94                 void CheckParameters (IMessage msg)
  95                 {
  96                         IMethodCallMessage mcm = (IMethodCallMessage) msg;
  97
  98                         ParameterInfo[] parameters = mcm.MethodBase.GetParameters();
  99                         int narg = 0;
 100
 101                         foreach (ParameterInfo pi in parameters)
 102                         {
 103                                 object pval = mcm.GetArg (narg++);
 104                                 Type pt = pi.ParameterType;
 105                                 if (pt.IsByRef) pt = pt.GetElementType ();
 106
 107                                 if (pval != null && !pt.IsInstanceOfType (pval))
 108                                         throw new RemotingException ("Cannot cast argument " + pi.Position + " of type '" + pval.GetType().AssemblyQualifiedName +
 109                                                 "' to type '" + pt.AssemblyQualifiedName + "'");
 110                         }
 111                 }
 112         }
 113 }