lib/util: Add back control of mmap and hash size in tdb for top level build
[kai/samba-autobuild/.git] / source3 / smbd / notify_internal.c
1 /* 
2    Unix SMB/CIFS implementation.
3
4    Copyright (C) Andrew Tridgell 2006
5
6    This program is free software; you can redistribute it and/or modify
7    it under the terms of the GNU General Public License as published by
8    the Free Software Foundation; either version 3 of the License, or
9    (at your option) any later version.
10
11    This program is distributed in the hope that it will be useful,
12    but WITHOUT ANY WARRANTY; without even the implied warranty of
13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14    GNU General Public License for more details.
15
16    You should have received a copy of the GNU General Public License
17    along with this program.  If not, see <http://www.gnu.org/licenses/>.
18 */
19
20 /*
21   this is the change notify database. It implements mechanisms for
22   storing current change notify waiters in a tdb, and checking if a
23   given event matches any of the stored notify waiiters.
24 */
25
26 #include "includes.h"
27 #include "system/filesys.h"
28 #include "librpc/gen_ndr/ndr_notify.h"
29 #include "dbwrap/dbwrap.h"
30 #include "dbwrap/dbwrap_open.h"
31 #include "smbd/smbd.h"
32 #include "messages.h"
33 #include "lib/util/tdb_wrap.h"
34 #include "util_tdb.h"
35 #include "lib/param/param.h"
36
37 struct notify_context {
38         struct db_context *db_recursive;
39         struct db_context *db_onelevel;
40         struct server_id server;
41         struct messaging_context *messaging_ctx;
42         struct notify_list *list;
43         struct notify_array *array;
44         int seqnum;
45         struct sys_notify_context *sys_notify_ctx;
46         TDB_DATA key;
47 };
48
49
50 struct notify_list {
51         struct notify_list *next, *prev;
52         void *private_data;
53         void (*callback)(void *, const struct notify_event *);
54         void *sys_notify_handle;
55         int depth;
56 };
57
58 #define NOTIFY_KEY "notify array"
59
60 #define NOTIFY_ENABLE           "notify:enable"
61 #define NOTIFY_ENABLE_DEFAULT   True
62
63 static NTSTATUS notify_remove_all(struct notify_context *notify,
64                                   const struct server_id *server);
65 static void notify_handler(struct messaging_context *msg_ctx, void *private_data, 
66                            uint32_t msg_type, struct server_id server_id, DATA_BLOB *data);
67
68 /*
69   destroy the notify context
70 */
71 static int notify_destructor(struct notify_context *notify)
72 {
73         messaging_deregister(notify->messaging_ctx, MSG_PVFS_NOTIFY, notify);
74
75         if (notify->list != NULL) {
76                 notify_remove_all(notify, &notify->server);
77         }
78
79         return 0;
80 }
81
82 /*
83   Open up the notify.tdb database. You should close it down using
84   talloc_free(). We need the messaging_ctx to allow for notifications
85   via internal messages
86 */
87 struct notify_context *notify_init(TALLOC_CTX *mem_ctx, struct server_id server, 
88                                    struct messaging_context *messaging_ctx,
89                                    struct event_context *ev,
90                                    connection_struct *conn)
91 {
92         struct notify_context *notify;
93
94         if (!lp_change_notify(conn->params)) {
95                 return NULL;
96         }
97
98         notify = talloc(mem_ctx, struct notify_context);
99         if (notify == NULL) {
100                 return NULL;
101         }
102
103         notify->db_recursive = db_open(notify, lock_path("notify.tdb"),
104                                        0, TDB_SEQNUM|TDB_CLEAR_IF_FIRST|TDB_INCOMPATIBLE_HASH,
105                                        O_RDWR|O_CREAT, 0644);
106         if (notify->db_recursive == NULL) {
107                 talloc_free(notify);
108                 return NULL;
109         }
110
111         notify->db_onelevel = db_open(notify, lock_path("notify_onelevel.tdb"),
112                                       0, TDB_CLEAR_IF_FIRST|TDB_INCOMPATIBLE_HASH,
113                                       O_RDWR|O_CREAT, 0644);
114         if (notify->db_onelevel == NULL) {
115                 talloc_free(notify);
116                 return NULL;
117         }
118
119         notify->server = server;
120         notify->messaging_ctx = messaging_ctx;
121         notify->list = NULL;
122         notify->array = NULL;
123         notify->seqnum = dbwrap_get_seqnum(notify->db_recursive);
124         notify->key = string_term_tdb_data(NOTIFY_KEY);
125
126         talloc_set_destructor(notify, notify_destructor);
127
128         /* register with the messaging subsystem for the notify
129            message type */
130         messaging_register(notify->messaging_ctx, notify, 
131                            MSG_PVFS_NOTIFY, notify_handler);
132
133         notify->sys_notify_ctx = sys_notify_context_create(conn, notify, ev);
134
135         return notify;
136 }
137
138 bool notify_internal_parent_init(TALLOC_CTX *mem_ctx)
139 {
140         struct tdb_wrap *db1, *db2;
141         struct loadparm_context *lp_ctx;
142
143         if (lp_clustering()) {
144                 return true;
145         }
146
147         lp_ctx = loadparm_init_s3(mem_ctx, loadparm_s3_context());
148         if (lp_ctx == NULL) {
149                 DEBUG(0, ("loadparm_init_s3 failed\n"));
150                 return false;
151         }
152         /*
153          * Open the tdbs in the parent process (smbd) so that our
154          * CLEAR_IF_FIRST optimization in tdb_reopen_all can properly
155          * work.
156          */
157
158         db1 = tdb_wrap_open(mem_ctx, lock_path("notify.tdb"),
159                             0, TDB_SEQNUM|TDB_CLEAR_IF_FIRST|TDB_INCOMPATIBLE_HASH,
160                             O_RDWR|O_CREAT, 0644, lp_ctx);
161         if (db1 == NULL) {
162                 talloc_unlink(mem_ctx, lp_ctx);
163                 DEBUG(1, ("could not open notify.tdb: %s\n", strerror(errno)));
164                 return false;
165         }
166         db2 = tdb_wrap_open(mem_ctx, lock_path("notify_onelevel.tdb"),
167                             0, TDB_CLEAR_IF_FIRST|TDB_INCOMPATIBLE_HASH, O_RDWR|O_CREAT, 0644, lp_ctx);
168         talloc_unlink(mem_ctx, lp_ctx);
169         if (db2 == NULL) {
170                 DEBUG(1, ("could not open notify_onelevel.tdb: %s\n",
171                           strerror(errno)));
172                 TALLOC_FREE(db1);
173                 return false;
174         }
175         return true;
176 }
177
178 /*
179   lock and fetch the record
180 */
181 static NTSTATUS notify_fetch_locked(struct notify_context *notify, struct db_record **rec)
182 {
183         *rec = dbwrap_fetch_locked(notify->db_recursive, notify, notify->key);
184         if (*rec == NULL) {
185                 return NT_STATUS_INTERNAL_DB_CORRUPTION;
186         }
187         return NT_STATUS_OK;
188 }
189
190 /*
191   load the notify array
192 */
193 static NTSTATUS notify_load(struct notify_context *notify, struct db_record *rec)
194 {
195         TDB_DATA dbuf;
196         DATA_BLOB blob;
197         NTSTATUS status;
198         int seqnum;
199
200         seqnum = dbwrap_get_seqnum(notify->db_recursive);
201
202         if (seqnum == notify->seqnum && notify->array != NULL) {
203                 return NT_STATUS_OK;
204         }
205
206         notify->seqnum = seqnum;
207
208         talloc_free(notify->array);
209         notify->array = talloc_zero(notify, struct notify_array);
210         NT_STATUS_HAVE_NO_MEMORY(notify->array);
211
212         if (!rec) {
213                 status = dbwrap_fetch(notify->db_recursive, notify,
214                                       notify->key, &dbuf);
215                 if (!NT_STATUS_IS_OK(status)) {
216                         return NT_STATUS_INTERNAL_DB_CORRUPTION;
217                 }
218         } else {
219                 dbuf = dbwrap_record_get_value(rec);
220         }
221
222         blob.data = (uint8 *)dbuf.dptr;
223         blob.length = dbuf.dsize;
224
225         status = NT_STATUS_OK;
226         if (blob.length > 0) {
227                 enum ndr_err_code ndr_err;
228                 ndr_err = ndr_pull_struct_blob(&blob, notify->array, notify->array,
229                                                (ndr_pull_flags_fn_t)ndr_pull_notify_array);
230                 if (!NDR_ERR_CODE_IS_SUCCESS(ndr_err)) {
231                         /* 1. log that we got a corrupt notify_array
232                          * 2. clear the variable the garbage was stored into to not trip
233                          *  over it next time this method is entered with the same seqnum
234                          * 3. delete it from the database */
235                         DEBUG(2, ("notify_array is corrupt, discarding it\n"));
236
237                         ZERO_STRUCTP(notify->array);
238                         if (rec != NULL) {
239                                 dbwrap_record_delete(rec);
240                         }
241
242                 } else {
243                         if (DEBUGLEVEL >= 10) {
244                                 DEBUG(10, ("notify_load:\n"));
245                                 NDR_PRINT_DEBUG(notify_array, notify->array);
246                         }
247                 }
248         }
249
250
251         if (!rec) {
252                 talloc_free(dbuf.dptr);
253         }
254
255         return status;
256 }
257
258 /*
259   compare notify entries for sorting
260 */
261 static int notify_compare(const struct notify_entry *e1, const struct notify_entry *e2)
262 {
263         return strcmp(e1->path, e2->path);
264 }
265
266 /*
267   save the notify array
268 */
269 static NTSTATUS notify_save(struct notify_context *notify, struct db_record *rec)
270 {
271         TDB_DATA dbuf;
272         DATA_BLOB blob;
273         NTSTATUS status;
274         enum ndr_err_code ndr_err;
275         TALLOC_CTX *tmp_ctx;
276
277         /* if possible, remove some depth arrays */
278         while (notify->array->num_depths > 0 &&
279                notify->array->depth[notify->array->num_depths-1].num_entries == 0) {
280                 notify->array->num_depths--;
281         }
282
283         /* we might just be able to delete the record */
284         if (notify->array->num_depths == 0) {
285                 return dbwrap_record_delete(rec);
286         }
287
288         tmp_ctx = talloc_new(notify);
289         NT_STATUS_HAVE_NO_MEMORY(tmp_ctx);
290
291         ndr_err = ndr_push_struct_blob(&blob, tmp_ctx, notify->array,
292                                       (ndr_push_flags_fn_t)ndr_push_notify_array);
293         if (!NDR_ERR_CODE_IS_SUCCESS(ndr_err)) {
294                 talloc_free(tmp_ctx);
295                 return ndr_map_error2ntstatus(ndr_err);
296         }
297
298         if (DEBUGLEVEL >= 10) {
299                 DEBUG(10, ("notify_save:\n"));
300                 NDR_PRINT_DEBUG(notify_array, notify->array);
301         }
302
303         dbuf.dptr = blob.data;
304         dbuf.dsize = blob.length;
305
306         status = dbwrap_record_store(rec, dbuf, TDB_REPLACE);
307         talloc_free(tmp_ctx);
308
309         return status;
310 }
311
312
313 /*
314   handle incoming notify messages
315 */
316 static void notify_handler(struct messaging_context *msg_ctx, void *private_data, 
317                            uint32_t msg_type, struct server_id server_id, DATA_BLOB *data)
318 {
319         struct notify_context *notify = talloc_get_type(private_data, struct notify_context);
320         enum ndr_err_code ndr_err;
321         struct notify_event ev;
322         TALLOC_CTX *tmp_ctx = talloc_new(notify);
323         struct notify_list *listel;
324
325         if (tmp_ctx == NULL) {
326                 return;
327         }
328
329         ndr_err = ndr_pull_struct_blob(data, tmp_ctx, &ev,
330                                        (ndr_pull_flags_fn_t)ndr_pull_notify_event);
331         if (!NDR_ERR_CODE_IS_SUCCESS(ndr_err)) {
332                 talloc_free(tmp_ctx);
333                 return;
334         }
335
336         for (listel=notify->list;listel;listel=listel->next) {
337                 if (listel->private_data == ev.private_data) {
338                         listel->callback(listel->private_data, &ev);
339                         break;
340                 }
341         }
342
343         talloc_free(tmp_ctx);   
344 }
345
346 /*
347   callback from sys_notify telling us about changes from the OS
348 */
349 static void sys_notify_callback(struct sys_notify_context *ctx, 
350                                 void *ptr, struct notify_event *ev)
351 {
352         struct notify_list *listel = talloc_get_type(ptr, struct notify_list);
353         ev->private_data = listel;
354         DEBUG(10, ("sys_notify_callback called with action=%d, for %s\n",
355                    ev->action, ev->path));
356         listel->callback(listel->private_data, ev);
357 }
358
359 /*
360   add an entry to the notify array
361 */
362 static NTSTATUS notify_add_array(struct notify_context *notify, struct db_record *rec,
363                                  struct notify_entry *e,
364                                  void *private_data, int depth)
365 {
366         int i;
367         struct notify_depth *d;
368         struct notify_entry *ee;
369
370         /* possibly expand the depths array */
371         if (depth >= notify->array->num_depths) {
372                 d = talloc_realloc(notify->array, notify->array->depth, 
373                                    struct notify_depth, depth+1);
374                 NT_STATUS_HAVE_NO_MEMORY(d);
375                 for (i=notify->array->num_depths;i<=depth;i++) {
376                         ZERO_STRUCT(d[i]);
377                 }
378                 notify->array->depth = d;
379                 notify->array->num_depths = depth+1;
380         }
381         d = &notify->array->depth[depth];
382
383         /* expand the entries array */
384         ee = talloc_realloc(notify->array->depth, d->entries, struct notify_entry,
385                             d->num_entries+1);
386         NT_STATUS_HAVE_NO_MEMORY(ee);
387         d->entries = ee;
388
389         d->entries[d->num_entries] = *e;
390         d->entries[d->num_entries].private_data = private_data;
391         d->entries[d->num_entries].server = notify->server;
392         d->entries[d->num_entries].path_len = strlen(e->path);
393         d->num_entries++;
394
395         d->max_mask |= e->filter;
396         d->max_mask_subdir |= e->subdir_filter;
397
398         TYPESAFE_QSORT(d->entries, d->num_entries, notify_compare);
399
400         /* recalculate the maximum masks */
401         d->max_mask = 0;
402         d->max_mask_subdir = 0;
403
404         for (i=0;i<d->num_entries;i++) {
405                 d->max_mask |= d->entries[i].filter;
406                 d->max_mask_subdir |= d->entries[i].subdir_filter;
407         }
408
409         return notify_save(notify, rec);
410 }
411
412 /*
413   Add a non-recursive watch
414 */
415
416 static void notify_add_onelevel(struct notify_context *notify,
417                                 struct notify_entry *e, void *private_data)
418 {
419         struct notify_entry_array *array;
420         struct db_record *rec;
421         DATA_BLOB blob;
422         TDB_DATA dbuf;
423         TDB_DATA value;
424         enum ndr_err_code ndr_err;
425         NTSTATUS status;
426
427         array = talloc_zero(talloc_tos(), struct notify_entry_array);
428         if (array == NULL) {
429                 return;
430         }
431
432         rec = dbwrap_fetch_locked(notify->db_onelevel, talloc_tos(),
433                                   make_tdb_data((uint8_t *)&e->dir_id,
434                                    sizeof(e->dir_id)));
435         if (rec == NULL) {
436                 DEBUG(10, ("notify_add_onelevel: fetch_locked for %s failed"
437                            "\n", file_id_string_tos(&e->dir_id)));
438                 TALLOC_FREE(array);
439                 return;
440         }
441
442         value = dbwrap_record_get_value(rec);
443         blob.data = (uint8_t *)value.dptr;
444         blob.length = value.dsize;
445
446         if (blob.length > 0) {
447                 ndr_err = ndr_pull_struct_blob(&blob, array, array,
448                         (ndr_pull_flags_fn_t)ndr_pull_notify_entry_array);
449                 if (!NDR_ERR_CODE_IS_SUCCESS(ndr_err)) {
450                         DEBUG(10, ("ndr_pull_notify_entry_array failed: %s\n",
451                                    ndr_errstr(ndr_err)));
452                         TALLOC_FREE(array);
453                         return;
454                 }
455                 if (DEBUGLEVEL >= 10) {
456                         DEBUG(10, ("notify_add_onelevel:\n"));
457                         NDR_PRINT_DEBUG(notify_entry_array, array);
458                 }
459         }
460
461         array->entries = talloc_realloc(array, array->entries,
462                                         struct notify_entry,
463                                         array->num_entries+1);
464         if (array->entries == NULL) {
465                 TALLOC_FREE(array);
466                 return;
467         }
468         array->entries[array->num_entries] = *e;
469         array->entries[array->num_entries].private_data = private_data;
470         array->entries[array->num_entries].server = notify->server;
471         array->num_entries += 1;
472
473         ndr_err = ndr_push_struct_blob(&blob, rec, array,
474                 (ndr_push_flags_fn_t)ndr_push_notify_entry_array);
475         if (!NDR_ERR_CODE_IS_SUCCESS(ndr_err)) {
476                 DEBUG(10, ("ndr_push_notify_entry_array failed: %s\n",
477                            ndr_errstr(ndr_err)));
478                 TALLOC_FREE(array);
479                 return;
480         }
481
482         if (DEBUGLEVEL >= 10) {
483                 DEBUG(10, ("notify_add_onelevel:\n"));
484                 NDR_PRINT_DEBUG(notify_entry_array, array);
485         }
486
487         dbuf.dptr = blob.data;
488         dbuf.dsize = blob.length;
489
490         status = dbwrap_record_store(rec, dbuf, TDB_REPLACE);
491         TALLOC_FREE(array);
492         if (!NT_STATUS_IS_OK(status)) {
493                 DEBUG(10, ("notify_add_onelevel: store failed: %s\n",
494                            nt_errstr(status)));
495                 return;
496         }
497         e->filter = 0;
498         return;
499 }
500
501
502 /*
503   add a notify watch. This is called when a notify is first setup on a open
504   directory handle.
505 */
506 NTSTATUS notify_add(struct notify_context *notify, struct notify_entry *e0,
507                     void (*callback)(void *, const struct notify_event *), 
508                     void *private_data)
509 {
510         struct notify_entry e = *e0;
511         NTSTATUS status;
512         char *tmp_path = NULL;
513         struct notify_list *listel;
514         size_t len;
515         int depth;
516         struct db_record *rec;
517
518         /* see if change notify is enabled at all */
519         if (notify == NULL) {
520                 return NT_STATUS_NOT_IMPLEMENTED;
521         }
522
523         status = notify_fetch_locked(notify, &rec);
524         NT_STATUS_NOT_OK_RETURN(status);
525
526         status = notify_load(notify, rec);
527         if (!NT_STATUS_IS_OK(status)) {
528                 talloc_free(rec);
529                 return status;
530         }
531
532         /* cope with /. on the end of the path */
533         len = strlen(e.path);
534         if (len > 1 && e.path[len-1] == '.' && e.path[len-2] == '/') {
535                 tmp_path = talloc_strndup(notify, e.path, len-2);
536                 if (tmp_path == NULL) {
537                         status = NT_STATUS_NO_MEMORY;
538                         goto done;
539                 }
540                 e.path = tmp_path;
541         }
542
543         depth = count_chars(e.path, '/');
544
545         listel = talloc_zero(notify, struct notify_list);
546         if (listel == NULL) {
547                 status = NT_STATUS_NO_MEMORY;
548                 goto done;
549         }
550
551         listel->private_data = private_data;
552         listel->callback = callback;
553         listel->depth = depth;
554         DLIST_ADD(notify->list, listel);
555
556         /* ignore failures from sys_notify */
557         if (notify->sys_notify_ctx != NULL) {
558                 /*
559                   this call will modify e.filter and e.subdir_filter
560                   to remove bits handled by the backend
561                 */
562                 status = sys_notify_watch(notify->sys_notify_ctx, &e,
563                                           sys_notify_callback, listel, 
564                                           &listel->sys_notify_handle);
565                 if (NT_STATUS_IS_OK(status)) {
566                         talloc_steal(listel, listel->sys_notify_handle);
567                 }
568         }
569
570         if (e.filter != 0) {
571                 notify_add_onelevel(notify, &e, private_data);
572                 status = NT_STATUS_OK;
573         }
574
575         /* if the system notify handler couldn't handle some of the
576            filter bits, or couldn't handle a request for recursion
577            then we need to install it in the array used for the
578            intra-samba notify handling */
579         if (e.filter != 0 || e.subdir_filter != 0) {
580                 status = notify_add_array(notify, rec, &e, private_data, depth);
581         }
582
583 done:
584         talloc_free(rec);
585         talloc_free(tmp_path);
586
587         return status;
588 }
589
590 NTSTATUS notify_remove_onelevel(struct notify_context *notify,
591                                 const struct file_id *fid,
592                                 void *private_data)
593 {
594         struct notify_entry_array *array;
595         struct db_record *rec;
596         DATA_BLOB blob;
597         TDB_DATA dbuf;
598         TDB_DATA value;
599         enum ndr_err_code ndr_err;
600         NTSTATUS status;
601         int i;
602
603         if (notify == NULL) {
604                 return NT_STATUS_NOT_IMPLEMENTED;
605         }
606
607         array = talloc_zero(talloc_tos(), struct notify_entry_array);
608         if (array == NULL) {
609                 return NT_STATUS_NO_MEMORY;
610         }
611
612         rec = dbwrap_fetch_locked(
613                 notify->db_onelevel, array,
614                 make_tdb_data((const uint8_t *)fid, sizeof(*fid)));
615         if (rec == NULL) {
616                 DEBUG(10, ("notify_remove_onelevel: fetch_locked for %s failed"
617                            "\n", file_id_string_tos(fid)));
618                 TALLOC_FREE(array);
619                 return NT_STATUS_INTERNAL_DB_CORRUPTION;
620         }
621
622         value = dbwrap_record_get_value(rec);
623         blob.data = (uint8_t *)value.dptr;
624         blob.length = value.dsize;
625
626         if (blob.length > 0) {
627                 ndr_err = ndr_pull_struct_blob(&blob, array, array,
628                         (ndr_pull_flags_fn_t)ndr_pull_notify_entry_array);
629                 if (!NDR_ERR_CODE_IS_SUCCESS(ndr_err)) {
630                         DEBUG(10, ("ndr_pull_notify_entry_array failed: %s\n",
631                                    ndr_errstr(ndr_err)));
632                         TALLOC_FREE(array);
633                         return ndr_map_error2ntstatus(ndr_err);
634                 }
635                 if (DEBUGLEVEL >= 10) {
636                         DEBUG(10, ("notify_remove_onelevel:\n"));
637                         NDR_PRINT_DEBUG(notify_entry_array, array);
638                 }
639         }
640
641         for (i=0; i<array->num_entries; i++) {
642                 if ((private_data == array->entries[i].private_data) &&
643                     cluster_id_equal(&notify->server,
644                                      &array->entries[i].server)) {
645                         break;
646                 }
647         }
648
649         if (i == array->num_entries) {
650                 TALLOC_FREE(array);
651                 return NT_STATUS_OBJECT_NAME_NOT_FOUND;
652         }
653
654         array->entries[i] = array->entries[array->num_entries-1];
655         array->num_entries -= 1;
656
657         if (array->num_entries == 0) {
658                 dbwrap_record_delete(rec);
659                 TALLOC_FREE(array);
660                 return NT_STATUS_OK;
661         }
662
663         ndr_err = ndr_push_struct_blob(&blob, rec, array,
664                 (ndr_push_flags_fn_t)ndr_push_notify_entry_array);
665         if (!NDR_ERR_CODE_IS_SUCCESS(ndr_err)) {
666                 DEBUG(10, ("ndr_push_notify_entry_array failed: %s\n",
667                            ndr_errstr(ndr_err)));
668                 TALLOC_FREE(array);
669                 return ndr_map_error2ntstatus(ndr_err);
670         }
671
672         if (DEBUGLEVEL >= 10) {
673                 DEBUG(10, ("notify_add_onelevel:\n"));
674                 NDR_PRINT_DEBUG(notify_entry_array, array);
675         }
676
677         dbuf.dptr = blob.data;
678         dbuf.dsize = blob.length;
679
680         status = dbwrap_record_store(rec, dbuf, TDB_REPLACE);
681         TALLOC_FREE(array);
682         if (!NT_STATUS_IS_OK(status)) {
683                 DEBUG(10, ("notify_add_onelevel: store failed: %s\n",
684                            nt_errstr(status)));
685                 return status;
686         }
687         return NT_STATUS_OK;
688 }
689
690 /*
691   remove a notify watch. Called when the directory handle is closed
692 */
693 NTSTATUS notify_remove(struct notify_context *notify, void *private_data)
694 {
695         NTSTATUS status;
696         struct notify_list *listel;
697         int i, depth;
698         struct notify_depth *d;
699         struct db_record *rec;
700
701         /* see if change notify is enabled at all */
702         if (notify == NULL) {
703                 return NT_STATUS_NOT_IMPLEMENTED;
704         }
705
706         for (listel=notify->list;listel;listel=listel->next) {
707                 if (listel->private_data == private_data) {
708                         DLIST_REMOVE(notify->list, listel);
709                         break;
710                 }
711         }
712         if (listel == NULL) {
713                 return NT_STATUS_OBJECT_NAME_NOT_FOUND;
714         }
715
716         depth = listel->depth;
717
718         talloc_free(listel);
719
720         status = notify_fetch_locked(notify, &rec);
721         NT_STATUS_NOT_OK_RETURN(status);
722
723         status = notify_load(notify, rec);
724         if (!NT_STATUS_IS_OK(status)) {
725                 talloc_free(rec);
726                 return status;
727         }
728
729         if (depth >= notify->array->num_depths) {
730                 talloc_free(rec);
731                 return NT_STATUS_OBJECT_NAME_NOT_FOUND;
732         }
733
734         /* we only have to search at the depth of this element */
735         d = &notify->array->depth[depth];
736
737         for (i=0;i<d->num_entries;i++) {
738                 if (private_data == d->entries[i].private_data &&
739                     cluster_id_equal(&notify->server, &d->entries[i].server)) {
740                         break;
741                 }
742         }
743         if (i == d->num_entries) {
744                 talloc_free(rec);
745                 return NT_STATUS_OBJECT_NAME_NOT_FOUND;
746         }
747
748         if (i < d->num_entries-1) {
749                 memmove(&d->entries[i], &d->entries[i+1], 
750                         sizeof(d->entries[i])*(d->num_entries-(i+1)));
751         }
752         d->num_entries--;
753
754         status = notify_save(notify, rec);
755
756         talloc_free(rec);
757
758         return status;
759 }
760
761 /*
762   remove all notify watches for a messaging server
763 */
764 static NTSTATUS notify_remove_all(struct notify_context *notify,
765                                   const struct server_id *server)
766 {
767         NTSTATUS status;
768         int i, depth, del_count=0;
769         struct db_record *rec;
770
771         status = notify_fetch_locked(notify, &rec);
772         NT_STATUS_NOT_OK_RETURN(status);
773
774         status = notify_load(notify, rec);
775         if (!NT_STATUS_IS_OK(status)) {
776                 talloc_free(rec);
777                 return status;
778         }
779
780         /* we have to search for all entries across all depths, looking for matches
781            for the server id */
782         for (depth=0;depth<notify->array->num_depths;depth++) {
783                 struct notify_depth *d = &notify->array->depth[depth];
784                 for (i=0;i<d->num_entries;i++) {
785                         if (cluster_id_equal(server, &d->entries[i].server)) {
786                                 if (i < d->num_entries-1) {
787                                         memmove(&d->entries[i], &d->entries[i+1], 
788                                                 sizeof(d->entries[i])*(d->num_entries-(i+1)));
789                                 }
790                                 i--;
791                                 d->num_entries--;
792                                 del_count++;
793                         }
794                 }
795         }
796
797         if (del_count > 0) {
798                 status = notify_save(notify, rec);
799         }
800
801         talloc_free(rec);
802
803         return status;
804 }
805
806
807 /*
808   send a notify message to another messaging server
809 */
810 static NTSTATUS notify_send(struct notify_context *notify, struct notify_entry *e,
811                             const char *path, uint32_t action)
812 {
813         struct notify_event ev;
814         DATA_BLOB data;
815         NTSTATUS status;
816         enum ndr_err_code ndr_err;
817         TALLOC_CTX *tmp_ctx;
818
819         ev.action = action;
820         ev.path = path;
821         ev.private_data = e->private_data;
822
823         tmp_ctx = talloc_new(notify);
824
825         ndr_err = ndr_push_struct_blob(&data, tmp_ctx, &ev,
826                                        (ndr_push_flags_fn_t)ndr_push_notify_event);
827         if (!NDR_ERR_CODE_IS_SUCCESS(ndr_err)) {
828                 talloc_free(tmp_ctx);
829                 return ndr_map_error2ntstatus(ndr_err);
830         }
831
832         status = messaging_send(notify->messaging_ctx, e->server, 
833                                 MSG_PVFS_NOTIFY, &data);
834         talloc_free(tmp_ctx);
835         return status;
836 }
837
838 void notify_onelevel(struct notify_context *notify, uint32_t action,
839                      uint32_t filter, struct file_id fid, const char *name)
840 {
841         struct notify_entry_array *array;
842         TDB_DATA dbuf;
843         DATA_BLOB blob;
844         bool have_dead_entries = false;
845         int i;
846         NTSTATUS status;
847
848         if (notify == NULL) {
849                 return;
850         }
851
852         array = talloc_zero(talloc_tos(), struct notify_entry_array);
853         if (array == NULL) {
854                 return;
855         }
856
857         status = dbwrap_fetch(notify->db_onelevel, array,
858                               make_tdb_data((uint8_t *)&fid, sizeof(fid)),
859                               &dbuf);
860         if (!NT_STATUS_IS_OK(status)) {
861                 TALLOC_FREE(array);
862                 return;
863         }
864
865         blob.data = (uint8 *)dbuf.dptr;
866         blob.length = dbuf.dsize;
867
868         if (blob.length > 0) {
869                 enum ndr_err_code ndr_err;
870                 ndr_err = ndr_pull_struct_blob(&blob, array, array,
871                         (ndr_pull_flags_fn_t)ndr_pull_notify_entry_array);
872                 if (!NDR_ERR_CODE_IS_SUCCESS(ndr_err)) {
873                         DEBUG(10, ("ndr_pull_notify_entry_array failed: %s\n",
874                                    ndr_errstr(ndr_err)));
875                         TALLOC_FREE(array);
876                         return;
877                 }
878                 if (DEBUGLEVEL >= 10) {
879                         DEBUG(10, ("notify_onelevel:\n"));
880                         NDR_PRINT_DEBUG(notify_entry_array, array);
881                 }
882         }
883
884         for (i=0; i<array->num_entries; i++) {
885                 struct notify_entry *e = &array->entries[i];
886
887                 if ((e->filter & filter) != 0) {
888                         status = notify_send(notify, e, name, action);
889                         if (NT_STATUS_EQUAL(
890                                     status, NT_STATUS_INVALID_HANDLE)) {
891                                 /*
892                                  * Mark the entry as dead. All entries have a
893                                  * path set. The marker used here is setting
894                                  * that to NULL.
895                                  */
896                                 e->path = NULL;
897                                 have_dead_entries = true;
898                         }
899                 }
900         }
901
902         if (!have_dead_entries) {
903                 TALLOC_FREE(array);
904                 return;
905         }
906
907         for (i=0; i<array->num_entries; i++) {
908                 struct notify_entry *e = &array->entries[i];
909                 if (e->path != NULL) {
910                         continue;
911                 }
912                 DEBUG(10, ("Deleting notify entries for process %s because "
913                            "it's gone\n", procid_str_static(&e->server)));
914                 /*
915                  * Potential TODO: This might need optimizing,
916                  * notify_remove_onelevel() does a fetch_locked() operation at
917                  * every call. But this would only matter if a process with
918                  * MANY notifies has died without shutting down properly.
919                  */
920                 notify_remove_onelevel(notify, &e->dir_id, e->private_data);
921         }
922
923         TALLOC_FREE(array);
924         return;
925 }
926
927 /*
928   trigger a notify message for anyone waiting on a matching event
929
930   This function is called a lot, and needs to be very fast. The unusual data structure
931   and traversal is designed to be fast in the average case, even for large numbers of
932   notifies
933 */
934 void notify_trigger(struct notify_context *notify,
935                     uint32_t action, uint32_t filter, const char *path)
936 {
937         NTSTATUS status;
938         int depth;
939         const char *p, *next_p;
940
941         DEBUG(10, ("notify_trigger called action=0x%x, filter=0x%x, "
942                    "path=%s\n", (unsigned)action, (unsigned)filter, path));
943
944         /* see if change notify is enabled at all */
945         if (notify == NULL) {
946                 return;
947         }
948
949  again:
950         status = notify_load(notify, NULL);
951         if (!NT_STATUS_IS_OK(status)) {
952                 return;
953         }
954
955         /* loop along the given path, working with each directory depth separately */
956         for (depth=0,p=path;
957              p && depth < notify->array->num_depths;
958              p=next_p,depth++) {
959                 int p_len = p - path;
960                 int min_i, max_i, i;
961                 struct notify_depth *d = &notify->array->depth[depth];
962                 next_p = strchr(p+1, '/');
963
964                 /* see if there are any entries at this depth */
965                 if (d->num_entries == 0) continue;
966
967                 /* try to skip based on the maximum mask. If next_p is
968                  NULL then we know it will be a 'this directory'
969                  match, otherwise it must be a subdir match */
970                 if (next_p != NULL) {
971                         if (0 == (filter & d->max_mask_subdir)) {
972                                 continue;
973                         }
974                 } else {
975                         if (0 == (filter & d->max_mask)) {
976                                 continue;
977                         }
978                 }
979
980                 /* we know there is an entry here worth looking
981                  for. Use a bisection search to find the first entry
982                  with a matching path */
983                 min_i = 0;
984                 max_i = d->num_entries-1;
985
986                 while (min_i < max_i) {
987                         struct notify_entry *e;
988                         int cmp;
989                         i = (min_i+max_i)/2;
990                         e = &d->entries[i];
991                         cmp = strncmp(path, e->path, p_len);
992                         if (cmp == 0) {
993                                 if (p_len == e->path_len) {
994                                         max_i = i;
995                                 } else {
996                                         max_i = i-1;
997                                 }
998                         } else if (cmp < 0) {
999                                 max_i = i-1;
1000                         } else {
1001                                 min_i = i+1;
1002                         }
1003                 }
1004
1005                 if (min_i != max_i) {
1006                         /* none match */
1007                         continue;
1008                 }
1009
1010                 /* we now know that the entries start at min_i */
1011                 for (i=min_i;i<d->num_entries;i++) {
1012                         struct notify_entry *e = &d->entries[i];
1013                         if (p_len != e->path_len ||
1014                             strncmp(path, e->path, p_len) != 0) break;
1015                         if (next_p != NULL) {
1016                                 if (0 == (filter & e->subdir_filter)) {
1017                                         continue;
1018                                 }
1019                         } else {
1020                                 if (0 == (filter & e->filter)) {
1021                                         continue;
1022                                 }
1023                         }
1024                         status = notify_send(notify, e, path + e->path_len + 1,
1025                                              action);
1026
1027                         if (NT_STATUS_EQUAL(
1028                                     status, NT_STATUS_INVALID_HANDLE)) {
1029                                 struct server_id server = e->server;
1030
1031                                 DEBUG(10, ("Deleting notify entries for "
1032                                            "process %s because it's gone\n",
1033                                            procid_str_static(&e->server)));
1034                                 notify_remove_all(notify, &server);
1035                                 goto again;
1036                         }
1037                 }
1038         }
1039 }