sem.c 60.9 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
#include <linux/compat.h>
L
Linus Torvalds 已提交
74 75 76 77 78 79 80 81
#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>
82
#include <linux/capability.h>
83
#include <linux/seq_file.h>
N
Nadia Derbey 已提交
84
#include <linux/rwsem.h>
K
Kirill Korotaev 已提交
85
#include <linux/nsproxy.h>
86
#include <linux/ipc_namespace.h>
87
#include <linux/sched/wake_q.h>
I
Ingo Molnar 已提交
88

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

92 93 94 95 96 97 98 99 100 101
/* 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).
	 */
102
	struct pid *sempid;
103 104 105 106 107
	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*/
108
	time64_t	 sem_otime;	/* candidate for sem_otime */
109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125
} ____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;
126 127 128 129 130 131

/* 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 */
132
	struct pid		*pid;	 /* process id of requesting process */
133 134
	int			status;	 /* completion status of operation */
	struct sembuf		*sops;	 /* array of pending operations */
135
	struct sembuf		*blocking; /* the operation that blocked */
136
	int			nsops;	 /* number of operations */
137 138
	bool			alter;	 /* does *sops alter the array? */
	bool                    dupsop;	 /* sops on more than one sem_num */
139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160
};

/* 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 {
161
	refcount_t		refcnt;
162 163 164 165 166
	spinlock_t		lock;
	struct list_head	list_proc;
};


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

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

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

M
Manfred Spraul 已提交
178 179 180 181 182 183 184
/*
 * 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 已提交
185
/*
186
 * Locking:
187
 * a) global sem_lock() for read/write
L
Linus Torvalds 已提交
188
 *	sem_undo.id_next,
189
 *	sem_array.complex_count,
190 191
 *	sem_array.pending{_alter,_const},
 *	sem_array.sem_undo
P
Paul McQuade 已提交
192
 *
193
 * b) global or semaphore sem_lock() for read/write:
194
 *	sem_array.sems[i].pending_{const,alter}:
195 196 197 198 199
 *
 * c) special:
 *	sem_undo_list.list_proc:
 *	* undo_list->lock for write
 *	* rcu for read
M
Manfred Spraul 已提交
200 201 202 203 204 205 206 207 208 209 210 211 212 213 214
 *	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 已提交
215 216
 */

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

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

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

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

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

251 252 253 254 255 256 257 258 259 260 261 262 263 264 265 266 267 268 269 270 271
/**
 * 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;
272
		curr = &sma->sems[q->sops[0].sem_num];
273 274 275 276 277 278 279

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

/**
D
Davidlohr Bueso 已提交
280
 * merge_queues - merge single semop queues into global queue
281 282 283 284 285 286 287 288 289 290 291
 * @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++) {
292
		struct sem *sem = &sma->sems[i];
293 294 295 296 297

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

D
Davidlohr Bueso 已提交
298 299
static void sem_rcu_free(struct rcu_head *head)
{
300 301
	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 已提交
302

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

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

M
Manfred Spraul 已提交
316 317 318 319 320 321 322
	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 已提交
323 324
		return;
	}
M
Manfred Spraul 已提交
325
	sma->use_global_lock = USE_GLOBAL_LOCK_HYSTERESIS;
326

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

/*
 * 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 已提交
346 347 348 349 350 351 352 353 354 355 356
	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--;
	}
357 358
}

359
#define SEM_GLOBAL_LOCK	(-1)
360 361 362 363 364 365 366 367 368 369
/*
 * 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)
{
370
	struct sem *sem;
371

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

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

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

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

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

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

M
Manfred Spraul 已提交
412 413 414 415 416 417 418 419 420
	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.
421 422
		 */
		spin_lock(&sem->lock);
M
Manfred Spraul 已提交
423

424 425
		ipc_unlock_object(&sma->sem_perm);
		return sops->sem_num;
426
	} else {
M
Manfred Spraul 已提交
427 428 429 430
		/*
		 * 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.
431
		 */
432
		return SEM_GLOBAL_LOCK;
433 434 435 436 437
	}
}

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

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

	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);
471

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

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

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

K
Kees Cook 已提交
486 487 488 489 490 491 492 493 494 495 496 497 498 499 500 501 502 503
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 已提交
504 505 506 507 508
/**
 * newary - Create a new semaphore set
 * @ns: namespace
 * @params: ptr to the structure that contains key, semflg and nsems
 *
D
Davidlohr Bueso 已提交
509
 * Called with sem_ids.rwsem held (as a writer)
N
Nadia Derbey 已提交
510
 */
N
Nadia Derbey 已提交
511
static int newary(struct ipc_namespace *ns, struct ipc_params *params)
L
Linus Torvalds 已提交
512 513 514
{
	int retval;
	struct sem_array *sma;
N
Nadia Derbey 已提交
515 516 517
	key_t key = params->key;
	int nsems = params->u.nsems;
	int semflg = params->flg;
518
	int i;
L
Linus Torvalds 已提交
519 520 521

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

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

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

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

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

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

553
	/* ipc_addid() locks sma upon success. */
554 555 556 557
	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;
558 559 560
	}
	ns->used_sems += nsems;

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

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

N
Nadia Derbey 已提交
567

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

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

	return 0;
}

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

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

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

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

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

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

610
/**
611 612
 * perform_atomic_semop[_slow] - Attempt to perform semaphore
 *                               operations on a given array.
613
 * @sma: semaphore array
614
 * @q: struct sem_queue that describes the operation
615
 *
616 617 618 619 620 621 622
 * 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.
 *
623 624
 * Returns 0 if the operation was possible.
 * Returns 1 if the operation is impossible, the caller must sleep.
625
 * Returns <0 for error codes.
L
Linus Torvalds 已提交
626
 */
627
static int perform_atomic_semop_slow(struct sem_array *sma, struct sem_queue *q)
L
Linus Torvalds 已提交
628
{
629 630
	int result, sem_op, nsops;
	struct pid *pid;
L
Linus Torvalds 已提交
631
	struct sembuf *sop;
M
Manfred Spraul 已提交
632
	struct sem *curr;
633 634 635 636 637 638
	struct sembuf *sops;
	struct sem_undo *un;

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

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

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

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

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

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

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

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

out_of_range:
	result = -ERANGE;
	goto undo;

would_block:
679 680
	q->blocking = sop;

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

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

	return result;
}

699 700 701 702 703 704 705 706 707 708 709 710 711 712 713 714 715 716 717 718 719 720
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++) {
721
		curr = &sma->sems[sop->sem_num];
722 723 724 725 726 727 728 729 730 731 732 733 734 735 736 737 738 739 740 741 742 743 744
		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++) {
745
		curr = &sma->sems[sop->sem_num];
746 747 748 749 750 751 752 753 754
		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;
755
		ipc_update_pid(&curr->sempid, q->pid);
756 757 758 759 760 761 762 763 764
	}

	return 0;

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

D
Davidlohr Bueso 已提交
765 766
static inline void wake_up_sem_queue_prepare(struct sem_queue *q, int error,
					     struct wake_q_head *wake_q)
767
{
D
Davidlohr Bueso 已提交
768 769 770 771 772 773 774 775 776
	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 已提交
777 778
}

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

786 787 788 789 790 791 792
/** 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
793 794
 * modified the array.
 * Note that wait-for-zero operations are handled without restart.
795
 */
796
static inline int check_restart(struct sem_array *sma, struct sem_queue *q)
797
{
798 799
	/* pending complex alter operations are too difficult to analyse */
	if (!list_empty(&sma->pending_alter))
800 801 802 803 804 805
		return 1;

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

806 807 808 809 810 811 812 813 814 815 816 817 818
	/* 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;
}
819

820
/**
D
Davidlohr Bueso 已提交
821
 * wake_const_ops - wake up non-alter tasks
822 823
 * @sma: semaphore array.
 * @semnum: semaphore that was modified.
D
Davidlohr Bueso 已提交
824
 * @wake_q: lockless wake-queue head.
825 826 827 828 829
 *
 * 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 已提交
830
 * The tasks that must be woken up are added to @wake_q. The return code
831 832 833 834
 * 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 已提交
835
			  struct wake_q_head *wake_q)
836
{
837
	struct sem_queue *q, *tmp;
838 839 840 841 842 843
	struct list_head *pending_list;
	int semop_completed = 0;

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

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

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

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

859 860 861 862
	return semop_completed;
}

/**
D
Davidlohr Bueso 已提交
863
 * do_smart_wakeup_zero - wakeup all wait for zero tasks
864 865 866
 * @sma: semaphore array
 * @sops: operations that were performed
 * @nsops: number of operations
D
Davidlohr Bueso 已提交
867
 * @wake_q: lockless wake-queue head
868
 *
D
Davidlohr Bueso 已提交
869 870
 * Checks all required queue for wait-for-zero operations, based
 * on the actual changes that were performed on the semaphore array.
871 872 873
 * 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 已提交
874
				int nsops, struct wake_q_head *wake_q)
875 876 877 878 879 880 881 882 883 884
{
	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;

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

909
	return semop_completed;
910 911
}

912 913

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

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

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

944 945
		/* If we are scanning the single sop, per-semaphore list of
		 * one semaphore and that semaphore is 0, then it is not
946
		 * necessary to scan further: simple increments
947 948 949 950
		 * 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.
		 */
951
		if (semnum != -1 && sma->sems[semnum].semval == 0)
952 953
			break;

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

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

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

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

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

977
/**
D
Davidlohr Bueso 已提交
978
 * set_semotime - set sem_otime
979 980 981 982 983 984 985 986 987
 * @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) {
988
		sma->sems[0].sem_otime = ktime_get_real_seconds();
989
	} else {
990
		sma->sems[sops[0].sem_num].sem_otime =
991
						ktime_get_real_seconds();
992 993 994
	}
}

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

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

1016 1017
	if (!list_empty(&sma->pending_alter)) {
		/* semaphore array uses the global queue - just process it. */
D
Davidlohr Bueso 已提交
1018
		otime |= update_queue(sma, -1, wake_q);
1019 1020 1021 1022 1023 1024 1025
	} 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 已提交
1026
				otime |= update_queue(sma, i, wake_q);
1027 1028 1029 1030 1031 1032 1033 1034 1035 1036 1037 1038 1039
		} 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 已提交
1040
							      sops[i].sem_num, wake_q);
1041
				}
1042
			}
1043
		}
1044
	}
1045 1046
	if (otime)
		set_semotime(sma, sops);
1047 1048
}

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

1057 1058 1059 1060 1061 1062 1063 1064 1065 1066 1067
	/*
	 * 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));

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

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

	return 0;
1077 1078
}

L
Linus Torvalds 已提交
1079 1080 1081
/* 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
1082 1083 1084
 *
 * 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 已提交
1085
 */
1086 1087
static int count_semcnt(struct sem_array *sma, ushort semnum,
			bool count_zero)
L
Linus Torvalds 已提交
1088
{
1089
	struct list_head *l;
M
Manfred Spraul 已提交
1090
	struct sem_queue *q;
1091
	int semcnt;
L
Linus Torvalds 已提交
1092

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

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

1107
	/* Then: check the complex operations. */
1108
	list_for_each_entry(q, &sma->pending_alter, list) {
1109 1110 1111 1112 1113 1114
		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);
		}
1115
	}
1116
	return semcnt;
L
Linus Torvalds 已提交
1117 1118
}

D
Davidlohr Bueso 已提交
1119 1120
/* 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 已提交
1121
 * remains locked on exit.
L
Linus Torvalds 已提交
1122
 */
1123
static void freeary(struct ipc_namespace *ns, struct kern_ipc_perm *ipcp)
L
Linus Torvalds 已提交
1124
{
1125 1126
	struct sem_undo *un, *tu;
	struct sem_queue *q, *tq;
1127
	struct sem_array *sma = container_of(ipcp, struct sem_array, sem_perm);
1128
	int i;
D
Davidlohr Bueso 已提交
1129
	DEFINE_WAKE_Q(wake_q);
L
Linus Torvalds 已提交
1130

1131
	/* Free the existing undo structures for this semaphore set.  */
1132
	ipc_assert_locked_object(&sma->sem_perm);
1133 1134 1135
	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 已提交
1136
		un->semid = -1;
1137 1138
		list_del_rcu(&un->list_proc);
		spin_unlock(&un->ulp->lock);
1139
		kfree_rcu(un, rcu);
1140
	}
L
Linus Torvalds 已提交
1141 1142

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

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

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

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

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

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

L
Linus Torvalds 已提交
1186 1187 1188 1189 1190 1191 1192 1193 1194 1195 1196 1197 1198
		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;
	}
}

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

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

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

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

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

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

1240 1241 1242 1243 1244 1245 1246 1247
	/* 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 已提交
1248

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

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

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

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

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

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

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 1314
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;
}

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

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

1327 1328 1329 1330 1331 1332 1333 1334 1335 1336 1337 1338 1339 1340 1341 1342 1343
	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;
	}
1344

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

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

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

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

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

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

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

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

	nsems = sma->sem_nsems;

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

1555 1556 1557
		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 已提交
1558 1559 1560 1561 1562 1563 1564 1565

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

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

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

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

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

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

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

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

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

	if (semid < 0)
		return -EINVAL;

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

M
Manfred Spraul 已提交
1635
	switch (cmd) {
L
Linus Torvalds 已提交
1636 1637
	case IPC_INFO:
	case SEM_INFO:
1638
		return semctl_info(ns, semid, cmd, p);
1639
	case IPC_STAT:
L
Linus Torvalds 已提交
1640
	case SEM_STAT:
1641
	case SEM_STAT_ANY:
1642 1643 1644 1645 1646 1647
		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 已提交
1648 1649 1650 1651 1652 1653
	case GETALL:
	case GETVAL:
	case GETPID:
	case GETNCNT:
	case GETZCNT:
	case SETALL:
1654
		return semctl_main(ns, semid, semnum, cmd, p);
1655 1656 1657 1658 1659 1660 1661 1662 1663 1664 1665
	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 已提交
1666
	case IPC_SET:
1667 1668 1669 1670
		if (copy_semid_from_user(&semid64, p, version))
			return -EFAULT;
	case IPC_RMID:
		return semctl_down(ns, semid, cmd, &semid64);
L
Linus Torvalds 已提交
1671 1672 1673 1674 1675
	default:
		return -EINVAL;
	}
}

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

A
Al Viro 已提交
1681 1682 1683 1684 1685 1686 1687 1688 1689 1690 1691 1692 1693 1694 1695 1696 1697 1698
#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) {
1699
		struct compat_semid64_ds __user *p = buf;
A
Al Viro 已提交
1700 1701
		return get_compat_ipc64_perm(&out->sem_perm, &p->sem_perm);
	} else {
1702
		struct compat_semid_ds __user *p = buf;
A
Al Viro 已提交
1703 1704 1705 1706 1707 1708 1709 1710 1711 1712 1713
		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);
1714 1715 1716 1717
		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 已提交
1718 1719 1720 1721 1722 1723 1724 1725 1726 1727 1728 1729 1730
		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));
	}
}

1731
long compat_ksys_semctl(int semid, int semnum, int cmd, int arg)
A
Al Viro 已提交
1732 1733 1734 1735 1736 1737 1738 1739 1740 1741 1742 1743 1744 1745 1746 1747 1748 1749
{
	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:
1750
	case SEM_STAT_ANY:
A
Al Viro 已提交
1751 1752 1753 1754 1755 1756 1757 1758 1759 1760 1761
		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 已提交
1762
	case SETALL:
1763 1764 1765
		return semctl_main(ns, semid, semnum, cmd, p);
	case SETVAL:
		return semctl_setval(ns, semid, semnum, arg);
L
Linus Torvalds 已提交
1766
	case IPC_SET:
A
Al Viro 已提交
1767 1768 1769 1770 1771
		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 已提交
1772 1773 1774 1775
	default:
		return -EINVAL;
	}
}
1776 1777 1778 1779 1780

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

/* 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) {
1800
		undo_list = kzalloc(sizeof(*undo_list), GFP_KERNEL);
L
Linus Torvalds 已提交
1801 1802
		if (undo_list == NULL)
			return -ENOMEM;
I
Ingo Molnar 已提交
1803
		spin_lock_init(&undo_list->lock);
1804
		refcount_set(&undo_list->refcnt, 1);
1805 1806
		INIT_LIST_HEAD(&undo_list->list_proc);

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

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

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

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

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

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

1838
/**
D
Davidlohr Bueso 已提交
1839
 * find_alloc_undo - lookup (and if not present create) undo array
1840 1841 1842 1843 1844 1845
 * @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.
1846 1847
 * Lifetime-rules: sem_undo is rcu-protected, on success, the function
 * performs a rcu_read_lock().
1848 1849
 */
static struct sem_undo *find_alloc_undo(struct ipc_namespace *ns, int semid)
L
Linus Torvalds 已提交
1850 1851 1852 1853
{
	struct sem_array *sma;
	struct sem_undo_list *ulp;
	struct sem_undo *un, *new;
1854
	int nsems, error;
L
Linus Torvalds 已提交
1855 1856 1857 1858 1859

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

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

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

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

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

1890
	/* step 3: Acquire the lock on semaphore array */
1891
	rcu_read_lock();
1892
	sem_lock_and_putref(sma);
1893
	if (!ipc_valid_object(&sma->sem_perm)) {
1894
		sem_unlock(sma, -1);
1895
		rcu_read_unlock();
L
Linus Torvalds 已提交
1896 1897 1898 1899
		kfree(new);
		un = ERR_PTR(-EIDRM);
		goto out;
	}
1900 1901 1902 1903 1904 1905 1906 1907 1908 1909
	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;
	}
1910 1911
	/* step 5: initialize & link new undo structure */
	new->semadj = (short *) &new[1];
1912
	new->ulp = ulp;
1913 1914
	new->semid = semid;
	assert_spin_locked(&ulp->lock);
1915
	list_add_rcu(&new->list_proc, &ulp->list_proc);
1916
	ipc_assert_locked_object(&sma->sem_perm);
1917
	list_add(&new->list_id, &sma->list_id);
1918
	un = new;
1919

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

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

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

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

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

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

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

L
Linus Torvalds 已提交
1971 1972 1973
		if (sop->sem_num >= max)
			max = sop->sem_num;
		if (sop->sem_flg & SEM_UNDO)
1974 1975 1976 1977 1978 1979 1980 1981 1982 1983 1984 1985 1986 1987
			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 已提交
1988 1989 1990
	}

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

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

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

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

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

2027 2028
	error = -EIDRM;
	locknum = sem_lock(sma, sops, nsops);
2029 2030 2031 2032 2033 2034 2035 2036 2037
	/*
	 * 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))
2038
		goto out_unlock_free;
L
Linus Torvalds 已提交
2039
	/*
2040
	 * semid identifiers are not unique - find_alloc_undo may have
L
Linus Torvalds 已提交
2041
	 * allocated an undo structure, it was invalidated by an RMID
2042
	 * and now a new array with received the same id. Check and fail.
L
Lucas De Marchi 已提交
2043
	 * This case can be detected checking un->semid. The existence of
2044
	 * "un" itself is guaranteed by rcu.
L
Linus Torvalds 已提交
2045
	 */
2046 2047
	if (un && un->semid == -1)
		goto out_unlock_free;
2048

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

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

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

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

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

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

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

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

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

2107 2108 2109
		sma->complex_count++;
	}

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

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

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

D
Davidlohr Bueso 已提交
2123
		/*
D
Davidlohr Bueso 已提交
2124 2125 2126 2127 2128 2129 2130 2131 2132
		 * 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().
2133
		 */
D
Davidlohr Bueso 已提交
2134 2135 2136 2137 2138 2139 2140 2141 2142 2143 2144
		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;
		}
2145

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

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

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

D
Davidlohr Bueso 已提交
2154 2155 2156 2157 2158 2159
		/*
		 * 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;
2160

D
Davidlohr Bueso 已提交
2161 2162 2163 2164 2165 2166
		/*
		 * 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 */
2167

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

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

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

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

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

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 已提交
2217 2218
#endif

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

/* 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;
2238
		refcount_inc(&undo_list->refcnt);
L
Linus Torvalds 已提交
2239
		tsk->sysvsem.undo_list = undo_list;
P
Paul McQuade 已提交
2240
	} else
L
Linus Torvalds 已提交
2241 2242 2243 2244 2245 2246 2247 2248 2249 2250 2251 2252 2253 2254 2255 2256 2257 2258 2259
		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)
{
2260
	struct sem_undo_list *ulp;
L
Linus Torvalds 已提交
2261

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

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

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

2276 2277
		cond_resched();

2278
		rcu_read_lock();
2279 2280
		un = list_entry_rcu(ulp->list_proc.next,
				    struct sem_undo, list_proc);
2281 2282 2283 2284 2285 2286 2287
		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.
			 */
2288 2289
			spin_lock(&ulp->lock);
			spin_unlock(&ulp->lock);
2290 2291 2292 2293 2294 2295
			rcu_read_unlock();
			break;
		}
		spin_lock(&ulp->lock);
		semid = un->semid;
		spin_unlock(&ulp->lock);
2296

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

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

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

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

2331 2332 2333 2334
		/* 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
		 */
2335 2336
		list_del_rcu(&un->list_proc);

2337 2338
		/* perform adjustments registered in un */
		for (i = 0; i < sma->sem_nsems; i++) {
2339
			struct sem *semaphore = &sma->sems[i];
2340 2341
			if (un->semadj[i]) {
				semaphore->semval += un->semadj[i];
L
Linus Torvalds 已提交
2342 2343 2344 2345 2346 2347 2348 2349 2350 2351 2352
				/*
				 * 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 已提交
2353
				 *	Manfred <manfred@colorfullife.com>
L
Linus Torvalds 已提交
2354
				 */
I
Ingo Molnar 已提交
2355 2356 2357 2358
				if (semaphore->semval < 0)
					semaphore->semval = 0;
				if (semaphore->semval > SEMVMX)
					semaphore->semval = SEMVMX;
2359
				ipc_update_pid(&semaphore->sempid, task_tgid(current));
L
Linus Torvalds 已提交
2360 2361 2362
			}
		}
		/* maybe some queued-up processes were waiting for this */
D
Davidlohr Bueso 已提交
2363
		do_smart_update(sma, NULL, 0, 1, &wake_q);
2364
		sem_unlock(sma, -1);
2365
		rcu_read_unlock();
D
Davidlohr Bueso 已提交
2366
		wake_up_q(&wake_q);
2367

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

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

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

2389
	sem_otime = get_semotime(sma);
2390

2391
	seq_printf(s,
2392
		   "%10d %10d  %4o %10u %5u %5u %5u %5u %10llu %10llu\n",
2393 2394 2395 2396 2397 2398 2399 2400 2401 2402 2403
		   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);

2404 2405
	complexmode_tryleave(sma);

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