Yam.Transaction

Documentation

type Transaction = SqlPersistT IO

type TransactionPool = Pool SqlBackend

data DataSource

Constructors

DataSource

Fields

• dbtype :: Text
• conn :: Text
• thread :: Int
• migrate :: Bool
• extra :: Maybe (Map Text Text)

Instances

Show DataSource

Methods

showsPrec :: Int -> DataSource -> ShowS

show :: DataSource -> String

showList :: [DataSource] -> ShowS

Generic DataSource

Associated Types

type Rep DataSource :: * -> *

Methods

from :: DataSource -> Rep DataSource x

to :: Rep DataSource x -> DataSource

FromJSON DataSource

Methods

parseJSON :: Value -> Parser DataSource

parseJSONList :: Value -> Parser [DataSource]

Default DataSource

Methods

def :: DataSource

type Rep DataSource

type Rep DataSource = D1 * (MetaData "DataSource" "Yam.Transaction" "yam-app-0.1.3-LqtuHKOcsggLWPPXSdcrRK" False) (C1 * (MetaCons "DataSource" PrefixI True) ((:*:) * ((:*:) * (S1 * (MetaSel (Just Symbol "dbtype") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 * Text)) (S1 * (MetaSel (Just Symbol "conn") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 * Text))) ((:*:) * (S1 * (MetaSel (Just Symbol "thread") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 * Int)) ((:*:) * (S1 * (MetaSel (Just Symbol "migrate") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 * Bool)) (S1 * (MetaSel (Just Symbol "extra") NoSourceUnpackedness NoSourceStrictness DecidedLazy) (Rec0 * (Maybe (Map Text Text))))))))

class (MonadIO m, MonadBaseControl IO m, MonadLogger m) => MonadTransaction m where

Minimal complete definition

connectionPool, setConnectionPool

Methods

connectionPool :: m TransactionPool

setConnectionPool :: TransactionPool -> Maybe TransactionPool -> m ()

secondaryPool :: m (Maybe TransactionPool)

type DataSourceConnector m a = LogFunc -> DataSource -> (TransactionPool -> m a) -> m a

type DataSourceProvider m a = (Text, DataSourceConnector m a)

class HasDataSource ds where

Minimal complete definition

connector

Methods

connector :: MonadTransaction m => Proxy ds -> DataSourceConnector m a

Instances

HasDataSource SQLite

Methods

connector :: MonadTransaction m => Proxy * SQLite -> DataSourceConnector m a

runTrans :: MonadTransaction m => Transaction a -> m a

selectValue :: PersistField a => Text -> Transaction [a]

selectNow :: Transaction UTCTime

now :: MonadTransaction m => m UTCTime

initDataSource :: MonadTransaction m => [DataSourceProvider m a] -> DataSource -> Maybe DataSource -> m a -> m a

runSecondaryTrans :: MonadTransaction m => Transaction a -> m a