%args> $email => undef $subject => undef $issuer => undef $cert_serial => undef $csr_serial => undef $last => undef $first => undef %args>
<% i18nGettext('I18N_OPENXPKI_CLIENT_HTML_MASON_API_CERT_LIST_DESCRIPTION') %>
<% i18nGettext('I18N_OPENXPKI_CERT_SERIAL') %> | <% i18nGettext('I18N_OPENXPKI_CERT_SUBJECT') %> | <% i18nGettext('I18N_OPENXPKI_CERT_EMAIL') %> | <% i18nGettext('I18N_OPENXPKI_CERT_NOTBEFORE') %> | <% i18nGettext('I18N_OPENXPKI_CERT_NOTAFTER') %> | <% i18nGettext('I18N_OPENXPKI_CERT_ISSUER') %> |
---|---|---|---|---|---|
\n"; %perl> <& /lib/html/a.mhtml, 'target' => "cert_info.html", 'params' => [["identifier", $list{$serial}->{IDENTIFIER}]], 'label' => $serial &> <%perl> print " | \n"; print "\n"; print " ".$list{$serial}->{SUBJECT}."\n"; print " | \n"; print "\n"; print " ".$list{$serial}->{EMAIL}."\n"; print " | \n"; print "\n"; print " ".join (" ", split "T", $list{$serial}->{NOTBEFORE})." UTC\n"; print " | \n"; print "\n"; print " ".join (" ", split "T", $list{$serial}->{NOTAFTER})." UTC\n"; print " | \n"; print "\n"; print " ".$list{$serial}->{ISSUER}."\n"; print " | \n"; } %perl>
<& /lib/html/a.mhtml, 'target' => "cert_list.html", 'params' => [["email" => $email], ["subject" => $subject], ["issuer" => $issuer], ["cert_serial" => $cert_serial], ["csr_serial" => $csr_serial], ["last" => $first]], 'label' => '<== '.i18nGettext('I18N_OPENXPKI_LIST_PREV') &> | <& /lib/html/a.mhtml, 'target' => "cert_list.html", 'params' => [["email" => $email], ["subject" => $subject], ["issuer" => $issuer], ["cert_serial" => $cert_serial], ["csr_serial" => $csr_serial], ["first" => $last]], 'label' => i18nGettext('I18N_OPENXPKI_LIST_NEXT').' ==>' &> |