Mercurial > wow > wowdb-profiler

annotate Main.lua @ 354:e13723c37ca4 WoD

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