Web.Apiary.Database.Persist

Documentation

data Persist

Instances

Extension Persist

Methods

extMiddleware :: Persist -> Middleware

extMiddleware' :: Persist -> Middleware'

MonadBaseControl IO m => RunSQL (ReaderT * Persist m)

Methods

runSql :: SqlPersistT (ReaderT * Persist m) a -> ReaderT * Persist m a

initializer

data Migrator

Constructors

Logging Migration

Silent Migration

Unsafe Migration

NoMigrate

type With c m = forall a. (c -> m a) -> m a

initPersist :: (MonadIO m, MonadBaseControl IO m) => With SqlBackend (LogWrapper exts m) -> Migration -> Initializer m exts (Persist ': exts)

construct persist extension initializer with no connection pool.

example:

initPersist (withSqliteConn "db.sqlite") migrateAll

initPersistNoLog :: (MonadIO m, MonadBaseControl IO m) => With SqlBackend (NoLoggingT m) -> Migration -> Initializer m es (Persist ': es)

initPersistPool :: (MonadIO m, MonadBaseControl IO m) => With ConnectionPool (LogWrapper exts m) -> Migration -> Initializer m exts (Persist ': exts)

initPersistPoolNoLog :: (MonadIO m, MonadBaseControl IO m) => With ConnectionPool (NoLoggingT m) -> Migration -> Initializer m es (Persist ': es)

low level

initPersist' :: (MonadIO n, MonadBaseControl IO n, Monad m) => (forall a. Extensions exts -> n a -> m a) -> With SqlBackend n -> Migrator -> Initializer m exts (Persist ': exts)

initPersistPool' :: (MonadIO n, MonadBaseControl IO n, Monad m) => (forall a. Extensions exts -> n a -> m a) -> With ConnectionPool n -> Migrator -> Initializer m exts (Persist ': exts)

query

class RunSQL m where

execute sql in action.

Minimal complete definition

runSql

Methods

runSql :: SqlPersistT m a -> m a

Instances

(Has Persist es, MonadExts es m, MonadBaseControl IO m) => RunSQL m

Methods

runSql :: SqlPersistT m a -> m a

MonadBaseControl IO m => RunSQL (ReaderT * Persist m)

Methods

runSql :: SqlPersistT (ReaderT * Persist m) a -> ReaderT * Persist m a

filter

sql

Arguments

:: (KnownSymbol k, Has Persist exts, MonadBaseControl IO actM, k </ prms)

=> Maybe Html

documentation.

-> proxy k

-> SqlPersistT (ActionT exts '[] actM) a

-> (a -> Maybe b)

result check function. Nothing: fail filter, Just a: success filter and add parameter.

-> Filter exts actM m prms ((k := b) ': prms)

filter by sql query. since 0.9.0.0.