aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--config/shepherd/init.d/cardano.scm18
1 files changed, 16 insertions, 2 deletions
diff --git a/config/shepherd/init.d/cardano.scm b/config/shepherd/init.d/cardano.scm
index e2f2138..a597f30 100644
--- a/config/shepherd/init.d/cardano.scm
+++ b/config/shepherd/init.d/cardano.scm
@@ -29,7 +29,7 @@
"-o" "ExitOnForwardFailure=yes"
"-L" "54320:localhost:5432"
"cardano@alina")
- #:log-file "/tmp/postgresql-ssh.log")
+ #:log-file "/tmp/testnet-psql-ssh.log")
#:stop (make-kill-destructor 2) ;; 2 is SIGINT - interupt process stream, ctrl-C
#:respawn? #t))
@@ -60,7 +60,7 @@
"-o" "ExitOnForwardFailure=yes"
"-o" "StreamLocalBindUnlink=yes"
"-L" "/tmp/alinamn.socket:/run/cardano-node-mainnet/socket"
- "cardano@alina")
+ "cardano@nina")
#:log-file "/tmp/mainnet-ssh.log")
#:stop (make-kill-destructor 2) ;; 2 is SIGINT - interupt process stream, ctrl-C
#:respawn? #t))
@@ -80,3 +80,17 @@
#:stop (make-kill-destructor 2) ;; 2 is SIGINT - interupt process stream, ctrl-C
#:requires '(mainnet-node-ssh)))
+
+(register-services
+ (make <service>
+ #:docstring "Mainnet Postgresql ssh"
+ #:provides '(mainnet-postgresql-ssh)
+ #:start (make-forkexec-constructor
+ (list "ssh" "-NTv"
+ "-o" "ServerAliveInterval=60"
+ "-o" "ExitOnForwardFailure=yes"
+ "-L" "54320:localhost:5432"
+ "cardano@nina")
+ #:log-file "/tmp/mainnet-psql-ssh.log")
+ #:stop (make-kill-destructor 2) ;; 2 is SIGINT - interupt process stream, ctrl-C
+ #:respawn? #t))