Mercurial > wow > askmrrobot

annotate CombatLog.lua @ 122:f1da233629be v57

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