diff options
author | Ingela Anderton Andin <[email protected]> | 2015-02-25 12:11:16 +0100 |
---|---|---|
committer | Ingela Anderton Andin <[email protected]> | 2015-03-02 15:00:46 +0100 |
commit | ed540bd0e457fd43a5b3eaf41f9886cb63a2755a (patch) | |
tree | c01969146c2b7db293724e0fa24d7a6f27966741 /lib/ssl/src/ssl_cipher.erl | |
parent | 2032d22f69ffa8ce6c3ded5d2e2a6ff34b3b5980 (diff) | |
download | otp-ed540bd0e457fd43a5b3eaf41f9886cb63a2755a.tar.gz otp-ed540bd0e457fd43a5b3eaf41f9886cb63a2755a.tar.bz2 otp-ed540bd0e457fd43a5b3eaf41f9886cb63a2755a.zip |
ssl: Implement support for TLS_FALLBACK_SCSV
Diffstat (limited to 'lib/ssl/src/ssl_cipher.erl')
-rw-r--r-- | lib/ssl/src/ssl_cipher.erl | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/lib/ssl/src/ssl_cipher.erl b/lib/ssl/src/ssl_cipher.erl index ff9c618a35..bec0055353 100644 --- a/lib/ssl/src/ssl_cipher.erl +++ b/lib/ssl/src/ssl_cipher.erl @@ -36,7 +36,7 @@ decipher/6, cipher/5, suite/1, suites/1, all_suites/1, ec_keyed_suites/0, anonymous_suites/0, psk_suites/1, srp_suites/0, openssl_suite/1, openssl_suite_name/1, filter/2, filter_suites/1, - hash_algorithm/1, sign_algorithm/1, is_acceptable_hash/2]). + hash_algorithm/1, sign_algorithm/1, is_acceptable_hash/2, is_fallback/1]). -export_type([cipher_suite/0, erl_cipher_suite/0, openssl_cipher_suite/0, @@ -1108,6 +1108,9 @@ is_acceptable_prf(default_prf, _) -> is_acceptable_prf(Prf, Algos) -> proplists:get_bool(Prf, Algos). +is_fallback(CipherSuites)-> + lists:member(?TLS_FALLBACK_SCSV, CipherSuites). + %%-------------------------------------------------------------------- %%% Internal functions %%-------------------------------------------------------------------- |