1
0
mirror of https://git.savannah.gnu.org/git/guix.git synced 2026-04-06 21:20:33 +02:00

services: nar-herder: Add control server options.

* gnu/services/guix.scm (<nar-herder-configuration>): Add control host and
control port fields.
(nar-herder-shepherd-services): Use them.
* doc/guix.texi (Guix Services): Document them.

Change-Id: Ie738fb30302496d2ec530ca3b5c8b0628fdd4c05
This commit is contained in:
Christopher Baines
2025-10-23 16:35:51 +01:00
parent c461c5f85c
commit b0ef1997d8
2 changed files with 12 additions and 0 deletions

View File

@@ -43491,6 +43491,12 @@ The port to bind the server to.
@item @code{host} (default: @code{"127.0.0.1"}) @item @code{host} (default: @code{"127.0.0.1"})
The host to bind the server to. The host to bind the server to.
@item @code{control-port} (default: @code{8734})
The port to bind the control server to.
@item @code{control-host} (default: @code{"127.0.0.1"})
The host to bind the control server to.
@item @code{mirror} (default: @code{#f}) @item @code{mirror} (default: @code{#f})
Optional URL of the other Nar Herder instance which should be mirrored. Optional URL of the other Nar Herder instance which should be mirrored.
This means that this Nar Herder instance will download it's database, This means that this Nar Herder instance will download it's database,

View File

@@ -844,6 +844,10 @@ ca-certificates.crt file in the system profile."
(default "127.0.0.1")) (default "127.0.0.1"))
(port nar-herder-configuration-port (port nar-herder-configuration-port
(default 8734)) (default 8734))
(control-host nar-herder-configuration-control-host
(default "127.0.0.1"))
(control-port nar-herder-configuration-control-port
(default 8735))
(storage nar-herder-configuration-storage (storage nar-herder-configuration-storage
(default #f)) (default #f))
(storage-limit nar-herder-configuration-storage-limit (storage-limit nar-herder-configuration-storage-limit
@@ -968,6 +972,8 @@ ca-certificates.crt file in the system profile."
"--pid-file=/var/run/nar-herder/pid" "--pid-file=/var/run/nar-herder/pid"
#$(string-append "--port=" (number->string port)) #$(string-append "--port=" (number->string port))
#$(string-append "--host=" host) #$(string-append "--host=" host)
#$(string-append "--control-port=" (number->string port))
#$(string-append "--control-host=" host)
#$@(if mirror #$@(if mirror
(list (string-append "--mirror=" mirror)) (list (string-append "--mirror=" mirror))
'()) '())