diff options
Diffstat (limited to 'Server/Plugins/DumpInfo/Init.lua')
-rw-r--r-- | Server/Plugins/DumpInfo/Init.lua | 52 |
1 files changed, 52 insertions, 0 deletions
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 |