mqueue.c 39.0 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

A
Al Viro 已提交
724 725
	if (d_really_is_negative(dentry)) {
		if (!(oflag & O_CREAT))
726
			return -ENOENT;
A
Al Viro 已提交
727 728 729 730 731
		if (ro)
			return ro;
		audit_inode_parent_hidden(name, dentry->d_parent);
		return vfs_mkobj(dentry, mode & ~current_umask(),
				  mqueue_create_attr, attr);
732
	}
A
Al Viro 已提交
733 734 735 736
	/* it already existed */
	audit_inode(name, dentry, 0);
	if ((oflag & (O_CREAT|O_EXCL)) == (O_CREAT|O_EXCL))
		return -EEXIST;
737
	if ((oflag & O_ACCMODE) == (O_RDWR | O_WRONLY))
738
		return -EINVAL;
739
	acc = oflag2acc[oflag & O_ACCMODE];
740
	return inode_permission(d_inode(dentry), acc);
L
Linus Torvalds 已提交
741 742
}

743 744
static int do_mq_open(const char __user *u_name, int oflag, umode_t mode,
		      struct mq_attr *attr)
L
Linus Torvalds 已提交
745
{
746
	struct path path;
747
	struct filename *name;
L
Linus Torvalds 已提交
748
	int fd, error;
749
	struct ipc_namespace *ipc_ns = current->nsproxy->ipc_ns;
750 751 752
	struct vfsmount *mnt = ipc_ns->mq_mnt;
	struct dentry *root = mnt->mnt_root;
	int ro;
L
Linus Torvalds 已提交
753

754
	audit_mq_open(oflag, mode, attr);
755

L
Linus Torvalds 已提交
756 757 758
	if (IS_ERR(name = getname(u_name)))
		return PTR_ERR(name);

U
Ulrich Drepper 已提交
759
	fd = get_unused_fd_flags(O_CLOEXEC);
L
Linus Torvalds 已提交
760 761 762
	if (fd < 0)
		goto out_putname;

763
	ro = mnt_want_write(mnt);	/* we'll drop it in any case */
764
	error = 0;
A
Al Viro 已提交
765
	inode_lock(d_inode(root));
766
	path.dentry = lookup_one_len(name->name, root, strlen(name->name));
767 768
	if (IS_ERR(path.dentry)) {
		error = PTR_ERR(path.dentry);
769
		goto out_putfd;
L
Linus Torvalds 已提交
770
	}
771
	path.mnt = mntget(mnt);
L
Linus Torvalds 已提交
772

773 774 775 776 777 778 779
	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);
780
	}
781
	path_put(&path);
782
out_putfd:
783 784 785 786
	if (error) {
		put_unused_fd(fd);
		fd = error;
	}
A
Al Viro 已提交
787
	inode_unlock(d_inode(root));
788 789
	if (!ro)
		mnt_drop_write(mnt);
L
Linus Torvalds 已提交
790 791 792 793 794
out_putname:
	putname(name);
	return fd;
}

795 796 797 798 799 800 801 802 803 804
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);
}

805
SYSCALL_DEFINE1(mq_unlink, const char __user *, u_name)
L
Linus Torvalds 已提交
806 807
{
	int err;
808
	struct filename *name;
L
Linus Torvalds 已提交
809 810
	struct dentry *dentry;
	struct inode *inode = NULL;
811
	struct ipc_namespace *ipc_ns = current->nsproxy->ipc_ns;
812
	struct vfsmount *mnt = ipc_ns->mq_mnt;
L
Linus Torvalds 已提交
813 814 815 816 817

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

818
	audit_inode_parent_hidden(name, mnt->mnt_root);
819 820 821
	err = mnt_want_write(mnt);
	if (err)
		goto out_name;
A
Al Viro 已提交
822
	inode_lock_nested(d_inode(mnt->mnt_root), I_MUTEX_PARENT);
823 824
	dentry = lookup_one_len(name->name, mnt->mnt_root,
				strlen(name->name));
L
Linus Torvalds 已提交
825 826 827 828 829
	if (IS_ERR(dentry)) {
		err = PTR_ERR(dentry);
		goto out_unlock;
	}

830
	inode = d_inode(dentry);
831 832 833
	if (!inode) {
		err = -ENOENT;
	} else {
A
Al Viro 已提交
834
		ihold(inode);
835
		err = vfs_unlink(d_inode(dentry->d_parent), dentry, NULL);
836
	}
L
Linus Torvalds 已提交
837 838 839
	dput(dentry);

out_unlock:
A
Al Viro 已提交
840
	inode_unlock(d_inode(mnt->mnt_root));
L
Linus Torvalds 已提交
841 842
	if (inode)
		iput(inode);
843 844 845
	mnt_drop_write(mnt);
out_name:
	putname(name);
L
Linus Torvalds 已提交
846 847 848 849 850 851 852 853 854 855

	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
856 857 858 859 860 861 862 863 864
 * 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 已提交
865 866 867 868 869 870 871
 *
 * 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).
 */
872 873
static inline void pipelined_send(struct wake_q_head *wake_q,
				  struct mqueue_inode_info *info,
L
Linus Torvalds 已提交
874 875 876 877 878
				  struct msg_msg *message,
				  struct ext_wait_queue *receiver)
{
	receiver->msg = message;
	list_del(&receiver->list);
879 880 881 882 883 884 885 886 887
	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 已提交
888 889 890 891 892
	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). */
893 894
static inline void pipelined_receive(struct wake_q_head *wake_q,
				     struct mqueue_inode_info *info)
L
Linus Torvalds 已提交
895 896 897 898 899 900 901 902
{
	struct ext_wait_queue *sender = wq_get_first_waiter(info, SEND);

	if (!sender) {
		/* for poll */
		wake_up_interruptible(&info->wait_q);
		return;
	}
903 904
	if (msg_insert(sender->msg, info))
		return;
905

L
Linus Torvalds 已提交
906
	list_del(&sender->list);
907
	wake_q_add(wake_q, sender->task);
L
Linus Torvalds 已提交
908 909 910
	sender->state = STATE_READY;
}

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

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

929
	if (ts) {
930
		expires = timespec64_to_ktime(*ts);
931 932 933 934
		timeout = &expires;
	}

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

936 937
	f = fdget(mqdes);
	if (unlikely(!f.file)) {
938
		ret = -EBADF;
L
Linus Torvalds 已提交
939
		goto out;
940
	}
L
Linus Torvalds 已提交
941

A
Al Viro 已提交
942
	inode = file_inode(f.file);
943
	if (unlikely(f.file->f_op != &mqueue_file_operations)) {
944
		ret = -EBADF;
L
Linus Torvalds 已提交
945
		goto out_fput;
946
	}
L
Linus Torvalds 已提交
947
	info = MQUEUE_I(inode);
A
Al Viro 已提交
948
	audit_file(f.file);
L
Linus Torvalds 已提交
949

950
	if (unlikely(!(f.file->f_mode & FMODE_WRITE))) {
951
		ret = -EBADF;
L
Linus Torvalds 已提交
952
		goto out_fput;
953
	}
L
Linus Torvalds 已提交
954 955 956 957 958 959 960 961 962 963 964 965 966 967 968 969

	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;

970 971 972 973 974 975 976 977
	/*
	 * 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 已提交
978 979
	spin_lock(&info->lock);

980 981 982 983 984 985 986 987 988
	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 已提交
989
	if (info->attr.mq_curmsgs == info->attr.mq_maxmsg) {
990
		if (f.file->f_flags & O_NONBLOCK) {
L
Linus Torvalds 已提交
991 992 993 994 995 996
			ret = -EAGAIN;
		} else {
			wait.task = current;
			wait.msg = (void *) msg_ptr;
			wait.state = STATE_NONE;
			ret = wq_sleep(info, SEND, timeout, &wait);
997 998 999 1000 1001
			/*
			 * wq_sleep must be called with info->lock held, and
			 * returns with the lock released
			 */
			goto out_free;
L
Linus Torvalds 已提交
1002 1003 1004 1005
		}
	} else {
		receiver = wq_get_first_waiter(info, RECV);
		if (receiver) {
1006
			pipelined_send(&wake_q, info, msg_ptr, receiver);
L
Linus Torvalds 已提交
1007 1008
		} else {
			/* adds message to the queue */
1009 1010 1011
			ret = msg_insert(msg_ptr, info);
			if (ret)
				goto out_unlock;
L
Linus Torvalds 已提交
1012 1013 1014
			__do_notify(info);
		}
		inode->i_atime = inode->i_mtime = inode->i_ctime =
1015
				current_time(inode);
L
Linus Torvalds 已提交
1016
	}
1017 1018
out_unlock:
	spin_unlock(&info->lock);
1019
	wake_up_q(&wake_q);
1020 1021 1022
out_free:
	if (ret)
		free_msg(msg_ptr);
L
Linus Torvalds 已提交
1023
out_fput:
1024
	fdput(f);
L
Linus Torvalds 已提交
1025 1026 1027 1028
out:
	return ret;
}

1029 1030
static int do_mq_timedreceive(mqd_t mqdes, char __user *u_msg_ptr,
		size_t msg_len, unsigned int __user *u_msg_prio,
1031
		struct timespec64 *ts)
L
Linus Torvalds 已提交
1032 1033 1034
{
	ssize_t ret;
	struct msg_msg *msg_ptr;
1035
	struct fd f;
L
Linus Torvalds 已提交
1036 1037 1038
	struct inode *inode;
	struct mqueue_inode_info *info;
	struct ext_wait_queue wait;
1039
	ktime_t expires, *timeout = NULL;
1040
	struct posix_msg_tree_node *new_leaf = NULL;
L
Linus Torvalds 已提交
1041

1042
	if (ts) {
1043
		expires = timespec64_to_ktime(*ts);
1044
		timeout = &expires;
A
Al Viro 已提交
1045
	}
1046

1047
	audit_mq_sendrecv(mqdes, msg_len, 0, ts);
L
Linus Torvalds 已提交
1048

1049 1050
	f = fdget(mqdes);
	if (unlikely(!f.file)) {
1051
		ret = -EBADF;
L
Linus Torvalds 已提交
1052
		goto out;
1053
	}
L
Linus Torvalds 已提交
1054

A
Al Viro 已提交
1055
	inode = file_inode(f.file);
1056
	if (unlikely(f.file->f_op != &mqueue_file_operations)) {
1057
		ret = -EBADF;
L
Linus Torvalds 已提交
1058
		goto out_fput;
1059
	}
L
Linus Torvalds 已提交
1060
	info = MQUEUE_I(inode);
A
Al Viro 已提交
1061
	audit_file(f.file);
L
Linus Torvalds 已提交
1062

1063
	if (unlikely(!(f.file->f_mode & FMODE_READ))) {
1064
		ret = -EBADF;
L
Linus Torvalds 已提交
1065
		goto out_fput;
1066
	}
L
Linus Torvalds 已提交
1067 1068 1069 1070 1071 1072 1073

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

1074 1075 1076 1077 1078 1079 1080 1081
	/*
	 * 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 已提交
1082
	spin_lock(&info->lock);
1083 1084 1085 1086 1087 1088 1089 1090 1091

	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 已提交
1092
	if (info->attr.mq_curmsgs == 0) {
1093
		if (f.file->f_flags & O_NONBLOCK) {
L
Linus Torvalds 已提交
1094 1095 1096 1097 1098 1099 1100 1101 1102
			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 {
1103
		DEFINE_WAKE_Q(wake_q);
1104

L
Linus Torvalds 已提交
1105 1106 1107
		msg_ptr = msg_get(info);

		inode->i_atime = inode->i_mtime = inode->i_ctime =
1108
				current_time(inode);
L
Linus Torvalds 已提交
1109 1110

		/* There is now free space in queue. */
1111
		pipelined_receive(&wake_q, info);
L
Linus Torvalds 已提交
1112
		spin_unlock(&info->lock);
1113
		wake_up_q(&wake_q);
L
Linus Torvalds 已提交
1114 1115 1116 1117 1118 1119 1120 1121 1122 1123 1124 1125
		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:
1126
	fdput(f);
L
Linus Torvalds 已提交
1127 1128 1129 1130
out:
	return ret;
}

1131 1132 1133 1134
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)
{
1135
	struct timespec64 ts, *p = NULL;
1136 1137 1138 1139 1140 1141 1142 1143 1144 1145 1146 1147 1148
	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)
{
1149
	struct timespec64 ts, *p = NULL;
1150 1151 1152 1153 1154 1155 1156 1157 1158
	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 已提交
1159 1160 1161 1162 1163
/*
 * 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.
 */
1164
static int do_mq_notify(mqd_t mqdes, const struct sigevent *notification)
L
Linus Torvalds 已提交
1165
{
1166 1167
	int ret;
	struct fd f;
L
Linus Torvalds 已提交
1168 1169 1170 1171 1172
	struct sock *sock;
	struct inode *inode;
	struct mqueue_inode_info *info;
	struct sk_buff *nc;

1173
	audit_mq_notify(mqdes, notification);
L
Linus Torvalds 已提交
1174

A
Al Viro 已提交
1175 1176
	nc = NULL;
	sock = NULL;
1177 1178 1179 1180
	if (notification != NULL) {
		if (unlikely(notification->sigev_notify != SIGEV_NONE &&
			     notification->sigev_notify != SIGEV_SIGNAL &&
			     notification->sigev_notify != SIGEV_THREAD))
L
Linus Torvalds 已提交
1181
			return -EINVAL;
1182 1183
		if (notification->sigev_notify == SIGEV_SIGNAL &&
			!valid_signal(notification->sigev_signo)) {
L
Linus Torvalds 已提交
1184 1185
			return -EINVAL;
		}
1186
		if (notification->sigev_notify == SIGEV_THREAD) {
P
Patrick McHardy 已提交
1187 1188
			long timeo;

L
Linus Torvalds 已提交
1189 1190
			/* create the notify skb */
			nc = alloc_skb(NOTIFY_COOKIE_LEN, GFP_KERNEL);
1191 1192
			if (!nc) {
				ret = -ENOMEM;
L
Linus Torvalds 已提交
1193
				goto out;
1194
			}
L
Linus Torvalds 已提交
1195
			if (copy_from_user(nc->data,
1196
					notification->sigev_value.sival_ptr,
L
Linus Torvalds 已提交
1197
					NOTIFY_COOKIE_LEN)) {
1198
				ret = -EFAULT;
L
Linus Torvalds 已提交
1199 1200 1201 1202 1203 1204 1205
				goto out;
			}

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

P
Patrick McHardy 已提交
1219
			timeo = MAX_SCHEDULE_TIMEOUT;
1220
			ret = netlink_attachskb(sock, nc, &timeo, NULL);
1221 1222
			if (ret == 1) {
				sock = NULL;
1223
				goto retry;
1224
			}
L
Linus Torvalds 已提交
1225 1226 1227 1228 1229 1230 1231 1232
			if (ret) {
				sock = NULL;
				nc = NULL;
				goto out;
			}
		}
	}

1233 1234
	f = fdget(mqdes);
	if (!f.file) {
1235
		ret = -EBADF;
L
Linus Torvalds 已提交
1236
		goto out;
1237
	}
L
Linus Torvalds 已提交
1238

A
Al Viro 已提交
1239
	inode = file_inode(f.file);
1240
	if (unlikely(f.file->f_op != &mqueue_file_operations)) {
1241
		ret = -EBADF;
L
Linus Torvalds 已提交
1242
		goto out_fput;
1243
	}
L
Linus Torvalds 已提交
1244 1245 1246 1247
	info = MQUEUE_I(inode);

	ret = 0;
	spin_lock(&info->lock);
1248
	if (notification == NULL) {
1249
		if (info->notify_owner == task_tgid(current)) {
L
Linus Torvalds 已提交
1250
			remove_notification(info);
1251
			inode->i_atime = inode->i_ctime = current_time(inode);
L
Linus Torvalds 已提交
1252
		}
1253
	} else if (info->notify_owner != NULL) {
L
Linus Torvalds 已提交
1254 1255
		ret = -EBUSY;
	} else {
1256
		switch (notification->sigev_notify) {
L
Linus Torvalds 已提交
1257 1258 1259 1260 1261 1262 1263 1264 1265 1266 1267
		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:
1268 1269
			info->notify.sigev_signo = notification->sigev_signo;
			info->notify.sigev_value = notification->sigev_value;
L
Linus Torvalds 已提交
1270 1271 1272
			info->notify.sigev_notify = SIGEV_SIGNAL;
			break;
		}
1273 1274

		info->notify_owner = get_pid(task_tgid(current));
1275
		info->notify_user_ns = get_user_ns(current_user_ns());
1276
		inode->i_atime = inode->i_ctime = current_time(inode);
L
Linus Torvalds 已提交
1277 1278 1279
	}
	spin_unlock(&info->lock);
out_fput:
1280
	fdput(f);
L
Linus Torvalds 已提交
1281
out:
1282
	if (sock)
L
Linus Torvalds 已提交
1283
		netlink_detachskb(sock, nc);
1284
	else if (nc)
L
Linus Torvalds 已提交
1285
		dev_kfree_skb(nc);
1286

L
Linus Torvalds 已提交
1287 1288 1289
	return ret;
}

1290 1291 1292 1293 1294 1295 1296 1297 1298 1299 1300 1301 1302
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 已提交
1303
{
1304
	struct fd f;
L
Linus Torvalds 已提交
1305 1306 1307
	struct inode *inode;
	struct mqueue_inode_info *info;

1308 1309
	if (new && (new->mq_flags & (~O_NONBLOCK)))
		return -EINVAL;
L
Linus Torvalds 已提交
1310

1311
	f = fdget(mqdes);
1312 1313
	if (!f.file)
		return -EBADF;
L
Linus Torvalds 已提交
1314

1315
	if (unlikely(f.file->f_op != &mqueue_file_operations)) {
1316 1317
		fdput(f);
		return -EBADF;
1318
	}
1319 1320

	inode = file_inode(f.file);
L
Linus Torvalds 已提交
1321 1322 1323 1324
	info = MQUEUE_I(inode);

	spin_lock(&info->lock);

1325 1326 1327 1328 1329 1330
	if (old) {
		*old = info->attr;
		old->mq_flags = f.file->f_flags & O_NONBLOCK;
	}
	if (new) {
		audit_mq_getsetattr(mqdes, new);
1331
		spin_lock(&f.file->f_lock);
1332
		if (new->mq_flags & O_NONBLOCK)
1333
			f.file->f_flags |= O_NONBLOCK;
L
Linus Torvalds 已提交
1334
		else
1335 1336
			f.file->f_flags &= ~O_NONBLOCK;
		spin_unlock(&f.file->f_lock);
L
Linus Torvalds 已提交
1337

1338
		inode->i_atime = inode->i_ctime = current_time(inode);
L
Linus Torvalds 已提交
1339 1340 1341
	}

	spin_unlock(&info->lock);
1342 1343 1344
	fdput(f);
	return 0;
}
L
Linus Torvalds 已提交
1345

1346 1347 1348 1349 1350 1351 1352
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 已提交
1353

1354 1355 1356 1357 1358 1359 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
	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,
1426
				   struct timespec64 *ts)
1427
{
1428
	if (compat_get_timespec64(ts, p))
1429
		return -EFAULT;
1430
	if (!timespec64_valid(ts))
1431 1432 1433 1434 1435 1436 1437 1438 1439
		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)
{
1440
	struct timespec64 ts, *p = NULL;
1441 1442 1443 1444 1445 1446 1447 1448 1449 1450 1451 1452 1453 1454
	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)
{
1455
	struct timespec64 ts, *p = NULL;
1456 1457 1458 1459 1460 1461 1462 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
	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 已提交
1502
}
1503
#endif
L
Linus Torvalds 已提交
1504

1505
static const struct inode_operations mqueue_dir_inode_operations = {
L
Linus Torvalds 已提交
1506 1507 1508 1509 1510
	.lookup = simple_lookup,
	.create = mqueue_create,
	.unlink = mqueue_unlink,
};

1511
static const struct file_operations mqueue_file_operations = {
L
Linus Torvalds 已提交
1512 1513 1514
	.flush = mqueue_flush_file,
	.poll = mqueue_poll_file,
	.read = mqueue_read_file,
1515
	.llseek = default_llseek,
L
Linus Torvalds 已提交
1516 1517
};

1518
static const struct super_operations mqueue_super_ops = {
L
Linus Torvalds 已提交
1519 1520
	.alloc_inode = mqueue_alloc_inode,
	.destroy_inode = mqueue_destroy_inode,
A
Al Viro 已提交
1521
	.evict_inode = mqueue_evict_inode,
L
Linus Torvalds 已提交
1522 1523 1524 1525 1526
	.statfs = simple_statfs,
};

static struct file_system_type mqueue_fs_type = {
	.name = "mqueue",
A
Al Viro 已提交
1527
	.mount = mqueue_mount,
L
Linus Torvalds 已提交
1528
	.kill_sb = kill_litter_super,
1529
	.fs_flags = FS_USERNS_MOUNT,
L
Linus Torvalds 已提交
1530 1531
};

1532 1533 1534 1535 1536 1537
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;
1538 1539
	ns->mq_msg_default   = DFLT_MSG;
	ns->mq_msgsize_default  = DFLT_MSGSIZE;
1540 1541 1542 1543 1544 1545 1546 1547 1548 1549 1550 1551 1552 1553 1554 1555 1556

	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 已提交
1557
	kern_unmount(ns->mq_mnt);
1558 1559
}

L
Linus Torvalds 已提交
1560 1561 1562 1563 1564 1565
static int __init init_mqueue_fs(void)
{
	int error;

	mqueue_inode_cachep = kmem_cache_create("mqueue_inode_cache",
				sizeof(struct mqueue_inode_info), 0,
1566
				SLAB_HWCACHE_ALIGN|SLAB_ACCOUNT, init_once);
L
Linus Torvalds 已提交
1567 1568 1569
	if (mqueue_inode_cachep == NULL)
		return -ENOMEM;

1570
	/* ignore failures - they are not fatal */
1571
	mq_sysctl_table = mq_register_sysctl_table();
L
Linus Torvalds 已提交
1572 1573 1574 1575 1576

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

1577 1578
	spin_lock_init(&mq_lock);

A
Al Viro 已提交
1579 1580
	error = mq_init_ns(&init_ipc_ns);
	if (error)
L
Linus Torvalds 已提交
1581 1582 1583 1584 1585 1586 1587 1588 1589
		goto out_filesystem;

	return 0;

out_filesystem:
	unregister_filesystem(&mqueue_fs_type);
out_sysctl:
	if (mq_sysctl_table)
		unregister_sysctl_table(mq_sysctl_table);
1590
	kmem_cache_destroy(mqueue_inode_cachep);
L
Linus Torvalds 已提交
1591 1592 1593
	return error;
}

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