107 lines
2.0 KiB
Lua
107 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
|
|
}
|
|
|
|
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
|