tls-extra 0.6.4 → 0.6.5
raw patch · 3 files changed
+9/−10 lines, 3 filesdep +crypto-randomdep −crypto-random-apidep −textdep ~cipher-aesdep ~cprng-aesdep ~crypto-pubkey
Dependencies added: crypto-random
Dependencies removed: crypto-random-api, text
Dependency ranges changed: cipher-aes, cprng-aes, crypto-pubkey
Files
Network/TLS/Extra/Certificate.hs view
@@ -157,7 +157,7 @@ verifyF _ _ = \_ _ -> False -dsaSHA1Verify pk _ b = False -- DSA.verify SHA1.hash pk asig b+dsaSHA1Verify pk _ b = False --where asig = DSA.Signature 0 0 {- FIXME : need to work out how to get R/S from the bytestring a -} -- | Verify that the given certificate chain is application to the given fully qualified host name.
Network/TLS/Extra/Cipher.hs view
@@ -38,10 +38,10 @@ import qualified "cipher-aes" Crypto.Cipher.AES as AES aes_cbc_encrypt :: Key -> IV -> B.ByteString -> B.ByteString-aes_cbc_encrypt key iv d = AES.encryptCBC (AES.initKey key) (AES.IV iv) d+aes_cbc_encrypt key iv d = AES.encryptCBC (AES.initAES key) iv d aes_cbc_decrypt :: Key -> IV -> B.ByteString -> B.ByteString-aes_cbc_decrypt key iv d = AES.decryptCBC (AES.initKey key) (AES.IV iv) d+aes_cbc_decrypt key iv d = AES.decryptCBC (AES.initAES key) iv d aes128_cbc_encrypt = aes_cbc_encrypt aes128_cbc_decrypt = aes_cbc_decrypt
tls-extra.cabal view
@@ -1,5 +1,5 @@ Name: tls-extra-Version: 0.6.4+Version: 0.6.5 Description: a set of extra definitions, default values and helpers for tls. License: BSD3@@ -27,12 +27,11 @@ , bytestring , vector , cipher-rc4- , cipher-aes >= 0.1 && < 0.2+ , cipher-aes >= 0.2 && < 0.3 , certificate >= 1.3.5 && < 1.4.0- , crypto-pubkey >= 0.1.4- , crypto-random-api+ , crypto-pubkey >= 0.2.0+ , crypto-random , pem >= 0.1.0 && < 0.2.0- , text >= 0.5 && < 1.0 , time Exposed-modules: Network.TLS.Extra other-modules: Network.TLS.Extra.Certificate@@ -52,8 +51,8 @@ , HUnit , QuickCheck >= 2 , bytestring- , cprng-aes >= 0.3.0- , cipher-aes >= 0.1 && < 0.2+ , cprng-aes >= 0.5.0+ , cipher-aes >= 0.2 && < 0.3 else Buildable: False if os(windows)