提交 2073d95f 编写于 作者: R Richard Levitte

Avoid endless loops. Really, we were using the same variable for two

different conditions...
上级 cbed917f
...@@ -8,22 +8,22 @@ $ copy/concatenate [-.certs]*.pem certs.tmp ...@@ -8,22 +8,22 @@ $ copy/concatenate [-.certs]*.pem certs.tmp
$ $
$ old_f := $ old_f :=
$ loop_certs: $ loop_certs:
$ c := NO $ verify := NO
$ more := YES
$ certs := $ certs :=
$ loop_certs2: $ loop_certs2:
$ f = f$search("[-.certs]*.pem") $ f = f$search("[-.certs]*.pem")
$ if f .nes. "" .and. f .nes. old_f $ if f .nes. "" .and. f .nes. old_f
$ then $ then
$ certs = certs + " [-.certs]" + f$parse(f,,,"NAME") + ".pem" $ certs = certs + " [-.certs]" + f$parse(f,,,"NAME") + ".pem"
$ c := YES $ verify := YES
$ if f$length(certs) .lt. 180 then goto loop_certs2 $ if f$length(certs) .lt. 180 then goto loop_certs2
$ else
$ more := NO
$ endif $ endif
$ certs = certs - " " $ certs = certs - " "
$ $
$ if c $ if verify then mcr 'exe_dir'openssl verify "-CAfile" certs.tmp 'certs'
$ then $ if more then goto loop_certs
$ mcr 'exe_dir'openssl verify "-CAfile" certs.tmp 'certs'
$ goto loop_certs
$ endif
$ $
$ delete certs.tmp;* $ delete certs.tmp;*
Markdown is supported
0% .
You are about to add 0 people to the discussion. Proceed with caution.
先完成此消息的编辑!
想要评论请 注册