Safe Haskell	None
Language	GHC2021

Ecluse.Config.Types

Documentation

newtype Url Source #

Constructors

Url Text

Instances

Instances details

Show Url Source #
Instance details Defined in Ecluse.Config.Types Methods showsPrec :: Int -> Url -> ShowS # show :: Url -> String # showList :: [Url] -> ShowS #
Eq Url Source #
Instance details Defined in Ecluse.Config.Types Methods (==) :: Url -> Url -> Bool # (/=) :: Url -> Url -> Bool #
Ord Url Source #
Instance details Defined in Ecluse.Config.Types Methods compare :: Url -> Url -> Ordering # (<) :: Url -> Url -> Bool # (<=) :: Url -> Url -> Bool # (>) :: Url -> Url -> Bool # (>=) :: Url -> Url -> Bool # max :: Url -> Url -> Url # min :: Url -> Url -> Url #

mkUrl :: Text -> Either Text Url Source #

unUrl :: Url -> Text Source #

data QueueBackend Source #

Constructors

SqsQueue
PubSubQueue
MemoryQueue

Instances

Instances details

WireVocab QueueBackend Source #
Instance details Defined in Ecluse.Config.Types Methods wireKind :: Text wireTable :: NonEmpty (QueueBackend, Text)
Show QueueBackend Source #
Instance details Defined in Ecluse.Config.Types Methods showsPrec :: Int -> QueueBackend -> ShowS # show :: QueueBackend -> String # showList :: [QueueBackend] -> ShowS #
Eq QueueBackend Source #
Instance details Defined in Ecluse.Config.Types Methods (==) :: QueueBackend -> QueueBackend -> Bool # (/=) :: QueueBackend -> QueueBackend -> Bool #

parseQueueBackend :: Text -> Either Text QueueBackend Source #

renderQueueBackend :: QueueBackend -> Text Source #

data CredentialBackend Source #

Constructors

CodeArtifactCredential
StaticCredential
AdcCredential

Instances

Instances details

WireVocab CredentialBackend Source #
Instance details Defined in Ecluse.Config.Types Methods wireKind :: Text wireTable :: NonEmpty (CredentialBackend, Text)
Show CredentialBackend Source #
Instance details Defined in Ecluse.Config.Types Methods showsPrec :: Int -> CredentialBackend -> ShowS # show :: CredentialBackend -> String # showList :: [CredentialBackend] -> ShowS #
Eq CredentialBackend Source #
Instance details Defined in Ecluse.Config.Types Methods (==) :: CredentialBackend -> CredentialBackend -> Bool # (/=) :: CredentialBackend -> CredentialBackend -> Bool #
Ord CredentialBackend Source #
Instance details Defined in Ecluse.Config.Types Methods compare :: CredentialBackend -> CredentialBackend -> Ordering # (<) :: CredentialBackend -> CredentialBackend -> Bool # (<=) :: CredentialBackend -> CredentialBackend -> Bool # (>) :: CredentialBackend -> CredentialBackend -> Bool # (>=) :: CredentialBackend -> CredentialBackend -> Bool # max :: CredentialBackend -> CredentialBackend -> CredentialBackend # min :: CredentialBackend -> CredentialBackend -> CredentialBackend #

parseCredentialBackend :: Text -> Either Text CredentialBackend Source #

renderCredentialBackend :: CredentialBackend -> Text Source #

newtype MirrorCredentialProvider Source #

Constructors

MirrorCredentialProvider CredentialBackend

Instances

Instances details

WireVocab MirrorCredentialProvider Source #
Instance details Defined in Ecluse.Config.Types Methods wireKind :: Text wireTable :: NonEmpty (MirrorCredentialProvider, Text)
Eq MirrorCredentialProvider Source #
Instance details Defined in Ecluse.Config.Types Methods (==) :: MirrorCredentialProvider -> MirrorCredentialProvider -> Bool # (/=) :: MirrorCredentialProvider -> MirrorCredentialProvider -> Bool #

parseMirrorCredentialProvider :: Text -> Either Text CredentialBackend Source #

renderMirrorCredentialProvider :: CredentialBackend -> Text Source #

data MountConfig Source #

Constructors

MountConfig

Fields

mntPrivateUpstream :: Maybe RegistryUrl
mntPublicUpstream :: RegistryUrl
mntMirrorTarget :: Maybe RegistryUrl
mntMirrorTargetToken :: Maybe Secret
mntCredentialProvider :: CredentialBackend
mntRespectUpstreamTarballHost :: Bool
mntMirrorCodeArtifactDomain :: Maybe Text
mntMirrorCodeArtifactDomainOwner :: Maybe Text
mntMirrorCodeArtifactRegion :: Maybe Text
mntMirrorCodeArtifactTokenDuration :: Maybe Natural
mntPublicationTarget :: Maybe RegistryUrl
mntPublicationTargetToken :: Maybe Secret
mntPublishScopes :: [Scope]
mntAdditionalRules :: RulePatch

Instances

Instances details

FromJSON MountConfig Source #
Instance details Defined in Ecluse.Config.Aeson Methods parseJSON :: Value -> Parser MountConfig Source # parseJSONList :: Value -> Parser [MountConfig] Source # omittedField :: Maybe MountConfig Source #
Show MountConfig Source #
Instance details Defined in Ecluse.Config.Types Methods showsPrec :: Int -> MountConfig -> ShowS # show :: MountConfig -> String # showList :: [MountConfig] -> ShowS #
Eq MountConfig Source #
Instance details Defined in Ecluse.Config.Types Methods (==) :: MountConfig -> MountConfig -> Bool # (/=) :: MountConfig -> MountConfig -> Bool #

data AppConfig Source #

Constructors

AppConfig

Fields

cfgPort :: Int
cfgMounts :: Map Ecosystem MountConfig
cfgQueueBackend :: QueueBackend
cfgQueueUrl :: Maybe Url
cfgQueueMemoryMaxDepth :: Int
cfgAwsRegion :: Maybe Text
cfgAwsEndpointUrlSqs :: Maybe Text
cfgAwsEndpointUrl :: Maybe Text
cfgGoogleProject :: Maybe Text
cfgAuthToken :: Maybe Secret
cfgHelpMessage :: Maybe Text
cfgCveSyncInterval :: NominalDiffTime
cfgShutdownDrainTimeout :: Int
cfgCores :: Maybe Int
cfgMaxHeapBytes :: Maybe Int
cfgServeMaxInFlight :: Maybe Int
cfgPublicConnectionsPerHost :: Maybe Int
cfgPrivateConnectionsPerHost :: Maybe Int
cfgCacheTtl :: NominalDiffTime
cfgCacheMaxEntries :: Int
cfgCacheMaxBytes :: Int
cfgMaxResponseBytes :: Int
cfgMaxVersionCount :: Int
cfgMaxNestingDepth :: Int
cfgLogFormat :: LogFormat
cfgTelemetry :: TelemetrySwitch
cfgPublicUrl :: Maybe Url
cfgMinPublicIntegrity :: MinIntegrity
cfgMinTrustedIntegrity :: MinTrustedIntegrity
cfgAdditionalBlockedRanges :: [IPRange]
cfgOsvDataDir :: FilePath
cfgOsvExportBaseUrl :: Text
cfgVulnerabilityDatabaseBucket :: Maybe Text
cfgCveDbPollInterval :: NominalDiffTime
cfgMaxOsvDbBytes :: Int

Instances

Instances details

FromJSON AppConfig Source #
Instance details Defined in Ecluse.Config.Aeson Methods parseJSON :: Value -> Parser AppConfig Source # parseJSONList :: Value -> Parser [AppConfig] Source # omittedField :: Maybe AppConfig Source #
Show AppConfig Source #
Instance details Defined in Ecluse.Config.Types Methods showsPrec :: Int -> AppConfig -> ShowS # show :: AppConfig -> String # showList :: [AppConfig] -> ShowS #
Eq AppConfig Source #
Instance details Defined in Ecluse.Config.Types Methods (==) :: AppConfig -> AppConfig -> Bool # (/=) :: AppConfig -> AppConfig -> Bool #

data MountRegistries Source #

Constructors

MountRegistries
Fields regPrivateUpstream :: RegistryUrl regPublicUpstream :: RegistryUrl regMirrorTarget :: MirrorTarget

Instances

Instances details

Show MountRegistries Source #
Instance details Defined in Ecluse.Config.Types Methods showsPrec :: Int -> MountRegistries -> ShowS # show :: MountRegistries -> String # showList :: [MountRegistries] -> ShowS #
Eq MountRegistries Source #
Instance details Defined in Ecluse.Config.Types Methods (==) :: MountRegistries -> MountRegistries -> Bool # (/=) :: MountRegistries -> MountRegistries -> Bool #

data MirrorTarget Source #

Constructors

MirrorTarget
Fields mtUrl :: RegistryUrl mtCredential :: CredentialBackend mtQueue :: QueueBackend

Instances

Instances details

Show MirrorTarget Source #
Instance details Defined in Ecluse.Config.Types Methods showsPrec :: Int -> MirrorTarget -> ShowS # show :: MirrorTarget -> String # showList :: [MirrorTarget] -> ShowS #
Eq MirrorTarget Source #
Instance details Defined in Ecluse.Config.Types Methods (==) :: MirrorTarget -> MirrorTarget -> Bool # (/=) :: MirrorTarget -> MirrorTarget -> Bool #

data Mount Source #

Constructors

Mount
Fields mountEcosystem :: Ecosystem mountRegistries :: MountRegistries mountPolicy :: [PrecededRule]

Instances

Instances details

Show Mount Source #
Instance details Defined in Ecluse.Config.Types Methods showsPrec :: Int -> Mount -> ShowS # show :: Mount -> String # showList :: [Mount] -> ShowS #
Eq Mount Source #
Instance details Defined in Ecluse.Config.Types Methods (==) :: Mount -> Mount -> Bool # (/=) :: Mount -> Mount -> Bool #

type MountMap = Map Ecosystem Mount Source #

data Config Source #

Constructors

Config
Fields configApp :: AppConfig configMounts :: MountMap

Instances

Instances details

Show Config Source #
Instance details Defined in Ecluse.Config.Types Methods showsPrec :: Int -> Config -> ShowS # show :: Config -> String # showList :: [Config] -> ShowS #
Eq Config Source #
Instance details Defined in Ecluse.Config.Types Methods (==) :: Config -> Config -> Bool # (/=) :: Config -> Config -> Bool #

data ConfigError Source #

Constructors

ParseError Text
PolicyErrors [PolicyError]

Instances

Instances details

Show ConfigError Source #
Instance details Defined in Ecluse.Config.Types Methods showsPrec :: Int -> ConfigError -> ShowS # show :: ConfigError -> String # showList :: [ConfigError] -> ShowS #
Eq ConfigError Source #
Instance details Defined in Ecluse.Config.Types Methods (==) :: ConfigError -> ConfigError -> Bool # (/=) :: ConfigError -> ConfigError -> Bool #

renderConfigError :: ConfigError -> Text Source #