Mercurial > wow > wowdb-profiler

annotate Main.lua @ 459:22f08f6717ea

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