peyotls 0.0.0.5 → 0.0.0.6
raw patch · 3 files changed
+5/−3 lines, 3 files
Files
peyotls.cabal view
@@ -2,7 +2,7 @@ cabal-version: >= 1.8 name: peyotls-version: 0.0.0.5+version: 0.0.0.6 stability: Experimental author: Yoshikuni Jujo <PAF01143@nifty.ne.jp> maintainer: Yoshikuni Jujo <PAF01143@nifty.ne.jp>@@ -272,7 +272,7 @@ source-repository this type: git location: git://github.com/YoshikuniJujo/peyotls.git- tag: peyotls-0.0.0.5+ tag: peyotls-0.0.0.6 library hs-source-dirs: src
src/Network/PeyoTLS/HandshakeMonad.hs view
@@ -66,7 +66,7 @@ validate _ cs (X509.CertificateChain cc) = X509.validate X509.HashSHA256 X509.defaultHooks validationChecks cs validationCache ("", "") $- X509.CertificateChain cc -- $ reverse cc+ X509.CertificateChain cc -- reverse cc where validationCache = X509.ValidationCache (\_ _ _ -> return X509.ValidationCacheUnknown)
src/Network/PeyoTLS/Server.hs view
@@ -138,9 +138,11 @@ chk cv css cms | cv < version = throwError ALFatal ADProtocolVersion $ pmsg ++ "client version should 3.3 or more"+ {- | CipherSuite RSA AES_128_CBC_SHA `notElem` css = throwError ALFatal ADIllegalParameter $ pmsg ++ "TLS_RSA_AES_128_CBC_SHA must be supported"+ -} | CompressionMethodNull `notElem` cms = throwError ALFatal ADDecodeError $ pmsg ++ "compression method NULL must be supported"