|
|
@ -146,9 +146,6 @@ |
|
|
|
"The cloudflared executable.") |
|
|
|
"The cloudflared executable.") |
|
|
|
|
|
|
|
|
|
|
|
;; Tunnel options |
|
|
|
;; Tunnel options |
|
|
|
(metrics |
|
|
|
|
|
|
|
(string "localhost:") |
|
|
|
|
|
|
|
"Listen address for metrics reporting.") |
|
|
|
|
|
|
|
(log-level |
|
|
|
(log-level |
|
|
|
(string "info") |
|
|
|
(string "info") |
|
|
|
"Application logging level (@code{debug}, @code{info}, @code{warn}, |
|
|
|
"Application logging level (@code{debug}, @code{info}, @code{warn}, |
|
|
@ -166,12 +163,6 @@ headers. This can expose sensitive information in your logs.") |
|
|
|
(token |
|
|
|
(token |
|
|
|
(string "") |
|
|
|
(string "") |
|
|
|
"The Tunnel token.") |
|
|
|
"The Tunnel token.") |
|
|
|
(http2-origin? |
|
|
|
|
|
|
|
(boolean #f) |
|
|
|
|
|
|
|
"Enable HTTP/2 origin servers.") |
|
|
|
|
|
|
|
(post-quantum? |
|
|
|
|
|
|
|
(boolean #f) |
|
|
|
|
|
|
|
"Create an experimental post-quantum secure tunnel.") |
|
|
|
|
|
|
|
(extra-options |
|
|
|
(extra-options |
|
|
|
(list-of-strings '()) |
|
|
|
(list-of-strings '()) |
|
|
|
"List of extra options.") |
|
|
|
"List of extra options.") |
|
|
@ -183,8 +174,8 @@ headers. This can expose sensitive information in your logs.") |
|
|
|
|
|
|
|
|
|
|
|
(define cloudflare-tunnel-shepherd-service |
|
|
|
(define cloudflare-tunnel-shepherd-service |
|
|
|
(match-record-lambda <cloudflare-tunnel-configuration> |
|
|
|
(match-record-lambda <cloudflare-tunnel-configuration> |
|
|
|
(cloudflared metrics log-level log-file extra-tunnel-options |
|
|
|
(cloudflared log-level log-file extra-tunnel-options |
|
|
|
token http2-origin? post-quantum? extra-options) |
|
|
|
token extra-options) |
|
|
|
(list (shepherd-service |
|
|
|
(list (shepherd-service |
|
|
|
(documentation "Run cloudflared.") |
|
|
|
(documentation "Run cloudflared.") |
|
|
|
(provision '(cloudflare-tunnel)) |
|
|
|
(provision '(cloudflare-tunnel)) |
|
|
@ -193,17 +184,9 @@ headers. This can expose sensitive information in your logs.") |
|
|
|
(list #$(file-append cloudflared "/bin/cloudflared") |
|
|
|
(list #$(file-append cloudflared "/bin/cloudflared") |
|
|
|
"tunnel" |
|
|
|
"tunnel" |
|
|
|
"--no-autoupdate" |
|
|
|
"--no-autoupdate" |
|
|
|
"--metrics" #$metrics |
|
|
|
|
|
|
|
"--loglevel" #$log-level |
|
|
|
"--loglevel" #$log-level |
|
|
|
#$@extra-tunnel-options |
|
|
|
#$@extra-tunnel-options |
|
|
|
|
|
|
|
|
|
|
|
"run" |
|
|
|
"run" |
|
|
|
#$@(if http2-origin? |
|
|
|
|
|
|
|
'("--http2-origin") |
|
|
|
|
|
|
|
'()) |
|
|
|
|
|
|
|
#$@(if post-quantum? |
|
|
|
|
|
|
|
'("--post-quantum") |
|
|
|
|
|
|
|
'()) |
|
|
|
|
|
|
|
#$@extra-options) |
|
|
|
#$@extra-options) |
|
|
|
#:user "nobody" |
|
|
|
#:user "nobody" |
|
|
|
#:group "nogroup" |
|
|
|
#:group "nogroup" |
|
|
|