## Podsleuth is a tool to get information about an Apple (TM) iPod (TM)
########################################
##
## Execute a domain transition to run podsleuth.
##
##
##
## Domain allowed to transition.
##
##
#
interface(`podsleuth_domtrans',`
gen_require(`
type podsleuth_t, podsleuth_exec_t;
')
domtrans_pattern($1, podsleuth_exec_t, podsleuth_t)
allow $1 podsleuth_t:process signal;
')
########################################
##
## Execute podsleuth in the podsleuth domain, and
## allow the specified role the podsleuth domain.
##
##
##
## Domain allowed to transition.
##
##
##
##
## Role allowed access.
##
##
#
interface(`podsleuth_run',`
gen_require(`
type podsleuth_t;
')
podsleuth_domtrans($1)
role $2 types podsleuth_t;
')