local function deep_copy(t, lookup)
    lookup = lookup or {}

    -- If the value we are copying is not a table, we can just return it.
    if type(t) ~= "table" then
        return t, lookup
    end

    -- If we have already copied this table, we can just return the copy we have
    -- already made.
    if lookup[t] then
        return lookup[t], lookup
    end

    -- Create a new table to copy into.
    local copy = {}

    -- Add the copy to the lookup table so we can handle loops.
    lookup[t] = copy

    -- Copy the table.
    for k, v in pairs(t) do
        copy[deep_copy(k, lookup)] = deep_copy(v, lookup)
    end

    return copy, lookup
end

--- Copy the environment
---@param env table The environment to copy.
---@param g table The global environment to copy.
---@return table clone_env The clone of the environment.
---@return table clone_g The clone of the global environment, probably not needed as it will be the clone_env._G, but it's here for consistency.
local function deepcopy_environment(env, g)
    -- We need to copy the environment and the global environment separately.
    -- We keep the lookup table between clones so we can handle loops.
    local clone_env, lookup = deep_copy(env)
    local clone_g = deep_copy(g, lookup)

    return setmetatable(clone_env, {__index = clone_g}), clone_g
end

local function deepcopy(table)
    local cloned_table = {}
    for k, v in pairs(table) do
        if type(v) == "table" then
            cloned_table[k] = copy(v)
        else
            cloned_table[k] = v
        end
    end
    return cloned_table
end

local function getParentDirectory(path)
    -- Find the last occurrence of the path separator
    local lastIndex = path:find("/[^/]*$")

    if lastIndex then
        -- Extract the parent directory and file name
        local parentDir = path:sub(1, lastIndex)
        local fileName = path:sub(lastIndex + 1)
        return parentDir, fileName
    else
        -- If no parent directory found, return nil or an empty string, as desired
        return nil, path
    end
end

local function openfile(realPath)
    local parentDir, fileName = getParentDirectory(realPath)
    local modifiedPath = fs.combine(parentDir)
    modifiedPath = modifiedPath .. "/" .. fileName .. "_files/"

    -- Copying ENV

    local unmodifiedEnv, unmodifiedG = deepcopy_environment(_ENV, _G)

    local fakeENV, fakeG = deepcopy_environment(_ENV, _G)
    print(fakeG.fs or "FakeENV fs is not found!")
    print("real_path: " .. realPath)
    print("modified_path: " .. modifiedPath)
    os.pullEvent("char")

    -- Modyfind OS

    local realos = deepcopy(unmodifiedG.os)
    local fakeos = realos
    --fakeG.os = fakeos
    fakeos.reboot = nil
    fakeos.shutdown = nil
    fakeos.run = nil

    -- Modyfing FS

    local real = deepcopy(unmodifiedG.fs)
    local fake = {}
    fakeG.fs = fake

    function fake.open(path, mode)
        -- Adjust the path to the fake file system
        local cPath = modifiedPath .. path
        return real.open(cPath, mode)
    end

    function fake.move(path, endPath)
        -- Adjust the paths to the fake file system
        local cPath = modifiedPath .. path
        local ePath = modifiedPath .. endPath
        return real.move(cPath, ePath)
    end

    function fake.copy(path, endPath)
        -- Adjust the paths to the fake file system
        local cPath = modifiedPath .. path
        local ePath = modifiedPath .. endPath
        return real.copy(cPath, ePath)
    end

    function fake.delete(path)
        -- Adjust the path to the fake file system
        local cPath = modifiedPath .. path
        return real.delete(cPath)
    end

    function fake.makeDir(path)
        -- Adjust the path to the fake file system
        local cPath = modifiedPath .. path
        return real.makeDir(cPath)
    end

    function fake.find(path)
        -- Adjust the path to the fake file system
        local fakePath = modifiedPath .. path
        return real.find(fakePath)
    end

    function fake.list(path)
        -- Adjust the path to the fake file system
        local fakePath = modifiedPath .. path
        return real.list(fakePath)
    end

    function fake.getName(path)
        -- Adjust the path to the fake file system
        local fakePath = modifiedPath .. path
        return real.getName(fakePath)
    end

    function fake.getDir(path)
        -- Adjust the path to the fake file system
        local fakePath = modifiedPath .. path
        return real.getDir(fakePath)
    end

    function fake.getSize(path)
        -- Adjust the path to the fake file system
        local fakePath = modifiedPath .. path
        return real.getSize(fakePath)
    end

    function fake.exists(path)
        -- Adjust the path to the fake file system
        local fakePath = modifiedPath .. path
        return real.exists(fakePath)
    end

    function fake.isDir(path)
        -- Adjust the path to the fake file system
        local fakePath = modifiedPath .. path
        return real.isDir(fakePath)
    end

    function fake.isReadOnly(path)
        -- Adjust the path to the fake file system
        local fakePath = modifiedPath .. path
        return real.isReadOnly(fakePath)
    end
    lg.fillScreen(colors.red)
    term.setCursorPos(1, 1)
    print("RUNNING FILE..." .. realPath)
    os.pullEvent("char")
    local ok, errMSG = pcall(loadfile(realPath, nil, fakeENV))
    lg.fillScreen(colors.red)
    term.setCursorPos(1, 1)
    print(tostring(ok) .. " | ")
    print(errMSG or "no error")
    os.pullEvent("char")
    if ok ~= true then
        return {false, errMSG}
    else
        return {true}
    end
end