Модуль:Wikidata/Interproject - История изменений

Admin: 1 версия импортирована

2023-06-21T15:34:32Z

1 версия импортирована

← Предыдущая версия	Версия от 18:34, 21 июня 2023
(нет различий)

ru>Putnik: оптимизация потребления памяти

2023-05-08T20:43:44Z

оптимизация потребления памяти

← Предыдущая версия		Версия от 23:43, 8 мая 2023
Строка 1:		Строка 1:
	local p = {};		local p = {}

	function p.getWikibooksLink ( )		function p.getWikibooksLink( context )
	return p.getSisterProjectLink( 'b', 'wikibooks' );		return p.getSisterProjectLink( 'b', 'wikibooks', context.args.from )
	end		end

	function p.getWikiquoteLink ( )		function p.getWikiquoteLink( context )
	return p.getSisterProjectLink( 'q', 'wikiquote' );		return p.getSisterProjectLink( 'q', 'wikiquote', context.args.from )
	end		end

	function p.getWikisourceLink ( )		function p.getWikisourceLink( context )
	return p.getSisterProjectLink( 's', 'wikisource' );		return p.getSisterProjectLink( 's', 'wikisource', context.args.from )
	end		end

	function p.getWikipediaLink ( )		function p.getWikipediaLink( context )
	return p.getSisterProjectLink( 'w', 'wiki' );		return p.getSisterProjectLink( 'w', 'wiki', context.args.from )
	end		end

	function p.getWiktionaryLink ( )		function p.getWiktionaryLink( context )
	return p.getSisterProjectLink( 'wikt', 'wiktionary' );		return p.getSisterProjectLink( 'wikt', 'wiktionary', context.args.from )
	end		end

	function p.getSisterProjectLink( ~~projectInterwikiLettter~~, projectName )		function p.getSisterProjectLink( projectInterwikiPrefix, projectName, entityId )
			entityId = entityId or mw.wikibase.getEntityIdForCurrentPage()
	-- По умолчанию старается достать ссылку на русском, иначе - на родном (P103)		-- По умолчанию старается достать ссылку на русском, иначе - на родном (P103)
	local wbStatus, ~~entity~~ = '' -- pcall( mw.wikibase.~~getEntityObject~~ )		local wbStatus, sitelink = pcall( mw.wikibase.getSitelink, entityId, 'ru' .. projectName )
	if wbStatus ~= true or not ~~entity or not entity.sitelinks~~ then		if wbStatus and sitelink then
			return projectInterwikiPrefix .. ':' .. sitelink
			end

			local wbStatus, langClaims = pcall( mw.wikibase.getBestStatements, entityId, 'P103' )
			if wbStatus ~= true or not langClaims then
	return ''		return ''
	end		end
	~~if entity.sitelinks['ru' .. projectName] then~~
	~~return projectInterwikiLettter .. ':' .. entity.sitelinks['ru' .. projectName].title~~		local codes = mw.loadData( 'Module:Wikidata:Dictionary/P424' )
	~~end~~		for _, claim in ipairs( langClaims ) do
			if claim.mainsnak and
	~~if entity.claims then~~		claim.mainsnak.datavalue and
	~~local propValues = entity.claims['P103']~~		claim.mainsnak.datavalue.value and
	~~if propValues then~~		claim.mainsnak.datavalue.value.id
	local codes = mw.loadData( 'Module:Wikidata:Dictionary/P424' );		then
	for i, ~~propClaim~~ in ~~pairs~~(~~propValues~~) do		local codesById = codes[ claim.mainsnak.datavalue.value.id ]
	if ~~propClaim~~.mainsnak and ~~propClaim~~.mainsnak.datavalue and ~~propClaim~~.mainsnak.datavalue.value and ~~propClaim~~.mainsnak.datavalue.value~~["numeric-~~id"] then		if codesById then
	local ~~languageWikidataId~~ = ~~'Q' .. propClaim~~.mainsnak.datavalue.value~~["numeric-~~id"]		for _, code in ipairs( codesById ) do
	~~local codesById = codes[languageWikidataId];~~		wbStatus, sitelink = pcall( mw.wikibase.getSitelink, entityId, code .. projectName )
	if ( codesById ) then		if wbStatus and sitelink then
	for j, code in ~~pairs~~( codesById ) do		return projectInterwikiPrefix .. ':' .. code .. ':' .. sitelink
	~~local~~ sitelink = ~~entity~~.~~sitelinks[~~code .. projectName]
	if sitelink then
	return ~~projectInterwikiLettter~~ .. ':' .. code .. ':' .. sitelink~~.title~~
	~~end~~
	~~end~~
	end		end
	end		end
Строка 51:		Строка 52:
	end		end
	end		end

	return ''		return ''
	end		end

	return p;		return p

Admin в 12:13, 3 апреля 2023

2023-04-03T12:13:43Z

← Предыдущая версия		Версия от 15:13, 3 апреля 2023
Строка 23:		Строка 23:
	function p.getSisterProjectLink( projectInterwikiLettter, projectName )		function p.getSisterProjectLink( projectInterwikiLettter, projectName )
	-- По умолчанию старается достать ссылку на русском, иначе - на родном (P103)		-- По умолчанию старается достать ссылку на русском, иначе - на родном (P103)
	local wbStatus, entity = pcall( mw.wikibase.getEntityObject )		local wbStatus, entity = '' -- pcall( mw.wikibase.getEntityObject )
	if wbStatus ~= true or not entity or not entity.sitelinks then		if wbStatus ~= true or not entity or not entity.sitelinks then
	return ''		return ''

Admin: 1 версия импортирована

2023-03-22T17:09:06Z

1 версия импортирована

← Предыдущая версия	Версия от 20:09, 22 марта 2023
(нет различий)

ru>Dima st bk: fix

2017-08-02T09:42:54Z

fix

Новая страница

local p = {};

function p.getWikibooksLink ( )
return p.getSisterProjectLink( 'b', 'wikibooks' );
end

function p.getWikiquoteLink ( )
return p.getSisterProjectLink( 'q', 'wikiquote' );
end

function p.getWikisourceLink ( )
return p.getSisterProjectLink( 's', 'wikisource' );
end

function p.getWikipediaLink ( )
return p.getSisterProjectLink( 'w', 'wiki' );
end

function p.getWiktionaryLink ( )
return p.getSisterProjectLink( 'wikt', 'wiktionary' );
end

function p.getSisterProjectLink( projectInterwikiLettter, projectName )
-- По умолчанию старается достать ссылку на русском, иначе - на родном (P103)
local wbStatus, entity = pcall( mw.wikibase.getEntityObject )
if wbStatus ~= true or not entity or not entity.sitelinks then
return ''
end
if entity.sitelinks['ru' .. projectName] then
return projectInterwikiLettter .. ':' .. entity.sitelinks['ru' .. projectName].title
end

if entity.claims then
local propValues = entity.claims['P103']
if propValues then
local codes = mw.loadData( 'Module:Wikidata:Dictionary/P424' );
for i, propClaim in pairs(propValues) do
if propClaim.mainsnak and propClaim.mainsnak.datavalue and propClaim.mainsnak.datavalue.value and propClaim.mainsnak.datavalue.value["numeric-id"] then
local languageWikidataId = 'Q' .. propClaim.mainsnak.datavalue.value["numeric-id"]
local codesById = codes[languageWikidataId];
if ( codesById ) then
for j, code in pairs( codesById ) do
local sitelink = entity.sitelinks[code .. projectName]
if sitelink then
return projectInterwikiLettter .. ':' .. code .. ':' .. sitelink.title
end
end
end
end
end
end
end

return ''
end

return p;