Merge pull request #214 from QuickJack/cd2c570c5543963d987f51080218715407c5d4b9
[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                 private ServerIdentity _identity; // Holds marshalling iformation of the object
46
47                 protected MarshalByRefObject ()
48                 {
49                 }
50
51                 internal Identity GetObjectIdentity (MarshalByRefObject obj, out bool IsClient)
52                 {
53                         IsClient = false;
54                         Identity objId = null;
55
56                         if (RemotingServices.IsTransparentProxy (obj)) {
57                                 objId = RemotingServices.GetRealProxy (obj).ObjectIdentity;
58                                 IsClient = true;
59                         }
60                         else {
61                                 objId = obj.ObjectIdentity;
62                         }
63
64                         return objId;
65                 }
66
67                 internal ServerIdentity ObjectIdentity {
68                         get { return _identity; }
69                         set { _identity = value; }
70                 }
71
72                 [SecurityPermission (SecurityAction.LinkDemand, Infrastructure = true)]
73                 public virtual ObjRef CreateObjRef (Type requestedType)
74                 {
75                         // This method can only be called when this object has been marshalled
76                         if (_identity == null)
77                                 throw new RemotingException (Locale.GetText ("No remoting information was found for the object."));
78                         return _identity.CreateObjRef (requestedType);
79                 }
80
81                 // corcompare says it is "virtual final", so there is likely
82                 // an internal interface in .NET.
83                 [SecurityPermission (SecurityAction.LinkDemand, Infrastructure = true)]
84                 public object GetLifetimeService ()
85                 {
86                         if (_identity == null)
87                                 return null;
88                         else return _identity.Lease;
89                 }
90
91                 [SecurityPermission (SecurityAction.LinkDemand, Infrastructure = true)]
92                 public virtual object InitializeLifetimeService ()
93                 {
94                         if (_identity != null && _identity.Lease != null)
95                                 return _identity.Lease;
96                         else
97                                 return new System.Runtime.Remoting.Lifetime.Lease();
98                 }
99
100                 protected MarshalByRefObject MemberwiseClone (bool cloneIdentity)
101                 {
102                         MarshalByRefObject mbr = (MarshalByRefObject) MemberwiseClone ();
103                         if (!cloneIdentity)
104                                 mbr._identity = null;
105                         return mbr;
106                 }
107         }
108 }