security/selinux/ss/avtab.c

   1 /*
   2  * Implementation of the access vector table type.
   3  *
   4  * Author : Stephen Smalley, <sds@epoch.ncsc.mil>
   5  */
   6
   7 /* Updated: Frank Mayer <mayerf@tresys.com> and Karl MacMillan <kmacmillan@tresys.com>
   8  *
   9  *      Added conditional policy language extensions
  10  *
  11  * Copyright (C) 2003 Tresys Technology, LLC
  12  *      This program is free software; you can redistribute it and/or modify
  13  *      it under the terms of the GNU General Public License as published by
  14  *      the Free Software Foundation, version 2.
  15  */
  16
  17 #include <linux/kernel.h>
  18 #include <linux/slab.h>
  19 #include <linux/vmalloc.h>
  20 #include <linux/errno.h>
  21
  22 #include "avtab.h"
  23 #include "policydb.h"
  24
  25 #define AVTAB_HASH(keyp) \
  26 ((keyp->target_class + \
  27  (keyp->target_type << 2) + \
  28  (keyp->source_type << 9)) & \
  29  AVTAB_HASH_MASK)
  30
  31 static struct kmem_cache *avtab_node_cachep;
  32
  33 static struct avtab_node*
  34 avtab_insert_node(struct avtab *h, int hvalue,
  35                   struct avtab_node * prev, struct avtab_node * cur,
  36                   struct avtab_key *key, struct avtab_datum *datum)
  37 {
  38         struct avtab_node * newnode;
  39         newnode = kmem_cache_zalloc(avtab_node_cachep, GFP_KERNEL);
  40         if (newnode == NULL)
  41                 return NULL;
  42         newnode->key = *key;
  43         newnode->datum = *datum;
  44         if (prev) {
  45                 newnode->next = prev->next;
  46                 prev->next = newnode;
  47         } else {
  48                 newnode->next = h->htable[hvalue];
  49                 h->htable[hvalue] = newnode;
  50         }
  51
  52         h->nel++;
  53         return newnode;
  54 }
  55
  56 static int avtab_insert(struct avtab *h, struct avtab_key *key, struct avtab_datum *datum)
  57 {
  58         int hvalue;
  59         struct avtab_node *prev, *cur, *newnode;
  60         u16 specified = key->specified & ~(AVTAB_ENABLED|AVTAB_ENABLED_OLD);
  61
  62         if (!h)
  63                 return -EINVAL;
  64
  65         hvalue = AVTAB_HASH(key);
  66         for (prev = NULL, cur = h->htable[hvalue];
  67              cur;
  68              prev = cur, cur = cur->next) {
  69                 if (key->source_type == cur->key.source_type &&
  70                     key->target_type == cur->key.target_type &&
  71                     key->target_class == cur->key.target_class &&
  72                     (specified & cur->key.specified))
  73                         return -EEXIST;
  74                 if (key->source_type < cur->key.source_type)
  75                         break;
  76                 if (key->source_type == cur->key.source_type &&
  77                     key->target_type < cur->key.target_type)
  78                         break;
  79                 if (key->source_type == cur->key.source_type &&
  80                     key->target_type == cur->key.target_type &&
  81                     key->target_class < cur->key.target_class)
  82                         break;
  83         }
  84
  85         newnode = avtab_insert_node(h, hvalue, prev, cur, key, datum);
  86         if(!newnode)
  87                 return -ENOMEM;
  88
  89         return 0;
  90 }
  91
  92 /* Unlike avtab_insert(), this function allow multiple insertions of the same
  93  * key/specified mask into the table, as needed by the conditional avtab.
  94  * It also returns a pointer to the node inserted.
  95  */
  96 struct avtab_node *
  97 avtab_insert_nonunique(struct avtab * h, struct avtab_key * key, struct avtab_datum * datum)
  98 {
  99         int hvalue;
 100         struct avtab_node *prev, *cur, *newnode;
 101         u16 specified = key->specified & ~(AVTAB_ENABLED|AVTAB_ENABLED_OLD);
 102
 103         if (!h)
 104                 return NULL;
 105         hvalue = AVTAB_HASH(key);
 106         for (prev = NULL, cur = h->htable[hvalue];
 107              cur;
 108              prev = cur, cur = cur->next) {
 109                 if (key->source_type == cur->key.source_type &&
 110                     key->target_type == cur->key.target_type &&
 111                     key->target_class == cur->key.target_class &&
 112                     (specified & cur->key.specified))
 113                         break;
 114                 if (key->source_type < cur->key.source_type)
 115                         break;
 116                 if (key->source_type == cur->key.source_type &&
 117                     key->target_type < cur->key.target_type)
 118                         break;
 119                 if (key->source_type == cur->key.source_type &&
 120                     key->target_type == cur->key.target_type &&
 121                     key->target_class < cur->key.target_class)
 122                         break;
 123         }
 124         newnode = avtab_insert_node(h, hvalue, prev, cur, key, datum);
 125
 126         return newnode;
 127 }
 128
 129 struct avtab_datum *avtab_search(struct avtab *h, struct avtab_key *key)
 130 {
 131         int hvalue;
 132         struct avtab_node *cur;
 133         u16 specified = key->specified & ~(AVTAB_ENABLED|AVTAB_ENABLED_OLD);
 134
 135         if (!h)
 136                 return NULL;
 137
 138         hvalue = AVTAB_HASH(key);
 139         for (cur = h->htable[hvalue]; cur; cur = cur->next) {
 140                 if (key->source_type == cur->key.source_type &&
 141                     key->target_type == cur->key.target_type &&
 142                     key->target_class == cur->key.target_class &&
 143                     (specified & cur->key.specified))
 144                         return &cur->datum;
 145
 146                 if (key->source_type < cur->key.source_type)
 147                         break;
 148                 if (key->source_type == cur->key.source_type &&
 149                     key->target_type < cur->key.target_type)
 150                         break;
 151                 if (key->source_type == cur->key.source_type &&
 152                     key->target_type == cur->key.target_type &&
 153                     key->target_class < cur->key.target_class)
 154                         break;
 155         }
 156
 157         return NULL;
 158 }
 159
 160 /* This search function returns a node pointer, and can be used in
 161  * conjunction with avtab_search_next_node()
 162  */
 163 struct avtab_node*
 164 avtab_search_node(struct avtab *h, struct avtab_key *key)
 165 {
 166         int hvalue;
 167         struct avtab_node *cur;
 168         u16 specified = key->specified & ~(AVTAB_ENABLED|AVTAB_ENABLED_OLD);
 169
 170         if (!h)
 171                 return NULL;
 172
 173         hvalue = AVTAB_HASH(key);
 174         for (cur = h->htable[hvalue]; cur; cur = cur->next) {
 175                 if (key->source_type == cur->key.source_type &&
 176                     key->target_type == cur->key.target_type &&
 177                     key->target_class == cur->key.target_class &&
 178                     (specified & cur->key.specified))
 179                         return cur;
 180
 181                 if (key->source_type < cur->key.source_type)
 182                         break;
 183                 if (key->source_type == cur->key.source_type &&
 184                     key->target_type < cur->key.target_type)
 185                         break;
 186                 if (key->source_type == cur->key.source_type &&
 187                     key->target_type == cur->key.target_type &&
 188                     key->target_class < cur->key.target_class)
 189                         break;
 190         }
 191         return NULL;
 192 }
 193
 194 struct avtab_node*
 195 avtab_search_node_next(struct avtab_node *node, int specified)
 196 {
 197         struct avtab_node *cur;
 198
 199         if (!node)
 200                 return NULL;
 201
 202         specified &= ~(AVTAB_ENABLED|AVTAB_ENABLED_OLD);
 203         for (cur = node->next; cur; cur = cur->next) {
 204                 if (node->key.source_type == cur->key.source_type &&
 205                     node->key.target_type == cur->key.target_type &&
 206                     node->key.target_class == cur->key.target_class &&
 207                     (specified & cur->key.specified))
 208                         return cur;
 209
 210                 if (node->key.source_type < cur->key.source_type)
 211                         break;
 212                 if (node->key.source_type == cur->key.source_type &&
 213                     node->key.target_type < cur->key.target_type)
 214                         break;
 215                 if (node->key.source_type == cur->key.source_type &&
 216                     node->key.target_type == cur->key.target_type &&
 217                     node->key.target_class < cur->key.target_class)
 218                         break;
 219         }
 220         return NULL;
 221 }
 222
 223 void avtab_destroy(struct avtab *h)
 224 {
 225         int i;
 226         struct avtab_node *cur, *temp;
 227
 228         if (!h || !h->htable)
 229                 return;
 230
 231         for (i = 0; i < AVTAB_SIZE; i++) {
 232                 cur = h->htable[i];
 233                 while (cur != NULL) {
 234                         temp = cur;
 235                         cur = cur->next;
 236                         kmem_cache_free(avtab_node_cachep, temp);
 237                 }
 238                 h->htable[i] = NULL;
 239         }
 240         vfree(h->htable);
 241         h->htable = NULL;
 242 }
 243
 244
 245 int avtab_init(struct avtab *h)
 246 {
 247         int i;
 248
 249         h->htable = vmalloc(sizeof(*(h->htable)) * AVTAB_SIZE);
 250         if (!h->htable)
 251                 return -ENOMEM;
 252         for (i = 0; i < AVTAB_SIZE; i++)
 253                 h->htable[i] = NULL;
 254         h->nel = 0;
 255         return 0;
 256 }
 257
 258 void avtab_hash_eval(struct avtab *h, char *tag)
 259 {
 260         int i, chain_len, slots_used, max_chain_len;
 261         struct avtab_node *cur;
 262
 263         slots_used = 0;
 264         max_chain_len = 0;
 265         for (i = 0; i < AVTAB_SIZE; i++) {
 266                 cur = h->htable[i];
 267                 if (cur) {
 268                         slots_used++;
 269                         chain_len = 0;
 270                         while (cur) {
 271                                 chain_len++;
 272                                 cur = cur->next;
 273                         }
 274
 275                         if (chain_len > max_chain_len)
 276                                 max_chain_len = chain_len;
 277                 }
 278         }
 279
 280         printk(KERN_INFO "%s:  %d entries and %d/%d buckets used, longest "
 281                "chain length %d\n", tag, h->nel, slots_used, AVTAB_SIZE,
 282                max_chain_len);
 283 }
 284
 285 static uint16_t spec_order[] = {
 286         AVTAB_ALLOWED,
 287         AVTAB_AUDITDENY,
 288         AVTAB_AUDITALLOW,
 289         AVTAB_TRANSITION,
 290         AVTAB_CHANGE,
 291         AVTAB_MEMBER
 292 };
 293
 294 int avtab_read_item(void *fp, u32 vers, struct avtab *a,
 295                     int (*insertf)(struct avtab *a, struct avtab_key *k,
 296                                    struct avtab_datum *d, void *p),
 297                     void *p)
 298 {
 299         __le16 buf16[4];
 300         u16 enabled;
 301         __le32 buf32[7];
 302         u32 items, items2, val;
 303         struct avtab_key key;
 304         struct avtab_datum datum;
 305         int i, rc;
 306
 307         memset(&key, 0, sizeof(struct avtab_key));
 308         memset(&datum, 0, sizeof(struct avtab_datum));
 309
 310         if (vers < POLICYDB_VERSION_AVTAB) {
 311                 rc = next_entry(buf32, fp, sizeof(u32));
 312                 if (rc < 0) {
 313                         printk(KERN_ERR "security: avtab: truncated entry\n");
 314                         return -1;
 315                 }
 316                 items2 = le32_to_cpu(buf32[0]);
 317                 if (items2 > ARRAY_SIZE(buf32)) {
 318                         printk(KERN_ERR "security: avtab: entry overflow\n");
 319                         return -1;
 320
 321                 }
 322                 rc = next_entry(buf32, fp, sizeof(u32)*items2);
 323                 if (rc < 0) {
 324                         printk(KERN_ERR "security: avtab: truncated entry\n");
 325                         return -1;
 326                 }
 327                 items = 0;
 328
 329                 val = le32_to_cpu(buf32[items++]);
 330                 key.source_type = (u16)val;
 331                 if (key.source_type != val) {
 332                         printk("security: avtab: truncated source type\n");
 333                         return -1;
 334                 }
 335                 val = le32_to_cpu(buf32[items++]);
 336                 key.target_type = (u16)val;
 337                 if (key.target_type != val) {
 338                         printk("security: avtab: truncated target type\n");
 339                         return -1;
 340                 }
 341                 val = le32_to_cpu(buf32[items++]);
 342                 key.target_class = (u16)val;
 343                 if (key.target_class != val) {
 344                         printk("security: avtab: truncated target class\n");
 345                         return -1;
 346                 }
 347
 348                 val = le32_to_cpu(buf32[items++]);
 349                 enabled = (val & AVTAB_ENABLED_OLD) ? AVTAB_ENABLED : 0;
 350
 351                 if (!(val & (AVTAB_AV | AVTAB_TYPE))) {
 352                         printk("security: avtab: null entry\n");
 353                         return -1;
 354                 }
 355                 if ((val & AVTAB_AV) &&
 356                     (val & AVTAB_TYPE)) {
 357                         printk("security: avtab: entry has both access vectors and types\n");
 358                         return -1;
 359                 }
 360
 361                 for (i = 0; i < ARRAY_SIZE(spec_order); i++) {
 362                         if (val & spec_order[i]) {
 363                                 key.specified = spec_order[i] | enabled;
 364                                 datum.data = le32_to_cpu(buf32[items++]);
 365                                 rc = insertf(a, &key, &datum, p);
 366                                 if (rc) return rc;
 367                         }
 368                 }
 369
 370                 if (items != items2) {
 371                         printk("security: avtab: entry only had %d items, expected %d\n", items2, items);
 372                         return -1;
 373                 }
 374                 return 0;
 375         }
 376
 377         rc = next_entry(buf16, fp, sizeof(u16)*4);
 378         if (rc < 0) {
 379                 printk("security: avtab: truncated entry\n");
 380                 return -1;
 381         }
 382
 383         items = 0;
 384         key.source_type = le16_to_cpu(buf16[items++]);
 385         key.target_type = le16_to_cpu(buf16[items++]);
 386         key.target_class = le16_to_cpu(buf16[items++]);
 387         key.specified = le16_to_cpu(buf16[items++]);
 388
 389         rc = next_entry(buf32, fp, sizeof(u32));
 390         if (rc < 0) {
 391                 printk("security: avtab: truncated entry\n");
 392                 return -1;
 393         }
 394         datum.data = le32_to_cpu(*buf32);
 395         return insertf(a, &key, &datum, p);
 396 }
 397
 398 static int avtab_insertf(struct avtab *a, struct avtab_key *k,
 399                          struct avtab_datum *d, void *p)
 400 {
 401         return avtab_insert(a, k, d);
 402 }
 403
 404 int avtab_read(struct avtab *a, void *fp, u32 vers)
 405 {
 406         int rc;
 407         __le32 buf[1];
 408         u32 nel, i;
 409
 410
 411         rc = next_entry(buf, fp, sizeof(u32));
 412         if (rc < 0) {
 413                 printk(KERN_ERR "security: avtab: truncated table\n");
 414                 goto bad;
 415         }
 416         nel = le32_to_cpu(buf[0]);
 417         if (!nel) {
 418                 printk(KERN_ERR "security: avtab: table is empty\n");
 419                 rc = -EINVAL;
 420                 goto bad;
 421         }
 422         for (i = 0; i < nel; i++) {
 423                 rc = avtab_read_item(fp,vers, a, avtab_insertf, NULL);
 424                 if (rc) {
 425                         if (rc == -ENOMEM)
 426                                 printk(KERN_ERR "security: avtab: out of memory\n");
 427                         else if (rc == -EEXIST)
 428                                 printk(KERN_ERR "security: avtab: duplicate entry\n");
 429                         else
 430                                 rc = -EINVAL;
 431                         goto bad;
 432                 }
 433         }
 434
 435         rc = 0;
 436 out:
 437         return rc;
 438
 439 bad:
 440         avtab_destroy(a);
 441         goto out;
 442 }
 443
 444 void avtab_cache_init(void)
 445 {
 446         avtab_node_cachep = kmem_cache_create("avtab_node",
 447                                               sizeof(struct avtab_node),
 448                                               0, SLAB_PANIC, NULL, NULL);
 449 }
 450
 451 void avtab_cache_destroy(void)
 452 {
 453         kmem_cache_destroy (avtab_node_cachep);
 454 }