--[[
        Filename: Players.lua
        Written by: Stickmasterluke
        Version 1.0
        Description: Player list inside escape menu, with friend adding functionality.
--]]
-------------- SERVICES --------------
local CoreGui = game:GetService("CoreGui")
local RobloxGui = CoreGui:WaitForChild("RobloxGui")
local GuiService = game:GetService("GuiService")
local PlayersService = game:GetService('Players')
local HttpService = game:GetService('HttpService')
local HttpRbxApiService = game:GetService('HttpRbxApiService')
local UserInputService = game:GetService('UserInputService')
local Settings = UserSettings()
local GameSettings = Settings.GameSettings

----------- UTILITIES --------------
RobloxGui:WaitForChild("Modules"):WaitForChild("TenFootInterface")
local utility = require(RobloxGui.Modules.Utility)
local isTenFootInterface = require(RobloxGui.Modules.TenFootInterface):IsEnabled()

------------ Constants -------------------
local frameDefaultTransparency = .85
local frameSelectedTransparency = .65

------------ Variables -------------------
local PageInstance = nil
local localPlayer = PlayersService.LocalPlayer

----------- CLASS DECLARATION --------------
local function Initialize()
    local settingsPageFactory = require(RobloxGui.Modules.SettingsPageFactory)
    local this = settingsPageFactory:CreateNewPage()

    local playerLabelFakeSelection = Instance.new('ImageLabel')
    playerLabelFakeSelection.BackgroundTransparency = 1
    --[[playerLabelFakeSelection.Image = 'ayaasset://textures/ui/SelectionBox.png'
    playerLabelFakeSelection.ScaleType = 'Slice'
    playerLabelFakeSelection.SliceCenter = Rect.new(31,31,31,31)]]
    playerLabelFakeSelection.Image = ''
    playerLabelFakeSelection.Size = UDim2.new(0,0,0,0)

    ------ TAB CUSTOMIZATION -------
    this.TabHeader.Name = "PlayersTab"

    this.TabHeader.Icon.Image = "ayaasset://textures/ui/Settings/MenuBarIcons/PlayersTabIcon.png"
    if utility:IsSmallTouchScreen() then
        this.TabHeader.Icon.Size = UDim2.new(0,34,0,28)
        this.TabHeader.Icon.Position = UDim2.new(this.TabHeader.Icon.Position.X.Scale,this.TabHeader.Icon.Position.X.Offset,0.5,-14)
        this.TabHeader.Size = UDim2.new(0,115,1,0)
    elseif isTenFootInterface then
        this.TabHeader.Icon.Image = "ayaasset://textures/ui/Settings/MenuBarIcons/PlayersTabIcon@2x.png"
        this.TabHeader.Icon.Size = UDim2.new(0,88,0,74)
        this.TabHeader.Icon.Position = UDim2.new(0,0,0.5,-43)
        this.TabHeader.Size = UDim2.new(0,280,1,0)
    else
        this.TabHeader.Icon.Size = UDim2.new(0,44,0,37)
        this.TabHeader.Icon.Position = UDim2.new(0,15,0.5,-18)    -- -22
        this.TabHeader.Size = UDim2.new(0,150,1,0)
    end

    this.TabHeader.Icon.Title.Text = "Players"

    ----- FRIENDSHIP FUNCTIONS ------
    local function getFriendStatus(selectedPlayer)
        if selectedPlayer == localPlayer then
            return Enum.FriendStatus.NotFriend
        else
            local success, result = pcall(function()
                -- NOTE: Core script only
                return localPlayer:GetFriendStatus(selectedPlayer)
            end)
            if success then
                return result
            else
                return Enum.FriendStatus.NotFriend
            end
        end
    end

    ------ PAGE CUSTOMIZATION -------
    this.Page.Name = "Players"

    local selectionFound = nil
    local function friendStatusCreate(playerLabel, player)
        if playerLabel then
            -- remove any previous friend status labels
            for _, item in pairs(playerLabel:GetChildren()) do
                if item and item.Name == 'FriendStatus' then
                    if GuiService.SelectedCoreObject == item then
                        selectionFound = nil
                        GuiService.SelectedCoreObject = nil
                    end
                    item:Destroy()
                end
            end

            -- create new friend status label
            local status = nil
            if player and player ~= localPlayer and player.userId > 1 and localPlayer.userId > 1 then
                status = getFriendStatus(player)
            end

            local friendLabel = nil
            local friendLabelText = nil
            if not status then
                friendLabel = Instance.new('TextButton')
                friendLabel.Text = ''
                friendLabel.BackgroundTransparency = 1
                friendLabel.Position = UDim2.new(1,-198,0,7)
            elseif status == Enum.FriendStatus.Friend then 
                friendLabel = Instance.new('TextButton')
                friendLabel.Text = 'Friend'
                friendLabel.BackgroundTransparency = 1
                friendLabel.FontSize = 'Size24'
                friendLabel.Font = 'SourceSans'
                friendLabel.TextColor3 = Color3.new(1,1,1)
                friendLabel.Position = UDim2.new(1,-198,0,7)
            elseif status == Enum.FriendStatus.Unknown or status == Enum.FriendStatus.NotFriend or status == Enum.FriendStatus.FriendRequestReceived then
                local addFriendFunc = function()
                    if friendLabel and friendLabelText and friendLabelText.Text ~= '' then
                        friendLabel.ImageTransparency = 1
                        friendLabelText.Text = ''
                        if localPlayer and player then
                            localPlayer:RequestFriendship(player)
                        end
                    end
                end
                local friendLabel2, friendLabelText2 = utility:MakeStyledButton("FriendStatus", "Add Friend", UDim2.new(0, 182, 0, 46), addFriendFunc)
                friendLabel = friendLabel2
                friendLabelText = friendLabelText2
                friendLabelText.ZIndex = 3
                friendLabelText.Position = friendLabelText.Position + UDim2.new(0,0,0,1)
                friendLabel.Position = UDim2.new(1,-198,0,7)
            elseif status == Enum.FriendStatus.FriendRequestSent then
                friendLabel = Instance.new('TextButton')
                friendLabel.Text = 'Request Sent'
                friendLabel.BackgroundTransparency = 1
                friendLabel.FontSize = 'Size24'
                friendLabel.Font = 'SourceSans'
                friendLabel.TextColor3 = Color3.new(1,1,1)
                friendLabel.Position = UDim2.new(1,-198,0,7)
            end

            if friendLabel then
                friendLabel.Name = 'FriendStatus'
                friendLabel.Size = UDim2.new(0,182,0,46)
                friendLabel.ZIndex = 3
                friendLabel.Parent = playerLabel
                friendLabel.SelectionImageObject = playerLabelFakeSelection

                local updateHighlight = function()
                    if playerLabel then
                        playerLabel.ImageTransparency = friendLabel and GuiService.SelectedCoreObject == friendLabel and frameSelectedTransparency or frameDefaultTransparency
                    end
                end
                friendLabel.SelectionGained:connect(updateHighlight)
                friendLabel.SelectionLost:connect(updateHighlight)

                if UserInputService.GamepadEnabled and not selectionFound then
                    selectionFound = true
                    local fakeSize = 20
                    playerLabelFakeSelection.Size = UDim2.new(0,playerLabel.AbsoluteSize.X+fakeSize,0,playerLabel.AbsoluteSize.Y+fakeSize)
                    playerLabelFakeSelection.Position = UDim2.new(0, -(playerLabel.AbsoluteSize.X-198)-fakeSize*.5, 0, -8-fakeSize*.5)
                    GuiService.SelectedCoreObject = friendLabel
                end
            end

        end
    end

    localPlayer.FriendStatusChanged:connect(function(player, friendStatus)
        if player then
            local playerLabel = this.Page:FindFirstChild('PlayerLabel'..player.Name)
            if playerLabel then
                friendStatusCreate(playerLabel, player)
            end
        end
    end)

    if utility:IsSmallTouchScreen() then
        local spaceFor3Buttons = RobloxGui.AbsoluteSize.x >= 720    -- else there is only space for 2

        local resetFunc = function()
            this.HubRef:SwitchToPage(this.HubRef.ResetCharacterPage, false, 1)
        end
        local resetButton, resetLabel = utility:MakeStyledButton("ResetButton", "Reset Character", UDim2.new(0, 200, 0, 62), resetFunc)
        resetLabel.Size = UDim2.new(1, 0, 1, -6)
        resetLabel.FontSize = Enum.FontSize.Size24
        resetButton.Position = UDim2.new(0.5,spaceFor3Buttons and -340 or -220,0,14)
        resetButton.Parent = this.Page

        local leaveGameFunc = function()
            this.HubRef:SwitchToPage(this.HubRef.LeaveGamePage, false, 1)
        end
        local leaveButton, leaveLabel = utility:MakeStyledButton("LeaveButton", "Leave Game", UDim2.new(0, 200, 0, 62), leaveGameFunc)
        leaveLabel.Size = UDim2.new(1, 0, 1, -6)
        leaveLabel.FontSize = Enum.FontSize.Size24
        leaveButton.Position = UDim2.new(0.5,spaceFor3Buttons and -100 or 20,0,14)
        leaveButton.Parent = this.Page

        if spaceFor3Buttons then
            local resumeGameFunc = function()
                this.HubRef:SetVisibility(false)
            end
            resumeButton, resumeLabel = utility:MakeStyledButton("ResumeButton", "Resume Game", UDim2.new(0, 200, 0, 62), resumeGameFunc)
            resumeLabel.Size = UDim2.new(1, 0, 1, -6)
            resumeLabel.FontSize = Enum.FontSize.Size24
            resumeButton.Position = UDim2.new(0.5,140,0,14)
            resumeButton.Parent = this.Page
        end
    end

    local existingPlayerLabels = {}
    this.Displayed.Event:connect(function(switchedFromGamepadInput)
        local sortedPlayers = PlayersService:GetPlayers()
        table.sort(sortedPlayers,function(item1,item2)
            return item1.Name < item2.Name
        end)

        local extraOffset = 20
        if utility:IsSmallTouchScreen() then
            extraOffset = 85
        end

        selectionFound = nil


        -- iterate through players to reuse or create labels for players
        for index=1, #sortedPlayers do
            local player = sortedPlayers[index]
            local frame = existingPlayerLabels[index]
            if player then
                -- create label (frame) for this player index if one does not exist
                if not frame or not frame.Parent then
                    frame = Instance.new('ImageLabel')
                    frame.Image = "ayaasset://textures/ui/dialog_white.png"
                    frame.ScaleType = 'Slice'
                    frame.SliceCenter = Rect.new(10,10,10,10)
                    frame.Size = UDim2.new(1,0,0,60)
                    frame.Position = UDim2.new(0,0,0,(index-1)*80 + extraOffset)
                    frame.BackgroundTransparency = 1
                    frame.ZIndex = 2

                    local icon = Instance.new('ImageLabel')
                    icon.Name = 'Icon'
                    icon.BackgroundTransparency = 1
                    icon.Size = UDim2.new(0,36,0,36)
                    icon.Position = UDim2.new(0,12,0,12)
                    icon.ZIndex = 3
                    icon.Parent = frame

                    local nameLabel = Instance.new('TextLabel')
                    nameLabel.Name = 'NameLabel'
                    nameLabel.TextXAlignment = Enum.TextXAlignment.Left
                    nameLabel.Font = 'SourceSans'
                    nameLabel.FontSize = 'Size24'
                    nameLabel.TextColor3 = Color3.new(1,1,1)
                    nameLabel.BackgroundTransparency = 1
                    nameLabel.Position = UDim2.new(0,60,.5,0)
                    nameLabel.Size = UDim2.new(0,0,0,0)
                    nameLabel.ZIndex = 3
                    nameLabel.Parent = frame

                    frame.MouseEnter:connect(function()
                        frame.ImageTransparency = frameSelectedTransparency
                    end)
                    frame.MouseLeave:connect(function()
                        frame.ImageTransparency = frameDefaultTransparency
                    end)

                    frame.Parent = this.Page
                    table.insert(existingPlayerLabels, index, frame)
                end
                frame.Name = 'PlayerLabel'..player.Name
                frame.Icon.Image = 'http://www.kiseki.lol/Thumbs/Avatar.ashx?x=100&y=100&userId='..math.max(1, player.userId)
                frame.NameLabel.Text = player.Name
                frame.ImageTransparency = frameDefaultTransparency

                friendStatusCreate(frame, player)
            end
        end

        -- iterate through existing labels in reverse to destroy and remove unused labels
        for index=#existingPlayerLabels, 1, -1 do
            local player = sortedPlayers[index]
            local frame = existingPlayerLabels[index]
            if frame and not player then
                table.remove(existingPlayerLabels, i)
                frame:Destroy()
            end
        end

        this.Page.Size = UDim2.new(1,0,0, extraOffset + 80 * #sortedPlayers - 5)
    end)

    return this
end


----------- Public Facing API Additions --------------
PageInstance = Initialize()
return PageInstance