locking fixes
[mono.git] / mcs / class / System / System.IO / FAMWatcher.cs
1 // 
2 // System.IO.FAM.cs: interface with libfam
3 //
4 // Authors:
5 //      Gonzalo Paniagua Javier (gonzalo@ximian.com)
6 //
7 // (c) 2004 Novell, Inc. (http://www.novell.com)
8 //
9
10 //
11 // Permission is hereby granted, free of charge, to any person obtaining
12 // a copy of this software and associated documentation files (the
13 // "Software"), to deal in the Software without restriction, including
14 // without limitation the rights to use, copy, modify, merge, publish,
15 // distribute, sublicense, and/or sell copies of the Software, and to
16 // permit persons to whom the Software is furnished to do so, subject to
17 // the following conditions:
18 // 
19 // The above copyright notice and this permission notice shall be
20 // included in all copies or substantial portions of the Software.
21 // 
22 // THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
23 // EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
24 // MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
25 // NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
26 // LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
27 // OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
28 // WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
29 //
30
31 using System;
32 using System.Collections;
33 using System.ComponentModel;
34 using System.Runtime.CompilerServices;
35 using System.Runtime.InteropServices;
36 using System.Text;
37 using System.Threading;
38
39 namespace System.IO {
40         struct FAMConnection {
41                 public int FD;
42                 public IntPtr opaque;
43         }
44
45         struct FAMRequest {
46                 public int ReqNum;
47         }
48
49         enum FAMCodes {
50                 Changed = 1,
51                 Deleted = 2,
52                 StartExecuting = 3, 
53                 StopExecuting = 4,
54                 Created = 5,
55                 Moved = 6, 
56                 Acknowledge = 7,
57                 Exists = 8,
58                 EndExist = 9
59         };
60
61         class FAMData {
62                 public FileSystemWatcher FSW;
63                 public string Directory;
64                 public string FileMask;
65                 public bool IncludeSubdirs;
66                 public bool Enabled;
67                 public FAMRequest Request;
68                 public Hashtable SubDirs;
69         }
70
71         class FAMWatcher : IFileWatcher
72         {
73                 static bool failed;
74                 static FAMWatcher instance;
75                 static Hashtable watches;
76                 static Hashtable requests;
77                 static FAMConnection conn;
78                 static Thread thread;
79                 static bool stop;
80                 
81                 private FAMWatcher ()
82                 {
83                 }
84                 
85                 // Locked by caller
86                 public static bool GetInstance (out IFileWatcher watcher)
87                 {
88                         if (failed == true) {
89                                 watcher = null;
90                                 return false;
91                         }
92
93                         if (instance != null) {
94                                 watcher = instance;
95                                 return true;
96                         }
97
98                         watches = Hashtable.Synchronized (new Hashtable ());
99                         requests = Hashtable.Synchronized (new Hashtable ());
100                         if (FAMOpen (out conn) == -1) {
101                                 failed = true;
102                                 watcher = null;
103                                 return false;
104                         }
105
106                         instance = new FAMWatcher ();
107                         watcher = instance;
108                         return true;
109                 }
110                 
111                 public void StartDispatching (FileSystemWatcher fsw)
112                 {
113                         FAMData data;
114                         lock (this) {
115                                 if (thread == null) {
116                                         thread = new Thread (new ThreadStart (Monitor));
117                                         thread.IsBackground = true;
118                                         thread.Start ();
119                                 }
120
121                                 data = (FAMData) watches [fsw];
122                         }
123
124                         if (data == null) {
125                                 data = new FAMData ();
126                                 data.FSW = fsw;
127                                 data.Directory = fsw.FullPath;
128                                 data.FileMask = fsw.MangledFilter;
129                                 data.IncludeSubdirs = fsw.IncludeSubdirectories;
130                                 if (data.IncludeSubdirs)
131                                         data.SubDirs = new Hashtable ();
132
133                                 data.Enabled = true;
134                                 lock (this) {
135                                         StartMonitoringDirectory (data);
136                                         watches [fsw] = data;
137                                         requests [data.Request.ReqNum] = data;
138                                         stop = false;
139                                 }
140                         }
141                 }
142
143                 static void StartMonitoringDirectory (FAMData data)
144                 {
145                         FAMRequest fr;
146                         if (FAMMonitorDirectory (ref conn, data.Directory, out fr, IntPtr.Zero) == -1)
147                                 throw new Win32Exception ();
148
149                         data.Request = fr;
150                         if (!data.IncludeSubdirs)
151                                 return;
152
153                         foreach (string directory in Directory.GetDirectories (data.Directory)) {
154                                 FAMData fd = new FAMData ();
155                                 fd.FSW = data.FSW;
156                                 fd.Directory = directory;
157                                 fd.FileMask = data.FSW.MangledFilter;
158                                 fd.IncludeSubdirs = true;
159                                 fd.SubDirs = new Hashtable ();
160                                 fd.Enabled = true;
161
162                                 StartMonitoringDirectory (fd);
163                                 data.SubDirs [directory] = fd;
164                                 requests [fd.Request.ReqNum] = fd;
165                         }
166                 }
167
168                 public void StopDispatching (FileSystemWatcher fsw)
169                 {
170                         FAMData data;
171                         lock (this) {
172                                 data = (FAMData) watches [fsw];
173                                 if (data == null)
174                                         return;
175
176                                 StopMonitoringDirectory (data);
177                                 watches.Remove (fsw);
178                                 requests.Remove (data.Request.ReqNum);
179                                 if (watches.Count == 0)
180                                         stop = true;
181
182                                 if (!data.IncludeSubdirs)
183                                         return;
184
185                                 foreach (FAMData fd in data.SubDirs.Values) {
186                                         StopMonitoringDirectory (fd);
187                                         requests.Remove (fd.Request.ReqNum);
188                                 }
189                         }
190                 }
191
192                 static void StopMonitoringDirectory (FAMData data)
193                 {
194                         if (FAMCancelMonitor (ref conn, ref data.Request) == -1)
195                                 throw new Win32Exception ();
196                 }
197
198                 void Monitor ()
199                 {
200                         while (!stop) {
201                                 int haveEvents;
202                                 lock (this) {
203                                         haveEvents = FAMPending (ref conn);
204                                 }
205
206                                 if (haveEvents > 0) {
207                                         ProcessEvents ();
208                                 } else {
209                                         Thread.Sleep (500);
210                                 }
211                         }
212
213                         lock (this) {
214                                 thread = null;
215                                 stop = false;
216                         }
217                 }
218
219                 const NotifyFilters changed =   NotifyFilters.Attributes |
220                                                 NotifyFilters.LastAccess |
221                                                 NotifyFilters.Size      |
222                                                 NotifyFilters.LastWrite;
223
224                 void ProcessEvents ()
225                 {
226                         lock (this) {
227                                 do {
228                                         int code;
229                                         string filename;
230                                         int requestNumber;
231                                         FileSystemWatcher fsw;
232
233                                         if (InternalFAMNextEvent (ref conn, out filename,
234                                                                   out code, out requestNumber) != 1)
235                                                 return;
236
237                                         bool found = false;
238                                         switch ((FAMCodes) code) {
239                                         case FAMCodes.Changed:
240                                         case FAMCodes.Deleted:
241                                         case FAMCodes.Created:
242                                                 found = requests.ContainsKey (requestNumber);
243                                                 break;
244                                         case FAMCodes.Moved:
245                                         case FAMCodes.StartExecuting:
246                                         case FAMCodes.StopExecuting:
247                                         case FAMCodes.Acknowledge:
248                                         case FAMCodes.Exists:
249                                         case FAMCodes.EndExist:
250                                         default:
251                                                 found = false;
252                                                 break;
253                                         }
254
255                                         if (!found)
256                                                 continue;
257                                         
258                                         FAMData data = (FAMData) requests [requestNumber];
259                                         if (!data.Enabled)
260                                                 continue;
261
262                                         fsw = data.FSW;
263                                         NotifyFilters flt = fsw.NotifyFilter;
264                                         RenamedEventArgs renamed = null;
265                                         FileAction fa = 0;
266                                         if (code == (int) FAMCodes.Changed && (flt & changed) != 0)
267                                                 fa = FileAction.Modified;
268                                         else if (code == (int) FAMCodes.Deleted)
269                                                 fa = FileAction.Removed;
270                                         else if (code == (int) FAMCodes.Created)
271                                                 fa = FileAction.Added;
272
273                                         if (fa == 0)
274                                                 continue;
275
276                                         if (fsw.IncludeSubdirectories) {
277                                                 string full = fsw.FullPath;
278                                                 string datadir = data.Directory;
279                                                 if (datadir != full) {
280                                                         string reldir = datadir.Substring (full.Length + 1);
281                                                         datadir = Path.Combine (datadir, filename);
282                                                         filename = Path.Combine (reldir, filename);
283                                                 } else {
284                                                         datadir = Path.Combine (fsw.FullPath, filename);
285                                                 }
286
287                                                 if (fa == FileAction.Added && Directory.Exists (datadir)) {
288                                                         FAMData fd = new FAMData ();
289                                                         fd.FSW = fsw;
290                                                         fd.Directory = datadir;
291                                                         fd.FileMask = fsw.MangledFilter;
292                                                         fd.IncludeSubdirs = true;
293                                                         fd.SubDirs = new Hashtable ();
294                                                         fd.Enabled = true;
295
296                                                         lock (instance) {
297                                                                 StartMonitoringDirectory (fd);
298                                                         }
299
300                                                         lock (data) {
301                                                                 data.SubDirs [datadir] = fd;
302                                                         }
303
304                                                         requests [fd.Request.ReqNum] = fd;
305                                                 }
306                                         }
307
308                                         if (filename != data.Directory && !fsw.Pattern.IsMatch (filename))
309                                                 continue;
310
311                                         lock (fsw) {
312                                                 fsw.DispatchEvents (fa, filename, ref renamed);
313                                                 if (fsw.Waiting) {
314                                                         fsw.Waiting = false;
315                                                         System.Threading.Monitor.PulseAll (fsw);
316                                                 }
317                                         }
318                                 } while (FAMPending (ref conn) > 0);
319                         }
320                 }
321
322                 ~FAMWatcher ()
323                 {
324                         FAMClose (ref conn);
325                 }
326
327                 [DllImport ("libfam.so.0")]
328                 extern static int FAMOpen (out FAMConnection fc);
329
330                 [DllImport ("libfam.so.0")]
331                 extern static int FAMClose (ref FAMConnection fc);
332
333                 [DllImport ("libfam.so.0")]
334                 extern static int FAMMonitorDirectory (ref FAMConnection fc, string filename,
335                                                         out FAMRequest fr, IntPtr user_data);
336
337                 [DllImport ("libfam.so.0")]
338                 extern static int FAMCancelMonitor (ref FAMConnection fc, ref FAMRequest fr);
339
340                 [MethodImplAttribute(MethodImplOptions.InternalCall)]
341                 extern static int InternalFAMNextEvent (ref FAMConnection fc, out string filename,
342                                                         out int code, out int reqnum);
343
344                 [DllImport ("libfam.so.0")]
345                 extern static int FAMPending (ref FAMConnection fc);
346         }
347 }
348