Safe Haskell	None
Language	GHC2024

Arbiter.Core.Health

Description

Postgres health snapshots from the stats and catalog views. The queries name Arbiter's own tables and do not scan them.

Synopsis

data PgDbHealth = PgDbHealth {
- numBackends :: Int64
- connActive :: Int64
- connIdle :: Int64
- connIdleInTxn :: Int64
- connIdleInTxnAborted :: Int64
- connBlocked :: Int64
- connOther :: Int64
- oldestTxnAge :: Double
- oldestQueryAge :: Double
}
data PgTableHealth = PgTableHealth {
- table :: Text
- liveTup :: Int64
- deadTup :: Int64
- autovacuumAge :: Maybe Double
- totalBytes :: Int64
- seqScan :: Double
- idxScan :: Double
- blksHit :: Double
- blksRead :: Double
- xidAge :: Maybe Int64
}
getPgHealth :: MonadArbiter m => SchemaName -> [TableName] -> m (Maybe PgDbHealth, [PgTableHealth])
getPgDbHealth :: MonadArbiter m => m (Maybe PgDbHealth)

Documentation

Source #data PgDbHealth

Connection and age counters for the current database, shared with its other clients.

Constructors

PgDbHealth
Fields numBackends :: Int64 connActive :: Int64 connIdle :: Int64 connIdleInTxn :: Int64 connIdleInTxnAborted :: Int64 connBlocked :: Int64 connOther :: Int64 oldestTxnAge :: Double oldestQueryAge :: Double

Instances

Instances details

FromJSON PgDbHealth Source #

Instance details

Defined in Arbiter.Core.Health

Methods

#parseJSON :: Value -> Parser PgDbHealth

#parseJSONList :: Value -> Parser [PgDbHealth]

#omittedField :: Maybe PgDbHealth

ToJSON PgDbHealth Source #

Instance details

Defined in Arbiter.Core.Health

Methods

#toJSON :: PgDbHealth -> Value

#toEncoding :: PgDbHealth -> Encoding

#toJSONList :: [PgDbHealth] -> Value

#toEncodingList :: [PgDbHealth] -> Encoding

#omitField :: PgDbHealth -> Bool

Eq PgDbHealth Source #

Instance details

Defined in Arbiter.Core.Health

Methods

#(==) :: PgDbHealth -> PgDbHealth -> Bool

#(/=) :: PgDbHealth -> PgDbHealth -> Bool

Generic PgDbHealth Source #

Instance details

Defined in Arbiter.Core.Health

Associated Types

type Rep PgDbHealth

Instance details

Defined in Arbiter.Core.Health

type Rep PgDbHealth = D1 ('MetaData "PgDbHealth" "Arbiter.Core.Health" "arbiter-core-0.1.0.0-inplace" 'False) (C1 ('MetaCons "PgDbHealth" 'PrefixI 'True) (((S1 ('MetaSel ('Just "numBackends") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Int64) :*: S1 ('MetaSel ('Just "connActive") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Int64)) :*: (S1 ('MetaSel ('Just "connIdle") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Int64) :*: S1 ('MetaSel ('Just "connIdleInTxn") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Int64))) :*: ((S1 ('MetaSel ('Just "connIdleInTxnAborted") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Int64) :*: S1 ('MetaSel ('Just "connBlocked") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Int64)) :*: (S1 ('MetaSel ('Just "connOther") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Int64) :*: (S1 ('MetaSel ('Just "oldestTxnAge") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Double) :*: S1 ('MetaSel ('Just "oldestQueryAge") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Double))))))

Methods

#from :: PgDbHealth -> Rep PgDbHealth x

#to :: Rep PgDbHealth x -> PgDbHealth

Show PgDbHealth Source #

Instance details

Defined in Arbiter.Core.Health

Methods

#showsPrec :: Int -> PgDbHealth -> ShowS

#show :: PgDbHealth -> String

#showList :: [PgDbHealth] -> ShowS

type Rep PgDbHealth Source #

Instance details

Defined in Arbiter.Core.Health

type Rep PgDbHealth = D1 ('MetaData "PgDbHealth" "Arbiter.Core.Health" "arbiter-core-0.1.0.0-inplace" 'False) (C1 ('MetaCons "PgDbHealth" 'PrefixI 'True) (((S1 ('MetaSel ('Just "numBackends") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Int64) :*: S1 ('MetaSel ('Just "connActive") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Int64)) :*: (S1 ('MetaSel ('Just "connIdle") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Int64) :*: S1 ('MetaSel ('Just "connIdleInTxn") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Int64))) :*: ((S1 ('MetaSel ('Just "connIdleInTxnAborted") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Int64) :*: S1 ('MetaSel ('Just "connBlocked") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Int64)) :*: (S1 ('MetaSel ('Just "connOther") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Int64) :*: (S1 ('MetaSel ('Just "oldestTxnAge") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Double) :*: S1 ('MetaSel ('Just "oldestQueryAge") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Double))))))

Source #data PgTableHealth

Per-table tuple counts, size, scan counters, block traffic, and freeze age.

Constructors

PgTableHealth
Fields table :: Text liveTup :: Int64 deadTup :: Int64 autovacuumAge :: Maybe Double Nothing when the table has never been vacuumed. totalBytes :: Int64 seqScan :: Double idxScan :: Double blksHit :: Double blksRead :: Double xidAge :: Maybe Int64 Nothing for a relation with no frozen transaction id of its own.

Instances

Instances details

FromJSON PgTableHealth Source #

Instance details

Defined in Arbiter.Core.Health

Methods

#parseJSON :: Value -> Parser PgTableHealth

#parseJSONList :: Value -> Parser [PgTableHealth]

#omittedField :: Maybe PgTableHealth

ToJSON PgTableHealth Source #

Instance details

Defined in Arbiter.Core.Health

Methods

#toJSON :: PgTableHealth -> Value

#toEncoding :: PgTableHealth -> Encoding

#toJSONList :: [PgTableHealth] -> Value

#toEncodingList :: [PgTableHealth] -> Encoding

#omitField :: PgTableHealth -> Bool

Eq PgTableHealth Source #

Instance details

Defined in Arbiter.Core.Health

Methods

#(==) :: PgTableHealth -> PgTableHealth -> Bool

#(/=) :: PgTableHealth -> PgTableHealth -> Bool

Generic PgTableHealth Source #

Instance details

Defined in Arbiter.Core.Health

Associated Types

type Rep PgTableHealth

Instance details

Defined in Arbiter.Core.Health

Methods

#from :: PgTableHealth -> Rep PgTableHealth x

#to :: Rep PgTableHealth x -> PgTableHealth

Show PgTableHealth Source #

Instance details

Defined in Arbiter.Core.Health

Methods

#showsPrec :: Int -> PgTableHealth -> ShowS

#show :: PgTableHealth -> String

#showList :: [PgTableHealth] -> ShowS

type Rep PgTableHealth Source #

Instance details

Defined in Arbiter.Core.Health

Source #getPgHealth :: MonadArbiter m => SchemaName -> [TableName] -> m (Maybe PgDbHealth, [PgTableHealth])

Database-wide health and per-table churn for the given queues' tables and the schema's shared arbiter tables. Backends owned by another role report their state as unknown, absent pg_read_all_stats.

Source #getPgDbHealth :: MonadArbiter m => m (Maybe PgDbHealth)

The database-wide half on its own.