diff options
Diffstat (limited to 'deployment/systems/rakan.scm')
| -rw-r--r-- | deployment/systems/rakan.scm | 26 |
1 files changed, 25 insertions, 1 deletions
diff --git a/deployment/systems/rakan.scm b/deployment/systems/rakan.scm index 0f03d65..00aee73 100644 --- a/deployment/systems/rakan.scm +++ b/deployment/systems/rakan.scm @@ -10,6 +10,8 @@ #:prefix gnu:services:base:) #:use-module ( (gnu services guix) #:prefix gnu:services:guix:) + #:use-module ( (gnu services samba) + #:prefix gnu:services:samba:) #:use-module ( (gnu services ssh) #:prefix gnu:services:ssh:) #:use-module ( (gnu system) @@ -33,7 +35,8 @@ #:use-module ( (sovereign systems) #:prefix sovereign:systems:) #:use-module ( (users id1000) - #:prefix users:id1000:)) + #:prefix users:id1000:) + #:use-module (guix gexp)) (define system-name "rakan") @@ -76,6 +79,26 @@ (gnu:services:service gnu:services:base:guix-publish-service-type guix-publish-configuration)) +(define samba-configuration + (gnu:services:samba:samba-configuration + (enable-smbd? #t) + (config-file (mixed-text-file "smb.conf" + "[global]\n" + "map to guest = Bad User\n" + "logging = syslog@1\n" + "\n" + "[public]\n" + "browsable = yes\n" + "path = /public\n" + "read only = no\n" + "guest ok = yes\n" + "guest only = yes\n")))) + +(define samba-service + (gnu:services:service + gnu:services:samba:samba-service-type + samba-configuration)) + (define system (let* ( (l-guix-homes (list users:id1000:name/home-environment)) @@ -94,6 +117,7 @@ guix-offload-authorizations) (gnu:services:service gnu:services:ssh:openssh-service-type) sovereign:packages:protonmail:nogui-profile + samba-service sovereign:systems:%sovereign-services)) (l-swap-devices (list swap)) (l-users (cons* users:id1000:uid1000-account |