80e1eb37dd
Also upgraded the user setting file for MSVC to 2013.
201 lines
5.5 KiB
Lua
201 lines
5.5 KiB
Lua
-- Use a table for fast concatenation of strings
|
|
local SiteContent = {}
|
|
function Output(String)
|
|
table.insert(SiteContent, String)
|
|
end
|
|
|
|
|
|
|
|
|
|
|
|
function GetTableSize(Table)
|
|
local Size = 0
|
|
for key,value in pairs(Table) do
|
|
Size = Size + 1
|
|
end
|
|
return Size
|
|
end
|
|
|
|
|
|
|
|
|
|
|
|
function GetDefaultPage()
|
|
local PM = cRoot:Get():GetPluginManager()
|
|
|
|
local SubTitle = "Current Game"
|
|
local Content = ""
|
|
|
|
Content = Content .. "<h4>Plugins:</h4><ul>"
|
|
PM:ForEachPlugin(
|
|
function (a_CBPlugin)
|
|
if (a_CBPlugin:IsLoaded()) then
|
|
Content = Content .. "<li>" .. a_CBPlugin:GetName() .. " (version " .. a_CBPlugin:GetVersion() .. ")</li>"
|
|
end
|
|
end
|
|
)
|
|
|
|
Content = Content .. "</ul>"
|
|
Content = Content .. "<h4>Players:</h4><ul>"
|
|
|
|
cRoot:Get():ForEachPlayer(
|
|
function(a_CBPlayer)
|
|
Content = Content .. "<li>" .. a_CBPlayer:GetName() .. "</li>"
|
|
end
|
|
)
|
|
|
|
Content = Content .. "</ul><br>";
|
|
|
|
return Content, SubTitle
|
|
end
|
|
|
|
|
|
|
|
|
|
|
|
function ShowPage(WebAdmin, TemplateRequest)
|
|
SiteContent = {}
|
|
local BaseURL = WebAdmin:GetBaseURL(TemplateRequest.Request.Path)
|
|
local Title = "Cuberite WebAdmin"
|
|
local NumPlayers = cRoot:Get():GetServer():GetNumPlayers()
|
|
local MemoryUsageKiB = cRoot:GetPhysicalRAMUsage()
|
|
local NumChunks = cRoot:Get():GetTotalChunkCount()
|
|
local PluginPage = WebAdmin:GetPage(TemplateRequest.Request)
|
|
local PageContent = PluginPage.Content
|
|
local SubTitle = PluginPage.PluginName
|
|
if (PluginPage.TabName ~= "") then
|
|
SubTitle = PluginPage.PluginName .. " - " .. PluginPage.TabName
|
|
end
|
|
if (PageContent == "") then
|
|
PageContent, SubTitle = GetDefaultPage()
|
|
end
|
|
|
|
local reqParamsClass = ""
|
|
|
|
for key,value in pairs(TemplateRequest.Request.Params) do
|
|
reqParamsClass = reqParamsClass .. " param-" .. string.lower(string.gsub(key, "[^a-zA-Z0-9]+", "-") .. "-" .. string.gsub(value, "[^a-zA-Z0-9]+", "-"))
|
|
end
|
|
|
|
if (string.gsub(reqParamsClass, "%s", "") == "") then
|
|
reqParamsClass = " no-param"
|
|
end
|
|
|
|
Output([[
|
|
<!-- Copyright Justin S and Cuberite Team, licensed under CC-BY-SA 3.0 -->
|
|
<html>
|
|
<head>
|
|
<title>]] .. Title .. [[</title>
|
|
<meta charset="UTF-8">
|
|
<link rel="stylesheet" type="text/css" href="/style.css">
|
|
<link rel="icon" href="/favicon.ico">
|
|
</head>
|
|
<body>
|
|
<div class="contention push25">
|
|
<div class="pagehead">
|
|
<div class="row1">
|
|
<div class="wrapper">
|
|
<img src="/logo_login.png" alt="Cuberite Logo" class="logo">
|
|
</div>
|
|
</div>
|
|
<div id="panel">
|
|
<div class="upper">
|
|
<div class="wrapper">
|
|
<ul class="menu top_links">
|
|
<li><a>Players online: <strong>]] .. NumPlayers .. [[</strong></a></li>
|
|
<li><a>Memory: <strong>]] .. string.format("%.2f", MemoryUsageKiB / 1024) .. [[MB</strong></a></li>
|
|
<li><a>Chunks: <strong>]] .. NumChunks .. [[</strong></a></li>
|
|
</ul>
|
|
<div class="welcome"><strong>Welcome back, ]] .. TemplateRequest.Request.Username .. [[</strong> <a href=".././"><img src="/log_out.png" style="vertical-align:bottom;"> Log Out</a></div>
|
|
</div>
|
|
</div>
|
|
</div>
|
|
</div>
|
|
<div class="row2">
|
|
<div class="wrapper">
|
|
<table width="100%" border="0" align="center">
|
|
<tbody>
|
|
<tr>
|
|
<td width="180" valign="top">
|
|
<table border="0" cellspacing="0" cellpadding="5" class="tborder">
|
|
<tbody>
|
|
<tr>
|
|
<td class="thead"><strong>Menu</strong></td>
|
|
</tr>
|
|
<tr>
|
|
<td class="trow1 smalltext"><a href=']] .. BaseURL .. [[' class='usercp_nav_item usercp_nav_home'>Home</a></td>
|
|
</tr>
|
|
<tr>
|
|
<td class="tcat"><div><span class="smalltext"><strong><font color="#000">Server Management</font></strong></span></div></td>
|
|
</tr>
|
|
</tbody>
|
|
<tbody style="" id="usercppms_e">
|
|
<tr>
|
|
<td class="trow1 smalltext">
|
|
]])
|
|
|
|
|
|
local AllPlugins = WebAdmin:GetPlugins()
|
|
for key,value in pairs(AllPlugins) do
|
|
local PluginWebTitle = value:GetWebTitle()
|
|
local TabNames = value:GetTabNames()
|
|
if (GetTableSize(TabNames) > 0) then
|
|
Output("<div><a class='usercp_nav_item usercp_nav_pmfolder' style='text-decoration:none;'><b>"..PluginWebTitle.."</b></a></div>\n");
|
|
|
|
for webname,prettyname in pairs(TabNames) do
|
|
Output("<div><a href='" .. BaseURL .. PluginWebTitle .. "/" .. webname .. "' class='usercp_nav_item usercp_nav_sub_pmfolder'>" .. prettyname .. "</a></div>\n")
|
|
end
|
|
|
|
Output("<br>\n");
|
|
end
|
|
end
|
|
|
|
|
|
Output([[
|
|
</td>
|
|
</tr>
|
|
</tbody>
|
|
</table>
|
|
</td>
|
|
<td valign="top" style='padding-left:25px;'>
|
|
<table border="0" cellspacing="0" cellpadding="5" class="tborder">
|
|
<tbody>
|
|
<tr>
|
|
<td class="thead" colspan="2"><strong>]] .. SubTitle .. [[</strong></td>
|
|
</tr>
|
|
<tr>
|
|
<td class="trow2">]] .. PageContent .. [[</td>
|
|
</tr>
|
|
</tbody>
|
|
</table>
|
|
</td>
|
|
</tr>
|
|
</tbody>
|
|
</table>
|
|
</div>
|
|
</div>
|
|
<div id="footer">
|
|
<div class="upper">
|
|
<div class="wrapper">
|
|
<ul class="menu bottom_links">
|
|
<li><a href="http://cuberite.org" target="_blank">Cuberite</a></li>
|
|
<li><a href="http://forum.mc-server.org" target="_blank">Forums</a></li>
|
|
<li><a href="https://builds.cuberite.org" target="_blank">Buildserver</a></li>
|
|
<li><a href="http://api-docs.cuberite.org" target="_blank">API Documentation</a></li>
|
|
<li><a href="https://book.cuberite.org/" target="_blank">User's Manual</a></li>
|
|
</ul>
|
|
</div>
|
|
</div>
|
|
<div class="lower">
|
|
<div class="wrapper">
|
|
<span id="copyright">Copyright © <a href="http://www.cuberite.org" target="_blank">Cuberite Team</a>.</span>
|
|
</div>
|
|
</div>
|
|
</div>
|
|
</div>
|
|
</body>
|
|
</html>
|
|
]])
|
|
|
|
return table.concat(SiteContent)
|
|
end
|