Module:ProjectCounts - Revision history

Al Piskun at 00:12, 1 October 2026

2026-10-01T00:12:43Z

@@ Line 1: / Line 1: @@
 -- Module:ProjectCounts
 local p = {}
@@ Line 42: / Line 52: @@
 end
 function p.count(frame)
 	return countSection(frame.args.page or 'BOINC projects', frame.args[1] or '')
 end
 function p.total(frame)
 	local page = frame.args.page or 'BOINC projects'
@@ Line 60: / Line 68: @@
 end
 function p.documented(frame)
 	local page = frame.args.page or 'Main Page'
@@ Line 80: / Line 86: @@
 		end
 	end
 	return n
 end
 return p

Al Piskun at 20:44, 30 September 2026

2026-09-30T20:44:04Z

@@ Line 1: / Line 1: @@
--- Counts data rows in the wikitable(s) inside one named section of a page.
+-- Module:ProjectCounts
 local p = {}
 local function esc(s) return (s:gsub('(%W)', '%%%1')) end
 function p.count(frame)
-    local section = mw.text.trim(frame.args[1] or '')
+	return countSection(frame.args.page or 'BOINC projects', frame.args[1] or '')
-    local title = mw.title.new(frame.args.page or 'BOINC projects')
+end
-    -- Section ends at the next heading of the same or higher level
+-- {{#invoke:ProjectCounts|total|Section A|Section B|...|page=Page title}}
-    local secEnd = #content + 1
+function p.total(frame)
-    local pos = hEnd
+	local page = frame.args.page or 'BOINC projects'
-    while true do
+	local content = getContent(page)
-        local nStart, nEnd, nMarks = content:find('\n(=+)', pos)
+	if not content then return 0 end
-        if not nStart then break end
+	local sum = 0
-        if #nMarks <= depth then secEnd = nStart break end
+	for _, s in ipairs(frame.args) do
-        pos = nEnd
+		local body = getSection(content, mw.text.trim(s))
-    end
+		if body then sum = sum + countRows(body) end
-    local body = '\n' .. content:sub(hEnd + 1, secEnd - 1)
+-- {{#invoke:ProjectCounts|documented|Local BOINC project wiki pages|page=Main Page}}
-    local _, tables = body:gsub('\n{|', '')
+-- Counts distinct mainspace article links in a section, skipping redlinks.
-    local _, seps   = body:gsub('\n|%-', '')
+function p.documented(frame)
-    -- each table has one header-row separator; the rest are data rows
+	local page = frame.args.page or 'Main Page'
-    return math.max(seps - tables, 0)
+	local section = mw.text.trim(frame.args[1] or 'Local BOINC project wiki pages')
 end
 return p

Al Piskun: Created page with "-- Counts data rows in the wikitable(s) inside one named section of a page. -- Usage: {{#invoke:ProjectCounts|count|Active BOINC Projects|page=BOINC projects}} local p = {} local function esc(s) return (s:gsub('(%W)', '%%%1')) end function p.count(frame) local section = mw.text.trim(frame.args[1] or '') local title = mw.title.new(frame.args.page or 'BOINC projects') if not title then return 0 end local content = title:getContent() if not content the..."

2026-09-30T16:02:21Z

Created page with "-- Counts data rows in the wikitable(s) inside one named section of a page. -- Usage: {{#invoke:ProjectCounts|count|Active BOINC Projects|page=BOINC projects}} local p = {} local function esc(s) return (s:gsub('(%W)', '%%%1')) end function p.count(frame) local section = mw.text.trim(frame.args[1] or '') local title = mw.title.new(frame.args.page or 'BOINC projects') if not title then return 0 end local content = title:getContent() if not content the..."

New page

-- Counts data rows in the wikitable(s) inside one named section of a page.
-- Usage: {{#invoke:ProjectCounts|count|Active BOINC Projects|page=BOINC projects}}
local p = {}

local function esc(s) return (s:gsub('(%W)', '%%%1')) end

function p.count(frame)
local section = mw.text.trim(frame.args[1] or '')
local title = mw.title.new(frame.args.page or 'BOINC projects')
if not title then return 0 end
local content = title:getContent()
if not content then return 0 end

-- Find the heading line, any level: ==== Active BOINC Projects ====
local hStart, hEnd, marks = content:find('\n(=+)%s*' .. esc(section) .. '%s*=*')
if not hStart then return 0 end
local depth = #marks

-- Section ends at the next heading of the same or higher level
local secEnd = #content + 1
local pos = hEnd
while true do
local nStart, nEnd, nMarks = content:find('\n(=+)', pos)
if not nStart then break end
if #nMarks <= depth then secEnd = nStart break end
pos = nEnd
end

local body = '\n' .. content:sub(hEnd + 1, secEnd - 1)
local _, tables = body:gsub('\n{|', '')
local _, seps = body:gsub('\n|%-', '')
-- each table has one header-row separator; the rest are data rows
return math.max(seps - tables, 0)
end

return p