--[[--------------------------------------------------------------------------------------                               TableTools                                       ----                                                                                ---- This module includes a number of functions for dealing with Lua tables.        ---- It is a meta-module, meant to be called from other Lua modules, and should     ---- not be called directly from #invoke.                                           ----------------------------------------------------------------------------------------]]local libraryUtil = require('libraryUtil')local p = {}-- Define often-used variables and functions.local floor = math.floorlocal infinity = math.hugelocal checkType = libraryUtil.checkType--[[-------------------------------------------------------------------------------------- isPositiveInteger---- This function returns true if the given value is a positive integer, and false-- if not. Although it doesn't operate on tables, it is included here as it is-- useful for determining whether a given table key is in the array part or the-- hash part of a table.--------------------------------------------------------------------------------------]]function p.isPositiveInteger(v)if type(v) == 'number' and v >= 1 and floor(v) == v and v < infinity thenreturn trueelsereturn falseendend--[[-------------------------------------------------------------------------------------- isNan---- This function returns true if the given number is a NaN value, and false-- if not. Although it doesn't operate on tables, it is included here as it is-- useful for determining whether a value can be a valid table key. Lua will-- generate an error if a NaN is used as a table key.--------------------------------------------------------------------------------------]]function p.isNan(v)if type(v) == 'number' and tostring(v) == '-nan' thenreturn trueelsereturn falseendend--[[-------------------------------------------------------------------------------------- shallowClone---- This returns a clone of a table. The value returned is a new table, but all-- subtables and functions are shared. Metamethods are respected, but the returned-- table will have no metatable of its own.--------------------------------------------------------------------------------------]]function p.shallowClone(t)local ret = {}for k, v in pairs(t) doret[k] = vendreturn retend--[[-------------------------------------------------------------------------------------- removeDuplicates---- This removes duplicate values from an array. Non-positive-integer keys are-- ignored. The earliest value is kept, and all subsequent duplicate values are-- removed, but otherwise the array order is unchanged.--------------------------------------------------------------------------------------]]function p.removeDuplicates(t)checkType('removeDuplicates', 1, t, 'table')local isNan = p.isNanlocal ret, exists = {}, {}for i, v in ipairs(t) doif isNan(v) then-- NaNs can't be table keys, and they are also unique, so we don't need to check existence.ret[#ret + 1] = velseif not exists[v] thenret[#ret + 1] = vexists[v] = trueendendendreturn retend--[[-------------------------------------------------------------------------------------- numKeys---- This takes a table and returns an array containing the numbers of any numerical-- keys that have non-nil values, sorted in numerical order.--------------------------------------------------------------------------------------]]function p.numKeys(t)checkType('numKeys', 1, t, 'table')local isPositiveInteger = p.isPositiveIntegerlocal nums = {}for k, v in pairs(t) doif isPositiveInteger(k) thennums[#nums + 1] = kendendtable.sort(nums)return numsend--[[-------------------------------------------------------------------------------------- affixNums---- This takes a table and returns an array containing the numbers of keys with the-- specified prefix and suffix. For example, for the table-- {a1 = 'foo', a3 = 'bar', a6 = 'baz'} and the prefix "a", affixNums will-- return {1, 3, 6}.--------------------------------------------------------------------------------------]]function p.affixNums(t, prefix, suffix)checkType('affixNums', 1, t, 'table')checkType('affixNums', 2, prefix, 'string', true)checkType('affixNums', 3, suffix, 'string', true)local function cleanPattern(s)-- Cleans a pattern so that the magic characters ()%.[]*+-?^$ are interpreted literally.s = s:gsub('([%(%)%%%.%[%]%*%+%-%?%^%$])', '%%%1')return sendprefix = prefix or ''suffix = suffix or ''prefix = cleanPattern(prefix)suffix = cleanPattern(suffix)local pattern = '^' .. prefix .. '([1-9]%d*)' .. suffix .. '$'local nums = {}for k, v in pairs(t) doif type(k) == 'string' thenlocal num = mw.ustring.match(k, pattern)if num thennums[#nums + 1] = tonumber(num)endendendtable.sort(nums)return numsend--[[-------------------------------------------------------------------------------------- numData---- Given a table with keys like ("foo1", "bar1", "foo2", "baz2"), returns a table-- of subtables in the format -- { [1] = {foo = 'text', bar = 'text'}, [2] = {foo = 'text', baz = 'text'} }-- Keys that don't end with an integer are stored in a subtable named "other".-- The compress option compresses the table so that it can be iterated over with-- ipairs.--------------------------------------------------------------------------------------]]function p.numData(t, compress)checkType('numData', 1, t, 'table')checkType('numData', 2, compress, 'boolean', true)local ret = {}for k, v in pairs(t) dolocal prefix, num = mw.ustring.match(tostring(k), '^([^0-9]*)([1-9][0-9]*)$')if num thennum = tonumber(num)local subtable = ret[num] or {}if prefix == '' then-- Positional parameters match the blank string; put them at the start of the subtable instead.prefix = 1endsubtable[prefix] = vret[num] = subtableelselocal subtable = ret.other or {}subtable[k] = vret.other = subtableendendif compress thenlocal other = ret.otherret = p.compressSparseArray(ret)ret.other = otherendreturn retend--[[-------------------------------------------------------------------------------------- compressSparseArray---- This takes an array with one or more nil values, and removes the nil values-- while preserving the order, so that the array can be safely traversed with-- ipairs.--------------------------------------------------------------------------------------]]function p.compressSparseArray(t)checkType('compressSparseArray', 1, t, 'table')local ret = {}local nums = p.numKeys(t)for _, num in ipairs(nums) doret[#ret + 1] = t[num]endreturn retend--[[-------------------------------------------------------------------------------------- sparseIpairs---- This is an iterator for sparse arrays. It can be used like ipairs, but can-- handle nil values.--------------------------------------------------------------------------------------]]function p.sparseIpairs(t)checkType('sparseIpairs', 1, t, 'table')local nums = p.numKeys(t)local i = 0local lim = #numsreturn function ()i = i + 1if i <= lim thenlocal key = nums[i]return key, t[key]elsereturn nil, nilendendend--[[-------------------------------------------------------------------------------------- size---- This returns the size of a key/value pair table. It will also work on arrays,-- but for arrays it is more efficient to use the # operator.--------------------------------------------------------------------------------------]]function p.size(t)checkType('size', 1, t, 'table')local i = 0for k in pairs(t) doi = i + 1endreturn iendreturn p

🔥 Top trends keywords Аԥсуа Wiki:

Ихадоу адаҟьаАфаил:Flag of the People's Republic of China.svgАфаил:National Emblem of the People's Republic of China.svgАлахәыла:თეკა/lexiconАвикипедиа:Бзиала шәаабеитЦастәи:АԥшаараАвикипедиа:АфорумАвикипедиа:Описание41767Урыстәыла1548Цастәи:АрҽеираҾыцқәаАԥсны2005Алахәыла:Ha98574/Header barАурыс бызшәа26820221621Авикипедиа:Раԥхьатәи ашьаҿақәаКитаи795Авикипедиа:Портал сообществаНанҳәамза 9Очамчыра2019Афаил:Air Force Flag of the People's Republic of China.svgАҩаша1965Хәажәкырамза 17НидерландқәаКәтолАԥшьаша289Англыз бызшәаУатаԥ1874Ажьырныҳәамза 919021982Елыр2006Афаил:Flag of Georgia.svg1978АҟәаАиспан бызшәаАокеанАҭара-ерманқыҭРашәарамзаЏьгьардаНанҳәамза 19Амза1973Ԥхынҷкәынмза 252010Путин, Владимир Владимир-иԥаАкатегориа:Ахада акатегориақәаҶлоуКуритибаНанҳәамзаЛабраРашәарамза 24Алахәыла:InvadibotАвикипедиаАвикипедиа:АцҳаражəҳəарҭаАхәриАвикипедиа:Требования к статьямАлахәыла:AvocatoBotЕиду Америкатәи Аштатқәа2002Авикипедиа:Автортə зинқəаАвстралиаСловакиаАшәахьаАкатегориа:АтәылақәаАфаил:Flag of Switzerland.svgАҽгәараԤхынгәымза 15🡆 More