2 // System.Runtime.Remoting.RemotingServices.cs
5 // Dietmar Maurer (dietmar@ximian.com)
6 // Lluis Sanchez Gual (lluis@ideary.com)
9 // (C) 2001 Ximian, Inc. http://www.ximian.com
14 using System.Reflection;
15 using System.Threading;
16 using System.Collections;
17 using System.Runtime.Remoting.Messaging;
18 using System.Runtime.Remoting.Proxies;
19 using System.Runtime.Remoting.Channels;
20 using System.Runtime.Remoting.Contexts;
21 using System.Runtime.Remoting.Activation;
22 using System.Runtime.Remoting.Lifetime;
23 using System.Runtime.CompilerServices;
24 using System.Runtime.Serialization;
27 namespace System.Runtime.Remoting
29 public sealed class RemotingServices
31 // Holds the identities of the objects, using uri as index
32 static Hashtable uri_hash = new Hashtable ();
34 internal static string app_id;
35 static int next_id = 1;
37 static RemotingServices ()
39 RegisterInternalChannels ();
40 app_id = Guid.NewGuid().ToString().Replace('-', '_') + "/";
41 CreateWellKnownServerIdentity (typeof(RemoteActivator), "RemoteActivationService.rem", WellKnownObjectMode.Singleton);
44 private RemotingServices () {}
46 [MethodImplAttribute(MethodImplOptions.InternalCall)]
47 internal extern static object InternalExecute (MonoMethod method, Object obj,
48 Object[] parameters, out object [] out_args);
50 [MethodImplAttribute(MethodImplOptions.InternalCall)]
51 public extern static bool IsTransparentProxy (object proxy);
53 internal static IMethodReturnMessage InternalExecuteMessage (
54 MarshalByRefObject target, IMethodCallMessage reqMsg)
58 MonoMethod method = (MonoMethod) target.GetType().GetMethod(reqMsg.MethodName, BindingFlags.Public|BindingFlags.NonPublic|BindingFlags.Instance, null, (Type[]) reqMsg.MethodSignature, null);
59 object oldContext = CallContext.SetCurrentCallContext (reqMsg.LogicalCallContext);
64 object rval = InternalExecute (method, target, reqMsg.Args, out out_args);
66 // Collect parameters with Out flag from the request message
68 ParameterInfo[] parameters = method.GetParameters();
69 object[] returnArgs = new object [parameters.Length];
73 foreach (ParameterInfo par in parameters)
75 if (par.IsOut && !par.ParameterType.IsByRef)
76 returnArgs [n++] = reqMsg.GetArg (par.Position);
77 else if (par.ParameterType.IsByRef)
78 returnArgs [n++] = out_args [noa++];
81 result = new ReturnMessage (rval, returnArgs, n, CallContext.CreateLogicalCallContext(), reqMsg);
85 result = new ReturnMessage (e, reqMsg);
88 CallContext.RestoreCallContext (oldContext);
92 public static IMethodReturnMessage ExecuteMessage (
93 MarshalByRefObject target, IMethodCallMessage reqMsg)
95 if (IsTransparentProxy(target))
97 // Message must go through all chain of sinks
98 RealProxy rp = GetRealProxy (target);
99 return (IMethodReturnMessage) rp.Invoke (reqMsg);
102 return InternalExecuteMessage (target, reqMsg);
105 public static object Connect (Type classToProxy, string url)
107 ObjRef objRef = new ObjRef (classToProxy, url, null);
108 return GetRemoteObject (objRef, classToProxy);
111 public static object Connect (Type classToProxy, string url, object data)
113 ObjRef objRef = new ObjRef (classToProxy, url, data);
114 return GetRemoteObject (objRef, classToProxy);
117 public static bool Disconnect (MarshalByRefObject obj)
119 if (obj == null) throw new ArgumentNullException ("obj");
121 ServerIdentity identity;
123 if (IsTransparentProxy (obj))
125 // CBOs are always accessed through a proxy, even in the server, so
126 // for server CBOs it is ok to disconnect a proxy
128 RealProxy proxy = GetRealProxy(obj);
129 if (proxy.GetProxiedType().IsContextful && (proxy.ObjectIdentity is ServerIdentity))
130 identity = proxy.ObjectIdentity as ServerIdentity;
132 throw new ArgumentException ("The obj parameter is a proxy");
135 identity = obj.ObjectIdentity;
137 if (identity == null || !identity.IsConnected)
141 LifetimeServices.StopTrackingLifetime (identity);
142 DisposeIdentity (identity);
147 public static Type GetServerTypeForUri (string uri)
149 Identity ident = GetIdentityForUri (uri);
150 if (ident == null) return null;
151 return ident.ObjectType;
154 public static string GetObjectUri (MarshalByRefObject obj)
156 Identity ident = GetObjectIdentity(obj);
157 if (ident is ClientIdentity) return ((ClientIdentity)ident).TargetUri;
158 else if (ident != null) return ident.ObjectUri;
162 public static object Unmarshal (ObjRef objref)
164 return Unmarshal(objref, true);
167 public static object Unmarshal (ObjRef objref, bool fRefine)
169 // FIXME: use type name when fRefine==true
171 Type classToProxy = fRefine ? objref.ServerType : typeof (MarshalByRefObject);
172 if (classToProxy == null) classToProxy = typeof (MarshalByRefObject);
174 if (objref.IsReferenceToWellKnow)
175 return GetRemoteObject(objref, classToProxy);
178 if (classToProxy.IsContextful)
180 // Look for a ProxyAttribute
181 ProxyAttribute att = (ProxyAttribute) Attribute.GetCustomAttribute (classToProxy, typeof(ProxyAttribute),true);
183 return att.CreateProxy (objref, classToProxy, null, null).GetTransparentProxy();
185 return GetProxyForRemoteObject (objref, classToProxy);
189 public static ObjRef Marshal (MarshalByRefObject obj)
191 return Marshal (obj, null, null);
194 public static ObjRef Marshal (MarshalByRefObject obj, string uri)
196 return Marshal (obj, uri, null);
199 public static ObjRef Marshal (MarshalByRefObject obj, string uri, Type requested_type)
201 if (IsTransparentProxy (obj))
203 RealProxy proxy = RemotingServices.GetRealProxy(obj);
204 Identity identity = proxy.ObjectIdentity;
206 if (identity != null)
208 if (identity.ObjectType.IsContextful && !identity.IsConnected)
210 // Unregistered local contextbound object. Register now.
211 ClientActivatedIdentity cboundIdentity = (ClientActivatedIdentity)identity;
212 if (uri == null) uri = NewUri();
213 cboundIdentity.ObjectUri = uri;
214 RegisterServerIdentity (cboundIdentity);
215 cboundIdentity.StartTrackingLifetime ((ILease)obj.InitializeLifetimeService());
216 return cboundIdentity.CreateObjRef(requested_type);
218 else if (uri != null)
219 throw new RemotingException ("It is not possible marshal a proxy of a remote object");
221 return proxy.ObjectIdentity.CreateObjRef(requested_type);
224 throw new NotSupportedException (); // TODO
227 if (requested_type == null) requested_type = obj.GetType();
231 if (obj.ObjectIdentity == null)
234 CreateClientActivatedServerIdentity (obj, requested_type, uri);
239 ClientActivatedIdentity identity = GetIdentityForUri ("/" + uri) as ClientActivatedIdentity;
240 if (identity == null || obj != identity.GetServerObject())
241 CreateClientActivatedServerIdentity (obj, requested_type, uri);
244 return obj.CreateObjRef(requested_type);
247 static string NewUri ()
249 int n = Interlocked.Increment (ref next_id);
250 return app_id + Environment.TickCount + "_" + n;
253 public static RealProxy GetRealProxy (object proxy)
255 if (!IsTransparentProxy(proxy)) throw new RemotingException("Cannot get the real proxy from an object that is not a transparent proxy");
256 return (RealProxy)((TransparentProxy)proxy)._rp;
259 public static MethodBase GetMethodBaseFromMethodMessage(IMethodMessage msg)
261 Type type = Type.GetType (msg.TypeName);
263 throw new RemotingException ("Type '" + msg.TypeName + "' not found!");
265 BindingFlags bflags = BindingFlags.Instance | BindingFlags.Public | BindingFlags.NonPublic;
266 if (msg.MethodSignature == null)
267 return type.GetMethod (msg.MethodName, bflags);
269 return type.GetMethod (msg.MethodName, bflags, null, (Type[]) msg.MethodSignature, null);
272 public static void GetObjectData(object obj, SerializationInfo info, StreamingContext context)
274 if (obj == null) throw new ArgumentNullException ("obj");
276 ObjRef oref = Marshal ((MarshalByRefObject)obj);
277 oref.GetObjectData (info, context);
280 public static ObjRef GetObjRefForProxy(MarshalByRefObject obj)
282 Identity ident = GetObjectIdentity(obj);
283 if (ident == null) return null;
284 else return ident.CreateObjRef(null);
287 public static object GetLifetimeService (MarshalByRefObject obj)
289 if (obj == null) return null;
290 return obj.GetLifetimeService ();
293 public static IMessageSink GetEnvoyChainForProxy (MarshalByRefObject obj)
295 if (IsTransparentProxy(obj))
296 return ((ClientIdentity)GetRealProxy (obj).ObjectIdentity).EnvoySink;
298 throw new ArgumentException ("obj must be a proxy","obj");
301 public static void LogRemotingStage (int stage)
303 throw new NotImplementedException ();
307 public static string GetSessionIdForMethodMessage(IMethodMessage msg)
309 throw new NotImplementedException ();
312 public static bool IsMethodOverloaded(IMethodMessage msg)
314 Type type = msg.MethodBase.DeclaringType;
315 MemberInfo[] members = type.GetMember (msg.MethodName, MemberTypes.Method, BindingFlags.NonPublic | BindingFlags.Public | BindingFlags.Instance);
316 return members.Length > 1;
319 public static bool IsObjectOutOfAppDomain(object tp)
321 Identity ident = GetObjectIdentity((MarshalByRefObject)tp);
322 if (ident != null) return !ident.IsFromThisAppDomain;
326 public static bool IsObjectOutOfContext(object tp)
328 ServerIdentity ident = GetObjectIdentity((MarshalByRefObject)tp) as ServerIdentity;
329 if (ident != null) return ident.Context != System.Threading.Thread.CurrentContext;
333 public static bool IsOneWay(MethodBase method)
335 // TODO: use internal call for better performance
336 object[] atts = method.GetCustomAttributes (typeof (OneWayAttribute), false);
337 return atts.Length > 0;
340 public static bool IsAsyncMessage(IMessage msg)
342 if (! (msg is MonoMethodMessage)) return false;
343 else if (((MonoMethodMessage)msg).IsAsync) return true;
344 else if (IsOneWay (((MonoMethodMessage)msg).MethodBase)) return true;
348 public static void SetObjectUriForMarshal(MarshalByRefObject obj, string uri)
350 if (IsTransparentProxy (obj)) throw new RemotingException ("SetObjectUriForMarshal method should only be called for MarshalByRefObjects that exist in the current AppDomain.");
354 #region Internal Methods
356 internal static object CreateClientProxy (ActivatedClientTypeEntry entry, object[] activationAttributes)
358 if (entry.ContextAttributes != null || activationAttributes != null)
360 ArrayList props = new ArrayList ();
361 if (entry.ContextAttributes != null) props.AddRange (entry.ContextAttributes);
362 if (activationAttributes != null) props.AddRange (activationAttributes);
363 return CreateClientProxy (entry.ObjectType, entry.ApplicationUrl, props.ToArray ());
366 return CreateClientProxy (entry.ObjectType, entry.ApplicationUrl, null);
369 internal static object CreateClientProxy (Type objectType, string url, object[] activationAttributes)
371 string activationUrl = url + "/RemoteActivationService.rem";
374 IMessageSink sink = GetClientChannelSinkChain (activationUrl, null, out objectUri);
376 RemotingProxy proxy = new RemotingProxy (objectType, activationUrl, activationAttributes);
377 return proxy.GetTransparentProxy();
380 internal static object CreateClientProxy (WellKnownClientTypeEntry entry)
382 return Connect (entry.ObjectType, entry.ObjectUrl, null);
385 internal static object CreateClientProxyForContextBound (Type type, object[] activationAttributes)
387 if (type.IsContextful)
389 // Look for a ProxyAttribute
390 ProxyAttribute att = (ProxyAttribute) Attribute.GetCustomAttribute (type, typeof(ProxyAttribute), true);
392 return att.CreateInstance (type);
394 RemotingProxy proxy = new RemotingProxy (type, ChannelServices.CrossContextUrl, activationAttributes);
395 return proxy.GetTransparentProxy();
398 internal static Identity GetIdentityForUri (string uri)
402 return (Identity)uri_hash [GetNormalizedUri(uri)];
406 internal static Identity GetObjectIdentity (MarshalByRefObject obj)
408 if (IsTransparentProxy(obj))
409 return GetRealProxy (obj).ObjectIdentity;
411 return obj.ObjectIdentity;
414 internal static ClientIdentity GetOrCreateClientIdentity(ObjRef objRef, Type proxyType, out object clientProxy)
416 // This method looks for an identity for the given url.
417 // If an identity is not found, it creates the identity and
418 // assigns it a proxy to the remote object.
420 // Creates the client sink chain for the given url or channelData.
421 // It will also get the object uri from the url.
423 object channelData = objRef.ChannelInfo != null ? objRef.ChannelInfo.ChannelData : null;
424 string url = (channelData == null) ? objRef.URI : null;
427 IMessageSink sink = GetClientChannelSinkChain (url, channelData, out objectUri);
429 if (objectUri == null) objectUri = objRef.URI;
434 string uri = GetNormalizedUri (objRef.URI);
436 ClientIdentity identity = uri_hash [uri] as ClientIdentity;
437 if (identity != null)
439 // Object already registered
440 clientProxy = identity.ClientProxy;
441 if (clientProxy != null) return identity;
443 // The proxy has just been GCed, so its identity cannot
444 // be reused. Just dispose it.
445 DisposeIdentity (identity);
448 // Creates an identity and a proxy for the remote object
450 identity = new ClientIdentity (objectUri, objRef);
451 identity.ChannelSink = sink;
453 // Registers the identity
454 uri_hash [uri] = identity;
456 if (proxyType != null)
458 RemotingProxy proxy = new RemotingProxy (proxyType, identity);
459 clientProxy = proxy.GetTransparentProxy();
460 identity.ClientProxy = (MarshalByRefObject) clientProxy;
467 static IMessageSink GetClientChannelSinkChain(string url, object channelData, out string objectUri)
469 IMessageSink sink = ChannelServices.CreateClientChannelSinkChain (url, channelData, out objectUri);
474 string msg = String.Format ("Cannot create channel sink to connect to URL {0}. An appropriate channel has probably not been registered.", url);
475 throw new RemotingException (msg);
479 string msg = String.Format ("Cannot create channel sink to connect to the remote object. An appropriate channel has probably not been registered.", url);
480 throw new RemotingException (msg);
486 internal static ClientActivatedIdentity CreateContextBoundObjectIdentity(Type objectType)
488 ClientActivatedIdentity identity = new ClientActivatedIdentity (null, objectType);
489 identity.ChannelSink = ChannelServices.CrossContextChannel;
493 internal static ClientActivatedIdentity CreateClientActivatedServerIdentity(MarshalByRefObject realObject, Type objectType, string objectUri)
495 ClientActivatedIdentity identity = new ClientActivatedIdentity (objectUri, objectType);
496 identity.AttachServerObject (realObject, Context.DefaultContext);
497 RegisterServerIdentity (identity);
498 identity.StartTrackingLifetime ((ILease)realObject.InitializeLifetimeService ());
502 internal static ServerIdentity CreateWellKnownServerIdentity(Type objectType, string objectUri, WellKnownObjectMode mode)
504 ServerIdentity identity;
506 if (mode == WellKnownObjectMode.SingleCall)
507 identity = new SingleCallIdentity(objectUri, Context.DefaultContext, objectType);
509 identity = new SingletonIdentity(objectUri, Context.DefaultContext, objectType);
511 RegisterServerIdentity (identity);
515 private static void RegisterServerIdentity(ServerIdentity identity)
519 if (uri_hash.ContainsKey (identity.ObjectUri))
520 throw new RemotingException ("Uri already in use: " + identity.ObjectUri);
522 uri_hash[identity.ObjectUri] = identity;
526 internal static object GetProxyForRemoteObject (ObjRef objref, Type classToProxy)
528 ClientActivatedIdentity identity = GetIdentityForUri (objref.URI) as ClientActivatedIdentity;
529 if (identity != null) return identity.GetServerObject ();
530 else return GetRemoteObject (objref, classToProxy);
533 internal static object GetRemoteObject(ObjRef objRef, Type proxyType)
536 GetOrCreateClientIdentity (objRef, proxyType, out proxy);
540 internal static object GetDomainProxy(AppDomain domain)
544 Context currentContext = Thread.CurrentContext;
545 AppDomain currentDomain = AppDomain.InternalSetDomain (domain);
548 data = domain.GetMarshalledDomainObjRef ();
552 AppDomain.InternalSetDomain (currentDomain);
553 AppDomain.InternalSetContext (currentContext);
556 MemoryStream stream = new MemoryStream (data);
557 ObjRef appref = (ObjRef) CADSerializer.DeserializeObject (stream);
558 return (AppDomain) RemotingServices.Unmarshal(appref);
561 private static void RegisterInternalChannels()
563 CrossAppDomainChannel.RegisterCrossAppDomainChannel();
566 internal static void DisposeIdentity (Identity ident)
570 if (!ident.Disposed) {
571 uri_hash.Remove (ident.ObjectUri);
572 ident.Disposed = true;
577 internal static Identity GetMessageTargetIdentity (IMessage msg)
579 // Returns the identity where the message is sent
581 if (msg is IInternalMessage)
582 return ((IInternalMessage)msg).TargetIdentity;
586 string uri = GetNormalizedUri (((IMethodMessage)msg).Uri);
587 return uri_hash [uri] as ServerIdentity;
591 internal static void SetMessageTargetIdentity (IMessage msg, Identity ident)
593 if (msg is IInternalMessage)
594 ((IInternalMessage)msg).TargetIdentity = ident;
597 internal static bool UpdateOutArgObject (ParameterInfo pi, object local, object remote)
599 if (local is StringBuilder)
601 StringBuilder sb = local as StringBuilder;
602 sb.Remove (0, sb.Length);
603 sb.Append (remote.ToString());
606 else if (pi.ParameterType.IsArray && ((Array)local).Rank == 1)
608 Array alocal = (Array) local;
609 if (alocal.Rank == 1)
611 Array.Copy ((Array) remote, alocal, alocal.Length);
622 static string GetNormalizedUri (string uri)
624 if (uri.StartsWith ("/")) return uri.Substring (1);