From 86b4e4e9892f15e14aaccf95db38546622001738 Mon Sep 17 00:00:00 2001
From: Ted Trask <ttrask01@yahoo.com>
Date: Mon, 23 Nov 2009 11:49:08 +0000
Subject: Added new view files for major changes to only handle one config and
 add cert processing.

---
 openvpn-listcerts-html.lsp | 40 ++++++++++++++++++++++++++++++++++++++++
 1 file changed, 40 insertions(+)
 create mode 100644 openvpn-listcerts-html.lsp

(limited to 'openvpn-listcerts-html.lsp')

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 %>
-- 
cgit v1.2.3