Added getcachain action to show the parent CAs when we are in a child, modified all views to display it

This includes adding a generic HTML view to display cadir and then display the cfe

1 files changed, 18 insertions, 0 deletions

diff --git a/openssl-getcachain-html.lsp b/openssl-getcachain-html.lsp
new file mode 100644
index 0000000..104950e
--- /dev/null
+++ b/openssl-getcachain-html.lsp
@@ -0,0 +1,18 @@
+<% local view, viewlibrary, page_info, session = ... %>
+<% htmlviewfunctions = require("htmlviewfunctions") %>
+<% format = require("acf.format") %>
+<% html = require("acf.html") %>
+
+<%
+if view.value.commonnames and #view.value.commonnames.value > 1 then
+	local header_level = htmlviewfunctions.displaysectionstart(view, page_info)
+	local cadirs = format.string_to_table(view.value.cadir.value, "/")
+	for i,v in ipairs(view.value.commonnames.value) do
+		if i == #view.value.commonnames.value then break end
+		print("<a href='"..page_info.script..page_info.prefix..page_info.controller.."/status?cadir="..html.html_escape(table.concat(cadirs, "/", 1, i-1)).."'> <big>"..html.html_escape(view.value.commonnames.value[i]).."</big></a> -> ")
+	end
+	print("<big>"..html.html_escape(view.value.commonnames.value[#view.value.commonnames.value]).."</big>")
+	htmlviewfunctions.displaysectionend(header_level)
+end
+%>
+