print "</form>\n";
-&Header::openbox('100%', 'left', $Lang::tr{'ssh host keys'});
+&Header::openbox('100%', 'center', $Lang::tr{'ssh host keys'});
-print "<table>\n";
+print "<table class='tbl'>\n";
print <<END
-<tr><td class='boldbase'><b>$Lang::tr{'ssh key'}</b></td>
- <td class='boldbase'><b>$Lang::tr{'ssh fingerprint'}</b></td>
- <td class='boldbase'><b>$Lang::tr{'ssh key size'}</b></td></tr>
+<thead>
+ <tr>
+ <th align="center"><strong>$Lang::tr{'ssh key'}</strong></th>
+ <th align="center"><strong>$Lang::tr{'type'}</strong></th>
+ <th align="center"><strong>$Lang::tr{'ssh fingerprint'}</strong></th>
+ <th align="center"><strong>$Lang::tr{'ssh key size'}</strong></th>
+ </tr>
+</thead>
+<tbody>
END
;
&viewkey("/etc/ssh/ssh_host_ecdsa_key.pub","ECDSA");
&viewkey("/etc/ssh/ssh_host_ed25519_key.pub","ED25519");
-print "</table>\n";
+print "</tbody>\n</table>\n";
&Header::closebox();
-&Header::openbox('100%', 'center', $Lang::tr{'ssh active sesstions'});
+&Header::openbox('100%', 'center', $Lang::tr{'ssh active sessions'});
print <<END;
<table class="tbl" width='66%'>
my @temp = split(/ /,`/usr/bin/ssh-keygen -l -f $key`);
my $keysize = &Header::cleanhtml($temp[0],"y");
my $fingerprint = &Header::cleanhtml($temp[1],"y");
- print "<tr><td>$key ($name)</td><td><code>$fingerprint</code></td><td align='center'>$keysize</td></tr>\n";
+ print "<tr><td><code>$key</code></td><td align='center'>$name</td><td><code>$fingerprint</code></td><td align='center'>$keysize</td></tr>\n";
}
}
<tr bgcolor='$table_colour'>
<td>$username</td>
<td>$logintime</td>
- <td>$remoteip</td>
+ <td align='center'><a href='ipinfo.cgi?ip=$remoteip'>$remoteip</a></td>
<td align='center'><a href='country.cgi#$ccode'><img src='$flag_icon' border='0' alt='$ccode' title='$ccode' /></a></td>
<td>$rdns</td>
</tr>