sem.c 61.2 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>
88
#include <linux/nospec.h>
I
Ingo Molnar 已提交
89

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

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

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

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


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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

N
Nadia Derbey 已提交
475
	return container_of(ipcp, struct sem_array, sem_perm);
476 477
}

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

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

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

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

K
Kees Cook 已提交
528
	sma = sem_alloc(nsems);
529
	if (!sma)
L
Linus Torvalds 已提交
530
		return -ENOMEM;
531

L
Linus Torvalds 已提交
532 533 534 535
	sma->sem_perm.mode = (semflg & S_IRWXUGO);
	sma->sem_perm.key = key;

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

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

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

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

564
	sem_unlock(sma, -1);
565
	rcu_read_unlock();
L
Linus Torvalds 已提交
566

N
Nadia Derbey 已提交
567
	return sma->sem_perm.id;
L
Linus Torvalds 已提交
568 569
}

N
Nadia Derbey 已提交
570

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

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

	return 0;
}

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

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

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

N
Nadia Derbey 已提交
601 602 603
	sem_params.key = key;
	sem_params.flg = semflg;
	sem_params.u.nsems = nsems;
L
Linus Torvalds 已提交
604

N
Nadia Derbey 已提交
605
	return ipcget(ns, &sem_ids(ns), &sem_ops, &sem_params);
L
Linus Torvalds 已提交
606 607
}

608 609 610 611 612
SYSCALL_DEFINE3(semget, key_t, key, int, nsems, int, semflg)
{
	return ksys_semget(key, nsems, semflg);
}

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

	sops = q->sops;
	nsops = q->nsops;
	un = q->undo;
L
Linus Torvalds 已提交
642 643

	for (sop = sops; sop < sops + nsops; sop++) {
644 645
		int idx = array_index_nospec(sop->sem_num, sma->sem_nsems);
		curr = &sma->sems[idx];
L
Linus Torvalds 已提交
646 647
		sem_op = sop->sem_op;
		result = curr->semval;
648

L
Linus Torvalds 已提交
649 650 651 652 653 654 655 656
		if (!sem_op && result)
			goto would_block;

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

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

L
Linus Torvalds 已提交
666 667 668 669
		curr->semval = result;
	}

	sop--;
670
	pid = q->pid;
L
Linus Torvalds 已提交
671
	while (sop >= sops) {
672
		ipc_update_pid(&sma->sems[sop->sem_num].sempid, pid);
L
Linus Torvalds 已提交
673 674
		sop--;
	}
675

L
Linus Torvalds 已提交
676 677 678 679 680 681 682
	return 0;

out_of_range:
	result = -ERANGE;
	goto undo;

would_block:
683 684
	q->blocking = sop;

L
Linus Torvalds 已提交
685 686 687 688 689 690 691 692
	if (sop->sem_flg & IPC_NOWAIT)
		result = -EAGAIN;
	else
		result = 1;

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

	return result;
}

703 704 705 706 707 708 709 710 711 712 713 714 715 716 717 718 719 720 721 722 723 724
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++) {
725 726 727
		int idx = array_index_nospec(sop->sem_num, sma->sem_nsems);

		curr = &sma->sems[idx];
728 729 730 731 732 733 734 735 736 737 738 739 740 741 742 743 744 745 746 747 748 749 750
		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++) {
751
		curr = &sma->sems[sop->sem_num];
752 753 754 755 756 757 758 759 760
		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;
761
		ipc_update_pid(&curr->sempid, q->pid);
762 763 764 765 766 767 768 769 770
	}

	return 0;

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

D
Davidlohr Bueso 已提交
771 772
static inline void wake_up_sem_queue_prepare(struct sem_queue *q, int error,
					     struct wake_q_head *wake_q)
773
{
D
Davidlohr Bueso 已提交
774 775 776 777 778 779 780 781 782
	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 已提交
783 784
}

785 786 787
static void unlink_queue(struct sem_array *sma, struct sem_queue *q)
{
	list_del(&q->list);
788
	if (q->nsops > 1)
789 790 791
		sma->complex_count--;
}

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

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

812 813 814 815 816 817 818 819 820 821 822 823 824
	/* 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;
}
825

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

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

852 853
	list_for_each_entry_safe(q, tmp, pending_list, list) {
		int error = perform_atomic_semop(sma, q);
854

855 856 857 858
		if (error > 0)
			continue;
		/* operation completed, remove from queue & wakeup */
		unlink_queue(sma, q);
859

860 861 862
		wake_up_sem_queue_prepare(q, error, wake_q);
		if (error == 0)
			semop_completed = 1;
863
	}
864

865 866 867 868
	return semop_completed;
}

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

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

915
	return semop_completed;
916 917
}

918 919

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

941
	if (semnum == -1)
942
		pending_list = &sma->pending_alter;
943
	else
944
		pending_list = &sma->sems[semnum].pending_alter;
N
Nick Piggin 已提交
945 946

again:
947
	list_for_each_entry_safe(q, tmp, pending_list, list) {
948
		int error, restart;
949

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

960
		error = perform_atomic_semop(sma, q);
L
Linus Torvalds 已提交
961 962

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

966
		unlink_queue(sma, q);
N
Nick Piggin 已提交
967

968
		if (error) {
969
			restart = 0;
970 971
		} else {
			semop_completed = 1;
D
Davidlohr Bueso 已提交
972
			do_smart_wakeup_zero(sma, q->sops, q->nsops, wake_q);
973
			restart = check_restart(sma, q);
974
		}
975

D
Davidlohr Bueso 已提交
976
		wake_up_sem_queue_prepare(q, error, wake_q);
977
		if (restart)
N
Nick Piggin 已提交
978
			goto again;
L
Linus Torvalds 已提交
979
	}
980
	return semop_completed;
L
Linus Torvalds 已提交
981 982
}

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

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

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

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

1055
/*
1056
 * check_qop: Test if a queued operation sleeps on the semaphore semnum
1057 1058 1059 1060
 */
static int check_qop(struct sem_array *sma, int semnum, struct sem_queue *q,
			bool count_zero)
{
1061
	struct sembuf *sop = q->blocking;
1062

1063 1064 1065 1066 1067 1068 1069 1070 1071 1072 1073
	/*
	 * 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));

1074 1075
	if (sop->sem_num != semnum)
		return 0;
1076

1077 1078 1079 1080 1081 1082
	if (count_zero && sop->sem_op == 0)
		return 1;
	if (!count_zero && sop->sem_op < 0)
		return 1;

	return 0;
1083 1084
}

L
Linus Torvalds 已提交
1085 1086 1087
/* 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
1088 1089 1090
 *
 * 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 已提交
1091
 */
1092 1093
static int count_semcnt(struct sem_array *sma, ushort semnum,
			bool count_zero)
L
Linus Torvalds 已提交
1094
{
1095
	struct list_head *l;
M
Manfred Spraul 已提交
1096
	struct sem_queue *q;
1097
	int semcnt;
L
Linus Torvalds 已提交
1098

1099 1100 1101
	semcnt = 0;
	/* First: check the simple operations. They are easy to evaluate */
	if (count_zero)
1102
		l = &sma->sems[semnum].pending_const;
1103
	else
1104
		l = &sma->sems[semnum].pending_alter;
L
Linus Torvalds 已提交
1105

1106 1107 1108 1109 1110
	list_for_each_entry(q, l, list) {
		/* all task on a per-semaphore list sleep on exactly
		 * that semaphore
		 */
		semcnt++;
R
Rik van Riel 已提交
1111 1112
	}

1113
	/* Then: check the complex operations. */
1114
	list_for_each_entry(q, &sma->pending_alter, list) {
1115 1116 1117 1118 1119 1120
		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);
		}
1121
	}
1122
	return semcnt;
L
Linus Torvalds 已提交
1123 1124
}

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

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

	/* Wake up all pending processes and let them fail with EIDRM. */
1149 1150
	list_for_each_entry_safe(q, tq, &sma->pending_const, list) {
		unlink_queue(sma, q);
D
Davidlohr Bueso 已提交
1151
		wake_up_sem_queue_prepare(q, -EIDRM, &wake_q);
1152 1153 1154
	}

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

N
Nadia Derbey 已提交
1171 1172
	/* Remove the semaphore set from the IDR */
	sem_rmid(ns, sma);
1173
	sem_unlock(sma, -1);
1174
	rcu_read_unlock();
L
Linus Torvalds 已提交
1175

D
Davidlohr Bueso 已提交
1176
	wake_up_q(&wake_q);
K
Kirill Korotaev 已提交
1177
	ns->used_sems -= sma->sem_nsems;
1178
	ipc_rcu_putref(&sma->sem_perm, sem_rcu_free);
L
Linus Torvalds 已提交
1179 1180 1181 1182
}

static unsigned long copy_semid_to_user(void __user *buf, struct semid64_ds *in, int version)
{
M
Manfred Spraul 已提交
1183
	switch (version) {
L
Linus Torvalds 已提交
1184 1185 1186 1187 1188 1189
	case IPC_64:
		return copy_to_user(buf, in, sizeof(*in));
	case IPC_OLD:
	    {
		struct semid_ds out;

1190 1191
		memset(&out, 0, sizeof(out));

L
Linus Torvalds 已提交
1192 1193 1194 1195 1196 1197 1198 1199 1200 1201 1202 1203 1204
		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;
	}
}

1205
static time64_t get_semotime(struct sem_array *sma)
1206 1207
{
	int i;
1208
	time64_t res;
1209

1210
	res = sma->sems[0].sem_otime;
1211
	for (i = 1; i < sma->sem_nsems; i++) {
1212
		time64_t to = sma->sems[i].sem_otime;
1213 1214 1215 1216 1217 1218 1219

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

1220 1221
static int semctl_stat(struct ipc_namespace *ns, int semid,
			 int cmd, struct semid64_ds *semid64)
L
Linus Torvalds 已提交
1222 1223
{
	struct sem_array *sma;
1224
	time64_t semotime;
1225 1226
	int id = 0;
	int err;
L
Linus Torvalds 已提交
1227

1228
	memset(semid64, 0, sizeof(*semid64));
P
Paul McQuade 已提交
1229

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

1246 1247 1248 1249 1250 1251 1252 1253
	/* 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 已提交
1254

1255
	err = security_sem_semctl(&sma->sem_perm, cmd);
1256 1257
	if (err)
		goto out_unlock;
L
Linus Torvalds 已提交
1258

1259 1260 1261 1262 1263 1264 1265 1266
	ipc_lock_object(&sma->sem_perm);

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

1267
	kernel_to_ipc64_perm(&sma->sem_perm, &semid64->sem_perm);
1268 1269
	semotime = get_semotime(sma);
	semid64->sem_otime = semotime;
1270
	semid64->sem_ctime = sma->sem_ctime;
1271 1272 1273 1274
#ifndef CONFIG_64BIT
	semid64->sem_otime_high = semotime >> 32;
	semid64->sem_ctime_high = sma->sem_ctime >> 32;
#endif
1275
	semid64->sem_nsems = sma->sem_nsems;
1276 1277

	ipc_unlock_object(&sma->sem_perm);
1278 1279
	rcu_read_unlock();
	return id;
L
Linus Torvalds 已提交
1280 1281

out_unlock:
1282
	rcu_read_unlock();
L
Linus Torvalds 已提交
1283 1284 1285
	return err;
}

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 1315 1316 1317 1318 1319 1320
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;
}

1321
static int semctl_setval(struct ipc_namespace *ns, int semid, int semnum,
1322
		int val)
1323 1324 1325
{
	struct sem_undo *un;
	struct sem_array *sma;
M
Manfred Spraul 已提交
1326
	struct sem *curr;
1327
	int err;
D
Davidlohr Bueso 已提交
1328 1329
	DEFINE_WAKE_Q(wake_q);

1330 1331
	if (val > SEMVMX || val < 0)
		return -ERANGE;
1332

1333 1334 1335 1336 1337 1338 1339 1340 1341 1342 1343 1344 1345 1346 1347 1348 1349
	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;
	}
1350

1351
	err = security_sem_semctl(&sma->sem_perm, SETVAL);
1352 1353 1354 1355
	if (err) {
		rcu_read_unlock();
		return -EACCES;
	}
1356

1357
	sem_lock(sma, NULL, -1);
1358

1359
	if (!ipc_valid_object(&sma->sem_perm)) {
1360 1361 1362 1363 1364
		sem_unlock(sma, -1);
		rcu_read_unlock();
		return -EIDRM;
	}

1365
	semnum = array_index_nospec(semnum, sma->sem_nsems);
1366
	curr = &sma->sems[semnum];
1367

1368
	ipc_assert_locked_object(&sma->sem_perm);
1369 1370 1371 1372
	list_for_each_entry(un, &sma->list_id, list_id)
		un->semadj[semnum] = 0;

	curr->semval = val;
1373
	ipc_update_pid(&curr->sempid, task_tgid(current));
1374
	sma->sem_ctime = ktime_get_real_seconds();
1375
	/* maybe some queued-up processes were waiting for this */
D
Davidlohr Bueso 已提交
1376
	do_smart_update(sma, NULL, 0, 0, &wake_q);
1377
	sem_unlock(sma, -1);
1378
	rcu_read_unlock();
D
Davidlohr Bueso 已提交
1379
	wake_up_q(&wake_q);
1380
	return 0;
1381 1382
}

K
Kirill Korotaev 已提交
1383
static int semctl_main(struct ipc_namespace *ns, int semid, int semnum,
1384
		int cmd, void __user *p)
L
Linus Torvalds 已提交
1385 1386
{
	struct sem_array *sma;
M
Manfred Spraul 已提交
1387
	struct sem *curr;
1388
	int err, nsems;
L
Linus Torvalds 已提交
1389
	ushort fast_sem_io[SEMMSL_FAST];
M
Manfred Spraul 已提交
1390
	ushort *sem_io = fast_sem_io;
D
Davidlohr Bueso 已提交
1391
	DEFINE_WAKE_Q(wake_q);
1392 1393 1394 1395 1396

	rcu_read_lock();
	sma = sem_obtain_object_check(ns, semid);
	if (IS_ERR(sma)) {
		rcu_read_unlock();
1397
		return PTR_ERR(sma);
1398
	}
L
Linus Torvalds 已提交
1399 1400 1401 1402

	nsems = sma->sem_nsems;

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

1406
	err = security_sem_semctl(&sma->sem_perm, cmd);
1407 1408
	if (err)
		goto out_rcu_wakeup;
L
Linus Torvalds 已提交
1409 1410 1411 1412 1413

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

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

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

1457
		if (!ipc_rcu_getref(&sma->sem_perm)) {
1458 1459
			err = -EIDRM;
			goto out_rcu_wakeup;
1460
		}
1461
		rcu_read_unlock();
L
Linus Torvalds 已提交
1462

M
Manfred Spraul 已提交
1463
		if (nsems > SEMMSL_FAST) {
K
Kees Cook 已提交
1464 1465
			sem_io = kvmalloc_array(nsems, sizeof(ushort),
						GFP_KERNEL);
M
Manfred Spraul 已提交
1466
			if (sem_io == NULL) {
1467
				ipc_rcu_putref(&sma->sem_perm, sem_rcu_free);
L
Linus Torvalds 已提交
1468 1469 1470 1471
				return -ENOMEM;
			}
		}

M
Manfred Spraul 已提交
1472
		if (copy_from_user(sem_io, p, nsems*sizeof(ushort))) {
1473
			ipc_rcu_putref(&sma->sem_perm, sem_rcu_free);
L
Linus Torvalds 已提交
1474 1475 1476 1477 1478 1479
			err = -EFAULT;
			goto out_free;
		}

		for (i = 0; i < nsems; i++) {
			if (sem_io[i] > SEMVMX) {
1480
				ipc_rcu_putref(&sma->sem_perm, sem_rcu_free);
L
Linus Torvalds 已提交
1481 1482 1483 1484
				err = -ERANGE;
				goto out_free;
			}
		}
1485
		rcu_read_lock();
1486
		sem_lock_and_putref(sma);
1487
		if (!ipc_valid_object(&sma->sem_perm)) {
L
Linus Torvalds 已提交
1488
			err = -EIDRM;
1489
			goto out_unlock;
L
Linus Torvalds 已提交
1490 1491
		}

1492
		for (i = 0; i < nsems; i++) {
1493
			sma->sems[i].semval = sem_io[i];
1494
			ipc_update_pid(&sma->sems[i].sempid, task_tgid(current));
1495
		}
1496

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

1514
	sem_lock(sma, NULL, -1);
1515
	if (!ipc_valid_object(&sma->sem_perm)) {
1516 1517 1518
		err = -EIDRM;
		goto out_unlock;
	}
1519 1520

	semnum = array_index_nospec(semnum, nsems);
1521
	curr = &sma->sems[semnum];
L
Linus Torvalds 已提交
1522 1523 1524 1525 1526 1527

	switch (cmd) {
	case GETVAL:
		err = curr->semval;
		goto out_unlock;
	case GETPID:
1528
		err = pid_vnr(curr->sempid);
L
Linus Torvalds 已提交
1529 1530
		goto out_unlock;
	case GETNCNT:
1531
		err = count_semcnt(sma, semnum, 0);
L
Linus Torvalds 已提交
1532 1533
		goto out_unlock;
	case GETZCNT:
1534
		err = count_semcnt(sma, semnum, 1);
L
Linus Torvalds 已提交
1535 1536
		goto out_unlock;
	}
1537

L
Linus Torvalds 已提交
1538
out_unlock:
1539
	sem_unlock(sma, -1);
1540
out_rcu_wakeup:
1541
	rcu_read_unlock();
D
Davidlohr Bueso 已提交
1542
	wake_up_q(&wake_q);
L
Linus Torvalds 已提交
1543
out_free:
M
Manfred Spraul 已提交
1544
	if (sem_io != fast_sem_io)
K
Kees Cook 已提交
1545
		kvfree(sem_io);
L
Linus Torvalds 已提交
1546 1547 1548
	return err;
}

1549 1550
static inline unsigned long
copy_semid_from_user(struct semid64_ds *out, void __user *buf, int version)
L
Linus Torvalds 已提交
1551
{
M
Manfred Spraul 已提交
1552
	switch (version) {
L
Linus Torvalds 已提交
1553
	case IPC_64:
1554
		if (copy_from_user(out, buf, sizeof(*out)))
L
Linus Torvalds 已提交
1555 1556 1557 1558 1559 1560
			return -EFAULT;
		return 0;
	case IPC_OLD:
	    {
		struct semid_ds tbuf_old;

M
Manfred Spraul 已提交
1561
		if (copy_from_user(&tbuf_old, buf, sizeof(tbuf_old)))
L
Linus Torvalds 已提交
1562 1563
			return -EFAULT;

1564 1565 1566
		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 已提交
1567 1568 1569 1570 1571 1572 1573 1574

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

1575
/*
D
Davidlohr Bueso 已提交
1576
 * This function handles some semctl commands which require the rwsem
1577
 * to be held in write mode.
D
Davidlohr Bueso 已提交
1578
 * NOTE: no locks must be held, the rwsem is taken inside this function.
1579
 */
1580
static int semctl_down(struct ipc_namespace *ns, int semid,
1581
		       int cmd, struct semid64_ds *semid64)
L
Linus Torvalds 已提交
1582 1583 1584 1585 1586
{
	struct sem_array *sma;
	int err;
	struct kern_ipc_perm *ipcp;

D
Davidlohr Bueso 已提交
1587
	down_write(&sem_ids(ns).rwsem);
1588 1589
	rcu_read_lock();

1590
	ipcp = ipcctl_pre_down_nolock(ns, &sem_ids(ns), semid, cmd,
1591
				      &semid64->sem_perm, 0);
1592 1593 1594 1595
	if (IS_ERR(ipcp)) {
		err = PTR_ERR(ipcp);
		goto out_unlock1;
	}
S
Steve Grubb 已提交
1596

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

1599
	err = security_sem_semctl(&sma->sem_perm, cmd);
1600 1601
	if (err)
		goto out_unlock1;
L
Linus Torvalds 已提交
1602

1603
	switch (cmd) {
L
Linus Torvalds 已提交
1604
	case IPC_RMID:
1605
		sem_lock(sma, NULL, -1);
1606
		/* freeary unlocks the ipc object and rcu */
1607
		freeary(ns, ipcp);
1608
		goto out_up;
L
Linus Torvalds 已提交
1609
	case IPC_SET:
1610
		sem_lock(sma, NULL, -1);
1611
		err = ipc_update_perm(&semid64->sem_perm, ipcp);
1612
		if (err)
1613
			goto out_unlock0;
1614
		sma->sem_ctime = ktime_get_real_seconds();
L
Linus Torvalds 已提交
1615 1616 1617
		break;
	default:
		err = -EINVAL;
1618
		goto out_unlock1;
L
Linus Torvalds 已提交
1619 1620
	}

1621
out_unlock0:
1622
	sem_unlock(sma, -1);
1623
out_unlock1:
1624
	rcu_read_unlock();
1625
out_up:
D
Davidlohr Bueso 已提交
1626
	up_write(&sem_ids(ns).rwsem);
L
Linus Torvalds 已提交
1627 1628 1629
	return err;
}

1630
long ksys_semctl(int semid, int semnum, int cmd, unsigned long arg)
L
Linus Torvalds 已提交
1631 1632
{
	int version;
K
Kirill Korotaev 已提交
1633
	struct ipc_namespace *ns;
1634
	void __user *p = (void __user *)arg;
1635 1636
	struct semid64_ds semid64;
	int err;
L
Linus Torvalds 已提交
1637 1638 1639 1640 1641

	if (semid < 0)
		return -EINVAL;

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

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

1685 1686 1687 1688 1689
SYSCALL_DEFINE4(semctl, int, semid, int, semnum, int, cmd, unsigned long, arg)
{
	return ksys_semctl(semid, semnum, cmd, arg);
}

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

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

COMPAT_SYSCALL_DEFINE4(semctl, int, semid, int, semnum, int, cmd, int, arg)
{
	return compat_ksys_semctl(semid, semnum, cmd, arg);
}
A
Al Viro 已提交
1790
#endif
L
Linus Torvalds 已提交
1791 1792 1793 1794 1795 1796 1797 1798 1799 1800 1801 1802 1803 1804 1805 1806 1807 1808

/* 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) {
1809
		undo_list = kzalloc(sizeof(*undo_list), GFP_KERNEL);
L
Linus Torvalds 已提交
1810 1811
		if (undo_list == NULL)
			return -ENOMEM;
I
Ingo Molnar 已提交
1812
		spin_lock_init(&undo_list->lock);
1813
		refcount_set(&undo_list->refcnt, 1);
1814 1815
		INIT_LIST_HEAD(&undo_list->list_proc);

L
Linus Torvalds 已提交
1816 1817 1818 1819 1820 1821
		current->sysvsem.undo_list = undo_list;
	}
	*undo_listp = undo_list;
	return 0;
}

1822
static struct sem_undo *__lookup_undo(struct sem_undo_list *ulp, int semid)
L
Linus Torvalds 已提交
1823
{
1824
	struct sem_undo *un;
1825

1826 1827 1828
	list_for_each_entry_rcu(un, &ulp->list_proc, list_proc) {
		if (un->semid == semid)
			return un;
L
Linus Torvalds 已提交
1829
	}
1830
	return NULL;
L
Linus Torvalds 已提交
1831 1832
}

1833 1834 1835 1836
static struct sem_undo *lookup_undo(struct sem_undo_list *ulp, int semid)
{
	struct sem_undo *un;

M
Manfred Spraul 已提交
1837
	assert_spin_locked(&ulp->lock);
1838 1839 1840 1841 1842 1843 1844 1845 1846

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

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

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

1869
	rcu_read_lock();
1870
	spin_lock(&ulp->lock);
L
Linus Torvalds 已提交
1871
	un = lookup_undo(ulp, semid);
1872
	spin_unlock(&ulp->lock);
M
Manfred Spraul 已提交
1873
	if (likely(un != NULL))
L
Linus Torvalds 已提交
1874 1875 1876
		goto out;

	/* no undo structure around - allocate one. */
1877
	/* step 1: figure out the size of the semaphore array */
1878 1879 1880
	sma = sem_obtain_object_check(ns, semid);
	if (IS_ERR(sma)) {
		rcu_read_unlock();
J
Julia Lawall 已提交
1881
		return ERR_CAST(sma);
1882
	}
1883

L
Linus Torvalds 已提交
1884
	nsems = sma->sem_nsems;
1885
	if (!ipc_rcu_getref(&sma->sem_perm)) {
1886 1887 1888 1889
		rcu_read_unlock();
		un = ERR_PTR(-EIDRM);
		goto out;
	}
1890
	rcu_read_unlock();
L
Linus Torvalds 已提交
1891

1892
	/* step 2: allocate new undo structure */
1893
	new = kzalloc(sizeof(struct sem_undo) + sizeof(short)*nsems, GFP_KERNEL);
L
Linus Torvalds 已提交
1894
	if (!new) {
1895
		ipc_rcu_putref(&sma->sem_perm, sem_rcu_free);
L
Linus Torvalds 已提交
1896 1897 1898
		return ERR_PTR(-ENOMEM);
	}

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

1929
success:
1930
	spin_unlock(&ulp->lock);
1931
	sem_unlock(sma, -1);
L
Linus Torvalds 已提交
1932 1933 1934 1935
out:
	return un;
}

A
Al Viro 已提交
1936
static long do_semtimedop(int semid, struct sembuf __user *tsops,
1937
		unsigned nsops, const struct timespec64 *timeout)
L
Linus Torvalds 已提交
1938 1939 1940 1941
{
	int error = -EINVAL;
	struct sem_array *sma;
	struct sembuf fast_sops[SEMOPM_FAST];
M
Manfred Spraul 已提交
1942
	struct sembuf *sops = fast_sops, *sop;
L
Linus Torvalds 已提交
1943
	struct sem_undo *un;
1944 1945
	int max, locknum;
	bool undos = false, alter = false, dupsop = false;
L
Linus Torvalds 已提交
1946
	struct sem_queue queue;
1947
	unsigned long dup = 0, jiffies_left = 0;
K
Kirill Korotaev 已提交
1948 1949 1950
	struct ipc_namespace *ns;

	ns = current->nsproxy->ipc_ns;
L
Linus Torvalds 已提交
1951 1952 1953

	if (nsops < 1 || semid < 0)
		return -EINVAL;
K
Kirill Korotaev 已提交
1954
	if (nsops > ns->sc_semopm)
L
Linus Torvalds 已提交
1955
		return -E2BIG;
M
Manfred Spraul 已提交
1956
	if (nsops > SEMOPM_FAST) {
1957
		sops = kvmalloc_array(nsops, sizeof(*sops), GFP_KERNEL);
M
Manfred Spraul 已提交
1958
		if (sops == NULL)
L
Linus Torvalds 已提交
1959 1960
			return -ENOMEM;
	}
1961

M
Manfred Spraul 已提交
1962 1963
	if (copy_from_user(sops, tsops, nsops * sizeof(*tsops))) {
		error =  -EFAULT;
L
Linus Torvalds 已提交
1964 1965
		goto out_free;
	}
1966

L
Linus Torvalds 已提交
1967
	if (timeout) {
A
Al Viro 已提交
1968 1969
		if (timeout->tv_sec < 0 || timeout->tv_nsec < 0 ||
			timeout->tv_nsec >= 1000000000L) {
L
Linus Torvalds 已提交
1970 1971 1972
			error = -EINVAL;
			goto out_free;
		}
1973
		jiffies_left = timespec64_to_jiffies(timeout);
L
Linus Torvalds 已提交
1974
	}
1975

L
Linus Torvalds 已提交
1976 1977
	max = 0;
	for (sop = sops; sop < sops + nsops; sop++) {
1978 1979
		unsigned long mask = 1ULL << ((sop->sem_num) % BITS_PER_LONG);

L
Linus Torvalds 已提交
1980 1981 1982
		if (sop->sem_num >= max)
			max = sop->sem_num;
		if (sop->sem_flg & SEM_UNDO)
1983 1984 1985 1986 1987 1988 1989 1990 1991 1992 1993 1994 1995 1996
			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 已提交
1997 1998 1999
	}

	if (undos) {
2000
		/* On success, find_alloc_undo takes the rcu_read_lock */
2001
		un = find_alloc_undo(ns, semid);
L
Linus Torvalds 已提交
2002 2003 2004 2005
		if (IS_ERR(un)) {
			error = PTR_ERR(un);
			goto out_free;
		}
2006
	} else {
L
Linus Torvalds 已提交
2007
		un = NULL;
2008 2009
		rcu_read_lock();
	}
L
Linus Torvalds 已提交
2010

2011
	sma = sem_obtain_object_check(ns, semid);
2012
	if (IS_ERR(sma)) {
2013
		rcu_read_unlock();
2014
		error = PTR_ERR(sma);
L
Linus Torvalds 已提交
2015
		goto out_free;
2016 2017
	}

2018
	error = -EFBIG;
2019 2020 2021 2022
	if (max >= sma->sem_nsems) {
		rcu_read_unlock();
		goto out_free;
	}
2023 2024

	error = -EACCES;
2025 2026 2027 2028
	if (ipcperms(ns, &sma->sem_perm, alter ? S_IWUGO : S_IRUGO)) {
		rcu_read_unlock();
		goto out_free;
	}
2029

2030
	error = security_sem_semop(&sma->sem_perm, sops, nsops, alter);
2031 2032 2033 2034
	if (error) {
		rcu_read_unlock();
		goto out_free;
	}
2035

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

2058 2059 2060
	queue.sops = sops;
	queue.nsops = nsops;
	queue.undo = un;
2061
	queue.pid = task_tgid(current);
2062
	queue.alter = alter;
2063
	queue.dupsop = dupsop;
2064 2065

	error = perform_atomic_semop(sma, &queue);
D
Davidlohr Bueso 已提交
2066 2067 2068 2069 2070
	if (error == 0) { /* non-blocking succesfull path */
		DEFINE_WAKE_Q(wake_q);

		/*
		 * If the operation was successful, then do
2071 2072 2073
		 * the required updates.
		 */
		if (alter)
D
Davidlohr Bueso 已提交
2074
			do_smart_update(sma, sops, nsops, 1, &wake_q);
2075 2076
		else
			set_semotime(sma, sops);
D
Davidlohr Bueso 已提交
2077 2078 2079 2080 2081 2082

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

		goto out_free;
L
Linus Torvalds 已提交
2083
	}
D
Davidlohr Bueso 已提交
2084
	if (error < 0) /* non-blocking error path */
2085
		goto out_unlock_free;
L
Linus Torvalds 已提交
2086

D
Davidlohr Bueso 已提交
2087 2088
	/*
	 * We need to sleep on this operation, so we put the current
L
Linus Torvalds 已提交
2089 2090
	 * task into the pending queue and go to sleep.
	 */
2091 2092
	if (nsops == 1) {
		struct sem *curr;
2093 2094
		int idx = array_index_nospec(sops->sem_num, sma->sem_nsems);
		curr = &sma->sems[idx];
2095

2096 2097 2098 2099 2100 2101 2102 2103 2104 2105
		if (alter) {
			if (sma->complex_count) {
				list_add_tail(&queue.list,
						&sma->pending_alter);
			} else {

				list_add_tail(&queue.list,
						&curr->pending_alter);
			}
		} else {
2106
			list_add_tail(&queue.list, &curr->pending_const);
2107
		}
2108
	} else {
2109 2110 2111
		if (!sma->complex_count)
			merge_queues(sma);

2112
		if (alter)
2113
			list_add_tail(&queue.list, &sma->pending_alter);
2114
		else
2115 2116
			list_add_tail(&queue.list, &sma->pending_const);

2117 2118 2119
		sma->complex_count++;
	}

D
Davidlohr Bueso 已提交
2120 2121 2122
	do {
		queue.status = -EINTR;
		queue.sleeper = current;
2123

D
Davidlohr Bueso 已提交
2124 2125 2126
		__set_current_state(TASK_INTERRUPTIBLE);
		sem_unlock(sma, locknum);
		rcu_read_unlock();
L
Linus Torvalds 已提交
2127

D
Davidlohr Bueso 已提交
2128 2129 2130 2131
		if (timeout)
			jiffies_left = schedule_timeout(jiffies_left);
		else
			schedule();
L
Linus Torvalds 已提交
2132

D
Davidlohr Bueso 已提交
2133
		/*
D
Davidlohr Bueso 已提交
2134 2135 2136 2137 2138 2139 2140 2141 2142
		 * 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().
2143
		 */
D
Davidlohr Bueso 已提交
2144 2145 2146 2147 2148 2149 2150 2151 2152 2153 2154
		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;
		}
2155

D
Davidlohr Bueso 已提交
2156
		rcu_read_lock();
2157
		locknum = sem_lock(sma, sops, nsops);
L
Linus Torvalds 已提交
2158

2159 2160 2161 2162
		if (!ipc_valid_object(&sma->sem_perm))
			goto out_unlock_free;

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

D
Davidlohr Bueso 已提交
2164 2165 2166 2167 2168 2169
		/*
		 * 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;
2170

D
Davidlohr Bueso 已提交
2171 2172 2173 2174 2175 2176
		/*
		 * 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 */
2177

2178
	unlink_queue(sma, &queue);
L
Linus Torvalds 已提交
2179 2180

out_unlock_free:
2181
	sem_unlock(sma, locknum);
2182
	rcu_read_unlock();
L
Linus Torvalds 已提交
2183
out_free:
M
Manfred Spraul 已提交
2184
	if (sops != fast_sops)
2185
		kvfree(sops);
L
Linus Torvalds 已提交
2186 2187 2188
	return error;
}

2189
long ksys_semtimedop(int semid, struct sembuf __user *tsops,
2190
		     unsigned int nsops, const struct __kernel_timespec __user *timeout)
A
Al Viro 已提交
2191 2192
{
	if (timeout) {
2193 2194
		struct timespec64 ts;
		if (get_timespec64(&ts, timeout))
A
Al Viro 已提交
2195 2196 2197 2198 2199 2200
			return -EFAULT;
		return do_semtimedop(semid, tsops, nsops, &ts);
	}
	return do_semtimedop(semid, tsops, nsops, NULL);
}

2201
SYSCALL_DEFINE4(semtimedop, int, semid, struct sembuf __user *, tsops,
2202
		unsigned int, nsops, const struct __kernel_timespec __user *, timeout)
2203 2204 2205 2206
{
	return ksys_semtimedop(semid, tsops, nsops, timeout);
}

2207
#ifdef CONFIG_COMPAT_32BIT_TIME
2208 2209 2210
long compat_ksys_semtimedop(int semid, struct sembuf __user *tsems,
			    unsigned int nsops,
			    const struct compat_timespec __user *timeout)
A
Al Viro 已提交
2211 2212
{
	if (timeout) {
2213 2214
		struct timespec64 ts;
		if (compat_get_timespec64(&ts, timeout))
A
Al Viro 已提交
2215 2216 2217 2218 2219
			return -EFAULT;
		return do_semtimedop(semid, tsems, nsops, &ts);
	}
	return do_semtimedop(semid, tsems, nsops, NULL);
}
2220 2221 2222 2223 2224 2225 2226

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 已提交
2227 2228
#endif

2229 2230
SYSCALL_DEFINE3(semop, int, semid, struct sembuf __user *, tsops,
		unsigned, nsops)
L
Linus Torvalds 已提交
2231
{
A
Al Viro 已提交
2232
	return do_semtimedop(semid, tsops, nsops, NULL);
L
Linus Torvalds 已提交
2233 2234 2235 2236 2237 2238 2239 2240 2241 2242 2243 2244 2245 2246 2247
}

/* 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;
2248
		refcount_inc(&undo_list->refcnt);
L
Linus Torvalds 已提交
2249
		tsk->sysvsem.undo_list = undo_list;
P
Paul McQuade 已提交
2250
	} else
L
Linus Torvalds 已提交
2251 2252 2253 2254 2255 2256 2257 2258 2259 2260 2261 2262 2263 2264 2265 2266 2267 2268 2269
		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)
{
2270
	struct sem_undo_list *ulp;
L
Linus Torvalds 已提交
2271

2272 2273
	ulp = tsk->sysvsem.undo_list;
	if (!ulp)
L
Linus Torvalds 已提交
2274
		return;
2275
	tsk->sysvsem.undo_list = NULL;
L
Linus Torvalds 已提交
2276

2277
	if (!refcount_dec_and_test(&ulp->refcnt))
L
Linus Torvalds 已提交
2278 2279
		return;

2280
	for (;;) {
L
Linus Torvalds 已提交
2281
		struct sem_array *sma;
2282
		struct sem_undo *un;
2283
		int semid, i;
D
Davidlohr Bueso 已提交
2284
		DEFINE_WAKE_Q(wake_q);
2285

2286 2287
		cond_resched();

2288
		rcu_read_lock();
2289 2290
		un = list_entry_rcu(ulp->list_proc.next,
				    struct sem_undo, list_proc);
2291 2292 2293 2294 2295 2296 2297
		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.
			 */
2298 2299
			spin_lock(&ulp->lock);
			spin_unlock(&ulp->lock);
2300 2301 2302 2303 2304 2305
			rcu_read_unlock();
			break;
		}
		spin_lock(&ulp->lock);
		semid = un->semid;
		spin_unlock(&ulp->lock);
2306

2307
		/* exit_sem raced with IPC_RMID, nothing to do */
2308 2309
		if (semid == -1) {
			rcu_read_unlock();
2310
			continue;
2311
		}
L
Linus Torvalds 已提交
2312

2313
		sma = sem_obtain_object_check(tsk->nsproxy->ipc_ns, semid);
2314
		/* exit_sem raced with IPC_RMID, nothing to do */
2315 2316
		if (IS_ERR(sma)) {
			rcu_read_unlock();
2317
			continue;
2318
		}
L
Linus Torvalds 已提交
2319

2320
		sem_lock(sma, NULL, -1);
2321
		/* exit_sem raced with IPC_RMID, nothing to do */
2322
		if (!ipc_valid_object(&sma->sem_perm)) {
2323 2324 2325 2326
			sem_unlock(sma, -1);
			rcu_read_unlock();
			continue;
		}
2327
		un = __lookup_undo(ulp, semid);
2328 2329 2330 2331
		if (un == NULL) {
			/* exit_sem raced with IPC_RMID+semget() that created
			 * exactly the same semid. Nothing to do.
			 */
2332
			sem_unlock(sma, -1);
2333
			rcu_read_unlock();
2334 2335 2336 2337
			continue;
		}

		/* remove un from the linked lists */
2338
		ipc_assert_locked_object(&sma->sem_perm);
2339 2340
		list_del(&un->list_id);

2341 2342 2343 2344
		/* 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
		 */
2345 2346
		list_del_rcu(&un->list_proc);

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

2378
		kfree_rcu(un, rcu);
L
Linus Torvalds 已提交
2379
	}
2380
	kfree(ulp);
L
Linus Torvalds 已提交
2381 2382 2383
}

#ifdef CONFIG_PROC_FS
2384
static int sysvipc_sem_proc_show(struct seq_file *s, void *it)
L
Linus Torvalds 已提交
2385
{
2386
	struct user_namespace *user_ns = seq_user_ns(s);
2387 2388
	struct kern_ipc_perm *ipcp = it;
	struct sem_array *sma = container_of(ipcp, struct sem_array, sem_perm);
2389
	time64_t sem_otime;
2390

2391 2392 2393
	/*
	 * The proc interface isn't aware of sem_lock(), it calls
	 * ipc_lock_object() directly (in sysvipc_find_ipc).
2394 2395
	 * In order to stay compatible with sem_lock(), we must
	 * enter / leave complex_mode.
2396
	 */
2397
	complexmode_enter(sma);
2398

2399
	sem_otime = get_semotime(sma);
2400

2401
	seq_printf(s,
2402
		   "%10d %10d  %4o %10u %5u %5u %5u %5u %10llu %10llu\n",
2403 2404 2405 2406 2407 2408 2409 2410 2411 2412 2413
		   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);

2414 2415
	complexmode_tryleave(sma);

2416
	return 0;
L
Linus Torvalds 已提交
2417 2418
}
#endif