annotate WorldMap.lua @ 109:caa482329919

POI optimization
author Nenue
date Mon, 10 Jul 2017 18:34:11 -0400
parents WorldQuests.lua@b67ba1078824
children f6ef9a9f5476
rev   line source
Nenue@33 1 -- WorldPlan
Nenue@109 2 -- WorldMap.lua
Nenue@33 3 -- Created: 11/2/2016 3:40 PM
Nenue@33 4 -- %file-revision%
Nenue@72 5
Nenue@75 6 local print = DEVIAN_WORKSPACE and function(...) _G.print('WorldQuests', ...) end or nop
Nenue@75 7 local rprint = DEVIAN_WORKSPACE and function(...) _G.print('WQRefresh', ...) end or nop
Nenue@75 8 local qprint = DEVIAN_WORKSPACE and function(...) _G.print('POI', ...) end or nop
Nenue@75 9 local wprint = DEVIAN_WORKSPACE and function(...) _G.print('WP', ...) end or nop
Nenue@75 10 local mprint = DEVIAN_WORKSPACE and function(...) _G.print('Canvas', ...) end or nop
Nenue@40 11 local _, db = ...
Nenue@109 12 local Module = {
Nenue@109 13 UsedPositions = {},
Nenue@109 14 }
Nenue@109 15 WorldPlanMapMixin = Module
Nenue@33 16
Nick@64 17 local _G = _G
Nenue@72 18 local type, tostring, tonumber, pairs, ipairs = type, tostring, tonumber, pairs, ipairs
Nenue@33 19 local MC_GetNumZones, MC_GetZoneInfo = C_MapCanvas.GetNumZones, C_MapCanvas.GetZoneInfo
Nenue@33 20 local TQ_GetQuestsForPlayerByMapID = C_TaskQuest.GetQuestsForPlayerByMapID -- This function is not yet documented
Nenue@33 21 local TQ_GetQuestZoneID = C_TaskQuest.GetQuestZoneID
Nick@64 22 local TQ_IsActive = C_TaskQuest.IsActive
Nenue@75 23 local TQ_RequestPreloadRewardData = C_TaskQuest.RequestPreloadRewardData
Nick@64 24 local pairs, ipairs, tinsert, tremove, wipe = pairs, ipairs, tinsert, tremove, table.wipe
Nick@64 25 local GetTaskInfo, GetTasksTable, HaveQuestData = GetTaskInfo, GetTasksTable, HaveQuestData
Nick@64 26 local GetTime = GetTime
Nenue@69 27 local SpellCanTargetQuest, IsQuestIDValidSpellTarget = SpellCanTargetQuest, IsQuestIDValidSpellTarget
Nick@64 28 local tonumber, abs = tonumber, math.abs
Nick@64 29 local GetQuestLogRewardInfo = GetQuestLogRewardInfo
Nick@64 30 local GetCurrentMapAreaID, GetMapInfo, GetMapNameByID = GetCurrentMapAreaID, GetMapInfo, GetMapNameByID
Nenue@72 31 local GetQuestBountyInfoForMapID, GetQuestLogTitle, GetQuestLogIndexByID, IsQuestComplete = GetQuestBountyInfoForMapID, GetQuestLogTitle, GetQuestLogIndexByID, IsQuestComplete
Nenue@93 32 local HaveQuestRewardData = HaveQuestRewardData
Nenue@93 33 local TQ_GetQuestLocation = C_TaskQuest.GetQuestLocation
Nenue@96 34 local InCombatLockdown, hooksecurefunc = InCombatLockdown, hooksecurefunc
Nenue@33 35
Nenue@69 36 local ToggleButton = {}
Nenue@33 37 local BROKEN_ISLES_ID, DALARAN_ID, AZSUNA_ID, VALSHARAH_ID, HIGHMOUNTAIN_ID, STORMHEIM_ID, SURAMAR_ID, EOA_ID = 1007, 1014, 1015,1018, 1024, 1017, 1033, 1096
Nenue@33 38 local WORLD_QUEST_MAPS = { [DALARAN_ID] = 'Dalaran70', [AZSUNA_ID] = 'Azsuna', [VALSHARAH_ID] = "Val'sharah",
Nenue@33 39 [HIGHMOUNTAIN_ID] = 'Highmountain', [STORMHEIM_ID] = 'Stormheim', [SURAMAR_ID] = 'Suramar', [EOA_ID] = 'EyeOfAszhara', }
Nenue@33 40
Nenue@33 41 local REWARD_CASH = WORLD_QUEST_REWARD_TYPE_FLAG_GOLD
Nenue@33 42 local REWARD_ARTIFACT_POWER = WORLD_QUEST_REWARD_TYPE_FLAG_ARTIFACT_POWER
Nenue@33 43 local REWARD_GEAR = WORLD_QUEST_REWARD_TYPE_FLAG_EQUIPMENT
Nenue@33 44 local REWARD_CURRENCY = WORLD_QUEST_REWARD_TYPE_FLAG_ORDER_RESOURCES
Nenue@33 45 local REWARD_REAGENT = WORLD_QUEST_REWARD_TYPE_FLAG_MATERIALS
Nenue@72 46 local SCALE_FACTORS = { 0.25, 0.7, 1 }
Nenue@33 47
Nenue@72 48 local BountyBoard = WorldMapFrame.UIElementsFrame.BountyBoard
Nenue@72 49 local ActionButton = WorldMapFrame.UIElementsFrame.ActionButton
Nenue@93 50 local defaults = {}
Nenue@103 51 local completedQuests = {}
Nenue@72 52
Nenue@93 53 local continentScanned
Nenue@93 54 local layoutDirty = true
Nenue@93 55 local bountiesDirty = true
Nenue@93 56 local artifactPowerDirty = true
Nenue@96 57 local hooksDirty = true
Nenue@93 58 local currentScale = WorldMapDetailFrame:GetScale()
Nenue@93 59 local canTargetQuests
Nenue@93 60 local isDataLoaded = true
Nenue@93 61 local artifactKnowledgeLevel
Nenue@93 62 local superTrackedQuestID
Nenue@93 63 local lastRefresh
Nenue@93 64 local refreshReason
Nenue@93 65
Nenue@93 66 local bountyQuests = {}
Nenue@93 67 local bountyInfo = {}
Nenue@93 68 local bountyDisplayLocation, bountyLockedQuestID, selectedBountyIndex, selectedBountyQuestID
Nenue@93 69
Nenue@93 70 local totalPins = 0
Nenue@93 71 local numShown = 0
Nenue@93 72 local numLoaded = 0
Nenue@93 73 local numOverlays = 1
Nenue@93 74 local scaleConstant = 1
Nenue@100 75 local pinBaseIndex = 1550
Nenue@100 76 local overlayBaseIndex = 1600
Nenue@93 77
Nenue@93 78 local artifactKnowldegeSpells = {
Nenue@93 79 [207856] = true,
Nenue@93 80 [209203] = true,
Nenue@93 81 [209204] = true,
Nenue@93 82 [209205] = true,
Nenue@93 83 [209206] = true,
Nenue@93 84 [209207] = true,
Nenue@93 85 [209208] = true,
Nenue@93 86 [209209] = true,
Nenue@93 87 [209210] = true,
Nenue@93 88 [209211] = true,
Nenue@93 89 [209212] = true,
Nenue@93 90 [219978] = true,
Nenue@93 91 [227852] = true,
Nenue@93 92 [236477] = true,
Nenue@93 93 [236489] = true,
Nenue@93 94 [236302] = true,
Nenue@93 95 [236488] = true,
Nenue@93 96 [236490] = true,
Nenue@93 97 [240475] = true,
Nenue@93 98 [243176] = true,
Nenue@93 99 [243177] = true,
Nenue@93 100 [243178] = true,
Nenue@93 101 [243182] = true,
Nenue@93 102 [243183] = true,
Nenue@93 103 [243187] = true,
Nenue@93 104 [245133] = true,
Nenue@93 105 }
Nenue@33 106
Nenue@33 107 --%debug%
Nenue@33 108 local SetTimedCallbackForAllPins = function(seconds, callback)
Nenue@33 109 C_Timer.After(seconds, function()
Nenue@33 110 for id, pin in pairs(WorldPlanQuests.QuestsByID) do
Nenue@33 111 callback(pin)
Nenue@33 112 end
Nenue@33 113 end)
Nenue@33 114 end
Nenue@33 115
Nenue@93 116 function Module:OnLoad()
Nenue@93 117 --print('|cFFFF4400'..self:GetName()..':OnLoad()')
Nenue@52 118
Nenue@93 119 self:SetParent(WorldMapFrame.UIElementsFrame)
Nenue@93 120 WorldPlan:AddHandler(self, defaults)
Nenue@93 121
Nenue@93 122 for areaID, fileName in pairs(WORLD_QUEST_MAPS) do
Nenue@93 123 db.QuestsByZone[areaID] = {}
Nenue@33 124 end
Nenue@93 125
Nenue@93 126 -- WORLD_MAP_UPDATE and PLAYER_ENTERING_WORLD are passed down from a higher level
Nenue@93 127 self:RegisterEvent('WORLD_QUEST_COMPLETED_BY_SPELL')
Nenue@93 128 self:RegisterEvent('SUPER_TRACKED_QUEST_CHANGED')
Nenue@93 129 self:RegisterEvent('SKILL_LINES_CHANGED')
Nenue@93 130 self:RegisterEvent('ARTIFACT_UPDATE')
Nenue@93 131 self:RegisterEvent('QUEST_LOG_UPDATE')
Nenue@93 132 self:RegisterEvent('UNIT_SPELLCAST_STOP')
Nenue@93 133 end
Nenue@93 134
Nenue@93 135 function Module:OnEvent (event, ...)
Nenue@93 136 print('|cFFFFFF00OnEvent() '..event..'|r', GetTime(), ...)
Nenue@93 137 if (event == 'QUEST_LOG_UPDATE') then
Nenue@93 138 self:UpdateBounties(event)
Nenue@93 139 elseif event == 'WORLD_QUEST_COMPLETED_BY_SPELL' then
Nenue@93 140 local questID = ...
Nenue@93 141 if questID and db.QuestsByID[questID] then
Nenue@103 142 completedQuests[questID] = true
Nenue@93 143 db.QuestsByID[questID]:Release()
Nenue@93 144 end
Nenue@93 145 self:Refresh(event)
Nenue@93 146 elseif event == 'SKILL_LINES_CHANGED' or event == 'CURRENT_SPELL_CAST_CHANGED' then
Nenue@93 147 self:Refresh(event)
Nenue@93 148 elseif event == 'ARTIFACT_UPDATE' then
Nenue@93 149 self:UpdateArtifactPower()
Nenue@93 150 elseif event == 'MODIFIER_STATE_CHANGED' then
Nenue@93 151 self:UpdateModifierState()
Nenue@93 152 elseif event == 'SUPER_TRACKED_QUEST_CHANGED' then
Nenue@93 153 if superTrackedQuestID and db.QuestsByID[superTrackedQuestID] then
Nenue@93 154 db.QuestsByID[superTrackedQuestID].isStale = true
Nenue@93 155 end
Nenue@93 156 local newID = GetSuperTrackedQuestID()
Nenue@93 157 if newID and db.QuestsByID[newID] then
Nenue@93 158 db.QuestsByID[newID].isStale = true
Nenue@93 159 end
Nenue@93 160 elseif event == 'UNIT_SPELLCAST_STOP' then
Nenue@93 161 local name, _, _, _, spellID = ...
Nenue@93 162 if artifactKnowldegeSpells[spellID] then
Nenue@93 163 db.log('AK spellcast ended ' .. tostring(name) .. ' ('.. tostring(spellID)..')')
Nenue@93 164 self:UpdateArtifactPower()
Nenue@93 165 end
Nenue@93 166 end
Nenue@93 167 end
Nenue@93 168
Nenue@93 169 function Module:OnUpdate(sinceLast)
Nenue@93 170 if WorldPlanData.DebugEnabled then
Nenue@93 171 if self.refreshBenchMarkTicker then
Nenue@93 172 --print(self.refreshBenchMarkTicker)
Nenue@93 173 self.refreshBenchMarkTicker = self.refreshBenchMarkTicker - 1
Nenue@93 174
Nenue@93 175 if self.refreshBenchMarkTicker == 0 then
Nenue@93 176
Nenue@93 177 self.refreshTime = floor((GetTime() - self.refreshBenchMark) * 1000)
Nenue@93 178 self.debugMessage:SetText(self.refreshTime)
Nenue@93 179 self.refreshBenchMarkTicker = nil
Nenue@69 180 end
Nenue@69 181 else
Nenue@93 182 self.refreshBenchMark = GetTime()
Nenue@69 183 end
Nenue@69 184 end
Nenue@65 185
Nenue@93 186 if self.filtersDirty or self.isStale then
Nenue@93 187 self:Refresh()
Nenue@67 188 end
Nenue@72 189
Nenue@93 190 if #db.UpdatedPins >= 1 then
Nenue@93 191 --print('|cFF00FF88pending update', #db.UpdatedPins)
Nenue@93 192 self:UpdateNext()
Nenue@93 193 end
Nenue@93 194 end
Nenue@72 195
Nenue@93 196 local callbacks = {}
Nenue@69 197 callbacks.ClickWorldMapActionButton = function(WorldQuests)
Nenue@73 198 WorldQuests:Refresh('CLICK_MAP_ACTION_BUTTON')
Nenue@69 199 end
Nenue@69 200 callbacks.WorldMap_UpdateQuestBonusObjectives = function(WorldQuests)
Nenue@73 201 WorldQuests:UpdateTaskPOIs()
Nenue@69 202 end
Nenue@69 203 callbacks.WorldMapFrame_UpdateMap = function(WorldQuests)
Nenue@75 204 WorldQuests:RefreshIfChanged('WMF_UPDATE')
Nenue@69 205 end
Nenue@69 206 callbacks.WorldMapScrollFrame_ReanchorQuestPOIs = function (WorldQuests)
Nenue@75 207 WorldQuests:RefreshIfChanged('WMF_REANCHOR')
Nenue@69 208 end
Nenue@69 209
Nenue@72 210 callbacks[BountyBoard] = {}
Nenue@72 211 callbacks[BountyBoard].SetSelectedBountyIndex = function(WorldQuests)
Nenue@72 212 WorldQuests:UpdateBounties('BOUNTY_SELECTED')
Nenue@100 213 for questID, pin in pairs(db.QuestsByID) do
Nenue@100 214 pin.checkCriteria = true
Nenue@100 215 pin:Refresh()
Nenue@100 216 end
Nenue@72 217 end
Nenue@67 218
Nenue@72 219 callbacks[ActionButton] = {}
Nenue@72 220 callbacks[ActionButton].UpdateCastingState = function(WorldQuests)
Nenue@100 221 for questID, pin in pairs(db.QuestsByID) do
Nenue@100 222 pin.checkCursor = true
Nenue@100 223 pin:Refresh()
Nenue@100 224 end
Nenue@67 225 end
Nenue@67 226
Nenue@96 227 callbacks.UseWorldMapActionButtonSpellOnQuest = function(questID)
Nenue@97 228 local pin = db.QuestsByID[questID]
Nenue@97 229 -- calling this implies that the pin is used in some way
Nenue@97 230 if pin then
Nenue@100 231 db.log(pin.title .. ' completed by spell?', IsQuestComplete(pin.questID))
Nenue@100 232 pin:OnFilters()
Nenue@98 233 pin.isStale = true
Nenue@93 234 end
Nenue@96 235 end
Nenue@96 236
Nenue@96 237 function Module:SetupCallbacks()
Nenue@96 238 if InCombatLockdown() then
Nenue@97 239 return true
Nenue@96 240 end
Nenue@96 241 print('SetupCallbacks()')
Nenue@93 242 for target, arg in pairs(callbacks) do
Nenue@93 243 --print(type(target))
Nenue@93 244 if type(target) == 'table' then
Nenue@93 245 local callerName = target:GetName() or tostring(target)
Nenue@93 246 for name, method in pairs(arg) do
Nenue@93 247 --print(callerName, arg)
Nenue@93 248 hooksecurefunc(target, name, function(...)
Nenue@93 249 self:OnSecureHook(callerName .. '.' .. name, method, ...)
Nenue@93 250 end)
Nenue@93 251 end
Nenue@93 252 else
Nenue@93 253 hooksecurefunc(target, function(...)
Nenue@93 254 self:OnSecureHook(target, arg, ...)
Nenue@93 255 end)
Nenue@93 256 end
Nenue@93 257 end
Nenue@96 258 end
Nenue@96 259
Nenue@96 260 function Module:Setup()
Nenue@96 261 --print('|cFFFF4400'..self:GetName()..':Setup()')
Nenue@96 262 for mapID, mapName in pairs(WORLD_QUEST_MAPS) do
Nenue@96 263 db.QuestsByZone[mapID] = {}
Nenue@96 264 end
Nenue@96 265
Nenue@96 266 hooksDirty = self:SetupCallbacks()
Nenue@96 267
Nenue@93 268 self:SetAllPoints(WorldMapFrame.UIElementsFrame)
Nenue@93 269 self:UpdateArtifactPower()
Nenue@93 270 self:UpdateBounties('SETUP')
Nenue@93 271 self:Show()
Nenue@93 272 end
Nenue@93 273
Nenue@93 274 function Module:OnMapInfo(isBrokenIsle, isZoomedOut, mapAreaID, isNewMap, isMapOpen)
Nenue@93 275 if isNewMap or self.isStale then
Nenue@93 276 print('|cFF0088FFOnMapInfo()|r, mapAreaID =', mapAreaID,'visible =', isMapOpen, 'changed =', isNewMap)
Nenue@93 277 layoutDirty = true
Nenue@93 278 self:Refresh('WORLD_MAP_CHANGED')
Nenue@93 279 end
Nenue@93 280 end
Nenue@93 281
Nenue@49 282 function Module:OnConfigUpdate()
Nenue@75 283 --print('|cFFFFFF00OnConfigUpdate()|r')
Nenue@49 284 if db.Config.FadeWhileGrouped then
Nenue@49 285 db.PinAlpha = 0.15
Nenue@49 286 else
Nenue@49 287 db.PinAlpha = 1
Nenue@49 288 end
Nenue@67 289
Nenue@67 290 if not db.Config.EnablePins then
Nenue@67 291 for _, pin in pairs(db.QuestsByID) do
Nenue@67 292 pin:SetShown(false)
Nenue@67 293 end
Nenue@67 294 end
Nenue@45 295 end
Nenue@33 296
Nenue@69 297 function Module:OnSecureHook(callbackName, func, ...)
Nenue@98 298 print('|cFFFF4400'..callbackName..'|r', ...)
Nenue@69 299 func(self, ...)
Nenue@45 300 end
Nenue@40 301
Nenue@93 302 function Module:UpdateModifierState()
Nenue@33 303
Nenue@33 304 end
Nenue@33 305
Nenue@93 306 function Module:UpdateTaskPOIs()
Nenue@93 307 canTargetQuests = SpellCanTargetQuest()
Nenue@93 308 for i = 1, NUM_WORLDMAP_TASK_POIS do
Nenue@93 309 local poiFrame = _G['WorldMapFrameTaskPOI'..i]
Nenue@93 310 if poiFrame and poiFrame.worldQuest then
Nenue@93 311 local pin = db.QuestsByID[poiFrame.questID]
Nenue@93 312 if pin and pin.used and canTargetQuests and IsQuestIDValidSpellTarget(pin.questID) then
Nenue@93 313 poiFrame:Show()
Nenue@93 314 else
Nenue@93 315 poiFrame:Hide()
Nenue@93 316 end
Nenue@93 317 end
Nenue@93 318 end
Nenue@93 319 end
Nenue@93 320 -- re-anchors and scales pins that have had either of these changed due to data loading delays
Nenue@93 321 function Module:UpdateNext()
Nenue@93 322 --print('|cFF00FF88UpdateNext()')
Nenue@93 323 local pin = tremove(db.UpdatedPins)
Nenue@100 324 pin:OnFilters()
Nenue@40 325
Nenue@93 326 local scaleFactor = SCALE_FACTORS[(pin.dataLoaded and not pin.filtered) and scaleConstant or 1]
Nenue@93 327 --print(pin.title, pin.dataLoaded and not pin.filtered, scaleFactor)
Nenue@93 328 if pin.used then
Nenue@96 329 pin:SetShown(true)
Nenue@93 330 pin:SetAnchor(nil, pin.x, pin.y, self.hostWidth, self.hostHeight, scaleFactor)
Nenue@96 331 pin:Refresh()
Nenue@96 332 else
Nenue@96 333 print('|cFFFF4400flagging queued pin that got hidden:', pin.title)
Nenue@96 334 pin.isStale = true
Nenue@33 335 end
Nenue@33 336 end
Nenue@33 337
Nenue@72 338 function Module:UpdateBounties(...)
Nenue@102 339 bountiesDirty = nil
Nenue@102 340 print('|cFF00FF88BountyInfo()|r', ...)
Nenue@72 341 wipe(db.BountiesByFactionID)
Nenue@75 342 wipe(db.BountiesByQuestID)
Nenue@72 343
Nenue@72 344 db.selectedBounty = nil
Nenue@72 345 selectedBountyIndex = BountyBoard:GetSelectedBountyIndex()
Nenue@75 346 db.Bounties, bountyDisplayLocation, bountyLockedQuestID = GetQuestBountyInfoForMapID(db.currentMapID, db.Bounties)
Nenue@72 347 local numBounties = 0
Nenue@75 348 for index, info in ipairs(db.Bounties) do
Nenue@72 349 numBounties = numBounties + 1
Nenue@73 350 info.index = index
Nenue@73 351 info.complete = IsQuestComplete(info.questID)
Nenue@73 352 if not info.complete then
Nenue@73 353 db.BountiesByFactionID[info.factionID] = info
Nenue@75 354 db.BountiesByQuestID[info.questID] = info
Nenue@72 355 if index == selectedBountyIndex then
Nenue@73 356 db.selectedBounty = info
Nenue@73 357 selectedBountyQuestID = info.questID
Nenue@72 358 end
Nenue@73 359 print(' ', index, info.factionID, GetQuestLogTitle(GetQuestLogIndexByID(info.questID)), info.complete, (index == selectedBountyIndex) and 'SELECTED' or '')
Nenue@72 360 end
Nenue@72 361 end
Nenue@72 362 end
Nenue@72 363
Nenue@93 364 -- check current artifact knowledge and update pins accordingly
Nenue@93 365 function Module:UpdateArtifactPower(overrideLevel)
Nenue@93 366 if InCombatLockdown() then
Nenue@93 367 artifactPowerDirty = true
Nenue@93 368 return
Nenue@40 369 end
Nenue@40 370
Nenue@93 371 print('|cFF00FF88UpdateArtifactPower()|r')
Nenue@93 372 local _, akLevel = GetCurrencyInfo(1171)
Nenue@93 373 if overrideLevel then
Nenue@93 374 akLevel = overrideLevel
Nenue@40 375 end
Nenue@40 376
Nenue@93 377 --db.print('current AK', akLevel)
Nenue@93 378 if akLevel and (akLevel ~= artifactKnowledgeLevel) or (not artifactKnowledgeLevel) then
Nenue@93 379 --print('new ak level', akLevel)
Nenue@93 380 db.log('AK update ' .. tostring(artifactKnowledgeLevel) .. ' to '.. tostring(akLevel))
Nenue@93 381 for _, pin in pairs(db.QuestsByID) do
Nenue@93 382 if (pin.rewardType == REWARD_ARTIFACT_POWER) then
Nenue@93 383 print(pin.title, pin.itemNumber)
Nenue@93 384 local newAP = pin:UpdateArtifactPower()
Nenue@93 385 if newAP then
Nenue@93 386 pin.itemNumber = newAP
Nenue@93 387 print(newAP)
Nenue@93 388 else
Nenue@93 389 pin.dataLoaded = nil
Nenue@93 390 end
Nenue@93 391 pin.isStale = true
Nenue@93 392 end
Nenue@33 393 end
Nenue@93 394 artifactKnowledgeLevel = akLevel
Nenue@40 395 end
Nenue@93 396 artifactPowerDirty = nil
Nenue@75 397 end
Nenue@40 398
Nenue@72 399 local msg = '|cFF00FF88WorldQuests:Refresh()|r|cFF00FFFF'
Nenue@72 400 function Module:Refresh(...)
Nenue@96 401
Nenue@96 402 if hooksDirty then
Nenue@96 403 hooksDirty = self:SetupCallbacks()
Nenue@96 404 end
Nenue@96 405
Nenue@96 406
Nenue@34 407 if not self:IsVisible() then
Nenue@75 408 print('|cFFFF4400Refresh()|r', ...)
Nenue@75 409 return
Nenue@73 410 else
Nenue@75 411 if lastRefresh == GetTime() then
Nenue@75 412 print('|cFFFF4400multiple refreshes tried')
Nenue@75 413 end
Nenue@75 414 lastRefresh = GetTime()
Nenue@75 415 print(msg, lastRefresh, ...)
Nenue@40 416 end
Nenue@73 417
Nenue@102 418
Nenue@102 419 if bountiesDirty then
Nenue@102 420 self:UpdateBounties()
Nenue@102 421 end
Nenue@102 422
Nenue@67 423 if not db.Config.EnablePins then
Nenue@69 424 numShown = 0
Nenue@76 425 self.refreshBenchMark = GetTime()
Nenue@76 426 self.refreshBenchMarkTicker = 2
Nenue@76 427 print('starting bench', self.refreshBenchMark)
Nenue@67 428 return
Nenue@67 429 end
Nenue@67 430
Nenue@72 431 scaleConstant = db.isContinentMap and 2 or 3
Nenue@72 432 canTargetQuests = SpellCanTargetQuest()
Nenue@67 433
Nenue@40 434 for index, pin in pairs(db.QuestsByID) do
Nenue@40 435 pin.used = nil
Nenue@40 436 end
Nenue@40 437
Nenue@95 438 self:UpdateAnchors(...)
Nenue@72 439
Nenue@93 440 if artifactPowerDirty and not InCombatLockdown() then
Nenue@93 441 self:UpdateArtifactPower()
Nenue@93 442 end
Nenue@69 443 -- calculate quests shown
Nenue@65 444 numShown = 0
Nenue@65 445 numLoaded = 0
Nick@60 446 for questID, pin in pairs(db.QuestsByID) do
Nick@60 447 local oV = pin:IsShown()
Nick@60 448 if pin.used then
Nenue@96 449 print('show', pin.title)
Nick@60 450 pin.throttle = 1
Nick@60 451 pin:SetShown(true)
Nenue@65 452 numShown = numShown + 1
Nenue@65 453 if pin.dataLoaded then
Nenue@65 454 numLoaded = numLoaded + 1
Nenue@65 455 end
Nenue@65 456
Nenue@100 457 pin.checkCriteria = true
Nenue@100 458 pin.checkFilters = true
Nenue@100 459 pin:Refresh('WORLDMAP_REFRESH ' .. GetTime())
Nenue@100 460
Nick@60 461 else
Nenue@96 462 if pin:IsShown() then
Nenue@96 463 print('|cFFFF4400need to remove', pin.title)
Nenue@96 464
Nick@60 465 end
Nenue@96 466
Nenue@69 467 pin.hideReason = "Not used in map area " .. (db.currentMapID)
Nenue@75 468 pin:SetShown(false)
Nick@60 469 end
Nenue@93 470
Nick@60 471 end
Nenue@93 472
Nenue@65 473
Nenue@75 474 --
Nenue@93 475 self.refreshBenchMark = GetTime()
Nenue@93 476 self.refreshBenchMarkTicker = 2
Nenue@93 477 print('starting bench', self.refreshBenchMark)
Nenue@76 478
Nenue@75 479 --
Nenue@65 480
Nenue@73 481 layoutDirty = nil
Nenue@40 482 self.isStale = nil
Nenue@54 483 self.sizesDirty = nil
Nenue@66 484 self.isZoomDirty = nil
Nenue@75 485
Nenue@93 486 if WorldPlanSummary then
Nenue@93 487 WorldPlanSummary.isStale = true
Nenue@93 488 end
Nenue@93 489
Nenue@40 490 end
Nenue@40 491
Nenue@75 492 function Module:RefreshIfChanged(event)
Nenue@69 493 local scaleCheck = WorldMapDetailFrame:GetScale()
Nenue@73 494 refreshReason = nil
Nenue@69 495 if scaleCheck ~= currentScale then
Nenue@73 496 refreshReason = 'map scale updated'
Nenue@69 497 currentScale = scaleCheck
Nenue@75 498 layoutDirty = true
Nenue@72 499 elseif self.isStale or layoutDirty then
Nenue@73 500 refreshReason = 'layout is marked dirty'
Nenue@73 501 end
Nenue@73 502 if not refreshReason then
Nenue@73 503 return
Nenue@73 504 end
Nenue@73 505
Nenue@73 506 if self:IsVisible() then
Nenue@73 507 print('|cFF00FFFFRefreshIfChanged()|r', refreshReason)
Nenue@75 508 self:Refresh(event)
Nenue@73 509 else
Nenue@75 510 print('|cFF00FFFFRefreshIfChanged()|r', refreshReason)
Nenue@73 511 self.isStale = true
Nenue@69 512 end
Nenue@69 513 end
Nenue@69 514
Nenue@93 515 -- Walks the current map tree and fires updates as needed
Nenue@95 516 function Module:UpdateAnchors (event)
Nenue@40 517 wipe(self.UsedPositions)
Nenue@74 518 local hostWidth, hostHeight = WorldMapPOIFrame:GetSize()
Nenue@74 519
Nenue@74 520 if (hostWidth ~= self.hostWidth) or (hostHeight ~= self.hostHeight) then
Nenue@74 521 self.hostWidth, self.hostHeight = hostWidth, hostHeight
Nenue@74 522 layoutDirty = true
Nenue@74 523 end
Nenue@74 524
Nenue@95 525 print('|cFF00FF00UpdateAnchors()', event)
Nenue@33 526 local mapFileName, textureHeight, textureWidth, isMicroDungeon, microDungeonMapName = GetMapInfo()
Nenue@33 527 if isMicroDungeon then
Nenue@33 528 return
Nenue@33 529 end
Nenue@69 530
Nenue@65 531 isDataLoaded = true
Nenue@67 532 local taskInfo = TQ_GetQuestsForPlayerByMapID(db.currentMapID)
Nenue@40 533 if taskInfo then
Nenue@69 534 self:UpdateQuestsForMap(taskInfo, db.currentMapID)
Nenue@33 535 end
Nenue@67 536 local numZones = MC_GetNumZones(db.currentMapID)
Nenue@33 537 if numZones then
Nenue@33 538 for i = 1, numZones do
Nenue@67 539 local mapAreaID = MC_GetZoneInfo(db.currentMapID, i)
Nenue@67 540 local taskInfo = TQ_GetQuestsForPlayerByMapID(mapAreaID, db.currentMapID)
Nenue@82 541
Nenue@82 542 db.QuestsByZone[mapAreaID] = db.QuestsByZone[mapAreaID] or {}
Nenue@82 543
Nenue@40 544 if taskInfo then
Nenue@69 545 self:UpdateQuestsForMap(taskInfo, mapAreaID)
Nenue@40 546 end
Nenue@33 547 end
Nenue@33 548 end
Nenue@33 549 end
Nenue@33 550
Nenue@96 551 -- Attempt to display the pins for quests in taskInfo
Nenue@93 552 function Module:UpdateQuestsForMap(taskInfo, mapID)
Nenue@93 553 print('|cFF00FF00UpdateQuestsForMap()|r', GetMapNameByID(mapID), GetMapNameByID(db.currentMapID), layoutDirty)
Nenue@93 554 if db.QuestsByZone[mapID] then
Nenue@93 555 wipe(db.QuestsByZone[mapID])
Nenue@93 556 elseif db.isBrokenIsle then
Nenue@93 557 continentScanned = true
Nenue@93 558 end
Nenue@108 559 db.PinStrata = WorldMapFrame_InWindowedMode() and 'HIGH' or 'FULLSCREEN'
Nenue@96 560 print('layoutDirty =',layoutDirty)
Nenue@93 561
Nenue@93 562 for index, info in pairs(taskInfo) do
Nenue@93 563 local questID, x, y = info.questId, info.x, info.y
Nenue@93 564 local pin = self:AcquirePin(info)
Nenue@100 565 if pin then
Nenue@100 566 if pin.canShow then
Nenue@100 567 pin.used = true
Nenue@100 568 print('using', pin.title, (pin.owningFrame ~= WorldMapFrame))
Nenue@100 569 if layoutDirty or (pin.owningFrame ~= WorldMapFrame) then
Nenue@100 570 local scaleFactor = SCALE_FACTORS[(not pin.filtered and scaleConstant) or 1]
Nenue@100 571 pin.owningFrame = WorldMapFrame
Nenue@100 572 pin:SetAnchor(WorldMapPOIFrame, x, y, self.hostWidth, self.hostHeight, scaleFactor)
Nenue@93 573
Nenue@93 574 end
Nenue@100 575 if db.QuestsByZone[mapID] then
Nenue@100 576 db.QuestsByZone[mapID][questID] = pin
Nenue@100 577 end
Nenue@100 578 else
Nenue@100 579 print('|cFFFF4400discarding|r', pin.title)
Nenue@93 580 end
Nenue@93 581 end
Nenue@93 582 end
Nenue@67 583 end
Nenue@93 584
Nenue@93 585 -- locates or creates a corresponding pin frame for the provided TaskInfo data
Nenue@93 586 function Module:AcquirePin (info)
Nenue@93 587 local questID = info.questId
Nenue@93 588 if not (questID and QuestUtils_IsQuestWorldQuest(questID)) then
Nenue@93 589 return nil
Nenue@93 590 end
Nenue@103 591 local pin = db.QuestsByID[questID]
Nenue@103 592 -- check to avoid creating unnecessary frames
Nenue@103 593 if IsQuestComplete(questID) or completedQuests[questID] then
Nenue@103 594 completedQuests[questID] = true
Nenue@103 595 if pin then
Nenue@103 596 pin:Release()
Nenue@103 597 end
Nenue@100 598 return nil
Nenue@100 599 end
Nenue@100 600
Nenue@93 601 if not pin then
Nenue@93 602 local numFree = #db.FreePins
Nenue@93 603 if numFree >= 1 then
Nenue@93 604 pin = tremove(db.FreePins, numFree)
Nenue@100 605 print('|cFF00FF00Acquire()|r Re-using', pin:GetName())
Nenue@93 606 else
Nenue@93 607 totalPins = totalPins + 1
Nenue@93 608 local name = 'WorldPlanQuestMarker' .. numOverlays
Nenue@100 609 print('|cFF00FF00Acquire()|r Creating', name)
Nenue@93 610 pin = CreateFrame('Frame', name, WorldMapPOIFrame, 'WorldPlanQuestPin')
Nenue@93 611
Nenue@93 612 pin:SetID(totalPins)
Nenue@93 613 numOverlays = numOverlays + 1
Nenue@93 614 --pin.iconBorder:SetVertexColor(0,0,0,1)
Nenue@93 615 end
Nenue@93 616 pin.questID = questID
Nenue@93 617 pin.throttle = pin.updateRate
Nenue@93 618 pin.currentWidth = nil
Nenue@100 619
Nenue@93 620 db.QuestsByID[questID] = pin
Nenue@93 621 tinsert(db.UsedPins, pin)
Nenue@93 622 end
Nenue@93 623
Nenue@103 624 if info then
Nenue@93 625 pin.inProgress = info.inProgress
Nenue@93 626 pin.floor = info.floor
Nenue@93 627 pin.numObjectives = info.numObjectives or 0
Nenue@93 628 if info.x and info.y then
Nenue@93 629 if (info.x ~= pin.x) or (info.y ~= pin.y) then
Nenue@93 630 pin.isStale = true
Nenue@93 631 --rprint('|cFFFF4400SetCoords|r', info.x, info.y)
Nenue@93 632 end
Nenue@93 633 end
Nenue@93 634 end
Nenue@93 635
Nenue@93 636 pin.x = info.x or pin.x
Nenue@93 637 pin.y = info.y or pin.y
Nenue@93 638
Nenue@93 639 if not HaveQuestRewardData(questID) then
Nenue@93 640 TQ_RequestPreloadRewardData(questID);
Nenue@93 641 end
Nenue@93 642
Nenue@93 643 if (not pin.dataLoaded) then
Nenue@93 644 local dataLoaded = pin:GetData()
Nenue@93 645 if dataLoaded then
Nenue@93 646 WorldPlan.dataFlush = true
Nenue@93 647 else
Nenue@93 648 isDataLoaded = false
Nenue@93 649 end
Nenue@93 650 end
Nenue@93 651
Nenue@100 652 pin:OnFilters()
Nenue@93 653 pin.isActive = TQ_IsActive(questID)
Nenue@93 654 --rprint(pin:GetID(), pin.filtered, pin.used)
Nenue@93 655 return pin
Nenue@93 656 end
Nenue@93 657
Nenue@93 658 function Module:Debug(...)
Nenue@93 659 print(...)
Nenue@67 660 end