diff options
Diffstat (limited to 'openssl-html.lsp')
| -rw-r--r-- | openssl-html.lsp | 29 |
1 files changed, 27 insertions, 2 deletions
diff --git a/openssl-html.lsp b/openssl-html.lsp index 60f659a..54b4f57 100644 --- a/openssl-html.lsp +++ b/openssl-html.lsp @@ -7,18 +7,43 @@ io.write(html.cfe_unpack(view)) <H1>Pending certificate requests<? if view.value.user then?> for <?= view.value.user.value ?><? end ?></H1> <? if not view.value.pending or #view.value.pending.value == 0 then ?> No certificates pending -<? else -end ?> +<? else ?> +<TABLE> + <TR style="background:#eee;font-weight:bold;"> + <? if session.permissions.openssl.approve then ?> + <TD style="padding-right:20px;white-space:nowrap;" class="header">Approve</TD> + <? end ?> + <TD style="padding-right:20px;white-space:nowrap;" class="header">User</TD> + <TD style="padding-right:20px;white-space:nowrap;" class="header">Cert Type</TD> + <TD style="white-space:nowrap;" class="header">Common Name</TD> + <? for i,request in ipairs(view.value.pending.value) do ?> + <TR> + <? if session.permissions.openssl.approve then ?> + <TD><?= html.link{value="approve?request="..request.name, label="Approve"} ?></TD> + <? end ?> + <TD><?= request.user ?></TD> + <TD><?= request.certtype ?></TD> + <TD><?= request.commonName ?></TD> + </TR> + <? end ?> +</TABLE> +<? end ?> <H1>Approved certificate requests<? if view.value.user then?> for <?= view.value.user.value ?><? end ?></H1> <? if not view.value.approved or #view.value.approved.value == 0 then ?> No certificates approved <? else + for i,name in ipairs(view.value.approved.value) do + io.write(name..'<br>') + end end ?> <H1>Revoked certificates<? if view.value.user then?> for <?= view.value.user.value ?><? end ?></H1> <? if not view.value.revoked or #view.value.revoked.value == 0 then ?> No certificates revoked <? else + for i,name in ipairs(view.value.revoked.value) do + io.write(name..'<br>') + end end ?> |