//
// Author:
// Dietmar Maurer (dietmar@ximian.com)
+// Patrik Torstensson
//
// (C) Ximian, Inc. http://www.ximian.com
//
+//
+// Copyright (C) 2004 Novell, Inc (http://www.novell.com)
+//
+// Permission is hereby granted, free of charge, to any person obtaining
+// a copy of this software and associated documentation files (the
+// "Software"), to deal in the Software without restriction, including
+// without limitation the rights to use, copy, modify, merge, publish,
+// distribute, sublicense, and/or sell copies of the Software, and to
+// permit persons to whom the Software is furnished to do so, subject to
+// the following conditions:
+//
+// The above copyright notice and this permission notice shall be
+// included in all copies or substantial portions of the Software.
+//
+// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+// EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+// MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+// NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+// LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+// OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+// WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+//
+
using System;
using System.Collections;
using System.Reflection;
namespace System.Runtime.Remoting.Messaging {
- public class MonoMethodMessage : IMethodCallMessage, IMethodReturnMessage {
+ [Serializable]
+ internal class MonoMethodMessage : IMethodCallMessage, IMethodReturnMessage, IInternalMessage {
MonoMethod method;
public Exception exc;
+ AsyncResult asyncResult;
+
+ CallType call_type;
+
string uri;
- InternalDictionary properties;
+ MethodCallDictionary properties;
Type[] methodSignature;
+ Identity identity;
+
+
[MethodImplAttribute(MethodImplOptions.InternalCall)]
internal extern void InitMessage (MonoMethod method, object [] out_args);
public MonoMethodMessage (MethodBase method, object [] out_args)
{
- InitMessage ((MonoMethod)method, out_args);
+ if (method != null)
+ InitMessage ((MonoMethod)method, out_args);
+ else
+ args = null;
}
public MonoMethodMessage (Type type, string method_name, object [] in_args)
public IDictionary Properties {
get {
- if (properties == null) properties = new InternalDictionary (this);
+ if (properties == null) properties = new MethodCallDictionary (this);
return properties;
}
}
public int ArgCount {
get {
+ if (CallType == CallType.EndInvoke)
+ return -1;
+
+ if (null == args)
+ return 0;
+
return args.Length;
}
}
get {
return ctx;
}
+
+ set {
+ ctx = value;
+ }
}
public MethodBase MethodBase {
public string MethodName {
get {
+ if (null == method)
+ return String.Empty;
+
return method.Name;
}
}
public string TypeName {
get {
+ if (null == method)
+ return String.Empty;
+
return method.DeclaringType.AssemblyQualifiedName;
}
}
public object GetArg (int arg_num)
{
+ if (null == args)
+ return null;
+
return args [arg_num];
}
public string GetArgName (int arg_num)
{
+ if (null == args)
+ return String.Empty;
+
return names [arg_num];
}
public int InArgCount {
get {
+ if (CallType == CallType.EndInvoke)
+ return -1;
+
+ if (null == args)
+ return 0;
+
int count = 0;
foreach (byte t in arg_types) {
}
public object [] InArgs {
- get {
+ get {
int i, j, count = InArgCount;
object [] inargs = new object [count];
public int OutArgCount {
get {
+ if (null == args)
+ return 0;
+
int count = 0;
foreach (byte t in arg_types) {
public object [] OutArgs {
get {
+ if (null == args)
+ return null;
+
int i, j, count = OutArgCount;
object [] outargs = new object [count];
return null;
}
- class InternalDictionary : MethodDictionary\r
- {\r
- static string[] _keys = new string[] {"__Uri", "__MethodName", "__TypeName", "__MethodSignature", "__Args", "__OutArgs", "__Return", "__CallContext"};\r
-\r
- public InternalDictionary(MonoMethodMessage message) : base (message) \r
- { \r
- MethodKeys = _keys;\r
- }\r
+ Identity IInternalMessage.TargetIdentity
+ {
+ get { return identity; }
+ set { identity = value; }
+ }
+
+ public bool IsAsync
+ {
+ get { return asyncResult != null; }
+ }
+
+ public AsyncResult AsyncResult
+ {
+ get { return asyncResult; }
+ }
- protected override void SetMethodProperty (string key, object value)
+ internal CallType CallType
+ {
+ get
{
- if (key == "__Uri") ((MonoMethodMessage)_message).Uri = (string)value;
- else base.SetMethodProperty (key, value);
+ // FIXME: ideally, the OneWay type would be set by the runtime
+
+ if (call_type == CallType.Sync && RemotingServices.IsOneWay (method))
+ call_type = CallType.OneWay;
+ return call_type;
}
}
+ }
+ internal enum CallType: int
+ {
+ Sync = 0,
+ BeginInvoke = 1,
+ EndInvoke = 2,
+ OneWay = 3
}
}
+
projects / mono.git / blobdiff