local threading = require("libs.threading")
local dragging = nil
local resizing = false
local offsetX, offsetY = 0, 0
local key = {}
local function bringtofront(indx)
    local win = _G.windows[indx]
    if win.alwaysOnTop or win.alwaysBelow then return end
    _G.windows[indx] = nil
    local temp = {}
    local top = {}
    local bottom = {}
    for _, i in pairs(_G.windows) do
        if i.alwaysOnTop then
            top[#top + 1] = i
        elseif i.alwaysBelow then
            temp[#temp + 1] = i
        else
            bottom[#bottom + 1] = i
        end
    end
    temp[#temp + 1] = win
    _G.windows = bottom
    for _, i in pairs(temp) do
        _G.windows[#_G.windows + 1] = i
    end
    for _, i in pairs(top) do
        _G.windows[#_G.windows + 1] = i
    end
end
while true do
    local data = { os.pullEvent() }
    if data[1] == "mouse_click" then
        for indx = #_G.windows, 1, -1 do
            local win = _G.windows[indx]
            local h= win.h
            local w = win.w
            local x = win.x
            local y = win.y
            if win.isFullscreen then
                local sw,sh = term.getSize()
                w = sw
                h = sh-2
                x=1
                y=3
            end
            if data[4] == 1 then
                break
            elseif x+w-1 == data[3] and y+h-1 == data[4] and win.decorations and win.resizable and not win.isFullscreen then
                dragging = win
                resizing = true
                bringtofront(indx)
            elseif ((y - 1 == data[4] and x + 2 <= data[3] and x + w >= data[3] and data[2] == 1 and win.decorations) or (y <= data[4] and x <= data[3] and y + h > data[4] and x + w > data[3] and key[keys["leftAlt"]] and win.draggable)) and not win.isFullscreen then
                dragging = win
                offsetX = x - data[3]
                offsetY = y - data[4]
                bringtofront(indx)
                break
            elseif y - 1 == data[4] and x == data[3] and win.decorations then
                threading.addThread(function() win.closeRequested() end)
                bringtofront(indx)
                break
                elseif y - 1 == data[4] and x+1 == data[3] and win.decorations then
                threading.addThread(function() win.fullscreen() end)
                bringtofront(indx)
                break
            elseif y <= data[4] and x <= data[3] and y + h > data[4] and x + w > data[3] then
                threading.addThread(function() win.clicked(data[3] - x + 1, data[4] - y + 1, data[2]) end)
                bringtofront(indx)
                break
            end
        end
    elseif data[1] == "mouse_drag" then
        data[4] =  math.max(data[4],2)
        if data[2] == 1 and dragging then
            if resizing then
                dragging.w = math.max(data[3] - dragging.x + 1,dragging.min_w)
                dragging.h = math.max(data[4] - dragging.y + 1,dragging.min_h)
                threading.addThread(function()dragging.resized(dragging.w,dragging.h)end)
            else
                dragging.x = data[3] + offsetX
                dragging.y = data[4] + offsetY
            end
        else
            for indx = #_G.windows, 1, -1 do
                local win = _G.windows[indx]
                local h= win.h
                local w = win.w
                local x = win.x
                local y = win.y
                if win.isFullscreen then
                    local sw,sh = term.getSize()
                    w = sw
                    h = sh-2
                    x=1
                    y=3
                end
                if y <= data[4] and x <= data[3] and y + h > data[4] and x + w > data[3] then
                    threading.addThread(function() win.dragged(data[3] - x + 1, data[4] - y + 1, data[2]) end)
                    bringtofront(indx)
                    break
                end
            end
        end
    elseif data[1] == "mouse_up" then
        if data[2] == 1 and dragging then
            dragging = nil
            resizing = false
        else
            for indx = #_G.windows, 1, -1 do
                local win = _G.windows[indx]
                local h= win.h
                local w = win.w
                local x = win.x
                local y = win.y
                if win.isFullscreen then
                    local sw,sh = term.getSize()
                    w = sw
                    h = sh-2
                    x=1
                    y=3
                end
                if y <= data[4] and x <= data[3] and y + h > data[4] and x + w > data[3] then
                    threading.addThread(function() win.released(data[3] - x + 1, data[4] - y + 1, data[2]) end)
                    bringtofront(indx)
                    break
                end
            end
        end
    elseif data[1] == "mouse_scroll" then
        for indx = #_G.windows, 1, -1 do
            local win = _G.windows[indx]
            local h= win.h
            local w = win.w
            local x = win.x
            local y = win.y
            if win.isFullscreen then
                local sw,sh = term.getSize()
                w = sw
                h = sh-2
                x=1
                y=3
            end
            if y <= data[4] and x <= data[3] and y + h > data[4] and x + w > data[3] then
                threading.addThread(function() win.scrolled(data[2], data[3] - x + 1, data[4] - y + 1) end)
                break
            end
        end
    elseif data[1] == "key" then
        key[data[2]] = true
        if _G.windows[#_G.windows] then
            threading.addThread(function() _G.windows[#_G.windows].key(data[2], data[3]) end)
        end
    elseif data[1] == "char" then
        if _G.windows[#_G.windows] then
            threading.addThread(function() _G.windows[#_G.windows].char(data[2]) end)
        end
    elseif data[1] == "key_up" then
        key[data[2]] = false
        if _G.windows[#_G.windows] then
            threading.addThread(function() _G.windows[#_G.windows].key_up(data[2]) end)
        end
    end
end