From b799ea6bf28e609bde4e5919b5eb18437c62472a Mon Sep 17 00:00:00 2001 From: Nicolas Ayache Date: Thu, 31 Jul 2025 16:36:30 +0200 Subject: [PATCH] Tezlink/Tezt Cloud: refactor some TzKT processes parameters --- tezt/tests/cloud/tezlink.ml | 44 ++++++++++++++++++------------------- 1 file changed, 21 insertions(+), 23 deletions(-) diff --git a/tezt/tests/cloud/tezlink.ml b/tezt/tests/cloud/tezlink.ml index 7dabf818620f..10d7188b5f4a 100644 --- a/tezt/tests/cloud/tezlink.ml +++ b/tezt/tests/cloud/tezlink.ml @@ -26,10 +26,16 @@ module Tzkt_process = struct include Daemon.Make (Parameters) - let run ?runner ~suffix cmd args = + let run ?runner ~suffix ~path ~dll ~endpoint ~db ~port () = let process_name = sf "%s-%s" Parameters.base_default_name suffix in - let daemon = create ?runner ~name:process_name ~path:cmd () in - run ?runner daemon () args + let daemon = create ?runner ~name:process_name ~path:"sh" () in + run + ?runner + daemon + () + [ + "-c"; sf "cd %s && dotnet Tzkt.%s.dll %s %s %s" path dll endpoint db port; + ] end let init_tzkt ~tzkt_api_port ~agent ~tezlink_sandbox_endpoint = @@ -156,31 +162,23 @@ let init_tzkt ~tzkt_api_port ~agent ~tezlink_sandbox_endpoint = Tzkt_process.run ?runner ~suffix:"indexer" - "sh" - [ - "-c"; - sf - "cd %s && dotnet Tzkt.Sync.dll %s %s %s" - tzkt_indexer_output - endpoint_arg - database_arg - indexer_port_arg; - ] + ~path:tzkt_indexer_output + ~dll:"Sync" + ~endpoint:endpoint_arg + ~db:database_arg + ~port:indexer_port_arg + () in let* () = Tzkt_process.run ?runner ~suffix:"api" - "sh" - [ - "-c"; - sf - "cd %s && dotnet Tzkt.Api.dll %s %s %s" - tzkt_api_output - endpoint_arg - database_arg - api_port_arg; - ] + ~path:tzkt_api_output + ~dll:"Api" + ~endpoint:endpoint_arg + ~db:database_arg + ~port:api_port_arg + () in unit -- GitLab