From 360d30bf2adf91542b041489a5b71ac33daa1ac9 Mon Sep 17 00:00:00 2001 From: Christian Hesse Date: Thu, 2 May 2019 11:12:44 +0200 Subject: check-certificates: give issuer info on locally issued certificates Certificates issued locally do not have an 'issuer' property, but a 'ca' one. Looks like either of both is filled, so just concatenate. --- check-certificates | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'check-certificates') diff --git a/check-certificates b/check-certificates index 9dd9acb..0d0ea55 100644 --- a/check-certificates +++ b/check-certificates @@ -98,6 +98,7 @@ :local CertName [ / certificate get $Cert name ]; :local CommonName [ / certificate get $Cert common-name ]; :local FingerPrint [ / certificate get $Cert fingerprint ]; + :local Ca [ / certificate get $Cert ca ]; :local Issuer [ $GetIssuerCN [ / certificate get $Cert issuer ] ]; :local InvalidBefore [ / certificate get $Cert invalid-before ]; :local InvalidAfter [ / certificate get $Cert invalid-after ]; @@ -114,7 +115,7 @@ "Name: " . $CertName . "\n" . \ "CommonName: " . $CommonName . "\n" . \ "Fingerprint: " . $FingerPrint . "\n" . \ - "Issuer: " . $Issuer . "\n" . \ + "Issuer: " . $Ca . $Issuer . "\n" . \ "Validity: " . $InvalidBefore . " to " . $InvalidAfter . "\n" . \ "Expires in: " . $ExpiresAfter); :log warning ("The certificate " . $CertName . " " . $State . \ -- cgit v1.2.3-70-g09d2