Update SendFetchRequest trace

The incomming and outgoing G (RTT) can decide if we attempt to fetch a given block from a peer. Adding PeerGSV to SendFetchRequest lets us track G for not only the first node we downloaded a block from, but for all other download attempts we initiated for that block.
IntersectMBO · Nov 20, 2022 · 5f7b7fc · 5f7b7fc
1 parent a376bb2
commit 5f7b7fc
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 1 deletion.
diff --git a/ouroboros-network/src/Ouroboros/Network/BlockFetch/Client.hs b/ouroboros-network/src/Ouroboros/Network/BlockFetch/Client.hs
@@ -186,7 +186,7 @@ blockFetchClient _version controlMessageSTM reportFetched
                 Right lower = AF.last fragment
                 Right upper = AF.head fragment
 
-        traceWith tracer (SendFetchRequest fragment)
+        traceWith tracer (SendFetchRequest fragment gsvs)
         return $
           SenderPipeline
             (ClientAgency TokIdle)

diff --git a/ouroboros-network/src/Ouroboros/Network/BlockFetch/ClientState.hs b/ouroboros-network/src/Ouroboros/Network/BlockFetch/ClientState.hs
@@ -383,6 +383,7 @@ data TraceFetchClientState header =
        -- over the wire.
      | SendFetchRequest
          (AnchoredFragment header)
+         PeerGSV
 
        -- | Mark the start of receiving a streaming batch of blocks. This will
        -- be followed by one or more 'CompletedBlockFetch' and a final