diff options
author | Benjamin Barenblat <bbaren@google.com> | 2018-09-28 18:33:35 -0400 |
---|---|---|
committer | Benjamin Barenblat <bbaren@google.com> | 2018-09-28 18:33:35 -0400 |
commit | e74149a7569afd1ea7d67c77f40c37471e7e3e58 (patch) | |
tree | d8478e569eade926a72829eee9d3afe0e8f12710 /src/BTLS/BoringSSL/Base.chs | |
parent | 8ac48890e98a4974980b8ca3d5e90a2e52c1a624 (diff) |
Begin implementing symmetric encryption
Support RC4. Future commits will add support for more modern algorithms.
Diffstat (limited to 'src/BTLS/BoringSSL/Base.chs')
-rw-r--r-- | src/BTLS/BoringSSL/Base.chs | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/src/BTLS/BoringSSL/Base.chs b/src/BTLS/BoringSSL/Base.chs index 347e3f4..28c287b 100644 --- a/src/BTLS/BoringSSL/Base.chs +++ b/src/BTLS/BoringSSL/Base.chs @@ -36,6 +36,15 @@ data EVPMDCtx data EVPMD {#pointer *EVP_MD as 'Ptr EVPMD' -> EVPMD nocode#} +-- | The BoringSSL @EVP_CIPHER_CTX@ type, representing the state of a pending +-- encryption or decryption operation. +data EVPCipherCtx +{#pointer *EVP_CIPHER_CTX as 'Ptr EVPCipherCtx' -> EVPCipherCtx nocode#} + +-- | The BoringSSL @EVP_CIPHER@ type, representing a cipher algorithm. +data EVPCipher +{#pointer *EVP_CIPHER as 'Ptr EVPCipher' -> EVPCipher nocode#} + -- | The BoringSSL @HMAC_CTX@ type, representing the state of a pending HMAC -- operation. data HMACCtx |