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