SNKRX/engine/system.lua

187 lines
4.0 KiB
Lua
Raw Normal View History

2021-02-18 05:11:25 +01:00
system = {}
function system.update(dt)
if input.f12.pressed then
for k, v in pairs(system.type_count()) do
print(k, v)
end
print("-- " .. math.round(tonumber(collectgarbage("count"))/1024, 3) .. "MB --")
print()
end
end
global_type_table = nil
function system.type_name(o)
if global_type_table == nil then
global_type_table = {}
for k, v in pairs(_G) do
global_type_table[v] = k
end
global_type_table[0] = "table"
end
return global_type_table[getmetatable(o) or 0] or "Unknown"
end
function system.count_all(f)
local seen = {}
local count_table
count_table = function(t)
if seen[t] then return end
f(t)
seen[t] = true
for k, v in pairs(t) do
if type(v) == "table" then count_table(v)
2021-05-17 10:05:48 +02:00
elseif type(v) == "userdata" then f(v)
end
2021-02-18 05:11:25 +01:00
end
end
count_table(_G)
end
function system.type_count()
local counts = {}
local enumerate = function(o)
2021-05-17 10:05:48 +02:00
if type(o) == 'function' then
local upvalues = {}
else
local t = system.type_name(o)
counts[t] = (counts[t] or 0) + 1
end
2021-02-18 05:11:25 +01:00
end
system.count_all(enumerate)
return counts
end
function system.enumerate_files(path, filter)
local function recursive_enumerate(path, files)
local items = love.filesystem.getDirectoryItems(path)
for _, item in ipairs(items) do
local file = path .. "/" .. item
local info = love.filesystem.getInfo(file)
if info.type == "file" then
table.insert(files, file)
elseif info.type == "directory" then
recursive_enumerate(file, files)
end
end
end
local files = {}
recursive_enumerate(path, files)
if filter then
local filtered_files = {}
for _, file in ipairs(files) do
if file:find(filter) then
table.insert(filtered_files, file:left(filter):right(path .. "/"))
end
end
return filtered_files
else
return files
end
end
function system.does_file_exist(path)
local file = io.open(path, "r")
if file then
file:close()
return true
end
end
function system.load_files(path, filter, exclude_table)
local exclude_table = {unpack(exclude_table or {})}
for _, file in ipairs(system.enumerate_files(path, filter)) do
if not table.contains(exclude_table, file) then
require(path .. "." .. file)
end
end
end
function system.save_file(filename, data)
binser.w(filename, data)
end
function system.load_file(filename)
return binser.r(filename)[1]
end
function system.save_state()
2021-05-21 08:17:31 +02:00
love.filesystem.createDirectory("")
local str = "return " .. table.tostring(state or {})
love.filesystem.write("state.txt", str)
2021-02-18 05:11:25 +01:00
end
function system.load_state()
2021-05-21 08:17:31 +02:00
if love.filesystem.getInfo("state") then
state = binser.r(love.filesystem.getSaveDirectory() .. '/state')[1]
love.filesystem.createDirectory("old_save_backup")
os.rename(love.filesystem.getSaveDirectory() .. '/state', love.filesystem.getSaveDirectory() .. '/old_save_backup/state')
system.save_state()
end
local chunk = love.filesystem.load("state.txt")
if chunk then state = chunk()
else state = {} end
2021-02-18 05:11:25 +01:00
end
2021-05-29 03:42:16 +02:00
function system.save_run(level, gold, units, passives, run_passive_pool_by_tiers, locked_state)
local run = {level = level, gold = gold, units = units, passives = passives, run_passive_pool_by_tiers = run_passive_pool_by_tiers, locked_state = locked_state}
2021-05-26 01:41:51 +02:00
local str = "return " .. table.tostring(run)
love.filesystem.write("run.txt", str)
end
function system.load_run()
local chunk = love.filesystem.load("run.txt")
if chunk then return chunk()
else return {} end
end
2021-02-18 05:11:25 +01:00
function system.get_main_directory()
return love.filesystem.getSource()
end
function system.get_save_directory()
return love.filesystem.getSaveDirectory()
end
function system.filedropped(file)
game:filedropped(love.filesystem.newFileData(file:read()))
end
function system.rename(old_path, new_path)
os.rename(old_path, new_path)
end
function system.execute(cmd)
os.execute(cmd)
end
function system.remove(path)
os.remove(path)
end
2021-03-15 21:54:22 +01:00
function system.open_url(url)
love.system.openURL(url)
end