script:/var/cfengine/library.cf

# Library of commond code
 
body depth_search recurse(d) {
     depth => "${d}";
     comment => "Exclude .svn revision control files from recursion."
     exclude_dirs => { "\.svn" };
}
 
body perms system(p,u,g) {
     mode => "${p}";
     owners => { "${u}" };
     groups => { "${g}" };
}
 
body copy_from mycopy(from,server) {
     source => "${from}";
     servers => { "${server}" };
     compare => "digest";
}