Blob Blame History Raw
## <summary>UNIX Client-Server Program Interface for TCP.</summary>

########################################
## <summary>
##	Define a specified domain as a ucspitcp service.
## </summary>
## <param name="domain">
##	<summary>
##	Domain allowed access.
##	</summary>
## </param>
## <param name="entrypoint">
##	<summary>
##	The type associated with the process program.
##	</summary>
## </param>
#
interface(`ucspitcp_service_domain',`
	gen_require(`
		type ucspitcp_t;
	')

	domain_type($1)
	domain_entry_file($1, $2)

	role system_r types $1;

	domtrans_pattern(ucspitcp_t, $2, $1)
')