guix
/
guix
mirror of git://git.savannah.gnu.org/guix.git
3
4
Fork 0
Code Issues Releases Wiki Activity

services: dnsmasq: Extend 'activation-service'. 

* gnu/services/dns.scm (dnsmasq-activation): New procedure …
(dnsmasq-service-type): … use it.
This commit is contained in:
Brice Waegeneire 2020-06-04 16:14:01 +02:00
parent 62a8d487d6
commit ea55e1355b
No known key found for this signature in database
GPG Key ID: A94903A166A18FAE
1 changed files with 9 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
gnu/services/dns.scm
View File

@ -861,12 +861,20 @@ cache.size = 100 * MB
#:pid-file "/run/dnsmasq.pid"))
(stop #~(make-kill-destructor))))))
(define (dnsmasq-activation config)
#~(begin
(use-modules (guix build utils))
;; create directory to store dnsmasq lease file
(mkdir-p "/var/lib/misc")))
(define dnsmasq-service-type
(service-type
(name 'dnsmasq)
(extensions
(list (service-extension shepherd-root-service-type
(compose list dnsmasq-shepherd-service))))
(compose list dnsmasq-shepherd-service))
(service-extension activation-service-type
dnsmasq-activation)))
(default-value (dnsmasq-configuration))
(description "Run the dnsmasq DNS server.")))