Copyright	Copyright (c) 2015-2017 David Sorokin <david.sorokin@gmail.com>
License	BSD3
Maintainer	David Sorokin <david.sorokin@gmail.com>
Stability	experimental
Safe Haskell	None
Language	Haskell98

Simulation.Aivika.Distributed.Optimistic.State

Description

Tested with: GHC 7.10.3

This module defines the monitoring states.

Synopsis

Documentation

data LogicalProcessState Source #

Represents the state of the logical process.

Constructors

LogicalProcessState

Fields

lpStateId :: ProcessId
the process identifier
lpStateName :: String
the process name
lpStateStartTime :: Double
the start time
lpStateStopTime :: Double
the stop time
lpStateLocalTime :: Double
the local time of the process
lpStateEventQueueTime :: Double
the event queue time of the process
lpStateEventQueueSize :: Int
the event queue size
lpStateLogSize :: Int
the log size of the process
lpStateInputMessageCount :: Int
the count of the input messages
lpStateOutputMessageCount :: Int
the count of the output messages
lpStateTransientMessageCount :: Int
the count of the transient messages that did not receive an acknowledgement
lpStateRollbackCount :: Int
the count of rollbacks

Instances

Eq LogicalProcessState Source #
Methods (==) :: LogicalProcessState -> LogicalProcessState -> Bool # (/=) :: LogicalProcessState -> LogicalProcessState -> Bool #
Show LogicalProcessState Source #
Methods showsPrec :: Int -> LogicalProcessState -> ShowS # show :: LogicalProcessState -> String # showList :: [LogicalProcessState] -> ShowS #
Generic LogicalProcessState Source #
Associated Types type Rep LogicalProcessState :: * -> * # Methods from :: LogicalProcessState -> Rep LogicalProcessState x # to :: Rep LogicalProcessState x -> LogicalProcessState #
Binary LogicalProcessState Source #
Methods put :: LogicalProcessState -> Put # get :: Get LogicalProcessState # putList :: [LogicalProcessState] -> Put #
type Rep LogicalProcessState Source #
type Rep LogicalProcessState = D1 * (MetaData "LogicalProcessState" "Simulation.Aivika.Distributed.Optimistic.State" "aivika-distributed-1.1-7UVnsbW34TyCFfDybIGzuD" False) (C1 * (MetaCons "LogicalProcessState" PrefixI True) ((::) ((::) ((::) (S1 * (MetaSel (Just Symbol "lpStateId") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 * ProcessId)) ((::) (S1 * (MetaSel (Just Symbol "lpStateName") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 * String)) (S1 * (MetaSel (Just Symbol "lpStateStartTime") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 * Double)))) ((::) (S1 * (MetaSel (Just Symbol "lpStateStopTime") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 * Double)) ((::) (S1 * (MetaSel (Just Symbol "lpStateLocalTime") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 * Double)) (S1 * (MetaSel (Just Symbol "lpStateEventQueueTime") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 * Double))))) ((::) ((::) (S1 * (MetaSel (Just Symbol "lpStateEventQueueSize") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 * Int)) ((::) (S1 * (MetaSel (Just Symbol "lpStateLogSize") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 * Int)) (S1 * (MetaSel (Just Symbol "lpStateInputMessageCount") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 * Int)))) ((::) (S1 * (MetaSel (Just Symbol "lpStateOutputMessageCount") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 * Int)) ((::) (S1 * (MetaSel (Just Symbol "lpStateTransientMessageCount") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 * Int)) (S1 * (MetaSel (Just Symbol "lpStateRollbackCount") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 * Int)))))))

data TimeServerState Source #

Represents the state of the time server.

Constructors

TimeServerState
Fields tsStateId :: ProcessId the process identifier tsStateName :: String the time server name tsStateGlobalVirtualTime :: Maybe Double the global virtual time tsStateLogicalProcesses :: [ProcessId] the registered logical process identifiers

Instances

Eq TimeServerState Source #
Methods (==) :: TimeServerState -> TimeServerState -> Bool # (/=) :: TimeServerState -> TimeServerState -> Bool #
Show TimeServerState Source #
Methods showsPrec :: Int -> TimeServerState -> ShowS # show :: TimeServerState -> String # showList :: [TimeServerState] -> ShowS #
Generic TimeServerState Source #
Associated Types type Rep TimeServerState :: * -> * # Methods from :: TimeServerState -> Rep TimeServerState x # to :: Rep TimeServerState x -> TimeServerState #
Binary TimeServerState Source #
Methods put :: TimeServerState -> Put # get :: Get TimeServerState # putList :: [TimeServerState] -> Put #
type Rep TimeServerState Source #
type Rep TimeServerState = D1 * (MetaData "TimeServerState" "Simulation.Aivika.Distributed.Optimistic.State" "aivika-distributed-1.1-7UVnsbW34TyCFfDybIGzuD" False) (C1 * (MetaCons "TimeServerState" PrefixI True) ((::) ((::) (S1 * (MetaSel (Just Symbol "tsStateId") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 * ProcessId)) (S1 * (MetaSel (Just Symbol "tsStateName") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 * String))) ((::) (S1 * (MetaSel (Just Symbol "tsStateGlobalVirtualTime") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 * (Maybe Double))) (S1 * (MetaSel (Just Symbol "tsStateLogicalProcesses") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 * [ProcessId])))))