{-# LANGUAGE DeriveAnyClass #-} {-# LANGUAGE DerivingStrategies #-} module Hercules.API.Projects.JobHandlers ( JobHandlers (..), ) where import Data.OpenApi qualified as O3 import Hercules.API.Prelude import Hercules.API.Projects.Job (Job) import Hercules.API.Projects.JobHandlers.OnPushHandler (OnPushHandler) import Hercules.API.Projects.JobHandlers.OnScheduleHandler (OnScheduleHandler) data JobHandlers = JobHandlers { JobHandlers -> Id Job jobId :: Id Job, JobHandlers -> Map Text OnPushHandler onPush :: Map Text OnPushHandler, JobHandlers -> Map Text OnScheduleHandler onSchedule :: Map Text OnScheduleHandler } deriving ((forall x. JobHandlers -> Rep JobHandlers x) -> (forall x. Rep JobHandlers x -> JobHandlers) -> Generic JobHandlers forall x. Rep JobHandlers x -> JobHandlers forall x. JobHandlers -> Rep JobHandlers x forall a. (forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a $cfrom :: forall x. JobHandlers -> Rep JobHandlers x from :: forall x. JobHandlers -> Rep JobHandlers x $cto :: forall x. Rep JobHandlers x -> JobHandlers to :: forall x. Rep JobHandlers x -> JobHandlers Generic, Int -> JobHandlers -> ShowS [JobHandlers] -> ShowS JobHandlers -> String (Int -> JobHandlers -> ShowS) -> (JobHandlers -> String) -> ([JobHandlers] -> ShowS) -> Show JobHandlers forall a. (Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a $cshowsPrec :: Int -> JobHandlers -> ShowS showsPrec :: Int -> JobHandlers -> ShowS $cshow :: JobHandlers -> String show :: JobHandlers -> String $cshowList :: [JobHandlers] -> ShowS showList :: [JobHandlers] -> ShowS Show, JobHandlers -> JobHandlers -> Bool (JobHandlers -> JobHandlers -> Bool) -> (JobHandlers -> JobHandlers -> Bool) -> Eq JobHandlers forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a $c== :: JobHandlers -> JobHandlers -> Bool == :: JobHandlers -> JobHandlers -> Bool $c/= :: JobHandlers -> JobHandlers -> Bool /= :: JobHandlers -> JobHandlers -> Bool Eq) deriving anyclass (JobHandlers -> () (JobHandlers -> ()) -> NFData JobHandlers forall a. (a -> ()) -> NFData a $crnf :: JobHandlers -> () rnf :: JobHandlers -> () NFData, [JobHandlers] -> Value [JobHandlers] -> Encoding JobHandlers -> Value JobHandlers -> Encoding (JobHandlers -> Value) -> (JobHandlers -> Encoding) -> ([JobHandlers] -> Value) -> ([JobHandlers] -> Encoding) -> ToJSON JobHandlers forall a. (a -> Value) -> (a -> Encoding) -> ([a] -> Value) -> ([a] -> Encoding) -> ToJSON a $ctoJSON :: JobHandlers -> Value toJSON :: JobHandlers -> Value $ctoEncoding :: JobHandlers -> Encoding toEncoding :: JobHandlers -> Encoding $ctoJSONList :: [JobHandlers] -> Value toJSONList :: [JobHandlers] -> Value $ctoEncodingList :: [JobHandlers] -> Encoding toEncodingList :: [JobHandlers] -> Encoding ToJSON, Value -> Parser [JobHandlers] Value -> Parser JobHandlers (Value -> Parser JobHandlers) -> (Value -> Parser [JobHandlers]) -> FromJSON JobHandlers forall a. (Value -> Parser a) -> (Value -> Parser [a]) -> FromJSON a $cparseJSON :: Value -> Parser JobHandlers parseJSON :: Value -> Parser JobHandlers $cparseJSONList :: Value -> Parser [JobHandlers] parseJSONList :: Value -> Parser [JobHandlers] FromJSON, Proxy JobHandlers -> Declare (Definitions Schema) NamedSchema (Proxy JobHandlers -> Declare (Definitions Schema) NamedSchema) -> ToSchema JobHandlers forall a. (Proxy a -> Declare (Definitions Schema) NamedSchema) -> ToSchema a $cdeclareNamedSchema :: Proxy JobHandlers -> Declare (Definitions Schema) NamedSchema declareNamedSchema :: Proxy JobHandlers -> Declare (Definitions Schema) NamedSchema ToSchema, Typeable JobHandlers Typeable JobHandlers -> (Proxy JobHandlers -> Declare (Definitions Schema) NamedSchema) -> ToSchema JobHandlers Proxy JobHandlers -> Declare (Definitions Schema) NamedSchema forall a. Typeable a -> (Proxy a -> Declare (Definitions Schema) NamedSchema) -> ToSchema a $cdeclareNamedSchema :: Proxy JobHandlers -> Declare (Definitions Schema) NamedSchema declareNamedSchema :: Proxy JobHandlers -> Declare (Definitions Schema) NamedSchema O3.ToSchema)