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