Mercurial > wow > wowdb-profiler

annotate Main.lua @ 387:b4a0a56ab3ae

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