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/signal.h>
13 #include <linux/kernel.h>
14 #include <linux/slab.h>
15 #include <linux/list.h>
16 #include <linux/spinlock.h>
17 #include <linux/anon_inodes.h>
18 #include <linux/syscalls.h>
19 #include <linux/export.h>
20 #include <linux/kref.h>
21 #include <linux/eventfd.h>
22 #include <linux/proc_fs.h>
23 #include <linux/seq_file.h>
24 
25 struct eventfd_ctx {
26 	struct kref kref;
27 	wait_queue_head_t wqh;
28 	/*
29 	 * Every time that a write(2) is performed on an eventfd, the
30 	 * value of the __u64 being written is added to "count" and a
31 	 * wakeup is performed on "wqh". A read(2) will return the "count"
32 	 * value to userspace, and will reset "count" to zero. The kernel
33 	 * side eventfd_signal() also, adds to the "count" counter and
34 	 * issue a wakeup.
35 	 */
36 	__u64 count;
37 	unsigned int flags;
38 };
39 
40 /**
41  * eventfd_signal - Adds @n to the eventfd counter.
42  * @ctx: [in] Pointer to the eventfd context.
43  * @n: [in] Value of the counter to be added to the eventfd internal counter.
44  *          The value cannot be negative.
45  *
46  * This function is supposed to be called by the kernel in paths that do not
47  * allow sleeping. In this function we allow the counter to reach the ULLONG_MAX
48  * value, and we signal this as overflow condition by returning a EPOLLERR
49  * to poll(2).
50  *
51  * Returns the amount by which the counter was incremented.  This will be less
52  * than @n if the counter has overflowed.
53  */
eventfd_signal(struct eventfd_ctx * ctx,__u64 n)54 __u64 eventfd_signal(struct eventfd_ctx *ctx, __u64 n)
55 {
56 	unsigned long flags;
57 
58 	spin_lock_irqsave(&ctx->wqh.lock, flags);
59 	if (ULLONG_MAX - ctx->count < n)
60 		n = ULLONG_MAX - ctx->count;
61 	ctx->count += n;
62 	if (waitqueue_active(&ctx->wqh))
63 		wake_up_locked_poll(&ctx->wqh, EPOLLIN);
64 	spin_unlock_irqrestore(&ctx->wqh.lock, flags);
65 
66 	return n;
67 }
68 EXPORT_SYMBOL_GPL(eventfd_signal);
69 
eventfd_free_ctx(struct eventfd_ctx * ctx)70 static void eventfd_free_ctx(struct eventfd_ctx *ctx)
71 {
72 	kfree(ctx);
73 }
74 
eventfd_free(struct kref * kref)75 static void eventfd_free(struct kref *kref)
76 {
77 	struct eventfd_ctx *ctx = container_of(kref, struct eventfd_ctx, kref);
78 
79 	eventfd_free_ctx(ctx);
80 }
81 
82 /**
83  * eventfd_ctx_put - Releases a reference to the internal eventfd context.
84  * @ctx: [in] Pointer to eventfd context.
85  *
86  * The eventfd context reference must have been previously acquired either
87  * with eventfd_ctx_fdget() or eventfd_ctx_fileget().
88  */
eventfd_ctx_put(struct eventfd_ctx * ctx)89 void eventfd_ctx_put(struct eventfd_ctx *ctx)
90 {
91 	kref_put(&ctx->kref, eventfd_free);
92 }
93 EXPORT_SYMBOL_GPL(eventfd_ctx_put);
94 
eventfd_release(struct inode * inode,struct file * file)95 static int eventfd_release(struct inode *inode, struct file *file)
96 {
97 	struct eventfd_ctx *ctx = file->private_data;
98 
99 	wake_up_poll(&ctx->wqh, EPOLLHUP);
100 	eventfd_ctx_put(ctx);
101 	return 0;
102 }
103 
eventfd_poll(struct file * file,poll_table * wait)104 static __poll_t eventfd_poll(struct file *file, poll_table *wait)
105 {
106 	struct eventfd_ctx *ctx = file->private_data;
107 	__poll_t events = 0;
108 	u64 count;
109 
110 	poll_wait(file, &ctx->wqh, wait);
111 
112 	/*
113 	 * All writes to ctx->count occur within ctx->wqh.lock.  This read
114 	 * can be done outside ctx->wqh.lock because we know that poll_wait
115 	 * takes that lock (through add_wait_queue) if our caller will sleep.
116 	 *
117 	 * The read _can_ therefore seep into add_wait_queue's critical
118 	 * section, but cannot move above it!  add_wait_queue's spin_lock acts
119 	 * as an acquire barrier and ensures that the read be ordered properly
120 	 * against the writes.  The following CAN happen and is safe:
121 	 *
122 	 *     poll                               write
123 	 *     -----------------                  ------------
124 	 *     lock ctx->wqh.lock (in poll_wait)
125 	 *     count = ctx->count
126 	 *     __add_wait_queue
127 	 *     unlock ctx->wqh.lock
128 	 *                                        lock ctx->qwh.lock
129 	 *                                        ctx->count += n
130 	 *                                        if (waitqueue_active)
131 	 *                                          wake_up_locked_poll
132 	 *                                        unlock ctx->qwh.lock
133 	 *     eventfd_poll returns 0
134 	 *
135 	 * but the following, which would miss a wakeup, cannot happen:
136 	 *
137 	 *     poll                               write
138 	 *     -----------------                  ------------
139 	 *     count = ctx->count (INVALID!)
140 	 *                                        lock ctx->qwh.lock
141 	 *                                        ctx->count += n
142 	 *                                        **waitqueue_active is false**
143 	 *                                        **no wake_up_locked_poll!**
144 	 *                                        unlock ctx->qwh.lock
145 	 *     lock ctx->wqh.lock (in poll_wait)
146 	 *     __add_wait_queue
147 	 *     unlock ctx->wqh.lock
148 	 *     eventfd_poll returns 0
149 	 */
150 	count = READ_ONCE(ctx->count);
151 
152 	if (count > 0)
153 		events |= EPOLLIN;
154 	if (count == ULLONG_MAX)
155 		events |= EPOLLERR;
156 	if (ULLONG_MAX - 1 > count)
157 		events |= EPOLLOUT;
158 
159 	return events;
160 }
161 
eventfd_ctx_do_read(struct eventfd_ctx * ctx,__u64 * cnt)162 static void eventfd_ctx_do_read(struct eventfd_ctx *ctx, __u64 *cnt)
163 {
164 	*cnt = (ctx->flags & EFD_SEMAPHORE) ? 1 : ctx->count;
165 	ctx->count -= *cnt;
166 }
167 
168 /**
169  * eventfd_ctx_remove_wait_queue - Read the current counter and removes wait queue.
170  * @ctx: [in] Pointer to eventfd context.
171  * @wait: [in] Wait queue to be removed.
172  * @cnt: [out] Pointer to the 64-bit counter value.
173  *
174  * Returns %0 if successful, or the following error codes:
175  *
176  * -EAGAIN      : The operation would have blocked.
177  *
178  * This is used to atomically remove a wait queue entry from the eventfd wait
179  * queue head, and read/reset the counter value.
180  */
eventfd_ctx_remove_wait_queue(struct eventfd_ctx * ctx,wait_queue_entry_t * wait,__u64 * cnt)181 int eventfd_ctx_remove_wait_queue(struct eventfd_ctx *ctx, wait_queue_entry_t *wait,
182 				  __u64 *cnt)
183 {
184 	unsigned long flags;
185 
186 	spin_lock_irqsave(&ctx->wqh.lock, flags);
187 	eventfd_ctx_do_read(ctx, cnt);
188 	__remove_wait_queue(&ctx->wqh, wait);
189 	if (*cnt != 0 && waitqueue_active(&ctx->wqh))
190 		wake_up_locked_poll(&ctx->wqh, EPOLLOUT);
191 	spin_unlock_irqrestore(&ctx->wqh.lock, flags);
192 
193 	return *cnt != 0 ? 0 : -EAGAIN;
194 }
195 EXPORT_SYMBOL_GPL(eventfd_ctx_remove_wait_queue);
196 
eventfd_read(struct file * file,char __user * buf,size_t count,loff_t * ppos)197 static ssize_t eventfd_read(struct file *file, char __user *buf, size_t count,
198 			    loff_t *ppos)
199 {
200 	struct eventfd_ctx *ctx = file->private_data;
201 	ssize_t res;
202 	__u64 ucnt = 0;
203 	DECLARE_WAITQUEUE(wait, current);
204 
205 	if (count < sizeof(ucnt))
206 		return -EINVAL;
207 
208 	spin_lock_irq(&ctx->wqh.lock);
209 	res = -EAGAIN;
210 	if (ctx->count > 0)
211 		res = sizeof(ucnt);
212 	else if (!(file->f_flags & O_NONBLOCK)) {
213 		__add_wait_queue(&ctx->wqh, &wait);
214 		for (;;) {
215 			set_current_state(TASK_INTERRUPTIBLE);
216 			if (ctx->count > 0) {
217 				res = sizeof(ucnt);
218 				break;
219 			}
220 			if (signal_pending(current)) {
221 				res = -ERESTARTSYS;
222 				break;
223 			}
224 			spin_unlock_irq(&ctx->wqh.lock);
225 			schedule();
226 			spin_lock_irq(&ctx->wqh.lock);
227 		}
228 		__remove_wait_queue(&ctx->wqh, &wait);
229 		__set_current_state(TASK_RUNNING);
230 	}
231 	if (likely(res > 0)) {
232 		eventfd_ctx_do_read(ctx, &ucnt);
233 		if (waitqueue_active(&ctx->wqh))
234 			wake_up_locked_poll(&ctx->wqh, EPOLLOUT);
235 	}
236 	spin_unlock_irq(&ctx->wqh.lock);
237 
238 	if (res > 0 && put_user(ucnt, (__u64 __user *)buf))
239 		return -EFAULT;
240 
241 	return res;
242 }
243 
eventfd_write(struct file * file,const char __user * buf,size_t count,loff_t * ppos)244 static ssize_t eventfd_write(struct file *file, const char __user *buf, size_t count,
245 			     loff_t *ppos)
246 {
247 	struct eventfd_ctx *ctx = file->private_data;
248 	ssize_t res;
249 	__u64 ucnt;
250 	DECLARE_WAITQUEUE(wait, current);
251 
252 	if (count < sizeof(ucnt))
253 		return -EINVAL;
254 	if (copy_from_user(&ucnt, buf, sizeof(ucnt)))
255 		return -EFAULT;
256 	if (ucnt == ULLONG_MAX)
257 		return -EINVAL;
258 	spin_lock_irq(&ctx->wqh.lock);
259 	res = -EAGAIN;
260 	if (ULLONG_MAX - ctx->count > ucnt)
261 		res = sizeof(ucnt);
262 	else if (!(file->f_flags & O_NONBLOCK)) {
263 		__add_wait_queue(&ctx->wqh, &wait);
264 		for (res = 0;;) {
265 			set_current_state(TASK_INTERRUPTIBLE);
266 			if (ULLONG_MAX - ctx->count > ucnt) {
267 				res = sizeof(ucnt);
268 				break;
269 			}
270 			if (signal_pending(current)) {
271 				res = -ERESTARTSYS;
272 				break;
273 			}
274 			spin_unlock_irq(&ctx->wqh.lock);
275 			schedule();
276 			spin_lock_irq(&ctx->wqh.lock);
277 		}
278 		__remove_wait_queue(&ctx->wqh, &wait);
279 		__set_current_state(TASK_RUNNING);
280 	}
281 	if (likely(res > 0)) {
282 		ctx->count += ucnt;
283 		if (waitqueue_active(&ctx->wqh))
284 			wake_up_locked_poll(&ctx->wqh, EPOLLIN);
285 	}
286 	spin_unlock_irq(&ctx->wqh.lock);
287 
288 	return res;
289 }
290 
291 #ifdef CONFIG_PROC_FS
eventfd_show_fdinfo(struct seq_file * m,struct file * f)292 static void eventfd_show_fdinfo(struct seq_file *m, struct file *f)
293 {
294 	struct eventfd_ctx *ctx = f->private_data;
295 
296 	spin_lock_irq(&ctx->wqh.lock);
297 	seq_printf(m, "eventfd-count: %16llx\n",
298 		   (unsigned long long)ctx->count);
299 	spin_unlock_irq(&ctx->wqh.lock);
300 }
301 #endif
302 
303 static const struct file_operations eventfd_fops = {
304 #ifdef CONFIG_PROC_FS
305 	.show_fdinfo	= eventfd_show_fdinfo,
306 #endif
307 	.release	= eventfd_release,
308 	.poll		= eventfd_poll,
309 	.read		= eventfd_read,
310 	.write		= eventfd_write,
311 	.llseek		= noop_llseek,
312 };
313 
314 /**
315  * eventfd_fget - Acquire a reference of an eventfd file descriptor.
316  * @fd: [in] Eventfd file descriptor.
317  *
318  * Returns a pointer to the eventfd file structure in case of success, or the
319  * following error pointer:
320  *
321  * -EBADF    : Invalid @fd file descriptor.
322  * -EINVAL   : The @fd file descriptor is not an eventfd file.
323  */
eventfd_fget(int fd)324 struct file *eventfd_fget(int fd)
325 {
326 	struct file *file;
327 
328 	file = fget(fd);
329 	if (!file)
330 		return ERR_PTR(-EBADF);
331 	if (file->f_op != &eventfd_fops) {
332 		fput(file);
333 		return ERR_PTR(-EINVAL);
334 	}
335 
336 	return file;
337 }
338 EXPORT_SYMBOL_GPL(eventfd_fget);
339 
340 /**
341  * eventfd_ctx_fdget - Acquires a reference to the internal eventfd context.
342  * @fd: [in] Eventfd file descriptor.
343  *
344  * Returns a pointer to the internal eventfd context, otherwise the error
345  * pointers returned by the following functions:
346  *
347  * eventfd_fget
348  */
eventfd_ctx_fdget(int fd)349 struct eventfd_ctx *eventfd_ctx_fdget(int fd)
350 {
351 	struct eventfd_ctx *ctx;
352 	struct fd f = fdget(fd);
353 	if (!f.file)
354 		return ERR_PTR(-EBADF);
355 	ctx = eventfd_ctx_fileget(f.file);
356 	fdput(f);
357 	return ctx;
358 }
359 EXPORT_SYMBOL_GPL(eventfd_ctx_fdget);
360 
361 /**
362  * eventfd_ctx_fileget - Acquires a reference to the internal eventfd context.
363  * @file: [in] Eventfd file pointer.
364  *
365  * Returns a pointer to the internal eventfd context, otherwise the error
366  * pointer:
367  *
368  * -EINVAL   : The @fd file descriptor is not an eventfd file.
369  */
eventfd_ctx_fileget(struct file * file)370 struct eventfd_ctx *eventfd_ctx_fileget(struct file *file)
371 {
372 	struct eventfd_ctx *ctx;
373 
374 	if (file->f_op != &eventfd_fops)
375 		return ERR_PTR(-EINVAL);
376 
377 	ctx = file->private_data;
378 	kref_get(&ctx->kref);
379 	return ctx;
380 }
381 EXPORT_SYMBOL_GPL(eventfd_ctx_fileget);
382 
do_eventfd(unsigned int count,int flags)383 static int do_eventfd(unsigned int count, int flags)
384 {
385 	struct eventfd_ctx *ctx;
386 	int fd;
387 
388 	/* Check the EFD_* constants for consistency.  */
389 	BUILD_BUG_ON(EFD_CLOEXEC != O_CLOEXEC);
390 	BUILD_BUG_ON(EFD_NONBLOCK != O_NONBLOCK);
391 
392 	if (flags & ~EFD_FLAGS_SET)
393 		return -EINVAL;
394 
395 	ctx = kmalloc(sizeof(*ctx), GFP_KERNEL);
396 	if (!ctx)
397 		return -ENOMEM;
398 
399 	kref_init(&ctx->kref);
400 	init_waitqueue_head(&ctx->wqh);
401 	ctx->count = count;
402 	ctx->flags = flags;
403 
404 	fd = anon_inode_getfd("[eventfd]", &eventfd_fops, ctx,
405 			      O_RDWR | (flags & EFD_SHARED_FCNTL_FLAGS));
406 	if (fd < 0)
407 		eventfd_free_ctx(ctx);
408 
409 	return fd;
410 }
411 
SYSCALL_DEFINE2(eventfd2,unsigned int,count,int,flags)412 SYSCALL_DEFINE2(eventfd2, unsigned int, count, int, flags)
413 {
414 	return do_eventfd(count, flags);
415 }
416 
SYSCALL_DEFINE1(eventfd,unsigned int,count)417 SYSCALL_DEFINE1(eventfd, unsigned int, count)
418 {
419 	return do_eventfd(count, 0);
420 }
421 
422