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 351 352 353 354 355 356 357
	struct ipc_namespace *ns;
	if (flags & SB_KERNMOUNT) {
		ns = data;
		data = NULL;
	} else {
		ns = current->nsproxy->ipc_ns;
	}
	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
		remove_notification(info);

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

545
static __poll_t mqueue_poll_file(struct file *filp, struct poll_table_struct *poll_tab)
L
Linus Torvalds 已提交
546
{
A
Al Viro 已提交
547
	struct mqueue_inode_info *info = MQUEUE_I(file_inode(filp));
548
	__poll_t retval = 0;
L
Linus Torvalds 已提交
549 550 551 552 553

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

	spin_lock(&info->lock);
	if (info->attr.mq_curmsgs)
554
		retval = EPOLLIN | EPOLLRDNORM;
L
Linus Torvalds 已提交
555 556

	if (info->attr.mq_curmsgs < info->attr.mq_maxmsg)
557
		retval |= EPOLLOUT | EPOLLWRNORM;
L
Linus Torvalds 已提交
558 559 560 561 562 563 564 565 566 567 568 569 570 571
	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) {
572
		if (walk->task->prio <= current->prio) {
L
Linus Torvalds 已提交
573 574 575 576 577 578 579 580 581 582 583 584 585
			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
}

/*
 * 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 */

665
			clear_siginfo(&sig_i);
L
Linus Torvalds 已提交
666 667 668 669
			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;
670 671
			/* map current pid/uid into info->owner's namespaces */
			rcu_read_lock();
672 673
			sig_i.si_pid = task_tgid_nr_ns(current,
						ns_of_pid(info->notify_owner));
674
			sig_i.si_uid = from_kuid_munged(info->notify_user_ns, current_uid());
675
			rcu_read_unlock();
L
Linus Torvalds 已提交
676

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

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

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

717 718
static int prepare_open(struct dentry *dentry, int oflag, int ro,
			umode_t mode, struct filename *name,
719
			struct mq_attr *attr)
L
Linus Torvalds 已提交
720
{
721 722
	static const int oflag2acc[O_ACCMODE] = { MAY_READ, MAY_WRITE,
						  MAY_READ | MAY_WRITE };
723
	int acc;
724

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

744 745
static int do_mq_open(const char __user *u_name, int oflag, umode_t mode,
		      struct mq_attr *attr)
L
Linus Torvalds 已提交
746
{
747 748
	struct vfsmount *mnt = current->nsproxy->ipc_ns->mq_mnt;
	struct dentry *root = mnt->mnt_root;
749
	struct filename *name;
A
Al Viro 已提交
750
	struct path path;
L
Linus Torvalds 已提交
751
	int fd, error;
752
	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 */
A
Al Viro 已提交
764
	inode_lock(d_inode(root));
765
	path.dentry = lookup_one_len(name->name, root, strlen(name->name));
766 767
	if (IS_ERR(path.dentry)) {
		error = PTR_ERR(path.dentry);
768
		goto out_putfd;
L
Linus Torvalds 已提交
769
	}
770
	path.mnt = mntget(mnt);
771 772 773 774 775 776 777
	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);
778
	}
779
	path_put(&path);
780
out_putfd:
781 782 783 784
	if (error) {
		put_unused_fd(fd);
		fd = error;
	}
A
Al Viro 已提交
785
	inode_unlock(d_inode(root));
786 787
	if (!ro)
		mnt_drop_write(mnt);
L
Linus Torvalds 已提交
788 789 790 791 792
out_putname:
	putname(name);
	return fd;
}

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

	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;

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

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

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

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

1045
	audit_mq_sendrecv(mqdes, msg_len, 0, ts);
L
Linus Torvalds 已提交
1046

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

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

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

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

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

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

L
Linus Torvalds 已提交
1103 1104 1105
		msg_ptr = msg_get(info);

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

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

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

1171
	audit_mq_notify(mqdes, notification);
L
Linus Torvalds 已提交
1172

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

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

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

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

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

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

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

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

L
Linus Torvalds 已提交
1285 1286 1287
	return ret;
}

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

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

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

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

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

	spin_lock(&info->lock);

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

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

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

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

1352 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
	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);
}

1423 1424 1425 1426 1427 1428 1429 1430 1431 1432 1433 1434 1435 1436 1437 1438 1439 1440 1441 1442 1443 1444 1445 1446 1447 1448 1449 1450 1451 1452 1453 1454 1455 1456 1457 1458 1459 1460 1461 1462 1463
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;
}
#endif

#ifdef CONFIG_COMPAT_32BIT_TIME
1464
static int compat_prepare_timeout(const struct compat_timespec __user *p,
1465
				   struct timespec64 *ts)
1466
{
1467
	if (compat_get_timespec64(ts, p))
1468
		return -EFAULT;
1469
	if (!timespec64_valid(ts))
1470 1471 1472 1473 1474 1475 1476 1477 1478
		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)
{
1479
	struct timespec64 ts, *p = NULL;
1480 1481 1482 1483 1484 1485 1486 1487 1488 1489 1490 1491 1492 1493
	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)
{
1494
	struct timespec64 ts, *p = NULL;
1495 1496 1497 1498 1499 1500 1501 1502 1503
	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);
}
#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
	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;
	}
1547 1548 1549 1550 1551
	return 0;
}

void mq_clear_sbinfo(struct ipc_namespace *ns)
{
1552
	ns->mq_mnt->mnt_sb->s_fs_info = NULL;
1553 1554 1555 1556
}

void mq_put_mnt(struct ipc_namespace *ns)
{
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);