security/apparmor/policy.c

   1 // SPDX-License-Identifier: GPL-2.0-only
   2 /*
   3  * AppArmor security module
   4  *
   5  * This file contains AppArmor policy manipulation functions
   6  *
   7  * Copyright (C) 1998-2008 Novell/SUSE
   8  * Copyright 2009-2010 Canonical Ltd.
   9  *
  10  * AppArmor policy is based around profiles, which contain the rules a
  11  * task is confined by.  Every task in the system has a profile attached
  12  * to it determined either by matching "unconfined" tasks against the
  13  * visible set of profiles or by following a profiles attachment rules.
  14  *
  15  * Each profile exists in a profile namespace which is a container of
  16  * visible profiles.  Each namespace contains a special "unconfined" profile,
  17  * which doesn't enforce any confinement on a task beyond DAC.
  18  *
  19  * Namespace and profile names can be written together in either
  20  * of two syntaxes.
  21  *      :namespace:profile - used by kernel interfaces for easy detection
  22  *      namespace://profile - used by policy
  23  *
  24  * Profile names can not start with : or @ or ^ and may not contain \0
  25  *
  26  * Reserved profile names
  27  *      unconfined - special automatically generated unconfined profile
  28  *      inherit - special name to indicate profile inheritance
  29  *      null-XXXX-YYYY - special automatically generated learning profiles
  30  *
  31  * Namespace names may not start with / or @ and may not contain \0 or :
  32  * Reserved namespace names
  33  *      user-XXXX - user defined profiles
  34  *
  35  * a // in a profile or namespace name indicates a hierarchical name with the
  36  * name before the // being the parent and the name after the child.
  37  *
  38  * Profile and namespace hierarchies serve two different but similar purposes.
  39  * The namespace contains the set of visible profiles that are considered
  40  * for attachment.  The hierarchy of namespaces allows for virtualizing
  41  * the namespace so that for example a chroot can have its own set of profiles
  42  * which may define some local user namespaces.
  43  * The profile hierarchy severs two distinct purposes,
  44  * -  it allows for sub profiles or hats, which allows an application to run
  45  *    subprograms under its own profile with different restriction than it
  46  *    self, and not have it use the system profile.
  47  *    eg. if a mail program starts an editor, the policy might make the
  48  *        restrictions tighter on the editor tighter than the mail program,
  49  *        and definitely different than general editor restrictions
  50  * - it allows for binary hierarchy of profiles, so that execution history
  51  *   is preserved.  This feature isn't exploited by AppArmor reference policy
  52  *   but is allowed.  NOTE: this is currently suboptimal because profile
  53  *   aliasing is not currently implemented so that a profile for each
  54  *   level must be defined.
  55  *   eg. /bin/bash///bin/ls as a name would indicate /bin/ls was started
  56  *       from /bin/bash
  57  *
  58  *   A profile or namespace name that can contain one or more // separators
  59  *   is referred to as an hname (hierarchical).
  60  *   eg.  /bin/bash//bin/ls
  61  *
  62  *   An fqname is a name that may contain both namespace and profile hnames.
  63  *   eg. :ns:/bin/bash//bin/ls
  64  *
  65  * NOTES:
  66  *   - locking of profile lists is currently fairly coarse.  All profile
  67  *     lists within a namespace use the namespace lock.
  68  * FIXME: move profile lists to using rcu_lists
  69  */
  70
  71 #include <linux/slab.h>
  72 #include <linux/spinlock.h>
  73 #include <linux/string.h>
  74 #include <linux/cred.h>
  75 #include <linux/rculist.h>
  76 #include <linux/user_namespace.h>
  77
  78 #include "include/apparmor.h"
  79 #include "include/capability.h"
  80 #include "include/cred.h"
  81 #include "include/file.h"
  82 #include "include/ipc.h"
  83 #include "include/match.h"
  84 #include "include/path.h"
  85 #include "include/policy.h"
  86 #include "include/policy_ns.h"
  87 #include "include/policy_unpack.h"
  88 #include "include/resource.h"
  89
  90 int unprivileged_userns_apparmor_policy = 1;
  91
  92 const char *const aa_profile_mode_names[] = {
  93         "enforce",
  94         "complain",
  95         "kill",
  96         "unconfined",
  97         "user",
  98 };
  99
 100
 101 /**
 102  * __add_profile - add a profiles to list and label tree
 103  * @list: list to add it to  (NOT NULL)
 104  * @profile: the profile to add  (NOT NULL)
 105  *
 106  * refcount @profile, should be put by __list_remove_profile
 107  *
 108  * Requires: namespace lock be held, or list not be shared
 109  */
 110 static void __add_profile(struct list_head *list, struct aa_profile *profile)
 111 {
 112         struct aa_label *l;
 113
 114         AA_BUG(!list);
 115         AA_BUG(!profile);
 116         AA_BUG(!profile->ns);
 117         AA_BUG(!mutex_is_locked(&profile->ns->lock));
 118
 119         list_add_rcu(&profile->base.list, list);
 120         /* get list reference */
 121         aa_get_profile(profile);
 122         l = aa_label_insert(&profile->ns->labels, &profile->label);
 123         AA_BUG(l != &profile->label);
 124         aa_put_label(l);
 125 }
 126
 127 /**
 128  * __list_remove_profile - remove a profile from the list it is on
 129  * @profile: the profile to remove  (NOT NULL)
 130  *
 131  * remove a profile from the list, warning generally removal should
 132  * be done with __replace_profile as most profile removals are
 133  * replacements to the unconfined profile.
 134  *
 135  * put @profile list refcount
 136  *
 137  * Requires: namespace lock be held, or list not have been live
 138  */
 139 static void __list_remove_profile(struct aa_profile *profile)
 140 {
 141         AA_BUG(!profile);
 142         AA_BUG(!profile->ns);
 143         AA_BUG(!mutex_is_locked(&profile->ns->lock));
 144
 145         list_del_rcu(&profile->base.list);
 146         aa_put_profile(profile);
 147 }
 148
 149 /**
 150  * __remove_profile - remove old profile, and children
 151  * @profile: profile to be replaced  (NOT NULL)
 152  *
 153  * Requires: namespace list lock be held, or list not be shared
 154  */
 155 static void __remove_profile(struct aa_profile *profile)
 156 {
 157         AA_BUG(!profile);
 158         AA_BUG(!profile->ns);
 159         AA_BUG(!mutex_is_locked(&profile->ns->lock));
 160
 161         /* release any children lists first */
 162         __aa_profile_list_release(&profile->base.profiles);
 163         /* released by free_profile */
 164         aa_label_remove(&profile->label);
 165         __aafs_profile_rmdir(profile);
 166         __list_remove_profile(profile);
 167 }
 168
 169 /**
 170  * __aa_profile_list_release - remove all profiles on the list and put refs
 171  * @head: list of profiles  (NOT NULL)
 172  *
 173  * Requires: namespace lock be held
 174  */
 175 void __aa_profile_list_release(struct list_head *head)
 176 {
 177         struct aa_profile *profile, *tmp;
 178         list_for_each_entry_safe(profile, tmp, head, base.list)
 179                 __remove_profile(profile);
 180 }
 181
 182 /**
 183  * aa_free_data - free a data blob
 184  * @ptr: data to free
 185  * @arg: unused
 186  */
 187 static void aa_free_data(void *ptr, void *arg)
 188 {
 189         struct aa_data *data = ptr;
 190
 191         kfree_sensitive(data->data);
 192         kfree_sensitive(data->key);
 193         kfree_sensitive(data);
 194 }
 195
 196 static void free_attachment(struct aa_attachment *attach)
 197 {
 198         int i;
 199
 200         for (i = 0; i < attach->xattr_count; i++)
 201                 kfree_sensitive(attach->xattrs[i]);
 202         kfree_sensitive(attach->xattrs);
 203         aa_destroy_policydb(&attach->xmatch);
 204 }
 205
 206 static void free_ruleset(struct aa_ruleset *rules)
 207 {
 208         int i;
 209
 210         aa_destroy_policydb(&rules->file);
 211         aa_destroy_policydb(&rules->policy);
 212         aa_free_cap_rules(&rules->caps);
 213         aa_free_rlimit_rules(&rules->rlimits);
 214
 215         for (i = 0; i < rules->secmark_count; i++)
 216                 kfree_sensitive(rules->secmark[i].label);
 217         kfree_sensitive(rules->secmark);
 218         kfree_sensitive(rules);
 219 }
 220
 221 struct aa_ruleset *aa_alloc_ruleset(gfp_t gfp)
 222 {
 223         struct aa_ruleset *rules;
 224
 225         rules = kzalloc(sizeof(*rules), gfp);
 226         if (rules)
 227                 INIT_LIST_HEAD(&rules->list);
 228
 229         return rules;
 230 }
 231
 232 /**
 233  * aa_free_profile - free a profile
 234  * @profile: the profile to free  (MAYBE NULL)
 235  *
 236  * Free a profile, its hats and null_profile. All references to the profile,
 237  * its hats and null_profile must have been put.
 238  *
 239  * If the profile was referenced from a task context, free_profile() will
 240  * be called from an rcu callback routine, so we must not sleep here.
 241  */
 242 void aa_free_profile(struct aa_profile *profile)
 243 {
 244         struct aa_ruleset *rule, *tmp;
 245         struct rhashtable *rht;
 246
 247         AA_DEBUG("%s(%p)\n", __func__, profile);
 248
 249         if (!profile)
 250                 return;
 251
 252         /* free children profiles */
 253         aa_policy_destroy(&profile->base);
 254         aa_put_profile(rcu_access_pointer(profile->parent));
 255
 256         aa_put_ns(profile->ns);
 257         kfree_sensitive(profile->rename);
 258
 259         free_attachment(&profile->attach);
 260
 261         /*
 262          * at this point there are no tasks that can have a reference
 263          * to rules
 264          */
 265         list_for_each_entry_safe(rule, tmp, &profile->rules, list) {
 266                 list_del_init(&rule->list);
 267                 free_ruleset(rule);
 268         }
 269         kfree_sensitive(profile->dirname);
 270
 271         if (profile->data) {
 272                 rht = profile->data;
 273                 profile->data = NULL;
 274                 rhashtable_free_and_destroy(rht, aa_free_data, NULL);
 275                 kfree_sensitive(rht);
 276         }
 277
 278         kfree_sensitive(profile->hash);
 279         aa_put_loaddata(profile->rawdata);
 280         aa_label_destroy(&profile->label);
 281
 282         kfree_sensitive(profile);
 283 }
 284
 285 /**
 286  * aa_alloc_profile - allocate, initialize and return a new profile
 287  * @hname: name of the profile  (NOT NULL)
 288  * @gfp: allocation type
 289  *
 290  * Returns: refcount profile or NULL on failure
 291  */
 292 struct aa_profile *aa_alloc_profile(const char *hname, struct aa_proxy *proxy,
 293                                     gfp_t gfp)
 294 {
 295         struct aa_profile *profile;
 296         struct aa_ruleset *rules;
 297
 298         /* freed by free_profile - usually through aa_put_profile */
 299         profile = kzalloc(struct_size(profile, label.vec, 2), gfp);
 300         if (!profile)
 301                 return NULL;
 302
 303         if (!aa_policy_init(&profile->base, NULL, hname, gfp))
 304                 goto fail;
 305         if (!aa_label_init(&profile->label, 1, gfp))
 306                 goto fail;
 307
 308         INIT_LIST_HEAD(&profile->rules);
 309
 310         /* allocate the first ruleset, but leave it empty */
 311         rules = aa_alloc_ruleset(gfp);
 312         if (!rules)
 313                 goto fail;
 314         list_add(&rules->list, &profile->rules);
 315
 316         /* update being set needed by fs interface */
 317         if (!proxy) {
 318                 proxy = aa_alloc_proxy(&profile->label, gfp);
 319                 if (!proxy)
 320                         goto fail;
 321         } else
 322                 aa_get_proxy(proxy);
 323         profile->label.proxy = proxy;
 324
 325         profile->label.hname = profile->base.hname;
 326         profile->label.flags |= FLAG_PROFILE;
 327         profile->label.vec[0] = profile;
 328
 329         /* refcount released by caller */
 330         return profile;
 331
 332 fail:
 333         aa_free_profile(profile);
 334
 335         return NULL;
 336 }
 337
 338 /* TODO: profile accounting - setup in remove */
 339
 340 /**
 341  * __strn_find_child - find a profile on @head list using substring of @name
 342  * @head: list to search  (NOT NULL)
 343  * @name: name of profile (NOT NULL)
 344  * @len: length of @name substring to match
 345  *
 346  * Requires: rcu_read_lock be held
 347  *
 348  * Returns: unrefcounted profile ptr, or NULL if not found
 349  */
 350 static struct aa_profile *__strn_find_child(struct list_head *head,
 351                                             const char *name, int len)
 352 {
 353         return (struct aa_profile *)__policy_strn_find(head, name, len);
 354 }
 355
 356 /**
 357  * __find_child - find a profile on @head list with a name matching @name
 358  * @head: list to search  (NOT NULL)
 359  * @name: name of profile (NOT NULL)
 360  *
 361  * Requires: rcu_read_lock be held
 362  *
 363  * Returns: unrefcounted profile ptr, or NULL if not found
 364  */
 365 static struct aa_profile *__find_child(struct list_head *head, const char *name)
 366 {
 367         return __strn_find_child(head, name, strlen(name));
 368 }
 369
 370 /**
 371  * aa_find_child - find a profile by @name in @parent
 372  * @parent: profile to search  (NOT NULL)
 373  * @name: profile name to search for  (NOT NULL)
 374  *
 375  * Returns: a refcounted profile or NULL if not found
 376  */
 377 struct aa_profile *aa_find_child(struct aa_profile *parent, const char *name)
 378 {
 379         struct aa_profile *profile;
 380
 381         rcu_read_lock();
 382         do {
 383                 profile = __find_child(&parent->base.profiles, name);
 384         } while (profile && !aa_get_profile_not0(profile));
 385         rcu_read_unlock();
 386
 387         /* refcount released by caller */
 388         return profile;
 389 }
 390
 391 /**
 392  * __lookup_parent - lookup the parent of a profile of name @hname
 393  * @ns: namespace to lookup profile in  (NOT NULL)
 394  * @hname: hierarchical profile name to find parent of  (NOT NULL)
 395  *
 396  * Lookups up the parent of a fully qualified profile name, the profile
 397  * that matches hname does not need to exist, in general this
 398  * is used to load a new profile.
 399  *
 400  * Requires: rcu_read_lock be held
 401  *
 402  * Returns: unrefcounted policy or NULL if not found
 403  */
 404 static struct aa_policy *__lookup_parent(struct aa_ns *ns,
 405                                          const char *hname)
 406 {
 407         struct aa_policy *policy;
 408         struct aa_profile *profile = NULL;
 409         char *split;
 410
 411         policy = &ns->base;
 412
 413         for (split = strstr(hname, "//"); split;) {
 414                 profile = __strn_find_child(&policy->profiles, hname,
 415                                             split - hname);
 416                 if (!profile)
 417                         return NULL;
 418                 policy = &profile->base;
 419                 hname = split + 2;
 420                 split = strstr(hname, "//");
 421         }
 422         if (!profile)
 423                 return &ns->base;
 424         return &profile->base;
 425 }
 426
 427 /**
 428  * __create_missing_ancestors - create place holders for missing ancestores
 429  * @ns: namespace to lookup profile in (NOT NULL)
 430  * @hname: hierarchical profile name to find parent of (NOT NULL)
 431  * @gfp: type of allocation.
 432  *
 433  * Requires: ns mutex lock held
 434  *
 435  * Return: unrefcounted parent policy on success or %NULL if error creating
 436  *          place holder profiles.
 437  */
 438 static struct aa_policy *__create_missing_ancestors(struct aa_ns *ns,
 439                                                     const char *hname,
 440                                                     gfp_t gfp)
 441 {
 442         struct aa_policy *policy;
 443         struct aa_profile *parent, *profile = NULL;
 444         char *split;
 445
 446         AA_BUG(!ns);
 447         AA_BUG(!hname);
 448
 449         policy = &ns->base;
 450
 451         for (split = strstr(hname, "//"); split;) {
 452                 parent = profile;
 453                 profile = __strn_find_child(&policy->profiles, hname,
 454                                             split - hname);
 455                 if (!profile) {
 456                         const char *name = kstrndup(hname, split - hname,
 457                                                     gfp);
 458                         if (!name)
 459                                 return NULL;
 460                         profile = aa_alloc_null(parent, name, gfp);
 461                         kfree(name);
 462                         if (!profile)
 463                                 return NULL;
 464                         if (!parent)
 465                                 profile->ns = aa_get_ns(ns);
 466                 }
 467                 policy = &profile->base;
 468                 hname = split + 2;
 469                 split = strstr(hname, "//");
 470         }
 471         if (!profile)
 472                 return &ns->base;
 473         return &profile->base;
 474 }
 475
 476 /**
 477  * __lookupn_profile - lookup the profile matching @hname
 478  * @base: base list to start looking up profile name from  (NOT NULL)
 479  * @hname: hierarchical profile name  (NOT NULL)
 480  * @n: length of @hname
 481  *
 482  * Requires: rcu_read_lock be held
 483  *
 484  * Returns: unrefcounted profile pointer or NULL if not found
 485  *
 486  * Do a relative name lookup, recursing through profile tree.
 487  */
 488 static struct aa_profile *__lookupn_profile(struct aa_policy *base,
 489                                             const char *hname, size_t n)
 490 {
 491         struct aa_profile *profile = NULL;
 492         const char *split;
 493
 494         for (split = strnstr(hname, "//", n); split;
 495              split = strnstr(hname, "//", n)) {
 496                 profile = __strn_find_child(&base->profiles, hname,
 497                                             split - hname);
 498                 if (!profile)
 499                         return NULL;
 500
 501                 base = &profile->base;
 502                 n -= split + 2 - hname;
 503                 hname = split + 2;
 504         }
 505
 506         if (n)
 507                 return __strn_find_child(&base->profiles, hname, n);
 508         return NULL;
 509 }
 510
 511 static struct aa_profile *__lookup_profile(struct aa_policy *base,
 512                                            const char *hname)
 513 {
 514         return __lookupn_profile(base, hname, strlen(hname));
 515 }
 516
 517 /**
 518  * aa_lookupn_profile - find a profile by its full or partial name
 519  * @ns: the namespace to start from (NOT NULL)
 520  * @hname: name to do lookup on.  Does not contain namespace prefix (NOT NULL)
 521  * @n: size of @hname
 522  *
 523  * Returns: refcounted profile or NULL if not found
 524  */
 525 struct aa_profile *aa_lookupn_profile(struct aa_ns *ns, const char *hname,
 526                                       size_t n)
 527 {
 528         struct aa_profile *profile;
 529
 530         rcu_read_lock();
 531         do {
 532                 profile = __lookupn_profile(&ns->base, hname, n);
 533         } while (profile && !aa_get_profile_not0(profile));
 534         rcu_read_unlock();
 535
 536         /* the unconfined profile is not in the regular profile list */
 537         if (!profile && strncmp(hname, "unconfined", n) == 0)
 538                 profile = aa_get_newest_profile(ns->unconfined);
 539
 540         /* refcount released by caller */
 541         return profile;
 542 }
 543
 544 struct aa_profile *aa_lookup_profile(struct aa_ns *ns, const char *hname)
 545 {
 546         return aa_lookupn_profile(ns, hname, strlen(hname));
 547 }
 548
 549 struct aa_profile *aa_fqlookupn_profile(struct aa_label *base,
 550                                         const char *fqname, size_t n)
 551 {
 552         struct aa_profile *profile;
 553         struct aa_ns *ns;
 554         const char *name, *ns_name;
 555         size_t ns_len;
 556
 557         name = aa_splitn_fqname(fqname, n, &ns_name, &ns_len);
 558         if (ns_name) {
 559                 ns = aa_lookupn_ns(labels_ns(base), ns_name, ns_len);
 560                 if (!ns)
 561                         return NULL;
 562         } else
 563                 ns = aa_get_ns(labels_ns(base));
 564
 565         if (name)
 566                 profile = aa_lookupn_profile(ns, name, n - (name - fqname));
 567         else if (ns)
 568                 /* default profile for ns, currently unconfined */
 569                 profile = aa_get_newest_profile(ns->unconfined);
 570         else
 571                 profile = NULL;
 572         aa_put_ns(ns);
 573
 574         return profile;
 575 }
 576
 577
 578 struct aa_profile *aa_alloc_null(struct aa_profile *parent, const char *name,
 579                                  gfp_t gfp)
 580 {
 581         struct aa_profile *profile;
 582         struct aa_ruleset *rules;
 583
 584         profile = aa_alloc_profile(name, NULL, gfp);
 585         if (!profile)
 586                 return NULL;
 587
 588         /* TODO: ideally we should inherit abi from parent */
 589         profile->label.flags |= FLAG_NULL;
 590         rules = list_first_entry(&profile->rules, typeof(*rules), list);
 591         rules->file.dfa = aa_get_dfa(nulldfa);
 592         rules->file.perms = kcalloc(2, sizeof(struct aa_perms), GFP_KERNEL);
 593         if (!rules->file.perms)
 594                 goto fail;
 595         rules->file.size = 2;
 596         rules->policy.dfa = aa_get_dfa(nulldfa);
 597         rules->policy.perms = kcalloc(2, sizeof(struct aa_perms), GFP_KERNEL);
 598         if (!rules->policy.perms)
 599                 goto fail;
 600         rules->policy.size = 2;
 601
 602         if (parent) {
 603                 profile->path_flags = parent->path_flags;
 604
 605                 /* released on free_profile */
 606                 rcu_assign_pointer(profile->parent, aa_get_profile(parent));
 607                 profile->ns = aa_get_ns(parent->ns);
 608         }
 609
 610         return profile;
 611
 612 fail:
 613         aa_free_profile(profile);
 614
 615         return NULL;
 616 }
 617
 618 /**
 619  * aa_new_learning_profile - create or find a null-X learning profile
 620  * @parent: profile that caused this profile to be created (NOT NULL)
 621  * @hat: true if the null- learning profile is a hat
 622  * @base: name to base the null profile off of
 623  * @gfp: type of allocation
 624  *
 625  * Find/Create a null- complain mode profile used in learning mode.  The
 626  * name of the profile is unique and follows the format of parent//null-XXX.
 627  * where XXX is based on the @name or if that fails or is not supplied
 628  * a unique number
 629  *
 630  * null profiles are added to the profile list but the list does not
 631  * hold a count on them so that they are automatically released when
 632  * not in use.
 633  *
 634  * Returns: new refcounted profile else NULL on failure
 635  */
 636 struct aa_profile *aa_new_learning_profile(struct aa_profile *parent, bool hat,
 637                                            const char *base, gfp_t gfp)
 638 {
 639         struct aa_profile *p, *profile;
 640         const char *bname;
 641         char *name = NULL;
 642
 643         AA_BUG(!parent);
 644
 645         if (base) {
 646                 name = kmalloc(strlen(parent->base.hname) + 8 + strlen(base),
 647                                gfp);
 648                 if (name) {
 649                         sprintf(name, "%s//null-%s", parent->base.hname, base);
 650                         goto name;
 651                 }
 652                 /* fall through to try shorter uniq */
 653         }
 654
 655         name = kmalloc(strlen(parent->base.hname) + 2 + 7 + 8, gfp);
 656         if (!name)
 657                 return NULL;
 658         sprintf(name, "%s//null-%x", parent->base.hname,
 659                 atomic_inc_return(&parent->ns->uniq_null));
 660
 661 name:
 662         /* lookup to see if this is a dup creation */
 663         bname = basename(name);
 664         profile = aa_find_child(parent, bname);
 665         if (profile)
 666                 goto out;
 667
 668         profile = aa_alloc_null(parent, name, gfp);
 669         if (!profile)
 670                 goto fail;
 671         profile->mode = APPARMOR_COMPLAIN;
 672         if (hat)
 673                 profile->label.flags |= FLAG_HAT;
 674
 675         mutex_lock_nested(&profile->ns->lock, profile->ns->level);
 676         p = __find_child(&parent->base.profiles, bname);
 677         if (p) {
 678                 aa_free_profile(profile);
 679                 profile = aa_get_profile(p);
 680         } else {
 681                 __add_profile(&parent->base.profiles, profile);
 682         }
 683         mutex_unlock(&profile->ns->lock);
 684
 685         /* refcount released by caller */
 686 out:
 687         kfree(name);
 688
 689         return profile;
 690
 691 fail:
 692         kfree(name);
 693         aa_free_profile(profile);
 694         return NULL;
 695 }
 696
 697 /**
 698  * replacement_allowed - test to see if replacement is allowed
 699  * @profile: profile to test if it can be replaced  (MAYBE NULL)
 700  * @noreplace: true if replacement shouldn't be allowed but addition is okay
 701  * @info: Returns - info about why replacement failed (NOT NULL)
 702  *
 703  * Returns: %0 if replacement allowed else error code
 704  */
 705 static int replacement_allowed(struct aa_profile *profile, int noreplace,
 706                                const char **info)
 707 {
 708         if (profile) {
 709                 if (profile->label.flags & FLAG_IMMUTIBLE) {
 710                         *info = "cannot replace immutable profile";
 711                         return -EPERM;
 712                 } else if (noreplace) {
 713                         *info = "profile already exists";
 714                         return -EEXIST;
 715                 }
 716         }
 717         return 0;
 718 }
 719
 720 /* audit callback for net specific fields */
 721 static void audit_cb(struct audit_buffer *ab, void *va)
 722 {
 723         struct common_audit_data *sa = va;
 724
 725         if (aad(sa)->iface.ns) {
 726                 audit_log_format(ab, " ns=");
 727                 audit_log_untrustedstring(ab, aad(sa)->iface.ns);
 728         }
 729 }
 730
 731 /**
 732  * audit_policy - Do auditing of policy changes
 733  * @label: label to check if it can manage policy
 734  * @op: policy operation being performed
 735  * @ns_name: name of namespace being manipulated
 736  * @name: name of profile being manipulated (NOT NULL)
 737  * @info: any extra information to be audited (MAYBE NULL)
 738  * @error: error code
 739  *
 740  * Returns: the error to be returned after audit is done
 741  */
 742 static int audit_policy(struct aa_label *label, const char *op,
 743                         const char *ns_name, const char *name,
 744                         const char *info, int error)
 745 {
 746         DEFINE_AUDIT_DATA(sa, LSM_AUDIT_DATA_NONE, AA_CLASS_NONE, op);
 747
 748         aad(&sa)->iface.ns = ns_name;
 749         aad(&sa)->name = name;
 750         aad(&sa)->info = info;
 751         aad(&sa)->error = error;
 752         aad(&sa)->label = label;
 753
 754         aa_audit_msg(AUDIT_APPARMOR_STATUS, &sa, audit_cb);
 755
 756         return error;
 757 }
 758
 759 /* don't call out to other LSMs in the stack for apparmor policy admin
 760  * permissions
 761  */
 762 static int policy_ns_capable(struct aa_label *label,
 763                              struct user_namespace *userns, int cap)
 764 {
 765         int err;
 766
 767         /* check for MAC_ADMIN cap in cred */
 768         err = cap_capable(current_cred(), userns, cap, CAP_OPT_NONE);
 769         if (!err)
 770                 err = aa_capable(label, cap, CAP_OPT_NONE);
 771
 772         return err;
 773 }
 774
 775 /**
 776  * aa_policy_view_capable - check if viewing policy in at @ns is allowed
 777  * label: label that is trying to view policy in ns
 778  * ns: namespace being viewed by @label (may be NULL if @label's ns)
 779  * Returns: true if viewing policy is allowed
 780  *
 781  * If @ns is NULL then the namespace being viewed is assumed to be the
 782  * tasks current namespace.
 783  */
 784 bool aa_policy_view_capable(struct aa_label *label, struct aa_ns *ns)
 785 {
 786         struct user_namespace *user_ns = current_user_ns();
 787         struct aa_ns *view_ns = labels_view(label);
 788         bool root_in_user_ns = uid_eq(current_euid(), make_kuid(user_ns, 0)) ||
 789                                in_egroup_p(make_kgid(user_ns, 0));
 790         bool response = false;
 791         if (!ns)
 792                 ns = view_ns;
 793
 794         if (root_in_user_ns && aa_ns_visible(view_ns, ns, true) &&
 795             (user_ns == &init_user_ns ||
 796              (unprivileged_userns_apparmor_policy != 0 &&
 797               user_ns->level == view_ns->level)))
 798                 response = true;
 799
 800         return response;
 801 }
 802
 803 bool aa_policy_admin_capable(struct aa_label *label, struct aa_ns *ns)
 804 {
 805         struct user_namespace *user_ns = current_user_ns();
 806         bool capable = policy_ns_capable(label, user_ns, CAP_MAC_ADMIN) == 0;
 807
 808         AA_DEBUG("cap_mac_admin? %d\n", capable);
 809         AA_DEBUG("policy locked? %d\n", aa_g_lock_policy);
 810
 811         return aa_policy_view_capable(label, ns) && capable &&
 812                 !aa_g_lock_policy;
 813 }
 814
 815 bool aa_current_policy_view_capable(struct aa_ns *ns)
 816 {
 817         struct aa_label *label;
 818         bool res;
 819
 820         label = __begin_current_label_crit_section();
 821         res = aa_policy_view_capable(label, ns);
 822         __end_current_label_crit_section(label);
 823
 824         return res;
 825 }
 826
 827 bool aa_current_policy_admin_capable(struct aa_ns *ns)
 828 {
 829         struct aa_label *label;
 830         bool res;
 831
 832         label = __begin_current_label_crit_section();
 833         res = aa_policy_admin_capable(label, ns);
 834         __end_current_label_crit_section(label);
 835
 836         return res;
 837 }
 838
 839 /**
 840  * aa_may_manage_policy - can the current task manage policy
 841  * @label: label to check if it can manage policy
 842  * @mask: contains the policy manipulation operation being done
 843  *
 844  * Returns: 0 if the task is allowed to manipulate policy else error
 845  */
 846 int aa_may_manage_policy(struct aa_label *label, struct aa_ns *ns, u32 mask)
 847 {
 848         const char *op;
 849
 850         if (mask & AA_MAY_REMOVE_POLICY)
 851                 op = OP_PROF_RM;
 852         else if (mask & AA_MAY_REPLACE_POLICY)
 853                 op = OP_PROF_REPL;
 854         else
 855                 op = OP_PROF_LOAD;
 856
 857         /* check if loading policy is locked out */
 858         if (aa_g_lock_policy)
 859                 return audit_policy(label, op, NULL, NULL, "policy_locked",
 860                                     -EACCES);
 861
 862         if (!aa_policy_admin_capable(label, ns))
 863                 return audit_policy(label, op, NULL, NULL, "not policy admin",
 864                                     -EACCES);
 865
 866         /* TODO: add fine grained mediation of policy loads */
 867         return 0;
 868 }
 869
 870 static struct aa_profile *__list_lookup_parent(struct list_head *lh,
 871                                                struct aa_profile *profile)
 872 {
 873         const char *base = basename(profile->base.hname);
 874         long len = base - profile->base.hname;
 875         struct aa_load_ent *ent;
 876
 877         /* parent won't have trailing // so remove from len */
 878         if (len <= 2)
 879                 return NULL;
 880         len -= 2;
 881
 882         list_for_each_entry(ent, lh, list) {
 883                 if (ent->new == profile)
 884                         continue;
 885                 if (strncmp(ent->new->base.hname, profile->base.hname, len) ==
 886                     0 && ent->new->base.hname[len] == 0)
 887                         return ent->new;
 888         }
 889
 890         return NULL;
 891 }
 892
 893 /**
 894  * __replace_profile - replace @old with @new on a list
 895  * @old: profile to be replaced  (NOT NULL)
 896  * @new: profile to replace @old with  (NOT NULL)
 897  *
 898  * Will duplicate and refcount elements that @new inherits from @old
 899  * and will inherit @old children.
 900  *
 901  * refcount @new for list, put @old list refcount
 902  *
 903  * Requires: namespace list lock be held, or list not be shared
 904  */
 905 static void __replace_profile(struct aa_profile *old, struct aa_profile *new)
 906 {
 907         struct aa_profile *child, *tmp;
 908
 909         if (!list_empty(&old->base.profiles)) {
 910                 LIST_HEAD(lh);
 911                 list_splice_init_rcu(&old->base.profiles, &lh, synchronize_rcu);
 912
 913                 list_for_each_entry_safe(child, tmp, &lh, base.list) {
 914                         struct aa_profile *p;
 915
 916                         list_del_init(&child->base.list);
 917                         p = __find_child(&new->base.profiles, child->base.name);
 918                         if (p) {
 919                                 /* @p replaces @child  */
 920                                 __replace_profile(child, p);
 921                                 continue;
 922                         }
 923
 924                         /* inherit @child and its children */
 925                         /* TODO: update hname of inherited children */
 926                         /* list refcount transferred to @new */
 927                         p = aa_deref_parent(child);
 928                         rcu_assign_pointer(child->parent, aa_get_profile(new));
 929                         list_add_rcu(&child->base.list, &new->base.profiles);
 930                         aa_put_profile(p);
 931                 }
 932         }
 933
 934         if (!rcu_access_pointer(new->parent)) {
 935                 struct aa_profile *parent = aa_deref_parent(old);
 936                 rcu_assign_pointer(new->parent, aa_get_profile(parent));
 937         }
 938         aa_label_replace(&old->label, &new->label);
 939         /* migrate dents must come after label replacement b/c update */
 940         __aafs_profile_migrate_dents(old, new);
 941
 942         if (list_empty(&new->base.list)) {
 943                 /* new is not on a list already */
 944                 list_replace_rcu(&old->base.list, &new->base.list);
 945                 aa_get_profile(new);
 946                 aa_put_profile(old);
 947         } else
 948                 __list_remove_profile(old);
 949 }
 950
 951 /**
 952  * __lookup_replace - lookup replacement information for a profile
 953  * @ns - namespace the lookup occurs in
 954  * @hname - name of profile to lookup
 955  * @noreplace - true if not replacing an existing profile
 956  * @p - Returns: profile to be replaced
 957  * @info - Returns: info string on why lookup failed
 958  *
 959  * Returns: profile to replace (no ref) on success else ptr error
 960  */
 961 static int __lookup_replace(struct aa_ns *ns, const char *hname,
 962                             bool noreplace, struct aa_profile **p,
 963                             const char **info)
 964 {
 965         *p = aa_get_profile(__lookup_profile(&ns->base, hname));
 966         if (*p) {
 967                 int error = replacement_allowed(*p, noreplace, info);
 968                 if (error) {
 969                         *info = "profile can not be replaced";
 970                         return error;
 971                 }
 972         }
 973
 974         return 0;
 975 }
 976
 977 static void share_name(struct aa_profile *old, struct aa_profile *new)
 978 {
 979         aa_put_str(new->base.hname);
 980         aa_get_str(old->base.hname);
 981         new->base.hname = old->base.hname;
 982         new->base.name = old->base.name;
 983         new->label.hname = old->label.hname;
 984 }
 985
 986 /* Update to newest version of parent after previous replacements
 987  * Returns: unrefcount newest version of parent
 988  */
 989 static struct aa_profile *update_to_newest_parent(struct aa_profile *new)
 990 {
 991         struct aa_profile *parent, *newest;
 992
 993         parent = rcu_dereference_protected(new->parent,
 994                                            mutex_is_locked(&new->ns->lock));
 995         newest = aa_get_newest_profile(parent);
 996
 997         /* parent replaced in this atomic set? */
 998         if (newest != parent) {
 999                 aa_put_profile(parent);
1000                 rcu_assign_pointer(new->parent, newest);
1001         } else
1002                 aa_put_profile(newest);
1003
1004         return newest;
1005 }
1006
1007 /**
1008  * aa_replace_profiles - replace profile(s) on the profile list
1009  * @policy_ns: namespace load is occurring on
1010  * @label: label that is attempting to load/replace policy
1011  * @mask: permission mask
1012  * @udata: serialized data stream  (NOT NULL)
1013  *
1014  * unpack and replace a profile on the profile list and uses of that profile
1015  * by any task creds via invalidating the old version of the profile, which
1016  * tasks will notice to update their own cred.  If the profile does not exist
1017  * on the profile list it is added.
1018  *
1019  * Returns: size of data consumed else error code on failure.
1020  */
1021 ssize_t aa_replace_profiles(struct aa_ns *policy_ns, struct aa_label *label,
1022                             u32 mask, struct aa_loaddata *udata)
1023 {
1024         const char *ns_name = NULL, *info = NULL;
1025         struct aa_ns *ns = NULL;
1026         struct aa_load_ent *ent, *tmp;
1027         struct aa_loaddata *rawdata_ent;
1028         const char *op;
1029         ssize_t count, error;
1030         LIST_HEAD(lh);
1031
1032         op = mask & AA_MAY_REPLACE_POLICY ? OP_PROF_REPL : OP_PROF_LOAD;
1033         aa_get_loaddata(udata);
1034         /* released below */
1035         error = aa_unpack(udata, &lh, &ns_name);
1036         if (error)
1037                 goto out;
1038
1039         /* ensure that profiles are all for the same ns
1040          * TODO: update locking to remove this constaint. All profiles in
1041          *       the load set must succeed as a set or the load will
1042          *       fail. Sort ent list and take ns locks in hierarchy order
1043          */
1044         count = 0;
1045         list_for_each_entry(ent, &lh, list) {
1046                 if (ns_name) {
1047                         if (ent->ns_name &&
1048                             strcmp(ent->ns_name, ns_name) != 0) {
1049                                 info = "policy load has mixed namespaces";
1050                                 error = -EACCES;
1051                                 goto fail;
1052                         }
1053                 } else if (ent->ns_name) {
1054                         if (count) {
1055                                 info = "policy load has mixed namespaces";
1056                                 error = -EACCES;
1057                                 goto fail;
1058                         }
1059                         ns_name = ent->ns_name;
1060                 } else
1061                         count++;
1062         }
1063         if (ns_name) {
1064                 ns = aa_prepare_ns(policy_ns ? policy_ns : labels_ns(label),
1065                                    ns_name);
1066                 if (IS_ERR(ns)) {
1067                         op = OP_PROF_LOAD;
1068                         info = "failed to prepare namespace";
1069                         error = PTR_ERR(ns);
1070                         ns = NULL;
1071                         ent = NULL;
1072                         goto fail;
1073                 }
1074         } else
1075                 ns = aa_get_ns(policy_ns ? policy_ns : labels_ns(label));
1076
1077         mutex_lock_nested(&ns->lock, ns->level);
1078         /* check for duplicate rawdata blobs: space and file dedup */
1079         if (!list_empty(&ns->rawdata_list)) {
1080                 list_for_each_entry(rawdata_ent, &ns->rawdata_list, list) {
1081                         if (aa_rawdata_eq(rawdata_ent, udata)) {
1082                                 struct aa_loaddata *tmp;
1083
1084                                 tmp = __aa_get_loaddata(rawdata_ent);
1085                                 /* check we didn't fail the race */
1086                                 if (tmp) {
1087                                         aa_put_loaddata(udata);
1088                                         udata = tmp;
1089                                         break;
1090                                 }
1091                         }
1092                 }
1093         }
1094         /* setup parent and ns info */
1095         list_for_each_entry(ent, &lh, list) {
1096                 struct aa_policy *policy;
1097                 struct aa_profile *p;
1098
1099                 if (aa_g_export_binary)
1100                         ent->new->rawdata = aa_get_loaddata(udata);
1101                 error = __lookup_replace(ns, ent->new->base.hname,
1102                                          !(mask & AA_MAY_REPLACE_POLICY),
1103                                          &ent->old, &info);
1104                 if (error)
1105                         goto fail_lock;
1106
1107                 if (ent->new->rename) {
1108                         error = __lookup_replace(ns, ent->new->rename,
1109                                                 !(mask & AA_MAY_REPLACE_POLICY),
1110                                                 &ent->rename, &info);
1111                         if (error)
1112                                 goto fail_lock;
1113                 }
1114
1115                 /* released when @new is freed */
1116                 ent->new->ns = aa_get_ns(ns);
1117
1118                 if (ent->old || ent->rename)
1119                         continue;
1120
1121                 /* no ref on policy only use inside lock */
1122                 p = NULL;
1123                 policy = __lookup_parent(ns, ent->new->base.hname);
1124                 if (!policy) {
1125                         /* first check for parent in the load set */
1126                         p = __list_lookup_parent(&lh, ent->new);
1127                         if (!p) {
1128                                 /*
1129                                  * fill in missing parent with null
1130                                  * profile that doesn't have
1131                                  * permissions. This allows for
1132                                  * individual profile loading where
1133                                  * the child is loaded before the
1134                                  * parent, and outside of the current
1135                                  * atomic set. This unfortunately can
1136                                  * happen with some userspaces.  The
1137                                  * null profile will be replaced once
1138                                  * the parent is loaded.
1139                                  */
1140                                 policy = __create_missing_ancestors(ns,
1141                                                         ent->new->base.hname,
1142                                                         GFP_KERNEL);
1143                                 if (!policy) {
1144                                         error = -ENOENT;
1145                                         info = "parent does not exist";
1146                                         goto fail_lock;
1147                                 }
1148                         }
1149                 }
1150                 if (!p && policy != &ns->base)
1151                         /* released on profile replacement or free_profile */
1152                         p = (struct aa_profile *) policy;
1153                 rcu_assign_pointer(ent->new->parent, aa_get_profile(p));
1154         }
1155
1156         /* create new fs entries for introspection if needed */
1157         if (!udata->dents[AAFS_LOADDATA_DIR] && aa_g_export_binary) {
1158                 error = __aa_fs_create_rawdata(ns, udata);
1159                 if (error) {
1160                         info = "failed to create raw_data dir and files";
1161                         ent = NULL;
1162                         goto fail_lock;
1163                 }
1164         }
1165         list_for_each_entry(ent, &lh, list) {
1166                 if (!ent->old) {
1167                         struct dentry *parent;
1168                         if (rcu_access_pointer(ent->new->parent)) {
1169                                 struct aa_profile *p;
1170                                 p = aa_deref_parent(ent->new);
1171                                 parent = prof_child_dir(p);
1172                         } else
1173                                 parent = ns_subprofs_dir(ent->new->ns);
1174                         error = __aafs_profile_mkdir(ent->new, parent);
1175                 }
1176
1177                 if (error) {
1178                         info = "failed to create";
1179                         goto fail_lock;
1180                 }
1181         }
1182
1183         /* Done with checks that may fail - do actual replacement */
1184         __aa_bump_ns_revision(ns);
1185         if (aa_g_export_binary)
1186                 __aa_loaddata_update(udata, ns->revision);
1187         list_for_each_entry_safe(ent, tmp, &lh, list) {
1188                 list_del_init(&ent->list);
1189                 op = (!ent->old && !ent->rename) ? OP_PROF_LOAD : OP_PROF_REPL;
1190
1191                 if (ent->old && ent->old->rawdata == ent->new->rawdata &&
1192                     ent->new->rawdata) {
1193                         /* dedup actual profile replacement */
1194                         audit_policy(label, op, ns_name, ent->new->base.hname,
1195                                      "same as current profile, skipping",
1196                                      error);
1197                         /* break refcount cycle with proxy. */
1198                         aa_put_proxy(ent->new->label.proxy);
1199                         ent->new->label.proxy = NULL;
1200                         goto skip;
1201                 }
1202
1203                 /*
1204                  * TODO: finer dedup based on profile range in data. Load set
1205                  * can differ but profile may remain unchanged
1206                  */
1207                 audit_policy(label, op, ns_name, ent->new->base.hname, NULL,
1208                              error);
1209
1210                 if (ent->old) {
1211                         share_name(ent->old, ent->new);
1212                         __replace_profile(ent->old, ent->new);
1213                 } else {
1214                         struct list_head *lh;
1215
1216                         if (rcu_access_pointer(ent->new->parent)) {
1217                                 struct aa_profile *parent;
1218
1219                                 parent = update_to_newest_parent(ent->new);
1220                                 lh = &parent->base.profiles;
1221                         } else
1222                                 lh = &ns->base.profiles;
1223                         __add_profile(lh, ent->new);
1224                 }
1225         skip:
1226                 aa_load_ent_free(ent);
1227         }
1228         __aa_labelset_update_subtree(ns);
1229         mutex_unlock(&ns->lock);
1230
1231 out:
1232         aa_put_ns(ns);
1233         aa_put_loaddata(udata);
1234         kfree(ns_name);
1235
1236         if (error)
1237                 return error;
1238         return udata->size;
1239
1240 fail_lock:
1241         mutex_unlock(&ns->lock);
1242
1243         /* audit cause of failure */
1244         op = (ent && !ent->old) ? OP_PROF_LOAD : OP_PROF_REPL;
1245 fail:
1246           audit_policy(label, op, ns_name, ent ? ent->new->base.hname : NULL,
1247                        info, error);
1248         /* audit status that rest of profiles in the atomic set failed too */
1249         info = "valid profile in failed atomic policy load";
1250         list_for_each_entry(tmp, &lh, list) {
1251                 if (tmp == ent) {
1252                         info = "unchecked profile in failed atomic policy load";
1253                         /* skip entry that caused failure */
1254                         continue;
1255                 }
1256                 op = (!tmp->old) ? OP_PROF_LOAD : OP_PROF_REPL;
1257                 audit_policy(label, op, ns_name, tmp->new->base.hname, info,
1258                              error);
1259         }
1260         list_for_each_entry_safe(ent, tmp, &lh, list) {
1261                 list_del_init(&ent->list);
1262                 aa_load_ent_free(ent);
1263         }
1264
1265         goto out;
1266 }
1267
1268 /**
1269  * aa_remove_profiles - remove profile(s) from the system
1270  * @policy_ns: namespace the remove is being done from
1271  * @subj: label attempting to remove policy
1272  * @fqname: name of the profile or namespace to remove  (NOT NULL)
1273  * @size: size of the name
1274  *
1275  * Remove a profile or sub namespace from the current namespace, so that
1276  * they can not be found anymore and mark them as replaced by unconfined
1277  *
1278  * NOTE: removing confinement does not restore rlimits to preconfinement values
1279  *
1280  * Returns: size of data consume else error code if fails
1281  */
1282 ssize_t aa_remove_profiles(struct aa_ns *policy_ns, struct aa_label *subj,
1283                            char *fqname, size_t size)
1284 {
1285         struct aa_ns *ns = NULL;
1286         struct aa_profile *profile = NULL;
1287         const char *name = fqname, *info = NULL;
1288         const char *ns_name = NULL;
1289         ssize_t error = 0;
1290
1291         if (*fqname == 0) {
1292                 info = "no profile specified";
1293                 error = -ENOENT;
1294                 goto fail;
1295         }
1296
1297         if (fqname[0] == ':') {
1298                 size_t ns_len;
1299
1300                 name = aa_splitn_fqname(fqname, size, &ns_name, &ns_len);
1301                 /* released below */
1302                 ns = aa_lookupn_ns(policy_ns ? policy_ns : labels_ns(subj),
1303                                    ns_name, ns_len);
1304                 if (!ns) {
1305                         info = "namespace does not exist";
1306                         error = -ENOENT;
1307                         goto fail;
1308                 }
1309         } else
1310                 /* released below */
1311                 ns = aa_get_ns(policy_ns ? policy_ns : labels_ns(subj));
1312
1313         if (!name) {
1314                 /* remove namespace - can only happen if fqname[0] == ':' */
1315                 mutex_lock_nested(&ns->parent->lock, ns->parent->level);
1316                 __aa_bump_ns_revision(ns);
1317                 __aa_remove_ns(ns);
1318                 mutex_unlock(&ns->parent->lock);
1319         } else {
1320                 /* remove profile */
1321                 mutex_lock_nested(&ns->lock, ns->level);
1322                 profile = aa_get_profile(__lookup_profile(&ns->base, name));
1323                 if (!profile) {
1324                         error = -ENOENT;
1325                         info = "profile does not exist";
1326                         goto fail_ns_lock;
1327                 }
1328                 name = profile->base.hname;
1329                 __aa_bump_ns_revision(ns);
1330                 __remove_profile(profile);
1331                 __aa_labelset_update_subtree(ns);
1332                 mutex_unlock(&ns->lock);
1333         }
1334
1335         /* don't fail removal if audit fails */
1336         (void) audit_policy(subj, OP_PROF_RM, ns_name, name, info,
1337                             error);
1338         aa_put_ns(ns);
1339         aa_put_profile(profile);
1340         return size;
1341
1342 fail_ns_lock:
1343         mutex_unlock(&ns->lock);
1344         aa_put_ns(ns);
1345
1346 fail:
1347         (void) audit_policy(subj, OP_PROF_RM, ns_name, name, info,
1348                             error);
1349         return error;
1350 }