From: Richard Levitte Date: Mon, 21 Mar 2005 13:52:12 +0000 (+0000) Subject: There are cases when there are no files left to verify. Make sure to X-Git-Tag: OpenSSL_0_9_7g~17^2~21 X-Git-Url: https://git.librecmc.org/?a=commitdiff_plain;h=9fc9b55237d3f8abb0f0efb2bf26bc58bcd234bb;p=oweals%2Fopenssl.git There are cases when there are no files left to verify. Make sure to handle that properly. --- diff --git a/test/tverify.com b/test/tverify.com index f97e71478f..2060184d1e 100644 --- a/test/tverify.com +++ b/test/tverify.com @@ -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;*