mqueue.c 40.3 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
#include <linux/init.h>
#include <linux/pagemap.h>
#include <linux/file.h>
#include <linux/mount.h>
21
#include <linux/fs_context.h>
L
Linus Torvalds 已提交
22 23 24 25 26 27
#include <linux/namei.h>
#include <linux/sysctl.h>
#include <linux/poll.h>
#include <linux/mqueue.h>
#include <linux/msg.h>
#include <linux/skbuff.h>
28
#include <linux/vmalloc.h>
L
Linus Torvalds 已提交
29 30
#include <linux/netlink.h>
#include <linux/syscalls.h>
31
#include <linux/audit.h>
32
#include <linux/signal.h>
I
Ingo Molnar 已提交
33
#include <linux/mutex.h>
34 35
#include <linux/nsproxy.h>
#include <linux/pid.h>
36
#include <linux/ipc_namespace.h>
37
#include <linux/user_namespace.h>
38
#include <linux/slab.h>
39
#include <linux/sched/wake_q.h>
40
#include <linux/sched/signal.h>
41
#include <linux/sched/user.h>
I
Ingo Molnar 已提交
42

L
Linus Torvalds 已提交
43 44 45
#include <net/sock.h>
#include "util.h"

46 47 48 49
struct mqueue_fs_context {
	struct ipc_namespace	*ipc_ns;
};

L
Linus Torvalds 已提交
50 51 52 53 54 55 56 57
#define MQUEUE_MAGIC	0x19800202
#define DIRENT_SIZE	20
#define FILENT_SIZE	80

#define SEND		0
#define RECV		1

#define STATE_NONE	0
58
#define STATE_READY	1
L
Linus Torvalds 已提交
59

60 61 62 63 64 65
struct posix_msg_tree_node {
	struct rb_node		rb_node;
	struct list_head	msg_list;
	int			priority;
};

L
Linus Torvalds 已提交
66 67 68 69 70 71 72 73 74 75 76 77
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;

78
	struct rb_root msg_tree;
D
Davidlohr Bueso 已提交
79
	struct rb_node *msg_tree_rightmost;
80
	struct posix_msg_tree_node *node_cache;
L
Linus Torvalds 已提交
81 82 83
	struct mq_attr attr;

	struct sigevent notify;
M
Manfred Spraul 已提交
84
	struct pid *notify_owner;
85
	struct user_namespace *notify_user_ns;
86
	struct user_struct *user;	/* user who created, for accounting */
L
Linus Torvalds 已提交
87 88 89 90 91 92 93 94 95
	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) */
};

96
static struct file_system_type mqueue_fs_type;
97
static const struct inode_operations mqueue_dir_inode_operations;
98
static const struct file_operations mqueue_file_operations;
99
static const struct super_operations mqueue_super_ops;
100
static const struct fs_context_operations mqueue_fs_context_ops;
L
Linus Torvalds 已提交
101 102
static void remove_notification(struct mqueue_inode_info *info);

103
static struct kmem_cache *mqueue_inode_cachep;
L
Linus Torvalds 已提交
104

M
Manfred Spraul 已提交
105
static struct ctl_table_header *mq_sysctl_table;
L
Linus Torvalds 已提交
106 107 108 109 110 111

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

112 113 114 115
/*
 * This routine should be called with the mq_lock held.
 */
static inline struct ipc_namespace *__get_ns_from_inode(struct inode *inode)
116
{
117
	return get_ipc_ns(inode->i_sb->s_fs_info);
118 119
}

120
static struct ipc_namespace *get_ns_from_inode(struct inode *inode)
121
{
122 123 124 125 126 127
	struct ipc_namespace *ns;

	spin_lock(&mq_lock);
	ns = __get_ns_from_inode(inode);
	spin_unlock(&mq_lock);
	return ns;
128 129
}

130 131 132 133 134
/* 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;
D
Davidlohr Bueso 已提交
135
	bool rightmost = true;
136 137 138 139 140 141 142 143

	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;
D
Davidlohr Bueso 已提交
144
		else if (msg->m_type < leaf->priority) {
145
			p = &(*p)->rb_left;
D
Davidlohr Bueso 已提交
146 147
			rightmost = false;
		} else
148 149
			p = &(*p)->rb_right;
	}
150 151 152 153 154 155 156 157 158
	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);
	}
159
	leaf->priority = msg->m_type;
D
Davidlohr Bueso 已提交
160 161 162 163

	if (rightmost)
		info->msg_tree_rightmost = &leaf->rb_node;

164 165 166 167 168 169 170 171 172
	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;
}

D
Davidlohr Bueso 已提交
173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188
static inline void msg_tree_erase(struct posix_msg_tree_node *leaf,
				  struct mqueue_inode_info *info)
{
	struct rb_node *node = &leaf->rb_node;

	if (info->msg_tree_rightmost == node)
		info->msg_tree_rightmost = rb_prev(node);

	rb_erase(node, &info->msg_tree);
	if (info->node_cache) {
		kfree(leaf);
	} else {
		info->node_cache = leaf;
	}
}

189 190
static inline struct msg_msg *msg_get(struct mqueue_inode_info *info)
{
D
Davidlohr Bueso 已提交
191
	struct rb_node *parent = NULL;
192 193 194 195
	struct posix_msg_tree_node *leaf;
	struct msg_msg *msg;

try_again:
D
Davidlohr Bueso 已提交
196 197 198 199 200 201
	/*
	 * 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.
	 */
	parent = info->msg_tree_rightmost;
202 203 204 205 206 207 208 209 210 211
	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);
212
	if (unlikely(list_empty(&leaf->msg_list))) {
213 214 215
		pr_warn_once("Inconsistency in POSIX message queue, "
			     "empty leaf node but we haven't implemented "
			     "lazy leaf delete!\n");
D
Davidlohr Bueso 已提交
216
		msg_tree_erase(leaf, info);
217 218 219 220 221 222
		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)) {
D
Davidlohr Bueso 已提交
223
			msg_tree_erase(leaf, info);
224 225 226 227 228 229 230
		}
	}
	info->attr.mq_curmsgs--;
	info->qsize -= msg->m_ts;
	return msg;
}

231
static struct inode *mqueue_get_inode(struct super_block *sb,
A
Al Viro 已提交
232
		struct ipc_namespace *ipc_ns, umode_t mode,
233
		struct mq_attr *attr)
L
Linus Torvalds 已提交
234
{
235
	struct user_struct *u = current_user();
L
Linus Torvalds 已提交
236
	struct inode *inode;
237
	int ret = -ENOMEM;
L
Linus Torvalds 已提交
238 239

	inode = new_inode(sb);
240 241 242 243 244 245 246
	if (!inode)
		goto err;

	inode->i_ino = get_next_ino();
	inode->i_mode = mode;
	inode->i_uid = current_fsuid();
	inode->i_gid = current_fsgid();
247
	inode->i_mtime = inode->i_ctime = inode->i_atime = current_time(inode);
248 249 250

	if (S_ISREG(mode)) {
		struct mqueue_inode_info *info;
251
		unsigned long mq_bytes, mq_treesize;
252 253 254 255 256 257 258 259 260 261

		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;
262
		info->notify_user_ns = NULL;
263 264
		info->qsize = 0;
		info->user = NULL;	/* set when all is ok */
265
		info->msg_tree = RB_ROOT;
D
Davidlohr Bueso 已提交
266
		info->msg_tree_rightmost = NULL;
267
		info->node_cache = NULL;
268
		memset(&info->attr, 0, sizeof(info->attr));
269 270 271 272
		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);
273 274 275 276
		if (attr) {
			info->attr.mq_maxmsg = attr->mq_maxmsg;
			info->attr.mq_msgsize = attr->mq_msgsize;
		}
277 278 279 280 281 282 283 284 285 286 287 288 289
		/*
		 * 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.
		 */
290 291 292 293 294 295 296 297 298 299 300 301 302 303 304 305 306

		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;
307 308 309
		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);
310 311 312 313
		mq_bytes = info->attr.mq_maxmsg * info->attr.mq_msgsize;
		if (mq_bytes + mq_treesize < mq_bytes)
			goto out_inode;
		mq_bytes += mq_treesize;
314 315
		spin_lock(&mq_lock);
		if (u->mq_bytes + mq_bytes < u->mq_bytes ||
316
		    u->mq_bytes + mq_bytes > rlimit(RLIMIT_MSGQUEUE)) {
317 318
			spin_unlock(&mq_lock);
			/* mqueue_evict_inode() releases info->messages */
319
			ret = -EMFILE;
320
			goto out_inode;
L
Linus Torvalds 已提交
321
		}
322 323 324 325 326 327 328 329 330 331 332
		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 已提交
333
	}
334

L
Linus Torvalds 已提交
335 336 337
	return inode;
out_inode:
	iput(inode);
338
err:
339
	return ERR_PTR(ret);
L
Linus Torvalds 已提交
340 341
}

342
static int mqueue_fill_super(struct super_block *sb, struct fs_context *fc)
L
Linus Torvalds 已提交
343 344
{
	struct inode *inode;
345
	struct ipc_namespace *ns = sb->s_fs_info;
L
Linus Torvalds 已提交
346

347
	sb->s_iflags |= SB_I_NOEXEC | SB_I_NODEV;
348 349
	sb->s_blocksize = PAGE_SIZE;
	sb->s_blocksize_bits = PAGE_SHIFT;
L
Linus Torvalds 已提交
350 351 352
	sb->s_magic = MQUEUE_MAGIC;
	sb->s_op = &mqueue_super_ops;

353 354 355
	inode = mqueue_get_inode(sb, ns, S_IFDIR | S_ISVTX | S_IRWXUGO, NULL);
	if (IS_ERR(inode))
		return PTR_ERR(inode);
L
Linus Torvalds 已提交
356

357 358 359 360
	sb->s_root = d_make_root(inode);
	if (!sb->s_root)
		return -ENOMEM;
	return 0;
L
Linus Torvalds 已提交
361 362
}

363
static int mqueue_get_tree(struct fs_context *fc)
L
Linus Torvalds 已提交
364
{
365 366
	struct mqueue_fs_context *ctx = fc->fs_private;

A
Al Viro 已提交
367
	return get_tree_keyed(fc, mqueue_fill_super, ctx->ipc_ns);
368 369 370 371 372 373
}

static void mqueue_fs_context_free(struct fs_context *fc)
{
	struct mqueue_fs_context *ctx = fc->fs_private;

374
	put_ipc_ns(ctx->ipc_ns);
375 376 377 378 379 380 381 382 383 384 385 386
	kfree(ctx);
}

static int mqueue_init_fs_context(struct fs_context *fc)
{
	struct mqueue_fs_context *ctx;

	ctx = kzalloc(sizeof(struct mqueue_fs_context), GFP_KERNEL);
	if (!ctx)
		return -ENOMEM;

	ctx->ipc_ns = get_ipc_ns(current->nsproxy->ipc_ns);
387 388
	put_user_ns(fc->user_ns);
	fc->user_ns = get_user_ns(ctx->ipc_ns->user_ns);
389 390 391 392 393 394 395 396 397 398 399 400 401 402 403 404 405 406
	fc->fs_private = ctx;
	fc->ops = &mqueue_fs_context_ops;
	return 0;
}

static struct vfsmount *mq_create_mount(struct ipc_namespace *ns)
{
	struct mqueue_fs_context *ctx;
	struct fs_context *fc;
	struct vfsmount *mnt;

	fc = fs_context_for_mount(&mqueue_fs_type, SB_KERNMOUNT);
	if (IS_ERR(fc))
		return ERR_CAST(fc);

	ctx = fc->fs_private;
	put_ipc_ns(ctx->ipc_ns);
	ctx->ipc_ns = get_ipc_ns(ns);
407 408
	put_user_ns(fc->user_ns);
	fc->user_ns = get_user_ns(ctx->ipc_ns->user_ns);
409 410 411 412

	mnt = fc_mount(fc);
	put_fs_context(fc);
	return mnt;
L
Linus Torvalds 已提交
413 414
}

415
static void init_once(void *foo)
L
Linus Torvalds 已提交
416 417 418
{
	struct mqueue_inode_info *p = (struct mqueue_inode_info *) foo;

C
Christoph Lameter 已提交
419
	inode_init_once(&p->vfs_inode);
L
Linus Torvalds 已提交
420 421 422 423 424 425
}

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

426
	ei = kmem_cache_alloc(mqueue_inode_cachep, GFP_KERNEL);
L
Linus Torvalds 已提交
427 428 429 430 431
	if (!ei)
		return NULL;
	return &ei->vfs_inode;
}

A
Al Viro 已提交
432
static void mqueue_free_inode(struct inode *inode)
L
Linus Torvalds 已提交
433 434 435 436
{
	kmem_cache_free(mqueue_inode_cachep, MQUEUE_I(inode));
}

A
Al Viro 已提交
437
static void mqueue_evict_inode(struct inode *inode)
L
Linus Torvalds 已提交
438 439 440
{
	struct mqueue_inode_info *info;
	struct user_struct *user;
441
	struct ipc_namespace *ipc_ns;
442 443
	struct msg_msg *msg, *nmsg;
	LIST_HEAD(tmp_msg);
L
Linus Torvalds 已提交
444

445
	clear_inode(inode);
A
Al Viro 已提交
446 447

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

450
	ipc_ns = get_ns_from_inode(inode);
L
Linus Torvalds 已提交
451 452
	info = MQUEUE_I(inode);
	spin_lock(&info->lock);
453
	while ((msg = msg_get(info)) != NULL)
454
		list_add_tail(&msg->m_list, &tmp_msg);
455
	kfree(info->node_cache);
L
Linus Torvalds 已提交
456 457
	spin_unlock(&info->lock);

458 459 460 461 462
	list_for_each_entry_safe(msg, nmsg, &tmp_msg, m_list) {
		list_del(&msg->m_list);
		free_msg(msg);
	}

L
Linus Torvalds 已提交
463 464
	user = info->user;
	if (user) {
465 466 467 468 469 470 471 472 473 474
		unsigned long mq_bytes, mq_treesize;

		/* Total amount of bytes accounted for the mqueue */
		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 已提交
475 476
		spin_lock(&mq_lock);
		user->mq_bytes -= mq_bytes;
477 478 479 480 481 482 483 484
		/*
		 * 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 已提交
485 486 487
		spin_unlock(&mq_lock);
		free_uid(user);
	}
488 489
	if (ipc_ns)
		put_ipc_ns(ipc_ns);
L
Linus Torvalds 已提交
490 491
}

492
static int mqueue_create_attr(struct dentry *dentry, umode_t mode, void *arg)
L
Linus Torvalds 已提交
493
{
494
	struct inode *dir = dentry->d_parent->d_inode;
L
Linus Torvalds 已提交
495
	struct inode *inode;
496
	struct mq_attr *attr = arg;
L
Linus Torvalds 已提交
497
	int error;
498
	struct ipc_namespace *ipc_ns;
L
Linus Torvalds 已提交
499 500

	spin_lock(&mq_lock);
501 502 503 504 505
	ipc_ns = __get_ns_from_inode(dir);
	if (!ipc_ns) {
		error = -EACCES;
		goto out_unlock;
	}
506 507 508

	if (ipc_ns->mq_queues_count >= ipc_ns->mq_queues_max &&
	    !capable(CAP_SYS_RESOURCE)) {
L
Linus Torvalds 已提交
509
		error = -ENOSPC;
510
		goto out_unlock;
L
Linus Torvalds 已提交
511
	}
512
	ipc_ns->mq_queues_count++;
L
Linus Torvalds 已提交
513 514
	spin_unlock(&mq_lock);

515
	inode = mqueue_get_inode(dir->i_sb, ipc_ns, mode, attr);
516 517
	if (IS_ERR(inode)) {
		error = PTR_ERR(inode);
L
Linus Torvalds 已提交
518
		spin_lock(&mq_lock);
519 520
		ipc_ns->mq_queues_count--;
		goto out_unlock;
L
Linus Torvalds 已提交
521 522
	}

523
	put_ipc_ns(ipc_ns);
L
Linus Torvalds 已提交
524
	dir->i_size += DIRENT_SIZE;
525
	dir->i_ctime = dir->i_mtime = dir->i_atime = current_time(dir);
L
Linus Torvalds 已提交
526 527 528 529

	d_instantiate(dentry, inode);
	dget(dentry);
	return 0;
530
out_unlock:
L
Linus Torvalds 已提交
531
	spin_unlock(&mq_lock);
532 533
	if (ipc_ns)
		put_ipc_ns(ipc_ns);
L
Linus Torvalds 已提交
534 535 536
	return error;
}

537 538 539 540 541 542
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 已提交
543 544
static int mqueue_unlink(struct inode *dir, struct dentry *dentry)
{
545
	struct inode *inode = d_inode(dentry);
L
Linus Torvalds 已提交
546

547
	dir->i_ctime = dir->i_mtime = dir->i_atime = current_time(dir);
L
Linus Torvalds 已提交
548
	dir->i_size -= DIRENT_SIZE;
M
Manfred Spraul 已提交
549 550 551
	drop_nlink(inode);
	dput(dentry);
	return 0;
L
Linus Torvalds 已提交
552 553 554 555 556 557 558 559 560 561
}

/*
*	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,
562
				size_t count, loff_t *off)
L
Linus Torvalds 已提交
563
{
A
Al Viro 已提交
564
	struct mqueue_inode_info *info = MQUEUE_I(file_inode(filp));
L
Linus Torvalds 已提交
565
	char buffer[FILENT_SIZE];
566
	ssize_t ret;
L
Linus Torvalds 已提交
567 568 569 570 571 572 573 574 575

	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,
576
			pid_vnr(info->notify_owner));
L
Linus Torvalds 已提交
577 578 579
	spin_unlock(&info->lock);
	buffer[sizeof(buffer)-1] = '\0';

580 581 582 583
	ret = simple_read_from_buffer(u_data, count, off, buffer,
				strlen(buffer));
	if (ret <= 0)
		return ret;
L
Linus Torvalds 已提交
584

585
	file_inode(filp)->i_atime = file_inode(filp)->i_ctime = current_time(file_inode(filp));
586
	return ret;
L
Linus Torvalds 已提交
587 588
}

589
static int mqueue_flush_file(struct file *filp, fl_owner_t id)
L
Linus Torvalds 已提交
590
{
A
Al Viro 已提交
591
	struct mqueue_inode_info *info = MQUEUE_I(file_inode(filp));
L
Linus Torvalds 已提交
592 593

	spin_lock(&info->lock);
594
	if (task_tgid(current) == info->notify_owner)
L
Linus Torvalds 已提交
595 596 597 598 599 600
		remove_notification(info);

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

601
static __poll_t mqueue_poll_file(struct file *filp, struct poll_table_struct *poll_tab)
L
Linus Torvalds 已提交
602
{
A
Al Viro 已提交
603
	struct mqueue_inode_info *info = MQUEUE_I(file_inode(filp));
604
	__poll_t retval = 0;
L
Linus Torvalds 已提交
605 606 607 608 609

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

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

	if (info->attr.mq_curmsgs < info->attr.mq_maxmsg)
613
		retval |= EPOLLOUT | EPOLLWRNORM;
L
Linus Torvalds 已提交
614 615 616 617 618 619 620 621 622 623 624 625
	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;

	list_for_each_entry(walk, &info->e_wait_q[sr].list, list) {
626
		if (walk->task->prio <= current->prio) {
L
Linus Torvalds 已提交
627 628 629 630 631 632 633 634 635 636 637 638 639
			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,
640
		    ktime_t *timeout, struct ext_wait_queue *ewp)
641
	__releases(&info->lock)
L
Linus Torvalds 已提交
642 643 644 645 646 647 648
{
	int retval;
	signed long time;

	wq_add(info, sr, ewp);

	for (;;) {
649
		__set_current_state(TASK_INTERRUPTIBLE);
L
Linus Torvalds 已提交
650 651

		spin_unlock(&info->lock);
652 653
		time = schedule_hrtimeout_range_clock(timeout, 0,
			HRTIMER_MODE_ABS, CLOCK_REALTIME);
L
Linus Torvalds 已提交
654 655 656 657 658 659 660 661 662 663 664 665 666 667 668 669 670 671 672 673 674 675 676 677 678 679 680 681 682 683 684 685 686 687 688 689 690 691 692 693 694 695 696

		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 已提交
697
	((char *)skb->data)[NOTIFY_COOKIE_LEN-1] = code;
L
Linus Torvalds 已提交
698 699 700 701 702 703 704 705 706 707 708 709 710 711
}

/*
 * 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) {
712
		struct kernel_siginfo sig_i;
L
Linus Torvalds 已提交
713 714 715 716 717 718
		switch (info->notify.sigev_notify) {
		case SIGEV_NONE:
			break;
		case SIGEV_SIGNAL:
			/* sends signal */

719
			clear_siginfo(&sig_i);
L
Linus Torvalds 已提交
720 721 722 723
			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;
724 725
			/* map current pid/uid into info->owner's namespaces */
			rcu_read_lock();
726 727
			sig_i.si_pid = task_tgid_nr_ns(current,
						ns_of_pid(info->notify_owner));
728
			sig_i.si_uid = from_kuid_munged(info->notify_user_ns, current_uid());
729
			rcu_read_unlock();
L
Linus Torvalds 已提交
730

731 732
			kill_pid_info(info->notify.sigev_signo,
				      &sig_i, info->notify_owner);
L
Linus Torvalds 已提交
733 734 735
			break;
		case SIGEV_THREAD:
			set_cookie(info->notify_cookie, NOTIFY_WOKENUP);
736
			netlink_sendskb(info->notify_sock, info->notify_cookie);
L
Linus Torvalds 已提交
737 738 739
			break;
		}
		/* after notification unregisters process */
740
		put_pid(info->notify_owner);
741
		put_user_ns(info->notify_user_ns);
742
		info->notify_owner = NULL;
743
		info->notify_user_ns = NULL;
L
Linus Torvalds 已提交
744 745 746 747
	}
	wake_up(&info->wait_q);
}

748
static int prepare_timeout(const struct __kernel_timespec __user *u_abs_timeout,
749
			   struct timespec64 *ts)
L
Linus Torvalds 已提交
750
{
751
	if (get_timespec64(ts, u_abs_timeout))
752
		return -EFAULT;
753
	if (!timespec64_valid(ts))
754 755
		return -EINVAL;
	return 0;
L
Linus Torvalds 已提交
756 757 758 759
}

static void remove_notification(struct mqueue_inode_info *info)
{
760
	if (info->notify_owner != NULL &&
L
Linus Torvalds 已提交
761 762
	    info->notify.sigev_notify == SIGEV_THREAD) {
		set_cookie(info->notify_cookie, NOTIFY_REMOVED);
763
		netlink_sendskb(info->notify_sock, info->notify_cookie);
L
Linus Torvalds 已提交
764
	}
765
	put_pid(info->notify_owner);
766
	put_user_ns(info->notify_user_ns);
767
	info->notify_owner = NULL;
768
	info->notify_user_ns = NULL;
L
Linus Torvalds 已提交
769 770
}

771 772
static int prepare_open(struct dentry *dentry, int oflag, int ro,
			umode_t mode, struct filename *name,
773
			struct mq_attr *attr)
L
Linus Torvalds 已提交
774
{
775 776
	static const int oflag2acc[O_ACCMODE] = { MAY_READ, MAY_WRITE,
						  MAY_READ | MAY_WRITE };
777
	int acc;
778

A
Al Viro 已提交
779 780
	if (d_really_is_negative(dentry)) {
		if (!(oflag & O_CREAT))
781
			return -ENOENT;
A
Al Viro 已提交
782 783 784 785 786
		if (ro)
			return ro;
		audit_inode_parent_hidden(name, dentry->d_parent);
		return vfs_mkobj(dentry, mode & ~current_umask(),
				  mqueue_create_attr, attr);
787
	}
A
Al Viro 已提交
788 789 790 791
	/* it already existed */
	audit_inode(name, dentry, 0);
	if ((oflag & (O_CREAT|O_EXCL)) == (O_CREAT|O_EXCL))
		return -EEXIST;
792
	if ((oflag & O_ACCMODE) == (O_RDWR | O_WRONLY))
793
		return -EINVAL;
794
	acc = oflag2acc[oflag & O_ACCMODE];
795
	return inode_permission(d_inode(dentry), acc);
L
Linus Torvalds 已提交
796 797
}

798 799
static int do_mq_open(const char __user *u_name, int oflag, umode_t mode,
		      struct mq_attr *attr)
L
Linus Torvalds 已提交
800
{
801 802
	struct vfsmount *mnt = current->nsproxy->ipc_ns->mq_mnt;
	struct dentry *root = mnt->mnt_root;
803
	struct filename *name;
A
Al Viro 已提交
804
	struct path path;
L
Linus Torvalds 已提交
805
	int fd, error;
806
	int ro;
L
Linus Torvalds 已提交
807

808
	audit_mq_open(oflag, mode, attr);
809

L
Linus Torvalds 已提交
810 811 812
	if (IS_ERR(name = getname(u_name)))
		return PTR_ERR(name);

U
Ulrich Drepper 已提交
813
	fd = get_unused_fd_flags(O_CLOEXEC);
L
Linus Torvalds 已提交
814 815 816
	if (fd < 0)
		goto out_putname;

817
	ro = mnt_want_write(mnt);	/* we'll drop it in any case */
A
Al Viro 已提交
818
	inode_lock(d_inode(root));
819
	path.dentry = lookup_one_len(name->name, root, strlen(name->name));
820 821
	if (IS_ERR(path.dentry)) {
		error = PTR_ERR(path.dentry);
822
		goto out_putfd;
L
Linus Torvalds 已提交
823
	}
824
	path.mnt = mntget(mnt);
825 826 827 828 829 830 831
	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);
832
	}
833
	path_put(&path);
834
out_putfd:
835 836 837 838
	if (error) {
		put_unused_fd(fd);
		fd = error;
	}
A
Al Viro 已提交
839
	inode_unlock(d_inode(root));
840 841
	if (!ro)
		mnt_drop_write(mnt);
L
Linus Torvalds 已提交
842 843 844 845 846
out_putname:
	putname(name);
	return fd;
}

847 848 849 850 851 852 853 854 855 856
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);
}

857
SYSCALL_DEFINE1(mq_unlink, const char __user *, u_name)
L
Linus Torvalds 已提交
858 859
{
	int err;
860
	struct filename *name;
L
Linus Torvalds 已提交
861 862
	struct dentry *dentry;
	struct inode *inode = NULL;
863
	struct ipc_namespace *ipc_ns = current->nsproxy->ipc_ns;
864
	struct vfsmount *mnt = ipc_ns->mq_mnt;
L
Linus Torvalds 已提交
865 866 867 868 869

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

870
	audit_inode_parent_hidden(name, mnt->mnt_root);
871 872 873
	err = mnt_want_write(mnt);
	if (err)
		goto out_name;
A
Al Viro 已提交
874
	inode_lock_nested(d_inode(mnt->mnt_root), I_MUTEX_PARENT);
875 876
	dentry = lookup_one_len(name->name, mnt->mnt_root,
				strlen(name->name));
L
Linus Torvalds 已提交
877 878 879 880 881
	if (IS_ERR(dentry)) {
		err = PTR_ERR(dentry);
		goto out_unlock;
	}

882
	inode = d_inode(dentry);
883 884 885
	if (!inode) {
		err = -ENOENT;
	} else {
A
Al Viro 已提交
886
		ihold(inode);
887
		err = vfs_unlink(d_inode(dentry->d_parent), dentry, NULL);
888
	}
L
Linus Torvalds 已提交
889 890 891
	dput(dentry);

out_unlock:
A
Al Viro 已提交
892
	inode_unlock(d_inode(mnt->mnt_root));
L
Linus Torvalds 已提交
893 894
	if (inode)
		iput(inode);
895 896 897
	mnt_drop_write(mnt);
out_name:
	putname(name);
L
Linus Torvalds 已提交
898 899 900 901 902 903 904 905 906 907

	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
908 909 910 911 912 913 914 915 916
 * 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 已提交
917 918 919 920 921 922 923
 *
 * 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).
 */
924 925
static inline void pipelined_send(struct wake_q_head *wake_q,
				  struct mqueue_inode_info *info,
L
Linus Torvalds 已提交
926 927 928 929 930
				  struct msg_msg *message,
				  struct ext_wait_queue *receiver)
{
	receiver->msg = message;
	list_del(&receiver->list);
931 932 933 934 935 936 937 938 939
	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 已提交
940 941 942 943 944
	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). */
945 946
static inline void pipelined_receive(struct wake_q_head *wake_q,
				     struct mqueue_inode_info *info)
L
Linus Torvalds 已提交
947 948 949 950 951 952 953 954
{
	struct ext_wait_queue *sender = wq_get_first_waiter(info, SEND);

	if (!sender) {
		/* for poll */
		wake_up_interruptible(&info->wait_q);
		return;
	}
955 956
	if (msg_insert(sender->msg, info))
		return;
957

L
Linus Torvalds 已提交
958
	list_del(&sender->list);
959
	wake_q_add(wake_q, sender->task);
L
Linus Torvalds 已提交
960 961 962
	sender->state = STATE_READY;
}

963 964
static int do_mq_timedsend(mqd_t mqdes, const char __user *u_msg_ptr,
		size_t msg_len, unsigned int msg_prio,
965
		struct timespec64 *ts)
L
Linus Torvalds 已提交
966
{
967
	struct fd f;
L
Linus Torvalds 已提交
968 969 970 971 972
	struct inode *inode;
	struct ext_wait_queue wait;
	struct ext_wait_queue *receiver;
	struct msg_msg *msg_ptr;
	struct mqueue_inode_info *info;
973
	ktime_t expires, *timeout = NULL;
974
	struct posix_msg_tree_node *new_leaf = NULL;
975
	int ret = 0;
976
	DEFINE_WAKE_Q(wake_q);
L
Linus Torvalds 已提交
977 978 979 980

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

981
	if (ts) {
982
		expires = timespec64_to_ktime(*ts);
983 984 985 986
		timeout = &expires;
	}

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

988 989
	f = fdget(mqdes);
	if (unlikely(!f.file)) {
990
		ret = -EBADF;
L
Linus Torvalds 已提交
991
		goto out;
992
	}
L
Linus Torvalds 已提交
993

A
Al Viro 已提交
994
	inode = file_inode(f.file);
995
	if (unlikely(f.file->f_op != &mqueue_file_operations)) {
996
		ret = -EBADF;
L
Linus Torvalds 已提交
997
		goto out_fput;
998
	}
L
Linus Torvalds 已提交
999
	info = MQUEUE_I(inode);
A
Al Viro 已提交
1000
	audit_file(f.file);
L
Linus Torvalds 已提交
1001

1002
	if (unlikely(!(f.file->f_mode & FMODE_WRITE))) {
1003
		ret = -EBADF;
L
Linus Torvalds 已提交
1004
		goto out_fput;
1005
	}
L
Linus Torvalds 已提交
1006 1007 1008 1009 1010 1011 1012 1013 1014 1015 1016 1017 1018 1019 1020 1021

	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;

1022 1023 1024 1025 1026 1027 1028 1029
	/*
	 * 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 已提交
1030 1031
	spin_lock(&info->lock);

1032 1033 1034 1035 1036 1037 1038 1039 1040
	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 已提交
1041
	if (info->attr.mq_curmsgs == info->attr.mq_maxmsg) {
1042
		if (f.file->f_flags & O_NONBLOCK) {
L
Linus Torvalds 已提交
1043 1044 1045 1046 1047 1048
			ret = -EAGAIN;
		} else {
			wait.task = current;
			wait.msg = (void *) msg_ptr;
			wait.state = STATE_NONE;
			ret = wq_sleep(info, SEND, timeout, &wait);
1049 1050 1051 1052 1053
			/*
			 * wq_sleep must be called with info->lock held, and
			 * returns with the lock released
			 */
			goto out_free;
L
Linus Torvalds 已提交
1054 1055 1056 1057
		}
	} else {
		receiver = wq_get_first_waiter(info, RECV);
		if (receiver) {
1058
			pipelined_send(&wake_q, info, msg_ptr, receiver);
L
Linus Torvalds 已提交
1059 1060
		} else {
			/* adds message to the queue */
1061 1062 1063
			ret = msg_insert(msg_ptr, info);
			if (ret)
				goto out_unlock;
L
Linus Torvalds 已提交
1064 1065 1066
			__do_notify(info);
		}
		inode->i_atime = inode->i_mtime = inode->i_ctime =
1067
				current_time(inode);
L
Linus Torvalds 已提交
1068
	}
1069 1070
out_unlock:
	spin_unlock(&info->lock);
1071
	wake_up_q(&wake_q);
1072 1073 1074
out_free:
	if (ret)
		free_msg(msg_ptr);
L
Linus Torvalds 已提交
1075
out_fput:
1076
	fdput(f);
L
Linus Torvalds 已提交
1077 1078 1079 1080
out:
	return ret;
}

1081 1082
static int do_mq_timedreceive(mqd_t mqdes, char __user *u_msg_ptr,
		size_t msg_len, unsigned int __user *u_msg_prio,
1083
		struct timespec64 *ts)
L
Linus Torvalds 已提交
1084 1085 1086
{
	ssize_t ret;
	struct msg_msg *msg_ptr;
1087
	struct fd f;
L
Linus Torvalds 已提交
1088 1089 1090
	struct inode *inode;
	struct mqueue_inode_info *info;
	struct ext_wait_queue wait;
1091
	ktime_t expires, *timeout = NULL;
1092
	struct posix_msg_tree_node *new_leaf = NULL;
L
Linus Torvalds 已提交
1093

1094
	if (ts) {
1095
		expires = timespec64_to_ktime(*ts);
1096
		timeout = &expires;
A
Al Viro 已提交
1097
	}
1098

1099
	audit_mq_sendrecv(mqdes, msg_len, 0, ts);
L
Linus Torvalds 已提交
1100

1101 1102
	f = fdget(mqdes);
	if (unlikely(!f.file)) {
1103
		ret = -EBADF;
L
Linus Torvalds 已提交
1104
		goto out;
1105
	}
L
Linus Torvalds 已提交
1106

A
Al Viro 已提交
1107
	inode = file_inode(f.file);
1108
	if (unlikely(f.file->f_op != &mqueue_file_operations)) {
1109
		ret = -EBADF;
L
Linus Torvalds 已提交
1110
		goto out_fput;
1111
	}
L
Linus Torvalds 已提交
1112
	info = MQUEUE_I(inode);
A
Al Viro 已提交
1113
	audit_file(f.file);
L
Linus Torvalds 已提交
1114

1115
	if (unlikely(!(f.file->f_mode & FMODE_READ))) {
1116
		ret = -EBADF;
L
Linus Torvalds 已提交
1117
		goto out_fput;
1118
	}
L
Linus Torvalds 已提交
1119 1120 1121 1122 1123 1124 1125

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

1126 1127 1128 1129 1130 1131 1132 1133
	/*
	 * 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 已提交
1134
	spin_lock(&info->lock);
1135 1136 1137 1138 1139 1140 1141 1142 1143

	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 已提交
1144
	if (info->attr.mq_curmsgs == 0) {
1145
		if (f.file->f_flags & O_NONBLOCK) {
L
Linus Torvalds 已提交
1146 1147 1148 1149 1150 1151 1152 1153 1154
			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 {
1155
		DEFINE_WAKE_Q(wake_q);
1156

L
Linus Torvalds 已提交
1157 1158 1159
		msg_ptr = msg_get(info);

		inode->i_atime = inode->i_mtime = inode->i_ctime =
1160
				current_time(inode);
L
Linus Torvalds 已提交
1161 1162

		/* There is now free space in queue. */
1163
		pipelined_receive(&wake_q, info);
L
Linus Torvalds 已提交
1164
		spin_unlock(&info->lock);
1165
		wake_up_q(&wake_q);
L
Linus Torvalds 已提交
1166 1167 1168 1169 1170 1171 1172 1173 1174 1175 1176 1177
		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:
1178
	fdput(f);
L
Linus Torvalds 已提交
1179 1180 1181 1182
out:
	return ret;
}

1183 1184
SYSCALL_DEFINE5(mq_timedsend, mqd_t, mqdes, const char __user *, u_msg_ptr,
		size_t, msg_len, unsigned int, msg_prio,
1185
		const struct __kernel_timespec __user *, u_abs_timeout)
1186
{
1187
	struct timespec64 ts, *p = NULL;
1188 1189 1190 1191 1192 1193 1194 1195 1196 1197 1198
	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,
1199
		const struct __kernel_timespec __user *, u_abs_timeout)
1200
{
1201
	struct timespec64 ts, *p = NULL;
1202 1203 1204 1205 1206 1207 1208 1209 1210
	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 已提交
1211 1212 1213 1214 1215
/*
 * 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.
 */
1216
static int do_mq_notify(mqd_t mqdes, const struct sigevent *notification)
L
Linus Torvalds 已提交
1217
{
1218 1219
	int ret;
	struct fd f;
L
Linus Torvalds 已提交
1220 1221 1222 1223 1224
	struct sock *sock;
	struct inode *inode;
	struct mqueue_inode_info *info;
	struct sk_buff *nc;

1225
	audit_mq_notify(mqdes, notification);
L
Linus Torvalds 已提交
1226

A
Al Viro 已提交
1227 1228
	nc = NULL;
	sock = NULL;
1229 1230 1231 1232
	if (notification != NULL) {
		if (unlikely(notification->sigev_notify != SIGEV_NONE &&
			     notification->sigev_notify != SIGEV_SIGNAL &&
			     notification->sigev_notify != SIGEV_THREAD))
L
Linus Torvalds 已提交
1233
			return -EINVAL;
1234 1235
		if (notification->sigev_notify == SIGEV_SIGNAL &&
			!valid_signal(notification->sigev_signo)) {
L
Linus Torvalds 已提交
1236 1237
			return -EINVAL;
		}
1238
		if (notification->sigev_notify == SIGEV_THREAD) {
P
Patrick McHardy 已提交
1239 1240
			long timeo;

L
Linus Torvalds 已提交
1241 1242
			/* create the notify skb */
			nc = alloc_skb(NOTIFY_COOKIE_LEN, GFP_KERNEL);
1243 1244
			if (!nc) {
				ret = -ENOMEM;
L
Linus Torvalds 已提交
1245
				goto out;
1246
			}
L
Linus Torvalds 已提交
1247
			if (copy_from_user(nc->data,
1248
					notification->sigev_value.sival_ptr,
L
Linus Torvalds 已提交
1249
					NOTIFY_COOKIE_LEN)) {
1250
				ret = -EFAULT;
L
Linus Torvalds 已提交
1251 1252 1253 1254 1255 1256 1257
				goto out;
			}

			/* TODO: add a header? */
			skb_put(nc, NOTIFY_COOKIE_LEN);
			/* and attach it to the socket */
retry:
1258
			f = fdget(notification->sigev_signo);
1259
			if (!f.file) {
1260
				ret = -EBADF;
L
Linus Torvalds 已提交
1261
				goto out;
1262
			}
1263 1264
			sock = netlink_getsockbyfilp(f.file);
			fdput(f);
L
Linus Torvalds 已提交
1265 1266 1267 1268 1269 1270
			if (IS_ERR(sock)) {
				ret = PTR_ERR(sock);
				sock = NULL;
				goto out;
			}

P
Patrick McHardy 已提交
1271
			timeo = MAX_SCHEDULE_TIMEOUT;
1272
			ret = netlink_attachskb(sock, nc, &timeo, NULL);
1273 1274
			if (ret == 1) {
				sock = NULL;
1275
				goto retry;
1276
			}
L
Linus Torvalds 已提交
1277 1278 1279 1280 1281 1282 1283 1284
			if (ret) {
				sock = NULL;
				nc = NULL;
				goto out;
			}
		}
	}

1285 1286
	f = fdget(mqdes);
	if (!f.file) {
1287
		ret = -EBADF;
L
Linus Torvalds 已提交
1288
		goto out;
1289
	}
L
Linus Torvalds 已提交
1290

A
Al Viro 已提交
1291
	inode = file_inode(f.file);
1292
	if (unlikely(f.file->f_op != &mqueue_file_operations)) {
1293
		ret = -EBADF;
L
Linus Torvalds 已提交
1294
		goto out_fput;
1295
	}
L
Linus Torvalds 已提交
1296 1297 1298 1299
	info = MQUEUE_I(inode);

	ret = 0;
	spin_lock(&info->lock);
1300
	if (notification == NULL) {
1301
		if (info->notify_owner == task_tgid(current)) {
L
Linus Torvalds 已提交
1302
			remove_notification(info);
1303
			inode->i_atime = inode->i_ctime = current_time(inode);
L
Linus Torvalds 已提交
1304
		}
1305
	} else if (info->notify_owner != NULL) {
L
Linus Torvalds 已提交
1306 1307
		ret = -EBUSY;
	} else {
1308
		switch (notification->sigev_notify) {
L
Linus Torvalds 已提交
1309 1310 1311 1312 1313 1314 1315 1316 1317 1318 1319
		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:
1320 1321
			info->notify.sigev_signo = notification->sigev_signo;
			info->notify.sigev_value = notification->sigev_value;
L
Linus Torvalds 已提交
1322 1323 1324
			info->notify.sigev_notify = SIGEV_SIGNAL;
			break;
		}
1325 1326

		info->notify_owner = get_pid(task_tgid(current));
1327
		info->notify_user_ns = get_user_ns(current_user_ns());
1328
		inode->i_atime = inode->i_ctime = current_time(inode);
L
Linus Torvalds 已提交
1329 1330 1331
	}
	spin_unlock(&info->lock);
out_fput:
1332
	fdput(f);
L
Linus Torvalds 已提交
1333
out:
1334
	if (sock)
L
Linus Torvalds 已提交
1335
		netlink_detachskb(sock, nc);
1336
	else
L
Linus Torvalds 已提交
1337
		dev_kfree_skb(nc);
1338

L
Linus Torvalds 已提交
1339 1340 1341
	return ret;
}

1342 1343 1344 1345 1346 1347 1348 1349 1350 1351 1352 1353 1354
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 已提交
1355
{
1356
	struct fd f;
L
Linus Torvalds 已提交
1357 1358 1359
	struct inode *inode;
	struct mqueue_inode_info *info;

1360 1361
	if (new && (new->mq_flags & (~O_NONBLOCK)))
		return -EINVAL;
L
Linus Torvalds 已提交
1362

1363
	f = fdget(mqdes);
1364 1365
	if (!f.file)
		return -EBADF;
L
Linus Torvalds 已提交
1366

1367
	if (unlikely(f.file->f_op != &mqueue_file_operations)) {
1368 1369
		fdput(f);
		return -EBADF;
1370
	}
1371 1372

	inode = file_inode(f.file);
L
Linus Torvalds 已提交
1373 1374 1375 1376
	info = MQUEUE_I(inode);

	spin_lock(&info->lock);

1377 1378 1379 1380 1381 1382
	if (old) {
		*old = info->attr;
		old->mq_flags = f.file->f_flags & O_NONBLOCK;
	}
	if (new) {
		audit_mq_getsetattr(mqdes, new);
1383
		spin_lock(&f.file->f_lock);
1384
		if (new->mq_flags & O_NONBLOCK)
1385
			f.file->f_flags |= O_NONBLOCK;
L
Linus Torvalds 已提交
1386
		else
1387 1388
			f.file->f_flags &= ~O_NONBLOCK;
		spin_unlock(&f.file->f_lock);
L
Linus Torvalds 已提交
1389

1390
		inode->i_atime = inode->i_ctime = current_time(inode);
L
Linus Torvalds 已提交
1391 1392 1393
	}

	spin_unlock(&info->lock);
1394 1395 1396
	fdput(f);
	return 0;
}
L
Linus Torvalds 已提交
1397

1398 1399 1400 1401 1402 1403 1404
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 已提交
1405

1406 1407 1408 1409 1410 1411 1412 1413 1414 1415 1416 1417 1418 1419 1420 1421 1422 1423 1424 1425 1426 1427 1428 1429 1430 1431 1432 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 1464 1465 1466 1467 1468 1469 1470 1471 1472 1473 1474 1475 1476
	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);
}

1477 1478 1479 1480 1481 1482 1483 1484 1485 1486 1487 1488 1489 1490 1491 1492 1493 1494 1495 1496 1497 1498 1499 1500 1501 1502 1503 1504 1505 1506 1507 1508 1509 1510 1511 1512 1513 1514 1515 1516 1517
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
1518
static int compat_prepare_timeout(const struct old_timespec32 __user *p,
1519
				   struct timespec64 *ts)
1520
{
1521
	if (get_old_timespec32(ts, p))
1522
		return -EFAULT;
1523
	if (!timespec64_valid(ts))
1524 1525 1526 1527
		return -EINVAL;
	return 0;
}

1528 1529 1530 1531
SYSCALL_DEFINE5(mq_timedsend_time32, mqd_t, mqdes,
		const char __user *, u_msg_ptr,
		unsigned int, msg_len, unsigned int, msg_prio,
		const struct old_timespec32 __user *, u_abs_timeout)
1532
{
1533
	struct timespec64 ts, *p = NULL;
1534 1535 1536 1537 1538 1539 1540 1541 1542
	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);
}

1543 1544 1545 1546
SYSCALL_DEFINE5(mq_timedreceive_time32, mqd_t, mqdes,
		char __user *, u_msg_ptr,
		unsigned int, msg_len, unsigned int __user *, u_msg_prio,
		const struct old_timespec32 __user *, u_abs_timeout)
1547
{
1548
	struct timespec64 ts, *p = NULL;
1549 1550 1551 1552 1553 1554 1555 1556 1557
	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 已提交
1558

1559
static const struct inode_operations mqueue_dir_inode_operations = {
L
Linus Torvalds 已提交
1560 1561 1562 1563 1564
	.lookup = simple_lookup,
	.create = mqueue_create,
	.unlink = mqueue_unlink,
};

1565
static const struct file_operations mqueue_file_operations = {
L
Linus Torvalds 已提交
1566 1567 1568
	.flush = mqueue_flush_file,
	.poll = mqueue_poll_file,
	.read = mqueue_read_file,
1569
	.llseek = default_llseek,
L
Linus Torvalds 已提交
1570 1571
};

1572
static const struct super_operations mqueue_super_ops = {
L
Linus Torvalds 已提交
1573
	.alloc_inode = mqueue_alloc_inode,
A
Al Viro 已提交
1574
	.free_inode = mqueue_free_inode,
A
Al Viro 已提交
1575
	.evict_inode = mqueue_evict_inode,
L
Linus Torvalds 已提交
1576 1577 1578
	.statfs = simple_statfs,
};

1579 1580 1581 1582 1583
static const struct fs_context_operations mqueue_fs_context_ops = {
	.free		= mqueue_fs_context_free,
	.get_tree	= mqueue_get_tree,
};

L
Linus Torvalds 已提交
1584
static struct file_system_type mqueue_fs_type = {
1585 1586 1587 1588
	.name			= "mqueue",
	.init_fs_context	= mqueue_init_fs_context,
	.kill_sb		= kill_litter_super,
	.fs_flags		= FS_USERNS_MOUNT,
L
Linus Torvalds 已提交
1589 1590
};

1591 1592
int mq_init_ns(struct ipc_namespace *ns)
{
1593 1594
	struct vfsmount *m;

1595 1596 1597 1598
	ns->mq_queues_count  = 0;
	ns->mq_queues_max    = DFLT_QUEUESMAX;
	ns->mq_msg_max       = DFLT_MSGMAX;
	ns->mq_msgsize_max   = DFLT_MSGSIZEMAX;
1599 1600
	ns->mq_msg_default   = DFLT_MSG;
	ns->mq_msgsize_default  = DFLT_MSGSIZE;
1601

1602 1603 1604 1605
	m = mq_create_mount(ns);
	if (IS_ERR(m))
		return PTR_ERR(m);
	ns->mq_mnt = m;
1606 1607 1608 1609 1610
	return 0;
}

void mq_clear_sbinfo(struct ipc_namespace *ns)
{
1611
	ns->mq_mnt->mnt_sb->s_fs_info = NULL;
1612 1613 1614 1615
}

void mq_put_mnt(struct ipc_namespace *ns)
{
1616
	kern_unmount(ns->mq_mnt);
1617 1618
}

L
Linus Torvalds 已提交
1619 1620 1621 1622 1623 1624
static int __init init_mqueue_fs(void)
{
	int error;

	mqueue_inode_cachep = kmem_cache_create("mqueue_inode_cache",
				sizeof(struct mqueue_inode_info), 0,
1625
				SLAB_HWCACHE_ALIGN|SLAB_ACCOUNT, init_once);
L
Linus Torvalds 已提交
1626 1627 1628
	if (mqueue_inode_cachep == NULL)
		return -ENOMEM;

1629
	/* ignore failures - they are not fatal */
1630
	mq_sysctl_table = mq_register_sysctl_table();
L
Linus Torvalds 已提交
1631 1632 1633 1634 1635

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

1636 1637
	spin_lock_init(&mq_lock);

A
Al Viro 已提交
1638 1639
	error = mq_init_ns(&init_ipc_ns);
	if (error)
L
Linus Torvalds 已提交
1640 1641 1642 1643 1644 1645 1646 1647 1648
		goto out_filesystem;

	return 0;

out_filesystem:
	unregister_filesystem(&mqueue_fs_type);
out_sysctl:
	if (mq_sysctl_table)
		unregister_sysctl_table(mq_sysctl_table);
1649
	kmem_cache_destroy(mqueue_inode_cachep);
L
Linus Torvalds 已提交
1650 1651 1652
	return error;
}

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