EventHandler.lua

local _, MPT = ...
local L = LibStub("AceLocale-3.0"):GetLocale("MPlusTimer")

local f = CreateFrame("Frame")
f:RegisterEvent("CHALLENGE_MODE_KEYSTONE_SLOTTED")
f:RegisterEvent("CHALLENGE_MODE_KEYSTONE_RECEPTABLE_OPEN")
f:RegisterEvent("PLAYER_LOGIN")
f:RegisterEvent("PLAYER_ENTERING_WORLD")
f:RegisterEvent("CHALLENGE_MODE_START")
f:RegisterEvent("CHALLENGE_MODE_DEATH_COUNT_UPDATED")
f:RegisterEvent("CHALLENGE_MODE_COMPLETED")
f:RegisterEvent("ADDON_LOADED")
f:RegisterEvent("SCENARIO_CRITERIA_UPDATE")
f:RegisterEvent("SCENARIO_POI_UPDATE")
f:RegisterEvent("INSTANCE_ABANDON_VOTE_FINISHED")
f:RegisterEvent("UNIT_DIED")
f:RegisterEvent("GOSSIP_SHOW")

f:SetScript("OnEvent", function(self, e, ...)
    MPT:EventHandler(e, ...)
end)

function MPT:ToggleEventRegister(On)
    if On then
        if not self.Timer then
            self.Timer = C_Timer.NewTimer(self.UpdateRate, function()
                self.Timer = nil
                self:EventHandler("FRAME_UPDATE")
            end)
        end
    end
end

function MPT:EventHandler(e, ...) -- internal checks whether the event comes from addon comms. We don't want to allow blizzard events to be fired manually
    if e == "INSTANCE_ABANDON_VOTE_FINISHED" and C_ChallengeMode.IsChallengeModeActive() then
        local success = ...
        self:AddHistory(false, self.cmap, self.level, false, success)
    elseif e == "CHALLENGE_MODE_KEYSTONE_SLOTTED" and MPTSV.CloseBags then
        CloseAllBags()
    elseif e == "CHALLENGE_MODE_KEYSTONE_RECEPTABLE_OPEN" and MPTSV.KeySlot then
        local index = select(3, GetInstanceInfo())
        if index == 8 or index == 23 then
            for bagID = 0, NUM_BAG_SLOTS do
                for invID = 1, C_Container.GetContainerNumSlots(bagID) do
                    local itemID = C_Container.GetContainerItemID(bagID, invID)
                    if itemID and C_Item.IsItemKeystoneByID(itemID) then
                        C_Container.UseContainerItem(bagID, invID)
                    end
                end
            end
        end
    elseif e == "PLAYER_ENTERING_WORLD" then
        local login, reload, delayed = ...
        C_MythicPlus.RequestMapInfo()
        local seasonID = C_MythicPlus.GetCurrentSeason()
        if seasonID > 0 and (login or reload or delayed) then
            if not MPTSV.HasPitFixed then
                MPTSV.HasPitFixed = true
                if MPTSV.BestTime and MPTSV.BestTime[17] then
                    MPTSV.BestTime[17][556] = nil
                end
            end
            if not MPTSV.BestTime then MPTSV.BestTime = {} end
            if not MPTSV.History then MPTSV.History = {} end
            if not MPTSV.BestTime[seasonID] then MPTSV.BestTime[seasonID] = {} end
            if not MPTSV.History[seasonID] then MPTSV.History[seasonID] = {} end
            MPTSV.HistoryData = MPTSV.HistoryData or {}
            self.seasonID = seasonID
            local G = UnitGUID("player")
            -- only allow delayed data because data on initial login contains other character's data.
            if delayed and MPTSV.History and MPTSV.History[seasonID] then
                self:AddCharacterHistory()
            end
            if delayed then return end
        end
        if login or reload then
            C_Timer.After(10, function() self:EventHandler("PLAYER_ENTERING_WORLD", false, false, true) end) -- re initiate after 10 seconds as a lot of this data is not available on initial login
        end
        if self.HideTracker and not self.Hooked then
            self.Hooked = true
            local frame = C_AddOns.IsAddOnLoaded("!KalielsTracker") and _G["!KalielsTrackerFrame"] or ObjectiveTrackerFrame
            hooksecurefunc(frame, "Show", function()
                if IsInInstance() and (C_ChallengeMode.IsChallengeModeActive() or C_ChallengeMode.GetChallengeCompletionInfo().time ~= 0) then frame:Hide() end
            end)
        end
        if C_ChallengeMode.IsChallengeModeActive() then
            self:Init(false)
            self:ToggleEventRegister(true)
        else
            self:ShowFrame(false)
            self:ToggleEventRegister(false)
        end
    elseif e == "CHALLENGE_MODE_DEATH_COUNT_UPDATED" then
        self:UpdateKeyInfo(false, true)
    elseif e == "CHALLENGE_MODE_START" then
        self.PlayerDeaths = {}
        self:Init()
        self:ToggleEventRegister(true)
    elseif e == "CHALLENGE_MODE_COMPLETED" then
        self:UpdateTimerBar(false, true, false)
        self:UpdateEnemyForces(false, false, true)
        self:SetSV(false, false, false, true)
        self:ToggleEventRegister(false)
        C_MythicPlus.RequestMapInfo() -- try to refresh data
        C_Timer.After(5, function() self:AddCharacterHistory() end) -- add to history 5s delayed to make sure blizzard API has the data
    elseif e == "SCENARIO_CRITERIA_UPDATE" and C_ChallengeMode.IsChallengeModeActive() then
        self:UpdateBosses(false, false)
        self:UpdateEnemyForces(false, false, false)
    elseif e == "SCENARIO_POI_UPDATE" and C_ChallengeMode.IsChallengeModeActive() then
        self:UpdateEnemyForces(false, false, false)
    elseif e == "FRAME_UPDATE" and C_ChallengeMode.IsChallengeModeActive() then
        if not self.Timer then
            self.Timer = C_Timer.NewTimer(self.UpdateRate, function()
                self.Timer = nil
                self:EventHandler("FRAME_UPDATE")
            end)
            self:UpdateTimerBar()
        end

    elseif e == "PLAYER_LOGIN" then
        if not MPTSV then -- first load of the addon
            MPTSV = {}
            MPTSV.LowerKey = true
            MPTSV.CloseBags = true
            MPTSV.KeySlot = true
            MPTSV.MinimapIcon = {hide = true}
            MPTSV.BestTime = {}
            self:CreateProfile("default")
        else
            self:ModernizeProfile(false, true)
            self:LoadProfile()
        end
        if MPTSV.AutoGossip == nil then MPTSV.AutoGossip = true end
        if MPTSV.debug then
            MPTGlobal = MPT
            print(L["Debug mode for MPlusTimer is currently enabled. You can disable it with '/mpt debug'"])
        end
        self:CreateMiniMapButton()
    elseif e == "UNIT_DIED" then
        local G = ...
        if issecretvalue(G) then return end -- likely to be an enemy
        local unit = UnitTokenFromGUID(G)
        if UnitIsPlayer(unit) and not UnitIsFeignDeath(unit) then -- only count non-pets and ignore feign death
            self.PlayerDeaths = self.PlayerDeaths or {}
            local name = UnitName(unit)
            self.PlayerDeaths[name] = self.PlayerDeaths[name] and self.PlayerDeaths[name]+1 or 1
        end
    elseif e == "GOSSIP_SHOW" and C_ChallengeMode.IsChallengeModeActive() and MPTSV.AutoGossip then
        if UnitExists("npc") and not IsControlKeyDown() then
            local GUID = UnitGUID("npc")
            if issecretvalue(GUID) then return end
            local id = select(6, strsplit("-", GUID))
            id = tonumber(id)
            if self.Gossips[id] and self.Gossips[id].enabled then
                local title = C_GossipInfo.GetOptions()
                local num = self.Gossips[id].number
                if title[num] and title[num].gossipOptionID then
                    local popupWasShown = self:PopupIsShown()
                    C_GossipInfo.SelectOption(title[num].gossipOptionID)
                    local popupIsShown = self:PopupIsShown()
                    if popupIsShown then
                        if not popupWasShown then
                            StaticPopup1Button1:Click()
                        end
                    end
                    C_Timer.After(0.3, function()
                            C_GossipInfo.CloseGossip()
                    end)
                end
            end
        end
    end
end