module Network.HTTP2.TLS.Supported where
import Data.Default.Class (def)
import Network.TLS hiding (HostName)
import Network.TLS.Extra
strongSupported :: Supported
strongSupported :: Supported
strongSupported =
forall a. Default a => a
def
{ supportedVersions :: [Version]
supportedVersions = [Version
TLS13, Version
TLS12]
, supportedCiphers :: [Cipher]
supportedCiphers = [Cipher]
ciphersuite_strong
, supportedCompressions :: [Compression]
supportedCompressions = [Compression
nullCompression]
, supportedSecureRenegotiation :: Bool
supportedSecureRenegotiation = Bool
True
, supportedClientInitiatedRenegotiation :: Bool
supportedClientInitiatedRenegotiation = Bool
False
, supportedSession :: Bool
supportedSession = Bool
True
, supportedFallbackScsv :: Bool
supportedFallbackScsv = Bool
True
, supportedGroups :: [Group]
supportedGroups = [Group
X25519, Group
P256, Group
P384]
}