Modul:TemplateData/global - Versionsgeschichte

PerfektesChaos: 2020-08-01

2020-08-05T23:33:24Z

2020-08-01

← Nächstältere Version		Version vom 6. August 2020, 01:33 Uhr
Zeile 1:		Zeile 1:
	local Export = { suite = "TemplateDataGlobal",		local Export = { suite = "TemplateDataGlobal",
	serial = "~~2018~~-04-15",		serial = "2020-08-01",
	item = 51435481,		item = 51435481,
	subpages = "TemplateData",		subpages = "TemplateData",
Zeile 9:		Zeile 9:
	Inspired by [[User:Yurik]].		Inspired by [[User:Yurik]].
	]=]		]=]
			local Failsafe = Export



	local function ~~failsafe~~( ~~assert~~ )		local failsafe = function ( atleast )
	-- Retrieve versioning and check for compliance		-- Retrieve versioning and check for compliance
	-- Precondition:		-- Precondition:
	-- ~~assert~~ -- string, with required version ~~or "wikidata",~~		-- atleast -- string, with required version
	-- or false		-- or "wikidata" or "~" or "@" or false
	-- Postcondition:		-- Postcondition:
	-- Returns string with ~~appropriate~~ version, or ~~false~~		-- Returns string -- with queried version/item, also if problem
			-- false -- if appropriate
⚫	local since = ~~assert~~
			-- 2020-08-01
			local last = ( atleast == "~" )
			local link = ( atleast == "@" )
		⚫	local since = atleast
	local r		local r
	if since == "wikidata" then		if last or link or since == "wikidata" then
	local item = ~~Export~~.item		local item = Failsafe.item
	since = false		since = false
	if type( item ) == "number" and item > 0 then		if type( item ) == "number" and item > 0 then
	local ~~entity~~ = ~~mw.wikibase.getEntity(~~ string.format( "Q%d",		local suited = string.format( "Q%d", item )
			local entity = mw.wikibase.getEntity( suited )
	item ) )
	if type( entity ) == "table" then		if type( entity ) == "table" then
	local ~~vsn~~ = ~~entity:formatPropertyValues(~~ "P348" )		local seek = Failsafe.serialProperty or "P348"
			local vsn = entity:formatPropertyValues( seek )
	if type( vsn ) == "table" and		if type( vsn ) == "table" and
	type( vsn.value) == "string" and		type( vsn.value ) == "string" and
	vsn.value ~= "" then		vsn.value ~= "" then
	r = vsn.value		if last and vsn.value == Failsafe.serial then
			r = false
			elseif link then
			if mw.title.getCurrentTitle().prefixedText ==
			mw.wikibase.getSitelink( suited ) then
			r = false
			else
			r = suited
			end
			else
			r = vsn.value
			end
	end		end
	end		end
	end		end
	end		end
	if ~~not~~ r then		if type( r ) == "nil" then
	if not since or since <= ~~Export~~.serial then		if not since or since <= Failsafe.serial then
	r = ~~Export~~.serial		r = Failsafe.serial
	else		else
	r = false		r = false

NordNordWest: Schützte „Modul:TemplateData/global“: https://de.wikipedia.org/w/index.php?title=Wikipedia:Administratoren/Anfragen&curid=6974524&diff=186652722&oldid=186652701 ([Bearbeiten=Nur Sichter] (unbeschränkt) [Verschieben=Nur Administratoren] (unbeschränkt))

2019-03-16T20:18:36Z

Schützte „Modul:TemplateData/global“: https://de.wikipedia.org/w/index.php?title=Wikipedia:Administratoren/Anfragen&curid=6974524&diff=186652722&oldid=186652701 ([Bearbeiten=Nur Sichter] (unbeschränkt) [Verschieben=Nur Administratoren] (unbeschränkt))

← Nächstältere Version	Version vom 16. März 2019, 22:18 Uhr
(kein Unterschied)

PerfektesChaos: 2018-04-15

2018-04-18T12:11:48Z

2018-04-15

← Nächstältere Version		Version vom 18. April 2018, 14:11 Uhr
Zeile 1:		Zeile 1:
	local Export = { suite = "TemplateDataGlobal",		local Export = { suite = "TemplateDataGlobal",
	serial = "2018-04-04",		serial = "2018-04-15",
	item = 51435481,		item = 51435481,
	subpages = "TemplateData",		subpages = "TemplateData",
Zeile 49:		Zeile 49:


	local function fair( already, adapt )		local function fair( already, adapt, append )
	-- Merge local definitions into global base		-- Merge local definitions into global base
	-- Parameter:		-- Parameter:
	-- already -- global item		-- already -- global item
	-- adapt -- local override item		-- adapt -- local override item
			-- append -- append to sequence table
	-- Returns merged item		-- Returns merged item
	local r		local r
Zeile 60:		Zeile 61:
	type( adapt ) == "table" then		type( adapt ) == "table" then
	r = already		r = already
	~~for~~ k, ~~v in pairs( adapt ) do~~		if append then
	r[ ~~k ]~~ = v		for i = 1, #adapt do
	~~end~~ -- ~~for~~ k, v		table.insert( r, adapt[ i ] )
		⚫	end -- for i
			else
		⚫	for k, v in pairs( adapt ) do
		⚫	r[ k ] = v
			end -- for k, v
			end
	else		else
	r = adapt		r = adapt
Zeile 102:		Zeile 109:
	end		end
	end		end
	if Export.subpages and not storage:find( "/" ) then		if Export.subpages and not storage:find( "/", 1, true ) then
	storage = string.format( "%s/%s", Export.subpages, storage )		storage = string.format( "%s/%s", Export.subpages, storage )
	end		end
Zeile 159:		Zeile 166:
	if s == "name" then		if s == "name" then
	sign = v		sign = v
			elseif s == "aliases" then
			if type( v ) == "string" then
			got.aliases = mw.text.split( v,
			"%s\|%s" )
		⚫	else
			failed( i, "aliases not a string" )
			end
	else		else
	got[ s ] = v		got[ s ] = v
Zeile 225:		Zeile 239:
	local order = { }		local order = { }
	local params = { }		local params = { }
	-- local rename = { }
	local r = already		local r = already
	local entry, override, s		local entry, override, s
Zeile 236:		Zeile 249:
	break -- for i		break -- for i
	elseif type( override.global ) == "string" then		elseif type( override.global ) == "string" then
	s = override.global		s = override.global
	entry = r.params[ s ]		entry = r.params[ s ]
	if type( entry ) == "table" then		if type( entry ) == "table" then
⚫	~~override.global~~ = ~~nil~~
	flush( r.paramOrder, s )		flush( r.paramOrder, s )
	if type( override["local"] ) == "string" then		if type( override["local"] ) == "string" then
	s = override["local"]		s = override["local"]
	override["local"] = nil		override["local"] = nil
			elseif override["local"] == false then
			entry = nil
			end
		⚫	if entry then
			override.global = nil
			for k, v in pairs( override ) do
			entry[ k ] = fair( entry[ k ], override[ k ],
			( k == "aliases" ) )
			end -- for k, v
			table.insert( order, s )
	end		end
⚫	for k, v in pairs( ~~override~~ ) do
⚫	~~entry[~~ v ] = ~~fair(~~ ~~entry[~~ v ], ~~override[ v ] )~~
⚫	end -- for ~~k, v~~
	params[ s ] = entry		params[ s ] = entry
⚫	~~table.insert(~~ ~~order,~~ ~~s )~~
	else		else
	r = string.format( "No GLOBAL params %s for LOCAL [%d]",		r = string.format( "No GLOBAL params %s for LOCAL [%d]",
Zeile 371:		Zeile 389:
	storage = string.format( "[[%s]]", storage )		storage = string.format( "[[%s]]", storage )
	if s then		if s then
	storage = string.format( "%s * %s", s )		storage = string.format( "%s * %s", storage, s )
	end		end
	t = false		t = false

PerfektesChaos: 2018-04-04

2018-04-06T08:48:39Z

2018-04-04

Änderungen zeigen

PerfektesChaos: 2018-03-30

2018-04-02T12:31:25Z

2018-03-30

Neue Seite

local Export = { suite = "TemplateDataGlobal",
serial = "2018-03-30",
item = -1,
subpages = "TemplateData",
suffix = "tab" }
--[=[
Retrieve TemplateData from Commons:Data (or other global source)
require()
Inspired by [[User:Yurik]].
]=]

local function failsafe( assert )
-- Retrieve versioning and check for compliance
-- Precondition:
-- assert -- string, with required version or "wikidata",
-- or false
-- Postcondition:
-- Returns string with appropriate version, or false
local since = assert
local r
if since == "wikidata" then
local item = Export.item
since = false
if type( item ) == "number" and item > 0 then
local entity = mw.wikibase.getEntity( string.format( "Q%d",
item ) )
if type( entity ) == "table" then
local vsn = entity:formatPropertyValues( "P348" )
if type( vsn ) == "table" and
type( vsn.value) == "string" and
vsn.value ~= "" then
r = vsn.value
end
end
end
end
if not r then
if not since or since <= Export.serial then
r = Export.serial
else
r = false
end
end
return r
end -- failsafe()

local function find( access )
-- Fetch data from page
-- Parameter:
-- access -- string, with core page name
-- Returns
-- 1. string, with prefixed page name
-- 2. table with JSON data, or error message
local storage = access
local lucky, r
if Export.suffix and not storage:find( ".", 2, true ) then
local k = -1 - #Export.suffix
if storage:sub( k ) ~= "." .. Export.suffix then
storage = string.format( "%s.%s", storage, Export.suffix )
end
end
if Export.subpages and not storage:find( "/" ) then
storage = string.format( "%s/%s", Export.subpages, storage )
end
lucky, r = pcall( mw.ext.data.get, storage, "_" )
storage = "Data:" .. storage
if mw.site.siteName ~= "Wikimedia Commons" then
storage = "commons:" .. storage
end
if type( r ) ~= "table" and type( r ) ~= "string" then
r = "INVALID"
end
return storage, r
end -- find()

local function flat( apply )
-- Convert tabular data into TemplateData
-- Parameter:
-- apply -- table, with tabular data
-- Returns string, with error message, or table, with TemplateData
local r, scream
local function failed( at, alert )
if scream then
scream = string.format( "%s * #%d: %s",
scream, at, alert )
else
scream = add
end
end -- failed()
if type( apply.schema ) == "table" and
type( apply.schema.fields ) == "table" and
type( apply.data ) == "table" then
local order = { }
local entry, got, params, parOrder, s, sign, td, v
for k, v in pairs( apply.schema.fields ) do
if type( v ) == "table" then
table.insert( order, v.name )
end
end -- for k, v
for i = 1, #apply.data do
entry = apply.data[ i ]
if type( entry ) == "table" then
got = { }
sign = false
for j = 1, #entry do
s = order[ j ]
v = entry[ j ]
if type( v ) == "string" then
v = mw.text.trim( v )
if v == "" then
v = false
end
end
if v then
if s == "name" then
sign = v
else
got[ s ] = v
end
end
end -- for j
if sign == "|" then
if td then
failed( i, "root repeated" )
else
td = { description = got.description }
if type( got.type ) == "string" then
td.format = got.type:gsub( "N", "\n" )
end
end
elseif sign then
if params then
if params[ sign ] then
failed( i, "name repeated: " .. sign )
end
else
params = { }
parOrder = { }
end
params[ sign ] = got
table.insert( parOrder, sign )
else
failed( i, "missing name" )
end
else
failed( i, "invalid component" )
end
end -- for i
r = td or { }
r.params = params
r.paramOrder = parOrder
else
r = "bad tabular structure"
end
return scream or r or "EMPTY"
end -- flat()

local function furnish( apply, at )
-- Convert external data into TemplateData
-- Parameter:
-- apply -- table, with external data
-- at -- string, with page name
-- Returns string, with error message, or table, with TemplateData
local r
if at:sub( -4 ) == ".tab" then
r = flat( apply )
else
r = "Unknown page format"
end
return r
end -- furnish()

Export.failsafe = function ( frame )
-- Versioning interface
local s = type( frame )
local since
if s == "table" then
since = frame.args[ 1 ]
elseif s == "string" then
since = frame
end
if since then
since = mw.text.trim( since )
if since == "" then
since = false
end
end
return failsafe( since ) or ""
end -- Export.failsafe()

Export.fetch = function ( access )
-- Fetch data from site
-- Parameter:
-- access -- string, with page specification
-- Returns
-- 1. string, with error message or prefixed page name
-- 2. table with TemplateData, or not
local storage, t = find( access )
local s
if type( t ) == "table" then
t = furnish( t, storage )
if type( t ) ~= "table" then
s = t
end
else
s = t
end
if type( t ) ~= "table" then
storage = string.format( "[[%s]]", storage )
if s then
storage = string.format( "%s * %s", s )
end
t = false
end
return storage, t
end -- Export.fetch()

return Export