FreeKill/lua/core/util.lua

109 lines
2.0 KiB
Lua

-- the iterator of QList object
local qlist_iterator = function(list, n)
if n < list:length() - 1 then
return n + 1, list:at(n + 1) -- the next element of list
end
end
function freekill.qlist(list)
return qlist_iterator, list, -1
end
function table:contains(element)
if #self == 0 or type(self[1]) ~= type(element) then return false end
for _, e in ipairs(self) do
if e == element then return true end
end
end
function table:shuffle()
for i = #self, 2, -1 do
local j = math.random(i)
self[i], self[j] = self[j], self[i]
end
end
function table:insertTable(list)
for _, e in ipairs(list) do
table.insert(self, e)
end
end
Sql = {
open = function(filename)
return freekill.OpenDatabase(filename)
end,
close = function(db)
freekill.CloseDatabase(db)
end,
exec = function(db, sql)
freekill.ExecSQL(db, sql)
end,
exec_select = function(db, sql)
return json.decode(freekill.SelectFromDb(db, sql))
end,
}
FileIO = {
pwd = freekill.QmlBackend_pwd,
ls = function(filename)
if filename == nil then
return freekill.QmlBackend_ls(".")
else
return freekill.QmlBackend_ls(filename)
end
end,
cd = freekill.QmlBackend_cd,
exists = freekill.QmlBackend_exists,
isDir = freekill.QmlBackend_isDir
}
os.getms = freekill.GetMicroSecond
Stack = class("Stack")
function Stack:initialize()
self.t = {}
self.p = 0
end
function Stack:push(e)
self.p = self.p + 1
self.t[self.p] = e
end
function Stack:isEmpty()
return self.p == 0
end
function Stack:pop()
if self.p == 0 then return nil end
self.p = self.p - 1
return self.t[self.p + 1]
end
function table:removeOne(element)
if #self == 0 or type(self[1]) ~= type(element) then return false end
for i = 1, #self do
if self[i] == element then
table.remove(self, i)
return true
end
end
return false
end
local Util = class("Util")
function Util.static:createEnum(tbl, index)
assert(type(tbl) == "table")
local enumtbl = {}
local enumindex = index or 0
for i, v in ipairs(tbl) do
enumtbl[v] = enumindex + i
end
return enumtbl
end
return Util