Mercurial > wow > wowdb-profiler

annotate Main.lua @ 62:fbf535466ae6

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