* roottypes.cs: Rename from tree.cs.
[mono.git] / mcs / class / corlib / System.Runtime.Remoting / InternalRemotingServices.cs
1 //
2 // System.Runtime.Remoting.InternalRemotingServices.cs
3 //
4 // Authors:
5 //   Lluis Sanchez Gual (lluis@ximian.com)
6 //
7 // (C) 2003 Novell, Inc.
8 //
9
10 //
11 // Copyright (C) 2004 Novell, Inc (http://www.novell.com)
12 //
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.
31 //
32
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;
39
40 namespace System.Runtime.Remoting
41 {
42         public class InternalRemotingServices 
43         {
44                 static Hashtable _soapAttributes = new Hashtable ();
45                 
46                 public InternalRemotingServices ()
47                 {
48                 }
49                 
50                 [Conditional("_LOGGING")]
51                 public static void DebugOutChnl (string s)
52                 {
53                         // Mono does not support this internal method
54                         throw new NotSupportedException ();
55                 }
56                 
57                 public static SoapAttribute GetCachedSoapAttribute (object reflectionObject)
58                 {                       
59                         lock (_soapAttributes.SyncRoot) {
60                                 SoapAttribute att = _soapAttributes [reflectionObject] as SoapAttribute;
61                                 if (att != null) return att;
62                                 
63                                 ICustomAttributeProvider ap = (ICustomAttributeProvider) reflectionObject;
64                                 object[] atts = ap.GetCustomAttributes (typeof(SoapAttribute), true);
65                                 if (atts.Length > 0) 
66                                         att = (SoapAttribute) atts[0];
67                                 else
68                                 {
69                                         if (reflectionObject is Type)
70                                                 att = new SoapTypeAttribute ();
71                                         else if (reflectionObject is FieldInfo)
72                                                 att = new SoapFieldAttribute ();
73                                         else if (reflectionObject is MethodBase)
74                                                 att = new SoapMethodAttribute ();
75                                         else if (reflectionObject is ParameterInfo)
76                                                 att = new SoapParameterAttribute ();
77                                 }
78                                 
79                                 att.SetReflectionObject (reflectionObject);
80                                 _soapAttributes [reflectionObject] = att;
81                                 return att;
82                         }
83                 }
84                 
85                 [Conditional("_DEBUG")]
86                 public static void RemotingAssert (bool condition, string message)
87                 {
88                         // Mono does not support this internal method
89                         throw new NotSupportedException ();
90                 }
91                 
92                 [Conditional("_LOGGING")]
93                 public static void RemotingTrace (params object[] messages)
94                 {
95                         // Mono does not support this internal method
96                         throw new NotSupportedException ();
97                 }
98                 
99                 [CLSCompliant (false)]
100                 public static void SetServerIdentity (MethodCall m, object srvID)
101                 {
102                         Identity ident = srvID as Identity;
103                         if (ident == null) throw new ArgumentException ("srvID");
104                         
105                         RemotingServices.SetMessageTargetIdentity (m, ident);
106                 }
107         }
108 }