aboutsummaryrefslogtreecommitdiffstats
path: root/lib/ssl/test/make_certs.erl
diff options
context:
space:
mode:
authorPéter Dimitrov <[email protected]>2019-01-10 16:39:52 +0100
committerPéter Dimitrov <[email protected]>2019-01-10 16:39:52 +0100
commit4dcc43c786f790f0f2a32b268160d32499e46932 (patch)
tree8b51968e83a1db132b958566f9ff8b87df530a2a /lib/ssl/test/make_certs.erl
parent27092854c046a9094ec5801b2e2179af4420272b (diff)
parent82602f666daa29717ab936014a9ec1ffa3047813 (diff)
downloadotp-4dcc43c786f790f0f2a32b268160d32499e46932.tar.gz
otp-4dcc43c786f790f0f2a32b268160d32499e46932.tar.bz2
otp-4dcc43c786f790f0f2a32b268160d32499e46932.zip
Merge branch 'maint'
* maint: ssl: Fix CRL suite with openssl-1.1.1a Change-Id: I18ffe894158e8881af20bba6f6a60b85063b937c
Diffstat (limited to 'lib/ssl/test/make_certs.erl')
-rw-r--r--lib/ssl/test/make_certs.erl12
1 files changed, 12 insertions, 0 deletions
diff --git a/lib/ssl/test/make_certs.erl b/lib/ssl/test/make_certs.erl
index 578f6a731a..76bf0fa895 100644
--- a/lib/ssl/test/make_certs.erl
+++ b/lib/ssl/test/make_certs.erl
@@ -189,6 +189,18 @@ gencrl(Root, CA, C, CrlHours) ->
Env = [{"ROOTDIR", filename:absname(Root)}],
cmd(Cmd, Env).
+%% This function sets the number of seconds until the next CRL is due.
+gencrl_sec(Root, CA, C, CrlSecs) ->
+ CACnfFile = filename:join([Root, CA, "ca.cnf"]),
+ CACRLFile = filename:join([Root, CA, "crl.pem"]),
+ Cmd = [C#config.openssl_cmd, " ca"
+ " -gencrl ",
+ " -crlsec ", integer_to_list(CrlSecs),
+ " -out ", CACRLFile,
+ " -config ", CACnfFile],
+ Env = [{"ROOTDIR", filename:absname(Root)}],
+ cmd(Cmd, Env).
+
can_generate_expired_crls(C) ->
%% OpenSSL can generate CRLs with an expiration date in the past,
%% if we pass a negative number for -crlhours. However, LibreSSL