Database.Persist.GenericSql.Internal

Code that is only needed for writing GenericSql backends.

Documentation

data Connection

Constructors

Connection

Fields

prepare :: Text -> IO Statement

insertSql :: RawName -> [RawName] -> Either Text (Text, Text)

stmtMap :: IORef (Map Text Statement)

close :: IO ()

migrateSql :: forall v. PersistEntity v => (Text -> IO Statement) -> v -> IO (Either [Text] [(Bool, Text)])

begin :: (Text -> IO Statement) -> IO ()

commit :: (Text -> IO Statement) -> IO ()

rollback :: (Text -> IO Statement) -> IO ()

escapeName :: RawName -> String

noLimit :: String

data Statement

Constructors

Statement

Fields

finalize :: IO ()

reset :: IO ()

execute :: [PersistValue] -> IO ()

withStmt :: forall a m. MonadControlIO m => [PersistValue] -> (RowPopper m -> m a) -> m a

withSqlConn :: MonadControlIO m => IO Connection -> (Connection -> m a) -> m a

withSqlPool :: MonadControlIO m => IO Connection -> Int -> (Pool Connection -> m a) -> m a

type RowPopper m = m (Maybe [PersistValue])

mkColumns :: PersistEntity val => val -> ([Column], [UniqueDef])

Create the list of columns for the given entity.

data Column

Constructors

Column

Fields

cName :: RawName

cNull :: Bool

cType :: SqlType

cDefault :: Maybe String

cReference :: Maybe (RawName, RawName)

type UniqueDef = (RawName, [RawName])

refName :: RawName -> RawName -> RawName

tableColumns :: EntityDef -> [(RawName, String, [String])]

rawFieldName :: (String, String, [String]) -> RawName

rawTableName :: EntityDef -> RawName

newtype RawName

Constructors

RawName

Fields

unRawName :: String

Instances

Eq RawName

Ord RawName

filterClause

Arguments

:: PersistEntity val

=> Bool

include table name?

-> Connection

-> Filter val

-> String

getFieldName :: EntityDef -> String -> RawName

dummyFromFilts :: [Filter v] -> v

getFiltsValues :: PersistEntity val => [Filter val] -> [PersistValue]

orderClause :: PersistEntity val => Bool -> Connection -> Order val -> String