## <summary>Linux infared remote control daemon</summary>

########################################

## <summary>

##	Execute a domain transition to run lircd.

## </summary>

## <param name="domain">

## <summary>

##	Domain allowed to transition.

## </summary>

## </param>

#

interface(`lircd_domtrans',`

	gen_require(`

		type lircd_t, lircd_exec_t;

	')

	domain_auto_trans($1, lircd_exec_t, lircd_t)

')

######################################

## <summary>

##	Connect to lircd over a unix domain

##	stream socket.

## </summary>

## <param name="domain">

##	<summary>

##	Domain allowed access.

##	</summary>

## </param>

#

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)

')

#######################################

## <summary>

##	Read lircd etc file

## </summary>

## <param name="domain">

## <summary>

##	The type of the process performing this action.

## </summary>

## </param>

#

interface(`lircd_read_config',`

	gen_require(`

		type lircd_etc_t;

	')

	read_files_pattern($1, lircd_etc_t, lircd_etc_t)

')

########################################

## <summary>

##	All of the rules required to administrate 

##	a lircd environment

## </summary>

## <param name="domain">

##	<summary>

##	Domain allowed access.

##	</summary>

## </param>

## <param name="role">

##	<summary>

##	The role to be allowed to manage the syslog domain.

##	</summary>

## </param>

## <rolecap/>

#

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)

')