Mercurial > wow > wowdb-profiler

annotate Main.lua @ 119:8df432f8a15a 1.0.7

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