summaryrefslogtreecommitdiffstats
path: root/openssl-status-html.lsp
diff options
context:
space:
mode:
authorTed Trask <ttrask01@yahoo.com>2008-05-27 17:20:55 +0000
committerTed Trask <ttrask01@yahoo.com>2008-05-27 17:20:55 +0000
commit2c7efb258612b0039becb4d535b0e118c400d79d (patch)
treeaa3c3d512cf7070377f7c70f4fe98d21daf4953f /openssl-status-html.lsp
parent7b91c2748fc30eb718bafef995f514d5f805d716 (diff)
downloadacf-openssl-2c7efb258612b0039becb4d535b0e118c400d79d.tar.bz2
acf-openssl-2c7efb258612b0039becb4d535b0e118c400d79d.tar.xz
Modified acf to allow file upload (arbitrary 32k limit).
Cleaned up openssl and added ability to upload/generate CA certificate. git-svn-id: svn://svn.alpinelinux.org/acf/openssl/trunk@1184 ab2d0c66-481e-0410-8bed-d214d4d58bed
Diffstat (limited to 'openssl-status-html.lsp')
-rw-r--r--openssl-status-html.lsp18
1 files changed, 16 insertions, 2 deletions
diff --git a/openssl-status-html.lsp b/openssl-status-html.lsp
index a49b7ac..37d45fc 100644
--- a/openssl-status-html.lsp
+++ b/openssl-status-html.lsp
@@ -1,4 +1,4 @@
-<? local view, viewlibrary = ... ?>
+<? local view, viewlibrary, pageinfo, session = ... ?>
<? require("viewfunctions") ?>
<? --[[ DEBUG INFORMATION
@@ -10,5 +10,19 @@ io.write(html.cfe_unpack(view))
<? displayitem(view.value.version) ?>
<? displayitem(view.value.conffile) ?>
<? displayitem(view.value.cacert) ?>
-<? displayitem(view.value.cacertcontents) ?>
+<? displayitem(view.value.cakey) ?>
</DL>
+
+<? if not view.value.cacert.errtxt and not view.value.cakey.errtxt then ?>
+<H1>CA Certificate contents</H1>
+<pre><?= view.value.cacertcontents.value ?></pre>
+<? elseif not view.value.version.errtxt and not view.value.conffile.errtxt then
+ if viewlibrary and viewlibrary.dispatch_component then
+ if session.permissions.openssl.putcacert then
+ viewlibrary.dispatch_component("putcacert")
+ end
+ if session.permissions.openssl.generatecacert then
+ viewlibrary.dispatch_component("generatecacert")
+ end
+ end
+end ?>