Modul:ISO3166/maintain - Versionsgeschichte

Funkruf: Schützte „Modul:ISO3166/maintain“: Wunsch auf WP:A/AF https://de.wikipedia.org/w/index.php?title=Wikipedia:Administratoren/Anfragen&diff=prev&oldid=193363492&diffmode=source ([Bearbeiten=Nur Sichter] (unbeschränkt) [Verschieben=Nur Administratoren] (unbeschränkt))

2019-10-22T16:18:39Z

Schützte „Modul:ISO3166/maintain“: Wunsch auf WP:A/AF https://de.wikipedia.org/w/index.php?title=Wikipedia:Administratoren/Anfragen&diff=prev&oldid=193363492&diffmode=source ([Bearbeiten=Nur Sichter] (unbeschränkt) [Verschieben=Nur Administratoren] (unbeschränkt))

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

PerfektesChaos: 2019-10-14

2019-10-14T14:20:57Z

2019-10-14

← Nächstältere Version		Version vom 14. Oktober 2019, 16:20 Uhr
Zeile 1:		Zeile 1:
	local ISO3166 = { suite = "ISO3166",		local ISO3166 = { suite = "ISO3166",
	sub = "maintain",		sub = "maintain",
	serial = "2019-10-01",		serial = "2019-10-14",
	item = 0 }		item = 0 }
	--[=[		--[=[
Zeile 20:		Zeile 20:
	local suite = self:match( "^(.+)/%l+$" )		local suite = self:match( "^(.+)/%l+$" )
	local lucky, base = pcall( require, suite )		local lucky, base = pcall( require, suite )
⚫	local source = "codes"
	local codes = base.ISO3166().fetch( source, true )
	local order = { }		local order = { }
	local ordered = { }		local ordered = { }
		⚫	local source = "codes"
	local toA2 = { }		local toA2 = { }
	local start = [===[{		local start = [===[{
Zeile 41:		Zeile 40:
	"data": [		"data": [
	]===]		]===]
	local entry, r, s, sign		local codes, entry, r, s, sign
	~~for~~ k, v in ~~pairs(~~ ~~codes )~~ do		if type( base ) == "table" then
	~~table~~.~~insert~~( ~~order, k~~ )		base = base.ISO3166()
			if type( base ) == "table" then
⚫	end -- for ~~k, v~~
	~~table~~.~~sort~~( ~~order~~ )		base.fetch( true )
			if type( base.codes ) == "table" then
	for i = 1, #order do
	~~sign~~ = ~~order[~~ i ]		codes = base.codes
	~~entry~~ = ~~mw.text.split(~~ ~~codes[ sign ], "%s+" )~~		end
	~~if not toA2[ sign ] then~~		end
			end
⚫	table.insert( ordered, ~~sign~~ )
	~~end~~		if codes then
	~~toA2[~~ ~~sign~~ ] = ~~sign~~		for k, v in pairs( codes ) do
	~~for~~ j = 1, ~~#entry~~ do		table.insert( order, k )
	~~s = entry[ j ]~~		end -- for k, v
	~~if toA2[ s ] then~~		table.sort( order )
	~~if j > 1 then~~		for i = 1, #order do
	s = ~~string.format(~~ ~~"Duplicated: %s (%s)", s, sign~~ )		sign = order[ i ]
	~~error(~~ s~~, 0~~ )		entry = mw.text.split( codes[ sign ], "%s+" )
	~~end~~		if not toA2[ sign ] then
	~~else~~		table.insert( ordered, sign )
⚫	toA2[ s ] = sign
⚫	~~table.insert~~( ~~ordered~~, s )
	end		end
	~~end~~ -- ~~for~~ j		toA2[ sign ] = sign
	~~end~~ -- for i		for j = 1, #entry do
			s = entry[ j ]
			if toA2[ s ] then
			if j > 1 then
			s = string.format( "Duplicated: %s (%s)",
			s, sign )
		⚫	error( s, 0 )
			end
			else
		⚫	toA2[ s ] = sign
		⚫	table.insert( ordered, s )
			end
			end -- for j
		⚫	end -- for i
			end
	for i = 1, #ordered do		for i = 1, #ordered do
	s = ordered[ i ]		s = ordered[ i ]

PerfektesChaos: 2019-10-01

2019-10-06T20:21:21Z

2019-10-01

Neue Seite

local ISO3166 = { suite = "ISO3166",
sub = "maintain",
serial = "2019-10-01",
item = 0 }
--[=[
Maintain ISO 3166 data and create reverse map
require()
{{#invoke:ISO3166/maintain|factory}}
]=]
local Failsafe = ISO3166

ISO3166.factory = function ()
-- Create reverse map
-- Postcondition:
-- Returns string -- with JSON code
local frame = mw.getCurrentFrame()
local self = frame:getTitle()
local suite = self:match( "^(.+)/%l+$" )
local lucky, base = pcall( require, suite )
local source = "codes"
local codes = base.ISO3166().fetch( source, true )
local order = { }
local ordered = { }
local toA2 = { }
local start = [===[{
"license": "CC0-1.0",
"description": { "en": "ISO 3166 code mapping to A2 (reverse)" },
"sources": "%s",
"schema": {
"fields": [
{ "name": "seek",
"type": "string",
"title": { "en": "access key (A2 A3 NUM A4)" } },
{ "name": "shift",
"type": "string",
"title": { "en": "A2 key" } }
]
},
"data": [
]===]
local entry, r, s, sign
for k, v in pairs( codes ) do
table.insert( order, k )
end -- for k, v
table.sort( order )
for i = 1, #order do
sign = order[ i ]
entry = mw.text.split( codes[ sign ], "%s+" )
if not toA2[ sign ] then
table.insert( ordered, sign )
end
toA2[ sign ] = sign
for j = 1, #entry do
s = entry[ j ]
if toA2[ s ] then
if j > 1 then
s = string.format( "Duplicated: %s (%s)", s, sign )
error( s, 0 )
end
else
toA2[ s ] = sign
table.insert( ordered, s )
end
end -- for j
end -- for i
for i = 1, #ordered do
s = ordered[ i ]
if r then
r = r .. ",\n"
else
r = ""
end
r = string.format( "%s[\"%s\",\"%s\"]", r, s, toA2[ s ] )
end -- for i
source = string.format( "commons:Data:ISO3166/%s.tab", source )
s = frame:callParserFunction( "#timel", "c" )
source = string.format( "%s %s", source, s )
start = string.format( start, source )
r = r or ""
r = string.format( "%s%s\n ]\n}", start, r )
return r
end -- ISO3166.factory()

Failsafe.failsafe = function ( atleast )
-- Retrieve versioning and check for compliance
-- Precondition:
-- atleast -- string, with required version or "wikidata" or "~"
-- or false
-- Postcondition:
-- Returns string -- with queried version, also if problem
-- false -- if appropriate
local last = ( atleast == "~" )
local since = atleast
local r
if last or since == "wikidata" then
local item = Failsafe.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
if last and vsn.value == Failsafe.serial then
r = false
else
r = vsn.value
end
end
end
end
end
if type( r ) == "nil" then
if not since or since <= Failsafe.serial then
r = Failsafe.serial
else
r = false
end
end
return r
end -- Failsafe.failsafe()

-- Export
local p = { }

function p.factory()
return ISO3166.factory()
end -- p.factory

p.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.failsafe( since ) or ""
end -- p.failsafe

p.ISO3166 = function ()
return ISO3166
end -- p.ISO3166()

return p