mirror of https://github.com/sipwise/prosody.git
* prosody 0.11 already provides utils/table.so Change-Id: Idb426569ed885e01194caba8354bc9ad1ca7f7ffmr9.1.1
Victor Seva
5 years ago
parent
addb5e5544
commit
2cee084829
@ -1,172 +0,0 @@
|
||||
--
|
||||
-- Copyright 2013 SipWise Team <development@sipwise.com>
|
||||
--
|
||||
-- This program is free software: you can redistribute it and/or modify
|
||||
-- it under the terms of the GNU General Public License as published by
|
||||
-- the Free Software Foundation, either version 3 of the License, or
|
||||
-- (at your option) any later version.
|
||||
--
|
||||
-- This package is distributed in the hope that it will be useful,
|
||||
-- but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
-- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||
-- GNU General Public License for more details.
|
||||
--
|
||||
-- You should have received a copy of the GNU General Public License
|
||||
-- along with this program. If not, see <http://www.gnu.org/licenses/>.
|
||||
-- .
|
||||
-- On Debian systems, the complete text of the GNU General
|
||||
-- Public License version 3 can be found in "/usr/share/common-licenses/GPL-3".
|
||||
--
|
||||
-- Lua utils
|
||||
|
||||
local type = type;
|
||||
local string = string;
|
||||
local t_insert, t_concat = table.insert, table.concat;
|
||||
local table = table;
|
||||
|
||||
-- copy a table
|
||||
function table.deepcopy(object)
|
||||
local lookup_table = {}
|
||||
local function _copy(obj)
|
||||
if type(obj) ~= "table" then
|
||||
return object
|
||||
elseif lookup_table[obj] then
|
||||
return lookup_table[obj]
|
||||
end
|
||||
local new_table = {}
|
||||
lookup_table[object] = new_table
|
||||
for index, value in pairs(obj) do
|
||||
new_table[_copy(index)] = _copy(value)
|
||||
end
|
||||
return setmetatable(new_table, getmetatable(obj))
|
||||
end
|
||||
return _copy(object)
|
||||
end
|
||||
|
||||
function table.contains(tbl, element)
|
||||
if tbl then
|
||||
for _, value in pairs(tbl) do
|
||||
if value == element then
|
||||
return true
|
||||
end
|
||||
end --for
|
||||
end --if
|
||||
return false
|
||||
end
|
||||
|
||||
-- add if element is not in table
|
||||
function table.add(t, element)
|
||||
if not table.contains(t, element) then
|
||||
t_insert(t, element)
|
||||
end
|
||||
end
|
||||
|
||||
function table.val_to_str ( v )
|
||||
if "string" == type( v ) then
|
||||
v = string.gsub( v, "\n", "\\n" )
|
||||
if string.match( string.gsub(v,"[^'\"]",""), '^"+$' ) then
|
||||
return "'" .. v .. "'"
|
||||
end
|
||||
return '"' .. string.gsub(v,'"', '\\"' ) .. '"'
|
||||
else
|
||||
return "table" == type( v ) and table.tostring( v ) or
|
||||
tostring( v )
|
||||
end
|
||||
end
|
||||
|
||||
function table.key_to_str ( k )
|
||||
if "string" == type( k ) and string.match( k, "^[_%a][_%a%d]*$" ) then
|
||||
return k
|
||||
else
|
||||
return "[" .. table.val_to_str( k ) .. "]"
|
||||
end
|
||||
end
|
||||
|
||||
function table.tostring( tbl )
|
||||
local result, done = {}, {}
|
||||
for k, v in ipairs( tbl ) do
|
||||
t_insert( result, table.val_to_str( v ) )
|
||||
done[ k ] = true
|
||||
end
|
||||
for k, v in pairs( tbl ) do
|
||||
if not done[ k ] then
|
||||
t_insert( result,
|
||||
table.key_to_str( k ) .. "=" .. table.val_to_str( v ) )
|
||||
end
|
||||
end
|
||||
return "{" .. t_concat( result, "," ) .. "}"
|
||||
end
|
||||
|
||||
-- from table to string
|
||||
-- t = {'a','b'}
|
||||
-- implode(",",t,"'")
|
||||
-- "'a','b'"
|
||||
-- implode("#",t)
|
||||
-- "a#b"
|
||||
function table.implode(delimiter, list, quoter)
|
||||
local len = #list
|
||||
if not delimiter then
|
||||
error("delimiter is nil")
|
||||
end
|
||||
if len == 0 then
|
||||
return nil
|
||||
end
|
||||
if not quoter then
|
||||
quoter = ""
|
||||
end
|
||||
local str = quoter .. list[1] .. quoter
|
||||
for i = 2, len do
|
||||
str = str .. delimiter .. quoter .. list[i] .. quoter
|
||||
end
|
||||
return str
|
||||
end
|
||||
|
||||
function table.keys(tbl)
|
||||
local keys = {}
|
||||
local n = 0
|
||||
|
||||
for k,_ in pairs(tbl) do
|
||||
n = n+1
|
||||
keys[n] = k
|
||||
end
|
||||
return keys
|
||||
end
|
||||
|
||||
-- from string to table
|
||||
function string.explode(delimiter, text)
|
||||
local list = {}
|
||||
local pos = 1
|
||||
|
||||
if not delimiter then
|
||||
error("delimiter is nil")
|
||||
end
|
||||
if not text then
|
||||
error("text is nil")
|
||||
end
|
||||
if string.find("", delimiter, 1) then
|
||||
-- We'll look at error handling later!
|
||||
error("delimiter matches empty string!")
|
||||
end
|
||||
while 1 do
|
||||
local first, last = string.find(text, delimiter, pos)
|
||||
-- print (first, last)
|
||||
if first then
|
||||
t_insert(list, string.sub(text, pos, first-1))
|
||||
pos = last+1
|
||||
else
|
||||
t_insert(list, string.sub(text, pos))
|
||||
break
|
||||
end
|
||||
end
|
||||
return list
|
||||
end
|
||||
|
||||
function string.starts(String,Start)
|
||||
return string.sub(String,1,string.len(Start))==Start
|
||||
end
|
||||
|
||||
function string.ends(String,End)
|
||||
return End=='' or string.sub(String,-string.len(End))==End
|
||||
end
|
||||
|
||||
return {table=table, string=string}
|
||||
Loading…
Reference in new issue