New test.
[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
36 namespace System
37 {
38         [Serializable]
39         public abstract class MarshalByRefObject
40         {
41                 [NonSerialized]
42                 private ServerIdentity _identity; // Holds marshalling iformation of the object
43
44                 protected MarshalByRefObject ()
45                 {
46                 }
47
48                 internal Identity GetObjectIdentity (MarshalByRefObject obj, out bool IsClient)
49                 {
50                         IsClient = false;
51                         Identity objId = null;
52
53                         if (RemotingServices.IsTransparentProxy (obj)) {
54                                 objId = RemotingServices.GetRealProxy (obj).ObjectIdentity;
55                                 IsClient = true;
56                         }
57                         else {
58                                 objId = obj.ObjectIdentity;
59                         }
60
61                         return objId;
62                 }
63
64                 internal ServerIdentity ObjectIdentity {
65                         get { return _identity; }
66                         set { _identity = value; }
67                 }
68
69                 [SecurityPermission (SecurityAction.LinkDemand, Infrastructure = true)]
70                 public virtual ObjRef CreateObjRef (Type type)
71                 {
72                         // This method can only be called when this object has been marshalled
73                         if (_identity == null)
74                                 throw new RemotingException (Locale.GetText ("No remoting information was found for the object."));
75                         return _identity.CreateObjRef (type);
76                 }
77
78                 [SecurityPermission (SecurityAction.LinkDemand, Infrastructure = true)]
79                 public virtual object GetLifetimeService ()
80                 {
81                         if (_identity == null)
82                                 return null;
83                         else return _identity.Lease;
84                 }
85
86                 [SecurityPermission (SecurityAction.LinkDemand, Infrastructure = true)]
87                 public virtual object InitializeLifetimeService ()
88                 {
89                         return new System.Runtime.Remoting.Lifetime.Lease();
90                 }
91         }
92 }