Merge pull request #1395 from input-output-hk/disable-sanchonet-tests

Disable sanchonet integration tests
cardano-scaling · Apr 16, 2024 · c5c192b · c5c192b
2 parents b554d3d + d525ffc
commit c5c192b
Show file tree

Hide file tree

Showing 2 changed files with 8 additions and 3 deletions.
diff --git a/hydra-cluster/src/HydraNode.hs b/hydra-cluster/src/HydraNode.hs
@@ -334,13 +334,16 @@ withHydraNode' tracer chainConfig workDir hydraNodeId hydraSKey hydraVKeys allNo
       filepath <$ writeFileTextEnvelope (File filepath) Nothing vKey
     let p =
           ( hydraNodeProcess $
+              -- NOTE: Using 0.0.0.0 over 127.0.0.1 will make the hydra-node
+              -- crash if it can't bind the interface and make tests fail more
+              -- obvious when e.g. a hydra-node instance is already running.
               RunOptions
                 { verbosity = Verbose "HydraNode"
                 , nodeId = NodeId $ show hydraNodeId
-                , host = "127.0.0.1"
+                , host = "0.0.0.0"
                 , port = fromIntegral $ 5_000 + hydraNodeId
                 , peers
-                , apiHost = "127.0.0.1"
+                , apiHost = "0.0.0.0"
                 , apiPort = fromIntegral $ 4_000 + hydraNodeId
                 , monitoringPort = Just $ fromIntegral $ 6_000 + hydraNodeId
                 , hydraSigningKey

diff --git a/hydra-cluster/test/Test/CardanoNodeSpec.hs b/hydra-cluster/test/Test/CardanoNodeSpec.hs
@@ -41,14 +41,16 @@ spec = do
 
     describe "findRunningCardanoNode" $ do
       it "returns Nothing on non-matching network" $ \(tr, tmp) -> do
-        withCardanoNodeOnKnownNetwork tr tmp Sanchonet $ \_ -> do
+        withCardanoNodeOnKnownNetwork tr tmp Preview $ \_ -> do
           findRunningCardanoNode tr tmp Preproduction `shouldReturn` Nothing
 
       it "returns Just running node on matching network" $ \(tr, tmp) -> do
         withCardanoNodeOnKnownNetwork tr tmp Preview $ \runningNode -> do
           findRunningCardanoNode tr tmp Preview `shouldReturn` Just runningNode
 
   forEachKnownNetwork "withCardanoNodeOnKnownNetwork starts synchronizing within 10 seconds" $ \network -> do
+    when (network == Sanchonet) $
+      pendingWith "cardano-node 8.9 not anymore supported on sanchonet"
     -- NOTE: This implies that withCardanoNodeOnKnownNetwork does not
     -- synchronize the whole chain before continuing.
     setupTracerAndTempDir $ \(tr, tmp) ->