diff options
author | Ingela Anderton Andin <[email protected]> | 2013-11-18 16:07:24 +0100 |
---|---|---|
committer | Ingela Anderton Andin <[email protected]> | 2013-12-02 09:50:27 +0100 |
commit | c46f856dda536d92537461115112b2021c08b52a (patch) | |
tree | a70f07fadd642b1afbef3195d4b222723217427a /lib/ssl | |
parent | bae8fb577c0c3d2f5a3db31a34e584c8d7ccab6e (diff) | |
download | otp-c46f856dda536d92537461115112b2021c08b52a.tar.gz otp-c46f856dda536d92537461115112b2021c08b52a.tar.bz2 otp-c46f856dda536d92537461115112b2021c08b52a.zip |
ssl: Dialyzer fixes
Diffstat (limited to 'lib/ssl')
-rw-r--r-- | lib/ssl/src/ssl_internal.hrl | 10 | ||||
-rw-r--r-- | lib/ssl/src/tls_connection.erl | 7 |
2 files changed, 5 insertions, 12 deletions
diff --git a/lib/ssl/src/ssl_internal.hrl b/lib/ssl/src/ssl_internal.hrl index 8e5662db31..0186f9fca2 100644 --- a/lib/ssl/src/ssl_internal.hrl +++ b/lib/ssl/src/ssl_internal.hrl @@ -82,15 +82,15 @@ %% fun(Extensions, State, Verify, AccError) -> {Extensions, State, AccError} validate_extensions_fun, depth :: integer(), - certfile :: string(), + certfile :: binary(), cert :: der_encoded(), - keyfile :: string(), - key :: der_encoded(), + keyfile :: binary(), + key :: {'RSAPrivateKey' | 'DSAPrivateKey' | 'ECPrivateKey' | 'PrivateKeyInfo', der_encoded()}, password :: string(), cacerts :: [der_encoded()], - cacertfile :: string(), + cacertfile :: binary(), dh :: der_encoded(), - dhfile :: string(), + dhfile :: binary(), user_lookup_fun, % server option, fun to lookup the user psk_identity :: binary(), srp_identity, % client option {User, Password} diff --git a/lib/ssl/src/tls_connection.erl b/lib/ssl/src/tls_connection.erl index e4201504c0..c8380c109c 100644 --- a/lib/ssl/src/tls_connection.erl +++ b/lib/ssl/src/tls_connection.erl @@ -877,13 +877,6 @@ init_private_key(DbHandle, undefined, KeyFile, Password, _) -> file_error(KeyFile, {keyfile, Reason}) end; -%% First two clauses are for backwards compatibility -init_private_key(_,{rsa, PrivateKey}, _, _,_) -> - init_private_key('RSAPrivateKey', PrivateKey); -init_private_key(_,{dsa, PrivateKey},_,_,_) -> - init_private_key('DSAPrivateKey', PrivateKey); -init_private_key(_,{ec, PrivateKey},_,_,_) -> - init_private_key('ECPrivateKey', PrivateKey); init_private_key(_,{Asn1Type, PrivateKey},_,_,_) -> private_key(init_private_key(Asn1Type, PrivateKey)). |