Added listqueue and flushqueue functions.

1 files changed, 15 insertions, 0 deletions

diff --git a/postfix-model.lua b/postfix-model.lua
index b37feb4..344e378 100644
--- a/postfix-model.lua
+++ b/postfix-model.lua
@@ -151,3 +151,18 @@ function rebuild_databases()
 	result.value = table.concat(result.value, "\n")
 	return result
 end
+
+function getmailqueue()
+	local f = io.popen(path.."mailq")
+	local result = f:read("*a")
+	f:close()
+	return cfe({ type="longtext", value=result, label="Postfix Mail Queue" })
+end
+
+function flushqueue()
+	local f = io.popen(path.."postqueue -f")
+	local result = f:read("*a")
+	f:close()
+	if not result or result == "" then result = "Queue Flushed" end
+	return cfe({ type="longtext", value=result, label="Postfix Flush Queue Result" })
+end