Mercurial > wow > askmrrobot

annotate CombatLog.lua @ 133:a0894ffebd15 v62

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