Mercurial > wow > askmrrobot

annotate CombatLog.lua @ 129:d9a059484b22 v60

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