summaryrefslogtreecommitdiff
path: root/src/lib/libssl/test/tverify.com
diff options
context:
space:
mode:
Diffstat (limited to 'src/lib/libssl/test/tverify.com')
-rw-r--r--src/lib/libssl/test/tverify.com14
1 files changed, 7 insertions, 7 deletions
diff --git a/src/lib/libssl/test/tverify.com b/src/lib/libssl/test/tverify.com
index 2060184d1e..021d701d79 100644
--- a/src/lib/libssl/test/tverify.com
+++ b/src/lib/libssl/test/tverify.com
@@ -8,22 +8,22 @@ $ copy/concatenate [-.certs]*.pem certs.tmp
8$ 8$
9$ old_f := 9$ old_f :=
10$ loop_certs: 10$ loop_certs:
11$ c := NO 11$ verify := NO
12$ more := YES
12$ certs := 13$ certs :=
13$ loop_certs2: 14$ loop_certs2:
14$ f = f$search("[-.certs]*.pem") 15$ f = f$search("[-.certs]*.pem")
15$ if f .nes. "" .and. f .nes. old_f 16$ if f .nes. "" .and. f .nes. old_f
16$ then 17$ then
17$ certs = certs + " [-.certs]" + f$parse(f,,,"NAME") + ".pem" 18$ certs = certs + " [-.certs]" + f$parse(f,,,"NAME") + ".pem"
18$ c := YES 19$ verify := YES
19$ if f$length(certs) .lt. 180 then goto loop_certs2 20$ if f$length(certs) .lt. 180 then goto loop_certs2
21$ else
22$ more := NO
20$ endif 23$ endif
21$ certs = certs - " " 24$ certs = certs - " "
22$ 25$
23$ if c 26$ if verify then mcr 'exe_dir'openssl verify "-CAfile" certs.tmp 'certs'
24$ then 27$ if more then goto loop_certs
25$ mcr 'exe_dir'openssl verify "-CAfile" certs.tmp 'certs'
26$ goto loop_certs
27$ endif
28$ 28$
29$ delete certs.tmp;* 29$ delete certs.tmp;*