Module:Data tables

Documentation for this module may be created at Module:Data tables/doc

local p = {}
local getArgs = require('Module:Arguments').getArgs

local commonHeaders = "{| class=\"wikitable\"\n" ..
		"!Image\n" ..
		"!Name\n" ..
		"!Size\n" ..
		"!Mass (t)\n" ..
		"!Max Temperature (K)\n" ..
		"!Impact Tolerance (m/s)\n"

local partJson = ""
local commonCells = "|-\n" ..
			"|".."IMG HERE\n" ..
			"|"..partJson["name"].."\n" ..
			"|".."{{Size|Size="..partJson["size"].."}}\n" ..
			"|"..partJson["mass"].."\n" ..
			"|"..partJson["max_temp"].."\n" ..
			"|"..partJson["imp_tol"].."\n"

function p.buildPartsTable(frame)
	local args = getArgs(frame)
	local category = args[1]
	local family = args[2]
	local newTable = ""
	
	if category == "command_modules" and family == "pods" then
		newTable = p._podTable(args)
	elseif category == "engines" then
		newTable = p._engineTable(args)
	end
	return frame:preprocess(newTable)
end

function p._engineTable(args)
	local category = args[1]
	local family = args[2]
	local tempTable = ""
	local name = ""
	local mass = ""
	local max_temp = ""
	local header = commonHeaders ..
		"!Max Thrust: 1 atm (kN)\n" ..
		"!Max Thrust: Vac. (kN)\n" ..
		"!ISP: 1 atm (s)\n" ..
		"!ISP: Vac. (s)\n"
	local cells = ""
	
	json = mw.loadJsonData("Data:Collections/parts")
	
	for k, v in pairs(json[category][family]) do
		local partJson = mw.loadJsonData("Data:"..k)
		local tempCell = commonCells ..
			"|"..partJson["modules"]["engine"]["max_thrust"]["atm"].."\n" ..
			"|"..partJson["modules"]["engine"]["max_thrust"]["vac"].."\n" ..
			"|"..partJson["modules"]["engine"]["isp"]["atm"].."\n" ..
			"|"..partJson["modules"]["engine"]["isp"]["vac"].."\n"
		cells = tempCell..cells
	end
	
	tempTable = header..cells.."|}"
	return tempTable
end


function p._podTable(args)
	local category = args[1]
	local family = args[2]
	local tempTable = ""
	
	json = mw.loadJsonData("Data:Collections/parts")
	
	for k, v in pairs(json[category][family]) do
		local partJson = mw.loadJsonData("Data:"..k)
		local name = partJson["name"]
		local mass = partJson["mass"]
		local max_temp = partJson["max_temp"]
	end
	tempTable = name.." "..mass.." "..max_temp
	return tempTable
end


-- args: 
-- tablePage: Name of the tables subpage "Template:Data tables/<tablePage>". Ex: "parts", "tech tree"
-- tableName: Name of the table after the "#". Ex: "command-pods", "ground-landing-legs", "tier1"
function p.getTable(frame)
	local args = getArgs(frame)
	local tablePage = args[1]
	local tableName = escapeTableName(args[2])

	local tableContent = p._getTable(tablePage, tableName)
	
	return frame:preprocess(tableContent)
	-- return table.concat{frame:preprocess(partTable), "[[Category:Parts]]"}
end

function p._getTable(tablePage, TableName)
	local tablePageContent = mw.title.new("Template:Data tables/"..tablePage):getContent()
	local regex = '#'..TableName..'.-{|.-|}'
	local tableWithTag = tablePageContent:match(regex)
	local tableContent = tableWithTag:match('{|.-|}')

	return tableContent
end

function escapeTableName(name)
	return name:gsub("-","--")
end

function p.tableToObjects(inputTable)
    local result = {}
    local columns = {}
    local header = inputTable:match("\n!(.-)\n|")
    local body = inputTable:match("\n|%-(.-)\n|}")

    columns = split(header, "\n!")
    rows = split(body, "\n|-")

    for i, row in ipairs(rows) do
        local object = {}
        local cells = split(row, "\n|")
        cells = {unpack(cells, 2, #cells)}
        for i, cell in ipairs(cells) do
        	local column = columns[i]
        	column = column:gsub("^%s*(.-)%s*$", "%1")
        	if (column == null) then
        		column = "missing"
        	end
            object[column] = cell
        end
        table.insert(result, object)
    end

	return result
end

return p