Safe Haskell	None
Language	Haskell2010

Docs.Hasql.Statements

Synopsis

now :: Statement () UTCTime
createDocument :: Statement (Text, GroupID, UserID) Document
getDocument :: Statement DocumentID (Maybe Document)
getDocuments :: Statement UserID (Vector Document)
getDocumentsBy :: Statement (Maybe UserID, Maybe GroupID) (Vector Document)
createTextElement :: Statement (DocumentID, Text, Text) TextElement
getTextElement :: Statement TextElementID (Maybe TextElement)
updateTextRevision :: Monad m => Statement (TextRevisionID, Text) ((TextRevisionID -> m (Vector CommentAnchor)) -> m TextRevision)
createTextRevision :: Monad m => Statement (TextElementID, UUID, Text) ((TextRevisionID -> m (Vector CommentAnchor)) -> m TextRevision)
getTextRevision :: Monad m => Statement (TextElementID, TextRevisionSelector) ((TextRevisionID -> m (Vector CommentAnchor)) -> m (Maybe TextRevision))
getLatestTextRevisionID :: Statement TextElementRef (Maybe TextRevisionID)
getTextElementRevision :: Monad m => Statement TextRevisionRef ((TextRevisionID -> m (Vector CommentAnchor)) -> m (Maybe TextElementRevision))
getTreeNode :: Statement Hash NodeHeader
putTreeNode :: Statement (Hash, NodeHeader) ()
putTreeEdge :: Statement TreeEdge ()
putTreeRevision :: Statement (DocumentID, UserID, Hash) (Node a -> TreeRevision a)
getTreeRevision :: Statement TreeRevisionRef (Maybe (Hash, Node a -> TreeRevision a))
getTreeRevisionHistory :: Statement (DocumentID, Maybe UTCTime, Int64) (Vector TreeRevisionHeader)
getTextRevisionHistory :: Statement (TextElementRef, Maybe UTCTime, Maybe UTCTime, Int64) (Vector TextRevisionHeader)
getTextElementIDsForDocument :: Statement DocumentID (Vector TextElementID)
getTreeEdgesByParent :: Statement Hash (Vector TreeEdgeChild)
getDocumentRevisionHistory :: Statement (DocumentID, Maybe UTCTime, Int64) (Vector DocumentHistoryItem)
existsDocument :: Statement DocumentID Bool
existsTreeRevision :: Statement TreeRevisionRef Bool
existsTextElement :: Statement TextElementRef Bool
existsTextRevision :: Statement TextRevisionRef Bool
hasPermission :: Statement (UserID, DocumentID, Permission) Bool
isGroupAdmin :: Statement (UserID, GroupID) Bool
createComment :: Statement (UserID, TextElementID, Text) Comment
getComments :: Statement (DocumentID, TextElementID) (Vector Comment)
createReply :: Statement (UserID, CommentID, Text) Message
getReplies :: Statement CommentRef (Vector Message)
putCommentAnchor :: Statement (TextRevisionID, CommentAnchor) CommentAnchor
getCommentAnchors :: Statement TextRevisionID (Vector CommentAnchor)
deleteCommentAnchorsExcept :: Statement (TextRevisionID, Vector CommentID) ()
resolveComment :: Statement CommentID ()
existsComment :: Statement CommentRef Bool
getLogs :: Statement (Maybe UTCTime, Int64) (Vector LogMessage)
logMessage :: ToJSON v => Statement (Severity, Maybe UserID, Scope, v) LogMessage
getRevisionKey :: Statement (DocumentID, RevisionSelector) (Maybe RevisionKey)
updateLatestTitle :: Statement (TextElementID, Text) ()
createDraftTextRevision :: Monad m => Statement (TextElementID, TextRevisionID, UUID, Text) ((DraftRevisionID -> m (Vector CommentAnchor)) -> m DraftRevision)
getDraftTextRevision :: Monad m => Statement (TextElementID, UUID) ((DraftRevisionID -> m (Vector CommentAnchor)) -> m (Maybe DraftRevision))
deleteDraftTextRevision :: Statement (TextElementID, UUID) ()
getDraftCommentAnchors :: Statement DraftRevisionID (Vector CommentAnchor)
putDraftCommentAnchors :: Statement (DraftRevisionID, Vector CommentAnchor) ()

Documentation

now :: Statement () UTCTime Source #

createDocument :: Statement (Text, GroupID, UserID) Document Source #

getDocument :: Statement DocumentID (Maybe Document) Source #

getDocuments :: Statement UserID (Vector Document) Source #

getDocumentsBy :: Statement (Maybe UserID, Maybe GroupID) (Vector Document) Source #

createTextElement :: Statement (DocumentID, Text, Text) TextElement Source #

getTextElement :: Statement TextElementID (Maybe TextElement) Source #

updateTextRevision :: Monad m => Statement (TextRevisionID, Text) ((TextRevisionID -> m (Vector CommentAnchor)) -> m TextRevision) Source #

createTextRevision :: Monad m => Statement (TextElementID, UUID, Text) ((TextRevisionID -> m (Vector CommentAnchor)) -> m TextRevision) Source #

getTextRevision :: Monad m => Statement (TextElementID, TextRevisionSelector) ((TextRevisionID -> m (Vector CommentAnchor)) -> m (Maybe TextRevision)) Source #

getLatestTextRevisionID :: Statement TextElementRef (Maybe TextRevisionID) Source #

getTextElementRevision :: Monad m => Statement TextRevisionRef ((TextRevisionID -> m (Vector CommentAnchor)) -> m (Maybe TextElementRevision)) Source #

getTreeNode :: Statement Hash NodeHeader Source #

putTreeNode :: Statement (Hash, NodeHeader) () Source #

putTreeEdge :: Statement TreeEdge () Source #

putTreeRevision :: Statement (DocumentID, UserID, Hash) (Node a -> TreeRevision a) Source #

getTreeRevision :: Statement TreeRevisionRef (Maybe (Hash, Node a -> TreeRevision a)) Source #

getTreeRevisionHistory :: Statement (DocumentID, Maybe UTCTime, Int64) (Vector TreeRevisionHeader) Source #

getTextRevisionHistory :: Statement (TextElementRef, Maybe UTCTime, Maybe UTCTime, Int64) (Vector TextRevisionHeader) Source #

getTextElementIDsForDocument :: Statement DocumentID (Vector TextElementID) Source #

getTreeEdgesByParent :: Statement Hash (Vector TreeEdgeChild) Source #

getDocumentRevisionHistory :: Statement (DocumentID, Maybe UTCTime, Int64) (Vector DocumentHistoryItem) Source #

existsDocument :: Statement DocumentID Bool Source #

existsTreeRevision :: Statement TreeRevisionRef Bool Source #

existsTextElement :: Statement TextElementRef Bool Source #

existsTextRevision :: Statement TextRevisionRef Bool Source #

hasPermission :: Statement (UserID, DocumentID, Permission) Bool Source #

isGroupAdmin :: Statement (UserID, GroupID) Bool Source #

createComment :: Statement (UserID, TextElementID, Text) Comment Source #

getComments :: Statement (DocumentID, TextElementID) (Vector Comment) Source #

createReply :: Statement (UserID, CommentID, Text) Message Source #

getReplies :: Statement CommentRef (Vector Message) Source #

putCommentAnchor :: Statement (TextRevisionID, CommentAnchor) CommentAnchor Source #

getCommentAnchors :: Statement TextRevisionID (Vector CommentAnchor) Source #

deleteCommentAnchorsExcept :: Statement (TextRevisionID, Vector CommentID) () Source #

resolveComment :: Statement CommentID () Source #

existsComment :: Statement CommentRef Bool Source #

getLogs :: Statement (Maybe UTCTime, Int64) (Vector LogMessage) Source #

logMessage :: ToJSON v => Statement (Severity, Maybe UserID, Scope, v) LogMessage Source #

getRevisionKey :: Statement (DocumentID, RevisionSelector) (Maybe RevisionKey) Source #

updateLatestTitle :: Statement (TextElementID, Text) () Source #

createDraftTextRevision :: Monad m => Statement (TextElementID, TextRevisionID, UUID, Text) ((DraftRevisionID -> m (Vector CommentAnchor)) -> m DraftRevision) Source #

Create a new draft text revision

getDraftTextRevision :: Monad m => Statement (TextElementID, UUID) ((DraftRevisionID -> m (Vector CommentAnchor)) -> m (Maybe DraftRevision)) Source #

Get draft revision for a text element by a specific user

deleteDraftTextRevision :: Statement (TextElementID, UUID) () Source #

Delete draft revision

getDraftCommentAnchors :: Statement DraftRevisionID (Vector CommentAnchor) Source #

Get comment anchors for draft revision

putDraftCommentAnchors :: Statement (DraftRevisionID, Vector CommentAnchor) () Source #

Put comment anchors for draft revision (replace all)