وحدة:صندوق كرة قدم

من ويكيبيديا، الموسوعة الحرة
-- Implements [[Template:صندوق كرة قدم]]
local p = {}
local lang = nil
local delink = require('Module:Delink')._delink
local eventschema = "http://schema.org/SportsEvent"
local teamschema = "http://schema.org/SportsTeam"
local placeschema = "http://schema.org/Place"
local penalties = '[[ركلات جزاء ترجيحية (كرة القدم)|ركلات الترجيح]]'
local aet = '[[وقت إضافي|ب.و.إ.]]'
local attendance = 'الحضور:'
local referee = 'الحكم:'

local function timestamp(d, t)
	if d then
		lang = lang or mw.language.getContentLanguage() -- lazy initialize
		local success, timestamp = pcall(lang.formatDate, lang, 'c', delink(d .. ' ' .. (t or '')))
		if success then
			return timestamp
		else
			return nil
		end
	end
	return nil
end

local function fmtlist(s)
	s = mw.ustring.gsub(s or '', '%[%[ *([%?-]) *%]%]', '%1')
	s = mw.ustring.gsub(s, '%[%[ *[%?-] *| *(.-) *%]%]', '%1')
	if mw.ustring.sub(s, 1, 1) == '*' then
		return tostring(mw.html.create('div'):addClass('plainlist'):newline():wikitext(s))
	end
	return s
end

local function makelink(s,t)
	if s:match('^http') then
		return '[' .. s .. ' ' .. t .. ']'
	end
	return s
end

local function trim(s)
	return s:match('^[\'"%s]*(.-)[\'"%s]*$')
end

local function getid(s)
	s = trim(s or '')
	if s and s ~= '' then
		return s
	end
	return nil
end

function p.main(frame)
	local args = require('Module:Arguments').getArgs(frame)

        args['نتيجة1'] = args['نتيجة1'] or args['score1']
        args['نتيجة2'] = args['نتيجة2'] or args['score2']
        args['نتيجة'] = args['نتيجة'] or args['score']
        args['ب.و.إ.'] = args['ب.و.إ.'] or args['aet']
        args['حدث'] = args['حدث'] or args['event']
        args['تاريخ'] = args['تاريخ'] or args['date']
        args['وقت'] = args['وقت'] or args['time']
        args['جولة'] = args['جولة'] or args['round']
        args['فريق1'] = args['فريق1'] or args['team1']
        args['فريق2'] = args['فريق2'] or args['team2']
        args['أهداف1'] = args['أهداف1'] or args['goals1']
        args['أهداف2'] = args['أهداف2'] or args['goals2']
        args['ركلات جزاء1'] = args['ركلات جزاء1'] or args['penalties1']
        args['ركلات جزاء2'] = args['ركلات جزاء2'] or args['penalties2']
        args['نتيجة ركلات جزاء'] = args['نتيجة ركلات جزاء'] or args['penaltyscore']
        args['تقرير'] = args['تقرير'] or args['report']
        args['ملعب'] = args['ملعب'] or args['stadium']
        args['موقع'] = args['موقع'] or args['location']
        args['حضور'] = args['حضور'] or args['attendance']
        args['حكم'] = args['حكم'] or args['referee']

	local id = getid(args['هوية'] or args['id'])
	local d = timestamp( args['تاريخ'], args['وقت'])
	local block

	local score = 'v'
	if args['نتيجة1'] or args['نتيجة2'] then
		score = (args['نتيجة1'] or '0') .. '–' .. (args['نتيجة2'] or '0')
	elseif args['نتيجة'] and args['نتيجة'] ~= '' then
		score = args['نتيجة']
	end
	if args['ب.و.إ.'] then
		score = score .. ' (' .. aet .. ')'
	end
	
	-- Start box
	local root = 
		mw.html.create('div')
			:attr('itemscope', '')
			:attr('itemtype', eventschema)
			:css('width', args['size'])
			:css('background-color', args['bg'])
			:css('clear', 'both')
			:css('overflow', 'auto')
			:attr('id', id)
	root:newline()
	
	if args['حدث'] then
		root:tag('div')
			:css('text-align', 'center')
			:css('font-weight', 'bold')
			:wikitext(args['حدث'])
	end
	
	-- Start left block
	block = root:tag('div')
		:addClass('mobile-float-reset')
		:css('float', 'right')
		:css('width', '15%')
		:css('padding', '2px 0')
		:css('overflow', 'auto')
	
	local timetag = block:tag('time')
		:attr('itemprop', d and 'startDate' or nil)
		:attr('datetime', d)
		:css('display', 'block')
		:css('overflow', 'auto')
		
	timetag:tag('span')
		:addClass('mobile-float-reset')
		:css('display', 'block')
		:css('float', 'left')
		:wikitext(args['تاريخ'])
	
	if args['وقت'] then
		timetag:tag('span')
			:addClass('mobile-float-reset')
			:css('display', 'block')
			:css('clear', 'left')
			:css('float', 'left')
			:wikitext(args['وقت'])
	end
	
	if args['جولة'] then
		block:tag('div')
			:addClass('mobile-float-reset')
			:css('clear', 'right')
			:css('float', 'left')
			:wikitext(args['جولة'])
	end
	-- End block
	
	-- Start table
	local rtable = root:tag('table')
		:css('float', 'right')
		:css('width', '61%')
		:css('table-layout', 'fixed')
		:css('text-align', 'center')
	local row = rtable:tag('tr')
		:attr('itemprop', 'name')
		:css('vertical-align', 'top')
	row:newline()
	row:tag('th')
		:css('width', '39%')
		:css('text-align', 'left')
		:attr('itemprop', 'homeTeam')
		:attr('itemscope', '')
		:attr('itemtype', teamschema)
		:tag('span')
			:attr('itemprop', 'name')
			:wikitext(args['فريق1'])
	row:tag('th')
		:css('width', '22%')
		:wikitext(score)
	row:tag('th')
		:css('width', '39%')
		:css('text-align', 'right')
		:attr('itemprop', 'awayTeam')
		:attr('itemscope', '')
		:attr('itemtype', teamschema)
		:tag('span')
			:attr('itemprop', 'name')
			:wikitext(args['فريق2'])

	row = rtable:tag('tr')
		:css('vertical-align', 'top')
		:css('font-size', '85%')
		:newline()
	row:tag('td')
		:css('text-align', 'left')
		:wikitext(fmtlist(args['أهداف1']))
	row:newline()
	row:tag('td')
		:wikitext(makelink(args['تقرير'] or '', 'تقرير'))
	row:newline()
	row:tag('td')
		:css('text-align', 'right')
		:wikitext(fmtlist(args['أهداف2']))
	row:newline()	
	
	if args['نتيجة ركلات جزاء'] then
		rtable
			:tag('tr')
				:tag('th')
					:attr('colspan', 3)
					:wikitext(penalties)
		row = rtable:tag('tr')
			:css('vertical-align', 'top')
			:css('font-size', '85%')
		row:newline()
		row:tag('td')
			:css('text-align', 'left')
			:wikitext(fmtlist(args['ركلات جزاء1']))
		row:newline()
		row:tag('th')
			:wikitext(args['نتيجة ركلات جزاء'])
		row:newline()
		row:tag('td')
			:css('text-align', 'right')
			:wikitext(fmtlist(args['ركلات جزاء2']))
		row:newline()
	end
	-- End table
	
	-- Start right block
	block = root:tag('div')
		:addClass('mobile-float-reset')
		:css('float', 'left')
		:css('font-size', '85%')
		:css('width', '24%')
		:css('padding', '2px 0')
	
	if args['ملعب'] then
		local sdiv = block:tag('div')
			:attr('itemprop', 'موقع')
			:attr('itemscope', '')
			:attr('itemtype', placeschema)
		if args['موقع'] then
			sdiv:tag('span')
				:attr('itemprop', 'name')
				:wikitext(args['ملعب'])
			sdiv:wikitext(', ')
			sdiv:tag('span')
				:attr('itemprop', 'address')
				:wikitext(args['موقع'])
		else
			sdiv:tag('span')
				:attr('itemprop', 'name address')
				:wikitext(args['ملعب'])
		end
	end
	
	if args['حضور'] then 
		block:tag('div'):wikitext(attendance ..' ' .. args['حضور'])
	end
	if args['حكم'] then
		block:tag('div'):wikitext(referee .. ' ' .. args['حكم'])
	end

	return tostring(root)
end

return p