Safe Haskell | Safe-Inferred |
---|---|
Language | GHC2021 |
Synopsis
- interpretLegalHoldStoreToCassandra :: (Member (Embed IO) r, Member (Input ClientState) r, Member (Input Env) r, Member TinyLog r) => FeatureDefaults LegalholdConfig -> Sem (LegalHoldStore ': r) a -> Sem r a
- isTeamLegalholdWhitelisted :: FeatureDefaults LegalholdConfig -> TeamId -> Client Bool
- selectPendingPrekeys :: MonadClient m => UserId -> m (Maybe ([Prekey], LastPrekey))
- validateServiceKey :: MonadIO m => ServiceKeyPEM -> m (Maybe (ServiceKey, Fingerprint Rsa))
Documentation
interpretLegalHoldStoreToCassandra :: (Member (Embed IO) r, Member (Input ClientState) r, Member (Input Env) r, Member TinyLog r) => FeatureDefaults LegalholdConfig -> Sem (LegalHoldStore ': r) a -> Sem r a Source #
Used by tests
selectPendingPrekeys :: MonadClient m => UserId -> m (Maybe ([Prekey], LastPrekey)) Source #
validateServiceKey :: MonadIO m => ServiceKeyPEM -> m (Maybe (ServiceKey, Fingerprint Rsa)) Source #
Copied unchanged from Brig.Provider.API. Interpret a service certificate and extract
key and fingerprint. (This only has to be in MonadIO
because the FFI in OpenSSL works
like that.)
FUTUREWORK: It would be nice to move (part of) this to ssl-util, but it has types from brig-types and types-common.