]> git.saurik.com Git - apple/xnu.git/blobdiff - bsd/vfs/vfs_fsevents.c
xnu-3247.1.106.tar.gz
[apple/xnu.git] / bsd / vfs / vfs_fsevents.c
index 5949b796ad1790168c259c60d27390feee63332f..d2f32bd7489478e3af593ded542aacb3ed933dea 100644 (file)
@@ -1,27 +1,37 @@
 /*
- * Copyright (c) 2004 Apple Computer, Inc. All rights reserved.
+ * Copyright (c) 2004-2014 Apple Inc. All rights reserved.
  *
- * @APPLE_LICENSE_HEADER_START@
+ * @APPLE_OSREFERENCE_LICENSE_HEADER_START@
  * 
- * The contents of this file constitute Original Code as defined in and
- * are subject to the Apple Public Source License Version 1.1 (the
- * "License").  You may not use this file except in compliance with the
- * License.  Please obtain a copy of the License at
- * http://www.apple.com/publicsource and read it before using this file.
+ * This file contains Original Code and/or Modifications of Original Code
+ * as defined in and that are subject to the Apple Public Source License
+ * Version 2.0 (the 'License'). You may not use this file except in
+ * compliance with the License. The rights granted to you under the License
+ * may not be used to create, or enable the creation or redistribution of,
+ * unlawful or unlicensed copies of an Apple operating system, or to
+ * circumvent, violate, or enable the circumvention or violation of, any
+ * terms of an Apple operating system software license agreement.
  * 
- * This Original Code and all software distributed under the License are
- * distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, EITHER
+ * Please obtain a copy of the License at
+ * http://www.opensource.apple.com/apsl/ and read it before using this file.
+ * 
+ * The Original Code and all software distributed under the License are
+ * distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
  * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
  * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
- * FITNESS FOR A PARTICULAR PURPOSE OR NON-INFRINGEMENT.  Please see the
- * License for the specific language governing rights and limitations
- * under the License.
+ * FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT.
+ * Please see the License for the specific language governing rights and
+ * limitations under the License.
  * 
- * @APPLE_LICENSE_HEADER_END@
+ * @APPLE_OSREFERENCE_LICENSE_HEADER_END@
  */
 #include <stdarg.h>
 #include <sys/param.h>
 #include <sys/systm.h>
+#include <sys/event.h>         // for kqueue related stuff
+#include <sys/fsevents.h>
+
+#if CONFIG_FSE
 #include <sys/namei.h>
 #include <sys/filedesc.h>
 #include <sys/kernel.h>
 #include <miscfs/specfs/specdev.h>
 #include <miscfs/devfs/devfs.h>
 #include <sys/filio.h>
-#include <architecture/byte_order.h>
 #include <kern/locks.h>
 #include <libkern/OSAtomic.h>
+#include <kern/zalloc.h>
+#include <mach/mach_time.h>
+#include <kern/thread_call.h>
+#include <kern/clock.h>
 
-#include <bsm/audit_kernel.h>
+#include <security/audit/audit.h>
 #include <bsm/audit_kevents.h>
 
-// where all our structs and defines come from
-#include <sys/fsevents.h>
-
+#include <pexpert/pexpert.h>
 
-typedef struct kfs_event_arg {
-    u_int16_t  type;
-    u_int16_t  len;
-    union {
-       struct vnode *vp;
-       char         *str;
-       void         *ptr;
-       int32_t       int32;
-       dev_t         dev;
-       ino_t         ino;
-       int32_t       mode;
-       uid_t         uid;
-       gid_t         gid;
-    } data;
-}kfs_event_arg;
-
-#define KFS_NUM_ARGS  FSE_MAX_ARGS
 typedef struct kfs_event {
-    int32_t        type;          // type code of this event
-    u_int32_t      refcount;      // number of clients referencing this
-    pid_t          pid;           // pid of the process that did the op
-    kfs_event_arg  args[KFS_NUM_ARGS];
+    LIST_ENTRY(kfs_event) kevent_list;
+    int16_t        type;           // type code of this event
+    u_int16_t      flags,          // per-event flags
+                   len;            // the length of the path in "str"
+    int32_t        refcount;       // number of clients referencing this
+    pid_t          pid;            // pid of the process that did the op
+
+    uint64_t       abstime;        // when this event happened (mach_absolute_time())
+    ino64_t        ino;
+    dev_t          dev;
+    int32_t        mode;
+    uid_t          uid;
+    gid_t          gid;
+
+    const char    *str;
+
+    struct kfs_event *dest;    // if this is a two-file op
 } kfs_event;
 
+// flags for the flags field
+#define KFSE_COMBINED_EVENTS          0x0001
+#define KFSE_CONTAINS_DROPPED_EVENTS  0x0002
+#define KFSE_RECYCLED_EVENT           0x0004
+#define KFSE_BEING_CREATED            0x0008
+
+LIST_HEAD(kfse_list, kfs_event) kfse_list_head = LIST_HEAD_INITIALIZER(x);
+int num_events_outstanding = 0;
+int num_pending_rename = 0;
+
+
+struct fsevent_handle;
 
 typedef struct fs_event_watcher {
-    SLIST_ENTRY(fs_event_watcher) link;
     int8_t      *event_list;             // the events we're interested in
     int32_t      num_events;
-    dev_t       *devices_to_watch;       // only report events from these devices
+    dev_t       *devices_not_to_watch;   // report events from devices not in this list
     uint32_t     num_devices;
     int32_t      flags;
     kfs_event  **event_queue;
     int32_t      eventq_size;            // number of event pointers in queue
-    int32_t      rd, wr;                 // indices to the event_queue
+    int32_t      num_readers;
+    int32_t      rd;                     // read index into the event_queue
+    int32_t      wr;                     // write index into the event_queue
     int32_t      blockers;
+    int32_t      my_id;
+    uint32_t     num_dropped;
+    uint64_t     max_event_id;
+    struct fsevent_handle *fseh;
+    pid_t        pid;
+    char         proc_name[(2 * MAXCOMLEN) + 1];
 } fs_event_watcher;
 
 // fs_event_watcher flags
-#define WATCHER_DROPPED_EVENTS  0x0001
-#define WATCHER_CLOSING         0x0002
+#define WATCHER_DROPPED_EVENTS         0x0001
+#define WATCHER_CLOSING                0x0002
+#define WATCHER_WANTS_COMPACT_EVENTS   0x0004
+#define WATCHER_WANTS_EXTENDED_INFO    0x0008
+#define WATCHER_APPLE_SYSTEM_SERVICE   0x0010   // fseventsd, coreservicesd, mds
 
-static SLIST_HEAD(watch_list, fs_event_watcher) watch_list_head = { NULL };
+#define MAX_WATCHERS  8
+static fs_event_watcher *watcher_table[MAX_WATCHERS];
 
+#define DEFAULT_MAX_KFS_EVENTS   4096
+static int max_kfs_events = DEFAULT_MAX_KFS_EVENTS;
 
-#define MAX_KFS_EVENTS   2048
-
-// this array holds each pending event 
-static kfs_event  fs_event_buf[MAX_KFS_EVENTS];
-static int        free_event_idx = 0;
+// we allocate kfs_event structures out of this zone
+static zone_t     event_zone;
 static int        fs_event_init = 0;
 
 //
@@ -112,6 +141,7 @@ static int        fs_event_init = 0;
 static int16_t     fs_event_type_watchers[FSE_MAX_EVENTS];
 
 static int  watcher_add_event(fs_event_watcher *watcher, kfs_event *kfse);
+static void fsevents_wakeup(fs_event_watcher *watcher);
 
 //
 // Locks
@@ -122,13 +152,36 @@ static lck_grp_t *       fsevent_mutex_group;
 
 static lck_grp_t *       fsevent_rw_group;
 
-static lck_rw_t  fsevent_big_lock;    // always grab this first
-static lck_mtx_t watch_list_lock;
+static lck_rw_t  event_handling_lock; // handles locking for event manipulation and recycling
+static lck_mtx_t watch_table_lock;
 static lck_mtx_t event_buf_lock;
+static lck_mtx_t event_writer_lock;
+
 
+/* Explicitly declare qsort so compiler doesn't complain */
+__private_extern__ void qsort(
+    void * array,
+    size_t nmembers,
+    size_t member_size,
+    int (*)(const void *, const void *));
 
-static void init_pathbuff(void);
+static int
+is_ignored_directory(const char *path) {
 
+    if (!path) {
+      return 0;
+    }
+
+#define IS_TLD(x) strnstr(__DECONST(char *, path), x, MAXPATHLEN)
+    if (IS_TLD("/.Spotlight-V100/") ||
+        IS_TLD("/.MobileBackups/") || 
+        IS_TLD("/Backups.backupdb/")) {
+        return 1;
+    }
+#undef IS_TLD
+       
+    return 0;
+}
 
 static void
 fsevents_internal_init(void)
@@ -143,228 +196,518 @@ fsevents_internal_init(void)
        fs_event_type_watchers[i] = 0;
     }
 
-    for(i=0; i < MAX_KFS_EVENTS; i++) {
-       fs_event_buf[i].type      = FSE_INVALID;
-       fs_event_buf[i].refcount  = 0;
-    }
-
-    SLIST_INIT(&watch_list_head);
+    memset(watcher_table, 0, sizeof(watcher_table));
 
     fsevent_lock_attr    = lck_attr_alloc_init();
     fsevent_group_attr   = lck_grp_attr_alloc_init();
     fsevent_mutex_group  = lck_grp_alloc_init("fsevent-mutex", fsevent_group_attr);
     fsevent_rw_group     = lck_grp_alloc_init("fsevent-rw", fsevent_group_attr);
 
-    lck_mtx_init(&watch_list_lock, fsevent_mutex_group, fsevent_lock_attr);
+    lck_mtx_init(&watch_table_lock, fsevent_mutex_group, fsevent_lock_attr);
     lck_mtx_init(&event_buf_lock, fsevent_mutex_group, fsevent_lock_attr);
+    lck_mtx_init(&event_writer_lock, fsevent_mutex_group, fsevent_lock_attr);
+
+    lck_rw_init(&event_handling_lock, fsevent_rw_group, fsevent_lock_attr);
+
+    PE_get_default("kern.maxkfsevents", &max_kfs_events, sizeof(max_kfs_events));
+
+    event_zone = zinit(sizeof(kfs_event),
+                      max_kfs_events * sizeof(kfs_event),
+                      max_kfs_events * sizeof(kfs_event),
+                      "fs-event-buf");
+    if (event_zone == NULL) {
+       printf("fsevents: failed to initialize the event zone.\n");
+    }
 
-    lck_rw_init(&fsevent_big_lock, fsevent_rw_group, fsevent_lock_attr);
+    // mark the zone as exhaustible so that it will not
+    // ever grow beyond what we initially filled it with
+    zone_change(event_zone, Z_EXHAUST, TRUE);
+    zone_change(event_zone, Z_COLLECT, FALSE);
+    zone_change(event_zone, Z_CALLERACCT, FALSE);
 
-    init_pathbuff();
+    if (zfill(event_zone, max_kfs_events) < max_kfs_events) {
+       printf("fsevents: failed to pre-fill the event zone.\n");       
+    }
+    
 }
 
 static void
-lock_watch_list(void)
+lock_watch_table(void)
 {
-    lck_mtx_lock(&watch_list_lock);
+    lck_mtx_lock(&watch_table_lock);
 }
 
 static void
-unlock_watch_list(void)
+unlock_watch_table(void)
 {
-    lck_mtx_unlock(&watch_list_lock);
+    lck_mtx_unlock(&watch_table_lock);
 }
 
 static void
-lock_fs_event_buf(void)
+lock_fs_event_list(void)
 {
     lck_mtx_lock(&event_buf_lock);
 }
 
 static void
-unlock_fs_event_buf(void)
+unlock_fs_event_list(void)
 {
     lck_mtx_unlock(&event_buf_lock);
 }
 
 // forward prototype
-static void do_free_event(kfs_event *kfse);
+static void release_event_ref(kfs_event *kfse);
 
 static int
 watcher_cares_about_dev(fs_event_watcher *watcher, dev_t dev)
 {
     unsigned int i;
     
-    // if there is not list of devices to watch, then always
-    // say we're interested so we'll report all events from
-    // all devices
-    if (watcher->devices_to_watch == NULL) {
+    // if devices_not_to_watch is NULL then we care about all
+    // events from all devices
+    if (watcher->devices_not_to_watch == NULL) {
        return 1;
     }
 
     for(i=0; i < watcher->num_devices; i++) {
-       if (dev == watcher->devices_to_watch[i]) {
-           // found a match! that means we want events
-           // from this device.
-           return 1;
+       if (dev == watcher->devices_not_to_watch[i]) {
+           // found a match! that means we do not 
+           // want events from this device.
+           return 0;
        }
     }
 
-    // if we're here it's not in the devices_to_watch[] 
-    // list so that means we do not care about it
-    return 0;
+    // if we're here it's not in the devices_not_to_watch[] 
+    // list so that means we do care about it
+    return 1;
 }
 
 
 int
 need_fsevent(int type, vnode_t vp)
 {
-        fs_event_watcher *watcher;
-        dev_t dev;
-
-       if (fs_event_type_watchers[type] == 0)
-               return (0);
-       dev = (dev_t)(vp->v_mount->mnt_vfsstat.f_fsid.val[0]);
+    if (type >= 0 && type < FSE_MAX_EVENTS && fs_event_type_watchers[type] == 0)
+       return (0);
 
-       lock_watch_list();
-    
-       SLIST_FOREACH(watcher, &watch_list_head, link) {
-               if (watcher->event_list[type] == FSE_REPORT && watcher_cares_about_dev(watcher, dev)) {
-                       unlock_watch_list();
-                       return (1);
-               }
-       }
-       unlock_watch_list();
-    
+    // events in /dev aren't really interesting...
+    if (vp->v_tag == VT_DEVFS) {
        return (0);
+    }
+
+    return 1;
 }
 
 
+#define is_throw_away(x)  ((x) == FSE_STAT_CHANGED || (x) == FSE_CONTENT_MODIFIED)
+
+
+// Ways that an event can be reused:
+//
+// "combined" events mean that there were two events for 
+// the same vnode or path and we're combining both events 
+// into a single event.  The primary event gets a bit that
+// marks it as having been combined.  The secondary event 
+// is essentially dropped and the kfse structure reused.
+//
+// "collapsed" means that multiple events below a given
+// directory are collapsed into a single event.  in this
+// case, the directory that we collapse into and all of
+// its children must be re-scanned.
+//
+// "recycled" means that we're completely blowing away 
+// the event since there are other events that have info 
+// about the same vnode or path (and one of those other 
+// events will be marked as combined or collapsed as
+// appropriate).
+//
+#define KFSE_COMBINED   0x0001
+#define KFSE_COLLAPSED  0x0002
+#define KFSE_RECYCLED   0x0004
+
+int num_dropped         = 0;
+int num_parent_switch   = 0;
+int num_recycled_rename = 0;
+
+static struct timeval last_print;
+
+//
+// These variables are used to track coalescing multiple identical
+// events for the same vnode/pathname.  If we get the same event
+// type and same vnode/pathname as the previous event, we just drop
+// the event since it's superfluous.  This improves some micro-
+// benchmarks considerably and actually has a real-world impact on
+// tests like a Finder copy where multiple stat-changed events can
+// get coalesced.
+//
+static int     last_event_type=-1;
+static void   *last_ptr=NULL;
+static char    last_str[MAXPATHLEN];
+static int     last_nlen=0;
+static int     last_vid=-1;
+static uint64_t last_coalesced_time=0;
+static void   *last_event_ptr=NULL;
+int            last_coalesced = 0;
+static mach_timebase_info_data_t    sTimebaseInfo = { 0, 0 };
+
+
 int
 add_fsevent(int type, vfs_context_t ctx, ...) 
 {
     struct proc             *p = vfs_context_proc(ctx);
-    int               i, arg_idx, num_deliveries=0;
-    kfs_event_arg    *kea;
-    kfs_event        *kfse;
+    int               i, arg_type, ret;
+    kfs_event        *kfse, *kfse_dest=NULL, *cur;
     fs_event_watcher *watcher;
     va_list           ap;
-    int              error = 0;
+    int              error = 0, did_alloc=0;
     dev_t             dev = 0;
+    uint64_t          now, elapsed;
+    char             *pathbuff=NULL;
+    int               pathbuff_len;
+
+
 
     va_start(ap, ctx);
 
+    // ignore bogus event types..
+    if (type < 0 || type >= FSE_MAX_EVENTS) {
+       return EINVAL;
+    }
+
     // if no one cares about this type of event, bail out
     if (fs_event_type_watchers[type] == 0) {
        va_end(ap);
+
        return 0;
     }
 
-    lck_rw_lock_shared(&fsevent_big_lock);
+    now = mach_absolute_time();
 
     // find a free event and snag it for our use
     // NOTE: do not do anything that would block until
     //       the lock is dropped.
-    lock_fs_event_buf();
+    lock_fs_event_list();
     
-    for(i=0; i < MAX_KFS_EVENTS; i++) {
-       if (fs_event_buf[(free_event_idx + i) % MAX_KFS_EVENTS].type == FSE_INVALID) {
-           break;
+    //
+    // check if this event is identical to the previous one...
+    // (as long as it's not an event type that can never be the
+    // same as a previous event)
+    //
+    if (type != FSE_CREATE_FILE && type != FSE_DELETE && type != FSE_RENAME && type != FSE_EXCHANGE && type != FSE_CHOWN && type != FSE_DOCID_CHANGED && type != FSE_DOCID_CREATED) {
+       void *ptr=NULL;
+       int   vid=0, was_str=0, nlen=0;
+
+       for(arg_type=va_arg(ap, int32_t); arg_type != FSE_ARG_DONE; arg_type=va_arg(ap, int32_t)) {
+           switch(arg_type) {
+               case FSE_ARG_VNODE: {
+                   ptr = va_arg(ap, void *);
+                   vid = vnode_vid((struct vnode *)ptr);
+                   last_str[0] = '\0';
+                   break;
+               }
+               case FSE_ARG_STRING: {
+                   nlen = va_arg(ap, int32_t);
+                   ptr = va_arg(ap, void *);
+                   was_str = 1;
+                   break;
+               }
+           }
+           if (ptr != NULL) {
+               break;
+           }
        }
-    }
 
-    if (i >= MAX_KFS_EVENTS) {
-       // yikes! no free slots
-       unlock_fs_event_buf();
-       va_end(ap);
+       if ( sTimebaseInfo.denom == 0 ) {
+           (void) clock_timebase_info(&sTimebaseInfo);
+       }
+       
+       elapsed = (now - last_coalesced_time);
+       if (sTimebaseInfo.denom != sTimebaseInfo.numer) {
+           if (sTimebaseInfo.denom == 1) {
+               elapsed *= sTimebaseInfo.numer;
+           } else {
+               // this could overflow... the worst that will happen is that we'll
+               // send (or not send) an extra event so I'm not going to worry about
+               // doing the math right like dtrace_abs_to_nano() does.
+               elapsed = (elapsed * sTimebaseInfo.numer) / (uint64_t)sTimebaseInfo.denom;
+           }
+       }
+       
+       if (type == last_event_type
+            && (elapsed < 1000000000)
+           && 
+           ((vid && vid == last_vid && last_ptr == ptr)
+             ||
+            (last_str[0] && last_nlen == nlen && ptr && strcmp(last_str, ptr) == 0))
+          ) {
+           
+           last_coalesced++;
+           unlock_fs_event_list();
+           va_end(ap);
 
-       lock_watch_list();
-       SLIST_FOREACH(watcher, &watch_list_head, link) {
-           watcher->flags |= WATCHER_DROPPED_EVENTS;
-           wakeup((caddr_t)watcher);
+           return 0;
+       } else {
+           last_ptr = ptr;
+           if (was_str) {
+               strlcpy(last_str, ptr, sizeof(last_str));
+           }
+           last_nlen = nlen;
+           last_vid = vid;
+           last_event_type = type;
+           last_coalesced_time = now;
        }
-       unlock_watch_list();
-       lck_rw_done(&fsevent_big_lock);
+    }
+    va_start(ap, ctx);
 
-       printf("fs_events: add_event: event queue is full! dropping events.\n");
-       return ENOSPC;
+
+    kfse = zalloc_noblock(event_zone);
+    if (kfse && (type == FSE_RENAME || type == FSE_EXCHANGE)) {
+       kfse_dest = zalloc_noblock(event_zone);
+       if (kfse_dest == NULL) {
+           did_alloc = 1;
+           zfree(event_zone, kfse);
+           kfse = NULL;
+       }
     }
 
-    kfse = &fs_event_buf[(free_event_idx + i) % MAX_KFS_EVENTS];
 
-    free_event_idx++;
-    
+    if (kfse == NULL) {        // yikes! no free events
+           unlock_fs_event_list();
+           lock_watch_table();
+
+           for(i=0; i < MAX_WATCHERS; i++) {
+               watcher = watcher_table[i];
+               if (watcher == NULL) {
+                   continue;
+               }
+
+               watcher->flags |= WATCHER_DROPPED_EVENTS;
+               fsevents_wakeup(watcher);
+           }
+           unlock_watch_table();
+
+           {       
+               struct timeval current_tv;
+
+               num_dropped++;
+
+               // only print a message at most once every 5 seconds
+               microuptime(&current_tv);
+               if ((current_tv.tv_sec - last_print.tv_sec) > 10) {
+                   int ii;
+                   void *junkptr=zalloc_noblock(event_zone), *listhead=kfse_list_head.lh_first;
+                   
+                   printf("add_fsevent: event queue is full! dropping events (num dropped events: %d; num events outstanding: %d).\n", num_dropped, num_events_outstanding);
+                   printf("add_fsevent: kfse_list head %p ; num_pending_rename %d\n", listhead, num_pending_rename);
+                   printf("add_fsevent: zalloc sez: %p\n", junkptr);
+                   printf("add_fsevent: event_zone info: %d 0x%x\n", ((int *)event_zone)[0], ((int *)event_zone)[1]);
+                   lock_watch_table();
+                   for(ii=0; ii < MAX_WATCHERS; ii++) {
+                       if (watcher_table[ii] == NULL) {
+                           continue;
+                       }
+                       
+                       printf("add_fsevent: watcher %s %p: rd %4d wr %4d q_size %4d flags 0x%x\n",
+                              watcher_table[ii]->proc_name,
+                              watcher_table[ii],
+                              watcher_table[ii]->rd, watcher_table[ii]->wr,
+                              watcher_table[ii]->eventq_size, watcher_table[ii]->flags);
+                   }
+                   unlock_watch_table();
+
+                   last_print = current_tv;
+                   if (junkptr) {
+                       zfree(event_zone, junkptr);
+                   }
+               }
+           }
+
+           if (pathbuff) {
+               release_pathbuff(pathbuff);
+               pathbuff = NULL;
+           }
+           return ENOSPC;
+       }
+
+    memset(kfse, 0, sizeof(kfs_event));
+    kfse->refcount = 1;
+    OSBitOrAtomic16(KFSE_BEING_CREATED, &kfse->flags);
+
+    last_event_ptr = kfse;
     kfse->type     = type;
-    kfse->refcount = 0;
+    kfse->abstime  = now;
     kfse->pid      = p->p_pid;
+    if (type == FSE_RENAME || type == FSE_EXCHANGE) {
+       memset(kfse_dest, 0, sizeof(kfs_event));
+       kfse_dest->refcount = 1;
+       OSBitOrAtomic16(KFSE_BEING_CREATED, &kfse_dest->flags);
+       kfse_dest->type     = type;
+       kfse_dest->pid      = p->p_pid;
+       kfse_dest->abstime  = now;
+       
+       kfse->dest = kfse_dest;
+    }
+    
+    num_events_outstanding++;
+    if (kfse->type == FSE_RENAME) {
+       num_pending_rename++;
+    }
+    LIST_INSERT_HEAD(&kfse_list_head, kfse, kevent_list);
 
-    unlock_fs_event_buf();  // at this point it's safe to unlock
+    if (kfse->refcount < 1) {
+       panic("add_fsevent: line %d: kfse recount %d but should be at least 1\n", __LINE__, kfse->refcount);
+    }
+
+    unlock_fs_event_list();  // at this point it's safe to unlock
 
     //
     // now process the arguments passed in and copy them into
     // the kfse
     //
-    arg_idx = 0;
-    while(arg_idx < KFS_NUM_ARGS) {
-       kea = &kfse->args[arg_idx++];
-       kea->type = va_arg(ap, int32_t);
+    
+    cur = kfse;
+
+    if (type == FSE_DOCID_CREATED || type == FSE_DOCID_CHANGED) {
+           uint64_t val;
+
+           //
+           // These events are special and not like the other events.  They only
+           // have a dev_t, src inode #, dest inode #, and a doc-id.  We use the
+           // fields that we can in the kfse but have to overlay the dest inode
+           // number and the doc-id on the other fields.
+           //
+
+           // First the dev_t
+           arg_type = va_arg(ap, int32_t);
+           if (arg_type == FSE_ARG_DEV) {
+                   cur->dev = (dev_t)(va_arg(ap, dev_t));
+           } else {
+                   cur->dev = (dev_t)0xbadc0de1;
+           }
 
-       if (kea->type == FSE_ARG_DONE) {
-           break;
-       }
+           // next the source inode #
+           arg_type = va_arg(ap, int32_t);
+           if (arg_type == FSE_ARG_INO) {
+                   cur->ino = (ino64_t)(va_arg(ap, ino64_t));
+           } else {
+                   cur->ino = 0xbadc0de2;
+           }
+
+           // now the dest inode #
+           arg_type = va_arg(ap, int32_t);
+           if (arg_type == FSE_ARG_INO) {
+                   val = (ino64_t)(va_arg(ap, ino64_t));
+           } else {
+                   val = 0xbadc0de2;
+           }
+           // overlay the dest inode number on the str/dest pointer fields
+           memcpy(&cur->str, &val, sizeof(ino64_t));
+
+
+           // and last the document-id
+           arg_type = va_arg(ap, int32_t);
+           if (arg_type == FSE_ARG_INT32) {
+                   val = (uint64_t)va_arg(ap, uint32_t);
+           } else if (arg_type == FSE_ARG_INT64) {
+                   val = (uint64_t)va_arg(ap, uint64_t);
+           } else {
+                   val = 0xbadc0de3;
+           }
+           
+           // the docid is 64-bit and overlays the uid/gid fields
+           memcpy(&cur->uid, &val, sizeof(uint64_t));
 
-       switch(kea->type) {
+           goto done_with_args;
+    }
+
+    for(arg_type=va_arg(ap, int32_t); arg_type != FSE_ARG_DONE; arg_type=va_arg(ap, int32_t))
+
+       switch(arg_type) {
            case FSE_ARG_VNODE: {
                // this expands out into multiple arguments to the client
                struct vnode *vp;
                struct vnode_attr va;
 
-               kea->data.vp = vp = va_arg(ap, struct vnode *);
-               if (kea->data.vp == NULL) {
-                   panic("add_fsevent: you can't pass me a NULL vnode ptr (type %d)!\n",
-                         kfse->type);
+               if (kfse->str != NULL) {
+                   cur = kfse_dest;
                }
 
-               if (vnode_ref_ext(kea->data.vp, O_EVTONLY) != 0) {
-                   kea->type = FSE_ARG_DONE;
-                   
-                   error = EINVAL;
-                   goto clean_up;
+               vp = va_arg(ap, struct vnode *);
+               if (vp == NULL) {
+                   panic("add_fsevent: you can't pass me a NULL vnode ptr (type %d)!\n",
+                         cur->type);
                }
+
                VATTR_INIT(&va);
                VATTR_WANTED(&va, va_fsid);
                VATTR_WANTED(&va, va_fileid);
                VATTR_WANTED(&va, va_mode);
                VATTR_WANTED(&va, va_uid);
                VATTR_WANTED(&va, va_gid);
-               if (vnode_getattr(kea->data.vp, &va, ctx) != 0) {
-                   vnode_rele_ext(kea->data.vp, O_EVTONLY, 0);
-                   kea->type = FSE_ARG_DONE;
-
+               VATTR_WANTED(&va, va_nlink);
+               if ((ret = vnode_getattr(vp, &va, vfs_context_kernel())) != 0) {
+                   // printf("add_fsevent: failed to getattr on vp %p (%d)\n", cur->fref.vp, ret);
+                   cur->str = NULL;
                    error = EINVAL;
                    goto clean_up;
                }
 
-               kea++;
-               kea->type = FSE_ARG_DEV;
-               kea->data.dev = dev = (dev_t)va.va_fsid;
-
-               kea++;
-               kea->type = FSE_ARG_INO;
-               kea->data.ino = (ino_t)va.va_fileid;
+               cur->dev  = dev = (dev_t)va.va_fsid;
+               cur->ino  = (ino64_t)va.va_fileid;
+               cur->mode = (int32_t)vnode_vttoif(vnode_vtype(vp)) | va.va_mode;
+               cur->uid  = va.va_uid;
+               cur->gid  = va.va_gid;
+               if (vp->v_flag & VISHARDLINK) {
+                       cur->mode |= FSE_MODE_HLINK;
+                       if ((vp->v_type == VDIR && va.va_dirlinkcount == 0) || (vp->v_type == VREG && va.va_nlink == 0)) {
+                               cur->mode |= FSE_MODE_LAST_HLINK;
+                       }
+               }
 
-               kea++;
-               kea->type = FSE_ARG_MODE;
-               kea->data.mode = (int32_t)vnode_vttoif(vnode_vtype(vp)) | va.va_mode;
+               // if we haven't gotten the path yet, get it.
+               if (pathbuff == NULL) {
+                   pathbuff = get_pathbuff();
+                   pathbuff_len = MAXPATHLEN;
+                   
+                   pathbuff[0] = '\0';
+                   if ((ret = vn_getpath(vp, pathbuff, &pathbuff_len)) != 0 || pathbuff[0] == '\0') {
+                       
+                       cur->flags |= KFSE_CONTAINS_DROPPED_EVENTS;
+                       
+                       do {
+                               if (vp->v_parent != NULL) {
+                                       vp = vp->v_parent;
+                               } else if (vp->v_mount) {
+                                       strlcpy(pathbuff, vp->v_mount->mnt_vfsstat.f_mntonname, MAXPATHLEN);
+                                       break;
+                               } else {
+                                       vp = NULL;
+                               }
+
+                               if (vp == NULL) {
+                                       break;
+                               }
+
+                               pathbuff_len = MAXPATHLEN;
+                               ret = vn_getpath(vp, pathbuff, &pathbuff_len);
+                       } while (ret == ENOSPC);
+                               
+                       if (ret != 0 || vp == NULL) {
+                               error = ENOENT;
+                               goto clean_up;
+                       }
+                   }
+               }
 
-               kea++;
-               kea->type = FSE_ARG_UID;
-               kea->data.uid = va.va_uid;
+               // store the path by adding it to the global string table
+               cur->len = pathbuff_len;
+               cur->str = vfs_addname(pathbuff, pathbuff_len, 0, 0);
+               if (cur->str == NULL || cur->str[0] == '\0') {
+                   panic("add_fsevent: was not able to add path %s to event %p.\n", pathbuff, cur);
+               }
+               
+               release_pathbuff(pathbuff);
+               pathbuff = NULL;
 
-               kea++;
-               kea->type = FSE_ARG_GID;
-               kea->data.gid = va.va_gid;
-               arg_idx += 5;
                break;
            }
 
@@ -373,156 +716,223 @@ add_fsevent(int type, vfs_context_t ctx, ...)
                
                fse = va_arg(ap, fse_info *);
                
-               kea->type = FSE_ARG_DEV;
-               kea->data.dev = dev = (dev_t)fse->dev;
-
-               kea++;
-               kea->type = FSE_ARG_INO;
-               kea->data.ino = (ino_t)fse->ino;
-
-               kea++;
-               kea->type = FSE_ARG_MODE;
-               kea->data.mode = (int32_t)fse->mode;
-
-               kea++;
-               kea->type = FSE_ARG_UID;
-               kea->data.uid = (uid_t)fse->uid;
-
-               kea++;
-               kea->type = FSE_ARG_GID;
-               kea->data.gid = (uid_t)fse->gid;
-               arg_idx += 4;
+               cur->dev  = dev = (dev_t)fse->dev;
+               cur->ino  = (ino64_t)fse->ino;
+               cur->mode = (int32_t)fse->mode;
+               cur->uid  = (uid_t)fse->uid;
+               cur->gid  = (uid_t)fse->gid;
+               // if it's a hard-link and this is the last link, flag it
+               if ((fse->mode & FSE_MODE_HLINK) && fse->nlink == 0) {
+                   cur->mode |= FSE_MODE_LAST_HLINK;
+               }
+               if (cur->mode & FSE_TRUNCATED_PATH) {
+                       cur->flags |= KFSE_CONTAINS_DROPPED_EVENTS;
+                       cur->mode &= ~FSE_TRUNCATED_PATH;
+               }
                break;
            }
 
            case FSE_ARG_STRING:
-               kea->len      = (int16_t)(va_arg(ap, int32_t) & 0xffff);
-               kea->data.str = vfs_addname(va_arg(ap, char *), kea->len, 0, 0);
-               break;
-
-           case FSE_ARG_INT32:
-               kea->data.int32 = va_arg(ap, int32_t);
-               break;
-
-           case FSE_ARG_INT64:
-               printf("fs_events: 64-bit args not implemented.\n");
-//             kea->data.int64 = va_arg(ap, int64_t);
-               break;
+               if (kfse->str != NULL) {
+                   cur = kfse_dest;
+               }
 
-           case FSE_ARG_RAW:
-               kea->len = (int16_t)(va_arg(ap, int32_t) & 0xffff);
-               MALLOC(kea->data.ptr, void *, kea->len, M_TEMP, M_WAITOK);
-               memcpy(kea->data.ptr, va_arg(ap, void *), kea->len);
+               cur->len = (int16_t)(va_arg(ap, int32_t) & 0x7fff);
+               if (cur->len >= 1) {
+                   cur->str = vfs_addname(va_arg(ap, char *), cur->len, 0, 0);
+               } else {
+                   printf("add_fsevent: funny looking string length: %d\n", (int)cur->len);
+                   cur->len = 2;
+                   cur->str = vfs_addname("/", cur->len, 0, 0);
+               }
+               if (cur->str[0] == 0) {
+                   printf("add_fsevent: bogus looking string (len %d)\n", cur->len);
+               }
                break;
 
-           case FSE_ARG_DEV:
-               kea->data.dev = dev = va_arg(ap, dev_t);
-               break;
-               
-           case FSE_ARG_MODE:
-               kea->data.mode = va_arg(ap, int32_t);
+           case FSE_ARG_INT32: {
+                   uint32_t ival = (uint32_t)va_arg(ap, int32_t);
+                   kfse->uid = (ino64_t)ival;
                break;
-               
-           case FSE_ARG_INO:
-               kea->data.ino = va_arg(ap, ino_t);
-               break;
-               
-           case FSE_ARG_UID:
-               kea->data.uid = va_arg(ap, uid_t);
-               break;
-               
-           case FSE_ARG_GID:
-               kea->data.gid = va_arg(ap, gid_t);
-               break;
-               
+           }
+                   
            default:
-               printf("add_fsevent: unknown type %d\n", kea->type);
+               printf("add_fsevent: unknown type %d\n", arg_type);
                // just skip one 32-bit word and hope we sync up...
                (void)va_arg(ap, int32_t);
        }
-    }
 
+done_with_args:
     va_end(ap);
 
+    OSBitAndAtomic16(~KFSE_BEING_CREATED, &kfse->flags);
+    if (kfse_dest) {
+       OSBitAndAtomic16(~KFSE_BEING_CREATED, &kfse_dest->flags);
+    }
+
     //
     // now we have to go and let everyone know that
-    // is interested in this type of event...
+    // is interested in this type of event
     //
-    lock_watch_list();
+    lock_watch_table();
     
-    SLIST_FOREACH(watcher, &watch_list_head, link) {
-       if (watcher->event_list[type] == FSE_REPORT && watcher_cares_about_dev(watcher, dev)) {
-           if (watcher_add_event(watcher, kfse) == 0) {
-               num_deliveries++;
+    for(i=0; i < MAX_WATCHERS; i++) {
+       watcher = watcher_table[i];
+       if (watcher == NULL) {
+           continue;
+       }
+       
+       if (   type < watcher->num_events
+           && watcher->event_list[type] == FSE_REPORT
+           && watcher_cares_about_dev(watcher, dev)) {
+           
+           if (watcher_add_event(watcher, kfse) != 0) {
+               watcher->num_dropped++;
+               continue;
            }
        }
+
+       // if (kfse->refcount < 1) {
+       //    panic("add_fsevent: line %d: kfse recount %d but should be at least 1\n", __LINE__, kfse->refcount);
+       // }
     }
 
-    unlock_watch_list();
-    
+    unlock_watch_table();
+
   clean_up:
-    // just in case no one was interested after all...
-    if (num_deliveries == 0) {
-       do_free_event(kfse);
-       free_event_idx = (int)(kfse - &fs_event_buf[0]);
-    }  
 
-    lck_rw_done(&fsevent_big_lock);
+    if (pathbuff) {
+       release_pathbuff(pathbuff);
+       pathbuff = NULL;
+    }
+
+    release_event_ref(kfse);
+
     return error;
 }
 
+
 static void
-do_free_event(kfs_event *kfse)
+release_event_ref(kfs_event *kfse)
 {
-    int i;
-    kfs_event_arg *kea, all_args[KFS_NUM_ARGS];
+    int old_refcount;
+    kfs_event copy, dest_copy;
     
-    lock_fs_event_buf();
     
-    // mark this fsevent as invalid
-    kfse->type = FSE_INVALID;
+    old_refcount = OSAddAtomic(-1, &kfse->refcount);
+    if (old_refcount > 1) {
+       return;
+    }
 
+    lock_fs_event_list();
+    if (last_event_ptr == kfse) {
+           last_event_ptr = NULL;
+           last_event_type = -1;
+           last_coalesced_time = 0;
+    }
+
+    if (kfse->refcount < 0) {
+       panic("release_event_ref: bogus kfse refcount %d\n", kfse->refcount);
+    }
+
+    if (kfse->refcount > 0 || kfse->type == FSE_INVALID) {
+       // This is very subtle.  Either of these conditions can
+       // be true if an event got recycled while we were waiting
+       // on the fs_event_list lock or the event got recycled,
+       // delivered, _and_ free'd by someone else while we were
+       // waiting on the fs event list lock.  In either case
+       // we need to just unlock the list and return without
+       // doing anything because if the refcount is > 0 then
+       // someone else will take care of free'ing it and when
+       // the kfse->type is invalid then someone else already
+       // has handled free'ing the event (while we were blocked
+       // on the event list lock).
+       //
+       unlock_fs_event_list();
+       return;
+    }
+
+    //
     // make a copy of this so we can free things without
     // holding the fs_event_buf lock
     //
-    memcpy(&all_args[0], &kfse->args[0], sizeof(all_args));
+    copy = *kfse;
+    if (kfse->dest && OSAddAtomic(-1, &kfse->dest->refcount) == 1) {
+       dest_copy = *kfse->dest;
+    } else {
+       dest_copy.str  = NULL;
+       dest_copy.len  = 0;
+       dest_copy.type = FSE_INVALID;
+    }
 
-    // and just to be anal, set this so that there are no args
-    kfse->args[0].type = FSE_ARG_DONE;
-    
-    free_event_idx = (kfse - fs_event_buf);
+    kfse->pid = kfse->type;             // save this off for debugging...
+    kfse->uid = (uid_t)(long)kfse->str;       // save this off for debugging... 
+    kfse->gid = (gid_t)(long)current_thread();
+
+    kfse->str = (char *)0xdeadbeef;             // XXXdbg - catch any cheaters...
+
+    if (dest_copy.type != FSE_INVALID) {
+       kfse->dest->str = (char *)0xbadc0de;   // XXXdbg - catch any cheaters...
+       kfse->dest->type = FSE_INVALID;
+
+       if (kfse->dest->kevent_list.le_prev != NULL) {
+           num_events_outstanding--;
+           LIST_REMOVE(kfse->dest, kevent_list);
+           memset(&kfse->dest->kevent_list, 0xa5, sizeof(kfse->dest->kevent_list));
+       }
 
-    unlock_fs_event_buf();
+       zfree(event_zone, kfse->dest);
+    }
+
+    // mark this fsevent as invalid
+    {
+       int otype;
+       
+       otype = kfse->type;
+    kfse->type = FSE_INVALID;
+
+    if (kfse->kevent_list.le_prev != NULL) {
+       num_events_outstanding--;
+       if (otype == FSE_RENAME) {
+           num_pending_rename--;
+       }
+       LIST_REMOVE(kfse, kevent_list);
+       memset(&kfse->kevent_list, 0, sizeof(kfse->kevent_list));
+    }
+    }
     
-    for(i=0; i < KFS_NUM_ARGS; i++) {
-       kea = &all_args[i];
-       if (kea->type == FSE_ARG_DONE) {
-           break;
+    zfree(event_zone, kfse);
+    
+    unlock_fs_event_list();
+    
+    // if we have a pointer in the union
+    if (copy.str && copy.type != FSE_DOCID_CHANGED) {
+       if (copy.len == 0) {    // and it's not a string
+           panic("%s:%d: no more fref.vp!\n", __FILE__, __LINE__);
+           // vnode_rele_ext(copy.fref.vp, O_EVTONLY, 0);
+       } else {                // else it's a string
+           vfs_removename(copy.str);
        }
+    }
 
-       switch(kea->type) {
-           case FSE_ARG_VNODE:
-               vnode_rele_ext(kea->data.vp, O_EVTONLY, 0);
-               break;
-           case FSE_ARG_STRING:
-               vfs_removename(kea->data.str);
-               break;
-           case FSE_ARG_RAW:
-               FREE(kea->data.ptr, M_TEMP);
-               break;
+    if (dest_copy.type != FSE_INVALID && dest_copy.str) {
+       if (dest_copy.len == 0) {
+           panic("%s:%d: no more fref.vp!\n", __FILE__, __LINE__);
+           // vnode_rele_ext(dest_copy.fref.vp, O_EVTONLY, 0);
+       } else {
+           vfs_removename(dest_copy.str);
        }
     }
 }
 
-
 static int
-add_watcher(int8_t *event_list, int32_t num_events, int32_t eventq_size, fs_event_watcher **watcher_out)
+add_watcher(int8_t *event_list, int32_t num_events, int32_t eventq_size, fs_event_watcher **watcher_out, void *fseh)
 {
     int               i;
     fs_event_watcher *watcher;
 
-    if (eventq_size < 0 || eventq_size > MAX_KFS_EVENTS) {
-       eventq_size = MAX_KFS_EVENTS;
+    if (eventq_size <= 0 || eventq_size > 100*max_kfs_events) {
+       eventq_size = max_kfs_events;
     }
 
     // Note: the event_queue follows the fs_event_watcher struct
@@ -531,10 +941,13 @@ add_watcher(int8_t *event_list, int32_t num_events, int32_t eventq_size, fs_even
           fs_event_watcher *,
           sizeof(fs_event_watcher) + eventq_size * sizeof(kfs_event *),
           M_TEMP, M_WAITOK);
+    if (watcher == NULL) {
+       return ENOMEM;
+    }
 
     watcher->event_list   = event_list;
     watcher->num_events   = num_events;
-    watcher->devices_to_watch = NULL;
+    watcher->devices_not_to_watch = NULL;
     watcher->num_devices  = 0;
     watcher->flags        = 0;
     watcher->event_queue  = (kfs_event **)&watcher[1];
@@ -542,8 +955,40 @@ add_watcher(int8_t *event_list, int32_t num_events, int32_t eventq_size, fs_even
     watcher->rd           = 0;
     watcher->wr           = 0;
     watcher->blockers     = 0;
+    watcher->num_readers  = 0;
+    watcher->max_event_id = 0;
+    watcher->fseh         = fseh;
+    watcher->pid          = proc_selfpid();
+    proc_selfname(watcher->proc_name, sizeof(watcher->proc_name));
+
+    watcher->num_dropped  = 0;      // XXXdbg - debugging
+
+    if (!strncmp(watcher->proc_name, "fseventsd", sizeof(watcher->proc_name)) ||
+       !strncmp(watcher->proc_name, "coreservicesd", sizeof(watcher->proc_name)) ||
+       !strncmp(watcher->proc_name, "mds", sizeof(watcher->proc_name))) {
+       watcher->flags |= WATCHER_APPLE_SYSTEM_SERVICE;
+    } else {
+      printf("fsevents: watcher %s (pid: %d) - Using /dev/fsevents directly is unsupported.  Migrate to FSEventsFramework\n",
+            watcher->proc_name, watcher->pid);
+    }
 
-    lock_watch_list();
+    lock_watch_table();
+
+    // find a slot for the new watcher
+    for(i=0; i < MAX_WATCHERS; i++) {
+       if (watcher_table[i] == NULL) {
+           watcher->my_id   = i;
+           watcher_table[i] = watcher;
+           break;
+       }
+    }
+
+    if (i >= MAX_WATCHERS) {
+       printf("fsevents: too many watchers!\n");
+       unlock_watch_table();
+       FREE(watcher, M_TEMP);
+       return ENOSPC;
+    }
 
     // now update the global list of who's interested in
     // events of a particular type...
@@ -553,96 +998,470 @@ add_watcher(int8_t *event_list, int32_t num_events, int32_t eventq_size, fs_even
        }
     }
 
-    SLIST_INSERT_HEAD(&watch_list_head, watcher, link);
-
-    unlock_watch_list();
+    unlock_watch_table();
 
     *watcher_out = watcher;
 
     return 0;
 }
 
+
+
 static void
 remove_watcher(fs_event_watcher *target)
 {
-    int i;
+    int i, j, counter=0;
     fs_event_watcher *watcher;
     kfs_event *kfse;
     
-    lck_rw_lock_shared(&fsevent_big_lock);
-
-    lock_watch_list();
+    lock_watch_table();
     
-    SLIST_FOREACH(watcher, &watch_list_head, link) {
-       if (watcher == target) {
-           SLIST_REMOVE(&watch_list_head, watcher, fs_event_watcher, link);
+    for(j=0; j < MAX_WATCHERS; j++) {
+       watcher = watcher_table[j];
+       if (watcher != target) {
+           continue;
+       }
 
-           for(i=0; i < watcher->num_events; i++) {
-               if (watcher->event_list[i] != FSE_IGNORE && i < FSE_MAX_EVENTS) {
-                   fs_event_type_watchers[i]--;
-               }
+       watcher_table[j] = NULL;
+
+       for(i=0; i < watcher->num_events; i++) {
+           if (watcher->event_list[i] != FSE_IGNORE && i < FSE_MAX_EVENTS) {
+               fs_event_type_watchers[i]--;
            }
+       }
+
+       if (watcher->flags & WATCHER_CLOSING) {
+           unlock_watch_table();
+           return;
+       }
 
-           unlock_watch_list();
+       // printf("fsevents: removing watcher %p (rd %d wr %d num_readers %d flags 0x%x)\n", watcher, watcher->rd, watcher->wr, watcher->num_readers, watcher->flags);
+       watcher->flags |= WATCHER_CLOSING;
+       OSAddAtomic(1, &watcher->num_readers);
+       
+       unlock_watch_table();
            
-           // drain the event_queue 
-           for(i=watcher->rd; i != watcher->wr; i=(i+1) % watcher->eventq_size) {
-               kfse = watcher->event_queue[i];
-               
-               if (OSAddAtomic(-1, (SInt32 *)&kfse->refcount) == 1) {
-                   do_free_event(kfse);
-               }
-           }
+       while (watcher->num_readers > 1 && counter++ < 5000) {
+           lock_watch_table();
+           fsevents_wakeup(watcher);      // in case they're asleep
+           unlock_watch_table();
            
-           if (watcher->event_list) {
-               FREE(watcher->event_list, M_TEMP);
-               watcher->event_list = NULL;
-           }
-           if (watcher->devices_to_watch) {
-               FREE(watcher->devices_to_watch, M_TEMP);
-               watcher->devices_to_watch = NULL;
+           tsleep(watcher, PRIBIO, "fsevents-close", 1);
+       }
+       if (counter++ >= 5000) {
+           // printf("fsevents: close: still have readers! (%d)\n", watcher->num_readers);
+           panic("fsevents: close: still have readers! (%d)\n", watcher->num_readers);
+       }
+
+       // drain the event_queue 
+
+       lck_rw_lock_exclusive(&event_handling_lock);
+       while(watcher->rd != watcher->wr) {
+           kfse = watcher->event_queue[watcher->rd];
+           watcher->event_queue[watcher->rd] = NULL;
+           watcher->rd = (watcher->rd+1) % watcher->eventq_size;
+           OSSynchronizeIO();
+           if (kfse != NULL && kfse->type != FSE_INVALID && kfse->refcount >= 1) {
+               release_event_ref(kfse);
            }
-           FREE(watcher, M_TEMP);
+       }
+       lck_rw_unlock_exclusive(&event_handling_lock);
+           
+       if (watcher->event_list) {
+           FREE(watcher->event_list, M_TEMP);
+           watcher->event_list = NULL;
+       }
+       if (watcher->devices_not_to_watch) {
+           FREE(watcher->devices_not_to_watch, M_TEMP);
+           watcher->devices_not_to_watch = NULL;
+       }
+       FREE(watcher, M_TEMP);
 
-           lck_rw_done(&fsevent_big_lock);
-           return;
+       return;
+    }
+
+    unlock_watch_table();
+}
+
+
+#define EVENT_DELAY_IN_MS   10
+static thread_call_t event_delivery_timer = NULL;
+static int timer_set = 0;
+
+
+static void
+delayed_event_delivery(__unused void *param0, __unused void *param1)
+{
+    int i;
+    
+    lock_watch_table();
+
+    for(i=0; i < MAX_WATCHERS; i++) {
+       if (watcher_table[i] != NULL && watcher_table[i]->rd != watcher_table[i]->wr) {
+           fsevents_wakeup(watcher_table[i]);
        }
     }
 
-    unlock_watch_list();
-    lck_rw_done(&fsevent_big_lock);
+    timer_set = 0;
+
+    unlock_watch_table();
+}
+
+
+//
+// The watch table must be locked before calling this function.
+//
+static void
+schedule_event_wakeup(void)
+{
+    uint64_t deadline;
+    
+    if (event_delivery_timer == NULL) {
+       event_delivery_timer = thread_call_allocate((thread_call_func_t)delayed_event_delivery, NULL);
+    }
+
+    clock_interval_to_deadline(EVENT_DELAY_IN_MS, 1000 * 1000, &deadline);
+    
+    thread_call_enter_delayed(event_delivery_timer, deadline);
+    timer_set = 1;
 }
 
 
+
+#define MAX_NUM_PENDING  16
+
+//
+// NOTE: the watch table must be locked before calling
+//       this routine.
+//
 static int
 watcher_add_event(fs_event_watcher *watcher, kfs_event *kfse)
 {
+    if (kfse->abstime > watcher->max_event_id) {
+       watcher->max_event_id = kfse->abstime;
+    }
+
     if (((watcher->wr + 1) % watcher->eventq_size) == watcher->rd) {
        watcher->flags |= WATCHER_DROPPED_EVENTS;
-       wakeup((caddr_t)watcher);
+       fsevents_wakeup(watcher);
        return ENOSPC;
     }
 
+    OSAddAtomic(1, &kfse->refcount);
     watcher->event_queue[watcher->wr] = kfse;
-    OSAddAtomic(1, (SInt32 *)&kfse->refcount);
+    OSSynchronizeIO();
     watcher->wr = (watcher->wr + 1) % watcher->eventq_size;
+
+    //
+    // wake up the watcher if there are more than MAX_NUM_PENDING events.
+    // otherwise schedule a timer (if one isn't already set) which will 
+    // send any pending events if no more are received in the next 
+    // EVENT_DELAY_IN_MS milli-seconds.
+    //
+    int32_t num_pending = 0;
+    if (watcher->rd < watcher->wr) {
+      num_pending = watcher->wr - watcher->rd;
+    }
     
-    // wake up the watcher if he's waiting!
-    wakeup((caddr_t)watcher);
+    if (watcher->rd > watcher->wr) {
+      num_pending = watcher->wr + watcher->eventq_size - watcher->rd;
+    }
+    
+    if (num_pending > (watcher->eventq_size*3/4) && !(watcher->flags & WATCHER_APPLE_SYSTEM_SERVICE)) {
+      /* Non-Apple Service is falling behind, start dropping events for this process */
+      lck_rw_lock_exclusive(&event_handling_lock);             
+      while (watcher->rd != watcher->wr) {
+       kfse = watcher->event_queue[watcher->rd];
+       watcher->event_queue[watcher->rd] = NULL;               
+       watcher->rd = (watcher->rd+1) % watcher->eventq_size;
+       OSSynchronizeIO();
+       if (kfse != NULL && kfse->type != FSE_INVALID && kfse->refcount >= 1) {
+         release_event_ref(kfse);
+       }
+      }
+      watcher->flags |= WATCHER_DROPPED_EVENTS;
+      lck_rw_unlock_exclusive(&event_handling_lock);
+
+      printf("fsevents: watcher falling behind: %s (pid: %d) rd: %4d wr: %4d q_size: %4d flags: 0x%x\n",
+            watcher->proc_name, watcher->pid, watcher->rd, watcher->wr,
+            watcher->eventq_size, watcher->flags);
+
+      fsevents_wakeup(watcher);
+    } else if (num_pending > MAX_NUM_PENDING) {
+      fsevents_wakeup(watcher);
+    } else if (timer_set == 0) {
+      schedule_event_wakeup();
+    } 
 
     return 0;
 }
 
+static int
+fill_buff(uint16_t type, int32_t size, const void *data,
+          char *buff, int32_t *_buff_idx, int32_t buff_sz,
+          struct uio *uio)
+{
+    int32_t amt, error = 0, buff_idx = *_buff_idx;
+    uint16_t tmp;
+    
+    //
+    // the +1 on the size is to guarantee that the main data
+    // copy loop will always copy at least 1 byte
+    //
+    if ((buff_sz - buff_idx) <= (int)(2*sizeof(uint16_t) + 1)) {
+       if (buff_idx > uio_resid(uio)) {
+           error = ENOSPC;
+           goto get_out;
+       }
+
+       error = uiomove(buff, buff_idx, uio);
+       if (error) {
+           goto get_out;
+       }
+       buff_idx = 0;
+    }
+
+    // copy out the header (type & size)
+    memcpy(&buff[buff_idx], &type, sizeof(uint16_t));
+    buff_idx += sizeof(uint16_t);
+    
+    tmp = size & 0xffff;
+    memcpy(&buff[buff_idx], &tmp, sizeof(uint16_t));
+    buff_idx += sizeof(uint16_t);
+    
+    // now copy the body of the data, flushing along the way 
+    // if the buffer fills up.
+    //
+    while(size > 0) {
+       amt = (size < (buff_sz - buff_idx)) ? size : (buff_sz - buff_idx);
+       memcpy(&buff[buff_idx], data, amt);
+
+       size -= amt;
+       buff_idx += amt;
+       data = (const char *)data + amt;
+       if (size > (buff_sz - buff_idx)) {
+           if (buff_idx > uio_resid(uio)) {
+               error = ENOSPC;
+               goto get_out;
+           }
+           error = uiomove(buff, buff_idx, uio);
+           if (error) {
+               goto get_out;
+           }
+           buff_idx = 0;
+       }
+
+       if (amt == 0) {   // just in case...
+           break;
+       }
+    }
+
+  get_out:
+    *_buff_idx = buff_idx;
+    
+    return error;
+}
+
+
+static int copy_out_kfse(fs_event_watcher *watcher, kfs_event *kfse, struct uio *uio)  __attribute__((noinline));
+
+static int
+copy_out_kfse(fs_event_watcher *watcher, kfs_event *kfse, struct uio *uio)
+{
+    int      error;
+    uint16_t tmp16;
+    int32_t  type;
+    kfs_event *cur;
+    char     evbuff[512];
+    int      evbuff_idx = 0;
+
+    if (kfse->type == FSE_INVALID) {
+       panic("fsevents: copy_out_kfse: asked to copy out an invalid event (kfse %p, refcount %d fref ptr %p)\n", kfse, kfse->refcount, kfse->str);
+    }
+
+    if (kfse->flags & KFSE_BEING_CREATED) {
+       return 0;
+    }
+
+    if (kfse->type == FSE_RENAME && kfse->dest == NULL) {
+       //
+       // This can happen if an event gets recycled but we had a
+       // pointer to it in our event queue.  The event is the
+       // destination of a rename which we'll process separately
+       // (that is, another kfse points to this one so it's ok
+       // to skip this guy because we'll process it when we process
+       // the other one)
+       error = 0;
+       goto get_out;
+    }
+
+    if (watcher->flags & WATCHER_WANTS_EXTENDED_INFO) {
+
+       type = (kfse->type & 0xfff);
+
+       if (kfse->flags & KFSE_CONTAINS_DROPPED_EVENTS) {
+           type |= (FSE_CONTAINS_DROPPED_EVENTS << FSE_FLAG_SHIFT);
+       } else if (kfse->flags & KFSE_COMBINED_EVENTS) {
+           type |= (FSE_COMBINED_EVENTS << FSE_FLAG_SHIFT);
+       }
+
+    } else {
+       type = (int32_t)kfse->type;
+    }
+
+    // copy out the type of the event
+    memcpy(evbuff, &type, sizeof(int32_t));
+    evbuff_idx += sizeof(int32_t);
+
+    // copy out the pid of the person that generated the event
+    memcpy(&evbuff[evbuff_idx], &kfse->pid, sizeof(pid_t));
+    evbuff_idx += sizeof(pid_t);
+
+    cur = kfse;
+
+  copy_again:
+
+    if (kfse->type == FSE_DOCID_CHANGED || kfse->type == FSE_DOCID_CREATED) {
+       dev_t    dev  = cur->dev;
+       ino_t    ino  = cur->ino;
+       uint64_t ival;
+
+       error = fill_buff(FSE_ARG_DEV, sizeof(dev_t), &dev, evbuff, &evbuff_idx, sizeof(evbuff), uio);
+       if (error != 0) {
+           goto get_out;
+       }
+
+       error = fill_buff(FSE_ARG_INO, sizeof(ino_t), &ino, evbuff, &evbuff_idx, sizeof(evbuff), uio);
+       if (error != 0) {
+           goto get_out;
+       }
+
+       memcpy(&ino, &cur->str, sizeof(ino_t));
+       error = fill_buff(FSE_ARG_INO, sizeof(ino_t), &ino, evbuff, &evbuff_idx, sizeof(evbuff), uio);
+       if (error != 0) {
+           goto get_out;
+       }
+
+       memcpy(&ival, &cur->uid, sizeof(uint64_t));   // the docid gets stuffed into the ino field
+       error = fill_buff(FSE_ARG_INT64, sizeof(uint64_t), &ival, evbuff, &evbuff_idx, sizeof(evbuff), uio);
+       if (error != 0) {
+           goto get_out;
+       }
+
+       goto done;
+    }
+
+    if (cur->str == NULL || cur->str[0] == '\0') {
+       printf("copy_out_kfse:2: empty/short path (%s)\n", cur->str);
+       error = fill_buff(FSE_ARG_STRING, 2, "/", evbuff, &evbuff_idx, sizeof(evbuff), uio);
+    } else {
+       error = fill_buff(FSE_ARG_STRING, cur->len, cur->str, evbuff, &evbuff_idx, sizeof(evbuff), uio);
+    }
+    if (error != 0) {
+       goto get_out;
+    }
+
+    if (cur->dev == 0 && cur->ino == 0) {
+       // this happens when a rename event happens and the
+       // destination of the rename did not previously exist.
+       // it thus has no other file info so skip copying out
+       // the stuff below since it isn't initialized
+       goto done;
+    }
+
+    
+    if (watcher->flags & WATCHER_WANTS_COMPACT_EVENTS) {
+       int32_t finfo_size;
+       
+       finfo_size = sizeof(dev_t) + sizeof(ino64_t) + sizeof(int32_t) + sizeof(uid_t) + sizeof(gid_t);
+       error = fill_buff(FSE_ARG_FINFO, finfo_size, &cur->ino, evbuff, &evbuff_idx, sizeof(evbuff), uio);
+       if (error != 0) {
+           goto get_out;
+       }
+    } else {
+       ino_t ino;
+       
+       error = fill_buff(FSE_ARG_DEV, sizeof(dev_t), &cur->dev, evbuff, &evbuff_idx, sizeof(evbuff), uio);
+       if (error != 0) {
+           goto get_out;
+       }
+
+       ino = (ino_t)cur->ino;
+       error = fill_buff(FSE_ARG_INO, sizeof(ino_t), &ino, evbuff, &evbuff_idx, sizeof(evbuff), uio);
+       if (error != 0) {
+           goto get_out;
+       }
+
+       error = fill_buff(FSE_ARG_MODE, sizeof(int32_t), &cur->mode, evbuff, &evbuff_idx, sizeof(evbuff), uio);
+       if (error != 0) {
+           goto get_out;
+       }
+
+       error = fill_buff(FSE_ARG_UID, sizeof(uid_t), &cur->uid, evbuff, &evbuff_idx, sizeof(evbuff), uio);
+       if (error != 0) {
+           goto get_out;
+       }
+
+       error = fill_buff(FSE_ARG_GID, sizeof(gid_t), &cur->gid, evbuff, &evbuff_idx, sizeof(evbuff), uio);
+       if (error != 0) {
+           goto get_out;
+       }
+    }
+
+
+    if (cur->dest) {
+       cur = cur->dest;
+       goto copy_again;
+    }
+
+  done:
+    // very last thing: the time stamp
+    error = fill_buff(FSE_ARG_INT64, sizeof(uint64_t), &cur->abstime, evbuff, &evbuff_idx, sizeof(evbuff), uio);
+    if (error != 0) {
+       goto get_out;
+    }
+
+    // check if the FSE_ARG_DONE will fit
+    if (sizeof(uint16_t) > sizeof(evbuff) - evbuff_idx) {
+       if (evbuff_idx > uio_resid(uio)) {
+           error = ENOSPC;
+           goto get_out;
+       }
+       error = uiomove(evbuff, evbuff_idx, uio);
+       if (error) {
+           goto get_out;
+       }
+       evbuff_idx = 0;
+    }
+
+    tmp16 = FSE_ARG_DONE;
+    memcpy(&evbuff[evbuff_idx], &tmp16, sizeof(uint16_t));
+    evbuff_idx += sizeof(uint16_t);
+
+    // flush any remaining data in the buffer (and hopefully
+    // in most cases this is the only uiomove we'll do)
+    if (evbuff_idx > uio_resid(uio)) {
+       error = ENOSPC;
+    } else {
+       error = uiomove(evbuff, evbuff_idx, uio);
+    }
+
+  get_out:
+
+    return error;
+}
+
+
 
 static int
 fmod_watch(fs_event_watcher *watcher, struct uio *uio)
 {
-    int               i, error=0, last_full_event_resid;
+    int               error=0; 
+    user_ssize_t      last_full_event_resid;
     kfs_event        *kfse;
-    kfs_event_arg    *kea;
     uint16_t          tmp16;
+    int               skipped;
 
-    // LP64todo - fix this
     last_full_event_resid = uio_resid(uio);
 
     // need at least 2048 bytes of space (maxpathlen + 1 event buf)
@@ -650,19 +1469,31 @@ fmod_watch(fs_event_watcher *watcher, struct uio *uio)
        return EINVAL;
     }
 
+    if (watcher->flags & WATCHER_CLOSING) {
+       return 0;
+    }
 
+    if (OSAddAtomic(1, &watcher->num_readers) != 0) {
+       // don't allow multiple threads to read from the fd at the same time
+       OSAddAtomic(-1, &watcher->num_readers);
+       return EAGAIN;
+    }
+
+ restart_watch:
     if (watcher->rd == watcher->wr) {
        if (watcher->flags & WATCHER_CLOSING) {
+           OSAddAtomic(-1, &watcher->num_readers);
            return 0;
        }
-       OSAddAtomic(1, (SInt32 *)&watcher->blockers);
+       OSAddAtomic(1, &watcher->blockers);
     
        // there's nothing to do, go to sleep
        error = tsleep((caddr_t)watcher, PUSER|PCATCH, "fsevents_empty", 0);
 
-       OSAddAtomic(-1, (SInt32 *)&watcher->blockers);
+       OSAddAtomic(-1, &watcher->blockers);
 
        if (error != 0 || (watcher->flags & WATCHER_CLOSING)) {
+           OSAddAtomic(-1, &watcher->num_readers);
            return error;
        }
     }
@@ -678,178 +1509,84 @@ fmod_watch(fs_event_watcher *watcher, struct uio *uio)
            
            tmp16 = FSE_ARG_DONE;  // makes it a consistent msg
            error = uiomove((caddr_t)&tmp16, sizeof(int16_t), uio);
+
+           last_full_event_resid = uio_resid(uio);
        } 
 
        if (error) {
+           OSAddAtomic(-1, &watcher->num_readers);
            return error;
        }
        
        watcher->flags &= ~WATCHER_DROPPED_EVENTS;
     }
 
-// check if the next chunk of data will fit in the user's
-// buffer.  if not, just goto get_out which will return
-// the number of bytes worth of events that we did read.
-// this leaves the event that didn't fit in the queue.
-//    
-       // LP64todo - fix this
-#define CHECK_UPTR(size) if (size > (unsigned)uio_resid(uio)) { \
-                            uio_setresid(uio, last_full_event_resid); \
-                            goto get_out; \
-                         }
+    skipped = 0;
 
-    for (; uio_resid(uio) > 0 && watcher->rd != watcher->wr; ) {
-       kfse = watcher->event_queue[watcher->rd];
-
-       // copy out the type of the event
-       CHECK_UPTR(sizeof(int32_t));
-       if ((error = uiomove((caddr_t)&kfse->type, sizeof(int32_t), uio)) != 0) {
-           goto get_out;
+    lck_rw_lock_shared(&event_handling_lock);
+    while (uio_resid(uio) > 0 && watcher->rd != watcher->wr) {
+       if (watcher->flags & WATCHER_CLOSING) {
+           break;
        }
-
-       // now copy out the pid of the person that changed the file
-       CHECK_UPTR(sizeof(pid_t));
-       if ((error = uiomove((caddr_t)&kfse->pid, sizeof(pid_t), uio)) != 0) {
-           goto get_out;
+       
+       //
+       // check if the event is something of interest to us
+       // (since it may have been recycled/reused and changed
+       // its type or which device it is for)
+       //
+       kfse = watcher->event_queue[watcher->rd];
+       if (!kfse || kfse->type == FSE_INVALID || kfse->type >= watcher->num_events || kfse->refcount < 1) {
+         break;
        }
 
-       error = 0;
-       for(i=0; i < KFS_NUM_ARGS && error == 0; i++) {
-           char    *pathbuff;
-           int      pathbuff_len;
+       if (watcher->event_list[kfse->type] == FSE_REPORT && watcher_cares_about_dev(watcher, kfse->dev)) {
 
-           kea = &kfse->args[i];
+         if (!(watcher->flags & WATCHER_APPLE_SYSTEM_SERVICE) && kfse->type != FSE_DOCID_CHANGED && is_ignored_directory(kfse->str)) {
+           // If this is not an Apple System Service, skip specified directories
+           // radar://12034844
+           error = 0;
+           skipped = 1;
+         } else {
 
-           tmp16 = (uint16_t)kea->type;
-           CHECK_UPTR(sizeof(uint16_t));
-           error = uiomove((caddr_t)&tmp16, sizeof(uint16_t), uio);
-           if (error || kea->type == FSE_ARG_DONE) {
-               break;
+           skipped = 0;
+           if (last_event_ptr == kfse) {
+               last_event_ptr = NULL;
+               last_event_type = -1;
+               last_coalesced_time = 0;
            }
-
-           switch(kea->type) {
-               case FSE_ARG_VNODE:
-                   pathbuff = get_pathbuff();
-                   pathbuff_len = MAXPATHLEN;
-                   if (kea->data.vp == NULL) {
-                       printf("fmod_watch: whoa... vp == NULL (%d)!\n", kfse->type);
-                       i--;
-                       release_pathbuff(pathbuff);
-                       continue;
-                   }
-                   
-                   if (vn_getpath(kea->data.vp, pathbuff, &pathbuff_len) != 0 || pathbuff[0] == '\0') {
-//                     printf("fmod_watch: vn_getpath failed! vp 0x%x vname 0x%x (%s) vparent 0x%x\n",
-//                            kea->data.vp,
-//                            VNAME(kea->data.vp),
-//                            VNAME(kea->data.vp) ? VNAME(kea->data.vp) : "<null>",
-//                            VPARENT(kea->data.vp));
-                   }
-                   CHECK_UPTR(sizeof(uint16_t));
-                   tmp16 = (uint16_t)pathbuff_len;
-                   error = uiomove((caddr_t)&tmp16, sizeof(uint16_t), uio);
-
-                   CHECK_UPTR((unsigned)pathbuff_len);
-                   error = uiomove((caddr_t)pathbuff, pathbuff_len, uio);
-                   release_pathbuff(pathbuff);
-                   break;
-                   
-
-               case FSE_ARG_STRING:
-                   tmp16 = (int32_t)kea->len;
-                   CHECK_UPTR(sizeof(uint16_t));
-                   error = uiomove((caddr_t)&tmp16, sizeof(uint16_t), uio);
-
-                   CHECK_UPTR(kea->len);
-                   error = uiomove((caddr_t)kea->data.str, kea->len, uio);
-                   break;
-
-               case FSE_ARG_INT32:
-                   CHECK_UPTR(sizeof(uint16_t) + sizeof(int32_t));
-                   tmp16 = sizeof(int32_t);
-                   error = uiomove((caddr_t)&tmp16, sizeof(uint16_t), uio);
-                   error = uiomove((caddr_t)&kea->data.int32, sizeof(int32_t), uio);
-                   break;
-
-               case FSE_ARG_INT64:
-                   printf("fs_events: 64-bit args not implemented on copyout.\n");
-//                 CHECK_UPTR(sizeof(uint16_t) + sizeof(int64_t));
-//                 tmp16 = sizeof(int64_t);
-//                 error = uiomove((caddr_t)&tmp16, sizeof(uint16_t), uio);
-//                 error = uiomove((caddr_t)&kea->data.int64, sizeof(int64_t), uio);
-                   break;
-
-               case FSE_ARG_RAW:
-                   tmp16 = (uint16_t)kea->len;
-                   CHECK_UPTR(sizeof(uint16_t));
-                   error = uiomove((caddr_t)&tmp16, sizeof(uint16_t), uio);
-
-                   CHECK_UPTR(kea->len);
-                   error = uiomove((caddr_t)kea->data.ptr, kea->len, uio);
-                   break;
-
-               case FSE_ARG_DEV:
-                   CHECK_UPTR(sizeof(uint16_t) + sizeof(dev_t));
-                   tmp16 = sizeof(dev_t);
-                   error = uiomove((caddr_t)&tmp16, sizeof(uint16_t), uio);
-                   error = uiomove((caddr_t)&kea->data.dev, sizeof(dev_t), uio);
-                   break;
-
-               case FSE_ARG_INO:
-                   CHECK_UPTR(sizeof(uint16_t) + sizeof(ino_t));
-                   tmp16 = sizeof(ino_t);
-                   error = uiomove((caddr_t)&tmp16, sizeof(uint16_t), uio);
-                   error = uiomove((caddr_t)&kea->data.ino, sizeof(ino_t), uio);
-                   break;
-
-               case FSE_ARG_MODE:
-                   // XXXdbg - NOTE: we use 32-bits for the mode, not
-                   //                16-bits like a real mode_t
-                   CHECK_UPTR(sizeof(uint16_t) + sizeof(int32_t));
-                   tmp16 = sizeof(int32_t);
-                   error = uiomove((caddr_t)&tmp16, sizeof(uint16_t), uio);
-                   error = uiomove((caddr_t)&kea->data.mode, sizeof(int32_t), uio);
-                   break;
-
-               case FSE_ARG_UID:
-                   CHECK_UPTR(sizeof(uint16_t) + sizeof(uid_t));
-                   tmp16 = sizeof(uid_t);
-                   error = uiomove((caddr_t)&tmp16, sizeof(uint16_t), uio);
-                   error = uiomove((caddr_t)&kea->data.uid, sizeof(uid_t), uio);
-                   break;
-
-               case FSE_ARG_GID:
-                   CHECK_UPTR(sizeof(uint16_t) + sizeof(gid_t));
-                   tmp16 = sizeof(gid_t);
-                   error = uiomove((caddr_t)&tmp16, sizeof(uint16_t), uio);
-                   error = uiomove((caddr_t)&kea->data.gid, sizeof(gid_t), uio);
-                   break;
-
-               default:
-                   printf("fmod_watch: unknown arg type %d.\n", kea->type);
-                   break;
+           error = copy_out_kfse(watcher, kfse, uio);
+           if (error != 0) {
+               // if an event won't fit or encountered an error while
+               // we were copying it out, then backup to the last full
+               // event and just bail out.  if the error was ENOENT
+               // then we can continue regular processing, otherwise
+               // we should unlock things and return.
+               uio_setresid(uio, last_full_event_resid);
+               if (error != ENOENT) {
+                   lck_rw_unlock_shared(&event_handling_lock);
+                   error = 0;
+                   goto get_out;
+               }
            }
-       }
 
-       // make sure that we always end with a FSE_ARG_DONE
-       if (i >= KFS_NUM_ARGS) {
-           tmp16 = FSE_ARG_DONE;
-           CHECK_UPTR(sizeof(uint16_t));
-           error = uiomove((caddr_t)&tmp16, sizeof(uint16_t), uio);
+           last_full_event_resid = uio_resid(uio);
+         }
        }
-       
 
-       // LP64todo - fix this
-       last_full_event_resid = uio_resid(uio);
-       
+       watcher->event_queue[watcher->rd] = NULL;
        watcher->rd = (watcher->rd + 1) % watcher->eventq_size;
-           
-       if (OSAddAtomic(-1, (SInt32 *)&kfse->refcount) == 1) {
-           do_free_event(kfse);
-       }
+       OSSynchronizeIO();
+       release_event_ref(kfse);
+    }
+    lck_rw_unlock_shared(&event_handling_lock);
+
+    if (skipped && error == 0) {
+      goto restart_watch;
     }
 
   get_out:
+    OSAddAtomic(-1, &watcher->num_readers);
+
     return error;
 }
 
@@ -859,65 +1596,13 @@ fmod_watch(fs_event_watcher *watcher, struct uio *uio)
 // unmounted).
 //
 // since we don't want to lose the events we'll convert the
-// vnode refs to the full path, inode #, and uid.
+// vnode refs to full paths.
 //
 void
-fsevent_unmount(struct mount *mp)
+fsevent_unmount(__unused struct mount *mp)
 {
-    int            i, j;
-    kfs_event     *kfse;
-    kfs_event_arg *kea;
-    
-    lck_rw_lock_exclusive(&fsevent_big_lock);
-    lock_fs_event_buf();
-    
-    for(i=0; i < MAX_KFS_EVENTS; i++) {
-       if (fs_event_buf[i].type == FSE_INVALID) {
-           continue;
-       }
-
-       kfse = &fs_event_buf[i];
-       for(j=0; j < KFS_NUM_ARGS; j++) {
-           kea = &kfse->args[j];
-           if (kea->type == FSE_ARG_DONE) {
-               break;
-           }
-
-           if (kea->type == FSE_ARG_VNODE && kea->data.vp->v_mount == mp) {
-               struct vnode *vp;
-               char         *pathbuff;
-               int           pathbuff_len;
-
-               vp = kea->data.vp;
-               pathbuff = get_pathbuff();
-               pathbuff_len = MAXPATHLEN;
-                   
-               if (vn_getpath(vp, pathbuff, &pathbuff_len) != 0 || pathbuff[0] == '\0') {
-                       char *vname;
-
-                       vname = vnode_getname(vp);
-
-                       printf("fsevent_unmount: vn_getpath failed! vp 0x%x vname 0x%x (%s) vparent 0x%x\n",
-                              vp, vname, vname ? vname : "<null>", vp->v_parent);
-
-                       if (vname)
-                               vnode_putname(vname);
-               }
-
-               // switch the type of the string
-               kea->type     = FSE_ARG_STRING;
-               kea->data.str = vfs_addname(pathbuff, pathbuff_len, 0, 0);
-               kea->len      = pathbuff_len;
-               release_pathbuff(pathbuff);
-
-               // and finally let go of the reference on the vnode
-               vnode_rele_ext(vp, O_EVTONLY, 0);
-           }
-       }
-    }
-
-    unlock_fs_event_buf();
-    lck_rw_done(&fsevent_big_lock);
+    // we no longer maintain pointers to vnodes so
+    // there is nothing to do... 
 }
 
 
@@ -925,18 +1610,20 @@ fsevent_unmount(struct mount *mp)
 // /dev/fsevents device code
 //
 static int fsevents_installed = 0;
-static struct lock__bsd__ fsevents_lck;
 
 typedef struct fsevent_handle {
+    UInt32            flags;
+    SInt32            active;
     fs_event_watcher *watcher;
+    struct klist      knotes;
     struct selinfo    si;
 } fsevent_handle;
 
+#define FSEH_CLOSING   0x0001
 
 static int
 fseventsf_read(struct fileproc *fp, struct uio *uio,
-               __unused kauth_cred_t *cred, __unused int flags,
-               __unused struct proc *p)
+              __unused int flags, __unused vfs_context_t ctx)
 {
     fsevent_handle *fseh = (struct fsevent_handle *)fp->f_fglob->fg_data;
     int error;
@@ -946,31 +1633,87 @@ fseventsf_read(struct fileproc *fp, struct uio *uio,
     return error;
 }
 
+
 static int
 fseventsf_write(__unused struct fileproc *fp, __unused struct uio *uio,
-               __unused kauth_cred_t *cred, __unused int flags,
-               __unused struct proc *p)
+               __unused int flags, __unused vfs_context_t ctx)
 {
     return EIO;
 }
 
+#pragma pack(push, 4)
+typedef struct fsevent_dev_filter_args32 {
+    uint32_t            num_devices;
+    user32_addr_t       devices;
+} fsevent_dev_filter_args32;
+typedef struct fsevent_dev_filter_args64 {
+    uint32_t            num_devices;
+    user64_addr_t       devices;
+} fsevent_dev_filter_args64;
+#pragma pack(pop)
+
+#define        FSEVENTS_DEVICE_FILTER_32       _IOW('s', 100, fsevent_dev_filter_args32)
+#define        FSEVENTS_DEVICE_FILTER_64       _IOW('s', 100, fsevent_dev_filter_args64)
 
 static int
-fseventsf_ioctl(struct fileproc *fp, u_long cmd, caddr_t data, struct proc *p)
+fseventsf_ioctl(struct fileproc *fp, u_long cmd, caddr_t data, vfs_context_t ctx)
 {
     fsevent_handle *fseh = (struct fsevent_handle *)fp->f_fglob->fg_data;
     int ret = 0;
-    pid_t pid = 0;
-    fsevent_dev_filter_args *devfilt_args=(fsevent_dev_filter_args *)data;
+    fsevent_dev_filter_args64 *devfilt_args, _devfilt_args;
+
+    OSAddAtomic(1, &fseh->active);
+    if (fseh->flags & FSEH_CLOSING) {
+       OSAddAtomic(-1, &fseh->active);
+       return 0;
+    }
 
     switch (cmd) {
        case FIONBIO:
        case FIOASYNC:
-           return 0;
+           break;
+
+       case FSEVENTS_WANT_COMPACT_EVENTS: {
+           fseh->watcher->flags |= WATCHER_WANTS_COMPACT_EVENTS;
+           break;
+       }
+
+       case FSEVENTS_WANT_EXTENDED_INFO: {
+           fseh->watcher->flags |= WATCHER_WANTS_EXTENDED_INFO;
+           break;
+       }
+
+       case FSEVENTS_GET_CURRENT_ID: {
+               *(uint64_t *)data = fseh->watcher->max_event_id;
+               ret = 0;
+               break;
+       }
+
+       case FSEVENTS_DEVICE_FILTER_32: {
+           if (proc_is64bit(vfs_context_proc(ctx))) {
+                   ret = EINVAL;
+                   break;
+           }
+           fsevent_dev_filter_args32 *devfilt_args32 = (fsevent_dev_filter_args32 *)data;
+
+           devfilt_args = &_devfilt_args;
+           memset(devfilt_args, 0, sizeof(fsevent_dev_filter_args64));
+           devfilt_args->num_devices = devfilt_args32->num_devices;
+           devfilt_args->devices     = CAST_USER_ADDR_T(devfilt_args32->devices);
+           goto handle_dev_filter;
+       }
+
+       case FSEVENTS_DEVICE_FILTER_64:
+           if (!proc_is64bit(vfs_context_proc(ctx))) {
+                   ret = EINVAL;
+                   break;
+           }
+           devfilt_args = (fsevent_dev_filter_args64 *)data;
 
-       case FSEVENTS_DEVICE_FILTER: {
+       handle_dev_filter:
+       {
            int new_num_devices;
-           dev_t *devices_to_watch, *tmp=NULL;
+           dev_t *devices_not_to_watch, *tmp=NULL;
            
            if (devfilt_args->num_devices > 256) {
                ret = EINVAL;
@@ -979,12 +1722,12 @@ fseventsf_ioctl(struct fileproc *fp, u_long cmd, caddr_t data, struct proc *p)
            
            new_num_devices = devfilt_args->num_devices;
            if (new_num_devices == 0) {
-               tmp = fseh->watcher->devices_to_watch;
+               tmp = fseh->watcher->devices_not_to_watch;
 
-               lock_watch_list();
-               fseh->watcher->devices_to_watch = NULL;
+               lock_watch_table();
+               fseh->watcher->devices_not_to_watch = NULL;
                fseh->watcher->num_devices = new_num_devices;
-               unlock_watch_list();
+               unlock_watch_table();
 
                if (tmp) {
                    FREE(tmp, M_TEMP);
@@ -992,27 +1735,27 @@ fseventsf_ioctl(struct fileproc *fp, u_long cmd, caddr_t data, struct proc *p)
                break;
            }
 
-           MALLOC(devices_to_watch, dev_t *,
+           MALLOC(devices_not_to_watch, dev_t *,
                   new_num_devices * sizeof(dev_t),
                   M_TEMP, M_WAITOK);
-           if (devices_to_watch == NULL) {
+           if (devices_not_to_watch == NULL) {
                ret = ENOMEM;
                break;
            }
     
-           ret = copyin(CAST_USER_ADDR_T(devfilt_args->devices),
-                        (void *)devices_to_watch,
+           ret = copyin(devfilt_args->devices,
+                        (void *)devices_not_to_watch,
                         new_num_devices * sizeof(dev_t));
            if (ret) {
-               FREE(devices_to_watch, M_TEMP);
+               FREE(devices_not_to_watch, M_TEMP);
                break;
            }
 
-           lock_watch_list();
+           lock_watch_table();
            fseh->watcher->num_devices = new_num_devices;
-           tmp = fseh->watcher->devices_to_watch;
-           fseh->watcher->devices_to_watch = devices_to_watch;
-           unlock_watch_list();
+           tmp = fseh->watcher->devices_not_to_watch;
+           fseh->watcher->devices_not_to_watch = devices_not_to_watch;
+           unlock_watch_table();
 
            if (tmp) {
                FREE(tmp, M_TEMP);
@@ -1026,12 +1769,13 @@ fseventsf_ioctl(struct fileproc *fp, u_long cmd, caddr_t data, struct proc *p)
            break;
     }
 
+    OSAddAtomic(-1, &fseh->active);
     return (ret);
 }
 
 
 static int
-fseventsf_select(struct fileproc *fp, int which, void *wql, struct proc *p)
+fseventsf_select(struct fileproc *fp, int which, __unused void *wql, vfs_context_t ctx)
 {
     fsevent_handle *fseh = (struct fsevent_handle *)fp->f_fglob->fg_data;
     int ready = 0;
@@ -1042,51 +1786,142 @@ fseventsf_select(struct fileproc *fp, int which, void *wql, struct proc *p)
 
 
     // if there's nothing in the queue, we're not ready
-    if (fseh->watcher->rd == fseh->watcher->wr) {
-       ready = 0;
-    } else {
+    if (fseh->watcher->rd != fseh->watcher->wr) {
        ready = 1;
     }
 
     if (!ready) {
-       selrecord(p, &fseh->si, wql);
+       selrecord(vfs_context_proc(ctx), &fseh->si, wql);
     }
 
     return ready;
 }
 
 
+#if NOTUSED
 static int
-fseventsf_stat(struct fileproc *fp, struct stat *sb, struct proc *p)
+fseventsf_stat(__unused struct fileproc *fp, __unused struct stat *sb, __unused vfs_context_t ctx)
 {
     return ENOTSUP;
 }
-
+#endif
 
 static int
-fseventsf_close(struct fileglob *fg, struct proc *p)
+fseventsf_close(struct fileglob *fg, __unused vfs_context_t ctx)
 {
     fsevent_handle *fseh = (struct fsevent_handle *)fg->fg_data;
+    fs_event_watcher *watcher;
 
-    remove_watcher(fseh->watcher);
+    OSBitOrAtomic(FSEH_CLOSING, &fseh->flags);
+    while (OSAddAtomic(0, &fseh->active) > 0) {
+       tsleep((caddr_t)fseh->watcher, PRIBIO, "fsevents-close", 1);
+    }
 
+    watcher = fseh->watcher;
     fg->fg_data = NULL;
     fseh->watcher = NULL;
+
+    remove_watcher(watcher);
     FREE(fseh, M_TEMP);
 
     return 0;
 }
 
-int
-fseventsf_kqfilter(struct fileproc *fp, struct knote *kn, struct proc *p)
+static void
+filt_fsevent_detach(struct knote *kn)
+{
+       fsevent_handle *fseh = (struct fsevent_handle *)kn->kn_hook;
+
+       lock_watch_table();
+
+       KNOTE_DETACH(&fseh->knotes, kn);
+       
+       unlock_watch_table();
+}
+
+/* 
+ * Determine whether this knote should be active
+ * 
+ * This is kind of subtle.  
+ *     --First, notice if the vnode has been revoked: in so, override hint
+ *     --EVFILT_READ knotes are checked no matter what the hint is
+ *     --Other knotes activate based on hint.  
+ *     --If hint is revoke, set special flags and activate
+ */
+static int
+filt_fsevent(struct knote *kn, long hint)
+{
+       fsevent_handle *fseh = (struct fsevent_handle *)kn->kn_hook;
+       int activate = 0;
+       int32_t rd, wr, amt;
+
+       if (NOTE_REVOKE == hint) {
+               kn->kn_flags |= (EV_EOF | EV_ONESHOT);
+               activate = 1;
+       }
+
+       rd = fseh->watcher->rd;
+       wr = fseh->watcher->wr;
+       if (rd <= wr) {
+           amt = wr - rd;
+       } else {
+           amt = fseh->watcher->eventq_size - (rd - wr);
+       }
+
+       switch(kn->kn_filter) {
+               case EVFILT_READ:
+                       kn->kn_data = amt;
+                       
+                       if (kn->kn_data != 0) {
+                               activate = 1;
+                       }
+                       break;
+               case EVFILT_VNODE:
+                       /* Check events this note matches against the hint */
+                       if (kn->kn_sfflags & hint) {
+                               kn->kn_fflags |= hint; /* Set which event occurred */
+                       }
+                       if (kn->kn_fflags != 0) {
+                               activate = 1;
+                       }
+                       break;
+               default: {
+                       // nothing to do...
+                       break;
+               }
+       }
+
+       return (activate);
+}
+
+
+struct  filterops fsevent_filtops = { 
+       .f_isfd = 1, 
+       .f_attach = NULL, 
+       .f_detach = filt_fsevent_detach, 
+       .f_event = filt_fsevent
+};
+
+static int
+fseventsf_kqfilter(__unused struct fileproc *fp, __unused struct knote *kn, __unused vfs_context_t ctx)
 {
-    // XXXdbg
+    fsevent_handle *fseh = (struct fsevent_handle *)fp->f_fglob->fg_data;
+
+    kn->kn_hook = (void*)fseh;
+    kn->kn_hookid = 1;
+    kn->kn_fop = &fsevent_filtops;
+    
+    lock_watch_table();
+
+    KNOTE_ATTACH(&fseh->knotes, kn);
+
+    unlock_watch_table();
     return 0;
 }
 
 
 static int
-fseventsf_drain(struct fileproc *fp, struct proc *p)
+fseventsf_drain(struct fileproc *fp, __unused vfs_context_t ctx)
 {
     int counter = 0;
     fsevent_handle *fseh = (struct fsevent_handle *)fp->f_fglob->fg_data;
@@ -1104,7 +1939,9 @@ fseventsf_drain(struct fileproc *fp, struct proc *p)
         // and decision to tsleep in fmod_watch... this bit of 
         // latency is a decent tradeoff against not having to
         // take and drop a lock in fmod_watch
-       wakeup((caddr_t)fseh->watcher);
+       lock_watch_table();
+       fsevents_wakeup(fseh->watcher);
+       unlock_watch_table();
 
        tsleep((caddr_t)fseh->watcher, PRIBIO, "watcher-close", 1);
     }
@@ -1114,9 +1951,9 @@ fseventsf_drain(struct fileproc *fp, struct proc *p)
 
 
 static int
-fseventsopen(dev_t dev, int flag, int mode, struct proc *p)
+fseventsopen(__unused dev_t dev, __unused int flag, __unused int mode, __unused struct proc *p)
 {
-    if (!is_suser()) {
+    if (!kauth_cred_issuser(kauth_cred_get())) {
        return EPERM;
     }
     
@@ -1124,25 +1961,193 @@ fseventsopen(dev_t dev, int flag, int mode, struct proc *p)
 }
 
 static int
-fseventsclose(dev_t dev, int flag, int mode, struct proc *p)
+fseventsclose(__unused dev_t dev, __unused int flag, __unused int mode, __unused struct proc *p)
 {
     return 0;
 }
 
 static int
-fseventsread(dev_t dev, struct uio *uio, int ioflag)
+fseventsread(__unused dev_t dev, __unused struct uio *uio, __unused int ioflag)
 {
     return EIO;
 }
 
+
 static int
-fseventswrite(dev_t dev, struct uio *uio, int ioflag)
+parse_buffer_and_add_events(const char *buffer, int bufsize, vfs_context_t ctx, long *remainder)
 {
-    return EIO;
+    const fse_info *finfo, *dest_finfo;
+    const char *path, *ptr, *dest_path, *event_start=buffer;
+    int path_len, type, dest_path_len, err = 0;
+
+
+    ptr = buffer;
+    while ((ptr+sizeof(int)+sizeof(fse_info)+1) < buffer+bufsize) {
+       type = *(const int *)ptr;
+       if (type < 0 || type >= FSE_MAX_EVENTS) {
+           err = EINVAL;
+           break;
+       }
+
+       ptr += sizeof(int);
+       
+       finfo = (const fse_info *)ptr;
+       ptr += sizeof(fse_info);
+
+       path = ptr;
+       while(ptr < buffer+bufsize && *ptr != '\0') {
+           ptr++;
+       }
+
+       if (ptr >= buffer+bufsize) {
+           break;
+       }
+
+       ptr++;   // advance over the trailing '\0'
+
+       path_len = ptr - path;
+
+       if (type != FSE_RENAME && type != FSE_EXCHANGE) {
+           event_start = ptr;   // record where the next event starts
+
+           err = add_fsevent(type, ctx, FSE_ARG_STRING, path_len, path, FSE_ARG_FINFO, finfo, FSE_ARG_DONE);
+           if (err) {
+               break;
+           }
+           continue;
+       }
+
+       //
+       // if we're here we have to slurp up the destination finfo
+       // and path so that we can pass them to the add_fsevent()
+       // call.  basically it's a copy of the above code.
+       //
+       dest_finfo = (const fse_info *)ptr;
+       ptr += sizeof(fse_info);
+
+       dest_path = ptr;
+       while(ptr < buffer+bufsize && *ptr != '\0') {
+           ptr++;
+       }
+
+       if (ptr >= buffer+bufsize) {
+           break;
+       }
+
+       ptr++;               // advance over the trailing '\0'
+       event_start = ptr;   // record where the next event starts
+
+       dest_path_len = ptr - dest_path;
+       //
+       // If the destination inode number is non-zero, generate a rename
+       // with both source and destination FSE_ARG_FINFO. Otherwise generate
+       // a rename with only one FSE_ARG_FINFO. If you need to inject an
+       // exchange with an inode of zero, just make that inode (and its path)
+       // come in as the first one, not the second.
+       //
+       if (dest_finfo->ino) {
+               err = add_fsevent(type, ctx,
+                                 FSE_ARG_STRING, path_len,      path,      FSE_ARG_FINFO, finfo,
+                                 FSE_ARG_STRING, dest_path_len, dest_path, FSE_ARG_FINFO, dest_finfo,
+                                 FSE_ARG_DONE);
+       } else {
+               err = add_fsevent(type, ctx,
+                                 FSE_ARG_STRING, path_len,      path,      FSE_ARG_FINFO, finfo,
+                                 FSE_ARG_STRING, dest_path_len, dest_path,
+                                 FSE_ARG_DONE);
+       }
+
+       if (err) {
+           break;
+       }
+
+    }
+
+    // if the last event wasn't complete, set the remainder
+    // to be the last event start boundary.
+    //
+    *remainder = (long)((buffer+bufsize) - event_start);
+
+    return err;
+}
+
+
+//
+// Note: this buffer size can not ever be less than
+//       2*MAXPATHLEN + 2*sizeof(fse_info) + sizeof(int)
+//       because that is the max size for a single event.
+//       I made it 4k to be a "nice" size.  making it
+//       smaller is not a good idea.
+//
+#define WRITE_BUFFER_SIZE  4096
+char *write_buffer=NULL;
+
+static int
+fseventswrite(__unused dev_t dev, struct uio *uio, __unused int ioflag)
+{
+    int error=0, count;
+    vfs_context_t ctx = vfs_context_current();
+    long offset=0, remainder;
+
+    lck_mtx_lock(&event_writer_lock);
+
+    if (write_buffer == NULL) {
+       if (kmem_alloc(kernel_map, (vm_offset_t *)&write_buffer, WRITE_BUFFER_SIZE, VM_KERN_MEMORY_FILE)) {
+           lck_mtx_unlock(&event_writer_lock);
+           return ENOMEM;
+       }
+    }
+
+    //
+    // this loop copies in and processes the events written.
+    // it takes care to copy in reasonable size chunks and
+    // process them.  if there is an event that spans a chunk
+    // boundary we're careful to copy those bytes down to the
+    // beginning of the buffer and read the next chunk in just
+    // after it.
+    //
+    while(uio_resid(uio)) {
+       if (uio_resid(uio) > (WRITE_BUFFER_SIZE-offset)) {
+           count = WRITE_BUFFER_SIZE - offset;
+       } else {
+           count = uio_resid(uio);
+       }
+
+       error = uiomove(write_buffer+offset, count, uio);
+       if (error) {
+           break;
+       }
+
+       // printf("fsevents: write: copied in %d bytes (offset: %ld)\n", count, offset);
+       error = parse_buffer_and_add_events(write_buffer, offset+count, ctx, &remainder);
+       if (error) {
+           break;
+       }           
+
+       //
+       // if there's any remainder, copy it down to the beginning
+       // of the buffer so that it will get processed the next time
+       // through the loop.  note that the remainder always starts
+       // at an event boundary.
+       //
+       if (remainder != 0) {
+           // printf("fsevents: write: an event spanned a %d byte boundary.  remainder: %ld\n",
+           //  WRITE_BUFFER_SIZE, remainder);
+           memmove(write_buffer, (write_buffer+count+offset) - remainder, remainder);
+           offset = remainder;
+       } else {
+           offset = 0;
+       }
+    }
+
+    lck_mtx_unlock(&event_writer_lock);
+
+    return error;
 }
 
 
-static struct fileops fsevents_fops = {
+static const struct fileops fsevents_fops = {
+    DTYPE_FSEVENTS,
     fseventsf_read,
     fseventsf_write,
     fseventsf_ioctl,
@@ -1152,32 +2157,79 @@ static struct fileops fsevents_fops = {
     fseventsf_drain
 };
 
+typedef struct fsevent_clone_args32 {
+    user32_addr_t       event_list;
+    int32_t             num_events;
+    int32_t             event_queue_depth;
+    user32_addr_t       fd;
+} fsevent_clone_args32;
 
+typedef struct fsevent_clone_args64 {
+    user64_addr_t       event_list;
+    int32_t             num_events;
+    int32_t             event_queue_depth;
+    user64_addr_t       fd;
+} fsevent_clone_args64;
+
+#define        FSEVENTS_CLONE_32       _IOW('s', 1, fsevent_clone_args32)
+#define        FSEVENTS_CLONE_64       _IOW('s', 1, fsevent_clone_args64)
 
 static int
-fseventsioctl(dev_t dev, u_long cmd, caddr_t data, int flag, struct proc *p)
+fseventsioctl(__unused dev_t dev, u_long cmd, caddr_t data, __unused int flag, struct proc *p)
 {
     struct fileproc *f;
     int fd, error;
     fsevent_handle *fseh = NULL;
-    fsevent_clone_args *fse_clone_args=(fsevent_clone_args *)data;
+    fsevent_clone_args64 *fse_clone_args, _fse_clone;
     int8_t *event_list;
+    int is64bit = proc_is64bit(p);
 
     switch (cmd) {
-       case FSEVENTS_CLONE:
+       case FSEVENTS_CLONE_32: {
+           if (is64bit) {
+                   return EINVAL;
+           }
+           fsevent_clone_args32 *args32 = (fsevent_clone_args32 *)data;
+
+           fse_clone_args = &_fse_clone;
+           memset(fse_clone_args, 0, sizeof(fsevent_clone_args64));
+
+           fse_clone_args->event_list        = CAST_USER_ADDR_T(args32->event_list);
+           fse_clone_args->num_events        = args32->num_events;
+           fse_clone_args->event_queue_depth = args32->event_queue_depth;
+           fse_clone_args->fd                = CAST_USER_ADDR_T(args32->fd);
+           goto handle_clone;
+       }
+
+       case FSEVENTS_CLONE_64:
+           if (!is64bit) {
+                   return EINVAL;
+           }
+           fse_clone_args = (fsevent_clone_args64 *)data;
+
+       handle_clone:
            if (fse_clone_args->num_events < 0 || fse_clone_args->num_events > 4096) {
                return EINVAL;
            }
 
            MALLOC(fseh, fsevent_handle *, sizeof(fsevent_handle),
                   M_TEMP, M_WAITOK);
+           if (fseh == NULL) {
+               return ENOMEM;
+           }
            memset(fseh, 0, sizeof(fsevent_handle));
+           
+           klist_init(&fseh->knotes);
 
            MALLOC(event_list, int8_t *,
                   fse_clone_args->num_events * sizeof(int8_t),
                   M_TEMP, M_WAITOK);
+           if (event_list == NULL) {
+               FREE(fseh, M_TEMP);
+               return ENOMEM;
+           }
     
-           error = copyin(CAST_USER_ADDR_T(fse_clone_args->event_list),
+           error = copyin(fse_clone_args->event_list,
                           (void *)event_list,
                           fse_clone_args->num_events * sizeof(int8_t));
            if (error) {
@@ -1189,30 +2241,37 @@ fseventsioctl(dev_t dev, u_long cmd, caddr_t data, int flag, struct proc *p)
            error = add_watcher(event_list,
                                fse_clone_args->num_events,
                                fse_clone_args->event_queue_depth,
-                               &fseh->watcher);
+                               &fseh->watcher,
+                               fseh);
            if (error) {
                FREE(event_list, M_TEMP);
                FREE(fseh, M_TEMP);
                return error;
            }
 
-           error = falloc(p, &f, &fd);
+           fseh->watcher->fseh = fseh;
+
+           error = falloc(p, &f, &fd, vfs_context_current());
            if (error) {
+               remove_watcher(fseh->watcher);
                FREE(event_list, M_TEMP);
                FREE(fseh, M_TEMP);
                return (error);
            }
            proc_fdlock(p);
            f->f_fglob->fg_flag = FREAD | FWRITE;
-           f->f_fglob->fg_type = DTYPE_FSEVENTS;
            f->f_fglob->fg_ops = &fsevents_fops;
            f->f_fglob->fg_data = (caddr_t) fseh;
-               proc_fdunlock(p);
-           copyout((void *)&fd, CAST_USER_ADDR_T(fse_clone_args->fd), sizeof(int32_t));
+           proc_fdunlock(p);
+           error = copyout((void *)&fd, fse_clone_args->fd, sizeof(int32_t));
+           if (error != 0) {
+               fp_free(p, fd, f);
+           } else {
                proc_fdlock(p);
-           *fdflags(p, fd) &= ~UF_RESERVED;
+               procfdtbl_releasefd(p, fd, NULL);
                fp_drop(p, fd, f, 1);
                proc_fdunlock(p);
+           }
            break;
 
        default:
@@ -1223,17 +2282,12 @@ fseventsioctl(dev_t dev, u_long cmd, caddr_t data, int flag, struct proc *p)
     return error;
 }
 
-static int
-fseventsselect(dev_t dev, int rw, struct proc *p)
-{
-    return 0;
-}
-
 static void
-fsevents_wakeup(fsevent_handle *fseh)
+fsevents_wakeup(fs_event_watcher *watcher)
 {
-    wakeup((caddr_t)fseh);
-    selwakeup(&fseh->si);
+    selwakeup(&watcher->fseh->si);
+    KNOTE(&watcher->fseh->knotes, NOTE_WRITE|NOTE_NONE);
+    wakeup((caddr_t)watcher);
 }
 
 
@@ -1248,8 +2302,8 @@ static struct cdevsw fsevents_cdevsw =
     fseventsread,              /* read */
     fseventswrite,             /* write */
     fseventsioctl,             /* ioctl */
-    nulldev,                   /* stop */
-    nulldev,                   /* reset */
+    (stop_fcn_t *)&nulldev,    /* stop */
+    (reset_fcn_t *)&nulldev,   /* reset */
     NULL,                      /* tty's */
     eno_select,                        /* select */
     eno_mmap,                  /* mmap */
@@ -1276,8 +2330,6 @@ fsevents_init(void)
 
     fsevents_installed = 1;
 
-    lockinit(&fsevents_lck, PLOCK, "fsevents", 0, 0);
-
     ret = cdevsw_add(-1, &fsevents_cdevsw);
     if (ret < 0) {
        fsevents_installed = 0;
@@ -1291,94 +2343,27 @@ fsevents_init(void)
 }
 
 
-
-//
-// XXXdbg - temporary path buffer handling
-//
-#define NUM_PATH_BUFFS  16
-static char path_buff[NUM_PATH_BUFFS][MAXPATHLEN];
-static char path_buff_inuse[NUM_PATH_BUFFS];
-
-static lck_grp_attr_t * pathbuff_group_attr;
-static lck_attr_t *     pathbuff_lock_attr;
-static lck_grp_t *      pathbuff_mutex_group;
-static lck_mtx_t        pathbuff_lock;
-
-static void
-init_pathbuff(void)
-{
-    pathbuff_lock_attr    = lck_attr_alloc_init();
-    pathbuff_group_attr   = lck_grp_attr_alloc_init();
-    pathbuff_mutex_group  = lck_grp_alloc_init("pathbuff-mutex", pathbuff_group_attr);
-
-    lck_mtx_init(&pathbuff_lock, pathbuff_mutex_group, pathbuff_lock_attr);
-}
-
-static void
-lock_pathbuff(void)
-{
-    lck_mtx_lock(&pathbuff_lock);
-}
-
-static void
-unlock_pathbuff(void)
-{
-    lck_mtx_unlock(&pathbuff_lock);
-}
-
-
 char *
 get_pathbuff(void)
 {
-    int i;
-
-    lock_pathbuff();
-    for(i=0; i < NUM_PATH_BUFFS; i++) {
-       if (path_buff_inuse[i] == 0) {
-           break;
-       }
-    }
-
-    if (i >= NUM_PATH_BUFFS) {
-       char *path;
-       
-       unlock_pathbuff();
-       MALLOC_ZONE(path, char *, MAXPATHLEN, M_NAMEI, M_WAITOK);
-       return path;
-    }
+    char *path;
 
-    path_buff_inuse[i] = 1;
-    unlock_pathbuff();
-    return &path_buff[i][0];
+    MALLOC_ZONE(path, char *, MAXPATHLEN, M_NAMEI, M_WAITOK);
+    return path;
 }
 
 void
 release_pathbuff(char *path)
 {
-    int i;
 
     if (path == NULL) {
        return;
     }
-
-    lock_pathbuff();
-    for(i=0; i < NUM_PATH_BUFFS; i++) {
-       if (path == &path_buff[i][0]) {
-           path_buff[i][0] = '\0';
-           path_buff_inuse[i] = 0;
-           unlock_pathbuff();
-           return;
-       }
-    }
-
-    unlock_pathbuff();
-
-    // if we get here then it wasn't one of our temp buffers
     FREE_ZONE(path, MAXPATHLEN, M_NAMEI);
 }
 
 int
-get_fse_info(struct vnode *vp, fse_info *fse, vfs_context_t ctx)
+get_fse_info(struct vnode *vp, fse_info *fse, __unused vfs_context_t ctx)
 {
     struct vnode_attr va;
 
@@ -1388,15 +2373,112 @@ get_fse_info(struct vnode *vp, fse_info *fse, vfs_context_t ctx)
     VATTR_WANTED(&va, va_mode);
     VATTR_WANTED(&va, va_uid);
     VATTR_WANTED(&va, va_gid);
-    if (vnode_getattr(vp, &va, ctx) != 0) {
+    if (vp->v_flag & VISHARDLINK) {
+       if (vp->v_type == VDIR) {
+           VATTR_WANTED(&va, va_dirlinkcount);
+       } else {
+           VATTR_WANTED(&va, va_nlink);
+       }
+    }
+    
+    if (vnode_getattr(vp, &va, vfs_context_kernel()) != 0) {
+       memset(fse, 0, sizeof(fse_info));
        return -1;
     }
+
+    return vnode_get_fse_info_from_vap(vp, fse, &va);
+}
+
+int
+vnode_get_fse_info_from_vap(vnode_t vp, fse_info *fse, struct vnode_attr *vap) 
+{
+    fse->ino  = (ino64_t)vap->va_fileid;
+    fse->dev  = (dev_t)vap->va_fsid;
+    fse->mode = (int32_t)vnode_vttoif(vnode_vtype(vp)) | vap->va_mode;
+    fse->uid  = (uid_t)vap->va_uid;
+    fse->gid  = (gid_t)vap->va_gid;
+    if (vp->v_flag & VISHARDLINK) {
+       fse->mode |= FSE_MODE_HLINK;
+       if (vp->v_type == VDIR) {
+           fse->nlink = (uint64_t)vap->va_dirlinkcount;
+       } else {
+           fse->nlink = (uint64_t)vap->va_nlink;
+       }
+    }    
+
+    return 0;
+}
+
+void
+create_fsevent_from_kevent(vnode_t vp, uint32_t kevents, struct vnode_attr *vap)
+{
+    int fsevent_type=FSE_CONTENT_MODIFIED, len;   // the default is the most pessimistic
+    char pathbuf[MAXPATHLEN];
+    fse_info fse;
+
     
-    fse->dev  = (dev_t)va.va_fsid;
-    fse->ino  = (ino_t)va.va_fileid;
-    fse->mode = (int32_t)vnode_vttoif(vnode_vtype(vp)) | va.va_mode;
-    fse->uid  = (uid_t)va.va_uid;
-    fse->gid  = (gid_t)va.va_gid;
+    if (kevents & VNODE_EVENT_DELETE) {
+        fsevent_type = FSE_DELETE;
+    } else if (kevents & (VNODE_EVENT_EXTEND|VNODE_EVENT_WRITE)) {
+       fsevent_type = FSE_CONTENT_MODIFIED;
+    } else if (kevents & VNODE_EVENT_LINK) {
+       fsevent_type = FSE_CREATE_FILE;
+    } else if (kevents & VNODE_EVENT_RENAME) {
+       fsevent_type = FSE_CREATE_FILE;    // XXXdbg - should use FSE_RENAME but we don't have the destination info;
+    } else if (kevents & (VNODE_EVENT_FILE_CREATED|VNODE_EVENT_FILE_REMOVED|VNODE_EVENT_DIR_CREATED|VNODE_EVENT_DIR_REMOVED)) {
+       fsevent_type = FSE_STAT_CHANGED;  // XXXdbg - because vp is a dir and the thing created/removed lived inside it
+    } else {   // a catch all for VNODE_EVENT_PERMS, VNODE_EVENT_ATTRIB and anything else
+        fsevent_type = FSE_STAT_CHANGED;
+    }
+
+    // printf("convert_kevent: kevents 0x%x fsevent type 0x%x (for %s)\n", kevents, fsevent_type, vp->v_name ? vp->v_name : "(no-name)");
+
+    fse.dev = vap->va_fsid;
+    fse.ino = vap->va_fileid;
+    fse.mode = vnode_vttoif(vnode_vtype(vp)) | (uint32_t)vap->va_mode;
+    if (vp->v_flag & VISHARDLINK) {
+       fse.mode |= FSE_MODE_HLINK;
+       if (vp->v_type == VDIR) {
+           fse.nlink = vap->va_dirlinkcount;
+       } else {
+           fse.nlink = vap->va_nlink;
+       }
+    }
+
+    if (vp->v_type == VDIR) {
+       fse.mode |= FSE_REMOTE_DIR_EVENT;       
+    }
     
-    return 0;
+
+    fse.uid = vap->va_uid;
+    fse.gid = vap->va_gid;
+
+    len = sizeof(pathbuf);
+    if (vn_getpath(vp, pathbuf, &len) == 0) {
+       add_fsevent(fsevent_type, vfs_context_current(), FSE_ARG_STRING, len, pathbuf, FSE_ARG_FINFO, &fse, FSE_ARG_DONE);
+    }
+    return;
+}
+
+#else /* CONFIG_FSE */
+/*
+ * The get_pathbuff and release_pathbuff routines are used in places not
+ * related to fsevents, and it's a handy abstraction, so define trivial
+ * versions that don't cache a pool of buffers.  This way, we don't have
+ * to conditionalize the callers, and they still get the advantage of the
+ * pool of buffers if CONFIG_FSE is turned on.
+ */
+char *
+get_pathbuff(void)
+{
+       char *path;
+       MALLOC_ZONE(path, char *, MAXPATHLEN, M_NAMEI, M_WAITOK);
+       return path;
+}
+
+void
+release_pathbuff(char *path)
+{
+       FREE_ZONE(path, MAXPATHLEN, M_NAMEI);
 }
+#endif /* CONFIG_FSE */