Merge pull request #6422 from IntersectMBO/bench/hotfix-genesis-format

bench | hotfixes: genesis format; cardano-tracer RTView build

Author: fmaste

cardano-tracer/CHANGELOG.md

@@ -1,5 +1,8 @@
 # ChangeLog
 
+## NEXT
+* RTView: Remove monitoring based on the `NodePeers` datapoint, which has been removed since Node 10.6.2; fixes the RTView-enabled build.
+
 ## 0.3.6 (November 2025)
 * Implement Prometheus HTTP service discovery (SD) under the URL `/targets`
 * Add optional config field `"prometheusLabels": { "<labelname>": "<labelvalue>", ... }` for custom labels to be attached with Prometheus SD

cardano-tracer/cardano-tracer.cabal

@@ -73,13 +73,11 @@ library
                         Cardano.Tracer.Handlers.RTView.State.EraSettings
                         Cardano.Tracer.Handlers.RTView.State.Historical
                         Cardano.Tracer.Handlers.RTView.State.Last
-                        Cardano.Tracer.Handlers.RTView.State.Peers
 
                         Cardano.Tracer.Handlers.RTView.UI.CSS.Bulma
                         Cardano.Tracer.Handlers.RTView.UI.CSS.Own
                         Cardano.Tracer.Handlers.RTView.UI.HTML.Node.Column
                         Cardano.Tracer.Handlers.RTView.UI.HTML.Node.EKG
-                        Cardano.Tracer.Handlers.RTView.UI.HTML.Node.Peers
                         Cardano.Tracer.Handlers.RTView.UI.HTML.About
                         Cardano.Tracer.Handlers.RTView.UI.HTML.Body
                         Cardano.Tracer.Handlers.RTView.UI.HTML.Logs
@@ -107,7 +105,6 @@ library
                         Cardano.Tracer.Handlers.RTView.Update.NodeInfo
                         Cardano.Tracer.Handlers.RTView.Update.NodeState
                         Cardano.Tracer.Handlers.RTView.Update.Nodes
-                        Cardano.Tracer.Handlers.RTView.Update.Peers
                         Cardano.Tracer.Handlers.RTView.Update.Reload
                         Cardano.Tracer.Handlers.RTView.Update.Resources
                         Cardano.Tracer.Handlers.RTView.Update.Transactions

cardano-tracer/src/Cardano/Tracer/Handlers/RTView/State/Peers.hs

@@ -8,7 +8,6 @@ import           Cardano.Tracer.Configuration
 import           Cardano.Tracer.Environment
 import           Cardano.Tracer.Handlers.RTView.State.Displayed
 import           Cardano.Tracer.Handlers.RTView.State.EraSettings
-import           Cardano.Tracer.Handlers.RTView.State.Peers
 import           Cardano.Tracer.Handlers.RTView.UI.CSS.Bulma
 import           Cardano.Tracer.Handlers.RTView.UI.CSS.Own
 import           Cardano.Tracer.Handlers.RTView.UI.Charts
@@ -22,7 +21,6 @@ import           Cardano.Tracer.Handlers.RTView.Update.KES
 import           Cardano.Tracer.Handlers.RTView.Update.Logs
 import           Cardano.Tracer.Handlers.RTView.Update.NodeState
 import           Cardano.Tracer.Handlers.RTView.Update.Nodes
-import           Cardano.Tracer.Handlers.RTView.Update.Peers
 import           Cardano.Tracer.Handlers.RTView.Update.Reload
 import           Cardano.Tracer.Handlers.State.TraceObjects
 import           Cardano.Tracer.Handlers.Utils
@@ -67,7 +65,6 @@ mkMainPage tracerEnv tracerEnvRTView displayedElements nodesEraSettings reloadFl
 
   colors <- initColors
   datasetIndices <- initDatasetsIndices
-  peers <- liftIO initPeers
 
   webPageIsOpened tracerEnvRTView
 
@@ -139,7 +136,6 @@ mkMainPage tracerEnv tracerEnvRTView displayedElements nodesEraSettings reloadFl
   uiPeersTimer <- UI.timer # set UI.interval 4000
   on_ UI.tick uiPeersTimer do
     askNSetNodeState tracerEnv displayedElements
-    updateNodesPeers tracerEnv peers
     updateKESInfo tracerEnv nodesEraSettings displayedElements
 
   UI.start uiLogsLiveViewTimer

cardano-tracer/src/Cardano/Tracer/Handlers/RTView/UI/HTML/Main.hs

@@ -8,7 +8,6 @@ module Cardano.Tracer.Handlers.RTView.UI.HTML.Node.Column
 import           Cardano.Tracer.Configuration
 import           Cardano.Tracer.Environment
 import           Cardano.Tracer.Handlers.RTView.UI.HTML.Node.EKG
-import           Cardano.Tracer.Handlers.RTView.UI.HTML.Node.Peers
 import           Cardano.Tracer.Handlers.RTView.UI.Img.Icons
 import           Cardano.Tracer.Handlers.RTView.UI.JS.Utils
 import           Cardano.Tracer.Handlers.RTView.UI.Utils
@@ -45,14 +44,6 @@ addNodeColumn tracerEnv loggingConfig nodeId@(NodeId anId) = do
   kes <- nodeKES id'
   opCert <- nodeOpCert id'
 
-  peersTable <- mkPeersTable id'
-  peersDetailsButton <- UI.button ## (id' <> "__node-peers-details-button")
-                                  #. "button is-info"
-                                  # set UI.enabled False
-                                  # set text "Details"
-  on_ UI.click peersDetailsButton do
-    fadeInModal peersTable
-
   ekgMetricsWindow <- mkEKGMetricsWindow id'
   ekgMetricsButton <- UI.button ## (id' <> "__node-ekg-metrics-button")
                                 #. "button is-info"
@@ -86,14 +77,6 @@ addNodeColumn tracerEnv loggingConfig nodeId@(NodeId anId) = do
   addNodeCell "start-time" st
   addNodeCell "uptime" ut
   addNodeCell "logs" ls
-  addNodeCell "peers" [ UI.div #. "buttons has-addons" #+
-                          [ UI.button ## (id' <> "__node-peers-num")
-                                      #. "button is-static"
-                                      # set text "—"
-                          , element peersDetailsButton
-                          ]
-                      , element peersTable
-                      ]
   addNodeCell "leadership" leadership
   addNodeCell "kes" kes
   addNodeCell "op-cert" opCert

cardano-tracer/src/Cardano/Tracer/Handlers/RTView/UI/HTML/Node/Column.hs

@@ -1,6 +1,6 @@
 # shellcheck shell=bash
 
-global_genesis_format_version=October-13-2026
+global_genesis_format_version=October-13-2025
 
 usage_genesis() {
   usage "genesis" "Genesis" <<EOF