Modul:Infokutija vojni sukob

Izvor: Wikipedija
Prijeđi na navigaciju Prijeđi na pretragu

Dokumentaciju za ovaj modul možete napraviti na stranici Modul:Infokutija vojni sukob/dok

require('Module:No globals')

local infoboxStyle = mw.loadData('Module:WPMILHIST Infobox style')

local IMC = {}
IMC.__index = IMC

function IMC:renderPerStrana(builder, headerText, prefix, suffix)
	prefix = prefix or ''
	suffix = suffix or ''
	local colspans = {}
	
	-- This may result in colspans[1] getting set twice, but
	-- this is no big deal. The second set will be correct.
	local lastStrana = 1
	
	for i = 1,self['strane'] do
		if self.args[prefix .. i .. suffix] then
			colspans[lastStrana] = i - lastStrana
			lastStrana = i
		end
	end

	local jointText = self.args[prefix .. (self['strane'] + 1) .. suffix]
	
	if headerText and (colspans[1] or jointText) then
		builder:tag('tr')
			:tag('th')
				:attr('colspan', self['strane'])
				:cssText(infoboxStyle.header_raw)
				:wikitext(headerText)
	end

	-- The only time colspans[1] wouldn't be set is if no
	-- combatant has a field with the given prefix, and suffix.
	if colspans[1] then
		-- Since each found argument set the colspan for the previous
		-- one, the final one wasn't set above, so set it now.
		colspans[lastStrana] = self['strane'] - lastStrana + 1
		builder = builder:tag('tr')
		for i = 1,self['strane'] do
			-- At this point, colspans[i] will be set for i=1 unconditionally, and for
			-- any other value of i where self.args[prefix .. i .. suffix] is set.
			if colspans[i] then
				builder:tag('td')
					-- don't bother emitting colspan="1"
					:attr('colspan', colspans[i] ~= 1 and colspans[i] or nil)
					:css('width', math.floor(100 / self['strane'] * colspans[i] + 0.5) .. '%')
					-- no border on the right of the rightmost column
					:css('border-right', i ~= lastStrana and infoboxStyle.internal_border or nil)
					-- no padding on the left of the leftmost column
					:css('padding-left', i ~= 1 and '0.25em' or nil)
					-- don't show the border if we're directly under a header
					:css('border-top', not headerText and infoboxStyle.internal_border or nil)
					:newline()
					:wikitext(self.args[prefix .. i .. suffix])
			end
		end
	end

	if jointText then
		builder:tag('tr')
			:tag('td')
				:attr('colspan', self['strane'])
				:css('text-align', 'center')
				-- don't show the border if we're directly under a header
				:css('border-top', (not headerText or colspans[1]) and infoboxStyle.internal_border or nil)
				:newline()
				:wikitext(jointText)
	end
end

function IMC:renderHeaderTable(builder)
	builder = builder:tag('table')
		:css('width', '100%')
		:css('margin', 0)
		:css('padding', 0)
		:css('border', 0)
                :css('font-size', '100%')

	if self.args['datum'] or self.args['vreme'] or self.args['vrijeme'] then
		builder:tag('tr')
			:tag('th')
				:css('padding-right', '1em')
                                :css('text-align', 'right')
				:wikitext('Vrijeme:')
			:done()
			:tag('td')
				:wikitext(self.args['datum'] or self.args['vreme'] or self.args['vrijeme'])
	end

	builder = builder:tag('tr')
		:tag('th')
			:css('padding-right', '1em')
                        :css('text-align', 'right')
			:wikitext('Mjesto:')
		:done()
		:tag('td')
			:tag('span')
				:addClass('location')
				:wikitext(self.args['lokacija'] or self.args['mesto'] or '{{{lokacija}}}') or self.args['mjesto'] -- hack so that people who don't know Lua know that this parameter is required
			:done()
	if self.args['koordinate'] then
		builder:wikitext('<br />' .. self.args['koordinate'])
	end
	builder = builder:done():done()

	-- only for "Putsch"
    if self.args['akcija'] then
		builder:tag('tr')
			:tag('th')
				:css('padding-right', '1em')
				:wikitext(self.args['akcija'] and 'Akcija:')
			:done()
			:tag('td')
				:wikitext(self.args['akcija'])
	end

	if self.args['povod'] or self.args['casus'] then
		builder:tag('tr')
			:tag('th')
				:css('padding-right', '1em')
                                :css('text-align', 'right')
				:wikitext('Povod:')
			:done()
			:tag('td')
				:wikitext(self.args['povod'])
	end

	if self.args['uzrok'] then
		builder:tag('tr')
			:tag('th')
				:css('padding-right', '1em')
                                :css('text-align', 'right')
				:wikitext('Uzrok:')
			:done()
			:tag('td')
				:wikitext(self.args['uzrok'])
	end

	if self.args['status'] or self.args['rezultat'] or self.args['ishod'] then
		builder:tag('tr')
			:tag('th')
				:css('padding-right', '1em')
                                :css('text-align', 'right')
				:wikitext(self.args['status'] and 'Status:' or 'Rezultat:')
			:done()
			:tag('td')
				:newline()
				:wikitext(self.args['status'] or self.args['rezultat'] or self.args['ishod'])
	end

	if self.args['teritorija'] or self.args['teritorij'] then
		builder:tag('tr')
			:tag('th')
				:css('padding-right', '1em')
				:wikitext('Teritorijalne<br />promjene:')
			:done()
			:tag('td')
				:newline()
				:wikitext(self.args['teritorija'] or self.args['teritorij'])
	end
end

function IMC:render()
	local builder = mw.html.create()
	if self.args['vojna_kampanja'] or self.args['kampanja'] or self.args['pohod'] then
		builder = builder:tag('table')
			:css('float', 'right')
			:css('clear', 'right')
			:css('background', 'transparent')
			:css('margin', 0)
			:css('padding', 0)
			:tag('tr'):tag('td')
	end
	builder = builder:tag('table')
		:addClass('infobox vevent')
		:cssText(infoboxStyle.main_box_raw_auto_width)
		:css('width', self.args['širina'] or '315px')

	builder:tag('tr')
		:tag('th')
			:addClass('summary')
			:attr('colspan', self['strane'])
			:cssText(infoboxStyle.header_raw)
                        :css('font-size', '140%')
                        :css('padding', '0.25em 0em 0.25em 0em')
			:wikitext(self.args['sukob'] or self.args['rat'] or self.args['bitka'] or self.args['pobuna'] or self.args['revolucija'] or self.args['državni_udar'] or self.args['puč'] or self.args['državni_puč'] or self.args['vojni_puč'] or self.args['narodni_puč'] or self.args['kampanja'] or mw.title.getCurrentTitle().text)
	if self.args['deo'] or self.args['dio'] then
		builder:tag('tr')
			:tag('td')
				:attr('colspan', self['strane'])
				:cssText(infoboxStyle.sub_header_raw)
                                :css('font-size', '95%')
				:wikitext('Deo ' .. self.args['deo'] or self.args['dio'])
	end
	if self.args['slika'] then
		builder:tag('tr')
			:tag('td')
				:attr('colspan', self['strane'])
				:cssText(infoboxStyle.image_box_raw)
                                :css('font-size', '90%')
				:wikitext(string.format('%s%s%s',
					require('Module:InfoboxImage').InfoboxImage{args = {
						image = self.args['slika'],
						size = self.args['veličina_slike'] or self.args['širina_slike'],
						sizedefault = 'frameless',
						upright = 1,
						alt = self.args['alternativni_tekst']
					}},
					self.args['opis_slike'] and '<br />' or '',
					self.args['opis_slike'] or ''
				))
	end

	self:renderHeaderTable(builder:tag('tr'):tag('td'):attr('colspan', self['strane']))
	self['renderPerStrana'](self, builder:css('font-size', '85%'), self.args['vođstvo_sukobljenih_strana'] or self.args['Vodstvo_sukobljenih_strana'] or 'Sukobljene strane', 'strana')
	-- can be un-hardcoded once gerrit:165108 is merged
        
	for _,v in ipairs{'a','b','v','g'} do
       
		self['renderPerStrana'](self, builder, nil, 'strana', v)
	end
	
	self['renderPerStrana'](self, builder, 'Komandanti i vođe', 'komandant')
	self['renderPerStrana'](self, builder, 'Komandanti i vođe', 'zapovednik')
        self['renderPerStrana'](self, builder, 'Komandanti i vođe', 'zapovjednik')
	self['renderPerStrana'](self, builder, 'Uključene jedinice', 'jedinice')
        self['renderPerStrana'](self, builder, 'Uključene jedinice', 'postrojbe')
	self['renderPerStrana'](self, builder, 'Snaga', 'jačina')
        self['renderPerStrana'](self, builder, 'Snaga', 'snaga')
	self['renderPerStrana'](self, builder, 'Politička podrška', 'politička_jačina')
        self['renderPerStrana'](self, builder, 'Politička podrška', 'politička_snaga')
	self['renderPerStrana'](self, builder, 'Vojna podrška', 'vojna_jačina')
        self['renderPerStrana'](self, builder, 'Vojna podrška', 'vojna_snaga')
	self['renderPerStrana'](self, builder, 'Žrtve i gubici', 'gubici')
        self['renderPerStrana'](self, builder, 'Žrtve i gubici', 'gubitci')
        self['renderPerStrana'](self, builder, 'Žrtve i gubici', 'žrtve')

	if self.args['napomene'] then
		builder:tag('tr')
			:tag('td')
				:attr('colspan', self['strane'])
				:css('font-size', '90%')
				:css('border-top', infoboxStyle.section_border)
				:newline()
				:wikitext(self.args['napomene'])
	end
	if self.args['tip_mape'] then
		builder:tag('tr')
			:tag('td')
				:attr('colspan', self['strane'])
				:css('border-top', infoboxStyle.internal_border)
				:tag('center')
					:node(require('Module:Location map').main(self.frame, {
						self.args['tip_mape'],
						relief = self.args['reljef_mape'],
						lat = self.args['geografska_širina'],
						long = self.args['geografska_dužina'],
						width = self.args['veličina_mape'] or 220,
						float = 'center',
						border = 'none',
						mark = self.args['oznaka_mape'],
						marksize = self.args['veličina_oznake'] or 8,
						label = self.args['tekst_oznake'],
						alt = self.args['alternativni_tekst_mape'],
						caption = self.args['opis_mape'] or ('Lokacija sukoba na mapi ' .. self.args['lokacija_genitiv'])
					}))
	end
	builder = builder:done()
	if self.args['vojna_kampanja'] or self.args['kampanja'] or self.args['pohod'] then
		builder = builder:done():done():tag('tr')
			:tag('td')
				:wikitext(self.args['vojna_kampanja'] or self.args['kampanja'] or self.args['pohod'])
			:done()
		:done()
	end
	return builder
end

function IMC.new(frame, args)
	if not args then
		args = require('Module:Arguments').getArgs(frame, {wrappers = 'Template:Infokutija02 vojni sukob'})
	end
	local obj = {
		frame = frame,
		args = args
	}

	-- dok gerrit:165108 ne bude uključen, postojaće cap-ovi na stranama, ali čim se uključi, može se apdejtovati ovo malo koda da bi se strane uncap-ovale
	-- takođe, ne pokušavajte ovo učiniti efikasnijim ili bi u protivnom reference mogle da budu poređane kako ne treba
	obj['strane'] = 2
	for _,v in ipairs{'', 'a', 'b', 'c', 'd'} do
		for i = 1,5 do
			if args['strana' .. i .. v] then
				obj['strane'] = math.max(obj['strane'], i)
			end
		end
	end

	return setmetatable(obj, IMC)
end

local p = {}

function p.main(frame)
	return IMC.new(frame):render()
end

return p