blob: 4c98f1c1d74d8d47d08528ddbe325f28c4a11127 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
(register-services
(make <service>
#:docstring "SSH tunnel to ingrid CMK server for socket"
#:provides '(ingrid-cmk)
#:start (make-forkexec-constructor
(list "ssh" "-NTv"
"-o" "ServerAliveInterval=60"
"-o" "ExitOnForwardFailure=yes"
"-o" "StreamLocalBindUnlink=yes"
"-L" "/tmp/ingridcmk.socket:/omd/sites/ingrid/tmp/run/live"
"ingrid@ingrid")
#:log-file "/tmp/ingrid-cmk.log")
#:stop (make-kill-destructor 2) ;; 2 is SIGINT - interupt process stream, ctrl-C
#:respawn? #t))
|
