Safe Haskell | Safe-Inferred |
---|---|
Language | GHC2021 |
Synopsis
- interpretGalleyAPIAccessToRpc :: (Member (Error ParseException) r, Member Rpc r, Member TinyLog r) => Set Version -> Endpoint -> Sem (GalleyAPIAccess ': r) a -> Sem r a
- getUserLegalholdStatus :: (Member TinyLog r, Member (Error ParseException) r, Member Rpc r) => Local UserId -> TeamId -> Sem (Input Endpoint : r) UserLegalHoldStatusResponse
- galleyRequest :: (Member Rpc r, Member (Input Endpoint) r) => (Request -> Request) -> Sem r (Response (Maybe LByteString))
- createSelfConv :: (Member Rpc r, Member TinyLog r, Member (Input Endpoint) r) => Version -> UserId -> Sem r ()
- getConv :: (Member (Error ParseException) r, Member Rpc r, Member (Input Endpoint) r, Member TinyLog r) => Version -> UserId -> Local ConvId -> Sem r (Maybe Conversation)
- getTeamConv :: (Member (Error ParseException) r, Member Rpc r, Member (Input Endpoint) r, Member TinyLog r) => Version -> UserId -> TeamId -> ConvId -> Sem r (Maybe TeamConversation)
- newClient :: (Member Rpc r, Member (Input Endpoint) r, Member TinyLog r) => UserId -> ClientId -> Sem r ()
- checkUserCanJoinTeam :: (Member Rpc r, Member (Input Endpoint) r, Member TinyLog r) => TeamId -> Sem r (Maybe Error)
- addTeamMember :: (Member Rpc r, Member (Input Endpoint) r, Member TinyLog r) => UserId -> TeamId -> Maybe (UserId, UTCTimeMillis) -> Role -> Sem r Bool
- createTeam :: (Member Rpc r, Member (Input Endpoint) r, Member TinyLog r) => UserId -> NewTeam -> TeamId -> Sem r ()
- getTeamMember :: (Member (Error ParseException) r, Member Rpc r, Member (Input Endpoint) r, Member TinyLog r) => UserId -> TeamId -> Sem r (Maybe TeamMember)
- getTeamMembers :: (Member (Error ParseException) r, Member Rpc r, Member (Input Endpoint) r, Member TinyLog r) => TeamId -> Sem r TeamMemberList
- memberIsTeamOwner :: (Member Rpc r, Member (Input Endpoint) r) => TeamId -> UserId -> Sem r Bool
- getTeamId :: (Member (Error ParseException) r, Member Rpc r, Member (Input Endpoint) r, Member TinyLog r) => UserId -> Sem r (Maybe TeamId)
- getTeam :: (Member (Error ParseException) r, Member Rpc r, Member (Input Endpoint) r, Member TinyLog r) => TeamId -> Sem r TeamData
- getTeamName :: (Member (Error ParseException) r, Member Rpc r, Member (Input Endpoint) r, Member TinyLog r) => TeamId -> Sem r TeamName
- getTeamLegalHoldStatus :: (Member (Error ParseException) r, Member Rpc r, Member (Input Endpoint) r, Member TinyLog r) => TeamId -> Sem r (LockableFeature LegalholdConfig)
- getTeamSearchVisibility :: (Member (Error ParseException) r, Member Rpc r, Member (Input Endpoint) r, Member TinyLog r) => TeamId -> Sem r TeamSearchVisibility
- getFeatureConfigForTeam :: forall feature r. (IsFeatureConfig feature, Typeable feature, Member TinyLog r, Member Rpc r, Member (Error ParseException) r) => TeamId -> Sem (Input Endpoint : r) (LockableFeature feature)
- getVerificationCodeEnabled :: (Member (Error ParseException) r, Member Rpc r, Member (Input Endpoint) r, Member TinyLog r) => TeamId -> Sem r Bool
- decodeBodyOrThrow :: forall a r. (Typeable a, FromJSON a, Member (Error ParseException) r) => Text -> Response (Maybe ByteString) -> Sem r a
- getAllTeamFeaturesForUser :: (Member Rpc r, Member (Input Endpoint) r) => Maybe UserId -> Sem r AllTeamFeatures
- changeTeamStatus :: (Member Rpc r, Member (Input Endpoint) r, Member TinyLog r) => TeamId -> TeamStatus -> Maybe Alpha -> Sem r ()
- getTeamExposeInvitationURLsToTeamAdmin :: (Member Rpc r, Member (Input Endpoint) r, Member (Error ParseException) r, Member TinyLog r) => TeamId -> Sem r ShowOrHideInvitationUrl
- checkMLSOne2OneEstablished :: (Member (Error ParseException) r, Member (Input Endpoint) r, Member Rpc r, Member TinyLog r) => Local UserId -> Qualified UserId -> Sem r MLSOneToOneEstablished
- unblockConversation :: (Member (Error ParseException) r, Member (Input Endpoint) r, Member Rpc r, Member TinyLog r) => Version -> Local UserId -> Maybe ConnId -> Qualified ConvId -> Sem r Conversation
- remote :: ByteString -> Msg -> Msg
- getEJPDConvInfo :: forall r. (Member TinyLog r, Member (Error ParseException) r, Member (Input Endpoint) r, Member Rpc r) => UserId -> Sem r [EJPDConvInfo]
Documentation
interpretGalleyAPIAccessToRpc :: (Member (Error ParseException) r, Member Rpc r, Member TinyLog r) => Set Version -> Endpoint -> Sem (GalleyAPIAccess ': r) a -> Sem r a Source #
getUserLegalholdStatus :: (Member TinyLog r, Member (Error ParseException) r, Member Rpc r) => Local UserId -> TeamId -> Sem (Input Endpoint : r) UserLegalHoldStatusResponse Source #
galleyRequest :: (Member Rpc r, Member (Input Endpoint) r) => (Request -> Request) -> Sem r (Response (Maybe LByteString)) Source #
createSelfConv :: (Member Rpc r, Member TinyLog r, Member (Input Endpoint) r) => Version -> UserId -> Sem r () Source #
Calls createSelfConversationH
.
getConv :: (Member (Error ParseException) r, Member Rpc r, Member (Input Endpoint) r, Member TinyLog r) => Version -> UserId -> Local ConvId -> Sem r (Maybe Conversation) Source #
Calls getConversationH
.
getTeamConv :: (Member (Error ParseException) r, Member Rpc r, Member (Input Endpoint) r, Member TinyLog r) => Version -> UserId -> TeamId -> ConvId -> Sem r (Maybe TeamConversation) Source #
Calls getTeamConversationH
.
newClient :: (Member Rpc r, Member (Input Endpoint) r, Member TinyLog r) => UserId -> ClientId -> Sem r () Source #
Calls addClientH
.
checkUserCanJoinTeam :: (Member Rpc r, Member (Input Endpoint) r, Member TinyLog r) => TeamId -> Sem r (Maybe Error) Source #
Calls canUserJoinTeamH
.
addTeamMember :: (Member Rpc r, Member (Input Endpoint) r, Member TinyLog r) => UserId -> TeamId -> Maybe (UserId, UTCTimeMillis) -> Role -> Sem r Bool Source #
Calls uncheckedAddTeamMemberH
.
createTeam :: (Member Rpc r, Member (Input Endpoint) r, Member TinyLog r) => UserId -> NewTeam -> TeamId -> Sem r () Source #
Calls createBindingTeamH
.
getTeamMember :: (Member (Error ParseException) r, Member Rpc r, Member (Input Endpoint) r, Member TinyLog r) => UserId -> TeamId -> Sem r (Maybe TeamMember) Source #
Calls uncheckedGetTeamMemberH
.
getTeamMembers :: (Member (Error ParseException) r, Member Rpc r, Member (Input Endpoint) r, Member TinyLog r) => TeamId -> Sem r TeamMemberList Source #
Calls uncheckedGetTeamMembersH
.
| TODO: is now truncated. this is (only) used for team suspension / unsuspension, which means that only the first 2000 members of a team (according to some arbitrary order) will be suspended, and the rest will remain active.
memberIsTeamOwner :: (Member Rpc r, Member (Input Endpoint) r) => TeamId -> UserId -> Sem r Bool Source #
getTeamId :: (Member (Error ParseException) r, Member Rpc r, Member (Input Endpoint) r, Member TinyLog r) => UserId -> Sem r (Maybe TeamId) Source #
Calls getBindingTeamIdH
.
getTeam :: (Member (Error ParseException) r, Member Rpc r, Member (Input Endpoint) r, Member TinyLog r) => TeamId -> Sem r TeamData Source #
Calls getTeamInternalH
.
getTeamName :: (Member (Error ParseException) r, Member Rpc r, Member (Input Endpoint) r, Member TinyLog r) => TeamId -> Sem r TeamName Source #
Calls getTeamInternalH
.
getTeamLegalHoldStatus :: (Member (Error ParseException) r, Member Rpc r, Member (Input Endpoint) r, Member TinyLog r) => TeamId -> Sem r (LockableFeature LegalholdConfig) Source #
Calls getTeamFeatureStatusH
.
getTeamSearchVisibility :: (Member (Error ParseException) r, Member Rpc r, Member (Input Endpoint) r, Member TinyLog r) => TeamId -> Sem r TeamSearchVisibility Source #
Calls getSearchVisibilityInternalH
.
getFeatureConfigForTeam :: forall feature r. (IsFeatureConfig feature, Typeable feature, Member TinyLog r, Member Rpc r, Member (Error ParseException) r) => TeamId -> Sem (Input Endpoint : r) (LockableFeature feature) Source #
getVerificationCodeEnabled :: (Member (Error ParseException) r, Member Rpc r, Member (Input Endpoint) r, Member TinyLog r) => TeamId -> Sem r Bool Source #
decodeBodyOrThrow :: forall a r. (Typeable a, FromJSON a, Member (Error ParseException) r) => Text -> Response (Maybe ByteString) -> Sem r a Source #
getAllTeamFeaturesForUser :: (Member Rpc r, Member (Input Endpoint) r) => Maybe UserId -> Sem r AllTeamFeatures Source #
changeTeamStatus :: (Member Rpc r, Member (Input Endpoint) r, Member TinyLog r) => TeamId -> TeamStatus -> Maybe Alpha -> Sem r () Source #
Calls updateTeamStatusH
.
getTeamExposeInvitationURLsToTeamAdmin :: (Member Rpc r, Member (Input Endpoint) r, Member (Error ParseException) r, Member TinyLog r) => TeamId -> Sem r ShowOrHideInvitationUrl Source #
checkMLSOne2OneEstablished :: (Member (Error ParseException) r, Member (Input Endpoint) r, Member Rpc r, Member TinyLog r) => Local UserId -> Qualified UserId -> Sem r MLSOneToOneEstablished Source #