Mercurial > wow > wowdb-profiler

annotate Main.lua @ 356:ef2e97c210c6 WoD

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