mirror of
https://github.com/processone/ejabberd.git
synced 2024-06-26 22:35:31 +02:00
Ignore Length argument to tls:recv/[23] (EJAB-1327)
The Length argument cannot be used for gen_tcp:recv/3, because the compressed size does not equal the desired uncompressed one.
This commit is contained in:
parent
9da45d40c7
commit
400fb69f15
|
@ -158,8 +158,10 @@ tls_to_tcp(#tlssock{tcpsock = TCPSocket, tlsport = Port}) ->
|
||||||
recv(Socket, Length) ->
|
recv(Socket, Length) ->
|
||||||
recv(Socket, Length, infinity).
|
recv(Socket, Length, infinity).
|
||||||
recv(#tlssock{tcpsock = TCPSocket} = TLSSock,
|
recv(#tlssock{tcpsock = TCPSocket} = TLSSock,
|
||||||
Length, Timeout) ->
|
_Length, Timeout) ->
|
||||||
case gen_tcp:recv(TCPSocket, Length, Timeout) of
|
%% The Length argument cannot be used for gen_tcp:recv/3, because the
|
||||||
|
%% compressed size does not equal the desired uncompressed one.
|
||||||
|
case gen_tcp:recv(TCPSocket, 0, Timeout) of
|
||||||
{ok, Packet} ->
|
{ok, Packet} ->
|
||||||
recv_data(TLSSock, Packet);
|
recv_data(TLSSock, Packet);
|
||||||
{error, _Reason} = Error ->
|
{error, _Reason} = Error ->
|
||||||
|
|
Loading…
Reference in New Issue
Block a user