Mercurial > wow > wowdb-profiler

annotate Main.lua @ 65:3f7a12a9163c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Ensure that reputation gains are attributed to the correct NPC ID and changed where within the NPC table they are stored.
author James D. Callahan III <jcallahan@curse.com>
date Thu, 26 Jul 2012 16:36:29 -0500
parents 2421a4d39909
children e84a1e960bed
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@0 13
jcallahan@0 14 -----------------------------------------------------------------------
jcallahan@0 15 -- AddOn namespace.
jcallahan@0 16 -----------------------------------------------------------------------
jcallahan@0 17 local ADDON_NAME, private = ...
jcallahan@0 18
jcallahan@0 19 local LibStub = _G.LibStub
jcallahan@0 20 local WDP = LibStub("AceAddon-3.0"):NewAddon(ADDON_NAME, "AceEvent-3.0", "AceTimer-3.0")
jcallahan@0 21
jcallahan@48 22 local deformat = LibStub("LibDeformat-3.0")
jcallahan@48 23
jcallahan@4 24 local DatamineTT = _G.CreateFrame("GameTooltip", "WDPDatamineTT", _G.UIParent, "GameTooltipTemplate")
jcallahan@5 25 DatamineTT:SetOwner(_G.WorldFrame, "ANCHOR_NONE")
jcallahan@5 26
jcallahan@0 27
jcallahan@0 28 -----------------------------------------------------------------------
jcallahan@0 29 -- Local constants.
jcallahan@0 30 -----------------------------------------------------------------------
jcallahan@63 31 local DB_VERSION = 1
jcallahan@63 32
jcallahan@0 33 local DATABASE_DEFAULTS = {
jcallahan@0 34 global = {
jcallahan@0 35 items = {},
jcallahan@0 36 npcs = {},
jcallahan@0 37 objects = {},
jcallahan@0 38 quests = {},
jcallahan@17 39 zones = {},
jcallahan@0 40 }
jcallahan@0 41 }
jcallahan@0 42
jcallahan@0 43
jcallahan@1 44 local EVENT_MAPPING = {
jcallahan@56 45 BLACK_MARKET_ITEM_UPDATE = true,
jcallahan@48 46 CHAT_MSG_LOOT = true,
jcallahan@40 47 CHAT_MSG_SYSTEM = true,
jcallahan@23 48 COMBAT_LOG_EVENT_UNFILTERED = true,
jcallahan@18 49 COMBAT_TEXT_UPDATE = true,
jcallahan@42 50 ITEM_TEXT_BEGIN = true,
jcallahan@1 51 LOOT_OPENED = true,
jcallahan@7 52 MERCHANT_SHOW = "UpdateMerchantItems",
jcallahan@61 53 MERCHANT_UPDATE = "UpdateMerchantItems",
jcallahan@25 54 PET_BAR_UPDATE = true,
jcallahan@2 55 PLAYER_TARGET_CHANGED = true,
jcallahan@9 56 QUEST_COMPLETE = true,
jcallahan@9 57 QUEST_DETAIL = true,
jcallahan@9 58 QUEST_LOG_UPDATE = true,
jcallahan@27 59 TRAINER_SHOW = true,
jcallahan@4 60 UNIT_QUEST_LOG_CHANGED = true,
jcallahan@1 61 UNIT_SPELLCAST_FAILED = "HandleSpellFailure",
jcallahan@1 62 UNIT_SPELLCAST_FAILED_QUIET = "HandleSpellFailure",
jcallahan@1 63 UNIT_SPELLCAST_INTERRUPTED = "HandleSpellFailure",
jcallahan@1 64 UNIT_SPELLCAST_SENT = true,
jcallahan@1 65 UNIT_SPELLCAST_SUCCEEDED = true,
jcallahan@0 66 }
jcallahan@0 67
jcallahan@4 68
jcallahan@1 69 local AF = private.ACTION_TYPE_FLAGS
jcallahan@0 70
jcallahan@4 71
jcallahan@27 72 local PLAYER_CLASS = _G.select(2, _G.UnitClass("player"))
jcallahan@34 73 local PLAYER_GUID = _G.UnitGUID("player")
jcallahan@39 74 local PLAYER_RACE = _G.select(2, _G.UnitRace("player"))
jcallahan@27 75
jcallahan@0 76 -----------------------------------------------------------------------
jcallahan@0 77 -- Local variables.
jcallahan@0 78 -----------------------------------------------------------------------
jcallahan@0 79 local db
jcallahan@0 80 local durability_timer_handle
jcallahan@2 81 local target_location_timer_handle
jcallahan@1 82 local action_data = {}
jcallahan@40 83 local currently_drunk
jcallahan@32 84 local faction_standings = {}
jcallahan@0 85
jcallahan@1 86
jcallahan@1 87 -----------------------------------------------------------------------
jcallahan@1 88 -- Helper Functions.
jcallahan@1 89 -----------------------------------------------------------------------
jcallahan@39 90 local ActualCopperCost
jcallahan@39 91 do
jcallahan@39 92 local BARTERING_SPELL_ID = 83964
jcallahan@39 93
jcallahan@39 94 local STANDING_DISCOUNTS = {
jcallahan@39 95 HATED = 0,
jcallahan@39 96 HOSTILE = 0,
jcallahan@39 97 UNFRIENDLY = 0,
jcallahan@39 98 NEUTRAL = 0,
jcallahan@39 99 FRIENDLY = 0.05,
jcallahan@39 100 HONORED = 0.1,
jcallahan@39 101 REVERED = 0.15,
jcallahan@39 102 EXALTED = 0.2,
jcallahan@39 103 }
jcallahan@39 104
jcallahan@39 105
jcallahan@39 106 function ActualCopperCost(copper_cost, rep_standing)
jcallahan@39 107 if not copper_cost or copper_cost == 0 then
jcallahan@39 108 return 0
jcallahan@39 109 end
jcallahan@39 110 local modifier = 1
jcallahan@39 111
jcallahan@39 112 if _G.IsSpellKnown(BARTERING_SPELL_ID) then
jcallahan@39 113 modifier = modifier - 0.1
jcallahan@39 114 end
jcallahan@39 115
jcallahan@39 116 if rep_standing then
jcallahan@39 117 if PLAYER_RACE == "Goblin" then
jcallahan@39 118 modifier = modifier - STANDING_DISCOUNTS["EXALTED"]
jcallahan@39 119 elseif STANDING_DISCOUNTS[rep_standing] then
jcallahan@39 120 modifier = modifier - STANDING_DISCOUNTS[rep_standing]
jcallahan@39 121 end
jcallahan@39 122 end
jcallahan@39 123 return math.floor(copper_cost / modifier)
jcallahan@39 124 end
jcallahan@39 125 end -- do-block
jcallahan@39 126
jcallahan@39 127
jcallahan@29 128 local function InstanceDifficultyToken()
jcallahan@29 129 local _, instance_type, instance_difficulty, difficulty_name, _, _, is_dynamic = _G.GetInstanceInfo()
jcallahan@59 130 if not difficulty_name or difficulty_name == "" then
jcallahan@29 131 difficulty_name = "NONE"
jcallahan@29 132 end
jcallahan@59 133
jcallahan@59 134 if not instance_type or instance_type == "" then
jcallahan@59 135 instance_type = "NONE"
jcallahan@59 136 end
jcallahan@29 137 return ("%s:%s:%s"):format(instance_type:upper(), difficulty_name:upper():gsub(" ", "_"), _G.tostring(is_dynamic))
jcallahan@29 138 end
jcallahan@29 139
jcallahan@29 140
jcallahan@19 141 local function DBEntry(data_type, unit_id)
jcallahan@19 142 if not data_type or not unit_id then
jcallahan@6 143 return
jcallahan@6 144 end
jcallahan@19 145 local unit = db[data_type][unit_id]
jcallahan@6 146
jcallahan@10 147 if not unit then
jcallahan@19 148 db[data_type][unit_id] = {}
jcallahan@19 149 unit = db[data_type][unit_id]
jcallahan@6 150 end
jcallahan@10 151 return unit
jcallahan@6 152 end
jcallahan@6 153
jcallahan@6 154
jcallahan@29 155 local function NPCEntry(identifier)
jcallahan@29 156 local npc = DBEntry("npcs", identifier)
jcallahan@29 157
jcallahan@29 158 if not npc then
jcallahan@29 159 return
jcallahan@22 160 end
jcallahan@29 161 local instance_token = InstanceDifficultyToken()
jcallahan@29 162 npc.encounter_data = npc.encounter_data or {}
jcallahan@29 163 npc.encounter_data[instance_token] = npc.encounter_data[instance_token] or {}
jcallahan@30 164 npc.encounter_data[instance_token].stats = npc.encounter_data[instance_token].stats or {}
jcallahan@29 165 return npc
jcallahan@22 166 end
jcallahan@22 167
jcallahan@22 168
jcallahan@1 169 local function CurrentLocationData()
jcallahan@1 170 local map_level = _G.GetCurrentMapDungeonLevel() or 0
jcallahan@1 171 local x, y = _G.GetPlayerMapPosition("player")
jcallahan@1 172
jcallahan@1 173 x = x or 0
jcallahan@1 174 y = y or 0
jcallahan@1 175
jcallahan@1 176 if x == 0 and y == 0 then
jcallahan@1 177 for level_index = 1, _G.GetNumDungeonMapLevels() do
jcallahan@1 178 _G.SetDungeonMapLevel(level_index)
jcallahan@1 179 x, y = _G.GetPlayerMapPosition("player")
jcallahan@1 180
jcallahan@1 181 if x and y and (x > 0 or y > 0) then
jcallahan@1 182 _G.SetDungeonMapLevel(map_level)
jcallahan@1 183 map_level = level_index
jcallahan@1 184 break
jcallahan@1 185 end
jcallahan@1 186 end
jcallahan@1 187 end
jcallahan@1 188
jcallahan@1 189 if _G.DungeonUsesTerrainMap() then
jcallahan@1 190 map_level = map_level - 1
jcallahan@1 191 end
jcallahan@31 192 local x = _G.floor(x * 1000)
jcallahan@31 193 local y = _G.floor(y * 1000)
jcallahan@28 194
jcallahan@31 195 if x % 2 ~= 0 then
jcallahan@31 196 x = x + 1
jcallahan@28 197 end
jcallahan@28 198
jcallahan@31 199 if y % 2 ~= 0 then
jcallahan@31 200 y = y + 1
jcallahan@28 201 end
jcallahan@31 202 return _G.GetRealZoneText(), _G.GetCurrentMapAreaID(), x, y, map_level, InstanceDifficultyToken()
jcallahan@1 203 end
jcallahan@1 204
jcallahan@1 205
jcallahan@1 206 local function ItemLinkToID(item_link)
jcallahan@1 207 if not item_link then
jcallahan@1 208 return
jcallahan@1 209 end
jcallahan@7 210 return tonumber(item_link:match("item:(%d+)"))
jcallahan@1 211 end
jcallahan@0 212
jcallahan@4 213
jcallahan@34 214 local ParseGUID
jcallahan@4 215 do
jcallahan@4 216 local UNIT_TYPE_BITMASK = 0x007
jcallahan@4 217
jcallahan@34 218 function ParseGUID(guid)
jcallahan@5 219 if not guid then
jcallahan@5 220 return
jcallahan@5 221 end
jcallahan@4 222 local types = private.UNIT_TYPES
jcallahan@4 223 local unit_type = _G.bit.band(tonumber(guid:sub(1, 5)), UNIT_TYPE_BITMASK)
jcallahan@4 224
jcallahan@10 225 if unit_type ~= types.PLAYER and unit_type ~= types.PET then
jcallahan@4 226 return unit_type, tonumber(guid:sub(-12, -9), 16)
jcallahan@4 227 end
jcallahan@4 228
jcallahan@4 229 return unit_type
jcallahan@4 230 end
jcallahan@4 231 end -- do-block
jcallahan@4 232
jcallahan@4 233
jcallahan@34 234 local UpdateNPCLocation
jcallahan@34 235 do
jcallahan@34 236 local COORD_MAX = 5
jcallahan@34 237
jcallahan@34 238 function UpdateNPCLocation(unit_idnum)
jcallahan@34 239 local zone_name, area_id, x, y, map_level, difficulty_token = CurrentLocationData()
jcallahan@34 240 local npc_data = NPCEntry(unit_idnum).encounter_data[difficulty_token].stats[("level_%d"):format(_G.UnitLevel("target"))]
jcallahan@34 241 local zone_token = ("%s:%d"):format(zone_name, area_id)
jcallahan@34 242 npc_data.locations = npc_data.locations or {}
jcallahan@34 243
jcallahan@34 244 local zone_data = npc_data.locations[zone_token]
jcallahan@34 245
jcallahan@34 246 if not zone_data then
jcallahan@34 247 zone_data = {}
jcallahan@34 248 npc_data.locations[zone_token] = zone_data
jcallahan@34 249 end
jcallahan@34 250
jcallahan@34 251 for location_token in pairs(zone_data) do
jcallahan@34 252 local loc_level, loc_x, loc_y = (":"):split(location_token)
jcallahan@34 253 loc_level = tonumber(loc_level)
jcallahan@34 254
jcallahan@34 255 if map_level == loc_level and math.abs(x - loc_x) <= COORD_MAX and math.abs(y - loc_y) <= COORD_MAX then
jcallahan@34 256 return
jcallahan@34 257 end
jcallahan@34 258 end
jcallahan@34 259 zone_data[("%s:%s:%s"):format(map_level, x, y)] = true
jcallahan@34 260 end
jcallahan@34 261 end -- do-block
jcallahan@34 262
jcallahan@34 263
jcallahan@52 264 local function UpdateDBEntryLocation(entry_type, identifier)
jcallahan@10 265 if not identifier then
jcallahan@10 266 return
jcallahan@10 267 end
jcallahan@31 268 local zone_name, area_id, x, y, map_level, difficulty_token = CurrentLocationData()
jcallahan@41 269 local entry = DBEntry(entry_type, identifier)
jcallahan@41 270 entry[difficulty_token] = entry[difficulty_token] or {}
jcallahan@52 271 entry[difficulty_token].locations = entry[difficulty_token].locations or {}
jcallahan@10 272
jcallahan@31 273 local zone_token = ("%s:%d"):format(zone_name, area_id)
jcallahan@52 274 local zone_data = entry[difficulty_token].locations[zone_token]
jcallahan@24 275
jcallahan@31 276 if not zone_data then
jcallahan@31 277 zone_data = {}
jcallahan@52 278 entry[difficulty_token].locations[zone_token] = zone_data
jcallahan@10 279 end
jcallahan@41 280 local location_token = ("%s:%s:%s"):format(map_level, x, y)
jcallahan@41 281 zone_data[location_token] = zone_data[location_token] or true
jcallahan@41 282 return zone_data
jcallahan@10 283 end
jcallahan@10 284
jcallahan@10 285
jcallahan@19 286 local function HandleItemUse(item_link, bag_index, slot_index)
jcallahan@19 287 if not item_link then
jcallahan@19 288 return
jcallahan@19 289 end
jcallahan@19 290 local item_id = ItemLinkToID(item_link)
jcallahan@19 291
jcallahan@19 292 if not bag_index or not slot_index then
jcallahan@19 293 for new_bag_index = 0, _G.NUM_BAG_FRAMES do
jcallahan@19 294 for new_slot_index = 1, _G.GetContainerNumSlots(new_bag_index) do
jcallahan@19 295 if item_id == ItemLinkToID(_G.GetContainerItemLink(new_bag_index, new_slot_index)) then
jcallahan@19 296 bag_index = new_bag_index
jcallahan@19 297 slot_index = new_slot_index
jcallahan@19 298 break
jcallahan@19 299 end
jcallahan@19 300 end
jcallahan@19 301 end
jcallahan@19 302 end
jcallahan@19 303
jcallahan@19 304 if not bag_index or not slot_index then
jcallahan@19 305 return
jcallahan@19 306 end
jcallahan@19 307 local _, _, _, _, _, is_lootable = _G.GetContainerItemInfo(bag_index, slot_index)
jcallahan@19 308
jcallahan@19 309 if not is_lootable then
jcallahan@19 310 return
jcallahan@19 311 end
jcallahan@19 312 DatamineTT:ClearLines()
jcallahan@19 313 DatamineTT:SetBagItem(bag_index, slot_index)
jcallahan@19 314
jcallahan@19 315 for line_index = 1, DatamineTT:NumLines() do
jcallahan@19 316 local current_line = _G["WDPDatamineTTTextLeft" .. line_index]
jcallahan@19 317
jcallahan@19 318 if not current_line then
jcallahan@19 319 break
jcallahan@19 320 end
jcallahan@19 321
jcallahan@19 322 if current_line:GetText() == _G.ITEM_OPENABLE then
jcallahan@19 323 table.wipe(action_data)
jcallahan@19 324 action_data.type = AF.ITEM
jcallahan@28 325 action_data.identifier = item_id
jcallahan@25 326 action_data.label = "contains"
jcallahan@19 327 break
jcallahan@19 328 end
jcallahan@19 329 end
jcallahan@19 330 end
jcallahan@19 331
jcallahan@19 332
jcallahan@39 333 local UnitFactionStanding
jcallahan@32 334 local UpdateFactionData
jcallahan@32 335 do
jcallahan@32 336 local MAX_FACTION_INDEX = 1000
jcallahan@20 337
jcallahan@32 338 local STANDING_NAMES = {
jcallahan@32 339 "HATED",
jcallahan@32 340 "HOSTILE",
jcallahan@32 341 "UNFRIENDLY",
jcallahan@32 342 "NEUTRAL",
jcallahan@32 343 "FRIENDLY",
jcallahan@32 344 "HONORED",
jcallahan@32 345 "REVERED",
jcallahan@32 346 "EXALTED",
jcallahan@32 347 }
jcallahan@32 348
jcallahan@39 349
jcallahan@39 350 function UnitFactionStanding(unit)
jcallahan@39 351 UpdateFactionData()
jcallahan@39 352 DatamineTT:ClearLines()
jcallahan@39 353 DatamineTT:SetUnit(unit)
jcallahan@39 354
jcallahan@39 355 for line_index = 1, DatamineTT:NumLines() do
jcallahan@64 356 local faction_name = _G["WDPDatamineTTTextLeft" .. line_index]:GetText():trim()
jcallahan@39 357
jcallahan@39 358 if faction_name and faction_standings[faction_name] then
jcallahan@39 359 return faction_name, faction_standings[faction_name]
jcallahan@39 360 end
jcallahan@39 361 end
jcallahan@39 362 end
jcallahan@39 363
jcallahan@39 364
jcallahan@32 365 function UpdateFactionData()
jcallahan@32 366 for faction_index = 1, MAX_FACTION_INDEX do
jcallahan@32 367 local faction_name, _, current_standing, _, _, _, _, _, is_header = _G.GetFactionInfo(faction_index)
jcallahan@32 368
jcallahan@32 369 if faction_name and not is_header then
jcallahan@32 370 faction_standings[faction_name] = STANDING_NAMES[current_standing]
jcallahan@32 371 elseif not faction_name then
jcallahan@32 372 break
jcallahan@32 373 end
jcallahan@20 374 end
jcallahan@20 375 end
jcallahan@32 376 end -- do-block
jcallahan@20 377
jcallahan@48 378
jcallahan@62 379 local function GenericLootUpdate(data_type, top_field)
jcallahan@48 380 local entry = DBEntry(data_type, action_data.identifier)
jcallahan@48 381
jcallahan@48 382 if not entry then
jcallahan@48 383 return
jcallahan@48 384 end
jcallahan@48 385 local loot_type = action_data.label or "drops"
jcallahan@48 386 local loot_count = ("%s_count"):format(loot_type)
jcallahan@48 387 local loot_data
jcallahan@48 388
jcallahan@48 389 if top_field then
jcallahan@48 390 entry[top_field] = entry[top_field] or {}
jcallahan@48 391 entry[top_field][loot_count] = (entry[top_field][loot_count] or 0) + 1
jcallahan@48 392 entry[top_field][loot_type] = entry[top_field][loot_type] or {}
jcallahan@48 393 loot_data = entry[top_field][loot_type]
jcallahan@48 394 else
jcallahan@48 395 entry[loot_count] = (entry[loot_count] or 0) + 1
jcallahan@48 396 entry[loot_type] = entry[loot_type] or {}
jcallahan@48 397 loot_data = entry[loot_type]
jcallahan@48 398 end
jcallahan@48 399
jcallahan@48 400 for index = 1, #action_data.loot_list do
jcallahan@48 401 table.insert(loot_data, action_data.loot_list[index])
jcallahan@48 402 end
jcallahan@48 403 end
jcallahan@48 404
jcallahan@48 405
jcallahan@0 406 -----------------------------------------------------------------------
jcallahan@0 407 -- Methods.
jcallahan@0 408 -----------------------------------------------------------------------
jcallahan@0 409 function WDP:OnInitialize()
jcallahan@0 410 db = LibStub("AceDB-3.0"):New("WoWDBProfilerData", DATABASE_DEFAULTS, "Default").global
jcallahan@14 411
jcallahan@14 412 local raw_db = _G["WoWDBProfilerData"]
jcallahan@14 413
jcallahan@18 414 local build_num = tonumber(private.build_num)
jcallahan@14 415
jcallahan@35 416 -- TODO: Un-comment this when MoP goes live.
jcallahan@35 417 -- if raw_db.build_num and raw_db.build_num < build_num then
jcallahan@35 418 -- for entry in pairs(DATABASE_DEFAULTS.global) do
jcallahan@35 419 -- db[entry] = {}
jcallahan@35 420 -- end
jcallahan@35 421 -- end
jcallahan@35 422 raw_db.build_num = build_num
jcallahan@63 423 raw_db.version = DB_VERSION
jcallahan@0 424 end
jcallahan@0 425
jcallahan@0 426
jcallahan@0 427 function WDP:OnEnable()
jcallahan@0 428 for event_name, mapping in pairs(EVENT_MAPPING) do
jcallahan@1 429 self:RegisterEvent(event_name, (_G.type(mapping) ~= "boolean") and mapping or nil)
jcallahan@0 430 end
jcallahan@0 431 durability_timer_handle = self:ScheduleRepeatingTimer("ProcessDurability", 30)
jcallahan@31 432 target_location_timer_handle = self:ScheduleRepeatingTimer("UpdateTargetLocation", 0.5)
jcallahan@19 433
jcallahan@19 434 _G.hooksecurefunc("UseContainerItem", function(bag_index, slot_index, target_unit)
jcallahan@19 435 if target_unit then
jcallahan@19 436 return
jcallahan@19 437 end
jcallahan@19 438 HandleItemUse(_G.GetContainerItemLink(bag_index, slot_index), bag_index, slot_index)
jcallahan@19 439 end)
jcallahan@19 440
jcallahan@19 441 _G.hooksecurefunc("UseItemByName", function(identifier, target_unit)
jcallahan@19 442 if target_unit then
jcallahan@19 443 return
jcallahan@19 444 end
jcallahan@19 445 local _, item_link = _G.GetItemInfo(identifier)
jcallahan@19 446 HandleItemUse(item_link)
jcallahan@19 447 end)
jcallahan@0 448 end
jcallahan@0 449
jcallahan@0 450
jcallahan@0 451 local function RecordDurability(item_id, durability)
jcallahan@0 452 if not durability or durability <= 0 then
jcallahan@0 453 return
jcallahan@0 454 end
jcallahan@0 455
jcallahan@0 456 if not db.items[item_id] then
jcallahan@0 457 db.items[item_id] = {}
jcallahan@0 458 end
jcallahan@0 459 db.items[item_id].durability = durability
jcallahan@0 460 end
jcallahan@0 461
jcallahan@0 462
jcallahan@0 463 function WDP:ProcessDurability()
jcallahan@0 464 for slot_index = 0, _G.INVSLOT_LAST_EQUIPPED do
jcallahan@1 465 local item_id = _G.GetInventoryItemID("player", slot_index)
jcallahan@0 466
jcallahan@0 467 if item_id and item_id > 0 then
jcallahan@1 468 local _, max_durability = _G.GetInventoryItemDurability(slot_index)
jcallahan@0 469 RecordDurability(item_id, max_durability)
jcallahan@0 470 end
jcallahan@0 471 end
jcallahan@0 472
jcallahan@0 473 for bag_index = 0, _G.NUM_BAG_SLOTS do
jcallahan@0 474 for slot_index = 1, _G.GetContainerNumSlots(bag_index) do
jcallahan@1 475 local item_id = _G.GetContainerItemID(bag_index, slot_index)
jcallahan@0 476
jcallahan@0 477 if item_id and item_id > 0 then
jcallahan@1 478 local _, max_durability = _G.GetContainerItemDurability(bag_index, slot_index)
jcallahan@0 479 RecordDurability(item_id, max_durability)
jcallahan@0 480 end
jcallahan@0 481 end
jcallahan@0 482 end
jcallahan@0 483 end
jcallahan@0 484
jcallahan@0 485
jcallahan@2 486 function WDP:UpdateTargetLocation()
jcallahan@40 487 if currently_drunk or not _G.UnitExists("target") or _G.UnitPlayerControlled("target") or (_G.UnitIsTapped("target") and not _G.UnitIsDead("target")) then
jcallahan@2 488 return
jcallahan@2 489 end
jcallahan@2 490
jcallahan@2 491 for index = 1, 4 do
jcallahan@2 492 if not _G.CheckInteractDistance("target", index) then
jcallahan@2 493 return
jcallahan@2 494 end
jcallahan@2 495 end
jcallahan@40 496 local unit_type, unit_idnum = ParseGUID(_G.UnitGUID("target"))
jcallahan@2 497
jcallahan@40 498 if not unit_idnum or unit_type ~= private.UNIT_TYPES.NPC then
jcallahan@2 499 return
jcallahan@2 500 end
jcallahan@34 501 UpdateNPCLocation(unit_idnum)
jcallahan@2 502 end
jcallahan@2 503
jcallahan@2 504
jcallahan@0 505 -----------------------------------------------------------------------
jcallahan@0 506 -- Event handlers.
jcallahan@0 507 -----------------------------------------------------------------------
jcallahan@56 508 function WDP:BLACK_MARKET_ITEM_UPDATE(event)
jcallahan@56 509 local num_items = _G.C_BlackMarket.GetNumItems()
jcallahan@56 510
jcallahan@56 511 for index = 1, num_items do
jcallahan@56 512 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 513
jcallahan@56 514 if item_link then
jcallahan@56 515 DBEntry("items", ItemLinkToID(item_link)).black_market = seller_name or "UNKNOWN"
jcallahan@56 516 end
jcallahan@56 517 end
jcallahan@56 518 end
jcallahan@56 519
jcallahan@56 520
jcallahan@48 521 function WDP:CHAT_MSG_LOOT(event, message)
jcallahan@48 522 if action_data.spell_label ~= "EXTRACT_GAS" then
jcallahan@48 523 return
jcallahan@48 524 end
jcallahan@48 525 local item_link, quantity = deformat(message, _G.LOOT_ITEM_PUSHED_SELF_MULTIPLE)
jcallahan@48 526
jcallahan@48 527 if not item_link then
jcallahan@48 528 quantity, item_link = 1, deformat(message, _G.LOOT_ITEM_PUSHED_SELF)
jcallahan@48 529 end
jcallahan@48 530
jcallahan@48 531 if not item_link then
jcallahan@48 532 return
jcallahan@48 533 end
jcallahan@48 534 local item_id = ItemLinkToID(item_link)
jcallahan@48 535
jcallahan@48 536 if not item_id then
jcallahan@48 537 return
jcallahan@48 538 end
jcallahan@48 539 action_data.loot_list = {
jcallahan@48 540 ("%d:%d"):format(item_id, quantity)
jcallahan@48 541 }
jcallahan@48 542 GenericLootUpdate("zones")
jcallahan@48 543 table.wipe(action_data)
jcallahan@48 544 end
jcallahan@48 545
jcallahan@48 546
jcallahan@23 547 do
jcallahan@40 548 local SOBER_MATCH = _G.DRUNK_MESSAGE_ITEM_SELF1:gsub("%%s", ".+")
jcallahan@40 549
jcallahan@40 550 local DRUNK_COMPARES = {
jcallahan@40 551 _G.DRUNK_MESSAGE_SELF2,
jcallahan@40 552 _G.DRUNK_MESSAGE_SELF3,
jcallahan@40 553 _G.DRUNK_MESSAGE_SELF4,
jcallahan@40 554 }
jcallahan@40 555
jcallahan@40 556 local DRUNK_MATCHES = {
jcallahan@40 557 _G.DRUNK_MESSAGE_SELF2:gsub("%%s", ".+"),
jcallahan@40 558 _G.DRUNK_MESSAGE_SELF3:gsub("%%s", ".+"),
jcallahan@40 559 _G.DRUNK_MESSAGE_SELF4:gsub("%%s", ".+"),
jcallahan@40 560 }
jcallahan@40 561
jcallahan@40 562 function WDP:CHAT_MSG_SYSTEM(event, message)
jcallahan@40 563 if currently_drunk then
jcallahan@40 564 if message == _G.DRUNK_MESSAGE_SELF1 or message:match(SOBER_MATCH) then
jcallahan@40 565 currently_drunk = nil
jcallahan@40 566 end
jcallahan@40 567 return
jcallahan@40 568 end
jcallahan@40 569
jcallahan@40 570 for index = 1, #DRUNK_MATCHES do
jcallahan@40 571 if message == DRUNK_COMPARES[index] or message:match(DRUNK_MATCHES[index]) then
jcallahan@40 572 currently_drunk = true
jcallahan@40 573 break
jcallahan@40 574 end
jcallahan@40 575 end
jcallahan@40 576 end
jcallahan@40 577 end
jcallahan@40 578
jcallahan@40 579 -- do-block
jcallahan@40 580
jcallahan@40 581 do
jcallahan@23 582 local FLAGS_NPC = bit.bor(_G.COMBATLOG_OBJECT_TYPE_GUARDIAN, _G.COMBATLOG_OBJECT_CONTROL_NPC)
jcallahan@23 583 local FLAGS_NPC_CONTROL = bit.bor(_G.COMBATLOG_OBJECT_AFFILIATION_OUTSIDER, _G.COMBATLOG_OBJECT_CONTROL_NPC)
jcallahan@23 584
jcallahan@65 585 -- This is used to record faction gains
jcallahan@65 586 local dead_npc_id
jcallahan@23 587
jcallahan@23 588 local function RecordNPCSpell(sub_event, source_guid, source_name, source_flags, dest_guid, dest_name, dest_flags, spell_id, spell_name)
jcallahan@23 589 if not spell_id then
jcallahan@23 590 return
jcallahan@23 591 end
jcallahan@34 592 local source_type, source_id = ParseGUID(source_guid)
jcallahan@23 593
jcallahan@23 594 if not source_id or source_type ~= private.UNIT_TYPES.NPC then
jcallahan@23 595 return
jcallahan@23 596 end
jcallahan@23 597
jcallahan@23 598 if bit.band(FLAGS_NPC_CONTROL, source_flags) == FLAGS_NPC_CONTROL and bit.band(FLAGS_NPC, source_flags) ~= 0 then
jcallahan@29 599 local encounter_data = NPCEntry(source_id).encounter_data[InstanceDifficultyToken()]
jcallahan@28 600 encounter_data.spells = encounter_data.spells or {}
jcallahan@28 601 encounter_data.spells[spell_id] = (encounter_data.spells[spell_id] or 0) + 1
jcallahan@23 602 end
jcallahan@23 603 end
jcallahan@23 604
jcallahan@23 605 local COMBAT_LOG_FUNCS = {
jcallahan@23 606 SPELL_AURA_APPLIED = RecordNPCSpell,
jcallahan@23 607 SPELL_CAST_START = RecordNPCSpell,
jcallahan@48 608 SPELL_CAST_SUCCESS = RecordNPCSpell,
jcallahan@65 609 UNIT_DIED = function(sub_event, source_guid, source_name, source_flags, dest_guid, dest_name, dest_flags, spell_id, spell_name)
jcallahan@65 610 local unit_type, unit_idnum = ParseGUID(dest_guid)
jcallahan@65 611
jcallahan@65 612 if unit_type ~= private.UNIT_TYPES.NPC or not unit_idnum then
jcallahan@65 613 dead_npc_id = nil
jcallahan@65 614 return
jcallahan@65 615 end
jcallahan@65 616 dead_npc_id = unit_idnum
jcallahan@65 617 end,
jcallahan@23 618 }
jcallahan@23 619
jcallahan@23 620
jcallahan@23 621 function WDP:COMBAT_LOG_EVENT_UNFILTERED(event, 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 622 local combat_log_func = COMBAT_LOG_FUNCS[sub_event]
jcallahan@23 623
jcallahan@23 624 if not combat_log_func then
jcallahan@23 625 return
jcallahan@23 626 end
jcallahan@23 627 combat_log_func(sub_event, source_guid, source_name, source_flags, dest_guid, dest_name, dest_flags, ...)
jcallahan@23 628 end
jcallahan@23 629
jcallahan@44 630 local DIPLOMACY_SPELL_ID = 20599
jcallahan@44 631 local MR_POP_RANK1_SPELL_ID = 78634
jcallahan@44 632 local MR_POP_RANK2_SPELL_ID = 78635
jcallahan@44 633
jcallahan@44 634 local REP_BUFFS = {
jcallahan@44 635 [_G.GetSpellInfo(30754)] = "CENARION_FAVOR",
jcallahan@44 636 [_G.GetSpellInfo(24705)] = "GRIM_VISAGE",
jcallahan@44 637 [_G.GetSpellInfo(32098)] = "HONOR_HOLD_FAVOR",
jcallahan@44 638 [_G.GetSpellInfo(39913)] = "NAZGRELS_FERVOR",
jcallahan@44 639 [_G.GetSpellInfo(39953)] = "SONG_OF_BATTLE",
jcallahan@44 640 [_G.GetSpellInfo(61849)] = "SPIRIT_OF_SHARING",
jcallahan@44 641 [_G.GetSpellInfo(32096)] = "THRALLMARS_FAVOR",
jcallahan@44 642 [_G.GetSpellInfo(39911)] = "TROLLBANES_COMMAND",
jcallahan@44 643 [_G.GetSpellInfo(95987)] = "UNBURDENED",
jcallahan@44 644 [_G.GetSpellInfo(100951)] = "WOW_ANNIVERSARY",
jcallahan@44 645 }
jcallahan@44 646
jcallahan@44 647
jcallahan@44 648 local FACTION_NAMES = {
jcallahan@44 649 CENARION_CIRCLE = _G.GetFactionInfoByID(609),
jcallahan@44 650 HONOR_HOLD = _G.GetFactionInfoByID(946),
jcallahan@44 651 THE_SHATAR = _G.GetFactionInfoByID(935),
jcallahan@44 652 THRALLMAR = _G.GetFactionInfoByID(947),
jcallahan@44 653 }
jcallahan@44 654
jcallahan@44 655
jcallahan@44 656 local MODIFIERS = {
jcallahan@44 657 CENARION_FAVOR = {
jcallahan@44 658 faction = FACTION_NAMES.CENARION_CIRCLE,
jcallahan@44 659 modifier = 0.25,
jcallahan@44 660 },
jcallahan@44 661 GRIM_VISAGE = {
jcallahan@44 662 modifier = 0.1,
jcallahan@44 663 },
jcallahan@44 664 HONOR_HOLD_FAVOR = {
jcallahan@44 665 faction = FACTION_NAMES.HONOR_HOLD,
jcallahan@44 666 modifier = 0.25,
jcallahan@44 667 },
jcallahan@44 668 NAZGRELS_FERVOR = {
jcallahan@44 669 faction = FACTION_NAMES.THRALLMAR,
jcallahan@44 670 modifier = 0.1,
jcallahan@44 671 },
jcallahan@44 672 SONG_OF_BATTLE = {
jcallahan@44 673 faction = FACTION_NAMES.THE_SHATAR,
jcallahan@44 674 modifier = 0.1,
jcallahan@44 675 },
jcallahan@44 676 SPIRIT_OF_SHARING = {
jcallahan@44 677 modifier = 0.1,
jcallahan@44 678 },
jcallahan@44 679 THRALLMARS_FAVOR = {
jcallahan@44 680 faction = FACTION_NAMES.THRALLMAR,
jcallahan@44 681 modifier = 0.25,
jcallahan@44 682 },
jcallahan@44 683 TROLLBANES_COMMAND = {
jcallahan@44 684 faction = FACTION_NAMES.HONOR_HOLD,
jcallahan@44 685 modifier = 0.1,
jcallahan@44 686 },
jcallahan@44 687 UNBURDENED = {
jcallahan@44 688 modifier = 0.1,
jcallahan@44 689 },
jcallahan@44 690 WOW_ANNIVERSARY = {
jcallahan@44 691 modifier = 0.08,
jcallahan@44 692 }
jcallahan@44 693 }
jcallahan@44 694
jcallahan@44 695
jcallahan@44 696 function WDP:COMBAT_TEXT_UPDATE(event, message_type, faction_name, amount)
jcallahan@65 697 if message_type ~= "FACTION" or not dead_npc_id then
jcallahan@44 698 return
jcallahan@44 699 end
jcallahan@44 700 UpdateFactionData()
jcallahan@44 701
jcallahan@46 702 if not faction_name or not faction_standings[faction_name] then
jcallahan@46 703 return
jcallahan@46 704 end
jcallahan@65 705 local npc = NPCEntry(dead_npc_id)
jcallahan@46 706
jcallahan@44 707 if not npc then
jcallahan@44 708 return
jcallahan@44 709 end
jcallahan@44 710 local modifier = 1
jcallahan@44 711
jcallahan@44 712 if _G.IsSpellKnown(DIPLOMACY_SPELL_ID) then
jcallahan@44 713 modifier = modifier + 0.1
jcallahan@44 714 end
jcallahan@44 715
jcallahan@44 716 if _G.IsSpellKnown(MR_POP_RANK2_SPELL_ID) then
jcallahan@44 717 modifier = modifier + 0.1
jcallahan@44 718 elseif _G.IsSpellKnown(MR_POP_RANK1_SPELL_ID) then
jcallahan@44 719 modifier = modifier + 0.05
jcallahan@44 720 end
jcallahan@44 721
jcallahan@44 722 for buff_name, buff_label in pairs(REP_BUFFS) do
jcallahan@44 723 if _G.UnitBuff("player", buff_name) then
jcallahan@44 724 local modded_faction = MODIFIERS[buff_label].faction
jcallahan@44 725
jcallahan@44 726 if not modded_faction or faction_name == modded_faction then
jcallahan@44 727 modifier = modifier + MODIFIERS[buff_label].modifier
jcallahan@44 728 end
jcallahan@44 729 end
jcallahan@44 730 end
jcallahan@65 731 npc.reputations = npc.reputations or {}
jcallahan@65 732 npc.reputations[("%s:%s"):format(faction_name, faction_standings[faction_name])] = math.floor(amount / modifier)
jcallahan@32 733 end
jcallahan@44 734 end -- do-block
jcallahan@18 735
jcallahan@18 736
jcallahan@42 737 function WDP:ITEM_TEXT_BEGIN()
jcallahan@42 738 local unit_type, unit_idnum = ParseGUID(_G.UnitGUID("npc"))
jcallahan@42 739
jcallahan@42 740 if not unit_idnum or unit_type ~= private.UNIT_TYPES.OBJECT or _G.UnitName("npc") ~= _G.ItemTextGetItem() then
jcallahan@42 741 return
jcallahan@42 742 end
jcallahan@42 743 UpdateDBEntryLocation("objects", unit_idnum)
jcallahan@42 744 end
jcallahan@42 745
jcallahan@42 746
jcallahan@13 747 do
jcallahan@40 748 local RE_GOLD = _G.GOLD_AMOUNT:gsub("%%d", "(%%d+)")
jcallahan@40 749 local RE_SILVER = _G.SILVER_AMOUNT:gsub("%%d", "(%%d+)")
jcallahan@40 750 local RE_COPPER = _G.COPPER_AMOUNT:gsub("%%d", "(%%d+)")
jcallahan@13 751
jcallahan@13 752
jcallahan@13 753 local function _moneyMatch(money, re)
jcallahan@13 754 return money:match(re) or 0
jcallahan@1 755 end
jcallahan@1 756
jcallahan@0 757
jcallahan@13 758 local function _toCopper(money)
jcallahan@13 759 if not money then
jcallahan@13 760 return 0
jcallahan@13 761 end
jcallahan@40 762 return _moneyMatch(money, RE_GOLD) * 10000 + _moneyMatch(money, RE_SILVER) * 100 + _moneyMatch(money, RE_COPPER)
jcallahan@1 763 end
jcallahan@1 764
jcallahan@1 765
jcallahan@13 766 local LOOT_VERIFY_FUNCS = {
jcallahan@16 767 [AF.ITEM] = function()
jcallahan@16 768 local locked_item_id
jcallahan@16 769
jcallahan@16 770 for bag_index = 0, _G.NUM_BAG_FRAMES do
jcallahan@16 771 for slot_index = 1, _G.GetContainerNumSlots(bag_index) do
jcallahan@16 772 local _, _, is_locked = _G.GetContainerItemInfo(bag_index, slot_index)
jcallahan@16 773
jcallahan@16 774 if is_locked then
jcallahan@16 775 locked_item_id = ItemLinkToID(_G.GetContainerItemLink(bag_index, slot_index))
jcallahan@16 776 end
jcallahan@16 777 end
jcallahan@16 778 end
jcallahan@16 779
jcallahan@28 780 if not locked_item_id or (action_data.identifier and action_data.identifier ~= locked_item_id) then
jcallahan@16 781 return false
jcallahan@16 782 end
jcallahan@28 783 action_data.identifier = locked_item_id
jcallahan@16 784 return true
jcallahan@16 785 end,
jcallahan@13 786 [AF.NPC] = function()
jcallahan@17 787 if not _G.UnitExists("target") or _G.UnitIsFriend("player", "target") or _G.UnitIsPlayer("target") or _G.UnitPlayerControlled("target") then
jcallahan@15 788 return false
jcallahan@13 789 end
jcallahan@34 790 local unit_type, id_num = ParseGUID(_G.UnitGUID("target"))
jcallahan@27 791 action_data.identifier = id_num
jcallahan@13 792 return true
jcallahan@13 793 end,
jcallahan@14 794 [AF.OBJECT] = true,
jcallahan@17 795 [AF.ZONE] = function()
jcallahan@38 796 return _G.IsFishingLoot()
jcallahan@17 797 end,
jcallahan@13 798 }
jcallahan@13 799
jcallahan@13 800
jcallahan@13 801 local LOOT_UPDATE_FUNCS = {
jcallahan@16 802 [AF.ITEM] = function()
jcallahan@28 803 GenericLootUpdate("items")
jcallahan@28 804 end,
jcallahan@28 805 [AF.NPC] = function()
jcallahan@29 806 local npc = NPCEntry(action_data.identifier)
jcallahan@28 807
jcallahan@28 808 if not npc then
jcallahan@28 809 return
jcallahan@28 810 end
jcallahan@29 811 local encounter_data = npc.encounter_data[InstanceDifficultyToken()]
jcallahan@25 812 local loot_type = action_data.label or "drops"
jcallahan@62 813 encounter_data.loot_counts = encounter_data.loot_counts or {}
jcallahan@62 814 encounter_data.loot_counts[loot_type] = (encounter_data.loot_counts[loot_type] or 0) + 1
jcallahan@29 815 encounter_data[loot_type] = encounter_data[loot_type] or {}
jcallahan@16 816
jcallahan@17 817 for index = 1, #action_data.loot_list do
jcallahan@29 818 table.insert(encounter_data[loot_type], action_data.loot_list[index])
jcallahan@16 819 end
jcallahan@16 820 end,
jcallahan@13 821 [AF.OBJECT] = function()
jcallahan@28 822 GenericLootUpdate("objects", InstanceDifficultyToken())
jcallahan@17 823 end,
jcallahan@17 824 [AF.ZONE] = function()
jcallahan@41 825 local location_token = ("%s:%s:%s"):format(action_data.map_level, action_data.x, action_data.y)
jcallahan@41 826
jcallahan@41 827 -- This will start life as a boolean true.
jcallahan@41 828 if _G.type(action_data.zone_data[location_token]) ~= "table" then
jcallahan@41 829 action_data.zone_data[location_token] = {
jcallahan@41 830 drops = {}
jcallahan@41 831 }
jcallahan@41 832 end
jcallahan@41 833 local loot_count = ("%s_count"):format(action_data.label or "drops")
jcallahan@41 834 action_data.zone_data[location_token][loot_count] = (action_data.zone_data[location_token][loot_count] or 0) + 1
jcallahan@41 835
jcallahan@41 836 for index = 1, #action_data.loot_list do
jcallahan@41 837 table.insert(action_data.zone_data[location_token].drops, action_data.loot_list[index])
jcallahan@41 838 end
jcallahan@13 839 end,
jcallahan@13 840 }
jcallahan@13 841
jcallahan@13 842
jcallahan@13 843 function WDP:LOOT_OPENED()
jcallahan@18 844 if action_data.looting then
jcallahan@18 845 return
jcallahan@18 846 end
jcallahan@18 847
jcallahan@13 848 if not action_data.type then
jcallahan@13 849 action_data.type = AF.NPC
jcallahan@1 850 end
jcallahan@13 851 local verify_func = LOOT_VERIFY_FUNCS[action_data.type]
jcallahan@13 852 local update_func = LOOT_UPDATE_FUNCS[action_data.type]
jcallahan@13 853
jcallahan@14 854 if not verify_func or not update_func then
jcallahan@13 855 return
jcallahan@13 856 end
jcallahan@13 857
jcallahan@14 858 if _G.type(verify_func) == "function" and not verify_func() then
jcallahan@14 859 return
jcallahan@14 860 end
jcallahan@13 861 local loot_registry = {}
jcallahan@17 862 action_data.loot_list = {}
jcallahan@18 863 action_data.looting = true
jcallahan@13 864
jcallahan@55 865 for loot_slot = 1, _G.GetNumLootItems() do
jcallahan@55 866 local icon_texture, item_text, quantity, quality, locked = _G.GetLootSlotInfo(loot_slot)
jcallahan@55 867 local slot_type = _G.GetLootSlotType(loot_slot)
jcallahan@13 868
jcallahan@55 869 if slot_type == _G.LOOT_SLOT_ITEM then
jcallahan@55 870 local item_id = ItemLinkToID(_G.GetLootSlotLink(loot_slot))
jcallahan@55 871 loot_registry[item_id] = (loot_registry[item_id]) or 0 + quantity
jcallahan@55 872 elseif slot_type == _G.LOOT_SLOT_MONEY then
jcallahan@55 873 table.insert(action_data.loot_list, ("money:%d"):format(_toCopper(item_text)))
jcallahan@55 874 elseif slot_type == _G.LOOT_SLOT_CURRENCY then
jcallahan@55 875 table.insert(action_data.loot_list, ("currency:%d:%s"):format(quantity, icon_texture:match("[^\\]+$"):lower()))
jcallahan@13 876 end
jcallahan@13 877 end
jcallahan@13 878
jcallahan@13 879 for item_id, quantity in pairs(loot_registry) do
jcallahan@17 880 table.insert(action_data.loot_list, ("%d:%d"):format(item_id, quantity))
jcallahan@13 881 end
jcallahan@13 882 update_func()
jcallahan@1 883 end
jcallahan@13 884 end -- do-block
jcallahan@0 885
jcallahan@0 886
jcallahan@44 887 do
jcallahan@44 888 local POINT_MATCH_PATTERNS = {
jcallahan@44 889 ("^%s$"):format(_G.ITEM_REQ_ARENA_RATING:gsub("%%d", "(%%d+)")), -- May no longer be necessary
jcallahan@44 890 ("^%s$"):format(_G.ITEM_REQ_ARENA_RATING_3V3:gsub("%%d", "(%%d+)")), -- May no longer be necessary
jcallahan@44 891 ("^%s$"):format(_G.ITEM_REQ_ARENA_RATING_5V5:gsub("%%d", "(%%d+)")), -- May no longer be necessary
jcallahan@44 892 ("^%s$"):format(_G.ITEM_REQ_ARENA_RATING_BG:gsub("%%d", "(%%d+)")),
jcallahan@44 893 ("^%s$"):format(_G.ITEM_REQ_ARENA_RATING_3V3_BG:gsub("%%d", "(%%d+)")),
jcallahan@44 894 }
jcallahan@5 895
jcallahan@44 896 function WDP:UpdateMerchantItems(event)
jcallahan@44 897 local unit_type, unit_idnum = ParseGUID(_G.UnitGUID("target"))
jcallahan@4 898
jcallahan@44 899 if unit_type ~= private.UNIT_TYPES.NPC or not unit_idnum then
jcallahan@44 900 return
jcallahan@44 901 end
jcallahan@55 902 local current_filters = _G.GetMerchantFilter()
jcallahan@44 903 local _, merchant_standing = UnitFactionStanding("target")
jcallahan@44 904 local merchant = NPCEntry(unit_idnum)
jcallahan@44 905 merchant.sells = merchant.sells or {}
jcallahan@5 906
jcallahan@57 907 _G.SetMerchantFilter(_G.LE_LOOT_FILTER_ALL)
jcallahan@57 908 _G.MerchantFrame_Update()
jcallahan@57 909
jcallahan@57 910 local num_items = _G.GetMerchantNumItems()
jcallahan@35 911
jcallahan@44 912 for item_index = 1, num_items do
jcallahan@44 913 local _, _, copper_price, stack_size, num_available, _, extended_cost = _G.GetMerchantItemInfo(item_index)
jcallahan@44 914 local item_id = ItemLinkToID(_G.GetMerchantItemLink(item_index))
jcallahan@5 915
jcallahan@44 916 if item_id and item_id > 0 then
jcallahan@44 917 local price_string = ActualCopperCost(copper_price, merchant_standing)
jcallahan@5 918
jcallahan@44 919 if extended_cost then
jcallahan@53 920 local battleground_rating = 0
jcallahan@53 921 local personal_rating = 0
jcallahan@53 922 local required_season_amount
jcallahan@5 923
jcallahan@44 924 DatamineTT:ClearLines()
jcallahan@44 925 DatamineTT:SetMerchantItem(item_index)
jcallahan@5 926
jcallahan@44 927 for line_index = 1, DatamineTT:NumLines() do
jcallahan@44 928 local current_line = _G["WDPDatamineTTTextLeft" .. line_index]
jcallahan@5 929
jcallahan@44 930 if not current_line then
jcallahan@44 931 break
jcallahan@44 932 end
jcallahan@53 933 local breakout
jcallahan@53 934 required_season_amount = current_line:GetText():match("Requires earning a total of (%d+)\n(.-) for the season.")
jcallahan@5 935
jcallahan@44 936 for match_index = 1, #POINT_MATCH_PATTERNS do
jcallahan@44 937 local match1, match2 = current_line:GetText():match(POINT_MATCH_PATTERNS[match_index])
jcallahan@53 938 personal_rating = personal_rating + (match1 or 0)
jcallahan@53 939 battleground_rating = battleground_rating + (match2 or 0)
jcallahan@5 940
jcallahan@44 941 if match1 or match2 then
jcallahan@44 942 break
jcallahan@44 943 end
jcallahan@44 944 end
jcallahan@5 945 end
jcallahan@44 946 local currency_list = {}
jcallahan@44 947 local item_count = _G.GetMerchantItemCostInfo(item_index)
jcallahan@50 948
jcallahan@50 949 -- Keeping this around in case Blizzard makes the two points diverge at some point.
jcallahan@53 950 -- price_string = ("%s:%s:%s:%s"):format(price_string, battleground_rating, personal_rating, required_season_amount or 0)
jcallahan@53 951 price_string = ("%s:%s:%s"):format(price_string, personal_rating, required_season_amount or 0)
jcallahan@5 952
jcallahan@44 953 for cost_index = 1, item_count do
jcallahan@44 954 local icon_texture, amount_required, currency_link = _G.GetMerchantItemCostItem(item_index, cost_index)
jcallahan@44 955 local currency_id = currency_link and ItemLinkToID(currency_link) or nil
jcallahan@44 956
jcallahan@44 957 if (not currency_id or currency_id < 1) and icon_texture then
jcallahan@44 958 currency_id = icon_texture:match("[^\\]+$"):lower()
jcallahan@44 959 end
jcallahan@44 960
jcallahan@44 961 if currency_id then
jcallahan@44 962 currency_list[#currency_list + 1] = ("(%s:%s)"):format(amount_required, currency_id)
jcallahan@44 963 end
jcallahan@44 964 end
jcallahan@44 965
jcallahan@44 966 for currency_index = 1, #currency_list do
jcallahan@44 967 price_string = ("%s:%s"):format(price_string, currency_list[currency_index])
jcallahan@5 968 end
jcallahan@5 969 end
jcallahan@61 970 merchant.sells[item_id] = ("%s:%s:[%s]"):format(num_available, stack_size, price_string)
jcallahan@44 971 end
jcallahan@44 972 end
jcallahan@5 973
jcallahan@44 974 if _G.CanMerchantRepair() then
jcallahan@44 975 merchant.can_repair = true
jcallahan@5 976 end
jcallahan@57 977 _G.SetMerchantFilter(current_filters)
jcallahan@57 978 _G.MerchantFrame_Update()
jcallahan@4 979 end
jcallahan@44 980 end -- do-block
jcallahan@4 981
jcallahan@25 982 function WDP:PET_BAR_UPDATE()
jcallahan@25 983 if not action_data.label or not action_data.label == "mind_control" then
jcallahan@25 984 return
jcallahan@25 985 end
jcallahan@34 986 local unit_type, unit_idnum = ParseGUID(_G.UnitGUID("pet"))
jcallahan@25 987
jcallahan@25 988 if unit_type ~= private.UNIT_TYPES.NPC or not unit_idnum then
jcallahan@25 989 return
jcallahan@25 990 end
jcallahan@29 991 NPCEntry(unit_idnum).mind_control = true
jcallahan@25 992 table.wipe(action_data)
jcallahan@25 993 end
jcallahan@25 994
jcallahan@25 995
jcallahan@18 996 do
jcallahan@18 997 local GENDER_NAMES = {
jcallahan@18 998 "UNKNOWN",
jcallahan@18 999 "MALE",
jcallahan@18 1000 "FEMALE",
jcallahan@18 1001 }
jcallahan@2 1002
jcallahan@2 1003
jcallahan@18 1004 local REACTION_NAMES = {
jcallahan@18 1005 "HATED",
jcallahan@18 1006 "HOSTILE",
jcallahan@18 1007 "UNFRIENDLY",
jcallahan@18 1008 "NEUTRAL",
jcallahan@18 1009 "FRIENDLY",
jcallahan@18 1010 "HONORED",
jcallahan@18 1011 "REVERED",
jcallahan@18 1012 "EXALTED",
jcallahan@18 1013 }
jcallahan@2 1014
jcallahan@2 1015
jcallahan@18 1016 local POWER_TYPE_NAMES = {
jcallahan@18 1017 ["0"] = "MANA",
jcallahan@18 1018 ["1"] = "RAGE",
jcallahan@18 1019 ["2"] = "FOCUS",
jcallahan@18 1020 ["3"] = "ENERGY",
jcallahan@18 1021 ["6"] = "RUNIC_POWER",
jcallahan@18 1022 }
jcallahan@2 1023
jcallahan@2 1024
jcallahan@18 1025 function WDP:PLAYER_TARGET_CHANGED()
jcallahan@40 1026 if not _G.UnitExists("target") or _G.UnitPlayerControlled("target") or currently_drunk then
jcallahan@18 1027 return
jcallahan@18 1028 end
jcallahan@34 1029 local unit_type, unit_idnum = ParseGUID(_G.UnitGUID("target"))
jcallahan@2 1030
jcallahan@18 1031 if unit_type ~= private.UNIT_TYPES.NPC or not unit_idnum then
jcallahan@18 1032 return
jcallahan@18 1033 end
jcallahan@29 1034 local npc = NPCEntry(unit_idnum)
jcallahan@18 1035 local _, class_token = _G.UnitClass("target")
jcallahan@18 1036 npc.class = class_token
jcallahan@39 1037 npc.faction = UnitFactionStanding("target")
jcallahan@26 1038 npc.genders = npc.genders or {}
jcallahan@26 1039 npc.genders[GENDER_NAMES[_G.UnitSex("target")] or "UNDEFINED"] = true
jcallahan@18 1040 npc.is_pvp = _G.UnitIsPVP("target") and true or nil
jcallahan@18 1041 npc.reaction = ("%s:%s:%s"):format(_G.UnitLevel("player"), _G.UnitFactionGroup("player"), REACTION_NAMES[_G.UnitReaction("player", "target")])
jcallahan@2 1042
jcallahan@30 1043 local encounter_data = npc.encounter_data[InstanceDifficultyToken()].stats
jcallahan@18 1044 local npc_level = ("level_%d"):format(_G.UnitLevel("target"))
jcallahan@3 1045
jcallahan@28 1046 if not encounter_data[npc_level] then
jcallahan@28 1047 encounter_data[npc_level] = {
jcallahan@18 1048 max_health = _G.UnitHealthMax("target"),
jcallahan@18 1049 }
jcallahan@3 1050
jcallahan@18 1051 local max_power = _G.UnitManaMax("target")
jcallahan@18 1052
jcallahan@18 1053 if max_power > 0 then
jcallahan@18 1054 local power_type = _G.UnitPowerType("target")
jcallahan@28 1055 encounter_data[npc_level].power = ("%s:%d"):format(POWER_TYPE_NAMES[_G.tostring(power_type)] or power_type, max_power)
jcallahan@18 1056 end
jcallahan@3 1057 end
jcallahan@21 1058 table.wipe(action_data)
jcallahan@21 1059 action_data.type = AF.NPC
jcallahan@27 1060 action_data.identifier = unit_idnum
jcallahan@21 1061 action_data.npc_level = npc_level
jcallahan@31 1062
jcallahan@31 1063 self:UpdateTargetLocation()
jcallahan@2 1064 end
jcallahan@18 1065 end -- do-block
jcallahan@2 1066
jcallahan@12 1067 do
jcallahan@12 1068 local function UpdateQuestJuncture(point)
jcallahan@12 1069 local unit_name = _G.UnitName("questnpc")
jcallahan@9 1070
jcallahan@12 1071 if not unit_name then
jcallahan@12 1072 return
jcallahan@12 1073 end
jcallahan@34 1074 local unit_type, unit_id = ParseGUID(_G.UnitGUID("questnpc"))
jcallahan@9 1075
jcallahan@12 1076 if unit_type == private.UNIT_TYPES.OBJECT then
jcallahan@38 1077 UpdateDBEntryLocation("objects", unit_id)
jcallahan@12 1078 end
jcallahan@19 1079 local quest = DBEntry("quests", _G.GetQuestID())
jcallahan@12 1080 quest[point] = quest[point] or {}
jcallahan@12 1081 quest[point][("%s:%d"):format(private.UNIT_TYPE_NAMES[unit_type + 1], unit_id)] = true
jcallahan@24 1082
jcallahan@24 1083 return quest
jcallahan@12 1084 end
jcallahan@10 1085
jcallahan@12 1086
jcallahan@12 1087 function WDP:QUEST_COMPLETE()
jcallahan@12 1088 UpdateQuestJuncture("end")
jcallahan@10 1089 end
jcallahan@10 1090
jcallahan@12 1091
jcallahan@12 1092 function WDP:QUEST_DETAIL()
jcallahan@24 1093 local quest = UpdateQuestJuncture("begin")
jcallahan@24 1094
jcallahan@46 1095 if not quest then
jcallahan@46 1096 return
jcallahan@46 1097 end
jcallahan@24 1098 quest.classes = quest.classes or {}
jcallahan@27 1099 quest.classes[PLAYER_CLASS] = true
jcallahan@24 1100
jcallahan@24 1101 local _, race = _G.UnitRace("player")
jcallahan@24 1102 quest.races = quest.races or {}
jcallahan@24 1103 quest.races[race] = true
jcallahan@10 1104 end
jcallahan@12 1105 end -- do-block
jcallahan@9 1106
jcallahan@9 1107
jcallahan@4 1108 function WDP:QUEST_LOG_UPDATE()
jcallahan@38 1109 local selected_quest = _G.GetQuestLogSelection() -- Save current selection to be restored when we're done.
jcallahan@36 1110 local entry_index, processed_quests = 1, 0
jcallahan@36 1111 local _, num_quests = _G.GetNumQuestLogEntries()
jcallahan@36 1112
jcallahan@36 1113 while processed_quests <= num_quests do
jcallahan@36 1114 local _, _, _, _, is_header, _, _, _, quest_id = _G.GetQuestLogTitle(entry_index)
jcallahan@36 1115
jcallahan@36 1116 if not is_header then
jcallahan@36 1117 _G.SelectQuestLogEntry(entry_index);
jcallahan@36 1118
jcallahan@36 1119 local quest = DBEntry("quests", quest_id)
jcallahan@36 1120 quest.timer = _G.GetQuestLogTimeLeft()
jcallahan@37 1121 quest.can_share = _G.GetQuestLogPushable() and true or nil
jcallahan@36 1122 processed_quests = processed_quests + 1
jcallahan@36 1123 end
jcallahan@36 1124 entry_index = entry_index + 1
jcallahan@36 1125 end
jcallahan@36 1126 _G.SelectQuestLogEntry(selected_quest)
jcallahan@4 1127 self:UnregisterEvent("QUEST_LOG_UPDATE")
jcallahan@4 1128 end
jcallahan@4 1129
jcallahan@4 1130
jcallahan@4 1131 function WDP:UNIT_QUEST_LOG_CHANGED(event, unit_id)
jcallahan@4 1132 if unit_id ~= "player" then
jcallahan@4 1133 return
jcallahan@4 1134 end
jcallahan@4 1135 self:RegisterEvent("QUEST_LOG_UPDATE")
jcallahan@4 1136 end
jcallahan@4 1137
jcallahan@4 1138
jcallahan@27 1139 function WDP:TRAINER_SHOW()
jcallahan@27 1140 if not _G.IsTradeskillTrainer() then
jcallahan@27 1141 return
jcallahan@27 1142 end
jcallahan@34 1143 local unit_type, unit_idnum = ParseGUID(_G.UnitGUID("target"))
jcallahan@29 1144 local npc = NPCEntry(unit_idnum)
jcallahan@58 1145
jcallahan@58 1146 if not npc then
jcallahan@58 1147 return
jcallahan@58 1148 end
jcallahan@27 1149 npc.teaches = npc.teaches or {}
jcallahan@27 1150
jcallahan@27 1151 -- Get the initial trainer filters
jcallahan@27 1152 local available = _G.GetTrainerServiceTypeFilter("available")
jcallahan@27 1153 local unavailable = _G.GetTrainerServiceTypeFilter("unavailable")
jcallahan@27 1154 local used = _G.GetTrainerServiceTypeFilter("used")
jcallahan@27 1155
jcallahan@27 1156 -- Clear the trainer filters
jcallahan@27 1157 _G.SetTrainerServiceTypeFilter("available", 1)
jcallahan@27 1158 _G.SetTrainerServiceTypeFilter("unavailable", 1)
jcallahan@27 1159 _G.SetTrainerServiceTypeFilter("used", 1)
jcallahan@27 1160
jcallahan@27 1161 for index = 1, _G.GetNumTrainerServices(), 1 do
jcallahan@27 1162 local spell_name, rank_name, _, _, required_level = _G.GetTrainerServiceInfo(index)
jcallahan@27 1163
jcallahan@27 1164 if spell_name then
jcallahan@27 1165 DatamineTT:ClearLines()
jcallahan@27 1166 DatamineTT:SetTrainerService(index)
jcallahan@27 1167
jcallahan@27 1168 local _, _, spell_id = DatamineTT:GetSpell()
jcallahan@27 1169
jcallahan@43 1170 if spell_id then
jcallahan@43 1171 local profession, min_skill = _G.GetTrainerServiceSkillReq(index)
jcallahan@43 1172 profession = profession or "General"
jcallahan@43 1173
jcallahan@43 1174 local class_professions = npc.teaches[PLAYER_CLASS]
jcallahan@43 1175 if not class_professions then
jcallahan@43 1176 npc.teaches[PLAYER_CLASS] = {}
jcallahan@43 1177 class_professions = npc.teaches[PLAYER_CLASS]
jcallahan@43 1178 end
jcallahan@43 1179
jcallahan@43 1180 local profession_skills = class_professions[profession]
jcallahan@43 1181 if not profession_skills then
jcallahan@43 1182 class_professions[profession] = {}
jcallahan@43 1183 profession_skills = class_professions[profession]
jcallahan@43 1184 end
jcallahan@43 1185 profession_skills[spell_id] = ("%d:%d"):format(required_level, min_skill)
jcallahan@27 1186 end
jcallahan@27 1187 end
jcallahan@27 1188 end
jcallahan@27 1189
jcallahan@27 1190 -- Reset the filters to what they were before
jcallahan@27 1191 _G.SetTrainerServiceTypeFilter("available", available or 0)
jcallahan@27 1192 _G.SetTrainerServiceTypeFilter("unavailable", unavailable or 0)
jcallahan@27 1193 _G.SetTrainerServiceTypeFilter("used", used or 0)
jcallahan@27 1194 end
jcallahan@27 1195
jcallahan@27 1196
jcallahan@1 1197 function WDP:UNIT_SPELLCAST_SENT(event_name, unit_id, spell_name, spell_rank, target_name, spell_line)
jcallahan@1 1198 if private.tracked_line or unit_id ~= "player" then
jcallahan@1 1199 return
jcallahan@1 1200 end
jcallahan@1 1201 local spell_label = private.SPELL_LABELS_BY_NAME[spell_name]
jcallahan@1 1202
jcallahan@1 1203 if not spell_label then
jcallahan@1 1204 return
jcallahan@1 1205 end
jcallahan@18 1206 table.wipe(action_data)
jcallahan@1 1207
jcallahan@1 1208 local tt_item_name, tt_item_link = _G.GameTooltip:GetItem()
jcallahan@1 1209 local tt_unit_name, tt_unit_id = _G.GameTooltip:GetUnit()
jcallahan@1 1210
jcallahan@1 1211 if not tt_unit_name and _G.UnitName("target") == target_name then
jcallahan@1 1212 tt_unit_name = target_name
jcallahan@1 1213 tt_unit_id = "target"
jcallahan@1 1214 end
jcallahan@1 1215 local spell_flags = private.SPELL_FLAGS_BY_LABEL[spell_label]
jcallahan@28 1216 local zone_name, area_id, x, y, map_level, instance_token = CurrentLocationData()
jcallahan@28 1217
jcallahan@28 1218 action_data.instance_token = instance_token
jcallahan@28 1219 action_data.map_level = map_level
jcallahan@28 1220 action_data.x = x
jcallahan@28 1221 action_data.y = y
jcallahan@28 1222 action_data.zone = ("%s:%d"):format(zone_name, area_id)
jcallahan@1 1223
jcallahan@16 1224 if tt_unit_name and not tt_item_name then
jcallahan@16 1225 if bit.band(spell_flags, AF.NPC) == AF.NPC then
jcallahan@16 1226 if not tt_unit_id or tt_unit_name ~= target_name then
jcallahan@16 1227 return
jcallahan@16 1228 end
jcallahan@16 1229 action_data.type = AF.NPC
jcallahan@25 1230 action_data.label = spell_label:lower()
jcallahan@25 1231 action_data.unit_name = tt_unit_name
jcallahan@16 1232 end
jcallahan@16 1233 elseif bit.band(spell_flags, AF.ITEM) == AF.ITEM then
jcallahan@16 1234 action_data.type = AF.ITEM
jcallahan@25 1235 action_data.label = spell_label:lower()
jcallahan@16 1236
jcallahan@16 1237 if tt_item_name and tt_item_name == target_name then
jcallahan@28 1238 action_data.identifier = ItemLinkToID(tt_item_link)
jcallahan@16 1239 elseif target_name and target_name ~= "" then
jcallahan@16 1240 local _, target_item_link = _G.GetItemInfo(target_name)
jcallahan@28 1241 action_data.identifier = ItemLinkToID(target_item_link)
jcallahan@16 1242 end
jcallahan@16 1243 elseif not tt_item_name and not tt_unit_name then
jcallahan@17 1244 action_data.name = target_name
jcallahan@17 1245
jcallahan@1 1246 if bit.band(spell_flags, AF.OBJECT) == AF.OBJECT then
jcallahan@17 1247 if target_name == "" then
jcallahan@17 1248 return
jcallahan@17 1249 end
jcallahan@11 1250 local identifier = ("%s:%s"):format(spell_label, target_name)
jcallahan@38 1251 UpdateDBEntryLocation("objects", identifier)
jcallahan@11 1252
jcallahan@1 1253 action_data.type = AF.OBJECT
jcallahan@11 1254 action_data.identifier = identifier
jcallahan@1 1255 elseif bit.band(spell_flags, AF.ZONE) == AF.ZONE then
jcallahan@38 1256 local identifier = ("%s:%s"):format(spell_label, _G["GameTooltipTextLeft1"]:GetText() or "NONE") -- Possible fishing pool name.
jcallahan@52 1257 action_data.zone_data = UpdateDBEntryLocation("zones", identifier)
jcallahan@17 1258 action_data.type = AF.ZONE
jcallahan@38 1259 action_data.identifier = identifier
jcallahan@48 1260 action_data.spell_label = spell_label
jcallahan@1 1261 end
jcallahan@1 1262 end
jcallahan@1 1263 private.tracked_line = spell_line
jcallahan@0 1264 end
jcallahan@0 1265
jcallahan@0 1266
jcallahan@1 1267 function WDP:UNIT_SPELLCAST_SUCCEEDED(event_name, unit_id, spell_name, spell_rank, spell_line, spell_id)
jcallahan@1 1268 if unit_id ~= "player" then
jcallahan@1 1269 return
jcallahan@1 1270 end
jcallahan@1 1271 private.tracked_line = nil
jcallahan@0 1272 end
jcallahan@0 1273
jcallahan@1 1274 function WDP:HandleSpellFailure(event_name, unit_id, spell_name, spell_rank, spell_line, spell_id)
jcallahan@1 1275 if unit_id ~= "player" then
jcallahan@1 1276 return
jcallahan@1 1277 end
jcallahan@0 1278
jcallahan@1 1279 if private.tracked_line == spell_line then
jcallahan@1 1280 private.tracked_line = nil
jcallahan@1 1281 end
jcallahan@0 1282 end