shm.c 29.1 KB
Newer Older
Linus Torvalds's avatar
Linus Torvalds committed
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
/*
 * linux/ipc/shm.c
 * Copyright (C) 1992, 1993 Krishna Balasubramanian
 *	 Many improvements/fixes by Bruno Haible.
 * Replaced `struct shm_desc' by `struct vm_area_struct', July 1994.
 * Fixed the shm swap deallocation (shm_unuse()), August 1998 Andrea Arcangeli.
 *
 * /proc/sysvipc/shm support (c) 1999 Dragos Acostachioaie <dragos@iname.com>
 * BIGMEM support, Andrea Arcangeli <andrea@suse.de>
 * SMP thread shm, Jean-Luc Boyard <jean-luc.boyard@siemens.fr>
 * HIGHMEM support, Ingo Molnar <mingo@redhat.com>
 * Make shmmax, shmall, shmmni sysctl'able, Christoph Rohland <cr@sap.com>
 * Shared /dev/zero support, Kanoj Sarcar <kanoj@sgi.com>
 * Move the mm functionality over to mm/shmem.c, Christoph Rohland <cr@sap.com>
 *
Steve Grubb's avatar
Steve Grubb committed
16 17
 * support for audit of ipc object properties and permission changes
 * Dustin Kirkland <dustin.kirkland@us.ibm.com>
18 19 20 21
 *
 * namespaces support
 * OpenVZ, SWsoft Inc.
 * Pavel Emelianov <xemul@openvz.org>
Linus Torvalds's avatar
Linus Torvalds committed
22 23 24 25 26 27 28 29 30 31 32 33 34
 */

#include <linux/slab.h>
#include <linux/mm.h>
#include <linux/hugetlb.h>
#include <linux/shm.h>
#include <linux/init.h>
#include <linux/file.h>
#include <linux/mman.h>
#include <linux/shmem_fs.h>
#include <linux/security.h>
#include <linux/syscalls.h>
#include <linux/audit.h>
35
#include <linux/capability.h>
36
#include <linux/ptrace.h>
37
#include <linux/seq_file.h>
Nadia Derbey's avatar
Nadia Derbey committed
38
#include <linux/rwsem.h>
39
#include <linux/nsproxy.h>
40
#include <linux/mount.h>
41
#include <linux/ipc_namespace.h>
42

Linus Torvalds's avatar
Linus Torvalds committed
43 44 45 46
#include <asm/uaccess.h>

#include "util.h"

47 48 49 50 51 52 53 54 55
struct shm_file_data {
	int id;
	struct ipc_namespace *ns;
	struct file *file;
	const struct vm_operations_struct *vm_ops;
};

#define shm_file_data(file) (*((struct shm_file_data **)&(file)->private_data))

56
static const struct file_operations shm_file_operations;
57
static const struct vm_operations_struct shm_vm_ops;
Linus Torvalds's avatar
Linus Torvalds committed
58

59
#define shm_ids(ns)	((ns)->ids[IPC_SHM_IDS])
Linus Torvalds's avatar
Linus Torvalds committed
60

61 62
#define shm_unlock(shp)			\
	ipc_unlock(&(shp)->shm_perm)
Linus Torvalds's avatar
Linus Torvalds committed
63

Nadia Derbey's avatar
Nadia Derbey committed
64
static int newseg(struct ipc_namespace *, struct ipc_params *);
65 66
static void shm_open(struct vm_area_struct *vma);
static void shm_close(struct vm_area_struct *vma);
67
static void shm_destroy (struct ipc_namespace *ns, struct shmid_kernel *shp);
Linus Torvalds's avatar
Linus Torvalds committed
68
#ifdef CONFIG_PROC_FS
69
static int sysvipc_shm_proc_show(struct seq_file *s, void *it);
Linus Torvalds's avatar
Linus Torvalds committed
70 71
#endif

72
void shm_init_ns(struct ipc_namespace *ns)
73 74 75 76
{
	ns->shm_ctlmax = SHMMAX;
	ns->shm_ctlall = SHMALL;
	ns->shm_ctlmni = SHMMNI;
77
	ns->shm_rmid_forced = 0;
78
	ns->shm_tot = 0;
WANG Cong's avatar
WANG Cong committed
79
	ipc_init_ids(&shm_ids(ns));
80 81
}

Nadia Derbey's avatar
Nadia Derbey committed
82
/*
Nadia Derbey's avatar
Nadia Derbey committed
83 84
 * Called with shm_ids.rw_mutex (writer) and the shp structure locked.
 * Only shm_ids.rw_mutex remains locked on exit.
Nadia Derbey's avatar
Nadia Derbey committed
85
 */
86
static void do_shm_rmid(struct ipc_namespace *ns, struct kern_ipc_perm *ipcp)
87
{
88 89 90
	struct shmid_kernel *shp;
	shp = container_of(ipcp, struct shmid_kernel, shm_perm);

91 92 93 94 95 96 97 98 99
	if (shp->shm_nattch){
		shp->shm_perm.mode |= SHM_DEST;
		/* Do not find it any more */
		shp->shm_perm.key = IPC_PRIVATE;
		shm_unlock(shp);
	} else
		shm_destroy(ns, shp);
}

100
#ifdef CONFIG_IPC_NS
101 102
void shm_exit_ns(struct ipc_namespace *ns)
{
103
	free_ipcs(ns, &shm_ids(ns), do_shm_rmid);
104
	idr_destroy(&ns->ids[IPC_SHM_IDS].ipcs_idr);
105
}
106
#endif
Linus Torvalds's avatar
Linus Torvalds committed
107 108 109

void __init shm_init (void)
{
110
	shm_init_ns(&init_ipc_ns);
111
	ipc_init_proc_interface("sysvipc/shm",
112 113 114 115 116
#if BITS_PER_LONG <= 32
				"       key      shmid perms       size  cpid  lpid nattch   uid   gid  cuid  cgid      atime      dtime      ctime        rss       swap\n",
#else
				"       key      shmid perms                  size  cpid  lpid nattch   uid   gid  cuid  cgid      atime      dtime      ctime                   rss                  swap\n",
#endif
117
				IPC_SHM_IDS, sysvipc_shm_proc_show);
Linus Torvalds's avatar
Linus Torvalds committed
118 119
}

Nadia Derbey's avatar
Nadia Derbey committed
120 121
/*
 * shm_lock_(check_) routines are called in the paths where the rw_mutex
122
 * is not necessarily held.
Nadia Derbey's avatar
Nadia Derbey committed
123
 */
124
static inline struct shmid_kernel *shm_lock(struct ipc_namespace *ns, int id)
Linus Torvalds's avatar
Linus Torvalds committed
125
{
Nadia Derbey's avatar
Nadia Derbey committed
126 127
	struct kern_ipc_perm *ipcp = ipc_lock(&shm_ids(ns), id);

128 129 130
	if (IS_ERR(ipcp))
		return (struct shmid_kernel *)ipcp;

Nadia Derbey's avatar
Nadia Derbey committed
131
	return container_of(ipcp, struct shmid_kernel, shm_perm);
132 133
}

134 135 136 137 138 139
static inline void shm_lock_by_ptr(struct shmid_kernel *ipcp)
{
	rcu_read_lock();
	spin_lock(&ipcp->shm_perm.lock);
}

140 141 142
static inline struct shmid_kernel *shm_lock_check(struct ipc_namespace *ns,
						int id)
{
Nadia Derbey's avatar
Nadia Derbey committed
143 144
	struct kern_ipc_perm *ipcp = ipc_lock_check(&shm_ids(ns), id);

145 146 147
	if (IS_ERR(ipcp))
		return (struct shmid_kernel *)ipcp;

Nadia Derbey's avatar
Nadia Derbey committed
148
	return container_of(ipcp, struct shmid_kernel, shm_perm);
Linus Torvalds's avatar
Linus Torvalds committed
149 150
}

Nadia Derbey's avatar
Nadia Derbey committed
151
static inline void shm_rmid(struct ipc_namespace *ns, struct shmid_kernel *s)
Linus Torvalds's avatar
Linus Torvalds committed
152
{
Nadia Derbey's avatar
Nadia Derbey committed
153
	ipc_rmid(&shm_ids(ns), &s->shm_perm);
Linus Torvalds's avatar
Linus Torvalds committed
154 155 156
}


157 158
/* This is called by fork, once for every shm attach. */
static void shm_open(struct vm_area_struct *vma)
159
{
160 161
	struct file *file = vma->vm_file;
	struct shm_file_data *sfd = shm_file_data(file);
Linus Torvalds's avatar
Linus Torvalds committed
162 163
	struct shmid_kernel *shp;

164
	shp = shm_lock(sfd->ns, sfd->id);
165
	BUG_ON(IS_ERR(shp));
Linus Torvalds's avatar
Linus Torvalds committed
166
	shp->shm_atim = get_seconds();
167
	shp->shm_lprid = task_tgid_vnr(current);
Linus Torvalds's avatar
Linus Torvalds committed
168 169 170 171 172 173 174
	shp->shm_nattch++;
	shm_unlock(shp);
}

/*
 * shm_destroy - free the struct shmid_kernel
 *
Nadia Derbey's avatar
Nadia Derbey committed
175
 * @ns: namespace
Linus Torvalds's avatar
Linus Torvalds committed
176 177
 * @shp: struct to free
 *
Nadia Derbey's avatar
Nadia Derbey committed
178
 * It has to be called with shp and shm_ids.rw_mutex (writer) locked,
Linus Torvalds's avatar
Linus Torvalds committed
179 180
 * but returns with shp unlocked and freed.
 */
181
static void shm_destroy(struct ipc_namespace *ns, struct shmid_kernel *shp)
Linus Torvalds's avatar
Linus Torvalds committed
182
{
183
	ns->shm_tot -= (shp->shm_segsz + PAGE_SIZE - 1) >> PAGE_SHIFT;
Nadia Derbey's avatar
Nadia Derbey committed
184
	shm_rmid(ns, shp);
Linus Torvalds's avatar
Linus Torvalds committed
185 186 187
	shm_unlock(shp);
	if (!is_file_hugepages(shp->shm_file))
		shmem_lock(shp->shm_file, 0, shp->mlock_user);
188
	else if (shp->mlock_user)
189
		user_shm_unlock(shp->shm_file->f_path.dentry->d_inode->i_size,
Linus Torvalds's avatar
Linus Torvalds committed
190 191 192 193 194 195
						shp->mlock_user);
	fput (shp->shm_file);
	security_shm_free(shp);
	ipc_rcu_putref(shp);
}

196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212
/*
 * shm_may_destroy - identifies whether shm segment should be destroyed now
 *
 * Returns true if and only if there are no active users of the segment and
 * one of the following is true:
 *
 * 1) shmctl(id, IPC_RMID, NULL) was called for this shp
 *
 * 2) sysctl kernel.shm_rmid_forced is set to 1.
 */
static bool shm_may_destroy(struct ipc_namespace *ns, struct shmid_kernel *shp)
{
	return (shp->shm_nattch == 0) &&
	       (ns->shm_rmid_forced ||
		(shp->shm_perm.mode & SHM_DEST));
}

Linus Torvalds's avatar
Linus Torvalds committed
213
/*
214
 * remove the attach descriptor vma.
Linus Torvalds's avatar
Linus Torvalds committed
215 216 217 218
 * free memory for segment if it is marked destroyed.
 * The descriptor has already been removed from the current->mm->mmap list
 * and will later be kfree()d.
 */
219
static void shm_close(struct vm_area_struct *vma)
Linus Torvalds's avatar
Linus Torvalds committed
220
{
221 222
	struct file * file = vma->vm_file;
	struct shm_file_data *sfd = shm_file_data(file);
Linus Torvalds's avatar
Linus Torvalds committed
223
	struct shmid_kernel *shp;
224
	struct ipc_namespace *ns = sfd->ns;
225

Nadia Derbey's avatar
Nadia Derbey committed
226
	down_write(&shm_ids(ns).rw_mutex);
Linus Torvalds's avatar
Linus Torvalds committed
227
	/* remove from the list of attaches of the shm segment */
228
	shp = shm_lock(ns, sfd->id);
229
	BUG_ON(IS_ERR(shp));
230
	shp->shm_lprid = task_tgid_vnr(current);
Linus Torvalds's avatar
Linus Torvalds committed
231 232
	shp->shm_dtim = get_seconds();
	shp->shm_nattch--;
233 234 235 236 237 238 239
	if (shm_may_destroy(ns, shp))
		shm_destroy(ns, shp);
	else
		shm_unlock(shp);
	up_write(&shm_ids(ns).rw_mutex);
}

240
/* Called with ns->shm_ids(ns).rw_mutex locked */
241 242 243
static int shm_try_destroy_current(int id, void *p, void *data)
{
	struct ipc_namespace *ns = data;
244 245
	struct kern_ipc_perm *ipcp = p;
	struct shmid_kernel *shp = container_of(ipcp, struct shmid_kernel, shm_perm);
246

247
	if (shp->shm_creator != current)
248 249 250 251 252 253 254 255 256 257 258 259 260
		return 0;

	/*
	 * Mark it as orphaned to destroy the segment when
	 * kernel.shm_rmid_forced is changed.
	 * It is noop if the following shm_may_destroy() returns true.
	 */
	shp->shm_creator = NULL;

	/*
	 * Don't even try to destroy it.  If shm_rmid_forced=0 and IPC_RMID
	 * is not set, it shouldn't be deleted here.
	 */
261
	if (!ns->shm_rmid_forced)
262 263
		return 0;

264 265
	if (shm_may_destroy(ns, shp)) {
		shm_lock_by_ptr(shp);
266
		shm_destroy(ns, shp);
267
	}
268 269 270
	return 0;
}

271
/* Called with ns->shm_ids(ns).rw_mutex locked */
272 273 274
static int shm_try_destroy_orphaned(int id, void *p, void *data)
{
	struct ipc_namespace *ns = data;
275 276
	struct kern_ipc_perm *ipcp = p;
	struct shmid_kernel *shp = container_of(ipcp, struct shmid_kernel, shm_perm);
277 278 279 280

	/*
	 * We want to destroy segments without users and with already
	 * exit'ed originating process.
281 282
	 *
	 * As shp->* are changed under rw_mutex, it's safe to skip shp locking.
283
	 */
284
	if (shp->shm_creator != NULL)
285 286
		return 0;

287 288
	if (shm_may_destroy(ns, shp)) {
		shm_lock_by_ptr(shp);
289
		shm_destroy(ns, shp);
290
	}
291 292 293 294 295 296
	return 0;
}

void shm_destroy_orphaned(struct ipc_namespace *ns)
{
	down_write(&shm_ids(ns).rw_mutex);
Vasiliy Kulikov's avatar
Vasiliy Kulikov committed
297
	if (shm_ids(ns).in_use)
298
		idr_for_each(&shm_ids(ns).ipcs_idr, &shm_try_destroy_orphaned, ns);
299 300 301 302 303 304
	up_write(&shm_ids(ns).rw_mutex);
}


void exit_shm(struct task_struct *task)
{
305
	struct ipc_namespace *ns = task->nsproxy->ipc_ns;
306

Vasiliy Kulikov's avatar
Vasiliy Kulikov committed
307 308 309
	if (shm_ids(ns).in_use == 0)
		return;

310 311
	/* Destroy all already created segments, but not mapped yet */
	down_write(&shm_ids(ns).rw_mutex);
Vasiliy Kulikov's avatar
Vasiliy Kulikov committed
312
	if (shm_ids(ns).in_use)
313
		idr_for_each(&shm_ids(ns).ipcs_idr, &shm_try_destroy_current, ns);
Nadia Derbey's avatar
Nadia Derbey committed
314
	up_write(&shm_ids(ns).rw_mutex);
Linus Torvalds's avatar
Linus Torvalds committed
315 316
}

Nick Piggin's avatar
Nick Piggin committed
317
static int shm_fault(struct vm_area_struct *vma, struct vm_fault *vmf)
318 319 320 321
{
	struct file *file = vma->vm_file;
	struct shm_file_data *sfd = shm_file_data(file);

Nick Piggin's avatar
Nick Piggin committed
322
	return sfd->vm_ops->fault(vma, vmf);
323 324 325
}

#ifdef CONFIG_NUMA
326
static int shm_set_policy(struct vm_area_struct *vma, struct mempolicy *new)
327 328 329 330 331 332 333 334 335
{
	struct file *file = vma->vm_file;
	struct shm_file_data *sfd = shm_file_data(file);
	int err = 0;
	if (sfd->vm_ops->set_policy)
		err = sfd->vm_ops->set_policy(vma, new);
	return err;
}

336 337
static struct mempolicy *shm_get_policy(struct vm_area_struct *vma,
					unsigned long addr)
338 339 340 341 342 343 344
{
	struct file *file = vma->vm_file;
	struct shm_file_data *sfd = shm_file_data(file);
	struct mempolicy *pol = NULL;

	if (sfd->vm_ops->get_policy)
		pol = sfd->vm_ops->get_policy(vma, addr);
345
	else if (vma->vm_policy)
346
		pol = vma->vm_policy;
347

348 349 350 351
	return pol;
}
#endif

Linus Torvalds's avatar
Linus Torvalds committed
352 353
static int shm_mmap(struct file * file, struct vm_area_struct * vma)
{
354
	struct shm_file_data *sfd = shm_file_data(file);
355 356
	int ret;

357 358 359 360
	ret = sfd->file->f_op->mmap(sfd->file, vma);
	if (ret != 0)
		return ret;
	sfd->vm_ops = vma->vm_ops;
David Howells's avatar
David Howells committed
361
#ifdef CONFIG_MMU
362
	BUG_ON(!sfd->vm_ops->fault);
David Howells's avatar
David Howells committed
363
#endif
364 365
	vma->vm_ops = &shm_vm_ops;
	shm_open(vma);
366 367

	return ret;
Linus Torvalds's avatar
Linus Torvalds committed
368 369
}

370 371
static int shm_release(struct inode *ino, struct file *file)
{
372
	struct shm_file_data *sfd = shm_file_data(file);
373

374 375 376
	put_ipc_ns(sfd->ns);
	shm_file_data(file) = NULL;
	kfree(sfd);
377 378 379
	return 0;
}

380
static int shm_fsync(struct file *file, loff_t start, loff_t end, int datasync)
381 382 383
{
	struct shm_file_data *sfd = shm_file_data(file);

384 385
	if (!sfd->file->f_op->fsync)
		return -EINVAL;
386
	return sfd->file->f_op->fsync(sfd->file, start, end, datasync);
387 388
}

389 390 391 392 393
static unsigned long shm_get_unmapped_area(struct file *file,
	unsigned long addr, unsigned long len, unsigned long pgoff,
	unsigned long flags)
{
	struct shm_file_data *sfd = shm_file_data(file);
394 395
	return sfd->file->f_op->get_unmapped_area(sfd->file, addr, len,
						pgoff, flags);
396 397
}

398
static const struct file_operations shm_file_operations = {
399
	.mmap		= shm_mmap,
400
	.fsync		= shm_fsync,
401
	.release	= shm_release,
402 403 404
#ifndef CONFIG_MMU
	.get_unmapped_area	= shm_get_unmapped_area,
#endif
405
	.llseek		= noop_llseek,
406 407 408 409 410 411
};

static const struct file_operations shm_file_operations_huge = {
	.mmap		= shm_mmap,
	.fsync		= shm_fsync,
	.release	= shm_release,
412
	.get_unmapped_area	= shm_get_unmapped_area,
413
	.llseek		= noop_llseek,
Linus Torvalds's avatar
Linus Torvalds committed
414 415
};

416 417 418 419 420
int is_file_shm_hugepages(struct file *file)
{
	return file->f_op == &shm_file_operations_huge;
}

421
static const struct vm_operations_struct shm_vm_ops = {
Linus Torvalds's avatar
Linus Torvalds committed
422 423
	.open	= shm_open,	/* callback for a new vm-area open */
	.close	= shm_close,	/* callback for when the vm-area is released */
424
	.fault	= shm_fault,
425 426 427
#if defined(CONFIG_NUMA)
	.set_policy = shm_set_policy,
	.get_policy = shm_get_policy,
Linus Torvalds's avatar
Linus Torvalds committed
428 429 430
#endif
};

Nadia Derbey's avatar
Nadia Derbey committed
431 432 433 434 435
/**
 * newseg - Create a new shared memory segment
 * @ns: namespace
 * @params: ptr to the structure that contains key, size and shmflg
 *
Nadia Derbey's avatar
Nadia Derbey committed
436
 * Called with shm_ids.rw_mutex held as a writer.
Nadia Derbey's avatar
Nadia Derbey committed
437 438
 */

Nadia Derbey's avatar
Nadia Derbey committed
439
static int newseg(struct ipc_namespace *ns, struct ipc_params *params)
Linus Torvalds's avatar
Linus Torvalds committed
440
{
Nadia Derbey's avatar
Nadia Derbey committed
441 442 443
	key_t key = params->key;
	int shmflg = params->flg;
	size_t size = params->u.size;
Linus Torvalds's avatar
Linus Torvalds committed
444 445 446 447 448 449
	int error;
	struct shmid_kernel *shp;
	int numpages = (size + PAGE_SIZE -1) >> PAGE_SHIFT;
	struct file * file;
	char name[13];
	int id;
450
	vm_flags_t acctflag = 0;
Linus Torvalds's avatar
Linus Torvalds committed
451

452
	if (size < SHMMIN || size > ns->shm_ctlmax)
Linus Torvalds's avatar
Linus Torvalds committed
453 454
		return -EINVAL;

455
	if (ns->shm_tot + numpages > ns->shm_ctlall)
Linus Torvalds's avatar
Linus Torvalds committed
456 457 458 459 460 461 462
		return -ENOSPC;

	shp = ipc_rcu_alloc(sizeof(*shp));
	if (!shp)
		return -ENOMEM;

	shp->shm_perm.key = key;
463
	shp->shm_perm.mode = (shmflg & S_IRWXUGO);
Linus Torvalds's avatar
Linus Torvalds committed
464 465 466 467 468 469 470 471 472
	shp->mlock_user = NULL;

	shp->shm_perm.security = NULL;
	error = security_shm_alloc(shp);
	if (error) {
		ipc_rcu_putref(shp);
		return error;
	}

473
	sprintf (name, "SYSV%08x", key);
Linus Torvalds's avatar
Linus Torvalds committed
474
	if (shmflg & SHM_HUGETLB) {
475 476 477
		/* hugetlb_file_setup applies strict accounting */
		if (shmflg & SHM_NORESERVE)
			acctflag = VM_NORESERVE;
478
		file = hugetlb_file_setup(name, size, acctflag,
479
					&shp->mlock_user, HUGETLB_SHMFS_INODE);
Linus Torvalds's avatar
Linus Torvalds committed
480
	} else {
481 482 483 484 485 486
		/*
		 * Do not allow no accounting for OVERCOMMIT_NEVER, even
	 	 * if it's asked for.
		 */
		if  ((shmflg & SHM_NORESERVE) &&
				sysctl_overcommit_memory != OVERCOMMIT_NEVER)
487
			acctflag = VM_NORESERVE;
488
		file = shmem_file_setup(name, size, acctflag);
Linus Torvalds's avatar
Linus Torvalds committed
489 490 491 492 493
	}
	error = PTR_ERR(file);
	if (IS_ERR(file))
		goto no_file;

494
	id = ipc_addid(&shm_ids(ns), &shp->shm_perm, ns->shm_ctlmni);
495 496
	if (id < 0) {
		error = id;
Linus Torvalds's avatar
Linus Torvalds committed
497
		goto no_id;
498
	}
Linus Torvalds's avatar
Linus Torvalds committed
499

500
	shp->shm_cprid = task_tgid_vnr(current);
Linus Torvalds's avatar
Linus Torvalds committed
501 502 503 504 505 506
	shp->shm_lprid = 0;
	shp->shm_atim = shp->shm_dtim = 0;
	shp->shm_ctim = get_seconds();
	shp->shm_segsz = size;
	shp->shm_nattch = 0;
	shp->shm_file = file;
507
	shp->shm_creator = current;
508 509 510 511
	/*
	 * shmid gets reported as "inode#" in /proc/pid/maps.
	 * proc-ps tools use this. Changing this will break them.
	 */
Nadia Derbey's avatar
Nadia Derbey committed
512
	file->f_dentry->d_inode->i_ino = shp->shm_perm.id;
513

514
	ns->shm_tot += numpages;
Nadia Derbey's avatar
Nadia Derbey committed
515
	error = shp->shm_perm.id;
Linus Torvalds's avatar
Linus Torvalds committed
516
	shm_unlock(shp);
Nadia Derbey's avatar
Nadia Derbey committed
517
	return error;
Linus Torvalds's avatar
Linus Torvalds committed
518 519

no_id:
520
	if (is_file_hugepages(file) && shp->mlock_user)
521
		user_shm_unlock(size, shp->mlock_user);
Linus Torvalds's avatar
Linus Torvalds committed
522 523 524 525 526 527 528
	fput(file);
no_file:
	security_shm_free(shp);
	ipc_rcu_putref(shp);
	return error;
}

Nadia Derbey's avatar
Nadia Derbey committed
529
/*
Nadia Derbey's avatar
Nadia Derbey committed
530
 * Called with shm_ids.rw_mutex and ipcp locked.
Nadia Derbey's avatar
Nadia Derbey committed
531
 */
Nadia Derbey's avatar
Nadia Derbey committed
532
static inline int shm_security(struct kern_ipc_perm *ipcp, int shmflg)
Nadia Derbey's avatar
Nadia Derbey committed
533
{
Nadia Derbey's avatar
Nadia Derbey committed
534 535 536 537
	struct shmid_kernel *shp;

	shp = container_of(ipcp, struct shmid_kernel, shm_perm);
	return security_shm_associate(shp, shmflg);
Nadia Derbey's avatar
Nadia Derbey committed
538 539
}

Nadia Derbey's avatar
Nadia Derbey committed
540
/*
Nadia Derbey's avatar
Nadia Derbey committed
541
 * Called with shm_ids.rw_mutex and ipcp locked.
Nadia Derbey's avatar
Nadia Derbey committed
542
 */
Nadia Derbey's avatar
Nadia Derbey committed
543 544
static inline int shm_more_checks(struct kern_ipc_perm *ipcp,
				struct ipc_params *params)
Nadia Derbey's avatar
Nadia Derbey committed
545
{
Nadia Derbey's avatar
Nadia Derbey committed
546 547 548 549
	struct shmid_kernel *shp;

	shp = container_of(ipcp, struct shmid_kernel, shm_perm);
	if (shp->shm_segsz < params->u.size)
Nadia Derbey's avatar
Nadia Derbey committed
550 551 552 553 554
		return -EINVAL;

	return 0;
}

555
SYSCALL_DEFINE3(shmget, key_t, key, size_t, size, int, shmflg)
Linus Torvalds's avatar
Linus Torvalds committed
556
{
557
	struct ipc_namespace *ns;
Nadia Derbey's avatar
Nadia Derbey committed
558 559
	struct ipc_ops shm_ops;
	struct ipc_params shm_params;
560 561

	ns = current->nsproxy->ipc_ns;
Linus Torvalds's avatar
Linus Torvalds committed
562

Nadia Derbey's avatar
Nadia Derbey committed
563 564 565
	shm_ops.getnew = newseg;
	shm_ops.associate = shm_security;
	shm_ops.more_checks = shm_more_checks;
Nadia Derbey's avatar
Nadia Derbey committed
566

Nadia Derbey's avatar
Nadia Derbey committed
567 568 569
	shm_params.key = key;
	shm_params.flg = shmflg;
	shm_params.u.size = size;
Linus Torvalds's avatar
Linus Torvalds committed
570

Nadia Derbey's avatar
Nadia Derbey committed
571
	return ipcget(ns, &shm_ids(ns), &shm_ops, &shm_params);
Linus Torvalds's avatar
Linus Torvalds committed
572 573 574 575 576 577 578 579 580 581 582
}

static inline unsigned long copy_shmid_to_user(void __user *buf, struct shmid64_ds *in, int version)
{
	switch(version) {
	case IPC_64:
		return copy_to_user(buf, in, sizeof(*in));
	case IPC_OLD:
	    {
		struct shmid_ds out;

583
		memset(&out, 0, sizeof(out));
Linus Torvalds's avatar
Linus Torvalds committed
584 585 586 587 588 589 590 591 592 593 594 595 596 597 598 599
		ipc64_perm_to_ipc_perm(&in->shm_perm, &out.shm_perm);
		out.shm_segsz	= in->shm_segsz;
		out.shm_atime	= in->shm_atime;
		out.shm_dtime	= in->shm_dtime;
		out.shm_ctime	= in->shm_ctime;
		out.shm_cpid	= in->shm_cpid;
		out.shm_lpid	= in->shm_lpid;
		out.shm_nattch	= in->shm_nattch;

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

600 601
static inline unsigned long
copy_shmid_from_user(struct shmid64_ds *out, void __user *buf, int version)
Linus Torvalds's avatar
Linus Torvalds committed
602 603 604
{
	switch(version) {
	case IPC_64:
605
		if (copy_from_user(out, buf, sizeof(*out)))
Linus Torvalds's avatar
Linus Torvalds committed
606 607 608 609 610 611 612 613 614
			return -EFAULT;
		return 0;
	case IPC_OLD:
	    {
		struct shmid_ds tbuf_old;

		if (copy_from_user(&tbuf_old, buf, sizeof(tbuf_old)))
			return -EFAULT;

615 616 617
		out->shm_perm.uid	= tbuf_old.shm_perm.uid;
		out->shm_perm.gid	= tbuf_old.shm_perm.gid;
		out->shm_perm.mode	= tbuf_old.shm_perm.mode;
Linus Torvalds's avatar
Linus Torvalds committed
618 619 620 621 622 623 624 625 626 627 628 629 630 631 632 633 634 635 636 637 638 639 640 641 642 643 644 645 646 647 648 649 650 651

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

static inline unsigned long copy_shminfo_to_user(void __user *buf, struct shminfo64 *in, int version)
{
	switch(version) {
	case IPC_64:
		return copy_to_user(buf, in, sizeof(*in));
	case IPC_OLD:
	    {
		struct shminfo out;

		if(in->shmmax > INT_MAX)
			out.shmmax = INT_MAX;
		else
			out.shmmax = (int)in->shmmax;

		out.shmmin	= in->shmmin;
		out.shmmni	= in->shmmni;
		out.shmseg	= in->shmseg;
		out.shmall	= in->shmall; 

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

652 653 654 655 656 657 658 659 660 661 662 663 664 665 666 667 668 669 670 671 672 673 674 675 676 677 678 679
/*
 * Calculate and add used RSS and swap pages of a shm.
 * Called with shm_ids.rw_mutex held as a reader
 */
static void shm_add_rss_swap(struct shmid_kernel *shp,
	unsigned long *rss_add, unsigned long *swp_add)
{
	struct inode *inode;

	inode = shp->shm_file->f_path.dentry->d_inode;

	if (is_file_hugepages(shp->shm_file)) {
		struct address_space *mapping = inode->i_mapping;
		struct hstate *h = hstate_file(shp->shm_file);
		*rss_add += pages_per_huge_page(h) * mapping->nrpages;
	} else {
#ifdef CONFIG_SHMEM
		struct shmem_inode_info *info = SHMEM_I(inode);
		spin_lock(&info->lock);
		*rss_add += inode->i_mapping->nrpages;
		*swp_add += info->swapped;
		spin_unlock(&info->lock);
#else
		*rss_add += inode->i_mapping->nrpages;
#endif
	}
}

Nadia Derbey's avatar
Nadia Derbey committed
680
/*
Nadia Derbey's avatar
Nadia Derbey committed
681
 * Called with shm_ids.rw_mutex held as a reader
Nadia Derbey's avatar
Nadia Derbey committed
682
 */
683 684
static void shm_get_stat(struct ipc_namespace *ns, unsigned long *rss,
		unsigned long *swp)
Linus Torvalds's avatar
Linus Torvalds committed
685
{
Nadia Derbey's avatar
Nadia Derbey committed
686 687
	int next_id;
	int total, in_use;
Linus Torvalds's avatar
Linus Torvalds committed
688 689 690 691

	*rss = 0;
	*swp = 0;

Nadia Derbey's avatar
Nadia Derbey committed
692 693 694
	in_use = shm_ids(ns).in_use;

	for (total = 0, next_id = 0; total < in_use; next_id++) {
695
		struct kern_ipc_perm *ipc;
Linus Torvalds's avatar
Linus Torvalds committed
696 697
		struct shmid_kernel *shp;

698 699
		ipc = idr_find(&shm_ids(ns).ipcs_idr, next_id);
		if (ipc == NULL)
Linus Torvalds's avatar
Linus Torvalds committed
700
			continue;
701
		shp = container_of(ipc, struct shmid_kernel, shm_perm);
Linus Torvalds's avatar
Linus Torvalds committed
702

703
		shm_add_rss_swap(shp, rss, swp);
Nadia Derbey's avatar
Nadia Derbey committed
704 705

		total++;
Linus Torvalds's avatar
Linus Torvalds committed
706 707 708
	}
}

709 710 711 712 713 714 715
/*
 * This function handles some shmctl commands which require the rw_mutex
 * to be held in write mode.
 * NOTE: no locks must be held, the rw_mutex is taken inside this function.
 */
static int shmctl_down(struct ipc_namespace *ns, int shmid, int cmd,
		       struct shmid_ds __user *buf, int version)
Linus Torvalds's avatar
Linus Torvalds committed
716
{
717
	struct kern_ipc_perm *ipcp;
718
	struct shmid64_ds shmid64;
719 720 721 722
	struct shmid_kernel *shp;
	int err;

	if (cmd == IPC_SET) {
723
		if (copy_shmid_from_user(&shmid64, buf, version))
724 725 726
			return -EFAULT;
	}

727 728
	ipcp = ipcctl_pre_down(ns, &shm_ids(ns), shmid, cmd,
			       &shmid64.shm_perm, 0);
729 730
	if (IS_ERR(ipcp))
		return PTR_ERR(ipcp);
731

732
	shp = container_of(ipcp, struct shmid_kernel, shm_perm);
733 734 735 736 737 738 739 740 741

	err = security_shm_shmctl(shp, cmd);
	if (err)
		goto out_unlock;
	switch (cmd) {
	case IPC_RMID:
		do_shm_rmid(ns, ipcp);
		goto out_up;
	case IPC_SET:
742
		ipc_update_perm(&shmid64.shm_perm, ipcp);
743 744 745 746 747 748 749 750 751 752 753 754
		shp->shm_ctim = get_seconds();
		break;
	default:
		err = -EINVAL;
	}
out_unlock:
	shm_unlock(shp);
out_up:
	up_write(&shm_ids(ns).rw_mutex);
	return err;
}

755
SYSCALL_DEFINE3(shmctl, int, shmid, int, cmd, struct shmid_ds __user *, buf)
756
{
Linus Torvalds's avatar
Linus Torvalds committed
757 758
	struct shmid_kernel *shp;
	int err, version;
759
	struct ipc_namespace *ns;
Linus Torvalds's avatar
Linus Torvalds committed
760 761 762 763 764 765 766

	if (cmd < 0 || shmid < 0) {
		err = -EINVAL;
		goto out;
	}

	version = ipc_parse_version(&cmd);
767
	ns = current->nsproxy->ipc_ns;
Linus Torvalds's avatar
Linus Torvalds committed
768 769 770 771 772 773 774 775 776 777

	switch (cmd) { /* replace with proc interface ? */
	case IPC_INFO:
	{
		struct shminfo64 shminfo;

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

WANG Cong's avatar
WANG Cong committed
778
		memset(&shminfo, 0, sizeof(shminfo));
779 780 781
		shminfo.shmmni = shminfo.shmseg = ns->shm_ctlmni;
		shminfo.shmmax = ns->shm_ctlmax;
		shminfo.shmall = ns->shm_ctlall;
Linus Torvalds's avatar
Linus Torvalds committed
782 783 784 785

		shminfo.shmmin = SHMMIN;
		if(copy_shminfo_to_user (buf, &shminfo, version))
			return -EFAULT;
Nadia Derbey's avatar
Nadia Derbey committed
786

Nadia Derbey's avatar
Nadia Derbey committed
787
		down_read(&shm_ids(ns).rw_mutex);
Nadia Derbey's avatar
Nadia Derbey committed
788
		err = ipc_get_maxid(&shm_ids(ns));
Nadia Derbey's avatar
Nadia Derbey committed
789
		up_read(&shm_ids(ns).rw_mutex);
Nadia Derbey's avatar
Nadia Derbey committed
790

Linus Torvalds's avatar
Linus Torvalds committed
791 792 793 794 795 796 797 798 799 800 801 802
		if(err<0)
			err = 0;
		goto out;
	}
	case SHM_INFO:
	{
		struct shm_info shm_info;

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

WANG Cong's avatar
WANG Cong committed
803
		memset(&shm_info, 0, sizeof(shm_info));
Nadia Derbey's avatar
Nadia Derbey committed
804
		down_read(&shm_ids(ns).rw_mutex);
805 806 807
		shm_info.used_ids = shm_ids(ns).in_use;
		shm_get_stat (ns, &shm_info.shm_rss, &shm_info.shm_swp);
		shm_info.shm_tot = ns->shm_tot;
Linus Torvalds's avatar
Linus Torvalds committed
808 809
		shm_info.swap_attempts = 0;
		shm_info.swap_successes = 0;
Nadia Derbey's avatar
Nadia Derbey committed
810
		err = ipc_get_maxid(&shm_ids(ns));
Nadia Derbey's avatar
Nadia Derbey committed
811
		up_read(&shm_ids(ns).rw_mutex);
WANG Cong's avatar
WANG Cong committed
812
		if (copy_to_user(buf, &shm_info, sizeof(shm_info))) {
Linus Torvalds's avatar
Linus Torvalds committed
813 814 815 816 817 818 819 820 821 822 823 824
			err = -EFAULT;
			goto out;
		}

		err = err < 0 ? 0 : err;
		goto out;
	}
	case SHM_STAT:
	case IPC_STAT:
	{
		struct shmid64_ds tbuf;
		int result;
825 826 827 828 829 830 831

		if (cmd == SHM_STAT) {
			shp = shm_lock(ns, shmid);
			if (IS_ERR(shp)) {
				err = PTR_ERR(shp);
				goto out;
			}
Nadia Derbey's avatar
Nadia Derbey committed
832
			result = shp->shm_perm.id;
Linus Torvalds's avatar
Linus Torvalds committed
833
		} else {
834 835 836 837 838
			shp = shm_lock_check(ns, shmid);
			if (IS_ERR(shp)) {
				err = PTR_ERR(shp);
				goto out;
			}
Linus Torvalds's avatar
Linus Torvalds committed
839 840
			result = 0;
		}
WANG Cong's avatar
WANG Cong committed
841
		err = -EACCES;
842
		if (ipcperms(ns, &shp->shm_perm, S_IRUGO))
Linus Torvalds's avatar
Linus Torvalds committed
843 844 845 846
			goto out_unlock;
		err = security_shm_shmctl(shp, cmd);
		if (err)
			goto out_unlock;
847
		memset(&tbuf, 0, sizeof(tbuf));
Linus Torvalds's avatar
Linus Torvalds committed
848 849 850 851 852 853 854
		kernel_to_ipc64_perm(&shp->shm_perm, &tbuf.shm_perm);
		tbuf.shm_segsz	= shp->shm_segsz;
		tbuf.shm_atime	= shp->shm_atim;
		tbuf.shm_dtime	= shp->shm_dtim;
		tbuf.shm_ctime	= shp->shm_ctim;
		tbuf.shm_cpid	= shp->shm_cprid;
		tbuf.shm_lpid	= shp->shm_lprid;
855
		tbuf.shm_nattch	= shp->shm_nattch;
Linus Torvalds's avatar
Linus Torvalds committed
856 857 858 859 860 861 862 863 864 865
		shm_unlock(shp);
		if(copy_shmid_to_user (buf, &tbuf, version))
			err = -EFAULT;
		else
			err = result;
		goto out;
	}
	case SHM_LOCK:
	case SHM_UNLOCK:
	{
866 867 868 869
		struct file *uninitialized_var(shm_file);

		lru_add_drain_all();  /* drain pagevecs to lru lists */

870 871 872
		shp = shm_lock_check(ns, shmid);
		if (IS_ERR(shp)) {
			err = PTR_ERR(shp);
Linus Torvalds's avatar
Linus Torvalds committed
873 874 875
			goto out;
		}

Al Viro's avatar
Al Viro committed
876
		audit_ipc_obj(&(shp->shm_perm));
Steve Grubb's avatar
Steve Grubb committed
877

878
		if (!ns_capable(ns->user_ns, CAP_IPC_LOCK)) {
879
			uid_t euid = current_euid();
Linus Torvalds's avatar
Linus Torvalds committed
880
			err = -EPERM;
881 882
			if (euid != shp->shm_perm.uid &&
			    euid != shp->shm_perm.cuid)
Linus Torvalds's avatar
Linus Torvalds committed
883
				goto out_unlock;
Jiri Slaby's avatar
Jiri Slaby committed
884
			if (cmd == SHM_LOCK && !rlimit(RLIMIT_MEMLOCK))
Linus Torvalds's avatar
Linus Torvalds committed
885 886 887 888 889 890 891 892
				goto out_unlock;
		}

		err = security_shm_shmctl(shp, cmd);
		if (err)
			goto out_unlock;
		
		if(cmd==SHM_LOCK) {
893
			struct user_struct *user = current_user();
Linus Torvalds's avatar
Linus Torvalds committed
894 895
			if (!is_file_hugepages(shp->shm_file)) {
				err = shmem_lock(shp->shm_file, 1, user);
896
				if (!err && !(shp->shm_perm.mode & SHM_LOCKED)){
897
					shp->shm_perm.mode |= SHM_LOCKED;
Linus Torvalds's avatar
Linus Torvalds committed
898 899 900 901 902
					shp->mlock_user = user;
				}
			}
		} else if (!is_file_hugepages(shp->shm_file)) {
			shmem_lock(shp->shm_file, 0, shp->mlock_user);
903
			shp->shm_perm.mode &= ~SHM_LOCKED;
Linus Torvalds's avatar
Linus Torvalds committed
904 905 906 907 908 909 910
			shp->mlock_user = NULL;
		}
		shm_unlock(shp);
		goto out;
	}
	case IPC_RMID:
	case IPC_SET:
911 912
		err = shmctl_down(ns, shmid, cmd, buf, version);
		return err;
Linus Torvalds's avatar
Linus Torvalds committed
913
	default:
914
		return -EINVAL;
Linus Torvalds's avatar
Linus Torvalds committed
915 916 917 918 919 920 921 922 923 924 925 926 927 928 929 930 931 932 933 934 935 936 937 938 939
	}

out_unlock:
	shm_unlock(shp);
out:
	return err;
}

/*
 * Fix shmaddr, allocate descriptor, map shm, add attach descriptor to lists.
 *
 * NOTE! Despite the name, this is NOT a direct system call entrypoint. The
 * "raddr" thing points to kernel space, and there has to be a wrapper around
 * this.
 */
long do_shmat(int shmid, char __user *shmaddr, int shmflg, ulong *raddr)
{
	struct shmid_kernel *shp;
	unsigned long addr;
	unsigned long size;
	struct file * file;
	int    err;
	unsigned long flags;
	unsigned long prot;
	int acc_mode;
940
	unsigned long user_addr;
941
	struct ipc_namespace *ns;
942 943
	struct shm_file_data *sfd;
	struct path path;
944
	fmode_t f_mode;
Linus Torvalds's avatar
Linus Torvalds committed
945

946 947
	err = -EINVAL;
	if (shmid < 0)
Linus Torvalds's avatar
Linus Torvalds committed
948
		goto out;
949
	else if ((addr = (ulong)shmaddr)) {
Linus Torvalds's avatar
Linus Torvalds committed
950 951 952 953 954 955 956
		if (addr & (SHMLBA-1)) {
			if (shmflg & SHM_RND)
				addr &= ~(SHMLBA-1);	   /* round down */
			else
#ifndef __ARCH_FORCE_SHMLBA
				if (addr & ~PAGE_MASK)
#endif
957
					goto out;
Linus Torvalds's avatar
Linus Torvalds committed
958 959 960 961
		}
		flags = MAP_SHARED | MAP_FIXED;
	} else {
		if ((shmflg & SHM_REMAP))
962
			goto out;
Linus Torvalds's avatar
Linus Torvalds committed
963 964 965 966 967 968 969

		flags = MAP_SHARED;
	}

	if (shmflg & SHM_RDONLY) {
		prot = PROT_READ;
		acc_mode = S_IRUGO;
970
		f_mode = FMODE_READ;
Linus Torvalds's avatar
Linus Torvalds committed
971 972 973
	} else {
		prot = PROT_READ | PROT_WRITE;
		acc_mode = S_IRUGO | S_IWUGO;
974
		f_mode = FMODE_READ | FMODE_WRITE;
Linus Torvalds's avatar
Linus Torvalds committed
975 976 977 978 979 980 981 982 983 984
	}
	if (shmflg & SHM_EXEC) {
		prot |= PROT_EXEC;
		acc_mode |= S_IXUGO;
	}

	/*
	 * We cannot rely on the fs check since SYSV IPC does have an
	 * additional creator id...
	 */
985
	ns = current->nsproxy->ipc_ns;
986 987 988
	shp = shm_lock_check(ns, shmid);
	if (IS_ERR(shp)) {
		err = PTR_ERR(shp);
Linus Torvalds's avatar
Linus Torvalds committed
989
		goto out;
990
	}
991 992

	err = -EACCES;
993
	if (ipcperms(ns, &shp->shm_perm, acc_mode))
994
		goto out_unlock;
Linus Torvalds's avatar
Linus Torvalds committed
995 996

	err = security_shm_shmat(shp, shmaddr, shmflg);
997 998 999
	if (err)
		goto out_unlock;

1000 1001
	path = shp->shm_file->f_path;
	path_get(&path);
Linus Torvalds's avatar
Linus Torvalds committed
1002
	shp->shm_nattch++;
1003
	size = i_size_read(path.dentry->d_inode);
Linus Torvalds's avatar
Linus Torvalds committed
1004 1005
	shm_unlock(shp);

1006 1007 1008
	err = -ENOMEM;
	sfd = kzalloc(sizeof(*sfd), GFP_KERNEL);
	if (!sfd)
1009
		goto out_put_dentry;
1010

1011 1012
	file = alloc_file(&path, f_mode,
			  is_file_hugepages(shp->shm_file) ?
1013 1014
				&shm_file_operations_huge :
				&shm_file_operations);
1015 1016 1017 1018 1019
	if (!file)
		goto out_free;

	file->private_data = sfd;
	file->f_mapping = shp->shm_file->f_mapping;
Nadia Derbey's avatar
Nadia Derbey committed
1020
	sfd->id = shp->shm_perm.id;
1021 1022 1023 1024
	sfd->ns = get_ipc_ns(ns);
	sfd->file = shp->shm_file;
	sfd->vm_ops = NULL;

Linus Torvalds's avatar
Linus Torvalds committed
1025 1026
	down_write(&current->mm->mmap_sem);
	if (addr && !(shmflg & SHM_REMAP)) {
1027
		err = -EINVAL;
Linus Torvalds's avatar
Linus Torvalds committed
1028 1029 1030 1031 1032 1033 1034 1035 1036 1037 1038
		if (find_vma_intersection(current->mm, addr, addr + size))
			goto invalid;
		/*
		 * If shm segment goes below stack, make sure there is some
		 * space left for the stack to grow (at least 4 pages).
		 */
		if (addr < current->mm->start_stack &&
		    addr > current->mm->start_stack - size - PAGE_SIZE * 5)
			goto invalid;
	}
		
1039 1040 1041 1042 1043
	user_addr = do_mmap (file, addr, size, prot, flags, 0);
	*raddr = user_addr;
	err = 0;
	if (IS_ERR_VALUE(user_addr))
		err = (long)user_addr;
Linus Torvalds's avatar
Linus Torvalds committed
1044 1045 1046
invalid:
	up_write(&current->mm->mmap_sem);

1047 1048 1049
	fput(file);

out_nattch:
Nadia Derbey's avatar
Nadia Derbey committed
1050
	down_write(&shm_ids(ns).rw_mutex);
1051
	shp = shm_lock(ns, shmid);
1052
	BUG_ON(IS_ERR(shp));
Linus Torvalds's avatar
Linus Torvalds committed
1053
	shp->shm_nattch--;
1054
	if (shm_may_destroy(ns, shp))
1055
		shm_destroy(ns, shp);
Linus Torvalds's avatar
Linus Torvalds committed
1056 1057
	else
		shm_unlock(shp);
Nadia Derbey's avatar
Nadia Derbey committed
1058
	up_write(&shm_ids(ns).rw_mutex);
Linus Torvalds's avatar
Linus Torvalds committed
1059 1060 1061

out:
	return err;
1062 1063 1064 1065 1066 1067 1068

out_unlock:
	shm_unlock(shp);
	goto out;

out_free:
	kfree(sfd);
1069
out_put_dentry:
1070
	path_put(&path);
1071
	goto out_nattch;
Linus Torvalds's avatar
Linus Torvalds committed
1072 1073
}

1074
SYSCALL_DEFINE3(shmat, int, shmid, char __user *, shmaddr, int, shmflg)
1075 1076 1077 1078 1079 1080 1081 1082 1083 1084 1085
{
	unsigned long ret;
	long err;

	err = do_shmat(shmid, shmaddr, shmflg, &ret);
	if (err)
		return err;
	force_successful_syscall_return();
	return (long)ret;
}

Linus Torvalds's avatar
Linus Torvalds committed
1086 1087 1088 1089
/*
 * detach and kill segment if marked destroyed.
 * The work is done in shm_close.
 */
1090
SYSCALL_DEFINE1(shmdt, char __user *, shmaddr)
Linus Torvalds's avatar
Linus Torvalds committed
1091 1092
{
	struct mm_struct *mm = current->mm;
1093
	struct vm_area_struct *vma;
Linus Torvalds's avatar
Linus Torvalds committed
1094 1095
	unsigned long addr = (unsigned long)shmaddr;
	int retval = -EINVAL;
1096 1097 1098 1099
#ifdef CONFIG_MMU
	loff_t size = 0;
	struct vm_area_struct *next;
#endif
Linus Torvalds's avatar
Linus Torvalds committed
1100

1101 1102 1103
	if (addr & ~PAGE_MASK)
		return retval;

Linus Torvalds's avatar
Linus Torvalds committed
1104 1105 1106 1107 1108 1109 1110 1111 1112 1113 1114 1115 1116 1117 1118 1119 1120 1121 1122 1123 1124 1125 1126 1127
	down_write(&mm->mmap_sem);

	/*
	 * This function tries to be smart and unmap shm segments that
	 * were modified by partial mlock or munmap calls:
	 * - It first determines the size of the shm segment that should be
	 *   unmapped: It searches for a vma that is backed by shm and that
	 *   started at address shmaddr. It records it's size and then unmaps
	 *   it.
	 * - Then it unmaps all shm vmas that started at shmaddr and that
	 *   are within the initially determined size.
	 * Errors from do_munmap are ignored: the function only fails if
	 * it's called with invalid parameters or if it's called to unmap
	 * a part of a vma. Both calls in this function are for full vmas,
	 * the parameters are directly copied from the vma itself and always
	 * valid - therefore do_munmap cannot fail. (famous last words?)
	 */
	/*
	 * If it had been mremap()'d, the starting address would not
	 * match the usual checks anyway. So assume all vma's are
	 * above the starting address given.
	 */
	vma = find_vma(mm, addr);

1128
#ifdef CONFIG_MMU
Linus Torvalds's avatar
Linus Torvalds committed
1129 1130 1131 1132 1133 1134 1135 1136
	while (vma) {
		next = vma->vm_next;

		/*
		 * Check if the starting address would match, i.e. it's
		 * a fragment created by mprotect() and/or munmap(), or it
		 * otherwise it starts at this address with no hassles.
		 */
1137
		if ((vma->vm_ops == &shm_vm_ops) &&
Linus Torvalds's avatar
Linus Torvalds committed
1138 1139 1140
			(vma->vm_start - addr)/PAGE_SIZE == vma->vm_pgoff) {


1141
			size = vma->vm_file->f_path.dentry->d_inode->i_size;
Linus Torvalds's avatar
Linus Torvalds committed
1142 1143 1144 1145 1146 1147 1148 1149 1150 1151 1152 1153 1154 1155 1156 1157 1158
			do_munmap(mm, vma->vm_start, vma->vm_end - vma->vm_start);
			/*
			 * We discovered the size of the shm segment, so
			 * break out of here and fall through to the next
			 * loop that uses the size information to stop
			 * searching for matching vma's.
			 */
			retval = 0;
			vma = next;
			break;
		}
		vma = next;
	}

	/*
	 * We need look no further than the maximum address a fragment
	 * could possibly have landed at. Also cast things to loff_t to
Lucas De Marchi's avatar
Lucas De Marchi committed
1159
	 * prevent overflows and make comparisons vs. equal-width types.
Linus Torvalds's avatar
Linus Torvalds committed
1160
	 */
1161
	size = PAGE_ALIGN(size);
Linus Torvalds's avatar
Linus Torvalds committed
1162 1163 1164 1165
	while (vma && (loff_t)(vma->vm_end - addr) <= size) {
		next = vma->vm_next;

		/* finding a matching vma now does not alter retval */
1166
		if ((vma->vm_ops == &shm_vm_ops) &&
Linus Torvalds's avatar
Linus Torvalds committed
1167 1168 1169 1170 1171 1172
			(vma->vm_start - addr)/PAGE_SIZE == vma->vm_pgoff)

			do_munmap(mm, vma->vm_start, vma->vm_end - vma->vm_start);
		vma = next;
	}

1173 1174 1175 1176 1177 1178 1179 1180 1181 1182 1183
#else /* CONFIG_MMU */
	/* under NOMMU conditions, the exact address to be destroyed must be
	 * given */
	retval = -EINVAL;
	if (vma->vm_start == addr && vma->vm_ops == &shm_vm_ops) {
		do_munmap(mm, vma->vm_start, vma->vm_end - vma->vm_start);
		retval = 0;
	}

#endif

Linus Torvalds's avatar
Linus Torvalds committed
1184 1185 1186 1187 1188
	up_write(&mm->mmap_sem);
	return retval;
}

#ifdef CONFIG_PROC_FS
1189
static int sysvipc_shm_proc_show(struct seq_file *s, void *it)
Linus Torvalds's avatar
Linus Torvalds committed
1190
{
1191
	struct shmid_kernel *shp = it;
1192 1193 1194
	unsigned long rss = 0, swp = 0;

	shm_add_rss_swap(shp, &rss, &swp);
Linus Torvalds's avatar
Linus Torvalds committed
1195

1196 1197 1198 1199 1200
#if BITS_PER_LONG <= 32
#define SIZE_SPEC "%10lu"
#else
#define SIZE_SPEC "%21lu"
#endif
Linus Torvalds's avatar
Linus Torvalds committed
1201

1202 1203
	return seq_printf(s,
			  "%10d %10d  %4o " SIZE_SPEC " %5u %5u  "
1204 1205
			  "%5lu %5u %5u %5u %5u %10lu %10lu %10lu "
			  SIZE_SPEC " " SIZE_SPEC "\n",
1206
			  shp->shm_perm.key,
Nadia Derbey's avatar
Nadia Derbey committed
1207
			  shp->shm_perm.id,
1208
			  shp->shm_perm.mode,
1209 1210 1211
			  shp->shm_segsz,
			  shp->shm_cprid,
			  shp->shm_lprid,
1212
			  shp->shm_nattch,
1213 1214 1215 1216 1217 1218
			  shp->shm_perm.uid,
			  shp->shm_perm.gid,
			  shp->shm_perm.cuid,
			  shp->shm_perm.cgid,
			  shp->shm_atim,
			  shp->shm_dtim,
1219 1220 1221
			  shp->shm_ctim,
			  rss * PAGE_SIZE,
			  swp * PAGE_SIZE);
Linus Torvalds's avatar
Linus Torvalds committed
1222 1223
}
#endif