Tekst źródłowy strony Moduł:Portal

local tools = require('Moduł:Narzędzia')
local p = {}

local function makePanel(args, stack, num, wrapDiv)
	local color = args.kolor or '#c7c7c7'
	local text = args['panel' .. num]
	if text == '-' or text == '' then return end
	
	local title = args['ptytuł' .. num] or ''
	local h2 = mw.html.create( 'h2' )
	h2:css('border-bottom', '2px solid' .. color .. '!important')
		:wikitext(title)
		
	if wrapDiv then
		table.insert(stack, tostring(h2) .. '<div>\n' .. text .. '\n</div>')	
	else
		table.insert(stack, tostring(h2) .. '\n' .. text)
	end
end

-- Znajduje zbiór stron "należących" do portalu i dodaje odpowiednie
-- właściwości semantyczne do śledzenia tego.
local function findRelevantPages(args)
	local pages = {}
	
	-- Artykuły podane explicite
	local arts = mw.text.split( args['artykuły'] or '', '#', true )
	for _, art in ipairs(arts) do
		local art2 = mw.text.trim(art)
		if art2 ~= '' then
			table.insert(pages, mw.text.trim(art))
		end
	end
	
	-- Wyszukiwanie wg kategorii
	if args['kategorie'] then
		local res = mw.smw.getQueryResult{
			args['kategorie'] .. ' [[Modification date::+]]', 
			limit=1000 -- większych portali raczej nie powinno być
		}
		for _, r in ipairs(res.results or {}) do
			if r.exists == '1' then
				table.insert(pages, r.fulltext)
			end
		end
	end
	
	-- Ustawiamy właściwości semantyczne
	if #arts > 0 then
		mw.smw.set( { 
			['Zawiera artykuł'] = pages
		} )
	end
end

function p.desktop(frame)
	local args = tools.getArgs(frame)
	findRelevantPages(args)
	
	local lstack, rstack = {}, {}
	
	local function subpanel(num)
		if num % 2 == 1 then
			makePanel(args, lstack, num, true)
		else
			makePanel(args, rstack, num, true)
		end
	end
	
	for i = 1, 50 do
		if args['panel' .. i] ~= nil then subpanel(i)
		else break end
	end
	
	lstack = table.concat(lstack, '\n')
	rstack = table.concat(rstack, '\n')
	local td = '<td width="50%" style="vertical-align: top; padding-'
	return '<tr>' .. td .. 'right: 25px">' .. lstack .. '</td>' .. 
		td .. 'left: 25px">' .. rstack .. '</td></tr>'
end

function p.mobile(frame)
	local args = tools.getArgs(frame)
	findRelevantPages(args)
	
	local stack = {}
	
	for i = 1, 50 do
		if args['panel' .. i] ~= nil then makePanel(args, stack, i)
		else break end
	end
	
	return table.concat(stack, '\n')
end

return p