--- A full ranking system for factorio.
-- @module ExpGamingPlayer.playerList
-- @author Cooldude2606
-- @license https://github.com/explosivegaming/scenario/blob/master/LICENSE

local Game = require('FactorioStdLib.Game')
local Gui = require('ExpGamingCore.Gui')
local Admin -- hanndled on load

local global = global{
    update=0,
    delay=10,
    intervial=54000
}

-- this will be replaced on load if playerInfo module is present
local function playerInfo(player,frame)
    frame.add{
        type='label',
        caption={'player-list.no-info-file'}
    }
end

local function getPlayers()
    local rtn = {{{r=233,g=63,b=233},'Admin',{}},{{r=255,g=159,b=27},'',{}}}
    for _,player in pairs(game.connected_players) do
        if player.admin then table.insert(rtn[2][3],player)
        else table.insert(rtn[1][3],player) end
    end
    return rtn
end

local function queue_update(tick)
    local tick = is_type(tick,'table') and tick.tick or is_type(tick,'number') and tick or game.tick
    if tick + global.delay > global.update - global.intervial then
        global.update = tick + global.delay
    end
end

local back_btn = Gui.inputs.add{
    type='button',
    caption='utility/enter',
    name='player-list-back'
}:on_event('click',function(event)
    event.element.parent.parent.scroll.style.visible = true
    event.element.parent.destroy()
end)

Gui.left.add{
    name='player-list',
    caption='entity/player',
    tooltip={'player-list.tooltip'},
    draw=function(frame)
        frame.caption = ''
        local player_list = frame.add{
            name='scroll',
            type = 'scroll-pane',
            direction = 'vertical',
            vertical_scroll_policy='auto',
            horizontal_scroll_policy='never'
        }
        player_list.vertical_scroll_policy = 'auto'
        player_list.style.maximal_height=195
        local players = getPlayers() -- list of [colour,shortHand,[playerOne,playerTwo]]
        for _,rank in pairs(players) do
            for _,player in pairs(rank[3]) do
                local flow = player_list.add{type='flow'}
                if rank[2] == '' then
                    flow.add{
                        type='label',
                        name=player.name,
                        style='caption_label',
                        caption={'player-list.format-nil',tick_to_display_format(player.online_time),player.name}
                    }.style.font_color = rank[1]
                else
                    flow.add{
                        type='label',
                        name=player.name,
                        style='caption_label',
                        caption={'player-list.format',tick_to_display_format(player.online_time),player.name,rank[2]}
                    }.style.font_color = rank[1]
                end
                if Admin.report_btn then
                    if not rank:allowed('no-report') and player.index ~= frame.player_index then
                        local btn = Admin.report_btn:draw(flow)
                        btn.style.height = 20
                        btn.style.width = 20
                    end
                end
            end
        end
    end,
    open_on_join=true
}

script.on_event(defines.events.on_tick,function(event)
    if event.tick > global.update then
        Gui.left.update('player-list')
        global.update = event.tick + global.intervial
    end
end)

script.on_event(defines.events.on_gui_click,function(event)
    -- lots of checks for it being valid
    if event.element and event.element.valid 
    and event.element.parent and event.element.parent.parent and event.element.parent.parent.parent 
    and event.element.parent.parent.parent.name == 'player-list' then else return end
    -- must be a right click
    if event.button == defines.mouse_button_type.right then else return end
    local player_list = event.element.parent.parent.parent
    -- hides the player list to show the info
    player_list.scroll.style.visible = false
    local flow = player_list.add{type='flow',direction='vertical'}
    back_btn:draw(flow)
    playerInfo(event.element.name,flow,true)
    if Game.get_player(event.element.name) and event.player_index == Game.get_player(event.element.name).index then return end
    if Admin and Admin.allowed and Admin.allowed(event.player_index) then Admin.btn_flow(flow).caption = event.element.name end
end)

script.on_event(defines.events.on_player_joined_game,queue_update)
script.on_event(defines.events.on_player_left_game,queue_update)
script.on_event(defines.events.rank_change,queue_update)

return {
    force_update=function() return Gui.left.update('player-list') end,
    update=queue_update,
    on_init=function(self)
        if loaded_modules['ExpGamingPlayer.playerInfo'] then playerInfo = require('ExpGamingPlayer.playerInfo') end
        if loaded_modules['ExpGamingAdmin.AdminLib'] then Admin = require('ExpGamingAdmin.AdminLib') end
    end
}