initial check-in

too young to have a name

1 files changed, 20 insertions, 0 deletions

diff --git a/Host/clam.hs b/Host/clam.hs
new file mode 100644
index 00000000..4241222d
--- /dev/null
+++ b/Host/clam.hs
@@ -0,0 +1,20 @@
+import Property
+import qualified Property.Apt as Apt
+import qualified Property.Ssh as Ssh
+import qualified Property.User as User
+import qualified Property.GitHome as GitHome
+
+main = defaultMain
+	[ Apt.stdSourcesList Apt.Unstable `onChange` Apt.upgrade
+	, Apt.installed ["etckeeper"]
+	, Apt.installed ["ssh"]
+	, Apt.installed ["git", "myrepos"]
+	, GitHome.installed "root"
+	, check (Ssh.hasAuthorizedKeys "root") $
+		Ssh.passwordAuthentication False
+	, User.nonsystem "joey"
+	, fileHasContent "/etc/sudoers" ["joey ALL=(ALL:ALL) ALL"]
+	, GitHome.installed "joey"
+	, Apt.removed ["exim4"] `onChange` Apt.autoRemove
+	, Apt.installed ["tor"]
+	]