From e7920c7cf011f441a8b77693ed513eac476986a3 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?=C3=93scar=20N=C3=A1jera?= Date: Thu, 23 Jun 2022 16:14:50 +0200 Subject: Testing vasil --- config/shepherd/init.d/cardano.scm | 84 +++++++++++++++++++++++++++++++++++++- 1 file changed, 83 insertions(+), 1 deletion(-) diff --git a/config/shepherd/init.d/cardano.scm b/config/shepherd/init.d/cardano.scm index 4f671ec..0cdbb06 100644 --- a/config/shepherd/init.d/cardano.scm +++ b/config/shepherd/init.d/cardano.scm @@ -15,6 +15,7 @@ "-o" "StreamLocalBindUnlink=yes" "-L" "/tmp/alinatn.socket:/run/cardano-node-testnet/socket" "-L" "54321:localhost:5432" + "-R" "3005:localhost:3005" ;; Push to VPS vasil the block producer on 3005 "cardano@alina") #:log-file "/tmp/testnet-ssh.log") #:stop (make-kill-destructor 2) ;; 2 is SIGINT - interupt process stream, ctrl-C @@ -67,6 +68,87 @@ "--database" (string-append (getenv "HOME") "/test-cardano/main/wallet") "--mainnet") #:log-file (string-append (getenv "HOME") "/test-cardano/main/log/wallet.log")) - #:stop (make-kill-destructor 2) ;; 2 is SIGINT - interupt process stream, ctrl-C #:requires '(mainnet-ssh))) + +(register-services + (make + #:docstring "Vasil devnet node" + #:provides '(vasil-devnet) + #:start (make-forkexec-constructor + (list ;;(string-append (getenv "HOME") "/.cabal/bin/cardano-wallet") + "/home/titan/dev/cardano/cardano-node/dist-newstyle/build/x86_64-linux/ghc-8.10.7/cardano-node-1.35.0/x/cardano-node/build/cardano-node/cardano-node" + "run" + "+RTS" "-N2" "-A16m" "-qg" "-qb" "-RTS" + "--database-path" (string-append (getenv "HOME") "/test-cardano/dev-vasil/node") + "--socket-path" (string-append (getenv "HOME") "/test-cardano/dev-vasil/vasil.socket") + "--port" "3004" + "--config" (string-append (getenv "HOME") "/dev/cardano/cardano-world/docs/environments/vasil-dev/config.json") + "--topology" (string-append (getenv "HOME") "/dev/cardano/cardano-world/docs/environments/vasil-dev/relay-topology.json") + + ) + #:log-file (string-append (getenv "HOME") "/test-cardano/dev-vasil/log/node.log")) + #:stop (make-kill-destructor 2) ;; 2 is SIGINT - interupt process stream, ctrl-C + #:respawn? #t)) + +(register-services + (make + #:docstring "Vasil devnet block producer" + #:provides '(vasil-bp) + #:start (make-forkexec-constructor + (list ;;(string-append (getenv "HOME") "/.cabal/bin/cardano-wallet") + "/home/titan/dev/cardano/cardano-node/dist-newstyle/build/x86_64-linux/ghc-8.10.7/cardano-node-1.35.0/x/cardano-node/build/cardano-node/cardano-node" + "run" + "+RTS" "-N2" "-A16m" "-qg" "-qb" "-RTS" + "--database-path" (string-append (getenv "HOME") "/test-cardano/dev-vasil/bp-node") + "--socket-path" (string-append (getenv "HOME") "/test-cardano/dev-vasil/bp-vasil.socket") + "--port" "3005" + "--config" (string-append (getenv "HOME") "/dev/cardano/cardano-world/docs/environments/vasil-dev/config-bp.json") + "--topology" (string-append (getenv "HOME") "/dev/cardano/cardano-world/docs/environments/vasil-dev/block-producer-topology.json") + + "--shelley-kes-key" (string-append (getenv "HOME") "/dev/cardano/emacs-wallet/keys/demo/kes.skey") + "--shelley-vrf-key" (string-append (getenv "HOME") "/dev/cardano/emacs-wallet/keys/demo/vrf.skey") + "--shelley-operational-certificate" (string-append (getenv "HOME") "/dev/cardano/emacs-wallet/keys/demo/node.cert") + ) + #:environment-variables (list (string-append "LD_LIBRARY_PATH=" (getenv "HOME") "/.local/lib")) + #:log-file (string-append (getenv "HOME") "/test-cardano/dev-vasil/log/bp-node.log")) + #:stop (make-kill-destructor 2) ;; 2 is SIGINT - interupt process stream, ctrl-C + #:requires '(testnet-ssh) + #:respawn? #t)) + +(register-services + (make + #:docstring "Vasil db sync" + #:provides '(vasil-db-sync) + #:start (make-forkexec-constructor + (list + "/home/titan/dev/cardano/cardano-db-sync/dist-newstyle/build/x86_64-linux/ghc-8.10.7/cardano-db-sync-13.0.0/build/cardano-db-sync/cardano-db-sync" + "--config" (string-append (getenv "HOME") "/dev/cardano/cardano-world/docs/environments/vasil-dev/db-sync-config.json") + "--socket-path" (string-append (getenv "HOME") "/test-cardano/dev-vasil/bp-vasil.socket") + "--state-dir" (string-append (getenv "HOME") "/test-cardano/dev-vasil/ledger-state") + "--schema-dir" (string-append (getenv "HOME") "/dev/cardano/cardano-db-sync/schema") + ) + #:environment-variables (list (string-append "PGPASSFILE=" (getenv "HOME") "/test-cardano/config/pgpass-vasil")) + #:log-file (string-append (getenv "HOME") "/test-cardano/dev-vasil/log/db-sync.log")) + #:stop (make-kill-destructor 2) ;; 2 is SIGINT - interupt process stream, ctrl-C + #:requires '(vasil-bp) + #:respawn? #t)) + +(register-services + (make + #:docstring "Cardano Vasil wallet" + #:provides '(vasil-wallet) + #:start (make-forkexec-constructor + (list "cardano-wallet" + ;;(string-append (getenv "HOME") "/.cabal/bin/cardano-wallet") + "serve" + "+RTS" "-T" "-RTS" + "--port" "8093" + "--node-socket" (string-append (getenv "HOME") "/test-cardano/dev-vasil/vasil.socket") + "--database" (string-append (getenv "HOME") "/test-cardano/dev-vasil/wallet") + "--testnet" (string-append (getenv "HOME") "/dev/cardano/cardano-world/docs/environments/vasil-dev/byron-genesis.json") + ) + #:log-file (string-append (getenv "HOME") "/test-cardano/dev-vasil/log/wallet.log")) + + #:stop (make-kill-destructor 2) ;; 2 is SIGINT - interupt process stream, ctrl-C + #:requires '(vasil-devnet))) -- cgit v1.2.3