shm.c 27 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>
Kirill Korotaev's avatar
Kirill Korotaev committed
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>
Kirill Korotaev's avatar
Kirill Korotaev committed
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;
Linus Torvalds's avatar
Linus Torvalds committed
57 58
static struct vm_operations_struct shm_vm_ops;

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

Kirill Korotaev's avatar
Kirill Korotaev committed
61 62
#define shm_unlock(shp)			\
	ipc_unlock(&(shp)->shm_perm)
Nadia Derbey's avatar
Nadia Derbey committed
63
#define shm_buildid(id, seq)	ipc_buildid(id, seq)
Linus Torvalds's avatar
Linus Torvalds committed
64

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

73
void shm_init_ns(struct ipc_namespace *ns)
Kirill Korotaev's avatar
Kirill Korotaev committed
74 75 76 77 78
{
	ns->shm_ctlmax = SHMMAX;
	ns->shm_ctlall = SHMALL;
	ns->shm_ctlmni = SHMMNI;
	ns->shm_tot = 0;
79
	ipc_init_ids(&ns->ids[IPC_SHM_IDS]);
Kirill Korotaev's avatar
Kirill Korotaev committed
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)
Kirill Korotaev's avatar
Kirill Korotaev committed
87
{
88 89 90
	struct shmid_kernel *shp;
	shp = container_of(ipcp, struct shmid_kernel, shm_perm);

Kirill Korotaev's avatar
Kirill Korotaev committed
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
Kirill Korotaev's avatar
Kirill Korotaev committed
101 102
void shm_exit_ns(struct ipc_namespace *ns)
{
103
	free_ipcs(ns, &shm_ids(ns), do_shm_rmid);
Kirill Korotaev's avatar
Kirill Korotaev committed
104
}
105
#endif
Linus Torvalds's avatar
Linus Torvalds committed
106 107 108

void __init shm_init (void)
{
109
	shm_init_ns(&init_ipc_ns);
110 111
	ipc_init_proc_interface("sysvipc/shm",
				"       key      shmid perms       size  cpid  lpid nattch   uid   gid  cuid  cgid      atime      dtime      ctime\n",
Kirill Korotaev's avatar
Kirill Korotaev committed
112
				IPC_SHM_IDS, sysvipc_shm_proc_show);
Linus Torvalds's avatar
Linus Torvalds committed
113 114
}

Nadia Derbey's avatar
Nadia Derbey committed
115 116 117 118 119 120 121 122 123
/*
 * shm_lock_(check_)down routines are called in the paths where the rw_mutex
 * is held to protect access to the idr tree.
 */
static inline struct shmid_kernel *shm_lock_down(struct ipc_namespace *ns,
						int id)
{
	struct kern_ipc_perm *ipcp = ipc_lock_down(&shm_ids(ns), id);

124 125 126
	if (IS_ERR(ipcp))
		return (struct shmid_kernel *)ipcp;

Nadia Derbey's avatar
Nadia Derbey committed
127 128 129 130 131 132 133 134 135
	return container_of(ipcp, struct shmid_kernel, shm_perm);
}

static inline struct shmid_kernel *shm_lock_check_down(
						struct ipc_namespace *ns,
						int id)
{
	struct kern_ipc_perm *ipcp = ipc_lock_check_down(&shm_ids(ns), id);

136 137 138
	if (IS_ERR(ipcp))
		return (struct shmid_kernel *)ipcp;

Nadia Derbey's avatar
Nadia Derbey committed
139 140 141 142 143 144 145
	return container_of(ipcp, struct shmid_kernel, shm_perm);
}

/*
 * shm_lock_(check_) routines are called in the paths where the rw_mutex
 * is not held.
 */
146
static inline struct shmid_kernel *shm_lock(struct ipc_namespace *ns, int id)
Linus Torvalds's avatar
Linus Torvalds committed
147
{
Nadia Derbey's avatar
Nadia Derbey committed
148 149
	struct kern_ipc_perm *ipcp = ipc_lock(&shm_ids(ns), id);

150 151 152
	if (IS_ERR(ipcp))
		return (struct shmid_kernel *)ipcp;

Nadia Derbey's avatar
Nadia Derbey committed
153
	return container_of(ipcp, struct shmid_kernel, shm_perm);
154 155 156 157 158
}

static inline struct shmid_kernel *shm_lock_check(struct ipc_namespace *ns,
						int id)
{
Nadia Derbey's avatar
Nadia Derbey committed
159 160
	struct kern_ipc_perm *ipcp = ipc_lock_check(&shm_ids(ns), id);

161 162 163
	if (IS_ERR(ipcp))
		return (struct shmid_kernel *)ipcp;

Nadia Derbey's avatar
Nadia Derbey committed
164
	return container_of(ipcp, struct shmid_kernel, shm_perm);
Linus Torvalds's avatar
Linus Torvalds committed
165 166
}

Nadia Derbey's avatar
Nadia Derbey committed
167
static inline void shm_rmid(struct ipc_namespace *ns, struct shmid_kernel *s)
Linus Torvalds's avatar
Linus Torvalds committed
168
{
Nadia Derbey's avatar
Nadia Derbey committed
169
	ipc_rmid(&shm_ids(ns), &s->shm_perm);
Linus Torvalds's avatar
Linus Torvalds committed
170 171
}

Kirill Korotaev's avatar
Kirill Korotaev committed
172
static inline int shm_addid(struct ipc_namespace *ns, struct shmid_kernel *shp)
Linus Torvalds's avatar
Linus Torvalds committed
173
{
Kirill Korotaev's avatar
Kirill Korotaev committed
174
	return ipc_addid(&shm_ids(ns), &shp->shm_perm, ns->shm_ctlmni);
Linus Torvalds's avatar
Linus Torvalds committed
175 176 177 178
}



179 180
/* This is called by fork, once for every shm attach. */
static void shm_open(struct vm_area_struct *vma)
Kirill Korotaev's avatar
Kirill Korotaev committed
181
{
182 183
	struct file *file = vma->vm_file;
	struct shm_file_data *sfd = shm_file_data(file);
Linus Torvalds's avatar
Linus Torvalds committed
184 185
	struct shmid_kernel *shp;

186
	shp = shm_lock(sfd->ns, sfd->id);
187
	BUG_ON(IS_ERR(shp));
Linus Torvalds's avatar
Linus Torvalds committed
188
	shp->shm_atim = get_seconds();
189
	shp->shm_lprid = task_tgid_vnr(current);
Linus Torvalds's avatar
Linus Torvalds committed
190 191 192 193 194 195 196
	shp->shm_nattch++;
	shm_unlock(shp);
}

/*
 * shm_destroy - free the struct shmid_kernel
 *
Nadia Derbey's avatar
Nadia Derbey committed
197
 * @ns: namespace
Linus Torvalds's avatar
Linus Torvalds committed
198 199
 * @shp: struct to free
 *
Nadia Derbey's avatar
Nadia Derbey committed
200
 * It has to be called with shp and shm_ids.rw_mutex (writer) locked,
Linus Torvalds's avatar
Linus Torvalds committed
201 202
 * but returns with shp unlocked and freed.
 */
Kirill Korotaev's avatar
Kirill Korotaev committed
203
static void shm_destroy(struct ipc_namespace *ns, struct shmid_kernel *shp)
Linus Torvalds's avatar
Linus Torvalds committed
204
{
Kirill Korotaev's avatar
Kirill Korotaev committed
205
	ns->shm_tot -= (shp->shm_segsz + PAGE_SIZE - 1) >> PAGE_SHIFT;
Nadia Derbey's avatar
Nadia Derbey committed
206
	shm_rmid(ns, shp);
Linus Torvalds's avatar
Linus Torvalds committed
207 208 209 210
	shm_unlock(shp);
	if (!is_file_hugepages(shp->shm_file))
		shmem_lock(shp->shm_file, 0, shp->mlock_user);
	else
Josef Sipek's avatar
Josef Sipek committed
211
		user_shm_unlock(shp->shm_file->f_path.dentry->d_inode->i_size,
Linus Torvalds's avatar
Linus Torvalds committed
212 213 214 215 216 217 218
						shp->mlock_user);
	fput (shp->shm_file);
	security_shm_free(shp);
	ipc_rcu_putref(shp);
}

/*
219
 * remove the attach descriptor vma.
Linus Torvalds's avatar
Linus Torvalds committed
220 221 222 223
 * 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.
 */
224
static void shm_close(struct vm_area_struct *vma)
Linus Torvalds's avatar
Linus Torvalds committed
225
{
226 227
	struct file * file = vma->vm_file;
	struct shm_file_data *sfd = shm_file_data(file);
Linus Torvalds's avatar
Linus Torvalds committed
228
	struct shmid_kernel *shp;
229
	struct ipc_namespace *ns = sfd->ns;
Kirill Korotaev's avatar
Kirill Korotaev committed
230

Nadia Derbey's avatar
Nadia Derbey committed
231
	down_write(&shm_ids(ns).rw_mutex);
Linus Torvalds's avatar
Linus Torvalds committed
232
	/* remove from the list of attaches of the shm segment */
Nadia Derbey's avatar
Nadia Derbey committed
233
	shp = shm_lock_down(ns, sfd->id);
234
	BUG_ON(IS_ERR(shp));
235
	shp->shm_lprid = task_tgid_vnr(current);
Linus Torvalds's avatar
Linus Torvalds committed
236 237 238
	shp->shm_dtim = get_seconds();
	shp->shm_nattch--;
	if(shp->shm_nattch == 0 &&
Andrew Morton's avatar
Andrew Morton committed
239
	   shp->shm_perm.mode & SHM_DEST)
Kirill Korotaev's avatar
Kirill Korotaev committed
240
		shm_destroy(ns, shp);
Linus Torvalds's avatar
Linus Torvalds committed
241 242
	else
		shm_unlock(shp);
Nadia Derbey's avatar
Nadia Derbey committed
243
	up_write(&shm_ids(ns).rw_mutex);
Linus Torvalds's avatar
Linus Torvalds committed
244 245
}

Nick Piggin's avatar
Nick Piggin committed
246
static int shm_fault(struct vm_area_struct *vma, struct vm_fault *vmf)
247 248 249 250
{
	struct file *file = vma->vm_file;
	struct shm_file_data *sfd = shm_file_data(file);

Nick Piggin's avatar
Nick Piggin committed
251
	return sfd->vm_ops->fault(vma, vmf);
252 253 254
}

#ifdef CONFIG_NUMA
255
static int shm_set_policy(struct vm_area_struct *vma, struct mempolicy *new)
256 257 258 259 260 261 262 263 264
{
	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;
}

265 266
static struct mempolicy *shm_get_policy(struct vm_area_struct *vma,
					unsigned long addr)
267 268 269 270 271 272 273
{
	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);
274
	else if (vma->vm_policy)
275
		pol = vma->vm_policy;
276

277 278 279 280
	return pol;
}
#endif

Linus Torvalds's avatar
Linus Torvalds committed
281 282
static int shm_mmap(struct file * file, struct vm_area_struct * vma)
{
283
	struct shm_file_data *sfd = shm_file_data(file);
284 285
	int ret;

286 287 288 289
	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
290
#ifdef CONFIG_MMU
291
	BUG_ON(!sfd->vm_ops->fault);
David Howells's avatar
David Howells committed
292
#endif
293 294
	vma->vm_ops = &shm_vm_ops;
	shm_open(vma);
295 296

	return ret;
Linus Torvalds's avatar
Linus Torvalds committed
297 298
}

Kirill Korotaev's avatar
Kirill Korotaev committed
299 300
static int shm_release(struct inode *ino, struct file *file)
{
301
	struct shm_file_data *sfd = shm_file_data(file);
Kirill Korotaev's avatar
Kirill Korotaev committed
302

303 304 305
	put_ipc_ns(sfd->ns);
	shm_file_data(file) = NULL;
	kfree(sfd);
Kirill Korotaev's avatar
Kirill Korotaev committed
306 307 308
	return 0;
}

309 310 311 312 313 314 315 316 317 318 319 320
static int shm_fsync(struct file *file, struct dentry *dentry, int datasync)
{
	int (*fsync) (struct file *, struct dentry *, int datasync);
	struct shm_file_data *sfd = shm_file_data(file);
	int ret = -EINVAL;

	fsync = sfd->file->f_op->fsync;
	if (fsync)
		ret = fsync(sfd->file, sfd->file->f_path.dentry, datasync);
	return ret;
}

321 322 323 324 325
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);
326 327 328 329 330 331 332 333 334 335 336 337 338
	return get_unmapped_area(sfd->file, addr, len, pgoff, flags);
}

int is_file_shm_hugepages(struct file *file)
{
	int ret = 0;

	if (file->f_op == &shm_file_operations) {
		struct shm_file_data *sfd;
		sfd = shm_file_data(file);
		ret = is_file_hugepages(sfd->file);
	}
	return ret;
339 340
}

341
static const struct file_operations shm_file_operations = {
Kirill Korotaev's avatar
Kirill Korotaev committed
342
	.mmap		= shm_mmap,
343
	.fsync		= shm_fsync,
Kirill Korotaev's avatar
Kirill Korotaev committed
344
	.release	= shm_release,
345
	.get_unmapped_area	= shm_get_unmapped_area,
Linus Torvalds's avatar
Linus Torvalds committed
346 347 348 349 350
};

static struct vm_operations_struct shm_vm_ops = {
	.open	= shm_open,	/* callback for a new vm-area open */
	.close	= shm_close,	/* callback for when the vm-area is released */
351
	.fault	= shm_fault,
352 353 354
#if defined(CONFIG_NUMA)
	.set_policy = shm_set_policy,
	.get_policy = shm_get_policy,
Linus Torvalds's avatar
Linus Torvalds committed
355 356 357
#endif
};

Nadia Derbey's avatar
Nadia Derbey committed
358 359 360 361 362
/**
 * 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
363
 * Called with shm_ids.rw_mutex held as a writer.
Nadia Derbey's avatar
Nadia Derbey committed
364 365
 */

Nadia Derbey's avatar
Nadia Derbey committed
366
static int newseg(struct ipc_namespace *ns, struct ipc_params *params)
Linus Torvalds's avatar
Linus Torvalds committed
367
{
Nadia Derbey's avatar
Nadia Derbey committed
368 369 370
	key_t key = params->key;
	int shmflg = params->flg;
	size_t size = params->u.size;
Linus Torvalds's avatar
Linus Torvalds committed
371 372 373 374 375 376 377
	int error;
	struct shmid_kernel *shp;
	int numpages = (size + PAGE_SIZE -1) >> PAGE_SHIFT;
	struct file * file;
	char name[13];
	int id;

Kirill Korotaev's avatar
Kirill Korotaev committed
378
	if (size < SHMMIN || size > ns->shm_ctlmax)
Linus Torvalds's avatar
Linus Torvalds committed
379 380
		return -EINVAL;

381
	if (ns->shm_tot + numpages > ns->shm_ctlall)
Linus Torvalds's avatar
Linus Torvalds committed
382 383 384 385 386 387 388
		return -ENOSPC;

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

	shp->shm_perm.key = key;
Andrew Morton's avatar
Andrew Morton committed
389
	shp->shm_perm.mode = (shmflg & S_IRWXUGO);
Linus Torvalds's avatar
Linus Torvalds committed
390 391 392 393 394 395 396 397 398
	shp->mlock_user = NULL;

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

399
	sprintf (name, "SYSV%08x", key);
Linus Torvalds's avatar
Linus Torvalds committed
400
	if (shmflg & SHM_HUGETLB) {
401 402
		/* hugetlb_file_setup takes care of mlock user accounting */
		file = hugetlb_file_setup(name, size);
Linus Torvalds's avatar
Linus Torvalds committed
403 404
		shp->mlock_user = current->user;
	} else {
405 406 407 408 409 410 411 412 413
		int acctflag = VM_ACCOUNT;
		/*
		 * Do not allow no accounting for OVERCOMMIT_NEVER, even
	 	 * if it's asked for.
		 */
		if  ((shmflg & SHM_NORESERVE) &&
				sysctl_overcommit_memory != OVERCOMMIT_NEVER)
			acctflag = 0;
		file = shmem_file_setup(name, size, acctflag);
Linus Torvalds's avatar
Linus Torvalds committed
414 415 416 417 418
	}
	error = PTR_ERR(file);
	if (IS_ERR(file))
		goto no_file;

Kirill Korotaev's avatar
Kirill Korotaev committed
419
	id = shm_addid(ns, shp);
420 421
	if (id < 0) {
		error = id;
Linus Torvalds's avatar
Linus Torvalds committed
422
		goto no_id;
423
	}
Linus Torvalds's avatar
Linus Torvalds committed
424

425
	shp->shm_cprid = task_tgid_vnr(current);
Linus Torvalds's avatar
Linus Torvalds committed
426 427 428 429 430
	shp->shm_lprid = 0;
	shp->shm_atim = shp->shm_dtim = 0;
	shp->shm_ctim = get_seconds();
	shp->shm_segsz = size;
	shp->shm_nattch = 0;
Nadia Derbey's avatar
Nadia Derbey committed
431
	shp->shm_perm.id = shm_buildid(id, shp->shm_perm.seq);
Linus Torvalds's avatar
Linus Torvalds committed
432
	shp->shm_file = file;
433 434 435 436
	/*
	 * 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
437
	file->f_dentry->d_inode->i_ino = shp->shm_perm.id;
438

Kirill Korotaev's avatar
Kirill Korotaev committed
439
	ns->shm_tot += numpages;
Nadia Derbey's avatar
Nadia Derbey committed
440
	error = shp->shm_perm.id;
Linus Torvalds's avatar
Linus Torvalds committed
441
	shm_unlock(shp);
Nadia Derbey's avatar
Nadia Derbey committed
442
	return error;
Linus Torvalds's avatar
Linus Torvalds committed
443 444 445 446 447 448 449 450 451

no_id:
	fput(file);
no_file:
	security_shm_free(shp);
	ipc_rcu_putref(shp);
	return error;
}

Nadia Derbey's avatar
Nadia Derbey committed
452
/*
Nadia Derbey's avatar
Nadia Derbey committed
453
 * Called with shm_ids.rw_mutex and ipcp locked.
Nadia Derbey's avatar
Nadia Derbey committed
454
 */
Nadia Derbey's avatar
Nadia Derbey committed
455
static inline int shm_security(struct kern_ipc_perm *ipcp, int shmflg)
Nadia Derbey's avatar
Nadia Derbey committed
456
{
Nadia Derbey's avatar
Nadia Derbey committed
457 458 459 460
	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
461 462
}

Nadia Derbey's avatar
Nadia Derbey committed
463
/*
Nadia Derbey's avatar
Nadia Derbey committed
464
 * Called with shm_ids.rw_mutex and ipcp locked.
Nadia Derbey's avatar
Nadia Derbey committed
465
 */
Nadia Derbey's avatar
Nadia Derbey committed
466 467
static inline int shm_more_checks(struct kern_ipc_perm *ipcp,
				struct ipc_params *params)
Nadia Derbey's avatar
Nadia Derbey committed
468
{
Nadia Derbey's avatar
Nadia Derbey committed
469 470 471 472
	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
473 474 475 476 477
		return -EINVAL;

	return 0;
}

Linus Torvalds's avatar
Linus Torvalds committed
478 479
asmlinkage long sys_shmget (key_t key, size_t size, int shmflg)
{
Kirill Korotaev's avatar
Kirill Korotaev committed
480
	struct ipc_namespace *ns;
Nadia Derbey's avatar
Nadia Derbey committed
481 482
	struct ipc_ops shm_ops;
	struct ipc_params shm_params;
Kirill Korotaev's avatar
Kirill Korotaev committed
483 484

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

Nadia Derbey's avatar
Nadia Derbey committed
486 487 488
	shm_ops.getnew = newseg;
	shm_ops.associate = shm_security;
	shm_ops.more_checks = shm_more_checks;
Nadia Derbey's avatar
Nadia Derbey committed
489

Nadia Derbey's avatar
Nadia Derbey committed
490 491 492
	shm_params.key = key;
	shm_params.flg = shmflg;
	shm_params.u.size = size;
Linus Torvalds's avatar
Linus Torvalds committed
493

Nadia Derbey's avatar
Nadia Derbey committed
494
	return ipcget(ns, &shm_ids(ns), &shm_ops, &shm_params);
Linus Torvalds's avatar
Linus Torvalds committed
495 496 497 498 499 500 501 502 503 504 505 506 507 508 509 510 511 512 513 514 515 516 517 518 519 520 521 522 523 524 525 526 527 528 529 530 531 532 533 534 535 536 537 538 539
}

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;

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

struct shm_setbuf {
	uid_t	uid;
	gid_t	gid;
	mode_t	mode;
};	

static inline unsigned long copy_shmid_from_user(struct shm_setbuf *out, void __user *buf, int version)
{
	switch(version) {
	case IPC_64:
	    {
		struct shmid64_ds tbuf;

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

		out->uid	= tbuf.shm_perm.uid;
		out->gid	= tbuf.shm_perm.gid;
Andrew Morton's avatar
Andrew Morton committed
540
		out->mode	= tbuf.shm_perm.mode;
Linus Torvalds's avatar
Linus Torvalds committed
541 542 543 544 545 546 547 548 549 550 551 552

		return 0;
	    }
	case IPC_OLD:
	    {
		struct shmid_ds tbuf_old;

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

		out->uid	= tbuf_old.shm_perm.uid;
		out->gid	= tbuf_old.shm_perm.gid;
Andrew Morton's avatar
Andrew Morton committed
553
		out->mode	= tbuf_old.shm_perm.mode;
Linus Torvalds's avatar
Linus Torvalds committed
554 555 556 557 558 559 560 561 562 563 564 565 566 567 568 569 570 571 572 573 574 575 576 577 578 579 580 581 582 583 584 585 586 587

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

Nadia Derbey's avatar
Nadia Derbey committed
588
/*
Nadia Derbey's avatar
Nadia Derbey committed
589
 * Called with shm_ids.rw_mutex held as a reader
Nadia Derbey's avatar
Nadia Derbey committed
590
 */
Kirill Korotaev's avatar
Kirill Korotaev committed
591 592
static void shm_get_stat(struct ipc_namespace *ns, unsigned long *rss,
		unsigned long *swp)
Linus Torvalds's avatar
Linus Torvalds committed
593
{
Nadia Derbey's avatar
Nadia Derbey committed
594 595
	int next_id;
	int total, in_use;
Linus Torvalds's avatar
Linus Torvalds committed
596 597 598 599

	*rss = 0;
	*swp = 0;

Nadia Derbey's avatar
Nadia Derbey committed
600 601 602
	in_use = shm_ids(ns).in_use;

	for (total = 0, next_id = 0; total < in_use; next_id++) {
Linus Torvalds's avatar
Linus Torvalds committed
603 604 605
		struct shmid_kernel *shp;
		struct inode *inode;

606
		shp = idr_find(&shm_ids(ns).ipcs_idr, next_id);
Nadia Derbey's avatar
Nadia Derbey committed
607
		if (shp == NULL)
Linus Torvalds's avatar
Linus Torvalds committed
608 609
			continue;

Josef Sipek's avatar
Josef Sipek committed
610
		inode = shp->shm_file->f_path.dentry->d_inode;
Linus Torvalds's avatar
Linus Torvalds committed
611 612 613 614 615 616 617 618 619 620 621

		if (is_file_hugepages(shp->shm_file)) {
			struct address_space *mapping = inode->i_mapping;
			*rss += (HPAGE_SIZE/PAGE_SIZE)*mapping->nrpages;
		} else {
			struct shmem_inode_info *info = SHMEM_I(inode);
			spin_lock(&info->lock);
			*rss += inode->i_mapping->nrpages;
			*swp += info->swapped;
			spin_unlock(&info->lock);
		}
Nadia Derbey's avatar
Nadia Derbey committed
622 623

		total++;
Linus Torvalds's avatar
Linus Torvalds committed
624 625 626 627 628 629 630 631
	}
}

asmlinkage long sys_shmctl (int shmid, int cmd, struct shmid_ds __user *buf)
{
	struct shm_setbuf setbuf;
	struct shmid_kernel *shp;
	int err, version;
Kirill Korotaev's avatar
Kirill Korotaev committed
632
	struct ipc_namespace *ns;
Linus Torvalds's avatar
Linus Torvalds committed
633 634 635 636 637 638 639

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

	version = ipc_parse_version(&cmd);
Kirill Korotaev's avatar
Kirill Korotaev committed
640
	ns = current->nsproxy->ipc_ns;
Linus Torvalds's avatar
Linus Torvalds committed
641 642 643 644 645 646 647 648 649 650 651

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

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

		memset(&shminfo,0,sizeof(shminfo));
Kirill Korotaev's avatar
Kirill Korotaev committed
652 653 654
		shminfo.shmmni = shminfo.shmseg = ns->shm_ctlmni;
		shminfo.shmmax = ns->shm_ctlmax;
		shminfo.shmall = ns->shm_ctlall;
Linus Torvalds's avatar
Linus Torvalds committed
655 656 657 658

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

Nadia Derbey's avatar
Nadia Derbey committed
660
		down_read(&shm_ids(ns).rw_mutex);
Nadia Derbey's avatar
Nadia Derbey committed
661
		err = ipc_get_maxid(&shm_ids(ns));
Nadia Derbey's avatar
Nadia Derbey committed
662
		up_read(&shm_ids(ns).rw_mutex);
Nadia Derbey's avatar
Nadia Derbey committed
663

Linus Torvalds's avatar
Linus Torvalds committed
664 665 666 667 668 669 670 671 672 673 674 675 676
		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;

		memset(&shm_info,0,sizeof(shm_info));
Nadia Derbey's avatar
Nadia Derbey committed
677
		down_read(&shm_ids(ns).rw_mutex);
Kirill Korotaev's avatar
Kirill Korotaev committed
678 679 680
		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
681 682
		shm_info.swap_attempts = 0;
		shm_info.swap_successes = 0;
Nadia Derbey's avatar
Nadia Derbey committed
683
		err = ipc_get_maxid(&shm_ids(ns));
Nadia Derbey's avatar
Nadia Derbey committed
684
		up_read(&shm_ids(ns).rw_mutex);
Linus Torvalds's avatar
Linus Torvalds committed
685 686 687 688 689 690 691 692 693 694 695 696 697
		if(copy_to_user (buf, &shm_info, sizeof(shm_info))) {
			err = -EFAULT;
			goto out;
		}

		err = err < 0 ? 0 : err;
		goto out;
	}
	case SHM_STAT:
	case IPC_STAT:
	{
		struct shmid64_ds tbuf;
		int result;
698 699 700

		if (!buf) {
			err = -EFAULT;
Linus Torvalds's avatar
Linus Torvalds committed
701
			goto out;
702 703 704 705 706 707 708 709
		}

		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
710
			result = shp->shm_perm.id;
Linus Torvalds's avatar
Linus Torvalds committed
711
		} else {
712 713 714 715 716
			shp = shm_lock_check(ns, shmid);
			if (IS_ERR(shp)) {
				err = PTR_ERR(shp);
				goto out;
			}
Linus Torvalds's avatar
Linus Torvalds committed
717 718 719 720 721 722 723 724
			result = 0;
		}
		err=-EACCES;
		if (ipcperms (&shp->shm_perm, S_IRUGO))
			goto out_unlock;
		err = security_shm_shmctl(shp, cmd);
		if (err)
			goto out_unlock;
725
		memset(&tbuf, 0, sizeof(tbuf));
Linus Torvalds's avatar
Linus Torvalds committed
726 727 728 729 730 731 732
		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;
733
		tbuf.shm_nattch	= shp->shm_nattch;
Linus Torvalds's avatar
Linus Torvalds committed
734 735 736 737 738 739 740 741 742 743
		shm_unlock(shp);
		if(copy_shmid_to_user (buf, &tbuf, version))
			err = -EFAULT;
		else
			err = result;
		goto out;
	}
	case SHM_LOCK:
	case SHM_UNLOCK:
	{
744 745 746
		shp = shm_lock_check(ns, shmid);
		if (IS_ERR(shp)) {
			err = PTR_ERR(shp);
Linus Torvalds's avatar
Linus Torvalds committed
747 748 749
			goto out;
		}

Steve Grubb's avatar
Steve Grubb committed
750 751 752 753
		err = audit_ipc_obj(&(shp->shm_perm));
		if (err)
			goto out_unlock;

Linus Torvalds's avatar
Linus Torvalds committed
754 755 756 757 758 759 760 761 762 763 764 765 766 767 768 769 770 771
		if (!capable(CAP_IPC_LOCK)) {
			err = -EPERM;
			if (current->euid != shp->shm_perm.uid &&
			    current->euid != shp->shm_perm.cuid)
				goto out_unlock;
			if (cmd == SHM_LOCK &&
			    !current->signal->rlim[RLIMIT_MEMLOCK].rlim_cur)
				goto out_unlock;
		}

		err = security_shm_shmctl(shp, cmd);
		if (err)
			goto out_unlock;
		
		if(cmd==SHM_LOCK) {
			struct user_struct * user = current->user;
			if (!is_file_hugepages(shp->shm_file)) {
				err = shmem_lock(shp->shm_file, 1, user);
772
				if (!err && !(shp->shm_perm.mode & SHM_LOCKED)){
Andrew Morton's avatar
Andrew Morton committed
773
					shp->shm_perm.mode |= SHM_LOCKED;
Linus Torvalds's avatar
Linus Torvalds committed
774 775 776 777 778
					shp->mlock_user = user;
				}
			}
		} else if (!is_file_hugepages(shp->shm_file)) {
			shmem_lock(shp->shm_file, 0, shp->mlock_user);
Andrew Morton's avatar
Andrew Morton committed
779
			shp->shm_perm.mode &= ~SHM_LOCKED;
Linus Torvalds's avatar
Linus Torvalds committed
780 781 782 783 784 785 786 787 788 789 790 791 792 793 794 795 796
			shp->mlock_user = NULL;
		}
		shm_unlock(shp);
		goto out;
	}
	case IPC_RMID:
	{
		/*
		 *	We cannot simply remove the file. The SVID states
		 *	that the block remains until the last person
		 *	detaches from it, then is deleted. A shmat() on
		 *	an RMID segment is legal in older Linux and if 
		 *	we change it apps break...
		 *
		 *	Instead we set a destroyed flag, and then blow
		 *	the name away when the usage hits zero.
		 */
Nadia Derbey's avatar
Nadia Derbey committed
797 798
		down_write(&shm_ids(ns).rw_mutex);
		shp = shm_lock_check_down(ns, shmid);
799 800
		if (IS_ERR(shp)) {
			err = PTR_ERR(shp);
Linus Torvalds's avatar
Linus Torvalds committed
801
			goto out_up;
802
		}
Linus Torvalds's avatar
Linus Torvalds committed
803

Steve Grubb's avatar
Steve Grubb committed
804 805 806 807
		err = audit_ipc_obj(&(shp->shm_perm));
		if (err)
			goto out_unlock_up;

Linus Torvalds's avatar
Linus Torvalds committed
808 809 810 811 812 813 814 815 816 817 818
		if (current->euid != shp->shm_perm.uid &&
		    current->euid != shp->shm_perm.cuid && 
		    !capable(CAP_SYS_ADMIN)) {
			err=-EPERM;
			goto out_unlock_up;
		}

		err = security_shm_shmctl(shp, cmd);
		if (err)
			goto out_unlock_up;

819
		do_shm_rmid(ns, &shp->shm_perm);
Nadia Derbey's avatar
Nadia Derbey committed
820
		up_write(&shm_ids(ns).rw_mutex);
Linus Torvalds's avatar
Linus Torvalds committed
821 822 823 824 825
		goto out;
	}

	case IPC_SET:
	{
826 827 828 829 830
		if (!buf) {
			err = -EFAULT;
			goto out;
		}

Linus Torvalds's avatar
Linus Torvalds committed
831 832 833 834
		if (copy_shmid_from_user (&setbuf, buf, version)) {
			err = -EFAULT;
			goto out;
		}
Nadia Derbey's avatar
Nadia Derbey committed
835 836
		down_write(&shm_ids(ns).rw_mutex);
		shp = shm_lock_check_down(ns, shmid);
837 838
		if (IS_ERR(shp)) {
			err = PTR_ERR(shp);
Linus Torvalds's avatar
Linus Torvalds committed
839
			goto out_up;
840
		}
Steve Grubb's avatar
Steve Grubb committed
841 842 843
		err = audit_ipc_obj(&(shp->shm_perm));
		if (err)
			goto out_unlock_up;
844
		err = audit_ipc_set_perm(0, setbuf.uid, setbuf.gid, setbuf.mode);
Steve Grubb's avatar
Steve Grubb committed
845 846
		if (err)
			goto out_unlock_up;
Linus Torvalds's avatar
Linus Torvalds committed
847 848 849 850 851 852 853 854 855 856 857 858 859
		err=-EPERM;
		if (current->euid != shp->shm_perm.uid &&
		    current->euid != shp->shm_perm.cuid && 
		    !capable(CAP_SYS_ADMIN)) {
			goto out_unlock_up;
		}

		err = security_shm_shmctl(shp, cmd);
		if (err)
			goto out_unlock_up;
		
		shp->shm_perm.uid = setbuf.uid;
		shp->shm_perm.gid = setbuf.gid;
Andrew Morton's avatar
Andrew Morton committed
860
		shp->shm_perm.mode = (shp->shm_perm.mode & ~S_IRWXUGO)
Linus Torvalds's avatar
Linus Torvalds committed
861 862 863 864 865 866 867 868 869 870 871 872 873 874
			| (setbuf.mode & S_IRWXUGO);
		shp->shm_ctim = get_seconds();
		break;
	}

	default:
		err = -EINVAL;
		goto out;
	}

	err = 0;
out_unlock_up:
	shm_unlock(shp);
out_up:
Nadia Derbey's avatar
Nadia Derbey committed
875
	up_write(&shm_ids(ns).rw_mutex);
Linus Torvalds's avatar
Linus Torvalds committed
876 877 878 879 880 881 882 883 884 885 886 887 888 889 890 891 892 893 894 895 896 897 898 899
	goto out;
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;
900
	unsigned long user_addr;
Kirill Korotaev's avatar
Kirill Korotaev committed
901
	struct ipc_namespace *ns;
902 903 904
	struct shm_file_data *sfd;
	struct path path;
	mode_t f_mode;
Linus Torvalds's avatar
Linus Torvalds committed
905

906 907
	err = -EINVAL;
	if (shmid < 0)
Linus Torvalds's avatar
Linus Torvalds committed
908
		goto out;
909
	else if ((addr = (ulong)shmaddr)) {
Linus Torvalds's avatar
Linus Torvalds committed
910 911 912 913 914 915 916
		if (addr & (SHMLBA-1)) {
			if (shmflg & SHM_RND)
				addr &= ~(SHMLBA-1);	   /* round down */
			else
#ifndef __ARCH_FORCE_SHMLBA
				if (addr & ~PAGE_MASK)
#endif
917
					goto out;
Linus Torvalds's avatar
Linus Torvalds committed
918 919 920 921
		}
		flags = MAP_SHARED | MAP_FIXED;
	} else {
		if ((shmflg & SHM_REMAP))
922
			goto out;
Linus Torvalds's avatar
Linus Torvalds committed
923 924 925 926 927 928 929

		flags = MAP_SHARED;
	}

	if (shmflg & SHM_RDONLY) {
		prot = PROT_READ;
		acc_mode = S_IRUGO;
930
		f_mode = FMODE_READ;
Linus Torvalds's avatar
Linus Torvalds committed
931 932 933
	} else {
		prot = PROT_READ | PROT_WRITE;
		acc_mode = S_IRUGO | S_IWUGO;
934
		f_mode = FMODE_READ | FMODE_WRITE;
Linus Torvalds's avatar
Linus Torvalds committed
935 936 937 938 939 940 941 942 943 944
	}
	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...
	 */
Kirill Korotaev's avatar
Kirill Korotaev committed
945
	ns = current->nsproxy->ipc_ns;
946 947 948
	shp = shm_lock_check(ns, shmid);
	if (IS_ERR(shp)) {
		err = PTR_ERR(shp);
Linus Torvalds's avatar
Linus Torvalds committed
949
		goto out;
950
	}
951 952 953 954

	err = -EACCES;
	if (ipcperms(&shp->shm_perm, acc_mode))
		goto out_unlock;
Linus Torvalds's avatar
Linus Torvalds committed
955 956

	err = security_shm_shmat(shp, shmaddr, shmflg);
957 958 959 960
	if (err)
		goto out_unlock;

	path.dentry = dget(shp->shm_file->f_path.dentry);
961
	path.mnt    = shp->shm_file->f_path.mnt;
Linus Torvalds's avatar
Linus Torvalds committed
962
	shp->shm_nattch++;
963
	size = i_size_read(path.dentry->d_inode);
Linus Torvalds's avatar
Linus Torvalds committed
964 965
	shm_unlock(shp);

966 967 968
	err = -ENOMEM;
	sfd = kzalloc(sizeof(*sfd), GFP_KERNEL);
	if (!sfd)
969
		goto out_put_dentry;
970 971

	err = -ENOMEM;
972 973

	file = alloc_file(path.mnt, path.dentry, f_mode, &shm_file_operations);
974 975 976 977 978
	if (!file)
		goto out_free;

	file->private_data = sfd;
	file->f_mapping = shp->shm_file->f_mapping;
Nadia Derbey's avatar
Nadia Derbey committed
979
	sfd->id = shp->shm_perm.id;
980 981 982 983
	sfd->ns = get_ipc_ns(ns);
	sfd->file = shp->shm_file;
	sfd->vm_ops = NULL;

Linus Torvalds's avatar
Linus Torvalds committed
984 985
	down_write(&current->mm->mmap_sem);
	if (addr && !(shmflg & SHM_REMAP)) {
986
		err = -EINVAL;
Linus Torvalds's avatar
Linus Torvalds committed
987 988 989 990 991 992 993 994 995 996 997
		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;
	}
		
998 999 1000 1001 1002
	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
1003 1004 1005
invalid:
	up_write(&current->mm->mmap_sem);

1006 1007 1008
	fput(file);

out_nattch:
Nadia Derbey's avatar
Nadia Derbey committed
1009 1010
	down_write(&shm_ids(ns).rw_mutex);
	shp = shm_lock_down(ns, shmid);
1011
	BUG_ON(IS_ERR(shp));
Linus Torvalds's avatar
Linus Torvalds committed
1012 1013
	shp->shm_nattch--;
	if(shp->shm_nattch == 0 &&
Andrew Morton's avatar
Andrew Morton committed
1014
	   shp->shm_perm.mode & SHM_DEST)
Kirill Korotaev's avatar
Kirill Korotaev committed
1015
		shm_destroy(ns, shp);
Linus Torvalds's avatar
Linus Torvalds committed
1016 1017
	else
		shm_unlock(shp);
Nadia Derbey's avatar
Nadia Derbey committed
1018
	up_write(&shm_ids(ns).rw_mutex);
Linus Torvalds's avatar
Linus Torvalds committed
1019 1020 1021

out:
	return err;
1022 1023 1024 1025 1026 1027 1028

out_unlock:
	shm_unlock(shp);
	goto out;

out_free:
	kfree(sfd);
1029
out_put_dentry:
1030 1031
	dput(path.dentry);
	goto out_nattch;
Linus Torvalds's avatar
Linus Torvalds committed
1032 1033
}

1034 1035 1036 1037 1038 1039 1040 1041 1042 1043 1044 1045
asmlinkage long sys_shmat(int shmid, char __user *shmaddr, int shmflg)
{
	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
1046 1047 1048 1049 1050 1051 1052 1053 1054 1055 1056 1057
/*
 * detach and kill segment if marked destroyed.
 * The work is done in shm_close.
 */
asmlinkage long sys_shmdt(char __user *shmaddr)
{
	struct mm_struct *mm = current->mm;
	struct vm_area_struct *vma, *next;
	unsigned long addr = (unsigned long)shmaddr;
	loff_t size = 0;
	int retval = -EINVAL;

1058 1059 1060
	if (addr & ~PAGE_MASK)
		return retval;

Linus Torvalds's avatar
Linus Torvalds committed
1061 1062 1063 1064 1065 1066 1067 1068 1069 1070 1071 1072 1073 1074 1075 1076 1077 1078 1079 1080 1081 1082 1083 1084 1085 1086 1087 1088 1089 1090 1091 1092
	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);

	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.
		 */
1093
		if ((vma->vm_ops == &shm_vm_ops) &&
Linus Torvalds's avatar
Linus Torvalds committed
1094 1095 1096
			(vma->vm_start - addr)/PAGE_SIZE == vma->vm_pgoff) {


Josef Sipek's avatar
Josef Sipek committed
1097
			size = vma->vm_file->f_path.dentry->d_inode->i_size;
Linus Torvalds's avatar
Linus Torvalds committed
1098 1099 1100 1101 1102 1103 1104 1105 1106 1107 1108 1109 1110 1111 1112 1113 1114 1115 1116
			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
	 * prevent overflows and make comparisions vs. equal-width types.
	 */
1117
	size = PAGE_ALIGN(size);
Linus Torvalds's avatar
Linus Torvalds committed
1118 1119 1120 1121
	while (vma && (loff_t)(vma->vm_end - addr) <= size) {
		next = vma->vm_next;

		/* finding a matching vma now does not alter retval */
1122
		if ((vma->vm_ops == &shm_vm_ops) &&
Linus Torvalds's avatar
Linus Torvalds committed
1123 1124 1125 1126 1127 1128 1129 1130 1131 1132 1133
			(vma->vm_start - addr)/PAGE_SIZE == vma->vm_pgoff)

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

	up_write(&mm->mmap_sem);
	return retval;
}

#ifdef CONFIG_PROC_FS
1134
static int sysvipc_shm_proc_show(struct seq_file *s, void *it)
Linus Torvalds's avatar
Linus Torvalds committed
1135
{
1136 1137
	struct shmid_kernel *shp = it;
	char *format;
Linus Torvalds's avatar
Linus Torvalds committed
1138 1139 1140 1141

#define SMALL_STRING "%10d %10d  %4o %10u %5u %5u  %5d %5u %5u %5u %5u %10lu %10lu %10lu\n"
#define BIG_STRING   "%10d %10d  %4o %21u %5u %5u  %5d %5u %5u %5u %5u %10lu %10lu %10lu\n"

1142 1143 1144 1145 1146 1147
	if (sizeof(size_t) <= sizeof(int))
		format = SMALL_STRING;
	else
		format = BIG_STRING;
	return seq_printf(s, format,
			  shp->shm_perm.key,
Nadia Derbey's avatar
Nadia Derbey committed
1148
			  shp->shm_perm.id,
Andrew Morton's avatar
Andrew Morton committed
1149
			  shp->shm_perm.mode,
1150 1151 1152
			  shp->shm_segsz,
			  shp->shm_cprid,
			  shp->shm_lprid,
1153
			  shp->shm_nattch,
1154 1155 1156 1157 1158 1159 1160
			  shp->shm_perm.uid,
			  shp->shm_perm.gid,
			  shp->shm_perm.cuid,
			  shp->shm_perm.cgid,
			  shp->shm_atim,
			  shp->shm_dtim,
			  shp->shm_ctim);
Linus Torvalds's avatar
Linus Torvalds committed
1161 1162
}
#endif