diff options
author | djm <> | 2005-04-29 05:37:32 +0000 |
---|---|---|
committer | djm <> | 2005-04-29 05:37:32 +0000 |
commit | 588543a0946f1dbf0f1dd5135f8f6447486dc183 (patch) | |
tree | f74e14f98abfec33221f0f2e15cc88a34a3df7e5 /src/lib/libssl/test/tverify.com | |
parent | 00b426069b0dfa8f0d9b87308646e9684f45c515 (diff) | |
download | openbsd-588543a0946f1dbf0f1dd5135f8f6447486dc183.tar.gz openbsd-588543a0946f1dbf0f1dd5135f8f6447486dc183.tar.bz2 openbsd-588543a0946f1dbf0f1dd5135f8f6447486dc183.zip |
import of openssl-0.9.7g; tested on platforms from alpha to zaurus, ok deraadt@
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;* |