Mercurial > wow > wowdb-profiler

annotate Main.lua @ 366:7e7d57948295

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