From 391591626bbd83eba8a0165a1591b3bedc1d3370 Mon Sep 17 00:00:00 2001
From: Ted Trask <ttrask01@yahoo.com>
Date: Fri, 10 Sep 2010 12:42:50 +0000
Subject: Added support for folders, even though default vm IVR doesn't handle
 them.

Basically, they'll be hidden unless you add folder definitions to voicemail_folders table.
---
 vmail-listmessages-html.lsp | 50 ++++++++++++++++++++++++++++++++++++++-------
 1 file changed, 43 insertions(+), 7 deletions(-)

(limited to 'vmail-listmessages-html.lsp')

diff --git a/vmail-listmessages-html.lsp b/vmail-listmessages-html.lsp
index 853d05c..78687d1 100644
--- a/vmail-listmessages-html.lsp
+++ b/vmail-listmessages-html.lsp
@@ -5,13 +5,32 @@ require("viewfunctions")
 <% -- Pregenerate the list of users
 if viewlibrary.check_permission("listusers") and (viewlibrary.check_permission("forwardmessage") or viewlibrary.check_permission("forwardmymessage")) then
 	local users = viewlibrary.dispatch_component("listusers", nil, true)
-	options = {}
+	useroptions = {}
 	for i,u in ipairs(users.value) do
 		if u.username ~= session.userinfo.userid then
-			options[#options+1] = '<option value="'..html.html_escape(u.username)..'">'..html.html_escape(u.fullname)..' ('..html.html_escape(u.username)..')</option>'
+			useroptions[#useroptions+1] = '<option value="'..html.html_escape(u.username)..'">'..html.html_escape(u.fullname)..' ('..html.html_escape(u.username)..')</option>'
 		end
 	end
-	options = table.concat(options)
+	useroptions = table.concat(useroptions)
+end
+%>
+<% -- Pregenerate the list of folders
+reversefolders = {}
+if viewlibrary.check_permission("listfolders") then
+	local folders = viewlibrary.dispatch_component("listfolders", nil, true)
+	for i,u in ipairs(folders.value) do
+		reversefolders[u.in_folder] = u.label
+	end
+	if (viewlibrary.check_permission("movemessage") or viewlibrary.check_permission("movemymessage")) then
+		if #folders.value <= 1 then
+			dontmove = true
+		end
+		folderoptions = {}
+		for i,u in ipairs(folders.value) do
+			folderoptions[#folderoptions+1] = '<option value="'..html.html_escape(u.in_folder)..'">'..html.html_escape(u.label)..'</option>'
+		end
+		folderoptions = table.concat(folderoptions)
+	end
 end
 %>
 
@@ -20,7 +39,7 @@ end
 <script type="text/javascript">
 	function PlayMessage() {
 		$(".temporaryplayer").remove();
-		$(this).parent().parent().after("<tr class='temporaryplayer'><td colspan='8'><embed width='100%' height='25px' marginheight='0' marginwidth='0' frameborder='0' scrolling='no' autostart='false' autoplay='false' loop='false' src='" + $(this).attr("href") + "'></embed></TD></TR>");
+		$(this).parent().parent().after("<tr class='temporaryplayer'><td colspan='9'><embed width='100%' height='25px' marginheight='0' marginwidth='0' frameborder='0' scrolling='no' autostart='false' autoplay='false' loop='false' src='" + $(this).attr("href") + "'></embed></TD></TR>");
 		return false;
 	}
 	function HandleMulti() {
@@ -44,11 +63,14 @@ end
 <% end %>
 <% if viewlibrary.check_permission("emailmessage") or viewlibrary.check_permission("emailmymessage") then %>
 		$("#multiemail").click(HandleMulti);
+<% end %>
+<% if viewlibrary.check_permission("movemessage") or viewlibrary.check_permission("movemymessage") then %>
+		$("#multimove").click(HandleMulti);
 <% end %>
         });
 </script>
 
-<% displaycommandresults({"deletemessage", "deletemymessage", "forwardmessage", "forwardmymessage", "emailmessage", "emailmymessage"}, session) %>
+<% displaycommandresults({"deletemessage", "deletemymessage", "forwardmessage", "forwardmymessage", "emailmessage", "emailmymessage", "movemessage", "movemymessage"}, session) %>
 
 <h1>Messages</h1>
 <DL>
@@ -68,7 +90,7 @@ end
 		" method="POST">
 	<input class="hidden" type="hidden" name="redir"  value="<%= html.html_escape(page_info.orig_action) %>" >
 	<input class="hidden" type="hidden" name="message"  value="" >
-	<select name="newuser"><%= (options or "") %></select>
+	<select name="newuser"><%= (useroptions or "") %></select>
 	<input class="submit" type="submit" value="Forward">
 	</form>
 <% end %>
@@ -82,6 +104,18 @@ end
 	<input class="submit" type="submit" value="E-mail">
 	</form>
 <% end %>
+<% if viewlibrary.check_permission("movemessage") or viewlibrary.check_permission("movemymessage") then %>
+	<% if not dontmove then %>
+		<form id="multimove" action="<%= html.html_escape(page_info.script .. page_info.prefix .. page_info.controller) %>/
+			<% if viewlibrary.check_permission("movemessage") then io.write("movemessage") else io.write("movemymessage") end %>
+			" method="POST">
+		<input class="hidden" type="hidden" name="redir"  value="<%= html.html_escape(page_info.orig_action) %>" >
+		<input class="hidden" type="hidden" name="message"  value="" >
+		<select name="newfolder"><%= (folderoptions or "") %></select>
+		<input class="submit" type="submit" value="Move">
+		</form>
+	<% end %>
+<% end %>
 </TD></TR></TABLE>
 
 <TABLE id="list" class="tablesorter"><THEAD>
@@ -92,7 +126,8 @@ end
 		<TH>Time</TH>
 		<TH>Caller ID</TH>
 		<TH>Priority</TH>
-		<TH>Orig Mailbox</Th>
+		<TH>Orig Mailbox</TH>
+		<TH>Folder</TH>
 		<TH>Duration</TH>
 	</TR>		
 </THEAD><TBODY>
@@ -113,6 +148,7 @@ end
                 <TD><%= html.html_escape(v.cid_number) %></TD>
                 <TD><%= html.html_escape(v.read_flags) %></TD>
                 <TD><%= html.html_escape(v.username) %></TD>
+                <TD><%= html.html_escape(reversefolders[v.in_folder] or v.in_folder) %></TD>
                 <TD><%= html.html_escape(v.message_len) %></TD>
 	</TR>
 <% end %>
-- 
cgit v1.2.3