Mercurial > wow > askmrrobot

annotate CombatLog.lua @ 149:cfdb5e5c828e v70

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Tweak to azerite gear matching.
author yellowfive
date Wed, 02 Jan 2019 18:29:51 -0800
parents 6dc0e8e9f960
children a3507735dfd9
rev   line source
yellowfive@57 1 local Amr = LibStub("AceAddon-3.0"):GetAddon("AskMrRobot")
yellowfive@57 2 local L = LibStub("AceLocale-3.0"):GetLocale("AskMrRobot", true)
yellowfive@57 3 local AceGUI = LibStub("AceGUI-3.0")
yellowfive@57 4
yellowfive@133 5 local _lblLogging = nil
yellowfive@57 6 local _btnToggle = nil
yellowfive@57 7 local _panelUndoWipe = nil
yellowfive@57 8 local _chkAutoAll = nil
yellowfive@57 9 local _autoChecks = nil
yellowfive@57 10
yellowfive@57 11 local function createDifficultyCheckBox(instanceId, difficultyId)
yellowfive@57 12 local chk = AceGUI:Create("AmrUiCheckBox")
yellowfive@57 13 chk:SetText(L.DifficultyNames[difficultyId])
yellowfive@57 14 chk:SetCallback("OnClick", function(widget)
yellowfive@57 15 Amr:ToggleAutoLog(instanceId, difficultyId)
yellowfive@57 16 end)
yellowfive@57 17
yellowfive@57 18 _autoChecks[instanceId][difficultyId] = chk
yellowfive@57 19 return chk
yellowfive@57 20 end
yellowfive@57 21
yellowfive@57 22 -- render a group of controls for auto-logging of a raid zone
yellowfive@137 23 local function renderAutoLogSection(instanceId, container, i, autoLbls, autoChks)
yellowfive@57 24 _autoChecks[instanceId] = {}
yellowfive@57 25
yellowfive@57 26 local lbl = AceGUI:Create("AmrUiLabel")
yellowfive@124 27 container:AddChild(lbl)
yellowfive@57 28 lbl:SetWidth(200)
yellowfive@57 29 lbl:SetText(L.InstanceNames[instanceId])
yellowfive@57 30 lbl:SetFont(Amr.CreateFont("Regular", 20, Amr.Colors.White))
yellowfive@57 31
yellowfive@137 32 if i == 1 then
yellowfive@137 33 lbl:SetPoint("TOPLEFT", _chkAutoAll.frame, "BOTTOMLEFT", -1, -15)
yellowfive@137 34 elseif i % 2 == 0 then
yellowfive@137 35 lbl:SetPoint("TOPLEFT", autoLbls[i - 1].frame, "TOPRIGHT", 40, 0)
yellowfive@137 36 else
yellowfive@137 37 lbl:SetPoint("TOPLEFT", autoChks[i - 2].frame, "BOTTOMLEFT", 0, -30)
yellowfive@137 38 end
yellowfive@137 39
yellowfive@57 40 local line = AceGUI:Create("AmrUiPanel")
yellowfive@137 41 container:AddChild(line)
yellowfive@57 42 line:SetHeight(1)
yellowfive@57 43 line:SetBackgroundColor(Amr.Colors.White)
yellowfive@57 44 line:SetPoint("TOPLEFT", lbl.frame, "BOTTOMLEFT", 1, -7)
yellowfive@57 45 line:SetPoint("TOPRIGHT", lbl.frame, "BOTTOMRIGHT", 0, -7)
yellowfive@57 46
yellowfive@57 47 local chkMythic = createDifficultyCheckBox(instanceId, Amr.Difficulties.Mythic)
yellowfive@124 48 container:AddChild(chkMythic)
yellowfive@57 49 chkMythic:SetPoint("TOPLEFT", line.frame, "BOTTOMLEFT", 0, -8)
yellowfive@57 50
yellowfive@57 51 local chkNormal = createDifficultyCheckBox(instanceId, Amr.Difficulties.Normal)
yellowfive@124 52 container:AddChild(chkNormal)
yellowfive@57 53 chkNormal:SetPoint("TOPLEFT", line.frame, "BOTTOMLEFT", 0, -30)
yellowfive@137 54
yellowfive@57 55 -- find the widest of mythic/normal
yellowfive@57 56 local w = math.max(chkMythic:GetWidth(), chkNormal:GetWidth())
yellowfive@57 57
yellowfive@57 58 local chkHeroic = createDifficultyCheckBox(instanceId, Amr.Difficulties.Heroic)
yellowfive@124 59 container:AddChild(chkHeroic)
yellowfive@57 60 chkHeroic:SetPoint("TOPLEFT", line.frame, "BOTTOMLEFT", w + 20, -8)
yellowfive@57 61
yellowfive@57 62 local chkLfr = createDifficultyCheckBox(instanceId, Amr.Difficulties.Lfr)
yellowfive@124 63 container:AddChild(chkLfr)
yellowfive@57 64 chkLfr:SetPoint("TOPLEFT", line.frame, "BOTTOMLEFT", w + 20, -30)
yellowfive@137 65
yellowfive@61 66 return lbl, chkNormal
yellowfive@57 67 end
yellowfive@57 68
yellowfive@57 69 -- renders the main UI for the Combat Log tab
yellowfive@57 70 function Amr:RenderTabLog(container)
yellowfive@57 71
yellowfive@57 72 -- main commands
yellowfive@57 73 _btnToggle = AceGUI:Create("AmrUiButton")
yellowfive@57 74 _btnToggle:SetText(L.LogButtonStartText)
yellowfive@57 75 _btnToggle:SetBackgroundColor(Amr.Colors.Green)
yellowfive@57 76 _btnToggle:SetFont(Amr.CreateFont("Bold", 16, Amr.Colors.White))
yellowfive@57 77 _btnToggle:SetWidth(200)
yellowfive@57 78 _btnToggle:SetHeight(26)
yellowfive@57 79 _btnToggle:SetCallback("OnClick", function() Amr:ToggleLogging() end)
yellowfive@57 80 container:AddChild(_btnToggle)
yellowfive@124 81 _btnToggle:SetPoint("TOPLEFT", container.content, "TOPLEFT", 0, -40)
yellowfive@57 82
yellowfive@57 83 _lblLogging = AceGUI:Create("AmrUiLabel")
yellowfive@124 84 container:AddChild(_lblLogging)
yellowfive@57 85 _lblLogging:SetText(L.LogNote)
yellowfive@57 86 _lblLogging:SetWidth(200)
yellowfive@57 87 _lblLogging:SetFont(Amr.CreateFont("Italic", 14, Amr.Colors.BrightGreen))
yellowfive@57 88 _lblLogging:SetJustifyH("MIDDLE")
yellowfive@57 89 _lblLogging:SetPoint("TOP", _btnToggle.frame, "BOTTOM", 0, -5)
yellowfive@57 90
yellowfive@57 91 local btnReload = AceGUI:Create("AmrUiButton")
yellowfive@57 92 btnReload:SetText(L.LogButtonReloadText)
yellowfive@57 93 btnReload:SetBackgroundColor(Amr.Colors.Blue)
yellowfive@57 94 btnReload:SetFont(Amr.CreateFont("Bold", 16, Amr.Colors.White))
yellowfive@57 95 btnReload:SetWidth(200)
yellowfive@57 96 btnReload:SetHeight(26)
yellowfive@57 97 btnReload:SetCallback("OnClick", ReloadUI)
yellowfive@57 98 container:AddChild(btnReload)
yellowfive@124 99 btnReload:SetPoint("TOPLEFT", _btnToggle.frame, "TOPRIGHT", 40, 0)
yellowfive@57 100
yellowfive@91 101 --[[
yellowfive@57 102 local lbl = AceGUI:Create("AmrUiLabel")
yellowfive@57 103 lbl:SetText(L.LogReloadNote)
yellowfive@57 104 lbl:SetWidth(200)
yellowfive@57 105 lbl:SetFont(Amr.CreateFont("Italic", 14, Amr.Colors.TextTan))
yellowfive@57 106 lbl:SetJustifyH("MIDDLE")
yellowfive@57 107 lbl:SetPoint("TOP", btnReload.frame, "BOTTOM", 0, -5)
yellowfive@57 108 container:AddChild(lbl)
yellowfive@57 109
yellowfive@57 110 -- container for undo wipe so we can hide/show it all
yellowfive@57 111 _panelUndoWipe = AceGUI:Create("AmrUiPanel")
yellowfive@57 112 _panelUndoWipe:SetLayout("None")
yellowfive@57 113 _panelUndoWipe:SetBackgroundColor(Amr.Colors.Black, 0)
yellowfive@57 114 _panelUndoWipe:SetPoint("TOPLEFT", lbl.frame, "BOTTOMLEFT", 0, -40)
yellowfive@57 115 container:AddChild(_panelUndoWipe)
yellowfive@57 116
yellowfive@57 117 local btnUndoWipe = AceGUI:Create("AmrUiButton")
yellowfive@57 118 btnUndoWipe:SetText(L.LogButtonUndoWipeText)
yellowfive@57 119 btnUndoWipe:SetBackgroundColor(Amr.Colors.Orange)
yellowfive@57 120 btnUndoWipe:SetFont(Amr.CreateFont("Bold", 16, Amr.Colors.White))
yellowfive@57 121 btnUndoWipe:SetWidth(200)
yellowfive@57 122 btnUndoWipe:SetHeight(26)
yellowfive@57 123 btnUndoWipe:SetPoint("TOPLEFT", lbl.frame, "BOTTOMLEFT", 0, -40)
yellowfive@57 124 btnUndoWipe:SetCallback("OnClick", function() Amr:UndoWipe() end)
yellowfive@57 125 _panelUndoWipe:AddChild(btnUndoWipe)
yellowfive@57 126
yellowfive@57 127 lbl = AceGUI:Create("AmrUiLabel")
yellowfive@57 128 lbl:SetText(L.LogUndoWipeNote)
yellowfive@57 129 lbl:SetWidth(200)
yellowfive@57 130 lbl:SetFont(Amr.CreateFont("Italic", 14, Amr.Colors.TextTan))
yellowfive@57 131 lbl:SetJustifyH("MIDDLE")
yellowfive@57 132 lbl:SetPoint("TOP", btnUndoWipe.frame, "BOTTOM", 0, -5)
yellowfive@57 133 _panelUndoWipe:AddChild(lbl)
yellowfive@57 134
yellowfive@57 135 local lbl2 = AceGUI:Create("AmrUiLabel")
yellowfive@57 136 lbl2:SetText(L.LogUndoWipeDate(date("%B %d", time()), date("%I:%M %p", time())))
yellowfive@57 137 lbl2:SetWidth(200)
yellowfive@57 138 lbl2:SetFont(Amr.CreateFont("Italic", 14, Amr.Colors.TextTan))
yellowfive@57 139 lbl2:SetJustifyH("MIDDLE")
yellowfive@57 140 lbl2:SetPoint("TOP", lbl.frame, "BOTTOM", 0, -2)
yellowfive@57 141 _panelUndoWipe:AddChild(lbl2)
yellowfive@57 142
yellowfive@57 143 local btnWipe = AceGUI:Create("AmrUiButton")
yellowfive@57 144 btnWipe:SetText(L.LogButtonWipeText)
yellowfive@57 145 btnWipe:SetBackgroundColor(Amr.Colors.Orange)
yellowfive@57 146 btnWipe:SetFont(Amr.CreateFont("Bold", 16, Amr.Colors.White))
yellowfive@57 147 btnWipe:SetWidth(200)
yellowfive@57 148 btnWipe:SetHeight(26)
yellowfive@57 149 btnWipe:SetPoint("TOPRIGHT", btnUndoWipe.frame, "TOPLEFT", -40, 0)
yellowfive@57 150 btnWipe:SetCallback("OnClick", function() Amr:Wipe() end)
yellowfive@57 151 container:AddChild(btnWipe)
yellowfive@91 152
yellowfive@57 153 lbl = AceGUI:Create("AmrUiLabel")
yellowfive@57 154 lbl:SetText(L.LogWipeNote)
yellowfive@57 155 lbl:SetWidth(200)
yellowfive@57 156 lbl:SetFont(Amr.CreateFont("Italic", 14, Amr.Colors.TextTan))
yellowfive@57 157 lbl:SetJustifyH("MIDDLE")
yellowfive@57 158 lbl:SetPoint("TOP", btnWipe.frame, "BOTTOM", 0, -5)
yellowfive@57 159 container:AddChild(lbl)
yellowfive@57 160
yellowfive@57 161 lbl2 = AceGUI:Create("AmrUiLabel")
yellowfive@57 162 lbl2:SetText(L.LogWipeNote2("/amr wipe"))
yellowfive@57 163 lbl2:SetWidth(200)
yellowfive@57 164 lbl2:SetFont(Amr.CreateFont("Italic", 14, Amr.Colors.TextTan))
yellowfive@57 165 lbl2:SetJustifyH("MIDDLE")
yellowfive@57 166 lbl2:SetPoint("TOP", lbl.frame, "BOTTOM", 0, -2)
yellowfive@57 167 container:AddChild(lbl2)
yellowfive@91 168 ]]
yellowfive@57 169
yellowfive@57 170 -- auto-logging controls
yellowfive@91 171 local lbl = AceGUI:Create("AmrUiLabel")
yellowfive@124 172 container:AddChild(lbl)
yellowfive@57 173 lbl:SetWidth(600)
yellowfive@57 174 lbl:SetText(L.LogAutoTitle)
yellowfive@57 175 lbl:SetFont(Amr.CreateFont("Bold", 24, Amr.Colors.TextHeaderActive))
yellowfive@91 176 lbl:SetPoint("TOPLEFT", _btnToggle.frame, "BOTTOMLEFT", 0, -40)
yellowfive@57 177
yellowfive@57 178 _chkAutoAll = AceGUI:Create("AmrUiCheckBox")
yellowfive@57 179 _chkAutoAll:SetText(L.LogAutoAllText)
yellowfive@57 180 _chkAutoAll:SetCallback("OnClick", function(widget) Amr:ToggleAllAutoLog() end)
yellowfive@57 181 container:AddChild(_chkAutoAll)
yellowfive@124 182 _chkAutoAll:SetPoint("TOPLEFT", lbl.frame, "BOTTOMLEFT", 1, -15)
yellowfive@57 183
yellowfive@57 184 _autoChecks = {}
yellowfive@57 185
yellowfive@57 186 -- go through all supported instances, rendering in a left->right pattern, 2 per row
yellowfive@61 187 local autoLbls = {}
yellowfive@61 188 local autoChks = {}
yellowfive@57 189 for i, instanceId in ipairs(Amr.InstanceIdsOrdered) do
yellowfive@137 190 local autoLbl, autoChk = renderAutoLogSection(instanceId, container, i, autoLbls, autoChks)
yellowfive@57 191
yellowfive@61 192 table.insert(autoLbls, autoLbl)
yellowfive@61 193 table.insert(autoChks, autoChk)
yellowfive@57 194 end
yellowfive@124 195 autoLbls = nil
yellowfive@124 196 autoChks = nil
yellowfive@124 197
yellowfive@57 198 -- instructions
yellowfive@91 199 --[[
yellowfive@57 200 lbl = AceGUI:Create("AmrUiLabel")
yellowfive@57 201 lbl:SetText(L.LogInstructionsTitle)
yellowfive@57 202 lbl:SetWidth(480)
yellowfive@57 203 lbl:SetFont(Amr.CreateFont("Italic", 24, Amr.Colors.Text))
yellowfive@57 204 lbl:SetPoint("TOPRIGHT", container.content, "TOPRIGHT", 0, -40)
yellowfive@57 205 container:AddChild(lbl)
yellowfive@57 206
yellowfive@57 207 lbl2 = AceGUI:Create("AmrUiLabel")
yellowfive@57 208 lbl2:SetText(L.LogInstructions)
yellowfive@57 209 lbl2:SetWidth(480)
yellowfive@57 210 lbl2:SetFont(Amr.CreateFont("Italic", 14, Amr.Colors.Text))
yellowfive@57 211 lbl2:SetPoint("TOPLEFT", lbl.frame, "BOTTOMLEFT", 0, -10)
yellowfive@57 212 container:AddChild(lbl2)
yellowfive@91 213 ]]
yellowfive@57 214
yellowfive@57 215 -- initialize state of controls
yellowfive@57 216 Amr:RefreshLogUi()
yellowfive@57 217 end
yellowfive@57 218
yellowfive@57 219 function Amr:ReleaseTabLog()
yellowfive@133 220 _lblLogging = nil
yellowfive@57 221 _btnToggle = nil
yellowfive@57 222 _panelUndoWipe = nil
yellowfive@57 223 _chkAutoAll = nil
yellowfive@57 224 _autoChecks = nil
yellowfive@57 225 end
yellowfive@57 226
yellowfive@69 227 -- update the game's logging state
yellowfive@69 228 local function updateGameLogging(enabled)
yellowfive@69 229 if enabled then
yellowfive@69 230 -- always enable advanced combat logging via our addon, gathers more detailed data for better analysis
yellowfive@69 231 SetCVar("advancedCombatLogging", 1)
yellowfive@69 232 LoggingCombat(true)
yellowfive@69 233 else
yellowfive@69 234 LoggingCombat(false)
yellowfive@69 235 end
yellowfive@69 236 end
yellowfive@69 237
yellowfive@69 238 local function isAnyAutoLoggingEnabled()
yellowfive@69 239 local anyChecked = false
yellowfive@69 240 for i, instanceId in ipairs(Amr.InstanceIdsOrdered) do
yellowfive@69 241 for k, difficultyId in pairs(Amr.Difficulties) do
yellowfive@69 242 if Amr.db.profile.Logging.Auto[instanceId][difficultyId] then
yellowfive@69 243 anyChecked = true
yellowfive@69 244 break
yellowfive@69 245 end
yellowfive@69 246 end
yellowfive@69 247 if anyChecked then break end
yellowfive@69 248 end
yellowfive@69 249
yellowfive@69 250 return anyChecked
yellowfive@69 251 end
yellowfive@69 252
yellowfive@57 253 local function isAllAutoLoggingEnabled()
yellowfive@57 254 -- see if all auto-logging options are enabled
yellowfive@57 255 local allChecked = true
yellowfive@57 256 for i, instanceId in ipairs(Amr.InstanceIdsOrdered) do
yellowfive@57 257 for k, difficultyId in pairs(Amr.Difficulties) do
yellowfive@57 258 if not Amr.db.profile.Logging.Auto[instanceId][difficultyId] then
yellowfive@57 259 allChecked = false
yellowfive@57 260 break
yellowfive@57 261 end
yellowfive@57 262 end
yellowfive@57 263 if not allChecked then break end
yellowfive@57 264 end
yellowfive@57 265
yellowfive@57 266 return allChecked
yellowfive@57 267 end
yellowfive@57 268
yellowfive@57 269 -- check current zone and auto-logging settings, and enable logging if appropriate
yellowfive@69 270 local function updateAutoLogging(force, noWait)
yellowfive@69 271
yellowfive@69 272 local hasAuto = isAnyAutoLoggingEnabled()
yellowfive@69 273
yellowfive@69 274 -- before doing anything, make sure logging matches the user's current setting, deals with any inconsistency due to a crash or disconnect
yellowfive@69 275 if hasAuto then
yellowfive@69 276 updateGameLogging(Amr:IsLogging())
yellowfive@69 277 end
yellowfive@57 278
yellowfive@57 279 -- get the info about the instance
yellowfive@57 280 local zone, _, difficultyId, _, _, _, _, instanceId = GetInstanceInfo()
yellowfive@57 281
yellowfive@69 282 if Amr.IsSupportedInstanceId(instanceId) and difficultyId == 0 and not noWait then
yellowfive@69 283 -- the game is sometimes returning no difficulty id for raid zones... not sure why, wait 10 seconds and check again
yellowfive@69 284 Amr.Wait(10, function()
yellowfive@69 285 updateAutoLogging(false, false)
yellowfive@69 286 end)
yellowfive@69 287 return
yellowfive@69 288 end
yellowfive@69 289
yellowfive@57 290 if not force and zone == Amr.db.char.Logging.LastZone and difficultyId == Amr.db.char.Logging.LastDiff then
yellowfive@57 291 -- do nothing if the zone hasn't actually changed, otherwise we may override the user's manual enable/disable
yellowfive@57 292 return
yellowfive@57 293 end
yellowfive@57 294
yellowfive@57 295 Amr.db.char.Logging.LastZone = zone
yellowfive@57 296 Amr.db.char.Logging.LastDiff = difficultyId
yellowfive@57 297
yellowfive@137 298 if Amr.IsSupportedInstanceId(instanceId) then
yellowfive@137 299 if not Amr.db.profile.Logging.Auto[tonumber(instanceId)] then
yellowfive@137 300 Amr.db.profile.Logging.Auto[tonumber(instanceId)] = {}
yellowfive@137 301 end
yellowfive@91 302 end
yellowfive@91 303
yellowfive@57 304 if Amr.IsSupportedInstanceId(instanceId) and Amr.db.profile.Logging.Auto[tonumber(instanceId)][tonumber(difficultyId)] then
yellowfive@57 305 -- we are in a supported zone that we want to auto-log, turn logging on
yellowfive@69 306
yellowfive@57 307 -- (supported check is probably redundant, but just in case someone has old settings lying around)
yellowfive@57 308 if not Amr:IsLogging() then
yellowfive@57 309 Amr:StartLogging()
yellowfive@57 310 end
yellowfive@69 311 elseif hasAuto then
yellowfive@57 312 -- not in a zone that we want to auto-log, turn logging off
yellowfive@57 313 if Amr:IsLogging() then
yellowfive@57 314 Amr:StopLogging()
yellowfive@57 315 end
yellowfive@57 316 end
yellowfive@57 317 end
yellowfive@57 318
yellowfive@57 319 -- refresh the state of the tab based on current settings
yellowfive@57 320 function Amr:RefreshLogUi()
yellowfive@57 321 if not _btnToggle then return end
yellowfive@57 322
yellowfive@57 323 -- set state of logging button based on whether it is on or off
yellowfive@57 324 if self:IsLogging() then
yellowfive@57 325 _btnToggle:SetBackgroundColor(Amr.Colors.Red)
yellowfive@57 326 _btnToggle:SetText(L.LogButtonStopText)
yellowfive@57 327 else
yellowfive@57 328 _btnToggle:SetBackgroundColor(Amr.Colors.Green)
yellowfive@57 329 _btnToggle:SetText(L.LogButtonStartText)
yellowfive@57 330 end
yellowfive@57 331
yellowfive@57 332 _lblLogging:SetVisible(self:IsLogging())
yellowfive@57 333
yellowfive@57 334 -- hide/show undo wipe button based on whether a wipe has been called recently
yellowfive@91 335 if _panelUndoWipe then
yellowfive@91 336 _panelUndoWipe:SetVisible(Amr.db.char.Logging.LastWipe and true or false)
yellowfive@91 337 end
yellowfive@57 338
yellowfive@57 339 local all = isAllAutoLoggingEnabled()
yellowfive@57 340 _chkAutoAll:SetChecked(all)
yellowfive@57 341
yellowfive@57 342 for i, instanceId in ipairs(Amr.InstanceIdsOrdered) do
yellowfive@91 343 if not Amr.db.profile.Logging.Auto[instanceId] then
yellowfive@91 344 Amr.db.profile.Logging.Auto[instanceId] = {}
yellowfive@91 345 end
yellowfive@57 346 for k, difficultyId in pairs(Amr.Difficulties) do
yellowfive@57 347 _autoChecks[instanceId][difficultyId]:SetChecked(Amr.db.profile.Logging.Auto[instanceId][difficultyId])
yellowfive@57 348 end
yellowfive@57 349 end
yellowfive@57 350 end
yellowfive@57 351
yellowfive@57 352 function Amr:IsLogging()
yellowfive@57 353 return Amr.db.char.Logging.Enabled
yellowfive@57 354 end
yellowfive@57 355
yellowfive@57 356 function Amr:ToggleLogging()
yellowfive@57 357 if not Amr.db.char.Logging.Enabled then
yellowfive@57 358 Amr:StartLogging()
yellowfive@57 359 else
yellowfive@57 360 Amr:StopLogging()
yellowfive@57 361 end
yellowfive@57 362 end
yellowfive@57 363
yellowfive@57 364 function Amr:StartLogging()
yellowfive@57 365
yellowfive@91 366 --[[
yellowfive@57 367 local now = time()
yellowfive@57 368 local oldDuration = 60 * 60 * 24 * 10
yellowfive@57 369
yellowfive@57 370 -- prune out entries in log data that are more than 10 days old
yellowfive@57 371
yellowfive@57 372 -- player data
yellowfive@57 373 local playerData = Amr.db.global.Logging.PlayerData
yellowfive@57 374 if playerData then
yellowfive@57 375 for name, timeList in pairs(playerData) do
yellowfive@57 376 for timestamp, dataString in pairs(timeList) do
yellowfive@57 377 if difftime(now, tonumber(timestamp)) > oldDuration then
yellowfive@57 378 timeList[timestamp] = nil
yellowfive@57 379 end
yellowfive@57 380 end
yellowfive@57 381
yellowfive@57 382 if next(timeList) == nil then
yellowfive@57 383 playerData[name] = nil
yellowfive@57 384 end
yellowfive@57 385 end
yellowfive@57 386 end
yellowfive@57 387
yellowfive@57 388 -- same idea with extra info (auras, pets, whatever we end up adding to it)
yellowfive@57 389 local extraData = Amr.db.global.Logging.PlayerExtras
yellowfive@57 390 if extraData then
yellowfive@57 391 for name, timeList in pairs(extraData) do
yellowfive@57 392 for timestamp, dataString in pairs(timeList) do
yellowfive@57 393 if difftime(now, tonumber(timestamp)) > oldDuration then
yellowfive@57 394 timeList[timestamp] = nil
yellowfive@57 395 end
yellowfive@57 396 end
yellowfive@57 397
yellowfive@57 398 if next(timeList) == nil then
yellowfive@57 399 extraData[name] = nil
yellowfive@57 400 end
yellowfive@57 401 end
yellowfive@57 402 end
yellowfive@57 403
yellowfive@57 404 -- delete wipes that are more than 10 days old
yellowfive@57 405 if Amr.db.global.Logging.Wipes then
yellowfive@57 406 local wipes = Amr.db.global.Logging.Wipes
yellowfive@57 407 local i = 1
yellowfive@57 408 while i <= #wipes do
yellowfive@57 409 local t = wipes[i]
yellowfive@57 410 if difftime(now, t) > oldDuration then
yellowfive@57 411 table.remove(wipes, i)
yellowfive@57 412 else
yellowfive@57 413 i = i + 1
yellowfive@57 414 end
yellowfive@57 415 end
yellowfive@57 416 end
yellowfive@57 417
yellowfive@57 418 -- delete the last wipe date if it is more than 10 days old
yellowfive@57 419 if Amr.db.char.Logging.LastWipe and difftime(now, Amr.db.char.Logging.LastWipe) > oldDuration then
yellowfive@57 420 Amr.db.char.Logging.LastWipe = nil
yellowfive@57 421 end
yellowfive@91 422 ]]
yellowfive@91 423
yellowfive@69 424 -- enable game log file
yellowfive@69 425 updateGameLogging(true)
yellowfive@57 426 Amr.db.char.Logging.Enabled = true
yellowfive@57 427
yellowfive@57 428 self:Print(L.LogChatStart)
yellowfive@57 429
yellowfive@57 430 self:UpdateMinimap()
yellowfive@57 431 self:RefreshLogUi()
yellowfive@57 432 end
yellowfive@57 433
yellowfive@57 434 function Amr:StopLogging()
yellowfive@57 435
yellowfive@69 436 updateGameLogging(false)
yellowfive@57 437 Amr.db.char.Logging.Enabled = false
yellowfive@57 438
yellowfive@57 439 self:Print(L.LogChatStop)
yellowfive@57 440
yellowfive@57 441 self:UpdateMinimap()
yellowfive@57 442 self:RefreshLogUi()
yellowfive@57 443 end
yellowfive@57 444
yellowfive@57 445 function Amr:Wipe()
yellowfive@91 446
yellowfive@91 447 --[[
yellowfive@57 448 local t = time()
yellowfive@57 449 table.insert(Amr.db.global.Logging.Wipes, t)
yellowfive@57 450 Amr.db.char.Logging.LastWipe = t
yellowfive@57 451
yellowfive@57 452 self:Print(L.LogChatWipe(date('%I:%M %p', t)))
yellowfive@57 453
yellowfive@57 454 self:RefreshLogUi()
yellowfive@91 455 ]]
yellowfive@57 456 end
yellowfive@57 457
yellowfive@57 458 function Amr:UndoWipe()
yellowfive@57 459
yellowfive@91 460 --[[
yellowfive@57 461 local t = Amr.db.char.Logging.LastWipe
yellowfive@57 462 local wipes = Amr.db.global.Logging.Wipes
yellowfive@57 463
yellowfive@57 464 if not t then
yellowfive@57 465 self:Print(L.LogChatNoWipes)
yellowfive@57 466 else
yellowfive@57 467 -- find this wipe and remove it, may not be the last one if this person is raiding on multiple characters
yellowfive@57 468 for i = #wipes, 1, -1 do
yellowfive@57 469 if wipes[i] == t then
yellowfive@57 470 table.remove(wipes, i)
yellowfive@57 471 break
yellowfive@57 472 end
yellowfive@57 473 end
yellowfive@57 474
yellowfive@57 475 Amr.db.char.Logging.LastWipe = nil
yellowfive@57 476 self:Print(L.LogChatUndoWipe(date('%I:%M %p', t)))
yellowfive@57 477 end
yellowfive@57 478
yellowfive@57 479 self:RefreshLogUi()
yellowfive@91 480 ]]
yellowfive@57 481 end
yellowfive@57 482
yellowfive@57 483 function Amr:ToggleAutoLog(instanceId, difficultyId)
yellowfive@57 484
yellowfive@57 485 local byDiff = Amr.db.profile.Logging.Auto[instanceId]
yellowfive@57 486 byDiff[difficultyId] = not byDiff[difficultyId]
yellowfive@57 487
yellowfive@57 488 self:RefreshLogUi()
yellowfive@57 489
yellowfive@57 490 -- see if we should turn logging on right now
yellowfive@57 491 updateAutoLogging(true)
yellowfive@57 492 end
yellowfive@57 493
yellowfive@57 494 function Amr:ToggleAllAutoLog()
yellowfive@57 495
yellowfive@57 496 local val = not isAllAutoLoggingEnabled()
yellowfive@57 497
yellowfive@57 498 for i, instanceId in ipairs(Amr.InstanceIdsOrdered) do
yellowfive@57 499 for k, difficultyId in pairs(Amr.Difficulties) do
yellowfive@57 500 Amr.db.profile.Logging.Auto[instanceId][difficultyId] = val
yellowfive@57 501 end
yellowfive@57 502 end
yellowfive@57 503
yellowfive@57 504 self:RefreshLogUi()
yellowfive@57 505
yellowfive@57 506 -- see if we should turn logging on right now
yellowfive@57 507 updateAutoLogging(true)
yellowfive@57 508 end
yellowfive@57 509
yellowfive@57 510 function Amr:ProcessPlayerSnapshot(msg)
yellowfive@91 511 --[[
yellowfive@57 512 if not self:IsLogging() then return end
yellowfive@57 513
yellowfive@57 514 -- message will be of format: timestamp\nregion\nrealm\nname\n[stuff]
yellowfive@57 515 local parts = {}
yellowfive@57 516 for part in string.gmatch(msg, "([^\n]+)") do
yellowfive@57 517 table.insert(parts, part)
yellowfive@57 518 end
yellowfive@57 519
yellowfive@57 520 local timestamp = tonumber(parts[1])
yellowfive@57 521 local name = parts[2] .. ":" .. parts[3] .. ":" .. parts[4]
yellowfive@57 522 local setup = parts[5]
yellowfive@57 523
yellowfive@57 524 -- initialize the player's table
yellowfive@57 525 local playerList = Amr.db.global.Logging.PlayerData[name]
yellowfive@57 526 if not playerList then
yellowfive@57 527 playerList = {}
yellowfive@57 528 Amr.db.global.Logging.PlayerData[name] = playerList
yellowfive@57 529 end
yellowfive@57 530
yellowfive@57 531 -- find the most recent setup already recorded for this player
yellowfive@57 532 local previousSetup = nil
yellowfive@57 533 local previousTime = 0
yellowfive@57 534 for t, v in pairs(playerList) do
yellowfive@57 535 if t > previousTime then
yellowfive@57 536 previousSetup = v
yellowfive@57 537 previousTime = t
yellowfive@57 538 end
yellowfive@57 539 end
yellowfive@57 540
yellowfive@57 541 -- if the previous setup is more than 12 hours old, don't consider it
yellowfive@57 542 if previousSetup and difftime(timestamp, previousTime) > 60 * 60 * 12 then
yellowfive@57 543 previousSetup = nil
yellowfive@57 544 end
yellowfive@57 545
yellowfive@57 546 -- we only need to keep this setup if it is different than the previous
yellowfive@57 547 if setup ~= previousSetup then
yellowfive@57 548 playerList[timestamp] = setup
yellowfive@57 549 end
yellowfive@91 550 ]]
yellowfive@57 551 end
yellowfive@57 552
yellowfive@57 553 -- read auras and pet mapping info (pet may not be necessary anymore... but doesn't hurt)
yellowfive@57 554 local function getPlayerExtraData(data, unitId, petId)
yellowfive@91 555 --[[
yellowfive@57 556 local guid = UnitGUID(unitId)
yellowfive@57 557 if guid == nil then return end
yellowfive@57 558
yellowfive@57 559 local fields = {}
yellowfive@57 560
yellowfive@57 561 local buffs = {}
yellowfive@57 562 for i=1,40 do
yellowfive@57 563 local _,_,_,count,_,_,_,_,_,_,spellId = UnitAura(unitId, i, "HELPFUL")
yellowfive@57 564 table.insert(buffs, spellId)
yellowfive@57 565 end
yellowfive@57 566 if not buffs or #buffs == 0 then
yellowfive@57 567 table.insert(fields, "_")
yellowfive@57 568 else
yellowfive@57 569 table.insert(fields, Amr.Serializer:ToCompressedNumberList(buffs))
yellowfive@57 570 end
yellowfive@57 571
yellowfive@57 572 local petGuid = UnitGUID(petId)
yellowfive@57 573 if petGuid then
yellowfive@57 574 table.insert(fields, guid .. "," .. petGuid)
yellowfive@57 575 else
yellowfive@57 576 table.insert(fields, '_')
yellowfive@57 577 end
yellowfive@57 578
yellowfive@57 579 local name = GetUnitName(unitId, true) -- GetRaidRosterInfo(rosterIndex)
yellowfive@57 580 local realm = GetRealmName()
yellowfive@57 581 local region = Amr.RegionNames[GetCurrentRegion()]
yellowfive@57 582 local splitPos = string.find(name, "-")
yellowfive@57 583 if splitPos ~= nil then
yellowfive@57 584 realm = string.sub(name, splitPos + 1)
yellowfive@57 585 name = string.sub(name, 1, splitPos - 1)
yellowfive@57 586 end
yellowfive@57 587
yellowfive@57 588 data[region .. ":" .. realm .. ":" .. name] = table.concat(fields, ";")
yellowfive@91 589 ]]
yellowfive@57 590 end
yellowfive@57 591
yellowfive@57 592 local function logPlayerExtraData()
yellowfive@91 593 --[[
yellowfive@57 594 if not Amr:IsLogging() or not Amr:IsSupportedInstance() then return end
yellowfive@57 595
yellowfive@57 596 local timestamp = time()
yellowfive@57 597 local units = {}
yellowfive@57 598 local petUnits = {}
yellowfive@57 599
yellowfive@57 600 if IsInRaid() then
yellowfive@57 601 for i = 1,40 do
yellowfive@57 602 table.insert(units, "raid" .. i)
yellowfive@57 603 table.insert(petUnits, "raidpet" .. i)
yellowfive@57 604 end
yellowfive@57 605 elseif IsInGroup() then
yellowfive@57 606 table.insert(units, "player")
yellowfive@57 607 table.insert(petUnits, "pet")
yellowfive@57 608 for i = 1,4 do
yellowfive@57 609 table.insert(units, "party" .. i)
yellowfive@57 610 table.insert(petUnits, "partypet" .. i)
yellowfive@57 611 end
yellowfive@57 612 else
yellowfive@57 613 return
yellowfive@57 614 end
yellowfive@57 615
yellowfive@57 616 local data = {}
yellowfive@57 617 for i = 1,#units do
yellowfive@57 618 getPlayerExtraData(data, units[i], petUnits[i])
yellowfive@57 619 end
yellowfive@57 620
yellowfive@57 621 for name, val in pairs(data) do
yellowfive@57 622 -- record aura stuff, we never check for duplicates, need to know it at each point in time
yellowfive@57 623 if Amr.db.global.Logging.PlayerExtras[name] == nil then
yellowfive@57 624 Amr.db.global.Logging.PlayerExtras[name] = {}
yellowfive@57 625 end
yellowfive@57 626 Amr.db.global.Logging.PlayerExtras[name][timestamp] = val
yellowfive@57 627 end
yellowfive@91 628 ]]
yellowfive@57 629 end
yellowfive@57 630
yellowfive@57 631 function Amr:InitializeCombatLog()
yellowfive@137 632 updateAutoLogging()
yellowfive@57 633 end
yellowfive@57 634
yellowfive@57 635 Amr:AddEventHandler("UPDATE_INSTANCE_INFO", updateAutoLogging)
yellowfive@57 636 Amr:AddEventHandler("PLAYER_DIFFICULTY_CHANGED", updateAutoLogging)
yellowfive@65 637 Amr:AddEventHandler("ENCOUNTER_START", updateAutoLogging)
yellowfive@122 638 --Amr:AddEventHandler("PLAYER_REGEN_DISABLED", logPlayerExtraData)