consensus-test
Safe HaskellNone
LanguageHaskell2010

Test.Consensus.PeerSimulator.Trace

Description

Helpers for tracing used by the peer simulator.

Synopsis

Documentation

data TraceBlockFetchClientTerminationEvent Source #

Constructors

TraceExceededSizeLimitBF 
TraceExceededTimeLimitBF 

data TraceChainSyncClientTerminationEvent Source #

Constructors

TraceExceededSizeLimitCS 
TraceExceededTimeLimitCS 
TraceTerminatedByGDDGovernor 
TraceTerminatedByLoP 

data TraceEvent blk Source #

Constructors

TraceSchedulerEvent (TraceSchedulerEvent blk) 
TraceScheduledChainSyncServerEvent PeerId (TraceScheduledChainSyncServerEvent (NodeState blk) blk) 
TraceScheduledBlockFetchServerEvent PeerId (TraceScheduledBlockFetchServerEvent (NodeState blk) blk) 
TraceChainDBEvent (TraceEvent blk) 
TraceChainSyncClientEvent PeerId (TraceChainSyncClientEvent blk) 
TraceChainSyncClientTerminationEvent PeerId TraceChainSyncClientTerminationEvent 
TraceBlockFetchClientTerminationEvent PeerId TraceBlockFetchClientTerminationEvent 
TraceGenesisDDEvent (TraceGDDEvent PeerId blk) 
TraceChainSyncSendRecvEvent PeerId String (TraceSendRecv (ChainSync (Header blk) (Point blk) (Tip blk))) 
TraceDbfEvent (TraceEventDbf PeerId) 
TraceCsjEvent PeerId (TraceEventCsj PeerId blk) 
TraceOther String 

data TraceScheduledBlockFetchServerEvent state blk Source #

Constructors

TraceHandlerEventBF (TraceScheduledServerHandlerEvent state blk) 
TraceNoBlocks 
TraceStartingBatch (AnchoredFragment blk) 
TraceWaitingForRange (Point blk) (Point blk) 
TraceSendingBlock blk 
TraceBatchIsDone 
TraceBlockPointIsBehind 

data TraceScheduledChainSyncServerEvent state blk Source #

Constructors

TraceHandlerEventCS (TraceScheduledServerHandlerEvent state blk) 
TraceLastIntersection (Point blk) 
TraceClientIsDone 
TraceIntersectionFound (Point blk) 
TraceIntersectionNotFound 
TraceRollForward (Header blk) (Tip blk) 
TraceRollBackward (Point blk) (Tip blk) 
TraceChainIsFullyServed 
TraceIntersectionIsHeaderPoint 
TraceIntersectionIsStrictAncestorOfHeaderPoint (AnchoredFragment blk) 
TraceIntersectionIsStrictDescendentOfHeaderPoint 

data TraceScheduledServerHandlerEvent state blk Source #

Constructors

TraceHandling HandlerName state 
TraceRestarting HandlerName 
TraceDoneHandling HandlerName 

data TraceSchedulerEvent blk Source #

Trace messages sent by the scheduler.

Constructors

TraceBeginningOfTime

Right before running the first tick (at time 0) of the schedule.

TraceEndOfTime

Right after running the last tick of the schedule.

TraceExtraDelay DiffTime

An extra optional delay to keep the simulation running

TraceNewTick Int DiffTime (Peer (NodeState blk)) (AnchoredFragment (Header blk)) (Maybe (AnchoredFragment (Header blk))) [(PeerId, ChainSyncJumpingState m blk)]

When beginning a new tick. Contains the tick number (counting from 0), the duration of the tick, the states, the current chain, the candidate fragment, and the jumping states.

TraceNodeShutdownStart (WithOrigin SlotNo) 
TraceNodeShutdownComplete 
TraceNodeStartupStart 
TraceNodeStartupComplete (AnchoredFragment (Header blk)) 

mkGDDTracerTestBlock ∷ ∀ (m ∷ Type → Type). Tracer m (TraceEvent TestBlock) → Tracer m (TraceGDDEvent PeerId TestBlock) Source #

prettyDensityBounds ∷ [(PeerId, DensityBounds TestBlock)] → [String] Source #

traceLinesWith ∷ Tracer m String → [String] → m () Source #

tracerTestBlock ∷ IOLike m ⇒ Tracer m String → m (Tracer m (TraceEvent TestBlock)) Source #