(monitor) ( path recursive? mailbox -- monitor )
File system change monitors

Prev:	next-change ( monitor -- change )
Next:	File system change descriptors

Vocabulary
io.monitors

Inputs

path	a pathname string
recursive?	a boolean
mailbox	a mailbox

Outputs

monitor

a new monitor

Generic word contract
Opens a file system change monitor which listens for changes on path and posts notifications to mailbox as triples with shape { path changed monitor } . The boolean indicates whether changes in subdirectories should be reported.

Errors
Throws an error if the pathname does not exist, if a monitor could not be created or if the platform does not support monitors.

Definition

USING: io.backend ;

IN: io.monitors

HOOK: (monitor) io-backend
    ( path recursive? mailbox -- monitor )

Methods

USING: accessors arrays core-foundation.fsevents io.backend
io.monitors io.monitors.macosx kernel system ;

M:: macosx (monitor) ( path recursive? mailbox -- monitor )
    path normalize-path :> path path mailbox macosx-monitor
    new-monitor dup [ enqueue-notifications ] curry
    path 1array 0 kFSEventStreamCreateFlagFileEvents
    <event-stream> >>handle ;