diff options
author | Ingela Andin <[email protected]> | 2017-06-12 10:47:10 +0200 |
---|---|---|
committer | GitHub <[email protected]> | 2017-06-12 10:47:10 +0200 |
commit | 101ca33f75bc5cc0a456d5be7663d9d21ab6d156 (patch) | |
tree | 37caee68c927835c23d98beeefdd7e7e01568a9c /lib/ssl/src/ssl.erl | |
parent | c1d2968701ef330bb38771185a86e8ec3676c091 (diff) | |
parent | 14c3c0c869ff77473d9f5516fb6b2054dc64ced3 (diff) | |
download | otp-101ca33f75bc5cc0a456d5be7663d9d21ab6d156.tar.gz otp-101ca33f75bc5cc0a456d5be7663d9d21ab6d156.tar.bz2 otp-101ca33f75bc5cc0a456d5be7663d9d21ab6d156.zip |
Merge pull request #1485 from IngelaAndin/ingela/dtls/get-and-setopts
dtls: Handle getopts and setopts for DTLS
Diffstat (limited to 'lib/ssl/src/ssl.erl')
-rw-r--r-- | lib/ssl/src/ssl.erl | 12 |
1 files changed, 11 insertions, 1 deletions
diff --git a/lib/ssl/src/ssl.erl b/lib/ssl/src/ssl.erl index 5421bdef99..75eb308ba5 100644 --- a/lib/ssl/src/ssl.erl +++ b/lib/ssl/src/ssl.erl @@ -427,6 +427,16 @@ eccs_filter_supported(Curves) -> %%-------------------------------------------------------------------- getopts(#sslsocket{pid = Pid}, OptionTags) when is_pid(Pid), is_list(OptionTags) -> ssl_connection:get_opts(Pid, OptionTags); +getopts(#sslsocket{pid = {udp, #config{transport_info = {Transport,_,_,_}}}} = ListenSocket, OptionTags) when is_list(OptionTags) -> + try dtls_socket:getopts(Transport, ListenSocket, OptionTags) of + {ok, _} = Result -> + Result; + {error, InetError} -> + {error, {options, {socket_options, OptionTags, InetError}}} + catch + _:Error -> + {error, {options, {socket_options, OptionTags, Error}}} + end; getopts(#sslsocket{pid = {_, #config{transport_info = {Transport,_,_,_}}}} = ListenSocket, OptionTags) when is_list(OptionTags) -> try tls_socket:getopts(Transport, ListenSocket, OptionTags) of @@ -455,7 +465,7 @@ setopts(#sslsocket{pid = Pid}, Options0) when is_pid(Pid), is_list(Options0) -> _:_ -> {error, {options, {not_a_proplist, Options0}}} end; -setopts(#sslsocket{pid = {{udp, _}, #config{transport_info = {Transport,_,_,_}}}} = ListenSocket, Options) when is_list(Options) -> +setopts(#sslsocket{pid = {udp, #config{transport_info = {Transport,_,_,_}}}} = ListenSocket, Options) when is_list(Options) -> try dtls_socket:setopts(Transport, ListenSocket, Options) of ok -> ok; |