security/apparmor/policy.c

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