2 // System.Runtime.Remoting.ActivationServices.cs
4 // Author: Lluis Sanchez Gual (lluis@ideary.com)
6 // (C) 2002, Lluis Sanchez Gual
10 // Copyright (C) 2004 Novell, Inc (http://www.novell.com)
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:
20 // The above copyright notice and this permission notice shall be
21 // included in all copies or substantial portions of the Software.
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.
33 using System
.Threading
;
34 using System
.Runtime
.Remoting
.Messaging
;
35 using System
.Runtime
.Remoting
.Activation
;
36 using System
.Runtime
.Remoting
.Contexts
;
37 using System
.Runtime
.Remoting
.Proxies
;
38 using System
.Reflection
;
39 using System
.Runtime
.CompilerServices
;
40 using System
.Collections
;
41 using System
.Runtime
.Remoting
.Channels
;
43 namespace System
.Runtime
.Remoting
.Activation
45 internal class ActivationServices
47 static IActivator _constructionActivator
;
49 static IActivator ConstructionActivator
{
51 if (_constructionActivator
== null)
52 _constructionActivator
= new ConstructionLevelActivator ();
54 return _constructionActivator
;
58 public static IMessage
Activate (RemotingProxy proxy
, ConstructionCall ctorCall
)
61 ctorCall
.SourceProxy
= proxy
;
63 if (Thread
.CurrentContext
.HasExitSinks
&& !ctorCall
.IsContextOk
)
64 response
= Thread
.CurrentContext
.GetClientContextSinkChain ().SyncProcessMessage (ctorCall
);
66 response
= RemoteActivate (ctorCall
);
68 if (response
is IConstructionReturnMessage
&& ((IConstructionReturnMessage
)response
).Exception
== null && proxy
.ObjectIdentity
== null)
70 Identity identity
= RemotingServices
.GetMessageTargetIdentity (ctorCall
);
71 proxy
.AttachIdentity (identity
);
77 public static IMessage
RemoteActivate (IConstructionCallMessage ctorCall
)
81 return ctorCall
.Activator
.Activate (ctorCall
);
85 return new ReturnMessage (ex
, ctorCall
);
89 public static object CreateProxyFromAttributes (Type type
, object[] activationAttributes
)
91 string activationUrl
= null;
92 foreach (object attr
in activationAttributes
)
94 if (!(attr
is IContextAttribute
)) throw new RemotingException ("Activation attribute does not implement the IContextAttribute interface");
95 if (attr
is UrlAttribute
) activationUrl
= ((UrlAttribute
)attr
).UrlValue
;
98 if (activationUrl
!= null)
99 return RemotingServices
.CreateClientProxy (type
, activationUrl
, activationAttributes
);
101 ActivatedClientTypeEntry activatedEntry
= RemotingConfiguration
.IsRemotelyActivatedClientType (type
);
102 if (activatedEntry
!= null)
103 return RemotingServices
.CreateClientProxy (activatedEntry
, activationAttributes
);
105 if (type
.IsContextful
)
106 return RemotingServices
.CreateClientProxyForContextBound (type
, activationAttributes
);
111 public static ConstructionCall
CreateConstructionCall (Type type
, string activationUrl
, object[] activationAttributes
)
113 ConstructionCall ctorCall
= new ConstructionCall (type
);
115 if (!type
.IsContextful
)
117 // Must be a remote activated object
118 ctorCall
.Activator
= new AppDomainLevelActivator (activationUrl
, ConstructionActivator
);
119 ctorCall
.IsContextOk
= false; // It'll be activated in a remote context
123 // It is a CBO. Need collect context properties and
124 // check if a new context is needed.
126 IActivator activatorChain
= ConstructionActivator
;
127 activatorChain
= new ContextLevelActivator (activatorChain
);
129 ArrayList attributes
= new ArrayList ();
130 if (activationAttributes
!= null) attributes
.AddRange (activationAttributes
);
132 bool isContextOk
= (activationUrl
== ChannelServices
.CrossContextUrl
); // Remote CBOs are always created in a new context
133 Context currentContext
= Threading
.Thread
.CurrentContext
;
137 foreach (IContextAttribute attr
in attributes
)
139 if (!attr
.IsContextOK (currentContext
, ctorCall
))
147 object[] typeAttributes
= type
.GetCustomAttributes (true);
148 foreach (object attr
in typeAttributes
)
150 if (attr
is IContextAttribute
)
152 isContextOk
= isContextOk
&& ((IContextAttribute
)attr
).IsContextOK (currentContext
, ctorCall
);
153 attributes
.Add (attr
);
159 // A new context is needed. Collect the context properties and chain
160 // the context level activator.
162 ctorCall
.SetActivationAttributes (attributes
.ToArray());
164 foreach (IContextAttribute attr
in attributes
)
165 attr
.GetPropertiesForNewContext (ctorCall
);
168 if (activationUrl
!= ChannelServices
.CrossContextUrl
)
169 activatorChain
= new AppDomainLevelActivator (activationUrl
, activatorChain
);
171 ctorCall
.Activator
= activatorChain
;
172 ctorCall
.IsContextOk
= isContextOk
;
177 public static IMessage
CreateInstanceFromMessage (IConstructionCallMessage ctorCall
)
179 object obj
= AllocateUninitializedClassInstance (ctorCall
.ActivationType
);
181 ServerIdentity identity
= (ServerIdentity
) RemotingServices
.GetMessageTargetIdentity (ctorCall
);
182 identity
.AttachServerObject ((MarshalByRefObject
) obj
, Threading
.Thread
.CurrentContext
);
184 ConstructionCall call
= ctorCall
as ConstructionCall
;
185 if (ctorCall
.ActivationType
.IsContextful
&& call
!= null && call
.SourceProxy
!= null)
187 call
.SourceProxy
.AttachIdentity (identity
);
188 MarshalByRefObject target
= (MarshalByRefObject
) call
.SourceProxy
.GetTransparentProxy ();
189 RemotingServices
.InternalExecuteMessage (target
, ctorCall
);
192 ctorCall
.MethodBase
.Invoke (obj
, ctorCall
.Args
);
194 return new ConstructionResponse (obj
, null, ctorCall
);
197 public static object CreateProxyForType (Type type
)
199 // Called by the runtime when creating an instance of a type
200 // that has been registered as remotely activated.
202 // First of all check for remote activation. If the object is not remote, then
203 // it may be contextbound.
205 ActivatedClientTypeEntry activatedEntry
= RemotingConfiguration
.IsRemotelyActivatedClientType (type
);
206 if (activatedEntry
!= null)
207 return RemotingServices
.CreateClientProxy (activatedEntry
, null);
209 WellKnownClientTypeEntry wellknownEntry
= RemotingConfiguration
.IsWellKnownClientType (type
);
210 if (wellknownEntry
!= null)
211 return RemotingServices
.CreateClientProxy (wellknownEntry
);
213 if (type
.IsContextful
)
214 return RemotingServices
.CreateClientProxyForContextBound (type
, null);
216 if (type
.IsCOMObject
) {
217 return RemotingServices
.CreateClientProxyForComInterop (type
);
223 // Allocates an uninitialized instance. It never creates proxies.
224 [MethodImplAttribute(MethodImplOptions
.InternalCall
)]
225 public static extern object AllocateUninitializedClassInstance (Type type
);
227 [MethodImplAttribute(MethodImplOptions
.InternalCall
)]
228 public extern static void EnableProxyActivation (Type type
, bool enable
);