Safe Haskell	Safe-Inferred
Language	Haskell2010

Freckle.App.Database.XRay

Description

Legacy version of Freckle.App.Database that still uses XRay

Synopsis

class MonadTracer m where
- getVaultData :: m (Maybe XRayVaultData)
class HasStatsClient env
class HasSqlPool app where
- getSqlPool :: app -> SqlPool
type SqlPool = Pool SqlBackend
makePostgresPool :: (MonadUnliftIO m, MonadLoggerIO m) => m SqlPool
makePostgresPoolWith :: (MonadUnliftIO m, MonadLoggerIO m) => PostgresConnectionConf -> m SqlPool
runDB :: (MonadUnliftIO m, MonadTracer m, MonadReader app m, HasSqlPool app, HasStatsClient app) => SqlPersistT m a -> m a
runDBSimple :: (HasSqlPool app, MonadUnliftIO m, MonadReader app m) => SqlPersistT m a -> m a
data PostgresConnectionConf = PostgresConnectionConf {
- pccHost :: String
- pccPort :: Int
- pccUser :: String
- pccPassword :: PostgresPassword
- pccDatabase :: String
- pccPoolSize :: Int
- pccStatementTimeout :: PostgresStatementTimeout
- pccSchema :: Maybe String
}
data PostgresPasswordSource
- = PostgresPasswordSourceIamAuth
- | PostgresPasswordSourceEnv
data PostgresPassword
- = PostgresPasswordIamAuth
- | PostgresPasswordStatic String
type PostgresStatementTimeout = Timeout
postgresStatementTimeoutMilliseconds :: PostgresStatementTimeout -> Int
envParseDatabaseConf :: PostgresPasswordSource -> Parser Error PostgresConnectionConf
envPostgresPasswordSource :: Parser Error PostgresPasswordSource

Documentation

class MonadTracer m where Source #

Class for reading XRayVaultData

This is named the same as the OpenTelemetry class we'll use once we move to that tracing system

Methods

getVaultData :: m (Maybe XRayVaultData) Source #

Instances

Instances details

MonadTracer (AppExample app) Source #
Instance details Defined in Freckle.App.Test Methods getVaultData :: AppExample app (Maybe XRayVaultData) Source #
MonadTracer (HandlerFor app) Source #
Instance details Defined in Freckle.App.Database.XRay Methods getVaultData :: HandlerFor app (Maybe XRayVaultData) Source #
Applicative m => MonadTracer (AppT app m) Source #
Instance details Defined in Freckle.App Methods getVaultData :: AppT app m (Maybe XRayVaultData) Source #

class HasStatsClient env Source #

Minimal complete definition

statsClientL

Instances

Instances details

HasStatsClient StatsClient Source #
Instance details Defined in Freckle.App.Stats Methods statsClientL :: Lens' StatsClient StatsClient Source #
HasStatsClient site => HasStatsClient (HandlerData child site) Source #
Instance details Defined in Freckle.App.Stats Methods statsClientL :: Lens' (HandlerData child site) StatsClient Source #

class HasSqlPool app where Source #

Methods

getSqlPool :: app -> SqlPool Source #

Instances

Instances details

HasSqlPool SqlPool Source #
Instance details Defined in Freckle.App.Database Methods getSqlPool :: SqlPool -> SqlPool Source #
HasSqlPool site => HasSqlPool (HandlerData child site) Source #
Instance details Defined in Freckle.App.Database Methods getSqlPool :: HandlerData child site -> SqlPool Source #

type SqlPool = Pool SqlBackend Source #

makePostgresPool :: (MonadUnliftIO m, MonadLoggerIO m) => m SqlPool Source #

makePostgresPoolWith :: (MonadUnliftIO m, MonadLoggerIO m) => PostgresConnectionConf -> m SqlPool Source #

runDB :: (MonadUnliftIO m, MonadTracer m, MonadReader app m, HasSqlPool app, HasStatsClient app) => SqlPersistT m a -> m a Source #

Run a Database action with connection stats and tracing

runDBSimple :: (HasSqlPool app, MonadUnliftIO m, MonadReader app m) => SqlPersistT m a -> m a Source #

data PostgresConnectionConf Source #

Constructors

PostgresConnectionConf
Fields pccHost :: String pccPort :: Int pccUser :: String pccPassword :: PostgresPassword pccDatabase :: String pccPoolSize :: Int pccStatementTimeout :: PostgresStatementTimeout pccSchema :: Maybe String

Instances

Instances details

Show PostgresConnectionConf Source #
Instance details Defined in Freckle.App.Database Methods showsPrec :: Int -> PostgresConnectionConf -> ShowS Source # show :: PostgresConnectionConf -> String Source # showList :: [PostgresConnectionConf] -> ShowS Source #
Eq PostgresConnectionConf Source #
Instance details Defined in Freckle.App.Database Methods (==) :: PostgresConnectionConf -> PostgresConnectionConf -> Bool Source # (/=) :: PostgresConnectionConf -> PostgresConnectionConf -> Bool Source #

data PostgresPasswordSource Source #

Constructors

PostgresPasswordSourceIamAuth
PostgresPasswordSourceEnv

Instances

Instances details

Show PostgresPasswordSource Source #
Instance details Defined in Freckle.App.Database Methods showsPrec :: Int -> PostgresPasswordSource -> ShowS Source # show :: PostgresPasswordSource -> String Source # showList :: [PostgresPasswordSource] -> ShowS Source #
Eq PostgresPasswordSource Source #
Instance details Defined in Freckle.App.Database Methods (==) :: PostgresPasswordSource -> PostgresPasswordSource -> Bool Source # (/=) :: PostgresPasswordSource -> PostgresPasswordSource -> Bool Source #

data PostgresPassword Source #

Constructors

PostgresPasswordIamAuth
PostgresPasswordStatic String

Instances

Instances details

Show PostgresPassword Source #
Instance details Defined in Freckle.App.Database Methods showsPrec :: Int -> PostgresPassword -> ShowS Source # show :: PostgresPassword -> String Source # showList :: [PostgresPassword] -> ShowS Source #
Eq PostgresPassword Source #
Instance details Defined in Freckle.App.Database Methods (==) :: PostgresPassword -> PostgresPassword -> Bool Source # (/=) :: PostgresPassword -> PostgresPassword -> Bool Source #

type PostgresStatementTimeout = Timeout Source #

postgresStatementTimeoutMilliseconds :: PostgresStatementTimeout -> Int Source #

envParseDatabaseConf :: PostgresPasswordSource -> Parser Error PostgresConnectionConf Source #

envPostgresPasswordSource :: Parser Error PostgresPasswordSource Source #