## Linux infared remote control daemon
########################################
##
## Execute a domain transition to run lircd.
##
##
##
## Domain allowed to transition.
##
##
#
interface(`lircd_domtrans',`
gen_require(`
type lircd_t, lircd_exec_t;
')
domain_auto_trans($1, lircd_exec_t, lircd_t)
')
######################################
##
## Connect to lircd over a unix domain
## stream socket.
##
##
##
## Domain allowed access.
##
##
#
interface(`lircd_stream_connect',`
gen_require(`
type lircd_sock_t, lircd_t;
')
allow $1 lircd_t:unix_stream_socket connectto;
allow $1 lircd_sock_t:sock_file write_sock_file_perms;
files_search_pids($1)
')
#######################################
##
## Read lircd etc file
##
##
##
## The type of the process performing this action.
##
##
#
interface(`lircd_read_config',`
gen_require(`
type lircd_etc_t;
')
read_files_pattern($1, lircd_etc_t, lircd_etc_t)
')
########################################
##
## All of the rules required to administrate
## a lircd environment
##
##
##
## Domain allowed access.
##
##
##
##
## The role to be allowed to manage the syslog domain.
##
##
##
#
interface(`lircd_admin',`
gen_require(`
type lircd_t, lircd_var_run_t, lircd_sock_t;
type lircd_initrc_exec_t, lircd_etc_t;
')
allow $1 lircd_t:process { ptrace signal_perms };
ps_process_pattern($1, lircd_t)
init_labeled_script_domtrans($1, lircd_initrc_exec_t)
domain_system_change_exemption($1)
role_transition $2 lircd_initrc_exec_t system_r;
allow $2 system_r;
files_search_etc($1)
admin_pattern($1, lircd_etc_t)
files_search_pids($1)
admin_pattern($1, lircd_var_run_t)
admin_pattern($1, lircd_sock_t)
')