sem.c 60.8 KB
Newer Older
1
// SPDX-License-Identifier: GPL-2.0
L
Linus Torvalds 已提交
2 3 4 5 6 7 8 9
/*
 * linux/ipc/sem.c
 * Copyright (C) 1992 Krishna Balasubramanian
 * Copyright (C) 1995 Eric Schenk, Bruno Haible
 *
 * /proc/sysvipc/sem support (c) 1999 Dragos Acostachioaie <dragos@iname.com>
 *
 * SMP-threaded, sysctl's added
10
 * (c) 1999 Manfred Spraul <manfred@colorfullife.com>
L
Linus Torvalds 已提交
11
 * Enforced range limit on SEM_UNDO
A
Alan Cox 已提交
12
 * (c) 2001 Red Hat Inc
L
Linus Torvalds 已提交
13 14
 * Lockless wakeup
 * (c) 2003 Manfred Spraul <manfred@colorfullife.com>
D
Davidlohr Bueso 已提交
15
 * (c) 2016 Davidlohr Bueso <dave@stgolabs.net>
16 17
 * Further wakeup optimizations, documentation
 * (c) 2010 Manfred Spraul <manfred@colorfullife.com>
S
Steve Grubb 已提交
18 19 20
 *
 * support for audit of ipc object properties and permission changes
 * Dustin Kirkland <dustin.kirkland@us.ibm.com>
K
Kirill Korotaev 已提交
21 22 23 24
 *
 * namespaces support
 * OpenVZ, SWsoft Inc.
 * Pavel Emelianov <xemul@openvz.org>
25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51
 *
 * Implementation notes: (May 2010)
 * This file implements System V semaphores.
 *
 * User space visible behavior:
 * - FIFO ordering for semop() operations (just FIFO, not starvation
 *   protection)
 * - multiple semaphore operations that alter the same semaphore in
 *   one semop() are handled.
 * - sem_ctime (time of last semctl()) is updated in the IPC_SET, SETVAL and
 *   SETALL calls.
 * - two Linux specific semctl() commands: SEM_STAT, SEM_INFO.
 * - undo adjustments at process exit are limited to 0..SEMVMX.
 * - namespace are supported.
 * - SEMMSL, SEMMNS, SEMOPM and SEMMNI can be configured at runtine by writing
 *   to /proc/sys/kernel/sem.
 * - statistics about the usage are reported in /proc/sysvipc/sem.
 *
 * Internals:
 * - scalability:
 *   - all global variables are read-mostly.
 *   - semop() calls and semctl(RMID) are synchronized by RCU.
 *   - most operations do write operations (actually: spin_lock calls) to
 *     the per-semaphore array structure.
 *   Thus: Perfect SMP scaling between independent semaphore arrays.
 *         If multiple semaphores in one array are used, then cache line
 *         trashing on the semaphore array spinlock will limit the scaling.
52
 * - semncnt and semzcnt are calculated on demand in count_semcnt()
53 54 55 56 57
 * - the task that performs a successful semop() scans the list of all
 *   sleeping tasks and completes any pending operations that can be fulfilled.
 *   Semaphores are actively given to waiting tasks (necessary for FIFO).
 *   (see update_queue())
 * - To improve the scalability, the actual wake-up calls are performed after
D
Davidlohr Bueso 已提交
58
 *   dropping all locks. (see wake_up_sem_queue_prepare())
59 60 61 62 63 64 65 66 67 68 69 70
 * - All work is done by the waker, the woken up task does not have to do
 *   anything - not even acquiring a lock or dropping a refcount.
 * - A woken up task may not even touch the semaphore array anymore, it may
 *   have been destroyed already by a semctl(RMID).
 * - UNDO values are stored in an array (one per process and per
 *   semaphore array, lazily allocated). For backwards compatibility, multiple
 *   modes for the UNDO variables are supported (per process, per thread)
 *   (see copy_semundo, CLONE_SYSVSEM)
 * - There are two lists of the pending operations: a per-array list
 *   and per-semaphore list (stored in the array). This allows to achieve FIFO
 *   ordering without always scanning all pending operations.
 *   The worst-case behavior is nevertheless O(N^2) for N wakeups.
L
Linus Torvalds 已提交
71 72 73 74 75 76 77 78 79 80
 */

#include <linux/slab.h>
#include <linux/spinlock.h>
#include <linux/init.h>
#include <linux/proc_fs.h>
#include <linux/time.h>
#include <linux/security.h>
#include <linux/syscalls.h>
#include <linux/audit.h>
81
#include <linux/capability.h>
82
#include <linux/seq_file.h>
N
Nadia Derbey 已提交
83
#include <linux/rwsem.h>
K
Kirill Korotaev 已提交
84
#include <linux/nsproxy.h>
85
#include <linux/ipc_namespace.h>
86
#include <linux/sched/wake_q.h>
I
Ingo Molnar 已提交
87

P
Paul McQuade 已提交
88
#include <linux/uaccess.h>
L
Linus Torvalds 已提交
89 90
#include "util.h"

91 92 93 94 95 96 97 98 99 100
/* One semaphore structure for each semaphore in the system. */
struct sem {
	int	semval;		/* current value */
	/*
	 * PID of the process that last modified the semaphore. For
	 * Linux, specifically these are:
	 *  - semop
	 *  - semctl, via SETVAL and SETALL.
	 *  - at task exit when performing undo adjustments (see exit_sem).
	 */
101
	struct pid *sempid;
102 103 104 105 106
	spinlock_t	lock;	/* spinlock for fine-grained semtimedop */
	struct list_head pending_alter; /* pending single-sop operations */
					/* that alter the semaphore */
	struct list_head pending_const; /* pending single-sop operations */
					/* that do not alter the semaphore*/
107
	time64_t	 sem_otime;	/* candidate for sem_otime */
108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124
} ____cacheline_aligned_in_smp;

/* One sem_array data structure for each set of semaphores in the system. */
struct sem_array {
	struct kern_ipc_perm	sem_perm;	/* permissions .. see ipc.h */
	time64_t		sem_ctime;	/* create/last semctl() time */
	struct list_head	pending_alter;	/* pending operations */
						/* that alter the array */
	struct list_head	pending_const;	/* pending complex operations */
						/* that do not alter semvals */
	struct list_head	list_id;	/* undo requests on this array */
	int			sem_nsems;	/* no. of semaphores in array */
	int			complex_count;	/* pending complex operations */
	unsigned int		use_global_lock;/* >0: global lock required */

	struct sem		sems[];
} __randomize_layout;
125 126 127 128 129 130

/* One queue for each sleeping process in the system. */
struct sem_queue {
	struct list_head	list;	 /* queue of pending operations */
	struct task_struct	*sleeper; /* this process */
	struct sem_undo		*undo;	 /* undo structure */
131
	struct pid		*pid;	 /* process id of requesting process */
132 133
	int			status;	 /* completion status of operation */
	struct sembuf		*sops;	 /* array of pending operations */
134
	struct sembuf		*blocking; /* the operation that blocked */
135
	int			nsops;	 /* number of operations */
136 137
	bool			alter;	 /* does *sops alter the array? */
	bool                    dupsop;	 /* sops on more than one sem_num */
138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159
};

/* Each task has a list of undo requests. They are executed automatically
 * when the process exits.
 */
struct sem_undo {
	struct list_head	list_proc;	/* per-process list: *
						 * all undos from one process
						 * rcu protected */
	struct rcu_head		rcu;		/* rcu struct for sem_undo */
	struct sem_undo_list	*ulp;		/* back ptr to sem_undo_list */
	struct list_head	list_id;	/* per semaphore array list:
						 * all undos for one array */
	int			semid;		/* semaphore set identifier */
	short			*semadj;	/* array of adjustments */
						/* one per semaphore */
};

/* sem_undo_list controls shared access to the list of sem_undo structures
 * that may be shared among all a CLONE_SYSVSEM task group.
 */
struct sem_undo_list {
160
	refcount_t		refcnt;
161 162 163 164 165
	spinlock_t		lock;
	struct list_head	list_proc;
};


166
#define sem_ids(ns)	((ns)->ids[IPC_SEM_IDS])
K
Kirill Korotaev 已提交
167

N
Nadia Derbey 已提交
168
static int newary(struct ipc_namespace *, struct ipc_params *);
169
static void freeary(struct ipc_namespace *, struct kern_ipc_perm *);
L
Linus Torvalds 已提交
170
#ifdef CONFIG_PROC_FS
171
static int sysvipc_sem_proc_show(struct seq_file *s, void *it);
L
Linus Torvalds 已提交
172 173 174 175 176
#endif

#define SEMMSL_FAST	256 /* 512 bytes on stack */
#define SEMOPM_FAST	64  /* ~ 372 bytes on stack */

M
Manfred Spraul 已提交
177 178 179 180 181 182 183
/*
 * Switching from the mode suitable for simple ops
 * to the mode for complex ops is costly. Therefore:
 * use some hysteresis
 */
#define USE_GLOBAL_LOCK_HYSTERESIS	10

L
Linus Torvalds 已提交
184
/*
185
 * Locking:
186
 * a) global sem_lock() for read/write
L
Linus Torvalds 已提交
187
 *	sem_undo.id_next,
188
 *	sem_array.complex_count,
189 190
 *	sem_array.pending{_alter,_const},
 *	sem_array.sem_undo
P
Paul McQuade 已提交
191
 *
192
 * b) global or semaphore sem_lock() for read/write:
193
 *	sem_array.sems[i].pending_{const,alter}:
194 195 196 197 198
 *
 * c) special:
 *	sem_undo_list.list_proc:
 *	* undo_list->lock for write
 *	* rcu for read
M
Manfred Spraul 已提交
199 200 201 202 203 204 205 206 207 208 209 210 211 212 213
 *	use_global_lock:
 *	* global sem_lock() for write
 *	* either local or global sem_lock() for read.
 *
 * Memory ordering:
 * Most ordering is enforced by using spin_lock() and spin_unlock().
 * The special case is use_global_lock:
 * Setting it from non-zero to 0 is a RELEASE, this is ensured by
 * using smp_store_release().
 * Testing if it is non-zero is an ACQUIRE, this is ensured by using
 * smp_load_acquire().
 * Setting it from 0 to non-zero must be ordered with regards to
 * this smp_load_acquire(), this is guaranteed because the smp_load_acquire()
 * is inside a spin_lock() and after a write from 0 to non-zero a
 * spin_lock()+spin_unlock() is done.
L
Linus Torvalds 已提交
214 215
 */

K
Kirill Korotaev 已提交
216 217 218 219 220
#define sc_semmsl	sem_ctls[0]
#define sc_semmns	sem_ctls[1]
#define sc_semopm	sem_ctls[2]
#define sc_semmni	sem_ctls[3]

221
int sem_init_ns(struct ipc_namespace *ns)
K
Kirill Korotaev 已提交
222 223 224 225 226 227
{
	ns->sc_semmsl = SEMMSL;
	ns->sc_semmns = SEMMNS;
	ns->sc_semopm = SEMOPM;
	ns->sc_semmni = SEMMNI;
	ns->used_sems = 0;
228
	return ipc_init_ids(&ns->ids[IPC_SEM_IDS]);
K
Kirill Korotaev 已提交
229 230
}

231
#ifdef CONFIG_IPC_NS
K
Kirill Korotaev 已提交
232 233
void sem_exit_ns(struct ipc_namespace *ns)
{
234
	free_ipcs(ns, &sem_ids(ns), freeary);
S
Serge E. Hallyn 已提交
235
	idr_destroy(&ns->ids[IPC_SEM_IDS].ipcs_idr);
236
	rhashtable_destroy(&ns->ids[IPC_SEM_IDS].key_ht);
K
Kirill Korotaev 已提交
237
}
238
#endif
L
Linus Torvalds 已提交
239

240
int __init sem_init(void)
L
Linus Torvalds 已提交
241
{
242 243
	const int err = sem_init_ns(&init_ipc_ns);

244 245
	ipc_init_proc_interface("sysvipc/sem",
				"       key      semid perms      nsems   uid   gid  cuid  cgid      otime      ctime\n",
K
Kirill Korotaev 已提交
246
				IPC_SEM_IDS, sysvipc_sem_proc_show);
247
	return err;
L
Linus Torvalds 已提交
248 249
}

250 251 252 253 254 255 256 257 258 259 260 261 262 263 264 265 266 267 268 269 270
/**
 * unmerge_queues - unmerge queues, if possible.
 * @sma: semaphore array
 *
 * The function unmerges the wait queues if complex_count is 0.
 * It must be called prior to dropping the global semaphore array lock.
 */
static void unmerge_queues(struct sem_array *sma)
{
	struct sem_queue *q, *tq;

	/* complex operations still around? */
	if (sma->complex_count)
		return;
	/*
	 * We will switch back to simple mode.
	 * Move all pending operation back into the per-semaphore
	 * queues.
	 */
	list_for_each_entry_safe(q, tq, &sma->pending_alter, list) {
		struct sem *curr;
271
		curr = &sma->sems[q->sops[0].sem_num];
272 273 274 275 276 277 278

		list_add_tail(&q->list, &curr->pending_alter);
	}
	INIT_LIST_HEAD(&sma->pending_alter);
}

/**
D
Davidlohr Bueso 已提交
279
 * merge_queues - merge single semop queues into global queue
280 281 282 283 284 285 286 287 288 289 290
 * @sma: semaphore array
 *
 * This function merges all per-semaphore queues into the global queue.
 * It is necessary to achieve FIFO ordering for the pending single-sop
 * operations when a multi-semop operation must sleep.
 * Only the alter operations must be moved, the const operations can stay.
 */
static void merge_queues(struct sem_array *sma)
{
	int i;
	for (i = 0; i < sma->sem_nsems; i++) {
291
		struct sem *sem = &sma->sems[i];
292 293 294 295 296

		list_splice_init(&sem->pending_alter, &sma->pending_alter);
	}
}

D
Davidlohr Bueso 已提交
297 298
static void sem_rcu_free(struct rcu_head *head)
{
299 300
	struct kern_ipc_perm *p = container_of(head, struct kern_ipc_perm, rcu);
	struct sem_array *sma = container_of(p, struct sem_array, sem_perm);
D
Davidlohr Bueso 已提交
301

302
	security_sem_free(&sma->sem_perm);
K
Kees Cook 已提交
303
	kvfree(sma);
D
Davidlohr Bueso 已提交
304 305
}

306
/*
307
 * Enter the mode suitable for non-simple operations:
308 309
 * Caller must own sem_perm.lock.
 */
310
static void complexmode_enter(struct sem_array *sma)
311 312 313 314
{
	int i;
	struct sem *sem;

M
Manfred Spraul 已提交
315 316 317 318 319 320 321
	if (sma->use_global_lock > 0)  {
		/*
		 * We are already in global lock mode.
		 * Nothing to do, just reset the
		 * counter until we return to simple mode.
		 */
		sma->use_global_lock = USE_GLOBAL_LOCK_HYSTERESIS;
M
Manfred Spraul 已提交
322 323
		return;
	}
M
Manfred Spraul 已提交
324
	sma->use_global_lock = USE_GLOBAL_LOCK_HYSTERESIS;
325

326
	for (i = 0; i < sma->sem_nsems; i++) {
327
		sem = &sma->sems[i];
328 329
		spin_lock(&sem->lock);
		spin_unlock(&sem->lock);
330
	}
331 332 333 334 335 336 337 338 339 340 341 342 343 344
}

/*
 * Try to leave the mode that disallows simple operations:
 * Caller must own sem_perm.lock.
 */
static void complexmode_tryleave(struct sem_array *sma)
{
	if (sma->complex_count)  {
		/* Complex ops are sleeping.
		 * We must stay in complex mode
		 */
		return;
	}
M
Manfred Spraul 已提交
345 346 347 348 349 350 351 352 353 354 355
	if (sma->use_global_lock == 1) {
		/*
		 * Immediately after setting use_global_lock to 0,
		 * a simple op can start. Thus: all memory writes
		 * performed by the current operation must be visible
		 * before we set use_global_lock to 0.
		 */
		smp_store_release(&sma->use_global_lock, 0);
	} else {
		sma->use_global_lock--;
	}
356 357
}

358
#define SEM_GLOBAL_LOCK	(-1)
359 360 361 362 363 364 365 366 367 368
/*
 * If the request contains only one semaphore operation, and there are
 * no complex transactions pending, lock only the semaphore involved.
 * Otherwise, lock the entire semaphore array, since we either have
 * multiple semaphores in our own semops, or we need to look at
 * semaphores from other pending complex operations.
 */
static inline int sem_lock(struct sem_array *sma, struct sembuf *sops,
			      int nsops)
{
369
	struct sem *sem;
370

371 372 373
	if (nsops != 1) {
		/* Complex operation - acquire a full lock */
		ipc_lock_object(&sma->sem_perm);
374

375 376 377
		/* Prevent parallel simple ops */
		complexmode_enter(sma);
		return SEM_GLOBAL_LOCK;
378 379 380 381
	}

	/*
	 * Only one semaphore affected - try to optimize locking.
382 383 384
	 * Optimized locking is possible if no complex operation
	 * is either enqueued or processed right now.
	 *
M
Manfred Spraul 已提交
385
	 * Both facts are tracked by use_global_mode.
386
	 */
387
	sem = &sma->sems[sops->sem_num];
388

389
	/*
M
Manfred Spraul 已提交
390
	 * Initial check for use_global_lock. Just an optimization,
391 392
	 * no locking, no memory barrier.
	 */
M
Manfred Spraul 已提交
393
	if (!sma->use_global_lock) {
394
		/*
395 396
		 * It appears that no complex operation is around.
		 * Acquire the per-semaphore lock.
397
		 */
398 399
		spin_lock(&sem->lock);

M
Manfred Spraul 已提交
400 401
		/* pairs with smp_store_release() */
		if (!smp_load_acquire(&sma->use_global_lock)) {
402 403
			/* fast path successful! */
			return sops->sem_num;
404
		}
405 406 407 408 409
		spin_unlock(&sem->lock);
	}

	/* slow path: acquire the full lock */
	ipc_lock_object(&sma->sem_perm);
410

M
Manfred Spraul 已提交
411 412 413 414 415 416 417 418 419
	if (sma->use_global_lock == 0) {
		/*
		 * The use_global_lock mode ended while we waited for
		 * sma->sem_perm.lock. Thus we must switch to locking
		 * with sem->lock.
		 * Unlike in the fast path, there is no need to recheck
		 * sma->use_global_lock after we have acquired sem->lock:
		 * We own sma->sem_perm.lock, thus use_global_lock cannot
		 * change.
420 421
		 */
		spin_lock(&sem->lock);
M
Manfred Spraul 已提交
422

423 424
		ipc_unlock_object(&sma->sem_perm);
		return sops->sem_num;
425
	} else {
M
Manfred Spraul 已提交
426 427 428 429
		/*
		 * Not a false alarm, thus continue to use the global lock
		 * mode. No need for complexmode_enter(), this was done by
		 * the caller that has set use_global_mode to non-zero.
430
		 */
431
		return SEM_GLOBAL_LOCK;
432 433 434 435 436
	}
}

static inline void sem_unlock(struct sem_array *sma, int locknum)
{
437
	if (locknum == SEM_GLOBAL_LOCK) {
438
		unmerge_queues(sma);
439
		complexmode_tryleave(sma);
440
		ipc_unlock_object(&sma->sem_perm);
441
	} else {
442
		struct sem *sem = &sma->sems[locknum];
443 444 445 446
		spin_unlock(&sem->lock);
	}
}

N
Nadia Derbey 已提交
447
/*
D
Davidlohr Bueso 已提交
448
 * sem_lock_(check_) routines are called in the paths where the rwsem
N
Nadia Derbey 已提交
449
 * is not held.
450 451
 *
 * The caller holds the RCU read lock.
N
Nadia Derbey 已提交
452
 */
453 454
static inline struct sem_array *sem_obtain_object(struct ipc_namespace *ns, int id)
{
D
Davidlohr Bueso 已提交
455
	struct kern_ipc_perm *ipcp = ipc_obtain_object_idr(&sem_ids(ns), id);
456 457 458 459 460 461 462 463 464 465 466 467 468 469

	if (IS_ERR(ipcp))
		return ERR_CAST(ipcp);

	return container_of(ipcp, struct sem_array, sem_perm);
}

static inline struct sem_array *sem_obtain_object_check(struct ipc_namespace *ns,
							int id)
{
	struct kern_ipc_perm *ipcp = ipc_obtain_object_check(&sem_ids(ns), id);

	if (IS_ERR(ipcp))
		return ERR_CAST(ipcp);
470

N
Nadia Derbey 已提交
471
	return container_of(ipcp, struct sem_array, sem_perm);
472 473
}

474 475
static inline void sem_lock_and_putref(struct sem_array *sma)
{
476
	sem_lock(sma, NULL, -1);
477
	ipc_rcu_putref(&sma->sem_perm, sem_rcu_free);
478 479
}

N
Nadia Derbey 已提交
480 481 482 483 484
static inline void sem_rmid(struct ipc_namespace *ns, struct sem_array *s)
{
	ipc_rmid(&sem_ids(ns), &s->sem_perm);
}

K
Kees Cook 已提交
485 486 487 488 489 490 491 492 493 494 495 496 497 498 499 500 501 502
static struct sem_array *sem_alloc(size_t nsems)
{
	struct sem_array *sma;
	size_t size;

	if (nsems > (INT_MAX - sizeof(*sma)) / sizeof(sma->sems[0]))
		return NULL;

	size = sizeof(*sma) + nsems * sizeof(sma->sems[0]);
	sma = kvmalloc(size, GFP_KERNEL);
	if (unlikely(!sma))
		return NULL;

	memset(sma, 0, size);

	return sma;
}

N
Nadia Derbey 已提交
503 504 505 506 507
/**
 * newary - Create a new semaphore set
 * @ns: namespace
 * @params: ptr to the structure that contains key, semflg and nsems
 *
D
Davidlohr Bueso 已提交
508
 * Called with sem_ids.rwsem held (as a writer)
N
Nadia Derbey 已提交
509
 */
N
Nadia Derbey 已提交
510
static int newary(struct ipc_namespace *ns, struct ipc_params *params)
L
Linus Torvalds 已提交
511 512 513
{
	int retval;
	struct sem_array *sma;
N
Nadia Derbey 已提交
514 515 516
	key_t key = params->key;
	int nsems = params->u.nsems;
	int semflg = params->flg;
517
	int i;
L
Linus Torvalds 已提交
518 519 520

	if (!nsems)
		return -EINVAL;
K
Kirill Korotaev 已提交
521
	if (ns->used_sems + nsems > ns->sc_semmns)
L
Linus Torvalds 已提交
522 523
		return -ENOSPC;

K
Kees Cook 已提交
524
	sma = sem_alloc(nsems);
525
	if (!sma)
L
Linus Torvalds 已提交
526
		return -ENOMEM;
527

L
Linus Torvalds 已提交
528 529 530 531
	sma->sem_perm.mode = (semflg & S_IRWXUGO);
	sma->sem_perm.key = key;

	sma->sem_perm.security = NULL;
532
	retval = security_sem_alloc(&sma->sem_perm);
L
Linus Torvalds 已提交
533
	if (retval) {
K
Kees Cook 已提交
534
		kvfree(sma);
L
Linus Torvalds 已提交
535 536 537
		return retval;
	}

538
	for (i = 0; i < nsems; i++) {
539 540 541
		INIT_LIST_HEAD(&sma->sems[i].pending_alter);
		INIT_LIST_HEAD(&sma->sems[i].pending_const);
		spin_lock_init(&sma->sems[i].lock);
542
	}
543 544

	sma->complex_count = 0;
M
Manfred Spraul 已提交
545
	sma->use_global_lock = USE_GLOBAL_LOCK_HYSTERESIS;
546 547
	INIT_LIST_HEAD(&sma->pending_alter);
	INIT_LIST_HEAD(&sma->pending_const);
548
	INIT_LIST_HEAD(&sma->list_id);
L
Linus Torvalds 已提交
549
	sma->sem_nsems = nsems;
550
	sma->sem_ctime = ktime_get_real_seconds();
551

552
	/* ipc_addid() locks sma upon success. */
553 554 555 556
	retval = ipc_addid(&sem_ids(ns), &sma->sem_perm, ns->sc_semmni);
	if (retval < 0) {
		call_rcu(&sma->sem_perm.rcu, sem_rcu_free);
		return retval;
557 558 559
	}
	ns->used_sems += nsems;

560
	sem_unlock(sma, -1);
561
	rcu_read_unlock();
L
Linus Torvalds 已提交
562

N
Nadia Derbey 已提交
563
	return sma->sem_perm.id;
L
Linus Torvalds 已提交
564 565
}

N
Nadia Derbey 已提交
566

N
Nadia Derbey 已提交
567
/*
D
Davidlohr Bueso 已提交
568
 * Called with sem_ids.rwsem and ipcp locked.
N
Nadia Derbey 已提交
569
 */
N
Nadia Derbey 已提交
570 571
static inline int sem_more_checks(struct kern_ipc_perm *ipcp,
				struct ipc_params *params)
N
Nadia Derbey 已提交
572
{
N
Nadia Derbey 已提交
573 574 575 576
	struct sem_array *sma;

	sma = container_of(ipcp, struct sem_array, sem_perm);
	if (params->u.nsems > sma->sem_nsems)
N
Nadia Derbey 已提交
577 578 579 580 581
		return -EINVAL;

	return 0;
}

582
long ksys_semget(key_t key, int nsems, int semflg)
L
Linus Torvalds 已提交
583
{
K
Kirill Korotaev 已提交
584
	struct ipc_namespace *ns;
M
Mathias Krause 已提交
585 586
	static const struct ipc_ops sem_ops = {
		.getnew = newary,
587
		.associate = security_sem_associate,
M
Mathias Krause 已提交
588 589
		.more_checks = sem_more_checks,
	};
N
Nadia Derbey 已提交
590
	struct ipc_params sem_params;
K
Kirill Korotaev 已提交
591 592

	ns = current->nsproxy->ipc_ns;
L
Linus Torvalds 已提交
593

K
Kirill Korotaev 已提交
594
	if (nsems < 0 || nsems > ns->sc_semmsl)
L
Linus Torvalds 已提交
595
		return -EINVAL;
N
Nadia Derbey 已提交
596

N
Nadia Derbey 已提交
597 598 599
	sem_params.key = key;
	sem_params.flg = semflg;
	sem_params.u.nsems = nsems;
L
Linus Torvalds 已提交
600

N
Nadia Derbey 已提交
601
	return ipcget(ns, &sem_ids(ns), &sem_ops, &sem_params);
L
Linus Torvalds 已提交
602 603
}

604 605 606 607 608
SYSCALL_DEFINE3(semget, key_t, key, int, nsems, int, semflg)
{
	return ksys_semget(key, nsems, semflg);
}

609
/**
610 611
 * perform_atomic_semop[_slow] - Attempt to perform semaphore
 *                               operations on a given array.
612
 * @sma: semaphore array
613
 * @q: struct sem_queue that describes the operation
614
 *
615 616 617 618 619 620 621
 * Caller blocking are as follows, based the value
 * indicated by the semaphore operation (sem_op):
 *
 *  (1) >0 never blocks.
 *  (2)  0 (wait-for-zero operation): semval is non-zero.
 *  (3) <0 attempting to decrement semval to a value smaller than zero.
 *
622 623
 * Returns 0 if the operation was possible.
 * Returns 1 if the operation is impossible, the caller must sleep.
624
 * Returns <0 for error codes.
L
Linus Torvalds 已提交
625
 */
626
static int perform_atomic_semop_slow(struct sem_array *sma, struct sem_queue *q)
L
Linus Torvalds 已提交
627
{
628 629
	int result, sem_op, nsops;
	struct pid *pid;
L
Linus Torvalds 已提交
630
	struct sembuf *sop;
M
Manfred Spraul 已提交
631
	struct sem *curr;
632 633 634 635 636 637
	struct sembuf *sops;
	struct sem_undo *un;

	sops = q->sops;
	nsops = q->nsops;
	un = q->undo;
L
Linus Torvalds 已提交
638 639

	for (sop = sops; sop < sops + nsops; sop++) {
640
		curr = &sma->sems[sop->sem_num];
L
Linus Torvalds 已提交
641 642
		sem_op = sop->sem_op;
		result = curr->semval;
643

L
Linus Torvalds 已提交
644 645 646 647 648 649 650 651
		if (!sem_op && result)
			goto would_block;

		result += sem_op;
		if (result < 0)
			goto would_block;
		if (result > SEMVMX)
			goto out_of_range;
652

L
Linus Torvalds 已提交
653 654
		if (sop->sem_flg & SEM_UNDO) {
			int undo = un->semadj[sop->sem_num] - sem_op;
655
			/* Exceeding the undo range is an error. */
L
Linus Torvalds 已提交
656 657
			if (undo < (-SEMAEM - 1) || undo > SEMAEM)
				goto out_of_range;
658
			un->semadj[sop->sem_num] = undo;
L
Linus Torvalds 已提交
659
		}
660

L
Linus Torvalds 已提交
661 662 663 664
		curr->semval = result;
	}

	sop--;
665
	pid = q->pid;
L
Linus Torvalds 已提交
666
	while (sop >= sops) {
667
		ipc_update_pid(&sma->sems[sop->sem_num].sempid, pid);
L
Linus Torvalds 已提交
668 669
		sop--;
	}
670

L
Linus Torvalds 已提交
671 672 673 674 675 676 677
	return 0;

out_of_range:
	result = -ERANGE;
	goto undo;

would_block:
678 679
	q->blocking = sop;

L
Linus Torvalds 已提交
680 681 682 683 684 685 686 687
	if (sop->sem_flg & IPC_NOWAIT)
		result = -EAGAIN;
	else
		result = 1;

undo:
	sop--;
	while (sop >= sops) {
688
		sem_op = sop->sem_op;
689
		sma->sems[sop->sem_num].semval -= sem_op;
690 691
		if (sop->sem_flg & SEM_UNDO)
			un->semadj[sop->sem_num] += sem_op;
L
Linus Torvalds 已提交
692 693 694 695 696 697
		sop--;
	}

	return result;
}

698 699 700 701 702 703 704 705 706 707 708 709 710 711 712 713 714 715 716 717 718 719
static int perform_atomic_semop(struct sem_array *sma, struct sem_queue *q)
{
	int result, sem_op, nsops;
	struct sembuf *sop;
	struct sem *curr;
	struct sembuf *sops;
	struct sem_undo *un;

	sops = q->sops;
	nsops = q->nsops;
	un = q->undo;

	if (unlikely(q->dupsop))
		return perform_atomic_semop_slow(sma, q);

	/*
	 * We scan the semaphore set twice, first to ensure that the entire
	 * operation can succeed, therefore avoiding any pointless writes
	 * to shared memory and having to undo such changes in order to block
	 * until the operations can go through.
	 */
	for (sop = sops; sop < sops + nsops; sop++) {
720
		curr = &sma->sems[sop->sem_num];
721 722 723 724 725 726 727 728 729 730 731 732 733 734 735 736 737 738 739 740 741 742 743
		sem_op = sop->sem_op;
		result = curr->semval;

		if (!sem_op && result)
			goto would_block; /* wait-for-zero */

		result += sem_op;
		if (result < 0)
			goto would_block;

		if (result > SEMVMX)
			return -ERANGE;

		if (sop->sem_flg & SEM_UNDO) {
			int undo = un->semadj[sop->sem_num] - sem_op;

			/* Exceeding the undo range is an error. */
			if (undo < (-SEMAEM - 1) || undo > SEMAEM)
				return -ERANGE;
		}
	}

	for (sop = sops; sop < sops + nsops; sop++) {
744
		curr = &sma->sems[sop->sem_num];
745 746 747 748 749 750 751 752 753
		sem_op = sop->sem_op;
		result = curr->semval;

		if (sop->sem_flg & SEM_UNDO) {
			int undo = un->semadj[sop->sem_num] - sem_op;

			un->semadj[sop->sem_num] = undo;
		}
		curr->semval += sem_op;
754
		ipc_update_pid(&curr->sempid, q->pid);
755 756 757 758 759 760 761 762 763
	}

	return 0;

would_block:
	q->blocking = sop;
	return sop->sem_flg & IPC_NOWAIT ? -EAGAIN : 1;
}

D
Davidlohr Bueso 已提交
764 765
static inline void wake_up_sem_queue_prepare(struct sem_queue *q, int error,
					     struct wake_q_head *wake_q)
766
{
D
Davidlohr Bueso 已提交
767 768 769 770 771 772 773 774 775
	wake_q_add(wake_q, q->sleeper);
	/*
	 * Rely on the above implicit barrier, such that we can
	 * ensure that we hold reference to the task before setting
	 * q->status. Otherwise we could race with do_exit if the
	 * task is awoken by an external event before calling
	 * wake_up_process().
	 */
	WRITE_ONCE(q->status, error);
N
Nick Piggin 已提交
776 777
}

778 779 780
static void unlink_queue(struct sem_array *sma, struct sem_queue *q)
{
	list_del(&q->list);
781
	if (q->nsops > 1)
782 783 784
		sma->complex_count--;
}

785 786 787 788 789 790 791
/** check_restart(sma, q)
 * @sma: semaphore array
 * @q: the operation that just completed
 *
 * update_queue is O(N^2) when it restarts scanning the whole queue of
 * waiting operations. Therefore this function checks if the restart is
 * really necessary. It is called after a previously waiting operation
792 793
 * modified the array.
 * Note that wait-for-zero operations are handled without restart.
794
 */
795
static inline int check_restart(struct sem_array *sma, struct sem_queue *q)
796
{
797 798
	/* pending complex alter operations are too difficult to analyse */
	if (!list_empty(&sma->pending_alter))
799 800 801 802 803 804
		return 1;

	/* we were a sleeping complex operation. Too difficult */
	if (q->nsops > 1)
		return 1;

805 806 807 808 809 810 811 812 813 814 815 816 817
	/* It is impossible that someone waits for the new value:
	 * - complex operations always restart.
	 * - wait-for-zero are handled seperately.
	 * - q is a previously sleeping simple operation that
	 *   altered the array. It must be a decrement, because
	 *   simple increments never sleep.
	 * - If there are older (higher priority) decrements
	 *   in the queue, then they have observed the original
	 *   semval value and couldn't proceed. The operation
	 *   decremented to value - thus they won't proceed either.
	 */
	return 0;
}
818

819
/**
D
Davidlohr Bueso 已提交
820
 * wake_const_ops - wake up non-alter tasks
821 822
 * @sma: semaphore array.
 * @semnum: semaphore that was modified.
D
Davidlohr Bueso 已提交
823
 * @wake_q: lockless wake-queue head.
824 825 826 827 828
 *
 * wake_const_ops must be called after a semaphore in a semaphore array
 * was set to 0. If complex const operations are pending, wake_const_ops must
 * be called with semnum = -1, as well as with the number of each modified
 * semaphore.
D
Davidlohr Bueso 已提交
829
 * The tasks that must be woken up are added to @wake_q. The return code
830 831 832 833
 * is stored in q->pid.
 * The function returns 1 if at least one operation was completed successfully.
 */
static int wake_const_ops(struct sem_array *sma, int semnum,
D
Davidlohr Bueso 已提交
834
			  struct wake_q_head *wake_q)
835
{
836
	struct sem_queue *q, *tmp;
837 838 839 840 841 842
	struct list_head *pending_list;
	int semop_completed = 0;

	if (semnum == -1)
		pending_list = &sma->pending_const;
	else
843
		pending_list = &sma->sems[semnum].pending_const;
844

845 846
	list_for_each_entry_safe(q, tmp, pending_list, list) {
		int error = perform_atomic_semop(sma, q);
847

848 849 850 851
		if (error > 0)
			continue;
		/* operation completed, remove from queue & wakeup */
		unlink_queue(sma, q);
852

853 854 855
		wake_up_sem_queue_prepare(q, error, wake_q);
		if (error == 0)
			semop_completed = 1;
856
	}
857

858 859 860 861
	return semop_completed;
}

/**
D
Davidlohr Bueso 已提交
862
 * do_smart_wakeup_zero - wakeup all wait for zero tasks
863 864 865
 * @sma: semaphore array
 * @sops: operations that were performed
 * @nsops: number of operations
D
Davidlohr Bueso 已提交
866
 * @wake_q: lockless wake-queue head
867
 *
D
Davidlohr Bueso 已提交
868 869
 * Checks all required queue for wait-for-zero operations, based
 * on the actual changes that were performed on the semaphore array.
870 871 872
 * The function returns 1 if at least one operation was completed successfully.
 */
static int do_smart_wakeup_zero(struct sem_array *sma, struct sembuf *sops,
D
Davidlohr Bueso 已提交
873
				int nsops, struct wake_q_head *wake_q)
874 875 876 877 878 879 880 881 882 883
{
	int i;
	int semop_completed = 0;
	int got_zero = 0;

	/* first: the per-semaphore queues, if known */
	if (sops) {
		for (i = 0; i < nsops; i++) {
			int num = sops[i].sem_num;

884
			if (sma->sems[num].semval == 0) {
885
				got_zero = 1;
D
Davidlohr Bueso 已提交
886
				semop_completed |= wake_const_ops(sma, num, wake_q);
887 888 889 890 891 892
			}
		}
	} else {
		/*
		 * No sops means modified semaphores not known.
		 * Assume all were changed.
893
		 */
894
		for (i = 0; i < sma->sem_nsems; i++) {
895
			if (sma->sems[i].semval == 0) {
896
				got_zero = 1;
D
Davidlohr Bueso 已提交
897
				semop_completed |= wake_const_ops(sma, i, wake_q);
898 899
			}
		}
900 901
	}
	/*
902 903
	 * If one of the modified semaphores got 0,
	 * then check the global queue, too.
904
	 */
905
	if (got_zero)
D
Davidlohr Bueso 已提交
906
		semop_completed |= wake_const_ops(sma, -1, wake_q);
907

908
	return semop_completed;
909 910
}

911 912

/**
D
Davidlohr Bueso 已提交
913
 * update_queue - look for tasks that can be completed.
914 915
 * @sma: semaphore array.
 * @semnum: semaphore that was modified.
D
Davidlohr Bueso 已提交
916
 * @wake_q: lockless wake-queue head.
917 918
 *
 * update_queue must be called after a semaphore in a semaphore array
919 920 921
 * was modified. If multiple semaphores were modified, update_queue must
 * be called with semnum = -1, as well as with the number of each modified
 * semaphore.
D
Davidlohr Bueso 已提交
922
 * The tasks that must be woken up are added to @wake_q. The return code
923
 * is stored in q->pid.
924 925
 * The function internally checks if const operations can now succeed.
 *
926
 * The function return 1 if at least one semop was completed successfully.
L
Linus Torvalds 已提交
927
 */
D
Davidlohr Bueso 已提交
928
static int update_queue(struct sem_array *sma, int semnum, struct wake_q_head *wake_q)
L
Linus Torvalds 已提交
929
{
930
	struct sem_queue *q, *tmp;
931
	struct list_head *pending_list;
932
	int semop_completed = 0;
933

934
	if (semnum == -1)
935
		pending_list = &sma->pending_alter;
936
	else
937
		pending_list = &sma->sems[semnum].pending_alter;
N
Nick Piggin 已提交
938 939

again:
940
	list_for_each_entry_safe(q, tmp, pending_list, list) {
941
		int error, restart;
942

943 944
		/* If we are scanning the single sop, per-semaphore list of
		 * one semaphore and that semaphore is 0, then it is not
945
		 * necessary to scan further: simple increments
946 947 948 949
		 * that affect only one entry succeed immediately and cannot
		 * be in the  per semaphore pending queue, and decrements
		 * cannot be successful if the value is already 0.
		 */
950
		if (semnum != -1 && sma->sems[semnum].semval == 0)
951 952
			break;

953
		error = perform_atomic_semop(sma, q);
L
Linus Torvalds 已提交
954 955

		/* Does q->sleeper still need to sleep? */
N
Nick Piggin 已提交
956 957 958
		if (error > 0)
			continue;

959
		unlink_queue(sma, q);
N
Nick Piggin 已提交
960

961
		if (error) {
962
			restart = 0;
963 964
		} else {
			semop_completed = 1;
D
Davidlohr Bueso 已提交
965
			do_smart_wakeup_zero(sma, q->sops, q->nsops, wake_q);
966
			restart = check_restart(sma, q);
967
		}
968

D
Davidlohr Bueso 已提交
969
		wake_up_sem_queue_prepare(q, error, wake_q);
970
		if (restart)
N
Nick Piggin 已提交
971
			goto again;
L
Linus Torvalds 已提交
972
	}
973
	return semop_completed;
L
Linus Torvalds 已提交
974 975
}

976
/**
D
Davidlohr Bueso 已提交
977
 * set_semotime - set sem_otime
978 979 980 981 982 983 984 985 986
 * @sma: semaphore array
 * @sops: operations that modified the array, may be NULL
 *
 * sem_otime is replicated to avoid cache line trashing.
 * This function sets one instance to the current time.
 */
static void set_semotime(struct sem_array *sma, struct sembuf *sops)
{
	if (sops == NULL) {
987
		sma->sems[0].sem_otime = ktime_get_real_seconds();
988
	} else {
989
		sma->sems[sops[0].sem_num].sem_otime =
990
						ktime_get_real_seconds();
991 992 993
	}
}

994
/**
D
Davidlohr Bueso 已提交
995
 * do_smart_update - optimized update_queue
996 997 998
 * @sma: semaphore array
 * @sops: operations that were performed
 * @nsops: number of operations
999
 * @otime: force setting otime
D
Davidlohr Bueso 已提交
1000
 * @wake_q: lockless wake-queue head
1001
 *
1002 1003
 * do_smart_update() does the required calls to update_queue and wakeup_zero,
 * based on the actual changes that were performed on the semaphore array.
1004
 * Note that the function does not do the actual wake-up: the caller is
D
Davidlohr Bueso 已提交
1005
 * responsible for calling wake_up_q().
1006
 * It is safe to perform this call after dropping all locks.
1007
 */
1008
static void do_smart_update(struct sem_array *sma, struct sembuf *sops, int nsops,
D
Davidlohr Bueso 已提交
1009
			    int otime, struct wake_q_head *wake_q)
1010 1011 1012
{
	int i;

D
Davidlohr Bueso 已提交
1013
	otime |= do_smart_wakeup_zero(sma, sops, nsops, wake_q);
1014

1015 1016
	if (!list_empty(&sma->pending_alter)) {
		/* semaphore array uses the global queue - just process it. */
D
Davidlohr Bueso 已提交
1017
		otime |= update_queue(sma, -1, wake_q);
1018 1019 1020 1021 1022 1023 1024
	} else {
		if (!sops) {
			/*
			 * No sops, thus the modified semaphores are not
			 * known. Check all.
			 */
			for (i = 0; i < sma->sem_nsems; i++)
D
Davidlohr Bueso 已提交
1025
				otime |= update_queue(sma, i, wake_q);
1026 1027 1028 1029 1030 1031 1032 1033 1034 1035 1036 1037 1038
		} else {
			/*
			 * Check the semaphores that were increased:
			 * - No complex ops, thus all sleeping ops are
			 *   decrease.
			 * - if we decreased the value, then any sleeping
			 *   semaphore ops wont be able to run: If the
			 *   previous value was too small, then the new
			 *   value will be too small, too.
			 */
			for (i = 0; i < nsops; i++) {
				if (sops[i].sem_op > 0) {
					otime |= update_queue(sma,
D
Davidlohr Bueso 已提交
1039
							      sops[i].sem_num, wake_q);
1040
				}
1041
			}
1042
		}
1043
	}
1044 1045
	if (otime)
		set_semotime(sma, sops);
1046 1047
}

1048
/*
1049
 * check_qop: Test if a queued operation sleeps on the semaphore semnum
1050 1051 1052 1053
 */
static int check_qop(struct sem_array *sma, int semnum, struct sem_queue *q,
			bool count_zero)
{
1054
	struct sembuf *sop = q->blocking;
1055

1056 1057 1058 1059 1060 1061 1062 1063 1064 1065 1066
	/*
	 * Linux always (since 0.99.10) reported a task as sleeping on all
	 * semaphores. This violates SUS, therefore it was changed to the
	 * standard compliant behavior.
	 * Give the administrators a chance to notice that an application
	 * might misbehave because it relies on the Linux behavior.
	 */
	pr_info_once("semctl(GETNCNT/GETZCNT) is since 3.16 Single Unix Specification compliant.\n"
			"The task %s (%d) triggered the difference, watch for misbehavior.\n",
			current->comm, task_pid_nr(current));

1067 1068
	if (sop->sem_num != semnum)
		return 0;
1069

1070 1071 1072 1073 1074 1075
	if (count_zero && sop->sem_op == 0)
		return 1;
	if (!count_zero && sop->sem_op < 0)
		return 1;

	return 0;
1076 1077
}

L
Linus Torvalds 已提交
1078 1079 1080
/* The following counts are associated to each semaphore:
 *   semncnt        number of tasks waiting on semval being nonzero
 *   semzcnt        number of tasks waiting on semval being zero
1081 1082 1083
 *
 * Per definition, a task waits only on the semaphore of the first semop
 * that cannot proceed, even if additional operation would block, too.
L
Linus Torvalds 已提交
1084
 */
1085 1086
static int count_semcnt(struct sem_array *sma, ushort semnum,
			bool count_zero)
L
Linus Torvalds 已提交
1087
{
1088
	struct list_head *l;
M
Manfred Spraul 已提交
1089
	struct sem_queue *q;
1090
	int semcnt;
L
Linus Torvalds 已提交
1091

1092 1093 1094
	semcnt = 0;
	/* First: check the simple operations. They are easy to evaluate */
	if (count_zero)
1095
		l = &sma->sems[semnum].pending_const;
1096
	else
1097
		l = &sma->sems[semnum].pending_alter;
L
Linus Torvalds 已提交
1098

1099 1100 1101 1102 1103
	list_for_each_entry(q, l, list) {
		/* all task on a per-semaphore list sleep on exactly
		 * that semaphore
		 */
		semcnt++;
R
Rik van Riel 已提交
1104 1105
	}

1106
	/* Then: check the complex operations. */
1107
	list_for_each_entry(q, &sma->pending_alter, list) {
1108 1109 1110 1111 1112 1113
		semcnt += check_qop(sma, semnum, q, count_zero);
	}
	if (count_zero) {
		list_for_each_entry(q, &sma->pending_const, list) {
			semcnt += check_qop(sma, semnum, q, count_zero);
		}
1114
	}
1115
	return semcnt;
L
Linus Torvalds 已提交
1116 1117
}

D
Davidlohr Bueso 已提交
1118 1119
/* Free a semaphore set. freeary() is called with sem_ids.rwsem locked
 * as a writer and the spinlock for this semaphore set hold. sem_ids.rwsem
N
Nadia Derbey 已提交
1120
 * remains locked on exit.
L
Linus Torvalds 已提交
1121
 */
1122
static void freeary(struct ipc_namespace *ns, struct kern_ipc_perm *ipcp)
L
Linus Torvalds 已提交
1123
{
1124 1125
	struct sem_undo *un, *tu;
	struct sem_queue *q, *tq;
1126
	struct sem_array *sma = container_of(ipcp, struct sem_array, sem_perm);
1127
	int i;
D
Davidlohr Bueso 已提交
1128
	DEFINE_WAKE_Q(wake_q);
L
Linus Torvalds 已提交
1129

1130
	/* Free the existing undo structures for this semaphore set.  */
1131
	ipc_assert_locked_object(&sma->sem_perm);
1132 1133 1134
	list_for_each_entry_safe(un, tu, &sma->list_id, list_id) {
		list_del(&un->list_id);
		spin_lock(&un->ulp->lock);
L
Linus Torvalds 已提交
1135
		un->semid = -1;
1136 1137
		list_del_rcu(&un->list_proc);
		spin_unlock(&un->ulp->lock);
1138
		kfree_rcu(un, rcu);
1139
	}
L
Linus Torvalds 已提交
1140 1141

	/* Wake up all pending processes and let them fail with EIDRM. */
1142 1143
	list_for_each_entry_safe(q, tq, &sma->pending_const, list) {
		unlink_queue(sma, q);
D
Davidlohr Bueso 已提交
1144
		wake_up_sem_queue_prepare(q, -EIDRM, &wake_q);
1145 1146 1147
	}

	list_for_each_entry_safe(q, tq, &sma->pending_alter, list) {
1148
		unlink_queue(sma, q);
D
Davidlohr Bueso 已提交
1149
		wake_up_sem_queue_prepare(q, -EIDRM, &wake_q);
L
Linus Torvalds 已提交
1150
	}
1151
	for (i = 0; i < sma->sem_nsems; i++) {
1152
		struct sem *sem = &sma->sems[i];
1153 1154
		list_for_each_entry_safe(q, tq, &sem->pending_const, list) {
			unlink_queue(sma, q);
D
Davidlohr Bueso 已提交
1155
			wake_up_sem_queue_prepare(q, -EIDRM, &wake_q);
1156 1157
		}
		list_for_each_entry_safe(q, tq, &sem->pending_alter, list) {
1158
			unlink_queue(sma, q);
D
Davidlohr Bueso 已提交
1159
			wake_up_sem_queue_prepare(q, -EIDRM, &wake_q);
1160
		}
1161
		ipc_update_pid(&sem->sempid, NULL);
1162
	}
L
Linus Torvalds 已提交
1163

N
Nadia Derbey 已提交
1164 1165
	/* Remove the semaphore set from the IDR */
	sem_rmid(ns, sma);
1166
	sem_unlock(sma, -1);
1167
	rcu_read_unlock();
L
Linus Torvalds 已提交
1168

D
Davidlohr Bueso 已提交
1169
	wake_up_q(&wake_q);
K
Kirill Korotaev 已提交
1170
	ns->used_sems -= sma->sem_nsems;
1171
	ipc_rcu_putref(&sma->sem_perm, sem_rcu_free);
L
Linus Torvalds 已提交
1172 1173 1174 1175
}

static unsigned long copy_semid_to_user(void __user *buf, struct semid64_ds *in, int version)
{
M
Manfred Spraul 已提交
1176
	switch (version) {
L
Linus Torvalds 已提交
1177 1178 1179 1180 1181 1182
	case IPC_64:
		return copy_to_user(buf, in, sizeof(*in));
	case IPC_OLD:
	    {
		struct semid_ds out;

1183 1184
		memset(&out, 0, sizeof(out));

L
Linus Torvalds 已提交
1185 1186 1187 1188 1189 1190 1191 1192 1193 1194 1195 1196 1197
		ipc64_perm_to_ipc_perm(&in->sem_perm, &out.sem_perm);

		out.sem_otime	= in->sem_otime;
		out.sem_ctime	= in->sem_ctime;
		out.sem_nsems	= in->sem_nsems;

		return copy_to_user(buf, &out, sizeof(out));
	    }
	default:
		return -EINVAL;
	}
}

1198
static time64_t get_semotime(struct sem_array *sma)
1199 1200
{
	int i;
1201
	time64_t res;
1202

1203
	res = sma->sems[0].sem_otime;
1204
	for (i = 1; i < sma->sem_nsems; i++) {
1205
		time64_t to = sma->sems[i].sem_otime;
1206 1207 1208 1209 1210 1211 1212

		if (to > res)
			res = to;
	}
	return res;
}

1213 1214
static int semctl_stat(struct ipc_namespace *ns, int semid,
			 int cmd, struct semid64_ds *semid64)
L
Linus Torvalds 已提交
1215 1216
{
	struct sem_array *sma;
1217
	time64_t semotime;
1218 1219
	int id = 0;
	int err;
L
Linus Torvalds 已提交
1220

1221
	memset(semid64, 0, sizeof(*semid64));
P
Paul McQuade 已提交
1222

1223
	rcu_read_lock();
1224
	if (cmd == SEM_STAT || cmd == SEM_STAT_ANY) {
1225 1226 1227 1228 1229 1230
		sma = sem_obtain_object(ns, semid);
		if (IS_ERR(sma)) {
			err = PTR_ERR(sma);
			goto out_unlock;
		}
		id = sma->sem_perm.id;
1231
	} else { /* IPC_STAT */
1232 1233 1234 1235
		sma = sem_obtain_object_check(ns, semid);
		if (IS_ERR(sma)) {
			err = PTR_ERR(sma);
			goto out_unlock;
L
Linus Torvalds 已提交
1236 1237 1238
		}
	}

1239 1240 1241 1242 1243 1244 1245 1246
	/* see comment for SHM_STAT_ANY */
	if (cmd == SEM_STAT_ANY)
		audit_ipc_obj(&sma->sem_perm);
	else {
		err = -EACCES;
		if (ipcperms(ns, &sma->sem_perm, S_IRUGO))
			goto out_unlock;
	}
L
Linus Torvalds 已提交
1247

1248
	err = security_sem_semctl(&sma->sem_perm, cmd);
1249 1250
	if (err)
		goto out_unlock;
L
Linus Torvalds 已提交
1251

1252 1253 1254 1255 1256 1257 1258 1259
	ipc_lock_object(&sma->sem_perm);

	if (!ipc_valid_object(&sma->sem_perm)) {
		ipc_unlock_object(&sma->sem_perm);
		err = -EIDRM;
		goto out_unlock;
	}

1260
	kernel_to_ipc64_perm(&sma->sem_perm, &semid64->sem_perm);
1261 1262
	semotime = get_semotime(sma);
	semid64->sem_otime = semotime;
1263
	semid64->sem_ctime = sma->sem_ctime;
1264 1265 1266 1267
#ifndef CONFIG_64BIT
	semid64->sem_otime_high = semotime >> 32;
	semid64->sem_ctime_high = sma->sem_ctime >> 32;
#endif
1268
	semid64->sem_nsems = sma->sem_nsems;
1269 1270

	ipc_unlock_object(&sma->sem_perm);
1271 1272
	rcu_read_unlock();
	return id;
L
Linus Torvalds 已提交
1273 1274

out_unlock:
1275
	rcu_read_unlock();
L
Linus Torvalds 已提交
1276 1277 1278
	return err;
}

1279 1280 1281 1282 1283 1284 1285 1286 1287 1288 1289 1290 1291 1292 1293 1294 1295 1296 1297 1298 1299 1300 1301 1302 1303 1304 1305 1306 1307 1308 1309 1310 1311 1312 1313
static int semctl_info(struct ipc_namespace *ns, int semid,
			 int cmd, void __user *p)
{
	struct seminfo seminfo;
	int max_id;
	int err;

	err = security_sem_semctl(NULL, cmd);
	if (err)
		return err;

	memset(&seminfo, 0, sizeof(seminfo));
	seminfo.semmni = ns->sc_semmni;
	seminfo.semmns = ns->sc_semmns;
	seminfo.semmsl = ns->sc_semmsl;
	seminfo.semopm = ns->sc_semopm;
	seminfo.semvmx = SEMVMX;
	seminfo.semmnu = SEMMNU;
	seminfo.semmap = SEMMAP;
	seminfo.semume = SEMUME;
	down_read(&sem_ids(ns).rwsem);
	if (cmd == SEM_INFO) {
		seminfo.semusz = sem_ids(ns).in_use;
		seminfo.semaem = ns->used_sems;
	} else {
		seminfo.semusz = SEMUSZ;
		seminfo.semaem = SEMAEM;
	}
	max_id = ipc_get_maxid(&sem_ids(ns));
	up_read(&sem_ids(ns).rwsem);
	if (copy_to_user(p, &seminfo, sizeof(struct seminfo)))
		return -EFAULT;
	return (max_id < 0) ? 0 : max_id;
}

1314
static int semctl_setval(struct ipc_namespace *ns, int semid, int semnum,
1315
		int val)
1316 1317 1318
{
	struct sem_undo *un;
	struct sem_array *sma;
M
Manfred Spraul 已提交
1319
	struct sem *curr;
1320
	int err;
D
Davidlohr Bueso 已提交
1321 1322
	DEFINE_WAKE_Q(wake_q);

1323 1324
	if (val > SEMVMX || val < 0)
		return -ERANGE;
1325

1326 1327 1328 1329 1330 1331 1332 1333 1334 1335 1336 1337 1338 1339 1340 1341 1342
	rcu_read_lock();
	sma = sem_obtain_object_check(ns, semid);
	if (IS_ERR(sma)) {
		rcu_read_unlock();
		return PTR_ERR(sma);
	}

	if (semnum < 0 || semnum >= sma->sem_nsems) {
		rcu_read_unlock();
		return -EINVAL;
	}


	if (ipcperms(ns, &sma->sem_perm, S_IWUGO)) {
		rcu_read_unlock();
		return -EACCES;
	}
1343

1344
	err = security_sem_semctl(&sma->sem_perm, SETVAL);
1345 1346 1347 1348
	if (err) {
		rcu_read_unlock();
		return -EACCES;
	}
1349

1350
	sem_lock(sma, NULL, -1);
1351

1352
	if (!ipc_valid_object(&sma->sem_perm)) {
1353 1354 1355 1356 1357
		sem_unlock(sma, -1);
		rcu_read_unlock();
		return -EIDRM;
	}

1358
	curr = &sma->sems[semnum];
1359

1360
	ipc_assert_locked_object(&sma->sem_perm);
1361 1362 1363 1364
	list_for_each_entry(un, &sma->list_id, list_id)
		un->semadj[semnum] = 0;

	curr->semval = val;
1365
	ipc_update_pid(&curr->sempid, task_tgid(current));
1366
	sma->sem_ctime = ktime_get_real_seconds();
1367
	/* maybe some queued-up processes were waiting for this */
D
Davidlohr Bueso 已提交
1368
	do_smart_update(sma, NULL, 0, 0, &wake_q);
1369
	sem_unlock(sma, -1);
1370
	rcu_read_unlock();
D
Davidlohr Bueso 已提交
1371
	wake_up_q(&wake_q);
1372
	return 0;
1373 1374
}

K
Kirill Korotaev 已提交
1375
static int semctl_main(struct ipc_namespace *ns, int semid, int semnum,
1376
		int cmd, void __user *p)
L
Linus Torvalds 已提交
1377 1378
{
	struct sem_array *sma;
M
Manfred Spraul 已提交
1379
	struct sem *curr;
1380
	int err, nsems;
L
Linus Torvalds 已提交
1381
	ushort fast_sem_io[SEMMSL_FAST];
M
Manfred Spraul 已提交
1382
	ushort *sem_io = fast_sem_io;
D
Davidlohr Bueso 已提交
1383
	DEFINE_WAKE_Q(wake_q);
1384 1385 1386 1387 1388

	rcu_read_lock();
	sma = sem_obtain_object_check(ns, semid);
	if (IS_ERR(sma)) {
		rcu_read_unlock();
1389
		return PTR_ERR(sma);
1390
	}
L
Linus Torvalds 已提交
1391 1392 1393 1394

	nsems = sma->sem_nsems;

	err = -EACCES;
1395 1396
	if (ipcperms(ns, &sma->sem_perm, cmd == SETALL ? S_IWUGO : S_IRUGO))
		goto out_rcu_wakeup;
L
Linus Torvalds 已提交
1397

1398
	err = security_sem_semctl(&sma->sem_perm, cmd);
1399 1400
	if (err)
		goto out_rcu_wakeup;
L
Linus Torvalds 已提交
1401 1402 1403 1404 1405

	err = -EACCES;
	switch (cmd) {
	case GETALL:
	{
1406
		ushort __user *array = p;
L
Linus Torvalds 已提交
1407 1408
		int i;

1409
		sem_lock(sma, NULL, -1);
1410
		if (!ipc_valid_object(&sma->sem_perm)) {
1411 1412 1413
			err = -EIDRM;
			goto out_unlock;
		}
M
Manfred Spraul 已提交
1414
		if (nsems > SEMMSL_FAST) {
1415
			if (!ipc_rcu_getref(&sma->sem_perm)) {
1416
				err = -EIDRM;
1417
				goto out_unlock;
1418 1419
			}
			sem_unlock(sma, -1);
1420
			rcu_read_unlock();
K
Kees Cook 已提交
1421 1422
			sem_io = kvmalloc_array(nsems, sizeof(ushort),
						GFP_KERNEL);
M
Manfred Spraul 已提交
1423
			if (sem_io == NULL) {
1424
				ipc_rcu_putref(&sma->sem_perm, sem_rcu_free);
L
Linus Torvalds 已提交
1425 1426 1427
				return -ENOMEM;
			}

1428
			rcu_read_lock();
1429
			sem_lock_and_putref(sma);
1430
			if (!ipc_valid_object(&sma->sem_perm)) {
L
Linus Torvalds 已提交
1431
				err = -EIDRM;
1432
				goto out_unlock;
L
Linus Torvalds 已提交
1433
			}
1434
		}
L
Linus Torvalds 已提交
1435
		for (i = 0; i < sma->sem_nsems; i++)
1436
			sem_io[i] = sma->sems[i].semval;
1437
		sem_unlock(sma, -1);
1438
		rcu_read_unlock();
L
Linus Torvalds 已提交
1439
		err = 0;
M
Manfred Spraul 已提交
1440
		if (copy_to_user(array, sem_io, nsems*sizeof(ushort)))
L
Linus Torvalds 已提交
1441 1442 1443 1444 1445 1446 1447 1448
			err = -EFAULT;
		goto out_free;
	}
	case SETALL:
	{
		int i;
		struct sem_undo *un;

1449
		if (!ipc_rcu_getref(&sma->sem_perm)) {
1450 1451
			err = -EIDRM;
			goto out_rcu_wakeup;
1452
		}
1453
		rcu_read_unlock();
L
Linus Torvalds 已提交
1454

M
Manfred Spraul 已提交
1455
		if (nsems > SEMMSL_FAST) {
K
Kees Cook 已提交
1456 1457
			sem_io = kvmalloc_array(nsems, sizeof(ushort),
						GFP_KERNEL);
M
Manfred Spraul 已提交
1458
			if (sem_io == NULL) {
1459
				ipc_rcu_putref(&sma->sem_perm, sem_rcu_free);
L
Linus Torvalds 已提交
1460 1461 1462 1463
				return -ENOMEM;
			}
		}

M
Manfred Spraul 已提交
1464
		if (copy_from_user(sem_io, p, nsems*sizeof(ushort))) {
1465
			ipc_rcu_putref(&sma->sem_perm, sem_rcu_free);
L
Linus Torvalds 已提交
1466 1467 1468 1469 1470 1471
			err = -EFAULT;
			goto out_free;
		}

		for (i = 0; i < nsems; i++) {
			if (sem_io[i] > SEMVMX) {
1472
				ipc_rcu_putref(&sma->sem_perm, sem_rcu_free);
L
Linus Torvalds 已提交
1473 1474 1475 1476
				err = -ERANGE;
				goto out_free;
			}
		}
1477
		rcu_read_lock();
1478
		sem_lock_and_putref(sma);
1479
		if (!ipc_valid_object(&sma->sem_perm)) {
L
Linus Torvalds 已提交
1480
			err = -EIDRM;
1481
			goto out_unlock;
L
Linus Torvalds 已提交
1482 1483
		}

1484
		for (i = 0; i < nsems; i++) {
1485
			sma->sems[i].semval = sem_io[i];
1486
			ipc_update_pid(&sma->sems[i].sempid, task_tgid(current));
1487
		}
1488

1489
		ipc_assert_locked_object(&sma->sem_perm);
1490
		list_for_each_entry(un, &sma->list_id, list_id) {
L
Linus Torvalds 已提交
1491 1492
			for (i = 0; i < nsems; i++)
				un->semadj[i] = 0;
1493
		}
1494
		sma->sem_ctime = ktime_get_real_seconds();
L
Linus Torvalds 已提交
1495
		/* maybe some queued-up processes were waiting for this */
D
Davidlohr Bueso 已提交
1496
		do_smart_update(sma, NULL, 0, 0, &wake_q);
L
Linus Torvalds 已提交
1497 1498 1499
		err = 0;
		goto out_unlock;
	}
1500
	/* GETVAL, GETPID, GETNCTN, GETZCNT: fall-through */
L
Linus Torvalds 已提交
1501 1502
	}
	err = -EINVAL;
1503 1504
	if (semnum < 0 || semnum >= nsems)
		goto out_rcu_wakeup;
L
Linus Torvalds 已提交
1505

1506
	sem_lock(sma, NULL, -1);
1507
	if (!ipc_valid_object(&sma->sem_perm)) {
1508 1509 1510
		err = -EIDRM;
		goto out_unlock;
	}
1511
	curr = &sma->sems[semnum];
L
Linus Torvalds 已提交
1512 1513 1514 1515 1516 1517

	switch (cmd) {
	case GETVAL:
		err = curr->semval;
		goto out_unlock;
	case GETPID:
1518
		err = pid_vnr(curr->sempid);
L
Linus Torvalds 已提交
1519 1520
		goto out_unlock;
	case GETNCNT:
1521
		err = count_semcnt(sma, semnum, 0);
L
Linus Torvalds 已提交
1522 1523
		goto out_unlock;
	case GETZCNT:
1524
		err = count_semcnt(sma, semnum, 1);
L
Linus Torvalds 已提交
1525 1526
		goto out_unlock;
	}
1527

L
Linus Torvalds 已提交
1528
out_unlock:
1529
	sem_unlock(sma, -1);
1530
out_rcu_wakeup:
1531
	rcu_read_unlock();
D
Davidlohr Bueso 已提交
1532
	wake_up_q(&wake_q);
L
Linus Torvalds 已提交
1533
out_free:
M
Manfred Spraul 已提交
1534
	if (sem_io != fast_sem_io)
K
Kees Cook 已提交
1535
		kvfree(sem_io);
L
Linus Torvalds 已提交
1536 1537 1538
	return err;
}

1539 1540
static inline unsigned long
copy_semid_from_user(struct semid64_ds *out, void __user *buf, int version)
L
Linus Torvalds 已提交
1541
{
M
Manfred Spraul 已提交
1542
	switch (version) {
L
Linus Torvalds 已提交
1543
	case IPC_64:
1544
		if (copy_from_user(out, buf, sizeof(*out)))
L
Linus Torvalds 已提交
1545 1546 1547 1548 1549 1550
			return -EFAULT;
		return 0;
	case IPC_OLD:
	    {
		struct semid_ds tbuf_old;

M
Manfred Spraul 已提交
1551
		if (copy_from_user(&tbuf_old, buf, sizeof(tbuf_old)))
L
Linus Torvalds 已提交
1552 1553
			return -EFAULT;

1554 1555 1556
		out->sem_perm.uid	= tbuf_old.sem_perm.uid;
		out->sem_perm.gid	= tbuf_old.sem_perm.gid;
		out->sem_perm.mode	= tbuf_old.sem_perm.mode;
L
Linus Torvalds 已提交
1557 1558 1559 1560 1561 1562 1563 1564

		return 0;
	    }
	default:
		return -EINVAL;
	}
}

1565
/*
D
Davidlohr Bueso 已提交
1566
 * This function handles some semctl commands which require the rwsem
1567
 * to be held in write mode.
D
Davidlohr Bueso 已提交
1568
 * NOTE: no locks must be held, the rwsem is taken inside this function.
1569
 */
1570
static int semctl_down(struct ipc_namespace *ns, int semid,
1571
		       int cmd, struct semid64_ds *semid64)
L
Linus Torvalds 已提交
1572 1573 1574 1575 1576
{
	struct sem_array *sma;
	int err;
	struct kern_ipc_perm *ipcp;

D
Davidlohr Bueso 已提交
1577
	down_write(&sem_ids(ns).rwsem);
1578 1579
	rcu_read_lock();

1580
	ipcp = ipcctl_pre_down_nolock(ns, &sem_ids(ns), semid, cmd,
1581
				      &semid64->sem_perm, 0);
1582 1583 1584 1585
	if (IS_ERR(ipcp)) {
		err = PTR_ERR(ipcp);
		goto out_unlock1;
	}
S
Steve Grubb 已提交
1586

1587
	sma = container_of(ipcp, struct sem_array, sem_perm);
L
Linus Torvalds 已提交
1588

1589
	err = security_sem_semctl(&sma->sem_perm, cmd);
1590 1591
	if (err)
		goto out_unlock1;
L
Linus Torvalds 已提交
1592

1593
	switch (cmd) {
L
Linus Torvalds 已提交
1594
	case IPC_RMID:
1595
		sem_lock(sma, NULL, -1);
1596
		/* freeary unlocks the ipc object and rcu */
1597
		freeary(ns, ipcp);
1598
		goto out_up;
L
Linus Torvalds 已提交
1599
	case IPC_SET:
1600
		sem_lock(sma, NULL, -1);
1601
		err = ipc_update_perm(&semid64->sem_perm, ipcp);
1602
		if (err)
1603
			goto out_unlock0;
1604
		sma->sem_ctime = ktime_get_real_seconds();
L
Linus Torvalds 已提交
1605 1606 1607
		break;
	default:
		err = -EINVAL;
1608
		goto out_unlock1;
L
Linus Torvalds 已提交
1609 1610
	}

1611
out_unlock0:
1612
	sem_unlock(sma, -1);
1613
out_unlock1:
1614
	rcu_read_unlock();
1615
out_up:
D
Davidlohr Bueso 已提交
1616
	up_write(&sem_ids(ns).rwsem);
L
Linus Torvalds 已提交
1617 1618 1619
	return err;
}

1620
long ksys_semctl(int semid, int semnum, int cmd, unsigned long arg)
L
Linus Torvalds 已提交
1621 1622
{
	int version;
K
Kirill Korotaev 已提交
1623
	struct ipc_namespace *ns;
1624
	void __user *p = (void __user *)arg;
1625 1626
	struct semid64_ds semid64;
	int err;
L
Linus Torvalds 已提交
1627 1628 1629 1630 1631

	if (semid < 0)
		return -EINVAL;

	version = ipc_parse_version(&cmd);
K
Kirill Korotaev 已提交
1632
	ns = current->nsproxy->ipc_ns;
L
Linus Torvalds 已提交
1633

M
Manfred Spraul 已提交
1634
	switch (cmd) {
L
Linus Torvalds 已提交
1635 1636
	case IPC_INFO:
	case SEM_INFO:
1637
		return semctl_info(ns, semid, cmd, p);
1638
	case IPC_STAT:
L
Linus Torvalds 已提交
1639
	case SEM_STAT:
1640
	case SEM_STAT_ANY:
1641 1642 1643 1644 1645 1646
		err = semctl_stat(ns, semid, cmd, &semid64);
		if (err < 0)
			return err;
		if (copy_semid_to_user(p, &semid64, version))
			err = -EFAULT;
		return err;
L
Linus Torvalds 已提交
1647 1648 1649 1650 1651 1652
	case GETALL:
	case GETVAL:
	case GETPID:
	case GETNCNT:
	case GETZCNT:
	case SETALL:
1653
		return semctl_main(ns, semid, semnum, cmd, p);
1654 1655 1656 1657 1658 1659 1660 1661 1662 1663 1664
	case SETVAL: {
		int val;
#if defined(CONFIG_64BIT) && defined(__BIG_ENDIAN)
		/* big-endian 64bit */
		val = arg >> 32;
#else
		/* 32bit or little-endian 64bit */
		val = arg;
#endif
		return semctl_setval(ns, semid, semnum, val);
	}
L
Linus Torvalds 已提交
1665
	case IPC_SET:
1666 1667 1668 1669
		if (copy_semid_from_user(&semid64, p, version))
			return -EFAULT;
	case IPC_RMID:
		return semctl_down(ns, semid, cmd, &semid64);
L
Linus Torvalds 已提交
1670 1671 1672 1673 1674
	default:
		return -EINVAL;
	}
}

1675 1676 1677 1678 1679
SYSCALL_DEFINE4(semctl, int, semid, int, semnum, int, cmd, unsigned long, arg)
{
	return ksys_semctl(semid, semnum, cmd, arg);
}

A
Al Viro 已提交
1680 1681 1682 1683 1684 1685 1686 1687 1688 1689 1690 1691 1692 1693 1694 1695 1696 1697
#ifdef CONFIG_COMPAT

struct compat_semid_ds {
	struct compat_ipc_perm sem_perm;
	compat_time_t sem_otime;
	compat_time_t sem_ctime;
	compat_uptr_t sem_base;
	compat_uptr_t sem_pending;
	compat_uptr_t sem_pending_last;
	compat_uptr_t undo;
	unsigned short sem_nsems;
};

static int copy_compat_semid_from_user(struct semid64_ds *out, void __user *buf,
					int version)
{
	memset(out, 0, sizeof(*out));
	if (version == IPC_64) {
1698
		struct compat_semid64_ds __user *p = buf;
A
Al Viro 已提交
1699 1700
		return get_compat_ipc64_perm(&out->sem_perm, &p->sem_perm);
	} else {
1701
		struct compat_semid_ds __user *p = buf;
A
Al Viro 已提交
1702 1703 1704 1705 1706 1707 1708 1709 1710 1711 1712
		return get_compat_ipc_perm(&out->sem_perm, &p->sem_perm);
	}
}

static int copy_compat_semid_to_user(void __user *buf, struct semid64_ds *in,
					int version)
{
	if (version == IPC_64) {
		struct compat_semid64_ds v;
		memset(&v, 0, sizeof(v));
		to_compat_ipc64_perm(&v.sem_perm, &in->sem_perm);
1713 1714 1715 1716
		v.sem_otime	 = lower_32_bits(in->sem_otime);
		v.sem_otime_high = upper_32_bits(in->sem_otime);
		v.sem_ctime	 = lower_32_bits(in->sem_ctime);
		v.sem_ctime_high = upper_32_bits(in->sem_ctime);
A
Al Viro 已提交
1717 1718 1719 1720 1721 1722 1723 1724 1725 1726 1727 1728 1729
		v.sem_nsems = in->sem_nsems;
		return copy_to_user(buf, &v, sizeof(v));
	} else {
		struct compat_semid_ds v;
		memset(&v, 0, sizeof(v));
		to_compat_ipc_perm(&v.sem_perm, &in->sem_perm);
		v.sem_otime = in->sem_otime;
		v.sem_ctime = in->sem_ctime;
		v.sem_nsems = in->sem_nsems;
		return copy_to_user(buf, &v, sizeof(v));
	}
}

1730
long compat_ksys_semctl(int semid, int semnum, int cmd, int arg)
A
Al Viro 已提交
1731 1732 1733 1734 1735 1736 1737 1738 1739 1740 1741 1742 1743 1744 1745 1746 1747 1748
{
	void __user *p = compat_ptr(arg);
	struct ipc_namespace *ns;
	struct semid64_ds semid64;
	int version = compat_ipc_parse_version(&cmd);
	int err;

	ns = current->nsproxy->ipc_ns;

	if (semid < 0)
		return -EINVAL;

	switch (cmd & (~IPC_64)) {
	case IPC_INFO:
	case SEM_INFO:
		return semctl_info(ns, semid, cmd, p);
	case IPC_STAT:
	case SEM_STAT:
1749
	case SEM_STAT_ANY:
A
Al Viro 已提交
1750 1751 1752 1753 1754 1755 1756 1757 1758 1759 1760
		err = semctl_stat(ns, semid, cmd, &semid64);
		if (err < 0)
			return err;
		if (copy_compat_semid_to_user(p, &semid64, version))
			err = -EFAULT;
		return err;
	case GETVAL:
	case GETPID:
	case GETNCNT:
	case GETZCNT:
	case GETALL:
L
Linus Torvalds 已提交
1761
	case SETALL:
1762 1763 1764
		return semctl_main(ns, semid, semnum, cmd, p);
	case SETVAL:
		return semctl_setval(ns, semid, semnum, arg);
L
Linus Torvalds 已提交
1765
	case IPC_SET:
A
Al Viro 已提交
1766 1767 1768 1769 1770
		if (copy_compat_semid_from_user(&semid64, p, version))
			return -EFAULT;
		/* fallthru */
	case IPC_RMID:
		return semctl_down(ns, semid, cmd, &semid64);
L
Linus Torvalds 已提交
1771 1772 1773 1774
	default:
		return -EINVAL;
	}
}
1775 1776 1777 1778 1779

COMPAT_SYSCALL_DEFINE4(semctl, int, semid, int, semnum, int, cmd, int, arg)
{
	return compat_ksys_semctl(semid, semnum, cmd, arg);
}
A
Al Viro 已提交
1780
#endif
L
Linus Torvalds 已提交
1781 1782 1783 1784 1785 1786 1787 1788 1789 1790 1791 1792 1793 1794 1795 1796 1797 1798

/* If the task doesn't already have a undo_list, then allocate one
 * here.  We guarantee there is only one thread using this undo list,
 * and current is THE ONE
 *
 * If this allocation and assignment succeeds, but later
 * portions of this code fail, there is no need to free the sem_undo_list.
 * Just let it stay associated with the task, and it'll be freed later
 * at exit time.
 *
 * This can block, so callers must hold no locks.
 */
static inline int get_undo_list(struct sem_undo_list **undo_listp)
{
	struct sem_undo_list *undo_list;

	undo_list = current->sysvsem.undo_list;
	if (!undo_list) {
1799
		undo_list = kzalloc(sizeof(*undo_list), GFP_KERNEL);
L
Linus Torvalds 已提交
1800 1801
		if (undo_list == NULL)
			return -ENOMEM;
I
Ingo Molnar 已提交
1802
		spin_lock_init(&undo_list->lock);
1803
		refcount_set(&undo_list->refcnt, 1);
1804 1805
		INIT_LIST_HEAD(&undo_list->list_proc);

L
Linus Torvalds 已提交
1806 1807 1808 1809 1810 1811
		current->sysvsem.undo_list = undo_list;
	}
	*undo_listp = undo_list;
	return 0;
}

1812
static struct sem_undo *__lookup_undo(struct sem_undo_list *ulp, int semid)
L
Linus Torvalds 已提交
1813
{
1814
	struct sem_undo *un;
1815

1816 1817 1818
	list_for_each_entry_rcu(un, &ulp->list_proc, list_proc) {
		if (un->semid == semid)
			return un;
L
Linus Torvalds 已提交
1819
	}
1820
	return NULL;
L
Linus Torvalds 已提交
1821 1822
}

1823 1824 1825 1826
static struct sem_undo *lookup_undo(struct sem_undo_list *ulp, int semid)
{
	struct sem_undo *un;

M
Manfred Spraul 已提交
1827
	assert_spin_locked(&ulp->lock);
1828 1829 1830 1831 1832 1833 1834 1835 1836

	un = __lookup_undo(ulp, semid);
	if (un) {
		list_del_rcu(&un->list_proc);
		list_add_rcu(&un->list_proc, &ulp->list_proc);
	}
	return un;
}

1837
/**
D
Davidlohr Bueso 已提交
1838
 * find_alloc_undo - lookup (and if not present create) undo array
1839 1840 1841 1842 1843 1844
 * @ns: namespace
 * @semid: semaphore array id
 *
 * The function looks up (and if not present creates) the undo structure.
 * The size of the undo structure depends on the size of the semaphore
 * array, thus the alloc path is not that straightforward.
1845 1846
 * Lifetime-rules: sem_undo is rcu-protected, on success, the function
 * performs a rcu_read_lock().
1847 1848
 */
static struct sem_undo *find_alloc_undo(struct ipc_namespace *ns, int semid)
L
Linus Torvalds 已提交
1849 1850 1851 1852
{
	struct sem_array *sma;
	struct sem_undo_list *ulp;
	struct sem_undo *un, *new;
1853
	int nsems, error;
L
Linus Torvalds 已提交
1854 1855 1856 1857 1858

	error = get_undo_list(&ulp);
	if (error)
		return ERR_PTR(error);

1859
	rcu_read_lock();
1860
	spin_lock(&ulp->lock);
L
Linus Torvalds 已提交
1861
	un = lookup_undo(ulp, semid);
1862
	spin_unlock(&ulp->lock);
M
Manfred Spraul 已提交
1863
	if (likely(un != NULL))
L
Linus Torvalds 已提交
1864 1865 1866
		goto out;

	/* no undo structure around - allocate one. */
1867
	/* step 1: figure out the size of the semaphore array */
1868 1869 1870
	sma = sem_obtain_object_check(ns, semid);
	if (IS_ERR(sma)) {
		rcu_read_unlock();
J
Julia Lawall 已提交
1871
		return ERR_CAST(sma);
1872
	}
1873

L
Linus Torvalds 已提交
1874
	nsems = sma->sem_nsems;
1875
	if (!ipc_rcu_getref(&sma->sem_perm)) {
1876 1877 1878 1879
		rcu_read_unlock();
		un = ERR_PTR(-EIDRM);
		goto out;
	}
1880
	rcu_read_unlock();
L
Linus Torvalds 已提交
1881

1882
	/* step 2: allocate new undo structure */
1883
	new = kzalloc(sizeof(struct sem_undo) + sizeof(short)*nsems, GFP_KERNEL);
L
Linus Torvalds 已提交
1884
	if (!new) {
1885
		ipc_rcu_putref(&sma->sem_perm, sem_rcu_free);
L
Linus Torvalds 已提交
1886 1887 1888
		return ERR_PTR(-ENOMEM);
	}

1889
	/* step 3: Acquire the lock on semaphore array */
1890
	rcu_read_lock();
1891
	sem_lock_and_putref(sma);
1892
	if (!ipc_valid_object(&sma->sem_perm)) {
1893
		sem_unlock(sma, -1);
1894
		rcu_read_unlock();
L
Linus Torvalds 已提交
1895 1896 1897 1898
		kfree(new);
		un = ERR_PTR(-EIDRM);
		goto out;
	}
1899 1900 1901 1902 1903 1904 1905 1906 1907 1908
	spin_lock(&ulp->lock);

	/*
	 * step 4: check for races: did someone else allocate the undo struct?
	 */
	un = lookup_undo(ulp, semid);
	if (un) {
		kfree(new);
		goto success;
	}
1909 1910
	/* step 5: initialize & link new undo structure */
	new->semadj = (short *) &new[1];
1911
	new->ulp = ulp;
1912 1913
	new->semid = semid;
	assert_spin_locked(&ulp->lock);
1914
	list_add_rcu(&new->list_proc, &ulp->list_proc);
1915
	ipc_assert_locked_object(&sma->sem_perm);
1916
	list_add(&new->list_id, &sma->list_id);
1917
	un = new;
1918

1919
success:
1920
	spin_unlock(&ulp->lock);
1921
	sem_unlock(sma, -1);
L
Linus Torvalds 已提交
1922 1923 1924 1925
out:
	return un;
}

A
Al Viro 已提交
1926
static long do_semtimedop(int semid, struct sembuf __user *tsops,
1927
		unsigned nsops, const struct timespec64 *timeout)
L
Linus Torvalds 已提交
1928 1929 1930 1931
{
	int error = -EINVAL;
	struct sem_array *sma;
	struct sembuf fast_sops[SEMOPM_FAST];
M
Manfred Spraul 已提交
1932
	struct sembuf *sops = fast_sops, *sop;
L
Linus Torvalds 已提交
1933
	struct sem_undo *un;
1934 1935
	int max, locknum;
	bool undos = false, alter = false, dupsop = false;
L
Linus Torvalds 已提交
1936
	struct sem_queue queue;
1937
	unsigned long dup = 0, jiffies_left = 0;
K
Kirill Korotaev 已提交
1938 1939 1940
	struct ipc_namespace *ns;

	ns = current->nsproxy->ipc_ns;
L
Linus Torvalds 已提交
1941 1942 1943

	if (nsops < 1 || semid < 0)
		return -EINVAL;
K
Kirill Korotaev 已提交
1944
	if (nsops > ns->sc_semopm)
L
Linus Torvalds 已提交
1945
		return -E2BIG;
M
Manfred Spraul 已提交
1946
	if (nsops > SEMOPM_FAST) {
1947
		sops = kvmalloc(sizeof(*sops)*nsops, GFP_KERNEL);
M
Manfred Spraul 已提交
1948
		if (sops == NULL)
L
Linus Torvalds 已提交
1949 1950
			return -ENOMEM;
	}
1951

M
Manfred Spraul 已提交
1952 1953
	if (copy_from_user(sops, tsops, nsops * sizeof(*tsops))) {
		error =  -EFAULT;
L
Linus Torvalds 已提交
1954 1955
		goto out_free;
	}
1956

L
Linus Torvalds 已提交
1957
	if (timeout) {
A
Al Viro 已提交
1958 1959
		if (timeout->tv_sec < 0 || timeout->tv_nsec < 0 ||
			timeout->tv_nsec >= 1000000000L) {
L
Linus Torvalds 已提交
1960 1961 1962
			error = -EINVAL;
			goto out_free;
		}
1963
		jiffies_left = timespec64_to_jiffies(timeout);
L
Linus Torvalds 已提交
1964
	}
1965

L
Linus Torvalds 已提交
1966 1967
	max = 0;
	for (sop = sops; sop < sops + nsops; sop++) {
1968 1969
		unsigned long mask = 1ULL << ((sop->sem_num) % BITS_PER_LONG);

L
Linus Torvalds 已提交
1970 1971 1972
		if (sop->sem_num >= max)
			max = sop->sem_num;
		if (sop->sem_flg & SEM_UNDO)
1973 1974 1975 1976 1977 1978 1979 1980 1981 1982 1983 1984 1985 1986
			undos = true;
		if (dup & mask) {
			/*
			 * There was a previous alter access that appears
			 * to have accessed the same semaphore, thus use
			 * the dupsop logic. "appears", because the detection
			 * can only check % BITS_PER_LONG.
			 */
			dupsop = true;
		}
		if (sop->sem_op != 0) {
			alter = true;
			dup |= mask;
		}
L
Linus Torvalds 已提交
1987 1988 1989
	}

	if (undos) {
1990
		/* On success, find_alloc_undo takes the rcu_read_lock */
1991
		un = find_alloc_undo(ns, semid);
L
Linus Torvalds 已提交
1992 1993 1994 1995
		if (IS_ERR(un)) {
			error = PTR_ERR(un);
			goto out_free;
		}
1996
	} else {
L
Linus Torvalds 已提交
1997
		un = NULL;
1998 1999
		rcu_read_lock();
	}
L
Linus Torvalds 已提交
2000

2001
	sma = sem_obtain_object_check(ns, semid);
2002
	if (IS_ERR(sma)) {
2003
		rcu_read_unlock();
2004
		error = PTR_ERR(sma);
L
Linus Torvalds 已提交
2005
		goto out_free;
2006 2007
	}

2008
	error = -EFBIG;
2009 2010 2011 2012
	if (max >= sma->sem_nsems) {
		rcu_read_unlock();
		goto out_free;
	}
2013 2014

	error = -EACCES;
2015 2016 2017 2018
	if (ipcperms(ns, &sma->sem_perm, alter ? S_IWUGO : S_IRUGO)) {
		rcu_read_unlock();
		goto out_free;
	}
2019

2020
	error = security_sem_semop(&sma->sem_perm, sops, nsops, alter);
2021 2022 2023 2024
	if (error) {
		rcu_read_unlock();
		goto out_free;
	}
2025

2026 2027
	error = -EIDRM;
	locknum = sem_lock(sma, sops, nsops);
2028 2029 2030 2031 2032 2033 2034 2035 2036
	/*
	 * We eventually might perform the following check in a lockless
	 * fashion, considering ipc_valid_object() locking constraints.
	 * If nsops == 1 and there is no contention for sem_perm.lock, then
	 * only a per-semaphore lock is held and it's OK to proceed with the
	 * check below. More details on the fine grained locking scheme
	 * entangled here and why it's RMID race safe on comments at sem_lock()
	 */
	if (!ipc_valid_object(&sma->sem_perm))
2037
		goto out_unlock_free;
L
Linus Torvalds 已提交
2038
	/*
2039
	 * semid identifiers are not unique - find_alloc_undo may have
L
Linus Torvalds 已提交
2040
	 * allocated an undo structure, it was invalidated by an RMID
2041
	 * and now a new array with received the same id. Check and fail.
L
Lucas De Marchi 已提交
2042
	 * This case can be detected checking un->semid. The existence of
2043
	 * "un" itself is guaranteed by rcu.
L
Linus Torvalds 已提交
2044
	 */
2045 2046
	if (un && un->semid == -1)
		goto out_unlock_free;
2047

2048 2049 2050
	queue.sops = sops;
	queue.nsops = nsops;
	queue.undo = un;
2051
	queue.pid = task_tgid(current);
2052
	queue.alter = alter;
2053
	queue.dupsop = dupsop;
2054 2055

	error = perform_atomic_semop(sma, &queue);
D
Davidlohr Bueso 已提交
2056 2057 2058 2059 2060
	if (error == 0) { /* non-blocking succesfull path */
		DEFINE_WAKE_Q(wake_q);

		/*
		 * If the operation was successful, then do
2061 2062 2063
		 * the required updates.
		 */
		if (alter)
D
Davidlohr Bueso 已提交
2064
			do_smart_update(sma, sops, nsops, 1, &wake_q);
2065 2066
		else
			set_semotime(sma, sops);
D
Davidlohr Bueso 已提交
2067 2068 2069 2070 2071 2072

		sem_unlock(sma, locknum);
		rcu_read_unlock();
		wake_up_q(&wake_q);

		goto out_free;
L
Linus Torvalds 已提交
2073
	}
D
Davidlohr Bueso 已提交
2074
	if (error < 0) /* non-blocking error path */
2075
		goto out_unlock_free;
L
Linus Torvalds 已提交
2076

D
Davidlohr Bueso 已提交
2077 2078
	/*
	 * We need to sleep on this operation, so we put the current
L
Linus Torvalds 已提交
2079 2080
	 * task into the pending queue and go to sleep.
	 */
2081 2082
	if (nsops == 1) {
		struct sem *curr;
2083
		curr = &sma->sems[sops->sem_num];
2084

2085 2086 2087 2088 2089 2090 2091 2092 2093 2094
		if (alter) {
			if (sma->complex_count) {
				list_add_tail(&queue.list,
						&sma->pending_alter);
			} else {

				list_add_tail(&queue.list,
						&curr->pending_alter);
			}
		} else {
2095
			list_add_tail(&queue.list, &curr->pending_const);
2096
		}
2097
	} else {
2098 2099 2100
		if (!sma->complex_count)
			merge_queues(sma);

2101
		if (alter)
2102
			list_add_tail(&queue.list, &sma->pending_alter);
2103
		else
2104 2105
			list_add_tail(&queue.list, &sma->pending_const);

2106 2107 2108
		sma->complex_count++;
	}

D
Davidlohr Bueso 已提交
2109 2110 2111
	do {
		queue.status = -EINTR;
		queue.sleeper = current;
2112

D
Davidlohr Bueso 已提交
2113 2114 2115
		__set_current_state(TASK_INTERRUPTIBLE);
		sem_unlock(sma, locknum);
		rcu_read_unlock();
L
Linus Torvalds 已提交
2116

D
Davidlohr Bueso 已提交
2117 2118 2119 2120
		if (timeout)
			jiffies_left = schedule_timeout(jiffies_left);
		else
			schedule();
L
Linus Torvalds 已提交
2121

D
Davidlohr Bueso 已提交
2122
		/*
D
Davidlohr Bueso 已提交
2123 2124 2125 2126 2127 2128 2129 2130 2131
		 * fastpath: the semop has completed, either successfully or
		 * not, from the syscall pov, is quite irrelevant to us at this
		 * point; we're done.
		 *
		 * We _do_ care, nonetheless, about being awoken by a signal or
		 * spuriously.  The queue.status is checked again in the
		 * slowpath (aka after taking sem_lock), such that we can detect
		 * scenarios where we were awakened externally, during the
		 * window between wake_q_add() and wake_up_q().
2132
		 */
D
Davidlohr Bueso 已提交
2133 2134 2135 2136 2137 2138 2139 2140 2141 2142 2143
		error = READ_ONCE(queue.status);
		if (error != -EINTR) {
			/*
			 * User space could assume that semop() is a memory
			 * barrier: Without the mb(), the cpu could
			 * speculatively read in userspace stale data that was
			 * overwritten by the previous owner of the semaphore.
			 */
			smp_mb();
			goto out_free;
		}
2144

D
Davidlohr Bueso 已提交
2145
		rcu_read_lock();
2146
		locknum = sem_lock(sma, sops, nsops);
L
Linus Torvalds 已提交
2147

2148 2149 2150 2151
		if (!ipc_valid_object(&sma->sem_perm))
			goto out_unlock_free;

		error = READ_ONCE(queue.status);
L
Linus Torvalds 已提交
2152

D
Davidlohr Bueso 已提交
2153 2154 2155 2156 2157 2158
		/*
		 * If queue.status != -EINTR we are woken up by another process.
		 * Leave without unlink_queue(), but with sem_unlock().
		 */
		if (error != -EINTR)
			goto out_unlock_free;
2159

D
Davidlohr Bueso 已提交
2160 2161 2162 2163 2164 2165
		/*
		 * If an interrupt occurred we have to clean up the queue.
		 */
		if (timeout && jiffies_left == 0)
			error = -EAGAIN;
	} while (error == -EINTR && !signal_pending(current)); /* spurious */
2166

2167
	unlink_queue(sma, &queue);
L
Linus Torvalds 已提交
2168 2169

out_unlock_free:
2170
	sem_unlock(sma, locknum);
2171
	rcu_read_unlock();
L
Linus Torvalds 已提交
2172
out_free:
M
Manfred Spraul 已提交
2173
	if (sops != fast_sops)
2174
		kvfree(sops);
L
Linus Torvalds 已提交
2175 2176 2177
	return error;
}

2178 2179
long ksys_semtimedop(int semid, struct sembuf __user *tsops,
		     unsigned int nsops, const struct timespec __user *timeout)
A
Al Viro 已提交
2180 2181
{
	if (timeout) {
2182 2183
		struct timespec64 ts;
		if (get_timespec64(&ts, timeout))
A
Al Viro 已提交
2184 2185 2186 2187 2188 2189
			return -EFAULT;
		return do_semtimedop(semid, tsops, nsops, &ts);
	}
	return do_semtimedop(semid, tsops, nsops, NULL);
}

2190 2191 2192 2193 2194 2195
SYSCALL_DEFINE4(semtimedop, int, semid, struct sembuf __user *, tsops,
		unsigned int, nsops, const struct timespec __user *, timeout)
{
	return ksys_semtimedop(semid, tsops, nsops, timeout);
}

A
Al Viro 已提交
2196
#ifdef CONFIG_COMPAT
2197 2198 2199
long compat_ksys_semtimedop(int semid, struct sembuf __user *tsems,
			    unsigned int nsops,
			    const struct compat_timespec __user *timeout)
A
Al Viro 已提交
2200 2201
{
	if (timeout) {
2202 2203
		struct timespec64 ts;
		if (compat_get_timespec64(&ts, timeout))
A
Al Viro 已提交
2204 2205 2206 2207 2208
			return -EFAULT;
		return do_semtimedop(semid, tsems, nsops, &ts);
	}
	return do_semtimedop(semid, tsems, nsops, NULL);
}
2209 2210 2211 2212 2213 2214 2215

COMPAT_SYSCALL_DEFINE4(semtimedop, int, semid, struct sembuf __user *, tsems,
		       unsigned int, nsops,
		       const struct compat_timespec __user *, timeout)
{
	return compat_ksys_semtimedop(semid, tsems, nsops, timeout);
}
A
Al Viro 已提交
2216 2217
#endif

2218 2219
SYSCALL_DEFINE3(semop, int, semid, struct sembuf __user *, tsops,
		unsigned, nsops)
L
Linus Torvalds 已提交
2220
{
A
Al Viro 已提交
2221
	return do_semtimedop(semid, tsops, nsops, NULL);
L
Linus Torvalds 已提交
2222 2223 2224 2225 2226 2227 2228 2229 2230 2231 2232 2233 2234 2235 2236
}

/* If CLONE_SYSVSEM is set, establish sharing of SEM_UNDO state between
 * parent and child tasks.
 */

int copy_semundo(unsigned long clone_flags, struct task_struct *tsk)
{
	struct sem_undo_list *undo_list;
	int error;

	if (clone_flags & CLONE_SYSVSEM) {
		error = get_undo_list(&undo_list);
		if (error)
			return error;
2237
		refcount_inc(&undo_list->refcnt);
L
Linus Torvalds 已提交
2238
		tsk->sysvsem.undo_list = undo_list;
P
Paul McQuade 已提交
2239
	} else
L
Linus Torvalds 已提交
2240 2241 2242 2243 2244 2245 2246 2247 2248 2249 2250 2251 2252 2253 2254 2255 2256 2257 2258
		tsk->sysvsem.undo_list = NULL;

	return 0;
}

/*
 * add semadj values to semaphores, free undo structures.
 * undo structures are not freed when semaphore arrays are destroyed
 * so some of them may be out of date.
 * IMPLEMENTATION NOTE: There is some confusion over whether the
 * set of adjustments that needs to be done should be done in an atomic
 * manner or not. That is, if we are attempting to decrement the semval
 * should we queue up and wait until we can do so legally?
 * The original implementation attempted to do this (queue and wait).
 * The current implementation does not do so. The POSIX standard
 * and SVID should be consulted to determine what behavior is mandated.
 */
void exit_sem(struct task_struct *tsk)
{
2259
	struct sem_undo_list *ulp;
L
Linus Torvalds 已提交
2260

2261 2262
	ulp = tsk->sysvsem.undo_list;
	if (!ulp)
L
Linus Torvalds 已提交
2263
		return;
2264
	tsk->sysvsem.undo_list = NULL;
L
Linus Torvalds 已提交
2265

2266
	if (!refcount_dec_and_test(&ulp->refcnt))
L
Linus Torvalds 已提交
2267 2268
		return;

2269
	for (;;) {
L
Linus Torvalds 已提交
2270
		struct sem_array *sma;
2271
		struct sem_undo *un;
2272
		int semid, i;
D
Davidlohr Bueso 已提交
2273
		DEFINE_WAKE_Q(wake_q);
2274

2275 2276
		cond_resched();

2277
		rcu_read_lock();
2278 2279
		un = list_entry_rcu(ulp->list_proc.next,
				    struct sem_undo, list_proc);
2280 2281 2282 2283 2284 2285 2286
		if (&un->list_proc == &ulp->list_proc) {
			/*
			 * We must wait for freeary() before freeing this ulp,
			 * in case we raced with last sem_undo. There is a small
			 * possibility where we exit while freeary() didn't
			 * finish unlocking sem_undo_list.
			 */
2287 2288
			spin_lock(&ulp->lock);
			spin_unlock(&ulp->lock);
2289 2290 2291 2292 2293 2294
			rcu_read_unlock();
			break;
		}
		spin_lock(&ulp->lock);
		semid = un->semid;
		spin_unlock(&ulp->lock);
2295

2296
		/* exit_sem raced with IPC_RMID, nothing to do */
2297 2298
		if (semid == -1) {
			rcu_read_unlock();
2299
			continue;
2300
		}
L
Linus Torvalds 已提交
2301

2302
		sma = sem_obtain_object_check(tsk->nsproxy->ipc_ns, semid);
2303
		/* exit_sem raced with IPC_RMID, nothing to do */
2304 2305
		if (IS_ERR(sma)) {
			rcu_read_unlock();
2306
			continue;
2307
		}
L
Linus Torvalds 已提交
2308

2309
		sem_lock(sma, NULL, -1);
2310
		/* exit_sem raced with IPC_RMID, nothing to do */
2311
		if (!ipc_valid_object(&sma->sem_perm)) {
2312 2313 2314 2315
			sem_unlock(sma, -1);
			rcu_read_unlock();
			continue;
		}
2316
		un = __lookup_undo(ulp, semid);
2317 2318 2319 2320
		if (un == NULL) {
			/* exit_sem raced with IPC_RMID+semget() that created
			 * exactly the same semid. Nothing to do.
			 */
2321
			sem_unlock(sma, -1);
2322
			rcu_read_unlock();
2323 2324 2325 2326
			continue;
		}

		/* remove un from the linked lists */
2327
		ipc_assert_locked_object(&sma->sem_perm);
2328 2329
		list_del(&un->list_id);

2330 2331 2332 2333
		/* we are the last process using this ulp, acquiring ulp->lock
		 * isn't required. Besides that, we are also protected against
		 * IPC_RMID as we hold sma->sem_perm lock now
		 */
2334 2335
		list_del_rcu(&un->list_proc);

2336 2337
		/* perform adjustments registered in un */
		for (i = 0; i < sma->sem_nsems; i++) {
2338
			struct sem *semaphore = &sma->sems[i];
2339 2340
			if (un->semadj[i]) {
				semaphore->semval += un->semadj[i];
L
Linus Torvalds 已提交
2341 2342 2343 2344 2345 2346 2347 2348 2349 2350 2351
				/*
				 * Range checks of the new semaphore value,
				 * not defined by sus:
				 * - Some unices ignore the undo entirely
				 *   (e.g. HP UX 11i 11.22, Tru64 V5.1)
				 * - some cap the value (e.g. FreeBSD caps
				 *   at 0, but doesn't enforce SEMVMX)
				 *
				 * Linux caps the semaphore value, both at 0
				 * and at SEMVMX.
				 *
M
Manfred Spraul 已提交
2352
				 *	Manfred <manfred@colorfullife.com>
L
Linus Torvalds 已提交
2353
				 */
I
Ingo Molnar 已提交
2354 2355 2356 2357
				if (semaphore->semval < 0)
					semaphore->semval = 0;
				if (semaphore->semval > SEMVMX)
					semaphore->semval = SEMVMX;
2358
				ipc_update_pid(&semaphore->sempid, task_tgid(current));
L
Linus Torvalds 已提交
2359 2360 2361
			}
		}
		/* maybe some queued-up processes were waiting for this */
D
Davidlohr Bueso 已提交
2362
		do_smart_update(sma, NULL, 0, 1, &wake_q);
2363
		sem_unlock(sma, -1);
2364
		rcu_read_unlock();
D
Davidlohr Bueso 已提交
2365
		wake_up_q(&wake_q);
2366

2367
		kfree_rcu(un, rcu);
L
Linus Torvalds 已提交
2368
	}
2369
	kfree(ulp);
L
Linus Torvalds 已提交
2370 2371 2372
}

#ifdef CONFIG_PROC_FS
2373
static int sysvipc_sem_proc_show(struct seq_file *s, void *it)
L
Linus Torvalds 已提交
2374
{
2375
	struct user_namespace *user_ns = seq_user_ns(s);
2376 2377
	struct kern_ipc_perm *ipcp = it;
	struct sem_array *sma = container_of(ipcp, struct sem_array, sem_perm);
2378
	time64_t sem_otime;
2379

2380 2381 2382
	/*
	 * The proc interface isn't aware of sem_lock(), it calls
	 * ipc_lock_object() directly (in sysvipc_find_ipc).
2383 2384
	 * In order to stay compatible with sem_lock(), we must
	 * enter / leave complex_mode.
2385
	 */
2386
	complexmode_enter(sma);
2387

2388
	sem_otime = get_semotime(sma);
2389

2390
	seq_printf(s,
2391
		   "%10d %10d  %4o %10u %5u %5u %5u %5u %10llu %10llu\n",
2392 2393 2394 2395 2396 2397 2398 2399 2400 2401 2402
		   sma->sem_perm.key,
		   sma->sem_perm.id,
		   sma->sem_perm.mode,
		   sma->sem_nsems,
		   from_kuid_munged(user_ns, sma->sem_perm.uid),
		   from_kgid_munged(user_ns, sma->sem_perm.gid),
		   from_kuid_munged(user_ns, sma->sem_perm.cuid),
		   from_kgid_munged(user_ns, sma->sem_perm.cgid),
		   sem_otime,
		   sma->sem_ctime);

2403 2404
	complexmode_tryleave(sma);

2405
	return 0;
L
Linus Torvalds 已提交
2406 2407
}
#endif