Module:Bongolium500/main page modules

Documentation for this module may be created at Module:Bongolium500/main page modules/doc

local smwUtil = require('Module:SMW')
local textUtil = require('Module:TextUtil')
local cache = require('mw.ext.LuaCache')
local p = {}
local h = {}
local MONTHS = {"January", "Feburary", "March", "April", "May", "June", "July", "August", "September", "October", "November", "December"}

function p.releaseModule(frame)
	local PREFIX = "MAINPAGERELEASE-"
	local currentDate = frame.args[1]
	
	local outputWidget = cache.get(PREFIX .. currentDate) or ""
	if outputWidget == "" then
		local year, month, day = string.match(currentDate, "(%d+)-(%d+)-(%d+)")
		local monthName = MONTHS[tonumber(month)]
		local pageName = day .. " " .. monthName .. " (releases)"
		local outputWidget = "<div class=\"mainpage-releases tech\" id=\"releases\"><h2>[[" .. pageName .. "|On this day in...]]</h2>"
		local pageText = frame:callParserFunction('#dpl:', {include='*', title=pageName}):gsub(".*-->", ""):gsub("<!--.*", "")
		local releases = textUtil.split(pageText, "*")
		
		local numToReturn = 0
		if #releases < 5 then numToReturn = #releases else numToReturn = 5 end
		local usedNumbers = {}
		for count=1, numToReturn do
			local ranNum = math.random(1, #releases)
			while usedNumbers[ranNum] do
				ranNum = math.random(1, #releases)
			end 
			usedNumbers[ranNum] = true
			local randomRelease = releases[ranNum]
			local temp = textUtil.split(randomRelease, " %- ")
			local year = temp[1]
			if not string.find(year, "%[%[") then
				year = "[[" .. year .. " (releases)|" .. year .. "]]"
			end
			local text = temp[2]:gsub("'\"`UNIQ.*QINU`\"'")
			outputWidget = outputWidget .. "\n<h3>..." .. year .."</h3>\n<span>" .. text .. "</span>"
		end
		
		outputWidget = outputWidget .. "</div>"
		cache.set(PREFIX .. currentDate, outputWidget)
	end
	return outputWidget
end

function p.birthdayModule(frame)
	local PREFIX = "MAINPAGEBIRTHDAY-"
	local currentDate = frame.args[1]
	
	local outputWidget = cache.get(PREFIX .. currentDate) or ""
	if outputWidget == "" then
		local year, month, day = string.match(currentDate, "(%d+)-(%d+)-(%d+)")
		local monthName = MONTHS[tonumber(month)]
		local pageName = day .. " " .. monthName .. " (people)"
		local outputWidget = "<div class=\"mainpage-birthdays tech\" id=\"birthdays\"><h2>[[" .. pageName .. "|Today's Birthdays!]]</h2> \n <table>"
		local pageText = frame:callParserFunction('#dpl:', {include='*', title=pageName}):gsub(".*-->", ""):gsub("<!--.*", "")
		local events = textUtil.split(pageText, "*")
		local birthdays = {}
		local position = "left"
		for _, event in pairs(events) do
			if string.find(event, "born") then
				local birthday = event:gsub(".* %- ", "")
				local temp = textUtil.split(birthday, "%.")
				local person = temp[1]:gsub(" was born.*", "")
				local source = temp[2]
				local pageName = person:gsub(".*%[%[", ""):gsub("|.*", "")
				local smwImage = mw.smw.ask( "[[" .. pageName .. "]]" .. "\n|?Has image")[1]["Has image"]
				local image = ""
				if smwImage then
					image = "<span style=\"float:" .. position .. ";padding:2px;\">[[" .. smwImage .. "|75px]]</span>"
					if position == "left" then
						position = "right"
					else
						position = "left"
					end
				end
				outputWidget = outputWidget .. "\n<tr><td>" .. image .. "Happy birthday to " .. person .. "! " .. source .. "</td></tr>"
				outputWidget = outputWidget:gsub("'\"`UNIQ.*", "")
			end
		end
		outputWidget = outputWidget .. "</table></div>"
		cache.set(PREFIX .. currentDate, outputWidget)
	end
	return outputWidget
end

return p