<% i18nGettext('I18N_OPENXPKI_CLIENT_HTML_MASON_API_ISSUER_LIST_DESCRIPTION') %>
<% i18nGettext('I18N_OPENXPKI_HTML_COMMON_NAME') %> | <% i18nGettext('I18N_OPENXPKI_CA_STATUS') %> | <% i18nGettext('I18N_OPENXPKI_CERT_NOTBEFORE') %> | <% i18nGettext('I18N_OPENXPKI_CERT_NOTAFTER') %> | <% i18nGettext('I18N_OPENXPKI_CA_CHAIN') %> |
---|---|---|---|---|
\n"; %perl> <& /lib/html/a.mhtml, 'target' => "ca_cert_info.html", 'params' => [["identifier", $list->{$ca}->{'identifier'}]], 'label' => $list->{$ca}->{CN} &> <%perl> print " | \n"; print "\n"; if ($list->{$ca}->{'status'}) { print " ".i18nGettext('I18N_OPENXPKI_CA_STATUS_USABLE')."\n"; } else { print " ".i18nGettext('I18N_OPENXPKI_CA_STATUS_UNUSABLE')."\n"; } print " | \n"; print "\n"; print " ".join (" ", split "T", $list->{$ca}->{'notbefore'})." UTC\n"; print " | \n"; print "\n"; print " ".join (" ", split "T", $list->{$ca}->{'notafter'})." UTC\n"; print " | \n"; print "\n"; %perl> <& /lib/html/a.mhtml, 'target' => "chain_list.html", 'params' => [["identifier", $list->{$ca}->{'identifier'}]], 'label' => $list->{$ca}->{CN} &> <%perl> print " | \n"; } %perl>