diff options
| author | Hans Nilsson <[email protected]> | 2015-08-20 14:40:39 +0200 |
|---|---|---|
| committer | Hans Nilsson <[email protected]> | 2015-08-25 15:40:13 +0200 |
| commit | 2564e317e34fe7f928bf6e234998b295848a5c91 (patch) | |
| tree | 84238b065c7e993633b6383561d3ffd602d49242 /lib/ssh/src/ssh.erl | |
| parent | a93087eafd98bf60b9611c807d0074d304e93383 (diff) | |
| download | otp-2564e317e34fe7f928bf6e234998b295848a5c91.tar.gz otp-2564e317e34fe7f928bf6e234998b295848a5c91.tar.bz2 otp-2564e317e34fe7f928bf6e234998b295848a5c91.zip | |
ssh: add extra random length padding in packets
A new experimental option 'max_random_length_padding', not documented so it might change...
Diffstat (limited to 'lib/ssh/src/ssh.erl')
| -rw-r--r-- | lib/ssh/src/ssh.erl | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/lib/ssh/src/ssh.erl b/lib/ssh/src/ssh.erl index 5b2e0a988c..132de71aed 100644 --- a/lib/ssh/src/ssh.erl +++ b/lib/ssh/src/ssh.erl @@ -397,6 +397,8 @@ handle_option([{id_string, _ID} = Opt|Rest], SocketOptions, SshOptions) -> handle_option(Rest, SocketOptions, [handle_ssh_option(Opt) | SshOptions]); handle_option([{profile, _ID} = Opt|Rest], SocketOptions, SshOptions) -> handle_option(Rest, SocketOptions, [handle_ssh_option(Opt) | SshOptions]); +handle_option([{max_random_length_padding, _Bool} = Opt|Rest], SocketOptions, SshOptions) -> + handle_option(Rest, SocketOptions, [handle_ssh_option(Opt) | SshOptions]); handle_option([Opt | Rest], SocketOptions, SshOptions) -> handle_option(Rest, [handle_inet_option(Opt) | SocketOptions], SshOptions). @@ -515,6 +517,9 @@ handle_ssh_option({id_string, random}) -> {id_string, {random,2,5}}; %% 2 - 5 random characters handle_ssh_option({id_string, ID} = Opt) when is_list(ID) -> Opt; +handle_ssh_option({max_random_length_padding, Value} = Opt) when is_integer(Value), + Value =< 255 -> + Opt; handle_ssh_option({profile, Value} = Opt) when is_atom(Value) -> Opt; handle_ssh_option(Opt) -> |