diff options
| author | Ingela Anderton Andin <[email protected]> | 2016-04-22 10:21:08 +0200 |
|---|---|---|
| committer | Ingela Anderton Andin <[email protected]> | 2016-04-25 11:42:05 +0200 |
| commit | e0cbc54261fb72668c48d89f69cab5d323c7f72f (patch) | |
| tree | fd78442c391c11f49fe737cca3a90e52fa480931 | |
| parent | af05855ddc48ae72bb2cfd82ab3fd3ab45238135 (diff) | |
| download | otp-e0cbc54261fb72668c48d89f69cab5d323c7f72f.tar.gz otp-e0cbc54261fb72668c48d89f69cab5d323c7f72f.tar.bz2 otp-e0cbc54261fb72668c48d89f69cab5d323c7f72f.zip | |
compiler: Remove use of crypto:rand_bytes/1
Use case in compile.erl is cryptographical so use
crypto:strong_rand_bytes/1 instead.
Use case in test suite is not cryptographical so use
other test instead.
| -rw-r--r-- | lib/compiler/src/compile.erl | 2 | ||||
| -rw-r--r-- | lib/compiler/test/compile_SUITE.erl | 1 |
2 files changed, 1 insertions, 2 deletions
diff --git a/lib/compiler/src/compile.erl b/lib/compiler/src/compile.erl index daf6521236..149086152a 100644 --- a/lib/compiler/src/compile.erl +++ b/lib/compiler/src/compile.erl @@ -1317,7 +1317,7 @@ generate_key(String) when is_list(String) -> encrypt({des3_cbc=Type,Key,IVec,BlockSize}, Bin0) -> Bin1 = case byte_size(Bin0) rem BlockSize of 0 -> Bin0; - N -> list_to_binary([Bin0,crypto:rand_bytes(BlockSize-N)]) + N -> list_to_binary([Bin0,crypto:strong_rand_bytes(BlockSize-N)]) end, Bin = crypto:block_encrypt(Type, Key, IVec, Bin1), TypeString = atom_to_list(Type), diff --git a/lib/compiler/test/compile_SUITE.erl b/lib/compiler/test/compile_SUITE.erl index 72e88370b6..f55ea9a3a6 100644 --- a/lib/compiler/test/compile_SUITE.erl +++ b/lib/compiler/test/compile_SUITE.erl @@ -546,7 +546,6 @@ verify_abstract(Target) -> has_crypto() -> try crypto:start(), - <<_,_,_,_,_>> = crypto:rand_bytes(5), crypto:stop(), true catch |