WikiMusic.Model.Config

Documentation

data SqliteConfig

Constructors

SqliteConfig

Fields

• path :: Text
• runMigrations :: Bool

Instances

Generic SqliteConfig

Defined in WikiMusic.Model.Config

Associated Types

type Rep SqliteConfig :: Type -> Type

Methods

from :: SqliteConfig -> Rep SqliteConfig x

to :: Rep SqliteConfig x -> SqliteConfig

Show SqliteConfig

Defined in WikiMusic.Model.Config

Methods

showsPrec :: Int -> SqliteConfig -> ShowS

show :: SqliteConfig -> String

showList :: [SqliteConfig] -> ShowS

Eq SqliteConfig

Defined in WikiMusic.Model.Config

Methods

(==) :: SqliteConfig -> SqliteConfig -> Bool

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

(k ~ A_Lens, a ~ Text, b ~ Text) => LabelOptic "path" k SqliteConfig SqliteConfig a b

Defined in WikiMusic.Model.Config

Methods

labelOptic :: Optic k NoIx SqliteConfig SqliteConfig a b

(k ~ A_Lens, a ~ Bool, b ~ Bool) => LabelOptic "runMigrations" k SqliteConfig SqliteConfig a b

Defined in WikiMusic.Model.Config

Methods

labelOptic :: Optic k NoIx SqliteConfig SqliteConfig a b

type Rep SqliteConfig

Defined in WikiMusic.Model.Config

type Rep SqliteConfig = D1 ('MetaData "SqliteConfig" "WikiMusic.Model.Config" "wikimusic-api-1.2.0.8-JHwpuK3L2G3YDoKuoiL6D" 'False) (C1 ('MetaCons "SqliteConfig" 'PrefixI 'True) (S1 ('MetaSel ('Just "path") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text) :*: S1 ('MetaSel ('Just "runMigrations") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Bool)))

sqliteConfigCodec :: TomlCodec SqliteConfig

data ServantConfig

Constructors

ServantConfig

Fields

• port :: Int
• host :: Text

Instances

Generic ServantConfig

Defined in WikiMusic.Model.Config

Associated Types

type Rep ServantConfig :: Type -> Type

Methods

from :: ServantConfig -> Rep ServantConfig x

to :: Rep ServantConfig x -> ServantConfig

Show ServantConfig

Defined in WikiMusic.Model.Config

Methods

showsPrec :: Int -> ServantConfig -> ShowS

show :: ServantConfig -> String

showList :: [ServantConfig] -> ShowS

Eq ServantConfig

Defined in WikiMusic.Model.Config

Methods

(==) :: ServantConfig -> ServantConfig -> Bool

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

(k ~ A_Lens, a ~ Text, b ~ Text) => LabelOptic "host" k ServantConfig ServantConfig a b

Defined in WikiMusic.Model.Config

Methods

labelOptic :: Optic k NoIx ServantConfig ServantConfig a b

(k ~ A_Lens, a ~ Int, b ~ Int) => LabelOptic "port" k ServantConfig ServantConfig a b

Defined in WikiMusic.Model.Config

Methods

labelOptic :: Optic k NoIx ServantConfig ServantConfig a b

type Rep ServantConfig

Defined in WikiMusic.Model.Config

type Rep ServantConfig = D1 ('MetaData "ServantConfig" "WikiMusic.Model.Config" "wikimusic-api-1.2.0.8-JHwpuK3L2G3YDoKuoiL6D" 'False) (C1 ('MetaCons "ServantConfig" 'PrefixI 'True) (S1 ('MetaSel ('Just "port") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Int) :*: S1 ('MetaSel ('Just "host") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text)))

servantConfigCodec :: TomlCodec ServantConfig

data CorsConfig

Constructors

CorsConfig

Fields

• origins :: [Text]
• methods :: [Text]
• requestHeaders :: [Text]

Instances

Generic CorsConfig

Defined in WikiMusic.Model.Config

Associated Types

type Rep CorsConfig :: Type -> Type

Methods

from :: CorsConfig -> Rep CorsConfig x

to :: Rep CorsConfig x -> CorsConfig

Show CorsConfig

Defined in WikiMusic.Model.Config

Methods

showsPrec :: Int -> CorsConfig -> ShowS

show :: CorsConfig -> String

showList :: [CorsConfig] -> ShowS

Eq CorsConfig

Defined in WikiMusic.Model.Config

Methods

(==) :: CorsConfig -> CorsConfig -> Bool

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

(k ~ A_Lens, a ~ [Text], b ~ [Text]) => LabelOptic "methods" k CorsConfig CorsConfig a b

Defined in WikiMusic.Model.Config

Methods

labelOptic :: Optic k NoIx CorsConfig CorsConfig a b

(k ~ A_Lens, a ~ [Text], b ~ [Text]) => LabelOptic "origins" k CorsConfig CorsConfig a b

Defined in WikiMusic.Model.Config

Methods

labelOptic :: Optic k NoIx CorsConfig CorsConfig a b

(k ~ A_Lens, a ~ [Text], b ~ [Text]) => LabelOptic "requestHeaders" k CorsConfig CorsConfig a b

Defined in WikiMusic.Model.Config

Methods

labelOptic :: Optic k NoIx CorsConfig CorsConfig a b

type Rep CorsConfig

Defined in WikiMusic.Model.Config

type Rep CorsConfig = D1 ('MetaData "CorsConfig" "WikiMusic.Model.Config" "wikimusic-api-1.2.0.8-JHwpuK3L2G3YDoKuoiL6D" 'False) (C1 ('MetaCons "CorsConfig" 'PrefixI 'True) (S1 ('MetaSel ('Just "origins") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 [Text]) :*: (S1 ('MetaSel ('Just "methods") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 [Text]) :*: S1 ('MetaSel ('Just "requestHeaders") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 [Text]))))

corsConfigCodec :: TomlCodec CorsConfig

data MailConfig

Constructors

MailConfig

Fields

• sendTimeoutSeconds :: Int
• host :: Text
• userFile :: Text
• user :: Maybe Text
• passwordFile :: Text
• password :: Maybe Text
• senderName :: Text
• senderMail :: Text

Instances

Generic MailConfig

Defined in WikiMusic.Model.Config

Associated Types

type Rep MailConfig :: Type -> Type

Methods

from :: MailConfig -> Rep MailConfig x

to :: Rep MailConfig x -> MailConfig

Show MailConfig

Defined in WikiMusic.Model.Config

Methods

showsPrec :: Int -> MailConfig -> ShowS

show :: MailConfig -> String

showList :: [MailConfig] -> ShowS

Eq MailConfig

Defined in WikiMusic.Model.Config

Methods

(==) :: MailConfig -> MailConfig -> Bool

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

(k ~ A_Lens, a ~ Text, b ~ Text) => LabelOptic "host" k MailConfig MailConfig a b

Defined in WikiMusic.Model.Config

Methods

labelOptic :: Optic k NoIx MailConfig MailConfig a b

(k ~ A_Lens, a ~ Maybe Text, b ~ Maybe Text) => LabelOptic "password" k MailConfig MailConfig a b

Defined in WikiMusic.Model.Config

Methods

labelOptic :: Optic k NoIx MailConfig MailConfig a b

(k ~ A_Lens, a ~ Text, b ~ Text) => LabelOptic "passwordFile" k MailConfig MailConfig a b

Defined in WikiMusic.Model.Config

Methods

labelOptic :: Optic k NoIx MailConfig MailConfig a b

(k ~ A_Lens, a ~ Int, b ~ Int) => LabelOptic "sendTimeoutSeconds" k MailConfig MailConfig a b

Defined in WikiMusic.Model.Config

Methods

labelOptic :: Optic k NoIx MailConfig MailConfig a b

(k ~ A_Lens, a ~ Text, b ~ Text) => LabelOptic "senderMail" k MailConfig MailConfig a b

Defined in WikiMusic.Model.Config

Methods

labelOptic :: Optic k NoIx MailConfig MailConfig a b

(k ~ A_Lens, a ~ Text, b ~ Text) => LabelOptic "senderName" k MailConfig MailConfig a b

Defined in WikiMusic.Model.Config

Methods

labelOptic :: Optic k NoIx MailConfig MailConfig a b

(k ~ A_Lens, a ~ Maybe Text, b ~ Maybe Text) => LabelOptic "user" k MailConfig MailConfig a b

Defined in WikiMusic.Model.Config

Methods

labelOptic :: Optic k NoIx MailConfig MailConfig a b

(k ~ A_Lens, a ~ Text, b ~ Text) => LabelOptic "userFile" k MailConfig MailConfig a b

Defined in WikiMusic.Model.Config

Methods

labelOptic :: Optic k NoIx MailConfig MailConfig a b

type Rep MailConfig

Defined in WikiMusic.Model.Config

type Rep MailConfig = D1 ('MetaData "MailConfig" "WikiMusic.Model.Config" "wikimusic-api-1.2.0.8-JHwpuK3L2G3YDoKuoiL6D" 'False) (C1 ('MetaCons "MailConfig" 'PrefixI 'True) (((S1 ('MetaSel ('Just "sendTimeoutSeconds") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Int) :*: S1 ('MetaSel ('Just "host") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text)) :*: (S1 ('MetaSel ('Just "userFile") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text) :*: S1 ('MetaSel ('Just "user") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text)))) :*: ((S1 ('MetaSel ('Just "passwordFile") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text) :*: S1 ('MetaSel ('Just "password") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Maybe Text))) :*: (S1 ('MetaSel ('Just "senderName") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text) :*: S1 ('MetaSel ('Just "senderMail") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text)))))

mailConfigCodec :: TomlCodec MailConfig

newtype WebFrontendConfig

Constructors

WebFrontendConfig

Fields

• baseUrl :: Text

Instances

Generic WebFrontendConfig

Defined in WikiMusic.Model.Config

Associated Types

type Rep WebFrontendConfig :: Type -> Type

Methods

from :: WebFrontendConfig -> Rep WebFrontendConfig x

to :: Rep WebFrontendConfig x -> WebFrontendConfig

Show WebFrontendConfig

Defined in WikiMusic.Model.Config

Methods

showsPrec :: Int -> WebFrontendConfig -> ShowS

show :: WebFrontendConfig -> String

showList :: [WebFrontendConfig] -> ShowS

Eq WebFrontendConfig

Defined in WikiMusic.Model.Config

Methods

(==) :: WebFrontendConfig -> WebFrontendConfig -> Bool

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

(k ~ An_Iso, a ~ Text, b ~ Text) => LabelOptic "baseUrl" k WebFrontendConfig WebFrontendConfig a b

Defined in WikiMusic.Model.Config

Methods

labelOptic :: Optic k NoIx WebFrontendConfig WebFrontendConfig a b

type Rep WebFrontendConfig

Defined in WikiMusic.Model.Config

type Rep WebFrontendConfig = D1 ('MetaData "WebFrontendConfig" "WikiMusic.Model.Config" "wikimusic-api-1.2.0.8-JHwpuK3L2G3YDoKuoiL6D" 'True) (C1 ('MetaCons "WebFrontendConfig" 'PrefixI 'True) (S1 ('MetaSel ('Just "baseUrl") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text)))

webFrontendConfigCodec :: TomlCodec WebFrontendConfig

newtype DevConfig

Constructors

DevConfig

Fields

• reportedVersion :: Text

Instances

Generic DevConfig

Defined in WikiMusic.Model.Config

Associated Types

type Rep DevConfig :: Type -> Type

Methods

from :: DevConfig -> Rep DevConfig x

to :: Rep DevConfig x -> DevConfig

Show DevConfig

Defined in WikiMusic.Model.Config

Methods

showsPrec :: Int -> DevConfig -> ShowS

show :: DevConfig -> String

showList :: [DevConfig] -> ShowS

Eq DevConfig

Defined in WikiMusic.Model.Config

Methods

(==) :: DevConfig -> DevConfig -> Bool

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

(k ~ An_Iso, a ~ Text, b ~ Text) => LabelOptic "reportedVersion" k DevConfig DevConfig a b

Defined in WikiMusic.Model.Config

Methods

labelOptic :: Optic k NoIx DevConfig DevConfig a b

type Rep DevConfig

Defined in WikiMusic.Model.Config

type Rep DevConfig = D1 ('MetaData "DevConfig" "WikiMusic.Model.Config" "wikimusic-api-1.2.0.8-JHwpuK3L2G3YDoKuoiL6D" 'True) (C1 ('MetaCons "DevConfig" 'PrefixI 'True) (S1 ('MetaSel ('Just "reportedVersion") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text)))

devCodec :: TomlCodec DevConfig

data AppConfig

Constructors

AppConfig

Fields

• servant :: ServantConfig
• sqlite :: SqliteConfig
• cors :: CorsConfig
• mail :: MailConfig
• webFrontend :: WebFrontendConfig
• dev :: DevConfig

Instances

Generic AppConfig

Defined in WikiMusic.Model.Config

Associated Types

type Rep AppConfig :: Type -> Type

Methods

from :: AppConfig -> Rep AppConfig x

to :: Rep AppConfig x -> AppConfig

Show AppConfig

Defined in WikiMusic.Model.Config

Methods

showsPrec :: Int -> AppConfig -> ShowS

show :: AppConfig -> String

showList :: [AppConfig] -> ShowS

Eq AppConfig

Defined in WikiMusic.Model.Config

Methods

(==) :: AppConfig -> AppConfig -> Bool

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

(k ~ A_Lens, a ~ CorsConfig, b ~ CorsConfig) => LabelOptic "cors" k AppConfig AppConfig a b

Defined in WikiMusic.Model.Config

Methods

labelOptic :: Optic k NoIx AppConfig AppConfig a b

(k ~ A_Lens, a ~ DevConfig, b ~ DevConfig) => LabelOptic "dev" k AppConfig AppConfig a b

Defined in WikiMusic.Model.Config

Methods

labelOptic :: Optic k NoIx AppConfig AppConfig a b

(k ~ A_Lens, a ~ MailConfig, b ~ MailConfig) => LabelOptic "mail" k AppConfig AppConfig a b

Defined in WikiMusic.Model.Config

Methods

labelOptic :: Optic k NoIx AppConfig AppConfig a b

(k ~ A_Lens, a ~ ServantConfig, b ~ ServantConfig) => LabelOptic "servant" k AppConfig AppConfig a b

Defined in WikiMusic.Model.Config

Methods

labelOptic :: Optic k NoIx AppConfig AppConfig a b

(k ~ A_Lens, a ~ SqliteConfig, b ~ SqliteConfig) => LabelOptic "sqlite" k AppConfig AppConfig a b

Defined in WikiMusic.Model.Config

Methods

labelOptic :: Optic k NoIx AppConfig AppConfig a b

(k ~ A_Lens, a ~ WebFrontendConfig, b ~ WebFrontendConfig) => LabelOptic "webFrontend" k AppConfig AppConfig a b

Defined in WikiMusic.Model.Config

Methods

labelOptic :: Optic k NoIx AppConfig AppConfig a b

type Rep AppConfig

Defined in WikiMusic.Model.Config

type Rep AppConfig = D1 ('MetaData "AppConfig" "WikiMusic.Model.Config" "wikimusic-api-1.2.0.8-JHwpuK3L2G3YDoKuoiL6D" 'False) (C1 ('MetaCons "AppConfig" 'PrefixI 'True) ((S1 ('MetaSel ('Just "servant") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 ServantConfig) :*: (S1 ('MetaSel ('Just "sqlite") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 SqliteConfig) :*: S1 ('MetaSel ('Just "cors") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 CorsConfig))) :*: (S1 ('MetaSel ('Just "mail") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 MailConfig) :*: (S1 ('MetaSel ('Just "webFrontend") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 WebFrontendConfig) :*: S1 ('MetaSel ('Just "dev") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 DevConfig)))))

appConfigCodec :: TomlCodec AppConfig