Sergiu: Pagină nouă: local p = {} local arguments = require('Modul:Arguments') local TableTools = require('Modul:TableTools') local function makeInvokeFunc(funcName) return function (frame) local args = arguments.getArgs(frame, { wrappers = 'Format:Ifempty' }) local firstRet,secondRet = p[funcName](args) return firstRet end end -- Adaugă la începutul unui șir un prefix, dacă nu există deja acolo el sau unul dintre cele listate în ultimul argument function p._prependIfMissing(...)...

2024-07-14T19:55:51Z

Pagină nouă: local p = {} local arguments = require('Modul:Arguments') local TableTools = require('Modul:TableTools') local function makeInvokeFunc(funcName) return function (frame) local args = arguments.getArgs(frame, { wrappers = 'Format:Ifempty' }) local firstRet,secondRet = p[funcName](args) return firstRet end end -- Adaugă la începutul unui șir un prefix, dacă nu există deja acolo el sau unul dintre cele listate în ultimul argument function p._prependIfMissing(...)...

Pagină nouă

local p = {}
local arguments = require('Modul:Arguments')
local TableTools = require('Modul:TableTools')

local function makeInvokeFunc(funcName)
return function (frame)
local args = arguments.getArgs(frame, { wrappers = 'Format:Ifempty' })
local firstRet,secondRet = p[funcName](args)
return firstRet
end
end

-- Adaugă la începutul unui șir un prefix, dacă nu există deja acolo el sau unul dintre cele listate în ultimul argument
function p._prependIfMissing(...)
local args = arg.n == 0 and {} or type(arg[1]) == 'table' and arg[1] or arg
local str = args[1] and tostring(args[1]) or nil
local prefix = args[2]
local others = {}
for argIdx = 2, TableTools.size(args) do
table.insert(others, args[argIdx])
end
if str == nil then return nil end
if prefix == nil then return str end

for i, eachPrefix in pairs(others) do
if mw.ustring.find(str, eachPrefix, 1, true) == 1 then return str end
end

return prefix .. str
end
p.prependIfMissing = makeInvokeFunc('_prependIfMissing')

-- Adaugă la sfârșitul unui șir un sufix, dacă nu există deja acolo el sau unul dintre cele listate în ultimul argument
function p._appendIfMissing(...)
local args = arg.n == 0 and {} or type(arg[1]) == 'table' and arg[1] or arg
local str = tostring(args[1])
local suffix = args[2]
local others = {}
for argK,argV in pairs(args) do
if argK > 1 then
table.insert(others, argV)
end
end
if str == nil then return nil end
if suffix == nil then return str end

for i, eachSuffix in pairs(others) do
local suffixStart
local suffixEnd
suffixStart, suffixEnd = mw.ustring.find(str, eachSuffix, 1, true)
if suffixEnd == mw.ustring.len(str) then return str end
end
return str .. suffix
end
p.appendIfMissing = makeInvokeFunc('_appendIfMissing')

function p._emptyToNil(...)
local args = arg.n == 0 and {} or type(arg[1]) == 'table' and arg[1] or arg
local str = args[1]
if str == '' then return nil end
return str
end
p.emptyToNil = makeInvokeFunc('_emptyToNil')

function p._capitalize(...)
local args = arg.n == 0 and {} or type(arg[1]) == 'table' and arg[1] or arg
local str = args[1]
if str == nil then return nil end
return mw.ustring.upper(mw.ustring.sub(str, 1, 1)) .. mw.ustring.sub(str,2);
end
p.capitalize = makeInvokeFunc('_capitalize')

function p._removeStart(...)
local args = arg.n == 0 and {} or type(arg[1]) == 'table' and arg[1] or arg
local str = args[1]
if str == nil then return nil end
for pfIdx = 2,TableTools.size(args) do
local prefix = args[pfIdx]
if prefix == nil then return str end
if mw.ustring.sub(str, 1, mw.ustring.len(prefix)) == prefix then return mw.ustring.sub(str, mw.ustring.len(prefix) + 1, mw.ustring.len(str)) end
end
return str
end
p.removeStart = makeInvokeFunc('_removeStart')

function p._removeEnd(...)
local args = arg.n == 0 and {} or type(arg[1]) == 'table' and arg[1] or arg
local str = args[1]
if str == nil then return nil end
for sfIdx = 2,TableTools.size(args) do
local suffix = args[sfIdx]
if suffix == nil then return str end
if mw.ustring.sub(str, -mw.ustring.len(suffix)) == suffix then return mw.ustring.sub(str, 1, -mw.ustring.len(suffix) - 1) end
end
return str
end
p.removeEnd = makeInvokeFunc('_removeEnd')

function p.__isEmpty(str)
return str == nil or (type(str) == 'string' and mw.ustring.len(str) == 0)
end
function p._isEmpty(...)
local args = arg.n == 0 and {} or type(arg[1]) == 'table' and arg[1] or arg
local str = args[1]
return p.__isEmpty(str)
end
p.isEmpty = makeInvokeFunc('_isEmpty')

function p._trim(...)
local args = arg.n == 0 and {} or type(arg[1]) == 'table' and arg[1] or arg
local str = args[1]
if not str then return nil end
return mw.text.trim(str)
end
p.trim = makeInvokeFunc('_trim')

function p._startsWithAny(...)
local args = arg.n == 0 and {} or type(arg[1]) == 'table' and arg[1] or arg
local str = args[1]
if not str then return false end
local idx = 2
while idx <= TableTools.size(args) do
if args[idx] and mw.ustring.sub(str, 1, mw.ustring.len(args[idx])) == args[idx] then
return true
end
idx = idx + 1
end
return false
end
p.startsWithAny = makeInvokeFunc('_startsWithAny')
p._startsWith = p._startsWithAny
p.startsWith = makeInvokeFunc('_startsWith')

function p._endsWithAny(...)
local args = arg.n == 0 and {} or type(arg[1]) == 'table' and arg[1] or arg
local str = args[1]
if not str then return false end
local idx = 2
while idx <= TableTools.size(args) do
if args[idx] and mw.ustring.sub(str, mw.ustring.len(str) - mw.ustring.len(args[idx]) + 1, mw.ustring.len(str)) == args[idx] then
return true
end
idx = idx + 1
end
return false
end
p.endsWithAny = makeInvokeFunc('_endsWith')
p._endsWith = p._endsWithAny
p.endsWith = makeInvokeFunc('_endsWith')

function p._substringBefore(...)
local args = arg.n == 0 and {} or type(arg[1]) == 'table' and arg[1] or arg
local str = args[1]
if not str then return nil end
local idx = 2
local substringEndPos = 1 + mw.ustring.len(str)
local firstSep = ''
while idx <= TableTools.size(args) do
if args[idx] then
local substringStart = mw.ustring.find(str, args[idx], 1, true)
if substringStart and substringStart < substringEndPos then
substringEndPos = substringStart
firstSep = args[idx]
end
end
idx = idx + 1
end
return mw.ustring.sub(str, 1, substringEndPos-1), firstSep
end
p.substringBefore = makeInvokeFunc('_substringBefore')

function p._substringAfter(...)
local args = arg.n == 0 and {} or type(arg[1]) == 'table' and arg[1] or arg
local str = args[1]
if not str then return nil end
local idx = 2
local substringStartPos = 1 + mw.ustring.len(str)
local firstSep = ''
while args[idx] ~= nil do
local substringStart = mw.ustring.find(str, args[idx], 1, true)
if substringStart and substringStart < substringStartPos then
substringStartPos = substringStart + mw.ustring.len(args[idx])
firstSep = args[idx]
end
idx = idx + 1
end
if substringStartPos > mw.ustring.len(str) then return str end
return mw.ustring.sub(str, substringStartPos), firstSep
end
p.substringAfter = makeInvokeFunc('_substringAfter')

function p._defaultString(...)
local args = arg.n == 0 and {} or type(arg[1]) == 'table' and arg[1] or arg
local compressedArgs = TableTools.compressSparseArray(args)

if #compressedArgs == 0 then return '' end
return compressedArgs[1]
end
p.defaultString = makeInvokeFunc('_defaultString')

function p._appendToString(...)
local args = arg.n == 0 and {} or type(arg[1]) == 'table' and arg[1] or arg
local str = args[1]
local suffix = args[2]
if str then
return tostring(str) .. tostring(suffix or '')
end
return ''
end
p.appendToString = makeInvokeFunc('_appendToString')

function p._prependToString(...)
local args = arg.n == 0 and {} or type(arg[1]) == 'table' and arg[1] or arg
local str = args[1]
local prefix = args[2]
if str then
return tostring(prefix or '') .. tostring(str)
end
return ''
end
p.prependToString = makeInvokeFunc('_prependToString')

function p._encloseString(...)
local args = arg.n == 0 and {} or type(arg[1]) == 'table' and arg[1] or arg
return p._prependToString({p._emptyToNil({p._appendToString({args[1], args[3]})}), args[2]})
end
p.encloseString = makeInvokeFunc('_encloseString')

function p._stripNamespace(...)
local args = arg.n == 0 and {} or type(arg[1]) == 'table' and arg[1] or arg
s,_ = p._substringAfter({args[1],':'})
return s
end
p.stripNamespace = makeInvokeFunc('_stripNamespace')

-- Determină dacă o secvență de text conține o legătură spre un articol anume.
function p._findLinkByTitle(...)
local args = arg.n == 0 and {} or type(arg[1]) == 'table' and arg[1] or arg
local str = args[1]:gsub('_', ' ')
local pattern = '%[%[%s*' .. p._trim({(args[2] or ''):gsub('_', ' ')}):gsub('([+*?%-%(%)%%%.])', '%%%1') .. '%s*[%]|]'
if str then
return str:find(pattern, 1, false) or 0
end
return 0
end
p.findLinkByTitle = makeInvokeFunc('_findLinkByTitle')

function p._firstValue(...)
local args = arg.n == 0 and {} or type(arg[1]) == 'table' and arg[1] or arg
local compactedArgs = TableTools.compressSparseArray(args)
return #compactedArgs > 0 and compactedArgs[1] or ''
end
p.firstValue = makeInvokeFunc('_firstValue')

function p.isNilOrEmpty(argument)
return argument == nil or argument == {} or mw.text.trim(argument) == ''
end

return p

Modul:StringUtils - Revizia istoricului