Module:Str find word: Difference between revisions

Revision as of 09:24, 17 November 2021

Latest revision as of 00:35, 3 April 2023

(13 intermediate revisions by 4 users not shown)

Line 1:

require('strict')

--- STABLE: 16-11-2021 20:30

-- todo: sep = len 1 max

-- not %escape then?

--- test {{!}}

require('Module:No globals')

local p = {}

local getArgs = require('Module:Arguments').getArgs

Line 15 ⟶ 10:

local report -- to be initinated when explain needed

-- Initialise the /report subpage.

-- only invoked when needed when 'explain' asked

local function initReport()

report = require('Module:Str find word/report')

end

-- Turn "A" into "A" etc. asap

-- and reduce multi-spaces (including nbsp etc.) into single space

local function decodeUnicode(str)

Line 37 ⟶ 32:

-- step 1: when case-insensitive, turn string into lowercase

-- step 2: read & remove Literals ("..")

-- step 3: readsread comma-separated words

-- step 4: when booleans=T, change boolean words into true/false (module:yesno rules)

-- all words returned are trimmed, TODO and all ws into single-plainspace?

-- only T/F words are edited, other words rtemainremain, untouched

-- return the table (a straight array)

local function buildWordTable(tArgs, sWordlist)

Line 49 ⟶ 44:

-- Step 1: case-sensitive

if yesno(tArgs.case, falsetrue) == false then

sWordlist = string.lower(sWordlist)

end

Line 87 ⟶ 82:

eSep = escape_word(tArgs.sep)

local patstring = '%f[^' .. eSep .. '][^' .. eSep .. ']+%f[' .. eSep .. ']'

if yesno(tArgs.explain, truefalse) then

report.xpMessage('1.eSep: ' .. eSep) -- dev

report.xpMessage('2.pattern: ' .. patstring) -- dev

Line 108 ⟶ 103:

end

-- Step 4: when read booleans, converse to words to true/false

-- todo: check parameter here not elsewhere

if tArgs.booleans then

if tArgs.booleans then -- TODO if Yesno(tArgs.booleans) ...

local sBool

for i, v in ipairs(wordTable) do

Line 167 ⟶ 163:

bAND = true

end

return bAND, tHits

end

Line 230 ⟶ 226:

-- explain=testcases => WHEN in ns: template: or user: AND subpage = '/testcases' THEN show permanently

local function checkExplain(tArgs)

return false -- never. 22Mar2023 checkExplain(newArgs)

if yesno(tArgs.explain, true) then

if yesno(tArgs.explain, false) == true then -- explicit True so preview show

if isPreview() == true then

return true

end

elseif tArgs.explain == 'testcases' then

local titleObj = mw.title.getCurrentTitle()

if titleObj:inNamespaces('template', 'user')

and titleObj.subpageText == 'testcases'

and titleObj.isSubpage then

return 'testcases'

end

end

end

return false

end

Line 278 ⟶ 260:

-- No words to check

resultALL = false

if yesno(tArgs.explain, truefalse) then

report.xpNoWords(tArgs, sourceWordTable, andWordTable, orWordTable)

end

Line 302 ⟶ 284:

end

if yesno(tArgs.explain, truefalse) then

if tArgs.yes ~= nil then

if (tArgs.yes == '') and (tArgs.no == '') then

Line 358 ⟶ 340:

newArgs['orString'] = decodeUnicode(origArgs['orw'] or origArgs['orwords'] or '')

-- boolean options: catch both parameters, also handle nil & nonsense input values:

newArgs['case'] = yesno(origArgs['case'] or origArgs['casesensitive'] or falsetrue, falsetrue) -- defaults to FalseTrue

newArgs['booleans'] = yesno(origArgs['bool'] or origArgs['booleans'] or false, false) -- defaults to False

newArgs['literals'] = yesno(origArgs['literals'] or origArgs['lit'] or true, true) -- defaults to True

newArgs['yes'] = origArgs['yes'] or nil -- nil; default so return sYeslist; keep '' as legal input & return value

newArgs['no'] = origArgs['no'] or ''

newArgs['explain'] = origArgs['explain']false or-- falsenever. 22Mar2023 checkExplain(newArgs)

newArgs.explain = false -- never. 22Mar2023 checkExplain(newArgs)

return newArgs

Line 376 ⟶ 358:

tArgs = parseArgs(origArgs)

if yesno(tArgs.explain, truefalse) then

initReport()

report.xpListArguments(origArgs)

Line 388 ⟶ 370:

end

if yesno(tArgs.explain, truefalse) then

return sReturn .. report.xpPresent(tArgs.explain)

else