diff options
author | Ingela Anderton Andin <[email protected]> | 2013-04-18 10:47:52 +0200 |
---|---|---|
committer | Ingela Anderton Andin <[email protected]> | 2013-05-08 10:39:18 +0200 |
commit | d565a551ff2605c8abca0009ab90fbb7687a4097 (patch) | |
tree | ac5eb32465c5b1d273fbb66bcd18d066eadc7792 /lib/ssl/src/ssl_record.erl | |
parent | 7030e089d1090e3b9a95c96737b36d6d6fc6ef97 (diff) | |
download | otp-d565a551ff2605c8abca0009ab90fbb7687a4097.tar.gz otp-d565a551ff2605c8abca0009ab90fbb7687a4097.tar.bz2 otp-d565a551ff2605c8abca0009ab90fbb7687a4097.zip |
ssl: Make better use of the crypto API
Use the functions in crypto that we want to keep in the API.
Diffstat (limited to 'lib/ssl/src/ssl_record.erl')
-rw-r--r-- | lib/ssl/src/ssl_record.erl | 10 |
1 files changed, 1 insertions, 9 deletions
diff --git a/lib/ssl/src/ssl_record.erl b/lib/ssl/src/ssl_record.erl index 26aca56739..50b1b2cda9 100644 --- a/lib/ssl/src/ssl_record.erl +++ b/lib/ssl/src/ssl_record.erl @@ -712,12 +712,4 @@ mac_hash({3, N} = Version, MacAlg, MacSecret, SeqNo, Type, Length, Fragment) Length, Fragment). sufficient_tlsv1_2_crypto_support() -> - Data = "Sampl", - Data2 = "e #1", - Key = <<0,1,2,3,16,17,18,19,32,33,34,35,48,49,50,51,4,5,6,7,20,21,22,23,36,37,38,39, - 52,53,54,55,8,9,10,11,24,25,26,27,40,41,42,43,56,57,58,59>>, - try - crypto:sha256_mac(Key, lists:flatten([Data, Data2])), - true - catch _:_ -> false - end. + proplists:get_bool(sha256, crypto:algorithms()). |