Mercurial > wow > wowdb-profiler

annotate Main.lua @ 219:09d8ee2c1551

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Record stats for items with upgrade IDs, skipping those which have been reforged for now. Upped DB_VERSION to 15.
author James D. Callahan III <jcallahan@curse.com>
date Fri, 25 Jan 2013 15:47:56 -0600
parents 54e268151cd2
children 62434c87d375
rev   line source
jcallahan@0 1 -----------------------------------------------------------------------
jcallahan@0 2 -- Upvalued Lua API.
jcallahan@0 3 -----------------------------------------------------------------------
jcallahan@0 4 local _G = getfenv(0)
jcallahan@0 5
jcallahan@0 6 local pairs = _G.pairs
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@78 13 local select = _G.select
jcallahan@78 14
jcallahan@0 15
jcallahan@0 16 -----------------------------------------------------------------------
jcallahan@0 17 -- AddOn namespace.
jcallahan@0 18 -----------------------------------------------------------------------
jcallahan@0 19 local ADDON_NAME, private = ...
jcallahan@0 20
jcallahan@0 21 local LibStub = _G.LibStub
jcallahan@0 22 local WDP = LibStub("AceAddon-3.0"):NewAddon(ADDON_NAME, "AceEvent-3.0", "AceTimer-3.0")
jcallahan@0 23
jcallahan@48 24 local deformat = LibStub("LibDeformat-3.0")
jcallahan@115 25 local LPJ = LibStub("LibPetJournal-2.0")
jcallahan@141 26 local MapData = LibStub("LibMapData-1.0")
jcallahan@48 27
jcallahan@4 28 local DatamineTT = _G.CreateFrame("GameTooltip", "WDPDatamineTT", _G.UIParent, "GameTooltipTemplate")
jcallahan@5 29 DatamineTT:SetOwner(_G.WorldFrame, "ANCHOR_NONE")
jcallahan@5 30
jcallahan@0 31
jcallahan@0 32 -----------------------------------------------------------------------
jcallahan@0 33 -- Local constants.
jcallahan@0 34 -----------------------------------------------------------------------
jcallahan@219 35 local DB_VERSION = 15
jcallahan@151 36 local DEBUGGING = false
jcallahan@156 37 local EVENT_DEBUG = false
jcallahan@92 38
jcallahan@157 39
jcallahan@0 40 local DATABASE_DEFAULTS = {
jcallahan@128 41 char = {},
jcallahan@0 42 global = {
jcallahan@0 43 items = {},
jcallahan@0 44 npcs = {},
jcallahan@0 45 objects = {},
jcallahan@0 46 quests = {},
jcallahan@167 47 spells = {},
jcallahan@17 48 zones = {},
jcallahan@0 49 }
jcallahan@0 50 }
jcallahan@0 51
jcallahan@0 52
jcallahan@1 53 local EVENT_MAPPING = {
jcallahan@90 54 AUCTION_HOUSE_SHOW = true,
jcallahan@90 55 BANKFRAME_OPENED = true,
jcallahan@90 56 BATTLEFIELDS_SHOW = true,
jcallahan@56 57 BLACK_MARKET_ITEM_UPDATE = true,
jcallahan@48 58 CHAT_MSG_LOOT = true,
jcallahan@95 59 CHAT_MSG_MONSTER_SAY = "RecordQuote",
jcallahan@95 60 CHAT_MSG_MONSTER_WHISPER = "RecordQuote",
jcallahan@95 61 CHAT_MSG_MONSTER_YELL = "RecordQuote",
jcallahan@40 62 CHAT_MSG_SYSTEM = true,
jcallahan@23 63 COMBAT_LOG_EVENT_UNFILTERED = true,
jcallahan@18 64 COMBAT_TEXT_UPDATE = true,
jcallahan@140 65 CURSOR_UPDATE = true,
jcallahan@90 66 FORGE_MASTER_OPENED = true,
jcallahan@90 67 GOSSIP_SHOW = true,
jcallahan@93 68 GUILDBANKFRAME_OPENED = true,
jcallahan@42 69 ITEM_TEXT_BEGIN = true,
jcallahan@189 70 ITEM_UPGRADE_MASTER_OPENED = true,
jcallahan@124 71 LOOT_CLOSED = true,
jcallahan@1 72 LOOT_OPENED = true,
jcallahan@89 73 MAIL_SHOW = true,
jcallahan@133 74 MERCHANT_CLOSED = true,
jcallahan@7 75 MERCHANT_SHOW = "UpdateMerchantItems",
jcallahan@61 76 MERCHANT_UPDATE = "UpdateMerchantItems",
jcallahan@25 77 PET_BAR_UPDATE = true,
jcallahan@115 78 PET_JOURNAL_LIST_UPDATE = true,
jcallahan@156 79 PLAYER_REGEN_DISABLED = true,
jcallahan@156 80 PLAYER_REGEN_ENABLED = true,
jcallahan@2 81 PLAYER_TARGET_CHANGED = true,
jcallahan@9 82 QUEST_COMPLETE = true,
jcallahan@9 83 QUEST_DETAIL = true,
jcallahan@9 84 QUEST_LOG_UPDATE = true,
jcallahan@97 85 QUEST_PROGRESS = true,
jcallahan@178 86 SHOW_LOOT_TOAST = true,
jcallahan@88 87 TAXIMAP_OPENED = true,
jcallahan@92 88 TRADE_SKILL_SHOW = true,
jcallahan@167 89 TRAINER_CLOSED = true,
jcallahan@27 90 TRAINER_SHOW = true,
jcallahan@90 91 TRANSMOGRIFY_OPEN = true,
jcallahan@4 92 UNIT_QUEST_LOG_CHANGED = true,
jcallahan@1 93 UNIT_SPELLCAST_FAILED = "HandleSpellFailure",
jcallahan@1 94 UNIT_SPELLCAST_FAILED_QUIET = "HandleSpellFailure",
jcallahan@1 95 UNIT_SPELLCAST_INTERRUPTED = "HandleSpellFailure",
jcallahan@1 96 UNIT_SPELLCAST_SENT = true,
jcallahan@1 97 UNIT_SPELLCAST_SUCCEEDED = true,
jcallahan@90 98 VOID_STORAGE_OPEN = true,
jcallahan@129 99 ZONE_CHANGED = "SetCurrentAreaID",
jcallahan@129 100 ZONE_CHANGED_INDOORS = "SetCurrentAreaID",
jcallahan@129 101 ZONE_CHANGED_NEW_AREA = "SetCurrentAreaID",
jcallahan@0 102 }
jcallahan@0 103
jcallahan@4 104
jcallahan@92 105 local OBJECT_ID_ANVIL = 192628
jcallahan@92 106 local OBJECT_ID_FORGE = 1685
jcallahan@92 107
jcallahan@92 108
jcallahan@1 109 local AF = private.ACTION_TYPE_FLAGS
jcallahan@0 110
jcallahan@4 111
jcallahan@27 112 local PLAYER_CLASS = _G.select(2, _G.UnitClass("player"))
jcallahan@100 113 local PLAYER_FACTION = _G.UnitFactionGroup("player")
jcallahan@34 114 local PLAYER_GUID = _G.UnitGUID("player")
jcallahan@95 115 local PLAYER_NAME = _G.UnitName("player")
jcallahan@39 116 local PLAYER_RACE = _G.select(2, _G.UnitRace("player"))
jcallahan@27 117
jcallahan@95 118
jcallahan@112 119 local CLIENT_LOCALE = _G.GetLocale()
jcallahan@112 120
jcallahan@112 121
jcallahan@112 122 local ALLOWED_LOCALES = {
jcallahan@112 123 enUS = true,
jcallahan@112 124 enGB = true,
jcallahan@112 125 }
jcallahan@112 126
jcallahan@112 127
jcallahan@0 128 -----------------------------------------------------------------------
jcallahan@0 129 -- Local variables.
jcallahan@0 130 -----------------------------------------------------------------------
jcallahan@92 131 local anvil_spell_ids = {}
jcallahan@92 132 local currently_drunk
jcallahan@128 133 local char_db
jcallahan@128 134 local global_db
jcallahan@187 135 local item_process_timer_handle
jcallahan@92 136 local faction_standings = {}
jcallahan@92 137 local forge_spell_ids = {}
jcallahan@95 138 local languages_known = {}
jcallahan@95 139 local name_to_id_map = {}
jcallahan@177 140 local killed_npc_id
jcallahan@2 141 local target_location_timer_handle
jcallahan@86 142 local current_target_id
jcallahan@126 143 local current_area_id
jcallahan@131 144 local current_loot
jcallahan@1 145
jcallahan@121 146 -----------------------------------------------------------------------
jcallahan@121 147 -- Data for our current action. Including possible values as a reference.
jcallahan@121 148 -----------------------------------------------------------------------
jcallahan@122 149 local current_action = {
jcallahan@121 150 identifier = nil,
jcallahan@121 151 loot_label = nil,
jcallahan@121 152 loot_list = nil,
jcallahan@121 153 loot_sources = nil,
jcallahan@121 154 map_level = nil,
jcallahan@121 155 spell_label = nil,
jcallahan@123 156 target_type = nil,
jcallahan@121 157 x = nil,
jcallahan@121 158 y = nil,
jcallahan@121 159 zone_data = nil,
jcallahan@121 160 }
jcallahan@92 161
jcallahan@1 162 -----------------------------------------------------------------------
jcallahan@1 163 -- Helper Functions.
jcallahan@1 164 -----------------------------------------------------------------------
jcallahan@151 165 local function Debug(...)
jcallahan@151 166 if not DEBUGGING then
jcallahan@151 167 return
jcallahan@151 168 end
jcallahan@151 169 _G.print(...)
jcallahan@151 170 end
jcallahan@151 171
jcallahan@151 172
jcallahan@169 173 local TradeSkillExecutePer
jcallahan@169 174 do
jcallahan@169 175 local header_list = {}
jcallahan@169 176
jcallahan@169 177 -- iter_func returns true to indicate that the loop should be broken
jcallahan@169 178 function TradeSkillExecutePer(iter_func)
jcallahan@169 179 if not _G.TradeSkillFrame or not _G.TradeSkillFrame:IsVisible() then
jcallahan@169 180 return
jcallahan@169 181 end
jcallahan@167 182 -- Clear the search box focus so the scan will have correct results.
jcallahan@167 183 local search_box = _G.TradeSkillFrameSearchBox
jcallahan@167 184 search_box:SetText("")
jcallahan@169 185
jcallahan@167 186 _G.TradeSkillSearch_OnTextChanged(search_box)
jcallahan@167 187 search_box:ClearFocus()
jcallahan@167 188 search_box:GetScript("OnEditFocusLost")(search_box)
jcallahan@169 189
jcallahan@169 190 table.wipe(header_list)
jcallahan@169 191
jcallahan@169 192 -- Save the current state of the TradeSkillFrame so it can be restored after we muck with it.
jcallahan@169 193 local have_materials = _G.TradeSkillFrame.filterTbl.hasMaterials
jcallahan@169 194 local have_skillup = _G.TradeSkillFrame.filterTbl.hasSkillUp
jcallahan@169 195
jcallahan@169 196 if have_materials then
jcallahan@169 197 _G.TradeSkillFrame.filterTbl.hasMaterials = false
jcallahan@169 198 _G.TradeSkillOnlyShowMakeable(false)
jcallahan@169 199 end
jcallahan@169 200
jcallahan@169 201 if have_skillup then
jcallahan@169 202 _G.TradeSkillFrame.filterTbl.hasSkillUp = false
jcallahan@169 203 _G.TradeSkillOnlyShowSkillUps(false)
jcallahan@169 204 end
jcallahan@169 205 _G.SetTradeSkillInvSlotFilter(0, 1, 1)
jcallahan@169 206 _G.TradeSkillUpdateFilterBar()
jcallahan@169 207 _G.TradeSkillFrame_Update()
jcallahan@169 208
jcallahan@169 209 -- Expand all headers so we can see all the recipes there are
jcallahan@169 210 for tradeskill_index = 1, _G.GetNumTradeSkills() do
jcallahan@169 211 local name, tradeskill_type, _, is_expanded = _G.GetTradeSkillInfo(tradeskill_index)
jcallahan@169 212
jcallahan@169 213 if tradeskill_type == "header" or tradeskill_type == "subheader" then
jcallahan@169 214 if not is_expanded then
jcallahan@169 215 header_list[name] = true
jcallahan@169 216 _G.ExpandTradeSkillSubClass(tradeskill_index)
jcallahan@169 217 end
jcallahan@169 218 elseif iter_func(name, tradeskill_index) then
jcallahan@169 219 break
jcallahan@169 220 end
jcallahan@169 221 end
jcallahan@169 222
jcallahan@169 223 -- Restore the state of the things we changed.
jcallahan@169 224 for tradeskill_index = 1, _G.GetNumTradeSkills() do
jcallahan@169 225 local name, tradeskill_type, _, is_expanded = _G.GetTradeSkillInfo(tradeskill_index)
jcallahan@169 226
jcallahan@169 227 if header_list[name] then
jcallahan@169 228 _G.CollapseTradeSkillSubClass(tradeskill_index)
jcallahan@169 229 end
jcallahan@169 230 end
jcallahan@169 231 _G.TradeSkillFrame.filterTbl.hasMaterials = have_materials
jcallahan@169 232 _G.TradeSkillOnlyShowMakeable(have_materials)
jcallahan@169 233 _G.TradeSkillFrame.filterTbl.hasSkillUp = have_skillup
jcallahan@169 234 _G.TradeSkillOnlyShowSkillUps(have_skillup)
jcallahan@169 235
jcallahan@169 236 _G.TradeSkillUpdateFilterBar()
jcallahan@169 237 _G.TradeSkillFrame_Update()
jcallahan@167 238 end
jcallahan@169 239 end -- do-block
jcallahan@167 240
jcallahan@167 241
jcallahan@39 242 local ActualCopperCost
jcallahan@39 243 do
jcallahan@39 244 local BARTERING_SPELL_ID = 83964
jcallahan@39 245
jcallahan@39 246 local STANDING_DISCOUNTS = {
jcallahan@39 247 HATED = 0,
jcallahan@39 248 HOSTILE = 0,
jcallahan@39 249 UNFRIENDLY = 0,
jcallahan@39 250 NEUTRAL = 0,
jcallahan@39 251 FRIENDLY = 0.05,
jcallahan@39 252 HONORED = 0.1,
jcallahan@39 253 REVERED = 0.15,
jcallahan@39 254 EXALTED = 0.2,
jcallahan@39 255 }
jcallahan@39 256
jcallahan@39 257
jcallahan@39 258 function ActualCopperCost(copper_cost, rep_standing)
jcallahan@39 259 if not copper_cost or copper_cost == 0 then
jcallahan@39 260 return 0
jcallahan@39 261 end
jcallahan@39 262 local modifier = 1
jcallahan@39 263
jcallahan@39 264 if _G.IsSpellKnown(BARTERING_SPELL_ID) then
jcallahan@39 265 modifier = modifier - 0.1
jcallahan@39 266 end
jcallahan@39 267
jcallahan@39 268 if rep_standing then
jcallahan@39 269 if PLAYER_RACE == "Goblin" then
jcallahan@39 270 modifier = modifier - STANDING_DISCOUNTS["EXALTED"]
jcallahan@39 271 elseif STANDING_DISCOUNTS[rep_standing] then
jcallahan@39 272 modifier = modifier - STANDING_DISCOUNTS[rep_standing]
jcallahan@39 273 end
jcallahan@39 274 end
jcallahan@39 275 return math.floor(copper_cost / modifier)
jcallahan@39 276 end
jcallahan@39 277 end -- do-block
jcallahan@39 278
jcallahan@39 279
jcallahan@153 280 -- Called on a timer
jcallahan@177 281 local function ClearKilledNPC()
jcallahan@177 282 killed_npc_id = nil
jcallahan@177 283 end
jcallahan@177 284
jcallahan@177 285
jcallahan@203 286 local function ClearKilledBossID()
jcallahan@203 287 private.raid_finder_boss_id = nil
jcallahan@203 288 private.world_boss_id = nil
jcallahan@203 289 end
jcallahan@203 290
jcallahan@203 291
jcallahan@177 292 local function IsRaidFinderInstance(instance_type, instance_difficulty)
jcallahan@177 293 return instance_type == "raid" and instance_difficulty == 2 and _G.IsPartyLFG() and _G.IsInLFGDungeon()
jcallahan@153 294 end
jcallahan@153 295
jcallahan@153 296
jcallahan@29 297 local function InstanceDifficultyToken()
jcallahan@29 298 local _, instance_type, instance_difficulty, difficulty_name, _, _, is_dynamic = _G.GetInstanceInfo()
jcallahan@59 299 if not difficulty_name or difficulty_name == "" then
jcallahan@29 300 difficulty_name = "NONE"
jcallahan@29 301 end
jcallahan@59 302
jcallahan@59 303 if not instance_type or instance_type == "" then
jcallahan@59 304 instance_type = "NONE"
jcallahan@59 305 end
jcallahan@137 306
jcallahan@137 307 -- Raid difficulty of 2 is 25-man
jcallahan@177 308 if IsRaidFinderInstance(instance_type, instance_difficulty) then
jcallahan@137 309 difficulty_name = "LOOKING_FOR_RAID"
jcallahan@137 310 end
jcallahan@29 311 return ("%s:%s:%s"):format(instance_type:upper(), difficulty_name:upper():gsub(" ", "_"), _G.tostring(is_dynamic))
jcallahan@29 312 end
jcallahan@29 313
jcallahan@29 314
jcallahan@19 315 local function DBEntry(data_type, unit_id)
jcallahan@19 316 if not data_type or not unit_id then
jcallahan@6 317 return
jcallahan@6 318 end
jcallahan@128 319 local unit = global_db[data_type][unit_id]
jcallahan@6 320
jcallahan@10 321 if not unit then
jcallahan@187 322 unit = {}
jcallahan@187 323 global_db[data_type][unit_id] = unit
jcallahan@6 324 end
jcallahan@10 325 return unit
jcallahan@6 326 end
jcallahan@6 327
jcallahan@214 328 local NPCEntry
jcallahan@214 329 do
jcallahan@214 330 local npc_prototype = {}
jcallahan@214 331 local npc_meta = {
jcallahan@214 332 __index = npc_prototype
jcallahan@214 333 }
jcallahan@6 334
jcallahan@214 335 function NPCEntry(identifier)
jcallahan@214 336 local npc = _G.setmetatable(DBEntry("npcs", identifier), npc_meta)
jcallahan@29 337
jcallahan@214 338 if not npc then
jcallahan@214 339 return
jcallahan@214 340 end
jcallahan@214 341 return npc
jcallahan@22 342 end
jcallahan@214 343
jcallahan@214 344 function npc_prototype:EncounterData()
jcallahan@214 345 local instance_token = InstanceDifficultyToken()
jcallahan@214 346 self.encounter_data = self.encounter_data or {}
jcallahan@214 347 self.encounter_data[instance_token] = self.encounter_data[instance_token] or {}
jcallahan@214 348 self.encounter_data[instance_token].stats = self.encounter_data[instance_token].stats or {}
jcallahan@214 349
jcallahan@214 350 return self.encounter_data
jcallahan@214 351 end
jcallahan@22 352 end
jcallahan@22 353
jcallahan@22 354
jcallahan@1 355 local function CurrentLocationData()
jcallahan@161 356 if _G.GetCurrentMapAreaID() ~= current_area_id then
jcallahan@145 357 return _G.GetRealZoneText(), current_area_id, 0, 0, 0, InstanceDifficultyToken()
jcallahan@145 358 end
jcallahan@1 359 local map_level = _G.GetCurrentMapDungeonLevel() or 0
jcallahan@1 360 local x, y = _G.GetPlayerMapPosition("player")
jcallahan@1 361
jcallahan@1 362 x = x or 0
jcallahan@1 363 y = y or 0
jcallahan@1 364
jcallahan@1 365 if x == 0 and y == 0 then
jcallahan@1 366 for level_index = 1, _G.GetNumDungeonMapLevels() do
jcallahan@1 367 _G.SetDungeonMapLevel(level_index)
jcallahan@1 368 x, y = _G.GetPlayerMapPosition("player")
jcallahan@1 369
jcallahan@1 370 if x and y and (x > 0 or y > 0) then
jcallahan@1 371 _G.SetDungeonMapLevel(map_level)
jcallahan@1 372 map_level = level_index
jcallahan@1 373 break
jcallahan@1 374 end
jcallahan@1 375 end
jcallahan@1 376 end
jcallahan@1 377
jcallahan@1 378 if _G.DungeonUsesTerrainMap() then
jcallahan@1 379 map_level = map_level - 1
jcallahan@1 380 end
jcallahan@31 381 local x = _G.floor(x * 1000)
jcallahan@31 382 local y = _G.floor(y * 1000)
jcallahan@28 383
jcallahan@31 384 if x % 2 ~= 0 then
jcallahan@31 385 x = x + 1
jcallahan@28 386 end
jcallahan@28 387
jcallahan@31 388 if y % 2 ~= 0 then
jcallahan@31 389 y = y + 1
jcallahan@28 390 end
jcallahan@126 391 return _G.GetRealZoneText(), current_area_id, x, y, map_level, InstanceDifficultyToken()
jcallahan@1 392 end
jcallahan@1 393
jcallahan@1 394
jcallahan@1 395 local function ItemLinkToID(item_link)
jcallahan@1 396 if not item_link then
jcallahan@1 397 return
jcallahan@1 398 end
jcallahan@7 399 return tonumber(item_link:match("item:(%d+)"))
jcallahan@1 400 end
jcallahan@0 401
jcallahan@4 402
jcallahan@171 403 local function UnitTypeIsNPC(unit_type)
jcallahan@171 404 return unit_type == private.UNIT_TYPES.NPC or unit_type == private.UNIT_TYPES.VEHICLE
jcallahan@171 405 end
jcallahan@171 406
jcallahan@171 407
jcallahan@34 408 local ParseGUID
jcallahan@4 409 do
jcallahan@4 410 local UNIT_TYPE_BITMASK = 0x007
jcallahan@4 411
jcallahan@34 412 function ParseGUID(guid)
jcallahan@5 413 if not guid then
jcallahan@5 414 return
jcallahan@5 415 end
jcallahan@4 416 local types = private.UNIT_TYPES
jcallahan@4 417 local unit_type = _G.bit.band(tonumber(guid:sub(1, 5)), UNIT_TYPE_BITMASK)
jcallahan@4 418
jcallahan@10 419 if unit_type ~= types.PLAYER and unit_type ~= types.PET then
jcallahan@66 420 return unit_type, tonumber(guid:sub(6, 10), 16)
jcallahan@4 421 end
jcallahan@4 422 return unit_type
jcallahan@4 423 end
jcallahan@4 424 end -- do-block
jcallahan@4 425
jcallahan@4 426
jcallahan@141 427 local UpdateDBEntryLocation
jcallahan@141 428 do
jcallahan@141 429 local pi = math.pi
jcallahan@141 430
jcallahan@141 431 -- Fishing node coordinate code based on code in GatherMate2 with permission from Kagaro.
jcallahan@141 432 local function FishingCoordinates(x, y, yard_width, yard_height)
jcallahan@141 433 local facing = _G.GetPlayerFacing()
jcallahan@141 434
jcallahan@141 435 if not facing then
jcallahan@141 436 return x, y
jcallahan@141 437 end
jcallahan@141 438 local rad = facing + pi
jcallahan@141 439 return x + math.sin(rad) * 15 / yard_width, y + math.cos(rad) * 15 / yard_height
jcallahan@10 440 end
jcallahan@10 441
jcallahan@24 442
jcallahan@141 443 function UpdateDBEntryLocation(entry_type, identifier)
jcallahan@141 444 if not identifier then
jcallahan@141 445 return
jcallahan@141 446 end
jcallahan@141 447 local zone_name, area_id, x, y, map_level, difficulty_token = CurrentLocationData()
jcallahan@141 448 local entry = DBEntry(entry_type, identifier)
jcallahan@141 449 entry[difficulty_token] = entry[difficulty_token] or {}
jcallahan@141 450 entry[difficulty_token].locations = entry[difficulty_token].locations or {}
jcallahan@141 451
jcallahan@141 452 local zone_token = ("%s:%d"):format(zone_name, area_id)
jcallahan@141 453 local zone_data = entry[difficulty_token].locations[zone_token]
jcallahan@141 454
jcallahan@141 455 if not zone_data then
jcallahan@141 456 zone_data = {}
jcallahan@141 457 entry[difficulty_token].locations[zone_token] = zone_data
jcallahan@141 458 end
jcallahan@141 459
jcallahan@141 460 -- Special case for Fishing.
jcallahan@141 461 if current_action.spell_label == "FISHING" then
jcallahan@141 462 local yard_width, yard_height = MapData:MapArea(area_id, map_level)
jcallahan@141 463
jcallahan@141 464 if yard_width > 0 and yard_height > 0 then
jcallahan@141 465 x, y = FishingCoordinates(x, y, yard_width, yard_height)
jcallahan@141 466 current_action.x = x
jcallahan@141 467 current_action.y = y
jcallahan@141 468 end
jcallahan@141 469 end
jcallahan@141 470 local location_token = ("%d:%d:%d"):format(map_level, x, y)
jcallahan@141 471
jcallahan@141 472 zone_data[location_token] = zone_data[location_token] or true
jcallahan@141 473 return zone_data
jcallahan@10 474 end
jcallahan@141 475 end -- do-block
jcallahan@10 476
jcallahan@10 477
jcallahan@19 478 local function HandleItemUse(item_link, bag_index, slot_index)
jcallahan@19 479 if not item_link then
jcallahan@19 480 return
jcallahan@19 481 end
jcallahan@19 482 local item_id = ItemLinkToID(item_link)
jcallahan@19 483
jcallahan@19 484 if not bag_index or not slot_index then
jcallahan@19 485 for new_bag_index = 0, _G.NUM_BAG_FRAMES do
jcallahan@19 486 for new_slot_index = 1, _G.GetContainerNumSlots(new_bag_index) do
jcallahan@19 487 if item_id == ItemLinkToID(_G.GetContainerItemLink(new_bag_index, new_slot_index)) then
jcallahan@19 488 bag_index = new_bag_index
jcallahan@19 489 slot_index = new_slot_index
jcallahan@19 490 break
jcallahan@19 491 end
jcallahan@19 492 end
jcallahan@19 493 end
jcallahan@19 494 end
jcallahan@19 495
jcallahan@19 496 if not bag_index or not slot_index then
jcallahan@19 497 return
jcallahan@19 498 end
jcallahan@19 499 local _, _, _, _, _, is_lootable = _G.GetContainerItemInfo(bag_index, slot_index)
jcallahan@19 500
jcallahan@19 501 if not is_lootable then
jcallahan@19 502 return
jcallahan@19 503 end
jcallahan@19 504 DatamineTT:ClearLines()
jcallahan@19 505 DatamineTT:SetBagItem(bag_index, slot_index)
jcallahan@19 506
jcallahan@19 507 for line_index = 1, DatamineTT:NumLines() do
jcallahan@19 508 local current_line = _G["WDPDatamineTTTextLeft" .. line_index]
jcallahan@19 509
jcallahan@19 510 if not current_line then
jcallahan@19 511 break
jcallahan@19 512 end
jcallahan@19 513
jcallahan@19 514 if current_line:GetText() == _G.ITEM_OPENABLE then
jcallahan@122 515 table.wipe(current_action)
jcallahan@123 516 current_action.target_type = AF.ITEM
jcallahan@122 517 current_action.identifier = item_id
jcallahan@122 518 current_action.loot_label = "contains"
jcallahan@19 519 break
jcallahan@19 520 end
jcallahan@19 521 end
jcallahan@19 522 end
jcallahan@19 523
jcallahan@19 524
jcallahan@39 525 local UnitFactionStanding
jcallahan@32 526 local UpdateFactionData
jcallahan@32 527 do
jcallahan@32 528 local MAX_FACTION_INDEX = 1000
jcallahan@20 529
jcallahan@32 530 local STANDING_NAMES = {
jcallahan@32 531 "HATED",
jcallahan@32 532 "HOSTILE",
jcallahan@32 533 "UNFRIENDLY",
jcallahan@32 534 "NEUTRAL",
jcallahan@32 535 "FRIENDLY",
jcallahan@32 536 "HONORED",
jcallahan@32 537 "REVERED",
jcallahan@32 538 "EXALTED",
jcallahan@32 539 }
jcallahan@32 540
jcallahan@39 541
jcallahan@39 542 function UnitFactionStanding(unit)
jcallahan@135 543 local unit_name = _G.UnitName(unit)
jcallahan@39 544 UpdateFactionData()
jcallahan@39 545 DatamineTT:ClearLines()
jcallahan@39 546 DatamineTT:SetUnit(unit)
jcallahan@39 547
jcallahan@39 548 for line_index = 1, DatamineTT:NumLines() do
jcallahan@64 549 local faction_name = _G["WDPDatamineTTTextLeft" .. line_index]:GetText():trim()
jcallahan@39 550
jcallahan@135 551 if faction_name and faction_name ~= unit_name and faction_standings[faction_name] then
jcallahan@39 552 return faction_name, faction_standings[faction_name]
jcallahan@39 553 end
jcallahan@39 554 end
jcallahan@39 555 end
jcallahan@39 556
jcallahan@39 557
jcallahan@32 558 function UpdateFactionData()
jcallahan@32 559 for faction_index = 1, MAX_FACTION_INDEX do
jcallahan@32 560 local faction_name, _, current_standing, _, _, _, _, _, is_header = _G.GetFactionInfo(faction_index)
jcallahan@32 561
jcallahan@86 562 if faction_name then
jcallahan@32 563 faction_standings[faction_name] = STANDING_NAMES[current_standing]
jcallahan@32 564 elseif not faction_name then
jcallahan@32 565 break
jcallahan@32 566 end
jcallahan@20 567 end
jcallahan@20 568 end
jcallahan@32 569 end -- do-block
jcallahan@20 570
jcallahan@48 571
jcallahan@75 572 local GenericLootUpdate
jcallahan@75 573 do
jcallahan@77 574 local function LootTable(entry, loot_type, top_field)
jcallahan@75 575 if top_field then
jcallahan@75 576 entry[top_field] = entry[top_field] or {}
jcallahan@75 577 entry[top_field][loot_type] = entry[top_field][loot_type] or {}
jcallahan@75 578 return entry[top_field][loot_type]
jcallahan@75 579 end
jcallahan@48 580 entry[loot_type] = entry[loot_type] or {}
jcallahan@75 581 return entry[loot_type]
jcallahan@48 582 end
jcallahan@48 583
jcallahan@75 584 function GenericLootUpdate(data_type, top_field)
jcallahan@132 585 local loot_type = current_loot.label
jcallahan@75 586 local loot_count = ("%s_count"):format(loot_type)
jcallahan@77 587 local source_list = {}
jcallahan@75 588
jcallahan@131 589 if current_loot.sources then
jcallahan@131 590 for source_guid, loot_data in pairs(current_loot.sources) do
jcallahan@119 591 local entry, source_id
jcallahan@78 592
jcallahan@131 593 if current_loot.target_type == AF.ITEM then
jcallahan@182 594 -- Debug(("GenericLootUpdate: current_loot.identifier: '%s'"):format(tostring(current_loot.identifier)))
jcallahan@119 595 -- Items return the player as the source, so we need to use the item's ID (disenchant, milling, etc)
jcallahan@131 596 source_id = current_loot.identifier
jcallahan@119 597 entry = DBEntry(data_type, source_id)
jcallahan@131 598 elseif current_loot.target_type == AF.OBJECT then
jcallahan@131 599 source_id = ("%s:%s"):format(current_loot.spell_label, select(2, ParseGUID(source_guid)))
jcallahan@119 600 entry = DBEntry(data_type, source_id)
jcallahan@119 601 else
jcallahan@119 602 source_id = select(2, ParseGUID(source_guid))
jcallahan@119 603 entry = DBEntry(data_type, source_id)
jcallahan@119 604 end
jcallahan@75 605
jcallahan@119 606 if entry then
jcallahan@119 607 local loot_table = LootTable(entry, loot_type, top_field)
jcallahan@77 608
jcallahan@119 609 if not source_list[source_guid] then
jcallahan@119 610 if top_field then
jcallahan@119 611 entry[top_field][loot_count] = (entry[top_field][loot_count] or 0) + 1
jcallahan@119 612 else
jcallahan@119 613 entry[loot_count] = (entry[loot_count] or 0) + 1
jcallahan@119 614 end
jcallahan@119 615 source_list[source_guid] = true
jcallahan@77 616 end
jcallahan@119 617 UpdateDBEntryLocation(data_type, source_id)
jcallahan@75 618
jcallahan@119 619 for item_id, quantity in pairs(loot_data) do
jcallahan@119 620 table.insert(loot_table, ("%d:%d"):format(item_id, quantity))
jcallahan@119 621 end
jcallahan@75 622 end
jcallahan@75 623 end
jcallahan@75 624 end
jcallahan@121 625
jcallahan@121 626 -- This is used for Gas Extractions.
jcallahan@131 627 if #current_loot.list <= 0 then
jcallahan@78 628 return
jcallahan@78 629 end
jcallahan@82 630 local entry
jcallahan@82 631
jcallahan@82 632 -- At this point we only have a name if it's an object.
jcallahan@131 633 if current_loot.target_type == AF.OBJECT then
jcallahan@131 634 entry = DBEntry(data_type, ("%s:%s"):format(current_loot.spell_label, current_loot.object_name))
jcallahan@82 635 else
jcallahan@131 636 entry = DBEntry(data_type, current_loot.identifier)
jcallahan@82 637 end
jcallahan@75 638
jcallahan@75 639 if not entry then
jcallahan@75 640 return
jcallahan@75 641 end
jcallahan@77 642 local loot_table = LootTable(entry, loot_type, top_field)
jcallahan@77 643
jcallahan@131 644 if not source_list[current_loot.identifier] then
jcallahan@77 645 if top_field then
jcallahan@77 646 entry[top_field][loot_count] = (entry[top_field][loot_count] or 0) + 1
jcallahan@77 647 else
jcallahan@77 648 entry[loot_count] = (entry[loot_count] or 0) + 1
jcallahan@77 649 end
jcallahan@77 650 end
jcallahan@75 651
jcallahan@131 652 for index = 1, #current_loot.list do
jcallahan@131 653 table.insert(loot_table, current_loot.list[index])
jcallahan@75 654 end
jcallahan@48 655 end
jcallahan@75 656 end -- do-block
jcallahan@48 657
jcallahan@97 658
jcallahan@97 659 local ReplaceKeywords
jcallahan@97 660 do
jcallahan@97 661 local KEYWORD_SUBSTITUTIONS = {
jcallahan@97 662 class = PLAYER_CLASS,
jcallahan@97 663 name = PLAYER_NAME,
jcallahan@97 664 race = PLAYER_RACE,
jcallahan@97 665 }
jcallahan@97 666
jcallahan@97 667
jcallahan@97 668 function ReplaceKeywords(text)
jcallahan@97 669 if not text or text == "" then
jcallahan@97 670 return ""
jcallahan@97 671 end
jcallahan@97 672
jcallahan@97 673 for category, lookup in pairs(KEYWORD_SUBSTITUTIONS) do
jcallahan@97 674 local category_format = ("<%s>"):format(category)
jcallahan@97 675 text = text:gsub(lookup, category_format):gsub(lookup:lower(), category_format)
jcallahan@97 676 end
jcallahan@97 677 return text
jcallahan@97 678 end
jcallahan@97 679 end -- do-block
jcallahan@97 680
jcallahan@97 681
jcallahan@154 682 -- Contains a dirty hack due to Blizzard's strange handling of Micro Dungeons; GetMapInfo() will not return correct information
jcallahan@154 683 -- unless the WorldMapFrame is shown.
jcallahan@143 684 do
jcallahan@143 685 -- MapFileName = MapAreaID
jcallahan@143 686 local MICRO_DUNGEON_IDS = {
jcallahan@143 687 ShrineofTwoMoons = 903,
jcallahan@143 688 ShrineofSevenStars = 905,
jcallahan@143 689 }
jcallahan@126 690
jcallahan@143 691 function WDP:SetCurrentAreaID(event_name)
jcallahan@156 692 if private.in_combat then
jcallahan@156 693 private.set_area_id = true
jcallahan@156 694 return
jcallahan@156 695 end
jcallahan@155 696 local map_area_id = _G.GetCurrentMapAreaID()
jcallahan@155 697
jcallahan@155 698 if map_area_id == current_area_id then
jcallahan@155 699 return
jcallahan@155 700 end
jcallahan@143 701 local world_map = _G.WorldMapFrame
jcallahan@143 702 local map_visible = world_map:IsVisible()
jcallahan@143 703 local sfx_value = _G.tonumber(_G.GetCVar("Sound_EnableSFX"))
jcallahan@143 704
jcallahan@143 705 if not map_visible then
jcallahan@143 706 _G.SetCVar("Sound_EnableSFX", 0)
jcallahan@143 707 world_map:Show()
jcallahan@143 708 end
jcallahan@143 709 local micro_dungeon_id = MICRO_DUNGEON_IDS[select(5, _G.GetMapInfo())]
jcallahan@143 710
jcallahan@154 711 _G.SetMapToCurrentZone()
jcallahan@154 712
jcallahan@143 713 if micro_dungeon_id then
jcallahan@143 714 current_area_id = micro_dungeon_id
jcallahan@143 715 else
jcallahan@143 716 current_area_id = _G.GetCurrentMapAreaID()
jcallahan@143 717 end
jcallahan@143 718
jcallahan@154 719 if map_visible then
jcallahan@154 720 _G.SetMapByID(map_area_id)
jcallahan@154 721 else
jcallahan@143 722 world_map:Hide()
jcallahan@143 723 _G.SetCVar("Sound_EnableSFX", sfx_value)
jcallahan@143 724 end
jcallahan@143 725 end
jcallahan@154 726 end
jcallahan@126 727
jcallahan@0 728 -----------------------------------------------------------------------
jcallahan@0 729 -- Methods.
jcallahan@0 730 -----------------------------------------------------------------------
jcallahan@0 731 function WDP:OnInitialize()
jcallahan@128 732 local db = LibStub("AceDB-3.0"):New("WoWDBProfilerData", DATABASE_DEFAULTS, "Default")
jcallahan@128 733 global_db = db.global
jcallahan@128 734 char_db = db.char
jcallahan@14 735
jcallahan@14 736 local raw_db = _G["WoWDBProfilerData"]
jcallahan@18 737 local build_num = tonumber(private.build_num)
jcallahan@14 738
jcallahan@136 739 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 740 for entry in pairs(DATABASE_DEFAULTS.global) do
jcallahan@128 741 global_db[entry] = {}
jcallahan@74 742 end
jcallahan@74 743 end
jcallahan@35 744 raw_db.build_num = build_num
jcallahan@63 745 raw_db.version = DB_VERSION
jcallahan@0 746 end
jcallahan@0 747
jcallahan@0 748
jcallahan@153 749 function WDP:EventDispatcher(...)
jcallahan@153 750 local event_name = ...
jcallahan@153 751
jcallahan@153 752 if DEBUGGING then
jcallahan@154 753 if event_name == "COMBAT_LOG_EVENT_UNFILTERED" then
jcallahan@154 754 Debug(event_name)
jcallahan@154 755 else
jcallahan@154 756 Debug(...)
jcallahan@153 757 end
jcallahan@153 758 end
jcallahan@153 759 local func = EVENT_MAPPING[event_name]
jcallahan@153 760
jcallahan@153 761 if _G.type(func) == "boolean" then
jcallahan@153 762 self[event_name](self, ...)
jcallahan@153 763 elseif _G.type(func) == "function" then
jcallahan@159 764 self[func](self, ...)
jcallahan@153 765 end
jcallahan@153 766 end
jcallahan@153 767
jcallahan@153 768
jcallahan@0 769 function WDP:OnEnable()
jcallahan@0 770 for event_name, mapping in pairs(EVENT_MAPPING) do
jcallahan@156 771 if EVENT_DEBUG then
jcallahan@153 772 self:RegisterEvent(event_name, "EventDispatcher")
jcallahan@153 773 else
jcallahan@153 774 self:RegisterEvent(event_name, (_G.type(mapping) ~= "boolean") and mapping or nil)
jcallahan@153 775 end
jcallahan@0 776 end
jcallahan@95 777
jcallahan@95 778 for index = 1, _G.GetNumLanguages() do
jcallahan@95 779 languages_known[_G.GetLanguageByIndex(index)] = true
jcallahan@95 780 end
jcallahan@187 781 item_process_timer_handle = self:ScheduleRepeatingTimer("ProcessItems", 30)
jcallahan@31 782 target_location_timer_handle = self:ScheduleRepeatingTimer("UpdateTargetLocation", 0.5)
jcallahan@19 783
jcallahan@19 784 _G.hooksecurefunc("UseContainerItem", function(bag_index, slot_index, target_unit)
jcallahan@19 785 if target_unit then
jcallahan@19 786 return
jcallahan@19 787 end
jcallahan@19 788 HandleItemUse(_G.GetContainerItemLink(bag_index, slot_index), bag_index, slot_index)
jcallahan@19 789 end)
jcallahan@19 790
jcallahan@19 791 _G.hooksecurefunc("UseItemByName", function(identifier, target_unit)
jcallahan@19 792 if target_unit then
jcallahan@19 793 return
jcallahan@19 794 end
jcallahan@19 795 local _, item_link = _G.GetItemInfo(identifier)
jcallahan@19 796 HandleItemUse(item_link)
jcallahan@19 797 end)
jcallahan@129 798 self:SetCurrentAreaID("OnEnable")
jcallahan@0 799 end
jcallahan@0 800
jcallahan@0 801
jcallahan@219 802 local ScrapeItemUpgradeStats
jcallahan@219 803 do
jcallahan@219 804 local intermediary = {}
jcallahan@219 805
jcallahan@219 806 function ScrapeItemUpgradeStats(item_id, item_link, upgrade_id)
jcallahan@219 807 local create_entry
jcallahan@219 808
jcallahan@219 809 table.wipe(intermediary)
jcallahan@219 810 DatamineTT:SetHyperlink(item_link)
jcallahan@219 811
jcallahan@219 812 for line_index = 1, DatamineTT:NumLines() do
jcallahan@219 813 local left_text = _G["WDPDatamineTTTextLeft" .. line_index]:GetText()
jcallahan@219 814
jcallahan@219 815 if not left_text then
jcallahan@219 816 return
jcallahan@219 817 end
jcallahan@219 818 local amount, stat = left_text:match("+(.-) (.*)")
jcallahan@219 819
jcallahan@219 820 if amount and stat then
jcallahan@219 821 if stat:find("Reforged") then
jcallahan@219 822 return
jcallahan@219 823 end
jcallahan@219 824 create_entry = true
jcallahan@219 825 intermediary[stat:lower():gsub(" ", "_"):gsub("|r", "")] = tonumber(amount)
jcallahan@219 826 end
jcallahan@219 827 end
jcallahan@219 828
jcallahan@219 829 if not create_entry then
jcallahan@219 830 return
jcallahan@219 831 end
jcallahan@219 832 local item = DBEntry("items", item_id)
jcallahan@219 833 item.upgrades = item.upgrades or {}
jcallahan@219 834 item.upgrades[upgrade_id] = item.upgrades[upgrade_id] or {}
jcallahan@219 835
jcallahan@219 836 for stat, amount in pairs(intermediary) do
jcallahan@219 837 item.upgrades[upgrade_id][stat] = amount
jcallahan@219 838 end
jcallahan@219 839 end
jcallahan@219 840 end -- do-block
jcallahan@219 841
jcallahan@219 842
jcallahan@187 843 local function RecordItemData(item_id, item_link, durability)
jcallahan@191 844 local item_string = select(3, item_link:find("^|%x+|H(.+)|h%[.+%]"))
jcallahan@219 845 local item
jcallahan@0 846
jcallahan@191 847 if item_string then
jcallahan@199 848 local _, _, _, _, _, _, _, suffix_id, unique_id, _, _, upgrade_id = (":"):split(item_string)
jcallahan@201 849 suffix_id = tonumber(suffix_id)
jcallahan@219 850 upgrade_id = tonumber(upgrade_id)
jcallahan@199 851
jcallahan@201 852 if suffix_id and suffix_id ~= 0 then
jcallahan@219 853 item = DBEntry("items", item_id)
jcallahan@201 854 item.suffix_id = suffix_id
jcallahan@201 855 item.unique_id = bit.band(unique_id, 0xFFFF)
jcallahan@201 856 end
jcallahan@191 857
jcallahan@219 858 if upgrade_id and upgrade_id ~= 0 then
jcallahan@219 859 ScrapeItemUpgradeStats(item_id, item_link, upgrade_id)
jcallahan@191 860 end
jcallahan@0 861 end
jcallahan@212 862
jcallahan@212 863 if durability and durability > 0 then
jcallahan@219 864 item = item or DBEntry("items", item_id)
jcallahan@212 865 item.durability = durability
jcallahan@212 866 end
jcallahan@0 867 end
jcallahan@0 868
jcallahan@0 869
jcallahan@187 870 function WDP:ProcessItems()
jcallahan@187 871 for slot_index = _G.INVSLOT_FIRST_EQUIPPED, _G.INVSLOT_LAST_EQUIPPED do
jcallahan@1 872 local item_id = _G.GetInventoryItemID("player", slot_index)
jcallahan@0 873
jcallahan@0 874 if item_id and item_id > 0 then
jcallahan@1 875 local _, max_durability = _G.GetInventoryItemDurability(slot_index)
jcallahan@187 876 RecordItemData(item_id, _G.GetInventoryItemLink("player", slot_index), max_durability)
jcallahan@0 877 end
jcallahan@0 878 end
jcallahan@0 879
jcallahan@0 880 for bag_index = 0, _G.NUM_BAG_SLOTS do
jcallahan@0 881 for slot_index = 1, _G.GetContainerNumSlots(bag_index) do
jcallahan@1 882 local item_id = _G.GetContainerItemID(bag_index, slot_index)
jcallahan@0 883
jcallahan@0 884 if item_id and item_id > 0 then
jcallahan@1 885 local _, max_durability = _G.GetContainerItemDurability(bag_index, slot_index)
jcallahan@187 886 RecordItemData(item_id, _G.GetContainerItemLink(bag_index, slot_index), max_durability)
jcallahan@0 887 end
jcallahan@0 888 end
jcallahan@0 889 end
jcallahan@0 890 end
jcallahan@0 891
jcallahan@118 892
jcallahan@215 893 local TargetedNPC
jcallahan@118 894 do
jcallahan@118 895 local GENDER_NAMES = {
jcallahan@118 896 "UNKNOWN",
jcallahan@118 897 "MALE",
jcallahan@118 898 "FEMALE",
jcallahan@118 899 }
jcallahan@118 900
jcallahan@118 901
jcallahan@118 902 local REACTION_NAMES = {
jcallahan@118 903 "HATED",
jcallahan@118 904 "HOSTILE",
jcallahan@118 905 "UNFRIENDLY",
jcallahan@118 906 "NEUTRAL",
jcallahan@118 907 "FRIENDLY",
jcallahan@118 908 "HONORED",
jcallahan@118 909 "REVERED",
jcallahan@118 910 "EXALTED",
jcallahan@118 911 }
jcallahan@118 912
jcallahan@118 913
jcallahan@118 914 local POWER_TYPE_NAMES = {
jcallahan@118 915 ["0"] = "MANA",
jcallahan@118 916 ["1"] = "RAGE",
jcallahan@118 917 ["2"] = "FOCUS",
jcallahan@118 918 ["3"] = "ENERGY",
jcallahan@118 919 ["6"] = "RUNIC_POWER",
jcallahan@118 920 }
jcallahan@118 921
jcallahan@118 922
jcallahan@215 923 function TargetedNPC()
jcallahan@118 924 if not _G.UnitExists("target") or _G.UnitPlayerControlled("target") or currently_drunk then
jcallahan@118 925 current_target_id = nil
jcallahan@118 926 return
jcallahan@118 927 end
jcallahan@118 928 local unit_type, unit_idnum = ParseGUID(_G.UnitGUID("target"))
jcallahan@118 929
jcallahan@171 930 if not unit_idnum or not UnitTypeIsNPC(unit_type) then
jcallahan@118 931 return
jcallahan@118 932 end
jcallahan@118 933 current_target_id = unit_idnum
jcallahan@118 934
jcallahan@118 935 local npc = NPCEntry(unit_idnum)
jcallahan@118 936 local _, class_token = _G.UnitClass("target")
jcallahan@118 937 npc.class = class_token
jcallahan@118 938 npc.faction = UnitFactionStanding("target")
jcallahan@118 939 npc.genders = npc.genders or {}
jcallahan@118 940 npc.genders[GENDER_NAMES[_G.UnitSex("target")] or "UNDEFINED"] = true
jcallahan@118 941 npc.is_pvp = _G.UnitIsPVP("target") and true or nil
jcallahan@118 942 npc.reaction = ("%s:%s:%s"):format(_G.UnitLevel("player"), _G.UnitFactionGroup("player"), REACTION_NAMES[_G.UnitReaction("player", "target")])
jcallahan@118 943
jcallahan@214 944 local encounter_data = npc:EncounterData()[InstanceDifficultyToken()].stats
jcallahan@118 945 local npc_level = ("level_%d"):format(_G.UnitLevel("target"))
jcallahan@118 946
jcallahan@118 947 if not encounter_data[npc_level] then
jcallahan@118 948 encounter_data[npc_level] = {
jcallahan@118 949 max_health = _G.UnitHealthMax("target"),
jcallahan@118 950 }
jcallahan@118 951
jcallahan@118 952 local max_power = _G.UnitManaMax("target")
jcallahan@118 953
jcallahan@118 954 if max_power > 0 then
jcallahan@118 955 local power_type = _G.UnitPowerType("target")
jcallahan@118 956 encounter_data[npc_level].power = ("%s:%d"):format(POWER_TYPE_NAMES[_G.tostring(power_type)] or power_type, max_power)
jcallahan@118 957 end
jcallahan@118 958 end
jcallahan@118 959 name_to_id_map[_G.UnitName("target")] = unit_idnum
jcallahan@118 960 return npc, unit_idnum
jcallahan@118 961 end
jcallahan@118 962 end -- do-block
jcallahan@118 963
jcallahan@118 964
jcallahan@113 965 do
jcallahan@113 966 local COORD_MAX = 5
jcallahan@0 967
jcallahan@113 968 function WDP:UpdateTargetLocation()
jcallahan@113 969 if currently_drunk or not _G.UnitExists("target") or _G.UnitPlayerControlled("target") or (_G.UnitIsTapped("target") and not _G.UnitIsDead("target")) then
jcallahan@2 970 return
jcallahan@2 971 end
jcallahan@113 972
jcallahan@113 973 for index = 1, 4 do
jcallahan@113 974 if not _G.CheckInteractDistance("target", index) then
jcallahan@113 975 return
jcallahan@113 976 end
jcallahan@113 977 end
jcallahan@215 978 local npc = TargetedNPC()
jcallahan@113 979
jcallahan@113 980 if not npc then
jcallahan@113 981 return
jcallahan@113 982 end
jcallahan@113 983 local zone_name, area_id, x, y, map_level, difficulty_token = CurrentLocationData()
jcallahan@214 984 local npc_data = npc:EncounterData()[difficulty_token].stats[("level_%d"):format(_G.UnitLevel("target"))]
jcallahan@113 985 local zone_token = ("%s:%d"):format(zone_name, area_id)
jcallahan@118 986 npc_data.locations = npc_data.locations or {} -- TODO: Fix this. It is broken. Possibly something to do with the timed updates.
jcallahan@113 987
jcallahan@113 988 local zone_data = npc_data.locations[zone_token]
jcallahan@113 989
jcallahan@113 990 if not zone_data then
jcallahan@113 991 zone_data = {}
jcallahan@113 992 npc_data.locations[zone_token] = zone_data
jcallahan@113 993 end
jcallahan@113 994
jcallahan@113 995 for location_token in pairs(zone_data) do
jcallahan@113 996 local loc_level, loc_x, loc_y = (":"):split(location_token)
jcallahan@113 997 loc_level = tonumber(loc_level)
jcallahan@113 998
jcallahan@113 999 if map_level == loc_level and math.abs(x - loc_x) <= COORD_MAX and math.abs(y - loc_y) <= COORD_MAX then
jcallahan@113 1000 return
jcallahan@113 1001 end
jcallahan@113 1002 end
jcallahan@141 1003 zone_data[("%d:%d:%d"):format(map_level, x, y)] = true
jcallahan@2 1004 end
jcallahan@113 1005 end -- do-block
jcallahan@2 1006
jcallahan@118 1007
jcallahan@0 1008 -----------------------------------------------------------------------
jcallahan@0 1009 -- Event handlers.
jcallahan@0 1010 -----------------------------------------------------------------------
jcallahan@90 1011 function WDP:BLACK_MARKET_ITEM_UPDATE(event_name)
jcallahan@56 1012 local num_items = _G.C_BlackMarket.GetNumItems()
jcallahan@56 1013
jcallahan@56 1014 for index = 1, num_items do
jcallahan@56 1015 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 1016
jcallahan@56 1017 if item_link then
jcallahan@56 1018 DBEntry("items", ItemLinkToID(item_link)).black_market = seller_name or "UNKNOWN"
jcallahan@56 1019 end
jcallahan@56 1020 end
jcallahan@56 1021 end
jcallahan@56 1022
jcallahan@56 1023
jcallahan@178 1024 function WDP:SHOW_LOOT_TOAST(event_name, loot_type, item_link, quantity)
jcallahan@178 1025 if loot_type ~= "item" then
jcallahan@178 1026 return
jcallahan@178 1027 end
jcallahan@203 1028 local npc = NPCEntry(private.raid_finder_boss_id or private.world_boss_id)
jcallahan@216 1029 ClearKilledBossID()
jcallahan@178 1030
jcallahan@178 1031 if not npc then
jcallahan@182 1032 Debug(("%s: NPC is nil."):format(event_name))
jcallahan@178 1033 return
jcallahan@178 1034 end
jcallahan@178 1035 local item_id = ItemLinkToID(item_link)
jcallahan@178 1036
jcallahan@178 1037 if not item_id then
jcallahan@182 1038 Debug(("%s: ItemID is nil, from item link %s"):format(event_name, item_link))
jcallahan@178 1039 return
jcallahan@178 1040 end
jcallahan@179 1041 local loot_type = "drops"
jcallahan@214 1042 local encounter_data = npc:EncounterData()[InstanceDifficultyToken()]
jcallahan@178 1043 encounter_data[loot_type] = encounter_data[loot_type] or {}
jcallahan@178 1044 encounter_data.loot_counts = encounter_data.loot_counts or {}
jcallahan@178 1045 encounter_data.loot_counts[loot_type] = (encounter_data.loot_counts[loot_type] or 0) + 1
jcallahan@178 1046
jcallahan@178 1047 table.insert(encounter_data[loot_type], ("%d:%d"):format(item_id, quantity))
jcallahan@182 1048 Debug(("%s: %sX%d (%d)"):format(event_name, item_link, quantity, item_id))
jcallahan@178 1049 end
jcallahan@178 1050
jcallahan@178 1051
jcallahan@179 1052 do
jcallahan@179 1053 local CHAT_MSG_LOOT_UPDATE_FUNCS = {
jcallahan@179 1054 [AF.NPC] = function(item_id, quantity)
jcallahan@179 1055 Debug(("CHAT_MSG_LOOT: %d (%d)"):format(item_id, quantity))
jcallahan@179 1056 end,
jcallahan@179 1057 [AF.ZONE] = function(item_id, quantity)
jcallahan@179 1058 current_loot = {
jcallahan@179 1059 list = {
jcallahan@179 1060 ("%d:%d"):format(item_id, quantity)
jcallahan@179 1061 },
jcallahan@179 1062 identifier = current_action.identifier,
jcallahan@179 1063 label = current_action.loot_label or "drops",
jcallahan@179 1064 map_level = current_action.map_level,
jcallahan@179 1065 object_name = current_action.object_name,
jcallahan@179 1066 spell_label = current_action.spell_label,
jcallahan@179 1067 target_type = current_action.target_type,
jcallahan@179 1068 x = current_action.x,
jcallahan@179 1069 y = current_action.y,
jcallahan@179 1070 zone_data = current_action.zone_data,
jcallahan@179 1071 }
jcallahan@179 1072 table.wipe(current_action)
jcallahan@179 1073 GenericLootUpdate("zones")
jcallahan@179 1074 end,
jcallahan@179 1075 }
jcallahan@177 1076
jcallahan@177 1077
jcallahan@179 1078 function WDP:CHAT_MSG_LOOT(event_name, message)
jcallahan@179 1079 local category
jcallahan@177 1080
jcallahan@179 1081 if current_action.spell_label ~= "EXTRACT_GAS" then
jcallahan@179 1082 category = AF.ZONE
jcallahan@179 1083 elseif private.raid_finder_boss_id then
jcallahan@179 1084 category = AF.NPC
jcallahan@179 1085 end
jcallahan@179 1086 local update_func = CHAT_MSG_LOOT_UPDATE_FUNCS[category]
jcallahan@177 1087
jcallahan@179 1088 if not category or not update_func then
jcallahan@179 1089 return
jcallahan@179 1090 end
jcallahan@179 1091 local item_link, quantity = deformat(message, _G.LOOT_ITEM_PUSHED_SELF_MULTIPLE)
jcallahan@179 1092
jcallahan@179 1093 if not item_link then
jcallahan@179 1094 quantity, item_link = 1, deformat(message, _G.LOOT_ITEM_PUSHED_SELF)
jcallahan@179 1095 end
jcallahan@179 1096 local item_id = ItemLinkToID(item_link)
jcallahan@179 1097
jcallahan@179 1098 if not item_id then
jcallahan@179 1099 return
jcallahan@179 1100 end
jcallahan@179 1101 update_func(item_id, quantity)
jcallahan@177 1102 end
jcallahan@48 1103 end
jcallahan@48 1104
jcallahan@97 1105 function WDP:RecordQuote(event_name, message, source_name, language_name)
jcallahan@112 1106 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 1107 return
jcallahan@95 1108 end
jcallahan@97 1109 local npc = NPCEntry(name_to_id_map[source_name])
jcallahan@97 1110 npc.quotes = npc.quotes or {}
jcallahan@97 1111 npc.quotes[event_name] = npc.quotes[event_name] or {}
jcallahan@97 1112 npc.quotes[event_name][ReplaceKeywords(message)] = true
jcallahan@97 1113 end
jcallahan@95 1114
jcallahan@95 1115
jcallahan@95 1116 do
jcallahan@40 1117 local SOBER_MATCH = _G.DRUNK_MESSAGE_ITEM_SELF1:gsub("%%s", ".+")
jcallahan@40 1118
jcallahan@40 1119 local DRUNK_COMPARES = {
jcallahan@40 1120 _G.DRUNK_MESSAGE_SELF2,
jcallahan@40 1121 _G.DRUNK_MESSAGE_SELF3,
jcallahan@40 1122 _G.DRUNK_MESSAGE_SELF4,
jcallahan@40 1123 }
jcallahan@40 1124
jcallahan@40 1125 local DRUNK_MATCHES = {
jcallahan@40 1126 _G.DRUNK_MESSAGE_SELF2:gsub("%%s", ".+"),
jcallahan@40 1127 _G.DRUNK_MESSAGE_SELF3:gsub("%%s", ".+"),
jcallahan@40 1128 _G.DRUNK_MESSAGE_SELF4:gsub("%%s", ".+"),
jcallahan@40 1129 }
jcallahan@40 1130
jcallahan@167 1131 local RECIPE_MATCH = _G.ERR_LEARN_RECIPE_S:gsub("%%s", "(.*)")
jcallahan@167 1132
jcallahan@167 1133
jcallahan@167 1134 local function RecordDiscovery(tradeskill_name, tradeskill_index)
jcallahan@167 1135 if tradeskill_name == private.discovered_recipe_name then
jcallahan@167 1136 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 1137
jcallahan@167 1138 private.discovered_recipe_name = nil
jcallahan@167 1139 private.profession_level = nil
jcallahan@167 1140 private.previous_spell_id = nil
jcallahan@169 1141
jcallahan@169 1142 return true
jcallahan@167 1143 end
jcallahan@167 1144 end
jcallahan@167 1145
jcallahan@167 1146
jcallahan@167 1147 local function IterativeRecordDiscovery()
jcallahan@167 1148 TradeSkillExecutePer(RecordDiscovery)
jcallahan@167 1149 end
jcallahan@167 1150
jcallahan@167 1151
jcallahan@92 1152 function WDP:CHAT_MSG_SYSTEM(event_name, message)
jcallahan@167 1153 if not private.trainer_shown then
jcallahan@167 1154 local recipe_name = message:match(RECIPE_MATCH)
jcallahan@167 1155
jcallahan@167 1156 if recipe_name and private.previous_spell_id then
jcallahan@167 1157 local profession_name, prof_level = _G.GetTradeSkillLine()
jcallahan@167 1158
jcallahan@167 1159 if profession_name == _G.UNKNOWN then
jcallahan@167 1160 return
jcallahan@167 1161 end
jcallahan@167 1162 private.discovered_recipe_name = recipe_name
jcallahan@167 1163 private.profession_level = prof_level
jcallahan@167 1164
jcallahan@167 1165 self:ScheduleTimer(IterativeRecordDiscovery, 0.2)
jcallahan@167 1166 end
jcallahan@167 1167 end
jcallahan@167 1168
jcallahan@40 1169 if currently_drunk then
jcallahan@40 1170 if message == _G.DRUNK_MESSAGE_SELF1 or message:match(SOBER_MATCH) then
jcallahan@40 1171 currently_drunk = nil
jcallahan@40 1172 end
jcallahan@40 1173 return
jcallahan@40 1174 end
jcallahan@40 1175
jcallahan@40 1176 for index = 1, #DRUNK_MATCHES do
jcallahan@40 1177 if message == DRUNK_COMPARES[index] or message:match(DRUNK_MATCHES[index]) then
jcallahan@40 1178 currently_drunk = true
jcallahan@40 1179 break
jcallahan@40 1180 end
jcallahan@40 1181 end
jcallahan@40 1182 end
jcallahan@40 1183 end
jcallahan@40 1184
jcallahan@40 1185 -- do-block
jcallahan@40 1186
jcallahan@40 1187 do
jcallahan@23 1188 local FLAGS_NPC = bit.bor(_G.COMBATLOG_OBJECT_TYPE_GUARDIAN, _G.COMBATLOG_OBJECT_CONTROL_NPC)
jcallahan@23 1189 local FLAGS_NPC_CONTROL = bit.bor(_G.COMBATLOG_OBJECT_AFFILIATION_OUTSIDER, _G.COMBATLOG_OBJECT_CONTROL_NPC)
jcallahan@23 1190
jcallahan@23 1191 local function RecordNPCSpell(sub_event, source_guid, source_name, source_flags, dest_guid, dest_name, dest_flags, spell_id, spell_name)
jcallahan@23 1192 if not spell_id then
jcallahan@23 1193 return
jcallahan@23 1194 end
jcallahan@34 1195 local source_type, source_id = ParseGUID(source_guid)
jcallahan@23 1196
jcallahan@171 1197 if not source_id or not UnitTypeIsNPC(source_type) then
jcallahan@23 1198 return
jcallahan@23 1199 end
jcallahan@23 1200
jcallahan@23 1201 if bit.band(FLAGS_NPC_CONTROL, source_flags) == FLAGS_NPC_CONTROL and bit.band(FLAGS_NPC, source_flags) ~= 0 then
jcallahan@214 1202 local encounter_data = NPCEntry(source_id):EncounterData()[InstanceDifficultyToken()]
jcallahan@28 1203 encounter_data.spells = encounter_data.spells or {}
jcallahan@28 1204 encounter_data.spells[spell_id] = (encounter_data.spells[spell_id] or 0) + 1
jcallahan@23 1205 end
jcallahan@23 1206 end
jcallahan@23 1207
jcallahan@115 1208 local HEAL_BATTLE_PETS_SPELL_ID = 125801
jcallahan@115 1209
jcallahan@23 1210 local COMBAT_LOG_FUNCS = {
jcallahan@23 1211 SPELL_AURA_APPLIED = RecordNPCSpell,
jcallahan@23 1212 SPELL_CAST_START = RecordNPCSpell,
jcallahan@115 1213 SPELL_CAST_SUCCESS = function(sub_event, source_guid, source_name, source_flags, dest_guid, dest_name, dest_flags, spell_id, spell_name)
jcallahan@115 1214 if spell_id == HEAL_BATTLE_PETS_SPELL_ID then
jcallahan@115 1215 local unit_type, unit_idnum = ParseGUID(source_guid)
jcallahan@115 1216
jcallahan@171 1217 if unit_idnum and UnitTypeIsNPC(unit_type) then
jcallahan@115 1218 NPCEntry(unit_idnum).stable_master = true
jcallahan@115 1219 end
jcallahan@115 1220 end
jcallahan@115 1221 RecordNPCSpell(sub_event, source_guid, source_name, source_flags, dest_guid, dest_name, dest_flags, spell_id, spell_name)
jcallahan@115 1222 end,
jcallahan@65 1223 UNIT_DIED = function(sub_event, source_guid, source_name, source_flags, dest_guid, dest_name, dest_flags, spell_id, spell_name)
jcallahan@65 1224 local unit_type, unit_idnum = ParseGUID(dest_guid)
jcallahan@65 1225
jcallahan@171 1226 if not unit_idnum or not UnitTypeIsNPC(unit_type) then
jcallahan@182 1227 Debug(("%s: %s is not an NPC, or has no ID."):format(sub_event, dest_name))
jcallahan@177 1228 ClearKilledNPC()
jcallahan@216 1229 ClearKilledBossID()
jcallahan@98 1230 private.harvesting = nil
jcallahan@65 1231 return
jcallahan@65 1232 end
jcallahan@177 1233
jcallahan@217 1234 if dest_guid ~= _G.UnitGUID("target") then
jcallahan@217 1235 ClearKilledNPC()
jcallahan@217 1236 ClearKilledBossID()
jcallahan@217 1237 return
jcallahan@217 1238 end
jcallahan@217 1239
jcallahan@177 1240 if private.RAID_FINDER_BOSS_IDS[unit_idnum] then
jcallahan@184 1241 Debug(("%s: Matching boss %s."):format(sub_event, dest_name))
jcallahan@216 1242 ClearKilledBossID()
jcallahan@184 1243 private.raid_finder_boss_id = unit_idnum
jcallahan@203 1244 elseif private.WORLD_BOSS_IDS[unit_idnum] then
jcallahan@203 1245 Debug(("%s: Matching world boss %s."):format(sub_event, dest_name))
jcallahan@216 1246 ClearKilledBossID()
jcallahan@203 1247 private.world_boss_id = unit_idnum
jcallahan@182 1248 else
jcallahan@203 1249 Debug(("%s: Killed NPC %s (ID: %d) is not in LFG or World boss list."):format(sub_event, dest_name, unit_idnum))
jcallahan@177 1250 end
jcallahan@183 1251
jcallahan@177 1252 killed_npc_id = unit_idnum
jcallahan@177 1253 WDP:ScheduleTimer(ClearKilledNPC, 0.1)
jcallahan@203 1254 WDP:ScheduleTimer(ClearKilledBossID, 1)
jcallahan@65 1255 end,
jcallahan@23 1256 }
jcallahan@23 1257
jcallahan@23 1258
jcallahan@92 1259 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 1260 local combat_log_func = COMBAT_LOG_FUNCS[sub_event]
jcallahan@23 1261
jcallahan@23 1262 if not combat_log_func then
jcallahan@23 1263 return
jcallahan@23 1264 end
jcallahan@23 1265 combat_log_func(sub_event, source_guid, source_name, source_flags, dest_guid, dest_name, dest_flags, ...)
jcallahan@23 1266 end
jcallahan@23 1267
jcallahan@44 1268 local DIPLOMACY_SPELL_ID = 20599
jcallahan@44 1269 local MR_POP_RANK1_SPELL_ID = 78634
jcallahan@44 1270 local MR_POP_RANK2_SPELL_ID = 78635
jcallahan@44 1271
jcallahan@44 1272 local REP_BUFFS = {
jcallahan@44 1273 [_G.GetSpellInfo(30754)] = "CENARION_FAVOR",
jcallahan@44 1274 [_G.GetSpellInfo(24705)] = "GRIM_VISAGE",
jcallahan@44 1275 [_G.GetSpellInfo(32098)] = "HONOR_HOLD_FAVOR",
jcallahan@44 1276 [_G.GetSpellInfo(39913)] = "NAZGRELS_FERVOR",
jcallahan@44 1277 [_G.GetSpellInfo(39953)] = "SONG_OF_BATTLE",
jcallahan@44 1278 [_G.GetSpellInfo(61849)] = "SPIRIT_OF_SHARING",
jcallahan@44 1279 [_G.GetSpellInfo(32096)] = "THRALLMARS_FAVOR",
jcallahan@44 1280 [_G.GetSpellInfo(39911)] = "TROLLBANES_COMMAND",
jcallahan@44 1281 [_G.GetSpellInfo(95987)] = "UNBURDENED",
jcallahan@44 1282 [_G.GetSpellInfo(100951)] = "WOW_ANNIVERSARY",
jcallahan@44 1283 }
jcallahan@44 1284
jcallahan@44 1285
jcallahan@44 1286 local FACTION_NAMES = {
jcallahan@44 1287 CENARION_CIRCLE = _G.GetFactionInfoByID(609),
jcallahan@44 1288 HONOR_HOLD = _G.GetFactionInfoByID(946),
jcallahan@44 1289 THE_SHATAR = _G.GetFactionInfoByID(935),
jcallahan@44 1290 THRALLMAR = _G.GetFactionInfoByID(947),
jcallahan@44 1291 }
jcallahan@44 1292
jcallahan@44 1293
jcallahan@44 1294 local MODIFIERS = {
jcallahan@44 1295 CENARION_FAVOR = {
jcallahan@44 1296 faction = FACTION_NAMES.CENARION_CIRCLE,
jcallahan@44 1297 modifier = 0.25,
jcallahan@44 1298 },
jcallahan@44 1299 GRIM_VISAGE = {
jcallahan@44 1300 modifier = 0.1,
jcallahan@44 1301 },
jcallahan@44 1302 HONOR_HOLD_FAVOR = {
jcallahan@44 1303 faction = FACTION_NAMES.HONOR_HOLD,
jcallahan@44 1304 modifier = 0.25,
jcallahan@44 1305 },
jcallahan@44 1306 NAZGRELS_FERVOR = {
jcallahan@44 1307 faction = FACTION_NAMES.THRALLMAR,
jcallahan@44 1308 modifier = 0.1,
jcallahan@44 1309 },
jcallahan@44 1310 SONG_OF_BATTLE = {
jcallahan@44 1311 faction = FACTION_NAMES.THE_SHATAR,
jcallahan@44 1312 modifier = 0.1,
jcallahan@44 1313 },
jcallahan@44 1314 SPIRIT_OF_SHARING = {
jcallahan@44 1315 modifier = 0.1,
jcallahan@44 1316 },
jcallahan@44 1317 THRALLMARS_FAVOR = {
jcallahan@44 1318 faction = FACTION_NAMES.THRALLMAR,
jcallahan@44 1319 modifier = 0.25,
jcallahan@44 1320 },
jcallahan@44 1321 TROLLBANES_COMMAND = {
jcallahan@44 1322 faction = FACTION_NAMES.HONOR_HOLD,
jcallahan@44 1323 modifier = 0.1,
jcallahan@44 1324 },
jcallahan@44 1325 UNBURDENED = {
jcallahan@44 1326 modifier = 0.1,
jcallahan@44 1327 },
jcallahan@44 1328 WOW_ANNIVERSARY = {
jcallahan@44 1329 modifier = 0.08,
jcallahan@44 1330 }
jcallahan@44 1331 }
jcallahan@44 1332
jcallahan@44 1333
jcallahan@92 1334 function WDP:COMBAT_TEXT_UPDATE(event_name, message_type, faction_name, amount)
jcallahan@177 1335 if message_type ~= "FACTION" or not killed_npc_id then
jcallahan@44 1336 return
jcallahan@44 1337 end
jcallahan@44 1338 UpdateFactionData()
jcallahan@44 1339
jcallahan@46 1340 if not faction_name or not faction_standings[faction_name] then
jcallahan@46 1341 return
jcallahan@46 1342 end
jcallahan@177 1343 local npc = NPCEntry(killed_npc_id)
jcallahan@177 1344 ClearKilledNPC()
jcallahan@46 1345
jcallahan@44 1346 if not npc then
jcallahan@98 1347 private.harvesting = nil
jcallahan@44 1348 return
jcallahan@44 1349 end
jcallahan@98 1350 npc.harvested = private.harvesting
jcallahan@98 1351 private.harvesting = nil
jcallahan@98 1352
jcallahan@44 1353 local modifier = 1
jcallahan@44 1354
jcallahan@44 1355 if _G.IsSpellKnown(DIPLOMACY_SPELL_ID) then
jcallahan@44 1356 modifier = modifier + 0.1
jcallahan@44 1357 end
jcallahan@44 1358
jcallahan@44 1359 if _G.IsSpellKnown(MR_POP_RANK2_SPELL_ID) then
jcallahan@44 1360 modifier = modifier + 0.1
jcallahan@44 1361 elseif _G.IsSpellKnown(MR_POP_RANK1_SPELL_ID) then
jcallahan@44 1362 modifier = modifier + 0.05
jcallahan@44 1363 end
jcallahan@44 1364
jcallahan@44 1365 for buff_name, buff_label in pairs(REP_BUFFS) do
jcallahan@44 1366 if _G.UnitBuff("player", buff_name) then
jcallahan@44 1367 local modded_faction = MODIFIERS[buff_label].faction
jcallahan@44 1368
jcallahan@44 1369 if not modded_faction or faction_name == modded_faction then
jcallahan@44 1370 modifier = modifier + MODIFIERS[buff_label].modifier
jcallahan@44 1371 end
jcallahan@44 1372 end
jcallahan@44 1373 end
jcallahan@65 1374 npc.reputations = npc.reputations or {}
jcallahan@65 1375 npc.reputations[("%s:%s"):format(faction_name, faction_standings[faction_name])] = math.floor(amount / modifier)
jcallahan@32 1376 end
jcallahan@44 1377 end -- do-block
jcallahan@18 1378
jcallahan@18 1379
jcallahan@140 1380 function WDP:CURSOR_UPDATE(event_name)
jcallahan@141 1381 if current_action.fishing_target or _G.Minimap:IsMouseOver() or current_action.spell_label ~= "FISHING" then
jcallahan@140 1382 return
jcallahan@140 1383 end
jcallahan@140 1384 local text = _G["GameTooltipTextLeft1"]:GetText()
jcallahan@140 1385
jcallahan@140 1386 if not text or text == "Fishing Bobber" then
jcallahan@140 1387 text = "NONE"
jcallahan@140 1388 else
jcallahan@140 1389 current_action.fishing_target = true
jcallahan@140 1390 end
jcallahan@140 1391 current_action.identifier = ("%s:%s"):format(current_action.spell_label, text)
jcallahan@140 1392 end
jcallahan@140 1393
jcallahan@140 1394
jcallahan@92 1395 function WDP:ITEM_TEXT_BEGIN(event_name)
jcallahan@42 1396 local unit_type, unit_idnum = ParseGUID(_G.UnitGUID("npc"))
jcallahan@42 1397
jcallahan@42 1398 if not unit_idnum or unit_type ~= private.UNIT_TYPES.OBJECT or _G.UnitName("npc") ~= _G.ItemTextGetItem() then
jcallahan@42 1399 return
jcallahan@42 1400 end
jcallahan@42 1401 UpdateDBEntryLocation("objects", unit_idnum)
jcallahan@42 1402 end
jcallahan@42 1403
jcallahan@42 1404
jcallahan@13 1405 do
jcallahan@40 1406 local RE_GOLD = _G.GOLD_AMOUNT:gsub("%%d", "(%%d+)")
jcallahan@40 1407 local RE_SILVER = _G.SILVER_AMOUNT:gsub("%%d", "(%%d+)")
jcallahan@40 1408 local RE_COPPER = _G.COPPER_AMOUNT:gsub("%%d", "(%%d+)")
jcallahan@13 1409
jcallahan@13 1410
jcallahan@13 1411 local function _moneyMatch(money, re)
jcallahan@13 1412 return money:match(re) or 0
jcallahan@1 1413 end
jcallahan@1 1414
jcallahan@0 1415
jcallahan@13 1416 local function _toCopper(money)
jcallahan@13 1417 if not money then
jcallahan@13 1418 return 0
jcallahan@13 1419 end
jcallahan@40 1420 return _moneyMatch(money, RE_GOLD) * 10000 + _moneyMatch(money, RE_SILVER) * 100 + _moneyMatch(money, RE_COPPER)
jcallahan@1 1421 end
jcallahan@1 1422
jcallahan@1 1423
jcallahan@176 1424 local LOOT_OPENED_VERIFY_FUNCS = {
jcallahan@16 1425 [AF.ITEM] = function()
jcallahan@16 1426 local locked_item_id
jcallahan@16 1427
jcallahan@16 1428 for bag_index = 0, _G.NUM_BAG_FRAMES do
jcallahan@16 1429 for slot_index = 1, _G.GetContainerNumSlots(bag_index) do
jcallahan@16 1430 local _, _, is_locked = _G.GetContainerItemInfo(bag_index, slot_index)
jcallahan@16 1431
jcallahan@16 1432 if is_locked then
jcallahan@16 1433 locked_item_id = ItemLinkToID(_G.GetContainerItemLink(bag_index, slot_index))
jcallahan@165 1434 break
jcallahan@16 1435 end
jcallahan@16 1436 end
jcallahan@165 1437
jcallahan@165 1438 if locked_item_id then
jcallahan@165 1439 break
jcallahan@165 1440 end
jcallahan@16 1441 end
jcallahan@16 1442
jcallahan@122 1443 if not locked_item_id or (current_action.identifier and current_action.identifier ~= locked_item_id) then
jcallahan@16 1444 return false
jcallahan@16 1445 end
jcallahan@122 1446 current_action.identifier = locked_item_id
jcallahan@16 1447 return true
jcallahan@16 1448 end,
jcallahan@13 1449 [AF.NPC] = function()
jcallahan@17 1450 if not _G.UnitExists("target") or _G.UnitIsFriend("player", "target") or _G.UnitIsPlayer("target") or _G.UnitPlayerControlled("target") then
jcallahan@15 1451 return false
jcallahan@13 1452 end
jcallahan@205 1453
jcallahan@205 1454 if not current_action.identifier then
jcallahan@205 1455 local unit_type, id_num = ParseGUID(_G.UnitGUID("target"))
jcallahan@205 1456 current_action.identifier = id_num
jcallahan@205 1457 end
jcallahan@13 1458 return true
jcallahan@13 1459 end,
jcallahan@14 1460 [AF.OBJECT] = true,
jcallahan@17 1461 [AF.ZONE] = function()
jcallahan@140 1462 current_action.zone_data = UpdateDBEntryLocation("zones", current_action.identifier)
jcallahan@210 1463 return _G.IsFishingLoot()
jcallahan@17 1464 end,
jcallahan@13 1465 }
jcallahan@13 1466
jcallahan@13 1467
jcallahan@176 1468 local LOOT_OPENED_UPDATE_FUNCS = {
jcallahan@16 1469 [AF.ITEM] = function()
jcallahan@28 1470 GenericLootUpdate("items")
jcallahan@28 1471 end,
jcallahan@28 1472 [AF.NPC] = function()
jcallahan@75 1473 local difficulty_token = InstanceDifficultyToken()
jcallahan@132 1474 local loot_type = current_loot.label
jcallahan@77 1475 local source_list = {}
jcallahan@75 1476
jcallahan@131 1477 for source_guid, loot_data in pairs(current_loot.sources) do
jcallahan@78 1478 local source_id = select(2, ParseGUID(source_guid))
jcallahan@75 1479 local npc = NPCEntry(source_id)
jcallahan@75 1480
jcallahan@75 1481 if npc then
jcallahan@214 1482 local encounter_data = npc:EncounterData()[difficulty_token]
jcallahan@75 1483 encounter_data[loot_type] = encounter_data[loot_type] or {}
jcallahan@75 1484
jcallahan@78 1485 if not source_list[source_guid] then
jcallahan@77 1486 encounter_data.loot_counts = encounter_data.loot_counts or {}
jcallahan@77 1487 encounter_data.loot_counts[loot_type] = (encounter_data.loot_counts[loot_type] or 0) + 1
jcallahan@77 1488 source_list[source_id] = true
jcallahan@77 1489 end
jcallahan@77 1490
jcallahan@75 1491 for item_id, quantity in pairs(loot_data) do
jcallahan@75 1492 table.insert(encounter_data[loot_type], ("%d:%d"):format(item_id, quantity))
jcallahan@75 1493 end
jcallahan@75 1494 end
jcallahan@75 1495 end
jcallahan@75 1496
jcallahan@75 1497 -- TODO: Remove this when GetLootSourceInfo() has values for money
jcallahan@131 1498 if #current_loot.list <= 0 then
jcallahan@79 1499 return
jcallahan@79 1500 end
jcallahan@131 1501 local npc = NPCEntry(current_loot.identifier)
jcallahan@28 1502
jcallahan@28 1503 if not npc then
jcallahan@28 1504 return
jcallahan@28 1505 end
jcallahan@214 1506 local encounter_data = npc:EncounterData()[difficulty_token]
jcallahan@29 1507 encounter_data[loot_type] = encounter_data[loot_type] or {}
jcallahan@16 1508
jcallahan@131 1509 if not source_list[current_loot.identifier] then
jcallahan@77 1510 encounter_data.loot_counts = encounter_data.loot_counts or {}
jcallahan@77 1511 encounter_data.loot_counts[loot_type] = (encounter_data.loot_counts[loot_type] or 0) + 1
jcallahan@77 1512 end
jcallahan@77 1513
jcallahan@131 1514 for index = 1, #current_loot.list do
jcallahan@131 1515 table.insert(encounter_data[loot_type], current_loot.list[index])
jcallahan@16 1516 end
jcallahan@16 1517 end,
jcallahan@13 1518 [AF.OBJECT] = function()
jcallahan@28 1519 GenericLootUpdate("objects", InstanceDifficultyToken())
jcallahan@17 1520 end,
jcallahan@17 1521 [AF.ZONE] = function()
jcallahan@141 1522 local location_token = ("%d:%d:%d"):format(current_loot.map_level, current_loot.x, current_loot.y)
jcallahan@41 1523
jcallahan@41 1524 -- This will start life as a boolean true.
jcallahan@131 1525 if _G.type(current_loot.zone_data[location_token]) ~= "table" then
jcallahan@131 1526 current_loot.zone_data[location_token] = {
jcallahan@41 1527 drops = {}
jcallahan@41 1528 }
jcallahan@41 1529 end
jcallahan@132 1530 local loot_count = ("%s_count"):format(current_loot.label)
jcallahan@131 1531 current_loot.zone_data[location_token][loot_count] = (current_loot.zone_data[location_token][loot_count] or 0) + 1
jcallahan@41 1532
jcallahan@131 1533 if current_loot.sources then
jcallahan@131 1534 for source_guid, loot_data in pairs(current_loot.sources) do
jcallahan@131 1535 for item_id, quantity in pairs(loot_data) do
jcallahan@131 1536 table.insert(current_loot.zone_data[location_token].drops, ("%d:%d"):format(item_id, quantity))
jcallahan@131 1537 end
jcallahan@131 1538 end
jcallahan@131 1539 end
jcallahan@131 1540
jcallahan@131 1541 if #current_loot.list <= 0 then
jcallahan@131 1542 return
jcallahan@131 1543 end
jcallahan@131 1544
jcallahan@131 1545 for index = 1, #current_loot.list do
jcallahan@131 1546 table.insert(current_loot.zone_data[location_token].drops, current_loot.loot_list[index])
jcallahan@41 1547 end
jcallahan@13 1548 end,
jcallahan@13 1549 }
jcallahan@13 1550
jcallahan@79 1551 -- Prevent opening the same loot window multiple times from recording data multiple times.
jcallahan@79 1552 local loot_guid_registry = {}
jcallahan@124 1553
jcallahan@124 1554
jcallahan@124 1555 function WDP:LOOT_CLOSED(event_name)
jcallahan@131 1556 current_loot = nil
jcallahan@131 1557 table.wipe(current_action)
jcallahan@124 1558 end
jcallahan@124 1559
jcallahan@13 1560
jcallahan@92 1561 function WDP:LOOT_OPENED(event_name)
jcallahan@132 1562 if current_loot then
jcallahan@18 1563 return
jcallahan@18 1564 end
jcallahan@151 1565
jcallahan@151 1566 if not current_action.target_type then
jcallahan@151 1567 return
jcallahan@151 1568 end
jcallahan@176 1569 local verify_func = LOOT_OPENED_VERIFY_FUNCS[current_action.target_type]
jcallahan@176 1570 local update_func = LOOT_OPENED_UPDATE_FUNCS[current_action.target_type]
jcallahan@13 1571
jcallahan@14 1572 if not verify_func or not update_func then
jcallahan@13 1573 return
jcallahan@13 1574 end
jcallahan@13 1575
jcallahan@14 1576 if _G.type(verify_func) == "function" and not verify_func() then
jcallahan@14 1577 return
jcallahan@14 1578 end
jcallahan@80 1579 local guids_used = {}
jcallahan@132 1580
jcallahan@131 1581 current_loot = {
jcallahan@131 1582 list = {},
jcallahan@131 1583 sources = {},
jcallahan@131 1584 identifier = current_action.identifier,
jcallahan@132 1585 label = current_action.loot_label or "drops",
jcallahan@131 1586 map_level = current_action.map_level,
jcallahan@131 1587 object_name = current_action.object_name,
jcallahan@131 1588 spell_label = current_action.spell_label,
jcallahan@131 1589 target_type = current_action.target_type,
jcallahan@131 1590 x = current_action.x,
jcallahan@131 1591 y = current_action.y,
jcallahan@131 1592 zone_data = current_action.zone_data,
jcallahan@131 1593 }
jcallahan@131 1594 table.wipe(current_action)
jcallahan@13 1595
jcallahan@217 1596 loot_guid_registry[current_loot.label] = loot_guid_registry[current_loot.label] or {}
jcallahan@217 1597
jcallahan@55 1598 for loot_slot = 1, _G.GetNumLootItems() do
jcallahan@55 1599 local icon_texture, item_text, quantity, quality, locked = _G.GetLootSlotInfo(loot_slot)
jcallahan@55 1600 local slot_type = _G.GetLootSlotType(loot_slot)
jcallahan@13 1601
jcallahan@77 1602 -- TODO: Move LOOT_SLOT_X checks within loop when money is detectable via GetLootSourceInfo
jcallahan@77 1603 if slot_type == _G.LOOT_SLOT_ITEM then
jcallahan@78 1604 local loot_info = {
jcallahan@77 1605 _G.GetLootSourceInfo(loot_slot)
jcallahan@77 1606 }
jcallahan@75 1607
jcallahan@77 1608 -- Odd index is GUID, even is count.
jcallahan@78 1609 for loot_index = 1, #loot_info, 2 do
jcallahan@78 1610 local source_guid = loot_info[loot_index]
jcallahan@77 1611
jcallahan@217 1612 if not loot_guid_registry[current_loot.label][source_guid] then
jcallahan@79 1613 local loot_quantity = loot_info[loot_index + 1]
jcallahan@79 1614 local source_type, source_id = ParseGUID(source_guid)
jcallahan@151 1615 local source_key = ("%s:%d"):format(private.UNIT_TYPE_NAMES[source_type + 1], source_id)
jcallahan@151 1616 Debug(("GUID: %s - Type:ID: %s - Amount: %d"):format(loot_info[loot_index], source_key, loot_quantity))
jcallahan@79 1617
jcallahan@79 1618 local item_id = ItemLinkToID(_G.GetLootSlotLink(loot_slot))
jcallahan@131 1619 current_loot.sources[source_guid] = current_loot.sources[source_guid] or {}
jcallahan@131 1620 current_loot.sources[source_guid][item_id] = current_loot.sources[source_guid][item_id] or 0 + loot_quantity
jcallahan@80 1621 guids_used[source_guid] = true
jcallahan@79 1622 end
jcallahan@75 1623 end
jcallahan@82 1624 -- elseif slot_type == _G.LOOT_SLOT_MONEY then
jcallahan@122 1625 -- table.insert(current_action.loot_list, ("money:%d"):format(_toCopper(item_text)))
jcallahan@77 1626 elseif slot_type == _G.LOOT_SLOT_CURRENCY then
jcallahan@131 1627 table.insert(current_loot.list, ("currency:%d:%s"):format(quantity, icon_texture:match("[^\\]+$"):lower()))
jcallahan@13 1628 end
jcallahan@13 1629 end
jcallahan@80 1630
jcallahan@81 1631 for guid in pairs(guids_used) do
jcallahan@217 1632 loot_guid_registry[current_loot.label][guid] = true
jcallahan@80 1633 end
jcallahan@13 1634 update_func()
jcallahan@1 1635 end
jcallahan@13 1636 end -- do-block
jcallahan@0 1637
jcallahan@0 1638
jcallahan@89 1639 function WDP:MAIL_SHOW(event_name)
jcallahan@89 1640 local unit_type, unit_idnum = ParseGUID(_G.UnitGUID("npc"))
jcallahan@89 1641
jcallahan@89 1642 if not unit_idnum or unit_type ~= private.UNIT_TYPES.OBJECT then
jcallahan@89 1643 return
jcallahan@89 1644 end
jcallahan@89 1645 UpdateDBEntryLocation("objects", unit_idnum)
jcallahan@89 1646 end
jcallahan@89 1647
jcallahan@89 1648
jcallahan@44 1649 do
jcallahan@44 1650 local POINT_MATCH_PATTERNS = {
jcallahan@44 1651 ("^%s$"):format(_G.ITEM_REQ_ARENA_RATING:gsub("%%d", "(%%d+)")), -- May no longer be necessary
jcallahan@44 1652 ("^%s$"):format(_G.ITEM_REQ_ARENA_RATING_3V3:gsub("%%d", "(%%d+)")), -- May no longer be necessary
jcallahan@44 1653 ("^%s$"):format(_G.ITEM_REQ_ARENA_RATING_5V5:gsub("%%d", "(%%d+)")), -- May no longer be necessary
jcallahan@44 1654 ("^%s$"):format(_G.ITEM_REQ_ARENA_RATING_BG:gsub("%%d", "(%%d+)")),
jcallahan@44 1655 ("^%s$"):format(_G.ITEM_REQ_ARENA_RATING_3V3_BG:gsub("%%d", "(%%d+)")),
jcallahan@44 1656 }
jcallahan@5 1657
jcallahan@68 1658 local ITEM_REQ_REPUTATION_MATCH = "Requires (.-) %- (.*)"
jcallahan@87 1659 local ITEM_REQ_QUEST_MATCH1 = "Requires: .*"
jcallahan@87 1660 local ITEM_REQ_QUEST_MATCH2 = "Must have completed: .*"
jcallahan@68 1661
jcallahan@133 1662 local current_merchant
jcallahan@133 1663 local merchant_standing
jcallahan@133 1664
jcallahan@133 1665 function WDP:MERCHANT_CLOSED(event_name)
jcallahan@133 1666 current_merchant = nil
jcallahan@133 1667 merchant_standing = nil
jcallahan@133 1668 end
jcallahan@133 1669
jcallahan@133 1670
jcallahan@89 1671 function WDP:UpdateMerchantItems(event_name)
jcallahan@144 1672 if not current_merchant or event_name == "MERCHANT_SHOW" then
jcallahan@195 1673 local unit_type, unit_idnum = ParseGUID(_G.UnitGUID("npc"))
jcallahan@4 1674
jcallahan@171 1675 if not unit_idnum or not UnitTypeIsNPC(unit_type) then
jcallahan@133 1676 return
jcallahan@133 1677 end
jcallahan@195 1678 merchant_standing = select(2, UnitFactionStanding("npc"))
jcallahan@133 1679 current_merchant = NPCEntry(unit_idnum)
jcallahan@133 1680 current_merchant.sells = current_merchant.sells or {}
jcallahan@44 1681 end
jcallahan@55 1682 local current_filters = _G.GetMerchantFilter()
jcallahan@57 1683 _G.SetMerchantFilter(_G.LE_LOOT_FILTER_ALL)
jcallahan@57 1684 _G.MerchantFrame_Update()
jcallahan@57 1685
jcallahan@150 1686 local num_items = _G.GetMerchantNumItems()
jcallahan@150 1687
jcallahan@44 1688 for item_index = 1, num_items do
jcallahan@44 1689 local _, _, copper_price, stack_size, num_available, _, extended_cost = _G.GetMerchantItemInfo(item_index)
jcallahan@44 1690 local item_id = ItemLinkToID(_G.GetMerchantItemLink(item_index))
jcallahan@5 1691
jcallahan@44 1692 if item_id and item_id > 0 then
jcallahan@44 1693 local price_string = ActualCopperCost(copper_price, merchant_standing)
jcallahan@5 1694
jcallahan@68 1695 DatamineTT:ClearLines()
jcallahan@68 1696 DatamineTT:SetMerchantItem(item_index)
jcallahan@68 1697
jcallahan@68 1698 local num_lines = DatamineTT:NumLines()
jcallahan@68 1699
jcallahan@68 1700 for line_index = 1, num_lines do
jcallahan@68 1701 local current_line = _G["WDPDatamineTTTextLeft" .. line_index]
jcallahan@68 1702
jcallahan@68 1703 if not current_line then
jcallahan@68 1704 break
jcallahan@68 1705 end
jcallahan@68 1706 local faction, reputation = current_line:GetText():match(ITEM_REQ_REPUTATION_MATCH)
jcallahan@68 1707
jcallahan@68 1708 if faction or reputation then
jcallahan@68 1709 DBEntry("items", item_id).req_reputation = ("%s:%s"):format(faction:gsub("-", ""), reputation:upper())
jcallahan@68 1710 break
jcallahan@68 1711 end
jcallahan@68 1712 end
jcallahan@68 1713
jcallahan@87 1714 for line_index = 1, num_lines do
jcallahan@87 1715 local current_line = _G["WDPDatamineTTTextLeft" .. line_index]
jcallahan@87 1716
jcallahan@87 1717 if not current_line then
jcallahan@87 1718 break
jcallahan@87 1719 end
jcallahan@87 1720 local line_text = current_line:GetText()
jcallahan@87 1721 local quest_name = line_text:match(ITEM_REQ_QUEST_MATCH1) or line_text:match(ITEM_REQ_QUEST_MATCH2)
jcallahan@87 1722
jcallahan@87 1723 if quest_name then
jcallahan@87 1724 DBEntry("items", item_id).req_quest = ("%s"):format(quest_name:gsub("(.+): ", ""), quest_name)
jcallahan@87 1725 break
jcallahan@87 1726 end
jcallahan@87 1727 end
jcallahan@87 1728
jcallahan@44 1729 if extended_cost then
jcallahan@53 1730 local battleground_rating = 0
jcallahan@53 1731 local personal_rating = 0
jcallahan@53 1732 local required_season_amount
jcallahan@5 1733
jcallahan@68 1734 for line_index = 1, num_lines do
jcallahan@44 1735 local current_line = _G["WDPDatamineTTTextLeft" .. line_index]
jcallahan@5 1736
jcallahan@44 1737 if not current_line then
jcallahan@44 1738 break
jcallahan@44 1739 end
jcallahan@53 1740 required_season_amount = current_line:GetText():match("Requires earning a total of (%d+)\n(.-) for the season.")
jcallahan@5 1741
jcallahan@44 1742 for match_index = 1, #POINT_MATCH_PATTERNS do
jcallahan@44 1743 local match1, match2 = current_line:GetText():match(POINT_MATCH_PATTERNS[match_index])
jcallahan@53 1744 personal_rating = personal_rating + (match1 or 0)
jcallahan@53 1745 battleground_rating = battleground_rating + (match2 or 0)
jcallahan@5 1746
jcallahan@44 1747 if match1 or match2 then
jcallahan@44 1748 break
jcallahan@44 1749 end
jcallahan@44 1750 end
jcallahan@5 1751 end
jcallahan@44 1752 local currency_list = {}
jcallahan@44 1753 local item_count = _G.GetMerchantItemCostInfo(item_index)
jcallahan@50 1754
jcallahan@50 1755 -- Keeping this around in case Blizzard makes the two points diverge at some point.
jcallahan@53 1756 -- price_string = ("%s:%s:%s:%s"):format(price_string, battleground_rating, personal_rating, required_season_amount or 0)
jcallahan@53 1757 price_string = ("%s:%s:%s"):format(price_string, personal_rating, required_season_amount or 0)
jcallahan@5 1758
jcallahan@44 1759 for cost_index = 1, item_count do
jcallahan@44 1760 local icon_texture, amount_required, currency_link = _G.GetMerchantItemCostItem(item_index, cost_index)
jcallahan@44 1761 local currency_id = currency_link and ItemLinkToID(currency_link) or nil
jcallahan@44 1762
jcallahan@44 1763 if (not currency_id or currency_id < 1) and icon_texture then
jcallahan@44 1764 currency_id = icon_texture:match("[^\\]+$"):lower()
jcallahan@44 1765 end
jcallahan@44 1766
jcallahan@44 1767 if currency_id then
jcallahan@44 1768 currency_list[#currency_list + 1] = ("(%s:%s)"):format(amount_required, currency_id)
jcallahan@44 1769 end
jcallahan@44 1770 end
jcallahan@44 1771
jcallahan@44 1772 for currency_index = 1, #currency_list do
jcallahan@44 1773 price_string = ("%s:%s"):format(price_string, currency_list[currency_index])
jcallahan@5 1774 end
jcallahan@5 1775 end
jcallahan@133 1776 current_merchant.sells[item_id] = ("%s:%s:[%s]"):format(num_available, stack_size, price_string)
jcallahan@44 1777 end
jcallahan@44 1778 end
jcallahan@5 1779
jcallahan@44 1780 if _G.CanMerchantRepair() then
jcallahan@133 1781 current_merchant.can_repair = true
jcallahan@5 1782 end
jcallahan@57 1783 _G.SetMerchantFilter(current_filters)
jcallahan@57 1784 _G.MerchantFrame_Update()
jcallahan@4 1785 end
jcallahan@44 1786 end -- do-block
jcallahan@4 1787
jcallahan@89 1788
jcallahan@92 1789 function WDP:PET_BAR_UPDATE(event_name)
jcallahan@122 1790 if current_action.spell_label ~= "MIND_CONTROL" then
jcallahan@25 1791 return
jcallahan@25 1792 end
jcallahan@34 1793 local unit_type, unit_idnum = ParseGUID(_G.UnitGUID("pet"))
jcallahan@25 1794
jcallahan@171 1795 if not unit_idnum or not UnitTypeIsNPC(unit_type) then
jcallahan@25 1796 return
jcallahan@25 1797 end
jcallahan@29 1798 NPCEntry(unit_idnum).mind_control = true
jcallahan@122 1799 table.wipe(current_action)
jcallahan@25 1800 end
jcallahan@25 1801
jcallahan@25 1802
jcallahan@115 1803 function WDP:PET_JOURNAL_LIST_UPDATE(event_name)
jcallahan@115 1804 local num_pets = LPJ:NumPets()
jcallahan@115 1805
jcallahan@115 1806 for index, pet_id in LPJ:IteratePetIDs() do
jcallahan@115 1807 local _, _, is_owned, _, level, _, _, name, icon, pet_type, npc_id, _, _, is_wild = _G.C_PetJournal.GetPetInfoByIndex(index)
jcallahan@115 1808
jcallahan@115 1809 if is_owned then
jcallahan@115 1810 local health, max_health, attack, speed, rarity = _G.C_PetJournal.GetPetStats(pet_id)
jcallahan@115 1811
jcallahan@139 1812 if rarity then
jcallahan@139 1813 local rarity_name = _G["BATTLE_PET_BREED_QUALITY" .. rarity]
jcallahan@139 1814 local npc = NPCEntry(npc_id)
jcallahan@139 1815 npc.wild_pet = is_wild or nil
jcallahan@139 1816 npc.battle_pet_data = npc.battle_pet_data or {}
jcallahan@139 1817 npc.battle_pet_data[rarity_name] = npc.battle_pet_data[rarity_name] or {}
jcallahan@139 1818 npc.battle_pet_data[rarity_name]["level_" .. level] = npc.battle_pet_data[rarity_name]["level_" .. level] or {}
jcallahan@139 1819
jcallahan@139 1820 local data = npc.battle_pet_data[rarity_name]["level_" .. level]
jcallahan@139 1821 data.max_health = max_health
jcallahan@139 1822 data.attack = attack
jcallahan@139 1823 data.speed = speed
jcallahan@139 1824 end
jcallahan@115 1825 end
jcallahan@115 1826 end
jcallahan@115 1827 end
jcallahan@115 1828
jcallahan@115 1829
jcallahan@156 1830 function WDP:PLAYER_REGEN_DISABLED(event_name)
jcallahan@156 1831 private.in_combat = true
jcallahan@156 1832 end
jcallahan@156 1833
jcallahan@156 1834
jcallahan@156 1835 function WDP:PLAYER_REGEN_ENABLED(event_name)
jcallahan@156 1836 private.in_combat = nil
jcallahan@156 1837
jcallahan@156 1838 if private.set_area_id then
jcallahan@156 1839 self:SetCurrentAreaID(event_name)
jcallahan@156 1840 private.set_area_id = nil
jcallahan@156 1841 end
jcallahan@156 1842 end
jcallahan@156 1843
jcallahan@156 1844
jcallahan@118 1845 function WDP:PLAYER_TARGET_CHANGED(event_name)
jcallahan@215 1846 if not TargetedNPC() then
jcallahan@118 1847 return
jcallahan@2 1848 end
jcallahan@151 1849 current_action.target_type = AF.NPC
jcallahan@118 1850 self:UpdateTargetLocation()
jcallahan@118 1851 end
jcallahan@2 1852
jcallahan@89 1853
jcallahan@12 1854 do
jcallahan@12 1855 local function UpdateQuestJuncture(point)
jcallahan@12 1856 local unit_name = _G.UnitName("questnpc")
jcallahan@9 1857
jcallahan@12 1858 if not unit_name then
jcallahan@12 1859 return
jcallahan@12 1860 end
jcallahan@34 1861 local unit_type, unit_id = ParseGUID(_G.UnitGUID("questnpc"))
jcallahan@9 1862
jcallahan@12 1863 if unit_type == private.UNIT_TYPES.OBJECT then
jcallahan@38 1864 UpdateDBEntryLocation("objects", unit_id)
jcallahan@12 1865 end
jcallahan@19 1866 local quest = DBEntry("quests", _G.GetQuestID())
jcallahan@12 1867 quest[point] = quest[point] or {}
jcallahan@12 1868 quest[point][("%s:%d"):format(private.UNIT_TYPE_NAMES[unit_type + 1], unit_id)] = true
jcallahan@24 1869
jcallahan@24 1870 return quest
jcallahan@12 1871 end
jcallahan@10 1872
jcallahan@12 1873
jcallahan@92 1874 function WDP:QUEST_COMPLETE(event_name)
jcallahan@97 1875 local quest = UpdateQuestJuncture("end")
jcallahan@97 1876
jcallahan@112 1877 if ALLOWED_LOCALES[CLIENT_LOCALE] then
jcallahan@112 1878 quest.reward_text = ReplaceKeywords(_G.GetRewardText())
jcallahan@112 1879 end
jcallahan@67 1880 -- Make sure the quest NPC isn't erroneously recorded as giving reputation for quests which award it.
jcallahan@177 1881 ClearKilledNPC()
jcallahan@10 1882 end
jcallahan@10 1883
jcallahan@12 1884
jcallahan@92 1885 function WDP:QUEST_DETAIL(event_name)
jcallahan@24 1886 local quest = UpdateQuestJuncture("begin")
jcallahan@24 1887
jcallahan@46 1888 if not quest then
jcallahan@46 1889 return
jcallahan@46 1890 end
jcallahan@24 1891 quest.classes = quest.classes or {}
jcallahan@27 1892 quest.classes[PLAYER_CLASS] = true
jcallahan@24 1893
jcallahan@24 1894 quest.races = quest.races or {}
jcallahan@100 1895 quest.races[(PLAYER_RACE == "Pandaren") and ("%s_%s"):format(PLAYER_RACE, PLAYER_FACTION or "Neutral") or PLAYER_RACE] = true
jcallahan@10 1896 end
jcallahan@12 1897 end -- do-block
jcallahan@9 1898
jcallahan@9 1899
jcallahan@92 1900 function WDP:QUEST_LOG_UPDATE(event_name)
jcallahan@38 1901 local selected_quest = _G.GetQuestLogSelection() -- Save current selection to be restored when we're done.
jcallahan@36 1902 local entry_index, processed_quests = 1, 0
jcallahan@36 1903 local _, num_quests = _G.GetNumQuestLogEntries()
jcallahan@36 1904
jcallahan@36 1905 while processed_quests <= num_quests do
jcallahan@36 1906 local _, _, _, _, is_header, _, _, _, quest_id = _G.GetQuestLogTitle(entry_index)
jcallahan@36 1907
jcallahan@84 1908 if quest_id == 0 then
jcallahan@84 1909 processed_quests = processed_quests + 1
jcallahan@84 1910 elseif not is_header then
jcallahan@36 1911 _G.SelectQuestLogEntry(entry_index);
jcallahan@36 1912
jcallahan@36 1913 local quest = DBEntry("quests", quest_id)
jcallahan@36 1914 quest.timer = _G.GetQuestLogTimeLeft()
jcallahan@37 1915 quest.can_share = _G.GetQuestLogPushable() and true or nil
jcallahan@36 1916 processed_quests = processed_quests + 1
jcallahan@36 1917 end
jcallahan@36 1918 entry_index = entry_index + 1
jcallahan@36 1919 end
jcallahan@36 1920 _G.SelectQuestLogEntry(selected_quest)
jcallahan@4 1921 self:UnregisterEvent("QUEST_LOG_UPDATE")
jcallahan@4 1922 end
jcallahan@4 1923
jcallahan@4 1924
jcallahan@97 1925 function WDP:QUEST_PROGRESS(event_name)
jcallahan@112 1926 if not ALLOWED_LOCALES[CLIENT_LOCALE] then
jcallahan@112 1927 return
jcallahan@112 1928 end
jcallahan@97 1929 DBEntry("quests", _G.GetQuestID()).progress_text = ReplaceKeywords(_G.GetProgressText())
jcallahan@97 1930 end
jcallahan@97 1931
jcallahan@97 1932
jcallahan@92 1933 function WDP:UNIT_QUEST_LOG_CHANGED(event_name, unit_id)
jcallahan@4 1934 if unit_id ~= "player" then
jcallahan@4 1935 return
jcallahan@4 1936 end
jcallahan@4 1937 self:RegisterEvent("QUEST_LOG_UPDATE")
jcallahan@4 1938 end
jcallahan@4 1939
jcallahan@4 1940
jcallahan@92 1941 do
jcallahan@92 1942 local TRADESKILL_TOOLS = {
jcallahan@92 1943 Anvil = anvil_spell_ids,
jcallahan@92 1944 Forge = forge_spell_ids,
jcallahan@92 1945 }
jcallahan@92 1946
jcallahan@92 1947
jcallahan@167 1948 local function RegisterTools(tradeskill_name, tradeskill_index)
jcallahan@167 1949 local spell_id = tonumber(_G.GetTradeSkillRecipeLink(tradeskill_index):match("^|c%x%x%x%x%x%x%x%x|H%w+:(%d+)"))
jcallahan@167 1950 local required_tool = _G.GetTradeSkillTools(tradeskill_index)
jcallahan@167 1951
jcallahan@167 1952 if required_tool then
jcallahan@167 1953 for tool_name, registry in pairs(TRADESKILL_TOOLS) do
jcallahan@167 1954 if required_tool:find(tool_name) then
jcallahan@167 1955 registry[spell_id] = true
jcallahan@167 1956 end
jcallahan@167 1957 end
jcallahan@167 1958 end
jcallahan@167 1959 end
jcallahan@167 1960
jcallahan@167 1961
jcallahan@92 1962 function WDP:TRADE_SKILL_SHOW(event_name)
jcallahan@92 1963 local profession_name, prof_level = _G.GetTradeSkillLine()
jcallahan@92 1964
jcallahan@92 1965 if profession_name == _G.UNKNOWN then
jcallahan@92 1966 return
jcallahan@92 1967 end
jcallahan@167 1968 TradeSkillExecutePer(RegisterTools)
jcallahan@92 1969 end
jcallahan@92 1970 end -- do-block
jcallahan@92 1971
jcallahan@92 1972
jcallahan@167 1973 function WDP:TRAINER_CLOSED(event_name)
jcallahan@167 1974 private.trainer_shown = nil
jcallahan@167 1975 end
jcallahan@167 1976
jcallahan@167 1977
jcallahan@92 1978 function WDP:TRAINER_SHOW(event_name)
jcallahan@34 1979 local unit_type, unit_idnum = ParseGUID(_G.UnitGUID("target"))
jcallahan@164 1980 local trainer = NPCEntry(unit_idnum)
jcallahan@58 1981
jcallahan@164 1982 if not trainer then
jcallahan@58 1983 return
jcallahan@58 1984 end
jcallahan@164 1985 local trainer_standing = select(2, UnitFactionStanding("target"))
jcallahan@164 1986 trainer.teaches = trainer.teaches or {}
jcallahan@27 1987
jcallahan@167 1988 private.trainer_shown = true
jcallahan@167 1989
jcallahan@27 1990 -- Get the initial trainer filters
jcallahan@27 1991 local available = _G.GetTrainerServiceTypeFilter("available")
jcallahan@27 1992 local unavailable = _G.GetTrainerServiceTypeFilter("unavailable")
jcallahan@27 1993 local used = _G.GetTrainerServiceTypeFilter("used")
jcallahan@27 1994
jcallahan@27 1995 -- Clear the trainer filters
jcallahan@27 1996 _G.SetTrainerServiceTypeFilter("available", 1)
jcallahan@27 1997 _G.SetTrainerServiceTypeFilter("unavailable", 1)
jcallahan@27 1998 _G.SetTrainerServiceTypeFilter("used", 1)
jcallahan@27 1999
jcallahan@27 2000 for index = 1, _G.GetNumTrainerServices(), 1 do
jcallahan@27 2001 local spell_name, rank_name, _, _, required_level = _G.GetTrainerServiceInfo(index)
jcallahan@27 2002
jcallahan@27 2003 if spell_name then
jcallahan@27 2004 DatamineTT:ClearLines()
jcallahan@27 2005 DatamineTT:SetTrainerService(index)
jcallahan@27 2006
jcallahan@27 2007 local _, _, spell_id = DatamineTT:GetSpell()
jcallahan@27 2008
jcallahan@43 2009 if spell_id then
jcallahan@164 2010 local class_professions = trainer.teaches[PLAYER_CLASS]
jcallahan@164 2011
jcallahan@164 2012 if not class_professions then
jcallahan@164 2013 trainer.teaches[PLAYER_CLASS] = {}
jcallahan@164 2014 class_professions = trainer.teaches[PLAYER_CLASS]
jcallahan@164 2015 end
jcallahan@43 2016 local profession, min_skill = _G.GetTrainerServiceSkillReq(index)
jcallahan@43 2017 profession = profession or "General"
jcallahan@43 2018
jcallahan@164 2019 local profession_skills = class_professions[profession]
jcallahan@43 2020
jcallahan@43 2021 if not profession_skills then
jcallahan@43 2022 class_professions[profession] = {}
jcallahan@43 2023 profession_skills = class_professions[profession]
jcallahan@43 2024 end
jcallahan@173 2025 profession_skills[spell_id] = ("%d:%d:%d"):format(required_level, min_skill, _G.GetTrainerServiceCost(index))
jcallahan@27 2026 end
jcallahan@27 2027 end
jcallahan@27 2028 end
jcallahan@27 2029 -- Reset the filters to what they were before
jcallahan@27 2030 _G.SetTrainerServiceTypeFilter("available", available or 0)
jcallahan@27 2031 _G.SetTrainerServiceTypeFilter("unavailable", unavailable or 0)
jcallahan@27 2032 _G.SetTrainerServiceTypeFilter("used", used or 0)
jcallahan@27 2033 end
jcallahan@27 2034
jcallahan@27 2035
jcallahan@1 2036 function WDP:UNIT_SPELLCAST_SENT(event_name, unit_id, spell_name, spell_rank, target_name, spell_line)
jcallahan@1 2037 if private.tracked_line or unit_id ~= "player" then
jcallahan@1 2038 return
jcallahan@1 2039 end
jcallahan@1 2040 local spell_label = private.SPELL_LABELS_BY_NAME[spell_name]
jcallahan@1 2041
jcallahan@1 2042 if not spell_label then
jcallahan@1 2043 return
jcallahan@1 2044 end
jcallahan@150 2045 local item_name, item_link = _G.GameTooltip:GetItem()
jcallahan@150 2046 local unit_name, unit_id = _G.GameTooltip:GetUnit()
jcallahan@1 2047
jcallahan@150 2048 if not unit_name and _G.UnitName("target") == target_name then
jcallahan@150 2049 unit_name = target_name
jcallahan@150 2050 unit_id = "target"
jcallahan@1 2051 end
jcallahan@1 2052 local spell_flags = private.SPELL_FLAGS_BY_LABEL[spell_label]
jcallahan@28 2053 local zone_name, area_id, x, y, map_level, instance_token = CurrentLocationData()
jcallahan@28 2054
jcallahan@205 2055 table.wipe(current_action)
jcallahan@122 2056 current_action.instance_token = instance_token
jcallahan@122 2057 current_action.map_level = map_level
jcallahan@122 2058 current_action.x = x
jcallahan@122 2059 current_action.y = y
jcallahan@122 2060 current_action.zone_data = ("%s:%d"):format(zone_name, area_id)
jcallahan@122 2061 current_action.spell_label = spell_label
jcallahan@105 2062
jcallahan@105 2063 if not private.NON_LOOT_SPELL_LABELS[spell_label] then
jcallahan@122 2064 current_action.loot_label = spell_label:lower()
jcallahan@105 2065 end
jcallahan@1 2066
jcallahan@151 2067 if unit_name and unit_name == target_name and not item_name then
jcallahan@16 2068 if bit.band(spell_flags, AF.NPC) == AF.NPC then
jcallahan@150 2069 if not unit_id or unit_name ~= target_name then
jcallahan@16 2070 return
jcallahan@16 2071 end
jcallahan@123 2072 current_action.target_type = AF.NPC
jcallahan@16 2073 end
jcallahan@16 2074 elseif bit.band(spell_flags, AF.ITEM) == AF.ITEM then
jcallahan@123 2075 current_action.target_type = AF.ITEM
jcallahan@16 2076
jcallahan@150 2077 if item_name and item_name == target_name then
jcallahan@150 2078 current_action.identifier = ItemLinkToID(item_link)
jcallahan@16 2079 elseif target_name and target_name ~= "" then
jcallahan@150 2080 current_action.identifier = ItemLinkToID(select(2, _G.GetItemInfo(target_name)))
jcallahan@16 2081 end
jcallahan@150 2082 elseif not item_name and not unit_name then
jcallahan@1 2083 if bit.band(spell_flags, AF.OBJECT) == AF.OBJECT then
jcallahan@17 2084 if target_name == "" then
jcallahan@17 2085 return
jcallahan@17 2086 end
jcallahan@122 2087 current_action.object_name = target_name
jcallahan@123 2088 current_action.target_type = AF.OBJECT
jcallahan@1 2089 elseif bit.band(spell_flags, AF.ZONE) == AF.ZONE then
jcallahan@123 2090 current_action.target_type = AF.ZONE
jcallahan@1 2091 end
jcallahan@1 2092 end
jcallahan@1 2093 private.tracked_line = spell_line
jcallahan@0 2094 end
jcallahan@0 2095
jcallahan@94 2096
jcallahan@1 2097 function WDP:UNIT_SPELLCAST_SUCCEEDED(event_name, unit_id, spell_name, spell_rank, spell_line, spell_id)
jcallahan@1 2098 if unit_id ~= "player" then
jcallahan@1 2099 return
jcallahan@1 2100 end
jcallahan@1 2101 private.tracked_line = nil
jcallahan@167 2102 private.previous_spell_id = spell_id
jcallahan@85 2103
jcallahan@86 2104 if spell_name:match("^Harvest.+") then
jcallahan@177 2105 killed_npc_id = current_target_id
jcallahan@98 2106 private.harvesting = true
jcallahan@85 2107 end
jcallahan@92 2108
jcallahan@92 2109 if anvil_spell_ids[spell_id] then
jcallahan@92 2110 UpdateDBEntryLocation("objects", OBJECT_ID_ANVIL)
jcallahan@92 2111 elseif forge_spell_ids[spell_id] then
jcallahan@92 2112 UpdateDBEntryLocation("objects", OBJECT_ID_FORGE)
jcallahan@92 2113 end
jcallahan@0 2114 end
jcallahan@0 2115
jcallahan@90 2116
jcallahan@1 2117 function WDP:HandleSpellFailure(event_name, unit_id, spell_name, spell_rank, spell_line, spell_id)
jcallahan@1 2118 if unit_id ~= "player" then
jcallahan@1 2119 return
jcallahan@1 2120 end
jcallahan@0 2121
jcallahan@1 2122 if private.tracked_line == spell_line then
jcallahan@1 2123 private.tracked_line = nil
jcallahan@1 2124 end
jcallahan@147 2125 table.wipe(current_action)
jcallahan@0 2126 end
jcallahan@90 2127
jcallahan@90 2128
jcallahan@90 2129 do
jcallahan@90 2130 local function SetUnitField(field, required_type)
jcallahan@90 2131 local unit_type, unit_idnum = ParseGUID(_G.UnitGUID("npc"))
jcallahan@90 2132
jcallahan@90 2133 if not unit_idnum or (required_type and unit_type ~= required_type) then
jcallahan@90 2134 return
jcallahan@90 2135 end
jcallahan@90 2136
jcallahan@171 2137 if UnitTypeIsNPC(unit_type) then
jcallahan@90 2138 NPCEntry(unit_idnum)[field] = true
jcallahan@90 2139 elseif unit_type == private.UNIT_TYPES.OBJECT then
jcallahan@90 2140 DBEntry("objects", unit_idnum)[field] = true
jcallahan@93 2141 UpdateDBEntryLocation("objects", unit_idnum)
jcallahan@90 2142 end
jcallahan@90 2143 end
jcallahan@90 2144
jcallahan@90 2145
jcallahan@90 2146 function WDP:AUCTION_HOUSE_SHOW(event_name)
jcallahan@90 2147 SetUnitField("auctioneer", private.UNIT_TYPES.NPC)
jcallahan@90 2148 end
jcallahan@90 2149
jcallahan@90 2150
jcallahan@90 2151 function WDP:BANKFRAME_OPENED(event_name)
jcallahan@90 2152 SetUnitField("banker", private.UNIT_TYPES.NPC)
jcallahan@90 2153 end
jcallahan@90 2154
jcallahan@90 2155
jcallahan@90 2156 function WDP:BATTLEFIELDS_SHOW(event_name)
jcallahan@90 2157 SetUnitField("battlemaster", private.UNIT_TYPES.NPC)
jcallahan@90 2158 end
jcallahan@90 2159
jcallahan@90 2160
jcallahan@92 2161 function WDP:FORGE_MASTER_OPENED(event_name)
jcallahan@90 2162 SetUnitField("arcane_reforger", private.UNIT_TYPES.NPC)
jcallahan@90 2163 end
jcallahan@90 2164
jcallahan@90 2165
jcallahan@92 2166 function WDP:GOSSIP_SHOW(event_name)
jcallahan@90 2167 local gossip_options = { _G.GetGossipOptions() }
jcallahan@90 2168
jcallahan@90 2169 for index = 2, #gossip_options, 2 do
jcallahan@90 2170 if gossip_options[index] == "binder" then
jcallahan@90 2171 SetUnitField("innkeeper", private.UNIT_TYPES.NPC)
jcallahan@90 2172 return
jcallahan@90 2173 end
jcallahan@90 2174 end
jcallahan@90 2175 end
jcallahan@90 2176
jcallahan@90 2177
jcallahan@93 2178 function WDP:GUILDBANKFRAME_OPENED(event_name)
jcallahan@93 2179 SetUnitField("guild_bank", private.UNIT_TYPES.OBJECT)
jcallahan@93 2180 end
jcallahan@93 2181
jcallahan@93 2182
jcallahan@189 2183 function WDP:ITEM_UPGRADE_MASTER_OPENED(event_name)
jcallahan@189 2184 SetUnitField("item_upgrade_master", private.UNIT_TYPES.NPC)
jcallahan@189 2185 end
jcallahan@189 2186
jcallahan@189 2187
jcallahan@90 2188 function WDP:TAXIMAP_OPENED(event_name)
jcallahan@90 2189 SetUnitField("flight_master", private.UNIT_TYPES.NPC)
jcallahan@90 2190 end
jcallahan@90 2191
jcallahan@90 2192
jcallahan@90 2193 function WDP:TRANSMOGRIFY_OPEN(event_name)
jcallahan@90 2194 SetUnitField("transmogrifier", private.UNIT_TYPES.NPC)
jcallahan@90 2195 end
jcallahan@90 2196
jcallahan@90 2197
jcallahan@90 2198 function WDP:VOID_STORAGE_OPEN(event_name)
jcallahan@90 2199 SetUnitField("void_storage", private.UNIT_TYPES.NPC)
jcallahan@90 2200 end
jcallahan@90 2201 end -- do-block