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