Mercurial > wow > wowdb-profiler

annotate Main.lua @ 154:6c16692eebb0

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