Module:Data to Table - Revision history

ReisuDesign at 16:05, 12 September 2026

2026-09-12T16:05:03Z

ReisuDesign at 15:59, 12 September 2026

2026-09-12T15:59:29Z

← Older revision		Revision as of 15:59, 12 September 2026
Line 63:		Line 63:
	info,		info,
	function(tVal, a, b)		function(tVal, a, b)
	~~return~~ (tVal[a].page or a) < (tVal[b].page or b)		local aPage = tostring(tVal[a].page or a)
			local bPage = tostring(tVal[b].page or b)

			return aPage < bPage
	end		end
	) do		) do

ReisuDesign at 15:56, 12 September 2026

2026-09-12T15:56:48Z

Show changes

ReisuDesign at 15:53, 12 September 2026

2026-09-12T15:53:42Z

@@ Line 14: / Line 14: @@
--- Escape characters
+-- Escape characters for Lua strings
 local function clean(txt)
 	return txt
@@ Line 60: / Line 60: @@
 	local sortkey = frame.args.sortkey or 'page'
 	local subtable = frame.args.subtable
 	-- Constant value mode
@@ Line 87: / Line 90: @@
 	end
 	-- Build result
@@ Line 237: / Line 294: @@
--- Format data
+-- ================================================================
 function p.BuildEntry(value, key, level, subtable, unquoted)
 	level = level or 1
@@ Line 265: / Line 325: @@
 		value = '{ \'' ..
 			table.concat(value, '\', \'') ..
 			' }'
@@ Line 320: / Line 380: @@
 			' = ',
 			value,
 			','
+		)
@@ Line 331: / Line 391: @@
--- Parse data keys into specified levels
+-- ================================================================
 function p.ParseKeys(keys)
 	keys = lib.split(keys, ';;')

ReisuDesign at 15:24, 12 September 2026

2026-09-12T15:24:35Z

← Older revision		Revision as of 15:24, 12 September 2026
Line 60:		Line 60:
	local sortkey = frame.args.sortkey or 'page'		local sortkey = frame.args.sortkey or 'page'
	local subtable = frame.args.subtable		local subtable = frame.args.subtable

			-- Constant value mode
			-- If \|value=day is supplied, every page gets that value.
			local constantValue = frame.args.value
			local valueUnquoted = false

			if constantValue ~= nil then
			for _, rawKey in ipairs(rawKeys) do
			if rawKey == 'value' then
			valueUnquoted = true
			break
			end
			end
			end


Line 93:		Line 107:
	entry.page = clean(entry.page)		entry.page = clean(entry.page)

	-- ~~No data keys~~: ~~output page as a simple string~~		-- Constant value mode:
	if #dataKeys == 0 then		-- \|value=day produces ['Page'] = 'day'
			if constantValue ~= nil and #dataKeys == 0 then

	~~-- Single-~~value ~~mode: ['Page'] = 'value'~~		local value
	~~if ne(frame.args.singlevalue) then~~

	~~local~~ value = ~~entry[frame~~.~~args~~.~~singlevalue] or~~ ''		if valueUnquoted then
			value = clean(constantValue)
			else
			value = '\'' .. clean(constantValue) .. '\''
			end

	result:wikitext(		result:wikitext(
	'\t[\'',		'\t[\'',
	entry.page,		entry.page,
	'\'] = \'',		'\'] = ',
	~~clean(~~value),		value,
	'\',\n'		',\n'
	)		)

	~~else~~		-- No data keys: output page as a simple string
			elseif #dataKeys == 0 then

	result:wikitext(		result:wikitext(
	'\t\'',		'\t\'',
	entry.page,		entry.page,
	'\',\n'		'\',\n'
	)		)

	~~end~~

	else		else
Line 193:		Line 210:
	-- Wrap output in syntaxhighlight		-- Wrap output in syntaxhighlight
	local luaText = tostring(result)		local luaText = tostring(result)

	-- Decode HTML entities introduced by mw.html		-- Decode HTML entities introduced by mw.html
	luaText = mw.text.decode(luaText)		luaText = mw.text.decode(luaText)

	local output = frame:extensionTag(		local output = frame:extensionTag(
	'syntaxhighlight',		'syntaxhighlight',
Line 204:		Line 221:
	copy = ''		copy = ''
	}		}
	)		)


Line 248:		Line 265:

	value = '{ \'' ..		value = '{ \'' ..
	table.concat(value, '\', \'') ..		table.concat(value, '\', \'') ..
	' }'		' }'

Line 303:		Line 320:
	' = ',		' = ',
	value,		value,
	','		','
	)		)

ReisuDesign at 15:23, 12 September 2026

2026-09-12T15:23:18Z

← Older revision		Revision as of 15:23, 12 September 2026
Line 96:		Line 96:
	if #dataKeys == 0 then		if #dataKeys == 0 then

	result:wikitext(		-- Single-value mode: ['Page'] = 'value'
	'\t\'',		if ne(frame.args.singlevalue) then
	entry.page,
	'\',\n'		local value = entry[frame.args.singlevalue] or ''
	)
			result:wikitext(
			'\t[\'',
			entry.page,
			'\'] = \'',
			clean(value),
			'\',\n'
			)

			else

			result:wikitext(
			'\t\'',
			entry.page,
			'\',\n'
			)

			end

	else		else

ReisuDesign at 11:10, 8 September 2026

2026-09-08T11:10:24Z

← Older revision		Revision as of 11:10, 8 September 2026
Line 16:		Line 16:
	-- Escape characters		-- Escape characters
	local function clean(txt)		local function clean(txt)
	txt ~~= txt:gsub('&(%a+;)', '&%1')~~		return txt
	:gsub('\'', '\\~~'')~~		:gsub('\\', '\\\\')
	~~:gsub('<', '<~~')
	:gsub('\'', '\\\'')		:gsub('\'', '\\\'')
	~~return txt~~
	end		end

Line 177:		Line 175:

	-- Wrap output in syntaxhighlight		-- Wrap output in syntaxhighlight
			local luaText = tostring(result)

			-- Decode HTML entities introduced by mw.html
			luaText = mw.text.decode(luaText)

	local output = frame:extensionTag(		local output = frame:extensionTag(
	'syntaxhighlight',		'syntaxhighlight',
	~~tostring(result)~~,		luaText,
	{		{
	lang = 'lua',		lang = 'lua',
	copy = ''		copy = ''
	}		}
	)		)

ReisuDesign at 17:51, 3 September 2026

2026-09-03T17:51:07Z

← Older revision		Revision as of 17:51, 3 September 2026
Line 124:		Line 124:
	level = level or 1		level = level or 1

	if type(K) == 'string' ~~and entry[K] ~= nil~~ then		if type(K) == 'string' then

	valid = true		valid = true

			-- Use the value if present.
			-- BuildEntry handles missing values.
	values:node(		values:node(
	p.BuildEntry(		p.BuildEntry(
Line 156:		Line 158:
	parseLevels(dataKeys, 1)		parseLevels(dataKeys, 1)

	-- Return table if there is valid data,		-- Return table if there is valid data
	~~-- otherwise return the page as a plain string~~
	if valid then		if valid then
	values:wikitext('\n')		values:wikitext('\n')
Line 205:		Line 206:
	local container = mw.html.create()		local container = mw.html.create()

	-- Default ~~number to 0 when~~ missing or ~~empty~~		-- Default missing values
	if key == 'number' ~~and not ne(value)~~ then		if value == nil or value == '' then
	value = '0'
	unquoted = ~~true~~		if key == 'number' then
			value = '0'
			unquoted = true
			else
			value = ''
			unquoted = false
			end
	end		end

	~~if value ~= nil then~~

	~~-- Format value~~
	~~if subtable and value:find(subtable) then~~

	value = ~~lib.split(~~		-- Format value
	~~clean~~(~~value),~~		if subtable and value ~= '' and value:find(subtable) then
	subtable
	)

	value = ~~'{ \'' .~~.		value = lib.split(
	~~table.concat~~(value, ~~'\', \''~~) ..		clean(value),
	~~' }'~~		subtable
			)

	~~elseif unquoted then~~		value = '{ \'' ..
			table.concat(value, '\', \'') ..
			' }'

	~~-- Raw Lua value~~		elseif unquoted and value ~= '' then
	value = ~~clean(value)~~

	else		-- Raw Lua value
			value = clean(value)

			else

	-- String value		-- String value
	value = '\'' ..		value = '\'' ..
	clean(value) ..		clean(value) ..
	'\''		'\''

	end		end


	-- Format key as ['key']		-- Format key as ['key']
	local formattedKey =		local formattedKey =
	'[\'' .. clean(key) .. '\']'		'[\'' .. clean(key) .. '\']'


	-- First item on this level		-- First item on this level
	if first[level] then		if first[level] then

	container:wikitext(		container:wikitext(
	'\n',		'\n',
	string.rep('\t', level),		string.rep('\t', level),
	formattedKey,		formattedKey,
	' = ',		' = ',
	value,		value,
	','		','
	)		)

	first[level] = false		first[level] = false

	if level > 2 then		if level > 2 then
	first[2] = false		first[2] = false
	end		end

	if level > 1 then		if level > 1 then
	first[1] = false		first[1] = false
	end		end


	-- Subsequent item on this level		-- Subsequent item on this level
	else		else

	container:wikitext(		container:wikitext(
	'\n',		'\n',
	string.rep('\t', level),		string.rep('\t', level),
	formattedKey,		formattedKey,
	' = ',		' = ',
	value,		value,
	','		','
	)		)

	previous[level] = false		previous[level] = false

	~~end~~
	end		end

ReisuDesign at 17:49, 3 September 2026

2026-09-03T17:49:08Z

← Older revision		Revision as of 17:49, 3 September 2026
Line 205:		Line 205:
	local container = mw.html.create()		local container = mw.html.create()

	-- ~~Keep~~ empty ~~values~~		-- Default number to 0 when missing or empty
			if key == 'number' and not ne(value) then
			value = '0'
			unquoted = true
			end

	if value ~= nil then		if value ~= nil then

ReisuDesign at 17:12, 3 September 2026

2026-09-03T17:12:54Z

← Older revision		Revision as of 17:12, 3 September 2026
Line 77:		Line 77:

	-- Build result		-- Build result
	local result = mw.html.create(~~'pre')~~		local result = mw.html.create()
	~~:css({~~
	~~['min-height'] = '25px',~~
	~~['line-height'] = '16px'~~
	})
	:wikitext('return {\n')		:wikitext('return {\n')


	~~local items = {}~~

	for _, entry in lib.spairs(		for _, entry in lib.spairs(
Line 153:		Line 147:

	values:wikitext(		values:wikitext(
	~~block~~		'\n',
	~~and (~~'\n' .. string.rep('\t', level - 1))		string.rep('\t', level - 1),
	~~or ' '~~,
	'},'		'},'
	)		)
Line 180:		Line 173:

	result:wikitext('}')		result:wikitext('}')


			-- Wrap output in syntaxhighlight
			local output = frame:extensionTag(
			'syntaxhighlight',
			tostring(result),
			{
			lang = 'lua',
			copy = ''
			}
			)


	-- Copy button		-- Copy button
	if frame.args.copy then		if frame.args.copy then
	~~result~~ = require('Module:CopyText')._main({		output = require('Module:CopyText')._main({
	~~tostring(result)~~,		output,
	frame.args.copy,		frame.args.copy,
	'Copy Table'		'Copy Table'
Line 190:		Line 195:
	end		end

	return ~~result~~		return output
	end		end