X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=package.lisp;h=f67fc85d8a5bb137ac20b0e3c3d8e79c35417135;hb=f11c5cad2d9ffd566b6e1f3d1ffb6d7cf7c7e855;hp=ebdba145360b94c53ff94c6b47abf998e3cfafd5;hpb=93ba5119bfc762cd2b811897b5a17ac07f6ec547;p=cl-inotify.git

diff --git a/package.lisp b/package.lisp
index ebdba14..f67fc85 100644
--- a/package.lisp
+++ b/package.lisp
@@ -1,33 +1,36 @@
-;;; -*- mode: lisp; syntax: common-lisp; coding: utf-8; package: cl-user; -*-
+;;; -*- mode: lisp; syntax: common-lisp; coding: utf-8-unix; package: cl-user; -*-
 
-;; Copyright (c) 2011, Olof-Joachim Frahm
+;; Copyright (c) 2011-12, Olof-Joachim Frahm
 ;; All rights reserved.
 
 ;; Redistribution and use in source and binary forms, with or without
-;; modification, are permitted provided that the following conditions are met:
-;;     * Redistributions of source code must retain the above copyright
-;;       notice, this list of conditions and the following disclaimer.
-;;     * Redistributions in binary form must reproduce the above copyright
-;;       notice, this list of conditions and the following disclaimer in the
-;;       documentation and/or other materials provided with the distribution.
-;;     * The name of the author may not be used to endorse or promote products
-;;       derived from this software without specific prior written permission.
-
-;; THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
-;; AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
-;; IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
-;; ARE DISCLAIMED. IN NO EVENT SHALL <COPYRIGHT HOLDER> BE LIABLE FOR ANY
-;; DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
-;; (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES;
-;; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND
-;; ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
-;; (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
-;; THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+;; modification, are permitted provided that the following conditions
+;; are met:
+
+;; 1. Redistributions of source code must retain the above copyright
+;; notice, this list of conditions and the following disclaimer.
+
+;; 2. Redistributions in binary form must reproduce the above copyright
+;; notice, this list of conditions and the following disclaimer in the
+;; documentation and/or other materials provided with the distribution.
+
+;; THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
+;; "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
+;; LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
+;; A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
+;; OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
+;; SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
+;; LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
+;; DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
+;; THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
+;; (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
+;; OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 
 (in-package #:cl-user)
 
 (defpackage cl-inotify
   (:use #:cl #:cffi)
+  (:import-from #:osicat-posix #:defsyscall)
   (:export ;;; used types for documentation
 	   #:inotify-add/read-flag
 	   #:inotify-read-flag
@@ -36,14 +39,26 @@
 	   ;;; very raw
 	   #:read-raw-event-from-stream
 
+	   ;;; basic stuff
 	   #:close-inotify
 
+	   ;;; inotify accessors
+	   #:inotify-fd
+	   #:inotify-stream
+	   #:inotify-nonblocking
+
 	   ;;; event parsing functions
 	   #:make-unregistered-inotify
 	   #:read-event-from-stream
 	   #:watch-raw
 	   #:unwatch-raw
 
+	   ;;; event accessors
+	   #:inotify-event-wd
+	   #:inotify-event-mask
+	   #:inotify-event-cookie
+	   #:inotify-event-name
+
 	   ;;; enhanced functionality
 	   #:make-inotify
 	   #:pathname-handle/flags
@@ -57,5 +72,9 @@
 	   ;;; convenience functions
 	   #:list-watched
 	   #:do-events
-	   #:next-events)
+	   #:next-events
+
+	   ;;; macros
+	   #:with-inotify
+	   #:with-unregistered-inotify)
   (:documentation "A binding (not only?) for the LINUX inotify(7) API."))