diff options
author | Ted Trask <ttrask01@yahoo.com> | 2009-11-23 11:49:08 +0000 |
---|---|---|
committer | Ted Trask <ttrask01@yahoo.com> | 2009-11-23 11:49:08 +0000 |
commit | 86b4e4e9892f15e14aaccf95db38546622001738 (patch) | |
tree | f4fe6be5d9486807c4ad891eae41bc48a657e491 | |
parent | 3424c10a7a9cadc4697951b259d70fc26f56b197 (diff) | |
download | acf-openvpn-86b4e4e9892f15e14aaccf95db38546622001738.tar.bz2 acf-openvpn-86b4e4e9892f15e14aaccf95db38546622001738.tar.xz |
Added new view files for major changes to only handle one config and add cert processing.
l--------- | openvpn-expert-html.lsp | 1 | ||||
-rw-r--r-- | openvpn-listcerts-html.lsp | 40 | ||||
-rw-r--r-- | openvpn-uploadcert-html.lsp | 16 | ||||
-rw-r--r-- | openvpn-viewcert-html.lsp | 8 |
4 files changed, 65 insertions, 0 deletions
diff --git a/openvpn-expert-html.lsp b/openvpn-expert-html.lsp new file mode 120000 index 0000000..207f324 --- /dev/null +++ b/openvpn-expert-html.lsp @@ -0,0 +1 @@ +../expert-html.lsp
\ No newline at end of file diff --git a/openvpn-listcerts-html.lsp b/openvpn-listcerts-html.lsp new file mode 100644 index 0000000..b21bd43 --- /dev/null +++ b/openvpn-listcerts-html.lsp @@ -0,0 +1,40 @@ +<% local view, viewlibrary, page_info, session = ... %> +<% require("viewfunctions") %> + +<% displaycommandresults({"deletecert", "generatedhparams"}, session) %> +<% displaycommandresults({"uploadcert"}, session, true) %> + +<H1><%= html.html_escape(view.label) %></H1> + +<DL> +<TABLE> + <TR style="background:#eee;font-weight:bold;"> + <TD style="padding-right:20px;white-space:nowrap;text-align:left;" class="header">Action</TD> + <TD style="white-space:nowrap;text-align:left;" class="header">Certificate</TD> + </TR> +<% for i,cert in ipairs(view.value) do %> + <TR> + <TD style="padding-right:20px;white-space:nowrap;"> + <%= html.link{value=page_info.script..page_info.prefix..page_info.controller.."/deletecert?cert="..cert.."&redir="..page_info.orig_action, label="Delete "} %> + <% if not string.find(cert, "%-key") then %> + <%= html.link{value=page_info.script..page_info.prefix..page_info.controller.."/viewcert?cert="..cert.."&redir="..page_info.orig_action, label="View "} %> + <% end %> + </TD> + <TD style="white-space:nowrap;"><%= html.html_escape(cert) %></TD> + </TR> +<% end %> +</TABLE> + +<% if viewlibrary.dispatch_component and session.permissions[page_info.controller].uploadcert then + viewlibrary.dispatch_component("uploadcert") +end %> + +<% if session.permissions[page_info.controller].generatedhparams then %> +<H1>Diffie Hellman Parameters</H1> +<DL> +<form action="<%= html.html_escape(page_info.script .. page_info.prefix .. page_info.controller .. "/generatedhparams") %>"> +<DT>Generate Diffie Hellman parameters</DT> +<DD><input class="submit" type="submit" value="Generate"></DD> +</form> +</DL> +<% end %> diff --git a/openvpn-uploadcert-html.lsp b/openvpn-uploadcert-html.lsp new file mode 100644 index 0000000..ad503c3 --- /dev/null +++ b/openvpn-uploadcert-html.lsp @@ -0,0 +1,16 @@ +<% local form, viewlibrary, page_info = ... %> +<% require("viewfunctions") %> + +<% --[[ DEBUG INFORMATION +io.write(html.cfe_unpack(form)) +--]] %> + +<H1><%= html.html_escape(form.label) %></H1> +<% + form.action = page_info.script .. page_info.prefix .. page_info.controller .. "/" .. page_info.action + form.enctype = "multipart/form-data" + form.value.cert.type="file" + form.value.password.type="password" + local order = {"cert", "password"} + displayform(form, order) +%> diff --git a/openvpn-viewcert-html.lsp b/openvpn-viewcert-html.lsp new file mode 100644 index 0000000..1acb166 --- /dev/null +++ b/openvpn-viewcert-html.lsp @@ -0,0 +1,8 @@ +<% local view, viewlibrary = ... %> + +<% --[[ DEBUG INFORMATION +io.write(html.cfe_unpack(view)) +--]] %> + +<H1>Certificate Details</H1> +<pre><%= html.html_escape(view.value.value) %></pre> |