diff options
| author | Ingela Anderton Andin <[email protected]> | 2016-04-15 22:25:45 +0200 |
|---|---|---|
| committer | Ingela Anderton Andin <[email protected]> | 2016-04-22 09:43:22 +0200 |
| commit | 0bb95b2ac735ecf01a02de07da22d4a7a9577f36 (patch) | |
| tree | 22caceec5aa7e0a34015caabe0fd02a65f362918 /lib/ssl/src/ssl.erl | |
| parent | afe72bfc1448ff426c38eceb7412f69e973aef62 (diff) | |
| download | otp-0bb95b2ac735ecf01a02de07da22d4a7a9577f36.tar.gz otp-0bb95b2ac735ecf01a02de07da22d4a7a9577f36.tar.bz2 otp-0bb95b2ac735ecf01a02de07da22d4a7a9577f36.zip | |
ssl: Corrections to cipher suite handling
It was not possible to mix ssl 3 and 4 tuple cipher suites in the
ciphers option.
Some ssl_cipher:suite/1 clauses wrongly returned 3-tuples that
should have been 4 tuples
Diffstat (limited to 'lib/ssl/src/ssl.erl')
| -rw-r--r-- | lib/ssl/src/ssl.erl | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/lib/ssl/src/ssl.erl b/lib/ssl/src/ssl.erl index 780bef5877..effb9338fb 100644 --- a/lib/ssl/src/ssl.erl +++ b/lib/ssl/src/ssl.erl @@ -1089,10 +1089,7 @@ binary_cipher_suites(Version, []) -> %% Defaults to all supported suites that does %% not require explicit configuration ssl_cipher:filter_suites(ssl_cipher:suites(Version)); -binary_cipher_suites(Version, [{_,_,_,_}| _] = Ciphers0) -> %% Backwards compatibility - Ciphers = [{KeyExchange, Cipher, Hash} || {KeyExchange, Cipher, Hash, _} <- Ciphers0], - binary_cipher_suites(Version, Ciphers); -binary_cipher_suites(Version, [{_,_,_}| _] = Ciphers0) -> +binary_cipher_suites(Version, [Tuple|_] = Ciphers0) when is_tuple(Tuple) -> Ciphers = [ssl_cipher:suite(C) || C <- Ciphers0], binary_cipher_suites(Version, Ciphers); |