Jump to content

Module:NPP backlog

From Wikipedia, the free encyclopedia
This is an old revision of this page, as edited by Joe Roe (talk | contribs) at 12:46, 24 June 2023 (Finish diff). The present address (URL) is a permanent link to this revision, which may differ significantly from the current revision.

local modtime = require('Module:Time').time

local data = mw.loadJsonData("Wikipedia:New pages patrol/Backlog chart/daily")

local backlog = { }
for k,v in ipairs(data) do
	backlog[v["date"]] = v["value"]
end

local function parseDate(day)
	local ymd = {}
	for i in string.gmatch(day, "[0-9]+") do
		table.insert(ymd, i)
	end
	ymd = { year = ymd[1], month = ymd[2], day = ymd[3] }
	return os.time(ymd)
end

local p = {};

function p._articles(date)
	return backlog[date] or 0
end

function p.articles(frame)
	local templateArgs = frame.args
	local date = templateArgs[1] or os.date("%Y-%m-%d")
	return p._articles(date)
end

function p._diff(n1, date)
	local n2 = p._articles(date)
	
	if n2 > 0 then
		return n1 - n2
	else
		local date2 = date
		local days = 0
		while n2 == 0 do
			date2 = os.date("%Y-%m-%d", parseDate(date2) - (60*60*24))
			n2 = p._articles(date2)
			days = days + 1
		end
		return (n1 - n2) / days
	end
end

function p.diff(frame)
	local templateArgs = frame.args
	local n1 = templateArgs[1]
	local date = templateArgs[2] or os.date("%Y-%m-%d")
	return p._diff(date)
end

return p