2 * AppArmor security module
4 * This file contains AppArmor policy attachment and domain transitions
6 * Copyright (C) 2002-2008 Novell/SUSE
7 * Copyright 2009-2010 Canonical Ltd.
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
15 #include <linux/errno.h>
16 #include <linux/fdtable.h>
17 #include <linux/file.h>
18 #include <linux/mount.h>
19 #include <linux/syscalls.h>
20 #include <linux/tracehook.h>
21 #include <linux/personality.h>
23 #include "include/audit.h"
24 #include "include/apparmorfs.h"
25 #include "include/context.h"
26 #include "include/domain.h"
27 #include "include/file.h"
28 #include "include/ipc.h"
29 #include "include/match.h"
30 #include "include/path.h"
31 #include "include/policy.h"
34 * aa_free_domain_entries - free entries in a domain table
35 * @domain: the domain table to free (MAYBE NULL)
37 void aa_free_domain_entries(struct aa_domain
*domain
)
44 for (i
= 0; i
< domain
->size
; i
++)
45 kzfree(domain
->table
[i
]);
46 kzfree(domain
->table
);
52 * may_change_ptraced_domain - check if can change profile on ptraced task
53 * @task: task we want to change profile of (NOT NULL)
54 * @to_profile: profile to change to (NOT NULL)
56 * Check if the task is ptraced and if so if the tracing task is allowed
57 * to trace the new domain
59 * Returns: %0 or error if change not allowed
61 static int may_change_ptraced_domain(struct task_struct
*task
,
62 struct aa_profile
*to_profile
)
64 struct task_struct
*tracer
;
65 const struct cred
*cred
= NULL
;
66 struct aa_profile
*tracerp
= NULL
;
70 tracer
= ptrace_parent(task
);
73 cred
= get_task_cred(tracer
);
74 tracerp
= aa_cred_profile(cred
);
78 if (!tracer
|| unconfined(tracerp
))
81 error
= aa_may_ptrace(tracer
, tracerp
, to_profile
, PTRACE_MODE_ATTACH
);
92 * change_profile_perms - find permissions for change_profile
93 * @profile: the current profile (NOT NULL)
94 * @ns: the namespace being switched to (NOT NULL)
95 * @name: the name of the profile to change to (NOT NULL)
96 * @request: requested perms
97 * @start: state to start matching in
99 * Returns: permission set
101 static struct file_perms
change_profile_perms(struct aa_profile
*profile
,
102 struct aa_namespace
*ns
,
103 const char *name
, u32 request
,
106 struct file_perms perms
;
107 struct path_cond cond
= { };
110 if (unconfined(profile
)) {
111 perms
.allow
= AA_MAY_CHANGE_PROFILE
| AA_MAY_ONEXEC
;
112 perms
.audit
= perms
.quiet
= perms
.kill
= 0;
114 } else if (!profile
->file
.dfa
) {
116 } else if ((ns
== profile
->ns
)) {
117 /* try matching against rules with out namespace prepended */
118 aa_str_perms(profile
->file
.dfa
, start
, name
, &cond
, &perms
);
119 if (COMBINED_PERM_MASK(perms
) & request
)
123 /* try matching with namespace name and then profile */
124 state
= aa_dfa_match(profile
->file
.dfa
, start
, ns
->base
.name
);
125 state
= aa_dfa_match_len(profile
->file
.dfa
, state
, ":", 1);
126 aa_str_perms(profile
->file
.dfa
, state
, name
, &cond
, &perms
);
132 * __attach_match_ - find an attachment match
133 * @name - to match against (NOT NULL)
134 * @head - profile list to walk (NOT NULL)
136 * Do a linear search on the profiles in the list. There is a matching
137 * preference where an exact match is preferred over a name which uses
138 * expressions to match, and matching expressions with the greatest
139 * xmatch_len are preferred.
141 * Requires: @head not be shared or have appropriate locks held
143 * Returns: profile or NULL if no match found
145 static struct aa_profile
*__attach_match(const char *name
,
146 struct list_head
*head
)
149 struct aa_profile
*profile
, *candidate
= NULL
;
151 list_for_each_entry(profile
, head
, base
.list
) {
152 if (profile
->flags
& PFLAG_NULL
)
154 if (profile
->xmatch
&& profile
->xmatch_len
> len
) {
155 unsigned int state
= aa_dfa_match(profile
->xmatch
,
157 u32 perm
= dfa_user_allow(profile
->xmatch
, state
);
158 /* any accepting state means a valid match. */
159 if (perm
& MAY_EXEC
) {
161 len
= profile
->xmatch_len
;
163 } else if (!strcmp(profile
->base
.name
, name
))
164 /* exact non-re match, no more searching required */
172 * find_attach - do attachment search for unconfined processes
173 * @ns: the current namespace (NOT NULL)
174 * @list: list to search (NOT NULL)
175 * @name: the executable name to match against (NOT NULL)
177 * Returns: profile or NULL if no match found
179 static struct aa_profile
*find_attach(struct aa_namespace
*ns
,
180 struct list_head
*list
, const char *name
)
182 struct aa_profile
*profile
;
184 read_lock(&ns
->lock
);
185 profile
= aa_get_profile(__attach_match(name
, list
));
186 read_unlock(&ns
->lock
);
192 * separate_fqname - separate the namespace and profile names
193 * @fqname: the fqname name to split (NOT NULL)
194 * @ns_name: the namespace name if it exists (NOT NULL)
196 * This is the xtable equivalent routine of aa_split_fqname. It finds the
197 * split in an xtable fqname which contains an embedded \0 instead of a :
198 * if a namespace is specified. This is done so the xtable is constant and
199 * isn't re-split on every lookup.
201 * Either the profile or namespace name may be optional but if the namespace
202 * is specified the profile name termination must be present. This results
203 * in the following possible encodings:
205 * :ns_name\0profile_name\0
208 * NOTE: the xtable fqname is pre-validated at load time in unpack_trans_table
210 * Returns: profile name if it is specified else NULL
212 static const char *separate_fqname(const char *fqname
, const char **ns_name
)
216 if (fqname
[0] == ':') {
217 /* In this case there is guaranteed to be two \0 terminators
218 * in the string. They are verified at load time by
219 * by unpack_trans_table
221 *ns_name
= fqname
+ 1; /* skip : */
222 name
= *ns_name
+ strlen(*ns_name
) + 1;
233 static const char *next_name(int xtype
, const char *name
)
239 * x_table_lookup - lookup an x transition name via transition table
240 * @profile: current profile (NOT NULL)
241 * @xindex: index into x transition table
243 * Returns: refcounted profile, or NULL on failure (MAYBE NULL)
245 static struct aa_profile
*x_table_lookup(struct aa_profile
*profile
, u32 xindex
)
247 struct aa_profile
*new_profile
= NULL
;
248 struct aa_namespace
*ns
= profile
->ns
;
249 u32 xtype
= xindex
& AA_X_TYPE_MASK
;
250 int index
= xindex
& AA_X_INDEX_MASK
;
253 /* index is guaranteed to be in range, validated at load time */
254 for (name
= profile
->file
.trans
.table
[index
]; !new_profile
&& name
;
255 name
= next_name(xtype
, name
)) {
256 struct aa_namespace
*new_ns
;
257 const char *xname
= NULL
;
260 if (xindex
& AA_X_CHILD
) {
261 /* release by caller */
262 new_profile
= aa_find_child(profile
, name
);
264 } else if (*name
== ':') {
265 /* switching namespace */
267 xname
= name
= separate_fqname(name
, &ns_name
);
269 /* no name so use profile name */
270 xname
= profile
->base
.hname
;
271 if (*ns_name
== '@') {
272 /* TODO: variable support */
276 new_ns
= aa_find_namespace(ns
, ns_name
);
279 } else if (*name
== '@') {
280 /* TODO: variable support */
283 /* basic namespace lookup */
287 /* released by caller */
288 new_profile
= aa_lookup_profile(new_ns
? new_ns
: ns
, xname
);
289 aa_put_namespace(new_ns
);
292 /* released by caller */
297 * x_to_profile - get target profile for a given xindex
298 * @profile: current profile (NOT NULL)
299 * @name: name to lookup (NOT NULL)
300 * @xindex: index into x transition table
302 * find profile for a transition index
304 * Returns: refcounted profile or NULL if not found available
306 static struct aa_profile
*x_to_profile(struct aa_profile
*profile
,
307 const char *name
, u32 xindex
)
309 struct aa_profile
*new_profile
= NULL
;
310 struct aa_namespace
*ns
= profile
->ns
;
311 u32 xtype
= xindex
& AA_X_TYPE_MASK
;
315 /* fail exec unless ix || ux fallback - handled by caller */
318 if (xindex
& AA_X_CHILD
)
319 /* released by caller */
320 new_profile
= find_attach(ns
, &profile
->base
.profiles
,
323 /* released by caller */
324 new_profile
= find_attach(ns
, &ns
->base
.profiles
,
328 /* released by caller */
329 new_profile
= x_table_lookup(profile
, xindex
);
333 /* released by caller */
338 * apparmor_bprm_set_creds - set the new creds on the bprm struct
339 * @bprm: binprm for the exec (NOT NULL)
341 * Returns: %0 or error on failure
343 int apparmor_bprm_set_creds(struct linux_binprm
*bprm
)
345 struct aa_task_cxt
*cxt
;
346 struct aa_profile
*profile
, *new_profile
= NULL
;
347 struct aa_namespace
*ns
;
350 struct file_perms perms
= {};
351 struct path_cond cond
= {
352 bprm
->file
->f_path
.dentry
->d_inode
->i_uid
,
353 bprm
->file
->f_path
.dentry
->d_inode
->i_mode
355 const char *name
= NULL
, *target
= NULL
, *info
= NULL
;
356 int error
= cap_bprm_set_creds(bprm
);
360 if (bprm
->cred_prepared
)
363 /* XXX: no_new_privs is not usable with AppArmor yet */
364 if (bprm
->unsafe
& LSM_UNSAFE_NO_NEW_PRIVS
)
367 cxt
= bprm
->cred
->security
;
370 profile
= aa_get_profile(aa_newest_version(cxt
->profile
));
372 * get the namespace from the replacement profile as replacement
373 * can change the namespace
376 state
= profile
->file
.start
;
378 /* buffer freed below, name is pointer into buffer */
379 error
= aa_path_name(&bprm
->file
->f_path
, profile
->path_flags
, &buffer
,
383 (PFLAG_IX_ON_NAME_ERROR
| PFLAG_UNCONFINED
))
385 name
= bprm
->filename
;
389 /* Test for onexec first as onexec directives override other
392 if (unconfined(profile
)) {
393 /* unconfined task */
395 /* change_profile on exec already been granted */
396 new_profile
= aa_get_profile(cxt
->onexec
);
398 new_profile
= find_attach(ns
, &ns
->base
.profiles
, name
);
404 /* find exec permissions for name */
405 state
= aa_str_perms(profile
->file
.dfa
, state
, name
, &cond
, &perms
);
407 struct file_perms cp
;
408 info
= "change_profile onexec";
409 if (!(perms
.allow
& AA_MAY_ONEXEC
))
412 /* test if this exec can be paired with change_profile onexec.
413 * onexec permission is linked to exec with a standard pairing
414 * exec\0change_profile
416 state
= aa_dfa_null_transition(profile
->file
.dfa
, state
);
417 cp
= change_profile_perms(profile
, cxt
->onexec
->ns
,
418 cxt
->onexec
->base
.name
,
419 AA_MAY_ONEXEC
, state
);
421 if (!(cp
.allow
& AA_MAY_ONEXEC
))
423 new_profile
= aa_get_profile(aa_newest_version(cxt
->onexec
));
427 if (perms
.allow
& MAY_EXEC
) {
428 /* exec permission determine how to transition */
429 new_profile
= x_to_profile(profile
, name
, perms
.xindex
);
431 if (perms
.xindex
& AA_X_INHERIT
) {
432 /* (p|c|n)ix - don't change profile but do
433 * use the newest version, which was picked
434 * up above when getting profile
436 info
= "ix fallback";
437 new_profile
= aa_get_profile(profile
);
439 } else if (perms
.xindex
& AA_X_UNCONFINED
) {
440 new_profile
= aa_get_profile(ns
->unconfined
);
441 info
= "ux fallback";
444 info
= "profile not found";
447 } else if (COMPLAIN_MODE(profile
)) {
448 /* no exec permission - are we in learning mode */
449 new_profile
= aa_new_null_profile(profile
, 0);
452 info
= "could not create null profile";
455 target
= new_profile
->base
.hname
;
457 perms
.xindex
|= AA_X_UNSAFE
;
465 if (bprm
->unsafe
& LSM_UNSAFE_SHARE
) {
466 /* FIXME: currently don't mediate shared state */
470 if (bprm
->unsafe
& (LSM_UNSAFE_PTRACE
| LSM_UNSAFE_PTRACE_CAP
)) {
471 error
= may_change_ptraced_domain(current
, new_profile
);
473 aa_put_profile(new_profile
);
478 /* Determine if secure exec is needed.
479 * Can be at this point for the following reasons:
480 * 1. unconfined switching to confined
481 * 2. confined switching to different confinement
482 * 3. confined switching to unconfined
484 * Cases 2 and 3 are marked as requiring secure exec
485 * (unless policy specified "unsafe exec")
487 * bprm->unsafe is used to cache the AA_X_UNSAFE permission
488 * to avoid having to recompute in secureexec
490 if (!(perms
.xindex
& AA_X_UNSAFE
)) {
491 AA_DEBUG("scrubbing environment variables for %s profile=%s\n",
492 name
, new_profile
->base
.hname
);
493 bprm
->unsafe
|= AA_SECURE_X_NEEDED
;
496 target
= new_profile
->base
.hname
;
497 /* when transitioning profiles clear unsafe personality bits */
498 bprm
->per_clear
|= PER_CLEAR_ON_SETID
;
501 aa_put_profile(cxt
->profile
);
502 /* transfer new profile reference will be released when cxt is freed */
503 cxt
->profile
= new_profile
;
505 /* clear out all temporary/transitional state from the context */
506 aa_put_profile(cxt
->previous
);
507 aa_put_profile(cxt
->onexec
);
508 cxt
->previous
= NULL
;
513 error
= aa_audit_file(profile
, &perms
, GFP_KERNEL
, OP_EXEC
, MAY_EXEC
,
514 name
, target
, cond
.uid
, info
, error
);
517 aa_put_profile(profile
);
524 * apparmor_bprm_secureexec - determine if secureexec is needed
525 * @bprm: binprm for exec (NOT NULL)
527 * Returns: %1 if secureexec is needed else %0
529 int apparmor_bprm_secureexec(struct linux_binprm
*bprm
)
531 int ret
= cap_bprm_secureexec(bprm
);
533 /* the decision to use secure exec is computed in set_creds
534 * and stored in bprm->unsafe.
536 if (!ret
&& (bprm
->unsafe
& AA_SECURE_X_NEEDED
))
543 * apparmor_bprm_committing_creds - do task cleanup on committing new creds
544 * @bprm: binprm for the exec (NOT NULL)
546 void apparmor_bprm_committing_creds(struct linux_binprm
*bprm
)
548 struct aa_profile
*profile
= __aa_current_profile();
549 struct aa_task_cxt
*new_cxt
= bprm
->cred
->security
;
551 /* bail out if unconfined or not changing profile */
552 if ((new_cxt
->profile
== profile
) ||
553 (unconfined(new_cxt
->profile
)))
556 current
->pdeath_signal
= 0;
558 /* reset soft limits and set hard limits for the new profile */
559 __aa_transition_rlimits(profile
, new_cxt
->profile
);
563 * apparmor_bprm_commited_cred - do cleanup after new creds committed
564 * @bprm: binprm for the exec (NOT NULL)
566 void apparmor_bprm_committed_creds(struct linux_binprm
*bprm
)
568 /* TODO: cleanup signals - ipc mediation */
573 * Functions for self directed profile change
577 * new_compound_name - create an hname with @n2 appended to @n1
578 * @n1: base of hname (NOT NULL)
579 * @n2: name to append (NOT NULL)
581 * Returns: new name or NULL on error
583 static char *new_compound_name(const char *n1
, const char *n2
)
585 char *name
= kmalloc(strlen(n1
) + strlen(n2
) + 3, GFP_KERNEL
);
587 sprintf(name
, "%s//%s", n1
, n2
);
592 * aa_change_hat - change hat to/from subprofile
593 * @hats: vector of hat names to try changing into (MAYBE NULL if @count == 0)
594 * @count: number of hat names in @hats
595 * @token: magic value to validate the hat change
596 * @permtest: true if this is just a permission test
598 * Change to the first profile specified in @hats that exists, and store
599 * the @hat_magic in the current task context. If the count == 0 and the
600 * @token matches that stored in the current task context, return to the
603 * Returns %0 on success, error otherwise.
605 int aa_change_hat(const char *hats
[], int count
, u64 token
, bool permtest
)
607 const struct cred
*cred
;
608 struct aa_task_cxt
*cxt
;
609 struct aa_profile
*profile
, *previous_profile
, *hat
= NULL
;
612 struct file_perms perms
= {};
613 const char *target
= NULL
, *info
= NULL
;
617 cred
= get_current_cred();
618 cxt
= cred
->security
;
619 profile
= aa_cred_profile(cred
);
620 previous_profile
= cxt
->previous
;
622 if (unconfined(profile
)) {
629 /* attempting to change into a new hat or switch to a sibling */
630 struct aa_profile
*root
;
631 root
= PROFILE_IS_HAT(profile
) ? profile
->parent
: profile
;
633 /* find first matching hat */
634 for (i
= 0; i
< count
&& !hat
; i
++)
636 hat
= aa_find_child(root
, hats
[i
]);
638 if (!COMPLAIN_MODE(root
) || permtest
) {
639 if (list_empty(&root
->base
.profiles
))
647 * In complain mode and failed to match any hats.
648 * Audit the failure is based off of the first hat
649 * supplied. This is done due how userspace
650 * interacts with change_hat.
652 * TODO: Add logging of all failed hats
656 name
= new_compound_name(root
->base
.hname
, hats
[0]);
659 hat
= aa_new_null_profile(profile
, 1);
661 info
= "failed null profile create";
666 target
= hat
->base
.hname
;
667 if (!PROFILE_IS_HAT(hat
)) {
668 info
= "target not hat";
674 error
= may_change_ptraced_domain(current
, hat
);
682 error
= aa_set_current_hat(hat
, token
);
683 if (error
== -EACCES
)
684 /* kill task in case of brute force attacks */
685 perms
.kill
= AA_MAY_CHANGEHAT
;
686 else if (name
&& !error
)
687 /* reset error for learning of new hats */
690 } else if (previous_profile
) {
691 /* Return to saved profile. Kill task if restore fails
692 * to avoid brute force attacks
694 target
= previous_profile
->base
.hname
;
695 error
= aa_restore_previous_profile(token
);
696 perms
.kill
= AA_MAY_CHANGEHAT
;
698 /* ignore restores when there is no saved profile */
703 error
= aa_audit_file(profile
, &perms
, GFP_KERNEL
,
704 OP_CHANGE_HAT
, AA_MAY_CHANGEHAT
, NULL
,
705 target
, 0, info
, error
);
716 * aa_change_profile - perform a one-way profile transition
717 * @ns_name: name of the profile namespace to change to (MAYBE NULL)
718 * @hname: name of profile to change to (MAYBE NULL)
719 * @onexec: whether this transition is to take place immediately or at exec
720 * @permtest: true if this is just a permission test
722 * Change to new profile @name. Unlike with hats, there is no way
723 * to change back. If @name isn't specified the current profile name is
725 * If @onexec then the transition is delayed until
728 * Returns %0 on success, error otherwise.
730 int aa_change_profile(const char *ns_name
, const char *hname
, bool onexec
,
733 const struct cred
*cred
;
734 struct aa_task_cxt
*cxt
;
735 struct aa_profile
*profile
, *target
= NULL
;
736 struct aa_namespace
*ns
= NULL
;
737 struct file_perms perms
= {};
738 const char *name
= NULL
, *info
= NULL
;
742 if (!hname
&& !ns_name
)
746 request
= AA_MAY_ONEXEC
;
747 op
= OP_CHANGE_ONEXEC
;
749 request
= AA_MAY_CHANGE_PROFILE
;
750 op
= OP_CHANGE_PROFILE
;
753 cred
= get_current_cred();
754 cxt
= cred
->security
;
755 profile
= aa_cred_profile(cred
);
759 ns
= aa_find_namespace(profile
->ns
, ns_name
);
761 /* we don't create new namespace in complain mode */
763 info
= "namespace not found";
769 ns
= aa_get_namespace(profile
->ns
);
771 /* if the name was not specified, use the name of the current profile */
773 if (unconfined(profile
))
774 hname
= ns
->unconfined
->base
.hname
;
776 hname
= profile
->base
.hname
;
779 perms
= change_profile_perms(profile
, ns
, hname
, request
,
780 profile
->file
.start
);
781 if (!(perms
.allow
& request
)) {
787 target
= aa_lookup_profile(ns
, hname
);
789 info
= "profile not found";
791 if (permtest
|| !COMPLAIN_MODE(profile
))
794 target
= aa_new_null_profile(profile
, 0);
796 info
= "failed null profile create";
802 /* check if tracing task is allowed to trace target domain */
803 error
= may_change_ptraced_domain(current
, target
);
805 info
= "ptrace prevents transition";
813 error
= aa_set_current_onexec(target
);
815 error
= aa_replace_current_profile(target
);
819 error
= aa_audit_file(profile
, &perms
, GFP_KERNEL
, op
, request
,
820 name
, hname
, 0, info
, error
);
822 aa_put_namespace(ns
);
823 aa_put_profile(target
);
This page took 0.066965 seconds and 5 git commands to generate.