wow/wowdb-profiler: Main.lua annotate

annotate Main.lua @ 346:04343b25c612 WoD

Reverted change to debug variable.

author	MMOSimca <MMOSimca@gmail.com>
date	Fri, 03 Oct 2014 15:25:40 -0400
parents	61a9520b5337
children	fb1d08480f67

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

Mercurial > wow > wowdb-profiler

annotate Main.lua @ 346:04343b25c612 WoD