library(unix)
skip_if_no_apparmor <- function(){
if (!aa_is_enabled())
skip("AppArmor not enabled")
}
if(aa_is_enabled()){
con <- aa_getcon();
profile <- con$con;
switch(profile,
"/usr/bin/R" = stop("Main process must be unconfined. Please run: sudo aa-disable usr.bin.r"),
"unconfined" = cat("Pretest: OK\n"),
stop("Main process must be unconfined (", profile, ")")
);
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.