|
Chris PeBenito |
17de1b |
########################################
|
|
Chris PeBenito |
17de1b |
#
|
|
Chris PeBenito |
17de1b |
# Macros for switching between source policy
|
|
Chris PeBenito |
17de1b |
# and loadable policy module support
|
|
Chris PeBenito |
17de1b |
#
|
|
Chris PeBenito |
17de1b |
|
|
Chris PeBenito |
17de1b |
##############################
|
|
Chris PeBenito |
17de1b |
#
|
|
Chris PeBenito |
17de1b |
# For adding the module statement
|
|
Chris PeBenito |
17de1b |
#
|
|
Chris PeBenito |
17de1b |
define(`policy_module',`
|
|
Chris PeBenito |
17de1b |
ifndef(`self_contained_policy',`
|
|
Chris PeBenito |
17de1b |
module $1 $2;
|
|
Chris PeBenito |
17de1b |
|
|
Chris PeBenito |
17de1b |
require {
|
|
Chris PeBenito |
17de1b |
role system_r;
|
|
Chris PeBenito |
17de1b |
all_kernel_class_perms
|
|
Chris PeBenito |
e070dd |
|
|
Chris PeBenito |
e070dd |
ifdef(`enable_mcs',`
|
|
Chris PeBenito |
2d0c9c |
decl_sens(0,0)
|
|
Chris PeBenito |
2d0c9c |
decl_cats(0,decr(mcs_num_cats))
|
|
Chris PeBenito |
e070dd |
')
|
|
Chris PeBenito |
e070dd |
|
|
Chris PeBenito |
e070dd |
ifdef(`enable_mls',`
|
|
Chris PeBenito |
2d0c9c |
decl_sens(0,decr(mls_num_sens))
|
|
Chris PeBenito |
2d0c9c |
decl_cats(0,decr(mls_num_cats))
|
|
Chris PeBenito |
e070dd |
')
|
|
Chris PeBenito |
17de1b |
}
|
|
Chris PeBenito |
17de1b |
')
|
|
Chris PeBenito |
17de1b |
')
|
|
Chris PeBenito |
17de1b |
|
|
Chris PeBenito |
17de1b |
##############################
|
|
Chris PeBenito |
17de1b |
#
|
|
Chris PeBenito |
17de1b |
# For use in interfaces, to optionally insert a require block
|
|
Chris PeBenito |
17de1b |
#
|
|
Chris PeBenito |
17de1b |
define(`gen_require',`
|
|
Chris PeBenito |
17de1b |
ifdef(`self_contained_policy',`
|
|
Chris PeBenito |
17de1b |
ifdef(`__in_optional_policy',`
|
|
Chris PeBenito |
17de1b |
require {
|
|
Chris PeBenito |
17de1b |
$1
|
|
Chris PeBenito |
17de1b |
} # end require
|
|
Chris PeBenito |
17de1b |
')
|
|
Chris PeBenito |
17de1b |
',`
|
|
Chris PeBenito |
17de1b |
require {
|
|
Chris PeBenito |
17de1b |
$1
|
|
Chris PeBenito |
17de1b |
} # end require
|
|
Chris PeBenito |
17de1b |
')
|
|
Chris PeBenito |
17de1b |
')
|
|
Chris PeBenito |
17de1b |
|
|
Chris PeBenito |
17de1b |
# helper function, since m4 wont expand macros
|
|
Chris PeBenito |
17de1b |
# if a line is a comment (#):
|
|
Chris PeBenito |
17de1b |
define(`policy_m4_comment',`
|
|
Chris PeBenito |
17de1b |
##### $2 depth: $1
|
|
Chris PeBenito |
17de1b |
')dnl
|
|
Chris PeBenito |
17de1b |
|
|
Chris PeBenito |
17de1b |
##############################
|
|
Chris PeBenito |
17de1b |
#
|
|
Chris PeBenito |
17de1b |
# In the future interfaces should be in loadable modules
|
|
Chris PeBenito |
17de1b |
#
|
|
Chris PeBenito |
17de1b |
# template(name,rules)
|
|
Chris PeBenito |
17de1b |
#
|
|
Chris PeBenito |
17de1b |
define(`template',` dnl
|
|
Chris PeBenito |
ea3c1f |
ifdef(`$1',`refpolicyerr(`duplicate definition of $1(). Original definition on '$1.) define(`__if_error')',`define(`$1',__line__)') dnl
|
|
Chris PeBenito |
17de1b |
`define(`$1',` dnl
|
|
Chris PeBenito |
75da4b |
pushdef(`policy_call_depth',incr(policy_call_depth)) dnl
|
|
Chris PeBenito |
17de1b |
policy_m4_comment(policy_call_depth,begin `$1'(dollarsstar)) dnl
|
|
Chris PeBenito |
17de1b |
$2 dnl
|
|
Chris PeBenito |
75da4b |
popdef(`policy_call_depth') dnl
|
|
Chris PeBenito |
17de1b |
policy_m4_comment(policy_call_depth,end `$1'(dollarsstar)) dnl
|
|
Chris PeBenito |
17de1b |
'')
|
|
Chris PeBenito |
17de1b |
')
|
|
Chris PeBenito |
17de1b |
|
|
Chris PeBenito |
17de1b |
##############################
|
|
Chris PeBenito |
17de1b |
#
|
|
Chris PeBenito |
17de1b |
# In the future interfaces should be in loadable modules
|
|
Chris PeBenito |
17de1b |
#
|
|
Chris PeBenito |
17de1b |
# interface(name,rules)
|
|
Chris PeBenito |
17de1b |
#
|
|
Chris PeBenito |
17de1b |
define(`interface',` dnl
|
|
Chris PeBenito |
ea3c1f |
ifdef(`$1',`refpolicyerr(`duplicate definition of $1(). Original definition on '$1.) define(`__if_error')',`define(`$1',__line__)') dnl
|
|
Chris PeBenito |
17de1b |
`define(`$1',` dnl
|
|
Chris PeBenito |
75da4b |
pushdef(`policy_call_depth',incr(policy_call_depth)) dnl
|
|
Chris PeBenito |
17de1b |
policy_m4_comment(policy_call_depth,begin `$1'(dollarsstar)) dnl
|
|
Chris PeBenito |
17de1b |
$2
|
|
Chris PeBenito |
75da4b |
popdef(`policy_call_depth') dnl
|
|
Chris PeBenito |
17de1b |
policy_m4_comment(policy_call_depth,end `$1'(dollarsstar)) dnl
|
|
Chris PeBenito |
17de1b |
'')
|
|
Chris PeBenito |
17de1b |
')
|
|
Chris PeBenito |
17de1b |
|
|
Chris PeBenito |
17de1b |
define(`policy_call_depth',0)
|
|
Chris PeBenito |
17de1b |
|
|
Chris PeBenito |
17de1b |
##############################
|
|
Chris PeBenito |
17de1b |
#
|
|
Chris PeBenito |
17de1b |
# Optional policy handling
|
|
Chris PeBenito |
17de1b |
#
|
|
Chris PeBenito |
17de1b |
define(`optional_policy',`
|
|
Chris PeBenito |
17de1b |
ifelse(regexp(`$1',`\W'),`-1',`
|
|
Chris PeBenito |
ea3c1f |
refpolicywarn(`deprecated use of module name ($1) as first parameter of optional_policy() block.')
|
|
Chris PeBenito |
17de1b |
optional_policy(shift($*))
|
|
Chris PeBenito |
17de1b |
',`
|
|
Chris PeBenito |
17de1b |
optional {`'pushdef(`__in_optional_policy')
|
|
Chris PeBenito |
17de1b |
$1
|
|
Chris PeBenito |
17de1b |
ifelse(`$2',`',`',`} else {
|
|
Chris PeBenito |
17de1b |
$2
|
|
Chris PeBenito |
17de1b |
')}`'popdef(`__in_optional_policy')`'ifndef(`__in_optional_policy',` # end optional')
|
|
Chris PeBenito |
17de1b |
')
|
|
Chris PeBenito |
17de1b |
')
|
|
Chris PeBenito |
17de1b |
|
|
Chris PeBenito |
17de1b |
##############################
|
|
Chris PeBenito |
17de1b |
#
|
|
Chris PeBenito |
17de1b |
# Determine if we should use the default
|
|
Chris PeBenito |
17de1b |
# tunable value as specified by the policy
|
|
Chris PeBenito |
17de1b |
# or if the override value should be used
|
|
Chris PeBenito |
17de1b |
#
|
|
Chris PeBenito |
17de1b |
define(`dflt_or_overr',`ifdef(`$1',$1,$2)')
|
|
Chris PeBenito |
17de1b |
|
|
Chris PeBenito |
17de1b |
##############################
|
|
Chris PeBenito |
17de1b |
#
|
|
Chris PeBenito |
17de1b |
# Extract booleans out of an expression.
|
|
Chris PeBenito |
17de1b |
# This needs to be reworked so expressions
|
|
Chris PeBenito |
17de1b |
# with parentheses can work.
|
|
Chris PeBenito |
17de1b |
|
|
Chris PeBenito |
f6ddd6 |
define(`declare_required_symbols',`
|
|
Chris PeBenito |
17de1b |
ifelse(regexp($1, `\w'), -1, `', `dnl
|
|
Chris PeBenito |
17de1b |
bool regexp($1, `\(\w+\)', `\1');
|
|
Chris PeBenito |
f6ddd6 |
declare_required_symbols(regexp($1, `\w+\(.*\)', `\1'))dnl
|
|
Chris PeBenito |
17de1b |
') dnl
|
|
Chris PeBenito |
17de1b |
')
|
|
Chris PeBenito |
17de1b |
|
|
Chris PeBenito |
17de1b |
##############################
|
|
Chris PeBenito |
17de1b |
#
|
|
Chris PeBenito |
17de1b |
# Tunable declaration
|
|
Chris PeBenito |
17de1b |
#
|
|
Chris PeBenito |
17de1b |
define(`gen_tunable',`
|
|
Chris PeBenito |
f6ddd6 |
bool $1 dflt_or_overr(`$1'_conf,$2);
|
|
Chris PeBenito |
17de1b |
')
|
|
Chris PeBenito |
17de1b |
|
|
Chris PeBenito |
17de1b |
##############################
|
|
Chris PeBenito |
17de1b |
#
|
|
Chris PeBenito |
17de1b |
# Tunable policy handling
|
|
Chris PeBenito |
17de1b |
#
|
|
Chris PeBenito |
17de1b |
define(`tunable_policy',`
|
|
Chris PeBenito |
f6ddd6 |
gen_require(`
|
|
Chris PeBenito |
f6ddd6 |
declare_required_symbols(`$1')
|
|
Chris PeBenito |
17de1b |
')
|
|
Chris PeBenito |
f6ddd6 |
if (`$1') {
|
|
Chris PeBenito |
f6ddd6 |
$2
|
|
Chris PeBenito |
f6ddd6 |
ifelse(`$3',`',`',`} else {
|
|
Chris PeBenito |
f6ddd6 |
$3
|
|
Chris PeBenito |
f6ddd6 |
')}
|
|
Chris PeBenito |
17de1b |
')
|