diff options
author | Erlang/OTP <[email protected]> | 2010-12-17 15:41:27 +0100 |
---|---|---|
committer | Erlang/OTP <[email protected]> | 2010-12-17 15:41:27 +0100 |
commit | dadf9c6583f68ac1738a2bd238c76b4504f7a556 (patch) | |
tree | 69403231379e7946d2e09c4dad40c7a5e19c456d /lib/ssl/src/ssl_handshake.erl | |
parent | 15daa43c1d5b953b28c998b30d39cec9ab2514b4 (diff) | |
parent | 38d3b11a9d62aa1cfe51377b426c43a5ea7f3350 (diff) | |
download | otp-dadf9c6583f68ac1738a2bd238c76b4504f7a556.tar.gz otp-dadf9c6583f68ac1738a2bd238c76b4504f7a556.tar.bz2 otp-dadf9c6583f68ac1738a2bd238c76b4504f7a556.zip |
Merge branch 'ia/ssl/session-and-cert-cache-handling/OTP-8965' into maint-r14
* ia/ssl/session-and-cert-cache-handling/OTP-8965:
Prepare for release
Cache invalidation and consistent user closing
Cache invaldation first version does not break old test cases
Diffstat (limited to 'lib/ssl/src/ssl_handshake.erl')
-rw-r--r-- | lib/ssl/src/ssl_handshake.erl | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/lib/ssl/src/ssl_handshake.erl b/lib/ssl/src/ssl_handshake.erl index c7a1c4965d..125c28b373 100644 --- a/lib/ssl/src/ssl_handshake.erl +++ b/lib/ssl/src/ssl_handshake.erl @@ -30,7 +30,7 @@ -include("ssl_internal.hrl"). -include_lib("public_key/include/public_key.hrl"). --export([master_secret/4, client_hello/5, server_hello/4, hello/4, +-export([master_secret/4, client_hello/6, server_hello/4, hello/4, hello_request/0, certify/6, certificate/3, client_certificate_verify/5, certificate_verify/5, certificate_request/2, key_exchange/2, server_key_exchange_hash/2, @@ -49,13 +49,13 @@ %%==================================================================== %%-------------------------------------------------------------------- -spec client_hello(host(), port_num(), #connection_states{}, - #ssl_options{}, boolean()) -> #client_hello{}. + #ssl_options{}, boolean(), der_cert()) -> #client_hello{}. %% %% Description: Creates a client hello message. %%-------------------------------------------------------------------- client_hello(Host, Port, ConnectionStates, #ssl_options{versions = Versions, ciphers = UserSuites} - = SslOpts, Renegotiation) -> + = SslOpts, Renegotiation, OwnCert) -> Fun = fun(Version) -> ssl_record:protocol_version(Version) @@ -65,7 +65,7 @@ client_hello(Host, Port, ConnectionStates, #ssl_options{versions = Versions, SecParams = Pending#connection_state.security_parameters, Ciphers = available_suites(UserSuites, Version), - Id = ssl_manager:client_session_id(Host, Port, SslOpts), + Id = ssl_manager:client_session_id(Host, Port, SslOpts, OwnCert), #client_hello{session_id = Id, client_version = Version, @@ -571,7 +571,7 @@ select_session(Hello, Port, Session, Version, #ssl_options{ciphers = UserSuites} = SslOpts, Cache, CacheCb, Cert) -> SuggestedSessionId = Hello#client_hello.session_id, SessionId = ssl_manager:server_session_id(Port, SuggestedSessionId, - SslOpts), + SslOpts, Cert), Suites = available_suites(Cert, UserSuites, Version), case ssl_session:is_new(SuggestedSessionId, SessionId) of |