diff options
| author | Ingela Anderton Andin <[email protected]> | 2013-05-16 12:20:36 +0200 |
|---|---|---|
| committer | Ingela Anderton Andin <[email protected]> | 2013-05-20 08:41:52 +0200 |
| commit | f706e003a2f6cb3f1f31b9d1294b379c2ab3affe (patch) | |
| tree | 4e51c75e9a1c4615cbfc8864b3171621d25539f7 /lib/ssh/src/ssh_bits.erl | |
| parent | b7c3c6f3548b77edd3e43bf5e9dde3e94111960a (diff) | |
| download | otp-f706e003a2f6cb3f1f31b9d1294b379c2ab3affe.tar.gz otp-f706e003a2f6cb3f1f31b9d1294b379c2ab3affe.tar.bz2 otp-f706e003a2f6cb3f1f31b9d1294b379c2ab3affe.zip | |
ssh & crypto: Remove use of deprecated crypto functions from ssh
Diffstat (limited to 'lib/ssh/src/ssh_bits.erl')
| -rw-r--r-- | lib/ssh/src/ssh_bits.erl | 27 |
1 files changed, 1 insertions, 26 deletions
diff --git a/lib/ssh/src/ssh_bits.erl b/lib/ssh/src/ssh_bits.erl index 5841f06d70..fc6efc817f 100644 --- a/lib/ssh/src/ssh_bits.erl +++ b/lib/ssh/src/ssh_bits.erl @@ -1,7 +1,7 @@ %% %% %CopyrightBegin% %% -%% Copyright Ericsson AB 2005-2012. All Rights Reserved. +%% Copyright Ericsson AB 2005-2013. All Rights Reserved. %% %% The contents of this file are subject to the Erlang Public License, %% Version 1.1, (the "License"); you may not use this file except in @@ -33,7 +33,6 @@ %% integer utils -export([isize/1]). --export([irandom/1, irandom/3]). -export([random/1]). -export([xor_bits/2, fill_bits/2]). -export([i2bin/2, bin2i/1]). @@ -387,31 +386,7 @@ xor_bits(XBits, YBits) -> <<Y:Sz, _/binary>> = YBits, <<(X bxor Y):Sz>>. -%% -%% irandom(N) -%% -%% Generate a N bits size random number -%% note that the top most bit is always set -%% to guarantee that the number is N bits -%% -irandom(Bits) -> - irandom(Bits, 1, 0). - -%% -%% irandom(N, Top, Bottom) -%% -%% Generate a N bits size random number -%% Where Top = 0 - do not set top bit -%% = 1 - set the most significant bit -%% = 2 - set two most significant bits -%% Bot = 0 - do not set the least signifcant bit -%% Bot = 1 - set the least signifcant bit (i.e always odd) -%% -irandom(Bits, Top, Bottom) when is_integer(Top), - 0 =< Top, Top =< 2 -> - crypto:erlint(crypto:strong_rand_mpint(Bits, Top - 1, Bottom)). -%% %% random/1 %% Generate N random bytes %% |