Mercurial > wow > wowdb-profiler

annotate Main.lua @ 151:e2331b00a1cf 1.0.15

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