+++ /dev/null
-#
-# /usr
-#
-/usr/bin/gnatbind -- gen_context(system_u:object_r:ada_exec_t,s0)
-/usr/bin/gnatls -- gen_context(system_u:object_r:ada_exec_t,s0)
-/usr/bin/gnatmake -- gen_context(system_u:object_r:ada_exec_t,s0)
-/usr/libexec/gcc(/.*)?/gnat1 -- gen_context(system_u:object_r:ada_exec_t,s0)
+++ /dev/null
-## <summary>GNAT Ada95 compiler</summary>
-
-########################################
-## <summary>
-## Execute the ada program in the ada domain.
-## </summary>
-## <param name="domain">
-## <summary>
-## Domain allowed to transition.
-## </summary>
-## </param>
-#
-interface(`ada_domtrans',`
- gen_require(`
- type ada_t, ada_exec_t;
- ')
-
- corecmd_search_bin($1)
- domtrans_pattern($1, ada_exec_t, ada_t)
-')
-
-########################################
-## <summary>
-## Execute ada in the ada domain, and
-## allow the specified role the ada domain.
-## </summary>
-## <param name="domain">
-## <summary>
-## Domain allowed to transition.
-## </summary>
-## </param>
-## <param name="role">
-## <summary>
-## Role allowed access.
-## </summary>
-## </param>
-#
-interface(`ada_run',`
- gen_require(`
- type ada_t;
- ')
-
- ada_domtrans($1)
- role $2 types ada_t;
-')
+++ /dev/null
-policy_module(ada, 1.4.0)
-
-########################################
-#
-# Declarations
-#
-
-type ada_t;
-type ada_exec_t;
-application_domain(ada_t, ada_exec_t)
-role system_r types ada_t;
-
-########################################
-#
-# Local policy
-#
-
-allow ada_t self:process { execstack execmem };
-
-userdom_use_inherited_user_terminals(ada_t)
-
-optional_policy(`
- unconfined_domain(ada_t)
-')