]> git.ipfire.org Git - thirdparty/linux.git/blob - security/apparmor/domain.c
Merge tag 'io_uring-5.7-2020-05-22' of git://git.kernel.dk/linux-block
[thirdparty/linux.git] / security / apparmor / domain.c
1 // SPDX-License-Identifier: GPL-2.0-only
2 /*
3 * AppArmor security module
4 *
5 * This file contains AppArmor policy attachment and domain transitions
6 *
7 * Copyright (C) 2002-2008 Novell/SUSE
8 * Copyright 2009-2010 Canonical Ltd.
9 */
10
11 #include <linux/errno.h>
12 #include <linux/fdtable.h>
13 #include <linux/file.h>
14 #include <linux/mount.h>
15 #include <linux/syscalls.h>
16 #include <linux/tracehook.h>
17 #include <linux/personality.h>
18 #include <linux/xattr.h>
19
20 #include "include/audit.h"
21 #include "include/apparmorfs.h"
22 #include "include/cred.h"
23 #include "include/domain.h"
24 #include "include/file.h"
25 #include "include/ipc.h"
26 #include "include/match.h"
27 #include "include/path.h"
28 #include "include/policy.h"
29 #include "include/policy_ns.h"
30
31 /**
32 * aa_free_domain_entries - free entries in a domain table
33 * @domain: the domain table to free (MAYBE NULL)
34 */
35 void aa_free_domain_entries(struct aa_domain *domain)
36 {
37 int i;
38 if (domain) {
39 if (!domain->table)
40 return;
41
42 for (i = 0; i < domain->size; i++)
43 kzfree(domain->table[i]);
44 kzfree(domain->table);
45 domain->table = NULL;
46 }
47 }
48
49 /**
50 * may_change_ptraced_domain - check if can change profile on ptraced task
51 * @to_label: profile to change to (NOT NULL)
52 * @info: message if there is an error
53 *
54 * Check if current is ptraced and if so if the tracing task is allowed
55 * to trace the new domain
56 *
57 * Returns: %0 or error if change not allowed
58 */
59 static int may_change_ptraced_domain(struct aa_label *to_label,
60 const char **info)
61 {
62 struct task_struct *tracer;
63 struct aa_label *tracerl = NULL;
64 int error = 0;
65
66 rcu_read_lock();
67 tracer = ptrace_parent(current);
68 if (tracer)
69 /* released below */
70 tracerl = aa_get_task_label(tracer);
71
72 /* not ptraced */
73 if (!tracer || unconfined(tracerl))
74 goto out;
75
76 error = aa_may_ptrace(tracerl, to_label, PTRACE_MODE_ATTACH);
77
78 out:
79 rcu_read_unlock();
80 aa_put_label(tracerl);
81
82 if (error)
83 *info = "ptrace prevents transition";
84 return error;
85 }
86
87 /**** TODO: dedup to aa_label_match - needs perm and dfa, merging
88 * specifically this is an exact copy of aa_label_match except
89 * aa_compute_perms is replaced with aa_compute_fperms
90 * and policy.dfa with file.dfa
91 ****/
92 /* match a profile and its associated ns component if needed
93 * Assumes visibility test has already been done.
94 * If a subns profile is not to be matched should be prescreened with
95 * visibility test.
96 */
97 static inline unsigned int match_component(struct aa_profile *profile,
98 struct aa_profile *tp,
99 bool stack, unsigned int state)
100 {
101 const char *ns_name;
102
103 if (stack)
104 state = aa_dfa_match(profile->file.dfa, state, "&");
105 if (profile->ns == tp->ns)
106 return aa_dfa_match(profile->file.dfa, state, tp->base.hname);
107
108 /* try matching with namespace name and then profile */
109 ns_name = aa_ns_name(profile->ns, tp->ns, true);
110 state = aa_dfa_match_len(profile->file.dfa, state, ":", 1);
111 state = aa_dfa_match(profile->file.dfa, state, ns_name);
112 state = aa_dfa_match_len(profile->file.dfa, state, ":", 1);
113 return aa_dfa_match(profile->file.dfa, state, tp->base.hname);
114 }
115
116 /**
117 * label_compound_match - find perms for full compound label
118 * @profile: profile to find perms for
119 * @label: label to check access permissions for
120 * @stack: whether this is a stacking request
121 * @start: state to start match in
122 * @subns: whether to do permission checks on components in a subns
123 * @request: permissions to request
124 * @perms: perms struct to set
125 *
126 * Returns: 0 on success else ERROR
127 *
128 * For the label A//&B//&C this does the perm match for A//&B//&C
129 * @perms should be preinitialized with allperms OR a previous permission
130 * check to be stacked.
131 */
132 static int label_compound_match(struct aa_profile *profile,
133 struct aa_label *label, bool stack,
134 unsigned int state, bool subns, u32 request,
135 struct aa_perms *perms)
136 {
137 struct aa_profile *tp;
138 struct label_it i;
139 struct path_cond cond = { };
140
141 /* find first subcomponent that is visible */
142 label_for_each(i, label, tp) {
143 if (!aa_ns_visible(profile->ns, tp->ns, subns))
144 continue;
145 state = match_component(profile, tp, stack, state);
146 if (!state)
147 goto fail;
148 goto next;
149 }
150
151 /* no component visible */
152 *perms = allperms;
153 return 0;
154
155 next:
156 label_for_each_cont(i, label, tp) {
157 if (!aa_ns_visible(profile->ns, tp->ns, subns))
158 continue;
159 state = aa_dfa_match(profile->file.dfa, state, "//&");
160 state = match_component(profile, tp, false, state);
161 if (!state)
162 goto fail;
163 }
164 *perms = aa_compute_fperms(profile->file.dfa, state, &cond);
165 aa_apply_modes_to_perms(profile, perms);
166 if ((perms->allow & request) != request)
167 return -EACCES;
168
169 return 0;
170
171 fail:
172 *perms = nullperms;
173 return -EACCES;
174 }
175
176 /**
177 * label_components_match - find perms for all subcomponents of a label
178 * @profile: profile to find perms for
179 * @label: label to check access permissions for
180 * @stack: whether this is a stacking request
181 * @start: state to start match in
182 * @subns: whether to do permission checks on components in a subns
183 * @request: permissions to request
184 * @perms: an initialized perms struct to add accumulation to
185 *
186 * Returns: 0 on success else ERROR
187 *
188 * For the label A//&B//&C this does the perm match for each of A and B and C
189 * @perms should be preinitialized with allperms OR a previous permission
190 * check to be stacked.
191 */
192 static int label_components_match(struct aa_profile *profile,
193 struct aa_label *label, bool stack,
194 unsigned int start, bool subns, u32 request,
195 struct aa_perms *perms)
196 {
197 struct aa_profile *tp;
198 struct label_it i;
199 struct aa_perms tmp;
200 struct path_cond cond = { };
201 unsigned int state = 0;
202
203 /* find first subcomponent to test */
204 label_for_each(i, label, tp) {
205 if (!aa_ns_visible(profile->ns, tp->ns, subns))
206 continue;
207 state = match_component(profile, tp, stack, start);
208 if (!state)
209 goto fail;
210 goto next;
211 }
212
213 /* no subcomponents visible - no change in perms */
214 return 0;
215
216 next:
217 tmp = aa_compute_fperms(profile->file.dfa, state, &cond);
218 aa_apply_modes_to_perms(profile, &tmp);
219 aa_perms_accum(perms, &tmp);
220 label_for_each_cont(i, label, tp) {
221 if (!aa_ns_visible(profile->ns, tp->ns, subns))
222 continue;
223 state = match_component(profile, tp, stack, start);
224 if (!state)
225 goto fail;
226 tmp = aa_compute_fperms(profile->file.dfa, state, &cond);
227 aa_apply_modes_to_perms(profile, &tmp);
228 aa_perms_accum(perms, &tmp);
229 }
230
231 if ((perms->allow & request) != request)
232 return -EACCES;
233
234 return 0;
235
236 fail:
237 *perms = nullperms;
238 return -EACCES;
239 }
240
241 /**
242 * label_match - do a multi-component label match
243 * @profile: profile to match against (NOT NULL)
244 * @label: label to match (NOT NULL)
245 * @stack: whether this is a stacking request
246 * @state: state to start in
247 * @subns: whether to match subns components
248 * @request: permission request
249 * @perms: Returns computed perms (NOT NULL)
250 *
251 * Returns: the state the match finished in, may be the none matching state
252 */
253 static int label_match(struct aa_profile *profile, struct aa_label *label,
254 bool stack, unsigned int state, bool subns, u32 request,
255 struct aa_perms *perms)
256 {
257 int error;
258
259 *perms = nullperms;
260 error = label_compound_match(profile, label, stack, state, subns,
261 request, perms);
262 if (!error)
263 return error;
264
265 *perms = allperms;
266 return label_components_match(profile, label, stack, state, subns,
267 request, perms);
268 }
269
270 /******* end TODO: dedup *****/
271
272 /**
273 * change_profile_perms - find permissions for change_profile
274 * @profile: the current profile (NOT NULL)
275 * @target: label to transition to (NOT NULL)
276 * @stack: whether this is a stacking request
277 * @request: requested perms
278 * @start: state to start matching in
279 *
280 *
281 * Returns: permission set
282 *
283 * currently only matches full label A//&B//&C or individual components A, B, C
284 * not arbitrary combinations. Eg. A//&B, C
285 */
286 static int change_profile_perms(struct aa_profile *profile,
287 struct aa_label *target, bool stack,
288 u32 request, unsigned int start,
289 struct aa_perms *perms)
290 {
291 if (profile_unconfined(profile)) {
292 perms->allow = AA_MAY_CHANGE_PROFILE | AA_MAY_ONEXEC;
293 perms->audit = perms->quiet = perms->kill = 0;
294 return 0;
295 }
296
297 /* TODO: add profile in ns screening */
298 return label_match(profile, target, stack, start, true, request, perms);
299 }
300
301 /**
302 * aa_xattrs_match - check whether a file matches the xattrs defined in profile
303 * @bprm: binprm struct for the process to validate
304 * @profile: profile to match against (NOT NULL)
305 * @state: state to start match in
306 *
307 * Returns: number of extended attributes that matched, or < 0 on error
308 */
309 static int aa_xattrs_match(const struct linux_binprm *bprm,
310 struct aa_profile *profile, unsigned int state)
311 {
312 int i;
313 ssize_t size;
314 struct dentry *d;
315 char *value = NULL;
316 int value_size = 0, ret = profile->xattr_count;
317
318 if (!bprm || !profile->xattr_count)
319 return 0;
320 might_sleep();
321
322 /* transition from exec match to xattr set */
323 state = aa_dfa_null_transition(profile->xmatch, state);
324
325 d = bprm->file->f_path.dentry;
326
327 for (i = 0; i < profile->xattr_count; i++) {
328 size = vfs_getxattr_alloc(d, profile->xattrs[i], &value,
329 value_size, GFP_KERNEL);
330 if (size >= 0) {
331 u32 perm;
332
333 /* Check the xattr value, not just presence */
334 state = aa_dfa_match_len(profile->xmatch, state, value,
335 size);
336 perm = dfa_user_allow(profile->xmatch, state);
337 if (!(perm & MAY_EXEC)) {
338 ret = -EINVAL;
339 goto out;
340 }
341 }
342 /* transition to next element */
343 state = aa_dfa_null_transition(profile->xmatch, state);
344 if (size < 0) {
345 /*
346 * No xattr match, so verify if transition to
347 * next element was valid. IFF so the xattr
348 * was optional.
349 */
350 if (!state) {
351 ret = -EINVAL;
352 goto out;
353 }
354 /* don't count missing optional xattr as matched */
355 ret--;
356 }
357 }
358
359 out:
360 kfree(value);
361 return ret;
362 }
363
364 /**
365 * find_attach - do attachment search for unconfined processes
366 * @bprm - binprm structure of transitioning task
367 * @ns: the current namespace (NOT NULL)
368 * @head - profile list to walk (NOT NULL)
369 * @name - to match against (NOT NULL)
370 * @info - info message if there was an error (NOT NULL)
371 *
372 * Do a linear search on the profiles in the list. There is a matching
373 * preference where an exact match is preferred over a name which uses
374 * expressions to match, and matching expressions with the greatest
375 * xmatch_len are preferred.
376 *
377 * Requires: @head not be shared or have appropriate locks held
378 *
379 * Returns: label or NULL if no match found
380 */
381 static struct aa_label *find_attach(const struct linux_binprm *bprm,
382 struct aa_ns *ns, struct list_head *head,
383 const char *name, const char **info)
384 {
385 int candidate_len = 0, candidate_xattrs = 0;
386 bool conflict = false;
387 struct aa_profile *profile, *candidate = NULL;
388
389 AA_BUG(!name);
390 AA_BUG(!head);
391
392 rcu_read_lock();
393 restart:
394 list_for_each_entry_rcu(profile, head, base.list) {
395 if (profile->label.flags & FLAG_NULL &&
396 &profile->label == ns_unconfined(profile->ns))
397 continue;
398
399 /* Find the "best" matching profile. Profiles must
400 * match the path and extended attributes (if any)
401 * associated with the file. A more specific path
402 * match will be preferred over a less specific one,
403 * and a match with more matching extended attributes
404 * will be preferred over one with fewer. If the best
405 * match has both the same level of path specificity
406 * and the same number of matching extended attributes
407 * as another profile, signal a conflict and refuse to
408 * match.
409 */
410 if (profile->xmatch) {
411 unsigned int state, count;
412 u32 perm;
413
414 state = aa_dfa_leftmatch(profile->xmatch, DFA_START,
415 name, &count);
416 perm = dfa_user_allow(profile->xmatch, state);
417 /* any accepting state means a valid match. */
418 if (perm & MAY_EXEC) {
419 int ret = 0;
420
421 if (count < candidate_len)
422 continue;
423
424 if (bprm && profile->xattr_count) {
425 long rev = READ_ONCE(ns->revision);
426
427 if (!aa_get_profile_not0(profile))
428 goto restart;
429 rcu_read_unlock();
430 ret = aa_xattrs_match(bprm, profile,
431 state);
432 rcu_read_lock();
433 aa_put_profile(profile);
434 if (rev !=
435 READ_ONCE(ns->revision))
436 /* policy changed */
437 goto restart;
438 /*
439 * Fail matching if the xattrs don't
440 * match
441 */
442 if (ret < 0)
443 continue;
444 }
445 /*
446 * TODO: allow for more flexible best match
447 *
448 * The new match isn't more specific
449 * than the current best match
450 */
451 if (count == candidate_len &&
452 ret <= candidate_xattrs) {
453 /* Match is equivalent, so conflict */
454 if (ret == candidate_xattrs)
455 conflict = true;
456 continue;
457 }
458
459 /* Either the same length with more matching
460 * xattrs, or a longer match
461 */
462 candidate = profile;
463 candidate_len = profile->xmatch_len;
464 candidate_xattrs = ret;
465 conflict = false;
466 }
467 } else if (!strcmp(profile->base.name, name)) {
468 /*
469 * old exact non-re match, without conditionals such
470 * as xattrs. no more searching required
471 */
472 candidate = profile;
473 goto out;
474 }
475 }
476
477 if (!candidate || conflict) {
478 if (conflict)
479 *info = "conflicting profile attachments";
480 rcu_read_unlock();
481 return NULL;
482 }
483
484 out:
485 candidate = aa_get_newest_profile(candidate);
486 rcu_read_unlock();
487
488 return &candidate->label;
489 }
490
491 static const char *next_name(int xtype, const char *name)
492 {
493 return NULL;
494 }
495
496 /**
497 * x_table_lookup - lookup an x transition name via transition table
498 * @profile: current profile (NOT NULL)
499 * @xindex: index into x transition table
500 * @name: returns: name tested to find label (NOT NULL)
501 *
502 * Returns: refcounted label, or NULL on failure (MAYBE NULL)
503 */
504 struct aa_label *x_table_lookup(struct aa_profile *profile, u32 xindex,
505 const char **name)
506 {
507 struct aa_label *label = NULL;
508 u32 xtype = xindex & AA_X_TYPE_MASK;
509 int index = xindex & AA_X_INDEX_MASK;
510
511 AA_BUG(!name);
512
513 /* index is guaranteed to be in range, validated at load time */
514 /* TODO: move lookup parsing to unpack time so this is a straight
515 * index into the resultant label
516 */
517 for (*name = profile->file.trans.table[index]; !label && *name;
518 *name = next_name(xtype, *name)) {
519 if (xindex & AA_X_CHILD) {
520 struct aa_profile *new_profile;
521 /* release by caller */
522 new_profile = aa_find_child(profile, *name);
523 if (new_profile)
524 label = &new_profile->label;
525 continue;
526 }
527 label = aa_label_parse(&profile->label, *name, GFP_KERNEL,
528 true, false);
529 if (IS_ERR(label))
530 label = NULL;
531 }
532
533 /* released by caller */
534
535 return label;
536 }
537
538 /**
539 * x_to_label - get target label for a given xindex
540 * @profile: current profile (NOT NULL)
541 * @bprm: binprm structure of transitioning task
542 * @name: name to lookup (NOT NULL)
543 * @xindex: index into x transition table
544 * @lookupname: returns: name used in lookup if one was specified (NOT NULL)
545 *
546 * find label for a transition index
547 *
548 * Returns: refcounted label or NULL if not found available
549 */
550 static struct aa_label *x_to_label(struct aa_profile *profile,
551 const struct linux_binprm *bprm,
552 const char *name, u32 xindex,
553 const char **lookupname,
554 const char **info)
555 {
556 struct aa_label *new = NULL;
557 struct aa_ns *ns = profile->ns;
558 u32 xtype = xindex & AA_X_TYPE_MASK;
559 const char *stack = NULL;
560
561 switch (xtype) {
562 case AA_X_NONE:
563 /* fail exec unless ix || ux fallback - handled by caller */
564 *lookupname = NULL;
565 break;
566 case AA_X_TABLE:
567 /* TODO: fix when perm mapping done at unload */
568 stack = profile->file.trans.table[xindex & AA_X_INDEX_MASK];
569 if (*stack != '&') {
570 /* released by caller */
571 new = x_table_lookup(profile, xindex, lookupname);
572 stack = NULL;
573 break;
574 }
575 /* fall through - to X_NAME */
576 case AA_X_NAME:
577 if (xindex & AA_X_CHILD)
578 /* released by caller */
579 new = find_attach(bprm, ns, &profile->base.profiles,
580 name, info);
581 else
582 /* released by caller */
583 new = find_attach(bprm, ns, &ns->base.profiles,
584 name, info);
585 *lookupname = name;
586 break;
587 }
588
589 if (!new) {
590 if (xindex & AA_X_INHERIT) {
591 /* (p|c|n)ix - don't change profile but do
592 * use the newest version
593 */
594 *info = "ix fallback";
595 /* no profile && no error */
596 new = aa_get_newest_label(&profile->label);
597 } else if (xindex & AA_X_UNCONFINED) {
598 new = aa_get_newest_label(ns_unconfined(profile->ns));
599 *info = "ux fallback";
600 }
601 }
602
603 if (new && stack) {
604 /* base the stack on post domain transition */
605 struct aa_label *base = new;
606
607 new = aa_label_parse(base, stack, GFP_KERNEL, true, false);
608 if (IS_ERR(new))
609 new = NULL;
610 aa_put_label(base);
611 }
612
613 /* released by caller */
614 return new;
615 }
616
617 static struct aa_label *profile_transition(struct aa_profile *profile,
618 const struct linux_binprm *bprm,
619 char *buffer, struct path_cond *cond,
620 bool *secure_exec)
621 {
622 struct aa_label *new = NULL;
623 struct aa_profile *component;
624 struct label_it i;
625 const char *info = NULL, *name = NULL, *target = NULL;
626 unsigned int state = profile->file.start;
627 struct aa_perms perms = {};
628 bool nonewprivs = false;
629 int error = 0;
630
631 AA_BUG(!profile);
632 AA_BUG(!bprm);
633 AA_BUG(!buffer);
634
635 error = aa_path_name(&bprm->file->f_path, profile->path_flags, buffer,
636 &name, &info, profile->disconnected);
637 if (error) {
638 if (profile_unconfined(profile) ||
639 (profile->label.flags & FLAG_IX_ON_NAME_ERROR)) {
640 AA_DEBUG("name lookup ix on error");
641 error = 0;
642 new = aa_get_newest_label(&profile->label);
643 }
644 name = bprm->filename;
645 goto audit;
646 }
647
648 if (profile_unconfined(profile)) {
649 new = find_attach(bprm, profile->ns,
650 &profile->ns->base.profiles, name, &info);
651 if (new) {
652 AA_DEBUG("unconfined attached to new label");
653 return new;
654 }
655 AA_DEBUG("unconfined exec no attachment");
656 return aa_get_newest_label(&profile->label);
657 }
658
659 /* find exec permissions for name */
660 state = aa_str_perms(profile->file.dfa, state, name, cond, &perms);
661 if (perms.allow & MAY_EXEC) {
662 /* exec permission determine how to transition */
663 new = x_to_label(profile, bprm, name, perms.xindex, &target,
664 &info);
665 if (new && new->proxy == profile->label.proxy && info) {
666 /* hack ix fallback - improve how this is detected */
667 goto audit;
668 } else if (!new) {
669 error = -EACCES;
670 info = "profile transition not found";
671 /* remove MAY_EXEC to audit as failure */
672 perms.allow &= ~MAY_EXEC;
673 } else {
674 /* verify that each component's xattr requirements are
675 * met, and fail execution otherwise
676 */
677 label_for_each(i, new, component) {
678 if (aa_xattrs_match(bprm, component, state) <
679 0) {
680 error = -EACCES;
681 info = "required xattrs not present";
682 perms.allow &= ~MAY_EXEC;
683 aa_put_label(new);
684 new = NULL;
685 goto audit;
686 }
687 }
688 }
689 } else if (COMPLAIN_MODE(profile)) {
690 /* no exec permission - learning mode */
691 struct aa_profile *new_profile = NULL;
692
693 new_profile = aa_new_null_profile(profile, false, name,
694 GFP_KERNEL);
695 if (!new_profile) {
696 error = -ENOMEM;
697 info = "could not create null profile";
698 } else {
699 error = -EACCES;
700 new = &new_profile->label;
701 }
702 perms.xindex |= AA_X_UNSAFE;
703 } else
704 /* fail exec */
705 error = -EACCES;
706
707 if (!new)
708 goto audit;
709
710
711 if (!(perms.xindex & AA_X_UNSAFE)) {
712 if (DEBUG_ON) {
713 dbg_printk("apparmor: scrubbing environment variables"
714 " for %s profile=", name);
715 aa_label_printk(new, GFP_KERNEL);
716 dbg_printk("\n");
717 }
718 *secure_exec = true;
719 }
720
721 audit:
722 aa_audit_file(profile, &perms, OP_EXEC, MAY_EXEC, name, target, new,
723 cond->uid, info, error);
724 if (!new || nonewprivs) {
725 aa_put_label(new);
726 return ERR_PTR(error);
727 }
728
729 return new;
730 }
731
732 static int profile_onexec(struct aa_profile *profile, struct aa_label *onexec,
733 bool stack, const struct linux_binprm *bprm,
734 char *buffer, struct path_cond *cond,
735 bool *secure_exec)
736 {
737 unsigned int state = profile->file.start;
738 struct aa_perms perms = {};
739 const char *xname = NULL, *info = "change_profile onexec";
740 int error = -EACCES;
741
742 AA_BUG(!profile);
743 AA_BUG(!onexec);
744 AA_BUG(!bprm);
745 AA_BUG(!buffer);
746
747 if (profile_unconfined(profile)) {
748 /* change_profile on exec already granted */
749 /*
750 * NOTE: Domain transitions from unconfined are allowed
751 * even when no_new_privs is set because this aways results
752 * in a further reduction of permissions.
753 */
754 return 0;
755 }
756
757 error = aa_path_name(&bprm->file->f_path, profile->path_flags, buffer,
758 &xname, &info, profile->disconnected);
759 if (error) {
760 if (profile_unconfined(profile) ||
761 (profile->label.flags & FLAG_IX_ON_NAME_ERROR)) {
762 AA_DEBUG("name lookup ix on error");
763 error = 0;
764 }
765 xname = bprm->filename;
766 goto audit;
767 }
768
769 /* find exec permissions for name */
770 state = aa_str_perms(profile->file.dfa, state, xname, cond, &perms);
771 if (!(perms.allow & AA_MAY_ONEXEC)) {
772 info = "no change_onexec valid for executable";
773 goto audit;
774 }
775 /* test if this exec can be paired with change_profile onexec.
776 * onexec permission is linked to exec with a standard pairing
777 * exec\0change_profile
778 */
779 state = aa_dfa_null_transition(profile->file.dfa, state);
780 error = change_profile_perms(profile, onexec, stack, AA_MAY_ONEXEC,
781 state, &perms);
782 if (error) {
783 perms.allow &= ~AA_MAY_ONEXEC;
784 goto audit;
785 }
786
787 if (!(perms.xindex & AA_X_UNSAFE)) {
788 if (DEBUG_ON) {
789 dbg_printk("apparmor: scrubbing environment "
790 "variables for %s label=", xname);
791 aa_label_printk(onexec, GFP_KERNEL);
792 dbg_printk("\n");
793 }
794 *secure_exec = true;
795 }
796
797 audit:
798 return aa_audit_file(profile, &perms, OP_EXEC, AA_MAY_ONEXEC, xname,
799 NULL, onexec, cond->uid, info, error);
800 }
801
802 /* ensure none ns domain transitions are correctly applied with onexec */
803
804 static struct aa_label *handle_onexec(struct aa_label *label,
805 struct aa_label *onexec, bool stack,
806 const struct linux_binprm *bprm,
807 char *buffer, struct path_cond *cond,
808 bool *unsafe)
809 {
810 struct aa_profile *profile;
811 struct aa_label *new;
812 int error;
813
814 AA_BUG(!label);
815 AA_BUG(!onexec);
816 AA_BUG(!bprm);
817 AA_BUG(!buffer);
818
819 if (!stack) {
820 error = fn_for_each_in_ns(label, profile,
821 profile_onexec(profile, onexec, stack,
822 bprm, buffer, cond, unsafe));
823 if (error)
824 return ERR_PTR(error);
825 new = fn_label_build_in_ns(label, profile, GFP_KERNEL,
826 aa_get_newest_label(onexec),
827 profile_transition(profile, bprm, buffer,
828 cond, unsafe));
829
830 } else {
831 /* TODO: determine how much we want to loosen this */
832 error = fn_for_each_in_ns(label, profile,
833 profile_onexec(profile, onexec, stack, bprm,
834 buffer, cond, unsafe));
835 if (error)
836 return ERR_PTR(error);
837 new = fn_label_build_in_ns(label, profile, GFP_KERNEL,
838 aa_label_merge(&profile->label, onexec,
839 GFP_KERNEL),
840 profile_transition(profile, bprm, buffer,
841 cond, unsafe));
842 }
843
844 if (new)
845 return new;
846
847 /* TODO: get rid of GLOBAL_ROOT_UID */
848 error = fn_for_each_in_ns(label, profile,
849 aa_audit_file(profile, &nullperms, OP_CHANGE_ONEXEC,
850 AA_MAY_ONEXEC, bprm->filename, NULL,
851 onexec, GLOBAL_ROOT_UID,
852 "failed to build target label", -ENOMEM));
853 return ERR_PTR(error);
854 }
855
856 /**
857 * apparmor_bprm_set_creds - set the new creds on the bprm struct
858 * @bprm: binprm for the exec (NOT NULL)
859 *
860 * Returns: %0 or error on failure
861 *
862 * TODO: once the other paths are done see if we can't refactor into a fn
863 */
864 int apparmor_bprm_set_creds(struct linux_binprm *bprm)
865 {
866 struct aa_task_ctx *ctx;
867 struct aa_label *label, *new = NULL;
868 struct aa_profile *profile;
869 char *buffer = NULL;
870 const char *info = NULL;
871 int error = 0;
872 bool unsafe = false;
873 struct path_cond cond = {
874 file_inode(bprm->file)->i_uid,
875 file_inode(bprm->file)->i_mode
876 };
877
878 if (bprm->called_set_creds)
879 return 0;
880
881 ctx = task_ctx(current);
882 AA_BUG(!cred_label(bprm->cred));
883 AA_BUG(!ctx);
884
885 label = aa_get_newest_label(cred_label(bprm->cred));
886
887 /*
888 * Detect no new privs being set, and store the label it
889 * occurred under. Ideally this would happen when nnp
890 * is set but there isn't a good way to do that yet.
891 *
892 * Testing for unconfined must be done before the subset test
893 */
894 if ((bprm->unsafe & LSM_UNSAFE_NO_NEW_PRIVS) && !unconfined(label) &&
895 !ctx->nnp)
896 ctx->nnp = aa_get_label(label);
897
898 /* buffer freed below, name is pointer into buffer */
899 buffer = aa_get_buffer(false);
900 if (!buffer) {
901 error = -ENOMEM;
902 goto done;
903 }
904
905 /* Test for onexec first as onexec override other x transitions. */
906 if (ctx->onexec)
907 new = handle_onexec(label, ctx->onexec, ctx->token,
908 bprm, buffer, &cond, &unsafe);
909 else
910 new = fn_label_build(label, profile, GFP_KERNEL,
911 profile_transition(profile, bprm, buffer,
912 &cond, &unsafe));
913
914 AA_BUG(!new);
915 if (IS_ERR(new)) {
916 error = PTR_ERR(new);
917 goto done;
918 } else if (!new) {
919 error = -ENOMEM;
920 goto done;
921 }
922
923 /* Policy has specified a domain transitions. If no_new_privs and
924 * confined ensure the transition is to confinement that is subset
925 * of the confinement when the task entered no new privs.
926 *
927 * NOTE: Domain transitions from unconfined and to stacked
928 * subsets are allowed even when no_new_privs is set because this
929 * aways results in a further reduction of permissions.
930 */
931 if ((bprm->unsafe & LSM_UNSAFE_NO_NEW_PRIVS) &&
932 !unconfined(label) && !aa_label_is_subset(new, ctx->nnp)) {
933 error = -EPERM;
934 info = "no new privs";
935 goto audit;
936 }
937
938 if (bprm->unsafe & LSM_UNSAFE_SHARE) {
939 /* FIXME: currently don't mediate shared state */
940 ;
941 }
942
943 if (bprm->unsafe & (LSM_UNSAFE_PTRACE)) {
944 /* TODO: test needs to be profile of label to new */
945 error = may_change_ptraced_domain(new, &info);
946 if (error)
947 goto audit;
948 }
949
950 if (unsafe) {
951 if (DEBUG_ON) {
952 dbg_printk("scrubbing environment variables for %s "
953 "label=", bprm->filename);
954 aa_label_printk(new, GFP_KERNEL);
955 dbg_printk("\n");
956 }
957 bprm->secureexec = 1;
958 }
959
960 if (label->proxy != new->proxy) {
961 /* when transitioning clear unsafe personality bits */
962 if (DEBUG_ON) {
963 dbg_printk("apparmor: clearing unsafe personality "
964 "bits. %s label=", bprm->filename);
965 aa_label_printk(new, GFP_KERNEL);
966 dbg_printk("\n");
967 }
968 bprm->per_clear |= PER_CLEAR_ON_SETID;
969 }
970 aa_put_label(cred_label(bprm->cred));
971 /* transfer reference, released when cred is freed */
972 set_cred_label(bprm->cred, new);
973
974 done:
975 aa_put_label(label);
976 aa_put_buffer(buffer);
977
978 return error;
979
980 audit:
981 error = fn_for_each(label, profile,
982 aa_audit_file(profile, &nullperms, OP_EXEC, MAY_EXEC,
983 bprm->filename, NULL, new,
984 file_inode(bprm->file)->i_uid, info,
985 error));
986 aa_put_label(new);
987 goto done;
988 }
989
990 /*
991 * Functions for self directed profile change
992 */
993
994
995 /* helper fn for change_hat
996 *
997 * Returns: label for hat transition OR ERR_PTR. Does NOT return NULL
998 */
999 static struct aa_label *build_change_hat(struct aa_profile *profile,
1000 const char *name, bool sibling)
1001 {
1002 struct aa_profile *root, *hat = NULL;
1003 const char *info = NULL;
1004 int error = 0;
1005
1006 if (sibling && PROFILE_IS_HAT(profile)) {
1007 root = aa_get_profile_rcu(&profile->parent);
1008 } else if (!sibling && !PROFILE_IS_HAT(profile)) {
1009 root = aa_get_profile(profile);
1010 } else {
1011 info = "conflicting target types";
1012 error = -EPERM;
1013 goto audit;
1014 }
1015
1016 hat = aa_find_child(root, name);
1017 if (!hat) {
1018 error = -ENOENT;
1019 if (COMPLAIN_MODE(profile)) {
1020 hat = aa_new_null_profile(profile, true, name,
1021 GFP_KERNEL);
1022 if (!hat) {
1023 info = "failed null profile create";
1024 error = -ENOMEM;
1025 }
1026 }
1027 }
1028 aa_put_profile(root);
1029
1030 audit:
1031 aa_audit_file(profile, &nullperms, OP_CHANGE_HAT, AA_MAY_CHANGEHAT,
1032 name, hat ? hat->base.hname : NULL,
1033 hat ? &hat->label : NULL, GLOBAL_ROOT_UID, info,
1034 error);
1035 if (!hat || (error && error != -ENOENT))
1036 return ERR_PTR(error);
1037 /* if hat && error - complain mode, already audited and we adjust for
1038 * complain mode allow by returning hat->label
1039 */
1040 return &hat->label;
1041 }
1042
1043 /* helper fn for changing into a hat
1044 *
1045 * Returns: label for hat transition or ERR_PTR. Does not return NULL
1046 */
1047 static struct aa_label *change_hat(struct aa_label *label, const char *hats[],
1048 int count, int flags)
1049 {
1050 struct aa_profile *profile, *root, *hat = NULL;
1051 struct aa_label *new;
1052 struct label_it it;
1053 bool sibling = false;
1054 const char *name, *info = NULL;
1055 int i, error;
1056
1057 AA_BUG(!label);
1058 AA_BUG(!hats);
1059 AA_BUG(count < 1);
1060
1061 if (PROFILE_IS_HAT(labels_profile(label)))
1062 sibling = true;
1063
1064 /*find first matching hat */
1065 for (i = 0; i < count && !hat; i++) {
1066 name = hats[i];
1067 label_for_each_in_ns(it, labels_ns(label), label, profile) {
1068 if (sibling && PROFILE_IS_HAT(profile)) {
1069 root = aa_get_profile_rcu(&profile->parent);
1070 } else if (!sibling && !PROFILE_IS_HAT(profile)) {
1071 root = aa_get_profile(profile);
1072 } else { /* conflicting change type */
1073 info = "conflicting targets types";
1074 error = -EPERM;
1075 goto fail;
1076 }
1077 hat = aa_find_child(root, name);
1078 aa_put_profile(root);
1079 if (!hat) {
1080 if (!COMPLAIN_MODE(profile))
1081 goto outer_continue;
1082 /* complain mode succeed as if hat */
1083 } else if (!PROFILE_IS_HAT(hat)) {
1084 info = "target not hat";
1085 error = -EPERM;
1086 aa_put_profile(hat);
1087 goto fail;
1088 }
1089 aa_put_profile(hat);
1090 }
1091 /* found a hat for all profiles in ns */
1092 goto build;
1093 outer_continue:
1094 ;
1095 }
1096 /* no hats that match, find appropriate error
1097 *
1098 * In complain mode audit of the failure is based off of the first
1099 * hat supplied. This is done due how userspace interacts with
1100 * change_hat.
1101 */
1102 name = NULL;
1103 label_for_each_in_ns(it, labels_ns(label), label, profile) {
1104 if (!list_empty(&profile->base.profiles)) {
1105 info = "hat not found";
1106 error = -ENOENT;
1107 goto fail;
1108 }
1109 }
1110 info = "no hats defined";
1111 error = -ECHILD;
1112
1113 fail:
1114 label_for_each_in_ns(it, labels_ns(label), label, profile) {
1115 /*
1116 * no target as it has failed to be found or built
1117 *
1118 * change_hat uses probing and should not log failures
1119 * related to missing hats
1120 */
1121 /* TODO: get rid of GLOBAL_ROOT_UID */
1122 if (count > 1 || COMPLAIN_MODE(profile)) {
1123 aa_audit_file(profile, &nullperms, OP_CHANGE_HAT,
1124 AA_MAY_CHANGEHAT, name, NULL, NULL,
1125 GLOBAL_ROOT_UID, info, error);
1126 }
1127 }
1128 return ERR_PTR(error);
1129
1130 build:
1131 new = fn_label_build_in_ns(label, profile, GFP_KERNEL,
1132 build_change_hat(profile, name, sibling),
1133 aa_get_label(&profile->label));
1134 if (!new) {
1135 info = "label build failed";
1136 error = -ENOMEM;
1137 goto fail;
1138 } /* else if (IS_ERR) build_change_hat has logged error so return new */
1139
1140 return new;
1141 }
1142
1143 /**
1144 * aa_change_hat - change hat to/from subprofile
1145 * @hats: vector of hat names to try changing into (MAYBE NULL if @count == 0)
1146 * @count: number of hat names in @hats
1147 * @token: magic value to validate the hat change
1148 * @flags: flags affecting behavior of the change
1149 *
1150 * Returns %0 on success, error otherwise.
1151 *
1152 * Change to the first profile specified in @hats that exists, and store
1153 * the @hat_magic in the current task context. If the count == 0 and the
1154 * @token matches that stored in the current task context, return to the
1155 * top level profile.
1156 *
1157 * change_hat only applies to profiles in the current ns, and each profile
1158 * in the ns must make the same transition otherwise change_hat will fail.
1159 */
1160 int aa_change_hat(const char *hats[], int count, u64 token, int flags)
1161 {
1162 const struct cred *cred;
1163 struct aa_task_ctx *ctx = task_ctx(current);
1164 struct aa_label *label, *previous, *new = NULL, *target = NULL;
1165 struct aa_profile *profile;
1166 struct aa_perms perms = {};
1167 const char *info = NULL;
1168 int error = 0;
1169
1170 /* released below */
1171 cred = get_current_cred();
1172 label = aa_get_newest_cred_label(cred);
1173 previous = aa_get_newest_label(ctx->previous);
1174
1175 /*
1176 * Detect no new privs being set, and store the label it
1177 * occurred under. Ideally this would happen when nnp
1178 * is set but there isn't a good way to do that yet.
1179 *
1180 * Testing for unconfined must be done before the subset test
1181 */
1182 if (task_no_new_privs(current) && !unconfined(label) && !ctx->nnp)
1183 ctx->nnp = aa_get_label(label);
1184
1185 if (unconfined(label)) {
1186 info = "unconfined can not change_hat";
1187 error = -EPERM;
1188 goto fail;
1189 }
1190
1191 if (count) {
1192 new = change_hat(label, hats, count, flags);
1193 AA_BUG(!new);
1194 if (IS_ERR(new)) {
1195 error = PTR_ERR(new);
1196 new = NULL;
1197 /* already audited */
1198 goto out;
1199 }
1200
1201 error = may_change_ptraced_domain(new, &info);
1202 if (error)
1203 goto fail;
1204
1205 /*
1206 * no new privs prevents domain transitions that would
1207 * reduce restrictions.
1208 */
1209 if (task_no_new_privs(current) && !unconfined(label) &&
1210 !aa_label_is_subset(new, ctx->nnp)) {
1211 /* not an apparmor denial per se, so don't log it */
1212 AA_DEBUG("no_new_privs - change_hat denied");
1213 error = -EPERM;
1214 goto out;
1215 }
1216
1217 if (flags & AA_CHANGE_TEST)
1218 goto out;
1219
1220 target = new;
1221 error = aa_set_current_hat(new, token);
1222 if (error == -EACCES)
1223 /* kill task in case of brute force attacks */
1224 goto kill;
1225 } else if (previous && !(flags & AA_CHANGE_TEST)) {
1226 /*
1227 * no new privs prevents domain transitions that would
1228 * reduce restrictions.
1229 */
1230 if (task_no_new_privs(current) && !unconfined(label) &&
1231 !aa_label_is_subset(previous, ctx->nnp)) {
1232 /* not an apparmor denial per se, so don't log it */
1233 AA_DEBUG("no_new_privs - change_hat denied");
1234 error = -EPERM;
1235 goto out;
1236 }
1237
1238 /* Return to saved label. Kill task if restore fails
1239 * to avoid brute force attacks
1240 */
1241 target = previous;
1242 error = aa_restore_previous_label(token);
1243 if (error) {
1244 if (error == -EACCES)
1245 goto kill;
1246 goto fail;
1247 }
1248 } /* else ignore @flags && restores when there is no saved profile */
1249
1250 out:
1251 aa_put_label(new);
1252 aa_put_label(previous);
1253 aa_put_label(label);
1254 put_cred(cred);
1255
1256 return error;
1257
1258 kill:
1259 info = "failed token match";
1260 perms.kill = AA_MAY_CHANGEHAT;
1261
1262 fail:
1263 fn_for_each_in_ns(label, profile,
1264 aa_audit_file(profile, &perms, OP_CHANGE_HAT,
1265 AA_MAY_CHANGEHAT, NULL, NULL, target,
1266 GLOBAL_ROOT_UID, info, error));
1267
1268 goto out;
1269 }
1270
1271
1272 static int change_profile_perms_wrapper(const char *op, const char *name,
1273 struct aa_profile *profile,
1274 struct aa_label *target, bool stack,
1275 u32 request, struct aa_perms *perms)
1276 {
1277 const char *info = NULL;
1278 int error = 0;
1279
1280 if (!error)
1281 error = change_profile_perms(profile, target, stack, request,
1282 profile->file.start, perms);
1283 if (error)
1284 error = aa_audit_file(profile, perms, op, request, name,
1285 NULL, target, GLOBAL_ROOT_UID, info,
1286 error);
1287
1288 return error;
1289 }
1290
1291 /**
1292 * aa_change_profile - perform a one-way profile transition
1293 * @fqname: name of profile may include namespace (NOT NULL)
1294 * @onexec: whether this transition is to take place immediately or at exec
1295 * @flags: flags affecting change behavior
1296 *
1297 * Change to new profile @name. Unlike with hats, there is no way
1298 * to change back. If @name isn't specified the current profile name is
1299 * used.
1300 * If @onexec then the transition is delayed until
1301 * the next exec.
1302 *
1303 * Returns %0 on success, error otherwise.
1304 */
1305 int aa_change_profile(const char *fqname, int flags)
1306 {
1307 struct aa_label *label, *new = NULL, *target = NULL;
1308 struct aa_profile *profile;
1309 struct aa_perms perms = {};
1310 const char *info = NULL;
1311 const char *auditname = fqname; /* retain leading & if stack */
1312 bool stack = flags & AA_CHANGE_STACK;
1313 struct aa_task_ctx *ctx = task_ctx(current);
1314 int error = 0;
1315 char *op;
1316 u32 request;
1317
1318 label = aa_get_current_label();
1319
1320 /*
1321 * Detect no new privs being set, and store the label it
1322 * occurred under. Ideally this would happen when nnp
1323 * is set but there isn't a good way to do that yet.
1324 *
1325 * Testing for unconfined must be done before the subset test
1326 */
1327 if (task_no_new_privs(current) && !unconfined(label) && !ctx->nnp)
1328 ctx->nnp = aa_get_label(label);
1329
1330 if (!fqname || !*fqname) {
1331 aa_put_label(label);
1332 AA_DEBUG("no profile name");
1333 return -EINVAL;
1334 }
1335
1336 if (flags & AA_CHANGE_ONEXEC) {
1337 request = AA_MAY_ONEXEC;
1338 if (stack)
1339 op = OP_STACK_ONEXEC;
1340 else
1341 op = OP_CHANGE_ONEXEC;
1342 } else {
1343 request = AA_MAY_CHANGE_PROFILE;
1344 if (stack)
1345 op = OP_STACK;
1346 else
1347 op = OP_CHANGE_PROFILE;
1348 }
1349
1350 if (*fqname == '&') {
1351 stack = true;
1352 /* don't have label_parse() do stacking */
1353 fqname++;
1354 }
1355 target = aa_label_parse(label, fqname, GFP_KERNEL, true, false);
1356 if (IS_ERR(target)) {
1357 struct aa_profile *tprofile;
1358
1359 info = "label not found";
1360 error = PTR_ERR(target);
1361 target = NULL;
1362 /*
1363 * TODO: fixme using labels_profile is not right - do profile
1364 * per complain profile
1365 */
1366 if ((flags & AA_CHANGE_TEST) ||
1367 !COMPLAIN_MODE(labels_profile(label)))
1368 goto audit;
1369 /* released below */
1370 tprofile = aa_new_null_profile(labels_profile(label), false,
1371 fqname, GFP_KERNEL);
1372 if (!tprofile) {
1373 info = "failed null profile create";
1374 error = -ENOMEM;
1375 goto audit;
1376 }
1377 target = &tprofile->label;
1378 goto check;
1379 }
1380
1381 /*
1382 * self directed transitions only apply to current policy ns
1383 * TODO: currently requiring perms for stacking and straight change
1384 * stacking doesn't strictly need this. Determine how much
1385 * we want to loosen this restriction for stacking
1386 *
1387 * if (!stack) {
1388 */
1389 error = fn_for_each_in_ns(label, profile,
1390 change_profile_perms_wrapper(op, auditname,
1391 profile, target, stack,
1392 request, &perms));
1393 if (error)
1394 /* auditing done in change_profile_perms_wrapper */
1395 goto out;
1396
1397 /* } */
1398
1399 check:
1400 /* check if tracing task is allowed to trace target domain */
1401 error = may_change_ptraced_domain(target, &info);
1402 if (error && !fn_for_each_in_ns(label, profile,
1403 COMPLAIN_MODE(profile)))
1404 goto audit;
1405
1406 /* TODO: add permission check to allow this
1407 * if ((flags & AA_CHANGE_ONEXEC) && !current_is_single_threaded()) {
1408 * info = "not a single threaded task";
1409 * error = -EACCES;
1410 * goto audit;
1411 * }
1412 */
1413 if (flags & AA_CHANGE_TEST)
1414 goto out;
1415
1416 /* stacking is always a subset, so only check the nonstack case */
1417 if (!stack) {
1418 new = fn_label_build_in_ns(label, profile, GFP_KERNEL,
1419 aa_get_label(target),
1420 aa_get_label(&profile->label));
1421 /*
1422 * no new privs prevents domain transitions that would
1423 * reduce restrictions.
1424 */
1425 if (task_no_new_privs(current) && !unconfined(label) &&
1426 !aa_label_is_subset(new, ctx->nnp)) {
1427 /* not an apparmor denial per se, so don't log it */
1428 AA_DEBUG("no_new_privs - change_hat denied");
1429 error = -EPERM;
1430 goto out;
1431 }
1432 }
1433
1434 if (!(flags & AA_CHANGE_ONEXEC)) {
1435 /* only transition profiles in the current ns */
1436 if (stack)
1437 new = aa_label_merge(label, target, GFP_KERNEL);
1438 if (IS_ERR_OR_NULL(new)) {
1439 info = "failed to build target label";
1440 if (!new)
1441 error = -ENOMEM;
1442 else
1443 error = PTR_ERR(new);
1444 new = NULL;
1445 perms.allow = 0;
1446 goto audit;
1447 }
1448 error = aa_replace_current_label(new);
1449 } else {
1450 if (new) {
1451 aa_put_label(new);
1452 new = NULL;
1453 }
1454
1455 /* full transition will be built in exec path */
1456 error = aa_set_current_onexec(target, stack);
1457 }
1458
1459 audit:
1460 error = fn_for_each_in_ns(label, profile,
1461 aa_audit_file(profile, &perms, op, request, auditname,
1462 NULL, new ? new : target,
1463 GLOBAL_ROOT_UID, info, error));
1464
1465 out:
1466 aa_put_label(new);
1467 aa_put_label(target);
1468 aa_put_label(label);
1469
1470 return error;
1471 }