blob: 1d87ebb0657a44b40313347074d9f8695af26b22 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
|
(define-module (kbg services nftables)
#:use-module (kbg)
#:use-module (gnu)
#:use-module (guix)
#:use-module (guix gexp)
#:use-module (gnu services)
#:use-module (gnu services networking)
#:export (nftables-service))
(define (nftables-service hostname)
(let ((nftrules-file (string-append %dotfiles-root
"systems/"
hostname
"/nftables-rules.nft")))
(service nftables-service-type
(nftables-configuration
(ruleset (local-file nftrules-file "nftables-rules.nft"))))))
|