GenericParameter.cs: override Module properly
[mcs.git] / class / corlib / System.Runtime.Remoting / InternalRemotingServices.cs
blob5ee13c90c62d6385d7fa36beac29c19ad2087438
1 //
2 // System.Runtime.Remoting.InternalRemotingServices.cs
3 //
4 // Authors:
5 // Lluis Sanchez Gual (lluis@ximian.com)
6 //
7 // (C) 2003 Novell, Inc.
8 //
11 // Copyright (C) 2004 Novell, Inc (http://www.novell.com)
13 // Permission is hereby granted, free of charge, to any person obtaining
14 // a copy of this software and associated documentation files (the
15 // "Software"), to deal in the Software without restriction, including
16 // without limitation the rights to use, copy, modify, merge, publish,
17 // distribute, sublicense, and/or sell copies of the Software, and to
18 // permit persons to whom the Software is furnished to do so, subject to
19 // the following conditions:
20 //
21 // The above copyright notice and this permission notice shall be
22 // included in all copies or substantial portions of the Software.
23 //
24 // THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
25 // EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
26 // MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
27 // NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
28 // LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
29 // OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
30 // WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
33 using System;
34 using System.Reflection;
35 using System.Diagnostics;
36 using System.Collections;
37 using System.Runtime.Remoting.Metadata;
38 using System.Runtime.Remoting.Messaging;
40 namespace System.Runtime.Remoting
42 [System.Runtime.InteropServices.ComVisible (true)]
43 public class InternalRemotingServices
45 static Hashtable _soapAttributes = new Hashtable ();
47 public InternalRemotingServices ()
51 [Conditional("_LOGGING")]
52 public static void DebugOutChnl (string s)
54 // Mono does not support this internal method
55 throw new NotSupportedException ();
58 public static SoapAttribute GetCachedSoapAttribute (object reflectionObject)
60 lock (_soapAttributes.SyncRoot) {
61 SoapAttribute att = _soapAttributes [reflectionObject] as SoapAttribute;
62 if (att != null) return att;
64 ICustomAttributeProvider ap = (ICustomAttributeProvider) reflectionObject;
65 object[] atts = ap.GetCustomAttributes (typeof(SoapAttribute), true);
66 if (atts.Length > 0)
67 att = (SoapAttribute) atts[0];
68 else
70 if (reflectionObject is Type)
71 att = new SoapTypeAttribute ();
72 else if (reflectionObject is FieldInfo)
73 att = new SoapFieldAttribute ();
74 else if (reflectionObject is MethodBase)
75 att = new SoapMethodAttribute ();
76 else if (reflectionObject is ParameterInfo)
77 att = new SoapParameterAttribute ();
80 att.SetReflectionObject (reflectionObject);
81 _soapAttributes [reflectionObject] = att;
82 return att;
86 [Conditional("_DEBUG")]
87 public static void RemotingAssert (bool condition, string message)
89 // Mono does not support this internal method
90 throw new NotSupportedException ();
93 [Conditional("_LOGGING")]
94 public static void RemotingTrace (params object[] messages)
96 // Mono does not support this internal method
97 throw new NotSupportedException ();
100 [CLSCompliant (false)]
101 public static void SetServerIdentity (MethodCall m, object srvID)
103 Identity ident = srvID as Identity;
104 if (ident == null) throw new ArgumentException ("srvID");
106 RemotingServices.SetMessageTargetIdentity (m, ident);