summaryrefslogtreecommitdiffstats
path: root/src/erl_make_certs.erl
diff options
context:
space:
mode:
Diffstat (limited to 'src/erl_make_certs.erl')
-rw-r--r--src/erl_make_certs.erl5
1 files changed, 3 insertions, 2 deletions
diff --git a/src/erl_make_certs.erl b/src/erl_make_certs.erl
index 8212ef7..dfa9955 100644
--- a/src/erl_make_certs.erl
+++ b/src/erl_make_certs.erl
@@ -178,7 +178,7 @@ make_tbs(SubjectKey, Opts) ->
subject(proplists:get_value(subject, Opts),false)
end,
- {#'OTPTBSCertificate'{serialNumber = trunc(random:uniform()*100000000)*10000 + 1,
+ {#'OTPTBSCertificate'{serialNumber = trunc(rand:uniform()*100000000)*10000 + 1,
signature = SignAlgo,
issuer = Issuer,
validity = validity(Opts),
@@ -455,7 +455,8 @@ odd_rand(Size) ->
odd_rand(Min, Max).
odd_rand(Min,Max) ->
- Rand = crypto:rand_uniform(Min,Max),
+ Delta = Max - Min,
+ Rand = Min + trunc(rand:uniform() * Delta),
case Rand rem 2 of
0 ->
Rand + 1;