generic-library/openssl
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

There are cases when there are no files left to verify. Make sure to

Browse Source 
handle that properly.
This commit is contained in:
Richard Levitte
2005-03-21 13:49:09 +00:00
parent 6d2a7098d6
commit ab0def8152
1 changed files with 6 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
test/tverify.com
View File

@@ -15,12 +15,15 @@ $ f = f$search("[-.certs]*.pem")
$ if f .nes. "" .and. f .nes. old_f
$ then
$ certs = certs + " [-.certs]" + f$parse(f,,,"NAME") + ".pem"
$ if f$length(certs) .lt. 180 then goto loop_certs2
$ c := YES
$ if f$length(certs) .lt. 180 then goto loop_certs2
$ endif
$ certs = certs - " "
$
$ mcr 'exe_dir'openssl verify "-CAfile" certs.tmp 'certs'
$ if c then goto loop_certs
$ if c
$ then
$ mcr 'exe_dir'openssl verify "-CAfile" certs.tmp 'certs'
$ goto loop_certs
$ endif
$
$ delete certs.tmp;*