Puppeteer/libs/AuraTracker.lua

-- Detects casts and records the aura times in PTUnit

if not PTUtil.IsSuperWowPresent() then
    return
end

local turtle = PTUtil.IsTurtleWow()
-- Value is duration
local trackedCastedAuras = {
    -- Druid
    ["Rejuvenation"] = 12,
    ["Regrowth"] = turtle and 20 or 21,
    ["Mark of the Wild"] = 30 * 60,
    ["Gift of the Wild"] = 60 * 60,
    ["Thorns"] = 10 * 60,
    ["Abolish Poison"] = 8,
    ["Innervate"] = 20,
    -- Druid: Offensive
    ["Moonfire"] = 18,
    ["Insect Swarm"] = 18,
    ["Faerie Fire"] = 40,
    -- Priest
    ["Power Word: Fortitude"] = 30 * 60,
    ["Divine Spirit"] = 30 * 60,
    ["Shadow Protection"] = 10 * 60,
    ["Prayer of Fortitude"] = 60 * 60,
    ["Prayer of Spirit"] = 60 * 60,
    ["Prayer of Shadow Protection"] = 20 * 60,
    ["Renew"] = 15,
    ["Power Word: Shield"] = 30,
    ["Weakened Soul"] = 15,
    ["Fade"] = 10,
    ["Fear Ward"] = 10 * 60,
    ["Champion's Grace"] = 30 * 60,
    ["Empower Champion"] = 10 * 60,
    ["Champion's Bond"] = 10 * 60,
    ["Spirit of Redemption"] = 10,
    ["Abolish Disease"] = 20,
    ["Inner Fire"] = 10 * 60,
    -- Priest: Offensive
    ["Shadow Word: Pain"] = 18,
    -- Paladin
    ["Blessing of Protection"] = 10,
    ["Hand of Protection"] = 10,
    ["Divine Shield"] = 12,
    ["Holy Shield"] = 10,
    ["Bulwark of the Righteous"] = 12,
    ["Forbearance"] = 60,
    ["Blessing of Sacrifice"] = 30,
    ["Hand of Sacrifice"] = 30,
    ["Blessing of Wisdom"] = (turtle and 10 or 5) * 60,
    ["Blessing of Might"] = (turtle and 10 or 5) * 60,
    ["Blessing of Salvation"] = (turtle and 10 or 5) * 60,
    ["Blessing of Sanctuary"] = (turtle and 10 or 5) * 60,
    ["Blessing of Kings"] = (turtle and 10 or 5) * 60,
    ["Blessing of Light"] = (turtle and 10 or 5) * 60,
    ["Greater Blessing of Wisdom"] = (turtle and 30 or 15) * 60,
    ["Greater Blessing of Might"] = (turtle and 30 or 15) * 60,
    ["Greater Blessing of Salvation"] = (turtle and 30 or 15) * 60,
    ["Greater Blessing of Sanctuary"] = (turtle and 30 or 15) * 60,
    ["Greater Blessing of Kings"] = (turtle and 30 or 15) * 60,
    ["Greater Blessing of Light"] = (turtle and 30 or 15) * 60,
    -- Shaman
    ["Water Walking"] = 10 * 60,
    -- Mage
    ["Arcane Intellect"] = 30 * 60,
    ["Arcane Brilliance"] = 60 * 60,
    ["Frost Armor"] = 30 * 60,
    ["Ice Armor"] = 30 * 60,
    ["Mage Armor"] = 30 * 60,
    ["Ice Barrier"] = 60,
    ["Mana Shield"] = 60,
    ["Ice Block"] = 10,
    -- Mage: Offensive
    ["Polymorph"] = 50,
    -- Warlock
    ["Soulstone Resurrection"] = 30 * 60,
    ["Unending Breath"] = 10 * 60,
    ["Demon Skin"] = 30 * 60,
    ["Demon Armor"] = 30 * 60,
    ["Fire Shield"] = 3 * 60,
    -- Warlock: Offsensive
    ["Corruption"] = 18,
    ["Immolate"] = 15,
    ["Curse of Agony"] = 24,
    ["Curse of Tongues"] = 30,
    ["Curse of Recklessness"] = 2 * 60,
    -- Rogue
    ["Evasion"] = 15,
    -- Hunter
    ["Deterrence"] = 10,
    ["Rapid Fire"] = 15,
    -- Hunter: Offensive
    ["Hunter's Mark"] = 2 * 60,
    ["Serpent Sting"] = 15,
    ["Scorpid Sting"] = 20,
    ["Viper Sting"] = 8,
    -- Warrior
    ["Battle Shout"] = 2 * 60,
    ["Shield Wall"] = 10, -- 12 with talent
    ["Last Stand"] = 20,
    -- Warrior: Offensive
    ["Rend"] = 21,
    -- Racial
    ["Quel'dorei Meditation"] = 5,
    ["Grace of the Sunwell"] = 15,
    -- Generic
    ["First Aid"] = 8,
    ["Recently Bandaged"] = 60,
}

-- Auras to start the timer for even though they weren't directly casted
local additionalAuras = {
    ["Divine Protection"] = {"Forbearance"},
    ["Divine Shield"] = {"Forbearance"},
    ["Blessing of Protection"] = {"Forbearance"},
    ["Hand of Protection"] = {"Forbearance"},
    ["First Aid"] = {"Recently Bandaged"},
    ["Power Word: Shield"] = {"Weakened Soul"}
}

-- Value is range
local aoeAuras = {
    ["Prayer of Fortitude"] = 100, 
    ["Prayer of Spirit"] = 100, 
    ["Prayer of Shadow Protection"] = 100, 
    ["Arcane Brilliance"] = 100, 
    ["Gift of the Wild"] = 100, 
    ["Battle Shout"] = 20
}

-- Paladins always get their own special stuff..
-- Their buffs are aoe but apply to the whole raid for a specific class
local aoeClassAuras = PTUtil.ToSet({
    "Greater Blessing of Wisdom", "Greater Blessing of Might", "Greater Blessing of Salvation", 
    "Greater Blessing of Sanctuary", "Greater Blessing of Kings", "Greater Blessing of Light"
})

local function applyTimedAura(spellName, units)
    for _, unit in ipairs(units) do
        PTUnit.Get(unit).AuraTimes[spellName] = {["startTime"] = GetTime(), ["duration"] = trackedCastedAuras[spellName]}
        for ui in Puppeteer.UnitFrames(unit) do
            ui:UpdateAuras()
        end
    end
end

local castEventFrame = CreateFrame("Frame", "PTAuraTrackingCasts")
castEventFrame:RegisterEvent("UNIT_CASTEVENT")
castEventFrame:SetScript("OnEvent", function()
    local caster, target, event, spellID, duration = arg1, arg2, arg3, arg4, arg5

    if event == "CAST" or event == "CHANNEL" then
        local spellName = SpellInfo(spellID)
        if trackedCastedAuras[spellName] then
            if target == "" then
                target = caster
            end
            local units = PTGuidRoster.GetUnits(target)
            if not units then
                return
            end
            if aoeAuras[spellName] then
                local targets = PTUtil.GetSurroundingPartyMembers(target, aoeAuras[spellName])
                for _, unit in ipairs(targets) do
                    local units = PTGuidRoster.GetAllUnits(unit)
                    applyTimedAura(spellName, units)
                end
            elseif aoeClassAuras[spellName] then
                local class = PTUtil.GetClass(target)
                local targets = PTUtil.GetSurroundingRaidMembers(target, 100)
                for _, unit in ipairs(targets) do
                    if PTUtil.GetClass(unit) == class then
                        local units = PTGuidRoster.GetAllUnits(unit)
                        applyTimedAura(spellName, units)
                    end
                end
            else
                applyTimedAura(spellName, units)
            end

            if additionalAuras[spellName] then
                for _, aura in ipairs(additionalAuras[spellName]) do
                    applyTimedAura(aura, units)
                end
            end
        end
    end
end)