jjakke/keyserver
jjakke/keyserver
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

update template to handle signature class a bit better

Browse source
This commit is contained in:
jake 2024-11-11 13:20:19 -05:00
parent 02be71f30c
commit 00772f526a
1 changed files with 21 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

23
templates/pkslookup.html.ep
View file

@ -9,6 +9,17 @@
% my @row = split /\n/, $item; % my @row = split /\n/, $item;
<pre class="blob"> <pre class="blob">
<% <%
my %sigcls = (
'10x' => 'self sig',
'11x' => 'self sig',
'12x' => 'self sig',
'13x' => 'self sig',
'18x' => 'subkey bind',
'19x' => 'primary key bind',
'20x' => 'revocation sig',
'28x' => 'subkey revocation sig',
'30x' => 'cert revocation sig',
)
for my $row (@row) { for my $row (@row) {
my @data = split /:/, $row; my @data = split /:/, $row;
my $record = $data[0]; my $record = $data[0];
@ -45,13 +56,21 @@
$string .= "\n<strong>$safe</strong>\n" if $safe; $string .= "\n<strong>$safe</strong>\n" if $safe;
} }
elsif ($record eq 'sig') { elsif ($record eq 'sig') {
$string .= "signature: $keyid | <span class=\"date\">" . gmtime($create) . " -> ". ( $expire ? gmtime($expire) : 'n/a' ) . "</span> | $signatureclass\n"; $string .= "signature: $keyid | <span class=\"date\">" . gmtime($create) . " -> ". ( $expire ? gmtime($expire) : 'n/a' ) . "</span> | ";
(exists $sigcls{$signatureclass})
? ($string .= $sigcls{$signatureclass})
: ($string .= $signatureclass);
$string .= "\n";
} }
elsif ($record eq 'sub') { elsif ($record eq 'sub') {
$string .= "\nsub key: " . gmtime($create) . " -> " . ( $expire ? gmtime($expire) : 'n/a' ) . " | flags: $flag\n" $string .= "\nsub key: " . gmtime($create) . " -> " . ( $expire ? gmtime($expire) : 'n/a' ) . " | flags: $flag\n"
} }
elsif ($record eq 'rev') { elsif ($record eq 'rev') {
$string .= "<span class=\"highlight\">revocation: $keyid </span>| <span class=\"date\">" . gmtime($create) . "</span> | $signatureclass \n"; $string .= "<span class=\"highlight\">revocation: $keyid </span>| <span class=\"date\">" . gmtime($create) . "</span> | "
(exists $sigcls{$signatureclass})
? ($string .= $sigcls{$signatureclass})
: ($string .= $signatureclass);
$string .= "\n";
} }
} }
%> %>