LÖVE

Code: Select all

local system = {}
system.path = love.filesystem.getWorkingDirectory().."/test.txt"
system.list_files = "ls "
system.list_dirs_prefix = "-d -N "
system.list_dirs_suffix = "*/"
if jit.os == "Windows" then
    system.list_files = "dir /b "
    system.list_dirs_prefix = "/ad "
    system.list_dirs_suffix = ""
end

function listFiles(path, dirOnly)
    local command = system.list_files
    if dirOnly then
        command = command..system.list_dirs_prefix..path..system.list_dirs_suffix
    else
        command = command..path
    end
    print("> "..command, (dirOnly and "(dirOnly)" or "(everything)")) -- testing feedback
    local handle = io.popen(command)
    local output = handle:read("*a")
    handle:close()
    return output
end

function strFindLast(str, phrase)
    local len = phrase:len()
    local i = str:len() - len + 1
    while i > 0 do
        if str:sub(i, i + len - 1) == phrase then return i end
        i = i - 1
    end
end

function isPath(path)
    local parentDir = path:sub(1, strFindLast(path, "/"))
    parentDir = listFiles(parentDir, true)
    return parentDir:find(path)
end

---- exists() and isdir() functions ----
-- modified from
-- https://stackoverflow.com/questions/1340230/check-if-directory-exists-in-lua

--- Check if a file or directory exists in this path
function exists(file)
   local ok, err, code = os.rename(file, file)
   if not ok then
      if code == 13 then
         -- Permission denied, but it exists
         return true
      end
   end
   return ok, err
end

--- Check if path is a directory
function isDir(path)
   -- "/" works on Linux and Windows, but fails on Wine (everything succeeds if the file/path exists)
   --~ if path == cmd.root then return true end
   return exists(path.."/") --or path == cmd.root
end
--------

local isPathStr = tostring(isPath(system.path))
local isDirStr  = tostring(isDir(system.path))
local listFilesStr = listFiles(system.path)

function love.draw()
    love.graphics.print("Checking: " .. system.path, 10, 10)

    love.graphics.print("Is that a directory?  (isPath)   "..isPathStr, 10, 30)
    love.graphics.print("Is that a directory?  (isDir)     "..isDirStr, 10, 45)
end