mirror of https://codeberg.org/hako/Rosenthal.git
You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
47 lines
1.5 KiB
47 lines
1.5 KiB
;; SPDX-FileCopyrightText: 2022, 2023 Hilton Chain <hako@ultrarare.space> |
|
;; |
|
;; SPDX-License-Identifier: GPL-3.0-or-later |
|
|
|
(define-module (rosenthal services dns) |
|
#:use-module (guix gexp) |
|
#:use-module (guix packages) |
|
#:use-module (guix records) |
|
#:use-module (gnu services) |
|
#:use-module (gnu services configuration) |
|
#:use-module (gnu packages dns) |
|
#:use-module (gnu services shepherd) |
|
#:export (smartdns-configuration |
|
smartdns-service-type)) |
|
|
|
;; |
|
;; Smartdns |
|
;; |
|
|
|
(define-configuration/no-serialization smartdns-configuration |
|
(smartdns |
|
(package smartdns) |
|
"The Smartdns package.") |
|
(config-file |
|
(file-like (plain-file "empty" "")) |
|
"Configuration file for Smartdns.")) |
|
|
|
(define (smartdns-shepherd-service config) |
|
(match-record config <smartdns-configuration> |
|
(smartdns config-file) |
|
(list (shepherd-service |
|
(documentation "Run smartdns.") |
|
(provision '(smartdns dns)) |
|
(requirement '(loopback networking)) |
|
(start #~(make-forkexec-constructor |
|
(list #$(file-append smartdns "/sbin/smartdns") |
|
"-f" "-c" #$(file-append config-file)))) |
|
(stop #~(make-kill-destructor)))))) |
|
|
|
(define smartdns-service-type |
|
(service-type |
|
(name 'smartdns) |
|
(extensions |
|
(list (service-extension shepherd-root-service-type |
|
smartdns-shepherd-service))) |
|
(default-value (smartdns-configuration)) |
|
(description "Run Smartdns daemon.")))
|
|
|