Mercurial > wow > wowdb-profiler

annotate Main.lua @ 368:2e122726c7dd 6.0.2-5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Commented out tooltip scanning for OPENABLE and pet journal scanning since one is preventing data and the other is unused and causing bloat.
author MMOSimca <MMOSimca@gmail.com>
date Sun, 19 Oct 2014 16:46:31 -0400
parents 1dc56d8e1260
children 2d0899e85e29
rev   line source
jcallahan@246 1 -- LUA API ------------------------------------------------------------
jcallahan@246 2
jcallahan@0 3 local _G = getfenv(0)
jcallahan@0 4
jcallahan@0 5 local pairs = _G.pairs
jcallahan@312 6 local tostring = _G.tostring
jcallahan@1 7 local tonumber = _G.tonumber
jcallahan@1 8
jcallahan@1 9 local bit = _G.bit
jcallahan@1 10 local math = _G.math
jcallahan@1 11 local table = _G.table
jcallahan@1 12
jcallahan@334 13 local next = _G.next
jcallahan@78 14 local select = _G.select
jcallahan@306 15 local unpack = _G.unpack
jcallahan@78 16
MMOSimca@366 17 local LOOT_SLOT_CURRENCY, LOOT_SLOT_ITEM, LOOT_SLOT_MONEY = _G.LOOT_SLOT_CURRENCY, _G.LOOT_SLOT_ITEM, _G.LOOT_SLOT_MONEY
MMOSimca@366 18
jcallahan@0 19
jcallahan@246 20 -- ADDON NAMESPACE ----------------------------------------------------
jcallahan@246 21
jcallahan@0 22 local ADDON_NAME, private = ...
jcallahan@0 23
jcallahan@0 24 local LibStub = _G.LibStub
jcallahan@249 25 local WDP = LibStub("AceAddon-3.0"):NewAddon(ADDON_NAME, "AceConsole-3.0", "AceEvent-3.0", "AceTimer-3.0")
jcallahan@0 26
jcallahan@48 27 local deformat = LibStub("LibDeformat-3.0")
jcallahan@115 28 local LPJ = LibStub("LibPetJournal-2.0")
jcallahan@141 29 local MapData = LibStub("LibMapData-1.0")
jcallahan@48 30
jcallahan@4 31 local DatamineTT = _G.CreateFrame("GameTooltip", "WDPDatamineTT", _G.UIParent, "GameTooltipTemplate")
jcallahan@5 32 DatamineTT:SetOwner(_G.WorldFrame, "ANCHOR_NONE")
jcallahan@5 33
jcallahan@0 34
jcallahan@246 35 -- CONSTANTS ----------------------------------------------------------
jcallahan@246 36
jcallahan@246 37 local AF = private.ACTION_TYPE_FLAGS
jcallahan@246 38 local CLIENT_LOCALE = _G.GetLocale()
jcallahan@313 39 local DB_VERSION = 18
MMOSimca@346 40 local DEBUGGING = false
jcallahan@156 41 local EVENT_DEBUG = false
jcallahan@322 42
jcallahan@246 43 local OBJECT_ID_ANVIL = 192628
jcallahan@322 44 local OBJECT_ID_FISHING_BOBBER = 35591
jcallahan@246 45 local OBJECT_ID_FORGE = 1685
jcallahan@322 46
jcallahan@246 47 local PLAYER_CLASS = _G.select(2, _G.UnitClass("player"))
jcallahan@246 48 local PLAYER_FACTION = _G.UnitFactionGroup("player")
jcallahan@300 49 local PLAYER_GUID
jcallahan@246 50 local PLAYER_NAME = _G.UnitName("player")
jcallahan@246 51 local PLAYER_RACE = _G.select(2, _G.UnitRace("player"))
jcallahan@246 52
MMOSimca@351 53 local TIMBER_ITEM_ID = 114781
MMOSimca@351 54
MMOSimca@337 55 -- Ignoring NPC casts of the following spells
MMOSimca@336 56 local CHI_WAVE_SPELL_ID = 132464
MMOSimca@336 57 local DISGUISE_SPELL_ID = 121308
MMOSimca@336 58
MMOSimca@347 59 -- For timer-based loot gathering of abnormal containers (that don't use SHOW_LOOT_TOAST, sadly)
MMOSimca@349 60 local BAG_OF_SALVAGE_ITEM_ID = private.SALVAGE_SPELL_ID_TO_ITEM_ID_MAP[168178]
MMOSimca@347 61 local CRATE_OF_SALVAGE_ITEM_ID = private.SALVAGE_SPELL_ID_TO_ITEM_ID_MAP[168179]
MMOSimca@347 62 local BIG_CRATE_OF_SALVAGE_ITEM_ID = private.SALVAGE_SPELL_ID_TO_ITEM_ID_MAP[168180]
MMOSimca@347 63
MMOSimca@336 64 -- Constant for duplicate boss data; a dirty hack to get around world bosses that cannot be identified individually and cannot be linked on wowdb because they are not in a raid
MMOSimca@336 65 local DUPLICATE_WORLD_BOSS_IDS = {
MMOSimca@336 66 [71952] = { 71953, 71954, 71955, },
MMOSimca@336 67 }
jcallahan@326 68
jcallahan@246 69 local ALLOWED_LOCALES = {
jcallahan@246 70 enUS = true,
jcallahan@246 71 enGB = true,
MMOSimca@336 72 enTW = true,
MMOSimca@336 73 enCN = true,
jcallahan@246 74 }
jcallahan@157 75
jcallahan@0 76 local DATABASE_DEFAULTS = {
jcallahan@128 77 char = {},
jcallahan@0 78 global = {
jcallahan@270 79 config = {
jcallahan@270 80 minimap_icon = {
jcallahan@270 81 hide = true,
jcallahan@270 82 },
jcallahan@270 83 },
jcallahan@0 84 items = {},
jcallahan@0 85 npcs = {},
jcallahan@0 86 objects = {},
jcallahan@0 87 quests = {},
jcallahan@167 88 spells = {},
jcallahan@17 89 zones = {},
jcallahan@0 90 }
jcallahan@0 91 }
jcallahan@0 92
jcallahan@1 93 local EVENT_MAPPING = {
jcallahan@90 94 AUCTION_HOUSE_SHOW = true,
jcallahan@90 95 BANKFRAME_OPENED = true,
jcallahan@90 96 BATTLEFIELDS_SHOW = true,
jcallahan@56 97 BLACK_MARKET_ITEM_UPDATE = true,
jcallahan@48 98 CHAT_MSG_LOOT = true,
jcallahan@95 99 CHAT_MSG_MONSTER_SAY = "RecordQuote",
jcallahan@95 100 CHAT_MSG_MONSTER_WHISPER = "RecordQuote",
jcallahan@95 101 CHAT_MSG_MONSTER_YELL = "RecordQuote",
jcallahan@40 102 CHAT_MSG_SYSTEM = true,
jcallahan@23 103 COMBAT_LOG_EVENT_UNFILTERED = true,
jcallahan@18 104 COMBAT_TEXT_UPDATE = true,
jcallahan@140 105 CURSOR_UPDATE = true,
jcallahan@90 106 FORGE_MASTER_OPENED = true,
jcallahan@90 107 GOSSIP_SHOW = true,
jcallahan@290 108 GROUP_ROSTER_UPDATE = true,
jcallahan@93 109 GUILDBANKFRAME_OPENED = true,
jcallahan@42 110 ITEM_TEXT_BEGIN = true,
jcallahan@189 111 ITEM_UPGRADE_MASTER_OPENED = true,
jcallahan@124 112 LOOT_CLOSED = true,
MMOSimca@343 113 LOOT_OPENED = true,
jcallahan@89 114 MAIL_SHOW = true,
jcallahan@133 115 MERCHANT_CLOSED = true,
jcallahan@7 116 MERCHANT_SHOW = "UpdateMerchantItems",
jcallahan@61 117 MERCHANT_UPDATE = "UpdateMerchantItems",
jcallahan@25 118 PET_BAR_UPDATE = true,
MMOSimca@368 119 --PET_JOURNAL_LIST_UPDATE = true,
jcallahan@156 120 PLAYER_REGEN_DISABLED = true,
jcallahan@156 121 PLAYER_REGEN_ENABLED = true,
jcallahan@2 122 PLAYER_TARGET_CHANGED = true,
jcallahan@9 123 QUEST_COMPLETE = true,
jcallahan@9 124 QUEST_DETAIL = true,
jcallahan@9 125 QUEST_LOG_UPDATE = true,
jcallahan@97 126 QUEST_PROGRESS = true,
jcallahan@178 127 SHOW_LOOT_TOAST = true,
jcallahan@306 128 SPELL_CONFIRMATION_PROMPT = true,
jcallahan@88 129 TAXIMAP_OPENED = true,
jcallahan@92 130 TRADE_SKILL_SHOW = true,
jcallahan@167 131 TRAINER_CLOSED = true,
jcallahan@27 132 TRAINER_SHOW = true,
jcallahan@90 133 TRANSMOGRIFY_OPEN = true,
jcallahan@246 134 UNIT_PET = true,
jcallahan@4 135 UNIT_QUEST_LOG_CHANGED = true,
jcallahan@1 136 UNIT_SPELLCAST_FAILED = "HandleSpellFailure",
jcallahan@1 137 UNIT_SPELLCAST_FAILED_QUIET = "HandleSpellFailure",
jcallahan@1 138 UNIT_SPELLCAST_INTERRUPTED = "HandleSpellFailure",
jcallahan@1 139 UNIT_SPELLCAST_SENT = true,
jcallahan@1 140 UNIT_SPELLCAST_SUCCEEDED = true,
jcallahan@90 141 VOID_STORAGE_OPEN = true,
jcallahan@299 142 ZONE_CHANGED = "HandleZoneChange",
jcallahan@299 143 ZONE_CHANGED_INDOORS = "HandleZoneChange",
jcallahan@299 144 ZONE_CHANGED_NEW_AREA = "HandleZoneChange",
jcallahan@0 145 }
jcallahan@0 146
jcallahan@4 147
jcallahan@246 148 -- VARIABLES ----------------------------------------------------------
jcallahan@246 149
jcallahan@92 150 local anvil_spell_ids = {}
jcallahan@92 151 local currently_drunk
jcallahan@128 152 local char_db
jcallahan@128 153 local global_db
jcallahan@299 154 local group_member_guids = {}
jcallahan@246 155 local group_owner_guids_to_pet_guids = {}
jcallahan@246 156 local group_pet_guids = {}
jcallahan@299 157 local in_instance
jcallahan@187 158 local item_process_timer_handle
jcallahan@92 159 local faction_standings = {}
jcallahan@92 160 local forge_spell_ids = {}
jcallahan@95 161 local languages_known = {}
jcallahan@317 162 local boss_loot_toasting = {}
jcallahan@306 163 local loot_toast_container_timer_handle
jcallahan@307 164 local loot_toast_data
jcallahan@307 165 local loot_toast_data_timer_handle
jcallahan@95 166 local name_to_id_map = {}
jcallahan@306 167 local killed_boss_id_timer_handle
jcallahan@177 168 local killed_npc_id
jcallahan@2 169 local target_location_timer_handle
MMOSimca@345 170 local last_timber_spell_id
MMOSimca@355 171 local last_garrison_cache_object_id
MMOSimca@347 172 local chat_loot_timer_handle
jcallahan@86 173 local current_target_id
jcallahan@126 174 local current_area_id
jcallahan@131 175 local current_loot
jcallahan@1 176
jcallahan@312 177
jcallahan@121 178 -- Data for our current action. Including possible values as a reference.
jcallahan@122 179 local current_action = {
jcallahan@121 180 identifier = nil,
jcallahan@121 181 loot_label = nil,
jcallahan@121 182 loot_list = nil,
jcallahan@121 183 loot_sources = nil,
jcallahan@121 184 map_level = nil,
jcallahan@121 185 spell_label = nil,
jcallahan@123 186 target_type = nil,
jcallahan@121 187 x = nil,
jcallahan@121 188 y = nil,
jcallahan@121 189 zone_data = nil,
jcallahan@121 190 }
jcallahan@92 191
jcallahan@246 192
jcallahan@246 193 -- HELPERS ------------------------------------------------------------
jcallahan@246 194
jcallahan@245 195 local function Debug(message, ...)
MMOSimca@350 196 if not DEBUGGING or not message then
jcallahan@151 197 return
jcallahan@151 198 end
MMOSimca@350 199
MMOSimca@350 200 if ... then
MMOSimca@350 201 local args = { ... }
MMOSimca@350 202
MMOSimca@350 203 for index = 1, #args do
MMOSimca@350 204 if args[index] == nil then
MMOSimca@350 205 args[index] = "nil"
MMOSimca@350 206 end
jcallahan@306 207 end
MMOSimca@350 208 _G.print(message:format(unpack(args)))
MMOSimca@350 209 else
MMOSimca@350 210 _G.print(message)
jcallahan@306 211 end
jcallahan@151 212 end
jcallahan@151 213
jcallahan@151 214
jcallahan@169 215 local TradeSkillExecutePer
jcallahan@169 216 do
jcallahan@169 217 local header_list = {}
jcallahan@169 218
jcallahan@169 219 function TradeSkillExecutePer(iter_func)
jcallahan@169 220 if not _G.TradeSkillFrame or not _G.TradeSkillFrame:IsVisible() then
jcallahan@169 221 return
jcallahan@169 222 end
jcallahan@167 223 -- Clear the search box focus so the scan will have correct results.
jcallahan@167 224 local search_box = _G.TradeSkillFrameSearchBox
jcallahan@167 225 search_box:SetText("")
jcallahan@169 226
jcallahan@167 227 _G.TradeSkillSearch_OnTextChanged(search_box)
jcallahan@167 228 search_box:ClearFocus()
jcallahan@167 229 search_box:GetScript("OnEditFocusLost")(search_box)
jcallahan@169 230
jcallahan@169 231 table.wipe(header_list)
jcallahan@169 232
jcallahan@169 233 -- Save the current state of the TradeSkillFrame so it can be restored after we muck with it.
jcallahan@169 234 local have_materials = _G.TradeSkillFrame.filterTbl.hasMaterials
jcallahan@169 235 local have_skillup = _G.TradeSkillFrame.filterTbl.hasSkillUp
jcallahan@169 236
jcallahan@169 237 if have_materials then
jcallahan@169 238 _G.TradeSkillFrame.filterTbl.hasMaterials = false
jcallahan@169 239 _G.TradeSkillOnlyShowMakeable(false)
jcallahan@169 240 end
jcallahan@169 241
jcallahan@169 242 if have_skillup then
jcallahan@169 243 _G.TradeSkillFrame.filterTbl.hasSkillUp = false
jcallahan@169 244 _G.TradeSkillOnlyShowSkillUps(false)
jcallahan@169 245 end
MMOSimca@330 246 _G.SetTradeSkillInvSlotFilter(0, true, true)
jcallahan@169 247 _G.TradeSkillUpdateFilterBar()
jcallahan@169 248 _G.TradeSkillFrame_Update()
jcallahan@169 249
jcallahan@169 250 -- Expand all headers so we can see all the recipes there are
jcallahan@169 251 for tradeskill_index = 1, _G.GetNumTradeSkills() do
jcallahan@169 252 local name, tradeskill_type, _, is_expanded = _G.GetTradeSkillInfo(tradeskill_index)
jcallahan@169 253
jcallahan@169 254 if tradeskill_type == "header" or tradeskill_type == "subheader" then
jcallahan@169 255 if not is_expanded then
jcallahan@169 256 header_list[name] = true
jcallahan@169 257 _G.ExpandTradeSkillSubClass(tradeskill_index)
jcallahan@169 258 end
jcallahan@169 259 elseif iter_func(name, tradeskill_index) then
jcallahan@169 260 break
jcallahan@169 261 end
jcallahan@169 262 end
jcallahan@169 263
jcallahan@169 264 -- Restore the state of the things we changed.
jcallahan@169 265 for tradeskill_index = 1, _G.GetNumTradeSkills() do
jcallahan@169 266 local name, tradeskill_type, _, is_expanded = _G.GetTradeSkillInfo(tradeskill_index)
jcallahan@169 267
jcallahan@169 268 if header_list[name] then
jcallahan@169 269 _G.CollapseTradeSkillSubClass(tradeskill_index)
jcallahan@169 270 end
jcallahan@169 271 end
jcallahan@169 272 _G.TradeSkillFrame.filterTbl.hasMaterials = have_materials
jcallahan@169 273 _G.TradeSkillOnlyShowMakeable(have_materials)
jcallahan@169 274 _G.TradeSkillFrame.filterTbl.hasSkillUp = have_skillup
jcallahan@169 275 _G.TradeSkillOnlyShowSkillUps(have_skillup)
jcallahan@169 276
jcallahan@169 277 _G.TradeSkillUpdateFilterBar()
jcallahan@169 278 _G.TradeSkillFrame_Update()
jcallahan@167 279 end
jcallahan@169 280 end -- do-block
jcallahan@167 281
jcallahan@167 282
jcallahan@39 283 local ActualCopperCost
jcallahan@39 284 do
jcallahan@39 285 local BARTERING_SPELL_ID = 83964
jcallahan@39 286
jcallahan@39 287 local STANDING_DISCOUNTS = {
jcallahan@39 288 HATED = 0,
jcallahan@39 289 HOSTILE = 0,
jcallahan@39 290 UNFRIENDLY = 0,
jcallahan@39 291 NEUTRAL = 0,
jcallahan@39 292 FRIENDLY = 0.05,
jcallahan@39 293 HONORED = 0.1,
jcallahan@39 294 REVERED = 0.15,
jcallahan@39 295 EXALTED = 0.2,
jcallahan@39 296 }
jcallahan@39 297
jcallahan@39 298
jcallahan@39 299 function ActualCopperCost(copper_cost, rep_standing)
jcallahan@39 300 if not copper_cost or copper_cost == 0 then
jcallahan@39 301 return 0
jcallahan@39 302 end
jcallahan@39 303 local modifier = 1
jcallahan@39 304
jcallahan@39 305 if _G.IsSpellKnown(BARTERING_SPELL_ID) then
jcallahan@39 306 modifier = modifier - 0.1
jcallahan@39 307 end
jcallahan@39 308
jcallahan@39 309 if rep_standing then
jcallahan@39 310 if PLAYER_RACE == "Goblin" then
jcallahan@39 311 modifier = modifier - STANDING_DISCOUNTS["EXALTED"]
jcallahan@39 312 elseif STANDING_DISCOUNTS[rep_standing] then
jcallahan@39 313 modifier = modifier - STANDING_DISCOUNTS[rep_standing]
jcallahan@39 314 end
jcallahan@39 315 end
jcallahan@39 316 return math.floor(copper_cost / modifier)
jcallahan@39 317 end
jcallahan@39 318 end -- do-block
jcallahan@39 319
jcallahan@39 320
jcallahan@29 321 local function InstanceDifficultyToken()
jcallahan@233 322 local _, instance_type, instance_difficulty, _, _, _, is_dynamic = _G.GetInstanceInfo()
jcallahan@59 323
jcallahan@59 324 if not instance_type or instance_type == "" then
jcallahan@59 325 instance_type = "NONE"
jcallahan@59 326 end
jcallahan@312 327 return ("%s:%d:%s"):format(instance_type:upper(), instance_difficulty, tostring(is_dynamic))
jcallahan@29 328 end
jcallahan@29 329
jcallahan@29 330
jcallahan@19 331 local function DBEntry(data_type, unit_id)
jcallahan@19 332 if not data_type or not unit_id then
jcallahan@6 333 return
jcallahan@6 334 end
jcallahan@289 335 local category = global_db[data_type]
jcallahan@289 336
jcallahan@289 337 if not category then
jcallahan@289 338 category = {}
jcallahan@289 339 global_db[data_type] = category
jcallahan@289 340 end
jcallahan@289 341 local unit = category[unit_id]
jcallahan@6 342
jcallahan@10 343 if not unit then
jcallahan@187 344 unit = {}
jcallahan@289 345 category[unit_id] = unit
jcallahan@6 346 end
jcallahan@10 347 return unit
jcallahan@6 348 end
jcallahan@270 349
jcallahan@263 350 private.DBEntry = DBEntry
jcallahan@6 351
jcallahan@214 352 local NPCEntry
jcallahan@214 353 do
jcallahan@214 354 local npc_prototype = {}
jcallahan@214 355 local npc_meta = {
jcallahan@214 356 __index = npc_prototype
jcallahan@214 357 }
jcallahan@6 358
jcallahan@214 359 function NPCEntry(identifier)
jcallahan@227 360 local npc = DBEntry("npcs", identifier)
jcallahan@331 361 return npc and _G.setmetatable(npc, npc_meta) or nil
jcallahan@22 362 end
jcallahan@214 363
jcallahan@248 364 function npc_prototype:EncounterData(difficulty_token)
jcallahan@214 365 self.encounter_data = self.encounter_data or {}
jcallahan@248 366 self.encounter_data[difficulty_token] = self.encounter_data[difficulty_token] or {}
jcallahan@248 367 self.encounter_data[difficulty_token].stats = self.encounter_data[difficulty_token].stats or {}
jcallahan@248 368
jcallahan@248 369 return self.encounter_data[difficulty_token]
jcallahan@214 370 end
jcallahan@22 371 end
jcallahan@22 372
jcallahan@22 373
jcallahan@1 374 local function CurrentLocationData()
jcallahan@161 375 if _G.GetCurrentMapAreaID() ~= current_area_id then
jcallahan@145 376 return _G.GetRealZoneText(), current_area_id, 0, 0, 0, InstanceDifficultyToken()
jcallahan@145 377 end
jcallahan@1 378 local map_level = _G.GetCurrentMapDungeonLevel() or 0
jcallahan@1 379 local x, y = _G.GetPlayerMapPosition("player")
jcallahan@1 380
jcallahan@1 381 x = x or 0
jcallahan@1 382 y = y or 0
jcallahan@1 383
jcallahan@1 384 if x == 0 and y == 0 then
jcallahan@1 385 for level_index = 1, _G.GetNumDungeonMapLevels() do
jcallahan@1 386 _G.SetDungeonMapLevel(level_index)
jcallahan@1 387 x, y = _G.GetPlayerMapPosition("player")
jcallahan@1 388
jcallahan@1 389 if x and y and (x > 0 or y > 0) then
jcallahan@1 390 _G.SetDungeonMapLevel(map_level)
jcallahan@1 391 map_level = level_index
jcallahan@1 392 break
jcallahan@1 393 end
jcallahan@1 394 end
jcallahan@1 395 end
jcallahan@1 396
jcallahan@1 397 if _G.DungeonUsesTerrainMap() then
jcallahan@1 398 map_level = map_level - 1
jcallahan@1 399 end
jcallahan@31 400 local x = _G.floor(x * 1000)
jcallahan@31 401 local y = _G.floor(y * 1000)
jcallahan@28 402
jcallahan@31 403 if x % 2 ~= 0 then
jcallahan@31 404 x = x + 1
jcallahan@28 405 end
jcallahan@28 406
jcallahan@31 407 if y % 2 ~= 0 then
jcallahan@31 408 y = y + 1
jcallahan@28 409 end
jcallahan@126 410 return _G.GetRealZoneText(), current_area_id, x, y, map_level, InstanceDifficultyToken()
jcallahan@1 411 end
jcallahan@1 412
jcallahan@1 413
jcallahan@312 414 local function CurrencyLinkToTexture(currency_link)
jcallahan@312 415 if not currency_link then
jcallahan@312 416 return
jcallahan@312 417 end
jcallahan@312 418 local _, _, texture_path = _G.GetCurrencyInfo(tonumber(currency_link:match("currency:(%d+)")))
jcallahan@312 419 return texture_path:match("[^\\]+$"):lower()
jcallahan@312 420 end
jcallahan@312 421
jcallahan@312 422
jcallahan@1 423 local function ItemLinkToID(item_link)
jcallahan@1 424 if not item_link then
jcallahan@1 425 return
jcallahan@1 426 end
jcallahan@7 427 return tonumber(item_link:match("item:(%d+)"))
jcallahan@1 428 end
jcallahan@270 429
jcallahan@260 430 private.ItemLinkToID = ItemLinkToID
jcallahan@4 431
jcallahan@171 432 local function UnitTypeIsNPC(unit_type)
jcallahan@171 433 return unit_type == private.UNIT_TYPES.NPC or unit_type == private.UNIT_TYPES.VEHICLE
jcallahan@171 434 end
jcallahan@171 435
jcallahan@171 436
jcallahan@34 437 local ParseGUID
jcallahan@4 438 do
jcallahan@229 439 local UNIT_TYPES = private.UNIT_TYPES
jcallahan@4 440
jcallahan@281 441 local NPC_ID_MAPPING = {
jcallahan@281 442 [62164] = 63191, -- Garalon
jcallahan@281 443 }
jcallahan@281 444
jcallahan@281 445
jcallahan@334 446 local function MatchUnitTypes(unit_type_name)
MMOSimca@329 447 if not unit_type_name then
MMOSimca@329 448 return UNIT_TYPES.UNKNOWN
MMOSimca@329 449 end
MMOSimca@329 450
MMOSimca@329 451 for def, text in next, UNIT_TYPES do
MMOSimca@329 452 if unit_type_name == text then
MMOSimca@329 453 return UNIT_TYPES[def]
MMOSimca@329 454 end
MMOSimca@329 455 end
MMOSimca@329 456 return UNIT_TYPES.UNKNOWN
MMOSimca@329 457 end
MMOSimca@329 458
MMOSimca@329 459
jcallahan@34 460 function ParseGUID(guid)
jcallahan@5 461 if not guid then
jcallahan@5 462 return
jcallahan@5 463 end
MMOSimca@329 464
MMOSimca@329 465 -- We might want to use some of this new information later, but leaving the returns alone for now
MMOSimca@339 466 local unit_type_name, unk_id1, server_id, instance_id, unk_id2, unit_idnum, spawn_id = ("-"):split(guid)
MMOSimca@329 467
jcallahan@334 468 local unit_type = MatchUnitTypes(unit_type_name)
MMOSimca@329 469 if unit_type ~= UNIT_TYPES.PLAYER and unit_type ~= UNIT_TYPES.PET and unit_type ~= UNIT_TYPES.ITEM then
MMOSimca@329 470
jcallahan@281 471 local id_mapping = NPC_ID_MAPPING[unit_idnum]
jcallahan@281 472
jcallahan@281 473 if id_mapping and UnitTypeIsNPC(unit_type) then
jcallahan@281 474 unit_idnum = id_mapping
jcallahan@281 475 end
jcallahan@281 476 return unit_type, unit_idnum
jcallahan@4 477 end
jcallahan@4 478 return unit_type
jcallahan@4 479 end
jcallahan@249 480
jcallahan@249 481 private.ParseGUID = ParseGUID
jcallahan@4 482 end -- do-block
jcallahan@4 483
jcallahan@4 484
jcallahan@141 485 local UpdateDBEntryLocation
jcallahan@141 486 do
jcallahan@141 487 -- Fishing node coordinate code based on code in GatherMate2 with permission from Kagaro.
jcallahan@141 488 local function FishingCoordinates(x, y, yard_width, yard_height)
jcallahan@141 489 local facing = _G.GetPlayerFacing()
jcallahan@141 490
jcallahan@141 491 if not facing then
jcallahan@141 492 return x, y
jcallahan@141 493 end
jcallahan@246 494 local rad = facing + math.pi
jcallahan@141 495 return x + math.sin(rad) * 15 / yard_width, y + math.cos(rad) * 15 / yard_height
jcallahan@10 496 end
jcallahan@10 497
jcallahan@24 498
jcallahan@141 499 function UpdateDBEntryLocation(entry_type, identifier)
jcallahan@141 500 if not identifier then
jcallahan@141 501 return
jcallahan@141 502 end
jcallahan@141 503 local zone_name, area_id, x, y, map_level, difficulty_token = CurrentLocationData()
MMOSimca@328 504 if not (zone_name and area_id and x and y and map_level) then
MMOSimca@328 505 Debug("UpdateDBEntryLocation: Missing current location data - %s, %d, %d, %d, %d.", zone_name, area_id, x, y, map_level)
MMOSimca@328 506 return
MMOSimca@328 507 end
jcallahan@141 508 local entry = DBEntry(entry_type, identifier)
jcallahan@141 509 entry[difficulty_token] = entry[difficulty_token] or {}
jcallahan@141 510 entry[difficulty_token].locations = entry[difficulty_token].locations or {}
jcallahan@141 511
jcallahan@141 512 local zone_token = ("%s:%d"):format(zone_name, area_id)
jcallahan@141 513 local zone_data = entry[difficulty_token].locations[zone_token]
jcallahan@141 514
jcallahan@141 515 if not zone_data then
jcallahan@141 516 zone_data = {}
jcallahan@141 517 entry[difficulty_token].locations[zone_token] = zone_data
jcallahan@141 518 end
jcallahan@141 519
jcallahan@141 520 -- Special case for Fishing.
jcallahan@141 521 if current_action.spell_label == "FISHING" then
jcallahan@141 522 local yard_width, yard_height = MapData:MapArea(area_id, map_level)
jcallahan@141 523
jcallahan@141 524 if yard_width > 0 and yard_height > 0 then
jcallahan@141 525 x, y = FishingCoordinates(x, y, yard_width, yard_height)
jcallahan@141 526 current_action.x = x
jcallahan@141 527 current_action.y = y
jcallahan@141 528 end
jcallahan@141 529 end
jcallahan@141 530 local location_token = ("%d:%d:%d"):format(map_level, x, y)
jcallahan@141 531
jcallahan@141 532 zone_data[location_token] = zone_data[location_token] or true
jcallahan@141 533 return zone_data
jcallahan@10 534 end
jcallahan@141 535 end -- do-block
jcallahan@10 536
jcallahan@10 537
jcallahan@19 538 local function HandleItemUse(item_link, bag_index, slot_index)
jcallahan@19 539 if not item_link then
jcallahan@19 540 return
jcallahan@19 541 end
jcallahan@19 542 local item_id = ItemLinkToID(item_link)
jcallahan@19 543
jcallahan@19 544 if not bag_index or not slot_index then
jcallahan@19 545 for new_bag_index = 0, _G.NUM_BAG_FRAMES do
jcallahan@19 546 for new_slot_index = 1, _G.GetContainerNumSlots(new_bag_index) do
jcallahan@19 547 if item_id == ItemLinkToID(_G.GetContainerItemLink(new_bag_index, new_slot_index)) then
jcallahan@19 548 bag_index = new_bag_index
jcallahan@19 549 slot_index = new_slot_index
jcallahan@19 550 break
jcallahan@19 551 end
jcallahan@19 552 end
jcallahan@19 553 end
jcallahan@19 554 end
jcallahan@19 555
jcallahan@19 556 if not bag_index or not slot_index then
jcallahan@19 557 return
jcallahan@19 558 end
jcallahan@19 559 local _, _, _, _, _, is_lootable = _G.GetContainerItemInfo(bag_index, slot_index)
jcallahan@19 560
jcallahan@19 561 if not is_lootable then
jcallahan@19 562 return
jcallahan@19 563 end
MMOSimca@368 564
MMOSimca@368 565 table.wipe(current_action)
MMOSimca@368 566 current_loot = nil
MMOSimca@368 567 current_action.target_type = AF.ITEM
MMOSimca@368 568 current_action.identifier = item_id
MMOSimca@368 569 current_action.loot_label = "contains"
MMOSimca@368 570
MMOSimca@368 571 --[[DatamineTT:ClearLines()
jcallahan@19 572 DatamineTT:SetBagItem(bag_index, slot_index)
jcallahan@19 573
jcallahan@19 574 for line_index = 1, DatamineTT:NumLines() do
jcallahan@19 575 local current_line = _G["WDPDatamineTTTextLeft" .. line_index]
jcallahan@19 576
jcallahan@19 577 if not current_line then
MMOSimca@336 578 Debug("HandleItemUse: Item with ID %d and link %s had an invalid tooltip.", item_id, item_link)
jcallahan@324 579 return
jcallahan@19 580 end
jcallahan@306 581
jcallahan@306 582 if current_line:GetText() == _G.ITEM_OPENABLE then
jcallahan@122 583 table.wipe(current_action)
jcallahan@312 584 current_loot = nil
jcallahan@312 585
jcallahan@123 586 current_action.target_type = AF.ITEM
jcallahan@122 587 current_action.identifier = item_id
jcallahan@122 588 current_action.loot_label = "contains"
jcallahan@324 589 return
jcallahan@19 590 end
jcallahan@19 591 end
MMOSimca@368 592 Debug("HandleItemUse: Item with ID %d and link %s did not have a tooltip that contained the string %s.", item_id, item_link, _G.ITEM_OPENABLE)]]--
jcallahan@19 593 end
jcallahan@19 594
jcallahan@19 595
jcallahan@39 596 local UnitFactionStanding
jcallahan@32 597 local UpdateFactionData
jcallahan@32 598 do
jcallahan@32 599 local MAX_FACTION_INDEX = 1000
jcallahan@20 600
jcallahan@32 601 local STANDING_NAMES = {
jcallahan@32 602 "HATED",
jcallahan@32 603 "HOSTILE",
jcallahan@32 604 "UNFRIENDLY",
jcallahan@32 605 "NEUTRAL",
jcallahan@32 606 "FRIENDLY",
jcallahan@32 607 "HONORED",
jcallahan@32 608 "REVERED",
jcallahan@32 609 "EXALTED",
jcallahan@32 610 }
jcallahan@32 611
jcallahan@39 612
jcallahan@39 613 function UnitFactionStanding(unit)
jcallahan@135 614 local unit_name = _G.UnitName(unit)
jcallahan@39 615 UpdateFactionData()
jcallahan@39 616 DatamineTT:ClearLines()
jcallahan@39 617 DatamineTT:SetUnit(unit)
jcallahan@39 618
jcallahan@39 619 for line_index = 1, DatamineTT:NumLines() do
jcallahan@64 620 local faction_name = _G["WDPDatamineTTTextLeft" .. line_index]:GetText():trim()
jcallahan@39 621
jcallahan@135 622 if faction_name and faction_name ~= unit_name and faction_standings[faction_name] then
jcallahan@39 623 return faction_name, faction_standings[faction_name]
jcallahan@39 624 end
jcallahan@39 625 end
jcallahan@39 626 end
jcallahan@39 627
jcallahan@39 628
jcallahan@32 629 function UpdateFactionData()
jcallahan@32 630 for faction_index = 1, MAX_FACTION_INDEX do
jcallahan@32 631 local faction_name, _, current_standing, _, _, _, _, _, is_header = _G.GetFactionInfo(faction_index)
jcallahan@32 632
jcallahan@86 633 if faction_name then
jcallahan@32 634 faction_standings[faction_name] = STANDING_NAMES[current_standing]
jcallahan@32 635 elseif not faction_name then
jcallahan@32 636 break
jcallahan@32 637 end
jcallahan@20 638 end
jcallahan@20 639 end
jcallahan@32 640 end -- do-block
jcallahan@20 641
jcallahan@48 642
jcallahan@75 643 local GenericLootUpdate
jcallahan@75 644 do
jcallahan@77 645 local function LootTable(entry, loot_type, top_field)
jcallahan@75 646 if top_field then
jcallahan@75 647 entry[top_field] = entry[top_field] or {}
jcallahan@75 648 entry[top_field][loot_type] = entry[top_field][loot_type] or {}
jcallahan@75 649 return entry[top_field][loot_type]
jcallahan@75 650 end
jcallahan@48 651 entry[loot_type] = entry[loot_type] or {}
jcallahan@75 652 return entry[loot_type]
jcallahan@48 653 end
jcallahan@48 654
jcallahan@75 655 function GenericLootUpdate(data_type, top_field)
jcallahan@132 656 local loot_type = current_loot.label
jcallahan@75 657 local loot_count = ("%s_count"):format(loot_type)
jcallahan@77 658 local source_list = {}
jcallahan@75 659
jcallahan@131 660 if current_loot.sources then
jcallahan@131 661 for source_guid, loot_data in pairs(current_loot.sources) do
jcallahan@304 662 local source_id
jcallahan@78 663
jcallahan@131 664 if current_loot.target_type == AF.ITEM then
jcallahan@119 665 -- Items return the player as the source, so we need to use the item's ID (disenchant, milling, etc)
jcallahan@131 666 source_id = current_loot.identifier
jcallahan@119 667 else
jcallahan@331 668 local _, unit_ID = ParseGUID(source_guid)
MMOSimca@328 669 if unit_ID then
MMOSimca@328 670 if current_loot.target_type == AF.OBJECT then
MMOSimca@328 671 source_id = ("%s:%s"):format(current_loot.spell_label, unit_ID)
MMOSimca@328 672 else
MMOSimca@328 673 source_id = unit_ID
MMOSimca@328 674 end
MMOSimca@328 675 end
jcallahan@119 676 end
jcallahan@304 677 local entry = DBEntry(data_type, source_id)
jcallahan@75 678
jcallahan@119 679 if entry then
jcallahan@119 680 local loot_table = LootTable(entry, loot_type, top_field)
jcallahan@77 681
jcallahan@304 682 if not source_list[source_id] then
jcallahan@119 683 if top_field then
jcallahan@119 684 entry[top_field][loot_count] = (entry[top_field][loot_count] or 0) + 1
jcallahan@306 685 elseif not private.container_loot_toasting then
jcallahan@119 686 entry[loot_count] = (entry[loot_count] or 0) + 1
jcallahan@119 687 end
jcallahan@304 688 source_list[source_id] = true
jcallahan@77 689 end
jcallahan@119 690 UpdateDBEntryLocation(data_type, source_id)
jcallahan@75 691
jcallahan@309 692 if current_loot.target_type == AF.ZONE then
jcallahan@309 693 for item_id, quantity in pairs(loot_data) do
jcallahan@309 694 table.insert(loot_table, ("%d:%d"):format(item_id, quantity))
jcallahan@309 695 end
jcallahan@309 696 else
jcallahan@308 697 for loot_token, quantity in pairs(loot_data) do
jcallahan@308 698 local label, currency_texture = (":"):split(loot_token)
jcallahan@308 699
jcallahan@308 700 if label == "currency" and currency_texture then
jcallahan@308 701 table.insert(loot_table, ("currency:%d:%s"):format(quantity, currency_texture))
jcallahan@308 702 elseif loot_token == "money" then
jcallahan@308 703 table.insert(loot_table, ("money:%d"):format(quantity))
jcallahan@308 704 else
jcallahan@308 705 table.insert(loot_table, ("%d:%d"):format(loot_token, quantity))
jcallahan@308 706 end
jcallahan@308 707 end
jcallahan@119 708 end
jcallahan@75 709 end
jcallahan@75 710 end
jcallahan@75 711 end
jcallahan@121 712
jcallahan@121 713 -- This is used for Gas Extractions.
jcallahan@131 714 if #current_loot.list <= 0 then
jcallahan@78 715 return
jcallahan@78 716 end
jcallahan@82 717 local entry
jcallahan@82 718
jcallahan@82 719 -- At this point we only have a name if it's an object.
jcallahan@131 720 if current_loot.target_type == AF.OBJECT then
jcallahan@131 721 entry = DBEntry(data_type, ("%s:%s"):format(current_loot.spell_label, current_loot.object_name))
jcallahan@82 722 else
jcallahan@131 723 entry = DBEntry(data_type, current_loot.identifier)
jcallahan@82 724 end
jcallahan@75 725
jcallahan@75 726 if not entry then
jcallahan@75 727 return
jcallahan@75 728 end
jcallahan@77 729 local loot_table = LootTable(entry, loot_type, top_field)
jcallahan@77 730
jcallahan@307 731 if current_loot.identifier then
jcallahan@307 732 if not source_list[current_loot.identifier] then
jcallahan@307 733 if top_field then
jcallahan@307 734 entry[top_field][loot_count] = (entry[top_field][loot_count] or 0) + 1
jcallahan@307 735 else
jcallahan@307 736 entry[loot_count] = (entry[loot_count] or 0) + 1
jcallahan@307 737 end
jcallahan@307 738 source_list[current_loot.identifier] = true
jcallahan@77 739 end
jcallahan@77 740 end
jcallahan@75 741
jcallahan@131 742 for index = 1, #current_loot.list do
jcallahan@131 743 table.insert(loot_table, current_loot.list[index])
jcallahan@75 744 end
jcallahan@48 745 end
jcallahan@75 746 end -- do-block
jcallahan@48 747
jcallahan@97 748
jcallahan@97 749 local ReplaceKeywords
jcallahan@97 750 do
jcallahan@97 751 local KEYWORD_SUBSTITUTIONS = {
jcallahan@97 752 class = PLAYER_CLASS,
jcallahan@97 753 name = PLAYER_NAME,
jcallahan@97 754 race = PLAYER_RACE,
jcallahan@97 755 }
jcallahan@97 756
jcallahan@97 757
jcallahan@97 758 function ReplaceKeywords(text)
jcallahan@97 759 if not text or text == "" then
jcallahan@97 760 return ""
jcallahan@97 761 end
jcallahan@97 762
jcallahan@97 763 for category, lookup in pairs(KEYWORD_SUBSTITUTIONS) do
jcallahan@97 764 local category_format = ("<%s>"):format(category)
jcallahan@97 765 text = text:gsub(lookup, category_format):gsub(lookup:lower(), category_format)
jcallahan@97 766 end
jcallahan@97 767 return text
jcallahan@97 768 end
jcallahan@97 769 end -- do-block
jcallahan@97 770
jcallahan@97 771
jcallahan@154 772 -- Contains a dirty hack due to Blizzard's strange handling of Micro Dungeons; GetMapInfo() will not return correct information
jcallahan@154 773 -- unless the WorldMapFrame is shown.
jcallahan@143 774 do
jcallahan@143 775 -- MapFileName = MapAreaID
jcallahan@143 776 local MICRO_DUNGEON_IDS = {
jcallahan@143 777 ShrineofTwoMoons = 903,
jcallahan@143 778 ShrineofSevenStars = 905,
jcallahan@143 779 }
jcallahan@126 780
jcallahan@299 781 local function SetCurrentAreaID()
jcallahan@156 782 if private.in_combat then
jcallahan@156 783 private.set_area_id = true
jcallahan@156 784 return
jcallahan@156 785 end
jcallahan@155 786 local map_area_id = _G.GetCurrentMapAreaID()
jcallahan@155 787
jcallahan@155 788 if map_area_id == current_area_id then
jcallahan@155 789 return
jcallahan@155 790 end
jcallahan@143 791 local world_map = _G.WorldMapFrame
jcallahan@143 792 local map_visible = world_map:IsVisible()
jcallahan@312 793 local sfx_value = tonumber(_G.GetCVar("Sound_EnableSFX"))
jcallahan@143 794
jcallahan@143 795 if not map_visible then
jcallahan@143 796 _G.SetCVar("Sound_EnableSFX", 0)
jcallahan@143 797 world_map:Show()
jcallahan@143 798 end
jcallahan@331 799 local _, _, _, _, micro_dungeon_map_name = _G.GetMapInfo()
jcallahan@331 800 local micro_dungeon_id = MICRO_DUNGEON_IDS[micro_dungeon_map_name]
jcallahan@143 801
jcallahan@154 802 _G.SetMapToCurrentZone()
jcallahan@154 803
jcallahan@143 804 if micro_dungeon_id then
jcallahan@143 805 current_area_id = micro_dungeon_id
jcallahan@143 806 else
jcallahan@143 807 current_area_id = _G.GetCurrentMapAreaID()
jcallahan@143 808 end
jcallahan@143 809
jcallahan@154 810 if map_visible then
jcallahan@154 811 _G.SetMapByID(map_area_id)
jcallahan@154 812 else
jcallahan@143 813 world_map:Hide()
jcallahan@143 814 _G.SetCVar("Sound_EnableSFX", sfx_value)
jcallahan@143 815 end
jcallahan@143 816 end
jcallahan@299 817
jcallahan@299 818 function WDP:HandleZoneChange(event_name)
jcallahan@299 819 in_instance = _G.IsInInstance()
jcallahan@299 820 SetCurrentAreaID()
jcallahan@299 821 end
jcallahan@154 822 end
jcallahan@126 823
jcallahan@301 824 local function InitializeCurrentLoot()
jcallahan@301 825 current_loot = {
jcallahan@301 826 list = {},
jcallahan@301 827 sources = {},
jcallahan@301 828 identifier = current_action.identifier,
jcallahan@301 829 label = current_action.loot_label or "drops",
jcallahan@301 830 map_level = current_action.map_level,
jcallahan@301 831 object_name = current_action.object_name,
jcallahan@301 832 spell_label = current_action.spell_label,
jcallahan@301 833 target_type = current_action.target_type,
jcallahan@301 834 x = current_action.x,
jcallahan@301 835 y = current_action.y,
jcallahan@301 836 zone_data = current_action.zone_data,
jcallahan@301 837 }
jcallahan@301 838
jcallahan@301 839 table.wipe(current_action)
jcallahan@301 840 end
jcallahan@246 841
MMOSimca@347 842
MMOSimca@347 843 -- TIMERS -------------------------------------------------------------
MMOSimca@347 844
MMOSimca@347 845 local function ClearKilledNPC()
MMOSimca@347 846 killed_npc_id = nil
MMOSimca@347 847 end
MMOSimca@347 848
MMOSimca@347 849
MMOSimca@347 850 local function ClearKilledBossID()
MMOSimca@347 851 if killed_boss_id_timer_handle then
MMOSimca@347 852 WDP:CancelTimer(killed_boss_id_timer_handle)
MMOSimca@347 853 killed_boss_id_timer_handle = nil
MMOSimca@347 854 end
MMOSimca@347 855
MMOSimca@347 856 table.wipe(boss_loot_toasting)
MMOSimca@347 857 private.raid_boss_id = nil
MMOSimca@347 858 end
MMOSimca@347 859
MMOSimca@347 860
MMOSimca@347 861 local function ClearLootToastContainerID()
MMOSimca@347 862 if loot_toast_container_timer_handle then
MMOSimca@347 863 WDP:CancelTimer(loot_toast_container_timer_handle)
MMOSimca@347 864 loot_toast_container_timer_handle = nil
MMOSimca@347 865 end
MMOSimca@347 866
MMOSimca@347 867 private.container_loot_toasting = false
MMOSimca@347 868 private.loot_toast_container_id = nil
MMOSimca@347 869 end
MMOSimca@347 870
MMOSimca@347 871
MMOSimca@347 872 local function ClearLootToastData()
MMOSimca@347 873 -- cancel existing timer if found
MMOSimca@347 874 if loot_toast_data_timer_handle then
MMOSimca@347 875 WDP:CancelTimer(loot_toast_data_timer_handle)
MMOSimca@347 876 loot_toast_data_timer_handle = nil
MMOSimca@347 877 end
MMOSimca@347 878
MMOSimca@347 879 if loot_toast_data then
MMOSimca@347 880 table.wipe(loot_toast_data)
MMOSimca@347 881 end
MMOSimca@347 882 end
MMOSimca@347 883
MMOSimca@347 884
MMOSimca@347 885 local function ClearTimeBasedLootData()
MMOSimca@349 886 Debug("ClearTimeBasedLootData: Ending salvage loot timer.")
MMOSimca@347 887 if chat_loot_timer_handle then
MMOSimca@347 888 WDP:CancelTimer(chat_loot_timer_handle)
MMOSimca@347 889 chat_loot_timer_handle = nil
MMOSimca@347 890 end
MMOSimca@347 891
MMOSimca@349 892 if current_loot and current_loot.identifier and (current_loot.identifier == BAG_OF_SALVAGE_ITEM_ID or current_loot.identifier == CRATE_OF_SALVAGE_ITEM_ID or current_loot.identifier == BIG_CRATE_OF_SALVAGE_ITEM_ID) then
MMOSimca@347 893 GenericLootUpdate("items")
MMOSimca@347 894 end
MMOSimca@347 895 current_loot = nil
MMOSimca@347 896 end
MMOSimca@347 897
MMOSimca@347 898
jcallahan@246 899 -- METHODS ------------------------------------------------------------
jcallahan@246 900
jcallahan@0 901 function WDP:OnInitialize()
jcallahan@128 902 local db = LibStub("AceDB-3.0"):New("WoWDBProfilerData", DATABASE_DEFAULTS, "Default")
jcallahan@270 903 private.db = db
jcallahan@128 904 global_db = db.global
jcallahan@128 905 char_db = db.char
jcallahan@14 906
jcallahan@270 907 local raw_db = _G.WoWDBProfilerData
jcallahan@18 908 local build_num = tonumber(private.build_num)
jcallahan@14 909
jcallahan@136 910 if (raw_db.version and raw_db.version < DB_VERSION) or (raw_db.build_num and raw_db.build_num < build_num) then
jcallahan@74 911 for entry in pairs(DATABASE_DEFAULTS.global) do
jcallahan@128 912 global_db[entry] = {}
jcallahan@74 913 end
jcallahan@74 914 end
jcallahan@35 915 raw_db.build_num = build_num
MMOSimca@330 916 raw_db.region = private.region
jcallahan@63 917 raw_db.version = DB_VERSION
jcallahan@249 918
jcallahan@312 919 private.InitializeCommentSystem()
jcallahan@312 920 self:RegisterChatCommand("comment", private.ProcessCommentCommand)
jcallahan@0 921 end
jcallahan@0 922
jcallahan@0 923
jcallahan@153 924 function WDP:EventDispatcher(...)
jcallahan@153 925 local event_name = ...
jcallahan@153 926
MMOSimca@346 927 if DEBUGGING then
jcallahan@154 928 if event_name == "COMBAT_LOG_EVENT_UNFILTERED" then
jcallahan@154 929 Debug(event_name)
jcallahan@154 930 else
jcallahan@154 931 Debug(...)
jcallahan@153 932 end
jcallahan@153 933 end
jcallahan@153 934 local func = EVENT_MAPPING[event_name]
jcallahan@153 935
jcallahan@153 936 if _G.type(func) == "boolean" then
jcallahan@153 937 self[event_name](self, ...)
jcallahan@153 938 elseif _G.type(func) == "function" then
jcallahan@159 939 self[func](self, ...)
jcallahan@153 940 end
jcallahan@153 941 end
jcallahan@153 942
jcallahan@153 943
jcallahan@0 944 function WDP:OnEnable()
jcallahan@300 945 PLAYER_GUID = _G.UnitGUID("player")
jcallahan@300 946
jcallahan@0 947 for event_name, mapping in pairs(EVENT_MAPPING) do
jcallahan@156 948 if EVENT_DEBUG then
jcallahan@153 949 self:RegisterEvent(event_name, "EventDispatcher")
jcallahan@153 950 else
jcallahan@153 951 self:RegisterEvent(event_name, (_G.type(mapping) ~= "boolean") and mapping or nil)
jcallahan@153 952 end
jcallahan@0 953 end
jcallahan@95 954
jcallahan@95 955 for index = 1, _G.GetNumLanguages() do
jcallahan@95 956 languages_known[_G.GetLanguageByIndex(index)] = true
jcallahan@95 957 end
jcallahan@187 958 item_process_timer_handle = self:ScheduleRepeatingTimer("ProcessItems", 30)
jcallahan@31 959 target_location_timer_handle = self:ScheduleRepeatingTimer("UpdateTargetLocation", 0.5)
jcallahan@19 960
jcallahan@19 961 _G.hooksecurefunc("UseContainerItem", function(bag_index, slot_index, target_unit)
jcallahan@19 962 if target_unit then
jcallahan@19 963 return
jcallahan@19 964 end
jcallahan@19 965 HandleItemUse(_G.GetContainerItemLink(bag_index, slot_index), bag_index, slot_index)
jcallahan@19 966 end)
jcallahan@19 967
jcallahan@19 968 _G.hooksecurefunc("UseItemByName", function(identifier, target_unit)
jcallahan@19 969 if target_unit then
jcallahan@19 970 return
jcallahan@19 971 end
jcallahan@19 972 local _, item_link = _G.GetItemInfo(identifier)
jcallahan@19 973 HandleItemUse(item_link)
jcallahan@19 974 end)
jcallahan@263 975
jcallahan@299 976 self:HandleZoneChange("OnEnable")
jcallahan@290 977 self:GROUP_ROSTER_UPDATE()
jcallahan@0 978 end
jcallahan@0 979
jcallahan@0 980
jcallahan@219 981 local ScrapeItemUpgradeStats
jcallahan@219 982 do
jcallahan@219 983 local intermediary = {}
jcallahan@219 984
jcallahan@220 985 function ScrapeItemUpgradeStats(item_id, upgrade_id, reforge_id)
jcallahan@220 986 if not ALLOWED_LOCALES[CLIENT_LOCALE] then
jcallahan@220 987 return
jcallahan@220 988 end
jcallahan@219 989 local create_entry
jcallahan@219 990
jcallahan@219 991 table.wipe(intermediary)
jcallahan@219 992
jcallahan@219 993 for line_index = 1, DatamineTT:NumLines() do
jcallahan@293 994 local left_text = _G["WDPDatamineTTTextLeft" .. line_index]:GetText():trim()
jcallahan@293 995
jcallahan@293 996 if not left_text or left_text == "" or left_text:find("Socket") or left_text:find("Set:") then
jcallahan@293 997 break
jcallahan@219 998 end
jcallahan@219 999 local amount, stat = left_text:match("+(.-) (.*)")
jcallahan@219 1000
jcallahan@219 1001 if amount and stat then
jcallahan@219 1002 create_entry = true
jcallahan@295 1003 intermediary[stat:lower():gsub(" ", "_"):gsub("|r", "")] = tonumber((amount:gsub(",", "")))
jcallahan@219 1004 end
jcallahan@219 1005 end
jcallahan@219 1006
jcallahan@219 1007 if not create_entry then
jcallahan@219 1008 return
jcallahan@219 1009 end
jcallahan@219 1010 local item = DBEntry("items", item_id)
jcallahan@225 1011 item.upgrade_id = upgrade_id
jcallahan@219 1012 item.upgrades = item.upgrades or {}
jcallahan@219 1013 item.upgrades[upgrade_id] = item.upgrades[upgrade_id] or {}
jcallahan@219 1014
jcallahan@219 1015 for stat, amount in pairs(intermediary) do
jcallahan@219 1016 item.upgrades[upgrade_id][stat] = amount
jcallahan@219 1017 end
jcallahan@219 1018 end
MMOSimca@336 1019 end -- do-block
jcallahan@219 1020
jcallahan@219 1021
MMOSimca@340 1022 local function RecordItemData(item_id, item_link, process_bonus_ids, durability)
jcallahan@331 1023 local _, _, item_string = item_link:find("^|%x+|H(.+)|h%[.+%]")
jcallahan@219 1024 local item
jcallahan@0 1025
jcallahan@191 1026 if item_string then
MMOSimca@338 1027 local item_results = { (":"):split(item_string) }
MMOSimca@338 1028
MMOSimca@338 1029 local suffix_id = tonumber(item_results[8])
MMOSimca@338 1030 local unique_id = item_results[9]
MMOSimca@338 1031 local upgrade_id = tonumber(item_results[11])
MMOSimca@338 1032 local instance_difficulty_id = tonumber(item_results[12])
MMOSimca@338 1033 local num_bonus_ids = tonumber(item_results[13])
jcallahan@333 1034
MMOSimca@340 1035 if not num_bonus_ids or num_bonus_ids == 0 or not process_bonus_ids then
MMOSimca@329 1036 if (suffix_id and suffix_id ~= 0) or (instance_difficulty_id and instance_difficulty_id ~= 0) then
MMOSimca@329 1037 item = DBEntry("items", item_id)
MMOSimca@329 1038 item.unique_id = bit.band(unique_id, 0xFFFF)
jcallahan@331 1039
jcallahan@331 1040 if suffix_id and suffix_id ~= 0 then
MMOSimca@329 1041 item.suffix_id = suffix_id
MMOSimca@329 1042 end
jcallahan@331 1043
jcallahan@331 1044 if instance_difficulty_id and instance_difficulty_id ~= 0 then
MMOSimca@329 1045 item.instance_difficulty_id = instance_difficulty_id
MMOSimca@329 1046 end
MMOSimca@329 1047 end
MMOSimca@329 1048 elseif num_bonus_ids > 0 then
jcallahan@219 1049 item = DBEntry("items", item_id)
MMOSimca@329 1050
jcallahan@201 1051 item.unique_id = bit.band(unique_id, 0xFFFF)
MMOSimca@329 1052 item.instance_difficulty_id = instance_difficulty_id
jcallahan@331 1053
MMOSimca@329 1054 if not item.bonus_ids then
MMOSimca@329 1055 item.bonus_ids = {}
MMOSimca@329 1056 end
MMOSimca@338 1057
MMOSimca@329 1058 for bonus_index = 1, num_bonus_ids do
MMOSimca@338 1059 item.bonus_ids[tonumber(item_results[13 + bonus_index])] = true
MMOSimca@329 1060 end
MMOSimca@329 1061 else
MMOSimca@329 1062 Debug("RecordItemData: Item_system is supposed to be 0 or positive, instead it was %s.", item_system)
jcallahan@201 1063 end
jcallahan@219 1064 if upgrade_id and upgrade_id ~= 0 then
jcallahan@220 1065 DatamineTT:SetHyperlink(item_link)
MMOSimca@329 1066 ScrapeItemUpgradeStats(item_id, upgrade_id)
jcallahan@191 1067 end
jcallahan@0 1068 end
jcallahan@212 1069
jcallahan@212 1070 if durability and durability > 0 then
jcallahan@219 1071 item = item or DBEntry("items", item_id)
jcallahan@212 1072 item.durability = durability
jcallahan@212 1073 end
jcallahan@0 1074 end
jcallahan@0 1075
jcallahan@0 1076
jcallahan@187 1077 function WDP:ProcessItems()
jcallahan@187 1078 for slot_index = _G.INVSLOT_FIRST_EQUIPPED, _G.INVSLOT_LAST_EQUIPPED do
jcallahan@1 1079 local item_id = _G.GetInventoryItemID("player", slot_index)
jcallahan@0 1080
jcallahan@0 1081 if item_id and item_id > 0 then
jcallahan@1 1082 local _, max_durability = _G.GetInventoryItemDurability(slot_index)
MMOSimca@340 1083 RecordItemData(item_id, _G.GetInventoryItemLink("player", slot_index), false, max_durability)
jcallahan@0 1084 end
jcallahan@0 1085 end
jcallahan@0 1086
jcallahan@0 1087 for bag_index = 0, _G.NUM_BAG_SLOTS do
jcallahan@0 1088 for slot_index = 1, _G.GetContainerNumSlots(bag_index) do
jcallahan@1 1089 local item_id = _G.GetContainerItemID(bag_index, slot_index)
jcallahan@0 1090
jcallahan@0 1091 if item_id and item_id > 0 then
jcallahan@1 1092 local _, max_durability = _G.GetContainerItemDurability(bag_index, slot_index)
MMOSimca@340 1093 RecordItemData(item_id, _G.GetContainerItemLink(bag_index, slot_index), false, max_durability)
jcallahan@0 1094 end
jcallahan@0 1095 end
jcallahan@0 1096 end
jcallahan@0 1097 end
jcallahan@0 1098
jcallahan@118 1099
jcallahan@215 1100 local TargetedNPC
jcallahan@118 1101 do
jcallahan@118 1102 local GENDER_NAMES = {
jcallahan@118 1103 "UNKNOWN",
jcallahan@118 1104 "MALE",
jcallahan@118 1105 "FEMALE",
jcallahan@118 1106 }
jcallahan@118 1107
jcallahan@118 1108
jcallahan@118 1109 local REACTION_NAMES = {
jcallahan@118 1110 "HATED",
jcallahan@118 1111 "HOSTILE",
jcallahan@118 1112 "UNFRIENDLY",
jcallahan@118 1113 "NEUTRAL",
jcallahan@118 1114 "FRIENDLY",
jcallahan@118 1115 "HONORED",
jcallahan@118 1116 "REVERED",
jcallahan@118 1117 "EXALTED",
jcallahan@118 1118 }
jcallahan@118 1119
jcallahan@118 1120
jcallahan@118 1121 local POWER_TYPE_NAMES = {
jcallahan@118 1122 ["0"] = "MANA",
jcallahan@118 1123 ["1"] = "RAGE",
jcallahan@118 1124 ["2"] = "FOCUS",
jcallahan@118 1125 ["3"] = "ENERGY",
jcallahan@118 1126 ["6"] = "RUNIC_POWER",
jcallahan@118 1127 }
jcallahan@118 1128
jcallahan@118 1129
jcallahan@215 1130 function TargetedNPC()
jcallahan@118 1131 if not _G.UnitExists("target") or _G.UnitPlayerControlled("target") or currently_drunk then
jcallahan@118 1132 current_target_id = nil
jcallahan@118 1133 return
jcallahan@118 1134 end
jcallahan@118 1135 local unit_type, unit_idnum = ParseGUID(_G.UnitGUID("target"))
jcallahan@118 1136
jcallahan@171 1137 if not unit_idnum or not UnitTypeIsNPC(unit_type) then
jcallahan@118 1138 return
jcallahan@118 1139 end
jcallahan@118 1140 current_target_id = unit_idnum
jcallahan@118 1141
jcallahan@118 1142 local npc = NPCEntry(unit_idnum)
jcallahan@118 1143 local _, class_token = _G.UnitClass("target")
jcallahan@118 1144 npc.class = class_token
jcallahan@118 1145 npc.faction = UnitFactionStanding("target")
jcallahan@118 1146 npc.genders = npc.genders or {}
jcallahan@118 1147 npc.genders[GENDER_NAMES[_G.UnitSex("target")] or "UNDEFINED"] = true
jcallahan@118 1148 npc.is_pvp = _G.UnitIsPVP("target") and true or nil
jcallahan@118 1149 npc.reaction = ("%s:%s:%s"):format(_G.UnitLevel("player"), _G.UnitFactionGroup("player"), REACTION_NAMES[_G.UnitReaction("player", "target")])
jcallahan@118 1150
jcallahan@248 1151 local encounter_data = npc:EncounterData(InstanceDifficultyToken()).stats
jcallahan@118 1152 local npc_level = ("level_%d"):format(_G.UnitLevel("target"))
jcallahan@250 1153 local level_data = encounter_data[npc_level]
jcallahan@250 1154
jcallahan@250 1155 if not level_data then
jcallahan@250 1156 level_data = {}
jcallahan@250 1157 encounter_data[npc_level] = level_data
jcallahan@250 1158 end
jcallahan@257 1159 level_data.max_health = level_data.max_health or _G.UnitHealthMax("target")
jcallahan@257 1160
jcallahan@257 1161 if not level_data.power then
MMOSimca@337 1162 local max_power = _G.UnitPowerMax("target")
jcallahan@257 1163
jcallahan@257 1164 if max_power > 0 then
jcallahan@257 1165 local power_type = _G.UnitPowerType("target")
jcallahan@312 1166 level_data.power = ("%s:%d"):format(POWER_TYPE_NAMES[tostring(power_type)] or power_type, max_power)
jcallahan@257 1167 end
jcallahan@118 1168 end
jcallahan@118 1169 name_to_id_map[_G.UnitName("target")] = unit_idnum
jcallahan@118 1170 return npc, unit_idnum
jcallahan@118 1171 end
jcallahan@118 1172 end -- do-block
jcallahan@118 1173
jcallahan@118 1174
jcallahan@113 1175 do
jcallahan@113 1176 local COORD_MAX = 5
jcallahan@0 1177
jcallahan@113 1178 function WDP:UpdateTargetLocation()
jcallahan@113 1179 if currently_drunk or not _G.UnitExists("target") or _G.UnitPlayerControlled("target") or (_G.UnitIsTapped("target") and not _G.UnitIsDead("target")) then
jcallahan@2 1180 return
jcallahan@2 1181 end
jcallahan@113 1182
jcallahan@113 1183 for index = 1, 4 do
jcallahan@113 1184 if not _G.CheckInteractDistance("target", index) then
jcallahan@113 1185 return
jcallahan@113 1186 end
jcallahan@113 1187 end
jcallahan@215 1188 local npc = TargetedNPC()
jcallahan@113 1189
jcallahan@113 1190 if not npc then
jcallahan@113 1191 return
jcallahan@113 1192 end
jcallahan@113 1193 local zone_name, area_id, x, y, map_level, difficulty_token = CurrentLocationData()
MMOSimca@328 1194 if not (zone_name and area_id and x and y and map_level) then
MMOSimca@328 1195 Debug("UpdateTargetLocation: Missing current location data - %s, %d, %d, %d, %d.", zone_name, area_id, x, y, map_level)
MMOSimca@328 1196 return
MMOSimca@328 1197 end
jcallahan@248 1198 local npc_data = npc:EncounterData(difficulty_token).stats[("level_%d"):format(_G.UnitLevel("target"))]
jcallahan@113 1199 local zone_token = ("%s:%d"):format(zone_name, area_id)
jcallahan@118 1200 npc_data.locations = npc_data.locations or {} -- TODO: Fix this. It is broken. Possibly something to do with the timed updates.
jcallahan@113 1201
jcallahan@113 1202 local zone_data = npc_data.locations[zone_token]
jcallahan@113 1203
jcallahan@113 1204 if not zone_data then
jcallahan@113 1205 zone_data = {}
jcallahan@113 1206 npc_data.locations[zone_token] = zone_data
jcallahan@113 1207 end
jcallahan@113 1208
jcallahan@113 1209 for location_token in pairs(zone_data) do
jcallahan@113 1210 local loc_level, loc_x, loc_y = (":"):split(location_token)
jcallahan@113 1211 loc_level = tonumber(loc_level)
jcallahan@113 1212
jcallahan@113 1213 if map_level == loc_level and math.abs(x - loc_x) <= COORD_MAX and math.abs(y - loc_y) <= COORD_MAX then
jcallahan@113 1214 return
jcallahan@113 1215 end
jcallahan@113 1216 end
jcallahan@141 1217 zone_data[("%d:%d:%d"):format(map_level, x, y)] = true
jcallahan@2 1218 end
jcallahan@113 1219 end -- do-block
jcallahan@2 1220
jcallahan@118 1221
jcallahan@246 1222 -- EVENT HANDLERS -----------------------------------------------------
jcallahan@246 1223
jcallahan@90 1224 function WDP:BLACK_MARKET_ITEM_UPDATE(event_name)
jcallahan@243 1225 if not ALLOWED_LOCALES[CLIENT_LOCALE] then
jcallahan@243 1226 return
jcallahan@243 1227 end
jcallahan@282 1228 local num_items = _G.C_BlackMarket.GetNumItems() or 0
jcallahan@56 1229
jcallahan@56 1230 for index = 1, num_items do
jcallahan@56 1231 local name, texture, quantity, item_type, is_usable, level, level_type, seller_name, min_bid, min_increment, current_bid, has_high_bid, num_bids, time_left, item_link, market_id = _G.C_BlackMarket.GetItemInfoByIndex(index);
jcallahan@56 1232
jcallahan@56 1233 if item_link then
jcallahan@56 1234 DBEntry("items", ItemLinkToID(item_link)).black_market = seller_name or "UNKNOWN"
jcallahan@56 1235 end
jcallahan@56 1236 end
jcallahan@56 1237 end
jcallahan@56 1238
jcallahan@56 1239
jcallahan@298 1240 local function UpdateUnitPet(unit_guid, unit_id)
jcallahan@246 1241 local current_pet_guid = group_owner_guids_to_pet_guids[unit_guid]
jcallahan@246 1242
jcallahan@246 1243 if current_pet_guid then
jcallahan@246 1244 group_owner_guids_to_pet_guids[unit_guid] = nil
jcallahan@246 1245 group_pet_guids[current_pet_guid] = nil
jcallahan@246 1246 end
jcallahan@246 1247 local pet_guid = _G.UnitGUID(unit_id .. "pet")
jcallahan@246 1248
jcallahan@246 1249 if pet_guid then
jcallahan@296 1250 group_owner_guids_to_pet_guids[unit_guid] = pet_guid
jcallahan@246 1251 group_pet_guids[pet_guid] = true
jcallahan@246 1252 end
jcallahan@246 1253 end
jcallahan@246 1254
jcallahan@246 1255
jcallahan@298 1256 function WDP:GROUP_ROSTER_UPDATE(event_name)
jcallahan@298 1257 local is_raid = _G.IsInRaid()
jcallahan@298 1258 local unit_type = is_raid and "raid" or "party"
jcallahan@298 1259 local group_size = is_raid and _G.GetNumGroupMembers() or _G.GetNumSubgroupMembers()
jcallahan@298 1260
jcallahan@299 1261 table.wipe(group_member_guids)
jcallahan@298 1262
jcallahan@298 1263 for index = 1, group_size do
jcallahan@298 1264 local unit_id = unit_type .. index
jcallahan@298 1265 local unit_guid = _G.UnitGUID(unit_id)
jcallahan@298 1266
jcallahan@299 1267 group_member_guids[unit_guid] = true
jcallahan@298 1268 UpdateUnitPet(unit_guid, unit_id)
jcallahan@298 1269 end
jcallahan@299 1270 group_member_guids[PLAYER_GUID] = true
jcallahan@298 1271 end
jcallahan@298 1272
jcallahan@298 1273
jcallahan@298 1274 function WDP:UNIT_PET(event_name, unit_id)
jcallahan@298 1275 UpdateUnitPet(_G.UnitGUID(unit_id), unit_id)
jcallahan@298 1276 end
jcallahan@298 1277
jcallahan@298 1278
MMOSimca@355 1279 function WDP:SHOW_LOOT_TOAST(event_name, loot_type, item_link, quantity, specID, sex, isPersonal, lootSource)
jcallahan@312 1280 if not loot_type or (loot_type ~= "item" and loot_type ~= "money" and loot_type ~= "currency") then
jcallahan@306 1281 Debug("%s: loot_type is %s. Item link is %s, and quantity is %d.", event_name, loot_type, item_link, quantity)
jcallahan@306 1282 return
jcallahan@306 1283 end
jcallahan@301 1284 local container_id = private.loot_toast_container_id
MMOSimca@336 1285 local npc_id = private.raid_boss_id
MMOSimca@355 1286
MMOSimca@355 1287 -- Handle Garrison cache specially
MMOSimca@355 1288 if lootSource and last_garrison_cache_object_id and (lootSource == private.GARRISON_CACHE_LOOT_SOURCE_ID) then
MMOSimca@355 1289 -- Record location data for cache
MMOSimca@355 1290 UpdateDBEntryLocation("objects", ("OPENING:%d"):format(last_garrison_cache_object_id))
MMOSimca@355 1291
MMOSimca@355 1292 -- Add drop data
MMOSimca@355 1293 local currency_texture = CurrencyLinkToTexture(item_link)
MMOSimca@355 1294 if currency_texture and currency_texture ~= "" then
MMOSimca@355 1295 -- Check for top level object data
MMOSimca@355 1296 local object_entry = DBEntry("objects", ("OPENING:%d"):format(last_garrison_cache_object_id))
MMOSimca@355 1297 local difficulty_token = InstanceDifficultyToken()
MMOSimca@355 1298 if object_entry[difficulty_token] then
MMOSimca@355 1299 -- Increment loot count
MMOSimca@355 1300 object_entry[difficulty_token]["opening_count"] = (object_entry[difficulty_token]["opening_count"] or 0) + 1
MMOSimca@355 1301
MMOSimca@355 1302 Debug("%s: %s X %d", event_name, currency_texture, quantity)
MMOSimca@355 1303 object_entry[difficulty_token]["opening"] = object_entry[difficulty_token]["opening"] or {}
MMOSimca@355 1304 table.insert(object_entry[difficulty_token]["opening"], ("currency:%d:%s"):format(quantity, currency_texture))
MMOSimca@355 1305 else
MMOSimca@355 1306 Debug("%s: When handling the Garrison cache, the top level loot data was missing for objectID %d.", event_name, last_garrison_cache_object_id)
MMOSimca@355 1307 end
MMOSimca@355 1308 else
MMOSimca@355 1309 Debug("%s: Currency texture is nil, from currency link %s", event_name, item_link)
MMOSimca@355 1310 end
MMOSimca@355 1311 elseif npc_id then
MMOSimca@336 1312 -- Slightly messy hack to workaround duplicate world bosses
jcallahan@317 1313 local upper_limit = 0
jcallahan@317 1314 if DUPLICATE_WORLD_BOSS_IDS[npc_id] then
jcallahan@317 1315 upper_limit = #DUPLICATE_WORLD_BOSS_IDS[npc_id]
jcallahan@317 1316 end
jcallahan@317 1317 for i = 0, upper_limit do
jcallahan@317 1318 local temp_npc_id = npc_id
jcallahan@317 1319
jcallahan@317 1320 if i > 0 then
jcallahan@317 1321 temp_npc_id = DUPLICATE_WORLD_BOSS_IDS[npc_id][i]
jcallahan@312 1322 end
jcallahan@317 1323
jcallahan@317 1324 local npc = NPCEntry(temp_npc_id)
jcallahan@317 1325 if npc then
jcallahan@317 1326 local loot_label = "drops"
jcallahan@317 1327 local encounter_data = npc:EncounterData(InstanceDifficultyToken())
jcallahan@317 1328 encounter_data[loot_label] = encounter_data[loot_label] or {}
jcallahan@317 1329 encounter_data.loot_counts = encounter_data.loot_counts or {}
jcallahan@317 1330
jcallahan@317 1331 if loot_type == "item" then
jcallahan@317 1332 local item_id = ItemLinkToID(item_link)
jcallahan@317 1333 if item_id then
jcallahan@317 1334 Debug("%s: %s X %d (%d)", event_name, item_link, quantity, item_id)
MMOSimca@340 1335 RecordItemData(item_id, item_link, true)
jcallahan@317 1336 table.insert(encounter_data[loot_label], ("%d:%d"):format(item_id, quantity))
jcallahan@317 1337 else
jcallahan@317 1338 Debug("%s: ItemID is nil, from item link %s", event_name, item_link)
jcallahan@317 1339 return
jcallahan@317 1340 end
jcallahan@317 1341 elseif loot_type == "money" then
jcallahan@317 1342 Debug("%s: money X %d", event_name, quantity)
jcallahan@317 1343 table.insert(encounter_data[loot_label], ("money:%d"):format(quantity))
jcallahan@317 1344 elseif loot_type == "currency" then
jcallahan@317 1345 local currency_texture = CurrencyLinkToTexture(item_link)
jcallahan@317 1346 if currency_texture and currency_texture ~= "" then
jcallahan@317 1347 Debug("%s: %s X %d", event_name, currency_texture, quantity)
jcallahan@317 1348 table.insert(encounter_data[loot_label], ("currency:%d:%s"):format(quantity, currency_texture))
jcallahan@317 1349 else
jcallahan@317 1350 Debug("%s: Currency texture is nil, from currency link %s", event_name, item_link)
jcallahan@317 1351 return
jcallahan@317 1352 end
jcallahan@317 1353 end
jcallahan@317 1354
jcallahan@317 1355 if not boss_loot_toasting[temp_npc_id] then
jcallahan@317 1356 encounter_data.loot_counts[loot_label] = (encounter_data.loot_counts[loot_label] or 0) + 1
jcallahan@317 1357 boss_loot_toasting[temp_npc_id] = true -- Do not count further loots until timer expires or another boss is killed
jcallahan@317 1358 end
jcallahan@312 1359 end
jcallahan@312 1360 end
jcallahan@301 1361 elseif container_id then
jcallahan@305 1362 InitializeCurrentLoot()
jcallahan@305 1363
jcallahan@306 1364 -- Fake the loot characteristics to match that of an actual container item
jcallahan@306 1365 current_loot.identifier = container_id
jcallahan@306 1366 current_loot.label = "contains"
jcallahan@306 1367 current_loot.target_type = AF.ITEM
jcallahan@306 1368
jcallahan@312 1369 current_loot.sources[container_id] = current_loot.sources[container_id] or {}
jcallahan@312 1370
jcallahan@301 1371 if loot_type == "item" then
jcallahan@312 1372 local item_id = ItemLinkToID(item_link)
jcallahan@312 1373 if item_id then
jcallahan@312 1374 Debug("%s: %s X %d (%d)", event_name, item_link, quantity, item_id)
MMOSimca@340 1375 RecordItemData(item_id, item_link, true)
MMOSimca@367 1376 current_loot.sources[container_id][item_id] = (current_loot.sources[container_id][item_id] or 0) + quantity
jcallahan@312 1377 else
jcallahan@301 1378 Debug("%s: ItemID is nil, from item link %s", event_name, item_link)
jcallahan@312 1379 current_loot = nil
jcallahan@301 1380 return
jcallahan@301 1381 end
jcallahan@301 1382 elseif loot_type == "money" then
jcallahan@312 1383 Debug("%s: money X %d", event_name, quantity)
MMOSimca@367 1384 current_loot.sources[container_id]["money"] = (current_loot.sources[container_id]["money"] or 0) + quantity
jcallahan@312 1385 elseif loot_type == "currency" then
jcallahan@312 1386 local currency_texture = CurrencyLinkToTexture(item_link)
jcallahan@312 1387 if currency_texture and currency_texture ~= "" then
jcallahan@312 1388 Debug("%s: %s X %d", event_name, currency_texture, quantity)
jcallahan@312 1389 local currency_token = ("currency:%s"):format(currency_texture)
MMOSimca@367 1390 current_loot.sources[container_id][currency_token] = (current_loot.sources[container_id][currency_token] or 0) + quantity
jcallahan@312 1391 else
jcallahan@312 1392 Debug("%s: Currency texture is nil, from currency link %s", event_name, item_link)
jcallahan@312 1393 current_loot = nil
jcallahan@312 1394 return
jcallahan@312 1395 end
jcallahan@301 1396 end
jcallahan@312 1397
jcallahan@301 1398 GenericLootUpdate("items")
jcallahan@301 1399 current_loot = nil
jcallahan@307 1400 private.container_loot_toasting = true -- Do not count further loots until timer expires or another container is opened
jcallahan@301 1401 else
jcallahan@307 1402 Debug("%s: NPC and Container are nil, storing loot toast data for 5 seconds.", event_name)
jcallahan@307 1403
jcallahan@307 1404 loot_toast_data = loot_toast_data or {}
jcallahan@312 1405 loot_toast_data[#loot_toast_data + 1] = { loot_type, item_link, quantity }
jcallahan@307 1406
MMOSimca@340 1407 local item_id = ItemLinkToID(item_link)
MMOSimca@340 1408 if item_id then
MMOSimca@340 1409 RecordItemData(item_id, item_link, true)
MMOSimca@340 1410 end
MMOSimca@340 1411
jcallahan@307 1412 loot_toast_data_timer_handle = WDP:ScheduleTimer(ClearLootToastData, 5)
jcallahan@178 1413 end
jcallahan@178 1414 end
jcallahan@178 1415
jcallahan@178 1416
jcallahan@179 1417 do
jcallahan@179 1418 local CHAT_MSG_LOOT_UPDATE_FUNCS = {
MMOSimca@347 1419 [AF.ITEM] = function(item_id, quantity)
MMOSimca@349 1420 local container_id = current_loot.identifier -- For faster access, since this is going to be called 9 times in the next 3 lines
MMOSimca@347 1421 -- Verify that we're still assigning data to the right items
MMOSimca@349 1422 if container_id and (container_id == BAG_OF_SALVAGE_ITEM_ID or container_id == CRATE_OF_SALVAGE_ITEM_ID or container_id == BIG_CRATE_OF_SALVAGE_ITEM_ID) then
MMOSimca@347 1423 Debug("CHAT_MSG_LOOT: AF.ITEM %d (%d)", item_id, quantity)
MMOSimca@347 1424 current_loot.sources[container_id] = current_loot.sources[container_id] or {}
MMOSimca@353 1425 current_loot.sources[container_id][item_id] = (current_loot.sources[container_id][item_id] or 0) + quantity
MMOSimca@347 1426 else -- If not, cancel the timer and wipe the loot table early
MMOSimca@347 1427 Debug("CHAT_MSG_LOOT: We would have assigned the wrong loot to salvage crates!")
MMOSimca@349 1428 ClearTimeBasedLootData()
MMOSimca@347 1429 end
MMOSimca@347 1430 end,
jcallahan@179 1431 [AF.NPC] = function(item_id, quantity)
MMOSimca@345 1432 Debug("CHAT_MSG_LOOT: AF.NPC %d (%d)", item_id, quantity)
MMOSimca@345 1433 end,
MMOSimca@345 1434 [AF.OBJECT] = function(item_id, quantity)
MMOSimca@345 1435 Debug("CHAT_MSG_LOOT: AF.OBJECT %d (%d)", item_id, quantity)
MMOSimca@351 1436 --for timber_variant = 1, #private.LOGGING_SPELL_ID_TO_OBJECT_ID_MAP[last_timber_spell_id] do
MMOSimca@345 1437 -- Check for top level object data
MMOSimca@351 1438 local object_entry = DBEntry("objects", ("OPENING:%s"):format(private.LOGGING_SPELL_ID_TO_OBJECT_ID_MAP[last_timber_spell_id]))
MMOSimca@345 1439 local difficulty_token = InstanceDifficultyToken()
MMOSimca@345 1440 if object_entry[difficulty_token] then
MMOSimca@345 1441 -- Increment loot count
MMOSimca@353 1442 object_entry[difficulty_token]["opening_count"] = (object_entry[difficulty_token]["opening_count"] or 0) + 1
MMOSimca@348 1443
MMOSimca@345 1444 -- Add drop data
MMOSimca@351 1445 object_entry[difficulty_token]["opening"] = object_entry[difficulty_token]["opening"] or {}
MMOSimca@348 1446 table.insert(object_entry[difficulty_token]["opening"], ("%d:%d"):format(item_id, quantity))
MMOSimca@345 1447 else
MMOSimca@351 1448 Debug("CHAT_MSG_LOOT: When handling timber, the top level loot data was missing for objectID %s.", private.LOGGING_SPELL_ID_TO_OBJECT_ID_MAP[last_timber_spell_id])
MMOSimca@345 1449 end
MMOSimca@351 1450 --end
jcallahan@179 1451 end,
jcallahan@179 1452 [AF.ZONE] = function(item_id, quantity)
MMOSimca@345 1453 Debug("CHAT_MSG_LOOT: AF.ZONE %d (%d)", item_id, quantity)
jcallahan@312 1454 InitializeCurrentLoot()
jcallahan@312 1455 current_loot.list[1] = ("%d:%d"):format(item_id, quantity)
jcallahan@179 1456 GenericLootUpdate("zones")
jcallahan@312 1457 current_loot = nil
jcallahan@179 1458 end,
jcallahan@179 1459 }
jcallahan@177 1460
jcallahan@177 1461
jcallahan@179 1462 function WDP:CHAT_MSG_LOOT(event_name, message)
jcallahan@179 1463 local category
jcallahan@177 1464
MMOSimca@345 1465 local item_link, quantity = deformat(message, _G.LOOT_ITEM_PUSHED_SELF_MULTIPLE)
MMOSimca@345 1466 if not item_link then
MMOSimca@345 1467 quantity, item_link = 1, deformat(message, _G.LOOT_ITEM_PUSHED_SELF)
MMOSimca@345 1468 end
MMOSimca@345 1469 local item_id = ItemLinkToID(item_link)
MMOSimca@345 1470
MMOSimca@345 1471 if not item_id then
MMOSimca@345 1472 return
MMOSimca@345 1473 end
MMOSimca@345 1474
MMOSimca@345 1475 -- Set update category
MMOSimca@345 1476 if last_timber_spell_id and item_id == TIMBER_ITEM_ID then
MMOSimca@345 1477 category = AF.OBJECT
MMOSimca@345 1478 -- Recently changed from ~= "EXTRACT_GAS" because of some occassional bad data, and, as far as I know, no benefit.
MMOSimca@345 1479 elseif current_action.spell_label == "FISHING" then
jcallahan@179 1480 category = AF.ZONE
MMOSimca@336 1481 elseif private.raid_boss_id then
jcallahan@179 1482 category = AF.NPC
MMOSimca@347 1483 elseif chat_loot_timer_handle then
MMOSimca@347 1484 category = AF.ITEM
jcallahan@179 1485 end
MMOSimca@345 1486
MMOSimca@345 1487 -- Take action based on update category
jcallahan@179 1488 local update_func = CHAT_MSG_LOOT_UPDATE_FUNCS[category]
MMOSimca@340 1489 if not category or not update_func then
MMOSimca@340 1490 -- We still want to record the item's data, even if it doesn't need its drop location recorded
MMOSimca@340 1491 RecordItemData(item_id, item_link, true)
MMOSimca@340 1492 return
MMOSimca@340 1493 end
jcallahan@179 1494 update_func(item_id, quantity)
jcallahan@177 1495 end
jcallahan@48 1496 end
jcallahan@48 1497
jcallahan@312 1498
jcallahan@97 1499 function WDP:RecordQuote(event_name, message, source_name, language_name)
jcallahan@112 1500 if not ALLOWED_LOCALES[CLIENT_LOCALE] or not source_name or not name_to_id_map[source_name] or (language_name ~= "" and not languages_known[language_name]) then
jcallahan@97 1501 return
jcallahan@95 1502 end
jcallahan@97 1503 local npc = NPCEntry(name_to_id_map[source_name])
jcallahan@97 1504 npc.quotes = npc.quotes or {}
jcallahan@97 1505 npc.quotes[event_name] = npc.quotes[event_name] or {}
jcallahan@97 1506 npc.quotes[event_name][ReplaceKeywords(message)] = true
jcallahan@97 1507 end
jcallahan@95 1508
jcallahan@95 1509
jcallahan@95 1510 do
jcallahan@40 1511 local SOBER_MATCH = _G.DRUNK_MESSAGE_ITEM_SELF1:gsub("%%s", ".+")
jcallahan@40 1512
jcallahan@40 1513 local DRUNK_COMPARES = {
jcallahan@40 1514 _G.DRUNK_MESSAGE_SELF2,
jcallahan@40 1515 _G.DRUNK_MESSAGE_SELF3,
jcallahan@40 1516 _G.DRUNK_MESSAGE_SELF4,
jcallahan@40 1517 }
jcallahan@40 1518
jcallahan@40 1519 local DRUNK_MATCHES = {
jcallahan@254 1520 (_G.DRUNK_MESSAGE_SELF2:gsub("%%s", ".+")),
jcallahan@254 1521 (_G.DRUNK_MESSAGE_SELF3:gsub("%%s", ".+")),
jcallahan@254 1522 (_G.DRUNK_MESSAGE_SELF4:gsub("%%s", ".+")),
jcallahan@40 1523 }
jcallahan@40 1524
jcallahan@167 1525 local RECIPE_MATCH = _G.ERR_LEARN_RECIPE_S:gsub("%%s", "(.*)")
jcallahan@167 1526
jcallahan@167 1527
jcallahan@167 1528 local function RecordDiscovery(tradeskill_name, tradeskill_index)
jcallahan@167 1529 if tradeskill_name == private.discovered_recipe_name then
jcallahan@167 1530 DBEntry("spells", tonumber(_G.GetTradeSkillRecipeLink(tradeskill_index):match("^|c%x%x%x%x%x%x%x%x|H%w+:(%d+)"))).discovery = ("%d:%d"):format(private.previous_spell_id, private.profession_level)
jcallahan@167 1531
jcallahan@167 1532 private.discovered_recipe_name = nil
jcallahan@167 1533 private.profession_level = nil
jcallahan@167 1534 private.previous_spell_id = nil
jcallahan@169 1535
jcallahan@169 1536 return true
jcallahan@167 1537 end
jcallahan@167 1538 end
jcallahan@167 1539
jcallahan@167 1540
jcallahan@167 1541 local function IterativeRecordDiscovery()
jcallahan@167 1542 TradeSkillExecutePer(RecordDiscovery)
jcallahan@167 1543 end
jcallahan@167 1544
jcallahan@167 1545
jcallahan@92 1546 function WDP:CHAT_MSG_SYSTEM(event_name, message)
jcallahan@167 1547 if not private.trainer_shown then
jcallahan@167 1548 local recipe_name = message:match(RECIPE_MATCH)
jcallahan@167 1549
jcallahan@167 1550 if recipe_name and private.previous_spell_id then
jcallahan@167 1551 local profession_name, prof_level = _G.GetTradeSkillLine()
jcallahan@167 1552
jcallahan@167 1553 if profession_name == _G.UNKNOWN then
jcallahan@167 1554 return
jcallahan@167 1555 end
jcallahan@167 1556 private.discovered_recipe_name = recipe_name
jcallahan@167 1557 private.profession_level = prof_level
jcallahan@167 1558
jcallahan@167 1559 self:ScheduleTimer(IterativeRecordDiscovery, 0.2)
jcallahan@167 1560 end
jcallahan@167 1561 end
jcallahan@167 1562
jcallahan@40 1563 if currently_drunk then
jcallahan@40 1564 if message == _G.DRUNK_MESSAGE_SELF1 or message:match(SOBER_MATCH) then
jcallahan@40 1565 currently_drunk = nil
jcallahan@40 1566 end
jcallahan@40 1567 return
jcallahan@40 1568 end
jcallahan@40 1569
jcallahan@40 1570 for index = 1, #DRUNK_MATCHES do
jcallahan@40 1571 if message == DRUNK_COMPARES[index] or message:match(DRUNK_MATCHES[index]) then
jcallahan@40 1572 currently_drunk = true
jcallahan@40 1573 break
jcallahan@40 1574 end
jcallahan@40 1575 end
jcallahan@40 1576 end
jcallahan@40 1577 end
jcallahan@40 1578
jcallahan@307 1579
jcallahan@331 1580 do
jcallahan@23 1581 local FLAGS_NPC = bit.bor(_G.COMBATLOG_OBJECT_TYPE_GUARDIAN, _G.COMBATLOG_OBJECT_CONTROL_NPC)
jcallahan@23 1582 local FLAGS_NPC_CONTROL = bit.bor(_G.COMBATLOG_OBJECT_AFFILIATION_OUTSIDER, _G.COMBATLOG_OBJECT_CONTROL_NPC)
jcallahan@23 1583
jcallahan@23 1584 local function RecordNPCSpell(sub_event, source_guid, source_name, source_flags, dest_guid, dest_name, dest_flags, spell_id, spell_name)
MMOSimca@336 1585 if not spell_id or spell_id == CHI_WAVE_SPELL_ID or spell_id == DISGUISE_SPELL_ID then
jcallahan@23 1586 return
jcallahan@23 1587 end
jcallahan@34 1588 local source_type, source_id = ParseGUID(source_guid)
jcallahan@23 1589
jcallahan@171 1590 if not source_id or not UnitTypeIsNPC(source_type) then
jcallahan@23 1591 return
jcallahan@23 1592 end
jcallahan@23 1593
jcallahan@23 1594 if bit.band(FLAGS_NPC_CONTROL, source_flags) == FLAGS_NPC_CONTROL and bit.band(FLAGS_NPC, source_flags) ~= 0 then
jcallahan@248 1595 local encounter_data = NPCEntry(source_id):EncounterData(InstanceDifficultyToken())
jcallahan@28 1596 encounter_data.spells = encounter_data.spells or {}
jcallahan@28 1597 encounter_data.spells[spell_id] = (encounter_data.spells[spell_id] or 0) + 1
jcallahan@23 1598 end
jcallahan@23 1599 end
jcallahan@23 1600
jcallahan@115 1601 local HEAL_BATTLE_PETS_SPELL_ID = 125801
jcallahan@115 1602
jcallahan@246 1603 local previous_combat_event = {}
jcallahan@246 1604
jcallahan@23 1605 local COMBAT_LOG_FUNCS = {
jcallahan@23 1606 SPELL_AURA_APPLIED = RecordNPCSpell,
jcallahan@23 1607 SPELL_CAST_START = RecordNPCSpell,
jcallahan@115 1608 SPELL_CAST_SUCCESS = function(sub_event, source_guid, source_name, source_flags, dest_guid, dest_name, dest_flags, spell_id, spell_name)
jcallahan@115 1609 if spell_id == HEAL_BATTLE_PETS_SPELL_ID then
jcallahan@115 1610 local unit_type, unit_idnum = ParseGUID(source_guid)
jcallahan@115 1611
jcallahan@171 1612 if unit_idnum and UnitTypeIsNPC(unit_type) then
jcallahan@115 1613 NPCEntry(unit_idnum).stable_master = true
jcallahan@115 1614 end
jcallahan@115 1615 end
jcallahan@115 1616 RecordNPCSpell(sub_event, source_guid, source_name, source_flags, dest_guid, dest_name, dest_flags, spell_id, spell_name)
jcallahan@115 1617 end,
jcallahan@65 1618 UNIT_DIED = function(sub_event, source_guid, source_name, source_flags, dest_guid, dest_name, dest_flags, spell_id, spell_name)
jcallahan@65 1619 local unit_type, unit_idnum = ParseGUID(dest_guid)
jcallahan@65 1620
jcallahan@171 1621 if not unit_idnum or not UnitTypeIsNPC(unit_type) then
jcallahan@245 1622 Debug("%s: %s is not an NPC, or has no ID.", sub_event, dest_name or _G.UNKNOWN)
jcallahan@177 1623 ClearKilledNPC()
jcallahan@98 1624 private.harvesting = nil
jcallahan@65 1625 return
jcallahan@65 1626 end
jcallahan@177 1627
jcallahan@246 1628 if source_guid == "" then
jcallahan@246 1629 source_guid = nil
jcallahan@246 1630 end
jcallahan@246 1631 local killer_guid = source_guid or previous_combat_event.source_guid
jcallahan@246 1632 local killer_name = source_name or previous_combat_event.source_name
jcallahan@246 1633
jcallahan@299 1634 if not previous_combat_event.party_damage then
jcallahan@312 1635 --Debug("%s: %s was killed by %s (not group member or pet).", sub_event, dest_name or _G.UNKNOWN, killer_name or _G.UNKNOWN) -- broken in Patch 5.4
jcallahan@299 1636 table.wipe(previous_combat_event)
jcallahan@217 1637 ClearKilledNPC()
jcallahan@306 1638 else
jcallahan@317 1639 --Debug("%s: %s was killed by %s.", sub_event, dest_name or _G.UNKNOWN, killer_name or _G.UNKNOWN) -- broken in Patch 5.4
jcallahan@177 1640 end
jcallahan@177 1641 killed_npc_id = unit_idnum
jcallahan@177 1642 WDP:ScheduleTimer(ClearKilledNPC, 0.1)
jcallahan@65 1643 end,
jcallahan@23 1644 }
jcallahan@23 1645
jcallahan@23 1646
jcallahan@246 1647 local NON_DAMAGE_EVENTS = {
jcallahan@246 1648 SPELL_AURA_APPLIED = true,
jcallahan@246 1649 SPELL_AURA_REMOVED = true,
jcallahan@246 1650 SPELL_AURA_REMOVED_DOSE = true,
jcallahan@246 1651 SPELL_CAST_FAILED = true,
jcallahan@246 1652 SWING_MISSED = true,
jcallahan@246 1653 }
jcallahan@246 1654
jcallahan@299 1655 local DAMAGE_EVENTS = {
jcallahan@299 1656 RANGE_DAMAGE = true,
jcallahan@299 1657 SPELL_BUILDING_DAMAGE = true,
jcallahan@299 1658 SPELL_DAMAGE = true,
jcallahan@299 1659 SPELL_PERIODIC_DAMAGE = true,
jcallahan@299 1660 SWING_DAMAGE = true,
jcallahan@299 1661 }
jcallahan@299 1662
jcallahan@246 1663
jcallahan@92 1664 function WDP:COMBAT_LOG_EVENT_UNFILTERED(event_name, time_stamp, sub_event, hide_caster, source_guid, source_name, source_flags, source_raid_flags, dest_guid, dest_name, dest_flags, dest_raid_flags, ...)
jcallahan@23 1665 local combat_log_func = COMBAT_LOG_FUNCS[sub_event]
jcallahan@23 1666
jcallahan@23 1667 if not combat_log_func then
jcallahan@299 1668 if DAMAGE_EVENTS[sub_event] then
jcallahan@299 1669 table.wipe(previous_combat_event)
jcallahan@246 1670 previous_combat_event.source_name = source_name
jcallahan@299 1671
jcallahan@299 1672 if source_guid ~= dest_guid and (in_instance or group_member_guids[source_guid] or group_pet_guids[source_guid]) then
jcallahan@299 1673 previous_combat_event.party_damage = true
jcallahan@299 1674 end
jcallahan@246 1675 end
jcallahan@23 1676 return
jcallahan@23 1677 end
jcallahan@23 1678 combat_log_func(sub_event, source_guid, source_name, source_flags, dest_guid, dest_name, dest_flags, ...)
jcallahan@297 1679
jcallahan@297 1680 if NON_DAMAGE_EVENTS[sub_event] then
jcallahan@297 1681 table.wipe(previous_combat_event)
jcallahan@297 1682 end
jcallahan@23 1683 end
jcallahan@23 1684
MMOSimca@337 1685
jcallahan@44 1686 local DIPLOMACY_SPELL_ID = 20599
jcallahan@44 1687 local MR_POP_RANK1_SPELL_ID = 78634
jcallahan@44 1688 local MR_POP_RANK2_SPELL_ID = 78635
MMOSimca@340 1689 local FACTION_DATA = private.FACTION_DATA
MMOSimca@337 1690 local REP_BUFFS = private.REP_BUFFS
jcallahan@44 1691
jcallahan@44 1692
jcallahan@92 1693 function WDP:COMBAT_TEXT_UPDATE(event_name, message_type, faction_name, amount)
jcallahan@177 1694 if message_type ~= "FACTION" or not killed_npc_id then
jcallahan@44 1695 return
jcallahan@44 1696 end
jcallahan@44 1697 UpdateFactionData()
jcallahan@44 1698
jcallahan@46 1699 if not faction_name or not faction_standings[faction_name] then
jcallahan@46 1700 return
jcallahan@46 1701 end
jcallahan@177 1702 local npc = NPCEntry(killed_npc_id)
jcallahan@177 1703 ClearKilledNPC()
jcallahan@46 1704
jcallahan@44 1705 if not npc then
jcallahan@98 1706 private.harvesting = nil
jcallahan@44 1707 return
jcallahan@44 1708 end
jcallahan@98 1709 npc.harvested = private.harvesting
jcallahan@98 1710 private.harvesting = nil
jcallahan@98 1711
jcallahan@44 1712 local modifier = 1
jcallahan@44 1713
MMOSimca@340 1714 -- Check for modifiers from known spells
jcallahan@44 1715 if _G.IsSpellKnown(DIPLOMACY_SPELL_ID) then
jcallahan@44 1716 modifier = modifier + 0.1
jcallahan@44 1717 end
jcallahan@44 1718 if _G.IsSpellKnown(MR_POP_RANK2_SPELL_ID) then
jcallahan@44 1719 modifier = modifier + 0.1
jcallahan@44 1720 elseif _G.IsSpellKnown(MR_POP_RANK1_SPELL_ID) then
jcallahan@44 1721 modifier = modifier + 0.05
jcallahan@44 1722 end
jcallahan@44 1723
MMOSimca@340 1724 -- Determine faction ID
MMOSimca@340 1725 local faction_ID
MMOSimca@340 1726 for pseudo_faction_name, faction_data_table in pairs(FACTION_DATA) do
MMOSimca@340 1727 if faction_name == faction_data_table[2] then
MMOSimca@340 1728 faction_ID = faction_data_table[1]
MMOSimca@340 1729 end
MMOSimca@340 1730 end
MMOSimca@340 1731 if faction_ID and faction_ID > 0 then
MMOSimca@340 1732 -- Check for modifiers from Commendations (applied directly to the faction, account-wide)
MMOSimca@340 1733 local _, _, _, _, _, _, _, _, _, _, _, _, _, _, has_bonus_rep_gain = GetFactionInfoByID(faction_ID)
MMOSimca@340 1734 if has_bonus_rep_gain then
MMOSimca@340 1735 modifier = modifier + 1
MMOSimca@340 1736 end
MMOSimca@340 1737 end
MMOSimca@340 1738
MMOSimca@340 1739 -- Check for modifiers from buffs
MMOSimca@340 1740 for buff_name, buff_data_table in pairs(REP_BUFFS) do
jcallahan@44 1741 if _G.UnitBuff("player", buff_name) then
MMOSimca@340 1742 local modded_faction = buff_data_table.faction
jcallahan@44 1743
jcallahan@44 1744 if not modded_faction or faction_name == modded_faction then
MMOSimca@340 1745 if buff_data_table.ignore then
MMOSimca@340 1746 -- Some buffs from tabards convert all rep of other factions into rep for a specific faction.
MMOSimca@340 1747 -- We can't know what faction the rep was orginally from, so we must ignore the data entirely in these cases.
MMOSimca@340 1748 return
MMOSimca@340 1749 else
MMOSimca@340 1750 modifier = modifier + buff_data_table.modifier
MMOSimca@340 1751 end
jcallahan@44 1752 end
jcallahan@44 1753 end
jcallahan@44 1754 end
MMOSimca@340 1755
jcallahan@65 1756 npc.reputations = npc.reputations or {}
jcallahan@65 1757 npc.reputations[("%s:%s"):format(faction_name, faction_standings[faction_name])] = math.floor(amount / modifier)
jcallahan@32 1758 end
jcallahan@44 1759 end -- do-block
jcallahan@18 1760
jcallahan@18 1761
jcallahan@140 1762 function WDP:CURSOR_UPDATE(event_name)
MMOSimca@355 1763 if current_action.fishing_target or _G.Minimap:IsMouseOver() then
jcallahan@140 1764 return
jcallahan@140 1765 end
jcallahan@140 1766 local text = _G["GameTooltipTextLeft1"]:GetText()
jcallahan@140 1767
MMOSimca@355 1768 -- Handle Fishing
MMOSimca@355 1769 if (current_action.spell_label == "FISHING") then
MMOSimca@355 1770 if not text or text == "Fishing Bobber" then
MMOSimca@355 1771 text = "NONE"
MMOSimca@355 1772 else
MMOSimca@355 1773 current_action.fishing_target = true
MMOSimca@355 1774 end
MMOSimca@355 1775 current_action.identifier = ("%s:%s"):format(current_action.spell_label, text)
MMOSimca@355 1776 -- Handle Garrison Cache
MMOSimca@355 1777 elseif private.GARRISON_CACHE_OBJECT_NAME_TO_OBJECT_ID_MAP[text] then
MMOSimca@355 1778 last_garrison_cache_object_id = private.GARRISON_CACHE_OBJECT_NAME_TO_OBJECT_ID_MAP[text]
jcallahan@140 1779 end
jcallahan@140 1780 end
jcallahan@140 1781
jcallahan@140 1782
jcallahan@92 1783 function WDP:ITEM_TEXT_BEGIN(event_name)
jcallahan@42 1784 local unit_type, unit_idnum = ParseGUID(_G.UnitGUID("npc"))
jcallahan@42 1785
jcallahan@42 1786 if not unit_idnum or unit_type ~= private.UNIT_TYPES.OBJECT or _G.UnitName("npc") ~= _G.ItemTextGetItem() then
jcallahan@42 1787 return
jcallahan@42 1788 end
jcallahan@42 1789 UpdateDBEntryLocation("objects", unit_idnum)
jcallahan@42 1790 end
jcallahan@42 1791
jcallahan@42 1792
jcallahan@13 1793 do
MMOSimca@343 1794 local LOOT_OPENED_VERIFY_FUNCS = {
jcallahan@324 1795 -- Item containers can be AOE-looted in Patch 5.4.2 if the user clicks fast enough, but this verification still works as long as they both have loot.
jcallahan@16 1796 [AF.ITEM] = function()
jcallahan@16 1797 local locked_item_id
jcallahan@16 1798
jcallahan@16 1799 for bag_index = 0, _G.NUM_BAG_FRAMES do
jcallahan@16 1800 for slot_index = 1, _G.GetContainerNumSlots(bag_index) do
jcallahan@324 1801 local _, _, is_locked, _, _, is_lootable = _G.GetContainerItemInfo(bag_index, slot_index)
jcallahan@324 1802
jcallahan@324 1803 if is_locked and is_lootable then
jcallahan@16 1804 locked_item_id = ItemLinkToID(_G.GetContainerItemLink(bag_index, slot_index))
jcallahan@165 1805 break
jcallahan@16 1806 end
jcallahan@16 1807 end
jcallahan@165 1808
jcallahan@165 1809 if locked_item_id then
jcallahan@165 1810 break
jcallahan@165 1811 end
jcallahan@16 1812 end
jcallahan@16 1813
MMOSimca@367 1814 if (not current_action.spell_label == "DISENCHANT") and (not locked_item_id or (current_action.identifier and current_action.identifier ~= locked_item_id)) then
jcallahan@16 1815 return false
jcallahan@16 1816 end
jcallahan@122 1817 current_action.identifier = locked_item_id
jcallahan@16 1818 return true
jcallahan@16 1819 end,
jcallahan@322 1820 [AF.NPC] = true,
jcallahan@14 1821 [AF.OBJECT] = true,
jcallahan@17 1822 [AF.ZONE] = function()
jcallahan@140 1823 current_action.zone_data = UpdateDBEntryLocation("zones", current_action.identifier)
jcallahan@210 1824 return _G.IsFishingLoot()
jcallahan@17 1825 end,
jcallahan@13 1826 }
jcallahan@13 1827
jcallahan@13 1828
MMOSimca@343 1829 local LOOT_OPENED_UPDATE_FUNCS = {
jcallahan@16 1830 [AF.ITEM] = function()
jcallahan@28 1831 GenericLootUpdate("items")
jcallahan@28 1832 end,
jcallahan@28 1833 [AF.NPC] = function()
jcallahan@75 1834 local difficulty_token = InstanceDifficultyToken()
jcallahan@312 1835 local loot_label = current_loot.label
jcallahan@77 1836 local source_list = {}
jcallahan@75 1837
jcallahan@131 1838 for source_guid, loot_data in pairs(current_loot.sources) do
jcallahan@331 1839 local _, source_id = ParseGUID(source_guid)
jcallahan@75 1840 local npc = NPCEntry(source_id)
jcallahan@75 1841
jcallahan@75 1842 if npc then
jcallahan@248 1843 local encounter_data = npc:EncounterData(difficulty_token)
jcallahan@312 1844 encounter_data[loot_label] = encounter_data[loot_label] or {}
jcallahan@75 1845
jcallahan@78 1846 if not source_list[source_guid] then
jcallahan@77 1847 encounter_data.loot_counts = encounter_data.loot_counts or {}
jcallahan@312 1848 encounter_data.loot_counts[loot_label] = (encounter_data.loot_counts[loot_label] or 0) + 1
jcallahan@312 1849 source_list[source_guid] = true
jcallahan@77 1850 end
jcallahan@77 1851
jcallahan@309 1852 for loot_token, quantity in pairs(loot_data) do
jcallahan@312 1853 local loot_type, currency_texture = (":"):split(loot_token)
jcallahan@312 1854
jcallahan@312 1855 if loot_type == "currency" and currency_texture then
jcallahan@312 1856 table.insert(encounter_data[loot_label], ("currency:%d:%s"):format(quantity, currency_texture))
jcallahan@309 1857 elseif loot_token == "money" then
jcallahan@312 1858 table.insert(encounter_data[loot_label], ("money:%d"):format(quantity))
jcallahan@309 1859 else
jcallahan@312 1860 table.insert(encounter_data[loot_label], ("%d:%d"):format(loot_token, quantity))
jcallahan@309 1861 end
jcallahan@75 1862 end
jcallahan@75 1863 end
jcallahan@75 1864 end
jcallahan@16 1865 end,
jcallahan@13 1866 [AF.OBJECT] = function()
jcallahan@28 1867 GenericLootUpdate("objects", InstanceDifficultyToken())
jcallahan@17 1868 end,
jcallahan@17 1869 [AF.ZONE] = function()
MMOSimca@328 1870 if not (current_loot.map_level and current_loot.x and current_loot.y and current_loot.zone_data) then
MMOSimca@328 1871 return
MMOSimca@328 1872 end
jcallahan@141 1873 local location_token = ("%d:%d:%d"):format(current_loot.map_level, current_loot.x, current_loot.y)
jcallahan@41 1874
jcallahan@41 1875 -- This will start life as a boolean true.
jcallahan@131 1876 if _G.type(current_loot.zone_data[location_token]) ~= "table" then
jcallahan@131 1877 current_loot.zone_data[location_token] = {
jcallahan@41 1878 drops = {}
jcallahan@41 1879 }
jcallahan@41 1880 end
jcallahan@132 1881 local loot_count = ("%s_count"):format(current_loot.label)
jcallahan@131 1882 current_loot.zone_data[location_token][loot_count] = (current_loot.zone_data[location_token][loot_count] or 0) + 1
jcallahan@41 1883
jcallahan@131 1884 if current_loot.sources then
jcallahan@131 1885 for source_guid, loot_data in pairs(current_loot.sources) do
jcallahan@131 1886 for item_id, quantity in pairs(loot_data) do
jcallahan@131 1887 table.insert(current_loot.zone_data[location_token].drops, ("%d:%d"):format(item_id, quantity))
jcallahan@131 1888 end
jcallahan@131 1889 end
jcallahan@131 1890 end
jcallahan@131 1891
jcallahan@131 1892 if #current_loot.list <= 0 then
jcallahan@131 1893 return
jcallahan@131 1894 end
jcallahan@131 1895
jcallahan@131 1896 for index = 1, #current_loot.list do
jcallahan@131 1897 table.insert(current_loot.zone_data[location_token].drops, current_loot.loot_list[index])
jcallahan@41 1898 end
jcallahan@13 1899 end,
jcallahan@13 1900 }
jcallahan@13 1901
jcallahan@79 1902 -- Prevent opening the same loot window multiple times from recording data multiple times.
jcallahan@79 1903 local loot_guid_registry = {}
jcallahan@124 1904
jcallahan@124 1905
jcallahan@124 1906 function WDP:LOOT_CLOSED(event_name)
jcallahan@131 1907 current_loot = nil
jcallahan@131 1908 table.wipe(current_action)
jcallahan@124 1909 end
jcallahan@124 1910
jcallahan@13 1911
jcallahan@322 1912 local function ExtrapolatedCurrentActionFromLootData(event_name)
jcallahan@322 1913 local extrapolated_guid_registry = {}
jcallahan@322 1914 local num_guids = 0
jcallahan@322 1915
MMOSimca@344 1916 -- Loot extrapolation cannot handle objects that need special spell labels (like HERBALISM or MINING) (MIND_CONTROL is okay)
MMOSimca@348 1917 if private.SPELL_FLAGS_BY_LABEL[current_action.spell_label] and not private.NON_LOOT_SPELL_LABELS[current_action.spell_label] then
MMOSimca@344 1918 Debug("%s: Problematic spell label %s found. Loot extrapolation for this set of loot would have run an increased risk of introducing bad data into the system.", log_source, private.previous_spell_id)
MMOSimca@344 1919 table.wipe(current_action)
MMOSimca@344 1920 return false
MMOSimca@344 1921 end
MMOSimca@344 1922
jcallahan@322 1923 table.wipe(current_action)
jcallahan@322 1924
jcallahan@322 1925 for loot_slot = 1, _G.GetNumLootItems() do
jcallahan@322 1926 local loot_info = {
jcallahan@322 1927 _G.GetLootSourceInfo(loot_slot)
jcallahan@322 1928 }
jcallahan@322 1929
jcallahan@322 1930 for loot_index = 1, #loot_info, 2 do
jcallahan@322 1931 local source_guid = loot_info[loot_index]
jcallahan@322 1932
jcallahan@322 1933 if not extrapolated_guid_registry[source_guid] then
jcallahan@322 1934 local unit_type, unit_idnum = ParseGUID(source_guid)
jcallahan@322 1935
jcallahan@322 1936 if unit_type and unit_idnum then
jcallahan@322 1937 extrapolated_guid_registry[source_guid] = {
jcallahan@322 1938 unit_type,
jcallahan@322 1939 unit_idnum
jcallahan@322 1940 }
jcallahan@322 1941
jcallahan@322 1942 num_guids = num_guids + 1
jcallahan@322 1943 end
jcallahan@322 1944 end
jcallahan@322 1945 end
jcallahan@322 1946 end
jcallahan@322 1947 local log_source = event_name .. "- ExtrapolatedCurrentActionFromLootData"
jcallahan@322 1948
jcallahan@322 1949 if num_guids == 0 then
jcallahan@322 1950 Debug("%s: No GUIDs found in loot. Blank loot window?", log_source)
jcallahan@322 1951 return false
jcallahan@322 1952 end
jcallahan@326 1953
jcallahan@322 1954 local num_npcs = 0
jcallahan@322 1955 local num_objects = 0
jcallahan@324 1956 local num_itemcontainers = 0
jcallahan@322 1957
jcallahan@322 1958 for source_guid, guid_data in pairs(extrapolated_guid_registry) do
jcallahan@322 1959 local unit_type = guid_data[1]
jcallahan@324 1960 local loot_label = (unit_type == private.UNIT_TYPES.OBJECT) and "opening" or (UnitTypeIsNPC(unit_type) and "drops") or ((unit_type == private.UNIT_TYPES.PLAYER) and "contains")
jcallahan@322 1961
jcallahan@322 1962 if loot_label then
jcallahan@322 1963 local unit_idnum = guid_data[2]
jcallahan@322 1964
jcallahan@322 1965 if loot_guid_registry[loot_label] and loot_guid_registry[loot_label][source_guid] then
jcallahan@322 1966 Debug("%s: Previously scanned loot for unit with GUID %s and identifier %s.", log_source, source_guid, unit_idnum)
jcallahan@322 1967 elseif unit_type == private.UNIT_TYPES.OBJECT and unit_idnum ~= OBJECT_ID_FISHING_BOBBER then
jcallahan@322 1968 current_action.loot_label = loot_label
jcallahan@322 1969 current_action.spell_label = "OPENING"
jcallahan@322 1970 current_action.target_type = AF.OBJECT
jcallahan@322 1971 current_action.identifier = unit_idnum
jcallahan@322 1972 num_objects = num_objects + 1
jcallahan@322 1973 elseif UnitTypeIsNPC(unit_type) then
jcallahan@322 1974 current_action.loot_label = loot_label
jcallahan@322 1975 current_action.target_type = AF.NPC
jcallahan@322 1976 current_action.identifier = unit_idnum
jcallahan@322 1977 num_npcs = num_npcs + 1
jcallahan@324 1978 elseif unit_type == private.UNIT_TYPES.PLAYER then
jcallahan@331 1979 -- Item container GUIDs are currently of the 'PLAYER' type; this may be unintended and could change in the future.
jcallahan@324 1980 current_action.loot_label = loot_label
jcallahan@324 1981 current_action.target_type = AF.ITEM
jcallahan@324 1982 -- current_action.identifier assigned during loot verification.
jcallahan@324 1983 num_itemcontainers = num_itemcontainers + 1
jcallahan@322 1984 end
jcallahan@322 1985 else
jcallahan@322 1986 -- Bail here; not only do we not know what this unit is, but we don't want to attribute loot to something that doesn't actually drop it.
jcallahan@322 1987 Debug("%s: Unit with GUID %s has unsupported type for looting.", log_source, source_guid)
jcallahan@322 1988 return false
jcallahan@322 1989 end
jcallahan@322 1990 end
jcallahan@322 1991
jcallahan@322 1992 if not current_action.target_type then
jcallahan@322 1993 Debug("%s: Failure to obtain target_type.", log_source)
jcallahan@322 1994 return false
jcallahan@322 1995 end
jcallahan@322 1996
jcallahan@322 1997 -- We can't figure out what dropped the loot. This shouldn't ever happen, but hey - Blizzard does some awesome stuff on occasion.
jcallahan@324 1998 if (num_npcs > 0 and num_objects + num_itemcontainers > 0) or (num_objects > 0 and num_npcs + num_itemcontainers > 0) or (num_itemcontainers > 0 and num_npcs + num_objects > 0) then
jcallahan@324 1999 Debug("%s: Mixed target types are not supported. NPCs - %d, Objects - %d, Item Containers - %d.", log_source, num_npcs, num_objects, num_itemcontainers)
jcallahan@322 2000 return false
jcallahan@322 2001 end
jcallahan@322 2002
jcallahan@322 2003 Debug("%s: Successfully extrapolated information for current_action.", log_source)
jcallahan@322 2004 return true
jcallahan@322 2005 end
jcallahan@322 2006
jcallahan@322 2007
MMOSimca@343 2008 function WDP:LOOT_OPENED(event_name)
jcallahan@132 2009 if current_loot then
jcallahan@322 2010 current_loot = nil
jcallahan@322 2011 Debug("%s: Previous loot did not process in time for this event. Attempting to extrapolate current_action from loot data.", event_name)
jcallahan@322 2012
jcallahan@322 2013 if not ExtrapolatedCurrentActionFromLootData(event_name) then
jcallahan@322 2014 Debug("%s: Unable to extrapolate current_action. Aborting attempts to handle loot for now.", event_name)
jcallahan@322 2015 return
jcallahan@322 2016 end
jcallahan@18 2017 end
jcallahan@151 2018
jcallahan@151 2019 if not current_action.target_type then
jcallahan@322 2020 Debug("%s: No target type found. Attempting to extrapolate current_action from loot data.", event_name)
jcallahan@322 2021
jcallahan@322 2022 if not ExtrapolatedCurrentActionFromLootData(event_name) then
jcallahan@322 2023 Debug("%s: Unable to extrapolate current_action. Aborting attempts to handle loot for now.", event_name)
jcallahan@322 2024 return
jcallahan@322 2025 end
jcallahan@151 2026 end
MMOSimca@343 2027 local verify_func = LOOT_OPENED_VERIFY_FUNCS[current_action.target_type]
MMOSimca@343 2028 local update_func = LOOT_OPENED_UPDATE_FUNCS[current_action.target_type]
jcallahan@13 2029
jcallahan@14 2030 if not verify_func or not update_func then
jcallahan@322 2031 Debug("%s: The current action's target type is unsupported or nil.", event_name)
jcallahan@13 2032 return
jcallahan@13 2033 end
jcallahan@13 2034
jcallahan@14 2035 if _G.type(verify_func) == "function" and not verify_func() then
jcallahan@324 2036 Debug("%s: The current action type, %s, is supported but has failed loot verification.", event_name, private.ACTION_TYPE_NAMES[current_action.target_type])
jcallahan@14 2037 return
jcallahan@14 2038 end
jcallahan@80 2039 local guids_used = {}
jcallahan@132 2040
jcallahan@301 2041 InitializeCurrentLoot()
jcallahan@217 2042 loot_guid_registry[current_loot.label] = loot_guid_registry[current_loot.label] or {}
jcallahan@217 2043
jcallahan@55 2044 for loot_slot = 1, _G.GetNumLootItems() do
jcallahan@302 2045 local icon_texture, item_text, slot_quantity, quality, locked = _G.GetLootSlotInfo(loot_slot)
jcallahan@55 2046 local slot_type = _G.GetLootSlotType(loot_slot)
jcallahan@237 2047 local loot_info = {
jcallahan@237 2048 _G.GetLootSourceInfo(loot_slot)
jcallahan@237 2049 }
jcallahan@13 2050
jcallahan@237 2051 -- Odd index is GUID, even is count.
jcallahan@237 2052 for loot_index = 1, #loot_info, 2 do
jcallahan@237 2053 local source_guid = loot_info[loot_index]
jcallahan@75 2054
jcallahan@237 2055 if not loot_guid_registry[current_loot.label][source_guid] then
jcallahan@237 2056 local loot_quantity = loot_info[loot_index + 1]
jcallahan@324 2057 -- There is a new bug in 5.4.0 that causes GetLootSlotInfo() to (rarely) return nil values for slot_quantity.
jcallahan@324 2058 if slot_quantity then
jcallahan@324 2059 -- We need slot_quantity to account for an old bug where loot_quantity is sometimes '1' for stacks of items, such as cloth.
jcallahan@324 2060 if slot_quantity > loot_quantity then
jcallahan@324 2061 loot_quantity = slot_quantity
jcallahan@324 2062 end
jcallahan@324 2063 local source_type, source_id = ParseGUID(source_guid)
MMOSimca@329 2064 local source_key = ("%s:%d"):format(source_type, source_id)
jcallahan@324 2065
MMOSimca@366 2066 if slot_type == LOOT_SLOT_ITEM then
jcallahan@324 2067 local item_id = ItemLinkToID(_G.GetLootSlotLink(loot_slot))
jcallahan@324 2068 Debug("GUID: %s - Type:ID: %s - ItemID: %d - Amount: %d (%d)", loot_info[loot_index], source_key, item_id, loot_info[loot_index + 1], slot_quantity)
jcallahan@308 2069 current_loot.sources[source_guid] = current_loot.sources[source_guid] or {}
MMOSimca@367 2070 current_loot.sources[source_guid][item_id] = (current_loot.sources[source_guid][item_id] or 0) + loot_quantity
jcallahan@309 2071 guids_used[source_guid] = true
MMOSimca@366 2072 elseif slot_type == LOOT_SLOT_MONEY then
jcallahan@324 2073 Debug("GUID: %s - Type:ID: %s - Money - Amount: %d (%d)", loot_info[loot_index], source_key, loot_info[loot_index + 1], slot_quantity)
jcallahan@324 2074 if current_loot.target_type == AF.ZONE then
jcallahan@324 2075 table.insert(current_loot.list, ("money:%d"):format(loot_quantity))
jcallahan@324 2076 else
jcallahan@324 2077 current_loot.sources[source_guid] = current_loot.sources[source_guid] or {}
MMOSimca@367 2078 current_loot.sources[source_guid]["money"] = (current_loot.sources[source_guid]["money"] or 0) + loot_quantity
jcallahan@324 2079 guids_used[source_guid] = true
jcallahan@324 2080 end
MMOSimca@366 2081 elseif slot_type == LOOT_SLOT_CURRENCY then
jcallahan@324 2082 -- Same bug with GetLootSlotInfo() will screw up currency when it happens, so we won't process this slot's loot.
jcallahan@324 2083 if icon_texture then
jcallahan@324 2084 Debug("GUID: %s - Type:ID: %s - Currency: %s - Amount: %d (%d)", loot_info[loot_index], source_key, icon_texture, loot_info[loot_index + 1], slot_quantity)
jcallahan@324 2085 if current_loot.target_type == AF.ZONE then
jcallahan@324 2086 table.insert(current_loot.list, ("currency:%d:%s"):format(loot_quantity, icon_texture:match("[^\\]+$"):lower()))
jcallahan@324 2087 else
jcallahan@324 2088 local currency_token = ("currency:%s"):format(icon_texture:match("[^\\]+$"):lower())
jcallahan@324 2089
jcallahan@324 2090 current_loot.sources[source_guid] = current_loot.sources[source_guid] or {}
MMOSimca@367 2091 current_loot.sources[source_guid][currency_token] = (current_loot.sources[source_guid][currency_token] or 0) + loot_quantity
jcallahan@324 2092 guids_used[source_guid] = true
jcallahan@324 2093 end
jcallahan@324 2094 else
jcallahan@324 2095 Debug("%s: Slot quantity is nil for loot slot %d of the entity with GUID %s and Type:ID: %s.", event_name, loot_slot, loot_info[loot_index], source_key)
jcallahan@324 2096 end
jcallahan@308 2097 end
jcallahan@324 2098 else
jcallahan@324 2099 -- If this is nil, then the item's quantity could be wrong if loot_quantity is wrong, so we won't process this slot's loot.
MMOSimca@352 2100 Debug("%s: Slot quantity is nil for loot slot %d.", event_name, loot_slot)
jcallahan@79 2101 end
jcallahan@75 2102 end
jcallahan@13 2103 end
jcallahan@13 2104 end
jcallahan@80 2105
jcallahan@81 2106 for guid in pairs(guids_used) do
jcallahan@217 2107 loot_guid_registry[current_loot.label][guid] = true
jcallahan@80 2108 end
jcallahan@13 2109 update_func()
jcallahan@1 2110 end
jcallahan@13 2111 end -- do-block
jcallahan@0 2112
jcallahan@0 2113
jcallahan@89 2114 function WDP:MAIL_SHOW(event_name)
jcallahan@89 2115 local unit_type, unit_idnum = ParseGUID(_G.UnitGUID("npc"))
jcallahan@89 2116
jcallahan@89 2117 if not unit_idnum or unit_type ~= private.UNIT_TYPES.OBJECT then
jcallahan@89 2118 return
jcallahan@89 2119 end
jcallahan@89 2120 UpdateDBEntryLocation("objects", unit_idnum)
jcallahan@89 2121 end
jcallahan@89 2122
jcallahan@89 2123
jcallahan@44 2124 do
jcallahan@44 2125 local POINT_MATCH_PATTERNS = {
jcallahan@44 2126 ("^%s$"):format(_G.ITEM_REQ_ARENA_RATING:gsub("%%d", "(%%d+)")), -- May no longer be necessary
jcallahan@44 2127 ("^%s$"):format(_G.ITEM_REQ_ARENA_RATING_3V3:gsub("%%d", "(%%d+)")), -- May no longer be necessary
jcallahan@44 2128 ("^%s$"):format(_G.ITEM_REQ_ARENA_RATING_5V5:gsub("%%d", "(%%d+)")), -- May no longer be necessary
jcallahan@44 2129 ("^%s$"):format(_G.ITEM_REQ_ARENA_RATING_BG:gsub("%%d", "(%%d+)")),
jcallahan@44 2130 ("^%s$"):format(_G.ITEM_REQ_ARENA_RATING_3V3_BG:gsub("%%d", "(%%d+)")),
jcallahan@44 2131 }
jcallahan@5 2132
jcallahan@68 2133 local ITEM_REQ_REPUTATION_MATCH = "Requires (.-) %- (.*)"
jcallahan@87 2134 local ITEM_REQ_QUEST_MATCH1 = "Requires: .*"
jcallahan@87 2135 local ITEM_REQ_QUEST_MATCH2 = "Must have completed: .*"
jcallahan@68 2136
jcallahan@133 2137 local current_merchant
jcallahan@133 2138 local merchant_standing
jcallahan@133 2139
jcallahan@133 2140 function WDP:MERCHANT_CLOSED(event_name)
jcallahan@133 2141 current_merchant = nil
jcallahan@133 2142 merchant_standing = nil
jcallahan@133 2143 end
jcallahan@133 2144
jcallahan@133 2145
jcallahan@89 2146 function WDP:UpdateMerchantItems(event_name)
jcallahan@144 2147 if not current_merchant or event_name == "MERCHANT_SHOW" then
jcallahan@195 2148 local unit_type, unit_idnum = ParseGUID(_G.UnitGUID("npc"))
jcallahan@4 2149
jcallahan@171 2150 if not unit_idnum or not UnitTypeIsNPC(unit_type) then
jcallahan@133 2151 return
jcallahan@133 2152 end
jcallahan@331 2153 local _, faction_standing = UnitFactionStanding("npc")
jcallahan@331 2154 merchant_standing = faction_standing
jcallahan@133 2155 current_merchant = NPCEntry(unit_idnum)
jcallahan@133 2156 current_merchant.sells = current_merchant.sells or {}
jcallahan@44 2157 end
jcallahan@55 2158 local current_filters = _G.GetMerchantFilter()
jcallahan@57 2159 _G.SetMerchantFilter(_G.LE_LOOT_FILTER_ALL)
jcallahan@57 2160 _G.MerchantFrame_Update()
jcallahan@57 2161
jcallahan@150 2162 local num_items = _G.GetMerchantNumItems()
jcallahan@150 2163
jcallahan@44 2164 for item_index = 1, num_items do
jcallahan@44 2165 local _, _, copper_price, stack_size, num_available, _, extended_cost = _G.GetMerchantItemInfo(item_index)
jcallahan@44 2166 local item_id = ItemLinkToID(_G.GetMerchantItemLink(item_index))
jcallahan@5 2167
jcallahan@324 2168 DatamineTT:ClearLines()
jcallahan@324 2169 DatamineTT:SetMerchantItem(item_index)
jcallahan@324 2170
jcallahan@324 2171 if not item_id then
jcallahan@324 2172 local item_name, item_link = DatamineTT:GetItem()
jcallahan@324 2173 item_id = ItemLinkToID(item_link)
MMOSimca@354 2174 -- GetMerchantItemLink() still ocassionally fails as of Patch 6.0.2. It fails so badly that debug functions cause considerable slowdown.
jcallahan@324 2175 end
jcallahan@324 2176
jcallahan@44 2177 if item_id and item_id > 0 then
jcallahan@44 2178 local price_string = ActualCopperCost(copper_price, merchant_standing)
jcallahan@5 2179
jcallahan@68 2180 local num_lines = DatamineTT:NumLines()
jcallahan@68 2181
jcallahan@68 2182 for line_index = 1, num_lines do
jcallahan@68 2183 local current_line = _G["WDPDatamineTTTextLeft" .. line_index]
jcallahan@68 2184
jcallahan@68 2185 if not current_line then
jcallahan@68 2186 break
jcallahan@68 2187 end
jcallahan@68 2188 local faction, reputation = current_line:GetText():match(ITEM_REQ_REPUTATION_MATCH)
jcallahan@68 2189
jcallahan@68 2190 if faction or reputation then
jcallahan@68 2191 DBEntry("items", item_id).req_reputation = ("%s:%s"):format(faction:gsub("-", ""), reputation:upper())
jcallahan@68 2192 break
jcallahan@68 2193 end
jcallahan@68 2194 end
jcallahan@68 2195
jcallahan@87 2196 for line_index = 1, num_lines do
jcallahan@87 2197 local current_line = _G["WDPDatamineTTTextLeft" .. line_index]
jcallahan@87 2198
jcallahan@87 2199 if not current_line then
jcallahan@87 2200 break
jcallahan@87 2201 end
jcallahan@87 2202 local line_text = current_line:GetText()
jcallahan@87 2203 local quest_name = line_text:match(ITEM_REQ_QUEST_MATCH1) or line_text:match(ITEM_REQ_QUEST_MATCH2)
jcallahan@87 2204
jcallahan@87 2205 if quest_name then
jcallahan@87 2206 DBEntry("items", item_id).req_quest = ("%s"):format(quest_name:gsub("(.+): ", ""), quest_name)
jcallahan@87 2207 break
jcallahan@87 2208 end
jcallahan@87 2209 end
jcallahan@87 2210
jcallahan@44 2211 if extended_cost then
jcallahan@53 2212 local battleground_rating = 0
jcallahan@53 2213 local personal_rating = 0
jcallahan@53 2214 local required_season_amount
jcallahan@5 2215
jcallahan@68 2216 for line_index = 1, num_lines do
jcallahan@44 2217 local current_line = _G["WDPDatamineTTTextLeft" .. line_index]
jcallahan@5 2218
jcallahan@44 2219 if not current_line then
jcallahan@44 2220 break
jcallahan@44 2221 end
jcallahan@53 2222 required_season_amount = current_line:GetText():match("Requires earning a total of (%d+)\n(.-) for the season.")
jcallahan@5 2223
jcallahan@44 2224 for match_index = 1, #POINT_MATCH_PATTERNS do
jcallahan@44 2225 local match1, match2 = current_line:GetText():match(POINT_MATCH_PATTERNS[match_index])
jcallahan@53 2226 personal_rating = personal_rating + (match1 or 0)
jcallahan@53 2227 battleground_rating = battleground_rating + (match2 or 0)
jcallahan@5 2228
jcallahan@44 2229 if match1 or match2 then
jcallahan@44 2230 break
jcallahan@44 2231 end
jcallahan@44 2232 end
jcallahan@5 2233 end
jcallahan@44 2234 local currency_list = {}
jcallahan@44 2235 local item_count = _G.GetMerchantItemCostInfo(item_index)
jcallahan@50 2236
jcallahan@50 2237 -- Keeping this around in case Blizzard makes the two points diverge at some point.
jcallahan@53 2238 -- price_string = ("%s:%s:%s:%s"):format(price_string, battleground_rating, personal_rating, required_season_amount or 0)
jcallahan@53 2239 price_string = ("%s:%s:%s"):format(price_string, personal_rating, required_season_amount or 0)
jcallahan@5 2240
jcallahan@44 2241 for cost_index = 1, item_count do
jcallahan@324 2242 -- The third return (Blizz calls "currency_link") of GetMerchantItemCostItem only returns item links as of Patch 5.3.0.
jcallahan@317 2243 local icon_texture, amount_required, item_link = _G.GetMerchantItemCostItem(item_index, cost_index)
jcallahan@317 2244 local currency_identifier = item_link and ItemLinkToID(item_link) or nil
jcallahan@317 2245
jcallahan@317 2246 if (not currency_identifier or currency_identifier < 1) and icon_texture then
jcallahan@317 2247 currency_identifier = icon_texture:match("[^\\]+$"):lower()
jcallahan@317 2248 end
jcallahan@317 2249
jcallahan@317 2250 if currency_identifier then
jcallahan@317 2251 currency_list[#currency_list + 1] = ("(%s:%s)"):format(amount_required, currency_identifier)
jcallahan@44 2252 end
jcallahan@44 2253 end
jcallahan@44 2254
jcallahan@44 2255 for currency_index = 1, #currency_list do
jcallahan@44 2256 price_string = ("%s:%s"):format(price_string, currency_list[currency_index])
jcallahan@5 2257 end
jcallahan@5 2258 end
jcallahan@133 2259 current_merchant.sells[item_id] = ("%s:%s:[%s]"):format(num_available, stack_size, price_string)
jcallahan@44 2260 end
jcallahan@44 2261 end
jcallahan@5 2262
jcallahan@44 2263 if _G.CanMerchantRepair() then
jcallahan@133 2264 current_merchant.can_repair = true
jcallahan@5 2265 end
jcallahan@57 2266 _G.SetMerchantFilter(current_filters)
jcallahan@57 2267 _G.MerchantFrame_Update()
jcallahan@4 2268 end
jcallahan@44 2269 end -- do-block
jcallahan@4 2270
jcallahan@89 2271
jcallahan@92 2272 function WDP:PET_BAR_UPDATE(event_name)
MMOSimca@336 2273 if not private.NON_LOOT_SPELL_LABELS[current_action.spell_label] then
jcallahan@25 2274 return
jcallahan@25 2275 end
jcallahan@34 2276 local unit_type, unit_idnum = ParseGUID(_G.UnitGUID("pet"))
jcallahan@25 2277
jcallahan@171 2278 if not unit_idnum or not UnitTypeIsNPC(unit_type) then
jcallahan@25 2279 return
jcallahan@25 2280 end
jcallahan@29 2281 NPCEntry(unit_idnum).mind_control = true
jcallahan@122 2282 table.wipe(current_action)
jcallahan@25 2283 end
jcallahan@25 2284
jcallahan@25 2285
MMOSimca@368 2286 -- This function produces data currently unused by wowdb.com, and it causes unneeded bloat in the raw lua DB.
MMOSimca@368 2287 --[[function WDP:PET_JOURNAL_LIST_UPDATE(event_name)
MMOSimca@346 2288 if DEBUGGING then
jcallahan@309 2289 return
jcallahan@309 2290 end
jcallahan@309 2291
jcallahan@115 2292 local num_pets = LPJ:NumPets()
jcallahan@115 2293
jcallahan@115 2294 for index, pet_id in LPJ:IteratePetIDs() do
jcallahan@115 2295 local _, _, is_owned, _, level, _, _, name, icon, pet_type, npc_id, _, _, is_wild = _G.C_PetJournal.GetPetInfoByIndex(index)
jcallahan@115 2296
jcallahan@115 2297 if is_owned then
jcallahan@115 2298 local health, max_health, attack, speed, rarity = _G.C_PetJournal.GetPetStats(pet_id)
jcallahan@115 2299
jcallahan@139 2300 if rarity then
jcallahan@139 2301 local rarity_name = _G["BATTLE_PET_BREED_QUALITY" .. rarity]
jcallahan@139 2302 local npc = NPCEntry(npc_id)
jcallahan@139 2303 npc.wild_pet = is_wild or nil
jcallahan@139 2304 npc.battle_pet_data = npc.battle_pet_data or {}
jcallahan@139 2305 npc.battle_pet_data[rarity_name] = npc.battle_pet_data[rarity_name] or {}
jcallahan@139 2306 npc.battle_pet_data[rarity_name]["level_" .. level] = npc.battle_pet_data[rarity_name]["level_" .. level] or {}
jcallahan@139 2307
jcallahan@139 2308 local data = npc.battle_pet_data[rarity_name]["level_" .. level]
jcallahan@139 2309 data.max_health = max_health
jcallahan@139 2310 data.attack = attack
jcallahan@139 2311 data.speed = speed
jcallahan@139 2312 end
jcallahan@115 2313 end
jcallahan@115 2314 end
MMOSimca@368 2315 end]]--
jcallahan@115 2316
jcallahan@115 2317
jcallahan@156 2318 function WDP:PLAYER_REGEN_DISABLED(event_name)
jcallahan@156 2319 private.in_combat = true
jcallahan@156 2320 end
jcallahan@156 2321
jcallahan@156 2322
jcallahan@156 2323 function WDP:PLAYER_REGEN_ENABLED(event_name)
jcallahan@156 2324 private.in_combat = nil
jcallahan@156 2325
jcallahan@156 2326 if private.set_area_id then
jcallahan@299 2327 self:HandleZoneChange(event_name)
jcallahan@156 2328 private.set_area_id = nil
jcallahan@156 2329 end
jcallahan@156 2330 end
jcallahan@156 2331
jcallahan@156 2332
jcallahan@118 2333 function WDP:PLAYER_TARGET_CHANGED(event_name)
jcallahan@215 2334 if not TargetedNPC() then
jcallahan@118 2335 return
jcallahan@2 2336 end
jcallahan@151 2337 current_action.target_type = AF.NPC
jcallahan@118 2338 self:UpdateTargetLocation()
jcallahan@118 2339 end
jcallahan@2 2340
jcallahan@89 2341
jcallahan@12 2342 do
jcallahan@12 2343 local function UpdateQuestJuncture(point)
jcallahan@12 2344 local unit_name = _G.UnitName("questnpc")
jcallahan@9 2345
jcallahan@12 2346 if not unit_name then
jcallahan@12 2347 return
jcallahan@12 2348 end
jcallahan@34 2349 local unit_type, unit_id = ParseGUID(_G.UnitGUID("questnpc"))
MMOSimca@351 2350 Debug("UpdateQuestJuncture: Updating quest juncture for %s.", ("%s:%d"):format(private.UNIT_TYPE_NAMES[unit_type], unit_id))
jcallahan@12 2351 if unit_type == private.UNIT_TYPES.OBJECT then
jcallahan@38 2352 UpdateDBEntryLocation("objects", unit_id)
jcallahan@12 2353 end
jcallahan@19 2354 local quest = DBEntry("quests", _G.GetQuestID())
jcallahan@12 2355 quest[point] = quest[point] or {}
MMOSimca@329 2356 quest[point][("%s:%d"):format(private.UNIT_TYPE_NAMES[unit_type], unit_id)] = true
jcallahan@24 2357
jcallahan@24 2358 return quest
jcallahan@12 2359 end
jcallahan@10 2360
jcallahan@12 2361
jcallahan@92 2362 function WDP:QUEST_COMPLETE(event_name)
jcallahan@97 2363 local quest = UpdateQuestJuncture("end")
jcallahan@97 2364
jcallahan@112 2365 if ALLOWED_LOCALES[CLIENT_LOCALE] then
jcallahan@112 2366 quest.reward_text = ReplaceKeywords(_G.GetRewardText())
jcallahan@112 2367 end
jcallahan@67 2368 -- Make sure the quest NPC isn't erroneously recorded as giving reputation for quests which award it.
jcallahan@177 2369 ClearKilledNPC()
jcallahan@10 2370 end
jcallahan@10 2371
jcallahan@12 2372
jcallahan@92 2373 function WDP:QUEST_DETAIL(event_name)
jcallahan@24 2374 local quest = UpdateQuestJuncture("begin")
jcallahan@24 2375
jcallahan@46 2376 if not quest then
jcallahan@46 2377 return
jcallahan@46 2378 end
jcallahan@24 2379 quest.classes = quest.classes or {}
jcallahan@27 2380 quest.classes[PLAYER_CLASS] = true
jcallahan@24 2381
jcallahan@24 2382 quest.races = quest.races or {}
jcallahan@100 2383 quest.races[(PLAYER_RACE == "Pandaren") and ("%s_%s"):format(PLAYER_RACE, PLAYER_FACTION or "Neutral") or PLAYER_RACE] = true
jcallahan@10 2384 end
jcallahan@12 2385 end -- do-block
jcallahan@9 2386
jcallahan@9 2387
jcallahan@92 2388 function WDP:QUEST_LOG_UPDATE(event_name)
jcallahan@38 2389 local selected_quest = _G.GetQuestLogSelection() -- Save current selection to be restored when we're done.
jcallahan@36 2390 local entry_index, processed_quests = 1, 0
jcallahan@36 2391 local _, num_quests = _G.GetNumQuestLogEntries()
jcallahan@36 2392
jcallahan@36 2393 while processed_quests <= num_quests do
MMOSimca@329 2394 local _, _, _, is_header, _, _, _, quest_id = _G.GetQuestLogTitle(entry_index)
jcallahan@36 2395
jcallahan@84 2396 if quest_id == 0 then
jcallahan@84 2397 processed_quests = processed_quests + 1
jcallahan@84 2398 elseif not is_header then
jcallahan@36 2399 _G.SelectQuestLogEntry(entry_index);
jcallahan@36 2400
jcallahan@36 2401 local quest = DBEntry("quests", quest_id)
jcallahan@36 2402 quest.timer = _G.GetQuestLogTimeLeft()
jcallahan@37 2403 quest.can_share = _G.GetQuestLogPushable() and true or nil
jcallahan@36 2404 processed_quests = processed_quests + 1
jcallahan@36 2405 end
jcallahan@36 2406 entry_index = entry_index + 1
jcallahan@36 2407 end
jcallahan@36 2408 _G.SelectQuestLogEntry(selected_quest)
jcallahan@4 2409 self:UnregisterEvent("QUEST_LOG_UPDATE")
jcallahan@4 2410 end
jcallahan@4 2411
jcallahan@4 2412
jcallahan@97 2413 function WDP:QUEST_PROGRESS(event_name)
jcallahan@112 2414 if not ALLOWED_LOCALES[CLIENT_LOCALE] then
jcallahan@112 2415 return
jcallahan@112 2416 end
jcallahan@97 2417 DBEntry("quests", _G.GetQuestID()).progress_text = ReplaceKeywords(_G.GetProgressText())
jcallahan@97 2418 end
jcallahan@97 2419
jcallahan@97 2420
jcallahan@92 2421 function WDP:UNIT_QUEST_LOG_CHANGED(event_name, unit_id)
jcallahan@4 2422 if unit_id ~= "player" then
jcallahan@4 2423 return
jcallahan@4 2424 end
jcallahan@4 2425 self:RegisterEvent("QUEST_LOG_UPDATE")
jcallahan@4 2426 end
jcallahan@4 2427
jcallahan@4 2428
jcallahan@92 2429 do
jcallahan@92 2430 local TRADESKILL_TOOLS = {
jcallahan@92 2431 Anvil = anvil_spell_ids,
jcallahan@92 2432 Forge = forge_spell_ids,
jcallahan@92 2433 }
jcallahan@92 2434
jcallahan@92 2435
jcallahan@167 2436 local function RegisterTools(tradeskill_name, tradeskill_index)
MMOSimca@352 2437 local link = _G.GetTradeSkillRecipeLink(tradeskill_index)
MMOSimca@352 2438 if link then
MMOSimca@352 2439 local spell_id = tonumber(link:match("^|c%x%x%x%x%x%x%x%x|H%w+:(%d+)"))
MMOSimca@352 2440 local required_tool = _G.GetTradeSkillTools(tradeskill_index)
MMOSimca@352 2441
MMOSimca@352 2442 if required_tool then
MMOSimca@352 2443 for tool_name, registry in pairs(TRADESKILL_TOOLS) do
MMOSimca@352 2444 if required_tool:find(tool_name) then
MMOSimca@352 2445 registry[spell_id] = true
MMOSimca@352 2446 end
jcallahan@167 2447 end
jcallahan@167 2448 end
jcallahan@167 2449 end
jcallahan@167 2450 end
jcallahan@167 2451
jcallahan@167 2452
jcallahan@92 2453 function WDP:TRADE_SKILL_SHOW(event_name)
jcallahan@92 2454 local profession_name, prof_level = _G.GetTradeSkillLine()
jcallahan@92 2455
jcallahan@92 2456 if profession_name == _G.UNKNOWN then
jcallahan@92 2457 return
jcallahan@92 2458 end
jcallahan@167 2459 TradeSkillExecutePer(RegisterTools)
jcallahan@92 2460 end
jcallahan@92 2461 end -- do-block
jcallahan@92 2462
jcallahan@92 2463
jcallahan@167 2464 function WDP:TRAINER_CLOSED(event_name)
jcallahan@167 2465 private.trainer_shown = nil
jcallahan@167 2466 end
jcallahan@167 2467
jcallahan@167 2468
jcallahan@92 2469 function WDP:TRAINER_SHOW(event_name)
jcallahan@232 2470 local unit_type, unit_idnum = ParseGUID(_G.UnitGUID("npc"))
jcallahan@164 2471 local trainer = NPCEntry(unit_idnum)
jcallahan@58 2472
jcallahan@164 2473 if not trainer then
jcallahan@58 2474 return
jcallahan@58 2475 end
jcallahan@331 2476 local _, trainer_standing = UnitFactionStanding("npc")
jcallahan@164 2477 trainer.teaches = trainer.teaches or {}
jcallahan@27 2478
jcallahan@167 2479 private.trainer_shown = true
jcallahan@167 2480
jcallahan@27 2481 -- Get the initial trainer filters
MMOSimca@344 2482 local available = _G.GetTrainerServiceTypeFilter("available") and 1 or 0
MMOSimca@344 2483 local unavailable = _G.GetTrainerServiceTypeFilter("unavailable") and 1 or 0
MMOSimca@344 2484 local used = _G.GetTrainerServiceTypeFilter("used") and 1 or 0
jcallahan@27 2485
jcallahan@27 2486 -- Clear the trainer filters
MMOSimca@344 2487 _G.SetTrainerServiceTypeFilter("available", 1)
MMOSimca@344 2488 _G.SetTrainerServiceTypeFilter("unavailable", 1)
MMOSimca@344 2489 _G.SetTrainerServiceTypeFilter("used", 1)
jcallahan@27 2490
jcallahan@27 2491 for index = 1, _G.GetNumTrainerServices(), 1 do
jcallahan@27 2492 local spell_name, rank_name, _, _, required_level = _G.GetTrainerServiceInfo(index)
jcallahan@27 2493
jcallahan@27 2494 if spell_name then
jcallahan@27 2495 DatamineTT:ClearLines()
jcallahan@27 2496 DatamineTT:SetTrainerService(index)
jcallahan@27 2497
jcallahan@27 2498 local _, _, spell_id = DatamineTT:GetSpell()
jcallahan@27 2499
jcallahan@43 2500 if spell_id then
jcallahan@164 2501 local class_professions = trainer.teaches[PLAYER_CLASS]
jcallahan@164 2502
jcallahan@164 2503 if not class_professions then
jcallahan@164 2504 trainer.teaches[PLAYER_CLASS] = {}
jcallahan@164 2505 class_professions = trainer.teaches[PLAYER_CLASS]
jcallahan@164 2506 end
jcallahan@43 2507 local profession, min_skill = _G.GetTrainerServiceSkillReq(index)
jcallahan@43 2508 profession = profession or "General"
jcallahan@43 2509
jcallahan@164 2510 local profession_skills = class_professions[profession]
jcallahan@43 2511
jcallahan@43 2512 if not profession_skills then
jcallahan@43 2513 class_professions[profession] = {}
jcallahan@43 2514 profession_skills = class_professions[profession]
jcallahan@43 2515 end
jcallahan@173 2516 profession_skills[spell_id] = ("%d:%d:%d"):format(required_level, min_skill, _G.GetTrainerServiceCost(index))
jcallahan@27 2517 end
jcallahan@27 2518 end
jcallahan@27 2519 end
jcallahan@27 2520 -- Reset the filters to what they were before
MMOSimca@344 2521 _G.SetTrainerServiceTypeFilter("available", available or 0)
MMOSimca@344 2522 _G.SetTrainerServiceTypeFilter("unavailable", unavailable or 0)
MMOSimca@344 2523 _G.SetTrainerServiceTypeFilter("used", used or 0)
jcallahan@27 2524 end
jcallahan@27 2525
jcallahan@27 2526
jcallahan@1 2527 function WDP:UNIT_SPELLCAST_SENT(event_name, unit_id, spell_name, spell_rank, target_name, spell_line)
jcallahan@1 2528 if private.tracked_line or unit_id ~= "player" then
jcallahan@1 2529 return
jcallahan@1 2530 end
jcallahan@1 2531 local spell_label = private.SPELL_LABELS_BY_NAME[spell_name]
jcallahan@1 2532
jcallahan@1 2533 if not spell_label then
jcallahan@1 2534 return
jcallahan@1 2535 end
jcallahan@306 2536
MMOSimca@343 2537 Debug("UNIT_SPELLCAST_SENT: %s was cast.", spell_name)
jcallahan@150 2538 local item_name, item_link = _G.GameTooltip:GetItem()
jcallahan@150 2539 local unit_name, unit_id = _G.GameTooltip:GetUnit()
jcallahan@1 2540
jcallahan@150 2541 if not unit_name and _G.UnitName("target") == target_name then
jcallahan@150 2542 unit_name = target_name
jcallahan@150 2543 unit_id = "target"
jcallahan@1 2544 end
jcallahan@1 2545 local spell_flags = private.SPELL_FLAGS_BY_LABEL[spell_label]
jcallahan@28 2546 local zone_name, area_id, x, y, map_level, instance_token = CurrentLocationData()
MMOSimca@328 2547 if not (zone_name and area_id and x and y and map_level) then
MMOSimca@328 2548 Debug("%s: Missing current location data - %s, %d, %d, %d, %d.", event_name, zone_name, area_id, x, y, map_level)
MMOSimca@328 2549 return
MMOSimca@328 2550 end
jcallahan@28 2551
jcallahan@205 2552 table.wipe(current_action)
jcallahan@122 2553 current_action.instance_token = instance_token
jcallahan@122 2554 current_action.map_level = map_level
jcallahan@122 2555 current_action.x = x
jcallahan@122 2556 current_action.y = y
jcallahan@122 2557 current_action.zone_data = ("%s:%d"):format(zone_name, area_id)
jcallahan@122 2558 current_action.spell_label = spell_label
jcallahan@105 2559
jcallahan@105 2560 if not private.NON_LOOT_SPELL_LABELS[spell_label] then
jcallahan@122 2561 current_action.loot_label = spell_label:lower()
jcallahan@105 2562 end
jcallahan@1 2563
jcallahan@151 2564 if unit_name and unit_name == target_name and not item_name then
jcallahan@16 2565 if bit.band(spell_flags, AF.NPC) == AF.NPC then
jcallahan@150 2566 if not unit_id or unit_name ~= target_name then
jcallahan@16 2567 return
jcallahan@16 2568 end
jcallahan@123 2569 current_action.target_type = AF.NPC
jcallahan@16 2570 end
jcallahan@16 2571 elseif bit.band(spell_flags, AF.ITEM) == AF.ITEM then
jcallahan@123 2572 current_action.target_type = AF.ITEM
jcallahan@16 2573
jcallahan@150 2574 if item_name and item_name == target_name then
jcallahan@150 2575 current_action.identifier = ItemLinkToID(item_link)
jcallahan@16 2576 elseif target_name and target_name ~= "" then
jcallahan@331 2577 local _, item_link = _G.GetItemInfo(target_name)
jcallahan@331 2578 current_action.identifier = ItemLinkToID(item_link)
jcallahan@16 2579 end
jcallahan@150 2580 elseif not item_name and not unit_name then
jcallahan@1 2581 if bit.band(spell_flags, AF.OBJECT) == AF.OBJECT then
jcallahan@17 2582 if target_name == "" then
jcallahan@17 2583 return
jcallahan@17 2584 end
jcallahan@122 2585 current_action.object_name = target_name
jcallahan@123 2586 current_action.target_type = AF.OBJECT
jcallahan@1 2587 elseif bit.band(spell_flags, AF.ZONE) == AF.ZONE then
jcallahan@123 2588 current_action.target_type = AF.ZONE
jcallahan@1 2589 end
jcallahan@1 2590 end
jcallahan@1 2591 private.tracked_line = spell_line
jcallahan@0 2592 end
jcallahan@0 2593
jcallahan@94 2594
jcallahan@312 2595 function WDP:SPELL_CONFIRMATION_PROMPT(event_name, spell_id, confirm_type, text, duration, currency_id_cost)
jcallahan@306 2596 if private.RAID_BOSS_BONUS_SPELL_ID_TO_NPC_ID_MAP[spell_id] then
jcallahan@306 2597 ClearKilledBossID()
jcallahan@306 2598 ClearLootToastContainerID()
MMOSimca@336 2599 private.raid_boss_id = private.RAID_BOSS_BONUS_SPELL_ID_TO_NPC_ID_MAP[spell_id]
jcallahan@306 2600 else
MMOSimca@336 2601 Debug("%s: Spell ID %d is not a known raid boss 'Bonus' spell.", event_name, spell_id)
jcallahan@306 2602 return
jcallahan@1 2603 end
jcallahan@306 2604
jcallahan@324 2605 -- Assign existing loot data to boss if it exists
jcallahan@307 2606 if loot_toast_data then
MMOSimca@336 2607 local npc_id = private.raid_boss_id
jcallahan@317 2608
jcallahan@324 2609 -- Slightly messy hack to workaround duplicate world bosses
jcallahan@317 2610 local upper_limit = 0
jcallahan@317 2611 if DUPLICATE_WORLD_BOSS_IDS[npc_id] then
jcallahan@317 2612 upper_limit = #DUPLICATE_WORLD_BOSS_IDS[npc_id]
jcallahan@317 2613 end
jcallahan@317 2614
jcallahan@317 2615 for i = 0, upper_limit do
jcallahan@317 2616 local temp_npc_id = npc_id
jcallahan@317 2617
jcallahan@317 2618 if i > 0 then
jcallahan@317 2619 temp_npc_id = DUPLICATE_WORLD_BOSS_IDS[npc_id][i]
jcallahan@317 2620 end
jcallahan@317 2621
jcallahan@317 2622 local npc = NPCEntry(temp_npc_id)
jcallahan@317 2623 if npc then
jcallahan@324 2624 -- Create needed npc fields if required
jcallahan@317 2625 local loot_label = "drops"
jcallahan@317 2626 local encounter_data = npc:EncounterData(InstanceDifficultyToken())
jcallahan@317 2627 encounter_data[loot_label] = encounter_data[loot_label] or {}
jcallahan@317 2628 encounter_data.loot_counts = encounter_data.loot_counts or {}
jcallahan@317 2629
jcallahan@317 2630 for index = 1, #loot_toast_data do
jcallahan@317 2631 local data = loot_toast_data[index]
jcallahan@317 2632 local loot_type = data[1]
jcallahan@317 2633 local hyperlink = data[2]
jcallahan@317 2634 local quantity = data[3]
jcallahan@317 2635
jcallahan@317 2636 if loot_type == "item" then
jcallahan@317 2637 local item_id = ItemLinkToID(hyperlink)
jcallahan@317 2638 Debug("%s: Assigned stored item loot data - %s - %d:%d", event_name, hyperlink, item_id, quantity)
jcallahan@317 2639 table.insert(encounter_data[loot_label], ("%d:%d"):format(item_id, quantity))
jcallahan@317 2640 elseif loot_type == "money" then
jcallahan@317 2641 Debug("%s: Assigned stored money loot data - money:%d", event_name, quantity)
jcallahan@317 2642 table.insert(encounter_data[loot_label], ("money:%d"):format(quantity))
jcallahan@317 2643 elseif loot_type == "currency" then
jcallahan@317 2644 local currency_texture = CurrencyLinkToTexture(hyperlink)
jcallahan@317 2645 Debug("%s: Assigned stored currency loot data - %s - currency:%d:%s", event_name, hyperlink, currency_texture, quantity)
jcallahan@324 2646 -- Workaround for Patch 5.4.0 bug with Flexible raid Siege of Orgrimmar bosses and Valor Points
jcallahan@317 2647 if quantity > 1000 and currency_texture == "pvecurrency-valor" then
jcallahan@317 2648 quantity = math.floor(quantity / 100)
jcallahan@317 2649 end
jcallahan@317 2650 table.insert(encounter_data[loot_label], ("currency:%d:%s"):format(quantity, currency_texture))
jcallahan@317 2651 end
jcallahan@307 2652 end
jcallahan@317 2653
jcallahan@317 2654 if not boss_loot_toasting[temp_npc_id] then
jcallahan@317 2655 encounter_data.loot_counts[loot_label] = (encounter_data.loot_counts[loot_label] or 0) + 1
jcallahan@317 2656 boss_loot_toasting[temp_npc_id] = true -- Do not count further loots until timer expires or another boss is killed
jcallahan@317 2657 end
jcallahan@317 2658 else
jcallahan@317 2659 Debug("%s: NPC is nil, but we have stored loot data...", event_name)
jcallahan@307 2660 end
jcallahan@307 2661 end
jcallahan@307 2662 end
jcallahan@307 2663
jcallahan@307 2664 ClearLootToastData()
jcallahan@307 2665
jcallahan@307 2666 killed_boss_id_timer_handle = WDP:ScheduleTimer(ClearKilledBossID, 5) -- we need to assign a handle here to cancel it later
jcallahan@306 2667 end
jcallahan@306 2668
jcallahan@306 2669
jcallahan@306 2670 function WDP:UNIT_SPELLCAST_SUCCEEDED(event_name, unit_id, spell_name, spell_rank, spell_line, spell_id)
jcallahan@306 2671 if unit_id ~= "player" then
jcallahan@306 2672 return
jcallahan@306 2673 end
jcallahan@306 2674 private.tracked_line = nil
jcallahan@306 2675 private.previous_spell_id = spell_id
jcallahan@306 2676
MMOSimca@345 2677 -- Handle Logging spell casts
MMOSimca@345 2678 if private.LOGGING_SPELL_ID_TO_OBJECT_ID_MAP[spell_id] then
MMOSimca@345 2679 last_timber_spell_id = spell_id
MMOSimca@351 2680 --for timber_variant = 1, #private.LOGGING_SPELL_ID_TO_OBJECT_ID_MAP[spell_id] do
MMOSimca@351 2681 UpdateDBEntryLocation("objects", ("OPENING:%s"):format(private.LOGGING_SPELL_ID_TO_OBJECT_ID_MAP[spell_id]))
MMOSimca@351 2682 --end
MMOSimca@345 2683 return
MMOSimca@345 2684 end
MMOSimca@345 2685
MMOSimca@345 2686 -- Handle Loot Toast spell casts
jcallahan@306 2687 if private.LOOT_SPELL_ID_TO_ITEM_ID_MAP[spell_id] then
jcallahan@306 2688 ClearKilledBossID()
jcallahan@306 2689 ClearLootToastContainerID()
jcallahan@307 2690 ClearLootToastData()
jcallahan@306 2691
jcallahan@306 2692 private.loot_toast_container_id = private.LOOT_SPELL_ID_TO_ITEM_ID_MAP[spell_id]
jcallahan@306 2693 loot_toast_container_timer_handle = WDP:ScheduleTimer(ClearLootToastContainerID, 1) -- we need to assign a handle here to cancel it later
MMOSimca@345 2694 return
jcallahan@306 2695 end
jcallahan@306 2696
MMOSimca@347 2697 -- For Crates of Salvage (and potentially other items based on spell casts in the future which need manual handling)
MMOSimca@347 2698 if private.SALVAGE_SPELL_ID_TO_ITEM_ID_MAP[spell_id] then
MMOSimca@347 2699 -- Set up timer
MMOSimca@349 2700 Debug("%s: Beginning Salvage loot timer for spellID %d", event_name, spell_id)
MMOSimca@349 2701 chat_loot_timer_handle = WDP:ScheduleTimer(ClearTimeBasedLootData, 1)
MMOSimca@347 2702
MMOSimca@347 2703 -- Standard item handling setup
MMOSimca@347 2704 table.wipe(current_action)
MMOSimca@347 2705 current_loot = nil
MMOSimca@347 2706 current_action.target_type = AF.ITEM
MMOSimca@349 2707 current_action.identifier = private.SALVAGE_SPELL_ID_TO_ITEM_ID_MAP[spell_id]
MMOSimca@347 2708 current_action.loot_label = "contains"
MMOSimca@349 2709 InitializeCurrentLoot()
MMOSimca@347 2710 return
MMOSimca@347 2711 end
MMOSimca@347 2712
jcallahan@306 2713 if anvil_spell_ids[spell_id] then
jcallahan@306 2714 UpdateDBEntryLocation("objects", OBJECT_ID_ANVIL)
jcallahan@306 2715 elseif forge_spell_ids[spell_id] then
jcallahan@306 2716 UpdateDBEntryLocation("objects", OBJECT_ID_FORGE)
jcallahan@306 2717 elseif spell_name:match("^Harvest.+") then
jcallahan@306 2718 killed_npc_id = current_target_id
MMOSimca@343 2719 private.harvesting = true -- Used to track which NPCs can be harvested (can we get this from CreatureCache instead?)
jcallahan@306 2720 end
jcallahan@306 2721 end
jcallahan@0 2722
jcallahan@90 2723
jcallahan@1 2724 function WDP:HandleSpellFailure(event_name, unit_id, spell_name, spell_rank, spell_line, spell_id)
jcallahan@1 2725 if unit_id ~= "player" then
jcallahan@1 2726 return
jcallahan@1 2727 end
jcallahan@0 2728
jcallahan@1 2729 if private.tracked_line == spell_line then
jcallahan@1 2730 private.tracked_line = nil
jcallahan@1 2731 end
jcallahan@147 2732 table.wipe(current_action)
jcallahan@0 2733 end
jcallahan@90 2734
jcallahan@90 2735
jcallahan@90 2736 do
jcallahan@90 2737 local function SetUnitField(field, required_type)
jcallahan@90 2738 local unit_type, unit_idnum = ParseGUID(_G.UnitGUID("npc"))
jcallahan@90 2739
jcallahan@90 2740 if not unit_idnum or (required_type and unit_type ~= required_type) then
jcallahan@90 2741 return
jcallahan@90 2742 end
jcallahan@90 2743
jcallahan@171 2744 if UnitTypeIsNPC(unit_type) then
jcallahan@90 2745 NPCEntry(unit_idnum)[field] = true
jcallahan@90 2746 elseif unit_type == private.UNIT_TYPES.OBJECT then
jcallahan@90 2747 DBEntry("objects", unit_idnum)[field] = true
jcallahan@93 2748 UpdateDBEntryLocation("objects", unit_idnum)
jcallahan@90 2749 end
jcallahan@90 2750 end
jcallahan@90 2751
jcallahan@90 2752
jcallahan@90 2753 function WDP:AUCTION_HOUSE_SHOW(event_name)
jcallahan@90 2754 SetUnitField("auctioneer", private.UNIT_TYPES.NPC)
jcallahan@90 2755 end
jcallahan@90 2756
jcallahan@90 2757
jcallahan@90 2758 function WDP:BANKFRAME_OPENED(event_name)
jcallahan@90 2759 SetUnitField("banker", private.UNIT_TYPES.NPC)
jcallahan@90 2760 end
jcallahan@90 2761
jcallahan@90 2762
jcallahan@90 2763 function WDP:BATTLEFIELDS_SHOW(event_name)
jcallahan@90 2764 SetUnitField("battlemaster", private.UNIT_TYPES.NPC)
jcallahan@90 2765 end
jcallahan@90 2766
jcallahan@90 2767
jcallahan@92 2768 function WDP:FORGE_MASTER_OPENED(event_name)
jcallahan@90 2769 SetUnitField("arcane_reforger", private.UNIT_TYPES.NPC)
jcallahan@90 2770 end
jcallahan@90 2771
jcallahan@90 2772
jcallahan@323 2773 local GOSSIP_SHOW_FUNCS = {
jcallahan@323 2774 [private.UNIT_TYPES.NPC] = function(unit_idnum)
jcallahan@323 2775 local gossip_options = { _G.GetGossipOptions() }
jcallahan@323 2776
jcallahan@323 2777 for index = 2, #gossip_options, 2 do
jcallahan@323 2778 if gossip_options[index] == "binder" then
jcallahan@323 2779 SetUnitField("innkeeper", private.UNIT_TYPES.NPC)
jcallahan@323 2780 return
jcallahan@323 2781 end
jcallahan@323 2782 end
jcallahan@323 2783 end,
jcallahan@323 2784 [private.UNIT_TYPES.OBJECT] = function(unit_idnum)
jcallahan@323 2785 UpdateDBEntryLocation("objects", unit_idnum)
jcallahan@323 2786 end,
jcallahan@323 2787 }
jcallahan@323 2788
jcallahan@323 2789
jcallahan@92 2790 function WDP:GOSSIP_SHOW(event_name)
jcallahan@323 2791 local unit_type, unit_idnum = ParseGUID(_G.UnitGUID("npc"))
jcallahan@323 2792 if not unit_idnum then
jcallahan@323 2793 return
jcallahan@323 2794 end
jcallahan@323 2795
jcallahan@323 2796 if GOSSIP_SHOW_FUNCS[unit_type] then
jcallahan@323 2797 GOSSIP_SHOW_FUNCS[unit_type](unit_idnum)
jcallahan@90 2798 end
jcallahan@90 2799 end
jcallahan@90 2800
jcallahan@90 2801
jcallahan@93 2802 function WDP:GUILDBANKFRAME_OPENED(event_name)
jcallahan@93 2803 SetUnitField("guild_bank", private.UNIT_TYPES.OBJECT)
jcallahan@93 2804 end
jcallahan@93 2805
jcallahan@93 2806
jcallahan@189 2807 function WDP:ITEM_UPGRADE_MASTER_OPENED(event_name)
jcallahan@189 2808 SetUnitField("item_upgrade_master", private.UNIT_TYPES.NPC)
jcallahan@189 2809 end
jcallahan@189 2810
jcallahan@189 2811
jcallahan@90 2812 function WDP:TAXIMAP_OPENED(event_name)
jcallahan@90 2813 SetUnitField("flight_master", private.UNIT_TYPES.NPC)
jcallahan@90 2814 end
jcallahan@90 2815
jcallahan@90 2816
jcallahan@90 2817 function WDP:TRANSMOGRIFY_OPEN(event_name)
jcallahan@90 2818 SetUnitField("transmogrifier", private.UNIT_TYPES.NPC)
jcallahan@90 2819 end
jcallahan@90 2820
jcallahan@90 2821
jcallahan@90 2822 function WDP:VOID_STORAGE_OPEN(event_name)
jcallahan@90 2823 SetUnitField("void_storage", private.UNIT_TYPES.NPC)
jcallahan@90 2824 end
jcallahan@90 2825 end -- do-block