OddJobs.Web

Documentation

data OrderDirection

Constructors

Asc

Desc

Instances

Enum OrderDirection

Defined in OddJobs.Web

Methods

succ :: OrderDirection -> OrderDirection

pred :: OrderDirection -> OrderDirection

toEnum :: Int -> OrderDirection

fromEnum :: OrderDirection -> Int

enumFrom :: OrderDirection -> [OrderDirection]

enumFromThen :: OrderDirection -> OrderDirection -> [OrderDirection]

enumFromTo :: OrderDirection -> OrderDirection -> [OrderDirection]

enumFromThenTo :: OrderDirection -> OrderDirection -> OrderDirection -> [OrderDirection]

Eq OrderDirection

Defined in OddJobs.Web

Methods

(==) :: OrderDirection -> OrderDirection -> Bool

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

Show OrderDirection

Defined in OddJobs.Web

Methods

showsPrec :: Int -> OrderDirection -> ShowS

show :: OrderDirection -> String

showList :: [OrderDirection] -> ShowS

Generic OrderDirection

Defined in OddJobs.Web

Associated Types

type Rep OrderDirection :: Type -> Type

Methods

from :: OrderDirection -> Rep OrderDirection x

to :: Rep OrderDirection x -> OrderDirection

ToJSON OrderDirection

Defined in OddJobs.Web

Methods

toJSON :: OrderDirection -> Value

toEncoding :: OrderDirection -> Encoding

toJSONList :: [OrderDirection] -> Value

toEncodingList :: [OrderDirection] -> Encoding

FromJSON OrderDirection

Defined in OddJobs.Web

Methods

parseJSON :: Value -> Parser OrderDirection

parseJSONList :: Value -> Parser [OrderDirection]

type Rep OrderDirection

Defined in OddJobs.Web

type Rep OrderDirection = D1 (MetaData "OrderDirection" "OddJobs.Web" "odd-jobs-0.2.1-9zdA1vdP33HK1B5SZnsxYf" False) (C1 (MetaCons "Asc" PrefixI False) (U1 :: Type -> Type) :+: C1 (MetaCons "Desc" PrefixI False) (U1 :: Type -> Type))

data OrderByField

Constructors

OrdCreatedAt

OrdUpdatedAt

OrdLockedAt

OrdStatus

OrdJobType

Instances

Enum OrderByField

Defined in OddJobs.Web

Methods

succ :: OrderByField -> OrderByField

pred :: OrderByField -> OrderByField

toEnum :: Int -> OrderByField

fromEnum :: OrderByField -> Int

enumFrom :: OrderByField -> [OrderByField]

enumFromThen :: OrderByField -> OrderByField -> [OrderByField]

enumFromTo :: OrderByField -> OrderByField -> [OrderByField]

enumFromThenTo :: OrderByField -> OrderByField -> OrderByField -> [OrderByField]

Eq OrderByField

Defined in OddJobs.Web

Methods

(==) :: OrderByField -> OrderByField -> Bool

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

Show OrderByField

Defined in OddJobs.Web

Methods

showsPrec :: Int -> OrderByField -> ShowS

show :: OrderByField -> String

showList :: [OrderByField] -> ShowS

Generic OrderByField

Defined in OddJobs.Web

Associated Types

type Rep OrderByField :: Type -> Type

Methods

from :: OrderByField -> Rep OrderByField x

to :: Rep OrderByField x -> OrderByField

ToJSON OrderByField

Defined in OddJobs.Web

Methods

toJSON :: OrderByField -> Value

toEncoding :: OrderByField -> Encoding

toJSONList :: [OrderByField] -> Value

toEncodingList :: [OrderByField] -> Encoding

FromJSON OrderByField

Defined in OddJobs.Web

Methods

parseJSON :: Value -> Parser OrderByField

parseJSONList :: Value -> Parser [OrderByField]

type Rep OrderByField

Defined in OddJobs.Web

type Rep OrderByField = D1 (MetaData "OrderByField" "OddJobs.Web" "odd-jobs-0.2.1-9zdA1vdP33HK1B5SZnsxYf" False) ((C1 (MetaCons "OrdCreatedAt" PrefixI False) (U1 :: Type -> Type) :+: C1 (MetaCons "OrdUpdatedAt" PrefixI False) (U1 :: Type -> Type)) :+: (C1 (MetaCons "OrdLockedAt" PrefixI False) (U1 :: Type -> Type) :+: (C1 (MetaCons "OrdStatus" PrefixI False) (U1 :: Type -> Type) :+: C1 (MetaCons "OrdJobType" PrefixI False) (U1 :: Type -> Type))))

data Filter

Constructors

Filter

Fields

• filterStatuses :: [Status]
• filterCreatedAfter :: Maybe UTCTime
• filterCreatedBefore :: Maybe UTCTime
• filterUpdatedAfter :: Maybe UTCTime
• filterUpdatedBefore :: Maybe UTCTime
• filterJobTypes :: [Text]
• filterOrder :: Maybe (OrderByField, OrderDirection)
• filterPage :: Maybe (Int, Int)
• filterRunAfter :: Maybe UTCTime
• filterJobRunner :: [JobRunnerName]

Instances

Eq Filter

Defined in OddJobs.Web

Methods

(==) :: Filter -> Filter -> Bool

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

Show Filter

Defined in OddJobs.Web

Methods

showsPrec :: Int -> Filter -> ShowS

show :: Filter -> String

showList :: [Filter] -> ShowS

Generic Filter

Defined in OddJobs.Web

Associated Types

type Rep Filter :: Type -> Type

Methods

from :: Filter -> Rep Filter x

to :: Rep Filter x -> Filter

Semigroup Filter

Defined in OddJobs.Web

Methods

(<>) :: Filter -> Filter -> Filter

sconcat :: NonEmpty Filter -> Filter

stimes :: Integral b => b -> Filter -> Filter

Monoid Filter

Defined in OddJobs.Web

Methods

mempty :: Filter

mappend :: Filter -> Filter -> Filter

mconcat :: [Filter] -> Filter

ToJSON Filter

Defined in OddJobs.Web

Methods

toJSON :: Filter -> Value

toEncoding :: Filter -> Encoding

toJSONList :: [Filter] -> Value

toEncodingList :: [Filter] -> Encoding

FromJSON Filter

Defined in OddJobs.Web

Methods

parseJSON :: Value -> Parser Filter

parseJSONList :: Value -> Parser [Filter]

ToHttpApiData Filter

Defined in OddJobs.Web

Methods

toUrlPiece :: Filter -> Text

toEncodedUrlPiece :: Filter -> Builder

toHeader :: Filter -> ByteString

toQueryParam :: Filter -> Text

FromHttpApiData Filter

Defined in OddJobs.Web

Methods

parseUrlPiece :: Text -> Either Text Filter

parseHeader :: ByteString -> Either Text Filter

parseQueryParam :: Text -> Either Text Filter

type Rep Filter

Defined in OddJobs.Web

type Rep Filter = D1 (MetaData "Filter" "OddJobs.Web" "odd-jobs-0.2.1-9zdA1vdP33HK1B5SZnsxYf" False) (C1 (MetaCons "Filter" PrefixI True) (((S1 (MetaSel (Just "filterStatuses") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 [Status]) :*: S1 (MetaSel (Just "filterCreatedAfter") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe UTCTime))) :*: (S1 (MetaSel (Just "filterCreatedBefore") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe UTCTime)) :*: (S1 (MetaSel (Just "filterUpdatedAfter") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe UTCTime)) :*: S1 (MetaSel (Just "filterUpdatedBefore") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe UTCTime))))) :*: ((S1 (MetaSel (Just "filterJobTypes") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 [Text]) :*: S1 (MetaSel (Just "filterOrder") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe (OrderByField, OrderDirection)))) :*: (S1 (MetaSel (Just "filterPage") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe (Int, Int))) :*: (S1 (MetaSel (Just "filterRunAfter") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 (Maybe UTCTime)) :*: S1 (MetaSel (Just "filterJobRunner") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 [JobRunnerName]))))))

blankFilter :: Filter

data Routes

Constructors

Routes

Fields

• rFilterResults :: Maybe Filter -> Text
• rEnqueue :: JobId -> Text
• rRunNow :: JobId -> Text
• rCancel :: JobId -> Text
• rRefreshJobTypes :: Text
• rRefreshJobRunners :: Text
• rStaticAsset :: Text -> Text

filterJobsQuery :: Config -> Filter -> (Query, [Action])

filterJobs :: Config -> Connection -> Filter -> IO [Job]

countJobs :: Config -> Connection -> Filter -> IO Int

pageNav :: Routes -> Html ()

pageLayout :: Routes -> Html () -> Html () -> Html ()

sideNav :: Routes -> [Text] -> [JobRunnerName] -> UTCTime -> Filter -> Html ()

searchBar :: Routes -> UTCTime -> Filter -> Html ()

timeDuration :: UTCTime -> UTCTime -> (Int, String)

showText :: Show a => a -> Text

jobContent :: Value -> Value

jobRow :: Routes -> UTCTime -> (Job, Html ()) -> Html ()

actionsFailed :: Routes -> Job -> Html ()

actionsRetry :: Routes -> Job -> Html ()

actionsFuture :: Routes -> Job -> Html ()

actionsWaiting :: Routes -> Job -> Html ()

statusSuccess :: UTCTime -> Job -> Html ()

statusFailed :: UTCTime -> Job -> Html ()

statusFuture :: UTCTime -> Job -> Html ()

statusWaiting :: UTCTime -> Job -> Html ()

statusRetry :: UTCTime -> Job -> Html ()

statusLocked :: UTCTime -> Job -> Html ()

resultsPanel :: Routes -> UTCTime -> Filter -> [(Job, Html ())] -> Int -> Html ()

ariaExpanded_ :: Text -> Attribute