aboutsummaryrefslogtreecommitdiffstats
path: root/lib/ssl/src/ssl_connection.erl
diff options
context:
space:
mode:
authorRaimo Niskanen <[email protected]>2017-10-13 15:46:20 +0200
committerRaimo Niskanen <[email protected]>2017-12-04 13:56:30 +0100
commit057155088f14e111791489a50d25de67065b16ba (patch)
treef265e4f25feeb985a5621d47ba8254082473ba8a /lib/ssl/src/ssl_connection.erl
parent1b3a894b6ef2f62974228f5904ff7fe469a4926a (diff)
downloadotp-057155088f14e111791489a50d25de67065b16ba.tar.gz
otp-057155088f14e111791489a50d25de67065b16ba.tar.bz2
otp-057155088f14e111791489a50d25de67065b16ba.zip
Handle whitebox test message
Diffstat (limited to 'lib/ssl/src/ssl_connection.erl')
-rw-r--r--lib/ssl/src/ssl_connection.erl14
1 files changed, 14 insertions, 0 deletions
diff --git a/lib/ssl/src/ssl_connection.erl b/lib/ssl/src/ssl_connection.erl
index b1efcbb857..ef64388361 100644
--- a/lib/ssl/src/ssl_connection.erl
+++ b/lib/ssl/src/ssl_connection.erl
@@ -1034,6 +1034,20 @@ connection(
death_row(State, Reason)
end;
connection(
+ info, {send, From, Ref, Data},
+ #state{
+ ssl_options = #ssl_options{erl_dist = true},
+ protocol_specific = #{d_handle := _}},
+ _) ->
+ %% This is for testing only!
+ %%
+ %% Needed by some OTP distribution
+ %% test suites...
+ From ! {Ref, ok},
+ {keep_state_and_data,
+ [{next_event, {call, {self(), undefined}},
+ {application_data, iolist_to_binary(Data)}}]};
+connection(
info, tick = Msg,
#state{
ssl_options = #ssl_options{erl_dist = true},