mirror of
https://github.com/eworm-de/routeros-scripts
synced 2024-05-14 08:04:19 +00:00
check-certificates: prevent infinte loop
This commit is contained in:
parent
3df99b0ee0
commit
a08df7bdec
1 changed files with 2 additions and 1 deletions
|
@ -95,7 +95,7 @@
|
|||
:local CertVal [ /certificate/get $Cert ];
|
||||
:local Return "";
|
||||
|
||||
:while (true) do={
|
||||
:for I from=0 to=3 do={
|
||||
:set Return ($Return . [ $ParseKeyValueStore ($CertVal->"issuer") ]->"CN");
|
||||
:if (($CertVal->"akid") = "" || ($CertVal->"akid") = ($CertVal->"skid")) do={
|
||||
:return $Return;
|
||||
|
@ -103,6 +103,7 @@
|
|||
:set Return ($Return . " -> ");
|
||||
:set CertVal [ /certificate/get [ find where skid=($CertVal->"akid") ] ];
|
||||
}
|
||||
:return ($Return . "...");
|
||||
}
|
||||
|
||||
:local CertVal [ /certificate/get $Cert ];
|
||||
|
|
Loading…
Reference in a new issue