local function clear(col)
    term.setBackgroundColor(col)
    term.setCursorPos(1, 1)
    term.clear()
end
clear(colors.blue)

local function cancel()
    clear(colors.black)
    print("the installation was canceled")
end

local logo = {
    [[]],
    [[  G       G  G   G   GGGGGG   WWWWWWWWW  WWWWWWWWW]],
    [[  G          G  G    G        W       W  W        ]],
    [[  G       G  G G     G        W       W  W        ]],
    [[  G       G  GG      G        W       W  W        ]],
    [[  G       G  GG      GGGGGG   W       W  WWWWWWWWW]],
    [[  G       G  G G     G        W       W          W]],
    [[  G       G  G  G    G        W       W          W]],
    [[  GGGGGG  G  G   G   GGGGGG   WWWWWWWWW  WWWWWWWWW]],
    [[]]
}

for _, str in ipairs(logo) do
    for i = 1, #str do
        local char = str:sub(i, i)
        if char == "G" then
            term.setBackgroundColor(colors.lightGray)
        elseif char == "W" then
            term.setBackgroundColor(colors.white)
        else
            term.setBackgroundColor(colors.blue)
        end
        io.write(" ")
    end
    io.write("\n")
end
term.setBackgroundColor(colors.blue)

---------------------------------------

local baseUrl = "https://raw.githubusercontent.com/igorkll/liked/"
local baseCoreUrl = "https://raw.githubusercontent.com/igorkll/likeOS/"

local function selectPoint(name, points)
    print("select " .. name .. ": ")
    for i, v in ipairs(points) do
        print(i .. ". " .. v)
    end
    local readed = io.read()
    local point = points[tonumber(readed)]
    if point then
        local _, y = term.getCursorPos()
        term.setCursorPos(#readed + 2, y - 1)
        print("- " .. point)
        return point
    end
end

local branch = selectPoint("branch", {"main", "test", "dev"})
if not branch then
    cancel()
    return
end

local function wget(url)
    local ok, err = assert(http.checkURL(url))
    if not ok then
        return nil, tostring(err or "unknown error")
    end

    local response, err = assert(http.get(url))
    if not response then
        return nil, tostring(err or "unknown error")
    end

    local data = response.readAll()
    response.close()
    return data
end

local function download(path, dpath, mode)
    local url
    if mode == "cc" then
        url = baseUrl .. branch .. "/computercraft" .. path
    elseif mode == "core" then
        url = baseCoreUrl .. branch .. path
    else
        url = baseUrl .. branch .. path
    end

    local str, err = assert(wget(url))
    if not str then
        return nil, tostring(err or "unknown error")
    end

    fs.makeDir("/" .. fs.getDir(dpath))
    local file = fs.open(dpath, "wb")
    file.write(str)
    file.close()

    return true
end

local function split(str, sep)
    local parts, count, i = {}, 1, 1
    while 1 do
        if i > #str then break end
        local char = str:sub(i, #sep + (i - 1))
        if not parts[count] then parts[count] = "" end
        if char == sep then
            count = count + 1
            i = i + #sep
        else
            parts[count] = parts[count] .. str:sub(i, i)
            i = i + 1
        end
    end
    if str:sub(#str - (#sep - 1), #str) == sep then table.insert(parts, "") end
    return parts
end

local function processList(data)
    local tbl = split(data, "\n")
    for i = #tbl, 1, -1 do
        if tbl[i] == "" then
            table.remove(tbl, i)
        end
    end
    return tbl
end

local function downloadList(listUrl, mode)
    print("start downloading from list: ", listUrl)
    local lst = processList(assert(wget(listUrl)))
    for i, path in ipairs(lst) do
        local fullPath = path
        if mode ~= "cc" then
            fullPath = "/liked" .. path
        end
        print("downloading: ", fullPath)
        assert(download(path, fullPath, mode))
    end
end

---------------------------------------

term.setBackgroundColor(colors.blue)
print("do you really want to install liked (likeOS based system)?")
print("type 'YES' to start installation")

if io.read() == "YES" then
    print("start of installation")
    fs.delete("/liked")
    downloadList(baseUrl .. branch .. "/installer/filelist.txt")
    downloadList(baseCoreUrl .. branch .. "/installer/filelist.txt", "core")
    downloadList(baseUrl .. branch .. "/installer/cc_filelist.txt", "cc")
    os.reboot()
else
    cancel()
end