Módulo:Galeria

A documentação para este módulo pode ser criada na página Módulo:Galeria/doc

-- Este módulo implementa {{galeria}}
local p = {}
local function trim(s)
	return (mw.ustring.gsub(s, "^%s*(.-)%s*$", "%1"))
end
function p.galeria(frame)
	local origArgs
	-- Se chamado via #invoke, use os args passados para o modelo de chamada.
	-- Caso contrário, para fins de teste, assuma argumentos que estão sendo passados diretamente.
	if type(frame.getParent) == 'function' then
		origArgs = frame:getParent().args
	else
		origArgs = frame
	end
				
				-- ParserFunctions considera a cadeia vazia como falsa, de modo a preservar a anterior
				-- comportamentos da {{galeria}} alteraram quaisquer argumentos vazios para zero, então o Lua irá considerá-los
				-- eles são igualmente falsos.
				local args = {}
				for k, v in pairs(origArgs) do
					if v ~= '' then
						args[k] = v
					end
	end
	local tbl = mw.html.create('table')
				
	if args.estado then
		tbl
			:css('width', '100%')
			:addClass('collapsible')
			:addClass(args.estado)
	end
	
	if args.estilo then
		tbl:cssText(args.estilo)
	else
		tbl
			:css('background', 'transparent')
			:css('margin-top', '0.5em')
	end
	
	if args.alinhar then
		tbl:attr('align', args.alinhar)
	end
	
	if args.titulo then
		tbl
			:tag('tr')
				:tag('th')
					:css('text-align', 'center')
					:css('font-weight', 'bold')
					:wikitext(args.titulo)
	end
	
	local mainCell = tbl:tag('tr'):tag('td')
	
	local contImg = math.ceil(#args / 2)
	local celLargura = tonumber(args.celLarg) or tonumber(args.largura) or 180
	local imgAltura = tonumber(args.largura) or 180
	local linhas = tonumber(args.linhas) or 2
	local legEstilo = args.legEstilo
	
				for i = 1, contImg do
		local img = trim(args[i*2 - 1] or '')
		local legenda = trim(args[i*2] or '')
		local imgLargura = tonumber(args['width' .. i]) or tonumber(args.largura) or 180
		local alt = args['alt' .. i] or ''
		
		local textoLargura
		if celLargura < 30 then
			textoLargura = imgAltura + 27
		else
			textoLargura = celLargura + 7
		end
		if img ~= '' then
			local imgTbl = mainCell:tag('table')
												
			imgTbl
				:css('width', (celLargura + 20) .. 'px')
				:css('float', 'left')
				:css('border-collapse', 'collapse')
				:css('margin', '3px')
				:tag('tr')
					:tag('td')
						:css('height', (imgAltura + 20) .. 'px')
						:css('border', '1px solid #CCCCCC')
						:css('background-color', '#F8F8F8')
						:css('padding', '0px')
						:css('text-align', 'center')
						:wikitext(string.format('[[%s|center|border|%dx%dpx|alt=%s|%s]]', img, imgLargura, imgAltura, alt, legenda))
						:done()
					:done()
				:tag('tr')
					:css('vertical-align', 'top')
					:tag('td')
						:css('display', 'block')
						:css('font-size', '1em')
						:css('height', (0.2 + 1.5*linhas) .. 'em')
						:css('padding', '0px')
						:tag('div')
							:addClass('gallerytext')
							:css('height', (0.1 + 1.5*linhas) .. 'em')
							:css('width', textoLargura .. 'px')
							:css('line-height', '1.3em')
							:css('padding', '2px 6px 1px 6px')
							:css('overflow-y', 'auto')
							:css('margin', '0px')
							:css('border', 'none')
							:css('border-width', '0px')
							:cssText(legEstilo)
							:wikitext(legenda .. '&nbsp;')
		end
	end
				
	if args.rodape then
		tbl
			:tag('tr')
				:tag('td')
					:css('text-align', 'right')
					:css('font-size', '80%')
					:css('line-height', '1em')
					:wikitext(args.rodape)
	end
	if args.porlinha then
		tbl:css('width', 8 + (celLargura + 20 + 6)*tonumber(args.porlinha) .. 'px')
	end
	return tostring(tbl)
end
return p