create sshfile type

2 files changed, 80 insertions, 0 deletions

diff --git a/src/file/homefile/user/sshfile.cil b/src/file/homefile/user/sshfile.cil
new file mode 100644
index 0000000..377b144
--- /dev/null
+++ b/src/file/homefile/user/sshfile.cil
@@ -0,0 +1,41 @@
+;; Copyright (C) 2025 John Turner
+
+;; This program is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+(in file.home.user
+
+    (block ssh
+
+        (macro type ((type ARG1))
+            (typeattributeset typeattr ARG1))
+
+        (typeattribute typeattr)
+
+        (call file.home.user.type (typeattr))
+
+        (block base_template
+
+    	    (blockabstract base_template)
+
+    	    (blockinherit .file.home.user.base_template)
+
+    	    (call .file.home.user.ssh.type (file)))))
+
+(block ssh
+
+    (block home
+
+        (filecon "HOME_DIR/\.ssh(/.*)?" any file_context)
+
+        (blockinherit .file.home.user.ssh.base_template)))
diff --git a/src/file/homefile/userfile.cil b/src/file/homefile/userfile.cil
new file mode 100644
index 0000000..eb34ba3
--- /dev/null
+++ b/src/file/homefile/userfile.cil
@@ -0,0 +1,39 @@
+;; Copyright (C) 2025 John Turner
+
+;; This program is free software: you can redistribute it and/or modify
+;; it under the terms of the GNU General Public License as published by
+;; the Free Software Foundation, either version 3 of the License, or
+;; (at your option) any later version.
+
+;; This program is distributed in the hope that it will be useful,
+;; but WITHOUT ANY WARRANTY; without even the implied warranty of
+;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+;; GNU General Public License for more details.
+
+;; You should have received a copy of the GNU General Public License
+;; along with this program.  If not, see <https://www.gnu.org/licenses/>.
+
+(in file.home
+
+    (block user
+
+        (macro type ((type ARG1))
+            (typeattributeset typeattr ARG1))
+
+        (typeattribute typeattr)
+
+        (call file.home.type (typeattr))
+
+        (block base_template
+
+    	    (blockabstract base_template)
+
+    	    (blockinherit .file.home.base_template)
+
+    	    (call .file.home.user.type (file)))))
+
+(in user
+
+    (block home
+        
+        (blockinherit .file.home.user.base_template)))