Linux Audio

Check our new training course

Loading...
v6.2
   1// SPDX-License-Identifier: GPL-2.0-only
   2/*
   3 * Implementation of the policy database.
   4 *
   5 * Author : Stephen Smalley, <sds@tycho.nsa.gov>
   6 */
   7
   8/*
   9 * Updated: Trusted Computer Solutions, Inc. <dgoeddel@trustedcs.com>
  10 *
  11 *	Support for enhanced MLS infrastructure.
  12 *
  13 * Updated: Frank Mayer <mayerf@tresys.com> and Karl MacMillan <kmacmillan@tresys.com>
  14 *
  15 *	Added conditional policy language extensions
  16 *
  17 * Updated: Hewlett-Packard <paul@paul-moore.com>
  18 *
  19 *      Added support for the policy capability bitmap
  20 *
  21 * Update: Mellanox Techonologies
  22 *
  23 *	Added Infiniband support
  24 *
  25 * Copyright (C) 2016 Mellanox Techonologies
  26 * Copyright (C) 2007 Hewlett-Packard Development Company, L.P.
  27 * Copyright (C) 2004-2005 Trusted Computer Solutions, Inc.
  28 * Copyright (C) 2003 - 2004 Tresys Technology, LLC
 
 
 
  29 */
  30
  31#include <linux/kernel.h>
  32#include <linux/sched.h>
  33#include <linux/slab.h>
  34#include <linux/string.h>
  35#include <linux/errno.h>
  36#include <linux/audit.h>
 
  37#include "security.h"
  38
  39#include "policydb.h"
  40#include "conditional.h"
  41#include "mls.h"
  42#include "services.h"
  43
 
 
  44#ifdef DEBUG_HASHES
  45static const char *symtab_name[SYM_NUM] = {
  46	"common prefixes",
  47	"classes",
  48	"roles",
  49	"types",
  50	"users",
  51	"bools",
  52	"levels",
  53	"categories",
  54};
  55#endif
  56
 
 
 
 
 
 
 
 
 
 
 
  57struct policydb_compat_info {
  58	int version;
  59	int sym_num;
  60	int ocon_num;
  61};
  62
  63/* These need to be updated if SYM_NUM or OCON_NUM changes */
  64static const struct policydb_compat_info policydb_compat[] = {
  65	{
  66		.version	= POLICYDB_VERSION_BASE,
  67		.sym_num	= SYM_NUM - 3,
  68		.ocon_num	= OCON_NUM - 3,
  69	},
  70	{
  71		.version	= POLICYDB_VERSION_BOOL,
  72		.sym_num	= SYM_NUM - 2,
  73		.ocon_num	= OCON_NUM - 3,
  74	},
  75	{
  76		.version	= POLICYDB_VERSION_IPV6,
  77		.sym_num	= SYM_NUM - 2,
  78		.ocon_num	= OCON_NUM - 2,
  79	},
  80	{
  81		.version	= POLICYDB_VERSION_NLCLASS,
  82		.sym_num	= SYM_NUM - 2,
  83		.ocon_num	= OCON_NUM - 2,
  84	},
  85	{
  86		.version	= POLICYDB_VERSION_MLS,
  87		.sym_num	= SYM_NUM,
  88		.ocon_num	= OCON_NUM - 2,
  89	},
  90	{
  91		.version	= POLICYDB_VERSION_AVTAB,
  92		.sym_num	= SYM_NUM,
  93		.ocon_num	= OCON_NUM - 2,
  94	},
  95	{
  96		.version	= POLICYDB_VERSION_RANGETRANS,
  97		.sym_num	= SYM_NUM,
  98		.ocon_num	= OCON_NUM - 2,
  99	},
 100	{
 101		.version	= POLICYDB_VERSION_POLCAP,
 102		.sym_num	= SYM_NUM,
 103		.ocon_num	= OCON_NUM - 2,
 104	},
 105	{
 106		.version	= POLICYDB_VERSION_PERMISSIVE,
 107		.sym_num	= SYM_NUM,
 108		.ocon_num	= OCON_NUM - 2,
 109	},
 110	{
 111		.version	= POLICYDB_VERSION_BOUNDARY,
 112		.sym_num	= SYM_NUM,
 113		.ocon_num	= OCON_NUM - 2,
 114	},
 115	{
 116		.version	= POLICYDB_VERSION_FILENAME_TRANS,
 117		.sym_num	= SYM_NUM,
 118		.ocon_num	= OCON_NUM - 2,
 119	},
 120	{
 121		.version	= POLICYDB_VERSION_ROLETRANS,
 122		.sym_num	= SYM_NUM,
 123		.ocon_num	= OCON_NUM - 2,
 124	},
 125	{
 126		.version	= POLICYDB_VERSION_NEW_OBJECT_DEFAULTS,
 127		.sym_num	= SYM_NUM,
 128		.ocon_num	= OCON_NUM - 2,
 129	},
 130	{
 131		.version	= POLICYDB_VERSION_DEFAULT_TYPE,
 132		.sym_num	= SYM_NUM,
 133		.ocon_num	= OCON_NUM - 2,
 134	},
 135	{
 136		.version	= POLICYDB_VERSION_CONSTRAINT_NAMES,
 137		.sym_num	= SYM_NUM,
 138		.ocon_num	= OCON_NUM - 2,
 139	},
 140	{
 141		.version	= POLICYDB_VERSION_XPERMS_IOCTL,
 142		.sym_num	= SYM_NUM,
 143		.ocon_num	= OCON_NUM - 2,
 144	},
 145	{
 146		.version	= POLICYDB_VERSION_INFINIBAND,
 147		.sym_num	= SYM_NUM,
 148		.ocon_num	= OCON_NUM,
 149	},
 150	{
 151		.version	= POLICYDB_VERSION_GLBLUB,
 152		.sym_num	= SYM_NUM,
 153		.ocon_num	= OCON_NUM,
 154	},
 155	{
 156		.version	= POLICYDB_VERSION_COMP_FTRANS,
 157		.sym_num	= SYM_NUM,
 158		.ocon_num	= OCON_NUM,
 159	},
 160};
 161
 162static const struct policydb_compat_info *policydb_lookup_compat(int version)
 163{
 164	int i;
 
 165
 166	for (i = 0; i < ARRAY_SIZE(policydb_compat); i++) {
 167		if (policydb_compat[i].version == version)
 168			return &policydb_compat[i];
 169	}
 170
 171	return NULL;
 172}
 173
 174/*
 175 * The following *_destroy functions are used to
 176 * free any memory allocated for each kind of
 177 * symbol data in the policy database.
 178 */
 179
 180static int perm_destroy(void *key, void *datum, void *p)
 181{
 182	kfree(key);
 183	kfree(datum);
 184	return 0;
 185}
 186
 187static int common_destroy(void *key, void *datum, void *p)
 188{
 189	struct common_datum *comdatum;
 190
 191	kfree(key);
 192	if (datum) {
 193		comdatum = datum;
 194		hashtab_map(&comdatum->permissions.table, perm_destroy, NULL);
 195		hashtab_destroy(&comdatum->permissions.table);
 196	}
 197	kfree(datum);
 198	return 0;
 199}
 200
 201static void constraint_expr_destroy(struct constraint_expr *expr)
 202{
 203	if (expr) {
 204		ebitmap_destroy(&expr->names);
 205		if (expr->type_names) {
 206			ebitmap_destroy(&expr->type_names->types);
 207			ebitmap_destroy(&expr->type_names->negset);
 208			kfree(expr->type_names);
 209		}
 210		kfree(expr);
 211	}
 212}
 213
 214static int cls_destroy(void *key, void *datum, void *p)
 215{
 216	struct class_datum *cladatum;
 217	struct constraint_node *constraint, *ctemp;
 218	struct constraint_expr *e, *etmp;
 219
 220	kfree(key);
 221	if (datum) {
 222		cladatum = datum;
 223		hashtab_map(&cladatum->permissions.table, perm_destroy, NULL);
 224		hashtab_destroy(&cladatum->permissions.table);
 225		constraint = cladatum->constraints;
 226		while (constraint) {
 227			e = constraint->expr;
 228			while (e) {
 229				etmp = e;
 230				e = e->next;
 231				constraint_expr_destroy(etmp);
 232			}
 233			ctemp = constraint;
 234			constraint = constraint->next;
 235			kfree(ctemp);
 236		}
 237
 238		constraint = cladatum->validatetrans;
 239		while (constraint) {
 240			e = constraint->expr;
 241			while (e) {
 242				etmp = e;
 243				e = e->next;
 244				constraint_expr_destroy(etmp);
 245			}
 246			ctemp = constraint;
 247			constraint = constraint->next;
 248			kfree(ctemp);
 249		}
 250		kfree(cladatum->comkey);
 251	}
 252	kfree(datum);
 253	return 0;
 254}
 255
 256static int role_destroy(void *key, void *datum, void *p)
 257{
 258	struct role_datum *role;
 259
 260	kfree(key);
 261	if (datum) {
 262		role = datum;
 263		ebitmap_destroy(&role->dominates);
 264		ebitmap_destroy(&role->types);
 265	}
 266	kfree(datum);
 267	return 0;
 268}
 269
 270static int type_destroy(void *key, void *datum, void *p)
 271{
 272	kfree(key);
 273	kfree(datum);
 274	return 0;
 275}
 276
 277static int user_destroy(void *key, void *datum, void *p)
 278{
 279	struct user_datum *usrdatum;
 280
 281	kfree(key);
 282	if (datum) {
 283		usrdatum = datum;
 284		ebitmap_destroy(&usrdatum->roles);
 285		ebitmap_destroy(&usrdatum->range.level[0].cat);
 286		ebitmap_destroy(&usrdatum->range.level[1].cat);
 287		ebitmap_destroy(&usrdatum->dfltlevel.cat);
 288	}
 289	kfree(datum);
 290	return 0;
 291}
 292
 293static int sens_destroy(void *key, void *datum, void *p)
 294{
 295	struct level_datum *levdatum;
 296
 297	kfree(key);
 298	if (datum) {
 299		levdatum = datum;
 300		if (levdatum->level)
 301			ebitmap_destroy(&levdatum->level->cat);
 302		kfree(levdatum->level);
 303	}
 304	kfree(datum);
 305	return 0;
 306}
 307
 308static int cat_destroy(void *key, void *datum, void *p)
 309{
 310	kfree(key);
 311	kfree(datum);
 312	return 0;
 313}
 314
 315static int (*const destroy_f[SYM_NUM]) (void *key, void *datum, void *datap) = {
 316	common_destroy,
 317	cls_destroy,
 318	role_destroy,
 319	type_destroy,
 320	user_destroy,
 321	cond_destroy_bool,
 322	sens_destroy,
 323	cat_destroy,
 324};
 325
 326static int filenametr_destroy(void *key, void *datum, void *p)
 327{
 328	struct filename_trans_key *ft = key;
 329	struct filename_trans_datum *next, *d = datum;
 330
 331	kfree(ft->name);
 332	kfree(key);
 333	do {
 334		ebitmap_destroy(&d->stypes);
 335		next = d->next;
 336		kfree(d);
 337		d = next;
 338	} while (unlikely(d));
 339	cond_resched();
 340	return 0;
 341}
 342
 343static int range_tr_destroy(void *key, void *datum, void *p)
 344{
 345	struct mls_range *rt = datum;
 346
 347	kfree(key);
 348	ebitmap_destroy(&rt->level[0].cat);
 349	ebitmap_destroy(&rt->level[1].cat);
 350	kfree(datum);
 351	cond_resched();
 352	return 0;
 353}
 354
 355static int role_tr_destroy(void *key, void *datum, void *p)
 356{
 357	kfree(key);
 358	kfree(datum);
 359	return 0;
 360}
 361
 362static void ocontext_destroy(struct ocontext *c, int i)
 363{
 364	if (!c)
 365		return;
 366
 367	context_destroy(&c->context[0]);
 368	context_destroy(&c->context[1]);
 369	if (i == OCON_ISID || i == OCON_FS ||
 370	    i == OCON_NETIF || i == OCON_FSUSE)
 371		kfree(c->u.name);
 372	kfree(c);
 373}
 374
 375/*
 376 * Initialize the role table.
 377 */
 378static int roles_init(struct policydb *p)
 379{
 380	char *key = NULL;
 381	int rc;
 382	struct role_datum *role;
 383
 
 384	role = kzalloc(sizeof(*role), GFP_KERNEL);
 385	if (!role)
 386		return -ENOMEM;
 387
 388	rc = -EINVAL;
 389	role->value = ++p->p_roles.nprim;
 390	if (role->value != OBJECT_R_VAL)
 391		goto out;
 392
 393	rc = -ENOMEM;
 394	key = kstrdup(OBJECT_R, GFP_KERNEL);
 395	if (!key)
 396		goto out;
 397
 398	rc = symtab_insert(&p->p_roles, key, role);
 399	if (rc)
 400		goto out;
 401
 402	return 0;
 403out:
 404	kfree(key);
 405	kfree(role);
 406	return rc;
 407}
 408
 409static u32 filenametr_hash(const void *k)
 410{
 411	const struct filename_trans_key *ft = k;
 412	unsigned long hash;
 413	unsigned int byte_num;
 414	unsigned char focus;
 415
 416	hash = ft->ttype ^ ft->tclass;
 417
 418	byte_num = 0;
 419	while ((focus = ft->name[byte_num++]))
 420		hash = partial_name_hash(focus, hash);
 421	return hash;
 422}
 423
 424static int filenametr_cmp(const void *k1, const void *k2)
 425{
 426	const struct filename_trans_key *ft1 = k1;
 427	const struct filename_trans_key *ft2 = k2;
 428	int v;
 429
 
 
 
 
 430	v = ft1->ttype - ft2->ttype;
 431	if (v)
 432		return v;
 433
 434	v = ft1->tclass - ft2->tclass;
 435	if (v)
 436		return v;
 437
 438	return strcmp(ft1->name, ft2->name);
 439
 440}
 441
 442static const struct hashtab_key_params filenametr_key_params = {
 443	.hash = filenametr_hash,
 444	.cmp = filenametr_cmp,
 445};
 446
 447struct filename_trans_datum *policydb_filenametr_search(
 448	struct policydb *p, struct filename_trans_key *key)
 449{
 450	return hashtab_search(&p->filename_trans, key, filenametr_key_params);
 451}
 452
 453static u32 rangetr_hash(const void *k)
 454{
 455	const struct range_trans *key = k;
 456
 457	return key->source_type + (key->target_type << 3) +
 458		(key->target_class << 5);
 459}
 460
 461static int rangetr_cmp(const void *k1, const void *k2)
 462{
 463	const struct range_trans *key1 = k1, *key2 = k2;
 464	int v;
 465
 466	v = key1->source_type - key2->source_type;
 467	if (v)
 468		return v;
 469
 470	v = key1->target_type - key2->target_type;
 471	if (v)
 472		return v;
 473
 474	v = key1->target_class - key2->target_class;
 475
 476	return v;
 477}
 478
 479static const struct hashtab_key_params rangetr_key_params = {
 480	.hash = rangetr_hash,
 481	.cmp = rangetr_cmp,
 482};
 483
 484struct mls_range *policydb_rangetr_search(struct policydb *p,
 485					  struct range_trans *key)
 486{
 487	return hashtab_search(&p->range_tr, key, rangetr_key_params);
 488}
 489
 490static u32 role_trans_hash(const void *k)
 491{
 492	const struct role_trans_key *key = k;
 493
 494	return key->role + (key->type << 3) + (key->tclass << 5);
 495}
 496
 497static int role_trans_cmp(const void *k1, const void *k2)
 498{
 499	const struct role_trans_key *key1 = k1, *key2 = k2;
 500	int v;
 501
 502	v = key1->role - key2->role;
 503	if (v)
 504		return v;
 505
 506	v = key1->type - key2->type;
 507	if (v)
 508		return v;
 
 
 509
 510	return key1->tclass - key2->tclass;
 511}
 
 512
 513static const struct hashtab_key_params roletr_key_params = {
 514	.hash = role_trans_hash,
 515	.cmp = role_trans_cmp,
 516};
 517
 518struct role_trans_datum *policydb_roletr_search(struct policydb *p,
 519						struct role_trans_key *key)
 520{
 521	return hashtab_search(&p->role_tr, key, roletr_key_params);
 522}
 523
 524/*
 525 * Initialize a policy database structure.
 526 */
 527static void policydb_init(struct policydb *p)
 528{
 529	memset(p, 0, sizeof(*p));
 530
 531	avtab_init(&p->te_avtab);
 532	cond_policydb_init(p);
 
 533
 534	ebitmap_init(&p->filename_trans_ttypes);
 535	ebitmap_init(&p->policycaps);
 536	ebitmap_init(&p->permissive_map);
 
 
 
 
 
 
 
 
 537}
 538
 539/*
 540 * The following *_index functions are used to
 541 * define the val_to_name and val_to_struct arrays
 542 * in a policy database structure.  The val_to_name
 543 * arrays are used when converting security context
 544 * structures into string representations.  The
 545 * val_to_struct arrays are used when the attributes
 546 * of a class, role, or user are needed.
 547 */
 548
 549static int common_index(void *key, void *datum, void *datap)
 550{
 551	struct policydb *p;
 552	struct common_datum *comdatum;
 
 553
 554	comdatum = datum;
 555	p = datap;
 556	if (!comdatum->value || comdatum->value > p->p_commons.nprim)
 557		return -EINVAL;
 558
 559	p->sym_val_to_name[SYM_COMMONS][comdatum->value - 1] = key;
 560
 
 
 561	return 0;
 562}
 563
 564static int class_index(void *key, void *datum, void *datap)
 565{
 566	struct policydb *p;
 567	struct class_datum *cladatum;
 
 568
 569	cladatum = datum;
 570	p = datap;
 571	if (!cladatum->value || cladatum->value > p->p_classes.nprim)
 572		return -EINVAL;
 573
 574	p->sym_val_to_name[SYM_CLASSES][cladatum->value - 1] = key;
 
 
 575	p->class_val_to_struct[cladatum->value - 1] = cladatum;
 576	return 0;
 577}
 578
 579static int role_index(void *key, void *datum, void *datap)
 580{
 581	struct policydb *p;
 582	struct role_datum *role;
 
 583
 584	role = datum;
 585	p = datap;
 586	if (!role->value
 587	    || role->value > p->p_roles.nprim
 588	    || role->bounds > p->p_roles.nprim)
 589		return -EINVAL;
 590
 591	p->sym_val_to_name[SYM_ROLES][role->value - 1] = key;
 
 
 
 592	p->role_val_to_struct[role->value - 1] = role;
 593	return 0;
 594}
 595
 596static int type_index(void *key, void *datum, void *datap)
 597{
 598	struct policydb *p;
 599	struct type_datum *typdatum;
 
 600
 601	typdatum = datum;
 602	p = datap;
 603
 604	if (typdatum->primary) {
 605		if (!typdatum->value
 606		    || typdatum->value > p->p_types.nprim
 607		    || typdatum->bounds > p->p_types.nprim)
 608			return -EINVAL;
 609		p->sym_val_to_name[SYM_TYPES][typdatum->value - 1] = key;
 610		p->type_val_to_struct[typdatum->value - 1] = typdatum;
 
 
 
 
 
 
 
 611	}
 612
 613	return 0;
 614}
 615
 616static int user_index(void *key, void *datum, void *datap)
 617{
 618	struct policydb *p;
 619	struct user_datum *usrdatum;
 
 620
 621	usrdatum = datum;
 622	p = datap;
 623	if (!usrdatum->value
 624	    || usrdatum->value > p->p_users.nprim
 625	    || usrdatum->bounds > p->p_users.nprim)
 626		return -EINVAL;
 627
 628	p->sym_val_to_name[SYM_USERS][usrdatum->value - 1] = key;
 
 
 
 629	p->user_val_to_struct[usrdatum->value - 1] = usrdatum;
 630	return 0;
 631}
 632
 633static int sens_index(void *key, void *datum, void *datap)
 634{
 635	struct policydb *p;
 636	struct level_datum *levdatum;
 
 637
 638	levdatum = datum;
 639	p = datap;
 640
 641	if (!levdatum->isalias) {
 642		if (!levdatum->level->sens ||
 643		    levdatum->level->sens > p->p_levels.nprim)
 644			return -EINVAL;
 645
 646		p->sym_val_to_name[SYM_LEVELS][levdatum->level->sens - 1] = key;
 
 
 647	}
 648
 649	return 0;
 650}
 651
 652static int cat_index(void *key, void *datum, void *datap)
 653{
 654	struct policydb *p;
 655	struct cat_datum *catdatum;
 
 656
 657	catdatum = datum;
 658	p = datap;
 659
 660	if (!catdatum->isalias) {
 661		if (!catdatum->value || catdatum->value > p->p_cats.nprim)
 662			return -EINVAL;
 663
 664		p->sym_val_to_name[SYM_CATS][catdatum->value - 1] = key;
 
 
 665	}
 666
 667	return 0;
 668}
 669
 670static int (*const index_f[SYM_NUM]) (void *key, void *datum, void *datap) = {
 
 671	common_index,
 672	class_index,
 673	role_index,
 674	type_index,
 675	user_index,
 676	cond_index_bool,
 677	sens_index,
 678	cat_index,
 679};
 680
 681#ifdef DEBUG_HASHES
 682static void hash_eval(struct hashtab *h, const char *hash_name)
 683{
 684	struct hashtab_info info;
 685
 686	hashtab_stat(h, &info);
 687	pr_debug("SELinux: %s:  %d entries and %d/%d buckets used, longest chain length %d\n",
 688		 hash_name, h->nel, info.slots_used, h->size,
 689		 info.max_chain_len);
 690}
 691
 692static void symtab_hash_eval(struct symtab *s)
 693{
 694	int i;
 695
 696	for (i = 0; i < SYM_NUM; i++)
 697		hash_eval(&s[i].table, symtab_name[i]);
 698}
 699
 700#else
 701static inline void hash_eval(struct hashtab *h, const char *hash_name)
 702{
 703}
 704#endif
 705
 706/*
 707 * Define the other val_to_name and val_to_struct arrays
 708 * in a policy database structure.
 709 *
 710 * Caller must clean up on failure.
 711 */
 712static int policydb_index(struct policydb *p)
 713{
 714	int i, rc;
 715
 
 
 716	if (p->mls_enabled)
 717		pr_debug("SELinux:  %d users, %d roles, %d types, %d bools, %d sens, %d cats\n",
 718			 p->p_users.nprim, p->p_roles.nprim, p->p_types.nprim,
 719			 p->p_bools.nprim, p->p_levels.nprim, p->p_cats.nprim);
 720	else
 721		pr_debug("SELinux:  %d users, %d roles, %d types, %d bools\n",
 722			 p->p_users.nprim, p->p_roles.nprim, p->p_types.nprim,
 723			 p->p_bools.nprim);
 724
 725	pr_debug("SELinux:  %d classes, %d rules\n",
 726		 p->p_classes.nprim, p->te_avtab.nel);
 727
 728#ifdef DEBUG_HASHES
 729	avtab_hash_eval(&p->te_avtab, "rules");
 730	symtab_hash_eval(p->symtab);
 731#endif
 732
 733	p->class_val_to_struct = kcalloc(p->p_classes.nprim,
 734					 sizeof(*p->class_val_to_struct),
 735					 GFP_KERNEL);
 
 736	if (!p->class_val_to_struct)
 737		return -ENOMEM;
 738
 739	p->role_val_to_struct = kcalloc(p->p_roles.nprim,
 740					sizeof(*p->role_val_to_struct),
 741					GFP_KERNEL);
 
 742	if (!p->role_val_to_struct)
 743		return -ENOMEM;
 744
 745	p->user_val_to_struct = kcalloc(p->p_users.nprim,
 746					sizeof(*p->user_val_to_struct),
 747					GFP_KERNEL);
 
 748	if (!p->user_val_to_struct)
 749		return -ENOMEM;
 750
 751	p->type_val_to_struct = kvcalloc(p->p_types.nprim,
 752					 sizeof(*p->type_val_to_struct),
 753					 GFP_KERNEL);
 754	if (!p->type_val_to_struct)
 755		return -ENOMEM;
 
 
 
 
 
 
 
 756
 757	rc = cond_init_bool_indexes(p);
 758	if (rc)
 759		goto out;
 760
 761	for (i = 0; i < SYM_NUM; i++) {
 762		p->sym_val_to_name[i] = kvcalloc(p->symtab[i].nprim,
 763						 sizeof(char *),
 764						 GFP_KERNEL);
 
 765		if (!p->sym_val_to_name[i])
 766			return -ENOMEM;
 
 
 
 
 
 
 767
 768		rc = hashtab_map(&p->symtab[i].table, index_f[i], p);
 769		if (rc)
 770			goto out;
 771	}
 772	rc = 0;
 773out:
 774	return rc;
 775}
 776
 777/*
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 778 * Free any memory allocated by a policy database structure.
 779 */
 780void policydb_destroy(struct policydb *p)
 781{
 782	struct ocontext *c, *ctmp;
 783	struct genfs *g, *gtmp;
 784	int i;
 785	struct role_allow *ra, *lra = NULL;
 
 786
 787	for (i = 0; i < SYM_NUM; i++) {
 788		cond_resched();
 789		hashtab_map(&p->symtab[i].table, destroy_f[i], NULL);
 790		hashtab_destroy(&p->symtab[i].table);
 791	}
 792
 793	for (i = 0; i < SYM_NUM; i++)
 794		kvfree(p->sym_val_to_name[i]);
 
 
 795
 796	kfree(p->class_val_to_struct);
 797	kfree(p->role_val_to_struct);
 798	kfree(p->user_val_to_struct);
 799	kvfree(p->type_val_to_struct);
 
 800
 801	avtab_destroy(&p->te_avtab);
 802
 803	for (i = 0; i < OCON_NUM; i++) {
 804		cond_resched();
 805		c = p->ocontexts[i];
 806		while (c) {
 807			ctmp = c;
 808			c = c->next;
 809			ocontext_destroy(ctmp, i);
 810		}
 811		p->ocontexts[i] = NULL;
 812	}
 813
 814	g = p->genfs;
 815	while (g) {
 816		cond_resched();
 817		kfree(g->fstype);
 818		c = g->head;
 819		while (c) {
 820			ctmp = c;
 821			c = c->next;
 822			ocontext_destroy(ctmp, OCON_FSUSE);
 823		}
 824		gtmp = g;
 825		g = g->next;
 826		kfree(gtmp);
 827	}
 828	p->genfs = NULL;
 829
 830	cond_policydb_destroy(p);
 831
 832	hashtab_map(&p->role_tr, role_tr_destroy, NULL);
 833	hashtab_destroy(&p->role_tr);
 
 
 
 
 834
 835	for (ra = p->role_allow; ra; ra = ra->next) {
 836		cond_resched();
 837		kfree(lra);
 838		lra = ra;
 839	}
 840	kfree(lra);
 841
 842	hashtab_map(&p->filename_trans, filenametr_destroy, NULL);
 843	hashtab_destroy(&p->filename_trans);
 844
 845	hashtab_map(&p->range_tr, range_tr_destroy, NULL);
 846	hashtab_destroy(&p->range_tr);
 847
 848	if (p->type_attr_map_array) {
 849		for (i = 0; i < p->p_types.nprim; i++)
 850			ebitmap_destroy(&p->type_attr_map_array[i]);
 851		kvfree(p->type_attr_map_array);
 
 
 
 
 
 
 852	}
 853
 854	ebitmap_destroy(&p->filename_trans_ttypes);
 855	ebitmap_destroy(&p->policycaps);
 856	ebitmap_destroy(&p->permissive_map);
 
 
 857}
 858
 859/*
 860 * Load the initial SIDs specified in a policy database
 861 * structure into a SID table.
 862 */
 863int policydb_load_isids(struct policydb *p, struct sidtab *s)
 864{
 865	struct ocontext *head, *c;
 866	int rc;
 867
 868	rc = sidtab_init(s);
 869	if (rc) {
 870		pr_err("SELinux:  out of memory on SID table init\n");
 871		return rc;
 872	}
 873
 874	head = p->ocontexts[OCON_ISID];
 875	for (c = head; c; c = c->next) {
 876		u32 sid = c->sid[0];
 877		const char *name = security_get_initial_sid_context(sid);
 878
 879		if (sid == SECSID_NULL) {
 880			pr_err("SELinux:  SID 0 was assigned a context.\n");
 881			sidtab_destroy(s);
 882			return -EINVAL;
 883		}
 884
 885		/* Ignore initial SIDs unused by this kernel. */
 886		if (!name)
 887			continue;
 888
 889		rc = sidtab_set_initial(s, sid, &c->context[0]);
 890		if (rc) {
 891			pr_err("SELinux:  unable to load initial SID %s.\n",
 892			       name);
 893			sidtab_destroy(s);
 894			return rc;
 895		}
 896	}
 897	return 0;
 
 
 898}
 899
 900int policydb_class_isvalid(struct policydb *p, unsigned int class)
 901{
 902	if (!class || class > p->p_classes.nprim)
 903		return 0;
 904	return 1;
 905}
 906
 907int policydb_role_isvalid(struct policydb *p, unsigned int role)
 908{
 909	if (!role || role > p->p_roles.nprim)
 910		return 0;
 911	return 1;
 912}
 913
 914int policydb_type_isvalid(struct policydb *p, unsigned int type)
 915{
 916	if (!type || type > p->p_types.nprim)
 917		return 0;
 918	return 1;
 919}
 920
 921/*
 922 * Return 1 if the fields in the security context
 923 * structure `c' are valid.  Return 0 otherwise.
 924 */
 925int policydb_context_isvalid(struct policydb *p, struct context *c)
 926{
 927	struct role_datum *role;
 928	struct user_datum *usrdatum;
 929
 930	if (!c->role || c->role > p->p_roles.nprim)
 931		return 0;
 932
 933	if (!c->user || c->user > p->p_users.nprim)
 934		return 0;
 935
 936	if (!c->type || c->type > p->p_types.nprim)
 937		return 0;
 938
 939	if (c->role != OBJECT_R_VAL) {
 940		/*
 941		 * Role must be authorized for the type.
 942		 */
 943		role = p->role_val_to_struct[c->role - 1];
 944		if (!role || !ebitmap_get_bit(&role->types, c->type - 1))
 945			/* role may not be associated with type */
 946			return 0;
 947
 948		/*
 949		 * User must be authorized for the role.
 950		 */
 951		usrdatum = p->user_val_to_struct[c->user - 1];
 952		if (!usrdatum)
 953			return 0;
 954
 955		if (!ebitmap_get_bit(&usrdatum->roles, c->role - 1))
 956			/* user may not be associated with role */
 957			return 0;
 958	}
 959
 960	if (!mls_context_isvalid(p, c))
 961		return 0;
 962
 963	return 1;
 964}
 965
 966/*
 967 * Read a MLS range structure from a policydb binary
 968 * representation file.
 969 */
 970static int mls_read_range_helper(struct mls_range *r, void *fp)
 971{
 972	__le32 buf[2];
 973	u32 items;
 974	int rc;
 975
 976	rc = next_entry(buf, fp, sizeof(u32));
 977	if (rc)
 978		goto out;
 979
 980	rc = -EINVAL;
 981	items = le32_to_cpu(buf[0]);
 982	if (items > ARRAY_SIZE(buf)) {
 983		pr_err("SELinux: mls:  range overflow\n");
 984		goto out;
 985	}
 986
 987	rc = next_entry(buf, fp, sizeof(u32) * items);
 988	if (rc) {
 989		pr_err("SELinux: mls:  truncated range\n");
 990		goto out;
 991	}
 992
 993	r->level[0].sens = le32_to_cpu(buf[0]);
 994	if (items > 1)
 995		r->level[1].sens = le32_to_cpu(buf[1]);
 996	else
 997		r->level[1].sens = r->level[0].sens;
 998
 999	rc = ebitmap_read(&r->level[0].cat, fp);
1000	if (rc) {
1001		pr_err("SELinux: mls:  error reading low categories\n");
1002		goto out;
1003	}
1004	if (items > 1) {
1005		rc = ebitmap_read(&r->level[1].cat, fp);
1006		if (rc) {
1007			pr_err("SELinux: mls:  error reading high categories\n");
1008			goto bad_high;
1009		}
1010	} else {
1011		rc = ebitmap_cpy(&r->level[1].cat, &r->level[0].cat);
1012		if (rc) {
1013			pr_err("SELinux: mls:  out of memory\n");
1014			goto bad_high;
1015		}
1016	}
1017
1018	return 0;
1019bad_high:
1020	ebitmap_destroy(&r->level[0].cat);
1021out:
1022	return rc;
1023}
1024
1025/*
1026 * Read and validate a security context structure
1027 * from a policydb binary representation file.
1028 */
1029static int context_read_and_validate(struct context *c,
1030				     struct policydb *p,
1031				     void *fp)
1032{
1033	__le32 buf[3];
1034	int rc;
1035
1036	rc = next_entry(buf, fp, sizeof buf);
1037	if (rc) {
1038		pr_err("SELinux: context truncated\n");
1039		goto out;
1040	}
1041	c->user = le32_to_cpu(buf[0]);
1042	c->role = le32_to_cpu(buf[1]);
1043	c->type = le32_to_cpu(buf[2]);
1044	if (p->policyvers >= POLICYDB_VERSION_MLS) {
1045		rc = mls_read_range_helper(&c->range, fp);
1046		if (rc) {
1047			pr_err("SELinux: error reading MLS range of context\n");
1048			goto out;
1049		}
1050	}
1051
1052	rc = -EINVAL;
1053	if (!policydb_context_isvalid(p, c)) {
1054		pr_err("SELinux:  invalid security context\n");
1055		context_destroy(c);
1056		goto out;
1057	}
1058	rc = 0;
1059out:
1060	return rc;
1061}
1062
1063/*
1064 * The following *_read functions are used to
1065 * read the symbol data from a policy database
1066 * binary representation file.
1067 */
1068
1069static int str_read(char **strp, gfp_t flags, void *fp, u32 len)
1070{
1071	int rc;
1072	char *str;
1073
1074	if ((len == 0) || (len == (u32)-1))
1075		return -EINVAL;
1076
1077	str = kmalloc(len + 1, flags | __GFP_NOWARN);
1078	if (!str)
1079		return -ENOMEM;
1080
1081	rc = next_entry(str, fp, len);
1082	if (rc) {
1083		kfree(str);
1084		return rc;
1085	}
1086
1087	str[len] = '\0';
1088	*strp = str;
1089	return 0;
1090}
1091
1092static int perm_read(struct policydb *p, struct symtab *s, void *fp)
1093{
1094	char *key = NULL;
1095	struct perm_datum *perdatum;
1096	int rc;
1097	__le32 buf[2];
1098	u32 len;
1099
 
1100	perdatum = kzalloc(sizeof(*perdatum), GFP_KERNEL);
1101	if (!perdatum)
1102		return -ENOMEM;
1103
1104	rc = next_entry(buf, fp, sizeof buf);
1105	if (rc)
1106		goto bad;
1107
1108	len = le32_to_cpu(buf[0]);
1109	perdatum->value = le32_to_cpu(buf[1]);
1110
1111	rc = str_read(&key, GFP_KERNEL, fp, len);
 
 
 
 
 
1112	if (rc)
1113		goto bad;
 
1114
1115	rc = symtab_insert(s, key, perdatum);
1116	if (rc)
1117		goto bad;
1118
1119	return 0;
1120bad:
1121	perm_destroy(key, perdatum, NULL);
1122	return rc;
1123}
1124
1125static int common_read(struct policydb *p, struct symtab *s, void *fp)
1126{
1127	char *key = NULL;
1128	struct common_datum *comdatum;
1129	__le32 buf[4];
1130	u32 len, nel;
1131	int i, rc;
1132
 
1133	comdatum = kzalloc(sizeof(*comdatum), GFP_KERNEL);
1134	if (!comdatum)
1135		return -ENOMEM;
1136
1137	rc = next_entry(buf, fp, sizeof buf);
1138	if (rc)
1139		goto bad;
1140
1141	len = le32_to_cpu(buf[0]);
1142	comdatum->value = le32_to_cpu(buf[1]);
1143	nel = le32_to_cpu(buf[3]);
1144
1145	rc = symtab_init(&comdatum->permissions, nel);
1146	if (rc)
1147		goto bad;
1148	comdatum->permissions.nprim = le32_to_cpu(buf[2]);
 
 
 
 
 
 
1149
1150	rc = str_read(&key, GFP_KERNEL, fp, len);
1151	if (rc)
1152		goto bad;
 
1153
1154	for (i = 0; i < nel; i++) {
1155		rc = perm_read(p, &comdatum->permissions, fp);
1156		if (rc)
1157			goto bad;
1158	}
1159
1160	rc = symtab_insert(s, key, comdatum);
1161	if (rc)
1162		goto bad;
1163	return 0;
1164bad:
1165	common_destroy(key, comdatum, NULL);
1166	return rc;
1167}
1168
1169static void type_set_init(struct type_set *t)
1170{
1171	ebitmap_init(&t->types);
1172	ebitmap_init(&t->negset);
1173}
1174
1175static int type_set_read(struct type_set *t, void *fp)
1176{
1177	__le32 buf[1];
1178	int rc;
1179
1180	if (ebitmap_read(&t->types, fp))
1181		return -EINVAL;
1182	if (ebitmap_read(&t->negset, fp))
1183		return -EINVAL;
1184
1185	rc = next_entry(buf, fp, sizeof(u32));
1186	if (rc < 0)
1187		return -EINVAL;
1188	t->flags = le32_to_cpu(buf[0]);
1189
1190	return 0;
1191}
1192
1193
1194static int read_cons_helper(struct policydb *p,
1195				struct constraint_node **nodep,
1196				int ncons, int allowxtarget, void *fp)
1197{
1198	struct constraint_node *c, *lc;
1199	struct constraint_expr *e, *le;
1200	__le32 buf[3];
1201	u32 nexpr;
1202	int rc, i, j, depth;
1203
1204	lc = NULL;
1205	for (i = 0; i < ncons; i++) {
1206		c = kzalloc(sizeof(*c), GFP_KERNEL);
1207		if (!c)
1208			return -ENOMEM;
1209
1210		if (lc)
1211			lc->next = c;
1212		else
1213			*nodep = c;
1214
1215		rc = next_entry(buf, fp, (sizeof(u32) * 2));
1216		if (rc)
1217			return rc;
1218		c->permissions = le32_to_cpu(buf[0]);
1219		nexpr = le32_to_cpu(buf[1]);
1220		le = NULL;
1221		depth = -1;
1222		for (j = 0; j < nexpr; j++) {
1223			e = kzalloc(sizeof(*e), GFP_KERNEL);
1224			if (!e)
1225				return -ENOMEM;
1226
1227			if (le)
1228				le->next = e;
1229			else
1230				c->expr = e;
1231
1232			rc = next_entry(buf, fp, (sizeof(u32) * 3));
1233			if (rc)
1234				return rc;
1235			e->expr_type = le32_to_cpu(buf[0]);
1236			e->attr = le32_to_cpu(buf[1]);
1237			e->op = le32_to_cpu(buf[2]);
1238
1239			switch (e->expr_type) {
1240			case CEXPR_NOT:
1241				if (depth < 0)
1242					return -EINVAL;
1243				break;
1244			case CEXPR_AND:
1245			case CEXPR_OR:
1246				if (depth < 1)
1247					return -EINVAL;
1248				depth--;
1249				break;
1250			case CEXPR_ATTR:
1251				if (depth == (CEXPR_MAXDEPTH - 1))
1252					return -EINVAL;
1253				depth++;
1254				break;
1255			case CEXPR_NAMES:
1256				if (!allowxtarget && (e->attr & CEXPR_XTARGET))
1257					return -EINVAL;
1258				if (depth == (CEXPR_MAXDEPTH - 1))
1259					return -EINVAL;
1260				depth++;
1261				rc = ebitmap_read(&e->names, fp);
1262				if (rc)
1263					return rc;
1264				if (p->policyvers >=
1265				    POLICYDB_VERSION_CONSTRAINT_NAMES) {
1266					e->type_names = kzalloc(sizeof
1267						(*e->type_names), GFP_KERNEL);
1268					if (!e->type_names)
1269						return -ENOMEM;
1270					type_set_init(e->type_names);
1271					rc = type_set_read(e->type_names, fp);
1272					if (rc)
1273						return rc;
1274				}
1275				break;
1276			default:
1277				return -EINVAL;
1278			}
1279			le = e;
1280		}
1281		if (depth != 0)
1282			return -EINVAL;
1283		lc = c;
1284	}
1285
1286	return 0;
1287}
1288
1289static int class_read(struct policydb *p, struct symtab *s, void *fp)
1290{
1291	char *key = NULL;
1292	struct class_datum *cladatum;
1293	__le32 buf[6];
1294	u32 len, len2, ncons, nel;
1295	int i, rc;
1296
 
1297	cladatum = kzalloc(sizeof(*cladatum), GFP_KERNEL);
1298	if (!cladatum)
1299		return -ENOMEM;
1300
1301	rc = next_entry(buf, fp, sizeof(u32)*6);
1302	if (rc)
1303		goto bad;
1304
1305	len = le32_to_cpu(buf[0]);
1306	len2 = le32_to_cpu(buf[1]);
1307	cladatum->value = le32_to_cpu(buf[2]);
1308	nel = le32_to_cpu(buf[4]);
1309
1310	rc = symtab_init(&cladatum->permissions, nel);
1311	if (rc)
1312		goto bad;
1313	cladatum->permissions.nprim = le32_to_cpu(buf[3]);
 
1314
1315	ncons = le32_to_cpu(buf[5]);
1316
1317	rc = str_read(&key, GFP_KERNEL, fp, len);
 
 
 
 
 
1318	if (rc)
1319		goto bad;
 
1320
1321	if (len2) {
1322		rc = str_read(&cladatum->comkey, GFP_KERNEL, fp, len2);
 
 
 
 
1323		if (rc)
1324			goto bad;
 
1325
1326		rc = -EINVAL;
1327		cladatum->comdatum = symtab_search(&p->p_commons,
1328						   cladatum->comkey);
1329		if (!cladatum->comdatum) {
1330			pr_err("SELinux:  unknown common %s\n",
1331			       cladatum->comkey);
1332			goto bad;
1333		}
1334	}
1335	for (i = 0; i < nel; i++) {
1336		rc = perm_read(p, &cladatum->permissions, fp);
1337		if (rc)
1338			goto bad;
1339	}
1340
1341	rc = read_cons_helper(p, &cladatum->constraints, ncons, 0, fp);
1342	if (rc)
1343		goto bad;
1344
1345	if (p->policyvers >= POLICYDB_VERSION_VALIDATETRANS) {
1346		/* grab the validatetrans rules */
1347		rc = next_entry(buf, fp, sizeof(u32));
1348		if (rc)
1349			goto bad;
1350		ncons = le32_to_cpu(buf[0]);
1351		rc = read_cons_helper(p, &cladatum->validatetrans,
1352				ncons, 1, fp);
1353		if (rc)
1354			goto bad;
1355	}
1356
1357	if (p->policyvers >= POLICYDB_VERSION_NEW_OBJECT_DEFAULTS) {
1358		rc = next_entry(buf, fp, sizeof(u32) * 3);
1359		if (rc)
1360			goto bad;
1361
1362		cladatum->default_user = le32_to_cpu(buf[0]);
1363		cladatum->default_role = le32_to_cpu(buf[1]);
1364		cladatum->default_range = le32_to_cpu(buf[2]);
1365	}
1366
1367	if (p->policyvers >= POLICYDB_VERSION_DEFAULT_TYPE) {
1368		rc = next_entry(buf, fp, sizeof(u32) * 1);
1369		if (rc)
1370			goto bad;
1371		cladatum->default_type = le32_to_cpu(buf[0]);
1372	}
1373
1374	rc = symtab_insert(s, key, cladatum);
1375	if (rc)
1376		goto bad;
1377
1378	return 0;
1379bad:
1380	cls_destroy(key, cladatum, NULL);
1381	return rc;
1382}
1383
1384static int role_read(struct policydb *p, struct symtab *s, void *fp)
1385{
1386	char *key = NULL;
1387	struct role_datum *role;
1388	int rc, to_read = 2;
1389	__le32 buf[3];
1390	u32 len;
1391
 
1392	role = kzalloc(sizeof(*role), GFP_KERNEL);
1393	if (!role)
1394		return -ENOMEM;
1395
1396	if (p->policyvers >= POLICYDB_VERSION_BOUNDARY)
1397		to_read = 3;
1398
1399	rc = next_entry(buf, fp, sizeof(buf[0]) * to_read);
1400	if (rc)
1401		goto bad;
1402
1403	len = le32_to_cpu(buf[0]);
1404	role->value = le32_to_cpu(buf[1]);
1405	if (p->policyvers >= POLICYDB_VERSION_BOUNDARY)
1406		role->bounds = le32_to_cpu(buf[2]);
1407
1408	rc = str_read(&key, GFP_KERNEL, fp, len);
 
 
 
 
 
1409	if (rc)
1410		goto bad;
 
1411
1412	rc = ebitmap_read(&role->dominates, fp);
1413	if (rc)
1414		goto bad;
1415
1416	rc = ebitmap_read(&role->types, fp);
1417	if (rc)
1418		goto bad;
1419
1420	if (strcmp(key, OBJECT_R) == 0) {
1421		rc = -EINVAL;
1422		if (role->value != OBJECT_R_VAL) {
1423			pr_err("SELinux: Role %s has wrong value %d\n",
1424			       OBJECT_R, role->value);
1425			goto bad;
1426		}
1427		rc = 0;
1428		goto bad;
1429	}
1430
1431	rc = symtab_insert(s, key, role);
1432	if (rc)
1433		goto bad;
1434	return 0;
1435bad:
1436	role_destroy(key, role, NULL);
1437	return rc;
1438}
1439
1440static int type_read(struct policydb *p, struct symtab *s, void *fp)
1441{
1442	char *key = NULL;
1443	struct type_datum *typdatum;
1444	int rc, to_read = 3;
1445	__le32 buf[4];
1446	u32 len;
1447
 
1448	typdatum = kzalloc(sizeof(*typdatum), GFP_KERNEL);
1449	if (!typdatum)
1450		return -ENOMEM;
1451
1452	if (p->policyvers >= POLICYDB_VERSION_BOUNDARY)
1453		to_read = 4;
1454
1455	rc = next_entry(buf, fp, sizeof(buf[0]) * to_read);
1456	if (rc)
1457		goto bad;
1458
1459	len = le32_to_cpu(buf[0]);
1460	typdatum->value = le32_to_cpu(buf[1]);
1461	if (p->policyvers >= POLICYDB_VERSION_BOUNDARY) {
1462		u32 prop = le32_to_cpu(buf[2]);
1463
1464		if (prop & TYPEDATUM_PROPERTY_PRIMARY)
1465			typdatum->primary = 1;
1466		if (prop & TYPEDATUM_PROPERTY_ATTRIBUTE)
1467			typdatum->attribute = 1;
1468
1469		typdatum->bounds = le32_to_cpu(buf[3]);
1470	} else {
1471		typdatum->primary = le32_to_cpu(buf[2]);
1472	}
1473
1474	rc = str_read(&key, GFP_KERNEL, fp, len);
 
 
 
 
1475	if (rc)
1476		goto bad;
 
1477
1478	rc = symtab_insert(s, key, typdatum);
1479	if (rc)
1480		goto bad;
1481	return 0;
1482bad:
1483	type_destroy(key, typdatum, NULL);
1484	return rc;
1485}
1486
1487
1488/*
1489 * Read a MLS level structure from a policydb binary
1490 * representation file.
1491 */
1492static int mls_read_level(struct mls_level *lp, void *fp)
1493{
1494	__le32 buf[1];
1495	int rc;
1496
1497	memset(lp, 0, sizeof(*lp));
1498
1499	rc = next_entry(buf, fp, sizeof buf);
1500	if (rc) {
1501		pr_err("SELinux: mls: truncated level\n");
1502		return rc;
1503	}
1504	lp->sens = le32_to_cpu(buf[0]);
1505
1506	rc = ebitmap_read(&lp->cat, fp);
1507	if (rc) {
1508		pr_err("SELinux: mls:  error reading level categories\n");
1509		return rc;
1510	}
1511	return 0;
1512}
1513
1514static int user_read(struct policydb *p, struct symtab *s, void *fp)
1515{
1516	char *key = NULL;
1517	struct user_datum *usrdatum;
1518	int rc, to_read = 2;
1519	__le32 buf[3];
1520	u32 len;
1521
 
1522	usrdatum = kzalloc(sizeof(*usrdatum), GFP_KERNEL);
1523	if (!usrdatum)
1524		return -ENOMEM;
1525
1526	if (p->policyvers >= POLICYDB_VERSION_BOUNDARY)
1527		to_read = 3;
1528
1529	rc = next_entry(buf, fp, sizeof(buf[0]) * to_read);
1530	if (rc)
1531		goto bad;
1532
1533	len = le32_to_cpu(buf[0]);
1534	usrdatum->value = le32_to_cpu(buf[1]);
1535	if (p->policyvers >= POLICYDB_VERSION_BOUNDARY)
1536		usrdatum->bounds = le32_to_cpu(buf[2]);
1537
1538	rc = str_read(&key, GFP_KERNEL, fp, len);
 
 
 
 
1539	if (rc)
1540		goto bad;
 
1541
1542	rc = ebitmap_read(&usrdatum->roles, fp);
1543	if (rc)
1544		goto bad;
1545
1546	if (p->policyvers >= POLICYDB_VERSION_MLS) {
1547		rc = mls_read_range_helper(&usrdatum->range, fp);
1548		if (rc)
1549			goto bad;
1550		rc = mls_read_level(&usrdatum->dfltlevel, fp);
1551		if (rc)
1552			goto bad;
1553	}
1554
1555	rc = symtab_insert(s, key, usrdatum);
1556	if (rc)
1557		goto bad;
1558	return 0;
1559bad:
1560	user_destroy(key, usrdatum, NULL);
1561	return rc;
1562}
1563
1564static int sens_read(struct policydb *p, struct symtab *s, void *fp)
1565{
1566	char *key = NULL;
1567	struct level_datum *levdatum;
1568	int rc;
1569	__le32 buf[2];
1570	u32 len;
1571
 
1572	levdatum = kzalloc(sizeof(*levdatum), GFP_ATOMIC);
1573	if (!levdatum)
1574		return -ENOMEM;
1575
1576	rc = next_entry(buf, fp, sizeof buf);
1577	if (rc)
1578		goto bad;
1579
1580	len = le32_to_cpu(buf[0]);
1581	levdatum->isalias = le32_to_cpu(buf[1]);
1582
1583	rc = str_read(&key, GFP_ATOMIC, fp, len);
 
 
 
 
1584	if (rc)
1585		goto bad;
 
1586
1587	rc = -ENOMEM;
1588	levdatum->level = kmalloc(sizeof(*levdatum->level), GFP_ATOMIC);
1589	if (!levdatum->level)
1590		goto bad;
1591
1592	rc = mls_read_level(levdatum->level, fp);
1593	if (rc)
1594		goto bad;
1595
1596	rc = symtab_insert(s, key, levdatum);
1597	if (rc)
1598		goto bad;
1599	return 0;
1600bad:
1601	sens_destroy(key, levdatum, NULL);
1602	return rc;
1603}
1604
1605static int cat_read(struct policydb *p, struct symtab *s, void *fp)
1606{
1607	char *key = NULL;
1608	struct cat_datum *catdatum;
1609	int rc;
1610	__le32 buf[3];
1611	u32 len;
1612
 
1613	catdatum = kzalloc(sizeof(*catdatum), GFP_ATOMIC);
1614	if (!catdatum)
1615		return -ENOMEM;
1616
1617	rc = next_entry(buf, fp, sizeof buf);
1618	if (rc)
1619		goto bad;
1620
1621	len = le32_to_cpu(buf[0]);
1622	catdatum->value = le32_to_cpu(buf[1]);
1623	catdatum->isalias = le32_to_cpu(buf[2]);
1624
1625	rc = str_read(&key, GFP_ATOMIC, fp, len);
 
 
 
 
1626	if (rc)
1627		goto bad;
 
1628
1629	rc = symtab_insert(s, key, catdatum);
1630	if (rc)
1631		goto bad;
1632	return 0;
1633bad:
1634	cat_destroy(key, catdatum, NULL);
1635	return rc;
1636}
1637
1638static int (*const read_f[SYM_NUM]) (struct policydb *p,
1639				     struct symtab *s, void *fp) = {
1640	common_read,
1641	class_read,
1642	role_read,
1643	type_read,
1644	user_read,
1645	cond_read_bool,
1646	sens_read,
1647	cat_read,
1648};
1649
1650static int user_bounds_sanity_check(void *key, void *datum, void *datap)
1651{
1652	struct user_datum *upper, *user;
1653	struct policydb *p = datap;
1654	int depth = 0;
1655
1656	upper = user = datum;
1657	while (upper->bounds) {
1658		struct ebitmap_node *node;
1659		unsigned long bit;
1660
1661		if (++depth == POLICYDB_BOUNDS_MAXDEPTH) {
1662			pr_err("SELinux: user %s: "
1663			       "too deep or looped boundary",
1664			       (char *) key);
1665			return -EINVAL;
1666		}
1667
1668		upper = p->user_val_to_struct[upper->bounds - 1];
1669		ebitmap_for_each_positive_bit(&user->roles, node, bit) {
1670			if (ebitmap_get_bit(&upper->roles, bit))
1671				continue;
1672
1673			pr_err("SELinux: boundary violated policy: "
 
1674			       "user=%s role=%s bounds=%s\n",
1675			       sym_name(p, SYM_USERS, user->value - 1),
1676			       sym_name(p, SYM_ROLES, bit),
1677			       sym_name(p, SYM_USERS, upper->value - 1));
1678
1679			return -EINVAL;
1680		}
1681	}
1682
1683	return 0;
1684}
1685
1686static int role_bounds_sanity_check(void *key, void *datum, void *datap)
1687{
1688	struct role_datum *upper, *role;
1689	struct policydb *p = datap;
1690	int depth = 0;
1691
1692	upper = role = datum;
1693	while (upper->bounds) {
1694		struct ebitmap_node *node;
1695		unsigned long bit;
1696
1697		if (++depth == POLICYDB_BOUNDS_MAXDEPTH) {
1698			pr_err("SELinux: role %s: "
1699			       "too deep or looped bounds\n",
1700			       (char *) key);
1701			return -EINVAL;
1702		}
1703
1704		upper = p->role_val_to_struct[upper->bounds - 1];
1705		ebitmap_for_each_positive_bit(&role->types, node, bit) {
1706			if (ebitmap_get_bit(&upper->types, bit))
1707				continue;
1708
1709			pr_err("SELinux: boundary violated policy: "
 
1710			       "role=%s type=%s bounds=%s\n",
1711			       sym_name(p, SYM_ROLES, role->value - 1),
1712			       sym_name(p, SYM_TYPES, bit),
1713			       sym_name(p, SYM_ROLES, upper->value - 1));
1714
1715			return -EINVAL;
1716		}
1717	}
1718
1719	return 0;
1720}
1721
1722static int type_bounds_sanity_check(void *key, void *datum, void *datap)
1723{
1724	struct type_datum *upper;
1725	struct policydb *p = datap;
1726	int depth = 0;
1727
1728	upper = datum;
1729	while (upper->bounds) {
1730		if (++depth == POLICYDB_BOUNDS_MAXDEPTH) {
1731			pr_err("SELinux: type %s: "
1732			       "too deep or looped boundary\n",
1733			       (char *) key);
1734			return -EINVAL;
1735		}
1736
1737		upper = p->type_val_to_struct[upper->bounds - 1];
 
1738		BUG_ON(!upper);
1739
1740		if (upper->attribute) {
1741			pr_err("SELinux: type %s: "
1742			       "bounded by attribute %s",
1743			       (char *) key,
1744			       sym_name(p, SYM_TYPES, upper->value - 1));
1745			return -EINVAL;
1746		}
1747	}
1748
1749	return 0;
1750}
1751
1752static int policydb_bounds_sanity_check(struct policydb *p)
1753{
1754	int rc;
1755
1756	if (p->policyvers < POLICYDB_VERSION_BOUNDARY)
1757		return 0;
1758
1759	rc = hashtab_map(&p->p_users.table, user_bounds_sanity_check, p);
 
1760	if (rc)
1761		return rc;
1762
1763	rc = hashtab_map(&p->p_roles.table, role_bounds_sanity_check, p);
 
1764	if (rc)
1765		return rc;
1766
1767	rc = hashtab_map(&p->p_types.table, type_bounds_sanity_check, p);
 
1768	if (rc)
1769		return rc;
1770
1771	return 0;
1772}
1773
 
 
1774u16 string_to_security_class(struct policydb *p, const char *name)
1775{
1776	struct class_datum *cladatum;
1777
1778	cladatum = symtab_search(&p->p_classes, name);
1779	if (!cladatum)
1780		return 0;
1781
1782	return cladatum->value;
1783}
1784
1785u32 string_to_av_perm(struct policydb *p, u16 tclass, const char *name)
1786{
1787	struct class_datum *cladatum;
1788	struct perm_datum *perdatum = NULL;
1789	struct common_datum *comdatum;
1790
1791	if (!tclass || tclass > p->p_classes.nprim)
1792		return 0;
1793
1794	cladatum = p->class_val_to_struct[tclass-1];
1795	comdatum = cladatum->comdatum;
1796	if (comdatum)
1797		perdatum = symtab_search(&comdatum->permissions, name);
 
1798	if (!perdatum)
1799		perdatum = symtab_search(&cladatum->permissions, name);
 
1800	if (!perdatum)
1801		return 0;
1802
1803	return 1U << (perdatum->value-1);
1804}
1805
1806static int range_read(struct policydb *p, void *fp)
1807{
1808	struct range_trans *rt = NULL;
1809	struct mls_range *r = NULL;
1810	int i, rc;
1811	__le32 buf[2];
1812	u32 nel;
1813
1814	if (p->policyvers < POLICYDB_VERSION_MLS)
1815		return 0;
1816
1817	rc = next_entry(buf, fp, sizeof(u32));
1818	if (rc)
1819		return rc;
1820
1821	nel = le32_to_cpu(buf[0]);
1822
1823	rc = hashtab_init(&p->range_tr, nel);
1824	if (rc)
1825		return rc;
1826
1827	for (i = 0; i < nel; i++) {
1828		rc = -ENOMEM;
1829		rt = kzalloc(sizeof(*rt), GFP_KERNEL);
1830		if (!rt)
1831			goto out;
1832
1833		rc = next_entry(buf, fp, (sizeof(u32) * 2));
1834		if (rc)
1835			goto out;
1836
1837		rt->source_type = le32_to_cpu(buf[0]);
1838		rt->target_type = le32_to_cpu(buf[1]);
1839		if (p->policyvers >= POLICYDB_VERSION_RANGETRANS) {
1840			rc = next_entry(buf, fp, sizeof(u32));
1841			if (rc)
1842				goto out;
1843			rt->target_class = le32_to_cpu(buf[0]);
1844		} else
1845			rt->target_class = p->process_class;
1846
1847		rc = -EINVAL;
1848		if (!policydb_type_isvalid(p, rt->source_type) ||
1849		    !policydb_type_isvalid(p, rt->target_type) ||
1850		    !policydb_class_isvalid(p, rt->target_class))
1851			goto out;
1852
1853		rc = -ENOMEM;
1854		r = kzalloc(sizeof(*r), GFP_KERNEL);
1855		if (!r)
1856			goto out;
1857
1858		rc = mls_read_range_helper(r, fp);
1859		if (rc)
1860			goto out;
1861
1862		rc = -EINVAL;
1863		if (!mls_range_isvalid(p, r)) {
1864			pr_warn("SELinux:  rangetrans:  invalid range\n");
1865			goto out;
1866		}
1867
1868		rc = hashtab_insert(&p->range_tr, rt, r, rangetr_key_params);
1869		if (rc)
1870			goto out;
1871
1872		rt = NULL;
1873		r = NULL;
1874	}
1875	hash_eval(&p->range_tr, "rangetr");
1876	rc = 0;
1877out:
1878	kfree(rt);
1879	kfree(r);
1880	return rc;
1881}
1882
1883static int filename_trans_read_helper_compat(struct policydb *p, void *fp)
1884{
1885	struct filename_trans_key key, *ft = NULL;
1886	struct filename_trans_datum *last, *datum = NULL;
1887	char *name = NULL;
1888	u32 len, stype, otype;
1889	__le32 buf[4];
1890	int rc;
1891
1892	/* length of the path component string */
1893	rc = next_entry(buf, fp, sizeof(u32));
1894	if (rc)
1895		return rc;
1896	len = le32_to_cpu(buf[0]);
1897
1898	/* path component string */
1899	rc = str_read(&name, GFP_KERNEL, fp, len);
1900	if (rc)
1901		return rc;
 
1902
1903	rc = next_entry(buf, fp, sizeof(u32) * 4);
1904	if (rc)
1905		goto out;
1906
1907	stype = le32_to_cpu(buf[0]);
1908	key.ttype = le32_to_cpu(buf[1]);
1909	key.tclass = le32_to_cpu(buf[2]);
1910	key.name = name;
1911
1912	otype = le32_to_cpu(buf[3]);
1913
1914	last = NULL;
1915	datum = policydb_filenametr_search(p, &key);
1916	while (datum) {
1917		if (unlikely(ebitmap_get_bit(&datum->stypes, stype - 1))) {
1918			/* conflicting/duplicate rules are ignored */
1919			datum = NULL;
1920			goto out;
1921		}
1922		if (likely(datum->otype == otype))
1923			break;
1924		last = datum;
1925		datum = datum->next;
1926	}
1927	if (!datum) {
1928		rc = -ENOMEM;
1929		datum = kmalloc(sizeof(*datum), GFP_KERNEL);
1930		if (!datum)
1931			goto out;
1932
1933		ebitmap_init(&datum->stypes);
1934		datum->otype = otype;
1935		datum->next = NULL;
1936
1937		if (unlikely(last)) {
1938			last->next = datum;
1939		} else {
1940			rc = -ENOMEM;
1941			ft = kmemdup(&key, sizeof(key), GFP_KERNEL);
1942			if (!ft)
1943				goto out;
1944
1945			rc = hashtab_insert(&p->filename_trans, ft, datum,
1946					    filenametr_key_params);
1947			if (rc)
1948				goto out;
1949			name = NULL;
1950
1951			rc = ebitmap_set_bit(&p->filename_trans_ttypes,
1952					     key.ttype, 1);
1953			if (rc)
1954				return rc;
1955		}
1956	}
1957	kfree(name);
1958	return ebitmap_set_bit(&datum->stypes, stype - 1, 1);
1959
1960out:
1961	kfree(ft);
1962	kfree(name);
1963	kfree(datum);
1964	return rc;
1965}
1966
1967static int filename_trans_read_helper(struct policydb *p, void *fp)
1968{
1969	struct filename_trans_key *ft = NULL;
1970	struct filename_trans_datum **dst, *datum, *first = NULL;
1971	char *name = NULL;
1972	u32 len, ttype, tclass, ndatum, i;
1973	__le32 buf[3];
1974	int rc;
1975
1976	/* length of the path component string */
1977	rc = next_entry(buf, fp, sizeof(u32));
1978	if (rc)
1979		return rc;
1980	len = le32_to_cpu(buf[0]);
1981
1982	/* path component string */
1983	rc = str_read(&name, GFP_KERNEL, fp, len);
1984	if (rc)
1985		return rc;
1986
1987	rc = next_entry(buf, fp, sizeof(u32) * 3);
1988	if (rc)
1989		goto out;
1990
1991	ttype = le32_to_cpu(buf[0]);
1992	tclass = le32_to_cpu(buf[1]);
1993
1994	ndatum = le32_to_cpu(buf[2]);
1995	if (ndatum == 0) {
1996		pr_err("SELinux:  Filename transition key with no datum\n");
1997		rc = -ENOENT;
1998		goto out;
1999	}
2000
2001	dst = &first;
2002	for (i = 0; i < ndatum; i++) {
2003		rc = -ENOMEM;
2004		datum = kmalloc(sizeof(*datum), GFP_KERNEL);
2005		if (!datum)
2006			goto out;
2007
2008		*dst = datum;
2009
2010		/* ebitmap_read() will at least init the bitmap */
2011		rc = ebitmap_read(&datum->stypes, fp);
2012		if (rc)
2013			goto out;
 
2014
2015		rc = next_entry(buf, fp, sizeof(u32));
2016		if (rc)
2017			goto out;
2018
2019		datum->otype = le32_to_cpu(buf[0]);
2020		datum->next = NULL;
2021
2022		dst = &datum->next;
2023	}
2024
2025	rc = -ENOMEM;
2026	ft = kmalloc(sizeof(*ft), GFP_KERNEL);
2027	if (!ft)
2028		goto out;
2029
2030	ft->ttype = ttype;
2031	ft->tclass = tclass;
2032	ft->name = name;
2033
2034	rc = hashtab_insert(&p->filename_trans, ft, first,
2035			    filenametr_key_params);
2036	if (rc == -EEXIST)
2037		pr_err("SELinux:  Duplicate filename transition key\n");
2038	if (rc)
2039		goto out;
2040
2041	return ebitmap_set_bit(&p->filename_trans_ttypes, ttype, 1);
 
 
2042
 
 
 
 
2043out:
2044	kfree(ft);
2045	kfree(name);
2046	while (first) {
2047		datum = first;
2048		first = first->next;
2049
2050		ebitmap_destroy(&datum->stypes);
2051		kfree(datum);
2052	}
2053	return rc;
2054}
2055
2056static int filename_trans_read(struct policydb *p, void *fp)
2057{
2058	u32 nel;
2059	__le32 buf[1];
2060	int rc, i;
2061
2062	if (p->policyvers < POLICYDB_VERSION_FILENAME_TRANS)
2063		return 0;
2064
2065	rc = next_entry(buf, fp, sizeof(u32));
2066	if (rc)
2067		return rc;
2068	nel = le32_to_cpu(buf[0]);
2069
2070	if (p->policyvers < POLICYDB_VERSION_COMP_FTRANS) {
2071		p->compat_filename_trans_count = nel;
2072
2073		rc = hashtab_init(&p->filename_trans, (1 << 11));
2074		if (rc)
2075			return rc;
2076
2077		for (i = 0; i < nel; i++) {
2078			rc = filename_trans_read_helper_compat(p, fp);
2079			if (rc)
2080				return rc;
2081		}
2082	} else {
2083		rc = hashtab_init(&p->filename_trans, nel);
2084		if (rc)
2085			return rc;
2086
2087		for (i = 0; i < nel; i++) {
2088			rc = filename_trans_read_helper(p, fp);
2089			if (rc)
2090				return rc;
2091		}
2092	}
2093	hash_eval(&p->filename_trans, "filenametr");
2094	return 0;
2095}
2096
2097static int genfs_read(struct policydb *p, void *fp)
2098{
2099	int i, j, rc;
2100	u32 nel, nel2, len, len2;
2101	__le32 buf[1];
2102	struct ocontext *l, *c;
2103	struct ocontext *newc = NULL;
2104	struct genfs *genfs_p, *genfs;
2105	struct genfs *newgenfs = NULL;
2106
2107	rc = next_entry(buf, fp, sizeof(u32));
2108	if (rc)
2109		return rc;
2110	nel = le32_to_cpu(buf[0]);
2111
2112	for (i = 0; i < nel; i++) {
2113		rc = next_entry(buf, fp, sizeof(u32));
2114		if (rc)
2115			goto out;
2116		len = le32_to_cpu(buf[0]);
2117
2118		rc = -ENOMEM;
2119		newgenfs = kzalloc(sizeof(*newgenfs), GFP_KERNEL);
2120		if (!newgenfs)
2121			goto out;
2122
2123		rc = str_read(&newgenfs->fstype, GFP_KERNEL, fp, len);
 
 
 
 
 
2124		if (rc)
2125			goto out;
2126
 
 
2127		for (genfs_p = NULL, genfs = p->genfs; genfs;
2128		     genfs_p = genfs, genfs = genfs->next) {
2129			rc = -EINVAL;
2130			if (strcmp(newgenfs->fstype, genfs->fstype) == 0) {
2131				pr_err("SELinux:  dup genfs fstype %s\n",
2132				       newgenfs->fstype);
2133				goto out;
2134			}
2135			if (strcmp(newgenfs->fstype, genfs->fstype) < 0)
2136				break;
2137		}
2138		newgenfs->next = genfs;
2139		if (genfs_p)
2140			genfs_p->next = newgenfs;
2141		else
2142			p->genfs = newgenfs;
2143		genfs = newgenfs;
2144		newgenfs = NULL;
2145
2146		rc = next_entry(buf, fp, sizeof(u32));
2147		if (rc)
2148			goto out;
2149
2150		nel2 = le32_to_cpu(buf[0]);
2151		for (j = 0; j < nel2; j++) {
2152			rc = next_entry(buf, fp, sizeof(u32));
2153			if (rc)
2154				goto out;
2155			len = le32_to_cpu(buf[0]);
2156
2157			rc = -ENOMEM;
2158			newc = kzalloc(sizeof(*newc), GFP_KERNEL);
2159			if (!newc)
2160				goto out;
2161
2162			rc = str_read(&newc->u.name, GFP_KERNEL, fp, len);
 
 
 
 
 
2163			if (rc)
2164				goto out;
 
2165
2166			rc = next_entry(buf, fp, sizeof(u32));
2167			if (rc)
2168				goto out;
2169
2170			newc->v.sclass = le32_to_cpu(buf[0]);
2171			rc = context_read_and_validate(&newc->context[0], p, fp);
2172			if (rc)
2173				goto out;
2174
2175			for (l = NULL, c = genfs->head; c;
2176			     l = c, c = c->next) {
2177				rc = -EINVAL;
2178				if (!strcmp(newc->u.name, c->u.name) &&
2179				    (!c->v.sclass || !newc->v.sclass ||
2180				     newc->v.sclass == c->v.sclass)) {
2181					pr_err("SELinux:  dup genfs entry (%s,%s)\n",
2182					       genfs->fstype, c->u.name);
2183					goto out;
2184				}
2185				len = strlen(newc->u.name);
2186				len2 = strlen(c->u.name);
2187				if (len > len2)
2188					break;
2189			}
2190
2191			newc->next = c;
2192			if (l)
2193				l->next = newc;
2194			else
2195				genfs->head = newc;
2196			newc = NULL;
2197		}
2198	}
2199	rc = 0;
2200out:
2201	if (newgenfs) {
2202		kfree(newgenfs->fstype);
2203		kfree(newgenfs);
2204	}
2205	ocontext_destroy(newc, OCON_FSUSE);
2206
2207	return rc;
2208}
2209
2210static int ocontext_read(struct policydb *p, const struct policydb_compat_info *info,
2211			 void *fp)
2212{
2213	int i, j, rc;
2214	u32 nel, len;
2215	__be64 prefixbuf[1];
2216	__le32 buf[3];
2217	struct ocontext *l, *c;
2218	u32 nodebuf[8];
2219
2220	for (i = 0; i < info->ocon_num; i++) {
2221		rc = next_entry(buf, fp, sizeof(u32));
2222		if (rc)
2223			goto out;
2224		nel = le32_to_cpu(buf[0]);
2225
2226		l = NULL;
2227		for (j = 0; j < nel; j++) {
2228			rc = -ENOMEM;
2229			c = kzalloc(sizeof(*c), GFP_KERNEL);
2230			if (!c)
2231				goto out;
2232			if (l)
2233				l->next = c;
2234			else
2235				p->ocontexts[i] = c;
2236			l = c;
2237
2238			switch (i) {
2239			case OCON_ISID:
2240				rc = next_entry(buf, fp, sizeof(u32));
2241				if (rc)
2242					goto out;
2243
2244				c->sid[0] = le32_to_cpu(buf[0]);
2245				rc = context_read_and_validate(&c->context[0], p, fp);
2246				if (rc)
2247					goto out;
2248				break;
2249			case OCON_FS:
2250			case OCON_NETIF:
2251				rc = next_entry(buf, fp, sizeof(u32));
2252				if (rc)
2253					goto out;
2254				len = le32_to_cpu(buf[0]);
2255
2256				rc = str_read(&c->u.name, GFP_KERNEL, fp, len);
 
 
 
 
 
2257				if (rc)
2258					goto out;
2259
 
2260				rc = context_read_and_validate(&c->context[0], p, fp);
2261				if (rc)
2262					goto out;
2263				rc = context_read_and_validate(&c->context[1], p, fp);
2264				if (rc)
2265					goto out;
2266				break;
2267			case OCON_PORT:
2268				rc = next_entry(buf, fp, sizeof(u32)*3);
2269				if (rc)
2270					goto out;
2271				c->u.port.protocol = le32_to_cpu(buf[0]);
2272				c->u.port.low_port = le32_to_cpu(buf[1]);
2273				c->u.port.high_port = le32_to_cpu(buf[2]);
2274				rc = context_read_and_validate(&c->context[0], p, fp);
2275				if (rc)
2276					goto out;
2277				break;
2278			case OCON_NODE:
2279				rc = next_entry(nodebuf, fp, sizeof(u32) * 2);
2280				if (rc)
2281					goto out;
2282				c->u.node.addr = nodebuf[0]; /* network order */
2283				c->u.node.mask = nodebuf[1]; /* network order */
2284				rc = context_read_and_validate(&c->context[0], p, fp);
2285				if (rc)
2286					goto out;
2287				break;
2288			case OCON_FSUSE:
2289				rc = next_entry(buf, fp, sizeof(u32)*2);
2290				if (rc)
2291					goto out;
2292
2293				rc = -EINVAL;
2294				c->v.behavior = le32_to_cpu(buf[0]);
2295				/* Determined at runtime, not in policy DB. */
2296				if (c->v.behavior == SECURITY_FS_USE_MNTPOINT)
2297					goto out;
2298				if (c->v.behavior > SECURITY_FS_USE_MAX)
2299					goto out;
2300
 
2301				len = le32_to_cpu(buf[1]);
2302				rc = str_read(&c->u.name, GFP_KERNEL, fp, len);
2303				if (rc)
2304					goto out;
2305
 
 
 
 
2306				rc = context_read_and_validate(&c->context[0], p, fp);
2307				if (rc)
2308					goto out;
2309				break;
2310			case OCON_NODE6: {
2311				int k;
2312
2313				rc = next_entry(nodebuf, fp, sizeof(u32) * 8);
2314				if (rc)
2315					goto out;
2316				for (k = 0; k < 4; k++)
2317					c->u.node6.addr[k] = nodebuf[k];
2318				for (k = 0; k < 4; k++)
2319					c->u.node6.mask[k] = nodebuf[k+4];
2320				rc = context_read_and_validate(&c->context[0], p, fp);
2321				if (rc)
2322					goto out;
2323				break;
2324			}
2325			case OCON_IBPKEY: {
2326				u32 pkey_lo, pkey_hi;
2327
2328				rc = next_entry(prefixbuf, fp, sizeof(u64));
2329				if (rc)
2330					goto out;
2331
2332				/* we need to have subnet_prefix in CPU order */
2333				c->u.ibpkey.subnet_prefix = be64_to_cpu(prefixbuf[0]);
2334
2335				rc = next_entry(buf, fp, sizeof(u32) * 2);
2336				if (rc)
2337					goto out;
2338
2339				pkey_lo = le32_to_cpu(buf[0]);
2340				pkey_hi = le32_to_cpu(buf[1]);
2341
2342				if (pkey_lo > U16_MAX || pkey_hi > U16_MAX) {
2343					rc = -EINVAL;
2344					goto out;
2345				}
2346
2347				c->u.ibpkey.low_pkey  = pkey_lo;
2348				c->u.ibpkey.high_pkey = pkey_hi;
2349
2350				rc = context_read_and_validate(&c->context[0],
2351							       p,
2352							       fp);
2353				if (rc)
2354					goto out;
2355				break;
2356			}
2357			case OCON_IBENDPORT: {
2358				u32 port;
2359
2360				rc = next_entry(buf, fp, sizeof(u32) * 2);
2361				if (rc)
2362					goto out;
2363				len = le32_to_cpu(buf[0]);
2364
2365				rc = str_read(&c->u.ibendport.dev_name, GFP_KERNEL, fp, len);
2366				if (rc)
2367					goto out;
2368
2369				port = le32_to_cpu(buf[1]);
2370				if (port > U8_MAX || port == 0) {
2371					rc = -EINVAL;
2372					goto out;
2373				}
2374
2375				c->u.ibendport.port = port;
2376
2377				rc = context_read_and_validate(&c->context[0],
2378							       p,
2379							       fp);
2380				if (rc)
2381					goto out;
2382				break;
2383			} /* end case */
2384			} /* end switch */
2385		}
2386	}
2387	rc = 0;
2388out:
2389	return rc;
2390}
2391
2392/*
2393 * Read the configuration data from a policy database binary
2394 * representation file into a policy database structure.
2395 */
2396int policydb_read(struct policydb *p, void *fp)
2397{
2398	struct role_allow *ra, *lra;
2399	struct role_trans_key *rtk = NULL;
2400	struct role_trans_datum *rtd = NULL;
2401	int i, j, rc;
2402	__le32 buf[4];
2403	u32 len, nprim, nel, perm;
2404
2405	char *policydb_str;
2406	const struct policydb_compat_info *info;
2407
2408	policydb_init(p);
 
 
2409
2410	/* Read the magic number and string length. */
2411	rc = next_entry(buf, fp, sizeof(u32) * 2);
2412	if (rc)
2413		goto bad;
2414
2415	rc = -EINVAL;
2416	if (le32_to_cpu(buf[0]) != POLICYDB_MAGIC) {
2417		pr_err("SELinux:  policydb magic number 0x%x does "
2418		       "not match expected magic number 0x%x\n",
2419		       le32_to_cpu(buf[0]), POLICYDB_MAGIC);
2420		goto bad;
2421	}
2422
2423	rc = -EINVAL;
2424	len = le32_to_cpu(buf[1]);
2425	if (len != strlen(POLICYDB_STRING)) {
2426		pr_err("SELinux:  policydb string length %d does not "
2427		       "match expected length %zu\n",
2428		       len, strlen(POLICYDB_STRING));
2429		goto bad;
2430	}
2431
2432	rc = -ENOMEM;
2433	policydb_str = kmalloc(len + 1, GFP_KERNEL);
2434	if (!policydb_str) {
2435		pr_err("SELinux:  unable to allocate memory for policydb "
2436		       "string of length %d\n", len);
2437		goto bad;
2438	}
2439
2440	rc = next_entry(policydb_str, fp, len);
2441	if (rc) {
2442		pr_err("SELinux:  truncated policydb string identifier\n");
2443		kfree(policydb_str);
2444		goto bad;
2445	}
2446
2447	rc = -EINVAL;
2448	policydb_str[len] = '\0';
2449	if (strcmp(policydb_str, POLICYDB_STRING)) {
2450		pr_err("SELinux:  policydb string %s does not match "
2451		       "my string %s\n", policydb_str, POLICYDB_STRING);
2452		kfree(policydb_str);
2453		goto bad;
2454	}
2455	/* Done with policydb_str. */
2456	kfree(policydb_str);
2457	policydb_str = NULL;
2458
2459	/* Read the version and table sizes. */
2460	rc = next_entry(buf, fp, sizeof(u32)*4);
2461	if (rc)
2462		goto bad;
2463
2464	rc = -EINVAL;
2465	p->policyvers = le32_to_cpu(buf[0]);
2466	if (p->policyvers < POLICYDB_VERSION_MIN ||
2467	    p->policyvers > POLICYDB_VERSION_MAX) {
2468		pr_err("SELinux:  policydb version %d does not match "
2469		       "my version range %d-%d\n",
2470		       le32_to_cpu(buf[0]), POLICYDB_VERSION_MIN, POLICYDB_VERSION_MAX);
2471		goto bad;
2472	}
2473
2474	if ((le32_to_cpu(buf[1]) & POLICYDB_CONFIG_MLS)) {
2475		p->mls_enabled = 1;
2476
2477		rc = -EINVAL;
2478		if (p->policyvers < POLICYDB_VERSION_MLS) {
2479			pr_err("SELinux: security policydb version %d "
2480				"(MLS) not backwards compatible\n",
2481				p->policyvers);
2482			goto bad;
2483		}
2484	}
2485	p->reject_unknown = !!(le32_to_cpu(buf[1]) & REJECT_UNKNOWN);
2486	p->allow_unknown = !!(le32_to_cpu(buf[1]) & ALLOW_UNKNOWN);
2487
2488	if (p->policyvers >= POLICYDB_VERSION_POLCAP) {
2489		rc = ebitmap_read(&p->policycaps, fp);
2490		if (rc)
2491			goto bad;
2492	}
2493
2494	if (p->policyvers >= POLICYDB_VERSION_PERMISSIVE) {
2495		rc = ebitmap_read(&p->permissive_map, fp);
2496		if (rc)
2497			goto bad;
2498	}
2499
2500	rc = -EINVAL;
2501	info = policydb_lookup_compat(p->policyvers);
2502	if (!info) {
2503		pr_err("SELinux:  unable to find policy compat info "
2504		       "for version %d\n", p->policyvers);
2505		goto bad;
2506	}
2507
2508	rc = -EINVAL;
2509	if (le32_to_cpu(buf[2]) != info->sym_num ||
2510		le32_to_cpu(buf[3]) != info->ocon_num) {
2511		pr_err("SELinux:  policydb table sizes (%d,%d) do "
2512		       "not match mine (%d,%d)\n", le32_to_cpu(buf[2]),
2513			le32_to_cpu(buf[3]),
2514		       info->sym_num, info->ocon_num);
2515		goto bad;
2516	}
2517
2518	for (i = 0; i < info->sym_num; i++) {
2519		rc = next_entry(buf, fp, sizeof(u32)*2);
2520		if (rc)
2521			goto bad;
2522		nprim = le32_to_cpu(buf[0]);
2523		nel = le32_to_cpu(buf[1]);
2524
2525		rc = symtab_init(&p->symtab[i], nel);
2526		if (rc)
2527			goto out;
2528
2529		if (i == SYM_ROLES) {
2530			rc = roles_init(p);
2531			if (rc)
2532				goto out;
2533		}
2534
2535		for (j = 0; j < nel; j++) {
2536			rc = read_f[i](p, &p->symtab[i], fp);
2537			if (rc)
2538				goto bad;
2539		}
2540
2541		p->symtab[i].nprim = nprim;
2542	}
2543
2544	rc = -EINVAL;
2545	p->process_class = string_to_security_class(p, "process");
2546	if (!p->process_class) {
2547		pr_err("SELinux: process class is required, not defined in policy\n");
2548		goto bad;
2549	}
2550
2551	rc = avtab_read(&p->te_avtab, fp, p);
2552	if (rc)
2553		goto bad;
2554
2555	if (p->policyvers >= POLICYDB_VERSION_BOOL) {
2556		rc = cond_read_list(p, fp);
2557		if (rc)
2558			goto bad;
2559	}
2560
2561	rc = next_entry(buf, fp, sizeof(u32));
2562	if (rc)
2563		goto bad;
2564	nel = le32_to_cpu(buf[0]);
2565
2566	rc = hashtab_init(&p->role_tr, nel);
2567	if (rc)
2568		goto bad;
2569	for (i = 0; i < nel; i++) {
2570		rc = -ENOMEM;
2571		rtk = kmalloc(sizeof(*rtk), GFP_KERNEL);
2572		if (!rtk)
2573			goto bad;
2574
2575		rc = -ENOMEM;
2576		rtd = kmalloc(sizeof(*rtd), GFP_KERNEL);
2577		if (!rtd)
2578			goto bad;
2579
 
 
 
2580		rc = next_entry(buf, fp, sizeof(u32)*3);
2581		if (rc)
2582			goto bad;
2583
2584		rtk->role = le32_to_cpu(buf[0]);
2585		rtk->type = le32_to_cpu(buf[1]);
2586		rtd->new_role = le32_to_cpu(buf[2]);
 
2587		if (p->policyvers >= POLICYDB_VERSION_ROLETRANS) {
2588			rc = next_entry(buf, fp, sizeof(u32));
2589			if (rc)
2590				goto bad;
2591			rtk->tclass = le32_to_cpu(buf[0]);
2592		} else
2593			rtk->tclass = p->process_class;
2594
2595		rc = -EINVAL;
2596		if (!policydb_role_isvalid(p, rtk->role) ||
2597		    !policydb_type_isvalid(p, rtk->type) ||
2598		    !policydb_class_isvalid(p, rtk->tclass) ||
2599		    !policydb_role_isvalid(p, rtd->new_role))
2600			goto bad;
2601
2602		rc = hashtab_insert(&p->role_tr, rtk, rtd, roletr_key_params);
2603		if (rc)
2604			goto bad;
2605
2606		rtk = NULL;
2607		rtd = NULL;
2608	}
2609
2610	rc = next_entry(buf, fp, sizeof(u32));
2611	if (rc)
2612		goto bad;
2613	nel = le32_to_cpu(buf[0]);
2614	lra = NULL;
2615	for (i = 0; i < nel; i++) {
2616		rc = -ENOMEM;
2617		ra = kzalloc(sizeof(*ra), GFP_KERNEL);
2618		if (!ra)
2619			goto bad;
2620		if (lra)
2621			lra->next = ra;
2622		else
2623			p->role_allow = ra;
2624		rc = next_entry(buf, fp, sizeof(u32)*2);
2625		if (rc)
2626			goto bad;
2627
2628		rc = -EINVAL;
2629		ra->role = le32_to_cpu(buf[0]);
2630		ra->new_role = le32_to_cpu(buf[1]);
2631		if (!policydb_role_isvalid(p, ra->role) ||
2632		    !policydb_role_isvalid(p, ra->new_role))
2633			goto bad;
2634		lra = ra;
2635	}
2636
2637	rc = filename_trans_read(p, fp);
2638	if (rc)
2639		goto bad;
2640
2641	rc = policydb_index(p);
2642	if (rc)
2643		goto bad;
2644
2645	rc = -EINVAL;
2646	perm = string_to_av_perm(p, p->process_class, "transition");
2647	if (!perm) {
2648		pr_err("SELinux: process transition permission is required, not defined in policy\n");
2649		goto bad;
2650	}
2651	p->process_trans_perms = perm;
2652	perm = string_to_av_perm(p, p->process_class, "dyntransition");
2653	if (!perm) {
2654		pr_err("SELinux: process dyntransition permission is required, not defined in policy\n");
2655		goto bad;
2656	}
2657	p->process_trans_perms |= perm;
2658
2659	rc = ocontext_read(p, info, fp);
2660	if (rc)
2661		goto bad;
2662
2663	rc = genfs_read(p, fp);
2664	if (rc)
2665		goto bad;
2666
2667	rc = range_read(p, fp);
2668	if (rc)
2669		goto bad;
2670
2671	rc = -ENOMEM;
2672	p->type_attr_map_array = kvcalloc(p->p_types.nprim,
2673					  sizeof(*p->type_attr_map_array),
2674					  GFP_KERNEL);
2675	if (!p->type_attr_map_array)
2676		goto bad;
2677
2678	/* just in case ebitmap_init() becomes more than just a memset(0): */
2679	for (i = 0; i < p->p_types.nprim; i++)
2680		ebitmap_init(&p->type_attr_map_array[i]);
 
 
2681
2682	for (i = 0; i < p->p_types.nprim; i++) {
2683		struct ebitmap *e = &p->type_attr_map_array[i];
2684
 
 
2685		if (p->policyvers >= POLICYDB_VERSION_AVTAB) {
2686			rc = ebitmap_read(e, fp);
2687			if (rc)
2688				goto bad;
2689		}
2690		/* add the type itself as the degenerate case */
2691		rc = ebitmap_set_bit(e, i, 1);
2692		if (rc)
2693			goto bad;
2694	}
2695
2696	rc = policydb_bounds_sanity_check(p);
2697	if (rc)
2698		goto bad;
2699
2700	rc = 0;
2701out:
2702	return rc;
2703bad:
2704	kfree(rtk);
2705	kfree(rtd);
2706	policydb_destroy(p);
2707	goto out;
2708}
2709
2710/*
2711 * Write a MLS level structure to a policydb binary
2712 * representation file.
2713 */
2714static int mls_write_level(struct mls_level *l, void *fp)
2715{
2716	__le32 buf[1];
2717	int rc;
2718
2719	buf[0] = cpu_to_le32(l->sens);
2720	rc = put_entry(buf, sizeof(u32), 1, fp);
2721	if (rc)
2722		return rc;
2723
2724	rc = ebitmap_write(&l->cat, fp);
2725	if (rc)
2726		return rc;
2727
2728	return 0;
2729}
2730
2731/*
2732 * Write a MLS range structure to a policydb binary
2733 * representation file.
2734 */
2735static int mls_write_range_helper(struct mls_range *r, void *fp)
2736{
2737	__le32 buf[3];
2738	size_t items;
2739	int rc, eq;
2740
2741	eq = mls_level_eq(&r->level[1], &r->level[0]);
2742
2743	if (eq)
2744		items = 2;
2745	else
2746		items = 3;
2747	buf[0] = cpu_to_le32(items-1);
2748	buf[1] = cpu_to_le32(r->level[0].sens);
2749	if (!eq)
2750		buf[2] = cpu_to_le32(r->level[1].sens);
2751
2752	BUG_ON(items > ARRAY_SIZE(buf));
2753
2754	rc = put_entry(buf, sizeof(u32), items, fp);
2755	if (rc)
2756		return rc;
2757
2758	rc = ebitmap_write(&r->level[0].cat, fp);
2759	if (rc)
2760		return rc;
2761	if (!eq) {
2762		rc = ebitmap_write(&r->level[1].cat, fp);
2763		if (rc)
2764			return rc;
2765	}
2766
2767	return 0;
2768}
2769
2770static int sens_write(void *vkey, void *datum, void *ptr)
2771{
2772	char *key = vkey;
2773	struct level_datum *levdatum = datum;
2774	struct policy_data *pd = ptr;
2775	void *fp = pd->fp;
2776	__le32 buf[2];
2777	size_t len;
2778	int rc;
2779
2780	len = strlen(key);
2781	buf[0] = cpu_to_le32(len);
2782	buf[1] = cpu_to_le32(levdatum->isalias);
2783	rc = put_entry(buf, sizeof(u32), 2, fp);
2784	if (rc)
2785		return rc;
2786
2787	rc = put_entry(key, 1, len, fp);
2788	if (rc)
2789		return rc;
2790
2791	rc = mls_write_level(levdatum->level, fp);
2792	if (rc)
2793		return rc;
2794
2795	return 0;
2796}
2797
2798static int cat_write(void *vkey, void *datum, void *ptr)
2799{
2800	char *key = vkey;
2801	struct cat_datum *catdatum = datum;
2802	struct policy_data *pd = ptr;
2803	void *fp = pd->fp;
2804	__le32 buf[3];
2805	size_t len;
2806	int rc;
2807
2808	len = strlen(key);
2809	buf[0] = cpu_to_le32(len);
2810	buf[1] = cpu_to_le32(catdatum->value);
2811	buf[2] = cpu_to_le32(catdatum->isalias);
2812	rc = put_entry(buf, sizeof(u32), 3, fp);
2813	if (rc)
2814		return rc;
2815
2816	rc = put_entry(key, 1, len, fp);
2817	if (rc)
2818		return rc;
2819
2820	return 0;
2821}
2822
2823static int role_trans_write_one(void *key, void *datum, void *ptr)
2824{
2825	struct role_trans_key *rtk = key;
2826	struct role_trans_datum *rtd = datum;
2827	struct policy_data *pd = ptr;
2828	void *fp = pd->fp;
2829	struct policydb *p = pd->p;
2830	__le32 buf[3];
2831	int rc;
2832
2833	buf[0] = cpu_to_le32(rtk->role);
2834	buf[1] = cpu_to_le32(rtk->type);
2835	buf[2] = cpu_to_le32(rtd->new_role);
2836	rc = put_entry(buf, sizeof(u32), 3, fp);
 
2837	if (rc)
2838		return rc;
2839	if (p->policyvers >= POLICYDB_VERSION_ROLETRANS) {
2840		buf[0] = cpu_to_le32(rtk->tclass);
2841		rc = put_entry(buf, sizeof(u32), 1, fp);
 
 
2842		if (rc)
2843			return rc;
 
 
 
 
 
 
2844	}
2845	return 0;
2846}
2847
2848static int role_trans_write(struct policydb *p, void *fp)
2849{
2850	struct policy_data pd = { .p = p, .fp = fp };
2851	__le32 buf[1];
2852	int rc;
2853
2854	buf[0] = cpu_to_le32(p->role_tr.nel);
2855	rc = put_entry(buf, sizeof(u32), 1, fp);
2856	if (rc)
2857		return rc;
2858
2859	return hashtab_map(&p->role_tr, role_trans_write_one, &pd);
2860}
2861
2862static int role_allow_write(struct role_allow *r, void *fp)
2863{
2864	struct role_allow *ra;
2865	__le32 buf[2];
2866	size_t nel;
2867	int rc;
2868
2869	nel = 0;
2870	for (ra = r; ra; ra = ra->next)
2871		nel++;
2872	buf[0] = cpu_to_le32(nel);
2873	rc = put_entry(buf, sizeof(u32), 1, fp);
2874	if (rc)
2875		return rc;
2876	for (ra = r; ra; ra = ra->next) {
2877		buf[0] = cpu_to_le32(ra->role);
2878		buf[1] = cpu_to_le32(ra->new_role);
2879		rc = put_entry(buf, sizeof(u32), 2, fp);
2880		if (rc)
2881			return rc;
2882	}
2883	return 0;
2884}
2885
2886/*
2887 * Write a security context structure
2888 * to a policydb binary representation file.
2889 */
2890static int context_write(struct policydb *p, struct context *c,
2891			 void *fp)
2892{
2893	int rc;
2894	__le32 buf[3];
2895
2896	buf[0] = cpu_to_le32(c->user);
2897	buf[1] = cpu_to_le32(c->role);
2898	buf[2] = cpu_to_le32(c->type);
2899
2900	rc = put_entry(buf, sizeof(u32), 3, fp);
2901	if (rc)
2902		return rc;
2903
2904	rc = mls_write_range_helper(&c->range, fp);
2905	if (rc)
2906		return rc;
2907
2908	return 0;
2909}
2910
2911/*
2912 * The following *_write functions are used to
2913 * write the symbol data to a policy database
2914 * binary representation file.
2915 */
2916
2917static int perm_write(void *vkey, void *datum, void *fp)
2918{
2919	char *key = vkey;
2920	struct perm_datum *perdatum = datum;
2921	__le32 buf[2];
2922	size_t len;
2923	int rc;
2924
2925	len = strlen(key);
2926	buf[0] = cpu_to_le32(len);
2927	buf[1] = cpu_to_le32(perdatum->value);
2928	rc = put_entry(buf, sizeof(u32), 2, fp);
2929	if (rc)
2930		return rc;
2931
2932	rc = put_entry(key, 1, len, fp);
2933	if (rc)
2934		return rc;
2935
2936	return 0;
2937}
2938
2939static int common_write(void *vkey, void *datum, void *ptr)
2940{
2941	char *key = vkey;
2942	struct common_datum *comdatum = datum;
2943	struct policy_data *pd = ptr;
2944	void *fp = pd->fp;
2945	__le32 buf[4];
2946	size_t len;
2947	int rc;
2948
2949	len = strlen(key);
2950	buf[0] = cpu_to_le32(len);
2951	buf[1] = cpu_to_le32(comdatum->value);
2952	buf[2] = cpu_to_le32(comdatum->permissions.nprim);
2953	buf[3] = cpu_to_le32(comdatum->permissions.table.nel);
2954	rc = put_entry(buf, sizeof(u32), 4, fp);
2955	if (rc)
2956		return rc;
2957
2958	rc = put_entry(key, 1, len, fp);
2959	if (rc)
2960		return rc;
2961
2962	rc = hashtab_map(&comdatum->permissions.table, perm_write, fp);
2963	if (rc)
2964		return rc;
2965
2966	return 0;
2967}
2968
2969static int type_set_write(struct type_set *t, void *fp)
2970{
2971	int rc;
2972	__le32 buf[1];
2973
2974	if (ebitmap_write(&t->types, fp))
2975		return -EINVAL;
2976	if (ebitmap_write(&t->negset, fp))
2977		return -EINVAL;
2978
2979	buf[0] = cpu_to_le32(t->flags);
2980	rc = put_entry(buf, sizeof(u32), 1, fp);
2981	if (rc)
2982		return -EINVAL;
2983
2984	return 0;
2985}
2986
2987static int write_cons_helper(struct policydb *p, struct constraint_node *node,
2988			     void *fp)
2989{
2990	struct constraint_node *c;
2991	struct constraint_expr *e;
2992	__le32 buf[3];
2993	u32 nel;
2994	int rc;
2995
2996	for (c = node; c; c = c->next) {
2997		nel = 0;
2998		for (e = c->expr; e; e = e->next)
2999			nel++;
3000		buf[0] = cpu_to_le32(c->permissions);
3001		buf[1] = cpu_to_le32(nel);
3002		rc = put_entry(buf, sizeof(u32), 2, fp);
3003		if (rc)
3004			return rc;
3005		for (e = c->expr; e; e = e->next) {
3006			buf[0] = cpu_to_le32(e->expr_type);
3007			buf[1] = cpu_to_le32(e->attr);
3008			buf[2] = cpu_to_le32(e->op);
3009			rc = put_entry(buf, sizeof(u32), 3, fp);
3010			if (rc)
3011				return rc;
3012
3013			switch (e->expr_type) {
3014			case CEXPR_NAMES:
3015				rc = ebitmap_write(&e->names, fp);
3016				if (rc)
3017					return rc;
3018				if (p->policyvers >=
3019					POLICYDB_VERSION_CONSTRAINT_NAMES) {
3020					rc = type_set_write(e->type_names, fp);
3021					if (rc)
3022						return rc;
3023				}
3024				break;
3025			default:
3026				break;
3027			}
3028		}
3029	}
3030
3031	return 0;
3032}
3033
3034static int class_write(void *vkey, void *datum, void *ptr)
3035{
3036	char *key = vkey;
3037	struct class_datum *cladatum = datum;
3038	struct policy_data *pd = ptr;
3039	void *fp = pd->fp;
3040	struct policydb *p = pd->p;
3041	struct constraint_node *c;
3042	__le32 buf[6];
3043	u32 ncons;
3044	size_t len, len2;
3045	int rc;
3046
3047	len = strlen(key);
3048	if (cladatum->comkey)
3049		len2 = strlen(cladatum->comkey);
3050	else
3051		len2 = 0;
3052
3053	ncons = 0;
3054	for (c = cladatum->constraints; c; c = c->next)
3055		ncons++;
3056
3057	buf[0] = cpu_to_le32(len);
3058	buf[1] = cpu_to_le32(len2);
3059	buf[2] = cpu_to_le32(cladatum->value);
3060	buf[3] = cpu_to_le32(cladatum->permissions.nprim);
3061	buf[4] = cpu_to_le32(cladatum->permissions.table.nel);
 
 
 
3062	buf[5] = cpu_to_le32(ncons);
3063	rc = put_entry(buf, sizeof(u32), 6, fp);
3064	if (rc)
3065		return rc;
3066
3067	rc = put_entry(key, 1, len, fp);
3068	if (rc)
3069		return rc;
3070
3071	if (cladatum->comkey) {
3072		rc = put_entry(cladatum->comkey, 1, len2, fp);
3073		if (rc)
3074			return rc;
3075	}
3076
3077	rc = hashtab_map(&cladatum->permissions.table, perm_write, fp);
3078	if (rc)
3079		return rc;
3080
3081	rc = write_cons_helper(p, cladatum->constraints, fp);
3082	if (rc)
3083		return rc;
3084
3085	/* write out the validatetrans rule */
3086	ncons = 0;
3087	for (c = cladatum->validatetrans; c; c = c->next)
3088		ncons++;
3089
3090	buf[0] = cpu_to_le32(ncons);
3091	rc = put_entry(buf, sizeof(u32), 1, fp);
3092	if (rc)
3093		return rc;
3094
3095	rc = write_cons_helper(p, cladatum->validatetrans, fp);
3096	if (rc)
3097		return rc;
3098
3099	if (p->policyvers >= POLICYDB_VERSION_NEW_OBJECT_DEFAULTS) {
3100		buf[0] = cpu_to_le32(cladatum->default_user);
3101		buf[1] = cpu_to_le32(cladatum->default_role);
3102		buf[2] = cpu_to_le32(cladatum->default_range);
3103
3104		rc = put_entry(buf, sizeof(uint32_t), 3, fp);
3105		if (rc)
3106			return rc;
3107	}
3108
3109	if (p->policyvers >= POLICYDB_VERSION_DEFAULT_TYPE) {
3110		buf[0] = cpu_to_le32(cladatum->default_type);
3111		rc = put_entry(buf, sizeof(uint32_t), 1, fp);
3112		if (rc)
3113			return rc;
3114	}
3115
3116	return 0;
3117}
3118
3119static int role_write(void *vkey, void *datum, void *ptr)
3120{
3121	char *key = vkey;
3122	struct role_datum *role = datum;
3123	struct policy_data *pd = ptr;
3124	void *fp = pd->fp;
3125	struct policydb *p = pd->p;
3126	__le32 buf[3];
3127	size_t items, len;
3128	int rc;
3129
3130	len = strlen(key);
3131	items = 0;
3132	buf[items++] = cpu_to_le32(len);
3133	buf[items++] = cpu_to_le32(role->value);
3134	if (p->policyvers >= POLICYDB_VERSION_BOUNDARY)
3135		buf[items++] = cpu_to_le32(role->bounds);
3136
3137	BUG_ON(items > ARRAY_SIZE(buf));
3138
3139	rc = put_entry(buf, sizeof(u32), items, fp);
3140	if (rc)
3141		return rc;
3142
3143	rc = put_entry(key, 1, len, fp);
3144	if (rc)
3145		return rc;
3146
3147	rc = ebitmap_write(&role->dominates, fp);
3148	if (rc)
3149		return rc;
3150
3151	rc = ebitmap_write(&role->types, fp);
3152	if (rc)
3153		return rc;
3154
3155	return 0;
3156}
3157
3158static int type_write(void *vkey, void *datum, void *ptr)
3159{
3160	char *key = vkey;
3161	struct type_datum *typdatum = datum;
3162	struct policy_data *pd = ptr;
3163	struct policydb *p = pd->p;
3164	void *fp = pd->fp;
3165	__le32 buf[4];
3166	int rc;
3167	size_t items, len;
3168
3169	len = strlen(key);
3170	items = 0;
3171	buf[items++] = cpu_to_le32(len);
3172	buf[items++] = cpu_to_le32(typdatum->value);
3173	if (p->policyvers >= POLICYDB_VERSION_BOUNDARY) {
3174		u32 properties = 0;
3175
3176		if (typdatum->primary)
3177			properties |= TYPEDATUM_PROPERTY_PRIMARY;
3178
3179		if (typdatum->attribute)
3180			properties |= TYPEDATUM_PROPERTY_ATTRIBUTE;
3181
3182		buf[items++] = cpu_to_le32(properties);
3183		buf[items++] = cpu_to_le32(typdatum->bounds);
3184	} else {
3185		buf[items++] = cpu_to_le32(typdatum->primary);
3186	}
3187	BUG_ON(items > ARRAY_SIZE(buf));
3188	rc = put_entry(buf, sizeof(u32), items, fp);
3189	if (rc)
3190		return rc;
3191
3192	rc = put_entry(key, 1, len, fp);
3193	if (rc)
3194		return rc;
3195
3196	return 0;
3197}
3198
3199static int user_write(void *vkey, void *datum, void *ptr)
3200{
3201	char *key = vkey;
3202	struct user_datum *usrdatum = datum;
3203	struct policy_data *pd = ptr;
3204	struct policydb *p = pd->p;
3205	void *fp = pd->fp;
3206	__le32 buf[3];
3207	size_t items, len;
3208	int rc;
3209
3210	len = strlen(key);
3211	items = 0;
3212	buf[items++] = cpu_to_le32(len);
3213	buf[items++] = cpu_to_le32(usrdatum->value);
3214	if (p->policyvers >= POLICYDB_VERSION_BOUNDARY)
3215		buf[items++] = cpu_to_le32(usrdatum->bounds);
3216	BUG_ON(items > ARRAY_SIZE(buf));
3217	rc = put_entry(buf, sizeof(u32), items, fp);
3218	if (rc)
3219		return rc;
3220
3221	rc = put_entry(key, 1, len, fp);
3222	if (rc)
3223		return rc;
3224
3225	rc = ebitmap_write(&usrdatum->roles, fp);
3226	if (rc)
3227		return rc;
3228
3229	rc = mls_write_range_helper(&usrdatum->range, fp);
3230	if (rc)
3231		return rc;
3232
3233	rc = mls_write_level(&usrdatum->dfltlevel, fp);
3234	if (rc)
3235		return rc;
3236
3237	return 0;
3238}
3239
3240static int (*const write_f[SYM_NUM]) (void *key, void *datum, void *datap) = {
 
 
3241	common_write,
3242	class_write,
3243	role_write,
3244	type_write,
3245	user_write,
3246	cond_write_bool,
3247	sens_write,
3248	cat_write,
3249};
3250
3251static int ocontext_write(struct policydb *p, const struct policydb_compat_info *info,
3252			  void *fp)
3253{
3254	unsigned int i, j, rc;
3255	size_t nel, len;
3256	__be64 prefixbuf[1];
3257	__le32 buf[3];
3258	u32 nodebuf[8];
3259	struct ocontext *c;
3260	for (i = 0; i < info->ocon_num; i++) {
3261		nel = 0;
3262		for (c = p->ocontexts[i]; c; c = c->next)
3263			nel++;
3264		buf[0] = cpu_to_le32(nel);
3265		rc = put_entry(buf, sizeof(u32), 1, fp);
3266		if (rc)
3267			return rc;
3268		for (c = p->ocontexts[i]; c; c = c->next) {
3269			switch (i) {
3270			case OCON_ISID:
3271				buf[0] = cpu_to_le32(c->sid[0]);
3272				rc = put_entry(buf, sizeof(u32), 1, fp);
3273				if (rc)
3274					return rc;
3275				rc = context_write(p, &c->context[0], fp);
3276				if (rc)
3277					return rc;
3278				break;
3279			case OCON_FS:
3280			case OCON_NETIF:
3281				len = strlen(c->u.name);
3282				buf[0] = cpu_to_le32(len);
3283				rc = put_entry(buf, sizeof(u32), 1, fp);
3284				if (rc)
3285					return rc;
3286				rc = put_entry(c->u.name, 1, len, fp);
3287				if (rc)
3288					return rc;
3289				rc = context_write(p, &c->context[0], fp);
3290				if (rc)
3291					return rc;
3292				rc = context_write(p, &c->context[1], fp);
3293				if (rc)
3294					return rc;
3295				break;
3296			case OCON_PORT:
3297				buf[0] = cpu_to_le32(c->u.port.protocol);
3298				buf[1] = cpu_to_le32(c->u.port.low_port);
3299				buf[2] = cpu_to_le32(c->u.port.high_port);
3300				rc = put_entry(buf, sizeof(u32), 3, fp);
3301				if (rc)
3302					return rc;
3303				rc = context_write(p, &c->context[0], fp);
3304				if (rc)
3305					return rc;
3306				break;
3307			case OCON_NODE:
3308				nodebuf[0] = c->u.node.addr; /* network order */
3309				nodebuf[1] = c->u.node.mask; /* network order */
3310				rc = put_entry(nodebuf, sizeof(u32), 2, fp);
3311				if (rc)
3312					return rc;
3313				rc = context_write(p, &c->context[0], fp);
3314				if (rc)
3315					return rc;
3316				break;
3317			case OCON_FSUSE:
3318				buf[0] = cpu_to_le32(c->v.behavior);
3319				len = strlen(c->u.name);
3320				buf[1] = cpu_to_le32(len);
3321				rc = put_entry(buf, sizeof(u32), 2, fp);
3322				if (rc)
3323					return rc;
3324				rc = put_entry(c->u.name, 1, len, fp);
3325				if (rc)
3326					return rc;
3327				rc = context_write(p, &c->context[0], fp);
3328				if (rc)
3329					return rc;
3330				break;
3331			case OCON_NODE6:
3332				for (j = 0; j < 4; j++)
3333					nodebuf[j] = c->u.node6.addr[j]; /* network order */
3334				for (j = 0; j < 4; j++)
3335					nodebuf[j + 4] = c->u.node6.mask[j]; /* network order */
3336				rc = put_entry(nodebuf, sizeof(u32), 8, fp);
3337				if (rc)
3338					return rc;
3339				rc = context_write(p, &c->context[0], fp);
3340				if (rc)
3341					return rc;
3342				break;
3343			case OCON_IBPKEY:
3344				/* subnet_prefix is in CPU order */
3345				prefixbuf[0] = cpu_to_be64(c->u.ibpkey.subnet_prefix);
3346
3347				rc = put_entry(prefixbuf, sizeof(u64), 1, fp);
3348				if (rc)
3349					return rc;
3350
3351				buf[0] = cpu_to_le32(c->u.ibpkey.low_pkey);
3352				buf[1] = cpu_to_le32(c->u.ibpkey.high_pkey);
3353
3354				rc = put_entry(buf, sizeof(u32), 2, fp);
3355				if (rc)
3356					return rc;
3357				rc = context_write(p, &c->context[0], fp);
3358				if (rc)
3359					return rc;
3360				break;
3361			case OCON_IBENDPORT:
3362				len = strlen(c->u.ibendport.dev_name);
3363				buf[0] = cpu_to_le32(len);
3364				buf[1] = cpu_to_le32(c->u.ibendport.port);
3365				rc = put_entry(buf, sizeof(u32), 2, fp);
3366				if (rc)
3367					return rc;
3368				rc = put_entry(c->u.ibendport.dev_name, 1, len, fp);
3369				if (rc)
3370					return rc;
3371				rc = context_write(p, &c->context[0], fp);
3372				if (rc)
3373					return rc;
3374				break;
3375			}
3376		}
3377	}
3378	return 0;
3379}
3380
3381static int genfs_write(struct policydb *p, void *fp)
3382{
3383	struct genfs *genfs;
3384	struct ocontext *c;
3385	size_t len;
3386	__le32 buf[1];
3387	int rc;
3388
3389	len = 0;
3390	for (genfs = p->genfs; genfs; genfs = genfs->next)
3391		len++;
3392	buf[0] = cpu_to_le32(len);
3393	rc = put_entry(buf, sizeof(u32), 1, fp);
3394	if (rc)
3395		return rc;
3396	for (genfs = p->genfs; genfs; genfs = genfs->next) {
3397		len = strlen(genfs->fstype);
3398		buf[0] = cpu_to_le32(len);
3399		rc = put_entry(buf, sizeof(u32), 1, fp);
3400		if (rc)
3401			return rc;
3402		rc = put_entry(genfs->fstype, 1, len, fp);
3403		if (rc)
3404			return rc;
3405		len = 0;
3406		for (c = genfs->head; c; c = c->next)
3407			len++;
3408		buf[0] = cpu_to_le32(len);
3409		rc = put_entry(buf, sizeof(u32), 1, fp);
3410		if (rc)
3411			return rc;
3412		for (c = genfs->head; c; c = c->next) {
3413			len = strlen(c->u.name);
3414			buf[0] = cpu_to_le32(len);
3415			rc = put_entry(buf, sizeof(u32), 1, fp);
3416			if (rc)
3417				return rc;
3418			rc = put_entry(c->u.name, 1, len, fp);
3419			if (rc)
3420				return rc;
3421			buf[0] = cpu_to_le32(c->v.sclass);
3422			rc = put_entry(buf, sizeof(u32), 1, fp);
3423			if (rc)
3424				return rc;
3425			rc = context_write(p, &c->context[0], fp);
3426			if (rc)
3427				return rc;
3428		}
3429	}
3430	return 0;
3431}
3432
 
 
 
 
 
 
 
 
3433static int range_write_helper(void *key, void *data, void *ptr)
3434{
3435	__le32 buf[2];
3436	struct range_trans *rt = key;
3437	struct mls_range *r = data;
3438	struct policy_data *pd = ptr;
3439	void *fp = pd->fp;
3440	struct policydb *p = pd->p;
3441	int rc;
3442
3443	buf[0] = cpu_to_le32(rt->source_type);
3444	buf[1] = cpu_to_le32(rt->target_type);
3445	rc = put_entry(buf, sizeof(u32), 2, fp);
3446	if (rc)
3447		return rc;
3448	if (p->policyvers >= POLICYDB_VERSION_RANGETRANS) {
3449		buf[0] = cpu_to_le32(rt->target_class);
3450		rc = put_entry(buf, sizeof(u32), 1, fp);
3451		if (rc)
3452			return rc;
3453	}
3454	rc = mls_write_range_helper(r, fp);
3455	if (rc)
3456		return rc;
3457
3458	return 0;
3459}
3460
3461static int range_write(struct policydb *p, void *fp)
3462{
 
3463	__le32 buf[1];
3464	int rc;
3465	struct policy_data pd;
3466
3467	pd.p = p;
3468	pd.fp = fp;
3469
3470	buf[0] = cpu_to_le32(p->range_tr.nel);
 
 
 
 
 
 
3471	rc = put_entry(buf, sizeof(u32), 1, fp);
3472	if (rc)
3473		return rc;
3474
3475	/* actually write all of the entries */
3476	rc = hashtab_map(&p->range_tr, range_write_helper, &pd);
3477	if (rc)
3478		return rc;
3479
3480	return 0;
3481}
3482
3483static int filename_write_helper_compat(void *key, void *data, void *ptr)
3484{
3485	struct filename_trans_key *ft = key;
3486	struct filename_trans_datum *datum = data;
3487	struct ebitmap_node *node;
3488	void *fp = ptr;
3489	__le32 buf[4];
3490	int rc;
3491	u32 bit, len = strlen(ft->name);
3492
3493	do {
3494		ebitmap_for_each_positive_bit(&datum->stypes, node, bit) {
3495			buf[0] = cpu_to_le32(len);
3496			rc = put_entry(buf, sizeof(u32), 1, fp);
3497			if (rc)
3498				return rc;
3499
3500			rc = put_entry(ft->name, sizeof(char), len, fp);
3501			if (rc)
3502				return rc;
3503
3504			buf[0] = cpu_to_le32(bit + 1);
3505			buf[1] = cpu_to_le32(ft->ttype);
3506			buf[2] = cpu_to_le32(ft->tclass);
3507			buf[3] = cpu_to_le32(datum->otype);
3508
3509			rc = put_entry(buf, sizeof(u32), 4, fp);
3510			if (rc)
3511				return rc;
3512		}
3513
3514		datum = datum->next;
3515	} while (unlikely(datum));
3516
3517	return 0;
3518}
3519
3520static int filename_write_helper(void *key, void *data, void *ptr)
3521{
3522	struct filename_trans_key *ft = key;
3523	struct filename_trans_datum *datum;
 
3524	void *fp = ptr;
3525	__le32 buf[3];
3526	int rc;
3527	u32 ndatum, len = strlen(ft->name);
3528
 
3529	buf[0] = cpu_to_le32(len);
3530	rc = put_entry(buf, sizeof(u32), 1, fp);
3531	if (rc)
3532		return rc;
3533
3534	rc = put_entry(ft->name, sizeof(char), len, fp);
3535	if (rc)
3536		return rc;
3537
3538	ndatum = 0;
3539	datum = data;
3540	do {
3541		ndatum++;
3542		datum = datum->next;
3543	} while (unlikely(datum));
3544
3545	buf[0] = cpu_to_le32(ft->ttype);
3546	buf[1] = cpu_to_le32(ft->tclass);
3547	buf[2] = cpu_to_le32(ndatum);
3548	rc = put_entry(buf, sizeof(u32), 3, fp);
3549	if (rc)
3550		return rc;
3551
3552	datum = data;
3553	do {
3554		rc = ebitmap_write(&datum->stypes, fp);
3555		if (rc)
3556			return rc;
3557
3558		buf[0] = cpu_to_le32(datum->otype);
3559		rc = put_entry(buf, sizeof(u32), 1, fp);
3560		if (rc)
3561			return rc;
3562
3563		datum = datum->next;
3564	} while (unlikely(datum));
3565
3566	return 0;
3567}
3568
3569static int filename_trans_write(struct policydb *p, void *fp)
3570{
 
3571	__le32 buf[1];
3572	int rc;
3573
3574	if (p->policyvers < POLICYDB_VERSION_FILENAME_TRANS)
3575		return 0;
3576
3577	if (p->policyvers < POLICYDB_VERSION_COMP_FTRANS) {
3578		buf[0] = cpu_to_le32(p->compat_filename_trans_count);
3579		rc = put_entry(buf, sizeof(u32), 1, fp);
3580		if (rc)
3581			return rc;
3582
3583		rc = hashtab_map(&p->filename_trans,
3584				 filename_write_helper_compat, fp);
3585	} else {
3586		buf[0] = cpu_to_le32(p->filename_trans.nel);
3587		rc = put_entry(buf, sizeof(u32), 1, fp);
3588		if (rc)
3589			return rc;
3590
3591		rc = hashtab_map(&p->filename_trans, filename_write_helper, fp);
3592	}
3593	return rc;
 
 
3594}
3595
3596/*
3597 * Write the configuration data in a policy database
3598 * structure to a policy database binary representation
3599 * file.
3600 */
3601int policydb_write(struct policydb *p, void *fp)
3602{
3603	unsigned int i, num_syms;
3604	int rc;
3605	__le32 buf[4];
3606	u32 config;
3607	size_t len;
3608	const struct policydb_compat_info *info;
3609
3610	/*
3611	 * refuse to write policy older than compressed avtab
3612	 * to simplify the writer.  There are other tests dropped
3613	 * since we assume this throughout the writer code.  Be
3614	 * careful if you ever try to remove this restriction
3615	 */
3616	if (p->policyvers < POLICYDB_VERSION_AVTAB) {
3617		pr_err("SELinux: refusing to write policy version %d."
3618		       "  Because it is less than version %d\n", p->policyvers,
3619		       POLICYDB_VERSION_AVTAB);
3620		return -EINVAL;
3621	}
3622
3623	config = 0;
3624	if (p->mls_enabled)
3625		config |= POLICYDB_CONFIG_MLS;
3626
3627	if (p->reject_unknown)
3628		config |= REJECT_UNKNOWN;
3629	if (p->allow_unknown)
3630		config |= ALLOW_UNKNOWN;
3631
3632	/* Write the magic number and string identifiers. */
3633	buf[0] = cpu_to_le32(POLICYDB_MAGIC);
3634	len = strlen(POLICYDB_STRING);
3635	buf[1] = cpu_to_le32(len);
3636	rc = put_entry(buf, sizeof(u32), 2, fp);
3637	if (rc)
3638		return rc;
3639	rc = put_entry(POLICYDB_STRING, 1, len, fp);
3640	if (rc)
3641		return rc;
3642
3643	/* Write the version, config, and table sizes. */
3644	info = policydb_lookup_compat(p->policyvers);
3645	if (!info) {
3646		pr_err("SELinux: compatibility lookup failed for policy "
3647		    "version %d", p->policyvers);
3648		return -EINVAL;
3649	}
3650
3651	buf[0] = cpu_to_le32(p->policyvers);
3652	buf[1] = cpu_to_le32(config);
3653	buf[2] = cpu_to_le32(info->sym_num);
3654	buf[3] = cpu_to_le32(info->ocon_num);
3655
3656	rc = put_entry(buf, sizeof(u32), 4, fp);
3657	if (rc)
3658		return rc;
3659
3660	if (p->policyvers >= POLICYDB_VERSION_POLCAP) {
3661		rc = ebitmap_write(&p->policycaps, fp);
3662		if (rc)
3663			return rc;
3664	}
3665
3666	if (p->policyvers >= POLICYDB_VERSION_PERMISSIVE) {
3667		rc = ebitmap_write(&p->permissive_map, fp);
3668		if (rc)
3669			return rc;
3670	}
3671
3672	num_syms = info->sym_num;
3673	for (i = 0; i < num_syms; i++) {
3674		struct policy_data pd;
3675
3676		pd.fp = fp;
3677		pd.p = p;
3678
3679		buf[0] = cpu_to_le32(p->symtab[i].nprim);
3680		buf[1] = cpu_to_le32(p->symtab[i].table.nel);
3681
3682		rc = put_entry(buf, sizeof(u32), 2, fp);
3683		if (rc)
3684			return rc;
3685		rc = hashtab_map(&p->symtab[i].table, write_f[i], &pd);
3686		if (rc)
3687			return rc;
3688	}
3689
3690	rc = avtab_write(p, &p->te_avtab, fp);
3691	if (rc)
3692		return rc;
3693
3694	rc = cond_write_list(p, fp);
3695	if (rc)
3696		return rc;
3697
3698	rc = role_trans_write(p, fp);
3699	if (rc)
3700		return rc;
3701
3702	rc = role_allow_write(p->role_allow, fp);
3703	if (rc)
3704		return rc;
3705
3706	rc = filename_trans_write(p, fp);
3707	if (rc)
3708		return rc;
3709
3710	rc = ocontext_write(p, info, fp);
3711	if (rc)
3712		return rc;
3713
3714	rc = genfs_write(p, fp);
3715	if (rc)
3716		return rc;
3717
3718	rc = range_write(p, fp);
3719	if (rc)
3720		return rc;
3721
3722	for (i = 0; i < p->p_types.nprim; i++) {
3723		struct ebitmap *e = &p->type_attr_map_array[i];
3724
 
3725		rc = ebitmap_write(e, fp);
3726		if (rc)
3727			return rc;
3728	}
3729
3730	return 0;
3731}
v3.1
 
   1/*
   2 * Implementation of the policy database.
   3 *
   4 * Author : Stephen Smalley, <sds@epoch.ncsc.mil>
   5 */
   6
   7/*
   8 * Updated: Trusted Computer Solutions, Inc. <dgoeddel@trustedcs.com>
   9 *
  10 *	Support for enhanced MLS infrastructure.
  11 *
  12 * Updated: Frank Mayer <mayerf@tresys.com> and Karl MacMillan <kmacmillan@tresys.com>
  13 *
  14 *	Added conditional policy language extensions
  15 *
  16 * Updated: Hewlett-Packard <paul@paul-moore.com>
  17 *
  18 *      Added support for the policy capability bitmap
  19 *
 
 
 
 
 
  20 * Copyright (C) 2007 Hewlett-Packard Development Company, L.P.
  21 * Copyright (C) 2004-2005 Trusted Computer Solutions, Inc.
  22 * Copyright (C) 2003 - 2004 Tresys Technology, LLC
  23 *	This program is free software; you can redistribute it and/or modify
  24 *	it under the terms of the GNU General Public License as published by
  25 *	the Free Software Foundation, version 2.
  26 */
  27
  28#include <linux/kernel.h>
  29#include <linux/sched.h>
  30#include <linux/slab.h>
  31#include <linux/string.h>
  32#include <linux/errno.h>
  33#include <linux/audit.h>
  34#include <linux/flex_array.h>
  35#include "security.h"
  36
  37#include "policydb.h"
  38#include "conditional.h"
  39#include "mls.h"
  40#include "services.h"
  41
  42#define _DEBUG_HASHES
  43
  44#ifdef DEBUG_HASHES
  45static const char *symtab_name[SYM_NUM] = {
  46	"common prefixes",
  47	"classes",
  48	"roles",
  49	"types",
  50	"users",
  51	"bools",
  52	"levels",
  53	"categories",
  54};
  55#endif
  56
  57static unsigned int symtab_sizes[SYM_NUM] = {
  58	2,
  59	32,
  60	16,
  61	512,
  62	128,
  63	16,
  64	16,
  65	16,
  66};
  67
  68struct policydb_compat_info {
  69	int version;
  70	int sym_num;
  71	int ocon_num;
  72};
  73
  74/* These need to be updated if SYM_NUM or OCON_NUM changes */
  75static struct policydb_compat_info policydb_compat[] = {
  76	{
  77		.version	= POLICYDB_VERSION_BASE,
  78		.sym_num	= SYM_NUM - 3,
  79		.ocon_num	= OCON_NUM - 1,
  80	},
  81	{
  82		.version	= POLICYDB_VERSION_BOOL,
  83		.sym_num	= SYM_NUM - 2,
  84		.ocon_num	= OCON_NUM - 1,
  85	},
  86	{
  87		.version	= POLICYDB_VERSION_IPV6,
  88		.sym_num	= SYM_NUM - 2,
  89		.ocon_num	= OCON_NUM,
  90	},
  91	{
  92		.version	= POLICYDB_VERSION_NLCLASS,
  93		.sym_num	= SYM_NUM - 2,
  94		.ocon_num	= OCON_NUM,
  95	},
  96	{
  97		.version	= POLICYDB_VERSION_MLS,
  98		.sym_num	= SYM_NUM,
  99		.ocon_num	= OCON_NUM,
 100	},
 101	{
 102		.version	= POLICYDB_VERSION_AVTAB,
 103		.sym_num	= SYM_NUM,
 104		.ocon_num	= OCON_NUM,
 105	},
 106	{
 107		.version	= POLICYDB_VERSION_RANGETRANS,
 108		.sym_num	= SYM_NUM,
 109		.ocon_num	= OCON_NUM,
 110	},
 111	{
 112		.version	= POLICYDB_VERSION_POLCAP,
 113		.sym_num	= SYM_NUM,
 114		.ocon_num	= OCON_NUM,
 115	},
 116	{
 117		.version	= POLICYDB_VERSION_PERMISSIVE,
 118		.sym_num	= SYM_NUM,
 119		.ocon_num	= OCON_NUM,
 120	},
 121	{
 122		.version	= POLICYDB_VERSION_BOUNDARY,
 123		.sym_num	= SYM_NUM,
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 124		.ocon_num	= OCON_NUM,
 125	},
 126	{
 127		.version	= POLICYDB_VERSION_FILENAME_TRANS,
 128		.sym_num	= SYM_NUM,
 129		.ocon_num	= OCON_NUM,
 130	},
 131	{
 132		.version	= POLICYDB_VERSION_ROLETRANS,
 133		.sym_num	= SYM_NUM,
 134		.ocon_num	= OCON_NUM,
 135	},
 136};
 137
 138static struct policydb_compat_info *policydb_lookup_compat(int version)
 139{
 140	int i;
 141	struct policydb_compat_info *info = NULL;
 142
 143	for (i = 0; i < ARRAY_SIZE(policydb_compat); i++) {
 144		if (policydb_compat[i].version == version) {
 145			info = &policydb_compat[i];
 146			break;
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 147		}
 
 148	}
 149	return info;
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 150}
 151
 152/*
 153 * Initialize the role table.
 154 */
 155static int roles_init(struct policydb *p)
 156{
 157	char *key = NULL;
 158	int rc;
 159	struct role_datum *role;
 160
 161	rc = -ENOMEM;
 162	role = kzalloc(sizeof(*role), GFP_KERNEL);
 163	if (!role)
 164		goto out;
 165
 166	rc = -EINVAL;
 167	role->value = ++p->p_roles.nprim;
 168	if (role->value != OBJECT_R_VAL)
 169		goto out;
 170
 171	rc = -ENOMEM;
 172	key = kstrdup(OBJECT_R, GFP_KERNEL);
 173	if (!key)
 174		goto out;
 175
 176	rc = hashtab_insert(p->p_roles.table, key, role);
 177	if (rc)
 178		goto out;
 179
 180	return 0;
 181out:
 182	kfree(key);
 183	kfree(role);
 184	return rc;
 185}
 186
 187static u32 filenametr_hash(struct hashtab *h, const void *k)
 188{
 189	const struct filename_trans *ft = k;
 190	unsigned long hash;
 191	unsigned int byte_num;
 192	unsigned char focus;
 193
 194	hash = ft->stype ^ ft->ttype ^ ft->tclass;
 195
 196	byte_num = 0;
 197	while ((focus = ft->name[byte_num++]))
 198		hash = partial_name_hash(focus, hash);
 199	return hash & (h->size - 1);
 200}
 201
 202static int filenametr_cmp(struct hashtab *h, const void *k1, const void *k2)
 203{
 204	const struct filename_trans *ft1 = k1;
 205	const struct filename_trans *ft2 = k2;
 206	int v;
 207
 208	v = ft1->stype - ft2->stype;
 209	if (v)
 210		return v;
 211
 212	v = ft1->ttype - ft2->ttype;
 213	if (v)
 214		return v;
 215
 216	v = ft1->tclass - ft2->tclass;
 217	if (v)
 218		return v;
 219
 220	return strcmp(ft1->name, ft2->name);
 221
 222}
 223
 224static u32 rangetr_hash(struct hashtab *h, const void *k)
 
 
 
 
 
 
 
 
 
 
 
 225{
 226	const struct range_trans *key = k;
 227	return (key->source_type + (key->target_type << 3) +
 228		(key->target_class << 5)) & (h->size - 1);
 
 229}
 230
 231static int rangetr_cmp(struct hashtab *h, const void *k1, const void *k2)
 232{
 233	const struct range_trans *key1 = k1, *key2 = k2;
 234	int v;
 235
 236	v = key1->source_type - key2->source_type;
 237	if (v)
 238		return v;
 239
 240	v = key1->target_type - key2->target_type;
 241	if (v)
 242		return v;
 243
 244	v = key1->target_class - key2->target_class;
 245
 246	return v;
 247}
 248
 249/*
 250 * Initialize a policy database structure.
 251 */
 252static int policydb_init(struct policydb *p)
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 253{
 254	int i, rc;
 
 255
 256	memset(p, 0, sizeof(*p));
 
 
 257
 258	for (i = 0; i < SYM_NUM; i++) {
 259		rc = symtab_init(&p->symtab[i], symtab_sizes[i]);
 260		if (rc)
 261			goto out;
 262	}
 263
 264	rc = avtab_init(&p->te_avtab);
 265	if (rc)
 266		goto out;
 267
 268	rc = roles_init(p);
 269	if (rc)
 270		goto out;
 
 271
 272	rc = cond_policydb_init(p);
 273	if (rc)
 274		goto out;
 
 
 275
 276	p->filename_trans = hashtab_create(filenametr_hash, filenametr_cmp, (1 << 10));
 277	if (!p->filename_trans)
 278		goto out;
 
 
 
 279
 280	p->range_tr = hashtab_create(rangetr_hash, rangetr_cmp, 256);
 281	if (!p->range_tr)
 282		goto out;
 283
 284	ebitmap_init(&p->filename_trans_ttypes);
 285	ebitmap_init(&p->policycaps);
 286	ebitmap_init(&p->permissive_map);
 287
 288	return 0;
 289out:
 290	hashtab_destroy(p->filename_trans);
 291	hashtab_destroy(p->range_tr);
 292	for (i = 0; i < SYM_NUM; i++)
 293		hashtab_destroy(p->symtab[i].table);
 294	return rc;
 295}
 296
 297/*
 298 * The following *_index functions are used to
 299 * define the val_to_name and val_to_struct arrays
 300 * in a policy database structure.  The val_to_name
 301 * arrays are used when converting security context
 302 * structures into string representations.  The
 303 * val_to_struct arrays are used when the attributes
 304 * of a class, role, or user are needed.
 305 */
 306
 307static int common_index(void *key, void *datum, void *datap)
 308{
 309	struct policydb *p;
 310	struct common_datum *comdatum;
 311	struct flex_array *fa;
 312
 313	comdatum = datum;
 314	p = datap;
 315	if (!comdatum->value || comdatum->value > p->p_commons.nprim)
 316		return -EINVAL;
 317
 318	fa = p->sym_val_to_name[SYM_COMMONS];
 319	if (flex_array_put_ptr(fa, comdatum->value - 1, key,
 320			       GFP_KERNEL | __GFP_ZERO))
 321		BUG();
 322	return 0;
 323}
 324
 325static int class_index(void *key, void *datum, void *datap)
 326{
 327	struct policydb *p;
 328	struct class_datum *cladatum;
 329	struct flex_array *fa;
 330
 331	cladatum = datum;
 332	p = datap;
 333	if (!cladatum->value || cladatum->value > p->p_classes.nprim)
 334		return -EINVAL;
 335	fa = p->sym_val_to_name[SYM_CLASSES];
 336	if (flex_array_put_ptr(fa, cladatum->value - 1, key,
 337			       GFP_KERNEL | __GFP_ZERO))
 338		BUG();
 339	p->class_val_to_struct[cladatum->value - 1] = cladatum;
 340	return 0;
 341}
 342
 343static int role_index(void *key, void *datum, void *datap)
 344{
 345	struct policydb *p;
 346	struct role_datum *role;
 347	struct flex_array *fa;
 348
 349	role = datum;
 350	p = datap;
 351	if (!role->value
 352	    || role->value > p->p_roles.nprim
 353	    || role->bounds > p->p_roles.nprim)
 354		return -EINVAL;
 355
 356	fa = p->sym_val_to_name[SYM_ROLES];
 357	if (flex_array_put_ptr(fa, role->value - 1, key,
 358			       GFP_KERNEL | __GFP_ZERO))
 359		BUG();
 360	p->role_val_to_struct[role->value - 1] = role;
 361	return 0;
 362}
 363
 364static int type_index(void *key, void *datum, void *datap)
 365{
 366	struct policydb *p;
 367	struct type_datum *typdatum;
 368	struct flex_array *fa;
 369
 370	typdatum = datum;
 371	p = datap;
 372
 373	if (typdatum->primary) {
 374		if (!typdatum->value
 375		    || typdatum->value > p->p_types.nprim
 376		    || typdatum->bounds > p->p_types.nprim)
 377			return -EINVAL;
 378		fa = p->sym_val_to_name[SYM_TYPES];
 379		if (flex_array_put_ptr(fa, typdatum->value - 1, key,
 380				       GFP_KERNEL | __GFP_ZERO))
 381			BUG();
 382
 383		fa = p->type_val_to_struct_array;
 384		if (flex_array_put_ptr(fa, typdatum->value - 1, typdatum,
 385				       GFP_KERNEL | __GFP_ZERO))
 386			BUG();
 387	}
 388
 389	return 0;
 390}
 391
 392static int user_index(void *key, void *datum, void *datap)
 393{
 394	struct policydb *p;
 395	struct user_datum *usrdatum;
 396	struct flex_array *fa;
 397
 398	usrdatum = datum;
 399	p = datap;
 400	if (!usrdatum->value
 401	    || usrdatum->value > p->p_users.nprim
 402	    || usrdatum->bounds > p->p_users.nprim)
 403		return -EINVAL;
 404
 405	fa = p->sym_val_to_name[SYM_USERS];
 406	if (flex_array_put_ptr(fa, usrdatum->value - 1, key,
 407			       GFP_KERNEL | __GFP_ZERO))
 408		BUG();
 409	p->user_val_to_struct[usrdatum->value - 1] = usrdatum;
 410	return 0;
 411}
 412
 413static int sens_index(void *key, void *datum, void *datap)
 414{
 415	struct policydb *p;
 416	struct level_datum *levdatum;
 417	struct flex_array *fa;
 418
 419	levdatum = datum;
 420	p = datap;
 421
 422	if (!levdatum->isalias) {
 423		if (!levdatum->level->sens ||
 424		    levdatum->level->sens > p->p_levels.nprim)
 425			return -EINVAL;
 426		fa = p->sym_val_to_name[SYM_LEVELS];
 427		if (flex_array_put_ptr(fa, levdatum->level->sens - 1, key,
 428				       GFP_KERNEL | __GFP_ZERO))
 429			BUG();
 430	}
 431
 432	return 0;
 433}
 434
 435static int cat_index(void *key, void *datum, void *datap)
 436{
 437	struct policydb *p;
 438	struct cat_datum *catdatum;
 439	struct flex_array *fa;
 440
 441	catdatum = datum;
 442	p = datap;
 443
 444	if (!catdatum->isalias) {
 445		if (!catdatum->value || catdatum->value > p->p_cats.nprim)
 446			return -EINVAL;
 447		fa = p->sym_val_to_name[SYM_CATS];
 448		if (flex_array_put_ptr(fa, catdatum->value - 1, key,
 449				       GFP_KERNEL | __GFP_ZERO))
 450			BUG();
 451	}
 452
 453	return 0;
 454}
 455
 456static int (*index_f[SYM_NUM]) (void *key, void *datum, void *datap) =
 457{
 458	common_index,
 459	class_index,
 460	role_index,
 461	type_index,
 462	user_index,
 463	cond_index_bool,
 464	sens_index,
 465	cat_index,
 466};
 467
 468#ifdef DEBUG_HASHES
 469static void hash_eval(struct hashtab *h, const char *hash_name)
 470{
 471	struct hashtab_info info;
 472
 473	hashtab_stat(h, &info);
 474	printk(KERN_DEBUG "SELinux: %s:  %d entries and %d/%d buckets used, "
 475	       "longest chain length %d\n", hash_name, h->nel,
 476	       info.slots_used, h->size, info.max_chain_len);
 477}
 478
 479static void symtab_hash_eval(struct symtab *s)
 480{
 481	int i;
 482
 483	for (i = 0; i < SYM_NUM; i++)
 484		hash_eval(s[i].table, symtab_name[i]);
 485}
 486
 487#else
 488static inline void hash_eval(struct hashtab *h, char *hash_name)
 489{
 490}
 491#endif
 492
 493/*
 494 * Define the other val_to_name and val_to_struct arrays
 495 * in a policy database structure.
 496 *
 497 * Caller must clean up on failure.
 498 */
 499static int policydb_index(struct policydb *p)
 500{
 501	int i, rc;
 502
 503	printk(KERN_DEBUG "SELinux:  %d users, %d roles, %d types, %d bools",
 504	       p->p_users.nprim, p->p_roles.nprim, p->p_types.nprim, p->p_bools.nprim);
 505	if (p->mls_enabled)
 506		printk(", %d sens, %d cats", p->p_levels.nprim,
 507		       p->p_cats.nprim);
 508	printk("\n");
 
 
 
 
 509
 510	printk(KERN_DEBUG "SELinux:  %d classes, %d rules\n",
 511	       p->p_classes.nprim, p->te_avtab.nel);
 512
 513#ifdef DEBUG_HASHES
 514	avtab_hash_eval(&p->te_avtab, "rules");
 515	symtab_hash_eval(p->symtab);
 516#endif
 517
 518	rc = -ENOMEM;
 519	p->class_val_to_struct =
 520		kmalloc(p->p_classes.nprim * sizeof(*(p->class_val_to_struct)),
 521			GFP_KERNEL);
 522	if (!p->class_val_to_struct)
 523		goto out;
 524
 525	rc = -ENOMEM;
 526	p->role_val_to_struct =
 527		kmalloc(p->p_roles.nprim * sizeof(*(p->role_val_to_struct)),
 528			GFP_KERNEL);
 529	if (!p->role_val_to_struct)
 530		goto out;
 531
 532	rc = -ENOMEM;
 533	p->user_val_to_struct =
 534		kmalloc(p->p_users.nprim * sizeof(*(p->user_val_to_struct)),
 535			GFP_KERNEL);
 536	if (!p->user_val_to_struct)
 537		goto out;
 538
 539	/* Yes, I want the sizeof the pointer, not the structure */
 540	rc = -ENOMEM;
 541	p->type_val_to_struct_array = flex_array_alloc(sizeof(struct type_datum *),
 542						       p->p_types.nprim,
 543						       GFP_KERNEL | __GFP_ZERO);
 544	if (!p->type_val_to_struct_array)
 545		goto out;
 546
 547	rc = flex_array_prealloc(p->type_val_to_struct_array, 0,
 548				 p->p_types.nprim, GFP_KERNEL | __GFP_ZERO);
 549	if (rc)
 550		goto out;
 551
 552	rc = cond_init_bool_indexes(p);
 553	if (rc)
 554		goto out;
 555
 556	for (i = 0; i < SYM_NUM; i++) {
 557		rc = -ENOMEM;
 558		p->sym_val_to_name[i] = flex_array_alloc(sizeof(char *),
 559							 p->symtab[i].nprim,
 560							 GFP_KERNEL | __GFP_ZERO);
 561		if (!p->sym_val_to_name[i])
 562			goto out;
 563
 564		rc = flex_array_prealloc(p->sym_val_to_name[i],
 565					 0, p->symtab[i].nprim,
 566					 GFP_KERNEL | __GFP_ZERO);
 567		if (rc)
 568			goto out;
 569
 570		rc = hashtab_map(p->symtab[i].table, index_f[i], p);
 571		if (rc)
 572			goto out;
 573	}
 574	rc = 0;
 575out:
 576	return rc;
 577}
 578
 579/*
 580 * The following *_destroy functions are used to
 581 * free any memory allocated for each kind of
 582 * symbol data in the policy database.
 583 */
 584
 585static int perm_destroy(void *key, void *datum, void *p)
 586{
 587	kfree(key);
 588	kfree(datum);
 589	return 0;
 590}
 591
 592static int common_destroy(void *key, void *datum, void *p)
 593{
 594	struct common_datum *comdatum;
 595
 596	kfree(key);
 597	if (datum) {
 598		comdatum = datum;
 599		hashtab_map(comdatum->permissions.table, perm_destroy, NULL);
 600		hashtab_destroy(comdatum->permissions.table);
 601	}
 602	kfree(datum);
 603	return 0;
 604}
 605
 606static int cls_destroy(void *key, void *datum, void *p)
 607{
 608	struct class_datum *cladatum;
 609	struct constraint_node *constraint, *ctemp;
 610	struct constraint_expr *e, *etmp;
 611
 612	kfree(key);
 613	if (datum) {
 614		cladatum = datum;
 615		hashtab_map(cladatum->permissions.table, perm_destroy, NULL);
 616		hashtab_destroy(cladatum->permissions.table);
 617		constraint = cladatum->constraints;
 618		while (constraint) {
 619			e = constraint->expr;
 620			while (e) {
 621				ebitmap_destroy(&e->names);
 622				etmp = e;
 623				e = e->next;
 624				kfree(etmp);
 625			}
 626			ctemp = constraint;
 627			constraint = constraint->next;
 628			kfree(ctemp);
 629		}
 630
 631		constraint = cladatum->validatetrans;
 632		while (constraint) {
 633			e = constraint->expr;
 634			while (e) {
 635				ebitmap_destroy(&e->names);
 636				etmp = e;
 637				e = e->next;
 638				kfree(etmp);
 639			}
 640			ctemp = constraint;
 641			constraint = constraint->next;
 642			kfree(ctemp);
 643		}
 644
 645		kfree(cladatum->comkey);
 646	}
 647	kfree(datum);
 648	return 0;
 649}
 650
 651static int role_destroy(void *key, void *datum, void *p)
 652{
 653	struct role_datum *role;
 654
 655	kfree(key);
 656	if (datum) {
 657		role = datum;
 658		ebitmap_destroy(&role->dominates);
 659		ebitmap_destroy(&role->types);
 660	}
 661	kfree(datum);
 662	return 0;
 663}
 664
 665static int type_destroy(void *key, void *datum, void *p)
 666{
 667	kfree(key);
 668	kfree(datum);
 669	return 0;
 670}
 671
 672static int user_destroy(void *key, void *datum, void *p)
 673{
 674	struct user_datum *usrdatum;
 675
 676	kfree(key);
 677	if (datum) {
 678		usrdatum = datum;
 679		ebitmap_destroy(&usrdatum->roles);
 680		ebitmap_destroy(&usrdatum->range.level[0].cat);
 681		ebitmap_destroy(&usrdatum->range.level[1].cat);
 682		ebitmap_destroy(&usrdatum->dfltlevel.cat);
 683	}
 684	kfree(datum);
 685	return 0;
 686}
 687
 688static int sens_destroy(void *key, void *datum, void *p)
 689{
 690	struct level_datum *levdatum;
 691
 692	kfree(key);
 693	if (datum) {
 694		levdatum = datum;
 695		ebitmap_destroy(&levdatum->level->cat);
 696		kfree(levdatum->level);
 697	}
 698	kfree(datum);
 699	return 0;
 700}
 701
 702static int cat_destroy(void *key, void *datum, void *p)
 703{
 704	kfree(key);
 705	kfree(datum);
 706	return 0;
 707}
 708
 709static int (*destroy_f[SYM_NUM]) (void *key, void *datum, void *datap) =
 710{
 711	common_destroy,
 712	cls_destroy,
 713	role_destroy,
 714	type_destroy,
 715	user_destroy,
 716	cond_destroy_bool,
 717	sens_destroy,
 718	cat_destroy,
 719};
 720
 721static int filenametr_destroy(void *key, void *datum, void *p)
 722{
 723	struct filename_trans *ft = key;
 724	kfree(ft->name);
 725	kfree(key);
 726	kfree(datum);
 727	cond_resched();
 728	return 0;
 729}
 730
 731static int range_tr_destroy(void *key, void *datum, void *p)
 732{
 733	struct mls_range *rt = datum;
 734	kfree(key);
 735	ebitmap_destroy(&rt->level[0].cat);
 736	ebitmap_destroy(&rt->level[1].cat);
 737	kfree(datum);
 738	cond_resched();
 739	return 0;
 740}
 741
 742static void ocontext_destroy(struct ocontext *c, int i)
 743{
 744	if (!c)
 745		return;
 746
 747	context_destroy(&c->context[0]);
 748	context_destroy(&c->context[1]);
 749	if (i == OCON_ISID || i == OCON_FS ||
 750	    i == OCON_NETIF || i == OCON_FSUSE)
 751		kfree(c->u.name);
 752	kfree(c);
 753}
 754
 755/*
 756 * Free any memory allocated by a policy database structure.
 757 */
 758void policydb_destroy(struct policydb *p)
 759{
 760	struct ocontext *c, *ctmp;
 761	struct genfs *g, *gtmp;
 762	int i;
 763	struct role_allow *ra, *lra = NULL;
 764	struct role_trans *tr, *ltr = NULL;
 765
 766	for (i = 0; i < SYM_NUM; i++) {
 767		cond_resched();
 768		hashtab_map(p->symtab[i].table, destroy_f[i], NULL);
 769		hashtab_destroy(p->symtab[i].table);
 770	}
 771
 772	for (i = 0; i < SYM_NUM; i++) {
 773		if (p->sym_val_to_name[i])
 774			flex_array_free(p->sym_val_to_name[i]);
 775	}
 776
 777	kfree(p->class_val_to_struct);
 778	kfree(p->role_val_to_struct);
 779	kfree(p->user_val_to_struct);
 780	if (p->type_val_to_struct_array)
 781		flex_array_free(p->type_val_to_struct_array);
 782
 783	avtab_destroy(&p->te_avtab);
 784
 785	for (i = 0; i < OCON_NUM; i++) {
 786		cond_resched();
 787		c = p->ocontexts[i];
 788		while (c) {
 789			ctmp = c;
 790			c = c->next;
 791			ocontext_destroy(ctmp, i);
 792		}
 793		p->ocontexts[i] = NULL;
 794	}
 795
 796	g = p->genfs;
 797	while (g) {
 798		cond_resched();
 799		kfree(g->fstype);
 800		c = g->head;
 801		while (c) {
 802			ctmp = c;
 803			c = c->next;
 804			ocontext_destroy(ctmp, OCON_FSUSE);
 805		}
 806		gtmp = g;
 807		g = g->next;
 808		kfree(gtmp);
 809	}
 810	p->genfs = NULL;
 811
 812	cond_policydb_destroy(p);
 813
 814	for (tr = p->role_tr; tr; tr = tr->next) {
 815		cond_resched();
 816		kfree(ltr);
 817		ltr = tr;
 818	}
 819	kfree(ltr);
 820
 821	for (ra = p->role_allow; ra; ra = ra->next) {
 822		cond_resched();
 823		kfree(lra);
 824		lra = ra;
 825	}
 826	kfree(lra);
 827
 828	hashtab_map(p->filename_trans, filenametr_destroy, NULL);
 829	hashtab_destroy(p->filename_trans);
 830
 831	hashtab_map(p->range_tr, range_tr_destroy, NULL);
 832	hashtab_destroy(p->range_tr);
 833
 834	if (p->type_attr_map_array) {
 835		for (i = 0; i < p->p_types.nprim; i++) {
 836			struct ebitmap *e;
 837
 838			e = flex_array_get(p->type_attr_map_array, i);
 839			if (!e)
 840				continue;
 841			ebitmap_destroy(e);
 842		}
 843		flex_array_free(p->type_attr_map_array);
 844	}
 845
 846	ebitmap_destroy(&p->filename_trans_ttypes);
 847	ebitmap_destroy(&p->policycaps);
 848	ebitmap_destroy(&p->permissive_map);
 849
 850	return;
 851}
 852
 853/*
 854 * Load the initial SIDs specified in a policy database
 855 * structure into a SID table.
 856 */
 857int policydb_load_isids(struct policydb *p, struct sidtab *s)
 858{
 859	struct ocontext *head, *c;
 860	int rc;
 861
 862	rc = sidtab_init(s);
 863	if (rc) {
 864		printk(KERN_ERR "SELinux:  out of memory on SID table init\n");
 865		goto out;
 866	}
 867
 868	head = p->ocontexts[OCON_ISID];
 869	for (c = head; c; c = c->next) {
 870		rc = -EINVAL;
 871		if (!c->context[0].user) {
 872			printk(KERN_ERR "SELinux:  SID %s was never defined.\n",
 873				c->u.name);
 874			goto out;
 
 
 875		}
 876
 877		rc = sidtab_insert(s, c->sid[0], &c->context[0]);
 
 
 
 
 878		if (rc) {
 879			printk(KERN_ERR "SELinux:  unable to load initial SID %s.\n",
 880				c->u.name);
 881			goto out;
 
 882		}
 883	}
 884	rc = 0;
 885out:
 886	return rc;
 887}
 888
 889int policydb_class_isvalid(struct policydb *p, unsigned int class)
 890{
 891	if (!class || class > p->p_classes.nprim)
 892		return 0;
 893	return 1;
 894}
 895
 896int policydb_role_isvalid(struct policydb *p, unsigned int role)
 897{
 898	if (!role || role > p->p_roles.nprim)
 899		return 0;
 900	return 1;
 901}
 902
 903int policydb_type_isvalid(struct policydb *p, unsigned int type)
 904{
 905	if (!type || type > p->p_types.nprim)
 906		return 0;
 907	return 1;
 908}
 909
 910/*
 911 * Return 1 if the fields in the security context
 912 * structure `c' are valid.  Return 0 otherwise.
 913 */
 914int policydb_context_isvalid(struct policydb *p, struct context *c)
 915{
 916	struct role_datum *role;
 917	struct user_datum *usrdatum;
 918
 919	if (!c->role || c->role > p->p_roles.nprim)
 920		return 0;
 921
 922	if (!c->user || c->user > p->p_users.nprim)
 923		return 0;
 924
 925	if (!c->type || c->type > p->p_types.nprim)
 926		return 0;
 927
 928	if (c->role != OBJECT_R_VAL) {
 929		/*
 930		 * Role must be authorized for the type.
 931		 */
 932		role = p->role_val_to_struct[c->role - 1];
 933		if (!ebitmap_get_bit(&role->types, c->type - 1))
 934			/* role may not be associated with type */
 935			return 0;
 936
 937		/*
 938		 * User must be authorized for the role.
 939		 */
 940		usrdatum = p->user_val_to_struct[c->user - 1];
 941		if (!usrdatum)
 942			return 0;
 943
 944		if (!ebitmap_get_bit(&usrdatum->roles, c->role - 1))
 945			/* user may not be associated with role */
 946			return 0;
 947	}
 948
 949	if (!mls_context_isvalid(p, c))
 950		return 0;
 951
 952	return 1;
 953}
 954
 955/*
 956 * Read a MLS range structure from a policydb binary
 957 * representation file.
 958 */
 959static int mls_read_range_helper(struct mls_range *r, void *fp)
 960{
 961	__le32 buf[2];
 962	u32 items;
 963	int rc;
 964
 965	rc = next_entry(buf, fp, sizeof(u32));
 966	if (rc)
 967		goto out;
 968
 969	rc = -EINVAL;
 970	items = le32_to_cpu(buf[0]);
 971	if (items > ARRAY_SIZE(buf)) {
 972		printk(KERN_ERR "SELinux: mls:  range overflow\n");
 973		goto out;
 974	}
 975
 976	rc = next_entry(buf, fp, sizeof(u32) * items);
 977	if (rc) {
 978		printk(KERN_ERR "SELinux: mls:  truncated range\n");
 979		goto out;
 980	}
 981
 982	r->level[0].sens = le32_to_cpu(buf[0]);
 983	if (items > 1)
 984		r->level[1].sens = le32_to_cpu(buf[1]);
 985	else
 986		r->level[1].sens = r->level[0].sens;
 987
 988	rc = ebitmap_read(&r->level[0].cat, fp);
 989	if (rc) {
 990		printk(KERN_ERR "SELinux: mls:  error reading low categories\n");
 991		goto out;
 992	}
 993	if (items > 1) {
 994		rc = ebitmap_read(&r->level[1].cat, fp);
 995		if (rc) {
 996			printk(KERN_ERR "SELinux: mls:  error reading high categories\n");
 997			goto bad_high;
 998		}
 999	} else {
1000		rc = ebitmap_cpy(&r->level[1].cat, &r->level[0].cat);
1001		if (rc) {
1002			printk(KERN_ERR "SELinux: mls:  out of memory\n");
1003			goto bad_high;
1004		}
1005	}
1006
1007	return 0;
1008bad_high:
1009	ebitmap_destroy(&r->level[0].cat);
1010out:
1011	return rc;
1012}
1013
1014/*
1015 * Read and validate a security context structure
1016 * from a policydb binary representation file.
1017 */
1018static int context_read_and_validate(struct context *c,
1019				     struct policydb *p,
1020				     void *fp)
1021{
1022	__le32 buf[3];
1023	int rc;
1024
1025	rc = next_entry(buf, fp, sizeof buf);
1026	if (rc) {
1027		printk(KERN_ERR "SELinux: context truncated\n");
1028		goto out;
1029	}
1030	c->user = le32_to_cpu(buf[0]);
1031	c->role = le32_to_cpu(buf[1]);
1032	c->type = le32_to_cpu(buf[2]);
1033	if (p->policyvers >= POLICYDB_VERSION_MLS) {
1034		rc = mls_read_range_helper(&c->range, fp);
1035		if (rc) {
1036			printk(KERN_ERR "SELinux: error reading MLS range of context\n");
1037			goto out;
1038		}
1039	}
1040
1041	rc = -EINVAL;
1042	if (!policydb_context_isvalid(p, c)) {
1043		printk(KERN_ERR "SELinux:  invalid security context\n");
1044		context_destroy(c);
1045		goto out;
1046	}
1047	rc = 0;
1048out:
1049	return rc;
1050}
1051
1052/*
1053 * The following *_read functions are used to
1054 * read the symbol data from a policy database
1055 * binary representation file.
1056 */
1057
1058static int perm_read(struct policydb *p, struct hashtab *h, void *fp)
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
1059{
1060	char *key = NULL;
1061	struct perm_datum *perdatum;
1062	int rc;
1063	__le32 buf[2];
1064	u32 len;
1065
1066	rc = -ENOMEM;
1067	perdatum = kzalloc(sizeof(*perdatum), GFP_KERNEL);
1068	if (!perdatum)
1069		goto bad;
1070
1071	rc = next_entry(buf, fp, sizeof buf);
1072	if (rc)
1073		goto bad;
1074
1075	len = le32_to_cpu(buf[0]);
1076	perdatum->value = le32_to_cpu(buf[1]);
1077
1078	rc = -ENOMEM;
1079	key = kmalloc(len + 1, GFP_KERNEL);
1080	if (!key)
1081		goto bad;
1082
1083	rc = next_entry(key, fp, len);
1084	if (rc)
1085		goto bad;
1086	key[len] = '\0';
1087
1088	rc = hashtab_insert(h, key, perdatum);
1089	if (rc)
1090		goto bad;
1091
1092	return 0;
1093bad:
1094	perm_destroy(key, perdatum, NULL);
1095	return rc;
1096}
1097
1098static int common_read(struct policydb *p, struct hashtab *h, void *fp)
1099{
1100	char *key = NULL;
1101	struct common_datum *comdatum;
1102	__le32 buf[4];
1103	u32 len, nel;
1104	int i, rc;
1105
1106	rc = -ENOMEM;
1107	comdatum = kzalloc(sizeof(*comdatum), GFP_KERNEL);
1108	if (!comdatum)
1109		goto bad;
1110
1111	rc = next_entry(buf, fp, sizeof buf);
1112	if (rc)
1113		goto bad;
1114
1115	len = le32_to_cpu(buf[0]);
1116	comdatum->value = le32_to_cpu(buf[1]);
 
1117
1118	rc = symtab_init(&comdatum->permissions, PERM_SYMTAB_SIZE);
1119	if (rc)
1120		goto bad;
1121	comdatum->permissions.nprim = le32_to_cpu(buf[2]);
1122	nel = le32_to_cpu(buf[3]);
1123
1124	rc = -ENOMEM;
1125	key = kmalloc(len + 1, GFP_KERNEL);
1126	if (!key)
1127		goto bad;
1128
1129	rc = next_entry(key, fp, len);
1130	if (rc)
1131		goto bad;
1132	key[len] = '\0';
1133
1134	for (i = 0; i < nel; i++) {
1135		rc = perm_read(p, comdatum->permissions.table, fp);
1136		if (rc)
1137			goto bad;
1138	}
1139
1140	rc = hashtab_insert(h, key, comdatum);
1141	if (rc)
1142		goto bad;
1143	return 0;
1144bad:
1145	common_destroy(key, comdatum, NULL);
1146	return rc;
1147}
1148
1149static int read_cons_helper(struct constraint_node **nodep, int ncons,
1150			    int allowxtarget, void *fp)
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
1151{
1152	struct constraint_node *c, *lc;
1153	struct constraint_expr *e, *le;
1154	__le32 buf[3];
1155	u32 nexpr;
1156	int rc, i, j, depth;
1157
1158	lc = NULL;
1159	for (i = 0; i < ncons; i++) {
1160		c = kzalloc(sizeof(*c), GFP_KERNEL);
1161		if (!c)
1162			return -ENOMEM;
1163
1164		if (lc)
1165			lc->next = c;
1166		else
1167			*nodep = c;
1168
1169		rc = next_entry(buf, fp, (sizeof(u32) * 2));
1170		if (rc)
1171			return rc;
1172		c->permissions = le32_to_cpu(buf[0]);
1173		nexpr = le32_to_cpu(buf[1]);
1174		le = NULL;
1175		depth = -1;
1176		for (j = 0; j < nexpr; j++) {
1177			e = kzalloc(sizeof(*e), GFP_KERNEL);
1178			if (!e)
1179				return -ENOMEM;
1180
1181			if (le)
1182				le->next = e;
1183			else
1184				c->expr = e;
1185
1186			rc = next_entry(buf, fp, (sizeof(u32) * 3));
1187			if (rc)
1188				return rc;
1189			e->expr_type = le32_to_cpu(buf[0]);
1190			e->attr = le32_to_cpu(buf[1]);
1191			e->op = le32_to_cpu(buf[2]);
1192
1193			switch (e->expr_type) {
1194			case CEXPR_NOT:
1195				if (depth < 0)
1196					return -EINVAL;
1197				break;
1198			case CEXPR_AND:
1199			case CEXPR_OR:
1200				if (depth < 1)
1201					return -EINVAL;
1202				depth--;
1203				break;
1204			case CEXPR_ATTR:
1205				if (depth == (CEXPR_MAXDEPTH - 1))
1206					return -EINVAL;
1207				depth++;
1208				break;
1209			case CEXPR_NAMES:
1210				if (!allowxtarget && (e->attr & CEXPR_XTARGET))
1211					return -EINVAL;
1212				if (depth == (CEXPR_MAXDEPTH - 1))
1213					return -EINVAL;
1214				depth++;
1215				rc = ebitmap_read(&e->names, fp);
1216				if (rc)
1217					return rc;
 
 
 
 
 
 
 
 
 
 
 
1218				break;
1219			default:
1220				return -EINVAL;
1221			}
1222			le = e;
1223		}
1224		if (depth != 0)
1225			return -EINVAL;
1226		lc = c;
1227	}
1228
1229	return 0;
1230}
1231
1232static int class_read(struct policydb *p, struct hashtab *h, void *fp)
1233{
1234	char *key = NULL;
1235	struct class_datum *cladatum;
1236	__le32 buf[6];
1237	u32 len, len2, ncons, nel;
1238	int i, rc;
1239
1240	rc = -ENOMEM;
1241	cladatum = kzalloc(sizeof(*cladatum), GFP_KERNEL);
1242	if (!cladatum)
1243		goto bad;
1244
1245	rc = next_entry(buf, fp, sizeof(u32)*6);
1246	if (rc)
1247		goto bad;
1248
1249	len = le32_to_cpu(buf[0]);
1250	len2 = le32_to_cpu(buf[1]);
1251	cladatum->value = le32_to_cpu(buf[2]);
 
1252
1253	rc = symtab_init(&cladatum->permissions, PERM_SYMTAB_SIZE);
1254	if (rc)
1255		goto bad;
1256	cladatum->permissions.nprim = le32_to_cpu(buf[3]);
1257	nel = le32_to_cpu(buf[4]);
1258
1259	ncons = le32_to_cpu(buf[5]);
1260
1261	rc = -ENOMEM;
1262	key = kmalloc(len + 1, GFP_KERNEL);
1263	if (!key)
1264		goto bad;
1265
1266	rc = next_entry(key, fp, len);
1267	if (rc)
1268		goto bad;
1269	key[len] = '\0';
1270
1271	if (len2) {
1272		rc = -ENOMEM;
1273		cladatum->comkey = kmalloc(len2 + 1, GFP_KERNEL);
1274		if (!cladatum->comkey)
1275			goto bad;
1276		rc = next_entry(cladatum->comkey, fp, len2);
1277		if (rc)
1278			goto bad;
1279		cladatum->comkey[len2] = '\0';
1280
1281		rc = -EINVAL;
1282		cladatum->comdatum = hashtab_search(p->p_commons.table, cladatum->comkey);
 
1283		if (!cladatum->comdatum) {
1284			printk(KERN_ERR "SELinux:  unknown common %s\n", cladatum->comkey);
 
1285			goto bad;
1286		}
1287	}
1288	for (i = 0; i < nel; i++) {
1289		rc = perm_read(p, cladatum->permissions.table, fp);
1290		if (rc)
1291			goto bad;
1292	}
1293
1294	rc = read_cons_helper(&cladatum->constraints, ncons, 0, fp);
1295	if (rc)
1296		goto bad;
1297
1298	if (p->policyvers >= POLICYDB_VERSION_VALIDATETRANS) {
1299		/* grab the validatetrans rules */
1300		rc = next_entry(buf, fp, sizeof(u32));
1301		if (rc)
1302			goto bad;
1303		ncons = le32_to_cpu(buf[0]);
1304		rc = read_cons_helper(&cladatum->validatetrans, ncons, 1, fp);
 
1305		if (rc)
1306			goto bad;
1307	}
1308
1309	rc = hashtab_insert(h, key, cladatum);
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
1310	if (rc)
1311		goto bad;
1312
1313	return 0;
1314bad:
1315	cls_destroy(key, cladatum, NULL);
1316	return rc;
1317}
1318
1319static int role_read(struct policydb *p, struct hashtab *h, void *fp)
1320{
1321	char *key = NULL;
1322	struct role_datum *role;
1323	int rc, to_read = 2;
1324	__le32 buf[3];
1325	u32 len;
1326
1327	rc = -ENOMEM;
1328	role = kzalloc(sizeof(*role), GFP_KERNEL);
1329	if (!role)
1330		goto bad;
1331
1332	if (p->policyvers >= POLICYDB_VERSION_BOUNDARY)
1333		to_read = 3;
1334
1335	rc = next_entry(buf, fp, sizeof(buf[0]) * to_read);
1336	if (rc)
1337		goto bad;
1338
1339	len = le32_to_cpu(buf[0]);
1340	role->value = le32_to_cpu(buf[1]);
1341	if (p->policyvers >= POLICYDB_VERSION_BOUNDARY)
1342		role->bounds = le32_to_cpu(buf[2]);
1343
1344	rc = -ENOMEM;
1345	key = kmalloc(len + 1, GFP_KERNEL);
1346	if (!key)
1347		goto bad;
1348
1349	rc = next_entry(key, fp, len);
1350	if (rc)
1351		goto bad;
1352	key[len] = '\0';
1353
1354	rc = ebitmap_read(&role->dominates, fp);
1355	if (rc)
1356		goto bad;
1357
1358	rc = ebitmap_read(&role->types, fp);
1359	if (rc)
1360		goto bad;
1361
1362	if (strcmp(key, OBJECT_R) == 0) {
1363		rc = -EINVAL;
1364		if (role->value != OBJECT_R_VAL) {
1365			printk(KERN_ERR "SELinux: Role %s has wrong value %d\n",
1366			       OBJECT_R, role->value);
1367			goto bad;
1368		}
1369		rc = 0;
1370		goto bad;
1371	}
1372
1373	rc = hashtab_insert(h, key, role);
1374	if (rc)
1375		goto bad;
1376	return 0;
1377bad:
1378	role_destroy(key, role, NULL);
1379	return rc;
1380}
1381
1382static int type_read(struct policydb *p, struct hashtab *h, void *fp)
1383{
1384	char *key = NULL;
1385	struct type_datum *typdatum;
1386	int rc, to_read = 3;
1387	__le32 buf[4];
1388	u32 len;
1389
1390	rc = -ENOMEM;
1391	typdatum = kzalloc(sizeof(*typdatum), GFP_KERNEL);
1392	if (!typdatum)
1393		goto bad;
1394
1395	if (p->policyvers >= POLICYDB_VERSION_BOUNDARY)
1396		to_read = 4;
1397
1398	rc = next_entry(buf, fp, sizeof(buf[0]) * to_read);
1399	if (rc)
1400		goto bad;
1401
1402	len = le32_to_cpu(buf[0]);
1403	typdatum->value = le32_to_cpu(buf[1]);
1404	if (p->policyvers >= POLICYDB_VERSION_BOUNDARY) {
1405		u32 prop = le32_to_cpu(buf[2]);
1406
1407		if (prop & TYPEDATUM_PROPERTY_PRIMARY)
1408			typdatum->primary = 1;
1409		if (prop & TYPEDATUM_PROPERTY_ATTRIBUTE)
1410			typdatum->attribute = 1;
1411
1412		typdatum->bounds = le32_to_cpu(buf[3]);
1413	} else {
1414		typdatum->primary = le32_to_cpu(buf[2]);
1415	}
1416
1417	rc = -ENOMEM;
1418	key = kmalloc(len + 1, GFP_KERNEL);
1419	if (!key)
1420		goto bad;
1421	rc = next_entry(key, fp, len);
1422	if (rc)
1423		goto bad;
1424	key[len] = '\0';
1425
1426	rc = hashtab_insert(h, key, typdatum);
1427	if (rc)
1428		goto bad;
1429	return 0;
1430bad:
1431	type_destroy(key, typdatum, NULL);
1432	return rc;
1433}
1434
1435
1436/*
1437 * Read a MLS level structure from a policydb binary
1438 * representation file.
1439 */
1440static int mls_read_level(struct mls_level *lp, void *fp)
1441{
1442	__le32 buf[1];
1443	int rc;
1444
1445	memset(lp, 0, sizeof(*lp));
1446
1447	rc = next_entry(buf, fp, sizeof buf);
1448	if (rc) {
1449		printk(KERN_ERR "SELinux: mls: truncated level\n");
1450		return rc;
1451	}
1452	lp->sens = le32_to_cpu(buf[0]);
1453
1454	rc = ebitmap_read(&lp->cat, fp);
1455	if (rc) {
1456		printk(KERN_ERR "SELinux: mls:  error reading level categories\n");
1457		return rc;
1458	}
1459	return 0;
1460}
1461
1462static int user_read(struct policydb *p, struct hashtab *h, void *fp)
1463{
1464	char *key = NULL;
1465	struct user_datum *usrdatum;
1466	int rc, to_read = 2;
1467	__le32 buf[3];
1468	u32 len;
1469
1470	rc = -ENOMEM;
1471	usrdatum = kzalloc(sizeof(*usrdatum), GFP_KERNEL);
1472	if (!usrdatum)
1473		goto bad;
1474
1475	if (p->policyvers >= POLICYDB_VERSION_BOUNDARY)
1476		to_read = 3;
1477
1478	rc = next_entry(buf, fp, sizeof(buf[0]) * to_read);
1479	if (rc)
1480		goto bad;
1481
1482	len = le32_to_cpu(buf[0]);
1483	usrdatum->value = le32_to_cpu(buf[1]);
1484	if (p->policyvers >= POLICYDB_VERSION_BOUNDARY)
1485		usrdatum->bounds = le32_to_cpu(buf[2]);
1486
1487	rc = -ENOMEM;
1488	key = kmalloc(len + 1, GFP_KERNEL);
1489	if (!key)
1490		goto bad;
1491	rc = next_entry(key, fp, len);
1492	if (rc)
1493		goto bad;
1494	key[len] = '\0';
1495
1496	rc = ebitmap_read(&usrdatum->roles, fp);
1497	if (rc)
1498		goto bad;
1499
1500	if (p->policyvers >= POLICYDB_VERSION_MLS) {
1501		rc = mls_read_range_helper(&usrdatum->range, fp);
1502		if (rc)
1503			goto bad;
1504		rc = mls_read_level(&usrdatum->dfltlevel, fp);
1505		if (rc)
1506			goto bad;
1507	}
1508
1509	rc = hashtab_insert(h, key, usrdatum);
1510	if (rc)
1511		goto bad;
1512	return 0;
1513bad:
1514	user_destroy(key, usrdatum, NULL);
1515	return rc;
1516}
1517
1518static int sens_read(struct policydb *p, struct hashtab *h, void *fp)
1519{
1520	char *key = NULL;
1521	struct level_datum *levdatum;
1522	int rc;
1523	__le32 buf[2];
1524	u32 len;
1525
1526	rc = -ENOMEM;
1527	levdatum = kzalloc(sizeof(*levdatum), GFP_ATOMIC);
1528	if (!levdatum)
1529		goto bad;
1530
1531	rc = next_entry(buf, fp, sizeof buf);
1532	if (rc)
1533		goto bad;
1534
1535	len = le32_to_cpu(buf[0]);
1536	levdatum->isalias = le32_to_cpu(buf[1]);
1537
1538	rc = -ENOMEM;
1539	key = kmalloc(len + 1, GFP_ATOMIC);
1540	if (!key)
1541		goto bad;
1542	rc = next_entry(key, fp, len);
1543	if (rc)
1544		goto bad;
1545	key[len] = '\0';
1546
1547	rc = -ENOMEM;
1548	levdatum->level = kmalloc(sizeof(struct mls_level), GFP_ATOMIC);
1549	if (!levdatum->level)
1550		goto bad;
1551
1552	rc = mls_read_level(levdatum->level, fp);
1553	if (rc)
1554		goto bad;
1555
1556	rc = hashtab_insert(h, key, levdatum);
1557	if (rc)
1558		goto bad;
1559	return 0;
1560bad:
1561	sens_destroy(key, levdatum, NULL);
1562	return rc;
1563}
1564
1565static int cat_read(struct policydb *p, struct hashtab *h, void *fp)
1566{
1567	char *key = NULL;
1568	struct cat_datum *catdatum;
1569	int rc;
1570	__le32 buf[3];
1571	u32 len;
1572
1573	rc = -ENOMEM;
1574	catdatum = kzalloc(sizeof(*catdatum), GFP_ATOMIC);
1575	if (!catdatum)
1576		goto bad;
1577
1578	rc = next_entry(buf, fp, sizeof buf);
1579	if (rc)
1580		goto bad;
1581
1582	len = le32_to_cpu(buf[0]);
1583	catdatum->value = le32_to_cpu(buf[1]);
1584	catdatum->isalias = le32_to_cpu(buf[2]);
1585
1586	rc = -ENOMEM;
1587	key = kmalloc(len + 1, GFP_ATOMIC);
1588	if (!key)
1589		goto bad;
1590	rc = next_entry(key, fp, len);
1591	if (rc)
1592		goto bad;
1593	key[len] = '\0';
1594
1595	rc = hashtab_insert(h, key, catdatum);
1596	if (rc)
1597		goto bad;
1598	return 0;
1599bad:
1600	cat_destroy(key, catdatum, NULL);
1601	return rc;
1602}
1603
1604static int (*read_f[SYM_NUM]) (struct policydb *p, struct hashtab *h, void *fp) =
1605{
1606	common_read,
1607	class_read,
1608	role_read,
1609	type_read,
1610	user_read,
1611	cond_read_bool,
1612	sens_read,
1613	cat_read,
1614};
1615
1616static int user_bounds_sanity_check(void *key, void *datum, void *datap)
1617{
1618	struct user_datum *upper, *user;
1619	struct policydb *p = datap;
1620	int depth = 0;
1621
1622	upper = user = datum;
1623	while (upper->bounds) {
1624		struct ebitmap_node *node;
1625		unsigned long bit;
1626
1627		if (++depth == POLICYDB_BOUNDS_MAXDEPTH) {
1628			printk(KERN_ERR "SELinux: user %s: "
1629			       "too deep or looped boundary",
1630			       (char *) key);
1631			return -EINVAL;
1632		}
1633
1634		upper = p->user_val_to_struct[upper->bounds - 1];
1635		ebitmap_for_each_positive_bit(&user->roles, node, bit) {
1636			if (ebitmap_get_bit(&upper->roles, bit))
1637				continue;
1638
1639			printk(KERN_ERR
1640			       "SELinux: boundary violated policy: "
1641			       "user=%s role=%s bounds=%s\n",
1642			       sym_name(p, SYM_USERS, user->value - 1),
1643			       sym_name(p, SYM_ROLES, bit),
1644			       sym_name(p, SYM_USERS, upper->value - 1));
1645
1646			return -EINVAL;
1647		}
1648	}
1649
1650	return 0;
1651}
1652
1653static int role_bounds_sanity_check(void *key, void *datum, void *datap)
1654{
1655	struct role_datum *upper, *role;
1656	struct policydb *p = datap;
1657	int depth = 0;
1658
1659	upper = role = datum;
1660	while (upper->bounds) {
1661		struct ebitmap_node *node;
1662		unsigned long bit;
1663
1664		if (++depth == POLICYDB_BOUNDS_MAXDEPTH) {
1665			printk(KERN_ERR "SELinux: role %s: "
1666			       "too deep or looped bounds\n",
1667			       (char *) key);
1668			return -EINVAL;
1669		}
1670
1671		upper = p->role_val_to_struct[upper->bounds - 1];
1672		ebitmap_for_each_positive_bit(&role->types, node, bit) {
1673			if (ebitmap_get_bit(&upper->types, bit))
1674				continue;
1675
1676			printk(KERN_ERR
1677			       "SELinux: boundary violated policy: "
1678			       "role=%s type=%s bounds=%s\n",
1679			       sym_name(p, SYM_ROLES, role->value - 1),
1680			       sym_name(p, SYM_TYPES, bit),
1681			       sym_name(p, SYM_ROLES, upper->value - 1));
1682
1683			return -EINVAL;
1684		}
1685	}
1686
1687	return 0;
1688}
1689
1690static int type_bounds_sanity_check(void *key, void *datum, void *datap)
1691{
1692	struct type_datum *upper;
1693	struct policydb *p = datap;
1694	int depth = 0;
1695
1696	upper = datum;
1697	while (upper->bounds) {
1698		if (++depth == POLICYDB_BOUNDS_MAXDEPTH) {
1699			printk(KERN_ERR "SELinux: type %s: "
1700			       "too deep or looped boundary\n",
1701			       (char *) key);
1702			return -EINVAL;
1703		}
1704
1705		upper = flex_array_get_ptr(p->type_val_to_struct_array,
1706					   upper->bounds - 1);
1707		BUG_ON(!upper);
1708
1709		if (upper->attribute) {
1710			printk(KERN_ERR "SELinux: type %s: "
1711			       "bounded by attribute %s",
1712			       (char *) key,
1713			       sym_name(p, SYM_TYPES, upper->value - 1));
1714			return -EINVAL;
1715		}
1716	}
1717
1718	return 0;
1719}
1720
1721static int policydb_bounds_sanity_check(struct policydb *p)
1722{
1723	int rc;
1724
1725	if (p->policyvers < POLICYDB_VERSION_BOUNDARY)
1726		return 0;
1727
1728	rc = hashtab_map(p->p_users.table,
1729			 user_bounds_sanity_check, p);
1730	if (rc)
1731		return rc;
1732
1733	rc = hashtab_map(p->p_roles.table,
1734			 role_bounds_sanity_check, p);
1735	if (rc)
1736		return rc;
1737
1738	rc = hashtab_map(p->p_types.table,
1739			 type_bounds_sanity_check, p);
1740	if (rc)
1741		return rc;
1742
1743	return 0;
1744}
1745
1746extern int ss_initialized;
1747
1748u16 string_to_security_class(struct policydb *p, const char *name)
1749{
1750	struct class_datum *cladatum;
1751
1752	cladatum = hashtab_search(p->p_classes.table, name);
1753	if (!cladatum)
1754		return 0;
1755
1756	return cladatum->value;
1757}
1758
1759u32 string_to_av_perm(struct policydb *p, u16 tclass, const char *name)
1760{
1761	struct class_datum *cladatum;
1762	struct perm_datum *perdatum = NULL;
1763	struct common_datum *comdatum;
1764
1765	if (!tclass || tclass > p->p_classes.nprim)
1766		return 0;
1767
1768	cladatum = p->class_val_to_struct[tclass-1];
1769	comdatum = cladatum->comdatum;
1770	if (comdatum)
1771		perdatum = hashtab_search(comdatum->permissions.table,
1772					  name);
1773	if (!perdatum)
1774		perdatum = hashtab_search(cladatum->permissions.table,
1775					  name);
1776	if (!perdatum)
1777		return 0;
1778
1779	return 1U << (perdatum->value-1);
1780}
1781
1782static int range_read(struct policydb *p, void *fp)
1783{
1784	struct range_trans *rt = NULL;
1785	struct mls_range *r = NULL;
1786	int i, rc;
1787	__le32 buf[2];
1788	u32 nel;
1789
1790	if (p->policyvers < POLICYDB_VERSION_MLS)
1791		return 0;
1792
1793	rc = next_entry(buf, fp, sizeof(u32));
1794	if (rc)
1795		goto out;
1796
1797	nel = le32_to_cpu(buf[0]);
 
 
 
 
 
1798	for (i = 0; i < nel; i++) {
1799		rc = -ENOMEM;
1800		rt = kzalloc(sizeof(*rt), GFP_KERNEL);
1801		if (!rt)
1802			goto out;
1803
1804		rc = next_entry(buf, fp, (sizeof(u32) * 2));
1805		if (rc)
1806			goto out;
1807
1808		rt->source_type = le32_to_cpu(buf[0]);
1809		rt->target_type = le32_to_cpu(buf[1]);
1810		if (p->policyvers >= POLICYDB_VERSION_RANGETRANS) {
1811			rc = next_entry(buf, fp, sizeof(u32));
1812			if (rc)
1813				goto out;
1814			rt->target_class = le32_to_cpu(buf[0]);
1815		} else
1816			rt->target_class = p->process_class;
1817
1818		rc = -EINVAL;
1819		if (!policydb_type_isvalid(p, rt->source_type) ||
1820		    !policydb_type_isvalid(p, rt->target_type) ||
1821		    !policydb_class_isvalid(p, rt->target_class))
1822			goto out;
1823
1824		rc = -ENOMEM;
1825		r = kzalloc(sizeof(*r), GFP_KERNEL);
1826		if (!r)
1827			goto out;
1828
1829		rc = mls_read_range_helper(r, fp);
1830		if (rc)
1831			goto out;
1832
1833		rc = -EINVAL;
1834		if (!mls_range_isvalid(p, r)) {
1835			printk(KERN_WARNING "SELinux:  rangetrans:  invalid range\n");
1836			goto out;
1837		}
1838
1839		rc = hashtab_insert(p->range_tr, rt, r);
1840		if (rc)
1841			goto out;
1842
1843		rt = NULL;
1844		r = NULL;
1845	}
1846	hash_eval(p->range_tr, "rangetr");
1847	rc = 0;
1848out:
1849	kfree(rt);
1850	kfree(r);
1851	return rc;
1852}
1853
1854static int filename_trans_read(struct policydb *p, void *fp)
1855{
1856	struct filename_trans *ft;
1857	struct filename_trans_datum *otype;
1858	char *name;
1859	u32 nel, len;
1860	__le32 buf[4];
1861	int rc, i;
1862
1863	if (p->policyvers < POLICYDB_VERSION_FILENAME_TRANS)
1864		return 0;
 
 
 
1865
1866	rc = next_entry(buf, fp, sizeof(u32));
 
1867	if (rc)
1868		return rc;
1869	nel = le32_to_cpu(buf[0]);
1870
1871	for (i = 0; i < nel; i++) {
1872		ft = NULL;
1873		otype = NULL;
1874		name = NULL;
 
 
 
 
 
 
1875
 
 
 
 
 
 
 
 
 
 
 
 
 
 
1876		rc = -ENOMEM;
1877		ft = kzalloc(sizeof(*ft), GFP_KERNEL);
1878		if (!ft)
1879			goto out;
1880
1881		rc = -ENOMEM;
1882		otype = kmalloc(sizeof(*otype), GFP_KERNEL);
1883		if (!otype)
1884			goto out;
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
1885
1886		/* length of the path component string */
1887		rc = next_entry(buf, fp, sizeof(u32));
1888		if (rc)
1889			goto out;
1890		len = le32_to_cpu(buf[0]);
 
1891
 
 
1892		rc = -ENOMEM;
1893		name = kmalloc(len + 1, GFP_KERNEL);
1894		if (!name)
1895			goto out;
1896
1897		ft->name = name;
1898
1899		/* path component string */
1900		rc = next_entry(name, fp, len);
1901		if (rc)
1902			goto out;
1903		name[len] = 0;
1904
1905		rc = next_entry(buf, fp, sizeof(u32) * 4);
1906		if (rc)
1907			goto out;
1908
1909		ft->stype = le32_to_cpu(buf[0]);
1910		ft->ttype = le32_to_cpu(buf[1]);
1911		ft->tclass = le32_to_cpu(buf[2]);
 
 
 
 
 
 
 
 
 
 
 
1912
1913		otype->otype = le32_to_cpu(buf[3]);
 
 
 
 
 
1914
1915		rc = ebitmap_set_bit(&p->filename_trans_ttypes, ft->ttype, 1);
1916		if (rc)
1917			goto out;
1918
1919		hashtab_insert(p->filename_trans, ft, otype);
1920	}
1921	hash_eval(p->filename_trans, "filenametr");
1922	return 0;
1923out:
1924	kfree(ft);
1925	kfree(name);
1926	kfree(otype);
 
 
1927
 
 
 
1928	return rc;
1929}
1930
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
1931static int genfs_read(struct policydb *p, void *fp)
1932{
1933	int i, j, rc;
1934	u32 nel, nel2, len, len2;
1935	__le32 buf[1];
1936	struct ocontext *l, *c;
1937	struct ocontext *newc = NULL;
1938	struct genfs *genfs_p, *genfs;
1939	struct genfs *newgenfs = NULL;
1940
1941	rc = next_entry(buf, fp, sizeof(u32));
1942	if (rc)
1943		goto out;
1944	nel = le32_to_cpu(buf[0]);
1945
1946	for (i = 0; i < nel; i++) {
1947		rc = next_entry(buf, fp, sizeof(u32));
1948		if (rc)
1949			goto out;
1950		len = le32_to_cpu(buf[0]);
1951
1952		rc = -ENOMEM;
1953		newgenfs = kzalloc(sizeof(*newgenfs), GFP_KERNEL);
1954		if (!newgenfs)
1955			goto out;
1956
1957		rc = -ENOMEM;
1958		newgenfs->fstype = kmalloc(len + 1, GFP_KERNEL);
1959		if (!newgenfs->fstype)
1960			goto out;
1961
1962		rc = next_entry(newgenfs->fstype, fp, len);
1963		if (rc)
1964			goto out;
1965
1966		newgenfs->fstype[len] = 0;
1967
1968		for (genfs_p = NULL, genfs = p->genfs; genfs;
1969		     genfs_p = genfs, genfs = genfs->next) {
1970			rc = -EINVAL;
1971			if (strcmp(newgenfs->fstype, genfs->fstype) == 0) {
1972				printk(KERN_ERR "SELinux:  dup genfs fstype %s\n",
1973				       newgenfs->fstype);
1974				goto out;
1975			}
1976			if (strcmp(newgenfs->fstype, genfs->fstype) < 0)
1977				break;
1978		}
1979		newgenfs->next = genfs;
1980		if (genfs_p)
1981			genfs_p->next = newgenfs;
1982		else
1983			p->genfs = newgenfs;
1984		genfs = newgenfs;
1985		newgenfs = NULL;
1986
1987		rc = next_entry(buf, fp, sizeof(u32));
1988		if (rc)
1989			goto out;
1990
1991		nel2 = le32_to_cpu(buf[0]);
1992		for (j = 0; j < nel2; j++) {
1993			rc = next_entry(buf, fp, sizeof(u32));
1994			if (rc)
1995				goto out;
1996			len = le32_to_cpu(buf[0]);
1997
1998			rc = -ENOMEM;
1999			newc = kzalloc(sizeof(*newc), GFP_KERNEL);
2000			if (!newc)
2001				goto out;
2002
2003			rc = -ENOMEM;
2004			newc->u.name = kmalloc(len + 1, GFP_KERNEL);
2005			if (!newc->u.name)
2006				goto out;
2007
2008			rc = next_entry(newc->u.name, fp, len);
2009			if (rc)
2010				goto out;
2011			newc->u.name[len] = 0;
2012
2013			rc = next_entry(buf, fp, sizeof(u32));
2014			if (rc)
2015				goto out;
2016
2017			newc->v.sclass = le32_to_cpu(buf[0]);
2018			rc = context_read_and_validate(&newc->context[0], p, fp);
2019			if (rc)
2020				goto out;
2021
2022			for (l = NULL, c = genfs->head; c;
2023			     l = c, c = c->next) {
2024				rc = -EINVAL;
2025				if (!strcmp(newc->u.name, c->u.name) &&
2026				    (!c->v.sclass || !newc->v.sclass ||
2027				     newc->v.sclass == c->v.sclass)) {
2028					printk(KERN_ERR "SELinux:  dup genfs entry (%s,%s)\n",
2029					       genfs->fstype, c->u.name);
2030					goto out;
2031				}
2032				len = strlen(newc->u.name);
2033				len2 = strlen(c->u.name);
2034				if (len > len2)
2035					break;
2036			}
2037
2038			newc->next = c;
2039			if (l)
2040				l->next = newc;
2041			else
2042				genfs->head = newc;
2043			newc = NULL;
2044		}
2045	}
2046	rc = 0;
2047out:
2048	if (newgenfs)
2049		kfree(newgenfs->fstype);
2050	kfree(newgenfs);
 
2051	ocontext_destroy(newc, OCON_FSUSE);
2052
2053	return rc;
2054}
2055
2056static int ocontext_read(struct policydb *p, struct policydb_compat_info *info,
2057			 void *fp)
2058{
2059	int i, j, rc;
2060	u32 nel, len;
 
2061	__le32 buf[3];
2062	struct ocontext *l, *c;
2063	u32 nodebuf[8];
2064
2065	for (i = 0; i < info->ocon_num; i++) {
2066		rc = next_entry(buf, fp, sizeof(u32));
2067		if (rc)
2068			goto out;
2069		nel = le32_to_cpu(buf[0]);
2070
2071		l = NULL;
2072		for (j = 0; j < nel; j++) {
2073			rc = -ENOMEM;
2074			c = kzalloc(sizeof(*c), GFP_KERNEL);
2075			if (!c)
2076				goto out;
2077			if (l)
2078				l->next = c;
2079			else
2080				p->ocontexts[i] = c;
2081			l = c;
2082
2083			switch (i) {
2084			case OCON_ISID:
2085				rc = next_entry(buf, fp, sizeof(u32));
2086				if (rc)
2087					goto out;
2088
2089				c->sid[0] = le32_to_cpu(buf[0]);
2090				rc = context_read_and_validate(&c->context[0], p, fp);
2091				if (rc)
2092					goto out;
2093				break;
2094			case OCON_FS:
2095			case OCON_NETIF:
2096				rc = next_entry(buf, fp, sizeof(u32));
2097				if (rc)
2098					goto out;
2099				len = le32_to_cpu(buf[0]);
2100
2101				rc = -ENOMEM;
2102				c->u.name = kmalloc(len + 1, GFP_KERNEL);
2103				if (!c->u.name)
2104					goto out;
2105
2106				rc = next_entry(c->u.name, fp, len);
2107				if (rc)
2108					goto out;
2109
2110				c->u.name[len] = 0;
2111				rc = context_read_and_validate(&c->context[0], p, fp);
2112				if (rc)
2113					goto out;
2114				rc = context_read_and_validate(&c->context[1], p, fp);
2115				if (rc)
2116					goto out;
2117				break;
2118			case OCON_PORT:
2119				rc = next_entry(buf, fp, sizeof(u32)*3);
2120				if (rc)
2121					goto out;
2122				c->u.port.protocol = le32_to_cpu(buf[0]);
2123				c->u.port.low_port = le32_to_cpu(buf[1]);
2124				c->u.port.high_port = le32_to_cpu(buf[2]);
2125				rc = context_read_and_validate(&c->context[0], p, fp);
2126				if (rc)
2127					goto out;
2128				break;
2129			case OCON_NODE:
2130				rc = next_entry(nodebuf, fp, sizeof(u32) * 2);
2131				if (rc)
2132					goto out;
2133				c->u.node.addr = nodebuf[0]; /* network order */
2134				c->u.node.mask = nodebuf[1]; /* network order */
2135				rc = context_read_and_validate(&c->context[0], p, fp);
2136				if (rc)
2137					goto out;
2138				break;
2139			case OCON_FSUSE:
2140				rc = next_entry(buf, fp, sizeof(u32)*2);
2141				if (rc)
2142					goto out;
2143
2144				rc = -EINVAL;
2145				c->v.behavior = le32_to_cpu(buf[0]);
2146				if (c->v.behavior > SECURITY_FS_USE_NONE)
 
 
 
2147					goto out;
2148
2149				rc = -ENOMEM;
2150				len = le32_to_cpu(buf[1]);
2151				c->u.name = kmalloc(len + 1, GFP_KERNEL);
2152				if (!c->u.name)
2153					goto out;
2154
2155				rc = next_entry(c->u.name, fp, len);
2156				if (rc)
2157					goto out;
2158				c->u.name[len] = 0;
2159				rc = context_read_and_validate(&c->context[0], p, fp);
2160				if (rc)
2161					goto out;
2162				break;
2163			case OCON_NODE6: {
2164				int k;
2165
2166				rc = next_entry(nodebuf, fp, sizeof(u32) * 8);
2167				if (rc)
2168					goto out;
2169				for (k = 0; k < 4; k++)
2170					c->u.node6.addr[k] = nodebuf[k];
2171				for (k = 0; k < 4; k++)
2172					c->u.node6.mask[k] = nodebuf[k+4];
2173				rc = context_read_and_validate(&c->context[0], p, fp);
2174				if (rc)
2175					goto out;
2176				break;
2177			}
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
2178			}
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
2179		}
2180	}
2181	rc = 0;
2182out:
2183	return rc;
2184}
2185
2186/*
2187 * Read the configuration data from a policy database binary
2188 * representation file into a policy database structure.
2189 */
2190int policydb_read(struct policydb *p, void *fp)
2191{
2192	struct role_allow *ra, *lra;
2193	struct role_trans *tr, *ltr;
 
2194	int i, j, rc;
2195	__le32 buf[4];
2196	u32 len, nprim, nel;
2197
2198	char *policydb_str;
2199	struct policydb_compat_info *info;
2200
2201	rc = policydb_init(p);
2202	if (rc)
2203		return rc;
2204
2205	/* Read the magic number and string length. */
2206	rc = next_entry(buf, fp, sizeof(u32) * 2);
2207	if (rc)
2208		goto bad;
2209
2210	rc = -EINVAL;
2211	if (le32_to_cpu(buf[0]) != POLICYDB_MAGIC) {
2212		printk(KERN_ERR "SELinux:  policydb magic number 0x%x does "
2213		       "not match expected magic number 0x%x\n",
2214		       le32_to_cpu(buf[0]), POLICYDB_MAGIC);
2215		goto bad;
2216	}
2217
2218	rc = -EINVAL;
2219	len = le32_to_cpu(buf[1]);
2220	if (len != strlen(POLICYDB_STRING)) {
2221		printk(KERN_ERR "SELinux:  policydb string length %d does not "
2222		       "match expected length %Zu\n",
2223		       len, strlen(POLICYDB_STRING));
2224		goto bad;
2225	}
2226
2227	rc = -ENOMEM;
2228	policydb_str = kmalloc(len + 1, GFP_KERNEL);
2229	if (!policydb_str) {
2230		printk(KERN_ERR "SELinux:  unable to allocate memory for policydb "
2231		       "string of length %d\n", len);
2232		goto bad;
2233	}
2234
2235	rc = next_entry(policydb_str, fp, len);
2236	if (rc) {
2237		printk(KERN_ERR "SELinux:  truncated policydb string identifier\n");
2238		kfree(policydb_str);
2239		goto bad;
2240	}
2241
2242	rc = -EINVAL;
2243	policydb_str[len] = '\0';
2244	if (strcmp(policydb_str, POLICYDB_STRING)) {
2245		printk(KERN_ERR "SELinux:  policydb string %s does not match "
2246		       "my string %s\n", policydb_str, POLICYDB_STRING);
2247		kfree(policydb_str);
2248		goto bad;
2249	}
2250	/* Done with policydb_str. */
2251	kfree(policydb_str);
2252	policydb_str = NULL;
2253
2254	/* Read the version and table sizes. */
2255	rc = next_entry(buf, fp, sizeof(u32)*4);
2256	if (rc)
2257		goto bad;
2258
2259	rc = -EINVAL;
2260	p->policyvers = le32_to_cpu(buf[0]);
2261	if (p->policyvers < POLICYDB_VERSION_MIN ||
2262	    p->policyvers > POLICYDB_VERSION_MAX) {
2263		printk(KERN_ERR "SELinux:  policydb version %d does not match "
2264		       "my version range %d-%d\n",
2265		       le32_to_cpu(buf[0]), POLICYDB_VERSION_MIN, POLICYDB_VERSION_MAX);
2266		goto bad;
2267	}
2268
2269	if ((le32_to_cpu(buf[1]) & POLICYDB_CONFIG_MLS)) {
2270		p->mls_enabled = 1;
2271
2272		rc = -EINVAL;
2273		if (p->policyvers < POLICYDB_VERSION_MLS) {
2274			printk(KERN_ERR "SELinux: security policydb version %d "
2275				"(MLS) not backwards compatible\n",
2276				p->policyvers);
2277			goto bad;
2278		}
2279	}
2280	p->reject_unknown = !!(le32_to_cpu(buf[1]) & REJECT_UNKNOWN);
2281	p->allow_unknown = !!(le32_to_cpu(buf[1]) & ALLOW_UNKNOWN);
2282
2283	if (p->policyvers >= POLICYDB_VERSION_POLCAP) {
2284		rc = ebitmap_read(&p->policycaps, fp);
2285		if (rc)
2286			goto bad;
2287	}
2288
2289	if (p->policyvers >= POLICYDB_VERSION_PERMISSIVE) {
2290		rc = ebitmap_read(&p->permissive_map, fp);
2291		if (rc)
2292			goto bad;
2293	}
2294
2295	rc = -EINVAL;
2296	info = policydb_lookup_compat(p->policyvers);
2297	if (!info) {
2298		printk(KERN_ERR "SELinux:  unable to find policy compat info "
2299		       "for version %d\n", p->policyvers);
2300		goto bad;
2301	}
2302
2303	rc = -EINVAL;
2304	if (le32_to_cpu(buf[2]) != info->sym_num ||
2305		le32_to_cpu(buf[3]) != info->ocon_num) {
2306		printk(KERN_ERR "SELinux:  policydb table sizes (%d,%d) do "
2307		       "not match mine (%d,%d)\n", le32_to_cpu(buf[2]),
2308			le32_to_cpu(buf[3]),
2309		       info->sym_num, info->ocon_num);
2310		goto bad;
2311	}
2312
2313	for (i = 0; i < info->sym_num; i++) {
2314		rc = next_entry(buf, fp, sizeof(u32)*2);
2315		if (rc)
2316			goto bad;
2317		nprim = le32_to_cpu(buf[0]);
2318		nel = le32_to_cpu(buf[1]);
 
 
 
 
 
 
 
 
 
 
 
2319		for (j = 0; j < nel; j++) {
2320			rc = read_f[i](p, p->symtab[i].table, fp);
2321			if (rc)
2322				goto bad;
2323		}
2324
2325		p->symtab[i].nprim = nprim;
2326	}
2327
2328	rc = -EINVAL;
2329	p->process_class = string_to_security_class(p, "process");
2330	if (!p->process_class)
 
2331		goto bad;
 
2332
2333	rc = avtab_read(&p->te_avtab, fp, p);
2334	if (rc)
2335		goto bad;
2336
2337	if (p->policyvers >= POLICYDB_VERSION_BOOL) {
2338		rc = cond_read_list(p, fp);
2339		if (rc)
2340			goto bad;
2341	}
2342
2343	rc = next_entry(buf, fp, sizeof(u32));
2344	if (rc)
2345		goto bad;
2346	nel = le32_to_cpu(buf[0]);
2347	ltr = NULL;
 
 
 
2348	for (i = 0; i < nel; i++) {
2349		rc = -ENOMEM;
2350		tr = kzalloc(sizeof(*tr), GFP_KERNEL);
2351		if (!tr)
 
 
 
 
 
2352			goto bad;
2353		if (ltr)
2354			ltr->next = tr;
2355		else
2356			p->role_tr = tr;
2357		rc = next_entry(buf, fp, sizeof(u32)*3);
2358		if (rc)
2359			goto bad;
2360
2361		rc = -EINVAL;
2362		tr->role = le32_to_cpu(buf[0]);
2363		tr->type = le32_to_cpu(buf[1]);
2364		tr->new_role = le32_to_cpu(buf[2]);
2365		if (p->policyvers >= POLICYDB_VERSION_ROLETRANS) {
2366			rc = next_entry(buf, fp, sizeof(u32));
2367			if (rc)
2368				goto bad;
2369			tr->tclass = le32_to_cpu(buf[0]);
2370		} else
2371			tr->tclass = p->process_class;
2372
2373		if (!policydb_role_isvalid(p, tr->role) ||
2374		    !policydb_type_isvalid(p, tr->type) ||
2375		    !policydb_class_isvalid(p, tr->tclass) ||
2376		    !policydb_role_isvalid(p, tr->new_role))
 
 
 
 
 
2377			goto bad;
2378		ltr = tr;
 
 
2379	}
2380
2381	rc = next_entry(buf, fp, sizeof(u32));
2382	if (rc)
2383		goto bad;
2384	nel = le32_to_cpu(buf[0]);
2385	lra = NULL;
2386	for (i = 0; i < nel; i++) {
2387		rc = -ENOMEM;
2388		ra = kzalloc(sizeof(*ra), GFP_KERNEL);
2389		if (!ra)
2390			goto bad;
2391		if (lra)
2392			lra->next = ra;
2393		else
2394			p->role_allow = ra;
2395		rc = next_entry(buf, fp, sizeof(u32)*2);
2396		if (rc)
2397			goto bad;
2398
2399		rc = -EINVAL;
2400		ra->role = le32_to_cpu(buf[0]);
2401		ra->new_role = le32_to_cpu(buf[1]);
2402		if (!policydb_role_isvalid(p, ra->role) ||
2403		    !policydb_role_isvalid(p, ra->new_role))
2404			goto bad;
2405		lra = ra;
2406	}
2407
2408	rc = filename_trans_read(p, fp);
2409	if (rc)
2410		goto bad;
2411
2412	rc = policydb_index(p);
2413	if (rc)
2414		goto bad;
2415
2416	rc = -EINVAL;
2417	p->process_trans_perms = string_to_av_perm(p, p->process_class, "transition");
2418	p->process_trans_perms |= string_to_av_perm(p, p->process_class, "dyntransition");
2419	if (!p->process_trans_perms)
 
 
 
 
 
 
2420		goto bad;
 
 
2421
2422	rc = ocontext_read(p, info, fp);
2423	if (rc)
2424		goto bad;
2425
2426	rc = genfs_read(p, fp);
2427	if (rc)
2428		goto bad;
2429
2430	rc = range_read(p, fp);
2431	if (rc)
2432		goto bad;
2433
2434	rc = -ENOMEM;
2435	p->type_attr_map_array = flex_array_alloc(sizeof(struct ebitmap),
2436						  p->p_types.nprim,
2437						  GFP_KERNEL | __GFP_ZERO);
2438	if (!p->type_attr_map_array)
2439		goto bad;
2440
2441	/* preallocate so we don't have to worry about the put ever failing */
2442	rc = flex_array_prealloc(p->type_attr_map_array, 0, p->p_types.nprim,
2443				 GFP_KERNEL | __GFP_ZERO);
2444	if (rc)
2445		goto bad;
2446
2447	for (i = 0; i < p->p_types.nprim; i++) {
2448		struct ebitmap *e = flex_array_get(p->type_attr_map_array, i);
2449
2450		BUG_ON(!e);
2451		ebitmap_init(e);
2452		if (p->policyvers >= POLICYDB_VERSION_AVTAB) {
2453			rc = ebitmap_read(e, fp);
2454			if (rc)
2455				goto bad;
2456		}
2457		/* add the type itself as the degenerate case */
2458		rc = ebitmap_set_bit(e, i, 1);
2459		if (rc)
2460			goto bad;
2461	}
2462
2463	rc = policydb_bounds_sanity_check(p);
2464	if (rc)
2465		goto bad;
2466
2467	rc = 0;
2468out:
2469	return rc;
2470bad:
 
 
2471	policydb_destroy(p);
2472	goto out;
2473}
2474
2475/*
2476 * Write a MLS level structure to a policydb binary
2477 * representation file.
2478 */
2479static int mls_write_level(struct mls_level *l, void *fp)
2480{
2481	__le32 buf[1];
2482	int rc;
2483
2484	buf[0] = cpu_to_le32(l->sens);
2485	rc = put_entry(buf, sizeof(u32), 1, fp);
2486	if (rc)
2487		return rc;
2488
2489	rc = ebitmap_write(&l->cat, fp);
2490	if (rc)
2491		return rc;
2492
2493	return 0;
2494}
2495
2496/*
2497 * Write a MLS range structure to a policydb binary
2498 * representation file.
2499 */
2500static int mls_write_range_helper(struct mls_range *r, void *fp)
2501{
2502	__le32 buf[3];
2503	size_t items;
2504	int rc, eq;
2505
2506	eq = mls_level_eq(&r->level[1], &r->level[0]);
2507
2508	if (eq)
2509		items = 2;
2510	else
2511		items = 3;
2512	buf[0] = cpu_to_le32(items-1);
2513	buf[1] = cpu_to_le32(r->level[0].sens);
2514	if (!eq)
2515		buf[2] = cpu_to_le32(r->level[1].sens);
2516
2517	BUG_ON(items > (sizeof(buf)/sizeof(buf[0])));
2518
2519	rc = put_entry(buf, sizeof(u32), items, fp);
2520	if (rc)
2521		return rc;
2522
2523	rc = ebitmap_write(&r->level[0].cat, fp);
2524	if (rc)
2525		return rc;
2526	if (!eq) {
2527		rc = ebitmap_write(&r->level[1].cat, fp);
2528		if (rc)
2529			return rc;
2530	}
2531
2532	return 0;
2533}
2534
2535static int sens_write(void *vkey, void *datum, void *ptr)
2536{
2537	char *key = vkey;
2538	struct level_datum *levdatum = datum;
2539	struct policy_data *pd = ptr;
2540	void *fp = pd->fp;
2541	__le32 buf[2];
2542	size_t len;
2543	int rc;
2544
2545	len = strlen(key);
2546	buf[0] = cpu_to_le32(len);
2547	buf[1] = cpu_to_le32(levdatum->isalias);
2548	rc = put_entry(buf, sizeof(u32), 2, fp);
2549	if (rc)
2550		return rc;
2551
2552	rc = put_entry(key, 1, len, fp);
2553	if (rc)
2554		return rc;
2555
2556	rc = mls_write_level(levdatum->level, fp);
2557	if (rc)
2558		return rc;
2559
2560	return 0;
2561}
2562
2563static int cat_write(void *vkey, void *datum, void *ptr)
2564{
2565	char *key = vkey;
2566	struct cat_datum *catdatum = datum;
2567	struct policy_data *pd = ptr;
2568	void *fp = pd->fp;
2569	__le32 buf[3];
2570	size_t len;
2571	int rc;
2572
2573	len = strlen(key);
2574	buf[0] = cpu_to_le32(len);
2575	buf[1] = cpu_to_le32(catdatum->value);
2576	buf[2] = cpu_to_le32(catdatum->isalias);
2577	rc = put_entry(buf, sizeof(u32), 3, fp);
2578	if (rc)
2579		return rc;
2580
2581	rc = put_entry(key, 1, len, fp);
2582	if (rc)
2583		return rc;
2584
2585	return 0;
2586}
2587
2588static int role_trans_write(struct policydb *p, void *fp)
2589{
2590	struct role_trans *r = p->role_tr;
2591	struct role_trans *tr;
2592	u32 buf[3];
2593	size_t nel;
 
 
2594	int rc;
2595
2596	nel = 0;
2597	for (tr = r; tr; tr = tr->next)
2598		nel++;
2599	buf[0] = cpu_to_le32(nel);
2600	rc = put_entry(buf, sizeof(u32), 1, fp);
2601	if (rc)
2602		return rc;
2603	for (tr = r; tr; tr = tr->next) {
2604		buf[0] = cpu_to_le32(tr->role);
2605		buf[1] = cpu_to_le32(tr->type);
2606		buf[2] = cpu_to_le32(tr->new_role);
2607		rc = put_entry(buf, sizeof(u32), 3, fp);
2608		if (rc)
2609			return rc;
2610		if (p->policyvers >= POLICYDB_VERSION_ROLETRANS) {
2611			buf[0] = cpu_to_le32(tr->tclass);
2612			rc = put_entry(buf, sizeof(u32), 1, fp);
2613			if (rc)
2614				return rc;
2615		}
2616	}
 
 
 
 
 
 
 
 
 
 
 
 
 
2617
2618	return 0;
2619}
2620
2621static int role_allow_write(struct role_allow *r, void *fp)
2622{
2623	struct role_allow *ra;
2624	u32 buf[2];
2625	size_t nel;
2626	int rc;
2627
2628	nel = 0;
2629	for (ra = r; ra; ra = ra->next)
2630		nel++;
2631	buf[0] = cpu_to_le32(nel);
2632	rc = put_entry(buf, sizeof(u32), 1, fp);
2633	if (rc)
2634		return rc;
2635	for (ra = r; ra; ra = ra->next) {
2636		buf[0] = cpu_to_le32(ra->role);
2637		buf[1] = cpu_to_le32(ra->new_role);
2638		rc = put_entry(buf, sizeof(u32), 2, fp);
2639		if (rc)
2640			return rc;
2641	}
2642	return 0;
2643}
2644
2645/*
2646 * Write a security context structure
2647 * to a policydb binary representation file.
2648 */
2649static int context_write(struct policydb *p, struct context *c,
2650			 void *fp)
2651{
2652	int rc;
2653	__le32 buf[3];
2654
2655	buf[0] = cpu_to_le32(c->user);
2656	buf[1] = cpu_to_le32(c->role);
2657	buf[2] = cpu_to_le32(c->type);
2658
2659	rc = put_entry(buf, sizeof(u32), 3, fp);
2660	if (rc)
2661		return rc;
2662
2663	rc = mls_write_range_helper(&c->range, fp);
2664	if (rc)
2665		return rc;
2666
2667	return 0;
2668}
2669
2670/*
2671 * The following *_write functions are used to
2672 * write the symbol data to a policy database
2673 * binary representation file.
2674 */
2675
2676static int perm_write(void *vkey, void *datum, void *fp)
2677{
2678	char *key = vkey;
2679	struct perm_datum *perdatum = datum;
2680	__le32 buf[2];
2681	size_t len;
2682	int rc;
2683
2684	len = strlen(key);
2685	buf[0] = cpu_to_le32(len);
2686	buf[1] = cpu_to_le32(perdatum->value);
2687	rc = put_entry(buf, sizeof(u32), 2, fp);
2688	if (rc)
2689		return rc;
2690
2691	rc = put_entry(key, 1, len, fp);
2692	if (rc)
2693		return rc;
2694
2695	return 0;
2696}
2697
2698static int common_write(void *vkey, void *datum, void *ptr)
2699{
2700	char *key = vkey;
2701	struct common_datum *comdatum = datum;
2702	struct policy_data *pd = ptr;
2703	void *fp = pd->fp;
2704	__le32 buf[4];
2705	size_t len;
2706	int rc;
2707
2708	len = strlen(key);
2709	buf[0] = cpu_to_le32(len);
2710	buf[1] = cpu_to_le32(comdatum->value);
2711	buf[2] = cpu_to_le32(comdatum->permissions.nprim);
2712	buf[3] = cpu_to_le32(comdatum->permissions.table->nel);
2713	rc = put_entry(buf, sizeof(u32), 4, fp);
2714	if (rc)
2715		return rc;
2716
2717	rc = put_entry(key, 1, len, fp);
2718	if (rc)
2719		return rc;
2720
2721	rc = hashtab_map(comdatum->permissions.table, perm_write, fp);
2722	if (rc)
2723		return rc;
2724
2725	return 0;
2726}
2727
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
2728static int write_cons_helper(struct policydb *p, struct constraint_node *node,
2729			     void *fp)
2730{
2731	struct constraint_node *c;
2732	struct constraint_expr *e;
2733	__le32 buf[3];
2734	u32 nel;
2735	int rc;
2736
2737	for (c = node; c; c = c->next) {
2738		nel = 0;
2739		for (e = c->expr; e; e = e->next)
2740			nel++;
2741		buf[0] = cpu_to_le32(c->permissions);
2742		buf[1] = cpu_to_le32(nel);
2743		rc = put_entry(buf, sizeof(u32), 2, fp);
2744		if (rc)
2745			return rc;
2746		for (e = c->expr; e; e = e->next) {
2747			buf[0] = cpu_to_le32(e->expr_type);
2748			buf[1] = cpu_to_le32(e->attr);
2749			buf[2] = cpu_to_le32(e->op);
2750			rc = put_entry(buf, sizeof(u32), 3, fp);
2751			if (rc)
2752				return rc;
2753
2754			switch (e->expr_type) {
2755			case CEXPR_NAMES:
2756				rc = ebitmap_write(&e->names, fp);
2757				if (rc)
2758					return rc;
 
 
 
 
 
 
2759				break;
2760			default:
2761				break;
2762			}
2763		}
2764	}
2765
2766	return 0;
2767}
2768
2769static int class_write(void *vkey, void *datum, void *ptr)
2770{
2771	char *key = vkey;
2772	struct class_datum *cladatum = datum;
2773	struct policy_data *pd = ptr;
2774	void *fp = pd->fp;
2775	struct policydb *p = pd->p;
2776	struct constraint_node *c;
2777	__le32 buf[6];
2778	u32 ncons;
2779	size_t len, len2;
2780	int rc;
2781
2782	len = strlen(key);
2783	if (cladatum->comkey)
2784		len2 = strlen(cladatum->comkey);
2785	else
2786		len2 = 0;
2787
2788	ncons = 0;
2789	for (c = cladatum->constraints; c; c = c->next)
2790		ncons++;
2791
2792	buf[0] = cpu_to_le32(len);
2793	buf[1] = cpu_to_le32(len2);
2794	buf[2] = cpu_to_le32(cladatum->value);
2795	buf[3] = cpu_to_le32(cladatum->permissions.nprim);
2796	if (cladatum->permissions.table)
2797		buf[4] = cpu_to_le32(cladatum->permissions.table->nel);
2798	else
2799		buf[4] = 0;
2800	buf[5] = cpu_to_le32(ncons);
2801	rc = put_entry(buf, sizeof(u32), 6, fp);
2802	if (rc)
2803		return rc;
2804
2805	rc = put_entry(key, 1, len, fp);
2806	if (rc)
2807		return rc;
2808
2809	if (cladatum->comkey) {
2810		rc = put_entry(cladatum->comkey, 1, len2, fp);
2811		if (rc)
2812			return rc;
2813	}
2814
2815	rc = hashtab_map(cladatum->permissions.table, perm_write, fp);
2816	if (rc)
2817		return rc;
2818
2819	rc = write_cons_helper(p, cladatum->constraints, fp);
2820	if (rc)
2821		return rc;
2822
2823	/* write out the validatetrans rule */
2824	ncons = 0;
2825	for (c = cladatum->validatetrans; c; c = c->next)
2826		ncons++;
2827
2828	buf[0] = cpu_to_le32(ncons);
2829	rc = put_entry(buf, sizeof(u32), 1, fp);
2830	if (rc)
2831		return rc;
2832
2833	rc = write_cons_helper(p, cladatum->validatetrans, fp);
2834	if (rc)
2835		return rc;
2836
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
2837	return 0;
2838}
2839
2840static int role_write(void *vkey, void *datum, void *ptr)
2841{
2842	char *key = vkey;
2843	struct role_datum *role = datum;
2844	struct policy_data *pd = ptr;
2845	void *fp = pd->fp;
2846	struct policydb *p = pd->p;
2847	__le32 buf[3];
2848	size_t items, len;
2849	int rc;
2850
2851	len = strlen(key);
2852	items = 0;
2853	buf[items++] = cpu_to_le32(len);
2854	buf[items++] = cpu_to_le32(role->value);
2855	if (p->policyvers >= POLICYDB_VERSION_BOUNDARY)
2856		buf[items++] = cpu_to_le32(role->bounds);
2857
2858	BUG_ON(items > (sizeof(buf)/sizeof(buf[0])));
2859
2860	rc = put_entry(buf, sizeof(u32), items, fp);
2861	if (rc)
2862		return rc;
2863
2864	rc = put_entry(key, 1, len, fp);
2865	if (rc)
2866		return rc;
2867
2868	rc = ebitmap_write(&role->dominates, fp);
2869	if (rc)
2870		return rc;
2871
2872	rc = ebitmap_write(&role->types, fp);
2873	if (rc)
2874		return rc;
2875
2876	return 0;
2877}
2878
2879static int type_write(void *vkey, void *datum, void *ptr)
2880{
2881	char *key = vkey;
2882	struct type_datum *typdatum = datum;
2883	struct policy_data *pd = ptr;
2884	struct policydb *p = pd->p;
2885	void *fp = pd->fp;
2886	__le32 buf[4];
2887	int rc;
2888	size_t items, len;
2889
2890	len = strlen(key);
2891	items = 0;
2892	buf[items++] = cpu_to_le32(len);
2893	buf[items++] = cpu_to_le32(typdatum->value);
2894	if (p->policyvers >= POLICYDB_VERSION_BOUNDARY) {
2895		u32 properties = 0;
2896
2897		if (typdatum->primary)
2898			properties |= TYPEDATUM_PROPERTY_PRIMARY;
2899
2900		if (typdatum->attribute)
2901			properties |= TYPEDATUM_PROPERTY_ATTRIBUTE;
2902
2903		buf[items++] = cpu_to_le32(properties);
2904		buf[items++] = cpu_to_le32(typdatum->bounds);
2905	} else {
2906		buf[items++] = cpu_to_le32(typdatum->primary);
2907	}
2908	BUG_ON(items > (sizeof(buf) / sizeof(buf[0])));
2909	rc = put_entry(buf, sizeof(u32), items, fp);
2910	if (rc)
2911		return rc;
2912
2913	rc = put_entry(key, 1, len, fp);
2914	if (rc)
2915		return rc;
2916
2917	return 0;
2918}
2919
2920static int user_write(void *vkey, void *datum, void *ptr)
2921{
2922	char *key = vkey;
2923	struct user_datum *usrdatum = datum;
2924	struct policy_data *pd = ptr;
2925	struct policydb *p = pd->p;
2926	void *fp = pd->fp;
2927	__le32 buf[3];
2928	size_t items, len;
2929	int rc;
2930
2931	len = strlen(key);
2932	items = 0;
2933	buf[items++] = cpu_to_le32(len);
2934	buf[items++] = cpu_to_le32(usrdatum->value);
2935	if (p->policyvers >= POLICYDB_VERSION_BOUNDARY)
2936		buf[items++] = cpu_to_le32(usrdatum->bounds);
2937	BUG_ON(items > (sizeof(buf) / sizeof(buf[0])));
2938	rc = put_entry(buf, sizeof(u32), items, fp);
2939	if (rc)
2940		return rc;
2941
2942	rc = put_entry(key, 1, len, fp);
2943	if (rc)
2944		return rc;
2945
2946	rc = ebitmap_write(&usrdatum->roles, fp);
2947	if (rc)
2948		return rc;
2949
2950	rc = mls_write_range_helper(&usrdatum->range, fp);
2951	if (rc)
2952		return rc;
2953
2954	rc = mls_write_level(&usrdatum->dfltlevel, fp);
2955	if (rc)
2956		return rc;
2957
2958	return 0;
2959}
2960
2961static int (*write_f[SYM_NUM]) (void *key, void *datum,
2962				void *datap) =
2963{
2964	common_write,
2965	class_write,
2966	role_write,
2967	type_write,
2968	user_write,
2969	cond_write_bool,
2970	sens_write,
2971	cat_write,
2972};
2973
2974static int ocontext_write(struct policydb *p, struct policydb_compat_info *info,
2975			  void *fp)
2976{
2977	unsigned int i, j, rc;
2978	size_t nel, len;
 
2979	__le32 buf[3];
2980	u32 nodebuf[8];
2981	struct ocontext *c;
2982	for (i = 0; i < info->ocon_num; i++) {
2983		nel = 0;
2984		for (c = p->ocontexts[i]; c; c = c->next)
2985			nel++;
2986		buf[0] = cpu_to_le32(nel);
2987		rc = put_entry(buf, sizeof(u32), 1, fp);
2988		if (rc)
2989			return rc;
2990		for (c = p->ocontexts[i]; c; c = c->next) {
2991			switch (i) {
2992			case OCON_ISID:
2993				buf[0] = cpu_to_le32(c->sid[0]);
2994				rc = put_entry(buf, sizeof(u32), 1, fp);
2995				if (rc)
2996					return rc;
2997				rc = context_write(p, &c->context[0], fp);
2998				if (rc)
2999					return rc;
3000				break;
3001			case OCON_FS:
3002			case OCON_NETIF:
3003				len = strlen(c->u.name);
3004				buf[0] = cpu_to_le32(len);
3005				rc = put_entry(buf, sizeof(u32), 1, fp);
3006				if (rc)
3007					return rc;
3008				rc = put_entry(c->u.name, 1, len, fp);
3009				if (rc)
3010					return rc;
3011				rc = context_write(p, &c->context[0], fp);
3012				if (rc)
3013					return rc;
3014				rc = context_write(p, &c->context[1], fp);
3015				if (rc)
3016					return rc;
3017				break;
3018			case OCON_PORT:
3019				buf[0] = cpu_to_le32(c->u.port.protocol);
3020				buf[1] = cpu_to_le32(c->u.port.low_port);
3021				buf[2] = cpu_to_le32(c->u.port.high_port);
3022				rc = put_entry(buf, sizeof(u32), 3, fp);
3023				if (rc)
3024					return rc;
3025				rc = context_write(p, &c->context[0], fp);
3026				if (rc)
3027					return rc;
3028				break;
3029			case OCON_NODE:
3030				nodebuf[0] = c->u.node.addr; /* network order */
3031				nodebuf[1] = c->u.node.mask; /* network order */
3032				rc = put_entry(nodebuf, sizeof(u32), 2, fp);
3033				if (rc)
3034					return rc;
3035				rc = context_write(p, &c->context[0], fp);
3036				if (rc)
3037					return rc;
3038				break;
3039			case OCON_FSUSE:
3040				buf[0] = cpu_to_le32(c->v.behavior);
3041				len = strlen(c->u.name);
3042				buf[1] = cpu_to_le32(len);
3043				rc = put_entry(buf, sizeof(u32), 2, fp);
3044				if (rc)
3045					return rc;
3046				rc = put_entry(c->u.name, 1, len, fp);
3047				if (rc)
3048					return rc;
3049				rc = context_write(p, &c->context[0], fp);
3050				if (rc)
3051					return rc;
3052				break;
3053			case OCON_NODE6:
3054				for (j = 0; j < 4; j++)
3055					nodebuf[j] = c->u.node6.addr[j]; /* network order */
3056				for (j = 0; j < 4; j++)
3057					nodebuf[j + 4] = c->u.node6.mask[j]; /* network order */
3058				rc = put_entry(nodebuf, sizeof(u32), 8, fp);
3059				if (rc)
3060					return rc;
3061				rc = context_write(p, &c->context[0], fp);
3062				if (rc)
3063					return rc;
3064				break;
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
3065			}
3066		}
3067	}
3068	return 0;
3069}
3070
3071static int genfs_write(struct policydb *p, void *fp)
3072{
3073	struct genfs *genfs;
3074	struct ocontext *c;
3075	size_t len;
3076	__le32 buf[1];
3077	int rc;
3078
3079	len = 0;
3080	for (genfs = p->genfs; genfs; genfs = genfs->next)
3081		len++;
3082	buf[0] = cpu_to_le32(len);
3083	rc = put_entry(buf, sizeof(u32), 1, fp);
3084	if (rc)
3085		return rc;
3086	for (genfs = p->genfs; genfs; genfs = genfs->next) {
3087		len = strlen(genfs->fstype);
3088		buf[0] = cpu_to_le32(len);
3089		rc = put_entry(buf, sizeof(u32), 1, fp);
3090		if (rc)
3091			return rc;
3092		rc = put_entry(genfs->fstype, 1, len, fp);
3093		if (rc)
3094			return rc;
3095		len = 0;
3096		for (c = genfs->head; c; c = c->next)
3097			len++;
3098		buf[0] = cpu_to_le32(len);
3099		rc = put_entry(buf, sizeof(u32), 1, fp);
3100		if (rc)
3101			return rc;
3102		for (c = genfs->head; c; c = c->next) {
3103			len = strlen(c->u.name);
3104			buf[0] = cpu_to_le32(len);
3105			rc = put_entry(buf, sizeof(u32), 1, fp);
3106			if (rc)
3107				return rc;
3108			rc = put_entry(c->u.name, 1, len, fp);
3109			if (rc)
3110				return rc;
3111			buf[0] = cpu_to_le32(c->v.sclass);
3112			rc = put_entry(buf, sizeof(u32), 1, fp);
3113			if (rc)
3114				return rc;
3115			rc = context_write(p, &c->context[0], fp);
3116			if (rc)
3117				return rc;
3118		}
3119	}
3120	return 0;
3121}
3122
3123static int hashtab_cnt(void *key, void *data, void *ptr)
3124{
3125	int *cnt = ptr;
3126	*cnt = *cnt + 1;
3127
3128	return 0;
3129}
3130
3131static int range_write_helper(void *key, void *data, void *ptr)
3132{
3133	__le32 buf[2];
3134	struct range_trans *rt = key;
3135	struct mls_range *r = data;
3136	struct policy_data *pd = ptr;
3137	void *fp = pd->fp;
3138	struct policydb *p = pd->p;
3139	int rc;
3140
3141	buf[0] = cpu_to_le32(rt->source_type);
3142	buf[1] = cpu_to_le32(rt->target_type);
3143	rc = put_entry(buf, sizeof(u32), 2, fp);
3144	if (rc)
3145		return rc;
3146	if (p->policyvers >= POLICYDB_VERSION_RANGETRANS) {
3147		buf[0] = cpu_to_le32(rt->target_class);
3148		rc = put_entry(buf, sizeof(u32), 1, fp);
3149		if (rc)
3150			return rc;
3151	}
3152	rc = mls_write_range_helper(r, fp);
3153	if (rc)
3154		return rc;
3155
3156	return 0;
3157}
3158
3159static int range_write(struct policydb *p, void *fp)
3160{
3161	size_t nel;
3162	__le32 buf[1];
3163	int rc;
3164	struct policy_data pd;
3165
3166	pd.p = p;
3167	pd.fp = fp;
3168
3169	/* count the number of entries in the hashtab */
3170	nel = 0;
3171	rc = hashtab_map(p->range_tr, hashtab_cnt, &nel);
3172	if (rc)
3173		return rc;
3174
3175	buf[0] = cpu_to_le32(nel);
3176	rc = put_entry(buf, sizeof(u32), 1, fp);
3177	if (rc)
3178		return rc;
3179
3180	/* actually write all of the entries */
3181	rc = hashtab_map(p->range_tr, range_write_helper, &pd);
3182	if (rc)
3183		return rc;
3184
3185	return 0;
3186}
3187
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
3188static int filename_write_helper(void *key, void *data, void *ptr)
3189{
3190	__le32 buf[4];
3191	struct filename_trans *ft = key;
3192	struct filename_trans_datum *otype = data;
3193	void *fp = ptr;
 
3194	int rc;
3195	u32 len;
3196
3197	len = strlen(ft->name);
3198	buf[0] = cpu_to_le32(len);
3199	rc = put_entry(buf, sizeof(u32), 1, fp);
3200	if (rc)
3201		return rc;
3202
3203	rc = put_entry(ft->name, sizeof(char), len, fp);
3204	if (rc)
3205		return rc;
3206
3207	buf[0] = ft->stype;
3208	buf[1] = ft->ttype;
3209	buf[2] = ft->tclass;
3210	buf[3] = otype->otype;
3211
3212	rc = put_entry(buf, sizeof(u32), 4, fp);
 
 
 
 
 
3213	if (rc)
3214		return rc;
3215
 
 
 
 
 
 
 
 
 
 
 
 
 
 
3216	return 0;
3217}
3218
3219static int filename_trans_write(struct policydb *p, void *fp)
3220{
3221	u32 nel;
3222	__le32 buf[1];
3223	int rc;
3224
3225	if (p->policyvers < POLICYDB_VERSION_FILENAME_TRANS)
3226		return 0;
3227
3228	nel = 0;
3229	rc = hashtab_map(p->filename_trans, hashtab_cnt, &nel);
3230	if (rc)
3231		return rc;
 
3232
3233	buf[0] = cpu_to_le32(nel);
3234	rc = put_entry(buf, sizeof(u32), 1, fp);
3235	if (rc)
3236		return rc;
 
 
 
3237
3238	rc = hashtab_map(p->filename_trans, filename_write_helper, fp);
3239	if (rc)
3240		return rc;
3241
3242	return 0;
3243}
3244
3245/*
3246 * Write the configuration data in a policy database
3247 * structure to a policy database binary representation
3248 * file.
3249 */
3250int policydb_write(struct policydb *p, void *fp)
3251{
3252	unsigned int i, num_syms;
3253	int rc;
3254	__le32 buf[4];
3255	u32 config;
3256	size_t len;
3257	struct policydb_compat_info *info;
3258
3259	/*
3260	 * refuse to write policy older than compressed avtab
3261	 * to simplify the writer.  There are other tests dropped
3262	 * since we assume this throughout the writer code.  Be
3263	 * careful if you ever try to remove this restriction
3264	 */
3265	if (p->policyvers < POLICYDB_VERSION_AVTAB) {
3266		printk(KERN_ERR "SELinux: refusing to write policy version %d."
3267		       "  Because it is less than version %d\n", p->policyvers,
3268		       POLICYDB_VERSION_AVTAB);
3269		return -EINVAL;
3270	}
3271
3272	config = 0;
3273	if (p->mls_enabled)
3274		config |= POLICYDB_CONFIG_MLS;
3275
3276	if (p->reject_unknown)
3277		config |= REJECT_UNKNOWN;
3278	if (p->allow_unknown)
3279		config |= ALLOW_UNKNOWN;
3280
3281	/* Write the magic number and string identifiers. */
3282	buf[0] = cpu_to_le32(POLICYDB_MAGIC);
3283	len = strlen(POLICYDB_STRING);
3284	buf[1] = cpu_to_le32(len);
3285	rc = put_entry(buf, sizeof(u32), 2, fp);
3286	if (rc)
3287		return rc;
3288	rc = put_entry(POLICYDB_STRING, 1, len, fp);
3289	if (rc)
3290		return rc;
3291
3292	/* Write the version, config, and table sizes. */
3293	info = policydb_lookup_compat(p->policyvers);
3294	if (!info) {
3295		printk(KERN_ERR "SELinux: compatibility lookup failed for policy "
3296		    "version %d", p->policyvers);
3297		return -EINVAL;
3298	}
3299
3300	buf[0] = cpu_to_le32(p->policyvers);
3301	buf[1] = cpu_to_le32(config);
3302	buf[2] = cpu_to_le32(info->sym_num);
3303	buf[3] = cpu_to_le32(info->ocon_num);
3304
3305	rc = put_entry(buf, sizeof(u32), 4, fp);
3306	if (rc)
3307		return rc;
3308
3309	if (p->policyvers >= POLICYDB_VERSION_POLCAP) {
3310		rc = ebitmap_write(&p->policycaps, fp);
3311		if (rc)
3312			return rc;
3313	}
3314
3315	if (p->policyvers >= POLICYDB_VERSION_PERMISSIVE) {
3316		rc = ebitmap_write(&p->permissive_map, fp);
3317		if (rc)
3318			return rc;
3319	}
3320
3321	num_syms = info->sym_num;
3322	for (i = 0; i < num_syms; i++) {
3323		struct policy_data pd;
3324
3325		pd.fp = fp;
3326		pd.p = p;
3327
3328		buf[0] = cpu_to_le32(p->symtab[i].nprim);
3329		buf[1] = cpu_to_le32(p->symtab[i].table->nel);
3330
3331		rc = put_entry(buf, sizeof(u32), 2, fp);
3332		if (rc)
3333			return rc;
3334		rc = hashtab_map(p->symtab[i].table, write_f[i], &pd);
3335		if (rc)
3336			return rc;
3337	}
3338
3339	rc = avtab_write(p, &p->te_avtab, fp);
3340	if (rc)
3341		return rc;
3342
3343	rc = cond_write_list(p, p->cond_list, fp);
3344	if (rc)
3345		return rc;
3346
3347	rc = role_trans_write(p, fp);
3348	if (rc)
3349		return rc;
3350
3351	rc = role_allow_write(p->role_allow, fp);
3352	if (rc)
3353		return rc;
3354
3355	rc = filename_trans_write(p, fp);
3356	if (rc)
3357		return rc;
3358
3359	rc = ocontext_write(p, info, fp);
3360	if (rc)
3361		return rc;
3362
3363	rc = genfs_write(p, fp);
3364	if (rc)
3365		return rc;
3366
3367	rc = range_write(p, fp);
3368	if (rc)
3369		return rc;
3370
3371	for (i = 0; i < p->p_types.nprim; i++) {
3372		struct ebitmap *e = flex_array_get(p->type_attr_map_array, i);
3373
3374		BUG_ON(!e);
3375		rc = ebitmap_write(e, fp);
3376		if (rc)
3377			return rc;
3378	}
3379
3380	return 0;
3381}