Zuul.Status

The zuul status data type

Status data types

data JobStatus

Constructors

JobStatus

Fields

• jobName :: Text
• jobUuid :: Maybe Text
• jobResult :: Maybe Text

Instances

Eq JobStatus

Defined in Zuul.Status

Methods

(==) :: JobStatus -> JobStatus -> Bool

(/=) :: JobStatus -> JobStatus -> Bool

Ord JobStatus

Defined in Zuul.Status

Methods

compare :: JobStatus -> JobStatus -> Ordering

(<) :: JobStatus -> JobStatus -> Bool

(<=) :: JobStatus -> JobStatus -> Bool

(>) :: JobStatus -> JobStatus -> Bool

(>=) :: JobStatus -> JobStatus -> Bool

max :: JobStatus -> JobStatus -> JobStatus

min :: JobStatus -> JobStatus -> JobStatus

Show JobStatus

Defined in Zuul.Status

Methods

showsPrec :: Int -> JobStatus -> ShowS

show :: JobStatus -> String

showList :: [JobStatus] -> ShowS

Generic JobStatus

Defined in Zuul.Status

Associated Types

type Rep JobStatus :: Type -> Type

Methods

from :: JobStatus -> Rep JobStatus x

to :: Rep JobStatus x -> JobStatus

ToJSON JobStatus

Defined in Zuul.Status

Methods

toJSON :: JobStatus -> Value

toEncoding :: JobStatus -> Encoding

toJSONList :: [JobStatus] -> Value

toEncodingList :: [JobStatus] -> Encoding

FromJSON JobStatus

Defined in Zuul.Status

Methods

parseJSON :: Value -> Parser JobStatus

parseJSONList :: Value -> Parser [JobStatus]

type Rep JobStatus

Defined in Zuul.Status

type Rep JobStatus = D1 ('MetaData "JobStatus" "Zuul.Status" "zuul-0.1.1.0-JHpF3CpTxAS4q6ma25JOSl" 'False) (C1 ('MetaCons "JobStatus" 'PrefixI 'True) (S1 ('MetaSel ('Just "jobName") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text) :*: (S1 ('MetaSel ('Just "jobUuid") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text)) :*: S1 ('MetaSel ('Just "jobResult") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text)))))

data Change

Constructors

Change

Fields

• changeId :: Maybe Text
• changeRef :: Text
• changeProject :: Text
• changeLive :: Bool
• changeActive :: Bool
• changeJobs :: [JobStatus]

Instances

Eq Change

Defined in Zuul.Status

Methods

(==) :: Change -> Change -> Bool

(/=) :: Change -> Change -> Bool

Ord Change

Defined in Zuul.Status

Methods

compare :: Change -> Change -> Ordering

(<) :: Change -> Change -> Bool

(<=) :: Change -> Change -> Bool

(>) :: Change -> Change -> Bool

(>=) :: Change -> Change -> Bool

max :: Change -> Change -> Change

min :: Change -> Change -> Change

Show Change

Defined in Zuul.Status

Methods

showsPrec :: Int -> Change -> ShowS

show :: Change -> String

showList :: [Change] -> ShowS

Generic Change

Defined in Zuul.Status

Associated Types

type Rep Change :: Type -> Type

Methods

from :: Change -> Rep Change x

to :: Rep Change x -> Change

ToJSON Change

Defined in Zuul.Status

Methods

toJSON :: Change -> Value

toEncoding :: Change -> Encoding

toJSONList :: [Change] -> Value

toEncodingList :: [Change] -> Encoding

FromJSON Change

Defined in Zuul.Status

Methods

parseJSON :: Value -> Parser Change

parseJSONList :: Value -> Parser [Change]

type Rep Change

Defined in Zuul.Status

type Rep Change = D1 ('MetaData "Change" "Zuul.Status" "zuul-0.1.1.0-JHpF3CpTxAS4q6ma25JOSl" 'False) (C1 ('MetaCons "Change" 'PrefixI 'True) ((S1 ('MetaSel ('Just "changeId") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text)) :*: (S1 ('MetaSel ('Just "changeRef") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text) :*: S1 ('MetaSel ('Just "changeProject") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text))) :*: (S1 ('MetaSel ('Just "changeLive") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Bool) :*: (S1 ('MetaSel ('Just "changeActive") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Bool) :*: S1 ('MetaSel ('Just "changeJobs") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 [JobStatus])))))

newtype Changes

Constructors

Changes [Change]

Instances

Eq Changes

Defined in Zuul.Status

Methods

(==) :: Changes -> Changes -> Bool

(/=) :: Changes -> Changes -> Bool

Ord Changes

Defined in Zuul.Status

Methods

compare :: Changes -> Changes -> Ordering

(<) :: Changes -> Changes -> Bool

(<=) :: Changes -> Changes -> Bool

(>) :: Changes -> Changes -> Bool

(>=) :: Changes -> Changes -> Bool

max :: Changes -> Changes -> Changes

min :: Changes -> Changes -> Changes

Show Changes

Defined in Zuul.Status

Methods

showsPrec :: Int -> Changes -> ShowS

show :: Changes -> String

showList :: [Changes] -> ShowS

Generic Changes

Defined in Zuul.Status

Associated Types

type Rep Changes :: Type -> Type

Methods

from :: Changes -> Rep Changes x

to :: Rep Changes x -> Changes

ToJSON Changes

Defined in Zuul.Status

Methods

toJSON :: Changes -> Value

toEncoding :: Changes -> Encoding

toJSONList :: [Changes] -> Value

toEncodingList :: [Changes] -> Encoding

FromJSON Changes

Defined in Zuul.Status

Methods

parseJSON :: Value -> Parser Changes

parseJSONList :: Value -> Parser [Changes]

type Rep Changes

Defined in Zuul.Status

type Rep Changes = D1 ('MetaData "Changes" "Zuul.Status" "zuul-0.1.1.0-JHpF3CpTxAS4q6ma25JOSl" 'True) (C1 ('MetaCons "Changes" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 [Change])))

data ChangeQueue

Constructors

ChangeQueue

Fields

• changeQueueName :: Text
• changeQueueHeads :: [Changes]

Instances

Eq ChangeQueue

Defined in Zuul.Status

Methods

(==) :: ChangeQueue -> ChangeQueue -> Bool

(/=) :: ChangeQueue -> ChangeQueue -> Bool

Ord ChangeQueue

Defined in Zuul.Status

Methods

compare :: ChangeQueue -> ChangeQueue -> Ordering

(<) :: ChangeQueue -> ChangeQueue -> Bool

(<=) :: ChangeQueue -> ChangeQueue -> Bool

(>) :: ChangeQueue -> ChangeQueue -> Bool

(>=) :: ChangeQueue -> ChangeQueue -> Bool

max :: ChangeQueue -> ChangeQueue -> ChangeQueue

min :: ChangeQueue -> ChangeQueue -> ChangeQueue

Show ChangeQueue

Defined in Zuul.Status

Methods

showsPrec :: Int -> ChangeQueue -> ShowS

show :: ChangeQueue -> String

showList :: [ChangeQueue] -> ShowS

Generic ChangeQueue

Defined in Zuul.Status

Associated Types

type Rep ChangeQueue :: Type -> Type

Methods

from :: ChangeQueue -> Rep ChangeQueue x

to :: Rep ChangeQueue x -> ChangeQueue

ToJSON ChangeQueue

Defined in Zuul.Status

Methods

toJSON :: ChangeQueue -> Value

toEncoding :: ChangeQueue -> Encoding

toJSONList :: [ChangeQueue] -> Value

toEncodingList :: [ChangeQueue] -> Encoding

FromJSON ChangeQueue

Defined in Zuul.Status

Methods

parseJSON :: Value -> Parser ChangeQueue

parseJSONList :: Value -> Parser [ChangeQueue]

type Rep ChangeQueue

Defined in Zuul.Status

type Rep ChangeQueue = D1 ('MetaData "ChangeQueue" "Zuul.Status" "zuul-0.1.1.0-JHpF3CpTxAS4q6ma25JOSl" 'False) (C1 ('MetaCons "ChangeQueue" 'PrefixI 'True) (S1 ('MetaSel ('Just "changeQueueName") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text) :*: S1 ('MetaSel ('Just "changeQueueHeads") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 [Changes])))

data Pipeline

Constructors

Pipeline

Fields

• pipelineName :: Text
• pipelineChangeQueues :: [ChangeQueue]

Instances

Eq Pipeline

Defined in Zuul.Status

Methods

(==) :: Pipeline -> Pipeline -> Bool

(/=) :: Pipeline -> Pipeline -> Bool

Ord Pipeline

Defined in Zuul.Status

Methods

compare :: Pipeline -> Pipeline -> Ordering

(<) :: Pipeline -> Pipeline -> Bool

(<=) :: Pipeline -> Pipeline -> Bool

(>) :: Pipeline -> Pipeline -> Bool

(>=) :: Pipeline -> Pipeline -> Bool

max :: Pipeline -> Pipeline -> Pipeline

min :: Pipeline -> Pipeline -> Pipeline

Show Pipeline

Defined in Zuul.Status

Methods

showsPrec :: Int -> Pipeline -> ShowS

show :: Pipeline -> String

showList :: [Pipeline] -> ShowS

Generic Pipeline

Defined in Zuul.Status

Associated Types

type Rep Pipeline :: Type -> Type

Methods

from :: Pipeline -> Rep Pipeline x

to :: Rep Pipeline x -> Pipeline

ToJSON Pipeline

Defined in Zuul.Status

Methods

toJSON :: Pipeline -> Value

toEncoding :: Pipeline -> Encoding

toJSONList :: [Pipeline] -> Value

toEncodingList :: [Pipeline] -> Encoding

FromJSON Pipeline

Defined in Zuul.Status

Methods

parseJSON :: Value -> Parser Pipeline

parseJSONList :: Value -> Parser [Pipeline]

type Rep Pipeline

Defined in Zuul.Status

type Rep Pipeline = D1 ('MetaData "Pipeline" "Zuul.Status" "zuul-0.1.1.0-JHpF3CpTxAS4q6ma25JOSl" 'False) (C1 ('MetaCons "Pipeline" 'PrefixI 'True) (S1 ('MetaSel ('Just "pipelineName") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text) :*: S1 ('MetaSel ('Just "pipelineChangeQueues") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 [ChangeQueue])))

data Status

Constructors

Status

Fields

• statusZuulVersion :: Text
• statusPipelines :: [Pipeline]

Instances

Eq Status

Defined in Zuul.Status

Methods

(==) :: Status -> Status -> Bool

(/=) :: Status -> Status -> Bool

Ord Status

Defined in Zuul.Status

Methods

compare :: Status -> Status -> Ordering

(<) :: Status -> Status -> Bool

(<=) :: Status -> Status -> Bool

(>) :: Status -> Status -> Bool

(>=) :: Status -> Status -> Bool

max :: Status -> Status -> Status

min :: Status -> Status -> Status

Show Status

Defined in Zuul.Status

Methods

showsPrec :: Int -> Status -> ShowS

show :: Status -> String

showList :: [Status] -> ShowS

Generic Status

Defined in Zuul.Status

Associated Types

type Rep Status :: Type -> Type

Methods

from :: Status -> Rep Status x

to :: Rep Status x -> Status

ToJSON Status

Defined in Zuul.Status

Methods

toJSON :: Status -> Value

toEncoding :: Status -> Encoding

toJSONList :: [Status] -> Value

toEncodingList :: [Status] -> Encoding

FromJSON Status

Defined in Zuul.Status

Methods

parseJSON :: Value -> Parser Status

parseJSONList :: Value -> Parser [Status]

type Rep Status

Defined in Zuul.Status

type Rep Status = D1 ('MetaData "Status" "Zuul.Status" "zuul-0.1.1.0-JHpF3CpTxAS4q6ma25JOSl" 'False) (C1 ('MetaCons "Status" 'PrefixI 'True) (S1 ('MetaSel ('Just "statusZuulVersion") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text) :*: S1 ('MetaSel ('Just "statusPipelines") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 [Pipeline])))

Convenient functions

pipelineChanges

Arguments

:: Text

The pipeline name

-> Maybe Text

An optional queue name

-> Status

The status record

-> Maybe [Change]

Returns an optional list of changes

Get the change from a pipeline

liveChanges :: [Change] -> [Change]

Filter the change that are live and active

changeJobUuid :: [Change] -> [Text]

Extract the job uuids from a list of change