Module:Authority control/auxiliary/sandbox - Revision history

MSGJ: rmv extra spans

2024-08-27T06:15:02Z

rmv extra spans

← Previous revision		Revision as of 06:15, 27 August 2024
Line 83:		Line 83:
	return false		return false
	end		end
	for _,prefix in ipairs({'AT','AU','BE','CA','CH','DE','FI','FR','IT','KR','NZ','US','ZDB'}) do		for _, prefix in ipairs({'AT', 'AU', 'BE', 'CA', 'CH', 'DE', 'FI', 'FR', 'IT', 'KR', 'NZ', 'US', 'ZDB'}) do
	if id:match('^'..prefix..'%-') then		if id:match('^'..prefix..'%-') then
	return '~~<span class="uid">~~[https://w3id.org/isil/'..id..' ' .. (label or 'ISIL') .. ']~~</span>~~'		return '[https://w3id.org/isil/'..id..' ' .. (label or 'ISIL') .. ']'
	end		end
	end		end
	return '[[International Standard Identifier for Libraries and Related Organizations\|ISIL]]~~\n**<span~~ ~~class="uid">~~' .. id ~~.. '</span>'~~		return '[[International Standard Identifier for Libraries and Related Organizations\|ISIL]]: ' .. id
	end		end

Line 94:		Line 94:
	local id2 = id:match( '^[1-7]%-%d%d?%d?%d?%d?$' ) or id:match( '^[1-7]%-%d%d?%d?%d?%d?%.%d*[1-9]$' )		local id2 = id:match( '^[1-7]%-%d%d?%d?%d?%d?$' ) or id:match( '^[1-7]%-%d%d?%d?%d?%d?%.%d*[1-9]$' )
	if id2 then		if id2 then
	return '~~<span class="uid">~~[https://www.navcen.uscg.gov/pdf/lightlists/LightList%20V'..mw.ustring.sub(id2,1,1)..'.pdf '..id2..']~~</span>~~'		return '[https://www.navcen.uscg.gov/pdf/lightlists/LightList%20V'..mw.ustring.sub(id2,1,1)..'.pdf '..id2..']'
	else		else
	return false		return false
Line 109:		Line 109:
	local v		local v
	if prefix=='N' then		if prefix=='N' then
	local int = interval({1,7.5,14.4,100,121,173,211,235,269.99,326,396,450.1,471.7,499,n=suffix})		local int = interval({1, 7.5, 14.4, 100, 121, 173, 211, 235, 269.99, 326, 396, 450.1, 471.7, 499, n=suffix})
	if int=='1-2' then v = 1		if int=='1-2' then v = 1
	elseif int=='2-3' then v = 75		elseif int=='2-3' then v = 75
Line 127:		Line 127:
	link = link .. 'publications/list-lights/newfoundland/n' .. v .. '-en'		link = link .. 'publications/list-lights/newfoundland/n' .. v .. '-en'
	elseif prefix=='A' then		elseif prefix=='A' then
	local int = interval({5,114.5,145,163,268,271,301.5,327,686.5,704.85,883.2,942,1085,1169.1,1584.5,1773,1823.55,2190,2369,2389,n=suffix})		local int = interval({5, 114.5, 145, 163, 268, 271, 301.5, 327, 686.5, 704.85, 883.2, 942, 1085, 1169.1, 1584.5, 1773, 1823.55, 2190, 2369, 2389, n=suffix})
	if int=='1-2' then v = 5		if int=='1-2' then v = 5
	elseif int=='2-3' then v = 1145		elseif int=='2-3' then v = 1145
Line 151:		Line 151:
	link = link .. 'publications/list-lights/atl/a' .. v .. '-en'		link = link .. 'publications/list-lights/atl/a' .. v .. '-en'
	elseif prefix=='I' then		elseif prefix=='I' then
	local int = interval({0.05,401.1,403.4,551.06,552,624,708,731.2,768,814,983,1046,1059.6,1082,1162,1204.7,1233.3,1328,1330,1346.2,1377.8,1408,1410,1420,1445,1470,1520,1534,1540.6,1554,1557.7,1558.8,1563.1,1625.5,1671.7,1716.96,2545,n=suffix})		local int = interval({0.05, 401.1, 403.4, 551.06, 552, 624, 708, 731.2, 768, 814, 983, 1046, 1059.6, 1082, 1162, 1204.7, 1233.3, 1328, 1330, 1346.2, 1377.8, 1408, 1410, 1420, 1445, 1470, 1520, 1534, 1540.6, 1554, 1557.7, 1558.8, 1563.1, 1625.5, 1671.7, 1716.96, 2545, n=suffix})
	if int=='1-2' then v = '01'		if int=='1-2' then v = '01'
	elseif int=='2-3' then v = 4011		elseif int=='2-3' then v = 4011
Line 196:		Line 196:
	link = link .. 'list-lights'		link = link .. 'list-lights'
	end		end
	return '[[CCG (identifier)\|CCG]] ~~<span class="uid">~~[' .. link .. ' ' .. id .. ']~~</span>~~'		return '[[CCG (identifier)\|CCG]]: [' .. link .. ' ' .. id .. ']'
	end		end

Uzume: package function syntax

2024-03-30T14:37:29Z

package function syntax

← Previous revision		Revision as of 14:37, 30 March 2024
Line 4:		Line 4:
	--[[ Format validation functions ]]		--[[ Format validation functions ]]
	--[[======================================================]]		--[[======================================================]]
	p.botanistV ~~= function~~(id)		function p.botanistV(id)
	return mw.ustring.match(id,"^[%u%l%d%. '-]+$")		return mw.ustring.match(id,"^[%u%l%d%. '-]+$")
	end		end
Line 31:		Line 31:
	end		end

	p.validateIsni ~~= function~~(id) --Validate ISNI (and ORCID) and returns it as a 16 characters string or returns false if it's invalid. See http://support.orcid.org/knowledgebase/articles/116780-structure-of-the-orcid-identifier		function p.validateIsni(id) --Validate ISNI (and ORCID) and returns it as a 16 characters string or returns false if it's invalid. See http://support.orcid.org/knowledgebase/articles/116780-structure-of-the-orcid-identifier
	id = id:gsub( '[ %-]', '' ):upper()		id = id:gsub( '[ %-]', '' ):upper()
	if not id:match( '^%d%d%d%d%d%d%d%d%d%d%d%d%d%d%d[%dX]$' ) then		if not id:match( '^%d%d%d%d%d%d%d%d%d%d%d%d%d%d%d[%dX]$' ) then
Line 55:		Line 55:
	end		end

	p.orcidV ~~= function~~(id)		function p.orcidV(id)
	id = p.validateIsni(id)		id = p.validateIsni(id)
	if not id then		if not id then
Line 63:		Line 63:
	end		end

	p.tlsV ~~= function~~(id)		function p.tlsV(id)
	id = id:gsub(' +', '_')		id = id:gsub(' +', '_')
	local idlen = mw.ustring.len(id)		local idlen = mw.ustring.len(id)
Line 79:		Line 79:
	--[[ Custom link functions ]]		--[[ Custom link functions ]]
	--[[======================================================]]		--[[======================================================]]
	p.ISILlink ~~= function~~(id,label)		function p.ISILlink(id,label)
	if not id:match('^%D%D?%D?%D?%-.+$') then		if not id:match('^%D%D?%D?%D?%-.+$') then
	return false		return false
Line 91:		Line 91:
	end		end

	p.uscgLink ~~= function~~(id)		function p.uscgLink(id)
	local id2 = id:match( '^[1-7]%-%d%d?%d?%d?%d?$' ) or id:match( '^[1-7]%-%d%d?%d?%d?%d?%.%d*[1-9]$' )		local id2 = id:match( '^[1-7]%-%d%d?%d?%d?%d?$' ) or id:match( '^[1-7]%-%d%d?%d?%d?%d?%.%d*[1-9]$' )
	if id2 then		if id2 then
Line 100:		Line 100:
	end		end

	p.ccg ~~= function~~(id)		function p.ccg(id)
	id = id:match('^[NAIP]?[1-9]%d$') or id:match('^[NAIP]?[1-9]%d%.%d+$')		id = id:match('^[NAIP]?[1-9]%d$') or id:match('^[NAIP]?[1-9]%d%.%d+$')
	if not id then return false end		if not id then return false end

Uzume: +validateBNF via NCDA=NOID Check Digit Algorithm

2024-03-30T14:00:14Z

+validateBNF via NCDA=NOID Check Digit Algorithm

@@ Line 8: / Line 8: @@
 end
 	id = id:gsub( '[ %-]', '' ):upper()
 	if not id:match( '^%d%d%d%d%d%d%d%d%d%d%d%d%d%d%d[%dX]$' ) then

MSGJ: rv

2023-06-08T08:56:27Z

← Previous revision		Revision as of 08:56, 8 June 2023
Line 65:		Line 65:
	end		end
	end		end
	return '<span class="uid">' .. id .. '</span>'		return '[[International Standard Identifier for Libraries and Related Organizations\|ISIL]]\n**<span class="uid">' .. id .. '</span>'
	end		end

MSGJ: rmv prefix

2023-06-08T08:53:18Z

rmv prefix

← Previous revision		Revision as of 08:53, 8 June 2023
Line 65:		Line 65:
	end		end
	end		end
	return '~~[[International Standard Identifier for Libraries and Related Organizations\|ISIL]]~~ <span class="uid">' .. id .. '</span>'		return '<span class="uid">' .. id .. '</span>'
	end		end

MSGJ at 08:51, 8 June 2023

2023-06-08T08:51:06Z

← Previous revision		Revision as of 08:51, 8 June 2023
Line 65:		Line 65:
	end		end
	end		end
	return '[[International Standard Identifier for Libraries and Related Organizations\|ISIL]]\n*<span class="uid">' .. id .. '</span>'		return '[[International Standard Identifier for Libraries and Related Organizations\|ISIL]] <span class="uid">' .. id .. '</span>'
	end		end

MSGJ: +*

2023-06-08T08:49:26Z

← Previous revision		Revision as of 08:49, 8 June 2023
Line 65:		Line 65:
	end		end
	end		end
	return '[[International Standard Identifier for Libraries and Related Organizations\|ISIL]]\n**<span class="uid">' .. id .. '</span>'		return '[[International Standard Identifier for Libraries and Related Organizations\|ISIL]]\n*<span class="uid">' .. id .. '</span>'
	end		end

MSGJ: fix

2023-04-27T20:08:00Z

fix

← Previous revision		Revision as of 20:08, 27 April 2023
Line 109:		Line 109:
	elseif int=='3-4' then v = 145		elseif int=='3-4' then v = 145
	elseif int=='4-5' then v = 162		elseif int=='4-5' then v = 162
	elseif int=='5-5' then v = 268		elseif int=='5-6' then v = 268
	elseif int=='6-6' then v = 271		elseif int=='6-7' then v = 271
	elseif int=='7-7' then v = 3015		elseif int=='7-8' then v = 3015
	elseif int=='8-8' then v = 327		elseif int=='8-9' then v = 327
	elseif int=='9-10' then v = 6865		elseif int=='9-10' then v = 6865
	elseif int=='10-11' then v = 7048		elseif int=='10-11' then v = 7048

MSGJ: don't need

2023-04-27T14:59:31Z

don't need

← Previous revision		Revision as of 14:59, 27 April 2023
Line 51:		Line 51:
	end		end
	return id		return id
	end

	p.zbmathV = function(id)
	local ps = {'%l[%l%-]', '%.%l[%l%-]', '%.%d*'}
	return id:match( '^'..ps[1]..'$' ) -- prefix with no capture options
	or id:match( '^'..ps[1]..ps[2]..'$' ) -- prefix with first capture option
	or id:match( '^'..ps[1]..ps[3]..'$' ) -- prefix with second capture option
	or id:match( '^'..ps[1]..ps[2]..ps[3]..'$' ) -- prefix and both capture options
	end		end

MSGJ: not needed

2023-04-27T14:56:12Z

not needed

@@ Line 30: / Line 30: @@
 	end
 	return id
 end