Linux Audio

Check our new training course

Loading...
v4.6
  1/*
  2 * Implementation of the access vector table type.
  3 *
  4 * Author : Stephen Smalley, <sds@epoch.ncsc.mil>
  5 */
  6
  7/* Updated: Frank Mayer <mayerf@tresys.com> and Karl MacMillan <kmacmillan@tresys.com>
  8 *
  9 *	Added conditional policy language extensions
 10 *
 11 * Copyright (C) 2003 Tresys Technology, LLC
 12 *	This program is free software; you can redistribute it and/or modify
 13 *	it under the terms of the GNU General Public License as published by
 14 *	the Free Software Foundation, version 2.
 15 *
 16 * Updated: Yuichi Nakamura <ynakam@hitachisoft.jp>
 17 *	Tuned number of hash slots for avtab to reduce memory usage
 18 */
 19
 20#include <linux/kernel.h>
 21#include <linux/slab.h>
 22#include <linux/errno.h>
 23#include "avtab.h"
 24#include "policydb.h"
 25
 26static struct kmem_cache *avtab_node_cachep;
 27static struct kmem_cache *avtab_xperms_cachep;
 28
 29/* Based on MurmurHash3, written by Austin Appleby and placed in the
 30 * public domain.
 31 */
 32static inline int avtab_hash(struct avtab_key *keyp, u32 mask)
 33{
 34	static const u32 c1 = 0xcc9e2d51;
 35	static const u32 c2 = 0x1b873593;
 36	static const u32 r1 = 15;
 37	static const u32 r2 = 13;
 38	static const u32 m  = 5;
 39	static const u32 n  = 0xe6546b64;
 40
 41	u32 hash = 0;
 42
 43#define mix(input) { \
 44	u32 v = input; \
 45	v *= c1; \
 46	v = (v << r1) | (v >> (32 - r1)); \
 47	v *= c2; \
 48	hash ^= v; \
 49	hash = (hash << r2) | (hash >> (32 - r2)); \
 50	hash = hash * m + n; \
 51}
 52
 53	mix(keyp->target_class);
 54	mix(keyp->target_type);
 55	mix(keyp->source_type);
 56
 57#undef mix
 58
 59	hash ^= hash >> 16;
 60	hash *= 0x85ebca6b;
 61	hash ^= hash >> 13;
 62	hash *= 0xc2b2ae35;
 63	hash ^= hash >> 16;
 64
 65	return hash & mask;
 66}
 67
 68static struct avtab_node*
 69avtab_insert_node(struct avtab *h, int hvalue,
 70		  struct avtab_node *prev, struct avtab_node *cur,
 71		  struct avtab_key *key, struct avtab_datum *datum)
 72{
 73	struct avtab_node *newnode;
 74	struct avtab_extended_perms *xperms;
 75	newnode = kmem_cache_zalloc(avtab_node_cachep, GFP_KERNEL);
 76	if (newnode == NULL)
 77		return NULL;
 78	newnode->key = *key;
 79
 80	if (key->specified & AVTAB_XPERMS) {
 81		xperms = kmem_cache_zalloc(avtab_xperms_cachep, GFP_KERNEL);
 82		if (xperms == NULL) {
 83			kmem_cache_free(avtab_node_cachep, newnode);
 84			return NULL;
 85		}
 86		*xperms = *(datum->u.xperms);
 87		newnode->datum.u.xperms = xperms;
 88	} else {
 89		newnode->datum.u.data = datum->u.data;
 90	}
 91
 92	if (prev) {
 93		newnode->next = prev->next;
 94		prev->next = newnode;
 95	} else {
 96		newnode->next = flex_array_get_ptr(h->htable, hvalue);
 97		if (flex_array_put_ptr(h->htable, hvalue, newnode,
 98				       GFP_KERNEL|__GFP_ZERO)) {
 99			kmem_cache_free(avtab_node_cachep, newnode);
100			return NULL;
101		}
102	}
103
104	h->nel++;
105	return newnode;
106}
107
108static int avtab_insert(struct avtab *h, struct avtab_key *key, struct avtab_datum *datum)
109{
110	int hvalue;
111	struct avtab_node *prev, *cur, *newnode;
112	u16 specified = key->specified & ~(AVTAB_ENABLED|AVTAB_ENABLED_OLD);
113
114	if (!h || !h->htable)
115		return -EINVAL;
116
117	hvalue = avtab_hash(key, h->mask);
118	for (prev = NULL, cur = flex_array_get_ptr(h->htable, hvalue);
119	     cur;
120	     prev = cur, cur = cur->next) {
121		if (key->source_type == cur->key.source_type &&
122		    key->target_type == cur->key.target_type &&
123		    key->target_class == cur->key.target_class &&
124		    (specified & cur->key.specified)) {
125			/* extended perms may not be unique */
126			if (specified & AVTAB_XPERMS)
127				break;
128			return -EEXIST;
129		}
130		if (key->source_type < cur->key.source_type)
131			break;
132		if (key->source_type == cur->key.source_type &&
133		    key->target_type < cur->key.target_type)
134			break;
135		if (key->source_type == cur->key.source_type &&
136		    key->target_type == cur->key.target_type &&
137		    key->target_class < cur->key.target_class)
138			break;
139	}
140
141	newnode = avtab_insert_node(h, hvalue, prev, cur, key, datum);
142	if (!newnode)
143		return -ENOMEM;
144
145	return 0;
146}
147
148/* Unlike avtab_insert(), this function allow multiple insertions of the same
149 * key/specified mask into the table, as needed by the conditional avtab.
150 * It also returns a pointer to the node inserted.
151 */
152struct avtab_node *
153avtab_insert_nonunique(struct avtab *h, struct avtab_key *key, struct avtab_datum *datum)
154{
155	int hvalue;
156	struct avtab_node *prev, *cur;
157	u16 specified = key->specified & ~(AVTAB_ENABLED|AVTAB_ENABLED_OLD);
158
159	if (!h || !h->htable)
160		return NULL;
161	hvalue = avtab_hash(key, h->mask);
162	for (prev = NULL, cur = flex_array_get_ptr(h->htable, hvalue);
163	     cur;
164	     prev = cur, cur = cur->next) {
165		if (key->source_type == cur->key.source_type &&
166		    key->target_type == cur->key.target_type &&
167		    key->target_class == cur->key.target_class &&
168		    (specified & cur->key.specified))
169			break;
170		if (key->source_type < cur->key.source_type)
171			break;
172		if (key->source_type == cur->key.source_type &&
173		    key->target_type < cur->key.target_type)
174			break;
175		if (key->source_type == cur->key.source_type &&
176		    key->target_type == cur->key.target_type &&
177		    key->target_class < cur->key.target_class)
178			break;
179	}
180	return avtab_insert_node(h, hvalue, prev, cur, key, datum);
181}
182
183struct avtab_datum *avtab_search(struct avtab *h, struct avtab_key *key)
184{
185	int hvalue;
186	struct avtab_node *cur;
187	u16 specified = key->specified & ~(AVTAB_ENABLED|AVTAB_ENABLED_OLD);
188
189	if (!h || !h->htable)
190		return NULL;
191
192	hvalue = avtab_hash(key, h->mask);
193	for (cur = flex_array_get_ptr(h->htable, hvalue); cur;
194	     cur = cur->next) {
195		if (key->source_type == cur->key.source_type &&
196		    key->target_type == cur->key.target_type &&
197		    key->target_class == cur->key.target_class &&
198		    (specified & cur->key.specified))
199			return &cur->datum;
200
201		if (key->source_type < cur->key.source_type)
202			break;
203		if (key->source_type == cur->key.source_type &&
204		    key->target_type < cur->key.target_type)
205			break;
206		if (key->source_type == cur->key.source_type &&
207		    key->target_type == cur->key.target_type &&
208		    key->target_class < cur->key.target_class)
209			break;
210	}
211
212	return NULL;
213}
214
215/* This search function returns a node pointer, and can be used in
216 * conjunction with avtab_search_next_node()
217 */
218struct avtab_node*
219avtab_search_node(struct avtab *h, struct avtab_key *key)
220{
221	int hvalue;
222	struct avtab_node *cur;
223	u16 specified = key->specified & ~(AVTAB_ENABLED|AVTAB_ENABLED_OLD);
224
225	if (!h || !h->htable)
226		return NULL;
227
228	hvalue = avtab_hash(key, h->mask);
229	for (cur = flex_array_get_ptr(h->htable, hvalue); cur;
230	     cur = cur->next) {
231		if (key->source_type == cur->key.source_type &&
232		    key->target_type == cur->key.target_type &&
233		    key->target_class == cur->key.target_class &&
234		    (specified & cur->key.specified))
235			return cur;
236
237		if (key->source_type < cur->key.source_type)
238			break;
239		if (key->source_type == cur->key.source_type &&
240		    key->target_type < cur->key.target_type)
241			break;
242		if (key->source_type == cur->key.source_type &&
243		    key->target_type == cur->key.target_type &&
244		    key->target_class < cur->key.target_class)
245			break;
246	}
247	return NULL;
248}
249
250struct avtab_node*
251avtab_search_node_next(struct avtab_node *node, int specified)
252{
253	struct avtab_node *cur;
254
255	if (!node)
256		return NULL;
257
258	specified &= ~(AVTAB_ENABLED|AVTAB_ENABLED_OLD);
259	for (cur = node->next; cur; cur = cur->next) {
260		if (node->key.source_type == cur->key.source_type &&
261		    node->key.target_type == cur->key.target_type &&
262		    node->key.target_class == cur->key.target_class &&
263		    (specified & cur->key.specified))
264			return cur;
265
266		if (node->key.source_type < cur->key.source_type)
267			break;
268		if (node->key.source_type == cur->key.source_type &&
269		    node->key.target_type < cur->key.target_type)
270			break;
271		if (node->key.source_type == cur->key.source_type &&
272		    node->key.target_type == cur->key.target_type &&
273		    node->key.target_class < cur->key.target_class)
274			break;
275	}
276	return NULL;
277}
278
279void avtab_destroy(struct avtab *h)
280{
281	int i;
282	struct avtab_node *cur, *temp;
283
284	if (!h || !h->htable)
285		return;
286
287	for (i = 0; i < h->nslot; i++) {
288		cur = flex_array_get_ptr(h->htable, i);
289		while (cur) {
290			temp = cur;
291			cur = cur->next;
292			if (temp->key.specified & AVTAB_XPERMS)
293				kmem_cache_free(avtab_xperms_cachep,
294						temp->datum.u.xperms);
295			kmem_cache_free(avtab_node_cachep, temp);
296		}
297	}
298	flex_array_free(h->htable);
299	h->htable = NULL;
300	h->nslot = 0;
301	h->mask = 0;
302}
303
304int avtab_init(struct avtab *h)
305{
 
306	h->htable = NULL;
307	h->nel = 0;
308	return 0;
309}
310
311int avtab_alloc(struct avtab *h, u32 nrules)
312{
313	u32 mask = 0;
314	u32 shift = 0;
315	u32 work = nrules;
316	u32 nslot = 0;
317
318	if (nrules == 0)
319		goto avtab_alloc_out;
320
321	while (work) {
322		work  = work >> 1;
323		shift++;
324	}
325	if (shift > 2)
326		shift = shift - 2;
327	nslot = 1 << shift;
328	if (nslot > MAX_AVTAB_HASH_BUCKETS)
329		nslot = MAX_AVTAB_HASH_BUCKETS;
330	mask = nslot - 1;
331
332	h->htable = flex_array_alloc(sizeof(struct avtab_node *), nslot,
333				     GFP_KERNEL | __GFP_ZERO);
334	if (!h->htable)
335		return -ENOMEM;
336
337 avtab_alloc_out:
338	h->nel = 0;
339	h->nslot = nslot;
340	h->mask = mask;
341	printk(KERN_DEBUG "SELinux: %d avtab hash slots, %d rules.\n",
342	       h->nslot, nrules);
343	return 0;
344}
345
346void avtab_hash_eval(struct avtab *h, char *tag)
347{
348	int i, chain_len, slots_used, max_chain_len;
349	unsigned long long chain2_len_sum;
350	struct avtab_node *cur;
351
352	slots_used = 0;
353	max_chain_len = 0;
354	chain2_len_sum = 0;
355	for (i = 0; i < h->nslot; i++) {
356		cur = flex_array_get_ptr(h->htable, i);
357		if (cur) {
358			slots_used++;
359			chain_len = 0;
360			while (cur) {
361				chain_len++;
362				cur = cur->next;
363			}
364
365			if (chain_len > max_chain_len)
366				max_chain_len = chain_len;
367			chain2_len_sum += chain_len * chain_len;
368		}
369	}
370
371	printk(KERN_DEBUG "SELinux: %s:  %d entries and %d/%d buckets used, "
372	       "longest chain length %d sum of chain length^2 %llu\n",
373	       tag, h->nel, slots_used, h->nslot, max_chain_len,
374	       chain2_len_sum);
375}
376
377static uint16_t spec_order[] = {
378	AVTAB_ALLOWED,
379	AVTAB_AUDITDENY,
380	AVTAB_AUDITALLOW,
381	AVTAB_TRANSITION,
382	AVTAB_CHANGE,
383	AVTAB_MEMBER,
384	AVTAB_XPERMS_ALLOWED,
385	AVTAB_XPERMS_AUDITALLOW,
386	AVTAB_XPERMS_DONTAUDIT
387};
388
389int avtab_read_item(struct avtab *a, void *fp, struct policydb *pol,
390		    int (*insertf)(struct avtab *a, struct avtab_key *k,
391				   struct avtab_datum *d, void *p),
392		    void *p)
393{
394	__le16 buf16[4];
395	u16 enabled;
396	u32 items, items2, val, vers = pol->policyvers;
397	struct avtab_key key;
398	struct avtab_datum datum;
399	struct avtab_extended_perms xperms;
400	__le32 buf32[ARRAY_SIZE(xperms.perms.p)];
401	int i, rc;
402	unsigned set;
403
404	memset(&key, 0, sizeof(struct avtab_key));
405	memset(&datum, 0, sizeof(struct avtab_datum));
406
407	if (vers < POLICYDB_VERSION_AVTAB) {
408		rc = next_entry(buf32, fp, sizeof(u32));
409		if (rc) {
410			printk(KERN_ERR "SELinux: avtab: truncated entry\n");
411			return rc;
412		}
413		items2 = le32_to_cpu(buf32[0]);
414		if (items2 > ARRAY_SIZE(buf32)) {
415			printk(KERN_ERR "SELinux: avtab: entry overflow\n");
416			return -EINVAL;
417
418		}
419		rc = next_entry(buf32, fp, sizeof(u32)*items2);
420		if (rc) {
421			printk(KERN_ERR "SELinux: avtab: truncated entry\n");
422			return rc;
423		}
424		items = 0;
425
426		val = le32_to_cpu(buf32[items++]);
427		key.source_type = (u16)val;
428		if (key.source_type != val) {
429			printk(KERN_ERR "SELinux: avtab: truncated source type\n");
430			return -EINVAL;
431		}
432		val = le32_to_cpu(buf32[items++]);
433		key.target_type = (u16)val;
434		if (key.target_type != val) {
435			printk(KERN_ERR "SELinux: avtab: truncated target type\n");
436			return -EINVAL;
437		}
438		val = le32_to_cpu(buf32[items++]);
439		key.target_class = (u16)val;
440		if (key.target_class != val) {
441			printk(KERN_ERR "SELinux: avtab: truncated target class\n");
442			return -EINVAL;
443		}
444
445		val = le32_to_cpu(buf32[items++]);
446		enabled = (val & AVTAB_ENABLED_OLD) ? AVTAB_ENABLED : 0;
447
448		if (!(val & (AVTAB_AV | AVTAB_TYPE))) {
449			printk(KERN_ERR "SELinux: avtab: null entry\n");
450			return -EINVAL;
451		}
452		if ((val & AVTAB_AV) &&
453		    (val & AVTAB_TYPE)) {
454			printk(KERN_ERR "SELinux: avtab: entry has both access vectors and types\n");
455			return -EINVAL;
456		}
457		if (val & AVTAB_XPERMS) {
458			printk(KERN_ERR "SELinux: avtab: entry has extended permissions\n");
459			return -EINVAL;
460		}
461
462		for (i = 0; i < ARRAY_SIZE(spec_order); i++) {
463			if (val & spec_order[i]) {
464				key.specified = spec_order[i] | enabled;
465				datum.u.data = le32_to_cpu(buf32[items++]);
466				rc = insertf(a, &key, &datum, p);
467				if (rc)
468					return rc;
469			}
470		}
471
472		if (items != items2) {
473			printk(KERN_ERR "SELinux: avtab: entry only had %d items, expected %d\n", items2, items);
 
474			return -EINVAL;
475		}
476		return 0;
477	}
478
479	rc = next_entry(buf16, fp, sizeof(u16)*4);
480	if (rc) {
481		printk(KERN_ERR "SELinux: avtab: truncated entry\n");
482		return rc;
483	}
484
485	items = 0;
486	key.source_type = le16_to_cpu(buf16[items++]);
487	key.target_type = le16_to_cpu(buf16[items++]);
488	key.target_class = le16_to_cpu(buf16[items++]);
489	key.specified = le16_to_cpu(buf16[items++]);
490
491	if (!policydb_type_isvalid(pol, key.source_type) ||
492	    !policydb_type_isvalid(pol, key.target_type) ||
493	    !policydb_class_isvalid(pol, key.target_class)) {
494		printk(KERN_ERR "SELinux: avtab: invalid type or class\n");
495		return -EINVAL;
496	}
497
498	set = 0;
499	for (i = 0; i < ARRAY_SIZE(spec_order); i++) {
500		if (key.specified & spec_order[i])
501			set++;
502	}
503	if (!set || set > 1) {
504		printk(KERN_ERR "SELinux:  avtab:  more than one specifier\n");
505		return -EINVAL;
506	}
507
508	if ((vers < POLICYDB_VERSION_XPERMS_IOCTL) &&
509			(key.specified & AVTAB_XPERMS)) {
510		printk(KERN_ERR "SELinux:  avtab:  policy version %u does not "
511				"support extended permissions rules and one "
512				"was specified\n", vers);
513		return -EINVAL;
514	} else if (key.specified & AVTAB_XPERMS) {
515		memset(&xperms, 0, sizeof(struct avtab_extended_perms));
516		rc = next_entry(&xperms.specified, fp, sizeof(u8));
517		if (rc) {
518			printk(KERN_ERR "SELinux: avtab: truncated entry\n");
519			return rc;
520		}
521		rc = next_entry(&xperms.driver, fp, sizeof(u8));
522		if (rc) {
523			printk(KERN_ERR "SELinux: avtab: truncated entry\n");
524			return rc;
525		}
526		rc = next_entry(buf32, fp, sizeof(u32)*ARRAY_SIZE(xperms.perms.p));
527		if (rc) {
528			printk(KERN_ERR "SELinux: avtab: truncated entry\n");
529			return rc;
530		}
531		for (i = 0; i < ARRAY_SIZE(xperms.perms.p); i++)
532			xperms.perms.p[i] = le32_to_cpu(buf32[i]);
533		datum.u.xperms = &xperms;
534	} else {
535		rc = next_entry(buf32, fp, sizeof(u32));
536		if (rc) {
537			printk(KERN_ERR "SELinux: avtab: truncated entry\n");
538			return rc;
539		}
540		datum.u.data = le32_to_cpu(*buf32);
541	}
542	if ((key.specified & AVTAB_TYPE) &&
543	    !policydb_type_isvalid(pol, datum.u.data)) {
544		printk(KERN_ERR "SELinux: avtab: invalid type\n");
545		return -EINVAL;
546	}
547	return insertf(a, &key, &datum, p);
548}
549
550static int avtab_insertf(struct avtab *a, struct avtab_key *k,
551			 struct avtab_datum *d, void *p)
552{
553	return avtab_insert(a, k, d);
554}
555
556int avtab_read(struct avtab *a, void *fp, struct policydb *pol)
557{
558	int rc;
559	__le32 buf[1];
560	u32 nel, i;
561
562
563	rc = next_entry(buf, fp, sizeof(u32));
564	if (rc < 0) {
565		printk(KERN_ERR "SELinux: avtab: truncated table\n");
566		goto bad;
567	}
568	nel = le32_to_cpu(buf[0]);
569	if (!nel) {
570		printk(KERN_ERR "SELinux: avtab: table is empty\n");
571		rc = -EINVAL;
572		goto bad;
573	}
574
575	rc = avtab_alloc(a, nel);
576	if (rc)
577		goto bad;
578
579	for (i = 0; i < nel; i++) {
580		rc = avtab_read_item(a, fp, pol, avtab_insertf, NULL);
581		if (rc) {
582			if (rc == -ENOMEM)
583				printk(KERN_ERR "SELinux: avtab: out of memory\n");
584			else if (rc == -EEXIST)
585				printk(KERN_ERR "SELinux: avtab: duplicate entry\n");
586
587			goto bad;
588		}
589	}
590
591	rc = 0;
592out:
593	return rc;
594
595bad:
596	avtab_destroy(a);
597	goto out;
598}
599
600int avtab_write_item(struct policydb *p, struct avtab_node *cur, void *fp)
601{
602	__le16 buf16[4];
603	__le32 buf32[ARRAY_SIZE(cur->datum.u.xperms->perms.p)];
604	int rc;
605	unsigned int i;
606
607	buf16[0] = cpu_to_le16(cur->key.source_type);
608	buf16[1] = cpu_to_le16(cur->key.target_type);
609	buf16[2] = cpu_to_le16(cur->key.target_class);
610	buf16[3] = cpu_to_le16(cur->key.specified);
611	rc = put_entry(buf16, sizeof(u16), 4, fp);
612	if (rc)
613		return rc;
614
615	if (cur->key.specified & AVTAB_XPERMS) {
616		rc = put_entry(&cur->datum.u.xperms->specified, sizeof(u8), 1, fp);
617		if (rc)
618			return rc;
619		rc = put_entry(&cur->datum.u.xperms->driver, sizeof(u8), 1, fp);
620		if (rc)
621			return rc;
622		for (i = 0; i < ARRAY_SIZE(cur->datum.u.xperms->perms.p); i++)
623			buf32[i] = cpu_to_le32(cur->datum.u.xperms->perms.p[i]);
624		rc = put_entry(buf32, sizeof(u32),
625				ARRAY_SIZE(cur->datum.u.xperms->perms.p), fp);
626	} else {
627		buf32[0] = cpu_to_le32(cur->datum.u.data);
628		rc = put_entry(buf32, sizeof(u32), 1, fp);
629	}
630	if (rc)
631		return rc;
632	return 0;
633}
634
635int avtab_write(struct policydb *p, struct avtab *a, void *fp)
636{
637	unsigned int i;
638	int rc = 0;
639	struct avtab_node *cur;
640	__le32 buf[1];
641
642	buf[0] = cpu_to_le32(a->nel);
643	rc = put_entry(buf, sizeof(u32), 1, fp);
644	if (rc)
645		return rc;
646
647	for (i = 0; i < a->nslot; i++) {
648		for (cur = flex_array_get_ptr(a->htable, i); cur;
649		     cur = cur->next) {
650			rc = avtab_write_item(p, cur, fp);
651			if (rc)
652				return rc;
653		}
654	}
655
656	return rc;
657}
658void avtab_cache_init(void)
 
659{
660	avtab_node_cachep = kmem_cache_create("avtab_node",
661					      sizeof(struct avtab_node),
662					      0, SLAB_PANIC, NULL);
663	avtab_xperms_cachep = kmem_cache_create("avtab_extended_perms",
664						sizeof(struct avtab_extended_perms),
665						0, SLAB_PANIC, NULL);
666}
667
668void avtab_cache_destroy(void)
669{
670	kmem_cache_destroy(avtab_node_cachep);
671	kmem_cache_destroy(avtab_xperms_cachep);
672}
v5.4
  1/*
  2 * Implementation of the access vector table type.
  3 *
  4 * Author : Stephen Smalley, <sds@tycho.nsa.gov>
  5 */
  6
  7/* Updated: Frank Mayer <mayerf@tresys.com> and Karl MacMillan <kmacmillan@tresys.com>
  8 *
  9 *	Added conditional policy language extensions
 10 *
 11 * Copyright (C) 2003 Tresys Technology, LLC
 12 *	This program is free software; you can redistribute it and/or modify
 13 *	it under the terms of the GNU General Public License as published by
 14 *	the Free Software Foundation, version 2.
 15 *
 16 * Updated: Yuichi Nakamura <ynakam@hitachisoft.jp>
 17 *	Tuned number of hash slots for avtab to reduce memory usage
 18 */
 19
 20#include <linux/kernel.h>
 21#include <linux/slab.h>
 22#include <linux/errno.h>
 23#include "avtab.h"
 24#include "policydb.h"
 25
 26static struct kmem_cache *avtab_node_cachep;
 27static struct kmem_cache *avtab_xperms_cachep;
 28
 29/* Based on MurmurHash3, written by Austin Appleby and placed in the
 30 * public domain.
 31 */
 32static inline int avtab_hash(struct avtab_key *keyp, u32 mask)
 33{
 34	static const u32 c1 = 0xcc9e2d51;
 35	static const u32 c2 = 0x1b873593;
 36	static const u32 r1 = 15;
 37	static const u32 r2 = 13;
 38	static const u32 m  = 5;
 39	static const u32 n  = 0xe6546b64;
 40
 41	u32 hash = 0;
 42
 43#define mix(input) { \
 44	u32 v = input; \
 45	v *= c1; \
 46	v = (v << r1) | (v >> (32 - r1)); \
 47	v *= c2; \
 48	hash ^= v; \
 49	hash = (hash << r2) | (hash >> (32 - r2)); \
 50	hash = hash * m + n; \
 51}
 52
 53	mix(keyp->target_class);
 54	mix(keyp->target_type);
 55	mix(keyp->source_type);
 56
 57#undef mix
 58
 59	hash ^= hash >> 16;
 60	hash *= 0x85ebca6b;
 61	hash ^= hash >> 13;
 62	hash *= 0xc2b2ae35;
 63	hash ^= hash >> 16;
 64
 65	return hash & mask;
 66}
 67
 68static struct avtab_node*
 69avtab_insert_node(struct avtab *h, int hvalue,
 70		  struct avtab_node *prev, struct avtab_node *cur,
 71		  struct avtab_key *key, struct avtab_datum *datum)
 72{
 73	struct avtab_node *newnode;
 74	struct avtab_extended_perms *xperms;
 75	newnode = kmem_cache_zalloc(avtab_node_cachep, GFP_KERNEL);
 76	if (newnode == NULL)
 77		return NULL;
 78	newnode->key = *key;
 79
 80	if (key->specified & AVTAB_XPERMS) {
 81		xperms = kmem_cache_zalloc(avtab_xperms_cachep, GFP_KERNEL);
 82		if (xperms == NULL) {
 83			kmem_cache_free(avtab_node_cachep, newnode);
 84			return NULL;
 85		}
 86		*xperms = *(datum->u.xperms);
 87		newnode->datum.u.xperms = xperms;
 88	} else {
 89		newnode->datum.u.data = datum->u.data;
 90	}
 91
 92	if (prev) {
 93		newnode->next = prev->next;
 94		prev->next = newnode;
 95	} else {
 96		struct avtab_node **n = &h->htable[hvalue];
 97
 98		newnode->next = *n;
 99		*n = newnode;
 
 
100	}
101
102	h->nel++;
103	return newnode;
104}
105
106static int avtab_insert(struct avtab *h, struct avtab_key *key, struct avtab_datum *datum)
107{
108	int hvalue;
109	struct avtab_node *prev, *cur, *newnode;
110	u16 specified = key->specified & ~(AVTAB_ENABLED|AVTAB_ENABLED_OLD);
111
112	if (!h)
113		return -EINVAL;
114
115	hvalue = avtab_hash(key, h->mask);
116	for (prev = NULL, cur = h->htable[hvalue];
117	     cur;
118	     prev = cur, cur = cur->next) {
119		if (key->source_type == cur->key.source_type &&
120		    key->target_type == cur->key.target_type &&
121		    key->target_class == cur->key.target_class &&
122		    (specified & cur->key.specified)) {
123			/* extended perms may not be unique */
124			if (specified & AVTAB_XPERMS)
125				break;
126			return -EEXIST;
127		}
128		if (key->source_type < cur->key.source_type)
129			break;
130		if (key->source_type == cur->key.source_type &&
131		    key->target_type < cur->key.target_type)
132			break;
133		if (key->source_type == cur->key.source_type &&
134		    key->target_type == cur->key.target_type &&
135		    key->target_class < cur->key.target_class)
136			break;
137	}
138
139	newnode = avtab_insert_node(h, hvalue, prev, cur, key, datum);
140	if (!newnode)
141		return -ENOMEM;
142
143	return 0;
144}
145
146/* Unlike avtab_insert(), this function allow multiple insertions of the same
147 * key/specified mask into the table, as needed by the conditional avtab.
148 * It also returns a pointer to the node inserted.
149 */
150struct avtab_node *
151avtab_insert_nonunique(struct avtab *h, struct avtab_key *key, struct avtab_datum *datum)
152{
153	int hvalue;
154	struct avtab_node *prev, *cur;
155	u16 specified = key->specified & ~(AVTAB_ENABLED|AVTAB_ENABLED_OLD);
156
157	if (!h)
158		return NULL;
159	hvalue = avtab_hash(key, h->mask);
160	for (prev = NULL, cur = h->htable[hvalue];
161	     cur;
162	     prev = cur, cur = cur->next) {
163		if (key->source_type == cur->key.source_type &&
164		    key->target_type == cur->key.target_type &&
165		    key->target_class == cur->key.target_class &&
166		    (specified & cur->key.specified))
167			break;
168		if (key->source_type < cur->key.source_type)
169			break;
170		if (key->source_type == cur->key.source_type &&
171		    key->target_type < cur->key.target_type)
172			break;
173		if (key->source_type == cur->key.source_type &&
174		    key->target_type == cur->key.target_type &&
175		    key->target_class < cur->key.target_class)
176			break;
177	}
178	return avtab_insert_node(h, hvalue, prev, cur, key, datum);
179}
180
181struct avtab_datum *avtab_search(struct avtab *h, struct avtab_key *key)
182{
183	int hvalue;
184	struct avtab_node *cur;
185	u16 specified = key->specified & ~(AVTAB_ENABLED|AVTAB_ENABLED_OLD);
186
187	if (!h)
188		return NULL;
189
190	hvalue = avtab_hash(key, h->mask);
191	for (cur = h->htable[hvalue]; cur;
192	     cur = cur->next) {
193		if (key->source_type == cur->key.source_type &&
194		    key->target_type == cur->key.target_type &&
195		    key->target_class == cur->key.target_class &&
196		    (specified & cur->key.specified))
197			return &cur->datum;
198
199		if (key->source_type < cur->key.source_type)
200			break;
201		if (key->source_type == cur->key.source_type &&
202		    key->target_type < cur->key.target_type)
203			break;
204		if (key->source_type == cur->key.source_type &&
205		    key->target_type == cur->key.target_type &&
206		    key->target_class < cur->key.target_class)
207			break;
208	}
209
210	return NULL;
211}
212
213/* This search function returns a node pointer, and can be used in
214 * conjunction with avtab_search_next_node()
215 */
216struct avtab_node*
217avtab_search_node(struct avtab *h, struct avtab_key *key)
218{
219	int hvalue;
220	struct avtab_node *cur;
221	u16 specified = key->specified & ~(AVTAB_ENABLED|AVTAB_ENABLED_OLD);
222
223	if (!h)
224		return NULL;
225
226	hvalue = avtab_hash(key, h->mask);
227	for (cur = h->htable[hvalue]; cur;
228	     cur = cur->next) {
229		if (key->source_type == cur->key.source_type &&
230		    key->target_type == cur->key.target_type &&
231		    key->target_class == cur->key.target_class &&
232		    (specified & cur->key.specified))
233			return cur;
234
235		if (key->source_type < cur->key.source_type)
236			break;
237		if (key->source_type == cur->key.source_type &&
238		    key->target_type < cur->key.target_type)
239			break;
240		if (key->source_type == cur->key.source_type &&
241		    key->target_type == cur->key.target_type &&
242		    key->target_class < cur->key.target_class)
243			break;
244	}
245	return NULL;
246}
247
248struct avtab_node*
249avtab_search_node_next(struct avtab_node *node, int specified)
250{
251	struct avtab_node *cur;
252
253	if (!node)
254		return NULL;
255
256	specified &= ~(AVTAB_ENABLED|AVTAB_ENABLED_OLD);
257	for (cur = node->next; cur; cur = cur->next) {
258		if (node->key.source_type == cur->key.source_type &&
259		    node->key.target_type == cur->key.target_type &&
260		    node->key.target_class == cur->key.target_class &&
261		    (specified & cur->key.specified))
262			return cur;
263
264		if (node->key.source_type < cur->key.source_type)
265			break;
266		if (node->key.source_type == cur->key.source_type &&
267		    node->key.target_type < cur->key.target_type)
268			break;
269		if (node->key.source_type == cur->key.source_type &&
270		    node->key.target_type == cur->key.target_type &&
271		    node->key.target_class < cur->key.target_class)
272			break;
273	}
274	return NULL;
275}
276
277void avtab_destroy(struct avtab *h)
278{
279	int i;
280	struct avtab_node *cur, *temp;
281
282	if (!h)
283		return;
284
285	for (i = 0; i < h->nslot; i++) {
286		cur = h->htable[i];
287		while (cur) {
288			temp = cur;
289			cur = cur->next;
290			if (temp->key.specified & AVTAB_XPERMS)
291				kmem_cache_free(avtab_xperms_cachep,
292						temp->datum.u.xperms);
293			kmem_cache_free(avtab_node_cachep, temp);
294		}
295	}
296	kvfree(h->htable);
297	h->htable = NULL;
298	h->nslot = 0;
299	h->mask = 0;
300}
301
302int avtab_init(struct avtab *h)
303{
304	kvfree(h->htable);
305	h->htable = NULL;
306	h->nel = 0;
307	return 0;
308}
309
310int avtab_alloc(struct avtab *h, u32 nrules)
311{
312	u32 mask = 0;
313	u32 shift = 0;
314	u32 work = nrules;
315	u32 nslot = 0;
316
317	if (nrules == 0)
318		goto avtab_alloc_out;
319
320	while (work) {
321		work  = work >> 1;
322		shift++;
323	}
324	if (shift > 2)
325		shift = shift - 2;
326	nslot = 1 << shift;
327	if (nslot > MAX_AVTAB_HASH_BUCKETS)
328		nslot = MAX_AVTAB_HASH_BUCKETS;
329	mask = nslot - 1;
330
331	h->htable = kvcalloc(nslot, sizeof(void *), GFP_KERNEL);
 
332	if (!h->htable)
333		return -ENOMEM;
334
335 avtab_alloc_out:
336	h->nel = 0;
337	h->nslot = nslot;
338	h->mask = mask;
339	pr_debug("SELinux: %d avtab hash slots, %d rules.\n",
340	       h->nslot, nrules);
341	return 0;
342}
343
344void avtab_hash_eval(struct avtab *h, char *tag)
345{
346	int i, chain_len, slots_used, max_chain_len;
347	unsigned long long chain2_len_sum;
348	struct avtab_node *cur;
349
350	slots_used = 0;
351	max_chain_len = 0;
352	chain2_len_sum = 0;
353	for (i = 0; i < h->nslot; i++) {
354		cur = h->htable[i];
355		if (cur) {
356			slots_used++;
357			chain_len = 0;
358			while (cur) {
359				chain_len++;
360				cur = cur->next;
361			}
362
363			if (chain_len > max_chain_len)
364				max_chain_len = chain_len;
365			chain2_len_sum += chain_len * chain_len;
366		}
367	}
368
369	pr_debug("SELinux: %s:  %d entries and %d/%d buckets used, "
370	       "longest chain length %d sum of chain length^2 %llu\n",
371	       tag, h->nel, slots_used, h->nslot, max_chain_len,
372	       chain2_len_sum);
373}
374
375static uint16_t spec_order[] = {
376	AVTAB_ALLOWED,
377	AVTAB_AUDITDENY,
378	AVTAB_AUDITALLOW,
379	AVTAB_TRANSITION,
380	AVTAB_CHANGE,
381	AVTAB_MEMBER,
382	AVTAB_XPERMS_ALLOWED,
383	AVTAB_XPERMS_AUDITALLOW,
384	AVTAB_XPERMS_DONTAUDIT
385};
386
387int avtab_read_item(struct avtab *a, void *fp, struct policydb *pol,
388		    int (*insertf)(struct avtab *a, struct avtab_key *k,
389				   struct avtab_datum *d, void *p),
390		    void *p)
391{
392	__le16 buf16[4];
393	u16 enabled;
394	u32 items, items2, val, vers = pol->policyvers;
395	struct avtab_key key;
396	struct avtab_datum datum;
397	struct avtab_extended_perms xperms;
398	__le32 buf32[ARRAY_SIZE(xperms.perms.p)];
399	int i, rc;
400	unsigned set;
401
402	memset(&key, 0, sizeof(struct avtab_key));
403	memset(&datum, 0, sizeof(struct avtab_datum));
404
405	if (vers < POLICYDB_VERSION_AVTAB) {
406		rc = next_entry(buf32, fp, sizeof(u32));
407		if (rc) {
408			pr_err("SELinux: avtab: truncated entry\n");
409			return rc;
410		}
411		items2 = le32_to_cpu(buf32[0]);
412		if (items2 > ARRAY_SIZE(buf32)) {
413			pr_err("SELinux: avtab: entry overflow\n");
414			return -EINVAL;
415
416		}
417		rc = next_entry(buf32, fp, sizeof(u32)*items2);
418		if (rc) {
419			pr_err("SELinux: avtab: truncated entry\n");
420			return rc;
421		}
422		items = 0;
423
424		val = le32_to_cpu(buf32[items++]);
425		key.source_type = (u16)val;
426		if (key.source_type != val) {
427			pr_err("SELinux: avtab: truncated source type\n");
428			return -EINVAL;
429		}
430		val = le32_to_cpu(buf32[items++]);
431		key.target_type = (u16)val;
432		if (key.target_type != val) {
433			pr_err("SELinux: avtab: truncated target type\n");
434			return -EINVAL;
435		}
436		val = le32_to_cpu(buf32[items++]);
437		key.target_class = (u16)val;
438		if (key.target_class != val) {
439			pr_err("SELinux: avtab: truncated target class\n");
440			return -EINVAL;
441		}
442
443		val = le32_to_cpu(buf32[items++]);
444		enabled = (val & AVTAB_ENABLED_OLD) ? AVTAB_ENABLED : 0;
445
446		if (!(val & (AVTAB_AV | AVTAB_TYPE))) {
447			pr_err("SELinux: avtab: null entry\n");
448			return -EINVAL;
449		}
450		if ((val & AVTAB_AV) &&
451		    (val & AVTAB_TYPE)) {
452			pr_err("SELinux: avtab: entry has both access vectors and types\n");
453			return -EINVAL;
454		}
455		if (val & AVTAB_XPERMS) {
456			pr_err("SELinux: avtab: entry has extended permissions\n");
457			return -EINVAL;
458		}
459
460		for (i = 0; i < ARRAY_SIZE(spec_order); i++) {
461			if (val & spec_order[i]) {
462				key.specified = spec_order[i] | enabled;
463				datum.u.data = le32_to_cpu(buf32[items++]);
464				rc = insertf(a, &key, &datum, p);
465				if (rc)
466					return rc;
467			}
468		}
469
470		if (items != items2) {
471			pr_err("SELinux: avtab: entry only had %d items, expected %d\n",
472			       items2, items);
473			return -EINVAL;
474		}
475		return 0;
476	}
477
478	rc = next_entry(buf16, fp, sizeof(u16)*4);
479	if (rc) {
480		pr_err("SELinux: avtab: truncated entry\n");
481		return rc;
482	}
483
484	items = 0;
485	key.source_type = le16_to_cpu(buf16[items++]);
486	key.target_type = le16_to_cpu(buf16[items++]);
487	key.target_class = le16_to_cpu(buf16[items++]);
488	key.specified = le16_to_cpu(buf16[items++]);
489
490	if (!policydb_type_isvalid(pol, key.source_type) ||
491	    !policydb_type_isvalid(pol, key.target_type) ||
492	    !policydb_class_isvalid(pol, key.target_class)) {
493		pr_err("SELinux: avtab: invalid type or class\n");
494		return -EINVAL;
495	}
496
497	set = 0;
498	for (i = 0; i < ARRAY_SIZE(spec_order); i++) {
499		if (key.specified & spec_order[i])
500			set++;
501	}
502	if (!set || set > 1) {
503		pr_err("SELinux:  avtab:  more than one specifier\n");
504		return -EINVAL;
505	}
506
507	if ((vers < POLICYDB_VERSION_XPERMS_IOCTL) &&
508			(key.specified & AVTAB_XPERMS)) {
509		pr_err("SELinux:  avtab:  policy version %u does not "
510				"support extended permissions rules and one "
511				"was specified\n", vers);
512		return -EINVAL;
513	} else if (key.specified & AVTAB_XPERMS) {
514		memset(&xperms, 0, sizeof(struct avtab_extended_perms));
515		rc = next_entry(&xperms.specified, fp, sizeof(u8));
516		if (rc) {
517			pr_err("SELinux: avtab: truncated entry\n");
518			return rc;
519		}
520		rc = next_entry(&xperms.driver, fp, sizeof(u8));
521		if (rc) {
522			pr_err("SELinux: avtab: truncated entry\n");
523			return rc;
524		}
525		rc = next_entry(buf32, fp, sizeof(u32)*ARRAY_SIZE(xperms.perms.p));
526		if (rc) {
527			pr_err("SELinux: avtab: truncated entry\n");
528			return rc;
529		}
530		for (i = 0; i < ARRAY_SIZE(xperms.perms.p); i++)
531			xperms.perms.p[i] = le32_to_cpu(buf32[i]);
532		datum.u.xperms = &xperms;
533	} else {
534		rc = next_entry(buf32, fp, sizeof(u32));
535		if (rc) {
536			pr_err("SELinux: avtab: truncated entry\n");
537			return rc;
538		}
539		datum.u.data = le32_to_cpu(*buf32);
540	}
541	if ((key.specified & AVTAB_TYPE) &&
542	    !policydb_type_isvalid(pol, datum.u.data)) {
543		pr_err("SELinux: avtab: invalid type\n");
544		return -EINVAL;
545	}
546	return insertf(a, &key, &datum, p);
547}
548
549static int avtab_insertf(struct avtab *a, struct avtab_key *k,
550			 struct avtab_datum *d, void *p)
551{
552	return avtab_insert(a, k, d);
553}
554
555int avtab_read(struct avtab *a, void *fp, struct policydb *pol)
556{
557	int rc;
558	__le32 buf[1];
559	u32 nel, i;
560
561
562	rc = next_entry(buf, fp, sizeof(u32));
563	if (rc < 0) {
564		pr_err("SELinux: avtab: truncated table\n");
565		goto bad;
566	}
567	nel = le32_to_cpu(buf[0]);
568	if (!nel) {
569		pr_err("SELinux: avtab: table is empty\n");
570		rc = -EINVAL;
571		goto bad;
572	}
573
574	rc = avtab_alloc(a, nel);
575	if (rc)
576		goto bad;
577
578	for (i = 0; i < nel; i++) {
579		rc = avtab_read_item(a, fp, pol, avtab_insertf, NULL);
580		if (rc) {
581			if (rc == -ENOMEM)
582				pr_err("SELinux: avtab: out of memory\n");
583			else if (rc == -EEXIST)
584				pr_err("SELinux: avtab: duplicate entry\n");
585
586			goto bad;
587		}
588	}
589
590	rc = 0;
591out:
592	return rc;
593
594bad:
595	avtab_destroy(a);
596	goto out;
597}
598
599int avtab_write_item(struct policydb *p, struct avtab_node *cur, void *fp)
600{
601	__le16 buf16[4];
602	__le32 buf32[ARRAY_SIZE(cur->datum.u.xperms->perms.p)];
603	int rc;
604	unsigned int i;
605
606	buf16[0] = cpu_to_le16(cur->key.source_type);
607	buf16[1] = cpu_to_le16(cur->key.target_type);
608	buf16[2] = cpu_to_le16(cur->key.target_class);
609	buf16[3] = cpu_to_le16(cur->key.specified);
610	rc = put_entry(buf16, sizeof(u16), 4, fp);
611	if (rc)
612		return rc;
613
614	if (cur->key.specified & AVTAB_XPERMS) {
615		rc = put_entry(&cur->datum.u.xperms->specified, sizeof(u8), 1, fp);
616		if (rc)
617			return rc;
618		rc = put_entry(&cur->datum.u.xperms->driver, sizeof(u8), 1, fp);
619		if (rc)
620			return rc;
621		for (i = 0; i < ARRAY_SIZE(cur->datum.u.xperms->perms.p); i++)
622			buf32[i] = cpu_to_le32(cur->datum.u.xperms->perms.p[i]);
623		rc = put_entry(buf32, sizeof(u32),
624				ARRAY_SIZE(cur->datum.u.xperms->perms.p), fp);
625	} else {
626		buf32[0] = cpu_to_le32(cur->datum.u.data);
627		rc = put_entry(buf32, sizeof(u32), 1, fp);
628	}
629	if (rc)
630		return rc;
631	return 0;
632}
633
634int avtab_write(struct policydb *p, struct avtab *a, void *fp)
635{
636	unsigned int i;
637	int rc = 0;
638	struct avtab_node *cur;
639	__le32 buf[1];
640
641	buf[0] = cpu_to_le32(a->nel);
642	rc = put_entry(buf, sizeof(u32), 1, fp);
643	if (rc)
644		return rc;
645
646	for (i = 0; i < a->nslot; i++) {
647		for (cur = a->htable[i]; cur;
648		     cur = cur->next) {
649			rc = avtab_write_item(p, cur, fp);
650			if (rc)
651				return rc;
652		}
653	}
654
655	return rc;
656}
657
658void __init avtab_cache_init(void)
659{
660	avtab_node_cachep = kmem_cache_create("avtab_node",
661					      sizeof(struct avtab_node),
662					      0, SLAB_PANIC, NULL);
663	avtab_xperms_cachep = kmem_cache_create("avtab_extended_perms",
664						sizeof(struct avtab_extended_perms),
665						0, SLAB_PANIC, NULL);
 
 
 
 
 
 
666}