util.c 23.1 KB
Newer Older
Linus Torvalds's avatar
Linus Torvalds committed
1
2
3
4
5
6
7
8
9
/*
 * linux/ipc/util.c
 * Copyright (C) 1992 Krishna Balasubramanian
 *
 * Sep 1997 - Call suser() last after "normal" permission checks so we
 *            get BSD style process accounting right.
 *            Occurs in several places in the IPC code.
 *            Chris Evans, <chris@ferret.lmh.ox.ac.uk>
 * Nov 1999 - ipc helper functions, unified SMP locking
10
 *	      Manfred Spraul <manfred@colorfullife.com>
Linus Torvalds's avatar
Linus Torvalds committed
11
12
 * Oct 2002 - One lock per IPC id. RCU ipc_free for lock-free grow_ary().
 *            Mingming Cao <cmm@us.ibm.com>
Steve Grubb's avatar
Steve Grubb committed
13
14
 * Mar 2006 - support for audit of ipc object properties
 *            Dustin Kirkland <dustin.kirkland@us.ibm.com>
15
16
17
 * Jun 2006 - namespaces ssupport
 *            OpenVZ, SWsoft Inc.
 *            Pavel Emelianov <xemul@openvz.org>
Linus Torvalds's avatar
Linus Torvalds committed
18
19
20
21
22
23
24
25
 */

#include <linux/mm.h>
#include <linux/shm.h>
#include <linux/init.h>
#include <linux/msg.h>
#include <linux/vmalloc.h>
#include <linux/slab.h>
26
#include <linux/capability.h>
Linus Torvalds's avatar
Linus Torvalds committed
27
28
29
30
#include <linux/highuid.h>
#include <linux/security.h>
#include <linux/rcupdate.h>
#include <linux/workqueue.h>
31
32
#include <linux/seq_file.h>
#include <linux/proc_fs.h>
Steve Grubb's avatar
Steve Grubb committed
33
#include <linux/audit.h>
34
#include <linux/nsproxy.h>
Nadia Derbey's avatar
Nadia Derbey committed
35
#include <linux/rwsem.h>
36
#include <linux/memory.h>
37
#include <linux/ipc_namespace.h>
Linus Torvalds's avatar
Linus Torvalds committed
38
39
40
41
42

#include <asm/unistd.h>

#include "util.h"

43
44
45
struct ipc_proc_iface {
	const char *path;
	const char *header;
46
	int ids;
47
48
49
	int (*show)(struct seq_file *, void *);
};

50
51
52
53
54
55
struct ipc_namespace init_ipc_ns = {
	.kref = {
		.refcount	= ATOMIC_INIT(2),
	},
};

56
57
58
atomic_t nr_ipc_ns = ATOMIC_INIT(1);


59
60
#ifdef CONFIG_MEMORY_HOTPLUG

61
62
63
64
65
66
67
68
static void ipc_memory_notifier(struct work_struct *work)
{
	ipcns_notify(IPCNS_MEMCHANGED);
}

static DECLARE_WORK(ipc_memory_wq, ipc_memory_notifier);


69
70
71
72
73
74
75
76
77
static int ipc_memory_callback(struct notifier_block *self,
				unsigned long action, void *arg)
{
	switch (action) {
	case MEM_ONLINE:    /* memory successfully brought online */
	case MEM_OFFLINE:   /* or offline: it's time to recompute msgmni */
		/*
		 * This is done by invoking the ipcns notifier chain with the
		 * IPC_MEMCHANGED event.
78
79
80
81
		 * In order not to keep the lock on the hotplug memory chain
		 * for too long, queue a work item that will, when waken up,
		 * activate the ipcns notification chain.
		 * No need to keep several ipc work items on the queue.
82
		 */
83
84
		if (!work_pending(&ipc_memory_wq))
			schedule_work(&ipc_memory_wq);
85
86
87
88
89
90
91
92
93
94
95
96
97
98
		break;
	case MEM_GOING_ONLINE:
	case MEM_GOING_OFFLINE:
	case MEM_CANCEL_ONLINE:
	case MEM_CANCEL_OFFLINE:
	default:
		break;
	}

	return NOTIFY_OK;
}

#endif /* CONFIG_MEMORY_HOTPLUG */

Linus Torvalds's avatar
Linus Torvalds committed
99
100
101
102
/**
 *	ipc_init	-	initialise IPC subsystem
 *
 *	The various system5 IPC resources (semaphores, messages and shared
103
 *	memory) are initialised
104
105
106
 *	A callback routine is registered into the memory hotplug notifier
 *	chain: since msgmni scales to lowmem this callback routine will be
 *	called upon successful memory add / remove to recompute msmgni.
Linus Torvalds's avatar
Linus Torvalds committed
107
108
109
110
111
112
113
 */
 
static int __init ipc_init(void)
{
	sem_init();
	msg_init();
	shm_init();
114
115
	hotplug_memory_notifier(ipc_memory_callback, IPC_CALLBACK_PRI);
	register_ipcns_notifier(&init_ipc_ns);
Linus Torvalds's avatar
Linus Torvalds committed
116
117
118
119
120
121
122
123
	return 0;
}
__initcall(ipc_init);

/**
 *	ipc_init_ids		-	initialise IPC identifiers
 *	@ids: Identifier set
 *
Nadia Derbey's avatar
Nadia Derbey committed
124
125
 *	Set up the sequence range to use for the ipc identifier range (limited
 *	below IPCMNI) then initialise the ids idr.
Linus Torvalds's avatar
Linus Torvalds committed
126
127
 */
 
Nadia Derbey's avatar
Nadia Derbey committed
128
void ipc_init_ids(struct ipc_ids *ids)
Linus Torvalds's avatar
Linus Torvalds committed
129
{
Nadia Derbey's avatar
Nadia Derbey committed
130
	init_rwsem(&ids->rw_mutex);
Linus Torvalds's avatar
Linus Torvalds committed
131
132
133
134
135

	ids->in_use = 0;
	ids->seq = 0;
	{
		int seq_limit = INT_MAX/SEQ_MULTIPLIER;
136
137
		if (seq_limit > USHORT_MAX)
			ids->seq_max = USHORT_MAX;
Linus Torvalds's avatar
Linus Torvalds committed
138
139
140
141
		 else
		 	ids->seq_max = seq_limit;
	}

Nadia Derbey's avatar
Nadia Derbey committed
142
	idr_init(&ids->ipcs_idr);
Linus Torvalds's avatar
Linus Torvalds committed
143
144
}

145
#ifdef CONFIG_PROC_FS
146
static const struct file_operations sysvipc_proc_fops;
147
/**
148
 *	ipc_init_proc_interface	-  Create a proc interface for sysipc types using a seq_file interface.
149
150
151
152
153
154
 *	@path: Path in procfs
 *	@header: Banner to be printed at the beginning of the file.
 *	@ids: ipc id table to iterate.
 *	@show: show routine.
 */
void __init ipc_init_proc_interface(const char *path, const char *header,
155
		int ids, int (*show)(struct seq_file *, void *))
156
157
158
159
160
161
162
163
164
165
166
167
{
	struct proc_dir_entry *pde;
	struct ipc_proc_iface *iface;

	iface = kmalloc(sizeof(*iface), GFP_KERNEL);
	if (!iface)
		return;
	iface->path	= path;
	iface->header	= header;
	iface->ids	= ids;
	iface->show	= show;

168
169
170
171
172
173
	pde = proc_create_data(path,
			       S_IRUGO,        /* world readable */
			       NULL,           /* parent dir */
			       &sysvipc_proc_fops,
			       iface);
	if (!pde) {
174
175
176
177
178
		kfree(iface);
	}
}
#endif

Linus Torvalds's avatar
Linus Torvalds committed
179
180
181
182
183
/**
 *	ipc_findkey	-	find a key in an ipc identifier set	
 *	@ids: Identifier set
 *	@key: The key to find
 *	
Nadia Derbey's avatar
Nadia Derbey committed
184
 *	Requires ipc_ids.rw_mutex locked.
Nadia Derbey's avatar
Nadia Derbey committed
185
186
 *	Returns the LOCKED pointer to the ipc structure if found or NULL
 *	if not.
Nadia Derbey's avatar
Nadia Derbey committed
187
 *	If key is found ipc points to the owning ipc structure
Linus Torvalds's avatar
Linus Torvalds committed
188
189
 */
 
Nadia Derbey's avatar
Nadia Derbey committed
190
static struct kern_ipc_perm *ipc_findkey(struct ipc_ids *ids, key_t key)
Linus Torvalds's avatar
Linus Torvalds committed
191
{
Nadia Derbey's avatar
Nadia Derbey committed
192
193
194
	struct kern_ipc_perm *ipc;
	int next_id;
	int total;
Linus Torvalds's avatar
Linus Torvalds committed
195

Nadia Derbey's avatar
Nadia Derbey committed
196
197
198
199
	for (total = 0, next_id = 0; total < ids->in_use; next_id++) {
		ipc = idr_find(&ids->ipcs_idr, next_id);

		if (ipc == NULL)
Linus Torvalds's avatar
Linus Torvalds committed
200
			continue;
Nadia Derbey's avatar
Nadia Derbey committed
201
202
203
204
205
206
207
208

		if (ipc->key != key) {
			total++;
			continue;
		}

		ipc_lock_by_ptr(ipc);
		return ipc;
Linus Torvalds's avatar
Linus Torvalds committed
209
	}
Nadia Derbey's avatar
Nadia Derbey committed
210
211

	return NULL;
Linus Torvalds's avatar
Linus Torvalds committed
212
213
}

Nadia Derbey's avatar
Nadia Derbey committed
214
215
216
217
/**
 *	ipc_get_maxid 	-	get the last assigned id
 *	@ids: IPC identifier set
 *
Nadia Derbey's avatar
Nadia Derbey committed
218
 *	Called with ipc_ids.rw_mutex held.
Linus Torvalds's avatar
Linus Torvalds committed
219
220
 */

Nadia Derbey's avatar
Nadia Derbey committed
221
222
223
224
225
226
227
228
int ipc_get_maxid(struct ipc_ids *ids)
{
	struct kern_ipc_perm *ipc;
	int max_id = -1;
	int total, id;

	if (ids->in_use == 0)
		return -1;
Linus Torvalds's avatar
Linus Torvalds committed
229

Nadia Derbey's avatar
Nadia Derbey committed
230
231
232
233
234
235
236
237
238
239
240
241
242
	if (ids->in_use == IPCMNI)
		return IPCMNI - 1;

	/* Look for the last assigned id */
	total = 0;
	for (id = 0; id < IPCMNI && total < ids->in_use; id++) {
		ipc = idr_find(&ids->ipcs_idr, id);
		if (ipc != NULL) {
			max_id = id;
			total++;
		}
	}
	return max_id;
Linus Torvalds's avatar
Linus Torvalds committed
243
244
245
246
247
248
}

/**
 *	ipc_addid 	-	add an IPC identifier
 *	@ids: IPC identifier set
 *	@new: new IPC permission set
Nadia Derbey's avatar
Nadia Derbey committed
249
 *	@size: limit for the number of used ids
Linus Torvalds's avatar
Linus Torvalds committed
250
 *
Nadia Derbey's avatar
Nadia Derbey committed
251
 *	Add an entry 'new' to the IPC ids idr. The permissions object is
Linus Torvalds's avatar
Linus Torvalds committed
252
 *	initialised and the first free entry is set up and the id assigned
Nadia Derbey's avatar
Nadia Derbey committed
253
 *	is returned. The 'new' entry is returned in a locked state on success.
254
 *	On failure the entry is not locked and a negative err-code is returned.
Linus Torvalds's avatar
Linus Torvalds committed
255
 *
Nadia Derbey's avatar
Nadia Derbey committed
256
 *	Called with ipc_ids.rw_mutex held as a writer.
Linus Torvalds's avatar
Linus Torvalds committed
257
258
259
260
 */
 
int ipc_addid(struct ipc_ids* ids, struct kern_ipc_perm* new, int size)
{
261
262
	uid_t euid;
	gid_t egid;
Nadia Derbey's avatar
Nadia Derbey committed
263
	int id, err;
Linus Torvalds's avatar
Linus Torvalds committed
264

Nadia Derbey's avatar
Nadia Derbey committed
265
266
267
268
	if (size > IPCMNI)
		size = IPCMNI;

	if (ids->in_use >= size)
269
		return -ENOSPC;
Nadia Derbey's avatar
Nadia Derbey committed
270
271
272

	err = idr_get_new(&ids->ipcs_idr, new, &id);
	if (err)
273
		return err;
Nadia Derbey's avatar
Nadia Derbey committed
274

Linus Torvalds's avatar
Linus Torvalds committed
275
276
	ids->in_use++;

277
278
279
	current_euid_egid(&euid, &egid);
	new->cuid = new->uid = euid;
	new->gid = new->cgid = egid;
Linus Torvalds's avatar
Linus Torvalds committed
280
281
282
283
284

	new->seq = ids->seq++;
	if(ids->seq > ids->seq_max)
		ids->seq = 0;

285
	new->id = ipc_buildid(id, new->seq);
Linus Torvalds's avatar
Linus Torvalds committed
286
287
288
289
290
291
292
	spin_lock_init(&new->lock);
	new->deleted = 0;
	rcu_read_lock();
	spin_lock(&new->lock);
	return id;
}

Nadia Derbey's avatar
Nadia Derbey committed
293
294
295
/**
 *	ipcget_new	-	create a new ipc object
 *	@ns: namespace
Nadia Derbey's avatar
Nadia Derbey committed
296
 *	@ids: IPC identifer set
Nadia Derbey's avatar
Nadia Derbey committed
297
298
299
 *	@ops: the actual creation routine to call
 *	@params: its parameters
 *
Nadia Derbey's avatar
Nadia Derbey committed
300
301
 *	This routine is called by sys_msgget, sys_semget() and sys_shmget()
 *	when the key is IPC_PRIVATE.
Nadia Derbey's avatar
Nadia Derbey committed
302
 */
303
static int ipcget_new(struct ipc_namespace *ns, struct ipc_ids *ids,
Nadia Derbey's avatar
Nadia Derbey committed
304
305
306
		struct ipc_ops *ops, struct ipc_params *params)
{
	int err;
307
retry:
Nadia Derbey's avatar
Nadia Derbey committed
308
309
310
311
312
	err = idr_pre_get(&ids->ipcs_idr, GFP_KERNEL);

	if (!err)
		return -ENOMEM;

Nadia Derbey's avatar
Nadia Derbey committed
313
	down_write(&ids->rw_mutex);
Nadia Derbey's avatar
Nadia Derbey committed
314
	err = ops->getnew(ns, params);
Nadia Derbey's avatar
Nadia Derbey committed
315
	up_write(&ids->rw_mutex);
Nadia Derbey's avatar
Nadia Derbey committed
316

317
318
319
	if (err == -EAGAIN)
		goto retry;

Nadia Derbey's avatar
Nadia Derbey committed
320
321
322
323
324
325
326
327
	return err;
}

/**
 *	ipc_check_perms	-	check security and permissions for an IPC
 *	@ipcp: ipc permission set
 *	@ops: the actual security routine to call
 *	@params: its parameters
Nadia Derbey's avatar
Nadia Derbey committed
328
329
330
331
332
333
334
 *
 *	This routine is called by sys_msgget(), sys_semget() and sys_shmget()
 *      when the key is not IPC_PRIVATE and that key already exists in the
 *      ids IDR.
 *
 *	On success, the IPC id is returned.
 *
Nadia Derbey's avatar
Nadia Derbey committed
335
 *	It is called with ipc_ids.rw_mutex and ipcp->lock held.
Nadia Derbey's avatar
Nadia Derbey committed
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
 */
static int ipc_check_perms(struct kern_ipc_perm *ipcp, struct ipc_ops *ops,
			struct ipc_params *params)
{
	int err;

	if (ipcperms(ipcp, params->flg))
		err = -EACCES;
	else {
		err = ops->associate(ipcp, params->flg);
		if (!err)
			err = ipcp->id;
	}

	return err;
}

/**
 *	ipcget_public	-	get an ipc object or create a new one
 *	@ns: namespace
Nadia Derbey's avatar
Nadia Derbey committed
356
 *	@ids: IPC identifer set
Nadia Derbey's avatar
Nadia Derbey committed
357
358
359
 *	@ops: the actual creation routine to call
 *	@params: its parameters
 *
Nadia Derbey's avatar
Nadia Derbey committed
360
361
362
363
364
365
 *	This routine is called by sys_msgget, sys_semget() and sys_shmget()
 *	when the key is not IPC_PRIVATE.
 *	It adds a new entry if the key is not found and does some permission
 *      / security checkings if the key is found.
 *
 *	On success, the ipc id is returned.
Nadia Derbey's avatar
Nadia Derbey committed
366
 */
367
static int ipcget_public(struct ipc_namespace *ns, struct ipc_ids *ids,
Nadia Derbey's avatar
Nadia Derbey committed
368
369
370
371
372
		struct ipc_ops *ops, struct ipc_params *params)
{
	struct kern_ipc_perm *ipcp;
	int flg = params->flg;
	int err;
373
retry:
Nadia Derbey's avatar
Nadia Derbey committed
374
375
	err = idr_pre_get(&ids->ipcs_idr, GFP_KERNEL);

Nadia Derbey's avatar
Nadia Derbey committed
376
377
378
379
380
	/*
	 * Take the lock as a writer since we are potentially going to add
	 * a new entry + read locks are not "upgradable"
	 */
	down_write(&ids->rw_mutex);
Nadia Derbey's avatar
Nadia Derbey committed
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
	ipcp = ipc_findkey(ids, params->key);
	if (ipcp == NULL) {
		/* key not used */
		if (!(flg & IPC_CREAT))
			err = -ENOENT;
		else if (!err)
			err = -ENOMEM;
		else
			err = ops->getnew(ns, params);
	} else {
		/* ipc object has been locked by ipc_findkey() */

		if (flg & IPC_CREAT && flg & IPC_EXCL)
			err = -EEXIST;
		else {
			err = 0;
			if (ops->more_checks)
				err = ops->more_checks(ipcp, params);
			if (!err)
Nadia Derbey's avatar
Nadia Derbey committed
400
401
402
403
				/*
				 * ipc_check_perms returns the IPC id on
				 * success
				 */
Nadia Derbey's avatar
Nadia Derbey committed
404
405
406
407
				err = ipc_check_perms(ipcp, ops, params);
		}
		ipc_unlock(ipcp);
	}
Nadia Derbey's avatar
Nadia Derbey committed
408
	up_write(&ids->rw_mutex);
Nadia Derbey's avatar
Nadia Derbey committed
409

410
411
412
	if (err == -EAGAIN)
		goto retry;

Nadia Derbey's avatar
Nadia Derbey committed
413
414
415
416
	return err;
}


Linus Torvalds's avatar
Linus Torvalds committed
417
418
/**
 *	ipc_rmid	-	remove an IPC identifier
Nadia Derbey's avatar
Nadia Derbey committed
419
420
 *	@ids: IPC identifier set
 *	@ipcp: ipc perm structure containing the identifier to remove
Linus Torvalds's avatar
Linus Torvalds committed
421
 *
Nadia Derbey's avatar
Nadia Derbey committed
422
423
 *	ipc_ids.rw_mutex (as a writer) and the spinlock for this ID are held
 *	before this function is called, and remain locked on the exit.
Linus Torvalds's avatar
Linus Torvalds committed
424
425
 */
 
Nadia Derbey's avatar
Nadia Derbey committed
426
void ipc_rmid(struct ipc_ids *ids, struct kern_ipc_perm *ipcp)
Linus Torvalds's avatar
Linus Torvalds committed
427
{
428
	int lid = ipcid_to_idx(ipcp->id);
Nadia Derbey's avatar
Nadia Derbey committed
429
430

	idr_remove(&ids->ipcs_idr, lid);
Linus Torvalds's avatar
Linus Torvalds committed
431
432
433

	ids->in_use--;

Nadia Derbey's avatar
Nadia Derbey committed
434
435
436
	ipcp->deleted = 1;

	return;
Linus Torvalds's avatar
Linus Torvalds committed
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
}

/**
 *	ipc_alloc	-	allocate ipc space
 *	@size: size desired
 *
 *	Allocate memory from the appropriate pools and return a pointer to it.
 *	NULL is returned if the allocation fails
 */
 
void* ipc_alloc(int size)
{
	void* out;
	if(size > PAGE_SIZE)
		out = vmalloc(size);
	else
		out = kmalloc(size, GFP_KERNEL);
	return out;
}

/**
 *	ipc_free        -       free ipc space
 *	@ptr: pointer returned by ipc_alloc
 *	@size: size of block
 *
462
 *	Free a block created with ipc_alloc(). The caller must know the size
Linus Torvalds's avatar
Linus Torvalds committed
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
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
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
 *	used in the allocation call.
 */

void ipc_free(void* ptr, int size)
{
	if(size > PAGE_SIZE)
		vfree(ptr);
	else
		kfree(ptr);
}

/*
 * rcu allocations:
 * There are three headers that are prepended to the actual allocation:
 * - during use: ipc_rcu_hdr.
 * - during the rcu grace period: ipc_rcu_grace.
 * - [only if vmalloc]: ipc_rcu_sched.
 * Their lifetime doesn't overlap, thus the headers share the same memory.
 * Unlike a normal union, they are right-aligned, thus some container_of
 * forward/backward casting is necessary:
 */
struct ipc_rcu_hdr
{
	int refcount;
	int is_vmalloc;
	void *data[0];
};


struct ipc_rcu_grace
{
	struct rcu_head rcu;
	/* "void *" makes sure alignment of following data is sane. */
	void *data[0];
};

struct ipc_rcu_sched
{
	struct work_struct work;
	/* "void *" makes sure alignment of following data is sane. */
	void *data[0];
};

#define HDRLEN_KMALLOC		(sizeof(struct ipc_rcu_grace) > sizeof(struct ipc_rcu_hdr) ? \
					sizeof(struct ipc_rcu_grace) : sizeof(struct ipc_rcu_hdr))
#define HDRLEN_VMALLOC		(sizeof(struct ipc_rcu_sched) > HDRLEN_KMALLOC ? \
					sizeof(struct ipc_rcu_sched) : HDRLEN_KMALLOC)

static inline int rcu_use_vmalloc(int size)
{
	/* Too big for a single page? */
	if (HDRLEN_KMALLOC + size > PAGE_SIZE)
		return 1;
	return 0;
}

/**
 *	ipc_rcu_alloc	-	allocate ipc and rcu space 
 *	@size: size desired
 *
 *	Allocate memory for the rcu header structure +  the object.
 *	Returns the pointer to the object.
 *	NULL is returned if the allocation fails. 
 */
 
void* ipc_rcu_alloc(int size)
{
	void* out;
	/* 
	 * We prepend the allocation with the rcu struct, and
	 * workqueue if necessary (for vmalloc). 
	 */
	if (rcu_use_vmalloc(size)) {
		out = vmalloc(HDRLEN_VMALLOC + size);
		if (out) {
			out += HDRLEN_VMALLOC;
			container_of(out, struct ipc_rcu_hdr, data)->is_vmalloc = 1;
			container_of(out, struct ipc_rcu_hdr, data)->refcount = 1;
		}
	} else {
		out = kmalloc(HDRLEN_KMALLOC + size, GFP_KERNEL);
		if (out) {
			out += HDRLEN_KMALLOC;
			container_of(out, struct ipc_rcu_hdr, data)->is_vmalloc = 0;
			container_of(out, struct ipc_rcu_hdr, data)->refcount = 1;
		}
	}

	return out;
}

void ipc_rcu_getref(void *ptr)
{
	container_of(ptr, struct ipc_rcu_hdr, data)->refcount++;
}

559
560
561
562
563
static void ipc_do_vfree(struct work_struct *work)
{
	vfree(container_of(work, struct ipc_rcu_sched, work));
}

Linus Torvalds's avatar
Linus Torvalds committed
564
/**
565
566
 * ipc_schedule_free - free ipc + rcu space
 * @head: RCU callback structure for queued work
Linus Torvalds's avatar
Linus Torvalds committed
567
568
 * 
 * Since RCU callback function is called in bh,
569
 * we need to defer the vfree to schedule_work().
Linus Torvalds's avatar
Linus Torvalds committed
570
571
572
 */
static void ipc_schedule_free(struct rcu_head *head)
{
Nadia Derbey's avatar
Nadia Derbey committed
573
574
575
576
577
578
	struct ipc_rcu_grace *grace;
	struct ipc_rcu_sched *sched;

	grace = container_of(head, struct ipc_rcu_grace, rcu);
	sched = container_of(&(grace->data[0]), struct ipc_rcu_sched,
				data[0]);
Linus Torvalds's avatar
Linus Torvalds committed
579

580
	INIT_WORK(&sched->work, ipc_do_vfree);
Linus Torvalds's avatar
Linus Torvalds committed
581
582
583
584
	schedule_work(&sched->work);
}

/**
585
586
 * ipc_immediate_free - free ipc + rcu space
 * @head: RCU callback structure that contains pointer to be freed
Linus Torvalds's avatar
Linus Torvalds committed
587
 *
588
 * Free from the RCU callback context.
Linus Torvalds's avatar
Linus Torvalds committed
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
 */
static void ipc_immediate_free(struct rcu_head *head)
{
	struct ipc_rcu_grace *free =
		container_of(head, struct ipc_rcu_grace, rcu);
	kfree(free);
}

void ipc_rcu_putref(void *ptr)
{
	if (--container_of(ptr, struct ipc_rcu_hdr, data)->refcount > 0)
		return;

	if (container_of(ptr, struct ipc_rcu_hdr, data)->is_vmalloc) {
		call_rcu(&container_of(ptr, struct ipc_rcu_grace, data)->rcu,
				ipc_schedule_free);
	} else {
		call_rcu(&container_of(ptr, struct ipc_rcu_grace, data)->rcu,
				ipc_immediate_free);
	}
}

/**
 *	ipcperms	-	check IPC permissions
 *	@ipcp: IPC permission set
 *	@flag: desired permission set.
 *
 *	Check user, group, other permissions for access
 *	to ipc resources. return 0 if allowed
 */
 
int ipcperms (struct kern_ipc_perm *ipcp, short flag)
{	/* flag will most probably be 0 or S_...UGO from <linux/stat.h> */
622
	uid_t euid = current_euid();
Steve Grubb's avatar
Steve Grubb committed
623
	int requested_mode, granted_mode, err;
Linus Torvalds's avatar
Linus Torvalds committed
624

Steve Grubb's avatar
Steve Grubb committed
625
626
	if (unlikely((err = audit_ipc_obj(ipcp))))
		return err;
Linus Torvalds's avatar
Linus Torvalds committed
627
628
	requested_mode = (flag >> 6) | (flag >> 3) | flag;
	granted_mode = ipcp->mode;
629
630
	if (euid == ipcp->cuid ||
	    euid == ipcp->uid)
Linus Torvalds's avatar
Linus Torvalds committed
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
		granted_mode >>= 6;
	else if (in_group_p(ipcp->cgid) || in_group_p(ipcp->gid))
		granted_mode >>= 3;
	/* is there some bit set in requested_mode but not in granted_mode? */
	if ((requested_mode & ~granted_mode & 0007) && 
	    !capable(CAP_IPC_OWNER))
		return -1;

	return security_ipc_permission(ipcp, flag);
}

/*
 * Functions to convert between the kern_ipc_perm structure and the
 * old/new ipc_perm structures
 */

/**
 *	kernel_to_ipc64_perm	-	convert kernel ipc permissions to user
 *	@in: kernel permissions
 *	@out: new style IPC permissions
 *
652
653
 *	Turn the kernel object @in into a set of permissions descriptions
 *	for returning to userspace (@out).
Linus Torvalds's avatar
Linus Torvalds committed
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
 */
 

void kernel_to_ipc64_perm (struct kern_ipc_perm *in, struct ipc64_perm *out)
{
	out->key	= in->key;
	out->uid	= in->uid;
	out->gid	= in->gid;
	out->cuid	= in->cuid;
	out->cgid	= in->cgid;
	out->mode	= in->mode;
	out->seq	= in->seq;
}

/**
Nadia Derbey's avatar
Nadia Derbey committed
669
 *	ipc64_perm_to_ipc_perm	-	convert new ipc permissions to old
Linus Torvalds's avatar
Linus Torvalds committed
670
671
672
 *	@in: new style IPC permissions
 *	@out: old style IPC permissions
 *
673
674
 *	Turn the new style permissions object @in into a compatibility
 *	object and store it into the @out pointer.
Linus Torvalds's avatar
Linus Torvalds committed
675
676
677
678
679
680
681
682
683
684
685
686
687
 */
 
void ipc64_perm_to_ipc_perm (struct ipc64_perm *in, struct ipc_perm *out)
{
	out->key	= in->key;
	SET_UID(out->uid, in->uid);
	SET_GID(out->gid, in->gid);
	SET_UID(out->cuid, in->cuid);
	SET_GID(out->cgid, in->cgid);
	out->mode	= in->mode;
	out->seq	= in->seq;
}

Nadia Derbey's avatar
Nadia Derbey committed
688
/**
Nadia Derbey's avatar
Nadia Derbey committed
689
 * ipc_lock - Lock an ipc structure without rw_mutex held
Nadia Derbey's avatar
Nadia Derbey committed
690
691
692
693
694
695
696
697
 * @ids: IPC identifier set
 * @id: ipc id to look for
 *
 * Look for an id in the ipc ids idr and lock the associated ipc object.
 *
 * The ipc object is locked on exit.
 */

Nadia Derbey's avatar
Nadia Derbey committed
698
struct kern_ipc_perm *ipc_lock(struct ipc_ids *ids, int id)
Linus Torvalds's avatar
Linus Torvalds committed
699
{
Nadia Derbey's avatar
Nadia Derbey committed
700
	struct kern_ipc_perm *out;
701
	int lid = ipcid_to_idx(id);
Linus Torvalds's avatar
Linus Torvalds committed
702
703

	rcu_read_lock();
Nadia Derbey's avatar
Nadia Derbey committed
704
705
	out = idr_find(&ids->ipcs_idr, lid);
	if (out == NULL) {
Linus Torvalds's avatar
Linus Torvalds committed
706
		rcu_read_unlock();
707
		return ERR_PTR(-EINVAL);
Linus Torvalds's avatar
Linus Torvalds committed
708
	}
Nadia Derbey's avatar
Nadia Derbey committed
709

Linus Torvalds's avatar
Linus Torvalds committed
710
711
712
713
714
715
716
717
	spin_lock(&out->lock);
	
	/* ipc_rmid() may have already freed the ID while ipc_lock
	 * was spinning: here verify that the structure is still valid
	 */
	if (out->deleted) {
		spin_unlock(&out->lock);
		rcu_read_unlock();
718
		return ERR_PTR(-EINVAL);
Linus Torvalds's avatar
Linus Torvalds committed
719
	}
Nadia Derbey's avatar
Nadia Derbey committed
720

Linus Torvalds's avatar
Linus Torvalds committed
721
722
723
	return out;
}

724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752
753
754
755
756
757
758
struct kern_ipc_perm *ipc_lock_check(struct ipc_ids *ids, int id)
{
	struct kern_ipc_perm *out;

	out = ipc_lock(ids, id);
	if (IS_ERR(out))
		return out;

	if (ipc_checkid(out, id)) {
		ipc_unlock(out);
		return ERR_PTR(-EIDRM);
	}

	return out;
}

/**
 * ipcget - Common sys_*get() code
 * @ns : namsepace
 * @ids : IPC identifier set
 * @ops : operations to be called on ipc object creation, permission checks
 *        and further checks
 * @params : the parameters needed by the previous operations.
 *
 * Common routine called by sys_msgget(), sys_semget() and sys_shmget().
 */
int ipcget(struct ipc_namespace *ns, struct ipc_ids *ids,
			struct ipc_ops *ops, struct ipc_params *params)
{
	if (params->key == IPC_PRIVATE)
		return ipcget_new(ns, ids, ops, params);
	else
		return ipcget_public(ns, ids, ops, params);
}

759
760
761
762
763
764
765
766
767
768
769
770
771
/**
 * ipc_update_perm - update the permissions of an IPC.
 * @in:  the permission given as input.
 * @out: the permission of the ipc to set.
 */
void ipc_update_perm(struct ipc64_perm *in, struct kern_ipc_perm *out)
{
	out->uid = in->uid;
	out->gid = in->gid;
	out->mode = (out->mode & ~S_IRWXUGO)
		| (in->mode & S_IRWXUGO);
}

772
773
774
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
/**
 * ipcctl_pre_down - retrieve an ipc and check permissions for some IPC_XXX cmd
 * @ids:  the table of ids where to look for the ipc
 * @id:   the id of the ipc to retrieve
 * @cmd:  the cmd to check
 * @perm: the permission to set
 * @extra_perm: one extra permission parameter used by msq
 *
 * This function does some common audit and permissions check for some IPC_XXX
 * cmd and is called from semctl_down, shmctl_down and msgctl_down.
 * It must be called without any lock held and
 *  - retrieves the ipc with the given id in the given table.
 *  - performs some audit and permission check, depending on the given cmd
 *  - returns the ipc with both ipc and rw_mutex locks held in case of success
 *    or an err-code without any lock held otherwise.
 */
struct kern_ipc_perm *ipcctl_pre_down(struct ipc_ids *ids, int id, int cmd,
				      struct ipc64_perm *perm, int extra_perm)
{
	struct kern_ipc_perm *ipcp;
792
	uid_t euid;
793
794
795
	int err;

	down_write(&ids->rw_mutex);
Nadia Derbey's avatar
Nadia Derbey committed
796
	ipcp = ipc_lock_check(ids, id);
797
798
799
800
801
802
803
804
805
806
807
808
809
810
811
	if (IS_ERR(ipcp)) {
		err = PTR_ERR(ipcp);
		goto out_up;
	}

	err = audit_ipc_obj(ipcp);
	if (err)
		goto out_unlock;

	if (cmd == IPC_SET) {
		err = audit_ipc_set_perm(extra_perm, perm->uid,
					 perm->gid, perm->mode);
		if (err)
			goto out_unlock;
	}
812
813
814
815

	euid = current_euid();
	if (euid == ipcp->cuid ||
	    euid == ipcp->uid  || capable(CAP_SYS_ADMIN))
816
817
818
819
820
821
822
823
824
825
		return ipcp;

	err = -EPERM;
out_unlock:
	ipc_unlock(ipcp);
out_up:
	up_write(&ids->rw_mutex);
	return ERR_PTR(err);
}

Linus Torvalds's avatar
Linus Torvalds committed
826
827
828
829
830
831
832
833
#ifdef __ARCH_WANT_IPC_PARSE_VERSION


/**
 *	ipc_parse_version	-	IPC call version
 *	@cmd: pointer to command
 *
 *	Return IPC_64 for new style IPC and IPC_OLD for old style IPC. 
834
 *	The @cmd value is turned from an encoding command and version into
Linus Torvalds's avatar
Linus Torvalds committed
835
836
837
838
839
840
841
842
843
844
845
846
847
848
 *	just the command code.
 */
 
int ipc_parse_version (int *cmd)
{
	if (*cmd & IPC_64) {
		*cmd ^= IPC_64;
		return IPC_64;
	} else {
		return IPC_OLD;
	}
}

#endif /* __ARCH_WANT_IPC_PARSE_VERSION */
849
850

#ifdef CONFIG_PROC_FS
851
852
853
854
855
struct ipc_proc_iter {
	struct ipc_namespace *ns;
	struct ipc_proc_iface *iface;
};

Nadia Derbey's avatar
Nadia Derbey committed
856
857
858
/*
 * This routine locks the ipc structure found at least at position pos.
 */
859
860
static struct kern_ipc_perm *sysvipc_find_ipc(struct ipc_ids *ids, loff_t pos,
					      loff_t *new_pos)
861
{
Nadia Derbey's avatar
Nadia Derbey committed
862
863
	struct kern_ipc_perm *ipc;
	int total, id;
864

Nadia Derbey's avatar
Nadia Derbey committed
865
866
867
868
869
870
	total = 0;
	for (id = 0; id < pos && total < ids->in_use; id++) {
		ipc = idr_find(&ids->ipcs_idr, id);
		if (ipc != NULL)
			total++;
	}
871

Nadia Derbey's avatar
Nadia Derbey committed
872
873
	if (total >= ids->in_use)
		return NULL;
874

Nadia Derbey's avatar
Nadia Derbey committed
875
876
877
878
879
	for ( ; pos < IPCMNI; pos++) {
		ipc = idr_find(&ids->ipcs_idr, pos);
		if (ipc != NULL) {
			*new_pos = pos + 1;
			ipc_lock_by_ptr(ipc);
880
881
882
883
884
885
886
887
			return ipc;
		}
	}

	/* Out of range - return NULL to terminate iteration */
	return NULL;
}

Nadia Derbey's avatar
Nadia Derbey committed
888
889
890
891
892
893
894
895
896
897
static void *sysvipc_proc_next(struct seq_file *s, void *it, loff_t *pos)
{
	struct ipc_proc_iter *iter = s->private;
	struct ipc_proc_iface *iface = iter->iface;
	struct kern_ipc_perm *ipc = it;

	/* If we had an ipc id locked before, unlock it */
	if (ipc && ipc != SEQ_START_TOKEN)
		ipc_unlock(ipc);

898
	return sysvipc_find_ipc(&iter->ns->ids[iface->ids], *pos, pos);
Nadia Derbey's avatar
Nadia Derbey committed
899
900
}

901
/*
Nadia Derbey's avatar
Nadia Derbey committed
902
903
 * File positions: pos 0 -> header, pos n -> ipc id = n - 1.
 * SeqFile iterator: iterator value locked ipc pointer or SEQ_TOKEN_START.
904
905
906
 */
static void *sysvipc_proc_start(struct seq_file *s, loff_t *pos)
{
907
908
	struct ipc_proc_iter *iter = s->private;
	struct ipc_proc_iface *iface = iter->iface;
909
910
	struct ipc_ids *ids;

911
	ids = &iter->ns->ids[iface->ids];
912
913
914
915
916

	/*
	 * Take the lock - this will be released by the corresponding
	 * call to stop().
	 */
Nadia Derbey's avatar
Nadia Derbey committed
917
	down_read(&ids->rw_mutex);
918
919
920
921
922
923
924
925
926
927

	/* pos < 0 is invalid */
	if (*pos < 0)
		return NULL;

	/* pos == 0 means header */
	if (*pos == 0)
		return SEQ_START_TOKEN;

	/* Find the (pos-1)th ipc */
Nadia Derbey's avatar
Nadia Derbey committed
928
	return sysvipc_find_ipc(ids, *pos - 1, pos);
929
930
931
932
933
}

static void sysvipc_proc_stop(struct seq_file *s, void *it)
{
	struct kern_ipc_perm *ipc = it;
934
935
	struct ipc_proc_iter *iter = s->private;
	struct ipc_proc_iface *iface = iter->iface;
936
	struct ipc_ids *ids;
937

Nadia Derbey's avatar
Nadia Derbey committed
938
	/* If we had a locked structure, release it */
939
940
941
	if (ipc && ipc != SEQ_START_TOKEN)
		ipc_unlock(ipc);

942
	ids = &iter->ns->ids[iface->ids];
943
	/* Release the lock we took in start() */
Nadia Derbey's avatar
Nadia Derbey committed
944
	up_read(&ids->rw_mutex);
945
946
947
948
}

static int sysvipc_proc_show(struct seq_file *s, void *it)
{
949
950
	struct ipc_proc_iter *iter = s->private;
	struct ipc_proc_iface *iface = iter->iface;
951
952
953
954
955
956
957
958
959
960
961
962
963
964

	if (it == SEQ_START_TOKEN)
		return seq_puts(s, iface->header);

	return iface->show(s, it);
}

static struct seq_operations sysvipc_proc_seqops = {
	.start = sysvipc_proc_start,
	.stop  = sysvipc_proc_stop,
	.next  = sysvipc_proc_next,
	.show  = sysvipc_proc_show,
};

965
966
static int sysvipc_proc_open(struct inode *inode, struct file *file)
{
967
968
	int ret;
	struct seq_file *seq;
969
970
971
972
973
974
	struct ipc_proc_iter *iter;

	ret = -ENOMEM;
	iter = kmalloc(sizeof(*iter), GFP_KERNEL);
	if (!iter)
		goto out;
975
976

	ret = seq_open(file, &sysvipc_proc_seqops);
977
978
979
980
981
982
983
984
985
	if (ret)
		goto out_kfree;

	seq = file->private_data;
	seq->private = iter;

	iter->iface = PDE(inode)->data;
	iter->ns    = get_ipc_ns(current->nsproxy->ipc_ns);
out:
986
	return ret;
987
988
989
990
991
992
993
994
995
996
997
out_kfree:
	kfree(iter);
	goto out;
}

static int sysvipc_proc_release(struct inode *inode, struct file *file)
{
	struct seq_file *seq = file->private_data;
	struct ipc_proc_iter *iter = seq->private;
	put_ipc_ns(iter->ns);
	return seq_release_private(inode, file);
998
999
}

1000
static const struct file_operations sysvipc_proc_fops = {
1001
1002
1003
	.open    = sysvipc_proc_open,
	.read    = seq_read,
	.llseek  = seq_lseek,
1004
	.release = sysvipc_proc_release,
1005
1006
};
#endif /* CONFIG_PROC_FS */