Merge pull request #2216 from akoeplinger/fix-array-sort
[mono.git] / mcs / class / corlib / System / MarshalByRefObject.cs
1 //
2 // System.MarshalByRefObject.cs
3 //
4 // Authors:
5 //   Miguel de Icaza (miguel@ximian.com)
6 //   Lluis Sanchez Gual (lsg@ctv.es)
7 //   Patrik Torstensson (totte_mono@yahoo.com)
8 //
9 // (C) Ximian, Inc.  http://www.ximian.com
10 // Copyright (C) 2004-2005 Novell, Inc (http://www.novell.com)
11 //
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:
19 // 
20 // The above copyright notice and this permission notice shall be
21 // included in all copies or substantial portions of the Software.
22 // 
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.
30 //
31
32 using System.Threading;
33 using System.Runtime.Remoting;
34 using System.Security.Permissions;
35 using System.Runtime.InteropServices;
36
37 namespace System
38 {
39         [Serializable]
40         [ComVisible (true)]
41         [StructLayout (LayoutKind.Sequential)]
42         public abstract class MarshalByRefObject
43         {
44                 [NonSerialized]
45 #if DISABLE_REMOTING
46                 private object _identity; //Keep layout equal to avoid runtime issues
47 #else
48                 private ServerIdentity _identity; // Holds marshalling iformation of the object
49 #endif
50
51                 protected MarshalByRefObject ()
52                 {
53                 }
54
55 #if DISABLE_REMOTING
56                 internal ServerIdentity ObjectIdentity {
57                         get { throw new NotSupportedException (); }
58                         set { throw new NotSupportedException (); }
59                 }
60 #else
61
62                 internal Identity GetObjectIdentity (MarshalByRefObject obj, out bool IsClient)
63                 {
64                         IsClient = false;
65                         Identity objId = null;
66
67                         if (RemotingServices.IsTransparentProxy (obj)) {
68                                 objId = RemotingServices.GetRealProxy (obj).ObjectIdentity;
69                                 IsClient = true;
70                         }
71                         else {
72                                 objId = obj.ObjectIdentity;
73                         }
74
75                         return objId;
76                 }
77
78                 internal ServerIdentity ObjectIdentity {
79                         get { return _identity; }
80                         set { _identity = value; }
81                 }
82 #endif
83
84                 [SecurityPermission (SecurityAction.LinkDemand, Infrastructure = true)]
85                 public virtual ObjRef CreateObjRef (Type requestedType)
86                 {
87 #if DISABLE_REMOTING
88                         throw new NotSupportedException ();
89 #else
90                         // This method can only be called when this object has been marshalled
91                         if (_identity == null)
92                                 throw new RemotingException (Locale.GetText ("No remoting information was found for the object."));
93                         return _identity.CreateObjRef (requestedType);
94 #endif
95                 }
96
97                 // corcompare says it is "virtual final", so there is likely
98                 // an internal interface in .NET.
99                 [SecurityPermission (SecurityAction.LinkDemand, Infrastructure = true)]
100                 public object GetLifetimeService ()
101                 {
102 #if DISABLE_REMOTING
103                         throw new NotSupportedException ();
104 #else
105                         if (_identity == null)
106                                 return null;
107                         else return _identity.Lease;
108 #endif
109                 }
110
111                 [SecurityPermission (SecurityAction.LinkDemand, Infrastructure = true)]
112                 public virtual object InitializeLifetimeService ()
113                 {
114 #if DISABLE_REMOTING
115                         throw new NotSupportedException ();
116 #else
117                         if (_identity != null && _identity.Lease != null)
118                                 return _identity.Lease;
119                         else
120                                 return new System.Runtime.Remoting.Lifetime.Lease();
121 #endif
122                 }
123
124                 protected MarshalByRefObject MemberwiseClone (bool cloneIdentity)
125                 {
126 #if DISABLE_REMOTING
127                         throw new NotSupportedException ();
128 #else
129                         MarshalByRefObject mbr = (MarshalByRefObject) MemberwiseClone ();
130                         if (!cloneIdentity)
131                                 mbr._identity = null;
132                         return mbr;
133 #endif
134                 }
135         }
136 }