2008-04-02 Andreas Nahr <ClassDevelopment@A-SoftTech.com>
[mono.git] / mcs / class / corlib / System.Runtime.Remoting.Lifetime / ClientSponsor.cs
1 //
2 // System.Runtime.Remoting.Lifetime.ClientSponsor.cs
3 //
4 // Author: Duncan Mak  (duncan@ximian.com)
5 //         Lluis Sanchez Gual (lluis@ximian.com)
6 //
7 // 2002 (C) Copyright. Ximian, 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.Collections;
35 using System.Runtime.Remoting.Lifetime;
36
37 namespace System.Runtime.Remoting.Lifetime {
38
39 #if NET_2_0
40         [System.Runtime.InteropServices.ComVisible (true)]
41 #endif
42         public class ClientSponsor : MarshalByRefObject, ISponsor
43         {
44                 TimeSpan renewal_time;
45                 Hashtable registered_objects = new Hashtable ();
46
47                 public ClientSponsor ()
48                 {
49                         renewal_time = new TimeSpan (0, 2, 0); // default is 2 mins
50                 }
51
52                 public ClientSponsor (TimeSpan renewalTime)
53                 {
54                         renewal_time = renewalTime;
55                 }
56
57                 public TimeSpan RenewalTime {
58                         get {
59                                 return renewal_time;
60                         }
61
62                         set {
63                                 renewal_time = value;
64                         }
65                 }
66
67                 public void Close ()
68                 {
69                         foreach (MarshalByRefObject obj in registered_objects.Values)
70                         {
71                                 ILease lease = obj.GetLifetimeService () as ILease;
72                                 lease.Unregister (this);
73                         }
74                         registered_objects.Clear ();
75                 }
76
77                 ~ClientSponsor ()
78                 {
79                         Close ();
80                 }
81
82                 public override object InitializeLifetimeService ()
83                 {
84                         return base.InitializeLifetimeService ();
85                 }
86
87                 public bool Register (MarshalByRefObject obj)
88                 {
89                         if (registered_objects.ContainsKey (obj)) return false;
90                         ILease lease = obj.GetLifetimeService () as ILease;
91                         if (lease == null) return false;
92                         lease.Register (this);
93                         registered_objects.Add (obj,obj);
94                         return true;
95                 }
96
97                 public TimeSpan Renewal (ILease lease)
98                 {
99                         return renewal_time;
100                 }
101                        
102                 public void Unregister (MarshalByRefObject obj)
103                 {
104                         if (!registered_objects.ContainsKey (obj)) return;
105                         ILease lease = obj.GetLifetimeService () as ILease;
106                         lease.Unregister (this);
107                         registered_objects.Remove (obj);
108                 }
109         }
110 }