------------------------------
--      Are you local?      --
------------------------------

local boss = AceLibrary("Babble-Boss-2.0")("Gluth")
local L = AceLibrary("AceLocale-2.0"):new("BigWigs"..boss)

----------------------------
--      Localization      --
----------------------------

L:RegisterTranslations("enUS", function() return {
	cmd = "gluth",

	fear_cmd = "fear",
	fear_name = "Fear Alert",
	fear_desc = "Warn for fear",
	
	frenzy_cmd = "frenzy",
	frenzy_name = "Frenzy Alert",
	frenzy_desc = "Warn for frenzy",

	decimate_cmd = "decimate",
	decimate_name = "Decimate Alert",
	decimate_desc = "Warn for Decimate",

	trigger1 = "goes into a frenzy!",
	trigger2 = "by Terrifying Roar.",
	starttrigger = "devours all nearby zombies!",

	warn1 = "Frenzy Alert!",
	warn2 = "5 second until AoE Fear!",
	warn3 = "AoE Fear alert - 20 seconds till next!",
    
	startwarn = "Gluth Engaged! ~105 seconds till Zombies!",
	decimatesoonwarn = "Decimate Soon!",
	decimatewarn = "Decimate! - AoE Zombies!",
	decimatetrigger = "Gluth gains Decimate.",

	bar1text = "AoE Fear",
	decimatebartext = "Decimate Zombies",

} end )


----------------------------------
--      Module Declaration      --
----------------------------------

BigWigsGluth = BigWigs:NewModule(boss)
BigWigsGluth.zonename = AceLibrary("Babble-Zone-2.0")("Naxxramas")
BigWigsGluth.enabletrigger = boss
BigWigsGluth.toggleoptions = {"frenzy", "fear", "decimate", "bosskill"}
BigWigsGluth.revision = tonumber(string.sub("$Revision: 5847 $", 12, -3))

------------------------------
--      Initialization      --
------------------------------

-- XXX Need to add berserker rage.

function BigWigsGluth:OnEnable()
	self:RegisterEvent("BigWigs_Message")
    
    self:RegisterEvent("PLAYER_REGEN_ENABLED")
    self:RegisterEvent("PLAYER_REGEN_DISABLED")
    
	self:RegisterEvent("CHAT_MSG_SPELL_PERIODIC_CREATURE_BUFFS", "Frenzy")
	self:RegisterEvent("CHAT_MSG_MONSTER_EMOTE", "Frenzy")

	self:RegisterEvent("CHAT_MSG_SPELL_PERIODIC_PARTY_DAMAGE", "Fear")
	self:RegisterEvent("CHAT_MSG_SPELL_PERIODIC_SELF_DAMAGE", "Fear")
	self:RegisterEvent("CHAT_MSG_SPELL_PERIODIC_FRIENDLYPLAYER_DAMAGE", "Fear")
    
	self:RegisterEvent("CHAT_MSG_COMBAT_HOSTILE_DEATH", "GenericBossDeath")
    self:RegisterEvent("CHAT_MSG_SPELL_CREATURE_VS_CREATURE_DAMAGE")
	
	self:RegisterEvent("BigWigs_RecvSync")
	self:TriggerEvent("BigWigs_ThrottleSync", "GluthDecimate", 10)
end

function BigWigsGluth:PLAYER_REGEN_DISABLED()
	local go = self:Scan()
	if go then
        self:TriggerEvent("BigWigs_Message", L"startwarn", "Yellow")
        if self.db.profile.decimate then
            self:TriggerEvent("BigWigs_StartBar", self, L"decimatebartext", 105, 2, "Interface\\Icons\\INV_Shield_01", "Green", "Yellow", "Orange", "Red")
            self:ScheduleEvent("BigWigs_Message", 100, L"decimatesoonwarn", "Orange")
        end
    end
end

function BigWigsGluth:PLAYER_REGEN_ENABLED()
	local go = self:Scan()
	local running = self:IsEventScheduled("Gluth_CheckWipe")
	if (not go) then
		self:TriggerEvent("BigWigs_RebootModule", self)
	elseif (not running) then
		self:ScheduleRepeatingEvent("Gluth_CheckWipe", self.PLAYER_REGEN_ENABLED, 2, self)
	end
end

function BigWigsGluth:Scan()
    if (UnitName("target") == (boss) and UnitAffectingCombat("target")) then
        return true
    elseif (UnitName("playertarget") == (boss) and UnitAffectingCombat("playertarget")) then
        return true
    else
        local i
        for i = 1, GetNumRaidMembers(), 1 do
            if (UnitName("raid"..i.."target") == (boss) and UnitAffectingCombat("raid"..i.."target")) then
                return true
            end
        end
    end
    local lasttarget = UnitName("target")
    TargetByName(boss, true)
    if (UnitName("target") == boss and UnitAffectingCombat("target")) then
        if (lasttarget) then
            TargetByName(lasttarget, true)
        else
            ClearTarget()
        end
        return true
    end
    if (lasttarget) then
        TargetByName(lasttarget, true)
    else
        ClearTarget()
    end
    return false
end

function BigWigsGluth:Frenzy( msg )
	if self.db.profile.frenzy and msg == L"trigger1" then
		self:TriggerEvent("BigWigs_Message", L"warn1", "Red")
	end
end

function BigWigsGluth:Fear( msg )
	if self.db.profile.fear and not self.prior and string.find(msg, L"trigger2") then
		self:TriggerEvent("BigWigs_Message", L"warn3", "Red")
		self:TriggerEvent("BigWigs_StartBar", self, L"bar1text", 20, 1, "Interface\\Icons\\Spell_Shadow_PsychicScream", "Yellow", "Orange", "Red")
		self:ScheduleEvent("BigWigs_Message", 15, L"warn2", "Orange")
		self.prior = true
	end
end

function BigWigsGluth:CHAT_MSG_SPELL_CREATURE_VS_CREATURE_DAMAGE( msg )
	if msg == L"decimatetrigger" then
		self:TriggerEvent("BigWigs_SendSync", "GluthDecimate")
	end
end

function BigWigsGluth:BigWigs_RecvSync( sync )
	if sync ~= "GluthDecimate" then return end
	if not self.db.profile.decimate then return end
	
	self:TriggerEvent("BigWigs_Message", L"decimatewarn", "Red")
	self:TriggerEvent("BigWigs_StartBar", self, L"decimatebartext", 105, 2, "Interface\\Icons\\INV_Shield_01", "Green", "Yellow", "Orange", "Red")
	self:ScheduleEvent("BigWigs_Message", 100, L"decimatesoon", "Orange")
end

function BigWigsGluth:BigWigs_Message(text)
	if text == L"warn2" then self.prior = nil end
end