Safe Haskell	Safe-Inferred
Language	Haskell2010

Cardano.Node.Tracing.StateRep

Contents

Orphan instances

Synopsis

data AddedToCurrentChain = AddedToCurrentChain !EpochNo !SlotNo !SyncPercentage
data InitChainSelection
- = InitChainStartedSelection
- | InitChainSelected
data NodeState
data OpeningDbs
- = StartedOpeningImmutableDB
- | OpenedImmutableDB (WithOrigin SlotNo) ChunkNo
- | StartedOpeningVolatileDB
- | OpenedVolatileDB
- | StartedOpeningLgrDB
- | OpenedLgrDB
data Replays
- = ReplayFromGenesis (WithOrigin SlotNo)
- | ReplayFromSnapshot SlotNo (WithOrigin SlotNo) (WithOrigin SlotNo)
- | ReplayedBlock SlotNo (WithOrigin SlotNo) (WithOrigin SlotNo)
data StartupState
- = StartupSocketConfigError Text
- | StartupDBValidation
- | NetworkConfigUpdate
- | NetworkConfigUpdateError Text
- | P2PWarning
- | WarningDevelopmentNodeToNodeVersions [NodeToNodeVersion]
- | WarningDevelopmentNodeToClientVersions [NodeToClientVersion]
traceNodeStateChainDB :: SomeConsensusProtocol -> Trace IO NodeState -> TraceEvent blk -> IO ()
traceNodeStateStartup :: Trace IO NodeState -> StartupTrace blk -> IO ()
traceNodeStateShutdown :: Trace IO NodeState -> ShutdownTrace -> IO ()

Documentation

data AddedToCurrentChain Source #

Constructors

AddedToCurrentChain !EpochNo !SlotNo !SyncPercentage

Instances

Instances details

FromJSON AddedToCurrentChain Source #
Instance details Defined in Cardano.Node.Tracing.StateRep Methods parseJSON :: Value -> Parser AddedToCurrentChain parseJSONList :: Value -> Parser [AddedToCurrentChain] omittedField :: Maybe AddedToCurrentChain
ToJSON AddedToCurrentChain Source #
Instance details Defined in Cardano.Node.Tracing.StateRep Methods toJSON :: AddedToCurrentChain -> Value # toEncoding :: AddedToCurrentChain -> Encoding toJSONList :: [AddedToCurrentChain] -> Value toEncodingList :: [AddedToCurrentChain] -> Encoding omitField :: AddedToCurrentChain -> Bool
Generic AddedToCurrentChain Source #
Instance details Defined in Cardano.Node.Tracing.StateRep Associated Types type Rep AddedToCurrentChain :: Type -> Type Source # Methods from :: AddedToCurrentChain -> Rep AddedToCurrentChain x Source # to :: Rep AddedToCurrentChain x -> AddedToCurrentChain Source #
NFData AddedToCurrentChain Source #
Instance details Defined in Cardano.Node.Tracing.StateRep Methods rnf :: AddedToCurrentChain -> () Source #
type Rep AddedToCurrentChain Source #
Instance details Defined in Cardano.Node.Tracing.StateRep type Rep AddedToCurrentChain

data InitChainSelection Source #

Constructors

InitChainStartedSelection
InitChainSelected

Instances

Instances details

FromJSON InitChainSelection Source #
Instance details Defined in Cardano.Node.Tracing.StateRep Methods parseJSON :: Value -> Parser InitChainSelection parseJSONList :: Value -> Parser [InitChainSelection] omittedField :: Maybe InitChainSelection
ToJSON InitChainSelection Source #
Instance details Defined in Cardano.Node.Tracing.StateRep Methods toJSON :: InitChainSelection -> Value # toEncoding :: InitChainSelection -> Encoding toJSONList :: [InitChainSelection] -> Value toEncodingList :: [InitChainSelection] -> Encoding omitField :: InitChainSelection -> Bool
Generic InitChainSelection Source #
Instance details Defined in Cardano.Node.Tracing.StateRep Associated Types type Rep InitChainSelection :: Type -> Type Source # Methods from :: InitChainSelection -> Rep InitChainSelection x Source # to :: Rep InitChainSelection x -> InitChainSelection Source #
NFData InitChainSelection Source #
Instance details Defined in Cardano.Node.Tracing.StateRep Methods rnf :: InitChainSelection -> () Source #
type Rep InitChainSelection Source #
Instance details Defined in Cardano.Node.Tracing.StateRep type Rep InitChainSelection = D1 ('MetaData "InitChainSelection" "Cardano.Node.Tracing.StateRep" "cardano-node-8.7.2-J48sTm7zM1ILYN8ovLbDl2" 'False) (C1 ('MetaCons "InitChainStartedSelection" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "InitChainSelected" 'PrefixI 'False) (U1 :: Type -> Type))

data NodeState Source #

The representation of the current state of node. All node states prior to tracing system going online are effectively invisible.

Constructors

NodeTracingOnlineConfiguring
NodeOpeningDbs OpeningDbs
NodeReplays Replays
NodeInitChainSelection InitChainSelection
NodeKernelOnline
NodeAddBlock AddedToCurrentChain
NodeStartup StartupState
NodeShutdown ShutdownTrace

Instances

Instances details

FromJSON NodeState Source #
Instance details Defined in Cardano.Node.Tracing.StateRep Methods parseJSON :: Value -> Parser NodeState parseJSONList :: Value -> Parser [NodeState] omittedField :: Maybe NodeState
ToJSON NodeState Source #
Instance details Defined in Cardano.Node.Tracing.StateRep Methods toJSON :: NodeState -> Value # toEncoding :: NodeState -> Encoding toJSONList :: [NodeState] -> Value toEncodingList :: [NodeState] -> Encoding omitField :: NodeState -> Bool
Generic NodeState Source #
Instance details Defined in Cardano.Node.Tracing.StateRep Associated Types type Rep NodeState :: Type -> Type Source # Methods from :: NodeState -> Rep NodeState x Source # to :: Rep NodeState x -> NodeState Source #
NFData NodeState Source #
Instance details Defined in Cardano.Node.Tracing.StateRep Methods rnf :: NodeState -> () Source #
LogFormatting NodeState Source #
Instance details Defined in Cardano.Node.Tracing.StateRep Methods forMachine :: DetailLevel -> NodeState -> Object forHuman :: NodeState -> Text asMetrics :: NodeState -> [Metric]
MetaTrace NodeState Source #
Instance details Defined in Cardano.Node.Tracing.StateRep Methods namespaceFor :: NodeState -> Namespace NodeState severityFor :: Namespace NodeState -> Maybe NodeState -> Maybe SeverityS privacyFor :: Namespace NodeState -> Maybe NodeState -> Maybe Privacy detailsFor :: Namespace NodeState -> Maybe NodeState -> Maybe DetailLevel documentFor :: Namespace NodeState -> Maybe Text metricsDocFor :: Namespace NodeState -> [(Text, Text)] allNamespaces :: [Namespace NodeState]
type Rep NodeState Source #
Instance details Defined in Cardano.Node.Tracing.StateRep type Rep NodeState = D1 ('MetaData "NodeState" "Cardano.Node.Tracing.StateRep" "cardano-node-8.7.2-J48sTm7zM1ILYN8ovLbDl2" 'False) (((C1 ('MetaCons "NodeTracingOnlineConfiguring" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "NodeOpeningDbs" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 OpeningDbs))) :+: (C1 ('MetaCons "NodeReplays" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Replays)) :+: C1 ('MetaCons "NodeInitChainSelection" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 InitChainSelection)))) :+: ((C1 ('MetaCons "NodeKernelOnline" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "NodeAddBlock" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 AddedToCurrentChain))) :+: (C1 ('MetaCons "NodeStartup" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 StartupState)) :+: C1 ('MetaCons "NodeShutdown" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 ShutdownTrace)))))

data OpeningDbs Source #

Constructors

StartedOpeningImmutableDB
OpenedImmutableDB (WithOrigin SlotNo) ChunkNo
StartedOpeningVolatileDB
OpenedVolatileDB
StartedOpeningLgrDB
OpenedLgrDB

Instances

Instances details

FromJSON OpeningDbs Source #
Instance details Defined in Cardano.Node.Tracing.StateRep Methods parseJSON :: Value -> Parser OpeningDbs parseJSONList :: Value -> Parser [OpeningDbs] omittedField :: Maybe OpeningDbs
ToJSON OpeningDbs Source #
Instance details Defined in Cardano.Node.Tracing.StateRep Methods toJSON :: OpeningDbs -> Value # toEncoding :: OpeningDbs -> Encoding toJSONList :: [OpeningDbs] -> Value toEncodingList :: [OpeningDbs] -> Encoding omitField :: OpeningDbs -> Bool
Generic OpeningDbs Source #
Instance details Defined in Cardano.Node.Tracing.StateRep Associated Types type Rep OpeningDbs :: Type -> Type Source # Methods from :: OpeningDbs -> Rep OpeningDbs x Source # to :: Rep OpeningDbs x -> OpeningDbs Source #
NFData OpeningDbs Source #
Instance details Defined in Cardano.Node.Tracing.StateRep Methods rnf :: OpeningDbs -> () Source #
type Rep OpeningDbs Source #
Instance details Defined in Cardano.Node.Tracing.StateRep type Rep OpeningDbs = D1 ('MetaData "OpeningDbs" "Cardano.Node.Tracing.StateRep" "cardano-node-8.7.2-J48sTm7zM1ILYN8ovLbDl2" 'False) ((C1 ('MetaCons "StartedOpeningImmutableDB" 'PrefixI 'False) (U1 :: Type -> Type) :+: (C1 ('MetaCons "OpenedImmutableDB" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (WithOrigin SlotNo)) :*: S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 ChunkNo)) :+: C1 ('MetaCons "StartedOpeningVolatileDB" 'PrefixI 'False) (U1 :: Type -> Type))) :+: (C1 ('MetaCons "OpenedVolatileDB" 'PrefixI 'False) (U1 :: Type -> Type) :+: (C1 ('MetaCons "StartedOpeningLgrDB" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "OpenedLgrDB" 'PrefixI 'False) (U1 :: Type -> Type))))

data Replays Source #

Constructors

ReplayFromGenesis (WithOrigin SlotNo)
ReplayFromSnapshot SlotNo (WithOrigin SlotNo) (WithOrigin SlotNo)
ReplayedBlock SlotNo (WithOrigin SlotNo) (WithOrigin SlotNo)

Instances

Instances details

FromJSON Replays Source #
Instance details Defined in Cardano.Node.Tracing.StateRep Methods parseJSON :: Value -> Parser Replays parseJSONList :: Value -> Parser [Replays] omittedField :: Maybe Replays
ToJSON Replays Source #
Instance details Defined in Cardano.Node.Tracing.StateRep Methods toJSON :: Replays -> Value # toEncoding :: Replays -> Encoding toJSONList :: [Replays] -> Value toEncodingList :: [Replays] -> Encoding omitField :: Replays -> Bool
Generic Replays Source #
Instance details Defined in Cardano.Node.Tracing.StateRep Associated Types type Rep Replays :: Type -> Type Source # Methods from :: Replays -> Rep Replays x Source # to :: Rep Replays x -> Replays Source #
NFData Replays Source #
Instance details Defined in Cardano.Node.Tracing.StateRep Methods rnf :: Replays -> () Source #
type Rep Replays Source #
Instance details Defined in Cardano.Node.Tracing.StateRep type Rep Replays = D1 ('MetaData "Replays" "Cardano.Node.Tracing.StateRep" "cardano-node-8.7.2-J48sTm7zM1ILYN8ovLbDl2" 'False) (C1 ('MetaCons "ReplayFromGenesis" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (WithOrigin SlotNo))) :+: (C1 ('MetaCons "ReplayFromSnapshot" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 SlotNo) :: (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (WithOrigin SlotNo)) :: S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (WithOrigin SlotNo)))) :+: C1 ('MetaCons "ReplayedBlock" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 SlotNo) :: (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (WithOrigin SlotNo)) :: S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (WithOrigin SlotNo))))))

data StartupState Source #

Constructors

StartupSocketConfigError Text
StartupDBValidation
NetworkConfigUpdate
NetworkConfigUpdateError Text
P2PWarning
WarningDevelopmentNodeToNodeVersions [NodeToNodeVersion]
WarningDevelopmentNodeToClientVersions [NodeToClientVersion]

Instances

Instances details

FromJSON StartupState Source #
Instance details Defined in Cardano.Node.Tracing.StateRep Methods parseJSON :: Value -> Parser StartupState parseJSONList :: Value -> Parser [StartupState] omittedField :: Maybe StartupState
ToJSON StartupState Source #
Instance details Defined in Cardano.Node.Tracing.StateRep Methods toJSON :: StartupState -> Value # toEncoding :: StartupState -> Encoding toJSONList :: [StartupState] -> Value toEncodingList :: [StartupState] -> Encoding omitField :: StartupState -> Bool
Generic StartupState Source #
Instance details Defined in Cardano.Node.Tracing.StateRep Associated Types type Rep StartupState :: Type -> Type Source # Methods from :: StartupState -> Rep StartupState x Source # to :: Rep StartupState x -> StartupState Source #
NFData StartupState Source #
Instance details Defined in Cardano.Node.Tracing.StateRep Methods rnf :: StartupState -> () Source #
type Rep StartupState Source #
Instance details Defined in Cardano.Node.Tracing.StateRep type Rep StartupState = D1 ('MetaData "StartupState" "Cardano.Node.Tracing.StateRep" "cardano-node-8.7.2-J48sTm7zM1ILYN8ovLbDl2" 'False) ((C1 ('MetaCons "StartupSocketConfigError" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text)) :+: (C1 ('MetaCons "StartupDBValidation" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "NetworkConfigUpdate" 'PrefixI 'False) (U1 :: Type -> Type))) :+: ((C1 ('MetaCons "NetworkConfigUpdateError" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text)) :+: C1 ('MetaCons "P2PWarning" 'PrefixI 'False) (U1 :: Type -> Type)) :+: (C1 ('MetaCons "WarningDevelopmentNodeToNodeVersions" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 [NodeToNodeVersion])) :+: C1 ('MetaCons "WarningDevelopmentNodeToClientVersions" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 [NodeToClientVersion])))))

traceNodeStateChainDB :: SomeConsensusProtocol -> Trace IO NodeState -> TraceEvent blk -> IO () Source #

traceNodeStateStartup :: Trace IO NodeState -> StartupTrace blk -> IO () Source #

traceNodeStateShutdown :: Trace IO NodeState -> ShutdownTrace -> IO () Source #

Orphan instances

FromJSON ChunkNo Source #
Instance details Methods parseJSON :: Value -> Parser ChunkNo parseJSONList :: Value -> Parser [ChunkNo] omittedField :: Maybe ChunkNo
ToJSON ChunkNo Source #
Instance details Methods toJSON :: ChunkNo -> Value # toEncoding :: ChunkNo -> Encoding toJSONList :: [ChunkNo] -> Value toEncodingList :: [ChunkNo] -> Encoding omitField :: ChunkNo -> Bool
Generic NodeToClientVersion Source #
Instance details Associated Types type Rep NodeToClientVersion :: Type -> Type Source # Methods from :: NodeToClientVersion -> Rep NodeToClientVersion x Source # to :: Rep NodeToClientVersion x -> NodeToClientVersion Source #
Generic NodeToNodeVersion Source #
Instance details Associated Types type Rep NodeToNodeVersion :: Type -> Type Source # Methods from :: NodeToNodeVersion -> Rep NodeToNodeVersion x Source # to :: Rep NodeToNodeVersion x -> NodeToNodeVersion Source #
NFData ChunkNo Source #
Instance details Methods rnf :: ChunkNo -> () Source #
NFData NodeToClientVersion Source #
Instance details Methods rnf :: NodeToClientVersion -> () Source #
NFData NodeToNodeVersion Source #
Instance details Methods rnf :: NodeToNodeVersion -> () Source #