Module:Detect singular - Revision history

Admin: 1 revision imported

2022-12-06T09:40:41Z

1 revision imported

← Older revision	Revision as of 15:10, 6 December 2022
(No difference)

wikipedia>Hike395: ignore br elements immediately before (per Frietjes)

2022-09-08T04:24:04Z

ignore br elements immediately before </div> (per Frietjes)

← Older revision		Revision as of 09:54, 8 September 2022
Line 14:		Line 14:
	return count		return count
	end		end

			local singular = 1
			local likelyPlural = 2
			local plural = 3

	-- Determine whether a string is singular or plural (i.e., it represents one		-- Determine whether a string is singular or plural (i.e., it represents one
Line 21:		Line 25:
	-- origArgs.no_comma: if false, use commas to detect plural (default false)		-- origArgs.no_comma: if false, use commas to detect plural (default false)
	-- origArgs.parse_links: if false, treat wikilinks as opaque singular objects (default false)		-- origArgs.parse_links: if false, treat wikilinks as opaque singular objects (default false)
			-- Returns:
			-- singular, likelyPlural, or plural (see constants above), or nil for completely unknown
	function p._main(origArgs)		function p._main(origArgs)
	origArgs = type(origArgs) == 'table' and origArgs or {}		origArgs = type(origArgs) == 'table' and origArgs or {}
Line 41:		Line 47:
	end		end
	s = tostring(s)		s = tostring(s)
	if plainFind(s,'~~forcedetectsingular~~') then -- magic data string to return true		if plainFind(s,'data-plural="0"') then -- magic data string to return true
	return ~~true~~		return singular
	end		end
	if plainFind(s,'~~forcedetectplural~~') then -- magic data string to return false		if plainFind(s,'data-plural="1"') then -- magic data string to return false
	return ~~false~~		return plural
	end		end
	-- count number of list items		-- count number of list items
Line 51:		Line 57:
	-- if exactly one, then singular, if more than one, then plural		-- if exactly one, then singular, if more than one, then plural
	if numListItems == 1 then		if numListItems == 1 then
	return ~~true~~		return singular
	end		end
	if numListItems > 1 then		if numListItems > 1 then
	return ~~false~~		return plural
	end		end
	-- if "list of" occurs inside of wlink, then it's plural		-- if "list of" occurs inside of wlink, then it's plural
	if mw.ustring.find(s:lower(), '%[%[[^%]]*list of[^%]]+%]%]') then		if mw.ustring.find(s:lower(), '%[%[[^%]]*list of[^%]]+%]%]') then
	return ~~false~~		return plural
	end		end
			-- fix for trailing br tags passed through [[template:marriage]]
			s = mw.ustring.gsub(s, '<%sbr[^>]>%s*(</div>)', '%1')
	-- replace all wikilinks with fixed string		-- replace all wikilinks with fixed string
	if rewriteLinks then		if rewriteLinks then
	s = mw.ustring.gsub(s,'%b[]','WIKILINK')		s = mw.ustring.gsub(s,'%b[]','WIKILINK')
	end		end
	-- Five conditions: any one of them can make the string a plural		-- Five conditions: any one of them can make the string a likely plural or plural
	local hasBreak = mw.ustring.find(s,'<%s*br')		local hasBreak = mw.ustring.find(s,'<%s*br')
	-- For the last 4, evaluate on string stripped of wikimarkup		-- For the last 4, evaluate on string stripped of wikimarkup
	s = getPlain(s)		s = getPlain(s)
			local hasBullets = countMatches(s,'%*+') > 1
			local multipleQids = mw.ustring.find(s,'Q%d+[%p%s]+Q%d+') -- has multiple QIDs in a row
			if hasBullets or multipleQids then
			return plural
			end
	local commaPattern = anyComma and '[,;]' or '%D[,;]%D' -- semi-colon similar to comma		local commaPattern = anyComma and '[,;]' or '%D[,;]%D' -- semi-colon similar to comma
	local hasComma = checkComma and mw.ustring.find(s, commaPattern)		local hasComma = checkComma and mw.ustring.find(s, commaPattern)
	local hasAnd = checkAnd and mw.ustring.find(s,'[,%s]and%s')		local hasAnd = checkAnd and mw.ustring.find(s,'[,%s]and%s')
	~~local hasBullets = countMatches(s,'%*+') > 1~~		if hasBreak or hasComma or hasAnd then
	~~local multipleQids = mw.ustring.find(s,'Q%d+[%p%s]+Q%d+') -- has multiple QIDs in a row~~		return likelyPlural
	-- return ~~bool: is it~~ singular?		end
	~~return not (hasComma or hasAnd or hasBreak or hasBullets or multipleQids)~~		return singular
	end		end

Line 81:		Line 94:
	local singularForm = args[3] or args.singular or ""		local singularForm = args[3] or args.singular or ""
	local pluralForm = args[4] or args.plural or ""		local pluralForm = args[4] or args.plural or ""
			local likelyForm = args.likely or pluralForm
	local link = args[5] or args.link		local link = args[5] or args.link
	if link then		if link then
Line 86:		Line 100:
	singularForm = '[['..link..'\|'..singularForm..']]'		singularForm = '[['..link..'\|'..singularForm..']]'
	pluralForm = '[['..link..'\|'..pluralForm..']]'		pluralForm = '[['..link..'\|'..pluralForm..']]'
			likelyForm = '[['..link..'\|'..likelyForm..']]'
	end		end
	if args[2] then		if args[2] then
Line 94:		Line 109:
	return "" -- return blank on complete failure		return "" -- return blank on complete failure
	end		end
	return detect ~~and singularForm or~~ pluralForm		if detect == singular then
			return singularForm
			elseif detect == likelyPlural then
			return likelyForm
			else
			return pluralForm
			end
	end		end

Line 104:		Line 125:
	return 1		return 1
	end		end
	return result and 1 or ""		return result == singular and 1 or ""
	end		end

Admin: 1 revision imported from :alpha:Module:Detect_singular

2022-08-24T16:11:41Z

1 revision imported from alpha:Module:Detect_singular

← Older revision	Revision as of 21:41, 24 August 2022
(No difference)

Admin: 1 revision imported

2022-08-24T15:59:24Z

1 revision imported

← Older revision	Revision as of 21:29, 24 August 2022
(No difference)

alpha>Sandeep: Created page with "local p = {} local getArgs = require('Module:Arguments').getArgs local yesNo = require('Module:Yesno') local getPlain = require('Module:Text').Text().getPlain -- function to..."

2022-03-02T07:42:27Z

Created page with "local p = {} local getArgs = require('Module:Arguments').getArgs local yesNo = require('Module:Yesno') local getPlain = require('Module:Text').Text().getPlain -- function to..."

← Older revision	Revision as of 13:12, 2 March 2022
(No difference)

wikipedia>Hike395: implement named arguments: singular, plural, link

2022-01-28T07:30:24Z

implement named arguments: singular, plural, link

New page

local p = {}
local getArgs = require('Module:Arguments').getArgs
local yesNo = require('Module:Yesno')
local getPlain = require('Module:Text').Text().getPlain

-- function to determine whether "sub" occurs in "s"
local function plainFind(s, sub)
return mw.ustring.find(s, sub, 1, true)
end

-- function to count the number of times "pattern" (a regex) occurs in "s"
local function countMatches(s, pattern)
local _, count = mw.ustring.gsub(s, pattern, '')
return count
end

-- Determine whether a string is singular or plural (i.e., it represents one
-- item or many)
-- Arguments:
-- origArgs[1]: string to process
-- origArgs.no_comma: if false, use commas to detect plural (default false)
-- origArgs.parse_links: if false, treat wikilinks as opaque singular objects (default false)
function p._main(origArgs)
origArgs = type(origArgs) == 'table' and origArgs or {}
local args = {}
-- canonicalize boolean arguments
for key, default in pairs({no_comma=false,parse_links=false,any_comma=false,no_and=false}) do
if origArgs[key] == nil then
args[key] = default
else
args[key] = yesNo(origArgs[key],default)
end
end
local checkComma = not args.no_comma
local checkAnd = not args.no_and
local rewriteLinks = not args.parse_links
local anyComma = args.any_comma
local s = origArgs[1] -- the input string
if not s then
return nil -- empty input returns nil
end
s = tostring(s)
if plainFind(s,'forcedetectsingular') then -- magic data string to return true
return true
end
if plainFind(s,'forcedetectplural') then -- magic data string to return false
return false
end
-- count number of list items
local numListItems = countMatches(s,'<%s*li')
-- if exactly one, then singular, if more than one, then plural
if numListItems == 1 then
return true
end
if numListItems > 1 then
return false
end
-- if "list of" occurs inside of wlink, then it's plural
if mw.ustring.find(s:lower(), '%[%[[^%]]*list of[^%]]+%]%]') then
return false
end
-- replace all wikilinks with fixed string
if rewriteLinks then
s = mw.ustring.gsub(s,'%b[]','WIKILINK')
end
-- Five conditions: any one of them can make the string a plural
local hasBreak = mw.ustring.find(s,'<%s*br')
-- For the last 4, evaluate on string stripped of wikimarkup
s = getPlain(s)
local commaPattern = anyComma and '[,;]' or '%D[,;]%D' -- semi-colon similar to comma
local hasComma = checkComma and mw.ustring.find(s, commaPattern)
local hasAnd = checkAnd and mw.ustring.find(s,'[,%s]and%s')
local hasBullets = countMatches(s,'%*+') > 1
local multipleQids = mw.ustring.find(s,'Q%d+[%p%s]+Q%d+') -- has multiple QIDs in a row
-- return bool: is it singular?
return not (hasComma or hasAnd or hasBreak or hasBullets or multipleQids)
end

function p._pluralize(args)
args = type(args) == 'table' and args or {}
local singularForm = args[3] or args.singular or ""
local pluralForm = args[4] or args.plural or ""
local link = args[5] or args.link
if link then
link = tostring(link)
singularForm = '[['..link..'|'..singularForm..']]'
pluralForm = '[['..link..'|'..pluralForm..']]'
end
if args[2] then
return pluralForm
end
local detect = p._main(args)
if detect == nil then
return "" -- return blank on complete failure
end
return detect and singularForm or pluralForm
end

function p.main(frame)
local args = getArgs(frame)
-- For template, return 1 if singular, blank if plural or empty
local result = p._main(args)
if result == nil then
return 1
end
return result and 1 or ""
end

function p.pluralize(frame)
local args = getArgs(frame)
return p._pluralize(args)
end

return p