diff options
Diffstat (limited to 'src/lib/libssl/test/tverify.com')
-rw-r--r-- | src/lib/libssl/test/tverify.com | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/src/lib/libssl/test/tverify.com b/src/lib/libssl/test/tverify.com index f97e71478f..2060184d1e 100644 --- a/src/lib/libssl/test/tverify.com +++ b/src/lib/libssl/test/tverify.com | |||
@@ -15,12 +15,15 @@ $ f = f$search("[-.certs]*.pem") | |||
15 | $ if f .nes. "" .and. f .nes. old_f | 15 | $ if f .nes. "" .and. f .nes. old_f |
16 | $ then | 16 | $ then |
17 | $ certs = certs + " [-.certs]" + f$parse(f,,,"NAME") + ".pem" | 17 | $ certs = certs + " [-.certs]" + f$parse(f,,,"NAME") + ".pem" |
18 | $ if f$length(certs) .lt. 180 then goto loop_certs2 | ||
19 | $ c := YES | 18 | $ c := YES |
19 | $ if f$length(certs) .lt. 180 then goto loop_certs2 | ||
20 | $ endif | 20 | $ endif |
21 | $ certs = certs - " " | 21 | $ certs = certs - " " |
22 | $ | 22 | $ |
23 | $ mcr 'exe_dir'openssl verify "-CAfile" certs.tmp 'certs' | 23 | $ if c |
24 | $ if c then goto loop_certs | 24 | $ then |
25 | $ mcr 'exe_dir'openssl verify "-CAfile" certs.tmp 'certs' | ||
26 | $ goto loop_certs | ||
27 | $ endif | ||
25 | $ | 28 | $ |
26 | $ delete certs.tmp;* | 29 | $ delete certs.tmp;* |