EventHandler.lua

StriLi.EventHandler = { frame = nil };

function StriLi.EventHandler:init()

    if self.frame == nil then
        self.frame = CreateFrame("FRAME");
    end

    self.frame:SetScript("OnEvent", function(_, event, ...)
        self:OnEvent(event, ...)
    end);
    self.frame:RegisterEvent("ADDON_LOADED");
    self.frame:RegisterEvent("PLAYER_LOGOUT");
    self.frame:RegisterEvent("PARTY_MEMBERS_CHANGED");
    self.frame:RegisterEvent("PARTY_MEMBER_DISABLE");
    self.frame:RegisterEvent("PARTY_MEMBER_ENABLE");
    self.frame:RegisterEvent("CHAT_MSG_ADDON");
    self.frame:RegisterEvent("CHAT_MSG_WHISPER");

end

function StriLi.EventHandler:OnEvent(event, ...)

    if event == "ADDON_LOADED" and arg1 == "StriLi" then
        StriLi.startup = true;
        StriLi_initAddon();
        StriLi.MainFrame:init();
        StriLi.ItemHistory:initFromRawData(StriLi_ItemHistory);
        StriLi.LootRules:init();
        StriLi_OptionFrame_init();
        if StriLi_VersionEncryptToNumber(StriLi_LatestVersionEncrypt) > StriLi_VersionEncryptToNumber(StriLi.VersionEncrypt) then
            local versionFrame = CreateFrame("FRAME", "StriLi_VersionFrame", UIParent, "StriLi_CopyVersionFrame_Template");
            local editBox = versionFrame:GetChildren():GetChildren();
            StriLi_VersionFrame_FontString:SetText();
            editBox:SetText("https://github.com/sba5827/StriLi");
            editBox:HighlightText();
            versionFrame:Show();
            editBox:SetScript("OnEscapePressed", function(_) versionFrame:Hide() end);
        end
        delayedFunctionCall(20.0, function ()
            self:OnPartyMembersChanged();
            StriLi.startup = false;
            print("|cff00ffffStriLi "..StriLi.Lang.version.." " .. StriLi_VersionEncryptToNumber(StriLi.VersionEncrypt) .. " "..StriLi.Lang.loaded.."|r");
            if (not StriLi_isVersionValid(StriLi.VersionEncrypt)) then
                print("|cff00ffff ".."This does not seem like a valid version of StriLi. Checkout https://github.com/sba5827/StriLi.")
            else
                print("|cff00ffff ".."This does seem like a valid version of StriLi.")
            end
        end)
    elseif event == "PARTY_MEMBERS_CHANGED" or event == "PARTY_MEMBER_DISABLE" or event == "PARTY_MEMBER_ENABLE" then
        self:OnPartyMembersChanged();
    elseif event == "PLAYER_LOGOUT" then
        StriLi_finalizeAddon(); -- Ensures that all important data will be saved
    elseif event == "CHAT_MSG_SYSTEM" then
        self.chatMsgSystem_cbFnc(...);
    elseif event == "CHAT_MSG_ADDON" then
        StriLi.CommunicationHandler:On_CHAT_MSG_ADDON(...);
    elseif event == "CHAT_MSG_WHISPER" then
        self:OnWhisper(...);
    end

end

function StriLi.EventHandler:OnPartyMembersChanged()

    local numOfMembers = GetNumRaidMembers();

    if numOfMembers < 1 and not StriLi_newRaidGroup then
        self:OnRaidLeft();
    elseif numOfMembers < 1 and StriLi_newRaidGroup then
        -- just entered or left a Group no Raid
        if not (StriLi.master:get() == "") then
            StriLi.master:set("");
        end
    elseif numOfMembers > 1 and StriLi_newRaidGroup then
        self:OnJoiningNewRaidGroup();
    elseif numOfMembers > 1 then
        self:addNewPlayers();
    end

    StriLi.CommunicationHandler:ShoutVersion();
    StriLi.CommunicationHandler:sendMasterChanged(StriLi.master:get());

end

function StriLi.EventHandler:OnRaidLeft()

    if StriLi.confirmFrame ~= nil then
        StriLi.confirmFrame:hide();
    end

    StriLi.confirmFrame = ConfirmDialogFrame:new(nil, StriLi.Lang.Confirm.RaidLeftResetData,
            function()
                StriLi.MainFrame:resetData();
            end,
            nil);

    StriLi.confirmFrame:show();

    StriLi_newRaidGroup = true;
    StriLi.master:set("");

end

function StriLi.EventHandler:OnJoiningNewRaidGroup()

    StriLi.CommunicationHandler:checkForMaster(function(master)

        local _, rank = GetRaidRosterInfo(UnitInRaid("player")+1);

        if master == "" and rank > 0 then

            local newMaster = UnitName("player");
            if StriLi.CommunicationHandler:sendMasterChanged(newMaster) then
                StriLi.master:set(newMaster);
            else
                error(StriLi.Lang.ErrorMsg.MasterInitFail);
            end

        else
            StriLi.master:set(master);
        end

    end);

    StriLi_newRaidGroup = false;

    if RaidMembersDB:getSize() > 0 then

        if StriLi.confirmFrame ~= nil then
            StriLi.confirmFrame:hide();
        end

        StriLi.confirmFrame = ConfirmDialogFrame:new(nil, StriLi.Lang.Confirm.NewRaidResetData,
                function()

                    StriLi.MainFrame:resetData();
                    StriLi.CommunicationHandler:sendSycRequest();

                end,
                function()
                    self:addNewPlayers();
                    StriLi.CommunicationHandler:sendSycRequest();
                end);

        StriLi.confirmFrame:show();
    else
        self:addNewPlayers();
        StriLi.CommunicationHandler:sendSycRequest();
    end

end

function StriLi.EventHandler:enable_CHAT_MSG_SYSTEM_event(cbFnc)
    self.frame:RegisterEvent("CHAT_MSG_SYSTEM");
    self.chatMsgSystem_cbFnc = cbFnc;
end

function StriLi.EventHandler:disable_CHAT_MSG_SYSTEM_event()
    self.frame:UnregisterEvent("CHAT_MSG_SYSTEM");
    self.chatMsgSystem_cbFnc = nil;
end

function StriLi.EventHandler:addNewPlayers()

    local numOfMembers = GetNumRaidMembers();
    local masterIsInRaid = false;

    for i = 1, numOfMembers do

        local name, _, subgroup = GetRaidRosterInfo(i);
        if (name == nil) then
            return ;
        end

        if not (StriLiOptions["IgnoreGroup"..subgroup]) then

            if StriLi.master:get() == name then
                masterIsInRaid = true;
            end

            local _, englishClass = UnitClass("raid" .. tostring(i));
            local existingMember = RaidMembersDB:checkForMember(name);

            if not existingMember then
                RaidMembersDB:add(name, englishClass);
                StriLi.MainFrame:addPlayer({ name, RaidMembersDB:get(name) });
            end

            StriLi.CommunicationHandler:checkIfUserHasStriLi(name, function(userHasStriLi)
                if userHasStriLi and not (StriLi.master:get() == name) and not RaidMembersDB:isMemberAssist(name) then

                    StriLi.MainFrame.rows[name]:setStatus(RowFrameStatus_t.HasStriLi);
                elseif userHasStriLi and not (StriLi.master:get() == name) and RaidMembersDB:isMemberAssist(name) then

                    StriLi.MainFrame.rows[name]:setStatus(RowFrameStatus_t.StriLiAssist);
                elseif userHasStriLi and (StriLi.master:get() == name) then

                    StriLi.MainFrame.rows[name]:setStatus(RowFrameStatus_t.StriLiMaster);
                end
            end);
        end
    end

    if not masterIsInRaid then

        if StriLi.MainFrame.rows[StriLi.master:get()] ~= nil then
            StriLi.MainFrame.rows[StriLi.master:get()]:setStatus(RowFrameStatus_t.None);
        end

        StriLi.master:set("");

        local _t = math.random()*10;
        
        self.frame:SetScript("OnUpdate",function(_, elapsed)
            _t = _t -elapsed;

            if _t < 0.0 then

                StriLi.CommunicationHandler:checkForMaster(function(master)

                    if UnitInRaid("player") == nil then return end;

                    masterIsInRaid = false;

                    for i = 1, numOfMembers do

                        local name = GetRaidRosterInfo(i);
                        if (name == nil) then
                            return ;
                        end

                        if name == master then
                            masterIsInRaid = true;
                        end

                    end

                    local _, rank = GetRaidRosterInfo(UnitInRaid("player")+1)

                    if not masterIsInRaid  and rank > 0 then

                        local newMaster = UnitName("player");
                        if StriLi.CommunicationHandler:sendMasterChanged(newMaster) then
                            StriLi.master:set(newMaster);
                        else
                            error(StriLi.Lang.ErrorMsg.MasterInitFail);
                        end

                    else
                        StriLi.master:set(master);
                    end

                end);

                self.frame:SetScript("OnUpdate", nil);

            end

        end)

    end

end

function StriLi.EventHandler:OnWhisper(...)
    local message, author = arg1, arg2;
    message = string.lower(message);

    if RaidMembersDB:checkForMember(author) and StriLi_GetPlayerRank(author) > -1 and StriLiOptions["WhisperTallyMarks"] then
        if  string.match(message,"%s*strich") and not string.match(message,"%S+strich") or
            string.match(message,"%s*stroke") and not string.match(message,"%S+stroke") or
            string.match(message,"%s*tally mark") and not string.match(message,"%S+tally mark") or
            string.match(message,"%s*strili") and not string.match(message,"%S+strili") or
            string.match(message,"%s*trazo") and not string.match(message,"%S+trazo")
        then
            RaidMembersDB:postAllDataAsWhisper(author);
        end
    end
end