diff options
| author | Timo Wilken | 2023-04-20 23:39:07 +0200 |
|---|---|---|
| committer | Timo Wilken | 2023-04-21 14:32:02 +0200 |
| commit | 5ddf8241ec2eb8faed264781fedc927e62a3c20d (patch) | |
| tree | 2d12fec3d87623a17cc42cf05f5ce1d41d380351 /tw/system.scm | |
| parent | 79ea4090f9b5591e1e93c0bc5a5250ce4b390981 (diff) | |
Draft of restic server deployment
Diffstat (limited to 'tw/system.scm')
| -rw-r--r-- | tw/system.scm | 14 |
1 files changed, 9 insertions, 5 deletions
diff --git a/tw/system.scm b/tw/system.scm index c9904e24..0b738038 100644 --- a/tw/system.scm +++ b/tw/system.scm @@ -43,6 +43,14 @@ ("vin.twilken.net" . 22022) ("pi3.twilken.net" . 51022))) +(export server-wireguard-address) +(define* (server-wireguard-address host-name #:optional (port "")) + (string-replace-substring + (car ; get the IPv4 address + (wireguard-peer-allowed-ips + (assoc-ref %wireguard-peers host-name))) + "/32" port)) + (define-public (server-base-services host-name) (cons* ;; SSH login, allowing access only for me. To give more public keys @@ -61,11 +69,7 @@ (service prometheus-node-exporter-service-type (prometheus-node-exporter-configuration (web-listen-address - (string-replace-substring - (car ; get the IPv4 address - (wireguard-peer-allowed-ips - (assoc-ref %wireguard-peers host-name))) - "/32" ":9100")))) + (server-wireguard-address host-name ":9100")))) (simple-service 'disk-maintenance mcron-service-type (list #~(job "0 2 * * *" "guix gc -d 2w") |