Mercurial > wow > wowdb-profiler

annotate Main.lua @ 468:0997fb63abeb

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