From 6bb510d99e4ad29dbf85b4ffec9d1d8c6516b4ba Mon Sep 17 00:00:00 2001 From: Alexey Shchepin Date: Fri, 13 Jan 2006 01:55:20 +0000 Subject: * src/ejabberd_service.erl: Bugfix * src/ejabberd_receiver.erl: Rewritten to use {active, once} mode for socket * src/ejabberd_c2s.erl: Update * src/ejabberd_listener.erl: Likewise * src/ejabberd_s2s_in.erl: Likewise * src/ejabberd_s2s_out.erl: Likewise * src/ejabberd_service.erl: Likewise * src/shaper.erl: Likewise * src/tls/tls.erl: Likewise * src/web/ejabberd_http.erl: Likewise SVN Revision: 483 --- src/tls/tls.erl | 8 ++++++++ 1 file changed, 8 insertions(+) (limited to 'src/tls') diff --git a/src/tls/tls.erl b/src/tls/tls.erl index 7290160e1..7c7d07bad 100644 --- a/src/tls/tls.erl +++ b/src/tls/tls.erl @@ -16,6 +16,8 @@ tcp_to_tls/2, tls_to_tcp/1, send/2, recv/2, recv/3, recv_data/2, + setopts/2, + controlling_process/2, close/1, get_peer_certificate/1, get_verify_result/1, @@ -175,6 +177,12 @@ send(#tlssock{tcpsock = TCPSocket, tlsport = Port}, Packet) -> end. +setopts(#tlssock{tcpsock = TCPSocket}, Opts) -> + inet:setopts(TCPSocket, Opts). + +controlling_process(#tlssock{tcpsock = TCPSocket}, Pid) -> + gen_tcp:controlling_process(TCPSocket, Pid). + close(#tlssock{tcpsock = TCPSocket, tlsport = Port}) -> gen_tcp:close(TCPSocket), port_close(Port). -- cgit v1.2.3