Modul:Politické strany

z Wikipédie, slobodnej encyklopédie


Túto dokumentáciu [vytvoriť] [obnoviť]
Dokumentácia Dokumentácia

Dokumentácia pre tento modul zatiaľ neexistuje. Môžete ju vytvoriť na Modul:Politické strany/Dokumentácia


Ak máte otázku k tomuto modulu, alebo potrebujete jeho rozšírenie a neviete ho správne naformátovať, pýtajte sa v diskusii k modulu. Pokiaľ je potrebné modul urgentne opraviť, obráťte sa na technickú podporu.

local function getPartyParams(country)
	mw.logObject(country, "country")
	local moduleprefix = "Modul:Politické strany/data/"
	local moduletitle = mw.title.new(country)
	if not moduletitle or (moduletitle.namespace ~= 828) then
		moduletitle = mw.title.new(moduleprefix..country)
	end
	if not moduletitle then
		mw.log("„"..country.."” nie jest prawidłową nazwą z danymi partii politycznych")
	elseif moduletitle.exists then
		local status, partiesData = pcall(mw.loadData, moduletitle.fullText)
		if status then
			return partiesData
		end
	else
		mw.log("Nie mogę znaleźć definicji partii politycznych. Nie istnieje „"..moduleprefix..country.."”.")
	end
end

local function selectPartyData(args)
	local abbr = args[1]
	if not abbr then
		return
	end
	
	local group = args[2]
	mw.logObject({abbr, group}, "abbr, group")
	local data = getPartyParams(group or "Slovensko") or {}
	if data[abbr] then
		mw.logObject({abbr, group or false, data[abbr]}, "selected key")
		return abbr, data[abbr]
	end
	
	local result = {}
	-- look for name
	for k, v in pairs(data) do
		local key = type(k) == "string" and k or false
		if (abbr == v.popis) or (abbr == v.odkaz) then
			table.insert(result, {key, v})
		end
	end

	if #result == 1 then
		mw.logObject({abbr, group or false, result[1]}, "selected name")
		return result[1][1], result[1][2]
	end
	
	mw.logObject({abbr, group or false}, "not selected")
end

local function Name(party)
	if not party then
		return
	end
	
	local desc = party.popis
	local link = party.odkaz
	mw.logObject({desc, link}, "desc, link")
	if link and desc and (link ~= desc) then
		mw.logObject("[["..link.."|"..desc.."]]", "return nazwa A")
		return "[["..link.."|"..desc.."]]"
	elseif link then
		mw.logObject("[["..link.."]]", "return nazwa B")
		return "[["..link.."]]"
	elseif desc then
		mw.logObject(desc, "return nazwa C")
		return desc
	end
end

return {
	
["skratka"] = function(frame)
	local args = require('Module:Arguments').getArgs(frame)
	local key, party = selectPartyData(args)
	mw.logObject(party, "party")
	return key or args[1]
end,

["farba"] = function(frame)
	local args = require('Module:Arguments').getArgs(frame)
	local key, party = selectPartyData(args)
	mw.logObject(party, "party")
	if party and party.farba then
		return party.farba
	end
	
	return args.farba or "E6E6E6"
end,

["odkaz"] = function(frame)
	local args = require('Module:Arguments').getArgs(frame)
	local key, party = selectPartyData(args)
	mw.logObject(party, "party")
	if party then
		return party.odkaz
	end
end,

["popis"] = function(frame)
	local args = require('Module:Arguments').getArgs(frame)
	local key, party = selectPartyData(args)
	mw.logObject(party, "party")
	if party then
		return party.popis
	end
end,

["názov"] = function(frame)
	local args = require('Module:Arguments').getArgs(frame)
	local key, party = selectPartyData(args)
	mw.logObject(party, "party")
	return Name(party) or args[1]
end,

["krátko"] = function(frame)
	local args = require('Module:Arguments').getArgs(frame)
	local abbr, party = selectPartyData(args)
	mw.logObject(party, "party")
	if party then
		local link = party.odkaz
		if link and abbr then
			return link == abbr and ("[["..link.."]]") or ("[["..link.."|"..abbr.."]]")
		elseif abbr then
			return abbr
		else
			return Name(party) or args[1]
		end
	end

	return args[1]
end,

["doc"] = function(frame)
	local moduleName = mw.title.getCurrentTitle().fullText
	local status, partiesData = pcall(mw.loadData, moduleName)
	if not status then
		-- logowanie komunikatu błędu może być przydatne
		mw.log(partiesData)
		return
	end
	
	local data = {}
	local lang = mw.getContentLanguage()
	for k, v in pairs(partiesData) do
		table.insert(data, {
			_sk = v.farba and "1" or "0",
			_ss = type(k) == "string" and "1" or "0",
			_sn = lang:caseFold(v.popis or v.odkaz or (type(k) == "string" and k or "")),
			key = type(k) == "string" and k or "''brak''",
			color = v.farba and ("#"..v.farba) or "none",
			kolor = v.farba or "''brak''",
			name = Name(v) or "''brak''"
		})
	end
	
	table.sort(data, function(a, b) return a._sn < b._sn end)
	
	local builder = mw.html.create()
	builder
		:wikitext(
			'Údaje používané šablónami politických strán.',
			'\n{| class="wikitable collapsible collapsed" width="100%"',
			'\n! Štruktúra záznamu pre jednu politickú stranu',
			'\n|-',
			'\n| '
		)
		:tag("pre"):wikitext(
			'["..."] = {\t-- voliteľná skratka názvu strany',
			'\n\tfarba = "...",\t-- 6 hexadecimálnych farebných kódovaní HTML',
			'\n\todkaz = "...",\t-- názov článku opisujúceho politickú stranu',
			'\n\tpopis = "...",\t-- názov politickej strany, ak neexistuje článok',
			'\n}'
		):done()
		:wikitext(
			'\n|}',
			'\n{| class="wikitable sortable"',
			'\n|+ Zoznam politických strán',
			'\n|-',
			'\n! class="unsortable ordinal" | lp.',
			'\n!Farba',
			'\n!Skratka',
			'\n!Názov'
		)
	for i, v in ipairs(data) do
		builder
			:wikitext(
				'\n|-',
				'\n| ', i,
				'\n| '
			)
		builder
			:tag("span"):css({ display = "none"}):wikitext(v._sk):done()
			:tag("span"):css({ border = "none", background = "none", ["text-aling"] = "left", margin = "0px!important"})
				:tag("span"):css({border = "solid 1px silver", background = v.color, ["font-size"] = "80%!important", ["vertical-align"] = "middle", })
					:wikitext("&nbsp;&nbsp;&nbsp;&nbsp;")
				:done()
				:wikitext('&nbsp;', v.kolor)
			:done()
			:wikitext('\n| '):tag("span"):css({ display = "none"}):wikitext(v._ss):done():wikitext(v.key)
			:wikitext('\n| '):tag("span"):css({ display = "none"}):wikitext(#v._sn > 0 and "1" or "0", v._sn):done():wikitext(v.name)
	end
	
	builder:wikitext("\n|}")
	local result = tostring(builder)
	mw.log(result, "result")
	return result
end,
}