From dac97826f7d0c9b9135c1a08c4d5f16b61494bd1 Mon Sep 17 00:00:00 2001
From: Mattes D <github@xoft.cz>
Date: Wed, 26 Aug 2015 10:58:51 +0200
Subject: Renamed output directory to Server

---
 Server/Plugins/DumpInfo/Init.lua | 52 ++++++++++++++++++++++++++++++++++++++++
 1 file changed, 52 insertions(+)
 create mode 100644 Server/Plugins/DumpInfo/Init.lua

(limited to 'Server/Plugins/DumpInfo/Init.lua')

diff --git a/Server/Plugins/DumpInfo/Init.lua b/Server/Plugins/DumpInfo/Init.lua
new file mode 100644
index 000000000..2c5998e36
--- /dev/null
+++ b/Server/Plugins/DumpInfo/Init.lua
@@ -0,0 +1,52 @@
+function Initialize(a_Plugin)
+	a_Plugin:SetName("DumpInfo")
+	a_Plugin:SetVersion(1)
+	
+	-- Check if the infodump file exists.
+	if (not cFile:Exists("Plugins/InfoDump.lua")) then
+		LOGWARN("[DumpInfo] InfoDump.lua was not found.")
+		return false
+	end
+	
+	-- Add the webtab.
+	a_Plugin:AddWebTab("DumpPlugin", HandleDumpPluginRequest)
+	return true
+end
+
+
+
+
+
+function HandleDumpPluginRequest(a_Request)
+	local Content = ""
+	
+	-- Check if it already was requested to dump a plugin.
+	if (a_Request.PostParams["DumpInfo"] ~= nil) then
+		local F = loadfile("Plugins/InfoDump.lua")
+		F("Plugins/" .. a_Request.PostParams["DumpInfo"])
+	end
+	
+	Content = Content .. [[
+<table>
+	<tr>
+		<th colspan="2">DumpInfo</th>
+	</tr>]]
+
+	-- Loop through each plugin that is found.
+	cPluginManager:Get():ForEachPlugin(
+		function(a_Plugin)
+			-- Check if there is a file called 'Info.lua'
+			if (cFile:Exists("Plugins/" .. a_Plugin:GetName() .. "/Info.lua")) then
+				Content = Content .. "\n<tr>\n"
+				Content = Content .. "\t<td>" .. a_Plugin:GetName() .. "</td>\n"
+				Content = Content .. "\t<td><form method='POST'> <input type='hidden' value='" .. a_Plugin:GetName() .. "' name='DumpInfo'> <input type='submit' value='DumpInfo'></form></td>\n"
+				Content = Content .. "</tr>\n"
+			end
+		end
+	)
+	
+	Content = Content .. [[
+</table>]]
+
+	return Content
+end
-- 
cgit v1.2.3