diff options
Diffstat (limited to '')
| -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;* |
