mirror of
https://github.com/eworm-de/routeros-scripts.git
synced 2026-02-15 04:39:35 +00:00
check-certificates: give hint on possibly incomplete cert chain
This commit is contained in:
parent
5481787869
commit
e7a16ad279
1 changed files with 5 additions and 1 deletions
|
|
@ -123,7 +123,11 @@
|
||||||
[[ :parse (":return [ :len [ /certificate/builtin/find where skid=\"" . ($CertVal->"akid") . "\" ] ]") ]] > 0) do={
|
[[ :parse (":return [ :len [ /certificate/builtin/find where skid=\"" . ($CertVal->"akid") . "\" ] ]") ]] > 0) do={
|
||||||
:return $Return;
|
:return $Return;
|
||||||
}
|
}
|
||||||
:set CertVal [ /certificate/get [ find where skid=($CertVal->"akid") ] ];
|
:do {
|
||||||
|
:set CertVal [ /certificate/get [ find where skid=($CertVal->"akid") ] ];
|
||||||
|
} on-error={
|
||||||
|
:return ($Return . " (possibly incomplete!)");
|
||||||
|
}
|
||||||
:if (($CertVal->"akid") = "" || ($CertVal->"akid") = ($CertVal->"skid")) do={
|
:if (($CertVal->"akid") = "" || ($CertVal->"akid") = ($CertVal->"skid")) do={
|
||||||
:return $Return;
|
:return $Return;
|
||||||
}
|
}
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue