diff options
author | Ingela Anderton Andin <[email protected]> | 2013-01-21 10:54:53 +0100 |
---|---|---|
committer | Ingela Anderton Andin <[email protected]> | 2013-01-21 10:54:53 +0100 |
commit | e56167dd6ca8d37d26ea7f19933691a3bda41113 (patch) | |
tree | 4d2a61f890ad7041d89d1fc7884949e865d8db20 /lib/ssl/src/ssl_alert.erl | |
parent | 5456bca05c06426bb8d45de77159734a264620e1 (diff) | |
download | otp-e56167dd6ca8d37d26ea7f19933691a3bda41113.tar.gz otp-e56167dd6ca8d37d26ea7f19933691a3bda41113.tar.bz2 otp-e56167dd6ca8d37d26ea7f19933691a3bda41113.zip |
ssl: Enhance error handling
Remove filter mechanisms that made error messages backwards compatible
with old ssl but hid information about what actually happened.
This does not break the documented API however other reason
terms may be returned, so code that matches on the reason part of
{error, Reason} may fail.
Diffstat (limited to 'lib/ssl/src/ssl_alert.erl')
-rw-r--r-- | lib/ssl/src/ssl_alert.erl | 11 |
1 files changed, 3 insertions, 8 deletions
diff --git a/lib/ssl/src/ssl_alert.erl b/lib/ssl/src/ssl_alert.erl index 222b3f1ad7..f94a1136a0 100644 --- a/lib/ssl/src/ssl_alert.erl +++ b/lib/ssl/src/ssl_alert.erl @@ -1,7 +1,7 @@ %% %% %CopyrightBegin% %% -%% Copyright Ericsson AB 2007-2012. All Rights Reserved. +%% Copyright Ericsson AB 2007-2013. All Rights Reserved. %% %% The contents of this file are subject to the Erlang Public License, %% Version 1.1, (the "License"); you may not use this file except in @@ -36,8 +36,7 @@ %% Internal application API %%==================================================================== %%-------------------------------------------------------------------- --spec reason_code(#alert{}, client | server) -> closed | esslconnect | - esslaccept | string(). +-spec reason_code(#alert{}, client | server) -> closed | {essl, string()}. %% %% Description: Returns the error reason that will be returned to the %% user. @@ -45,12 +44,8 @@ reason_code(#alert{description = ?CLOSE_NOTIFY}, _) -> closed; -reason_code(#alert{description = ?HANDSHAKE_FAILURE}, client) -> - esslconnect; -reason_code(#alert{description = ?HANDSHAKE_FAILURE}, server) -> - esslaccept; reason_code(#alert{description = Description}, _) -> - description_txt(Description). + {essl, description_txt(Description)}. %%-------------------------------------------------------------------- -spec alert_txt(#alert{}) -> string(). |