Mercurial > wow > wowdb-profiler

annotate Main.lua @ 115:6daf570bc198 1.0.6

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