diff options
Diffstat (limited to 'gnu')
| -rw-r--r-- | gnu/services/guix.scm | 18 |
1 files changed, 17 insertions, 1 deletions
diff --git a/gnu/services/guix.scm b/gnu/services/guix.scm index b86e20360b..b0d2c05bcf 100644 --- a/gnu/services/guix.scm +++ b/gnu/services/guix.scm @@ -71,6 +71,11 @@ guix-build-coordinator-agent-password-file-auth-uuid guix-build-coordinator-agent-password-file-auth-password-file + guix-build-coordinator-agent-dynamic-auth + guix-build-coordinator-agent-dynamic-auth? + guix-build-coordinator-agent-dynamic-auth-agent-name + guix-build-coordinator-agent-dynamic-auth-token + guix-build-coordinator-agent-service-type guix-build-coordinator-queue-builds-configuration @@ -168,6 +173,13 @@ (password-file guix-build-coordinator-agent-password-file-auth-password-file)) +(define-record-type* <guix-build-coordinator-agent-dynamic-auth> + guix-build-coordinator-agent-dynamic-auth + make-guix-build-coordinator-agent-dynamic-auth + guix-build-coordinator-agent-dynamic-auth? + (agent-name guix-build-coordinator-agent-dynamic-auth-agent-name) + (token guix-build-coordinator-agent-dynamic-auth-token)) + (define-record-type* <guix-build-coordinator-queue-builds-configuration> guix-build-coordinator-queue-builds-configuration make-guix-build-coordinator-queue-builds-configuration @@ -365,7 +377,11 @@ uuid password-file) #~(#$(string-append "--uuid=" uuid) #$(string-append "--password-file=" - password-file)))) + password-file))) + (($ <guix-build-coordinator-agent-dynamic-auth> + agent-name token) + #~(#$(string-append "--name=" agent-name) + #$(string-append "--dynamic-auth-token=" token)))) #$(simple-format #f "--max-parallel-builds=~A" max-parallel-builds) #$@(if derivation-substitute-urls |