Mercurial > wow > wowdb-profiler

annotate Main.lua @ 98:6b118dd1baf4

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Mark NPCs which generate reputation from being harvested as such (MoP crops). Remove reputation_npc_id as soon as it is no longer needed to prevent false-positives.
author James D. Callahan III <jcallahan@curse.com>
date Fri, 31 Aug 2012 10:18:03 -0500
parents f6369b88454f
children e684a68efc5f
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@48 25
jcallahan@4 26 local DatamineTT = _G.CreateFrame("GameTooltip", "WDPDatamineTT", _G.UIParent, "GameTooltipTemplate")
jcallahan@5 27 DatamineTT:SetOwner(_G.WorldFrame, "ANCHOR_NONE")
jcallahan@5 28
jcallahan@0 29
jcallahan@0 30 -----------------------------------------------------------------------
jcallahan@0 31 -- Local constants.
jcallahan@0 32 -----------------------------------------------------------------------
jcallahan@74 33 local DB_VERSION = 4
jcallahan@63 34
jcallahan@92 35
jcallahan@0 36 local DATABASE_DEFAULTS = {
jcallahan@0 37 global = {
jcallahan@0 38 items = {},
jcallahan@0 39 npcs = {},
jcallahan@0 40 objects = {},
jcallahan@0 41 quests = {},
jcallahan@17 42 zones = {},
jcallahan@0 43 }
jcallahan@0 44 }
jcallahan@0 45
jcallahan@0 46
jcallahan@1 47 local EVENT_MAPPING = {
jcallahan@90 48 AUCTION_HOUSE_SHOW = true,
jcallahan@90 49 BANKFRAME_OPENED = true,
jcallahan@90 50 BATTLEFIELDS_SHOW = true,
jcallahan@56 51 BLACK_MARKET_ITEM_UPDATE = true,
jcallahan@48 52 CHAT_MSG_LOOT = true,
jcallahan@95 53 CHAT_MSG_MONSTER_SAY = "RecordQuote",
jcallahan@95 54 CHAT_MSG_MONSTER_WHISPER = "RecordQuote",
jcallahan@95 55 CHAT_MSG_MONSTER_YELL = "RecordQuote",
jcallahan@40 56 CHAT_MSG_SYSTEM = true,
jcallahan@23 57 COMBAT_LOG_EVENT_UNFILTERED = true,
jcallahan@18 58 COMBAT_TEXT_UPDATE = true,
jcallahan@90 59 FORGE_MASTER_OPENED = true,
jcallahan@90 60 GOSSIP_SHOW = true,
jcallahan@93 61 GUILDBANKFRAME_OPENED = true,
jcallahan@42 62 ITEM_TEXT_BEGIN = true,
jcallahan@1 63 LOOT_OPENED = true,
jcallahan@89 64 MAIL_SHOW = true,
jcallahan@7 65 MERCHANT_SHOW = "UpdateMerchantItems",
jcallahan@61 66 MERCHANT_UPDATE = "UpdateMerchantItems",
jcallahan@25 67 PET_BAR_UPDATE = true,
jcallahan@2 68 PLAYER_TARGET_CHANGED = true,
jcallahan@9 69 QUEST_COMPLETE = true,
jcallahan@9 70 QUEST_DETAIL = true,
jcallahan@9 71 QUEST_LOG_UPDATE = true,
jcallahan@97 72 QUEST_PROGRESS = true,
jcallahan@88 73 TAXIMAP_OPENED = true,
jcallahan@92 74 TRADE_SKILL_SHOW = true,
jcallahan@27 75 TRAINER_SHOW = true,
jcallahan@90 76 TRANSMOGRIFY_OPEN = true,
jcallahan@4 77 UNIT_QUEST_LOG_CHANGED = true,
jcallahan@1 78 UNIT_SPELLCAST_FAILED = "HandleSpellFailure",
jcallahan@1 79 UNIT_SPELLCAST_FAILED_QUIET = "HandleSpellFailure",
jcallahan@1 80 UNIT_SPELLCAST_INTERRUPTED = "HandleSpellFailure",
jcallahan@1 81 UNIT_SPELLCAST_SENT = true,
jcallahan@1 82 UNIT_SPELLCAST_SUCCEEDED = true,
jcallahan@90 83 VOID_STORAGE_OPEN = true,
jcallahan@0 84 }
jcallahan@0 85
jcallahan@4 86
jcallahan@92 87 local OBJECT_ID_ANVIL = 192628
jcallahan@92 88 local OBJECT_ID_FORGE = 1685
jcallahan@92 89
jcallahan@92 90
jcallahan@1 91 local AF = private.ACTION_TYPE_FLAGS
jcallahan@0 92
jcallahan@4 93
jcallahan@27 94 local PLAYER_CLASS = _G.select(2, _G.UnitClass("player"))
jcallahan@34 95 local PLAYER_GUID = _G.UnitGUID("player")
jcallahan@95 96 local PLAYER_NAME = _G.UnitName("player")
jcallahan@39 97 local PLAYER_RACE = _G.select(2, _G.UnitRace("player"))
jcallahan@27 98
jcallahan@95 99
jcallahan@0 100 -----------------------------------------------------------------------
jcallahan@0 101 -- Local variables.
jcallahan@0 102 -----------------------------------------------------------------------
jcallahan@92 103 local anvil_spell_ids = {}
jcallahan@92 104 local action_data = {}
jcallahan@92 105 local currently_drunk
jcallahan@0 106 local db
jcallahan@0 107 local durability_timer_handle
jcallahan@92 108 local faction_standings = {}
jcallahan@92 109 local forge_spell_ids = {}
jcallahan@95 110 local languages_known = {}
jcallahan@95 111 local name_to_id_map = {}
jcallahan@92 112 local reputation_npc_id
jcallahan@2 113 local target_location_timer_handle
jcallahan@86 114 local current_target_id
jcallahan@1 115
jcallahan@92 116
jcallahan@1 117 -----------------------------------------------------------------------
jcallahan@1 118 -- Helper Functions.
jcallahan@1 119 -----------------------------------------------------------------------
jcallahan@39 120 local ActualCopperCost
jcallahan@39 121 do
jcallahan@39 122 local BARTERING_SPELL_ID = 83964
jcallahan@39 123
jcallahan@39 124 local STANDING_DISCOUNTS = {
jcallahan@39 125 HATED = 0,
jcallahan@39 126 HOSTILE = 0,
jcallahan@39 127 UNFRIENDLY = 0,
jcallahan@39 128 NEUTRAL = 0,
jcallahan@39 129 FRIENDLY = 0.05,
jcallahan@39 130 HONORED = 0.1,
jcallahan@39 131 REVERED = 0.15,
jcallahan@39 132 EXALTED = 0.2,
jcallahan@39 133 }
jcallahan@39 134
jcallahan@39 135
jcallahan@39 136 function ActualCopperCost(copper_cost, rep_standing)
jcallahan@39 137 if not copper_cost or copper_cost == 0 then
jcallahan@39 138 return 0
jcallahan@39 139 end
jcallahan@39 140 local modifier = 1
jcallahan@39 141
jcallahan@39 142 if _G.IsSpellKnown(BARTERING_SPELL_ID) then
jcallahan@39 143 modifier = modifier - 0.1
jcallahan@39 144 end
jcallahan@39 145
jcallahan@39 146 if rep_standing then
jcallahan@39 147 if PLAYER_RACE == "Goblin" then
jcallahan@39 148 modifier = modifier - STANDING_DISCOUNTS["EXALTED"]
jcallahan@39 149 elseif STANDING_DISCOUNTS[rep_standing] then
jcallahan@39 150 modifier = modifier - STANDING_DISCOUNTS[rep_standing]
jcallahan@39 151 end
jcallahan@39 152 end
jcallahan@39 153 return math.floor(copper_cost / modifier)
jcallahan@39 154 end
jcallahan@39 155 end -- do-block
jcallahan@39 156
jcallahan@39 157
jcallahan@29 158 local function InstanceDifficultyToken()
jcallahan@29 159 local _, instance_type, instance_difficulty, difficulty_name, _, _, is_dynamic = _G.GetInstanceInfo()
jcallahan@59 160 if not difficulty_name or difficulty_name == "" then
jcallahan@29 161 difficulty_name = "NONE"
jcallahan@29 162 end
jcallahan@59 163
jcallahan@59 164 if not instance_type or instance_type == "" then
jcallahan@59 165 instance_type = "NONE"
jcallahan@59 166 end
jcallahan@29 167 return ("%s:%s:%s"):format(instance_type:upper(), difficulty_name:upper():gsub(" ", "_"), _G.tostring(is_dynamic))
jcallahan@29 168 end
jcallahan@29 169
jcallahan@29 170
jcallahan@19 171 local function DBEntry(data_type, unit_id)
jcallahan@19 172 if not data_type or not unit_id then
jcallahan@6 173 return
jcallahan@6 174 end
jcallahan@19 175 local unit = db[data_type][unit_id]
jcallahan@6 176
jcallahan@10 177 if not unit then
jcallahan@19 178 db[data_type][unit_id] = {}
jcallahan@19 179 unit = db[data_type][unit_id]
jcallahan@6 180 end
jcallahan@10 181 return unit
jcallahan@6 182 end
jcallahan@6 183
jcallahan@6 184
jcallahan@29 185 local function NPCEntry(identifier)
jcallahan@29 186 local npc = DBEntry("npcs", identifier)
jcallahan@29 187
jcallahan@29 188 if not npc then
jcallahan@29 189 return
jcallahan@22 190 end
jcallahan@29 191 local instance_token = InstanceDifficultyToken()
jcallahan@29 192 npc.encounter_data = npc.encounter_data or {}
jcallahan@29 193 npc.encounter_data[instance_token] = npc.encounter_data[instance_token] or {}
jcallahan@30 194 npc.encounter_data[instance_token].stats = npc.encounter_data[instance_token].stats or {}
jcallahan@29 195 return npc
jcallahan@22 196 end
jcallahan@22 197
jcallahan@22 198
jcallahan@1 199 local function CurrentLocationData()
jcallahan@1 200 local map_level = _G.GetCurrentMapDungeonLevel() or 0
jcallahan@1 201 local x, y = _G.GetPlayerMapPosition("player")
jcallahan@1 202
jcallahan@1 203 x = x or 0
jcallahan@1 204 y = y or 0
jcallahan@1 205
jcallahan@1 206 if x == 0 and y == 0 then
jcallahan@1 207 for level_index = 1, _G.GetNumDungeonMapLevels() do
jcallahan@1 208 _G.SetDungeonMapLevel(level_index)
jcallahan@1 209 x, y = _G.GetPlayerMapPosition("player")
jcallahan@1 210
jcallahan@1 211 if x and y and (x > 0 or y > 0) then
jcallahan@1 212 _G.SetDungeonMapLevel(map_level)
jcallahan@1 213 map_level = level_index
jcallahan@1 214 break
jcallahan@1 215 end
jcallahan@1 216 end
jcallahan@1 217 end
jcallahan@1 218
jcallahan@1 219 if _G.DungeonUsesTerrainMap() then
jcallahan@1 220 map_level = map_level - 1
jcallahan@1 221 end
jcallahan@31 222 local x = _G.floor(x * 1000)
jcallahan@31 223 local y = _G.floor(y * 1000)
jcallahan@28 224
jcallahan@31 225 if x % 2 ~= 0 then
jcallahan@31 226 x = x + 1
jcallahan@28 227 end
jcallahan@28 228
jcallahan@31 229 if y % 2 ~= 0 then
jcallahan@31 230 y = y + 1
jcallahan@28 231 end
jcallahan@31 232 return _G.GetRealZoneText(), _G.GetCurrentMapAreaID(), x, y, map_level, InstanceDifficultyToken()
jcallahan@1 233 end
jcallahan@1 234
jcallahan@1 235
jcallahan@1 236 local function ItemLinkToID(item_link)
jcallahan@1 237 if not item_link then
jcallahan@1 238 return
jcallahan@1 239 end
jcallahan@7 240 return tonumber(item_link:match("item:(%d+)"))
jcallahan@1 241 end
jcallahan@0 242
jcallahan@4 243
jcallahan@34 244 local ParseGUID
jcallahan@4 245 do
jcallahan@4 246 local UNIT_TYPE_BITMASK = 0x007
jcallahan@4 247
jcallahan@34 248 function ParseGUID(guid)
jcallahan@5 249 if not guid then
jcallahan@5 250 return
jcallahan@5 251 end
jcallahan@4 252 local types = private.UNIT_TYPES
jcallahan@4 253 local unit_type = _G.bit.band(tonumber(guid:sub(1, 5)), UNIT_TYPE_BITMASK)
jcallahan@4 254
jcallahan@10 255 if unit_type ~= types.PLAYER and unit_type ~= types.PET then
jcallahan@66 256 return unit_type, tonumber(guid:sub(6, 10), 16)
jcallahan@4 257 end
jcallahan@4 258 return unit_type
jcallahan@4 259 end
jcallahan@4 260 end -- do-block
jcallahan@4 261
jcallahan@4 262
jcallahan@34 263 local UpdateNPCLocation
jcallahan@34 264 do
jcallahan@34 265 local COORD_MAX = 5
jcallahan@34 266
jcallahan@34 267 function UpdateNPCLocation(unit_idnum)
jcallahan@34 268 local zone_name, area_id, x, y, map_level, difficulty_token = CurrentLocationData()
jcallahan@34 269 local npc_data = NPCEntry(unit_idnum).encounter_data[difficulty_token].stats[("level_%d"):format(_G.UnitLevel("target"))]
jcallahan@34 270 local zone_token = ("%s:%d"):format(zone_name, area_id)
jcallahan@34 271 npc_data.locations = npc_data.locations or {}
jcallahan@34 272
jcallahan@34 273 local zone_data = npc_data.locations[zone_token]
jcallahan@34 274
jcallahan@34 275 if not zone_data then
jcallahan@34 276 zone_data = {}
jcallahan@34 277 npc_data.locations[zone_token] = zone_data
jcallahan@34 278 end
jcallahan@34 279
jcallahan@34 280 for location_token in pairs(zone_data) do
jcallahan@34 281 local loc_level, loc_x, loc_y = (":"):split(location_token)
jcallahan@34 282 loc_level = tonumber(loc_level)
jcallahan@34 283
jcallahan@34 284 if map_level == loc_level and math.abs(x - loc_x) <= COORD_MAX and math.abs(y - loc_y) <= COORD_MAX then
jcallahan@34 285 return
jcallahan@34 286 end
jcallahan@34 287 end
jcallahan@34 288 zone_data[("%s:%s:%s"):format(map_level, x, y)] = true
jcallahan@34 289 end
jcallahan@34 290 end -- do-block
jcallahan@34 291
jcallahan@34 292
jcallahan@52 293 local function UpdateDBEntryLocation(entry_type, identifier)
jcallahan@10 294 if not identifier then
jcallahan@10 295 return
jcallahan@10 296 end
jcallahan@31 297 local zone_name, area_id, x, y, map_level, difficulty_token = CurrentLocationData()
jcallahan@41 298 local entry = DBEntry(entry_type, identifier)
jcallahan@41 299 entry[difficulty_token] = entry[difficulty_token] or {}
jcallahan@52 300 entry[difficulty_token].locations = entry[difficulty_token].locations or {}
jcallahan@10 301
jcallahan@31 302 local zone_token = ("%s:%d"):format(zone_name, area_id)
jcallahan@52 303 local zone_data = entry[difficulty_token].locations[zone_token]
jcallahan@24 304
jcallahan@31 305 if not zone_data then
jcallahan@31 306 zone_data = {}
jcallahan@52 307 entry[difficulty_token].locations[zone_token] = zone_data
jcallahan@10 308 end
jcallahan@41 309 local location_token = ("%s:%s:%s"):format(map_level, x, y)
jcallahan@41 310 zone_data[location_token] = zone_data[location_token] or true
jcallahan@41 311 return zone_data
jcallahan@10 312 end
jcallahan@10 313
jcallahan@10 314
jcallahan@19 315 local function HandleItemUse(item_link, bag_index, slot_index)
jcallahan@19 316 if not item_link then
jcallahan@19 317 return
jcallahan@19 318 end
jcallahan@19 319 local item_id = ItemLinkToID(item_link)
jcallahan@19 320
jcallahan@19 321 if not bag_index or not slot_index then
jcallahan@19 322 for new_bag_index = 0, _G.NUM_BAG_FRAMES do
jcallahan@19 323 for new_slot_index = 1, _G.GetContainerNumSlots(new_bag_index) do
jcallahan@19 324 if item_id == ItemLinkToID(_G.GetContainerItemLink(new_bag_index, new_slot_index)) then
jcallahan@19 325 bag_index = new_bag_index
jcallahan@19 326 slot_index = new_slot_index
jcallahan@19 327 break
jcallahan@19 328 end
jcallahan@19 329 end
jcallahan@19 330 end
jcallahan@19 331 end
jcallahan@19 332
jcallahan@19 333 if not bag_index or not slot_index then
jcallahan@19 334 return
jcallahan@19 335 end
jcallahan@19 336 local _, _, _, _, _, is_lootable = _G.GetContainerItemInfo(bag_index, slot_index)
jcallahan@19 337
jcallahan@19 338 if not is_lootable then
jcallahan@19 339 return
jcallahan@19 340 end
jcallahan@19 341 DatamineTT:ClearLines()
jcallahan@19 342 DatamineTT:SetBagItem(bag_index, slot_index)
jcallahan@19 343
jcallahan@19 344 for line_index = 1, DatamineTT:NumLines() do
jcallahan@19 345 local current_line = _G["WDPDatamineTTTextLeft" .. line_index]
jcallahan@19 346
jcallahan@19 347 if not current_line then
jcallahan@19 348 break
jcallahan@19 349 end
jcallahan@19 350
jcallahan@19 351 if current_line:GetText() == _G.ITEM_OPENABLE then
jcallahan@19 352 table.wipe(action_data)
jcallahan@19 353 action_data.type = AF.ITEM
jcallahan@28 354 action_data.identifier = item_id
jcallahan@25 355 action_data.label = "contains"
jcallahan@19 356 break
jcallahan@19 357 end
jcallahan@19 358 end
jcallahan@19 359 end
jcallahan@19 360
jcallahan@19 361
jcallahan@39 362 local UnitFactionStanding
jcallahan@32 363 local UpdateFactionData
jcallahan@32 364 do
jcallahan@32 365 local MAX_FACTION_INDEX = 1000
jcallahan@20 366
jcallahan@32 367 local STANDING_NAMES = {
jcallahan@32 368 "HATED",
jcallahan@32 369 "HOSTILE",
jcallahan@32 370 "UNFRIENDLY",
jcallahan@32 371 "NEUTRAL",
jcallahan@32 372 "FRIENDLY",
jcallahan@32 373 "HONORED",
jcallahan@32 374 "REVERED",
jcallahan@32 375 "EXALTED",
jcallahan@32 376 }
jcallahan@32 377
jcallahan@39 378
jcallahan@39 379 function UnitFactionStanding(unit)
jcallahan@39 380 UpdateFactionData()
jcallahan@39 381 DatamineTT:ClearLines()
jcallahan@39 382 DatamineTT:SetUnit(unit)
jcallahan@39 383
jcallahan@39 384 for line_index = 1, DatamineTT:NumLines() do
jcallahan@64 385 local faction_name = _G["WDPDatamineTTTextLeft" .. line_index]:GetText():trim()
jcallahan@39 386
jcallahan@39 387 if faction_name and faction_standings[faction_name] then
jcallahan@39 388 return faction_name, faction_standings[faction_name]
jcallahan@39 389 end
jcallahan@39 390 end
jcallahan@39 391 end
jcallahan@39 392
jcallahan@39 393
jcallahan@32 394 function UpdateFactionData()
jcallahan@32 395 for faction_index = 1, MAX_FACTION_INDEX do
jcallahan@32 396 local faction_name, _, current_standing, _, _, _, _, _, is_header = _G.GetFactionInfo(faction_index)
jcallahan@32 397
jcallahan@86 398 if faction_name then
jcallahan@32 399 faction_standings[faction_name] = STANDING_NAMES[current_standing]
jcallahan@32 400 elseif not faction_name then
jcallahan@32 401 break
jcallahan@32 402 end
jcallahan@20 403 end
jcallahan@20 404 end
jcallahan@32 405 end -- do-block
jcallahan@20 406
jcallahan@48 407
jcallahan@75 408 local GenericLootUpdate
jcallahan@75 409 do
jcallahan@77 410 local function LootTable(entry, loot_type, top_field)
jcallahan@75 411 if top_field then
jcallahan@75 412 entry[top_field] = entry[top_field] or {}
jcallahan@75 413 entry[top_field][loot_type] = entry[top_field][loot_type] or {}
jcallahan@75 414 return entry[top_field][loot_type]
jcallahan@75 415 end
jcallahan@48 416 entry[loot_type] = entry[loot_type] or {}
jcallahan@75 417 return entry[loot_type]
jcallahan@48 418 end
jcallahan@48 419
jcallahan@75 420 function GenericLootUpdate(data_type, top_field)
jcallahan@75 421 local loot_type = action_data.label or "drops"
jcallahan@75 422 local loot_count = ("%s_count"):format(loot_type)
jcallahan@77 423 local source_list = {}
jcallahan@75 424
jcallahan@78 425 for source_guid, loot_data in pairs(action_data.loot_sources) do
jcallahan@78 426 local entry, source_id
jcallahan@78 427
jcallahan@78 428 if action_data.type == AF.ITEM then
jcallahan@78 429 -- Items return the player as the source, so we need to use the item's ID (disenchant, milling, etc)
jcallahan@78 430 source_id = action_data.identifier
jcallahan@78 431 entry = DBEntry(data_type, source_id)
jcallahan@78 432 elseif action_data.type == AF.OBJECT then
jcallahan@78 433 source_id = ("%s:%s"):format(action_data.spell_label, select(2, ParseGUID(source_guid)))
jcallahan@78 434 entry = DBEntry(data_type, source_id)
jcallahan@78 435 else
jcallahan@78 436 source_id = select(2, ParseGUID(source_guid))
jcallahan@78 437 entry = DBEntry(data_type, source_id)
jcallahan@78 438 end
jcallahan@75 439
jcallahan@75 440 if entry then
jcallahan@77 441 local loot_table = LootTable(entry, loot_type, top_field)
jcallahan@77 442
jcallahan@78 443 if not source_list[source_guid] then
jcallahan@77 444 if top_field then
jcallahan@77 445 entry[top_field][loot_count] = (entry[top_field][loot_count] or 0) + 1
jcallahan@77 446 else
jcallahan@77 447 entry[loot_count] = (entry[loot_count] or 0) + 1
jcallahan@77 448 end
jcallahan@78 449 source_list[source_guid] = true
jcallahan@77 450 end
jcallahan@75 451 UpdateDBEntryLocation(data_type, source_id)
jcallahan@75 452
jcallahan@75 453 for item_id, quantity in pairs(loot_data) do
jcallahan@75 454 table.insert(loot_table, ("%d:%d"):format(item_id, quantity))
jcallahan@75 455 end
jcallahan@75 456 end
jcallahan@75 457 end
jcallahan@75 458 -- TODO: Remove this when GetLootSourceInfo() has values for money
jcallahan@82 459 if #action_data.loot_list <= 0 then
jcallahan@78 460 return
jcallahan@78 461 end
jcallahan@82 462 local entry
jcallahan@82 463
jcallahan@82 464 -- At this point we only have a name if it's an object.
jcallahan@82 465 if action_data.type == AF.OBJECT then
jcallahan@82 466 entry = DBEntry(data_type, ("%s:%s"):format(action_data.spell_label, action_data.target_name))
jcallahan@82 467 else
jcallahan@82 468 entry = DBEntry(data_type, action_data.identifier)
jcallahan@82 469 end
jcallahan@75 470
jcallahan@75 471 if not entry then
jcallahan@75 472 return
jcallahan@75 473 end
jcallahan@77 474 local loot_table = LootTable(entry, loot_type, top_field)
jcallahan@77 475
jcallahan@77 476 if not source_list[action_data.identifier] then
jcallahan@77 477 if top_field then
jcallahan@77 478 entry[top_field][loot_count] = (entry[top_field][loot_count] or 0) + 1
jcallahan@77 479 else
jcallahan@77 480 entry[loot_count] = (entry[loot_count] or 0) + 1
jcallahan@77 481 end
jcallahan@77 482 end
jcallahan@75 483
jcallahan@75 484 for index = 1, #action_data.loot_list do
jcallahan@75 485 table.insert(loot_table, action_data.loot_list[index])
jcallahan@75 486 end
jcallahan@48 487 end
jcallahan@75 488 end -- do-block
jcallahan@48 489
jcallahan@97 490
jcallahan@97 491 local ReplaceKeywords
jcallahan@97 492 do
jcallahan@97 493 local KEYWORD_SUBSTITUTIONS = {
jcallahan@97 494 class = PLAYER_CLASS,
jcallahan@97 495 name = PLAYER_NAME,
jcallahan@97 496 race = PLAYER_RACE,
jcallahan@97 497 }
jcallahan@97 498
jcallahan@97 499
jcallahan@97 500 function ReplaceKeywords(text)
jcallahan@97 501 if not text or text == "" then
jcallahan@97 502 return ""
jcallahan@97 503 end
jcallahan@97 504
jcallahan@97 505 for category, lookup in pairs(KEYWORD_SUBSTITUTIONS) do
jcallahan@97 506 local category_format = ("<%s>"):format(category)
jcallahan@97 507 text = text:gsub(lookup, category_format):gsub(lookup:lower(), category_format)
jcallahan@97 508 end
jcallahan@97 509 return text
jcallahan@97 510 end
jcallahan@97 511 end -- do-block
jcallahan@97 512
jcallahan@97 513
jcallahan@0 514 -----------------------------------------------------------------------
jcallahan@0 515 -- Methods.
jcallahan@0 516 -----------------------------------------------------------------------
jcallahan@0 517 function WDP:OnInitialize()
jcallahan@0 518 db = LibStub("AceDB-3.0"):New("WoWDBProfilerData", DATABASE_DEFAULTS, "Default").global
jcallahan@14 519
jcallahan@14 520 local raw_db = _G["WoWDBProfilerData"]
jcallahan@18 521 local build_num = tonumber(private.build_num)
jcallahan@14 522
jcallahan@74 523 -- TODO: Merge this with the DB version check when MoP goes live.
jcallahan@35 524 -- if raw_db.build_num and raw_db.build_num < build_num then
jcallahan@74 525 if raw_db.version and raw_db.version < DB_VERSION then
jcallahan@74 526 for entry in pairs(DATABASE_DEFAULTS.global) do
jcallahan@74 527 db[entry] = {}
jcallahan@74 528 end
jcallahan@74 529 end
jcallahan@35 530 raw_db.build_num = build_num
jcallahan@63 531 raw_db.version = DB_VERSION
jcallahan@0 532 end
jcallahan@0 533
jcallahan@0 534
jcallahan@0 535 function WDP:OnEnable()
jcallahan@0 536 for event_name, mapping in pairs(EVENT_MAPPING) do
jcallahan@1 537 self:RegisterEvent(event_name, (_G.type(mapping) ~= "boolean") and mapping or nil)
jcallahan@0 538 end
jcallahan@95 539
jcallahan@95 540 for index = 1, _G.GetNumLanguages() do
jcallahan@95 541 languages_known[_G.GetLanguageByIndex(index)] = true
jcallahan@95 542 end
jcallahan@0 543 durability_timer_handle = self:ScheduleRepeatingTimer("ProcessDurability", 30)
jcallahan@31 544 target_location_timer_handle = self:ScheduleRepeatingTimer("UpdateTargetLocation", 0.5)
jcallahan@19 545
jcallahan@19 546 _G.hooksecurefunc("UseContainerItem", function(bag_index, slot_index, target_unit)
jcallahan@19 547 if target_unit then
jcallahan@19 548 return
jcallahan@19 549 end
jcallahan@19 550 HandleItemUse(_G.GetContainerItemLink(bag_index, slot_index), bag_index, slot_index)
jcallahan@19 551 end)
jcallahan@19 552
jcallahan@19 553 _G.hooksecurefunc("UseItemByName", function(identifier, target_unit)
jcallahan@19 554 if target_unit then
jcallahan@19 555 return
jcallahan@19 556 end
jcallahan@19 557 local _, item_link = _G.GetItemInfo(identifier)
jcallahan@19 558 HandleItemUse(item_link)
jcallahan@19 559 end)
jcallahan@0 560 end
jcallahan@0 561
jcallahan@0 562
jcallahan@0 563 local function RecordDurability(item_id, durability)
jcallahan@0 564 if not durability or durability <= 0 then
jcallahan@0 565 return
jcallahan@0 566 end
jcallahan@0 567
jcallahan@0 568 if not db.items[item_id] then
jcallahan@0 569 db.items[item_id] = {}
jcallahan@0 570 end
jcallahan@0 571 db.items[item_id].durability = durability
jcallahan@0 572 end
jcallahan@0 573
jcallahan@0 574
jcallahan@0 575 function WDP:ProcessDurability()
jcallahan@0 576 for slot_index = 0, _G.INVSLOT_LAST_EQUIPPED do
jcallahan@1 577 local item_id = _G.GetInventoryItemID("player", slot_index)
jcallahan@0 578
jcallahan@0 579 if item_id and item_id > 0 then
jcallahan@1 580 local _, max_durability = _G.GetInventoryItemDurability(slot_index)
jcallahan@0 581 RecordDurability(item_id, max_durability)
jcallahan@0 582 end
jcallahan@0 583 end
jcallahan@0 584
jcallahan@0 585 for bag_index = 0, _G.NUM_BAG_SLOTS do
jcallahan@0 586 for slot_index = 1, _G.GetContainerNumSlots(bag_index) do
jcallahan@1 587 local item_id = _G.GetContainerItemID(bag_index, slot_index)
jcallahan@0 588
jcallahan@0 589 if item_id and item_id > 0 then
jcallahan@1 590 local _, max_durability = _G.GetContainerItemDurability(bag_index, slot_index)
jcallahan@0 591 RecordDurability(item_id, max_durability)
jcallahan@0 592 end
jcallahan@0 593 end
jcallahan@0 594 end
jcallahan@0 595 end
jcallahan@0 596
jcallahan@0 597
jcallahan@2 598 function WDP:UpdateTargetLocation()
jcallahan@40 599 if currently_drunk or not _G.UnitExists("target") or _G.UnitPlayerControlled("target") or (_G.UnitIsTapped("target") and not _G.UnitIsDead("target")) then
jcallahan@2 600 return
jcallahan@2 601 end
jcallahan@2 602
jcallahan@2 603 for index = 1, 4 do
jcallahan@2 604 if not _G.CheckInteractDistance("target", index) then
jcallahan@2 605 return
jcallahan@2 606 end
jcallahan@2 607 end
jcallahan@40 608 local unit_type, unit_idnum = ParseGUID(_G.UnitGUID("target"))
jcallahan@2 609
jcallahan@40 610 if not unit_idnum or unit_type ~= private.UNIT_TYPES.NPC then
jcallahan@2 611 return
jcallahan@2 612 end
jcallahan@34 613 UpdateNPCLocation(unit_idnum)
jcallahan@2 614 end
jcallahan@2 615
jcallahan@2 616
jcallahan@0 617 -----------------------------------------------------------------------
jcallahan@0 618 -- Event handlers.
jcallahan@0 619 -----------------------------------------------------------------------
jcallahan@90 620 function WDP:BLACK_MARKET_ITEM_UPDATE(event_name)
jcallahan@56 621 local num_items = _G.C_BlackMarket.GetNumItems()
jcallahan@56 622
jcallahan@56 623 for index = 1, num_items do
jcallahan@56 624 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 625
jcallahan@56 626 if item_link then
jcallahan@56 627 DBEntry("items", ItemLinkToID(item_link)).black_market = seller_name or "UNKNOWN"
jcallahan@56 628 end
jcallahan@56 629 end
jcallahan@56 630 end
jcallahan@56 631
jcallahan@56 632
jcallahan@75 633 function WDP:CHAT_MSG_LOOT(event_name, message)
jcallahan@48 634 if action_data.spell_label ~= "EXTRACT_GAS" then
jcallahan@48 635 return
jcallahan@48 636 end
jcallahan@48 637 local item_link, quantity = deformat(message, _G.LOOT_ITEM_PUSHED_SELF_MULTIPLE)
jcallahan@48 638
jcallahan@48 639 if not item_link then
jcallahan@48 640 quantity, item_link = 1, deformat(message, _G.LOOT_ITEM_PUSHED_SELF)
jcallahan@48 641 end
jcallahan@48 642
jcallahan@48 643 if not item_link then
jcallahan@48 644 return
jcallahan@48 645 end
jcallahan@48 646 local item_id = ItemLinkToID(item_link)
jcallahan@48 647
jcallahan@48 648 if not item_id then
jcallahan@48 649 return
jcallahan@48 650 end
jcallahan@48 651 action_data.loot_list = {
jcallahan@48 652 ("%d:%d"):format(item_id, quantity)
jcallahan@48 653 }
jcallahan@48 654 GenericLootUpdate("zones")
jcallahan@48 655 table.wipe(action_data)
jcallahan@48 656 end
jcallahan@48 657
jcallahan@48 658
jcallahan@97 659 function WDP:RecordQuote(event_name, message, source_name, language_name)
jcallahan@97 660 if not source_name or not name_to_id_map[source_name] or (language_name ~= "" and not languages_known[language_name]) then
jcallahan@97 661 return
jcallahan@95 662 end
jcallahan@97 663 local npc = NPCEntry(name_to_id_map[source_name])
jcallahan@97 664 npc.quotes = npc.quotes or {}
jcallahan@97 665 npc.quotes[event_name] = npc.quotes[event_name] or {}
jcallahan@97 666 npc.quotes[event_name][ReplaceKeywords(message)] = true
jcallahan@97 667 end
jcallahan@95 668
jcallahan@95 669
jcallahan@95 670 do
jcallahan@40 671 local SOBER_MATCH = _G.DRUNK_MESSAGE_ITEM_SELF1:gsub("%%s", ".+")
jcallahan@40 672
jcallahan@40 673 local DRUNK_COMPARES = {
jcallahan@40 674 _G.DRUNK_MESSAGE_SELF2,
jcallahan@40 675 _G.DRUNK_MESSAGE_SELF3,
jcallahan@40 676 _G.DRUNK_MESSAGE_SELF4,
jcallahan@40 677 }
jcallahan@40 678
jcallahan@40 679 local DRUNK_MATCHES = {
jcallahan@40 680 _G.DRUNK_MESSAGE_SELF2:gsub("%%s", ".+"),
jcallahan@40 681 _G.DRUNK_MESSAGE_SELF3:gsub("%%s", ".+"),
jcallahan@40 682 _G.DRUNK_MESSAGE_SELF4:gsub("%%s", ".+"),
jcallahan@40 683 }
jcallahan@40 684
jcallahan@92 685 function WDP:CHAT_MSG_SYSTEM(event_name, message)
jcallahan@40 686 if currently_drunk then
jcallahan@40 687 if message == _G.DRUNK_MESSAGE_SELF1 or message:match(SOBER_MATCH) then
jcallahan@40 688 currently_drunk = nil
jcallahan@40 689 end
jcallahan@40 690 return
jcallahan@40 691 end
jcallahan@40 692
jcallahan@40 693 for index = 1, #DRUNK_MATCHES do
jcallahan@40 694 if message == DRUNK_COMPARES[index] or message:match(DRUNK_MATCHES[index]) then
jcallahan@40 695 currently_drunk = true
jcallahan@40 696 break
jcallahan@40 697 end
jcallahan@40 698 end
jcallahan@40 699 end
jcallahan@40 700 end
jcallahan@40 701
jcallahan@40 702 -- do-block
jcallahan@40 703
jcallahan@40 704 do
jcallahan@23 705 local FLAGS_NPC = bit.bor(_G.COMBATLOG_OBJECT_TYPE_GUARDIAN, _G.COMBATLOG_OBJECT_CONTROL_NPC)
jcallahan@23 706 local FLAGS_NPC_CONTROL = bit.bor(_G.COMBATLOG_OBJECT_AFFILIATION_OUTSIDER, _G.COMBATLOG_OBJECT_CONTROL_NPC)
jcallahan@23 707
jcallahan@23 708 local function RecordNPCSpell(sub_event, source_guid, source_name, source_flags, dest_guid, dest_name, dest_flags, spell_id, spell_name)
jcallahan@23 709 if not spell_id then
jcallahan@23 710 return
jcallahan@23 711 end
jcallahan@34 712 local source_type, source_id = ParseGUID(source_guid)
jcallahan@23 713
jcallahan@23 714 if not source_id or source_type ~= private.UNIT_TYPES.NPC then
jcallahan@23 715 return
jcallahan@23 716 end
jcallahan@23 717
jcallahan@23 718 if bit.band(FLAGS_NPC_CONTROL, source_flags) == FLAGS_NPC_CONTROL and bit.band(FLAGS_NPC, source_flags) ~= 0 then
jcallahan@29 719 local encounter_data = NPCEntry(source_id).encounter_data[InstanceDifficultyToken()]
jcallahan@28 720 encounter_data.spells = encounter_data.spells or {}
jcallahan@28 721 encounter_data.spells[spell_id] = (encounter_data.spells[spell_id] or 0) + 1
jcallahan@23 722 end
jcallahan@23 723 end
jcallahan@23 724
jcallahan@23 725 local COMBAT_LOG_FUNCS = {
jcallahan@23 726 SPELL_AURA_APPLIED = RecordNPCSpell,
jcallahan@23 727 SPELL_CAST_START = RecordNPCSpell,
jcallahan@48 728 SPELL_CAST_SUCCESS = RecordNPCSpell,
jcallahan@65 729 UNIT_DIED = function(sub_event, source_guid, source_name, source_flags, dest_guid, dest_name, dest_flags, spell_id, spell_name)
jcallahan@65 730 local unit_type, unit_idnum = ParseGUID(dest_guid)
jcallahan@65 731
jcallahan@65 732 if unit_type ~= private.UNIT_TYPES.NPC or not unit_idnum then
jcallahan@67 733 reputation_npc_id = nil
jcallahan@98 734 private.harvesting = nil
jcallahan@65 735 return
jcallahan@65 736 end
jcallahan@67 737 reputation_npc_id = unit_idnum
jcallahan@65 738 end,
jcallahan@23 739 }
jcallahan@23 740
jcallahan@23 741
jcallahan@92 742 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 743 local combat_log_func = COMBAT_LOG_FUNCS[sub_event]
jcallahan@23 744
jcallahan@23 745 if not combat_log_func then
jcallahan@23 746 return
jcallahan@23 747 end
jcallahan@23 748 combat_log_func(sub_event, source_guid, source_name, source_flags, dest_guid, dest_name, dest_flags, ...)
jcallahan@23 749 end
jcallahan@23 750
jcallahan@44 751 local DIPLOMACY_SPELL_ID = 20599
jcallahan@44 752 local MR_POP_RANK1_SPELL_ID = 78634
jcallahan@44 753 local MR_POP_RANK2_SPELL_ID = 78635
jcallahan@44 754
jcallahan@44 755 local REP_BUFFS = {
jcallahan@44 756 [_G.GetSpellInfo(30754)] = "CENARION_FAVOR",
jcallahan@44 757 [_G.GetSpellInfo(24705)] = "GRIM_VISAGE",
jcallahan@44 758 [_G.GetSpellInfo(32098)] = "HONOR_HOLD_FAVOR",
jcallahan@44 759 [_G.GetSpellInfo(39913)] = "NAZGRELS_FERVOR",
jcallahan@44 760 [_G.GetSpellInfo(39953)] = "SONG_OF_BATTLE",
jcallahan@44 761 [_G.GetSpellInfo(61849)] = "SPIRIT_OF_SHARING",
jcallahan@44 762 [_G.GetSpellInfo(32096)] = "THRALLMARS_FAVOR",
jcallahan@44 763 [_G.GetSpellInfo(39911)] = "TROLLBANES_COMMAND",
jcallahan@44 764 [_G.GetSpellInfo(95987)] = "UNBURDENED",
jcallahan@44 765 [_G.GetSpellInfo(100951)] = "WOW_ANNIVERSARY",
jcallahan@44 766 }
jcallahan@44 767
jcallahan@44 768
jcallahan@44 769 local FACTION_NAMES = {
jcallahan@44 770 CENARION_CIRCLE = _G.GetFactionInfoByID(609),
jcallahan@44 771 HONOR_HOLD = _G.GetFactionInfoByID(946),
jcallahan@44 772 THE_SHATAR = _G.GetFactionInfoByID(935),
jcallahan@44 773 THRALLMAR = _G.GetFactionInfoByID(947),
jcallahan@44 774 }
jcallahan@44 775
jcallahan@44 776
jcallahan@44 777 local MODIFIERS = {
jcallahan@44 778 CENARION_FAVOR = {
jcallahan@44 779 faction = FACTION_NAMES.CENARION_CIRCLE,
jcallahan@44 780 modifier = 0.25,
jcallahan@44 781 },
jcallahan@44 782 GRIM_VISAGE = {
jcallahan@44 783 modifier = 0.1,
jcallahan@44 784 },
jcallahan@44 785 HONOR_HOLD_FAVOR = {
jcallahan@44 786 faction = FACTION_NAMES.HONOR_HOLD,
jcallahan@44 787 modifier = 0.25,
jcallahan@44 788 },
jcallahan@44 789 NAZGRELS_FERVOR = {
jcallahan@44 790 faction = FACTION_NAMES.THRALLMAR,
jcallahan@44 791 modifier = 0.1,
jcallahan@44 792 },
jcallahan@44 793 SONG_OF_BATTLE = {
jcallahan@44 794 faction = FACTION_NAMES.THE_SHATAR,
jcallahan@44 795 modifier = 0.1,
jcallahan@44 796 },
jcallahan@44 797 SPIRIT_OF_SHARING = {
jcallahan@44 798 modifier = 0.1,
jcallahan@44 799 },
jcallahan@44 800 THRALLMARS_FAVOR = {
jcallahan@44 801 faction = FACTION_NAMES.THRALLMAR,
jcallahan@44 802 modifier = 0.25,
jcallahan@44 803 },
jcallahan@44 804 TROLLBANES_COMMAND = {
jcallahan@44 805 faction = FACTION_NAMES.HONOR_HOLD,
jcallahan@44 806 modifier = 0.1,
jcallahan@44 807 },
jcallahan@44 808 UNBURDENED = {
jcallahan@44 809 modifier = 0.1,
jcallahan@44 810 },
jcallahan@44 811 WOW_ANNIVERSARY = {
jcallahan@44 812 modifier = 0.08,
jcallahan@44 813 }
jcallahan@44 814 }
jcallahan@44 815
jcallahan@44 816
jcallahan@92 817 function WDP:COMBAT_TEXT_UPDATE(event_name, message_type, faction_name, amount)
jcallahan@67 818 if message_type ~= "FACTION" or not reputation_npc_id then
jcallahan@44 819 return
jcallahan@44 820 end
jcallahan@44 821 UpdateFactionData()
jcallahan@44 822
jcallahan@46 823 if not faction_name or not faction_standings[faction_name] then
jcallahan@46 824 return
jcallahan@46 825 end
jcallahan@67 826 local npc = NPCEntry(reputation_npc_id)
jcallahan@98 827 reputation_npc_id = nil
jcallahan@46 828
jcallahan@44 829 if not npc then
jcallahan@98 830 private.harvesting = nil
jcallahan@44 831 return
jcallahan@44 832 end
jcallahan@98 833 npc.harvested = private.harvesting
jcallahan@98 834 private.harvesting = nil
jcallahan@98 835
jcallahan@44 836 local modifier = 1
jcallahan@44 837
jcallahan@44 838 if _G.IsSpellKnown(DIPLOMACY_SPELL_ID) then
jcallahan@44 839 modifier = modifier + 0.1
jcallahan@44 840 end
jcallahan@44 841
jcallahan@44 842 if _G.IsSpellKnown(MR_POP_RANK2_SPELL_ID) then
jcallahan@44 843 modifier = modifier + 0.1
jcallahan@44 844 elseif _G.IsSpellKnown(MR_POP_RANK1_SPELL_ID) then
jcallahan@44 845 modifier = modifier + 0.05
jcallahan@44 846 end
jcallahan@44 847
jcallahan@44 848 for buff_name, buff_label in pairs(REP_BUFFS) do
jcallahan@44 849 if _G.UnitBuff("player", buff_name) then
jcallahan@44 850 local modded_faction = MODIFIERS[buff_label].faction
jcallahan@44 851
jcallahan@44 852 if not modded_faction or faction_name == modded_faction then
jcallahan@44 853 modifier = modifier + MODIFIERS[buff_label].modifier
jcallahan@44 854 end
jcallahan@44 855 end
jcallahan@44 856 end
jcallahan@65 857 npc.reputations = npc.reputations or {}
jcallahan@65 858 npc.reputations[("%s:%s"):format(faction_name, faction_standings[faction_name])] = math.floor(amount / modifier)
jcallahan@32 859 end
jcallahan@44 860 end -- do-block
jcallahan@18 861
jcallahan@18 862
jcallahan@92 863 function WDP:ITEM_TEXT_BEGIN(event_name)
jcallahan@42 864 local unit_type, unit_idnum = ParseGUID(_G.UnitGUID("npc"))
jcallahan@42 865
jcallahan@42 866 if not unit_idnum or unit_type ~= private.UNIT_TYPES.OBJECT or _G.UnitName("npc") ~= _G.ItemTextGetItem() then
jcallahan@42 867 return
jcallahan@42 868 end
jcallahan@42 869 UpdateDBEntryLocation("objects", unit_idnum)
jcallahan@42 870 end
jcallahan@42 871
jcallahan@42 872
jcallahan@13 873 do
jcallahan@40 874 local RE_GOLD = _G.GOLD_AMOUNT:gsub("%%d", "(%%d+)")
jcallahan@40 875 local RE_SILVER = _G.SILVER_AMOUNT:gsub("%%d", "(%%d+)")
jcallahan@40 876 local RE_COPPER = _G.COPPER_AMOUNT:gsub("%%d", "(%%d+)")
jcallahan@13 877
jcallahan@13 878
jcallahan@13 879 local function _moneyMatch(money, re)
jcallahan@13 880 return money:match(re) or 0
jcallahan@1 881 end
jcallahan@1 882
jcallahan@0 883
jcallahan@13 884 local function _toCopper(money)
jcallahan@13 885 if not money then
jcallahan@13 886 return 0
jcallahan@13 887 end
jcallahan@40 888 return _moneyMatch(money, RE_GOLD) * 10000 + _moneyMatch(money, RE_SILVER) * 100 + _moneyMatch(money, RE_COPPER)
jcallahan@1 889 end
jcallahan@1 890
jcallahan@1 891
jcallahan@13 892 local LOOT_VERIFY_FUNCS = {
jcallahan@16 893 [AF.ITEM] = function()
jcallahan@16 894 local locked_item_id
jcallahan@16 895
jcallahan@16 896 for bag_index = 0, _G.NUM_BAG_FRAMES do
jcallahan@16 897 for slot_index = 1, _G.GetContainerNumSlots(bag_index) do
jcallahan@16 898 local _, _, is_locked = _G.GetContainerItemInfo(bag_index, slot_index)
jcallahan@16 899
jcallahan@16 900 if is_locked then
jcallahan@16 901 locked_item_id = ItemLinkToID(_G.GetContainerItemLink(bag_index, slot_index))
jcallahan@16 902 end
jcallahan@16 903 end
jcallahan@16 904 end
jcallahan@16 905
jcallahan@28 906 if not locked_item_id or (action_data.identifier and action_data.identifier ~= locked_item_id) then
jcallahan@16 907 return false
jcallahan@16 908 end
jcallahan@28 909 action_data.identifier = locked_item_id
jcallahan@16 910 return true
jcallahan@16 911 end,
jcallahan@13 912 [AF.NPC] = function()
jcallahan@17 913 if not _G.UnitExists("target") or _G.UnitIsFriend("player", "target") or _G.UnitIsPlayer("target") or _G.UnitPlayerControlled("target") then
jcallahan@15 914 return false
jcallahan@13 915 end
jcallahan@34 916 local unit_type, id_num = ParseGUID(_G.UnitGUID("target"))
jcallahan@27 917 action_data.identifier = id_num
jcallahan@13 918 return true
jcallahan@13 919 end,
jcallahan@14 920 [AF.OBJECT] = true,
jcallahan@17 921 [AF.ZONE] = function()
jcallahan@38 922 return _G.IsFishingLoot()
jcallahan@17 923 end,
jcallahan@13 924 }
jcallahan@13 925
jcallahan@13 926
jcallahan@13 927 local LOOT_UPDATE_FUNCS = {
jcallahan@16 928 [AF.ITEM] = function()
jcallahan@28 929 GenericLootUpdate("items")
jcallahan@28 930 end,
jcallahan@28 931 [AF.NPC] = function()
jcallahan@75 932 local difficulty_token = InstanceDifficultyToken()
jcallahan@75 933 local loot_type = action_data.label or "drops"
jcallahan@77 934 local source_list = {}
jcallahan@75 935
jcallahan@78 936 for source_guid, loot_data in pairs(action_data.loot_sources) do
jcallahan@78 937 local source_id = select(2, ParseGUID(source_guid))
jcallahan@75 938 local npc = NPCEntry(source_id)
jcallahan@75 939
jcallahan@75 940 if npc then
jcallahan@75 941 local encounter_data = npc.encounter_data[difficulty_token]
jcallahan@75 942 encounter_data[loot_type] = encounter_data[loot_type] or {}
jcallahan@75 943
jcallahan@78 944 if not source_list[source_guid] then
jcallahan@77 945 encounter_data.loot_counts = encounter_data.loot_counts or {}
jcallahan@77 946 encounter_data.loot_counts[loot_type] = (encounter_data.loot_counts[loot_type] or 0) + 1
jcallahan@77 947 source_list[source_id] = true
jcallahan@77 948 end
jcallahan@77 949
jcallahan@75 950 for item_id, quantity in pairs(loot_data) do
jcallahan@75 951 table.insert(encounter_data[loot_type], ("%d:%d"):format(item_id, quantity))
jcallahan@75 952 end
jcallahan@75 953 end
jcallahan@75 954 end
jcallahan@75 955
jcallahan@75 956 -- TODO: Remove this when GetLootSourceInfo() has values for money
jcallahan@79 957 if #action_data.loot_list <= 0 then
jcallahan@79 958 return
jcallahan@79 959 end
jcallahan@29 960 local npc = NPCEntry(action_data.identifier)
jcallahan@28 961
jcallahan@28 962 if not npc then
jcallahan@28 963 return
jcallahan@28 964 end
jcallahan@75 965 local encounter_data = npc.encounter_data[difficulty_token]
jcallahan@29 966 encounter_data[loot_type] = encounter_data[loot_type] or {}
jcallahan@16 967
jcallahan@77 968 if not source_list[action_data.identifier] then
jcallahan@77 969 encounter_data.loot_counts = encounter_data.loot_counts or {}
jcallahan@77 970 encounter_data.loot_counts[loot_type] = (encounter_data.loot_counts[loot_type] or 0) + 1
jcallahan@77 971 end
jcallahan@77 972
jcallahan@17 973 for index = 1, #action_data.loot_list do
jcallahan@29 974 table.insert(encounter_data[loot_type], action_data.loot_list[index])
jcallahan@16 975 end
jcallahan@16 976 end,
jcallahan@13 977 [AF.OBJECT] = function()
jcallahan@28 978 GenericLootUpdate("objects", InstanceDifficultyToken())
jcallahan@17 979 end,
jcallahan@17 980 [AF.ZONE] = function()
jcallahan@41 981 local location_token = ("%s:%s:%s"):format(action_data.map_level, action_data.x, action_data.y)
jcallahan@41 982
jcallahan@41 983 -- This will start life as a boolean true.
jcallahan@41 984 if _G.type(action_data.zone_data[location_token]) ~= "table" then
jcallahan@41 985 action_data.zone_data[location_token] = {
jcallahan@41 986 drops = {}
jcallahan@41 987 }
jcallahan@41 988 end
jcallahan@41 989 local loot_count = ("%s_count"):format(action_data.label or "drops")
jcallahan@41 990 action_data.zone_data[location_token][loot_count] = (action_data.zone_data[location_token][loot_count] or 0) + 1
jcallahan@41 991
jcallahan@41 992 for index = 1, #action_data.loot_list do
jcallahan@41 993 table.insert(action_data.zone_data[location_token].drops, action_data.loot_list[index])
jcallahan@41 994 end
jcallahan@13 995 end,
jcallahan@13 996 }
jcallahan@13 997
jcallahan@79 998 -- Prevent opening the same loot window multiple times from recording data multiple times.
jcallahan@79 999 local loot_guid_registry = {}
jcallahan@13 1000
jcallahan@92 1001 function WDP:LOOT_OPENED(event_name)
jcallahan@18 1002 if action_data.looting then
jcallahan@18 1003 return
jcallahan@18 1004 end
jcallahan@18 1005
jcallahan@13 1006 if not action_data.type then
jcallahan@13 1007 action_data.type = AF.NPC
jcallahan@1 1008 end
jcallahan@13 1009 local verify_func = LOOT_VERIFY_FUNCS[action_data.type]
jcallahan@13 1010 local update_func = LOOT_UPDATE_FUNCS[action_data.type]
jcallahan@13 1011
jcallahan@14 1012 if not verify_func or not update_func then
jcallahan@13 1013 return
jcallahan@13 1014 end
jcallahan@13 1015
jcallahan@14 1016 if _G.type(verify_func) == "function" and not verify_func() then
jcallahan@14 1017 return
jcallahan@14 1018 end
jcallahan@80 1019 local guids_used = {}
jcallahan@17 1020 action_data.loot_list = {}
jcallahan@75 1021 action_data.loot_sources = {}
jcallahan@18 1022 action_data.looting = true
jcallahan@13 1023
jcallahan@55 1024 for loot_slot = 1, _G.GetNumLootItems() do
jcallahan@55 1025 local icon_texture, item_text, quantity, quality, locked = _G.GetLootSlotInfo(loot_slot)
jcallahan@55 1026 local slot_type = _G.GetLootSlotType(loot_slot)
jcallahan@13 1027
jcallahan@77 1028 -- TODO: Move LOOT_SLOT_X checks within loop when money is detectable via GetLootSourceInfo
jcallahan@77 1029 if slot_type == _G.LOOT_SLOT_ITEM then
jcallahan@78 1030 local loot_info = {
jcallahan@77 1031 _G.GetLootSourceInfo(loot_slot)
jcallahan@77 1032 }
jcallahan@75 1033
jcallahan@75 1034 -- TODO: Remove debugging
jcallahan@77 1035 -- print(("Loot slot %d: Source count: %d"):format(loot_slot, floor((#sources / 2) + 0.5)))
jcallahan@75 1036
jcallahan@77 1037 -- Odd index is GUID, even is count.
jcallahan@78 1038 for loot_index = 1, #loot_info, 2 do
jcallahan@78 1039 local source_guid = loot_info[loot_index]
jcallahan@77 1040
jcallahan@79 1041 if not loot_guid_registry[source_guid] then
jcallahan@79 1042 local loot_quantity = loot_info[loot_index + 1]
jcallahan@79 1043 local source_type, source_id = ParseGUID(source_guid)
jcallahan@79 1044 -- TODO: Remove debugging
jcallahan@79 1045 -- local source_key = ("%s:%d"):format(private.UNIT_TYPE_NAMES[source_type + 1], source_id)
jcallahan@79 1046 -- print(("GUID: %s - Type:ID: %s - Amount: %d"):format(loot_info[loot_index], source_key, loot_quantity))
jcallahan@79 1047
jcallahan@79 1048 local item_id = ItemLinkToID(_G.GetLootSlotLink(loot_slot))
jcallahan@79 1049 action_data.loot_sources[source_guid] = action_data.loot_sources[source_guid] or {}
jcallahan@79 1050 action_data.loot_sources[source_guid][item_id] = action_data.loot_sources[source_guid][item_id] or 0 + loot_quantity
jcallahan@80 1051 guids_used[source_guid] = true
jcallahan@79 1052 end
jcallahan@75 1053 end
jcallahan@82 1054 -- elseif slot_type == _G.LOOT_SLOT_MONEY then
jcallahan@82 1055 -- table.insert(action_data.loot_list, ("money:%d"):format(_toCopper(item_text)))
jcallahan@77 1056 elseif slot_type == _G.LOOT_SLOT_CURRENCY then
jcallahan@77 1057 table.insert(action_data.loot_list, ("currency:%d:%s"):format(quantity, icon_texture:match("[^\\]+$"):lower()))
jcallahan@13 1058 end
jcallahan@13 1059 end
jcallahan@80 1060
jcallahan@81 1061 for guid in pairs(guids_used) do
jcallahan@80 1062 loot_guid_registry[guid] = true
jcallahan@80 1063 end
jcallahan@13 1064 update_func()
jcallahan@1 1065 end
jcallahan@13 1066 end -- do-block
jcallahan@0 1067
jcallahan@0 1068
jcallahan@89 1069 function WDP:MAIL_SHOW(event_name)
jcallahan@89 1070 local unit_type, unit_idnum = ParseGUID(_G.UnitGUID("npc"))
jcallahan@89 1071
jcallahan@89 1072 if not unit_idnum or unit_type ~= private.UNIT_TYPES.OBJECT then
jcallahan@89 1073 return
jcallahan@89 1074 end
jcallahan@89 1075 UpdateDBEntryLocation("objects", unit_idnum)
jcallahan@89 1076 end
jcallahan@89 1077
jcallahan@89 1078
jcallahan@44 1079 do
jcallahan@44 1080 local POINT_MATCH_PATTERNS = {
jcallahan@44 1081 ("^%s$"):format(_G.ITEM_REQ_ARENA_RATING:gsub("%%d", "(%%d+)")), -- May no longer be necessary
jcallahan@44 1082 ("^%s$"):format(_G.ITEM_REQ_ARENA_RATING_3V3:gsub("%%d", "(%%d+)")), -- May no longer be necessary
jcallahan@44 1083 ("^%s$"):format(_G.ITEM_REQ_ARENA_RATING_5V5:gsub("%%d", "(%%d+)")), -- May no longer be necessary
jcallahan@44 1084 ("^%s$"):format(_G.ITEM_REQ_ARENA_RATING_BG:gsub("%%d", "(%%d+)")),
jcallahan@44 1085 ("^%s$"):format(_G.ITEM_REQ_ARENA_RATING_3V3_BG:gsub("%%d", "(%%d+)")),
jcallahan@44 1086 }
jcallahan@5 1087
jcallahan@68 1088 local ITEM_REQ_REPUTATION_MATCH = "Requires (.-) %- (.*)"
jcallahan@87 1089 local ITEM_REQ_QUEST_MATCH1 = "Requires: .*"
jcallahan@87 1090 local ITEM_REQ_QUEST_MATCH2 = "Must have completed: .*"
jcallahan@68 1091
jcallahan@89 1092 function WDP:UpdateMerchantItems(event_name)
jcallahan@44 1093 local unit_type, unit_idnum = ParseGUID(_G.UnitGUID("target"))
jcallahan@4 1094
jcallahan@44 1095 if unit_type ~= private.UNIT_TYPES.NPC or not unit_idnum then
jcallahan@44 1096 return
jcallahan@44 1097 end
jcallahan@55 1098 local current_filters = _G.GetMerchantFilter()
jcallahan@44 1099 local _, merchant_standing = UnitFactionStanding("target")
jcallahan@44 1100 local merchant = NPCEntry(unit_idnum)
jcallahan@44 1101 merchant.sells = merchant.sells or {}
jcallahan@5 1102
jcallahan@57 1103 _G.SetMerchantFilter(_G.LE_LOOT_FILTER_ALL)
jcallahan@57 1104 _G.MerchantFrame_Update()
jcallahan@57 1105
jcallahan@57 1106 local num_items = _G.GetMerchantNumItems()
jcallahan@35 1107
jcallahan@44 1108 for item_index = 1, num_items do
jcallahan@44 1109 local _, _, copper_price, stack_size, num_available, _, extended_cost = _G.GetMerchantItemInfo(item_index)
jcallahan@44 1110 local item_id = ItemLinkToID(_G.GetMerchantItemLink(item_index))
jcallahan@5 1111
jcallahan@44 1112 if item_id and item_id > 0 then
jcallahan@44 1113 local price_string = ActualCopperCost(copper_price, merchant_standing)
jcallahan@5 1114
jcallahan@68 1115 DatamineTT:ClearLines()
jcallahan@68 1116 DatamineTT:SetMerchantItem(item_index)
jcallahan@68 1117
jcallahan@68 1118 local num_lines = DatamineTT:NumLines()
jcallahan@68 1119
jcallahan@68 1120 for line_index = 1, num_lines do
jcallahan@68 1121 local current_line = _G["WDPDatamineTTTextLeft" .. line_index]
jcallahan@68 1122
jcallahan@68 1123 if not current_line then
jcallahan@68 1124 break
jcallahan@68 1125 end
jcallahan@68 1126 local faction, reputation = current_line:GetText():match(ITEM_REQ_REPUTATION_MATCH)
jcallahan@68 1127
jcallahan@68 1128 if faction or reputation then
jcallahan@68 1129 DBEntry("items", item_id).req_reputation = ("%s:%s"):format(faction:gsub("-", ""), reputation:upper())
jcallahan@68 1130 break
jcallahan@68 1131 end
jcallahan@68 1132 end
jcallahan@68 1133
jcallahan@87 1134 for line_index = 1, num_lines do
jcallahan@87 1135 local current_line = _G["WDPDatamineTTTextLeft" .. line_index]
jcallahan@87 1136
jcallahan@87 1137 if not current_line then
jcallahan@87 1138 break
jcallahan@87 1139 end
jcallahan@87 1140 local line_text = current_line:GetText()
jcallahan@87 1141 local quest_name = line_text:match(ITEM_REQ_QUEST_MATCH1) or line_text:match(ITEM_REQ_QUEST_MATCH2)
jcallahan@87 1142
jcallahan@87 1143 if quest_name then
jcallahan@87 1144 DBEntry("items", item_id).req_quest = ("%s"):format(quest_name:gsub("(.+): ", ""), quest_name)
jcallahan@87 1145 break
jcallahan@87 1146 end
jcallahan@87 1147 end
jcallahan@87 1148
jcallahan@44 1149 if extended_cost then
jcallahan@53 1150 local battleground_rating = 0
jcallahan@53 1151 local personal_rating = 0
jcallahan@53 1152 local required_season_amount
jcallahan@5 1153
jcallahan@68 1154 for line_index = 1, num_lines do
jcallahan@44 1155 local current_line = _G["WDPDatamineTTTextLeft" .. line_index]
jcallahan@5 1156
jcallahan@44 1157 if not current_line then
jcallahan@44 1158 break
jcallahan@44 1159 end
jcallahan@53 1160 required_season_amount = current_line:GetText():match("Requires earning a total of (%d+)\n(.-) for the season.")
jcallahan@5 1161
jcallahan@44 1162 for match_index = 1, #POINT_MATCH_PATTERNS do
jcallahan@44 1163 local match1, match2 = current_line:GetText():match(POINT_MATCH_PATTERNS[match_index])
jcallahan@53 1164 personal_rating = personal_rating + (match1 or 0)
jcallahan@53 1165 battleground_rating = battleground_rating + (match2 or 0)
jcallahan@5 1166
jcallahan@44 1167 if match1 or match2 then
jcallahan@44 1168 break
jcallahan@44 1169 end
jcallahan@44 1170 end
jcallahan@5 1171 end
jcallahan@44 1172 local currency_list = {}
jcallahan@44 1173 local item_count = _G.GetMerchantItemCostInfo(item_index)
jcallahan@50 1174
jcallahan@50 1175 -- Keeping this around in case Blizzard makes the two points diverge at some point.
jcallahan@53 1176 -- price_string = ("%s:%s:%s:%s"):format(price_string, battleground_rating, personal_rating, required_season_amount or 0)
jcallahan@53 1177 price_string = ("%s:%s:%s"):format(price_string, personal_rating, required_season_amount or 0)
jcallahan@5 1178
jcallahan@44 1179 for cost_index = 1, item_count do
jcallahan@44 1180 local icon_texture, amount_required, currency_link = _G.GetMerchantItemCostItem(item_index, cost_index)
jcallahan@44 1181 local currency_id = currency_link and ItemLinkToID(currency_link) or nil
jcallahan@44 1182
jcallahan@44 1183 if (not currency_id or currency_id < 1) and icon_texture then
jcallahan@44 1184 currency_id = icon_texture:match("[^\\]+$"):lower()
jcallahan@44 1185 end
jcallahan@44 1186
jcallahan@44 1187 if currency_id then
jcallahan@44 1188 currency_list[#currency_list + 1] = ("(%s:%s)"):format(amount_required, currency_id)
jcallahan@44 1189 end
jcallahan@44 1190 end
jcallahan@44 1191
jcallahan@44 1192 for currency_index = 1, #currency_list do
jcallahan@44 1193 price_string = ("%s:%s"):format(price_string, currency_list[currency_index])
jcallahan@5 1194 end
jcallahan@5 1195 end
jcallahan@61 1196 merchant.sells[item_id] = ("%s:%s:[%s]"):format(num_available, stack_size, price_string)
jcallahan@44 1197 end
jcallahan@44 1198 end
jcallahan@5 1199
jcallahan@44 1200 if _G.CanMerchantRepair() then
jcallahan@44 1201 merchant.can_repair = true
jcallahan@5 1202 end
jcallahan@57 1203 _G.SetMerchantFilter(current_filters)
jcallahan@57 1204 _G.MerchantFrame_Update()
jcallahan@4 1205 end
jcallahan@44 1206 end -- do-block
jcallahan@4 1207
jcallahan@89 1208
jcallahan@92 1209 function WDP:PET_BAR_UPDATE(event_name)
jcallahan@25 1210 if not action_data.label or not action_data.label == "mind_control" then
jcallahan@25 1211 return
jcallahan@25 1212 end
jcallahan@34 1213 local unit_type, unit_idnum = ParseGUID(_G.UnitGUID("pet"))
jcallahan@25 1214
jcallahan@25 1215 if unit_type ~= private.UNIT_TYPES.NPC or not unit_idnum then
jcallahan@25 1216 return
jcallahan@25 1217 end
jcallahan@29 1218 NPCEntry(unit_idnum).mind_control = true
jcallahan@25 1219 table.wipe(action_data)
jcallahan@25 1220 end
jcallahan@25 1221
jcallahan@25 1222
jcallahan@18 1223 do
jcallahan@18 1224 local GENDER_NAMES = {
jcallahan@18 1225 "UNKNOWN",
jcallahan@18 1226 "MALE",
jcallahan@18 1227 "FEMALE",
jcallahan@18 1228 }
jcallahan@2 1229
jcallahan@2 1230
jcallahan@18 1231 local REACTION_NAMES = {
jcallahan@18 1232 "HATED",
jcallahan@18 1233 "HOSTILE",
jcallahan@18 1234 "UNFRIENDLY",
jcallahan@18 1235 "NEUTRAL",
jcallahan@18 1236 "FRIENDLY",
jcallahan@18 1237 "HONORED",
jcallahan@18 1238 "REVERED",
jcallahan@18 1239 "EXALTED",
jcallahan@18 1240 }
jcallahan@2 1241
jcallahan@2 1242
jcallahan@18 1243 local POWER_TYPE_NAMES = {
jcallahan@18 1244 ["0"] = "MANA",
jcallahan@18 1245 ["1"] = "RAGE",
jcallahan@18 1246 ["2"] = "FOCUS",
jcallahan@18 1247 ["3"] = "ENERGY",
jcallahan@18 1248 ["6"] = "RUNIC_POWER",
jcallahan@18 1249 }
jcallahan@2 1250
jcallahan@2 1251
jcallahan@92 1252 function WDP:PLAYER_TARGET_CHANGED(event_name)
jcallahan@40 1253 if not _G.UnitExists("target") or _G.UnitPlayerControlled("target") or currently_drunk then
jcallahan@86 1254 current_target_id = nil
jcallahan@18 1255 return
jcallahan@18 1256 end
jcallahan@34 1257 local unit_type, unit_idnum = ParseGUID(_G.UnitGUID("target"))
jcallahan@2 1258
jcallahan@18 1259 if unit_type ~= private.UNIT_TYPES.NPC or not unit_idnum then
jcallahan@18 1260 return
jcallahan@18 1261 end
jcallahan@86 1262 current_target_id = unit_idnum
jcallahan@86 1263
jcallahan@29 1264 local npc = NPCEntry(unit_idnum)
jcallahan@18 1265 local _, class_token = _G.UnitClass("target")
jcallahan@18 1266 npc.class = class_token
jcallahan@39 1267 npc.faction = UnitFactionStanding("target")
jcallahan@26 1268 npc.genders = npc.genders or {}
jcallahan@26 1269 npc.genders[GENDER_NAMES[_G.UnitSex("target")] or "UNDEFINED"] = true
jcallahan@18 1270 npc.is_pvp = _G.UnitIsPVP("target") and true or nil
jcallahan@18 1271 npc.reaction = ("%s:%s:%s"):format(_G.UnitLevel("player"), _G.UnitFactionGroup("player"), REACTION_NAMES[_G.UnitReaction("player", "target")])
jcallahan@2 1272
jcallahan@30 1273 local encounter_data = npc.encounter_data[InstanceDifficultyToken()].stats
jcallahan@18 1274 local npc_level = ("level_%d"):format(_G.UnitLevel("target"))
jcallahan@3 1275
jcallahan@28 1276 if not encounter_data[npc_level] then
jcallahan@28 1277 encounter_data[npc_level] = {
jcallahan@18 1278 max_health = _G.UnitHealthMax("target"),
jcallahan@18 1279 }
jcallahan@3 1280
jcallahan@18 1281 local max_power = _G.UnitManaMax("target")
jcallahan@18 1282
jcallahan@18 1283 if max_power > 0 then
jcallahan@18 1284 local power_type = _G.UnitPowerType("target")
jcallahan@28 1285 encounter_data[npc_level].power = ("%s:%d"):format(POWER_TYPE_NAMES[_G.tostring(power_type)] or power_type, max_power)
jcallahan@18 1286 end
jcallahan@3 1287 end
jcallahan@95 1288 name_to_id_map[_G.UnitName("target")] = unit_idnum
jcallahan@95 1289
jcallahan@21 1290 table.wipe(action_data)
jcallahan@21 1291 action_data.type = AF.NPC
jcallahan@27 1292 action_data.identifier = unit_idnum
jcallahan@21 1293 action_data.npc_level = npc_level
jcallahan@31 1294 self:UpdateTargetLocation()
jcallahan@2 1295 end
jcallahan@18 1296 end -- do-block
jcallahan@2 1297
jcallahan@89 1298
jcallahan@12 1299 do
jcallahan@12 1300 local function UpdateQuestJuncture(point)
jcallahan@12 1301 local unit_name = _G.UnitName("questnpc")
jcallahan@9 1302
jcallahan@12 1303 if not unit_name then
jcallahan@12 1304 return
jcallahan@12 1305 end
jcallahan@34 1306 local unit_type, unit_id = ParseGUID(_G.UnitGUID("questnpc"))
jcallahan@9 1307
jcallahan@12 1308 if unit_type == private.UNIT_TYPES.OBJECT then
jcallahan@38 1309 UpdateDBEntryLocation("objects", unit_id)
jcallahan@12 1310 end
jcallahan@19 1311 local quest = DBEntry("quests", _G.GetQuestID())
jcallahan@12 1312 quest[point] = quest[point] or {}
jcallahan@12 1313 quest[point][("%s:%d"):format(private.UNIT_TYPE_NAMES[unit_type + 1], unit_id)] = true
jcallahan@24 1314
jcallahan@24 1315 return quest
jcallahan@12 1316 end
jcallahan@10 1317
jcallahan@12 1318
jcallahan@92 1319 function WDP:QUEST_COMPLETE(event_name)
jcallahan@97 1320 local quest = UpdateQuestJuncture("end")
jcallahan@97 1321 quest.reward_text = ReplaceKeywords(_G.GetRewardText())
jcallahan@97 1322
jcallahan@67 1323 -- Make sure the quest NPC isn't erroneously recorded as giving reputation for quests which award it.
jcallahan@67 1324 reputation_npc_id = nil
jcallahan@10 1325 end
jcallahan@10 1326
jcallahan@12 1327
jcallahan@92 1328 function WDP:QUEST_DETAIL(event_name)
jcallahan@24 1329 local quest = UpdateQuestJuncture("begin")
jcallahan@24 1330
jcallahan@46 1331 if not quest then
jcallahan@46 1332 return
jcallahan@46 1333 end
jcallahan@24 1334 quest.classes = quest.classes or {}
jcallahan@27 1335 quest.classes[PLAYER_CLASS] = true
jcallahan@24 1336
jcallahan@24 1337 local _, race = _G.UnitRace("player")
jcallahan@24 1338 quest.races = quest.races or {}
jcallahan@24 1339 quest.races[race] = true
jcallahan@10 1340 end
jcallahan@12 1341 end -- do-block
jcallahan@9 1342
jcallahan@9 1343
jcallahan@92 1344 function WDP:QUEST_LOG_UPDATE(event_name)
jcallahan@38 1345 local selected_quest = _G.GetQuestLogSelection() -- Save current selection to be restored when we're done.
jcallahan@36 1346 local entry_index, processed_quests = 1, 0
jcallahan@36 1347 local _, num_quests = _G.GetNumQuestLogEntries()
jcallahan@36 1348
jcallahan@36 1349 while processed_quests <= num_quests do
jcallahan@36 1350 local _, _, _, _, is_header, _, _, _, quest_id = _G.GetQuestLogTitle(entry_index)
jcallahan@36 1351
jcallahan@84 1352 if quest_id == 0 then
jcallahan@84 1353 processed_quests = processed_quests + 1
jcallahan@84 1354 elseif not is_header then
jcallahan@36 1355 _G.SelectQuestLogEntry(entry_index);
jcallahan@36 1356
jcallahan@36 1357 local quest = DBEntry("quests", quest_id)
jcallahan@36 1358 quest.timer = _G.GetQuestLogTimeLeft()
jcallahan@37 1359 quest.can_share = _G.GetQuestLogPushable() and true or nil
jcallahan@36 1360 processed_quests = processed_quests + 1
jcallahan@36 1361 end
jcallahan@36 1362 entry_index = entry_index + 1
jcallahan@36 1363 end
jcallahan@36 1364 _G.SelectQuestLogEntry(selected_quest)
jcallahan@4 1365 self:UnregisterEvent("QUEST_LOG_UPDATE")
jcallahan@4 1366 end
jcallahan@4 1367
jcallahan@4 1368
jcallahan@97 1369 function WDP:QUEST_PROGRESS(event_name)
jcallahan@97 1370 DBEntry("quests", _G.GetQuestID()).progress_text = ReplaceKeywords(_G.GetProgressText())
jcallahan@97 1371 end
jcallahan@97 1372
jcallahan@97 1373
jcallahan@92 1374 function WDP:UNIT_QUEST_LOG_CHANGED(event_name, unit_id)
jcallahan@4 1375 if unit_id ~= "player" then
jcallahan@4 1376 return
jcallahan@4 1377 end
jcallahan@4 1378 self:RegisterEvent("QUEST_LOG_UPDATE")
jcallahan@4 1379 end
jcallahan@4 1380
jcallahan@4 1381
jcallahan@92 1382 do
jcallahan@92 1383 local TRADESKILL_TOOLS = {
jcallahan@92 1384 Anvil = anvil_spell_ids,
jcallahan@92 1385 Forge = forge_spell_ids,
jcallahan@92 1386 }
jcallahan@92 1387
jcallahan@92 1388
jcallahan@92 1389 function WDP:TRADE_SKILL_SHOW(event_name)
jcallahan@92 1390 local profession_name, prof_level = _G.GetTradeSkillLine()
jcallahan@92 1391
jcallahan@92 1392 if profession_name == _G.UNKNOWN then
jcallahan@92 1393 return
jcallahan@92 1394 end
jcallahan@92 1395
jcallahan@92 1396 if _G.TradeSkillFrame and _G.TradeSkillFrame:IsVisible() then
jcallahan@92 1397 -- Clear the search box focus so the scan will have correct results.
jcallahan@92 1398 local search_box = _G.TradeSkillFrameSearchBox
jcallahan@92 1399 search_box:SetText("")
jcallahan@92 1400 _G.TradeSkillSearch_OnTextChanged(search_box)
jcallahan@92 1401 search_box:ClearFocus()
jcallahan@92 1402 search_box:GetScript("OnEditFocusLost")(search_box)
jcallahan@92 1403 end
jcallahan@92 1404 local header_list = {}
jcallahan@92 1405
jcallahan@92 1406 -- Save the current state of the TradeSkillFrame so it can be restored after we muck with it.
jcallahan@92 1407 local have_materials = _G.TradeSkillFrame.filterTbl.hasMaterials
jcallahan@92 1408 local have_skillup = _G.TradeSkillFrame.filterTbl.hasSkillUp
jcallahan@92 1409
jcallahan@92 1410 if have_materials then
jcallahan@92 1411 _G.TradeSkillFrame.filterTbl.hasMaterials = false
jcallahan@92 1412 _G.TradeSkillOnlyShowMakeable(false)
jcallahan@92 1413 end
jcallahan@92 1414
jcallahan@92 1415 if have_skillup then
jcallahan@92 1416 _G.TradeSkillFrame.filterTbl.hasSkillUp = false
jcallahan@92 1417 _G.TradeSkillOnlyShowSkillUps(false)
jcallahan@92 1418 end
jcallahan@92 1419 _G.SetTradeSkillInvSlotFilter(0, 1, 1)
jcallahan@92 1420 _G.TradeSkillUpdateFilterBar()
jcallahan@92 1421 _G.TradeSkillFrame_Update()
jcallahan@92 1422
jcallahan@92 1423 -- Expand all headers so we can see all the recipes there are
jcallahan@92 1424 for tradeskill_index = 1, _G.GetNumTradeSkills() do
jcallahan@92 1425 local name, tradeskill_type, _, is_expanded = _G.GetTradeSkillInfo(tradeskill_index)
jcallahan@92 1426
jcallahan@94 1427 if tradeskill_type == "header" or tradeskill_type == "subheader" then
jcallahan@92 1428 if not is_expanded then
jcallahan@92 1429 header_list[name] = true
jcallahan@92 1430 _G.ExpandTradeSkillSubClass(tradeskill_index)
jcallahan@92 1431 end
jcallahan@92 1432 else
jcallahan@92 1433 local spell_id = tonumber(_G.GetTradeSkillRecipeLink(tradeskill_index):match("^|c%x%x%x%x%x%x%x%x|H%w+:(%d+)"))
jcallahan@92 1434 local required_tool = _G.GetTradeSkillTools(tradeskill_index)
jcallahan@92 1435
jcallahan@92 1436 if required_tool then
jcallahan@92 1437 for tool_name, registry in pairs(TRADESKILL_TOOLS) do
jcallahan@92 1438 if required_tool:find(tool_name) then
jcallahan@92 1439 registry[spell_id] = true
jcallahan@92 1440 end
jcallahan@92 1441 end
jcallahan@92 1442 end
jcallahan@92 1443 end
jcallahan@92 1444 end
jcallahan@92 1445
jcallahan@92 1446 -- Restore the state of the things we changed.
jcallahan@92 1447 for tradeskill_index = 1, _G.GetNumTradeSkills() do
jcallahan@92 1448 local name, tradeskill_type, _, is_expanded = _G.GetTradeSkillInfo(tradeskill_index)
jcallahan@92 1449
jcallahan@92 1450 if header_list[name] then
jcallahan@92 1451 _G.CollapseTradeSkillSubClass(tradeskill_index)
jcallahan@92 1452 end
jcallahan@92 1453 end
jcallahan@92 1454 _G.TradeSkillFrame.filterTbl.hasMaterials = have_materials
jcallahan@92 1455 _G.TradeSkillOnlyShowMakeable(have_materials)
jcallahan@92 1456 _G.TradeSkillFrame.filterTbl.hasSkillUp = have_skillup
jcallahan@92 1457 _G.TradeSkillOnlyShowSkillUps(have_skillup)
jcallahan@92 1458
jcallahan@92 1459 _G.TradeSkillUpdateFilterBar()
jcallahan@92 1460 _G.TradeSkillFrame_Update()
jcallahan@92 1461 end
jcallahan@92 1462 end -- do-block
jcallahan@92 1463
jcallahan@92 1464
jcallahan@92 1465 function WDP:TRAINER_SHOW(event_name)
jcallahan@34 1466 local unit_type, unit_idnum = ParseGUID(_G.UnitGUID("target"))
jcallahan@29 1467 local npc = NPCEntry(unit_idnum)
jcallahan@58 1468
jcallahan@58 1469 if not npc then
jcallahan@58 1470 return
jcallahan@58 1471 end
jcallahan@27 1472 npc.teaches = npc.teaches or {}
jcallahan@27 1473
jcallahan@27 1474 -- Get the initial trainer filters
jcallahan@27 1475 local available = _G.GetTrainerServiceTypeFilter("available")
jcallahan@27 1476 local unavailable = _G.GetTrainerServiceTypeFilter("unavailable")
jcallahan@27 1477 local used = _G.GetTrainerServiceTypeFilter("used")
jcallahan@27 1478
jcallahan@27 1479 -- Clear the trainer filters
jcallahan@27 1480 _G.SetTrainerServiceTypeFilter("available", 1)
jcallahan@27 1481 _G.SetTrainerServiceTypeFilter("unavailable", 1)
jcallahan@27 1482 _G.SetTrainerServiceTypeFilter("used", 1)
jcallahan@27 1483
jcallahan@27 1484 for index = 1, _G.GetNumTrainerServices(), 1 do
jcallahan@27 1485 local spell_name, rank_name, _, _, required_level = _G.GetTrainerServiceInfo(index)
jcallahan@27 1486
jcallahan@27 1487 if spell_name then
jcallahan@27 1488 DatamineTT:ClearLines()
jcallahan@27 1489 DatamineTT:SetTrainerService(index)
jcallahan@27 1490
jcallahan@27 1491 local _, _, spell_id = DatamineTT:GetSpell()
jcallahan@27 1492
jcallahan@43 1493 if spell_id then
jcallahan@43 1494 local profession, min_skill = _G.GetTrainerServiceSkillReq(index)
jcallahan@43 1495 profession = profession or "General"
jcallahan@43 1496
jcallahan@43 1497 local class_professions = npc.teaches[PLAYER_CLASS]
jcallahan@43 1498 if not class_professions then
jcallahan@43 1499 npc.teaches[PLAYER_CLASS] = {}
jcallahan@43 1500 class_professions = npc.teaches[PLAYER_CLASS]
jcallahan@43 1501 end
jcallahan@43 1502
jcallahan@43 1503 local profession_skills = class_professions[profession]
jcallahan@43 1504 if not profession_skills then
jcallahan@43 1505 class_professions[profession] = {}
jcallahan@43 1506 profession_skills = class_professions[profession]
jcallahan@43 1507 end
jcallahan@43 1508 profession_skills[spell_id] = ("%d:%d"):format(required_level, min_skill)
jcallahan@27 1509 end
jcallahan@27 1510 end
jcallahan@27 1511 end
jcallahan@27 1512
jcallahan@27 1513 -- Reset the filters to what they were before
jcallahan@27 1514 _G.SetTrainerServiceTypeFilter("available", available or 0)
jcallahan@27 1515 _G.SetTrainerServiceTypeFilter("unavailable", unavailable or 0)
jcallahan@27 1516 _G.SetTrainerServiceTypeFilter("used", used or 0)
jcallahan@27 1517 end
jcallahan@27 1518
jcallahan@27 1519
jcallahan@1 1520 function WDP:UNIT_SPELLCAST_SENT(event_name, unit_id, spell_name, spell_rank, target_name, spell_line)
jcallahan@1 1521 if private.tracked_line or unit_id ~= "player" then
jcallahan@1 1522 return
jcallahan@1 1523 end
jcallahan@1 1524 local spell_label = private.SPELL_LABELS_BY_NAME[spell_name]
jcallahan@1 1525
jcallahan@1 1526 if not spell_label then
jcallahan@1 1527 return
jcallahan@1 1528 end
jcallahan@18 1529 table.wipe(action_data)
jcallahan@1 1530
jcallahan@1 1531 local tt_item_name, tt_item_link = _G.GameTooltip:GetItem()
jcallahan@1 1532 local tt_unit_name, tt_unit_id = _G.GameTooltip:GetUnit()
jcallahan@1 1533
jcallahan@1 1534 if not tt_unit_name and _G.UnitName("target") == target_name then
jcallahan@1 1535 tt_unit_name = target_name
jcallahan@1 1536 tt_unit_id = "target"
jcallahan@1 1537 end
jcallahan@1 1538 local spell_flags = private.SPELL_FLAGS_BY_LABEL[spell_label]
jcallahan@28 1539 local zone_name, area_id, x, y, map_level, instance_token = CurrentLocationData()
jcallahan@28 1540
jcallahan@28 1541 action_data.instance_token = instance_token
jcallahan@28 1542 action_data.map_level = map_level
jcallahan@28 1543 action_data.x = x
jcallahan@28 1544 action_data.y = y
jcallahan@28 1545 action_data.zone = ("%s:%d"):format(zone_name, area_id)
jcallahan@76 1546 action_data.spell_label = spell_label
jcallahan@76 1547 action_data.label = spell_label:lower()
jcallahan@1 1548
jcallahan@16 1549 if tt_unit_name and not tt_item_name then
jcallahan@16 1550 if bit.band(spell_flags, AF.NPC) == AF.NPC then
jcallahan@16 1551 if not tt_unit_id or tt_unit_name ~= target_name then
jcallahan@16 1552 return
jcallahan@16 1553 end
jcallahan@16 1554 action_data.type = AF.NPC
jcallahan@25 1555 action_data.unit_name = tt_unit_name
jcallahan@16 1556 end
jcallahan@16 1557 elseif bit.band(spell_flags, AF.ITEM) == AF.ITEM then
jcallahan@16 1558 action_data.type = AF.ITEM
jcallahan@16 1559
jcallahan@16 1560 if tt_item_name and tt_item_name == target_name then
jcallahan@28 1561 action_data.identifier = ItemLinkToID(tt_item_link)
jcallahan@16 1562 elseif target_name and target_name ~= "" then
jcallahan@16 1563 local _, target_item_link = _G.GetItemInfo(target_name)
jcallahan@28 1564 action_data.identifier = ItemLinkToID(target_item_link)
jcallahan@16 1565 end
jcallahan@16 1566 elseif not tt_item_name and not tt_unit_name then
jcallahan@17 1567 action_data.name = target_name
jcallahan@17 1568
jcallahan@1 1569 if bit.band(spell_flags, AF.OBJECT) == AF.OBJECT then
jcallahan@17 1570 if target_name == "" then
jcallahan@17 1571 return
jcallahan@17 1572 end
jcallahan@82 1573 action_data.target_name = target_name
jcallahan@1 1574 action_data.type = AF.OBJECT
jcallahan@1 1575 elseif bit.band(spell_flags, AF.ZONE) == AF.ZONE then
jcallahan@38 1576 local identifier = ("%s:%s"):format(spell_label, _G["GameTooltipTextLeft1"]:GetText() or "NONE") -- Possible fishing pool name.
jcallahan@52 1577 action_data.zone_data = UpdateDBEntryLocation("zones", identifier)
jcallahan@17 1578 action_data.type = AF.ZONE
jcallahan@38 1579 action_data.identifier = identifier
jcallahan@1 1580 end
jcallahan@1 1581 end
jcallahan@1 1582 private.tracked_line = spell_line
jcallahan@0 1583 end
jcallahan@0 1584
jcallahan@94 1585
jcallahan@1 1586 function WDP:UNIT_SPELLCAST_SUCCEEDED(event_name, unit_id, spell_name, spell_rank, spell_line, spell_id)
jcallahan@1 1587 if unit_id ~= "player" then
jcallahan@1 1588 return
jcallahan@1 1589 end
jcallahan@1 1590 private.tracked_line = nil
jcallahan@85 1591
jcallahan@86 1592 if spell_name:match("^Harvest.+") then
jcallahan@86 1593 reputation_npc_id = current_target_id
jcallahan@98 1594 private.harvesting = true
jcallahan@85 1595 end
jcallahan@92 1596
jcallahan@92 1597 if anvil_spell_ids[spell_id] then
jcallahan@92 1598 UpdateDBEntryLocation("objects", OBJECT_ID_ANVIL)
jcallahan@92 1599 elseif forge_spell_ids[spell_id] then
jcallahan@92 1600 UpdateDBEntryLocation("objects", OBJECT_ID_FORGE)
jcallahan@92 1601 end
jcallahan@0 1602 end
jcallahan@0 1603
jcallahan@90 1604
jcallahan@1 1605 function WDP:HandleSpellFailure(event_name, unit_id, spell_name, spell_rank, spell_line, spell_id)
jcallahan@1 1606 if unit_id ~= "player" then
jcallahan@1 1607 return
jcallahan@1 1608 end
jcallahan@0 1609
jcallahan@1 1610 if private.tracked_line == spell_line then
jcallahan@1 1611 private.tracked_line = nil
jcallahan@1 1612 end
jcallahan@0 1613 end
jcallahan@90 1614
jcallahan@90 1615
jcallahan@90 1616 do
jcallahan@90 1617 local function SetUnitField(field, required_type)
jcallahan@90 1618 local unit_type, unit_idnum = ParseGUID(_G.UnitGUID("npc"))
jcallahan@90 1619
jcallahan@90 1620 if not unit_idnum or (required_type and unit_type ~= required_type) then
jcallahan@90 1621 return
jcallahan@90 1622 end
jcallahan@90 1623
jcallahan@90 1624 if unit_type == private.UNIT_TYPES.NPC then
jcallahan@90 1625 NPCEntry(unit_idnum)[field] = true
jcallahan@90 1626 elseif unit_type == private.UNIT_TYPES.OBJECT then
jcallahan@90 1627 DBEntry("objects", unit_idnum)[field] = true
jcallahan@93 1628 UpdateDBEntryLocation("objects", unit_idnum)
jcallahan@90 1629 end
jcallahan@90 1630 end
jcallahan@90 1631
jcallahan@90 1632
jcallahan@90 1633 function WDP:AUCTION_HOUSE_SHOW(event_name)
jcallahan@90 1634 SetUnitField("auctioneer", private.UNIT_TYPES.NPC)
jcallahan@90 1635 end
jcallahan@90 1636
jcallahan@90 1637
jcallahan@90 1638 function WDP:BANKFRAME_OPENED(event_name)
jcallahan@90 1639 SetUnitField("banker", private.UNIT_TYPES.NPC)
jcallahan@90 1640 end
jcallahan@90 1641
jcallahan@90 1642
jcallahan@90 1643 function WDP:BATTLEFIELDS_SHOW(event_name)
jcallahan@90 1644 SetUnitField("battlemaster", private.UNIT_TYPES.NPC)
jcallahan@90 1645 end
jcallahan@90 1646
jcallahan@90 1647
jcallahan@92 1648 function WDP:FORGE_MASTER_OPENED(event_name)
jcallahan@90 1649 SetUnitField("arcane_reforger", private.UNIT_TYPES.NPC)
jcallahan@90 1650 end
jcallahan@90 1651
jcallahan@90 1652
jcallahan@92 1653 function WDP:GOSSIP_SHOW(event_name)
jcallahan@90 1654 local gossip_options = { _G.GetGossipOptions() }
jcallahan@90 1655
jcallahan@90 1656 for index = 2, #gossip_options, 2 do
jcallahan@90 1657 if gossip_options[index] == "binder" then
jcallahan@90 1658 SetUnitField("innkeeper", private.UNIT_TYPES.NPC)
jcallahan@90 1659 return
jcallahan@90 1660 end
jcallahan@90 1661 end
jcallahan@90 1662 end
jcallahan@90 1663
jcallahan@90 1664
jcallahan@93 1665 function WDP:GUILDBANKFRAME_OPENED(event_name)
jcallahan@93 1666 SetUnitField("guild_bank", private.UNIT_TYPES.OBJECT)
jcallahan@93 1667 end
jcallahan@93 1668
jcallahan@93 1669
jcallahan@90 1670 function WDP:TAXIMAP_OPENED(event_name)
jcallahan@90 1671 SetUnitField("flight_master", private.UNIT_TYPES.NPC)
jcallahan@90 1672 end
jcallahan@90 1673
jcallahan@90 1674
jcallahan@90 1675 function WDP:TRANSMOGRIFY_OPEN(event_name)
jcallahan@90 1676 SetUnitField("transmogrifier", private.UNIT_TYPES.NPC)
jcallahan@90 1677 end
jcallahan@90 1678
jcallahan@90 1679
jcallahan@90 1680 function WDP:VOID_STORAGE_OPEN(event_name)
jcallahan@90 1681 SetUnitField("void_storage", private.UNIT_TYPES.NPC)
jcallahan@90 1682 end
jcallahan@90 1683 end -- do-block