aio.c 38.5 KB
Newer Older
L
Linus Torvalds 已提交
1 2 3 4 5 6 7 8 9 10
/*
 *	An async IO implementation for Linux
 *	Written by Benjamin LaHaise <bcrl@kvack.org>
 *
 *	Implements an efficient asynchronous io interface.
 *
 *	Copyright 2000, 2001, 2002 Red Hat, Inc.  All Rights Reserved.
 *
 *	See ../COPYING for licensing terms.
 */
K
Kent Overstreet 已提交
11 12
#define pr_fmt(fmt) "%s: " fmt, __func__

L
Linus Torvalds 已提交
13 14 15 16 17
#include <linux/kernel.h>
#include <linux/init.h>
#include <linux/errno.h>
#include <linux/time.h>
#include <linux/aio_abi.h>
18
#include <linux/export.h>
L
Linus Torvalds 已提交
19
#include <linux/syscalls.h>
20
#include <linux/backing-dev.h>
21
#include <linux/uio.h>
L
Linus Torvalds 已提交
22 23 24 25 26 27

#include <linux/sched.h>
#include <linux/fs.h>
#include <linux/file.h>
#include <linux/mm.h>
#include <linux/mman.h>
28
#include <linux/mmu_context.h>
K
Kent Overstreet 已提交
29
#include <linux/percpu.h>
L
Linus Torvalds 已提交
30 31 32 33 34 35
#include <linux/slab.h>
#include <linux/timer.h>
#include <linux/aio.h>
#include <linux/highmem.h>
#include <linux/workqueue.h>
#include <linux/security.h>
36
#include <linux/eventfd.h>
J
Jeff Moyer 已提交
37
#include <linux/blkdev.h>
38
#include <linux/compat.h>
39 40
#include <linux/migrate.h>
#include <linux/ramfs.h>
K
Kent Overstreet 已提交
41
#include <linux/percpu-refcount.h>
42
#include <linux/mount.h>
L
Linus Torvalds 已提交
43 44 45 46

#include <asm/kmap_types.h>
#include <asm/uaccess.h>

A
Al Viro 已提交
47 48
#include "internal.h"

49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68
#define AIO_RING_MAGIC			0xa10a10a1
#define AIO_RING_COMPAT_FEATURES	1
#define AIO_RING_INCOMPAT_FEATURES	0
struct aio_ring {
	unsigned	id;	/* kernel internal index number */
	unsigned	nr;	/* number of io_events */
	unsigned	head;
	unsigned	tail;

	unsigned	magic;
	unsigned	compat_features;
	unsigned	incompat_features;
	unsigned	header_length;	/* size of aio_ring */


	struct io_event		io_events[0];
}; /* 128 bytes + ring size */

#define AIO_RING_PAGES	8

69 70 71 72 73 74
struct kioctx_table {
	struct rcu_head	rcu;
	unsigned	nr;
	struct kioctx	*table[];
};

K
Kent Overstreet 已提交
75 76 77 78
struct kioctx_cpu {
	unsigned		reqs_available;
};

79
struct kioctx {
K
Kent Overstreet 已提交
80
	struct percpu_ref	users;
K
Kent Overstreet 已提交
81
	atomic_t		dead;
82 83 84

	unsigned long		user_id;

K
Kent Overstreet 已提交
85 86 87 88 89 90 91
	struct __percpu kioctx_cpu *cpu;

	/*
	 * For percpu reqs_available, number of slots we move to/from global
	 * counter at a time:
	 */
	unsigned		req_batch;
92 93 94 95
	/*
	 * This is what userspace passed to io_setup(), it's not used for
	 * anything but counting against the global max_reqs quota.
	 *
K
Kent Overstreet 已提交
96
	 * The real limit is nr_events - 1, which will be larger (see
97 98
	 * aio_setup_ring())
	 */
99 100
	unsigned		max_reqs;

K
Kent Overstreet 已提交
101 102
	/* Size of ringbuffer, in units of struct io_event */
	unsigned		nr_events;
103

K
Kent Overstreet 已提交
104 105 106 107 108 109
	unsigned long		mmap_base;
	unsigned long		mmap_size;

	struct page		**ring_pages;
	long			nr_pages;

110
	struct rcu_head		rcu_head;
K
Kent Overstreet 已提交
111
	struct work_struct	free_work;
112 113

	struct {
114 115 116 117 118
		/*
		 * This counts the number of available slots in the ringbuffer,
		 * so we avoid overflowing it: it's decremented (if positive)
		 * when allocating a kiocb and incremented when the resulting
		 * io_event is pulled off the ringbuffer.
K
Kent Overstreet 已提交
119 120
		 *
		 * We batch accesses to it with a percpu version.
121 122
		 */
		atomic_t	reqs_available;
123 124 125 126 127 128 129
	} ____cacheline_aligned_in_smp;

	struct {
		spinlock_t	ctx_lock;
		struct list_head active_reqs;	/* used for cancellation */
	} ____cacheline_aligned_in_smp;

K
Kent Overstreet 已提交
130 131
	struct {
		struct mutex	ring_lock;
132 133
		wait_queue_head_t wait;
	} ____cacheline_aligned_in_smp;
K
Kent Overstreet 已提交
134 135 136 137

	struct {
		unsigned	tail;
		spinlock_t	completion_lock;
138
	} ____cacheline_aligned_in_smp;
K
Kent Overstreet 已提交
139 140

	struct page		*internal_pages[AIO_RING_PAGES];
141
	struct file		*aio_ring_file;
142 143

	unsigned		id;
144 145
};

L
Linus Torvalds 已提交
146
/*------ sysctl variables----*/
147 148 149
static DEFINE_SPINLOCK(aio_nr_lock);
unsigned long aio_nr;		/* current system wide number of aio requests */
unsigned long aio_max_nr = 0x10000; /* system wide maximum number of aio requests */
L
Linus Torvalds 已提交
150 151
/*----end sysctl variables---*/

152 153
static struct kmem_cache	*kiocb_cachep;
static struct kmem_cache	*kioctx_cachep;
L
Linus Torvalds 已提交
154

155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200
static struct vfsmount *aio_mnt;

static const struct file_operations aio_ring_fops;
static const struct address_space_operations aio_ctx_aops;

static struct file *aio_private_file(struct kioctx *ctx, loff_t nr_pages)
{
	struct qstr this = QSTR_INIT("[aio]", 5);
	struct file *file;
	struct path path;
	struct inode *inode = alloc_anon_inode(aio_mnt->mnt_sb);
	if (!inode)
		return ERR_PTR(-ENOMEM);

	inode->i_mapping->a_ops = &aio_ctx_aops;
	inode->i_mapping->private_data = ctx;
	inode->i_size = PAGE_SIZE * nr_pages;

	path.dentry = d_alloc_pseudo(aio_mnt->mnt_sb, &this);
	if (!path.dentry) {
		iput(inode);
		return ERR_PTR(-ENOMEM);
	}
	path.mnt = mntget(aio_mnt);

	d_instantiate(path.dentry, inode);
	file = alloc_file(&path, FMODE_READ | FMODE_WRITE, &aio_ring_fops);
	if (IS_ERR(file)) {
		path_put(&path);
		return file;
	}

	file->f_flags = O_RDWR;
	file->private_data = ctx;
	return file;
}

static struct dentry *aio_mount(struct file_system_type *fs_type,
				int flags, const char *dev_name, void *data)
{
	static const struct dentry_operations ops = {
		.d_dname	= simple_dname,
	};
	return mount_pseudo(fs_type, "aio:", NULL, &ops, 0xa10a10a1);
}

L
Linus Torvalds 已提交
201 202 203 204 205 206
/* aio_setup
 *	Creates the slab caches used by the aio routines, panic on
 *	failure as this is done early during the boot sequence.
 */
static int __init aio_setup(void)
{
207 208 209 210 211 212 213 214 215
	static struct file_system_type aio_fs = {
		.name		= "aio",
		.mount		= aio_mount,
		.kill_sb	= kill_anon_super,
	};
	aio_mnt = kern_mount(&aio_fs);
	if (IS_ERR(aio_mnt))
		panic("Failed to create aio fs mount.");

216 217
	kiocb_cachep = KMEM_CACHE(kiocb, SLAB_HWCACHE_ALIGN|SLAB_PANIC);
	kioctx_cachep = KMEM_CACHE(kioctx,SLAB_HWCACHE_ALIGN|SLAB_PANIC);
L
Linus Torvalds 已提交
218

K
Kent Overstreet 已提交
219
	pr_debug("sizeof(struct page) = %zu\n", sizeof(struct page));
L
Linus Torvalds 已提交
220 221 222

	return 0;
}
223
__initcall(aio_setup);
L
Linus Torvalds 已提交
224

225 226 227 228 229 230 231 232 233 234 235 236 237 238 239 240
static void put_aio_ring_file(struct kioctx *ctx)
{
	struct file *aio_ring_file = ctx->aio_ring_file;
	if (aio_ring_file) {
		truncate_setsize(aio_ring_file->f_inode, 0);

		/* Prevent further access to the kioctx from migratepages */
		spin_lock(&aio_ring_file->f_inode->i_mapping->private_lock);
		aio_ring_file->f_inode->i_mapping->private_data = NULL;
		ctx->aio_ring_file = NULL;
		spin_unlock(&aio_ring_file->f_inode->i_mapping->private_lock);

		fput(aio_ring_file);
	}
}

L
Linus Torvalds 已提交
241 242
static void aio_free_ring(struct kioctx *ctx)
{
243
	int i;
L
Linus Torvalds 已提交
244

245 246 247
	for (i = 0; i < ctx->nr_pages; i++) {
		pr_debug("pid(%d) [%d] page->count=%d\n", current->pid, i,
				page_count(ctx->ring_pages[i]));
K
Kent Overstreet 已提交
248
		put_page(ctx->ring_pages[i]);
249
	}
L
Linus Torvalds 已提交
250

251 252
	put_aio_ring_file(ctx);

K
Kent Overstreet 已提交
253 254
	if (ctx->ring_pages && ctx->ring_pages != ctx->internal_pages)
		kfree(ctx->ring_pages);
255 256 257 258 259 260 261 262 263 264 265 266 267 268 269 270 271
}

static int aio_ring_mmap(struct file *file, struct vm_area_struct *vma)
{
	vma->vm_ops = &generic_file_vm_ops;
	return 0;
}

static const struct file_operations aio_ring_fops = {
	.mmap = aio_ring_mmap,
};

static int aio_set_page_dirty(struct page *page)
{
	return 0;
}

272
#if IS_ENABLED(CONFIG_MIGRATION)
273 274 275
static int aio_migratepage(struct address_space *mapping, struct page *new,
			struct page *old, enum migrate_mode mode)
{
276
	struct kioctx *ctx;
277 278 279 280 281 282 283 284 285 286 287 288 289 290 291
	unsigned long flags;
	int rc;

	/* Writeback must be complete */
	BUG_ON(PageWriteback(old));
	put_page(old);

	rc = migrate_page_move_mapping(mapping, new, old, NULL, mode);
	if (rc != MIGRATEPAGE_SUCCESS) {
		get_page(old);
		return rc;
	}

	get_page(new);

292 293 294 295 296 297 298 299 300 301 302 303 304 305 306 307 308
	/* We can potentially race against kioctx teardown here.  Use the
	 * address_space's private data lock to protect the mapping's
	 * private_data.
	 */
	spin_lock(&mapping->private_lock);
	ctx = mapping->private_data;
	if (ctx) {
		pgoff_t idx;
		spin_lock_irqsave(&ctx->completion_lock, flags);
		migrate_page_copy(new, old);
		idx = old->index;
		if (idx < (pgoff_t)ctx->nr_pages)
			ctx->ring_pages[idx] = new;
		spin_unlock_irqrestore(&ctx->completion_lock, flags);
	} else
		rc = -EBUSY;
	spin_unlock(&mapping->private_lock);
309 310

	return rc;
L
Linus Torvalds 已提交
311
}
312
#endif
L
Linus Torvalds 已提交
313

314 315
static const struct address_space_operations aio_ctx_aops = {
	.set_page_dirty = aio_set_page_dirty,
316
#if IS_ENABLED(CONFIG_MIGRATION)
317
	.migratepage	= aio_migratepage,
318
#endif
319 320
};

L
Linus Torvalds 已提交
321 322 323 324
static int aio_setup_ring(struct kioctx *ctx)
{
	struct aio_ring *ring;
	unsigned nr_events = ctx->max_reqs;
Z
Zach Brown 已提交
325
	struct mm_struct *mm = current->mm;
326
	unsigned long size, populate;
L
Linus Torvalds 已提交
327
	int nr_pages;
328 329
	int i;
	struct file *file;
L
Linus Torvalds 已提交
330 331 332 333 334 335 336

	/* Compensate for the ring buffer's head/tail overlap entry */
	nr_events += 2;	/* 1 is required, 2 for good luck */

	size = sizeof(struct aio_ring);
	size += sizeof(struct io_event) * nr_events;

337
	nr_pages = PFN_UP(size);
L
Linus Torvalds 已提交
338 339 340
	if (nr_pages < 0)
		return -EINVAL;

341
	file = aio_private_file(ctx, nr_pages);
342 343 344 345 346 347 348 349 350 351 352 353 354 355 356 357 358 359 360 361
	if (IS_ERR(file)) {
		ctx->aio_ring_file = NULL;
		return -EAGAIN;
	}

	for (i = 0; i < nr_pages; i++) {
		struct page *page;
		page = find_or_create_page(file->f_inode->i_mapping,
					   i, GFP_HIGHUSER | __GFP_ZERO);
		if (!page)
			break;
		pr_debug("pid(%d) page[%d]->count=%d\n",
			 current->pid, i, page_count(page));
		SetPageUptodate(page);
		SetPageDirty(page);
		unlock_page(page);
	}
	ctx->aio_ring_file = file;
	nr_events = (PAGE_SIZE * nr_pages - sizeof(struct aio_ring))
			/ sizeof(struct io_event);
L
Linus Torvalds 已提交
362

K
Kent Overstreet 已提交
363
	ctx->ring_pages = ctx->internal_pages;
L
Linus Torvalds 已提交
364
	if (nr_pages > AIO_RING_PAGES) {
K
Kent Overstreet 已提交
365 366 367
		ctx->ring_pages = kcalloc(nr_pages, sizeof(struct page *),
					  GFP_KERNEL);
		if (!ctx->ring_pages)
L
Linus Torvalds 已提交
368 369 370
			return -ENOMEM;
	}

K
Kent Overstreet 已提交
371 372
	ctx->mmap_size = nr_pages * PAGE_SIZE;
	pr_debug("attempting mmap of %lu bytes\n", ctx->mmap_size);
373

Z
Zach Brown 已提交
374
	down_write(&mm->mmap_sem);
375 376 377
	ctx->mmap_base = do_mmap_pgoff(ctx->aio_ring_file, 0, ctx->mmap_size,
				       PROT_READ | PROT_WRITE,
				       MAP_SHARED | MAP_POPULATE, 0, &populate);
K
Kent Overstreet 已提交
378
	if (IS_ERR((void *)ctx->mmap_base)) {
Z
Zach Brown 已提交
379
		up_write(&mm->mmap_sem);
K
Kent Overstreet 已提交
380
		ctx->mmap_size = 0;
L
Linus Torvalds 已提交
381 382 383 384
		aio_free_ring(ctx);
		return -EAGAIN;
	}

K
Kent Overstreet 已提交
385
	pr_debug("mmap address: 0x%08lx\n", ctx->mmap_base);
386 387 388 389 390

	/* We must do this while still holding mmap_sem for write, as we
	 * need to be protected against userspace attempting to mremap()
	 * or munmap() the ring buffer.
	 */
K
Kent Overstreet 已提交
391 392
	ctx->nr_pages = get_user_pages(current, mm, ctx->mmap_base, nr_pages,
				       1, 0, ctx->ring_pages, NULL);
393 394 395 396 397

	/* Dropping the reference here is safe as the page cache will hold
	 * onto the pages for us.  It is also required so that page migration
	 * can unmap the pages and get the right reference count.
	 */
398 399
	for (i = 0; i < ctx->nr_pages; i++)
		put_page(ctx->ring_pages[i]);
L
Linus Torvalds 已提交
400

401 402
	up_write(&mm->mmap_sem);

K
Kent Overstreet 已提交
403
	if (unlikely(ctx->nr_pages != nr_pages)) {
L
Linus Torvalds 已提交
404 405 406 407
		aio_free_ring(ctx);
		return -EAGAIN;
	}

K
Kent Overstreet 已提交
408 409
	ctx->user_id = ctx->mmap_base;
	ctx->nr_events = nr_events; /* trusted copy */
L
Linus Torvalds 已提交
410

K
Kent Overstreet 已提交
411
	ring = kmap_atomic(ctx->ring_pages[0]);
L
Linus Torvalds 已提交
412
	ring->nr = nr_events;	/* user copy */
413
	ring->id = ~0U;
L
Linus Torvalds 已提交
414 415 416 417 418
	ring->head = ring->tail = 0;
	ring->magic = AIO_RING_MAGIC;
	ring->compat_features = AIO_RING_COMPAT_FEATURES;
	ring->incompat_features = AIO_RING_INCOMPAT_FEATURES;
	ring->header_length = sizeof(struct aio_ring);
419
	kunmap_atomic(ring);
K
Kent Overstreet 已提交
420
	flush_dcache_page(ctx->ring_pages[0]);
L
Linus Torvalds 已提交
421 422 423 424 425 426 427 428

	return 0;
}

#define AIO_EVENTS_PER_PAGE	(PAGE_SIZE / sizeof(struct io_event))
#define AIO_EVENTS_FIRST_PAGE	((PAGE_SIZE - sizeof(struct aio_ring)) / sizeof(struct io_event))
#define AIO_EVENTS_OFFSET	(AIO_EVENTS_PER_PAGE - AIO_EVENTS_FIRST_PAGE)

429 430 431 432 433 434 435 436 437 438 439 440 441 442 443 444
void kiocb_set_cancel_fn(struct kiocb *req, kiocb_cancel_fn *cancel)
{
	struct kioctx *ctx = req->ki_ctx;
	unsigned long flags;

	spin_lock_irqsave(&ctx->ctx_lock, flags);

	if (!req->ki_list.next)
		list_add(&req->ki_list, &ctx->active_reqs);

	req->ki_cancel = cancel;

	spin_unlock_irqrestore(&ctx->ctx_lock, flags);
}
EXPORT_SYMBOL(kiocb_set_cancel_fn);

445
static int kiocb_cancel(struct kioctx *ctx, struct kiocb *kiocb)
K
Kent Overstreet 已提交
446
{
447
	kiocb_cancel_fn *old, *cancel;
K
Kent Overstreet 已提交
448

449 450 451 452 453 454 455 456
	/*
	 * Don't want to set kiocb->ki_cancel = KIOCB_CANCELLED unless it
	 * actually has a cancel function, hence the cmpxchg()
	 */

	cancel = ACCESS_ONCE(kiocb->ki_cancel);
	do {
		if (!cancel || cancel == KIOCB_CANCELLED)
K
Kent Overstreet 已提交
457
			return -EINVAL;
K
Kent Overstreet 已提交
458

459 460 461
		old = cancel;
		cancel = cmpxchg(&kiocb->ki_cancel, old, KIOCB_CANCELLED);
	} while (cancel != old);
K
Kent Overstreet 已提交
462

K
Kent Overstreet 已提交
463
	return cancel(kiocb);
K
Kent Overstreet 已提交
464 465
}

K
Kent Overstreet 已提交
466 467 468
static void free_ioctx_rcu(struct rcu_head *head)
{
	struct kioctx *ctx = container_of(head, struct kioctx, rcu_head);
K
Kent Overstreet 已提交
469 470

	free_percpu(ctx->cpu);
K
Kent Overstreet 已提交
471 472 473 474 475 476 477 478
	kmem_cache_free(kioctx_cachep, ctx);
}

/*
 * When this function runs, the kioctx has been removed from the "hash table"
 * and ctx->users has dropped to 0, so we know no more kiocbs can be submitted -
 * now it's safe to cancel any that need to be.
 */
K
Kent Overstreet 已提交
479
static void free_ioctx(struct work_struct *work)
K
Kent Overstreet 已提交
480
{
K
Kent Overstreet 已提交
481
	struct kioctx *ctx = container_of(work, struct kioctx, free_work);
482
	struct aio_ring *ring;
K
Kent Overstreet 已提交
483
	struct kiocb *req;
484 485
	unsigned cpu, avail;
	DEFINE_WAIT(wait);
K
Kent Overstreet 已提交
486 487 488 489 490 491 492 493

	spin_lock_irq(&ctx->ctx_lock);

	while (!list_empty(&ctx->active_reqs)) {
		req = list_first_entry(&ctx->active_reqs,
				       struct kiocb, ki_list);

		list_del_init(&req->ki_list);
494
		kiocb_cancel(ctx, req);
K
Kent Overstreet 已提交
495 496 497 498
	}

	spin_unlock_irq(&ctx->ctx_lock);

K
Kent Overstreet 已提交
499 500 501 502 503 504 505
	for_each_possible_cpu(cpu) {
		struct kioctx_cpu *kcpu = per_cpu_ptr(ctx->cpu, cpu);

		atomic_add(kcpu->reqs_available, &ctx->reqs_available);
		kcpu->reqs_available = 0;
	}

506 507
	while (1) {
		prepare_to_wait(&ctx->wait, &wait, TASK_UNINTERRUPTIBLE);
508

509 510 511 512
		ring = kmap_atomic(ctx->ring_pages[0]);
		avail = (ring->head <= ring->tail)
			 ? ring->tail - ring->head
			 : ctx->nr_events - ring->head + ring->tail;
513

514
		atomic_add(avail, &ctx->reqs_available);
515 516 517 518 519 520 521
		ring->head = ring->tail;
		kunmap_atomic(ring);

		if (atomic_read(&ctx->reqs_available) >= ctx->nr_events - 1)
			break;

		schedule();
522
	}
523
	finish_wait(&ctx->wait, &wait);
524

525
	WARN_ON(atomic_read(&ctx->reqs_available) > ctx->nr_events - 1);
K
Kent Overstreet 已提交
526 527 528 529 530 531 532 533 534 535 536 537 538 539 540

	aio_free_ring(ctx);

	pr_debug("freeing %p\n", ctx);

	/*
	 * Here the call_rcu() is between the wait_event() for reqs_active to
	 * hit 0, and freeing the ioctx.
	 *
	 * aio_complete() decrements reqs_active, but it has to touch the ioctx
	 * after to issue a wakeup so we use rcu.
	 */
	call_rcu(&ctx->rcu_head, free_ioctx_rcu);
}

K
Kent Overstreet 已提交
541
static void free_ioctx_ref(struct percpu_ref *ref)
K
Kent Overstreet 已提交
542
{
K
Kent Overstreet 已提交
543 544 545 546
	struct kioctx *ctx = container_of(ref, struct kioctx, users);

	INIT_WORK(&ctx->free_work, free_ioctx);
	schedule_work(&ctx->free_work);
K
Kent Overstreet 已提交
547 548
}

549 550 551 552 553 554 555
static int ioctx_add_table(struct kioctx *ctx, struct mm_struct *mm)
{
	unsigned i, new_nr;
	struct kioctx_table *table, *old;
	struct aio_ring *ring;

	spin_lock(&mm->ioctx_lock);
556
	rcu_read_lock();
557
	table = rcu_dereference(mm->ioctx_table);
558 559 560 561 562 563 564

	while (1) {
		if (table)
			for (i = 0; i < table->nr; i++)
				if (!table->table[i]) {
					ctx->id = i;
					table->table[i] = ctx;
565
					rcu_read_unlock();
566 567 568 569 570 571 572 573 574 575
					spin_unlock(&mm->ioctx_lock);

					ring = kmap_atomic(ctx->ring_pages[0]);
					ring->id = ctx->id;
					kunmap_atomic(ring);
					return 0;
				}

		new_nr = (table ? table->nr : 1) * 4;

576
		rcu_read_unlock();
577 578 579 580 581 582 583 584 585 586
		spin_unlock(&mm->ioctx_lock);

		table = kzalloc(sizeof(*table) + sizeof(struct kioctx *) *
				new_nr, GFP_KERNEL);
		if (!table)
			return -ENOMEM;

		table->nr = new_nr;

		spin_lock(&mm->ioctx_lock);
587
		rcu_read_lock();
588
		old = rcu_dereference(mm->ioctx_table);
589 590 591 592 593 594 595 596 597 598 599 600 601 602 603 604

		if (!old) {
			rcu_assign_pointer(mm->ioctx_table, table);
		} else if (table->nr > old->nr) {
			memcpy(table->table, old->table,
			       old->nr * sizeof(struct kioctx *));

			rcu_assign_pointer(mm->ioctx_table, table);
			kfree_rcu(old, rcu);
		} else {
			kfree(table);
			table = old;
		}
	}
}

L
Linus Torvalds 已提交
605 606 607 608 609
/* ioctx_alloc
 *	Allocates and initializes an ioctx.  Returns an ERR_PTR if it failed.
 */
static struct kioctx *ioctx_alloc(unsigned nr_events)
{
Z
Zach Brown 已提交
610
	struct mm_struct *mm = current->mm;
L
Linus Torvalds 已提交
611
	struct kioctx *ctx;
612
	int err = -ENOMEM;
L
Linus Torvalds 已提交
613

K
Kent Overstreet 已提交
614 615 616 617 618 619 620 621 622 623 624 625
	/*
	 * We keep track of the number of available ringbuffer slots, to prevent
	 * overflow (reqs_available), and we also use percpu counters for this.
	 *
	 * So since up to half the slots might be on other cpu's percpu counters
	 * and unavailable, double nr_events so userspace sees what they
	 * expected: additionally, we move req_batch slots to/from percpu
	 * counters at a time, so make sure that isn't 0:
	 */
	nr_events = max(nr_events, num_possible_cpus() * 4);
	nr_events *= 2;

L
Linus Torvalds 已提交
626 627 628 629 630 631 632
	/* Prevent overflows */
	if ((nr_events > (0x10000000U / sizeof(struct io_event))) ||
	    (nr_events > (0x10000000U / sizeof(struct kiocb)))) {
		pr_debug("ENOMEM: nr_events too high\n");
		return ERR_PTR(-EINVAL);
	}

633
	if (!nr_events || (unsigned long)nr_events > (aio_max_nr * 2UL))
L
Linus Torvalds 已提交
634 635
		return ERR_PTR(-EAGAIN);

636
	ctx = kmem_cache_zalloc(kioctx_cachep, GFP_KERNEL);
L
Linus Torvalds 已提交
637 638 639 640 641
	if (!ctx)
		return ERR_PTR(-ENOMEM);

	ctx->max_reqs = nr_events;

K
Kent Overstreet 已提交
642 643 644
	if (percpu_ref_init(&ctx->users, free_ioctx_ref))
		goto out_freectx;

L
Linus Torvalds 已提交
645
	spin_lock_init(&ctx->ctx_lock);
646
	spin_lock_init(&ctx->completion_lock);
K
Kent Overstreet 已提交
647
	mutex_init(&ctx->ring_lock);
L
Linus Torvalds 已提交
648 649 650 651
	init_waitqueue_head(&ctx->wait);

	INIT_LIST_HEAD(&ctx->active_reqs);

K
Kent Overstreet 已提交
652 653
	ctx->cpu = alloc_percpu(struct kioctx_cpu);
	if (!ctx->cpu)
K
Kent Overstreet 已提交
654
		goto out_freeref;
L
Linus Torvalds 已提交
655

K
Kent Overstreet 已提交
656 657 658
	if (aio_setup_ring(ctx) < 0)
		goto out_freepcpu;

659
	atomic_set(&ctx->reqs_available, ctx->nr_events - 1);
K
Kent Overstreet 已提交
660
	ctx->req_batch = (ctx->nr_events - 1) / (num_possible_cpus() * 4);
661 662
	if (ctx->req_batch < 1)
		ctx->req_batch = 1;
663

L
Linus Torvalds 已提交
664
	/* limit the number of system wide aios */
665
	spin_lock(&aio_nr_lock);
666
	if (aio_nr + nr_events > (aio_max_nr * 2UL) ||
667
	    aio_nr + nr_events < aio_nr) {
668
		spin_unlock(&aio_nr_lock);
L
Linus Torvalds 已提交
669
		goto out_cleanup;
670 671
	}
	aio_nr += ctx->max_reqs;
672
	spin_unlock(&aio_nr_lock);
L
Linus Torvalds 已提交
673

K
Kent Overstreet 已提交
674 675
	percpu_ref_get(&ctx->users); /* io_setup() will drop this ref */

676 677 678 679
	err = ioctx_add_table(ctx, mm);
	if (err)
		goto out_cleanup_put;

K
Kent Overstreet 已提交
680
	pr_debug("allocated ioctx %p[%ld]: mm=%p mask=0x%x\n",
K
Kent Overstreet 已提交
681
		 ctx, ctx->user_id, mm, ctx->nr_events);
L
Linus Torvalds 已提交
682 683
	return ctx;

684 685
out_cleanup_put:
	percpu_ref_put(&ctx->users);
L
Linus Torvalds 已提交
686
out_cleanup:
687 688
	err = -EAGAIN;
	aio_free_ring(ctx);
K
Kent Overstreet 已提交
689 690
out_freepcpu:
	free_percpu(ctx->cpu);
K
Kent Overstreet 已提交
691 692
out_freeref:
	free_percpu(ctx->users.pcpu_count);
L
Linus Torvalds 已提交
693
out_freectx:
694
	put_aio_ring_file(ctx);
L
Linus Torvalds 已提交
695
	kmem_cache_free(kioctx_cachep, ctx);
K
Kent Overstreet 已提交
696
	pr_debug("error allocating ioctx %d\n", err);
697
	return ERR_PTR(err);
L
Linus Torvalds 已提交
698 699
}

K
Kent Overstreet 已提交
700 701 702 703 704
/* kill_ioctx
 *	Cancels all outstanding aio requests on an aio context.  Used
 *	when the processes owning a context have all exited to encourage
 *	the rapid destruction of the kioctx.
 */
705
static void kill_ioctx(struct mm_struct *mm, struct kioctx *ctx)
K
Kent Overstreet 已提交
706 707
{
	if (!atomic_xchg(&ctx->dead, 1)) {
708 709 710
		struct kioctx_table *table;

		spin_lock(&mm->ioctx_lock);
711
		rcu_read_lock();
712
		table = rcu_dereference(mm->ioctx_table);
713 714 715

		WARN_ON(ctx != table->table[ctx->id]);
		table->table[ctx->id] = NULL;
716
		rcu_read_unlock();
717 718
		spin_unlock(&mm->ioctx_lock);

K
Kent Overstreet 已提交
719 720
		/* percpu_ref_kill() will do the necessary call_rcu() */
		wake_up_all(&ctx->wait);
721

K
Kent Overstreet 已提交
722
		/*
723 724 725 726 727
		 * It'd be more correct to do this in free_ioctx(), after all
		 * the outstanding kiocbs have finished - but by then io_destroy
		 * has already returned, so io_setup() could potentially return
		 * -EAGAIN with no ioctxs actually in use (as far as userspace
		 *  could tell).
K
Kent Overstreet 已提交
728
		 */
729 730 731 732 733 734 735 736
		spin_lock(&aio_nr_lock);
		BUG_ON(aio_nr - ctx->max_reqs > aio_nr);
		aio_nr -= ctx->max_reqs;
		spin_unlock(&aio_nr_lock);

		if (ctx->mmap_size)
			vm_munmap(ctx->mmap_base, ctx->mmap_size);

K
Kent Overstreet 已提交
737
		percpu_ref_kill(&ctx->users);
K
Kent Overstreet 已提交
738
	}
L
Linus Torvalds 已提交
739 740 741 742 743
}

/* wait_on_sync_kiocb:
 *	Waits on the given sync kiocb to complete.
 */
K
Kent Overstreet 已提交
744
ssize_t wait_on_sync_kiocb(struct kiocb *req)
L
Linus Torvalds 已提交
745
{
K
Kent Overstreet 已提交
746
	while (!req->ki_ctx) {
L
Linus Torvalds 已提交
747
		set_current_state(TASK_UNINTERRUPTIBLE);
K
Kent Overstreet 已提交
748
		if (req->ki_ctx)
L
Linus Torvalds 已提交
749
			break;
J
Jeff Moyer 已提交
750
		io_schedule();
L
Linus Torvalds 已提交
751 752
	}
	__set_current_state(TASK_RUNNING);
K
Kent Overstreet 已提交
753
	return req->ki_user_data;
L
Linus Torvalds 已提交
754
}
755
EXPORT_SYMBOL(wait_on_sync_kiocb);
L
Linus Torvalds 已提交
756

K
Kent Overstreet 已提交
757 758 759 760 761 762 763
/*
 * exit_aio: called when the last user of mm goes away.  At this point, there is
 * no way for any new requests to be submited or any of the io_* syscalls to be
 * called on the context.
 *
 * There may be outstanding kiocbs, but free_ioctx() will explicitly wait on
 * them.
L
Linus Torvalds 已提交
764
 */
765
void exit_aio(struct mm_struct *mm)
L
Linus Torvalds 已提交
766
{
767
	struct kioctx_table *table;
J
Jens Axboe 已提交
768
	struct kioctx *ctx;
769 770 771 772 773 774 775 776 777 778 779 780 781 782 783 784 785 786 787
	unsigned i = 0;

	while (1) {
		rcu_read_lock();
		table = rcu_dereference(mm->ioctx_table);

		do {
			if (!table || i >= table->nr) {
				rcu_read_unlock();
				rcu_assign_pointer(mm->ioctx_table, NULL);
				if (table)
					kfree(table);
				return;
			}

			ctx = table->table[i++];
		} while (!ctx);

		rcu_read_unlock();
J
Jens Axboe 已提交
788

789 790 791 792 793 794 795 796
		/*
		 * We don't need to bother with munmap() here -
		 * exit_mmap(mm) is coming and it'll unmap everything.
		 * Since aio_free_ring() uses non-zero ->mmap_size
		 * as indicator that it needs to unmap the area,
		 * just set it to 0; aio_free_ring() is the only
		 * place that uses ->mmap_size, so it's safe.
		 */
K
Kent Overstreet 已提交
797
		ctx->mmap_size = 0;
K
Kent Overstreet 已提交
798

799
		kill_ioctx(mm, ctx);
L
Linus Torvalds 已提交
800 801 802
	}
}

K
Kent Overstreet 已提交
803 804 805 806 807 808 809 810 811 812 813 814 815 816 817 818 819 820 821 822 823 824 825 826 827 828 829 830 831 832 833 834 835 836 837 838 839 840 841 842 843 844 845 846 847 848
static void put_reqs_available(struct kioctx *ctx, unsigned nr)
{
	struct kioctx_cpu *kcpu;

	preempt_disable();
	kcpu = this_cpu_ptr(ctx->cpu);

	kcpu->reqs_available += nr;
	while (kcpu->reqs_available >= ctx->req_batch * 2) {
		kcpu->reqs_available -= ctx->req_batch;
		atomic_add(ctx->req_batch, &ctx->reqs_available);
	}

	preempt_enable();
}

static bool get_reqs_available(struct kioctx *ctx)
{
	struct kioctx_cpu *kcpu;
	bool ret = false;

	preempt_disable();
	kcpu = this_cpu_ptr(ctx->cpu);

	if (!kcpu->reqs_available) {
		int old, avail = atomic_read(&ctx->reqs_available);

		do {
			if (avail < ctx->req_batch)
				goto out;

			old = avail;
			avail = atomic_cmpxchg(&ctx->reqs_available,
					       avail, avail - ctx->req_batch);
		} while (avail != old);

		kcpu->reqs_available += ctx->req_batch;
	}

	ret = true;
	kcpu->reqs_available--;
out:
	preempt_enable();
	return ret;
}

L
Linus Torvalds 已提交
849
/* aio_get_req
K
Kent Overstreet 已提交
850 851
 *	Allocate a slot for an aio request.
 * Returns NULL if no requests are free.
L
Linus Torvalds 已提交
852
 */
K
Kent Overstreet 已提交
853
static inline struct kiocb *aio_get_req(struct kioctx *ctx)
L
Linus Torvalds 已提交
854
{
K
Kent Overstreet 已提交
855 856
	struct kiocb *req;

K
Kent Overstreet 已提交
857
	if (!get_reqs_available(ctx))
K
Kent Overstreet 已提交
858 859
		return NULL;

860
	req = kmem_cache_alloc(kiocb_cachep, GFP_KERNEL|__GFP_ZERO);
L
Linus Torvalds 已提交
861
	if (unlikely(!req))
K
Kent Overstreet 已提交
862
		goto out_put;
L
Linus Torvalds 已提交
863 864

	req->ki_ctx = ctx;
J
Jeff Moyer 已提交
865
	return req;
K
Kent Overstreet 已提交
866
out_put:
K
Kent Overstreet 已提交
867
	put_reqs_available(ctx, 1);
K
Kent Overstreet 已提交
868
	return NULL;
L
Linus Torvalds 已提交
869 870
}

871
static void kiocb_free(struct kiocb *req)
L
Linus Torvalds 已提交
872
{
873 874
	if (req->ki_filp)
		fput(req->ki_filp);
875 876
	if (req->ki_eventfd != NULL)
		eventfd_ctx_put(req->ki_eventfd);
L
Linus Torvalds 已提交
877 878 879
	kmem_cache_free(kiocb_cachep, req);
}

A
Adrian Bunk 已提交
880
static struct kioctx *lookup_ioctx(unsigned long ctx_id)
L
Linus Torvalds 已提交
881
{
882
	struct aio_ring __user *ring  = (void __user *)ctx_id;
J
Jens Axboe 已提交
883
	struct mm_struct *mm = current->mm;
884
	struct kioctx *ctx, *ret = NULL;
885 886 887 888 889
	struct kioctx_table *table;
	unsigned id;

	if (get_user(id, &ring->id))
		return NULL;
L
Linus Torvalds 已提交
890

J
Jens Axboe 已提交
891
	rcu_read_lock();
892
	table = rcu_dereference(mm->ioctx_table);
J
Jens Axboe 已提交
893

894 895
	if (!table || id >= table->nr)
		goto out;
L
Linus Torvalds 已提交
896

897
	ctx = table->table[id];
898
	if (ctx && ctx->user_id == ctx_id) {
899 900 901 902
		percpu_ref_get(&ctx->users);
		ret = ctx;
	}
out:
J
Jens Axboe 已提交
903
	rcu_read_unlock();
904
	return ret;
L
Linus Torvalds 已提交
905 906 907 908 909
}

/* aio_complete
 *	Called when the io request on the given iocb is complete.
 */
910
void aio_complete(struct kiocb *iocb, long res, long res2)
L
Linus Torvalds 已提交
911 912 913
{
	struct kioctx	*ctx = iocb->ki_ctx;
	struct aio_ring	*ring;
K
Kent Overstreet 已提交
914
	struct io_event	*ev_page, *event;
L
Linus Torvalds 已提交
915
	unsigned long	flags;
K
Kent Overstreet 已提交
916
	unsigned tail, pos;
L
Linus Torvalds 已提交
917

918 919 920 921 922 923
	/*
	 * Special case handling for sync iocbs:
	 *  - events go directly into the iocb for fast handling
	 *  - the sync task with the iocb in its stack holds the single iocb
	 *    ref, no other paths have a way to get another ref
	 *  - the sync task helpfully left a reference to itself in the iocb
L
Linus Torvalds 已提交
924 925 926
	 */
	if (is_sync_kiocb(iocb)) {
		iocb->ki_user_data = res;
K
Kent Overstreet 已提交
927 928
		smp_wmb();
		iocb->ki_ctx = ERR_PTR(-EXDEV);
L
Linus Torvalds 已提交
929
		wake_up_process(iocb->ki_obj.tsk);
930
		return;
L
Linus Torvalds 已提交
931 932
	}

K
Kent Overstreet 已提交
933 934
	/*
	 * Take rcu_read_lock() in case the kioctx is being destroyed, as we
935
	 * need to issue a wakeup after incrementing reqs_available.
L
Linus Torvalds 已提交
936
	 */
K
Kent Overstreet 已提交
937
	rcu_read_lock();
L
Linus Torvalds 已提交
938

939 940 941 942 943 944 945
	if (iocb->ki_list.next) {
		unsigned long flags;

		spin_lock_irqsave(&ctx->ctx_lock, flags);
		list_del(&iocb->ki_list);
		spin_unlock_irqrestore(&ctx->ctx_lock, flags);
	}
946

947 948
	/*
	 * Add a completion event to the ring buffer. Must be done holding
949
	 * ctx->completion_lock to prevent other code from messing with the tail
950 951 952 953
	 * pointer since we might be called from irq context.
	 */
	spin_lock_irqsave(&ctx->completion_lock, flags);

K
Kent Overstreet 已提交
954
	tail = ctx->tail;
K
Kent Overstreet 已提交
955 956
	pos = tail + AIO_EVENTS_OFFSET;

K
Kent Overstreet 已提交
957
	if (++tail >= ctx->nr_events)
958
		tail = 0;
L
Linus Torvalds 已提交
959

K
Kent Overstreet 已提交
960
	ev_page = kmap_atomic(ctx->ring_pages[pos / AIO_EVENTS_PER_PAGE]);
K
Kent Overstreet 已提交
961 962
	event = ev_page + pos % AIO_EVENTS_PER_PAGE;

L
Linus Torvalds 已提交
963 964 965 966 967
	event->obj = (u64)(unsigned long)iocb->ki_obj.user;
	event->data = iocb->ki_user_data;
	event->res = res;
	event->res2 = res2;

K
Kent Overstreet 已提交
968
	kunmap_atomic(ev_page);
K
Kent Overstreet 已提交
969
	flush_dcache_page(ctx->ring_pages[pos / AIO_EVENTS_PER_PAGE]);
K
Kent Overstreet 已提交
970 971

	pr_debug("%p[%u]: %p: %p %Lx %lx %lx\n",
K
Kent Overstreet 已提交
972 973
		 ctx, tail, iocb, iocb->ki_obj.user, iocb->ki_user_data,
		 res, res2);
L
Linus Torvalds 已提交
974 975 976 977 978 979

	/* after flagging the request as done, we
	 * must never even look at it again
	 */
	smp_wmb();	/* make event visible before updating tail */

K
Kent Overstreet 已提交
980
	ctx->tail = tail;
L
Linus Torvalds 已提交
981

K
Kent Overstreet 已提交
982
	ring = kmap_atomic(ctx->ring_pages[0]);
K
Kent Overstreet 已提交
983
	ring->tail = tail;
984
	kunmap_atomic(ring);
K
Kent Overstreet 已提交
985
	flush_dcache_page(ctx->ring_pages[0]);
L
Linus Torvalds 已提交
986

987 988
	spin_unlock_irqrestore(&ctx->completion_lock, flags);

K
Kent Overstreet 已提交
989
	pr_debug("added to ring %p at [%u]\n", iocb, tail);
D
Davide Libenzi 已提交
990 991 992 993 994 995

	/*
	 * Check if the user asked us to deliver the result through an
	 * eventfd. The eventfd_signal() function is safe to be called
	 * from IRQ context.
	 */
996
	if (iocb->ki_eventfd != NULL)
D
Davide Libenzi 已提交
997 998
		eventfd_signal(iocb->ki_eventfd, 1);

L
Linus Torvalds 已提交
999
	/* everything turned out well, dispose of the aiocb. */
K
Kent Overstreet 已提交
1000
	kiocb_free(iocb);
L
Linus Torvalds 已提交
1001

1002 1003 1004 1005 1006 1007 1008 1009
	/*
	 * We have to order our ring_info tail store above and test
	 * of the wait list below outside the wait lock.  This is
	 * like in wake_up_bit() where clearing a bit has to be
	 * ordered with the unlocked test.
	 */
	smp_mb();

L
Linus Torvalds 已提交
1010 1011 1012
	if (waitqueue_active(&ctx->wait))
		wake_up(&ctx->wait);

K
Kent Overstreet 已提交
1013
	rcu_read_unlock();
L
Linus Torvalds 已提交
1014
}
1015
EXPORT_SYMBOL(aio_complete);
L
Linus Torvalds 已提交
1016

1017 1018 1019
/* aio_read_events
 *	Pull an event off of the ioctx's event ring.  Returns the number of
 *	events fetched
L
Linus Torvalds 已提交
1020
 */
1021 1022
static long aio_read_events_ring(struct kioctx *ctx,
				 struct io_event __user *event, long nr)
L
Linus Torvalds 已提交
1023 1024
{
	struct aio_ring *ring;
1025
	unsigned head, tail, pos;
1026 1027 1028
	long ret = 0;
	int copy_ret;

K
Kent Overstreet 已提交
1029
	mutex_lock(&ctx->ring_lock);
L
Linus Torvalds 已提交
1030

K
Kent Overstreet 已提交
1031
	ring = kmap_atomic(ctx->ring_pages[0]);
1032
	head = ring->head;
1033
	tail = ring->tail;
1034 1035
	kunmap_atomic(ring);

1036
	pr_debug("h%u t%u m%u\n", head, tail, ctx->nr_events);
L
Linus Torvalds 已提交
1037

1038
	if (head == tail)
L
Linus Torvalds 已提交
1039 1040
		goto out;

1041 1042 1043 1044 1045
	while (ret < nr) {
		long avail;
		struct io_event *ev;
		struct page *page;

1046 1047
		avail = (head <= tail ?  tail : ctx->nr_events) - head;
		if (head == tail)
1048 1049 1050 1051 1052 1053 1054
			break;

		avail = min(avail, nr - ret);
		avail = min_t(long, avail, AIO_EVENTS_PER_PAGE -
			    ((head + AIO_EVENTS_OFFSET) % AIO_EVENTS_PER_PAGE));

		pos = head + AIO_EVENTS_OFFSET;
K
Kent Overstreet 已提交
1055
		page = ctx->ring_pages[pos / AIO_EVENTS_PER_PAGE];
1056 1057 1058 1059 1060 1061 1062 1063 1064 1065 1066 1067 1068 1069
		pos %= AIO_EVENTS_PER_PAGE;

		ev = kmap(page);
		copy_ret = copy_to_user(event + ret, ev + pos,
					sizeof(*ev) * avail);
		kunmap(page);

		if (unlikely(copy_ret)) {
			ret = -EFAULT;
			goto out;
		}

		ret += avail;
		head += avail;
K
Kent Overstreet 已提交
1070
		head %= ctx->nr_events;
L
Linus Torvalds 已提交
1071 1072
	}

K
Kent Overstreet 已提交
1073
	ring = kmap_atomic(ctx->ring_pages[0]);
1074
	ring->head = head;
1075
	kunmap_atomic(ring);
K
Kent Overstreet 已提交
1076
	flush_dcache_page(ctx->ring_pages[0]);
1077

1078
	pr_debug("%li  h%u t%u\n", ret, head, tail);
1079

K
Kent Overstreet 已提交
1080
	put_reqs_available(ctx, ret);
1081
out:
K
Kent Overstreet 已提交
1082
	mutex_unlock(&ctx->ring_lock);
1083

L
Linus Torvalds 已提交
1084 1085 1086
	return ret;
}

1087 1088
static bool aio_read_events(struct kioctx *ctx, long min_nr, long nr,
			    struct io_event __user *event, long *i)
L
Linus Torvalds 已提交
1089
{
1090
	long ret = aio_read_events_ring(ctx, event + *i, nr - *i);
L
Linus Torvalds 已提交
1091

1092 1093
	if (ret > 0)
		*i += ret;
L
Linus Torvalds 已提交
1094

1095 1096
	if (unlikely(atomic_read(&ctx->dead)))
		ret = -EINVAL;
L
Linus Torvalds 已提交
1097

1098 1099
	if (!*i)
		*i = ret;
L
Linus Torvalds 已提交
1100

1101
	return ret < 0 || *i >= min_nr;
L
Linus Torvalds 已提交
1102 1103
}

1104
static long read_events(struct kioctx *ctx, long min_nr, long nr,
L
Linus Torvalds 已提交
1105 1106 1107
			struct io_event __user *event,
			struct timespec __user *timeout)
{
1108 1109
	ktime_t until = { .tv64 = KTIME_MAX };
	long ret = 0;
L
Linus Torvalds 已提交
1110 1111 1112

	if (timeout) {
		struct timespec	ts;
1113

L
Linus Torvalds 已提交
1114
		if (unlikely(copy_from_user(&ts, timeout, sizeof(ts))))
1115
			return -EFAULT;
L
Linus Torvalds 已提交
1116

1117
		until = timespec_to_ktime(ts);
L
Linus Torvalds 已提交
1118 1119
	}

1120 1121 1122 1123 1124 1125 1126 1127 1128 1129 1130 1131 1132 1133 1134 1135
	/*
	 * Note that aio_read_events() is being called as the conditional - i.e.
	 * we're calling it after prepare_to_wait() has set task state to
	 * TASK_INTERRUPTIBLE.
	 *
	 * But aio_read_events() can block, and if it blocks it's going to flip
	 * the task state back to TASK_RUNNING.
	 *
	 * This should be ok, provided it doesn't flip the state back to
	 * TASK_RUNNING and return 0 too much - that causes us to spin. That
	 * will only happen if the mutex_lock() call blocks, and we then find
	 * the ringbuffer empty. So in practice we should be ok, but it's
	 * something to be aware of when touching this code.
	 */
	wait_event_interruptible_hrtimeout(ctx->wait,
			aio_read_events(ctx, min_nr, nr, event, &ret), until);
L
Linus Torvalds 已提交
1136

1137 1138
	if (!ret && signal_pending(current))
		ret = -EINTR;
L
Linus Torvalds 已提交
1139

1140
	return ret;
L
Linus Torvalds 已提交
1141 1142 1143 1144 1145 1146 1147 1148 1149 1150 1151 1152 1153 1154 1155
}

/* sys_io_setup:
 *	Create an aio_context capable of receiving at least nr_events.
 *	ctxp must not point to an aio_context that already exists, and
 *	must be initialized to 0 prior to the call.  On successful
 *	creation of the aio_context, *ctxp is filled in with the resulting 
 *	handle.  May fail with -EINVAL if *ctxp is not initialized,
 *	if the specified nr_events exceeds internal limits.  May fail 
 *	with -EAGAIN if the specified nr_events exceeds the user's limit 
 *	of available events.  May fail with -ENOMEM if insufficient kernel
 *	resources are available.  May fail with -EFAULT if an invalid
 *	pointer is passed for ctxp.  Will fail with -ENOSYS if not
 *	implemented.
 */
1156
SYSCALL_DEFINE2(io_setup, unsigned, nr_events, aio_context_t __user *, ctxp)
L
Linus Torvalds 已提交
1157 1158 1159 1160 1161 1162 1163 1164 1165 1166
{
	struct kioctx *ioctx = NULL;
	unsigned long ctx;
	long ret;

	ret = get_user(ctx, ctxp);
	if (unlikely(ret))
		goto out;

	ret = -EINVAL;
1167 1168 1169
	if (unlikely(ctx || nr_events == 0)) {
		pr_debug("EINVAL: io_setup: ctx %lu nr_events %u\n",
		         ctx, nr_events);
L
Linus Torvalds 已提交
1170 1171 1172 1173 1174 1175 1176
		goto out;
	}

	ioctx = ioctx_alloc(nr_events);
	ret = PTR_ERR(ioctx);
	if (!IS_ERR(ioctx)) {
		ret = put_user(ioctx->user_id, ctxp);
1177
		if (ret)
1178
			kill_ioctx(current->mm, ioctx);
K
Kent Overstreet 已提交
1179
		percpu_ref_put(&ioctx->users);
L
Linus Torvalds 已提交
1180 1181 1182 1183 1184 1185 1186 1187 1188
	}

out:
	return ret;
}

/* sys_io_destroy:
 *	Destroy the aio_context specified.  May cancel any outstanding 
 *	AIOs and block on completion.  Will fail with -ENOSYS if not
1189
 *	implemented.  May fail with -EINVAL if the context pointed to
L
Linus Torvalds 已提交
1190 1191
 *	is invalid.
 */
1192
SYSCALL_DEFINE1(io_destroy, aio_context_t, ctx)
L
Linus Torvalds 已提交
1193 1194 1195
{
	struct kioctx *ioctx = lookup_ioctx(ctx);
	if (likely(NULL != ioctx)) {
1196
		kill_ioctx(current->mm, ioctx);
K
Kent Overstreet 已提交
1197
		percpu_ref_put(&ioctx->users);
L
Linus Torvalds 已提交
1198 1199 1200 1201 1202 1203
		return 0;
	}
	pr_debug("EINVAL: io_destroy: invalid context id\n");
	return -EINVAL;
}

K
Kent Overstreet 已提交
1204 1205 1206
typedef ssize_t (aio_rw_op)(struct kiocb *, const struct iovec *,
			    unsigned long, loff_t);

1207 1208 1209 1210 1211
static ssize_t aio_setup_vectored_rw(struct kiocb *kiocb,
				     int rw, char __user *buf,
				     unsigned long *nr_segs,
				     struct iovec **iovec,
				     bool compat)
B
Badari Pulavarty 已提交
1212 1213 1214
{
	ssize_t ret;

1215
	*nr_segs = kiocb->ki_nbytes;
K
Kent Overstreet 已提交
1216

1217 1218
#ifdef CONFIG_COMPAT
	if (compat)
K
Kent Overstreet 已提交
1219
		ret = compat_rw_copy_check_uvector(rw,
1220 1221
				(struct compat_iovec __user *)buf,
				*nr_segs, 1, *iovec, iovec);
1222 1223
	else
#endif
K
Kent Overstreet 已提交
1224
		ret = rw_copy_check_uvector(rw,
1225 1226
				(struct iovec __user *)buf,
				*nr_segs, 1, *iovec, iovec);
B
Badari Pulavarty 已提交
1227
	if (ret < 0)
K
Kent Overstreet 已提交
1228
		return ret;
1229

K
Kent Overstreet 已提交
1230
	/* ki_nbytes now reflect bytes instead of segs */
B
Badari Pulavarty 已提交
1231
	kiocb->ki_nbytes = ret;
K
Kent Overstreet 已提交
1232
	return 0;
B
Badari Pulavarty 已提交
1233 1234
}

1235 1236 1237 1238
static ssize_t aio_setup_single_vector(struct kiocb *kiocb,
				       int rw, char __user *buf,
				       unsigned long *nr_segs,
				       struct iovec *iovec)
B
Badari Pulavarty 已提交
1239
{
1240
	if (unlikely(!access_ok(!rw, buf, kiocb->ki_nbytes)))
K
Kent Overstreet 已提交
1241
		return -EFAULT;
1242

1243 1244 1245
	iovec->iov_base = buf;
	iovec->iov_len = kiocb->ki_nbytes;
	*nr_segs = 1;
B
Badari Pulavarty 已提交
1246 1247 1248
	return 0;
}

L
Linus Torvalds 已提交
1249 1250 1251 1252 1253
/*
 * aio_setup_iocb:
 *	Performs the initial checks and aio retry method
 *	setup for the kiocb at the time of io submission.
 */
1254 1255
static ssize_t aio_run_iocb(struct kiocb *req, unsigned opcode,
			    char __user *buf, bool compat)
L
Linus Torvalds 已提交
1256
{
K
Kent Overstreet 已提交
1257 1258
	struct file *file = req->ki_filp;
	ssize_t ret;
1259
	unsigned long nr_segs;
K
Kent Overstreet 已提交
1260 1261 1262
	int rw;
	fmode_t mode;
	aio_rw_op *rw_op;
1263
	struct iovec inline_vec, *iovec = &inline_vec;
L
Linus Torvalds 已提交
1264

1265
	switch (opcode) {
L
Linus Torvalds 已提交
1266
	case IOCB_CMD_PREAD:
B
Badari Pulavarty 已提交
1267
	case IOCB_CMD_PREADV:
K
Kent Overstreet 已提交
1268 1269 1270 1271 1272 1273
		mode	= FMODE_READ;
		rw	= READ;
		rw_op	= file->f_op->aio_read;
		goto rw_common;

	case IOCB_CMD_PWRITE:
B
Badari Pulavarty 已提交
1274
	case IOCB_CMD_PWRITEV:
K
Kent Overstreet 已提交
1275 1276 1277 1278 1279 1280 1281 1282 1283 1284 1285
		mode	= FMODE_WRITE;
		rw	= WRITE;
		rw_op	= file->f_op->aio_write;
		goto rw_common;
rw_common:
		if (unlikely(!(file->f_mode & mode)))
			return -EBADF;

		if (!rw_op)
			return -EINVAL;

1286 1287 1288 1289 1290 1291
		ret = (opcode == IOCB_CMD_PREADV ||
		       opcode == IOCB_CMD_PWRITEV)
			? aio_setup_vectored_rw(req, rw, buf, &nr_segs,
						&iovec, compat)
			: aio_setup_single_vector(req, rw, buf, &nr_segs,
						  iovec);
B
Badari Pulavarty 已提交
1292
		if (ret)
K
Kent Overstreet 已提交
1293 1294 1295
			return ret;

		ret = rw_verify_area(rw, file, &req->ki_pos, req->ki_nbytes);
1296 1297 1298
		if (ret < 0) {
			if (iovec != &inline_vec)
				kfree(iovec);
K
Kent Overstreet 已提交
1299
			return ret;
1300
		}
K
Kent Overstreet 已提交
1301 1302 1303

		req->ki_nbytes = ret;

K
Kent Overstreet 已提交
1304 1305 1306 1307 1308 1309 1310 1311 1312 1313
		/* XXX: move/kill - rw_verify_area()? */
		/* This matches the pread()/pwrite() logic */
		if (req->ki_pos < 0) {
			ret = -EINVAL;
			break;
		}

		if (rw == WRITE)
			file_start_write(file);

1314
		ret = rw_op(req, iovec, nr_segs, req->ki_pos);
K
Kent Overstreet 已提交
1315 1316 1317

		if (rw == WRITE)
			file_end_write(file);
L
Linus Torvalds 已提交
1318
		break;
K
Kent Overstreet 已提交
1319

L
Linus Torvalds 已提交
1320
	case IOCB_CMD_FDSYNC:
K
Kent Overstreet 已提交
1321 1322 1323 1324
		if (!file->f_op->aio_fsync)
			return -EINVAL;

		ret = file->f_op->aio_fsync(req, 1);
L
Linus Torvalds 已提交
1325
		break;
K
Kent Overstreet 已提交
1326

L
Linus Torvalds 已提交
1327
	case IOCB_CMD_FSYNC:
K
Kent Overstreet 已提交
1328 1329 1330 1331
		if (!file->f_op->aio_fsync)
			return -EINVAL;

		ret = file->f_op->aio_fsync(req, 0);
L
Linus Torvalds 已提交
1332
		break;
K
Kent Overstreet 已提交
1333

L
Linus Torvalds 已提交
1334
	default:
K
Kent Overstreet 已提交
1335
		pr_debug("EINVAL: no operation provided\n");
K
Kent Overstreet 已提交
1336
		return -EINVAL;
L
Linus Torvalds 已提交
1337 1338
	}

1339 1340 1341
	if (iovec != &inline_vec)
		kfree(iovec);

K
Kent Overstreet 已提交
1342 1343 1344 1345 1346 1347 1348 1349 1350 1351 1352
	if (ret != -EIOCBQUEUED) {
		/*
		 * There's no easy way to restart the syscall since other AIO's
		 * may be already running. Just fail this IO with EINTR.
		 */
		if (unlikely(ret == -ERESTARTSYS || ret == -ERESTARTNOINTR ||
			     ret == -ERESTARTNOHAND ||
			     ret == -ERESTART_RESTARTBLOCK))
			ret = -EINTR;
		aio_complete(req, ret, 0);
	}
L
Linus Torvalds 已提交
1353 1354 1355 1356

	return 0;
}

A
Adrian Bunk 已提交
1357
static int io_submit_one(struct kioctx *ctx, struct iocb __user *user_iocb,
K
Kent Overstreet 已提交
1358
			 struct iocb *iocb, bool compat)
L
Linus Torvalds 已提交
1359 1360 1361 1362 1363
{
	struct kiocb *req;
	ssize_t ret;

	/* enforce forwards compatibility on users */
1364
	if (unlikely(iocb->aio_reserved1 || iocb->aio_reserved2)) {
K
Kent Overstreet 已提交
1365
		pr_debug("EINVAL: reserve field set\n");
L
Linus Torvalds 已提交
1366 1367 1368 1369 1370 1371 1372 1373 1374 1375 1376 1377 1378
		return -EINVAL;
	}

	/* prevent overflows */
	if (unlikely(
	    (iocb->aio_buf != (unsigned long)iocb->aio_buf) ||
	    (iocb->aio_nbytes != (size_t)iocb->aio_nbytes) ||
	    ((ssize_t)iocb->aio_nbytes < 0)
	   )) {
		pr_debug("EINVAL: io_submit: overflow check\n");
		return -EINVAL;
	}

K
Kent Overstreet 已提交
1379
	req = aio_get_req(ctx);
1380
	if (unlikely(!req))
L
Linus Torvalds 已提交
1381
		return -EAGAIN;
1382 1383 1384 1385 1386

	req->ki_filp = fget(iocb->aio_fildes);
	if (unlikely(!req->ki_filp)) {
		ret = -EBADF;
		goto out_put_req;
L
Linus Torvalds 已提交
1387
	}
1388

1389 1390 1391 1392 1393 1394 1395
	if (iocb->aio_flags & IOCB_FLAG_RESFD) {
		/*
		 * If the IOCB_FLAG_RESFD flag of aio_flags is set, get an
		 * instance of the file* now. The file descriptor must be
		 * an eventfd() fd, and will be signaled for each completed
		 * event using the eventfd_signal() function.
		 */
1396
		req->ki_eventfd = eventfd_ctx_fdget((int) iocb->aio_resfd);
1397
		if (IS_ERR(req->ki_eventfd)) {
1398
			ret = PTR_ERR(req->ki_eventfd);
1399
			req->ki_eventfd = NULL;
1400 1401 1402
			goto out_put_req;
		}
	}
L
Linus Torvalds 已提交
1403

K
Kent Overstreet 已提交
1404
	ret = put_user(KIOCB_KEY, &user_iocb->aio_key);
L
Linus Torvalds 已提交
1405
	if (unlikely(ret)) {
K
Kent Overstreet 已提交
1406
		pr_debug("EFAULT: aio_key\n");
L
Linus Torvalds 已提交
1407 1408 1409 1410 1411 1412
		goto out_put_req;
	}

	req->ki_obj.user = user_iocb;
	req->ki_user_data = iocb->aio_data;
	req->ki_pos = iocb->aio_offset;
K
Kent Overstreet 已提交
1413
	req->ki_nbytes = iocb->aio_nbytes;
L
Linus Torvalds 已提交
1414

1415 1416 1417
	ret = aio_run_iocb(req, iocb->aio_lio_opcode,
			   (char __user *)(unsigned long)iocb->aio_buf,
			   compat);
Z
Zach Brown 已提交
1418
	if (ret)
1419
		goto out_put_req;
Z
Zach Brown 已提交
1420

L
Linus Torvalds 已提交
1421 1422
	return 0;
out_put_req:
K
Kent Overstreet 已提交
1423
	put_reqs_available(ctx, 1);
K
Kent Overstreet 已提交
1424
	kiocb_free(req);
L
Linus Torvalds 已提交
1425 1426 1427
	return ret;
}

1428 1429
long do_io_submit(aio_context_t ctx_id, long nr,
		  struct iocb __user *__user *iocbpp, bool compat)
L
Linus Torvalds 已提交
1430 1431 1432
{
	struct kioctx *ctx;
	long ret = 0;
J
Jeff Moyer 已提交
1433
	int i = 0;
S
Shaohua Li 已提交
1434
	struct blk_plug plug;
L
Linus Torvalds 已提交
1435 1436 1437 1438

	if (unlikely(nr < 0))
		return -EINVAL;

1439 1440 1441
	if (unlikely(nr > LONG_MAX/sizeof(*iocbpp)))
		nr = LONG_MAX/sizeof(*iocbpp);

L
Linus Torvalds 已提交
1442 1443 1444 1445 1446
	if (unlikely(!access_ok(VERIFY_READ, iocbpp, (nr*sizeof(*iocbpp)))))
		return -EFAULT;

	ctx = lookup_ioctx(ctx_id);
	if (unlikely(!ctx)) {
K
Kent Overstreet 已提交
1447
		pr_debug("EINVAL: invalid context id\n");
L
Linus Torvalds 已提交
1448 1449 1450
		return -EINVAL;
	}

S
Shaohua Li 已提交
1451 1452
	blk_start_plug(&plug);

L
Linus Torvalds 已提交
1453 1454 1455 1456 1457 1458 1459 1460 1461 1462 1463 1464 1465 1466 1467 1468 1469 1470
	/*
	 * AKPM: should this return a partial result if some of the IOs were
	 * successfully submitted?
	 */
	for (i=0; i<nr; i++) {
		struct iocb __user *user_iocb;
		struct iocb tmp;

		if (unlikely(__get_user(user_iocb, iocbpp + i))) {
			ret = -EFAULT;
			break;
		}

		if (unlikely(copy_from_user(&tmp, user_iocb, sizeof(tmp)))) {
			ret = -EFAULT;
			break;
		}

K
Kent Overstreet 已提交
1471
		ret = io_submit_one(ctx, user_iocb, &tmp, compat);
L
Linus Torvalds 已提交
1472 1473 1474
		if (ret)
			break;
	}
S
Shaohua Li 已提交
1475
	blk_finish_plug(&plug);
L
Linus Torvalds 已提交
1476

K
Kent Overstreet 已提交
1477
	percpu_ref_put(&ctx->users);
L
Linus Torvalds 已提交
1478 1479 1480
	return i ? i : ret;
}

1481 1482 1483 1484 1485 1486 1487 1488 1489 1490 1491 1492 1493 1494 1495 1496 1497 1498
/* sys_io_submit:
 *	Queue the nr iocbs pointed to by iocbpp for processing.  Returns
 *	the number of iocbs queued.  May return -EINVAL if the aio_context
 *	specified by ctx_id is invalid, if nr is < 0, if the iocb at
 *	*iocbpp[0] is not properly initialized, if the operation specified
 *	is invalid for the file descriptor in the iocb.  May fail with
 *	-EFAULT if any of the data structures point to invalid data.  May
 *	fail with -EBADF if the file descriptor specified in the first
 *	iocb is invalid.  May fail with -EAGAIN if insufficient resources
 *	are available to queue any iocbs.  Will return 0 if nr is 0.  Will
 *	fail with -ENOSYS if not implemented.
 */
SYSCALL_DEFINE3(io_submit, aio_context_t, ctx_id, long, nr,
		struct iocb __user * __user *, iocbpp)
{
	return do_io_submit(ctx_id, nr, iocbpp, 0);
}

L
Linus Torvalds 已提交
1499 1500 1501
/* lookup_kiocb
 *	Finds a given iocb for cancellation.
 */
1502 1503
static struct kiocb *lookup_kiocb(struct kioctx *ctx, struct iocb __user *iocb,
				  u32 key)
L
Linus Torvalds 已提交
1504 1505
{
	struct list_head *pos;
1506 1507 1508

	assert_spin_locked(&ctx->ctx_lock);

K
Kent Overstreet 已提交
1509 1510 1511
	if (key != KIOCB_KEY)
		return NULL;

L
Linus Torvalds 已提交
1512 1513 1514
	/* TODO: use a hash or array, this sucks. */
	list_for_each(pos, &ctx->active_reqs) {
		struct kiocb *kiocb = list_kiocb(pos);
K
Kent Overstreet 已提交
1515
		if (kiocb->ki_obj.user == iocb)
L
Linus Torvalds 已提交
1516 1517 1518 1519 1520 1521 1522 1523 1524 1525 1526 1527 1528 1529 1530
			return kiocb;
	}
	return NULL;
}

/* sys_io_cancel:
 *	Attempts to cancel an iocb previously passed to io_submit.  If
 *	the operation is successfully cancelled, the resulting event is
 *	copied into the memory pointed to by result without being placed
 *	into the completion queue and 0 is returned.  May fail with
 *	-EFAULT if any of the data structures pointed to are invalid.
 *	May fail with -EINVAL if aio_context specified by ctx_id is
 *	invalid.  May fail with -EAGAIN if the iocb specified was not
 *	cancelled.  Will fail with -ENOSYS if not implemented.
 */
1531 1532
SYSCALL_DEFINE3(io_cancel, aio_context_t, ctx_id, struct iocb __user *, iocb,
		struct io_event __user *, result)
L
Linus Torvalds 已提交
1533 1534 1535 1536 1537 1538 1539 1540 1541 1542 1543 1544 1545 1546 1547
{
	struct kioctx *ctx;
	struct kiocb *kiocb;
	u32 key;
	int ret;

	ret = get_user(key, &iocb->aio_key);
	if (unlikely(ret))
		return -EFAULT;

	ctx = lookup_ioctx(ctx_id);
	if (unlikely(!ctx))
		return -EINVAL;

	spin_lock_irq(&ctx->ctx_lock);
K
Kent Overstreet 已提交
1548

L
Linus Torvalds 已提交
1549
	kiocb = lookup_kiocb(ctx, iocb, key);
K
Kent Overstreet 已提交
1550
	if (kiocb)
1551
		ret = kiocb_cancel(ctx, kiocb);
K
Kent Overstreet 已提交
1552 1553 1554
	else
		ret = -EINVAL;

L
Linus Torvalds 已提交
1555 1556
	spin_unlock_irq(&ctx->ctx_lock);

K
Kent Overstreet 已提交
1557
	if (!ret) {
1558 1559 1560 1561
		/*
		 * The result argument is no longer used - the io_event is
		 * always delivered via the ring buffer. -EINPROGRESS indicates
		 * cancellation is progress:
K
Kent Overstreet 已提交
1562
		 */
1563
		ret = -EINPROGRESS;
K
Kent Overstreet 已提交
1564
	}
L
Linus Torvalds 已提交
1565

K
Kent Overstreet 已提交
1566
	percpu_ref_put(&ctx->users);
L
Linus Torvalds 已提交
1567 1568 1569 1570 1571 1572

	return ret;
}

/* io_getevents:
 *	Attempts to read at least min_nr events and up to nr events from
1573 1574 1575 1576 1577 1578 1579 1580
 *	the completion queue for the aio_context specified by ctx_id. If
 *	it succeeds, the number of read events is returned. May fail with
 *	-EINVAL if ctx_id is invalid, if min_nr is out of range, if nr is
 *	out of range, if timeout is out of range.  May fail with -EFAULT
 *	if any of the memory specified is invalid.  May return 0 or
 *	< min_nr if the timeout specified by timeout has elapsed
 *	before sufficient events are available, where timeout == NULL
 *	specifies an infinite timeout. Note that the timeout pointed to by
J
Jeff Moyer 已提交
1581
 *	timeout is relative.  Will fail with -ENOSYS if not implemented.
L
Linus Torvalds 已提交
1582
 */
1583 1584 1585 1586 1587
SYSCALL_DEFINE5(io_getevents, aio_context_t, ctx_id,
		long, min_nr,
		long, nr,
		struct io_event __user *, events,
		struct timespec __user *, timeout)
L
Linus Torvalds 已提交
1588 1589 1590 1591 1592
{
	struct kioctx *ioctx = lookup_ioctx(ctx_id);
	long ret = -EINVAL;

	if (likely(ioctx)) {
N
Namhyung Kim 已提交
1593
		if (likely(min_nr <= nr && min_nr >= 0))
L
Linus Torvalds 已提交
1594
			ret = read_events(ioctx, min_nr, nr, events, timeout);
K
Kent Overstreet 已提交
1595
		percpu_ref_put(&ioctx->users);
L
Linus Torvalds 已提交
1596 1597 1598
	}
	return ret;
}