seasharp/Rosenthal
1
0
Fork 0
mirror of https://codeberg.org/hako/Rosenthal.git synced 2025-11-04 03:34:37 +00:00
Code Issues Packages Projects Releases Wiki Activity

services: cloudflare-tunnel-shepherd-service: Inline tunnel options.

Browse Source 
* rosenthal/services/child-error.scm (cloudflare-tunnel-shepherd-service):
Inline tunnel-options.
This commit is contained in:
Hilton Chain 2022-12-01 23:02:20 +08:00
parent 6f168bc772
commit abeacc8731
No known key found for this signature in database
GPG Key ID: 5E5AA665614917F7
1 changed files with 25 additions and 21 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -80,27 +80,31 @@ headers. This can expose sensitive information in your logs.")
extra-tunnel-options
token http2-origin? post-quantum?
extra-options)
(let ((tunnel-options
(list "--no-autoupdate" "--metrics" metrics "--loglevel" log-level)))
(list (shepherd-service
(documentation "Run cloudflared.")
(provision '(cloudflare-tunnel))
(requirement '(networking))
(start #~(make-forkexec-constructor
(list #$cloudflared "tunnel" #$@tunnel-options
#$@extra-tunnel-options
"run" "--token" #$token
#$@(if http2-origin?
'("--http2-origin")
'())
#$@(if post-quantum?
'("--post-quantum")
'())
#$@extra-options)
#:user "cloudflared"
#:group "cloudflared"
#:log-file #$log-file))
(stop #~(make-kill-destructor))))))))
(list (shepherd-service
(documentation "Run cloudflared.")
(provision '(cloudflare-tunnel))
(requirement '(networking))
(start #~(make-forkexec-constructor
(list #$cloudflared
"tunnel"
"--no-autoupdate"
"--metrics" #$metrics
"--loglevel" #$log-level
#$@extra-tunnel-options
"run"
"--token" #$token
#$@(if http2-origin?
'("--http2-origin")
'())
#$@(if post-quantum?
'("--post-quantum")
'())
#$@extra-options)
#:user "cloudflared"
#:group "cloudflared"
#:log-file #$log-file))
(stop #~(make-kill-destructor)))))))
(define cloudflare-tunnel-service-type
(service-type