It is improper because the reserved 8 bytes are ignored on parsing/printing. So it doesn't satisfy a "roundtrip" between the serialised Word64 and the decoded Compound raw. This is fine since we don't care about the reserved bytes.

data PRCompoundPollster Source

Constructors

PRCompoundPollster !Word32 !Word8

Instances

Eq PRCompoundPollster
Show PRCompoundPollster

prCompoundPollster :: Iso' Word64 PRCompoundPollster Source

An "improper" iso to convert between a Word64 and the raw compound.

It is improper because we only preserve the value and status in a "roundtrip". This is fine for pollster since that's all we care about.

Payload Decoded Fields

type PFValue64 = Word64 Source

type PFValue32 = Word32 Source

type PFValueText = Text Source

data PFEndpoint Source

Constructors

Instant
Start
End

Instances

Bounded PFEndpoint
Enum PFEndpoint
Eq PFEndpoint
Read PFEndpoint
Show PFEndpoint

pfEndpoint :: Prism' Word8 PFEndpoint Source

pfVolumeStatus :: Prism' Word8 PFVolumeStatus Source

data PFVolumeVerb Source

Constructors

VolumeCreate
VolumeResize
VolumeDelete
VolumeAttach
VolumeDetach
VolumeUpdate

Instances

Bounded PFVolumeVerb
Enum PFVolumeVerb
Eq PFVolumeVerb
Read PFVolumeVerb
Show PFVolumeVerb

pfVolumeVerb :: Prism' Word8 PFVolumeVerb Source

pfInstanceStatus :: Prism' Word8 PFInstanceStatus Source

data PFImageStatus Source

Constructors

ImageActive
ImageSaving
ImageDeleted
ImageQueued
ImagePendingDelete
ImageKilled

Instances

Bounded PFImageStatus
Enum PFImageStatus
Eq PFImageStatus
Read PFImageStatus
Show PFImageStatus

pfImageStatus :: Prism' Word8 PFImageStatus Source

data PFImageVerb Source

Constructors

ImageServe
ImageUpdate
ImageUpload
ImageDownload
ImageDelete

Instances

Bounded PFImageVerb
Enum PFImageVerb
Eq PFImageVerb
Read PFImageVerb
Show PFImageVerb

pfImageVerb :: Prism' Word8 PFImageVerb Source

data PFSnapshotStatus Source

Constructors

SnapshotError
SnapshotAvailable
SnapshotCreating
SnapshotDeleting

Instances

Bounded PFSnapshotStatus
Enum PFSnapshotStatus
Eq PFSnapshotStatus
Read PFSnapshotStatus
Show PFSnapshotStatus

pfSnapshotStatus :: Prism' Word8 PFSnapshotStatus Source

data PFSnapshotVerb Source

Constructors

SnapshotCreate
SnapshotUpdate
SnapshotDelete

Instances

Bounded PFSnapshotVerb
Enum PFSnapshotVerb
Eq PFSnapshotVerb
Read PFSnapshotVerb
Show PFSnapshotVerb

pfSnapshotVerb :: Prism' Word8 PFSnapshotVerb Source

data PFIPStatus Source

Constructors

IPNone
IPActive
IPDown

Instances

Bounded PFIPStatus
Enum PFIPStatus
Eq PFIPStatus
Read PFIPStatus
Show PFIPStatus

pfIPStatus :: Prism' Word8 PFIPStatus Source

data PFIPVerb Source

Constructors

IPCreate
IPUpdate
IPDelete

Instances

Bounded PFIPVerb
Enum PFIPVerb
Eq PFIPVerb
Read PFIPVerb
Show PFIPVerb

pfIPVerb :: Prism' Word8 PFIPVerb Source

data PFIPAlloc Source

Constructors

IPAlloc

Instances

Bounded PFIPAlloc
Enum PFIPAlloc
Eq PFIPAlloc
Ord PFIPAlloc
Read PFIPAlloc
Show PFIPAlloc

pfIPAlloc :: Prism' Word32 PFIPAlloc Source

Payload Decoded Points

data PDVolume Source

Constructors

PDVolume PFVolumeStatus PFVolumeVerb PFEndpoint PFValue32

Instances

Eq PDVolume
Read PDVolume
Show PDVolume
Valued PDVolume
Known PDVolume
type PFValue PDVolume = PFValue32

pdVolume :: Prism' PRCompoundEvent PDVolume Source

data PDSSD Source

Constructors

PDSSD PFVolumeStatus PFVolumeVerb PFEndpoint PFValue32

Instances

Eq PDSSD
Read PDSSD
Show PDSSD
Valued PDSSD
Known PDSSD
type PFValue PDSSD = PFValue32

pdSSD :: Prism' PRCompoundEvent PDSSD Source

newtype PDCPU Source

Constructors

PDCPU PFValue64

Instances

Eq PDCPU
Read PDCPU
Show PDCPU
Valued PDCPU
Known PDCPU
type PFValue PDCPU = PFValue64

pdCPU :: Iso' PRSimple PDCPU Source

newtype PDDiskRead Source

Constructors

PDDiskRead
Fields _pdDiskReadVal :: PFValue64

Instances

Eq PDDiskRead
Read PDDiskRead
Show PDDiskRead
Valued PDDiskRead
Known PDDiskRead
type PFValue PDDiskRead = PFValue64

pdDiskRead :: Iso' PRSimple PDDiskRead Source

newtype PDDiskWrite Source

Constructors

PDDiskWrite
Fields _pdDiskWriteVal :: PFValue64

Instances

Eq PDDiskWrite
Read PDDiskWrite
Show PDDiskWrite
Valued PDDiskWrite
Known PDDiskWrite
type PFValue PDDiskWrite = PFValue64

pdDiskWrite :: Iso' PRSimple PDDiskWrite Source

newtype PDNeutronTx Source

Constructors

PDNeutronTx
Fields _pdNeutronTxVal :: PFValue64

Instances

Eq PDNeutronTx
Read PDNeutronTx
Show PDNeutronTx
Valued PDNeutronTx
Known PDNeutronTx
type PFValue PDNeutronTx = PFValue64

pdNeutronTx :: Iso' PRSimple PDNeutronTx Source

newtype PDNeutronRx Source

Constructors

PDNeutronRx
Fields _pdNeutronRxVal :: PFValue64

Instances

Eq PDNeutronRx
Read PDNeutronRx
Show PDNeutronRx
Valued PDNeutronRx
Known PDNeutronRx
type PFValue PDNeutronRx = PFValue64

pdNeutronRx :: Iso' PRSimple PDNeutronRx Source

data PDInstanceVCPU Source

Constructors

PDInstanceVCPU PFInstanceStatus PFValue32

Instances

Eq PDInstanceVCPU
Read PDInstanceVCPU
Show PDInstanceVCPU
Valued PDInstanceVCPU
Known PDInstanceVCPU
type PFValue PDInstanceVCPU = PFValue32

pdInstanceVCPU :: Prism' PRCompoundPollster PDInstanceVCPU Source

data PDInstanceRAM Source

Constructors

PDInstanceRAM PFInstanceStatus PFValue32

Instances

Eq PDInstanceRAM
Read PDInstanceRAM
Show PDInstanceRAM
Valued PDInstanceRAM
Known PDInstanceRAM
type PFValue PDInstanceRAM = PFValue32

pdInstanceRAM :: Prism' PRCompoundPollster PDInstanceRAM Source

data PDInstanceDisk Source

Constructors

PDInstanceDisk PFInstanceStatus PFValue32

Instances

Eq PDInstanceDisk
Read PDInstanceDisk
Show PDInstanceDisk
Valued PDInstanceDisk
Known PDInstanceDisk
type PFValue PDInstanceDisk = PFValue32

pdInstanceDisk :: Prism' PRCompoundPollster PDInstanceDisk Source

data PDInstanceFlavor Source

Constructors

PDInstanceFlavor PFInstanceStatus PFValueText

Instances

Eq PDInstanceFlavor
Read PDInstanceFlavor
Show PDInstanceFlavor
Valued PDInstanceFlavor
Known PDInstanceFlavor
type PFValue PDInstanceFlavor = PFValueText

pdInstanceFlavor :: FlavorMap -> Prism' PRCompoundPollster PDInstanceFlavor Source

data PDImage Source

Constructors

PDImage PFImageStatus PFImageVerb PFEndpoint PFValue32

Instances

Eq PDImage
Read PDImage
Show PDImage
Valued PDImage
Known PDImage
type PFValue PDImage = PFValue32

pdImage :: Prism' PRCompoundEvent PDImage Source

newtype PDImagePollster Source

Constructors

PDImagePollster PFValue64

Instances

Eq PDImagePollster
Read PDImagePollster
Show PDImagePollster
Valued PDImagePollster
Known PDImagePollster
type PFValue PDImagePollster = PFValue64

pdImagePollster :: Iso' PRSimple PDImagePollster Source

data PDSnapshot Source

Constructors

PDSnapshot PFSnapshotStatus PFSnapshotVerb PFEndpoint PFValue32

Instances

Eq PDSnapshot
Read PDSnapshot
Show PDSnapshot
Valued PDSnapshot
Known PDSnapshot
type PFValue PDSnapshot = PFValue32

pdSnapshot :: Prism' PRCompoundEvent PDSnapshot Source

data PDIP Source

Constructors

PDIP PFIPStatus PFIPVerb PFEndpoint PFIPAlloc

Instances

Eq PDIP
Read PDIP
Show PDIP
Valued PDIP
Known PDIP
type PFValue PDIP = PFIPAlloc

pdIP :: Prism' PRCompoundEvent PDIP Source

Values

class Valued a where Source

A family of lens that allows viewing/updating the payload value of decoded Ceilometer points.

note: this is a Lens and not just a Getter since we wish to reuse the logic for collector (making the points) and user (reading the points).

Associated Types

type PFValue a Source

Methods

value :: Lens' a (PFValue a) Source

data Timed value Source

Values with a TimeStamp.

Constructors

Timed !Word64 value

Instances

Functor Timed
Foldable Timed
Traversable Timed
Show value => Show (Timed value)
Valued a => Valued (Timed a)
type PFValue (Timed a) = PFValue a

time :: forall value. Lens' (Timed value) Word64 Source

Interface

data Env Source

Information needed to parse/fold Ceilometer types, supplied by users.

Constructors

Env
Fields _flavormap :: FlavorMap _sourcedict :: SourceDict _filters :: Filters _start :: TimeStamp _end :: TimeStamp

data Filters Source

Constructors

Filters
Fields instanceStatusFilter :: PFInstanceStatus -> Bool

type Flavor = Text Source

type FlavorMap = Bimap Flavor Word32 Source

siphashID :: PFValueText -> Word32 Source

filterByInstanceStatus :: Filters -> (a -> PFInstanceStatus) -> a -> Bool Source

VolumeError
VolumeAvailable
VolumeCreating
VolumeExtending
VolumeDeleting
VolumeAttaching
VolumeDetaching
VolumeInUse
VolumeRetyping
VolumeUploading

Bounded PFVolumeStatus
Enum PFVolumeStatus
Eq PFVolumeStatus
Read PFVolumeStatus
Show PFVolumeStatus

InstanceError
InstanceActive
InstanceShutoff
InstanceBuild
InstanceRebuild
InstanceDeleted
InstanceSoftDeleted
InstanceShelved
InstanceShelvedOffloaded
InstanceReboot
InstanceHardReboot
InstancePassword
InstanceResize
InstanceVerifyResize
InstanceRevertResize
InstancePaused
InstanceSuspended
InstanceRescue
InstanceMigrating

Bounded PFInstanceStatus
Enum PFInstanceStatus
Eq PFInstanceStatus
Read PFInstanceStatus
Show PFInstanceStatus