Chris PeBenito a1fcff
## <summary>Virtual Private Networking client</summary>
Chris PeBenito a1fcff
Chris PeBenito a1fcff
########################################
Chris PeBenito a1fcff
## <summary>
Chris PeBenito a1fcff
##	Execute VPN clients in the vpnc domain.
Chris PeBenito a1fcff
## </summary>
Chris PeBenito a1fcff
## <param name="domain">
Chris PeBenito 885b83
##	<summary>
Chris PeBenito a77e65
##	Domain allowed access.
Chris PeBenito 885b83
##	</summary>
Chris PeBenito a1fcff
## </param>
Chris PeBenito a1fcff
#
Chris PeBenito a1fcff
interface(`vpn_domtrans',`
Chris PeBenito a1fcff
	gen_require(`
Chris PeBenito a1fcff
		type vpnc_t, vpnc_exec_t;
Chris PeBenito a1fcff
	')
Chris PeBenito a1fcff
Chris PeBenito f50856
	domtrans_pattern($1, vpnc_exec_t,vpnc_t)
Chris PeBenito a1fcff
')
Chris PeBenito a1fcff
Chris PeBenito a1fcff
########################################
Chris PeBenito a1fcff
## <summary>
Chris PeBenito a1fcff
##	Execute VPN clients in the vpnc domain, and
Chris PeBenito a1fcff
##	allow the specified role the vpnc domain.
Chris PeBenito a1fcff
## </summary>
Chris PeBenito a1fcff
## <param name="domain">
Chris PeBenito 885b83
##	<summary>
Chris PeBenito a77e65
##	Domain allowed access.
Chris PeBenito 885b83
##	</summary>
Chris PeBenito a1fcff
## </param>
Chris PeBenito a1fcff
## <param name="role">
Chris PeBenito 885b83
##	<summary>
Chris PeBenito a1fcff
##	The role to be allowed the vpnc domain.
Chris PeBenito 885b83
##	</summary>
Chris PeBenito a1fcff
## </param>
Chris PeBenito a1fcff
## <param name="terminal">
Chris PeBenito 885b83
##	<summary>
Chris PeBenito a1fcff
##	The type of the terminal allow the vpnc domain to use.
Chris PeBenito 885b83
##	</summary>
Chris PeBenito a1fcff
## </param>
Chris PeBenito bbcd3c
## <rolecap/>
Chris PeBenito a1fcff
#
Chris PeBenito a1fcff
interface(`vpn_run',`
Chris PeBenito a1fcff
	gen_require(`
Chris PeBenito a1fcff
		type vpnc_t;
Chris PeBenito a1fcff
	')
Chris PeBenito a1fcff
Chris PeBenito a1fcff
	vpn_domtrans($1)
Chris PeBenito a1fcff
	role $2 types vpnc_t;
Chris PeBenito a1fcff
	allow vpnc_t $3:chr_file rw_term_perms;
Chris PeBenito a1fcff
')
Chris PeBenito a77e65
Chris PeBenito a77e65
########################################
Chris PeBenito a77e65
## <summary>
Chris PeBenito a77e65
##	Send generic signals to VPN clients.
Chris PeBenito a77e65
## </summary>
Chris PeBenito a77e65
## <param name="domain">
Chris PeBenito 885b83
##	<summary>
Chris PeBenito a77e65
##	Domain allowed access.
Chris PeBenito 885b83
##	</summary>
Chris PeBenito a77e65
## </param>
Chris PeBenito a77e65
#
Chris PeBenito a77e65
interface(`vpn_signal',`
Chris PeBenito a77e65
	gen_require(`
Chris PeBenito a77e65
		type vpnc_t;
Chris PeBenito a77e65
	')
Chris PeBenito a77e65
Chris PeBenito a77e65
	allow $1 vpnc_t:process signal;
Chris PeBenito a77e65
')
Chris PeBenito f50856
Chris PeBenito f50856
########################################
Chris PeBenito f50856
## <summary>
Chris PeBenito f50856
##	Send and receive messages from
Chris PeBenito f50856
##	Vpnc over dbus.
Chris PeBenito f50856
## </summary>
Chris PeBenito f50856
## <param name="domain">
Chris PeBenito f50856
##	<summary>
Chris PeBenito f50856
##	Domain allowed access.
Chris PeBenito f50856
##	</summary>
Chris PeBenito f50856
## </param>
Chris PeBenito f50856
#
Chris PeBenito f50856
interface(`vpnc_dbus_chat',`
Chris PeBenito f50856
	gen_require(`
Chris PeBenito f50856
		type vpnc_t;
Chris PeBenito f50856
		class dbus send_msg;
Chris PeBenito f50856
	')
Chris PeBenito f50856
Chris PeBenito f50856
	allow $1 vpnc_t:dbus send_msg;
Chris PeBenito f50856
	allow vpnc_t $1:dbus send_msg;
Chris PeBenito f50856
')