Merge branch 'for-linus' of git://git.kernel.org/pub/scm/linux/kernel/git/kyle/parisc-2.6
[linux-2.6] / fs / eventfd.c
1 /*
2  *  fs/eventfd.c
3  *
4  *  Copyright (C) 2007  Davide Libenzi <davidel@xmailserver.org>
5  *
6  */
7
8 #include <linux/file.h>
9 #include <linux/poll.h>
10 #include <linux/init.h>
11 #include <linux/fs.h>
12 #include <linux/sched.h>
13 #include <linux/kernel.h>
14 #include <linux/list.h>
15 #include <linux/spinlock.h>
16 #include <linux/anon_inodes.h>
17 #include <linux/syscalls.h>
18 #include <linux/module.h>
19 #include <linux/kref.h>
20 #include <linux/eventfd.h>
21
22 struct eventfd_ctx {
23         struct kref kref;
24         wait_queue_head_t wqh;
25         /*
26          * Every time that a write(2) is performed on an eventfd, the
27          * value of the __u64 being written is added to "count" and a
28          * wakeup is performed on "wqh". A read(2) will return the "count"
29          * value to userspace, and will reset "count" to zero. The kernel
30          * side eventfd_signal() also, adds to the "count" counter and
31          * issue a wakeup.
32          */
33         __u64 count;
34         unsigned int flags;
35 };
36
37 /**
38  * eventfd_signal - Adds @n to the eventfd counter.
39  * @ctx: [in] Pointer to the eventfd context.
40  * @n: [in] Value of the counter to be added to the eventfd internal counter.
41  *          The value cannot be negative.
42  *
43  * This function is supposed to be called by the kernel in paths that do not
44  * allow sleeping. In this function we allow the counter to reach the ULLONG_MAX
45  * value, and we signal this as overflow condition by returining a POLLERR
46  * to poll(2).
47  *
48  * Returns @n in case of success, a non-negative number lower than @n in case
49  * of overflow, or the following error codes:
50  *
51  * -EINVAL    : The value of @n is negative.
52  */
53 int eventfd_signal(struct eventfd_ctx *ctx, int n)
54 {
55         unsigned long flags;
56
57         if (n < 0)
58                 return -EINVAL;
59         spin_lock_irqsave(&ctx->wqh.lock, flags);
60         if (ULLONG_MAX - ctx->count < n)
61                 n = (int) (ULLONG_MAX - ctx->count);
62         ctx->count += n;
63         if (waitqueue_active(&ctx->wqh))
64                 wake_up_locked_poll(&ctx->wqh, POLLIN);
65         spin_unlock_irqrestore(&ctx->wqh.lock, flags);
66
67         return n;
68 }
69 EXPORT_SYMBOL_GPL(eventfd_signal);
70
71 static void eventfd_free(struct kref *kref)
72 {
73         struct eventfd_ctx *ctx = container_of(kref, struct eventfd_ctx, kref);
74
75         kfree(ctx);
76 }
77
78 /**
79  * eventfd_ctx_get - Acquires a reference to the internal eventfd context.
80  * @ctx: [in] Pointer to the eventfd context.
81  *
82  * Returns: In case of success, returns a pointer to the eventfd context.
83  */
84 struct eventfd_ctx *eventfd_ctx_get(struct eventfd_ctx *ctx)
85 {
86         kref_get(&ctx->kref);
87         return ctx;
88 }
89 EXPORT_SYMBOL_GPL(eventfd_ctx_get);
90
91 /**
92  * eventfd_ctx_put - Releases a reference to the internal eventfd context.
93  * @ctx: [in] Pointer to eventfd context.
94  *
95  * The eventfd context reference must have been previously acquired either
96  * with eventfd_ctx_get() or eventfd_ctx_fdget()).
97  */
98 void eventfd_ctx_put(struct eventfd_ctx *ctx)
99 {
100         kref_put(&ctx->kref, eventfd_free);
101 }
102 EXPORT_SYMBOL_GPL(eventfd_ctx_put);
103
104 static int eventfd_release(struct inode *inode, struct file *file)
105 {
106         struct eventfd_ctx *ctx = file->private_data;
107
108         wake_up_poll(&ctx->wqh, POLLHUP);
109         eventfd_ctx_put(ctx);
110         return 0;
111 }
112
113 static unsigned int eventfd_poll(struct file *file, poll_table *wait)
114 {
115         struct eventfd_ctx *ctx = file->private_data;
116         unsigned int events = 0;
117         unsigned long flags;
118
119         poll_wait(file, &ctx->wqh, wait);
120
121         spin_lock_irqsave(&ctx->wqh.lock, flags);
122         if (ctx->count > 0)
123                 events |= POLLIN;
124         if (ctx->count == ULLONG_MAX)
125                 events |= POLLERR;
126         if (ULLONG_MAX - 1 > ctx->count)
127                 events |= POLLOUT;
128         spin_unlock_irqrestore(&ctx->wqh.lock, flags);
129
130         return events;
131 }
132
133 static ssize_t eventfd_read(struct file *file, char __user *buf, size_t count,
134                             loff_t *ppos)
135 {
136         struct eventfd_ctx *ctx = file->private_data;
137         ssize_t res;
138         __u64 ucnt = 0;
139         DECLARE_WAITQUEUE(wait, current);
140
141         if (count < sizeof(ucnt))
142                 return -EINVAL;
143         spin_lock_irq(&ctx->wqh.lock);
144         res = -EAGAIN;
145         if (ctx->count > 0)
146                 res = sizeof(ucnt);
147         else if (!(file->f_flags & O_NONBLOCK)) {
148                 __add_wait_queue(&ctx->wqh, &wait);
149                 for (res = 0;;) {
150                         set_current_state(TASK_INTERRUPTIBLE);
151                         if (ctx->count > 0) {
152                                 res = sizeof(ucnt);
153                                 break;
154                         }
155                         if (signal_pending(current)) {
156                                 res = -ERESTARTSYS;
157                                 break;
158                         }
159                         spin_unlock_irq(&ctx->wqh.lock);
160                         schedule();
161                         spin_lock_irq(&ctx->wqh.lock);
162                 }
163                 __remove_wait_queue(&ctx->wqh, &wait);
164                 __set_current_state(TASK_RUNNING);
165         }
166         if (likely(res > 0)) {
167                 ucnt = (ctx->flags & EFD_SEMAPHORE) ? 1 : ctx->count;
168                 ctx->count -= ucnt;
169                 if (waitqueue_active(&ctx->wqh))
170                         wake_up_locked_poll(&ctx->wqh, POLLOUT);
171         }
172         spin_unlock_irq(&ctx->wqh.lock);
173         if (res > 0 && put_user(ucnt, (__u64 __user *) buf))
174                 return -EFAULT;
175
176         return res;
177 }
178
179 static ssize_t eventfd_write(struct file *file, const char __user *buf, size_t count,
180                              loff_t *ppos)
181 {
182         struct eventfd_ctx *ctx = file->private_data;
183         ssize_t res;
184         __u64 ucnt;
185         DECLARE_WAITQUEUE(wait, current);
186
187         if (count < sizeof(ucnt))
188                 return -EINVAL;
189         if (copy_from_user(&ucnt, buf, sizeof(ucnt)))
190                 return -EFAULT;
191         if (ucnt == ULLONG_MAX)
192                 return -EINVAL;
193         spin_lock_irq(&ctx->wqh.lock);
194         res = -EAGAIN;
195         if (ULLONG_MAX - ctx->count > ucnt)
196                 res = sizeof(ucnt);
197         else if (!(file->f_flags & O_NONBLOCK)) {
198                 __add_wait_queue(&ctx->wqh, &wait);
199                 for (res = 0;;) {
200                         set_current_state(TASK_INTERRUPTIBLE);
201                         if (ULLONG_MAX - ctx->count > ucnt) {
202                                 res = sizeof(ucnt);
203                                 break;
204                         }
205                         if (signal_pending(current)) {
206                                 res = -ERESTARTSYS;
207                                 break;
208                         }
209                         spin_unlock_irq(&ctx->wqh.lock);
210                         schedule();
211                         spin_lock_irq(&ctx->wqh.lock);
212                 }
213                 __remove_wait_queue(&ctx->wqh, &wait);
214                 __set_current_state(TASK_RUNNING);
215         }
216         if (likely(res > 0)) {
217                 ctx->count += ucnt;
218                 if (waitqueue_active(&ctx->wqh))
219                         wake_up_locked_poll(&ctx->wqh, POLLIN);
220         }
221         spin_unlock_irq(&ctx->wqh.lock);
222
223         return res;
224 }
225
226 static const struct file_operations eventfd_fops = {
227         .release        = eventfd_release,
228         .poll           = eventfd_poll,
229         .read           = eventfd_read,
230         .write          = eventfd_write,
231 };
232
233 /**
234  * eventfd_fget - Acquire a reference of an eventfd file descriptor.
235  * @fd: [in] Eventfd file descriptor.
236  *
237  * Returns a pointer to the eventfd file structure in case of success, or the
238  * following error pointer:
239  *
240  * -EBADF    : Invalid @fd file descriptor.
241  * -EINVAL   : The @fd file descriptor is not an eventfd file.
242  */
243 struct file *eventfd_fget(int fd)
244 {
245         struct file *file;
246
247         file = fget(fd);
248         if (!file)
249                 return ERR_PTR(-EBADF);
250         if (file->f_op != &eventfd_fops) {
251                 fput(file);
252                 return ERR_PTR(-EINVAL);
253         }
254
255         return file;
256 }
257 EXPORT_SYMBOL_GPL(eventfd_fget);
258
259 /**
260  * eventfd_ctx_fdget - Acquires a reference to the internal eventfd context.
261  * @fd: [in] Eventfd file descriptor.
262  *
263  * Returns a pointer to the internal eventfd context, otherwise the error
264  * pointers returned by the following functions:
265  *
266  * eventfd_fget
267  */
268 struct eventfd_ctx *eventfd_ctx_fdget(int fd)
269 {
270         struct file *file;
271         struct eventfd_ctx *ctx;
272
273         file = eventfd_fget(fd);
274         if (IS_ERR(file))
275                 return (struct eventfd_ctx *) file;
276         ctx = eventfd_ctx_get(file->private_data);
277         fput(file);
278
279         return ctx;
280 }
281 EXPORT_SYMBOL_GPL(eventfd_ctx_fdget);
282
283 /**
284  * eventfd_ctx_fileget - Acquires a reference to the internal eventfd context.
285  * @file: [in] Eventfd file pointer.
286  *
287  * Returns a pointer to the internal eventfd context, otherwise the error
288  * pointer:
289  *
290  * -EINVAL   : The @fd file descriptor is not an eventfd file.
291  */
292 struct eventfd_ctx *eventfd_ctx_fileget(struct file *file)
293 {
294         if (file->f_op != &eventfd_fops)
295                 return ERR_PTR(-EINVAL);
296
297         return eventfd_ctx_get(file->private_data);
298 }
299 EXPORT_SYMBOL_GPL(eventfd_ctx_fileget);
300
301 SYSCALL_DEFINE2(eventfd2, unsigned int, count, int, flags)
302 {
303         int fd;
304         struct eventfd_ctx *ctx;
305
306         /* Check the EFD_* constants for consistency.  */
307         BUILD_BUG_ON(EFD_CLOEXEC != O_CLOEXEC);
308         BUILD_BUG_ON(EFD_NONBLOCK != O_NONBLOCK);
309
310         if (flags & ~EFD_FLAGS_SET)
311                 return -EINVAL;
312
313         ctx = kmalloc(sizeof(*ctx), GFP_KERNEL);
314         if (!ctx)
315                 return -ENOMEM;
316
317         kref_init(&ctx->kref);
318         init_waitqueue_head(&ctx->wqh);
319         ctx->count = count;
320         ctx->flags = flags;
321
322         /*
323          * When we call this, the initialization must be complete, since
324          * anon_inode_getfd() will install the fd.
325          */
326         fd = anon_inode_getfd("[eventfd]", &eventfd_fops, ctx,
327                               flags & EFD_SHARED_FCNTL_FLAGS);
328         if (fd < 0)
329                 kfree(ctx);
330         return fd;
331 }
332
333 SYSCALL_DEFINE1(eventfd, unsigned int, count)
334 {
335         return sys_eventfd2(count, 0);
336 }
337