mqueue.c 39.1 KB
Newer Older
L
Linus Torvalds 已提交
1 2 3 4
/*
 * POSIX message queues filesystem for Linux.
 *
 * Copyright (C) 2003,2004  Krzysztof Benedyczak    (golbi@mat.uni.torun.pl)
5
 *                          Michal Wronski          (michal.wronski@gmail.com)
L
Linus Torvalds 已提交
6 7 8
 *
 * Spinlocks:               Mohamed Abbas           (abbas.mohamed@intel.com)
 * Lockless receive & send, fd based notify:
M
Manfred Spraul 已提交
9
 *			    Manfred Spraul	    (manfred@colorfullife.com)
L
Linus Torvalds 已提交
10
 *
11 12
 * Audit:                   George Wilson           (ltcgcw@us.ibm.com)
 *
L
Linus Torvalds 已提交
13 14 15
 * This file is released under the GPL.
 */

16
#include <linux/capability.h>
L
Linus Torvalds 已提交
17 18 19 20 21 22 23 24 25 26
#include <linux/init.h>
#include <linux/pagemap.h>
#include <linux/file.h>
#include <linux/mount.h>
#include <linux/namei.h>
#include <linux/sysctl.h>
#include <linux/poll.h>
#include <linux/mqueue.h>
#include <linux/msg.h>
#include <linux/skbuff.h>
27
#include <linux/vmalloc.h>
L
Linus Torvalds 已提交
28 29
#include <linux/netlink.h>
#include <linux/syscalls.h>
30
#include <linux/audit.h>
31
#include <linux/signal.h>
I
Ingo Molnar 已提交
32
#include <linux/mutex.h>
33 34
#include <linux/nsproxy.h>
#include <linux/pid.h>
35
#include <linux/ipc_namespace.h>
36
#include <linux/user_namespace.h>
37
#include <linux/slab.h>
38
#include <linux/sched/wake_q.h>
39
#include <linux/sched/signal.h>
40
#include <linux/sched/user.h>
I
Ingo Molnar 已提交
41

L
Linus Torvalds 已提交
42 43 44 45 46 47 48 49 50 51 52
#include <net/sock.h>
#include "util.h"

#define MQUEUE_MAGIC	0x19800202
#define DIRENT_SIZE	20
#define FILENT_SIZE	80

#define SEND		0
#define RECV		1

#define STATE_NONE	0
53
#define STATE_READY	1
L
Linus Torvalds 已提交
54

55 56 57 58 59 60
struct posix_msg_tree_node {
	struct rb_node		rb_node;
	struct list_head	msg_list;
	int			priority;
};

L
Linus Torvalds 已提交
61 62 63 64 65 66 67 68 69 70 71 72
struct ext_wait_queue {		/* queue of sleeping tasks */
	struct task_struct *task;
	struct list_head list;
	struct msg_msg *msg;	/* ptr of loaded message */
	int state;		/* one of STATE_* values */
};

struct mqueue_inode_info {
	spinlock_t lock;
	struct inode vfs_inode;
	wait_queue_head_t wait_q;

73
	struct rb_root msg_tree;
74
	struct posix_msg_tree_node *node_cache;
L
Linus Torvalds 已提交
75 76 77
	struct mq_attr attr;

	struct sigevent notify;
M
Manfred Spraul 已提交
78
	struct pid *notify_owner;
79
	struct user_namespace *notify_user_ns;
80
	struct user_struct *user;	/* user who created, for accounting */
L
Linus Torvalds 已提交
81 82 83 84 85 86 87 88 89
	struct sock *notify_sock;
	struct sk_buff *notify_cookie;

	/* for tasks waiting for free space and messages, respectively */
	struct ext_wait_queue e_wait_q[2];

	unsigned long qsize; /* size of queue in memory (sum of all msgs) */
};

90
static const struct inode_operations mqueue_dir_inode_operations;
91
static const struct file_operations mqueue_file_operations;
92
static const struct super_operations mqueue_super_ops;
L
Linus Torvalds 已提交
93 94
static void remove_notification(struct mqueue_inode_info *info);

95
static struct kmem_cache *mqueue_inode_cachep;
L
Linus Torvalds 已提交
96

M
Manfred Spraul 已提交
97
static struct ctl_table_header *mq_sysctl_table;
L
Linus Torvalds 已提交
98 99 100 101 102 103

static inline struct mqueue_inode_info *MQUEUE_I(struct inode *inode)
{
	return container_of(inode, struct mqueue_inode_info, vfs_inode);
}

104 105 106 107
/*
 * This routine should be called with the mq_lock held.
 */
static inline struct ipc_namespace *__get_ns_from_inode(struct inode *inode)
108
{
109
	return get_ipc_ns(inode->i_sb->s_fs_info);
110 111
}

112
static struct ipc_namespace *get_ns_from_inode(struct inode *inode)
113
{
114 115 116 117 118 119
	struct ipc_namespace *ns;

	spin_lock(&mq_lock);
	ns = __get_ns_from_inode(inode);
	spin_unlock(&mq_lock);
	return ns;
120 121
}

122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139
/* Auxiliary functions to manipulate messages' list */
static int msg_insert(struct msg_msg *msg, struct mqueue_inode_info *info)
{
	struct rb_node **p, *parent = NULL;
	struct posix_msg_tree_node *leaf;

	p = &info->msg_tree.rb_node;
	while (*p) {
		parent = *p;
		leaf = rb_entry(parent, struct posix_msg_tree_node, rb_node);

		if (likely(leaf->priority == msg->m_type))
			goto insert_msg;
		else if (msg->m_type < leaf->priority)
			p = &(*p)->rb_left;
		else
			p = &(*p)->rb_right;
	}
140 141 142 143 144 145 146 147 148
	if (info->node_cache) {
		leaf = info->node_cache;
		info->node_cache = NULL;
	} else {
		leaf = kmalloc(sizeof(*leaf), GFP_ATOMIC);
		if (!leaf)
			return -ENOMEM;
		INIT_LIST_HEAD(&leaf->msg_list);
	}
149 150 151 152 153 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
	leaf->priority = msg->m_type;
	rb_link_node(&leaf->rb_node, parent, p);
	rb_insert_color(&leaf->rb_node, &info->msg_tree);
insert_msg:
	info->attr.mq_curmsgs++;
	info->qsize += msg->m_ts;
	list_add_tail(&msg->m_list, &leaf->msg_list);
	return 0;
}

static inline struct msg_msg *msg_get(struct mqueue_inode_info *info)
{
	struct rb_node **p, *parent = NULL;
	struct posix_msg_tree_node *leaf;
	struct msg_msg *msg;

try_again:
	p = &info->msg_tree.rb_node;
	while (*p) {
		parent = *p;
		/*
		 * During insert, low priorities go to the left and high to the
		 * right.  On receive, we want the highest priorities first, so
		 * walk all the way to the right.
		 */
		p = &(*p)->rb_right;
	}
	if (!parent) {
		if (info->attr.mq_curmsgs) {
			pr_warn_once("Inconsistency in POSIX message queue, "
				     "no tree element, but supposedly messages "
				     "should exist!\n");
			info->attr.mq_curmsgs = 0;
		}
		return NULL;
	}
	leaf = rb_entry(parent, struct posix_msg_tree_node, rb_node);
186
	if (unlikely(list_empty(&leaf->msg_list))) {
187 188 189 190
		pr_warn_once("Inconsistency in POSIX message queue, "
			     "empty leaf node but we haven't implemented "
			     "lazy leaf delete!\n");
		rb_erase(&leaf->rb_node, &info->msg_tree);
191 192 193 194 195
		if (info->node_cache) {
			kfree(leaf);
		} else {
			info->node_cache = leaf;
		}
196 197 198 199 200 201 202
		goto try_again;
	} else {
		msg = list_first_entry(&leaf->msg_list,
				       struct msg_msg, m_list);
		list_del(&msg->m_list);
		if (list_empty(&leaf->msg_list)) {
			rb_erase(&leaf->rb_node, &info->msg_tree);
203 204 205 206 207
			if (info->node_cache) {
				kfree(leaf);
			} else {
				info->node_cache = leaf;
			}
208 209 210 211 212 213 214
		}
	}
	info->attr.mq_curmsgs--;
	info->qsize -= msg->m_ts;
	return msg;
}

215
static struct inode *mqueue_get_inode(struct super_block *sb,
A
Al Viro 已提交
216
		struct ipc_namespace *ipc_ns, umode_t mode,
217
		struct mq_attr *attr)
L
Linus Torvalds 已提交
218
{
219
	struct user_struct *u = current_user();
L
Linus Torvalds 已提交
220
	struct inode *inode;
221
	int ret = -ENOMEM;
L
Linus Torvalds 已提交
222 223

	inode = new_inode(sb);
224 225 226 227 228 229 230
	if (!inode)
		goto err;

	inode->i_ino = get_next_ino();
	inode->i_mode = mode;
	inode->i_uid = current_fsuid();
	inode->i_gid = current_fsgid();
231
	inode->i_mtime = inode->i_ctime = inode->i_atime = current_time(inode);
232 233 234

	if (S_ISREG(mode)) {
		struct mqueue_inode_info *info;
235
		unsigned long mq_bytes, mq_treesize;
236 237 238 239 240 241 242 243 244 245

		inode->i_fop = &mqueue_file_operations;
		inode->i_size = FILENT_SIZE;
		/* mqueue specific info */
		info = MQUEUE_I(inode);
		spin_lock_init(&info->lock);
		init_waitqueue_head(&info->wait_q);
		INIT_LIST_HEAD(&info->e_wait_q[0].list);
		INIT_LIST_HEAD(&info->e_wait_q[1].list);
		info->notify_owner = NULL;
246
		info->notify_user_ns = NULL;
247 248
		info->qsize = 0;
		info->user = NULL;	/* set when all is ok */
249
		info->msg_tree = RB_ROOT;
250
		info->node_cache = NULL;
251
		memset(&info->attr, 0, sizeof(info->attr));
252 253 254 255
		info->attr.mq_maxmsg = min(ipc_ns->mq_msg_max,
					   ipc_ns->mq_msg_default);
		info->attr.mq_msgsize = min(ipc_ns->mq_msgsize_max,
					    ipc_ns->mq_msgsize_default);
256 257 258 259
		if (attr) {
			info->attr.mq_maxmsg = attr->mq_maxmsg;
			info->attr.mq_msgsize = attr->mq_msgsize;
		}
260 261 262 263 264 265 266 267 268 269 270 271 272
		/*
		 * We used to allocate a static array of pointers and account
		 * the size of that array as well as one msg_msg struct per
		 * possible message into the queue size. That's no longer
		 * accurate as the queue is now an rbtree and will grow and
		 * shrink depending on usage patterns.  We can, however, still
		 * account one msg_msg struct per message, but the nodes are
		 * allocated depending on priority usage, and most programs
		 * only use one, or a handful, of priorities.  However, since
		 * this is pinned memory, we need to assume worst case, so
		 * that means the min(mq_maxmsg, max_priorities) * struct
		 * posix_msg_tree_node.
		 */
273 274 275 276 277 278 279 280 281 282 283 284 285 286 287 288 289

		ret = -EINVAL;
		if (info->attr.mq_maxmsg <= 0 || info->attr.mq_msgsize <= 0)
			goto out_inode;
		if (capable(CAP_SYS_RESOURCE)) {
			if (info->attr.mq_maxmsg > HARD_MSGMAX ||
			    info->attr.mq_msgsize > HARD_MSGSIZEMAX)
				goto out_inode;
		} else {
			if (info->attr.mq_maxmsg > ipc_ns->mq_msg_max ||
					info->attr.mq_msgsize > ipc_ns->mq_msgsize_max)
				goto out_inode;
		}
		ret = -EOVERFLOW;
		/* check for overflow */
		if (info->attr.mq_msgsize > ULONG_MAX/info->attr.mq_maxmsg)
			goto out_inode;
290 291 292
		mq_treesize = info->attr.mq_maxmsg * sizeof(struct msg_msg) +
			min_t(unsigned int, info->attr.mq_maxmsg, MQ_PRIO_MAX) *
			sizeof(struct posix_msg_tree_node);
293 294 295 296
		mq_bytes = info->attr.mq_maxmsg * info->attr.mq_msgsize;
		if (mq_bytes + mq_treesize < mq_bytes)
			goto out_inode;
		mq_bytes += mq_treesize;
297 298
		spin_lock(&mq_lock);
		if (u->mq_bytes + mq_bytes < u->mq_bytes ||
299
		    u->mq_bytes + mq_bytes > rlimit(RLIMIT_MSGQUEUE)) {
300 301
			spin_unlock(&mq_lock);
			/* mqueue_evict_inode() releases info->messages */
302
			ret = -EMFILE;
303
			goto out_inode;
L
Linus Torvalds 已提交
304
		}
305 306 307 308 309 310 311 312 313 314 315
		u->mq_bytes += mq_bytes;
		spin_unlock(&mq_lock);

		/* all is ok */
		info->user = get_uid(u);
	} else if (S_ISDIR(mode)) {
		inc_nlink(inode);
		/* Some things misbehave if size == 0 on a directory */
		inode->i_size = 2 * DIRENT_SIZE;
		inode->i_op = &mqueue_dir_inode_operations;
		inode->i_fop = &simple_dir_operations;
L
Linus Torvalds 已提交
316
	}
317

L
Linus Torvalds 已提交
318 319 320
	return inode;
out_inode:
	iput(inode);
321
err:
322
	return ERR_PTR(ret);
L
Linus Torvalds 已提交
323 324 325 326 327
}

static int mqueue_fill_super(struct super_block *sb, void *data, int silent)
{
	struct inode *inode;
328
	struct ipc_namespace *ns = sb->s_fs_info;
L
Linus Torvalds 已提交
329

330
	sb->s_iflags |= SB_I_NOEXEC | SB_I_NODEV;
331 332
	sb->s_blocksize = PAGE_SIZE;
	sb->s_blocksize_bits = PAGE_SHIFT;
L
Linus Torvalds 已提交
333 334 335
	sb->s_magic = MQUEUE_MAGIC;
	sb->s_op = &mqueue_super_ops;

336 337 338
	inode = mqueue_get_inode(sb, ns, S_IFDIR | S_ISVTX | S_IRWXUGO, NULL);
	if (IS_ERR(inode))
		return PTR_ERR(inode);
L
Linus Torvalds 已提交
339

340 341 342 343
	sb->s_root = d_make_root(inode);
	if (!sb->s_root)
		return -ENOMEM;
	return 0;
L
Linus Torvalds 已提交
344 345
}

A
Al Viro 已提交
346
static struct dentry *mqueue_mount(struct file_system_type *fs_type,
347
			 int flags, const char *dev_name,
A
Al Viro 已提交
348
			 void *data)
L
Linus Torvalds 已提交
349
{
350
	struct ipc_namespace *ns;
351
	if (flags & SB_KERNMOUNT) {
352 353 354 355
		ns = data;
		data = NULL;
	} else {
		ns = current->nsproxy->ipc_ns;
356
	}
357
	return mount_ns(fs_type, flags, data, ns, ns->user_ns, mqueue_fill_super);
L
Linus Torvalds 已提交
358 359
}

360
static void init_once(void *foo)
L
Linus Torvalds 已提交
361 362 363
{
	struct mqueue_inode_info *p = (struct mqueue_inode_info *) foo;

C
Christoph Lameter 已提交
364
	inode_init_once(&p->vfs_inode);
L
Linus Torvalds 已提交
365 366 367 368 369 370
}

static struct inode *mqueue_alloc_inode(struct super_block *sb)
{
	struct mqueue_inode_info *ei;

371
	ei = kmem_cache_alloc(mqueue_inode_cachep, GFP_KERNEL);
L
Linus Torvalds 已提交
372 373 374 375 376
	if (!ei)
		return NULL;
	return &ei->vfs_inode;
}

N
Nick Piggin 已提交
377
static void mqueue_i_callback(struct rcu_head *head)
L
Linus Torvalds 已提交
378
{
N
Nick Piggin 已提交
379
	struct inode *inode = container_of(head, struct inode, i_rcu);
L
Linus Torvalds 已提交
380 381 382
	kmem_cache_free(mqueue_inode_cachep, MQUEUE_I(inode));
}

N
Nick Piggin 已提交
383 384 385 386 387
static void mqueue_destroy_inode(struct inode *inode)
{
	call_rcu(&inode->i_rcu, mqueue_i_callback);
}

A
Al Viro 已提交
388
static void mqueue_evict_inode(struct inode *inode)
L
Linus Torvalds 已提交
389 390 391
{
	struct mqueue_inode_info *info;
	struct user_struct *user;
392
	unsigned long mq_bytes, mq_treesize;
393
	struct ipc_namespace *ipc_ns;
394
	struct msg_msg *msg;
L
Linus Torvalds 已提交
395

396
	clear_inode(inode);
A
Al Viro 已提交
397 398

	if (S_ISDIR(inode->i_mode))
L
Linus Torvalds 已提交
399
		return;
A
Al Viro 已提交
400

401
	ipc_ns = get_ns_from_inode(inode);
L
Linus Torvalds 已提交
402 403
	info = MQUEUE_I(inode);
	spin_lock(&info->lock);
404 405
	while ((msg = msg_get(info)) != NULL)
		free_msg(msg);
406
	kfree(info->node_cache);
L
Linus Torvalds 已提交
407 408
	spin_unlock(&info->lock);

409
	/* Total amount of bytes accounted for the mqueue */
410 411 412 413 414 415 416
	mq_treesize = info->attr.mq_maxmsg * sizeof(struct msg_msg) +
		min_t(unsigned int, info->attr.mq_maxmsg, MQ_PRIO_MAX) *
		sizeof(struct posix_msg_tree_node);

	mq_bytes = mq_treesize + (info->attr.mq_maxmsg *
				  info->attr.mq_msgsize);

L
Linus Torvalds 已提交
417 418 419 420
	user = info->user;
	if (user) {
		spin_lock(&mq_lock);
		user->mq_bytes -= mq_bytes;
421 422 423 424 425 426 427 428
		/*
		 * get_ns_from_inode() ensures that the
		 * (ipc_ns = sb->s_fs_info) is either a valid ipc_ns
		 * to which we now hold a reference, or it is NULL.
		 * We can't put it here under mq_lock, though.
		 */
		if (ipc_ns)
			ipc_ns->mq_queues_count--;
L
Linus Torvalds 已提交
429 430 431
		spin_unlock(&mq_lock);
		free_uid(user);
	}
432 433
	if (ipc_ns)
		put_ipc_ns(ipc_ns);
L
Linus Torvalds 已提交
434 435
}

436
static int mqueue_create_attr(struct dentry *dentry, umode_t mode, void *arg)
L
Linus Torvalds 已提交
437
{
438
	struct inode *dir = dentry->d_parent->d_inode;
L
Linus Torvalds 已提交
439
	struct inode *inode;
440
	struct mq_attr *attr = arg;
L
Linus Torvalds 已提交
441
	int error;
442
	struct ipc_namespace *ipc_ns;
L
Linus Torvalds 已提交
443 444

	spin_lock(&mq_lock);
445 446 447 448 449
	ipc_ns = __get_ns_from_inode(dir);
	if (!ipc_ns) {
		error = -EACCES;
		goto out_unlock;
	}
450 451 452

	if (ipc_ns->mq_queues_count >= ipc_ns->mq_queues_max &&
	    !capable(CAP_SYS_RESOURCE)) {
L
Linus Torvalds 已提交
453
		error = -ENOSPC;
454
		goto out_unlock;
L
Linus Torvalds 已提交
455
	}
456
	ipc_ns->mq_queues_count++;
L
Linus Torvalds 已提交
457 458
	spin_unlock(&mq_lock);

459
	inode = mqueue_get_inode(dir->i_sb, ipc_ns, mode, attr);
460 461
	if (IS_ERR(inode)) {
		error = PTR_ERR(inode);
L
Linus Torvalds 已提交
462
		spin_lock(&mq_lock);
463 464
		ipc_ns->mq_queues_count--;
		goto out_unlock;
L
Linus Torvalds 已提交
465 466
	}

467
	put_ipc_ns(ipc_ns);
L
Linus Torvalds 已提交
468
	dir->i_size += DIRENT_SIZE;
469
	dir->i_ctime = dir->i_mtime = dir->i_atime = current_time(dir);
L
Linus Torvalds 已提交
470 471 472 473

	d_instantiate(dentry, inode);
	dget(dentry);
	return 0;
474
out_unlock:
L
Linus Torvalds 已提交
475
	spin_unlock(&mq_lock);
476 477
	if (ipc_ns)
		put_ipc_ns(ipc_ns);
L
Linus Torvalds 已提交
478 479 480
	return error;
}

481 482 483 484 485 486
static int mqueue_create(struct inode *dir, struct dentry *dentry,
				umode_t mode, bool excl)
{
	return mqueue_create_attr(dentry, mode, NULL);
}

L
Linus Torvalds 已提交
487 488
static int mqueue_unlink(struct inode *dir, struct dentry *dentry)
{
489
	struct inode *inode = d_inode(dentry);
L
Linus Torvalds 已提交
490

491
	dir->i_ctime = dir->i_mtime = dir->i_atime = current_time(dir);
L
Linus Torvalds 已提交
492
	dir->i_size -= DIRENT_SIZE;
M
Manfred Spraul 已提交
493 494 495
	drop_nlink(inode);
	dput(dentry);
	return 0;
L
Linus Torvalds 已提交
496 497 498 499 500 501 502 503 504 505
}

/*
*	This is routine for system read from queue file.
*	To avoid mess with doing here some sort of mq_receive we allow
*	to read only queue size & notification info (the only values
*	that are interesting from user point of view and aren't accessible
*	through std routines)
*/
static ssize_t mqueue_read_file(struct file *filp, char __user *u_data,
506
				size_t count, loff_t *off)
L
Linus Torvalds 已提交
507
{
A
Al Viro 已提交
508
	struct mqueue_inode_info *info = MQUEUE_I(file_inode(filp));
L
Linus Torvalds 已提交
509
	char buffer[FILENT_SIZE];
510
	ssize_t ret;
L
Linus Torvalds 已提交
511 512 513 514 515 516 517 518 519

	spin_lock(&info->lock);
	snprintf(buffer, sizeof(buffer),
			"QSIZE:%-10lu NOTIFY:%-5d SIGNO:%-5d NOTIFY_PID:%-6d\n",
			info->qsize,
			info->notify_owner ? info->notify.sigev_notify : 0,
			(info->notify_owner &&
			 info->notify.sigev_notify == SIGEV_SIGNAL) ?
				info->notify.sigev_signo : 0,
520
			pid_vnr(info->notify_owner));
L
Linus Torvalds 已提交
521 522 523
	spin_unlock(&info->lock);
	buffer[sizeof(buffer)-1] = '\0';

524 525 526 527
	ret = simple_read_from_buffer(u_data, count, off, buffer,
				strlen(buffer));
	if (ret <= 0)
		return ret;
L
Linus Torvalds 已提交
528

529
	file_inode(filp)->i_atime = file_inode(filp)->i_ctime = current_time(file_inode(filp));
530
	return ret;
L
Linus Torvalds 已提交
531 532
}

533
static int mqueue_flush_file(struct file *filp, fl_owner_t id)
L
Linus Torvalds 已提交
534
{
A
Al Viro 已提交
535
	struct mqueue_inode_info *info = MQUEUE_I(file_inode(filp));
L
Linus Torvalds 已提交
536 537

	spin_lock(&info->lock);
538
	if (task_tgid(current) == info->notify_owner)
L
Linus Torvalds 已提交
539 540 541 542 543 544 545 546
		remove_notification(info);

	spin_unlock(&info->lock);
	return 0;
}

static unsigned int mqueue_poll_file(struct file *filp, struct poll_table_struct *poll_tab)
{
A
Al Viro 已提交
547
	struct mqueue_inode_info *info = MQUEUE_I(file_inode(filp));
L
Linus Torvalds 已提交
548 549 550 551 552 553 554 555 556 557 558 559 560 561 562 563 564 565 566 567 568 569 570 571 572 573 574 575 576 577 578 579 580 581 582 583 584 585
	int retval = 0;

	poll_wait(filp, &info->wait_q, poll_tab);

	spin_lock(&info->lock);
	if (info->attr.mq_curmsgs)
		retval = POLLIN | POLLRDNORM;

	if (info->attr.mq_curmsgs < info->attr.mq_maxmsg)
		retval |= POLLOUT | POLLWRNORM;
	spin_unlock(&info->lock);

	return retval;
}

/* Adds current to info->e_wait_q[sr] before element with smaller prio */
static void wq_add(struct mqueue_inode_info *info, int sr,
			struct ext_wait_queue *ewp)
{
	struct ext_wait_queue *walk;

	ewp->task = current;

	list_for_each_entry(walk, &info->e_wait_q[sr].list, list) {
		if (walk->task->static_prio <= current->static_prio) {
			list_add_tail(&ewp->list, &walk->list);
			return;
		}
	}
	list_add_tail(&ewp->list, &info->e_wait_q[sr].list);
}

/*
 * Puts current task to sleep. Caller must hold queue lock. After return
 * lock isn't held.
 * sr: SEND or RECV
 */
static int wq_sleep(struct mqueue_inode_info *info, int sr,
586
		    ktime_t *timeout, struct ext_wait_queue *ewp)
587
	__releases(&info->lock)
L
Linus Torvalds 已提交
588 589 590 591 592 593 594
{
	int retval;
	signed long time;

	wq_add(info, sr, ewp);

	for (;;) {
595
		__set_current_state(TASK_INTERRUPTIBLE);
L
Linus Torvalds 已提交
596 597

		spin_unlock(&info->lock);
598 599
		time = schedule_hrtimeout_range_clock(timeout, 0,
			HRTIMER_MODE_ABS, CLOCK_REALTIME);
L
Linus Torvalds 已提交
600 601 602 603 604 605 606 607 608 609 610 611 612 613 614 615 616 617 618 619 620 621 622 623 624 625 626 627 628 629 630 631 632 633 634 635 636 637 638 639 640 641 642

		if (ewp->state == STATE_READY) {
			retval = 0;
			goto out;
		}
		spin_lock(&info->lock);
		if (ewp->state == STATE_READY) {
			retval = 0;
			goto out_unlock;
		}
		if (signal_pending(current)) {
			retval = -ERESTARTSYS;
			break;
		}
		if (time == 0) {
			retval = -ETIMEDOUT;
			break;
		}
	}
	list_del(&ewp->list);
out_unlock:
	spin_unlock(&info->lock);
out:
	return retval;
}

/*
 * Returns waiting task that should be serviced first or NULL if none exists
 */
static struct ext_wait_queue *wq_get_first_waiter(
		struct mqueue_inode_info *info, int sr)
{
	struct list_head *ptr;

	ptr = info->e_wait_q[sr].list.prev;
	if (ptr == &info->e_wait_q[sr].list)
		return NULL;
	return list_entry(ptr, struct ext_wait_queue, list);
}


static inline void set_cookie(struct sk_buff *skb, char code)
{
M
Manfred Spraul 已提交
643
	((char *)skb->data)[NOTIFY_COOKIE_LEN-1] = code;
L
Linus Torvalds 已提交
644 645 646 647 648 649 650 651 652 653 654 655 656 657 658 659 660 661 662 663 664 665 666 667 668
}

/*
 * The next function is only to split too long sys_mq_timedsend
 */
static void __do_notify(struct mqueue_inode_info *info)
{
	/* notification
	 * invoked when there is registered process and there isn't process
	 * waiting synchronously for message AND state of queue changed from
	 * empty to not empty. Here we are sure that no one is waiting
	 * synchronously. */
	if (info->notify_owner &&
	    info->attr.mq_curmsgs == 1) {
		struct siginfo sig_i;
		switch (info->notify.sigev_notify) {
		case SIGEV_NONE:
			break;
		case SIGEV_SIGNAL:
			/* sends signal */

			sig_i.si_signo = info->notify.sigev_signo;
			sig_i.si_errno = 0;
			sig_i.si_code = SI_MESGQ;
			sig_i.si_value = info->notify.sigev_value;
669 670
			/* map current pid/uid into info->owner's namespaces */
			rcu_read_lock();
671 672
			sig_i.si_pid = task_tgid_nr_ns(current,
						ns_of_pid(info->notify_owner));
673
			sig_i.si_uid = from_kuid_munged(info->notify_user_ns, current_uid());
674
			rcu_read_unlock();
L
Linus Torvalds 已提交
675

676 677
			kill_pid_info(info->notify.sigev_signo,
				      &sig_i, info->notify_owner);
L
Linus Torvalds 已提交
678 679 680
			break;
		case SIGEV_THREAD:
			set_cookie(info->notify_cookie, NOTIFY_WOKENUP);
681
			netlink_sendskb(info->notify_sock, info->notify_cookie);
L
Linus Torvalds 已提交
682 683 684
			break;
		}
		/* after notification unregisters process */
685
		put_pid(info->notify_owner);
686
		put_user_ns(info->notify_user_ns);
687
		info->notify_owner = NULL;
688
		info->notify_user_ns = NULL;
L
Linus Torvalds 已提交
689 690 691 692
	}
	wake_up(&info->wait_q);
}

693
static int prepare_timeout(const struct timespec __user *u_abs_timeout,
694
			   struct timespec64 *ts)
L
Linus Torvalds 已提交
695
{
696
	if (get_timespec64(ts, u_abs_timeout))
697
		return -EFAULT;
698
	if (!timespec64_valid(ts))
699 700
		return -EINVAL;
	return 0;
L
Linus Torvalds 已提交
701 702 703 704
}

static void remove_notification(struct mqueue_inode_info *info)
{
705
	if (info->notify_owner != NULL &&
L
Linus Torvalds 已提交
706 707
	    info->notify.sigev_notify == SIGEV_THREAD) {
		set_cookie(info->notify_cookie, NOTIFY_REMOVED);
708
		netlink_sendskb(info->notify_sock, info->notify_cookie);
L
Linus Torvalds 已提交
709
	}
710
	put_pid(info->notify_owner);
711
	put_user_ns(info->notify_user_ns);
712
	info->notify_owner = NULL;
713
	info->notify_user_ns = NULL;
L
Linus Torvalds 已提交
714 715
}

716 717
static int prepare_open(struct dentry *dentry, int oflag, int ro,
			umode_t mode, struct filename *name,
718
			struct mq_attr *attr)
L
Linus Torvalds 已提交
719
{
720 721
	static const int oflag2acc[O_ACCMODE] = { MAY_READ, MAY_WRITE,
						  MAY_READ | MAY_WRITE };
722
	int acc;
723 724 725 726 727 728 729 730 731 732 733 734 735 736 737 738 739 740 741 742 743

	if (oflag & O_CREAT) {
		if (d_really_is_positive(dentry)) {	/* entry already exists */
			audit_inode(name, dentry, 0);
			if (oflag & O_EXCL)
				return -EEXIST;
		} else {
			if (ro)
				return ro;

			audit_inode_parent_hidden(name, dentry->d_parent);
			return vfs_mkobj(dentry, mode & ~current_umask(),
				  mqueue_create_attr, attr);
		}
	} else {
		if (d_really_is_negative(dentry)) {
			return -ENOENT;
		} else {
			audit_inode(name, dentry, 0);
		}
	}
744
	if ((oflag & O_ACCMODE) == (O_RDWR | O_WRONLY))
745
		return -EINVAL;
746
	acc = oflag2acc[oflag & O_ACCMODE];
747
	return inode_permission(d_inode(dentry), acc);
L
Linus Torvalds 已提交
748 749
}

750 751
static int do_mq_open(const char __user *u_name, int oflag, umode_t mode,
		      struct mq_attr *attr)
L
Linus Torvalds 已提交
752
{
753
	struct path path;
754
	struct filename *name;
L
Linus Torvalds 已提交
755
	int fd, error;
756
	struct ipc_namespace *ipc_ns = current->nsproxy->ipc_ns;
757 758 759
	struct vfsmount *mnt = ipc_ns->mq_mnt;
	struct dentry *root = mnt->mnt_root;
	int ro;
L
Linus Torvalds 已提交
760

761
	audit_mq_open(oflag, mode, attr);
762

L
Linus Torvalds 已提交
763 764 765
	if (IS_ERR(name = getname(u_name)))
		return PTR_ERR(name);

U
Ulrich Drepper 已提交
766
	fd = get_unused_fd_flags(O_CLOEXEC);
L
Linus Torvalds 已提交
767 768 769
	if (fd < 0)
		goto out_putname;

770
	ro = mnt_want_write(mnt);	/* we'll drop it in any case */
771
	error = 0;
A
Al Viro 已提交
772
	inode_lock(d_inode(root));
773
	path.dentry = lookup_one_len(name->name, root, strlen(name->name));
774 775
	if (IS_ERR(path.dentry)) {
		error = PTR_ERR(path.dentry);
776
		goto out_putfd;
L
Linus Torvalds 已提交
777
	}
778
	path.mnt = mntget(mnt);
L
Linus Torvalds 已提交
779

780 781 782 783 784 785 786
	error = prepare_open(path.dentry, oflag, ro, mode, name, attr);
	if (!error) {
		struct file *file = dentry_open(&path, oflag, current_cred());
		if (!IS_ERR(file))
			fd_install(fd, file);
		else
			error = PTR_ERR(file);
787
	}
788
	path_put(&path);
789
out_putfd:
790 791 792 793
	if (error) {
		put_unused_fd(fd);
		fd = error;
	}
A
Al Viro 已提交
794
	inode_unlock(d_inode(root));
795 796
	if (!ro)
		mnt_drop_write(mnt);
L
Linus Torvalds 已提交
797 798 799 800 801
out_putname:
	putname(name);
	return fd;
}

802 803 804 805 806 807 808 809 810 811
SYSCALL_DEFINE4(mq_open, const char __user *, u_name, int, oflag, umode_t, mode,
		struct mq_attr __user *, u_attr)
{
	struct mq_attr attr;
	if (u_attr && copy_from_user(&attr, u_attr, sizeof(struct mq_attr)))
		return -EFAULT;

	return do_mq_open(u_name, oflag, mode, u_attr ? &attr : NULL);
}

812
SYSCALL_DEFINE1(mq_unlink, const char __user *, u_name)
L
Linus Torvalds 已提交
813 814
{
	int err;
815
	struct filename *name;
L
Linus Torvalds 已提交
816 817
	struct dentry *dentry;
	struct inode *inode = NULL;
818
	struct ipc_namespace *ipc_ns = current->nsproxy->ipc_ns;
819
	struct vfsmount *mnt = ipc_ns->mq_mnt;
L
Linus Torvalds 已提交
820 821 822 823 824

	name = getname(u_name);
	if (IS_ERR(name))
		return PTR_ERR(name);

825
	audit_inode_parent_hidden(name, mnt->mnt_root);
826 827 828
	err = mnt_want_write(mnt);
	if (err)
		goto out_name;
A
Al Viro 已提交
829
	inode_lock_nested(d_inode(mnt->mnt_root), I_MUTEX_PARENT);
830 831
	dentry = lookup_one_len(name->name, mnt->mnt_root,
				strlen(name->name));
L
Linus Torvalds 已提交
832 833 834 835 836
	if (IS_ERR(dentry)) {
		err = PTR_ERR(dentry);
		goto out_unlock;
	}

837
	inode = d_inode(dentry);
838 839 840
	if (!inode) {
		err = -ENOENT;
	} else {
A
Al Viro 已提交
841
		ihold(inode);
842
		err = vfs_unlink(d_inode(dentry->d_parent), dentry, NULL);
843
	}
L
Linus Torvalds 已提交
844 845 846
	dput(dentry);

out_unlock:
A
Al Viro 已提交
847
	inode_unlock(d_inode(mnt->mnt_root));
L
Linus Torvalds 已提交
848 849
	if (inode)
		iput(inode);
850 851 852
	mnt_drop_write(mnt);
out_name:
	putname(name);
L
Linus Torvalds 已提交
853 854 855 856 857 858 859 860 861 862

	return err;
}

/* Pipelined send and receive functions.
 *
 * If a receiver finds no waiting message, then it registers itself in the
 * list of waiting receivers. A sender checks that list before adding the new
 * message into the message array. If there is a waiting receiver, then it
 * bypasses the message array and directly hands the message over to the
863 864 865 866 867 868 869 870 871
 * receiver. The receiver accepts the message and returns without grabbing the
 * queue spinlock:
 *
 * - Set pointer to message.
 * - Queue the receiver task for later wakeup (without the info->lock).
 * - Update its state to STATE_READY. Now the receiver can continue.
 * - Wake up the process after the lock is dropped. Should the process wake up
 *   before this wakeup (due to a timeout or a signal) it will either see
 *   STATE_READY and continue or acquire the lock to check the state again.
L
Linus Torvalds 已提交
872 873 874 875 876 877 878
 *
 * The same algorithm is used for senders.
 */

/* pipelined_send() - send a message directly to the task waiting in
 * sys_mq_timedreceive() (without inserting message into a queue).
 */
879 880
static inline void pipelined_send(struct wake_q_head *wake_q,
				  struct mqueue_inode_info *info,
L
Linus Torvalds 已提交
881 882 883 884 885
				  struct msg_msg *message,
				  struct ext_wait_queue *receiver)
{
	receiver->msg = message;
	list_del(&receiver->list);
886 887 888 889 890 891 892 893 894
	wake_q_add(wake_q, receiver->task);
	/*
	 * Rely on the implicit cmpxchg barrier from wake_q_add such
	 * that we can ensure that updating receiver->state is the last
	 * write operation: As once set, the receiver can continue,
	 * and if we don't have the reference count from the wake_q,
	 * yet, at that point we can later have a use-after-free
	 * condition and bogus wakeup.
	 */
L
Linus Torvalds 已提交
895 896 897 898 899
	receiver->state = STATE_READY;
}

/* pipelined_receive() - if there is task waiting in sys_mq_timedsend()
 * gets its message and put to the queue (we have one free place for sure). */
900 901
static inline void pipelined_receive(struct wake_q_head *wake_q,
				     struct mqueue_inode_info *info)
L
Linus Torvalds 已提交
902 903 904 905 906 907 908 909
{
	struct ext_wait_queue *sender = wq_get_first_waiter(info, SEND);

	if (!sender) {
		/* for poll */
		wake_up_interruptible(&info->wait_q);
		return;
	}
910 911
	if (msg_insert(sender->msg, info))
		return;
912

L
Linus Torvalds 已提交
913
	list_del(&sender->list);
914
	wake_q_add(wake_q, sender->task);
L
Linus Torvalds 已提交
915 916 917
	sender->state = STATE_READY;
}

918 919
static int do_mq_timedsend(mqd_t mqdes, const char __user *u_msg_ptr,
		size_t msg_len, unsigned int msg_prio,
920
		struct timespec64 *ts)
L
Linus Torvalds 已提交
921
{
922
	struct fd f;
L
Linus Torvalds 已提交
923 924 925 926 927
	struct inode *inode;
	struct ext_wait_queue wait;
	struct ext_wait_queue *receiver;
	struct msg_msg *msg_ptr;
	struct mqueue_inode_info *info;
928
	ktime_t expires, *timeout = NULL;
929
	struct posix_msg_tree_node *new_leaf = NULL;
930
	int ret = 0;
931
	DEFINE_WAKE_Q(wake_q);
L
Linus Torvalds 已提交
932 933 934 935

	if (unlikely(msg_prio >= (unsigned long) MQ_PRIO_MAX))
		return -EINVAL;

936
	if (ts) {
937
		expires = timespec64_to_ktime(*ts);
938 939 940 941
		timeout = &expires;
	}

	audit_mq_sendrecv(mqdes, msg_len, msg_prio, ts);
L
Linus Torvalds 已提交
942

943 944
	f = fdget(mqdes);
	if (unlikely(!f.file)) {
945
		ret = -EBADF;
L
Linus Torvalds 已提交
946
		goto out;
947
	}
L
Linus Torvalds 已提交
948

A
Al Viro 已提交
949
	inode = file_inode(f.file);
950
	if (unlikely(f.file->f_op != &mqueue_file_operations)) {
951
		ret = -EBADF;
L
Linus Torvalds 已提交
952
		goto out_fput;
953
	}
L
Linus Torvalds 已提交
954
	info = MQUEUE_I(inode);
A
Al Viro 已提交
955
	audit_file(f.file);
L
Linus Torvalds 已提交
956

957
	if (unlikely(!(f.file->f_mode & FMODE_WRITE))) {
958
		ret = -EBADF;
L
Linus Torvalds 已提交
959
		goto out_fput;
960
	}
L
Linus Torvalds 已提交
961 962 963 964 965 966 967 968 969 970 971 972 973 974 975 976

	if (unlikely(msg_len > info->attr.mq_msgsize)) {
		ret = -EMSGSIZE;
		goto out_fput;
	}

	/* First try to allocate memory, before doing anything with
	 * existing queues. */
	msg_ptr = load_msg(u_msg_ptr, msg_len);
	if (IS_ERR(msg_ptr)) {
		ret = PTR_ERR(msg_ptr);
		goto out_fput;
	}
	msg_ptr->m_ts = msg_len;
	msg_ptr->m_type = msg_prio;

977 978 979 980 981 982 983 984
	/*
	 * msg_insert really wants us to have a valid, spare node struct so
	 * it doesn't have to kmalloc a GFP_ATOMIC allocation, but it will
	 * fall back to that if necessary.
	 */
	if (!info->node_cache)
		new_leaf = kmalloc(sizeof(*new_leaf), GFP_KERNEL);

L
Linus Torvalds 已提交
985 986
	spin_lock(&info->lock);

987 988 989 990 991 992 993 994 995
	if (!info->node_cache && new_leaf) {
		/* Save our speculative allocation into the cache */
		INIT_LIST_HEAD(&new_leaf->msg_list);
		info->node_cache = new_leaf;
		new_leaf = NULL;
	} else {
		kfree(new_leaf);
	}

L
Linus Torvalds 已提交
996
	if (info->attr.mq_curmsgs == info->attr.mq_maxmsg) {
997
		if (f.file->f_flags & O_NONBLOCK) {
L
Linus Torvalds 已提交
998 999 1000 1001 1002 1003
			ret = -EAGAIN;
		} else {
			wait.task = current;
			wait.msg = (void *) msg_ptr;
			wait.state = STATE_NONE;
			ret = wq_sleep(info, SEND, timeout, &wait);
1004 1005 1006 1007 1008
			/*
			 * wq_sleep must be called with info->lock held, and
			 * returns with the lock released
			 */
			goto out_free;
L
Linus Torvalds 已提交
1009 1010 1011 1012
		}
	} else {
		receiver = wq_get_first_waiter(info, RECV);
		if (receiver) {
1013
			pipelined_send(&wake_q, info, msg_ptr, receiver);
L
Linus Torvalds 已提交
1014 1015
		} else {
			/* adds message to the queue */
1016 1017 1018
			ret = msg_insert(msg_ptr, info);
			if (ret)
				goto out_unlock;
L
Linus Torvalds 已提交
1019 1020 1021
			__do_notify(info);
		}
		inode->i_atime = inode->i_mtime = inode->i_ctime =
1022
				current_time(inode);
L
Linus Torvalds 已提交
1023
	}
1024 1025
out_unlock:
	spin_unlock(&info->lock);
1026
	wake_up_q(&wake_q);
1027 1028 1029
out_free:
	if (ret)
		free_msg(msg_ptr);
L
Linus Torvalds 已提交
1030
out_fput:
1031
	fdput(f);
L
Linus Torvalds 已提交
1032 1033 1034 1035
out:
	return ret;
}

1036 1037
static int do_mq_timedreceive(mqd_t mqdes, char __user *u_msg_ptr,
		size_t msg_len, unsigned int __user *u_msg_prio,
1038
		struct timespec64 *ts)
L
Linus Torvalds 已提交
1039 1040 1041
{
	ssize_t ret;
	struct msg_msg *msg_ptr;
1042
	struct fd f;
L
Linus Torvalds 已提交
1043 1044 1045
	struct inode *inode;
	struct mqueue_inode_info *info;
	struct ext_wait_queue wait;
1046
	ktime_t expires, *timeout = NULL;
1047
	struct posix_msg_tree_node *new_leaf = NULL;
L
Linus Torvalds 已提交
1048

1049
	if (ts) {
1050
		expires = timespec64_to_ktime(*ts);
1051
		timeout = &expires;
A
Al Viro 已提交
1052
	}
1053

1054
	audit_mq_sendrecv(mqdes, msg_len, 0, ts);
L
Linus Torvalds 已提交
1055

1056 1057
	f = fdget(mqdes);
	if (unlikely(!f.file)) {
1058
		ret = -EBADF;
L
Linus Torvalds 已提交
1059
		goto out;
1060
	}
L
Linus Torvalds 已提交
1061

A
Al Viro 已提交
1062
	inode = file_inode(f.file);
1063
	if (unlikely(f.file->f_op != &mqueue_file_operations)) {
1064
		ret = -EBADF;
L
Linus Torvalds 已提交
1065
		goto out_fput;
1066
	}
L
Linus Torvalds 已提交
1067
	info = MQUEUE_I(inode);
A
Al Viro 已提交
1068
	audit_file(f.file);
L
Linus Torvalds 已提交
1069

1070
	if (unlikely(!(f.file->f_mode & FMODE_READ))) {
1071
		ret = -EBADF;
L
Linus Torvalds 已提交
1072
		goto out_fput;
1073
	}
L
Linus Torvalds 已提交
1074 1075 1076 1077 1078 1079 1080

	/* checks if buffer is big enough */
	if (unlikely(msg_len < info->attr.mq_msgsize)) {
		ret = -EMSGSIZE;
		goto out_fput;
	}

1081 1082 1083 1084 1085 1086 1087 1088
	/*
	 * msg_insert really wants us to have a valid, spare node struct so
	 * it doesn't have to kmalloc a GFP_ATOMIC allocation, but it will
	 * fall back to that if necessary.
	 */
	if (!info->node_cache)
		new_leaf = kmalloc(sizeof(*new_leaf), GFP_KERNEL);

L
Linus Torvalds 已提交
1089
	spin_lock(&info->lock);
1090 1091 1092 1093 1094 1095 1096 1097 1098

	if (!info->node_cache && new_leaf) {
		/* Save our speculative allocation into the cache */
		INIT_LIST_HEAD(&new_leaf->msg_list);
		info->node_cache = new_leaf;
	} else {
		kfree(new_leaf);
	}

L
Linus Torvalds 已提交
1099
	if (info->attr.mq_curmsgs == 0) {
1100
		if (f.file->f_flags & O_NONBLOCK) {
L
Linus Torvalds 已提交
1101 1102 1103 1104 1105 1106 1107 1108 1109
			spin_unlock(&info->lock);
			ret = -EAGAIN;
		} else {
			wait.task = current;
			wait.state = STATE_NONE;
			ret = wq_sleep(info, RECV, timeout, &wait);
			msg_ptr = wait.msg;
		}
	} else {
1110
		DEFINE_WAKE_Q(wake_q);
1111

L
Linus Torvalds 已提交
1112 1113 1114
		msg_ptr = msg_get(info);

		inode->i_atime = inode->i_mtime = inode->i_ctime =
1115
				current_time(inode);
L
Linus Torvalds 已提交
1116 1117

		/* There is now free space in queue. */
1118
		pipelined_receive(&wake_q, info);
L
Linus Torvalds 已提交
1119
		spin_unlock(&info->lock);
1120
		wake_up_q(&wake_q);
L
Linus Torvalds 已提交
1121 1122 1123 1124 1125 1126 1127 1128 1129 1130 1131 1132
		ret = 0;
	}
	if (ret == 0) {
		ret = msg_ptr->m_ts;

		if ((u_msg_prio && put_user(msg_ptr->m_type, u_msg_prio)) ||
			store_msg(u_msg_ptr, msg_ptr, msg_ptr->m_ts)) {
			ret = -EFAULT;
		}
		free_msg(msg_ptr);
	}
out_fput:
1133
	fdput(f);
L
Linus Torvalds 已提交
1134 1135 1136 1137
out:
	return ret;
}

1138 1139 1140 1141
SYSCALL_DEFINE5(mq_timedsend, mqd_t, mqdes, const char __user *, u_msg_ptr,
		size_t, msg_len, unsigned int, msg_prio,
		const struct timespec __user *, u_abs_timeout)
{
1142
	struct timespec64 ts, *p = NULL;
1143 1144 1145 1146 1147 1148 1149 1150 1151 1152 1153 1154 1155
	if (u_abs_timeout) {
		int res = prepare_timeout(u_abs_timeout, &ts);
		if (res)
			return res;
		p = &ts;
	}
	return do_mq_timedsend(mqdes, u_msg_ptr, msg_len, msg_prio, p);
}

SYSCALL_DEFINE5(mq_timedreceive, mqd_t, mqdes, char __user *, u_msg_ptr,
		size_t, msg_len, unsigned int __user *, u_msg_prio,
		const struct timespec __user *, u_abs_timeout)
{
1156
	struct timespec64 ts, *p = NULL;
1157 1158 1159 1160 1161 1162 1163 1164 1165
	if (u_abs_timeout) {
		int res = prepare_timeout(u_abs_timeout, &ts);
		if (res)
			return res;
		p = &ts;
	}
	return do_mq_timedreceive(mqdes, u_msg_ptr, msg_len, u_msg_prio, p);
}

L
Linus Torvalds 已提交
1166 1167 1168 1169 1170
/*
 * Notes: the case when user wants us to deregister (with NULL as pointer)
 * and he isn't currently owner of notification, will be silently discarded.
 * It isn't explicitly defined in the POSIX.
 */
1171
static int do_mq_notify(mqd_t mqdes, const struct sigevent *notification)
L
Linus Torvalds 已提交
1172
{
1173 1174
	int ret;
	struct fd f;
L
Linus Torvalds 已提交
1175 1176 1177 1178 1179
	struct sock *sock;
	struct inode *inode;
	struct mqueue_inode_info *info;
	struct sk_buff *nc;

1180
	audit_mq_notify(mqdes, notification);
L
Linus Torvalds 已提交
1181

A
Al Viro 已提交
1182 1183
	nc = NULL;
	sock = NULL;
1184 1185 1186 1187
	if (notification != NULL) {
		if (unlikely(notification->sigev_notify != SIGEV_NONE &&
			     notification->sigev_notify != SIGEV_SIGNAL &&
			     notification->sigev_notify != SIGEV_THREAD))
L
Linus Torvalds 已提交
1188
			return -EINVAL;
1189 1190
		if (notification->sigev_notify == SIGEV_SIGNAL &&
			!valid_signal(notification->sigev_signo)) {
L
Linus Torvalds 已提交
1191 1192
			return -EINVAL;
		}
1193
		if (notification->sigev_notify == SIGEV_THREAD) {
P
Patrick McHardy 已提交
1194 1195
			long timeo;

L
Linus Torvalds 已提交
1196 1197
			/* create the notify skb */
			nc = alloc_skb(NOTIFY_COOKIE_LEN, GFP_KERNEL);
1198 1199
			if (!nc) {
				ret = -ENOMEM;
L
Linus Torvalds 已提交
1200
				goto out;
1201
			}
L
Linus Torvalds 已提交
1202
			if (copy_from_user(nc->data,
1203
					notification->sigev_value.sival_ptr,
L
Linus Torvalds 已提交
1204
					NOTIFY_COOKIE_LEN)) {
1205
				ret = -EFAULT;
L
Linus Torvalds 已提交
1206 1207 1208 1209 1210 1211 1212
				goto out;
			}

			/* TODO: add a header? */
			skb_put(nc, NOTIFY_COOKIE_LEN);
			/* and attach it to the socket */
retry:
1213
			f = fdget(notification->sigev_signo);
1214
			if (!f.file) {
1215
				ret = -EBADF;
L
Linus Torvalds 已提交
1216
				goto out;
1217
			}
1218 1219
			sock = netlink_getsockbyfilp(f.file);
			fdput(f);
L
Linus Torvalds 已提交
1220 1221 1222 1223 1224 1225
			if (IS_ERR(sock)) {
				ret = PTR_ERR(sock);
				sock = NULL;
				goto out;
			}

P
Patrick McHardy 已提交
1226
			timeo = MAX_SCHEDULE_TIMEOUT;
1227
			ret = netlink_attachskb(sock, nc, &timeo, NULL);
1228 1229
			if (ret == 1) {
				sock = NULL;
1230
				goto retry;
1231
			}
L
Linus Torvalds 已提交
1232 1233 1234 1235 1236 1237 1238 1239
			if (ret) {
				sock = NULL;
				nc = NULL;
				goto out;
			}
		}
	}

1240 1241
	f = fdget(mqdes);
	if (!f.file) {
1242
		ret = -EBADF;
L
Linus Torvalds 已提交
1243
		goto out;
1244
	}
L
Linus Torvalds 已提交
1245

A
Al Viro 已提交
1246
	inode = file_inode(f.file);
1247
	if (unlikely(f.file->f_op != &mqueue_file_operations)) {
1248
		ret = -EBADF;
L
Linus Torvalds 已提交
1249
		goto out_fput;
1250
	}
L
Linus Torvalds 已提交
1251 1252 1253 1254
	info = MQUEUE_I(inode);

	ret = 0;
	spin_lock(&info->lock);
1255
	if (notification == NULL) {
1256
		if (info->notify_owner == task_tgid(current)) {
L
Linus Torvalds 已提交
1257
			remove_notification(info);
1258
			inode->i_atime = inode->i_ctime = current_time(inode);
L
Linus Torvalds 已提交
1259
		}
1260
	} else if (info->notify_owner != NULL) {
L
Linus Torvalds 已提交
1261 1262
		ret = -EBUSY;
	} else {
1263
		switch (notification->sigev_notify) {
L
Linus Torvalds 已提交
1264 1265 1266 1267 1268 1269 1270 1271 1272 1273 1274
		case SIGEV_NONE:
			info->notify.sigev_notify = SIGEV_NONE;
			break;
		case SIGEV_THREAD:
			info->notify_sock = sock;
			info->notify_cookie = nc;
			sock = NULL;
			nc = NULL;
			info->notify.sigev_notify = SIGEV_THREAD;
			break;
		case SIGEV_SIGNAL:
1275 1276
			info->notify.sigev_signo = notification->sigev_signo;
			info->notify.sigev_value = notification->sigev_value;
L
Linus Torvalds 已提交
1277 1278 1279
			info->notify.sigev_notify = SIGEV_SIGNAL;
			break;
		}
1280 1281

		info->notify_owner = get_pid(task_tgid(current));
1282
		info->notify_user_ns = get_user_ns(current_user_ns());
1283
		inode->i_atime = inode->i_ctime = current_time(inode);
L
Linus Torvalds 已提交
1284 1285 1286
	}
	spin_unlock(&info->lock);
out_fput:
1287
	fdput(f);
L
Linus Torvalds 已提交
1288
out:
1289
	if (sock)
L
Linus Torvalds 已提交
1290
		netlink_detachskb(sock, nc);
1291
	else if (nc)
L
Linus Torvalds 已提交
1292
		dev_kfree_skb(nc);
1293

L
Linus Torvalds 已提交
1294 1295 1296
	return ret;
}

1297 1298 1299 1300 1301 1302 1303 1304 1305 1306 1307 1308 1309
SYSCALL_DEFINE2(mq_notify, mqd_t, mqdes,
		const struct sigevent __user *, u_notification)
{
	struct sigevent n, *p = NULL;
	if (u_notification) {
		if (copy_from_user(&n, u_notification, sizeof(struct sigevent)))
			return -EFAULT;
		p = &n;
	}
	return do_mq_notify(mqdes, p);
}

static int do_mq_getsetattr(int mqdes, struct mq_attr *new, struct mq_attr *old)
L
Linus Torvalds 已提交
1310
{
1311
	struct fd f;
L
Linus Torvalds 已提交
1312 1313 1314
	struct inode *inode;
	struct mqueue_inode_info *info;

1315 1316
	if (new && (new->mq_flags & (~O_NONBLOCK)))
		return -EINVAL;
L
Linus Torvalds 已提交
1317

1318
	f = fdget(mqdes);
1319 1320
	if (!f.file)
		return -EBADF;
L
Linus Torvalds 已提交
1321

1322
	if (unlikely(f.file->f_op != &mqueue_file_operations)) {
1323 1324
		fdput(f);
		return -EBADF;
1325
	}
1326 1327

	inode = file_inode(f.file);
L
Linus Torvalds 已提交
1328 1329 1330 1331
	info = MQUEUE_I(inode);

	spin_lock(&info->lock);

1332 1333 1334 1335 1336 1337
	if (old) {
		*old = info->attr;
		old->mq_flags = f.file->f_flags & O_NONBLOCK;
	}
	if (new) {
		audit_mq_getsetattr(mqdes, new);
1338
		spin_lock(&f.file->f_lock);
1339
		if (new->mq_flags & O_NONBLOCK)
1340
			f.file->f_flags |= O_NONBLOCK;
L
Linus Torvalds 已提交
1341
		else
1342 1343
			f.file->f_flags &= ~O_NONBLOCK;
		spin_unlock(&f.file->f_lock);
L
Linus Torvalds 已提交
1344

1345
		inode->i_atime = inode->i_ctime = current_time(inode);
L
Linus Torvalds 已提交
1346 1347 1348
	}

	spin_unlock(&info->lock);
1349 1350 1351
	fdput(f);
	return 0;
}
L
Linus Torvalds 已提交
1352

1353 1354 1355 1356 1357 1358 1359
SYSCALL_DEFINE3(mq_getsetattr, mqd_t, mqdes,
		const struct mq_attr __user *, u_mqstat,
		struct mq_attr __user *, u_omqstat)
{
	int ret;
	struct mq_attr mqstat, omqstat;
	struct mq_attr *new = NULL, *old = NULL;
L
Linus Torvalds 已提交
1360

1361 1362 1363 1364 1365 1366 1367 1368 1369 1370 1371 1372 1373 1374 1375 1376 1377 1378 1379 1380 1381 1382 1383 1384 1385 1386 1387 1388 1389 1390 1391 1392 1393 1394 1395 1396 1397 1398 1399 1400 1401 1402 1403 1404 1405 1406 1407 1408 1409 1410 1411 1412 1413 1414 1415 1416 1417 1418 1419 1420 1421 1422 1423 1424 1425 1426 1427 1428 1429 1430 1431 1432
	if (u_mqstat) {
		new = &mqstat;
		if (copy_from_user(new, u_mqstat, sizeof(struct mq_attr)))
			return -EFAULT;
	}
	if (u_omqstat)
		old = &omqstat;

	ret = do_mq_getsetattr(mqdes, new, old);
	if (ret || !old)
		return ret;

	if (copy_to_user(u_omqstat, old, sizeof(struct mq_attr)))
		return -EFAULT;
	return 0;
}

#ifdef CONFIG_COMPAT

struct compat_mq_attr {
	compat_long_t mq_flags;      /* message queue flags		     */
	compat_long_t mq_maxmsg;     /* maximum number of messages	     */
	compat_long_t mq_msgsize;    /* maximum message size		     */
	compat_long_t mq_curmsgs;    /* number of messages currently queued  */
	compat_long_t __reserved[4]; /* ignored for input, zeroed for output */
};

static inline int get_compat_mq_attr(struct mq_attr *attr,
			const struct compat_mq_attr __user *uattr)
{
	struct compat_mq_attr v;

	if (copy_from_user(&v, uattr, sizeof(*uattr)))
		return -EFAULT;

	memset(attr, 0, sizeof(*attr));
	attr->mq_flags = v.mq_flags;
	attr->mq_maxmsg = v.mq_maxmsg;
	attr->mq_msgsize = v.mq_msgsize;
	attr->mq_curmsgs = v.mq_curmsgs;
	return 0;
}

static inline int put_compat_mq_attr(const struct mq_attr *attr,
			struct compat_mq_attr __user *uattr)
{
	struct compat_mq_attr v;

	memset(&v, 0, sizeof(v));
	v.mq_flags = attr->mq_flags;
	v.mq_maxmsg = attr->mq_maxmsg;
	v.mq_msgsize = attr->mq_msgsize;
	v.mq_curmsgs = attr->mq_curmsgs;
	if (copy_to_user(uattr, &v, sizeof(*uattr)))
		return -EFAULT;
	return 0;
}

COMPAT_SYSCALL_DEFINE4(mq_open, const char __user *, u_name,
		       int, oflag, compat_mode_t, mode,
		       struct compat_mq_attr __user *, u_attr)
{
	struct mq_attr attr, *p = NULL;
	if (u_attr && oflag & O_CREAT) {
		p = &attr;
		if (get_compat_mq_attr(&attr, u_attr))
			return -EFAULT;
	}
	return do_mq_open(u_name, oflag, mode, p);
}

static int compat_prepare_timeout(const struct compat_timespec __user *p,
1433
				   struct timespec64 *ts)
1434
{
1435
	if (compat_get_timespec64(ts, p))
1436
		return -EFAULT;
1437
	if (!timespec64_valid(ts))
1438 1439 1440 1441 1442 1443 1444 1445 1446
		return -EINVAL;
	return 0;
}

COMPAT_SYSCALL_DEFINE5(mq_timedsend, mqd_t, mqdes,
		       const char __user *, u_msg_ptr,
		       compat_size_t, msg_len, unsigned int, msg_prio,
		       const struct compat_timespec __user *, u_abs_timeout)
{
1447
	struct timespec64 ts, *p = NULL;
1448 1449 1450 1451 1452 1453 1454 1455 1456 1457 1458 1459 1460 1461
	if (u_abs_timeout) {
		int res = compat_prepare_timeout(u_abs_timeout, &ts);
		if (res)
			return res;
		p = &ts;
	}
	return do_mq_timedsend(mqdes, u_msg_ptr, msg_len, msg_prio, p);
}

COMPAT_SYSCALL_DEFINE5(mq_timedreceive, mqd_t, mqdes,
		       char __user *, u_msg_ptr,
		       compat_size_t, msg_len, unsigned int __user *, u_msg_prio,
		       const struct compat_timespec __user *, u_abs_timeout)
{
1462
	struct timespec64 ts, *p = NULL;
1463 1464 1465 1466 1467 1468 1469 1470 1471 1472 1473 1474 1475 1476 1477 1478 1479 1480 1481 1482 1483 1484 1485 1486 1487 1488 1489 1490 1491 1492 1493 1494 1495 1496 1497 1498 1499 1500 1501 1502 1503 1504 1505 1506 1507 1508
	if (u_abs_timeout) {
		int res = compat_prepare_timeout(u_abs_timeout, &ts);
		if (res)
			return res;
		p = &ts;
	}
	return do_mq_timedreceive(mqdes, u_msg_ptr, msg_len, u_msg_prio, p);
}

COMPAT_SYSCALL_DEFINE2(mq_notify, mqd_t, mqdes,
		       const struct compat_sigevent __user *, u_notification)
{
	struct sigevent n, *p = NULL;
	if (u_notification) {
		if (get_compat_sigevent(&n, u_notification))
			return -EFAULT;
		if (n.sigev_notify == SIGEV_THREAD)
			n.sigev_value.sival_ptr = compat_ptr(n.sigev_value.sival_int);
		p = &n;
	}
	return do_mq_notify(mqdes, p);
}

COMPAT_SYSCALL_DEFINE3(mq_getsetattr, mqd_t, mqdes,
		       const struct compat_mq_attr __user *, u_mqstat,
		       struct compat_mq_attr __user *, u_omqstat)
{
	int ret;
	struct mq_attr mqstat, omqstat;
	struct mq_attr *new = NULL, *old = NULL;

	if (u_mqstat) {
		new = &mqstat;
		if (get_compat_mq_attr(new, u_mqstat))
			return -EFAULT;
	}
	if (u_omqstat)
		old = &omqstat;

	ret = do_mq_getsetattr(mqdes, new, old);
	if (ret || !old)
		return ret;

	if (put_compat_mq_attr(old, u_omqstat))
		return -EFAULT;
	return 0;
L
Linus Torvalds 已提交
1509
}
1510
#endif
L
Linus Torvalds 已提交
1511

1512
static const struct inode_operations mqueue_dir_inode_operations = {
L
Linus Torvalds 已提交
1513 1514 1515 1516 1517
	.lookup = simple_lookup,
	.create = mqueue_create,
	.unlink = mqueue_unlink,
};

1518
static const struct file_operations mqueue_file_operations = {
L
Linus Torvalds 已提交
1519 1520 1521
	.flush = mqueue_flush_file,
	.poll = mqueue_poll_file,
	.read = mqueue_read_file,
1522
	.llseek = default_llseek,
L
Linus Torvalds 已提交
1523 1524
};

1525
static const struct super_operations mqueue_super_ops = {
L
Linus Torvalds 已提交
1526 1527
	.alloc_inode = mqueue_alloc_inode,
	.destroy_inode = mqueue_destroy_inode,
A
Al Viro 已提交
1528
	.evict_inode = mqueue_evict_inode,
L
Linus Torvalds 已提交
1529 1530 1531 1532 1533
	.statfs = simple_statfs,
};

static struct file_system_type mqueue_fs_type = {
	.name = "mqueue",
A
Al Viro 已提交
1534
	.mount = mqueue_mount,
L
Linus Torvalds 已提交
1535
	.kill_sb = kill_litter_super,
1536
	.fs_flags = FS_USERNS_MOUNT,
L
Linus Torvalds 已提交
1537 1538
};

1539 1540 1541 1542 1543 1544
int mq_init_ns(struct ipc_namespace *ns)
{
	ns->mq_queues_count  = 0;
	ns->mq_queues_max    = DFLT_QUEUESMAX;
	ns->mq_msg_max       = DFLT_MSGMAX;
	ns->mq_msgsize_max   = DFLT_MSGSIZEMAX;
1545 1546
	ns->mq_msg_default   = DFLT_MSG;
	ns->mq_msgsize_default  = DFLT_MSGSIZE;
1547 1548 1549 1550 1551 1552 1553 1554 1555 1556 1557 1558 1559 1560 1561 1562 1563

	ns->mq_mnt = kern_mount_data(&mqueue_fs_type, ns);
	if (IS_ERR(ns->mq_mnt)) {
		int err = PTR_ERR(ns->mq_mnt);
		ns->mq_mnt = NULL;
		return err;
	}
	return 0;
}

void mq_clear_sbinfo(struct ipc_namespace *ns)
{
	ns->mq_mnt->mnt_sb->s_fs_info = NULL;
}

void mq_put_mnt(struct ipc_namespace *ns)
{
A
Al Viro 已提交
1564
	kern_unmount(ns->mq_mnt);
1565 1566
}

L
Linus Torvalds 已提交
1567 1568 1569 1570 1571 1572
static int __init init_mqueue_fs(void)
{
	int error;

	mqueue_inode_cachep = kmem_cache_create("mqueue_inode_cache",
				sizeof(struct mqueue_inode_info), 0,
1573
				SLAB_HWCACHE_ALIGN|SLAB_ACCOUNT, init_once);
L
Linus Torvalds 已提交
1574 1575 1576
	if (mqueue_inode_cachep == NULL)
		return -ENOMEM;

1577
	/* ignore failures - they are not fatal */
1578
	mq_sysctl_table = mq_register_sysctl_table();
L
Linus Torvalds 已提交
1579 1580 1581 1582 1583

	error = register_filesystem(&mqueue_fs_type);
	if (error)
		goto out_sysctl;

1584 1585
	spin_lock_init(&mq_lock);

A
Al Viro 已提交
1586 1587
	error = mq_init_ns(&init_ipc_ns);
	if (error)
L
Linus Torvalds 已提交
1588 1589 1590 1591 1592 1593 1594 1595 1596
		goto out_filesystem;

	return 0;

out_filesystem:
	unregister_filesystem(&mqueue_fs_type);
out_sysctl:
	if (mq_sysctl_table)
		unregister_sysctl_table(mq_sysctl_table);
1597
	kmem_cache_destroy(mqueue_inode_cachep);
L
Linus Torvalds 已提交
1598 1599 1600
	return error;
}

D
Davidlohr Bueso 已提交
1601
device_initcall(init_mqueue_fs);