diff options
author | Ted Trask <ttrask01@yahoo.com> | 2008-05-27 17:20:55 +0000 |
---|---|---|
committer | Ted Trask <ttrask01@yahoo.com> | 2008-05-27 17:20:55 +0000 |
commit | 2c7efb258612b0039becb4d535b0e118c400d79d (patch) | |
tree | aa3c3d512cf7070377f7c70f4fe98d21daf4953f /openssl-status-html.lsp | |
parent | 7b91c2748fc30eb718bafef995f514d5f805d716 (diff) | |
download | acf-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.lsp | 18 |
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 ?> |