seasharp/Rosenthal
1
0
Fork 0
mirror of https://codeberg.org/hako/Rosenthal.git synced 2025-05-07 13:15:07 +00:00
Code Issues Packages Projects Releases Wiki Activity

services: cloudflare-tunnel-configuration: Add extra-tunnel-options.

Browse Source 
* rosenthal/services/child-error.scm (cloudflare-tunnel-configuration): Add
extra-tunnel-options.
(cloudflare-tunnel-shepherd-service): Honor it.
This commit is contained in:
Hilton Chain 2022-12-01 22:57:54 +08:00
parent 6dc8bbfa04
commit 6f168bc772
No known key found for this signature in database
GPG Key ID: 5E5AA665614917F7
1 changed files with 7 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
rosenthal/services/child-error.scm
View File

@ -45,6 +45,9 @@ headers. This can expose sensitive information in your logs.")
(log-file (log-file
(string "/var/log/cloudflared.log") (string "/var/log/cloudflared.log")
"File path to store logs.") "File path to store logs.")
(extra-tunnel-options
(list-of-strings '())
"List of extra tunnel options.")
;; Subcommand options ;; Subcommand options
(token (token
@ -74,6 +77,7 @@ headers. This can expose sensitive information in your logs.")
(match-lambda (match-lambda
(($ <cloudflare-tunnel-configuration> cloudflared metrics (($ <cloudflare-tunnel-configuration> cloudflared metrics
log-level log-file log-level log-file
extra-tunnel-options
token http2-origin? post-quantum? token http2-origin? post-quantum?
extra-options) extra-options)
(let ((tunnel-options (let ((tunnel-options
@ -83,8 +87,9 @@ headers. This can expose sensitive information in your logs.")
(provision '(cloudflare-tunnel)) (provision '(cloudflare-tunnel))
(requirement '(networking)) (requirement '(networking))
(start #~(make-forkexec-constructor (start #~(make-forkexec-constructor
(list #$cloudflared "tunnel" #$@tunnel-options "run" (list #$cloudflared "tunnel" #$@tunnel-options
"--token" #$token #$@extra-tunnel-options
"run" "--token" #$token
#$@(if http2-origin? #$@(if http2-origin?
'("--http2-origin") '("--http2-origin")
'()) '())