Mercurial > wow > wowdb-profiler

annotate Main.lua @ 64:2421a4d39909

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Trim whitespace from faction names gleaned from tooltips so the rar occasion where this happens doesn't make the faction name not record.
author James D. Callahan III <jcallahan@curse.com>
date Thu, 26 Jul 2012 13:13:08 -0500
parents d98daa5373aa
children 3f7a12a9163c
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@23 585
jcallahan@23 586 local function RecordNPCSpell(sub_event, source_guid, source_name, source_flags, dest_guid, dest_name, dest_flags, spell_id, spell_name)
jcallahan@23 587 if not spell_id then
jcallahan@23 588 return
jcallahan@23 589 end
jcallahan@34 590 local source_type, source_id = ParseGUID(source_guid)
jcallahan@23 591
jcallahan@23 592 if not source_id or source_type ~= private.UNIT_TYPES.NPC then
jcallahan@23 593 return
jcallahan@23 594 end
jcallahan@23 595
jcallahan@23 596 if bit.band(FLAGS_NPC_CONTROL, source_flags) == FLAGS_NPC_CONTROL and bit.band(FLAGS_NPC, source_flags) ~= 0 then
jcallahan@29 597 local encounter_data = NPCEntry(source_id).encounter_data[InstanceDifficultyToken()]
jcallahan@28 598 encounter_data.spells = encounter_data.spells or {}
jcallahan@28 599 encounter_data.spells[spell_id] = (encounter_data.spells[spell_id] or 0) + 1
jcallahan@23 600 end
jcallahan@23 601 end
jcallahan@23 602
jcallahan@23 603 local COMBAT_LOG_FUNCS = {
jcallahan@23 604 SPELL_AURA_APPLIED = RecordNPCSpell,
jcallahan@23 605 SPELL_CAST_START = RecordNPCSpell,
jcallahan@48 606 SPELL_CAST_SUCCESS = RecordNPCSpell,
jcallahan@23 607 }
jcallahan@23 608
jcallahan@23 609
jcallahan@23 610 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 611 local combat_log_func = COMBAT_LOG_FUNCS[sub_event]
jcallahan@23 612
jcallahan@23 613 if not combat_log_func then
jcallahan@23 614 return
jcallahan@23 615 end
jcallahan@23 616 combat_log_func(sub_event, source_guid, source_name, source_flags, dest_guid, dest_name, dest_flags, ...)
jcallahan@23 617 end
jcallahan@23 618 end -- do-block
jcallahan@23 619
jcallahan@23 620
jcallahan@44 621 do
jcallahan@44 622 local DIPLOMACY_SPELL_ID = 20599
jcallahan@44 623 local MR_POP_RANK1_SPELL_ID = 78634
jcallahan@44 624 local MR_POP_RANK2_SPELL_ID = 78635
jcallahan@44 625
jcallahan@44 626 local REP_BUFFS = {
jcallahan@44 627 [_G.GetSpellInfo(30754)] = "CENARION_FAVOR",
jcallahan@44 628 [_G.GetSpellInfo(24705)] = "GRIM_VISAGE",
jcallahan@44 629 [_G.GetSpellInfo(32098)] = "HONOR_HOLD_FAVOR",
jcallahan@44 630 [_G.GetSpellInfo(39913)] = "NAZGRELS_FERVOR",
jcallahan@44 631 [_G.GetSpellInfo(39953)] = "SONG_OF_BATTLE",
jcallahan@44 632 [_G.GetSpellInfo(61849)] = "SPIRIT_OF_SHARING",
jcallahan@44 633 [_G.GetSpellInfo(32096)] = "THRALLMARS_FAVOR",
jcallahan@44 634 [_G.GetSpellInfo(39911)] = "TROLLBANES_COMMAND",
jcallahan@44 635 [_G.GetSpellInfo(95987)] = "UNBURDENED",
jcallahan@44 636 [_G.GetSpellInfo(100951)] = "WOW_ANNIVERSARY",
jcallahan@44 637 }
jcallahan@44 638
jcallahan@44 639
jcallahan@44 640 local FACTION_NAMES = {
jcallahan@44 641 CENARION_CIRCLE = _G.GetFactionInfoByID(609),
jcallahan@44 642 HONOR_HOLD = _G.GetFactionInfoByID(946),
jcallahan@44 643 THE_SHATAR = _G.GetFactionInfoByID(935),
jcallahan@44 644 THRALLMAR = _G.GetFactionInfoByID(947),
jcallahan@44 645 }
jcallahan@44 646
jcallahan@44 647
jcallahan@44 648 local MODIFIERS = {
jcallahan@44 649 CENARION_FAVOR = {
jcallahan@44 650 faction = FACTION_NAMES.CENARION_CIRCLE,
jcallahan@44 651 modifier = 0.25,
jcallahan@44 652 },
jcallahan@44 653 GRIM_VISAGE = {
jcallahan@44 654 modifier = 0.1,
jcallahan@44 655 },
jcallahan@44 656 HONOR_HOLD_FAVOR = {
jcallahan@44 657 faction = FACTION_NAMES.HONOR_HOLD,
jcallahan@44 658 modifier = 0.25,
jcallahan@44 659 },
jcallahan@44 660 NAZGRELS_FERVOR = {
jcallahan@44 661 faction = FACTION_NAMES.THRALLMAR,
jcallahan@44 662 modifier = 0.1,
jcallahan@44 663 },
jcallahan@44 664 SONG_OF_BATTLE = {
jcallahan@44 665 faction = FACTION_NAMES.THE_SHATAR,
jcallahan@44 666 modifier = 0.1,
jcallahan@44 667 },
jcallahan@44 668 SPIRIT_OF_SHARING = {
jcallahan@44 669 modifier = 0.1,
jcallahan@44 670 },
jcallahan@44 671 THRALLMARS_FAVOR = {
jcallahan@44 672 faction = FACTION_NAMES.THRALLMAR,
jcallahan@44 673 modifier = 0.25,
jcallahan@44 674 },
jcallahan@44 675 TROLLBANES_COMMAND = {
jcallahan@44 676 faction = FACTION_NAMES.HONOR_HOLD,
jcallahan@44 677 modifier = 0.1,
jcallahan@44 678 },
jcallahan@44 679 UNBURDENED = {
jcallahan@44 680 modifier = 0.1,
jcallahan@44 681 },
jcallahan@44 682 WOW_ANNIVERSARY = {
jcallahan@44 683 modifier = 0.08,
jcallahan@44 684 }
jcallahan@44 685 }
jcallahan@44 686
jcallahan@44 687
jcallahan@44 688 function WDP:COMBAT_TEXT_UPDATE(event, message_type, faction_name, amount)
jcallahan@60 689 if message_type ~= "FACTION" or not action_data.npc_level then
jcallahan@44 690 return
jcallahan@44 691 end
jcallahan@44 692 UpdateFactionData()
jcallahan@44 693
jcallahan@46 694 if not faction_name or not faction_standings[faction_name] then
jcallahan@46 695 return
jcallahan@46 696 end
jcallahan@44 697 local npc = NPCEntry(action_data.identifier)
jcallahan@46 698
jcallahan@44 699 if not npc then
jcallahan@44 700 return
jcallahan@44 701 end
jcallahan@63 702 local npc_stats = npc.encounter_data[InstanceDifficultyToken()].stats
jcallahan@63 703
jcallahan@63 704 if not npc_stats[action_data.npc_level] then
jcallahan@63 705 npc_stats[action_data.npc_level] = {}
jcallahan@63 706 end
jcallahan@63 707 local reputation_data = npc_stats[action_data.npc_level].reputations
jcallahan@44 708
jcallahan@44 709 if not reputation_data then
jcallahan@44 710 reputation_data = {}
jcallahan@63 711 npc_stats[action_data.npc_level].reputations = reputation_data
jcallahan@44 712 end
jcallahan@44 713 local modifier = 1
jcallahan@44 714
jcallahan@44 715 if _G.IsSpellKnown(DIPLOMACY_SPELL_ID) then
jcallahan@44 716 modifier = modifier + 0.1
jcallahan@44 717 end
jcallahan@44 718
jcallahan@44 719 if _G.IsSpellKnown(MR_POP_RANK2_SPELL_ID) then
jcallahan@44 720 modifier = modifier + 0.1
jcallahan@44 721 elseif _G.IsSpellKnown(MR_POP_RANK1_SPELL_ID) then
jcallahan@44 722 modifier = modifier + 0.05
jcallahan@44 723 end
jcallahan@44 724
jcallahan@44 725 for buff_name, buff_label in pairs(REP_BUFFS) do
jcallahan@44 726 if _G.UnitBuff("player", buff_name) then
jcallahan@44 727 local modded_faction = MODIFIERS[buff_label].faction
jcallahan@44 728
jcallahan@44 729 if not modded_faction or faction_name == modded_faction then
jcallahan@44 730 modifier = modifier + MODIFIERS[buff_label].modifier
jcallahan@44 731 end
jcallahan@44 732 end
jcallahan@44 733 end
jcallahan@44 734 reputation_data[("%s:%s"):format(faction_name, faction_standings[faction_name])] = math.floor(amount / modifier)
jcallahan@32 735 end
jcallahan@44 736 end -- do-block
jcallahan@18 737
jcallahan@18 738
jcallahan@42 739 function WDP:ITEM_TEXT_BEGIN()
jcallahan@42 740 local unit_type, unit_idnum = ParseGUID(_G.UnitGUID("npc"))
jcallahan@42 741
jcallahan@42 742 if not unit_idnum or unit_type ~= private.UNIT_TYPES.OBJECT or _G.UnitName("npc") ~= _G.ItemTextGetItem() then
jcallahan@42 743 return
jcallahan@42 744 end
jcallahan@42 745 UpdateDBEntryLocation("objects", unit_idnum)
jcallahan@42 746 end
jcallahan@42 747
jcallahan@42 748
jcallahan@13 749 do
jcallahan@40 750 local RE_GOLD = _G.GOLD_AMOUNT:gsub("%%d", "(%%d+)")
jcallahan@40 751 local RE_SILVER = _G.SILVER_AMOUNT:gsub("%%d", "(%%d+)")
jcallahan@40 752 local RE_COPPER = _G.COPPER_AMOUNT:gsub("%%d", "(%%d+)")
jcallahan@13 753
jcallahan@13 754
jcallahan@13 755 local function _moneyMatch(money, re)
jcallahan@13 756 return money:match(re) or 0
jcallahan@1 757 end
jcallahan@1 758
jcallahan@0 759
jcallahan@13 760 local function _toCopper(money)
jcallahan@13 761 if not money then
jcallahan@13 762 return 0
jcallahan@13 763 end
jcallahan@40 764 return _moneyMatch(money, RE_GOLD) * 10000 + _moneyMatch(money, RE_SILVER) * 100 + _moneyMatch(money, RE_COPPER)
jcallahan@1 765 end
jcallahan@1 766
jcallahan@1 767
jcallahan@13 768 local LOOT_VERIFY_FUNCS = {
jcallahan@16 769 [AF.ITEM] = function()
jcallahan@16 770 local locked_item_id
jcallahan@16 771
jcallahan@16 772 for bag_index = 0, _G.NUM_BAG_FRAMES do
jcallahan@16 773 for slot_index = 1, _G.GetContainerNumSlots(bag_index) do
jcallahan@16 774 local _, _, is_locked = _G.GetContainerItemInfo(bag_index, slot_index)
jcallahan@16 775
jcallahan@16 776 if is_locked then
jcallahan@16 777 locked_item_id = ItemLinkToID(_G.GetContainerItemLink(bag_index, slot_index))
jcallahan@16 778 end
jcallahan@16 779 end
jcallahan@16 780 end
jcallahan@16 781
jcallahan@28 782 if not locked_item_id or (action_data.identifier and action_data.identifier ~= locked_item_id) then
jcallahan@16 783 return false
jcallahan@16 784 end
jcallahan@28 785 action_data.identifier = locked_item_id
jcallahan@16 786 return true
jcallahan@16 787 end,
jcallahan@13 788 [AF.NPC] = function()
jcallahan@17 789 if not _G.UnitExists("target") or _G.UnitIsFriend("player", "target") or _G.UnitIsPlayer("target") or _G.UnitPlayerControlled("target") then
jcallahan@15 790 return false
jcallahan@13 791 end
jcallahan@34 792 local unit_type, id_num = ParseGUID(_G.UnitGUID("target"))
jcallahan@27 793 action_data.identifier = id_num
jcallahan@13 794 return true
jcallahan@13 795 end,
jcallahan@14 796 [AF.OBJECT] = true,
jcallahan@17 797 [AF.ZONE] = function()
jcallahan@38 798 return _G.IsFishingLoot()
jcallahan@17 799 end,
jcallahan@13 800 }
jcallahan@13 801
jcallahan@13 802
jcallahan@13 803 local LOOT_UPDATE_FUNCS = {
jcallahan@16 804 [AF.ITEM] = function()
jcallahan@28 805 GenericLootUpdate("items")
jcallahan@28 806 end,
jcallahan@28 807 [AF.NPC] = function()
jcallahan@29 808 local npc = NPCEntry(action_data.identifier)
jcallahan@28 809
jcallahan@28 810 if not npc then
jcallahan@28 811 return
jcallahan@28 812 end
jcallahan@29 813 local encounter_data = npc.encounter_data[InstanceDifficultyToken()]
jcallahan@25 814 local loot_type = action_data.label or "drops"
jcallahan@62 815 encounter_data.loot_counts = encounter_data.loot_counts or {}
jcallahan@62 816 encounter_data.loot_counts[loot_type] = (encounter_data.loot_counts[loot_type] or 0) + 1
jcallahan@29 817 encounter_data[loot_type] = encounter_data[loot_type] or {}
jcallahan@16 818
jcallahan@17 819 for index = 1, #action_data.loot_list do
jcallahan@29 820 table.insert(encounter_data[loot_type], action_data.loot_list[index])
jcallahan@16 821 end
jcallahan@16 822 end,
jcallahan@13 823 [AF.OBJECT] = function()
jcallahan@28 824 GenericLootUpdate("objects", InstanceDifficultyToken())
jcallahan@17 825 end,
jcallahan@17 826 [AF.ZONE] = function()
jcallahan@41 827 local location_token = ("%s:%s:%s"):format(action_data.map_level, action_data.x, action_data.y)
jcallahan@41 828
jcallahan@41 829 -- This will start life as a boolean true.
jcallahan@41 830 if _G.type(action_data.zone_data[location_token]) ~= "table" then
jcallahan@41 831 action_data.zone_data[location_token] = {
jcallahan@41 832 drops = {}
jcallahan@41 833 }
jcallahan@41 834 end
jcallahan@41 835 local loot_count = ("%s_count"):format(action_data.label or "drops")
jcallahan@41 836 action_data.zone_data[location_token][loot_count] = (action_data.zone_data[location_token][loot_count] or 0) + 1
jcallahan@41 837
jcallahan@41 838 for index = 1, #action_data.loot_list do
jcallahan@41 839 table.insert(action_data.zone_data[location_token].drops, action_data.loot_list[index])
jcallahan@41 840 end
jcallahan@13 841 end,
jcallahan@13 842 }
jcallahan@13 843
jcallahan@13 844
jcallahan@13 845 function WDP:LOOT_OPENED()
jcallahan@18 846 if action_data.looting then
jcallahan@18 847 return
jcallahan@18 848 end
jcallahan@18 849
jcallahan@13 850 if not action_data.type then
jcallahan@13 851 action_data.type = AF.NPC
jcallahan@1 852 end
jcallahan@13 853 local verify_func = LOOT_VERIFY_FUNCS[action_data.type]
jcallahan@13 854 local update_func = LOOT_UPDATE_FUNCS[action_data.type]
jcallahan@13 855
jcallahan@14 856 if not verify_func or not update_func then
jcallahan@13 857 return
jcallahan@13 858 end
jcallahan@13 859
jcallahan@14 860 if _G.type(verify_func) == "function" and not verify_func() then
jcallahan@14 861 return
jcallahan@14 862 end
jcallahan@13 863 local loot_registry = {}
jcallahan@17 864 action_data.loot_list = {}
jcallahan@18 865 action_data.looting = true
jcallahan@13 866
jcallahan@55 867 for loot_slot = 1, _G.GetNumLootItems() do
jcallahan@55 868 local icon_texture, item_text, quantity, quality, locked = _G.GetLootSlotInfo(loot_slot)
jcallahan@55 869 local slot_type = _G.GetLootSlotType(loot_slot)
jcallahan@13 870
jcallahan@55 871 if slot_type == _G.LOOT_SLOT_ITEM then
jcallahan@55 872 local item_id = ItemLinkToID(_G.GetLootSlotLink(loot_slot))
jcallahan@55 873 loot_registry[item_id] = (loot_registry[item_id]) or 0 + quantity
jcallahan@55 874 elseif slot_type == _G.LOOT_SLOT_MONEY then
jcallahan@55 875 table.insert(action_data.loot_list, ("money:%d"):format(_toCopper(item_text)))
jcallahan@55 876 elseif slot_type == _G.LOOT_SLOT_CURRENCY then
jcallahan@55 877 table.insert(action_data.loot_list, ("currency:%d:%s"):format(quantity, icon_texture:match("[^\\]+$"):lower()))
jcallahan@13 878 end
jcallahan@13 879 end
jcallahan@13 880
jcallahan@13 881 for item_id, quantity in pairs(loot_registry) do
jcallahan@17 882 table.insert(action_data.loot_list, ("%d:%d"):format(item_id, quantity))
jcallahan@13 883 end
jcallahan@13 884 update_func()
jcallahan@1 885 end
jcallahan@13 886 end -- do-block
jcallahan@0 887
jcallahan@0 888
jcallahan@44 889 do
jcallahan@44 890 local POINT_MATCH_PATTERNS = {
jcallahan@44 891 ("^%s$"):format(_G.ITEM_REQ_ARENA_RATING:gsub("%%d", "(%%d+)")), -- May no longer be necessary
jcallahan@44 892 ("^%s$"):format(_G.ITEM_REQ_ARENA_RATING_3V3:gsub("%%d", "(%%d+)")), -- May no longer be necessary
jcallahan@44 893 ("^%s$"):format(_G.ITEM_REQ_ARENA_RATING_5V5:gsub("%%d", "(%%d+)")), -- May no longer be necessary
jcallahan@44 894 ("^%s$"):format(_G.ITEM_REQ_ARENA_RATING_BG:gsub("%%d", "(%%d+)")),
jcallahan@44 895 ("^%s$"):format(_G.ITEM_REQ_ARENA_RATING_3V3_BG:gsub("%%d", "(%%d+)")),
jcallahan@44 896 }
jcallahan@5 897
jcallahan@44 898 function WDP:UpdateMerchantItems(event)
jcallahan@44 899 local unit_type, unit_idnum = ParseGUID(_G.UnitGUID("target"))
jcallahan@4 900
jcallahan@44 901 if unit_type ~= private.UNIT_TYPES.NPC or not unit_idnum then
jcallahan@44 902 return
jcallahan@44 903 end
jcallahan@55 904 local current_filters = _G.GetMerchantFilter()
jcallahan@44 905 local _, merchant_standing = UnitFactionStanding("target")
jcallahan@44 906 local merchant = NPCEntry(unit_idnum)
jcallahan@44 907 merchant.sells = merchant.sells or {}
jcallahan@5 908
jcallahan@57 909 _G.SetMerchantFilter(_G.LE_LOOT_FILTER_ALL)
jcallahan@57 910 _G.MerchantFrame_Update()
jcallahan@57 911
jcallahan@57 912 local num_items = _G.GetMerchantNumItems()
jcallahan@35 913
jcallahan@44 914 for item_index = 1, num_items do
jcallahan@44 915 local _, _, copper_price, stack_size, num_available, _, extended_cost = _G.GetMerchantItemInfo(item_index)
jcallahan@44 916 local item_id = ItemLinkToID(_G.GetMerchantItemLink(item_index))
jcallahan@5 917
jcallahan@44 918 if item_id and item_id > 0 then
jcallahan@44 919 local price_string = ActualCopperCost(copper_price, merchant_standing)
jcallahan@5 920
jcallahan@44 921 if extended_cost then
jcallahan@53 922 local battleground_rating = 0
jcallahan@53 923 local personal_rating = 0
jcallahan@53 924 local required_season_amount
jcallahan@5 925
jcallahan@44 926 DatamineTT:ClearLines()
jcallahan@44 927 DatamineTT:SetMerchantItem(item_index)
jcallahan@5 928
jcallahan@44 929 for line_index = 1, DatamineTT:NumLines() do
jcallahan@44 930 local current_line = _G["WDPDatamineTTTextLeft" .. line_index]
jcallahan@5 931
jcallahan@44 932 if not current_line then
jcallahan@44 933 break
jcallahan@44 934 end
jcallahan@53 935 local breakout
jcallahan@53 936 required_season_amount = current_line:GetText():match("Requires earning a total of (%d+)\n(.-) for the season.")
jcallahan@5 937
jcallahan@44 938 for match_index = 1, #POINT_MATCH_PATTERNS do
jcallahan@44 939 local match1, match2 = current_line:GetText():match(POINT_MATCH_PATTERNS[match_index])
jcallahan@53 940 personal_rating = personal_rating + (match1 or 0)
jcallahan@53 941 battleground_rating = battleground_rating + (match2 or 0)
jcallahan@5 942
jcallahan@44 943 if match1 or match2 then
jcallahan@44 944 break
jcallahan@44 945 end
jcallahan@44 946 end
jcallahan@5 947 end
jcallahan@44 948 local currency_list = {}
jcallahan@44 949 local item_count = _G.GetMerchantItemCostInfo(item_index)
jcallahan@50 950
jcallahan@50 951 -- Keeping this around in case Blizzard makes the two points diverge at some point.
jcallahan@53 952 -- price_string = ("%s:%s:%s:%s"):format(price_string, battleground_rating, personal_rating, required_season_amount or 0)
jcallahan@53 953 price_string = ("%s:%s:%s"):format(price_string, personal_rating, required_season_amount or 0)
jcallahan@5 954
jcallahan@44 955 for cost_index = 1, item_count do
jcallahan@44 956 local icon_texture, amount_required, currency_link = _G.GetMerchantItemCostItem(item_index, cost_index)
jcallahan@44 957 local currency_id = currency_link and ItemLinkToID(currency_link) or nil
jcallahan@44 958
jcallahan@44 959 if (not currency_id or currency_id < 1) and icon_texture then
jcallahan@44 960 currency_id = icon_texture:match("[^\\]+$"):lower()
jcallahan@44 961 end
jcallahan@44 962
jcallahan@44 963 if currency_id then
jcallahan@44 964 currency_list[#currency_list + 1] = ("(%s:%s)"):format(amount_required, currency_id)
jcallahan@44 965 end
jcallahan@44 966 end
jcallahan@44 967
jcallahan@44 968 for currency_index = 1, #currency_list do
jcallahan@44 969 price_string = ("%s:%s"):format(price_string, currency_list[currency_index])
jcallahan@5 970 end
jcallahan@5 971 end
jcallahan@61 972 merchant.sells[item_id] = ("%s:%s:[%s]"):format(num_available, stack_size, price_string)
jcallahan@44 973 end
jcallahan@44 974 end
jcallahan@5 975
jcallahan@44 976 if _G.CanMerchantRepair() then
jcallahan@44 977 merchant.can_repair = true
jcallahan@5 978 end
jcallahan@57 979 _G.SetMerchantFilter(current_filters)
jcallahan@57 980 _G.MerchantFrame_Update()
jcallahan@4 981 end
jcallahan@44 982 end -- do-block
jcallahan@4 983
jcallahan@25 984 function WDP:PET_BAR_UPDATE()
jcallahan@25 985 if not action_data.label or not action_data.label == "mind_control" then
jcallahan@25 986 return
jcallahan@25 987 end
jcallahan@34 988 local unit_type, unit_idnum = ParseGUID(_G.UnitGUID("pet"))
jcallahan@25 989
jcallahan@25 990 if unit_type ~= private.UNIT_TYPES.NPC or not unit_idnum then
jcallahan@25 991 return
jcallahan@25 992 end
jcallahan@29 993 NPCEntry(unit_idnum).mind_control = true
jcallahan@25 994 table.wipe(action_data)
jcallahan@25 995 end
jcallahan@25 996
jcallahan@25 997
jcallahan@18 998 do
jcallahan@18 999 local GENDER_NAMES = {
jcallahan@18 1000 "UNKNOWN",
jcallahan@18 1001 "MALE",
jcallahan@18 1002 "FEMALE",
jcallahan@18 1003 }
jcallahan@2 1004
jcallahan@2 1005
jcallahan@18 1006 local REACTION_NAMES = {
jcallahan@18 1007 "HATED",
jcallahan@18 1008 "HOSTILE",
jcallahan@18 1009 "UNFRIENDLY",
jcallahan@18 1010 "NEUTRAL",
jcallahan@18 1011 "FRIENDLY",
jcallahan@18 1012 "HONORED",
jcallahan@18 1013 "REVERED",
jcallahan@18 1014 "EXALTED",
jcallahan@18 1015 }
jcallahan@2 1016
jcallahan@2 1017
jcallahan@18 1018 local POWER_TYPE_NAMES = {
jcallahan@18 1019 ["0"] = "MANA",
jcallahan@18 1020 ["1"] = "RAGE",
jcallahan@18 1021 ["2"] = "FOCUS",
jcallahan@18 1022 ["3"] = "ENERGY",
jcallahan@18 1023 ["6"] = "RUNIC_POWER",
jcallahan@18 1024 }
jcallahan@2 1025
jcallahan@2 1026
jcallahan@18 1027 function WDP:PLAYER_TARGET_CHANGED()
jcallahan@40 1028 if not _G.UnitExists("target") or _G.UnitPlayerControlled("target") or currently_drunk then
jcallahan@18 1029 return
jcallahan@18 1030 end
jcallahan@34 1031 local unit_type, unit_idnum = ParseGUID(_G.UnitGUID("target"))
jcallahan@2 1032
jcallahan@18 1033 if unit_type ~= private.UNIT_TYPES.NPC or not unit_idnum then
jcallahan@18 1034 return
jcallahan@18 1035 end
jcallahan@29 1036 local npc = NPCEntry(unit_idnum)
jcallahan@18 1037 local _, class_token = _G.UnitClass("target")
jcallahan@18 1038 npc.class = class_token
jcallahan@39 1039 npc.faction = UnitFactionStanding("target")
jcallahan@26 1040 npc.genders = npc.genders or {}
jcallahan@26 1041 npc.genders[GENDER_NAMES[_G.UnitSex("target")] or "UNDEFINED"] = true
jcallahan@18 1042 npc.is_pvp = _G.UnitIsPVP("target") and true or nil
jcallahan@18 1043 npc.reaction = ("%s:%s:%s"):format(_G.UnitLevel("player"), _G.UnitFactionGroup("player"), REACTION_NAMES[_G.UnitReaction("player", "target")])
jcallahan@2 1044
jcallahan@30 1045 local encounter_data = npc.encounter_data[InstanceDifficultyToken()].stats
jcallahan@18 1046 local npc_level = ("level_%d"):format(_G.UnitLevel("target"))
jcallahan@3 1047
jcallahan@28 1048 if not encounter_data[npc_level] then
jcallahan@28 1049 encounter_data[npc_level] = {
jcallahan@18 1050 max_health = _G.UnitHealthMax("target"),
jcallahan@18 1051 }
jcallahan@3 1052
jcallahan@18 1053 local max_power = _G.UnitManaMax("target")
jcallahan@18 1054
jcallahan@18 1055 if max_power > 0 then
jcallahan@18 1056 local power_type = _G.UnitPowerType("target")
jcallahan@28 1057 encounter_data[npc_level].power = ("%s:%d"):format(POWER_TYPE_NAMES[_G.tostring(power_type)] or power_type, max_power)
jcallahan@18 1058 end
jcallahan@3 1059 end
jcallahan@21 1060 table.wipe(action_data)
jcallahan@21 1061 action_data.type = AF.NPC
jcallahan@27 1062 action_data.identifier = unit_idnum
jcallahan@21 1063 action_data.npc_level = npc_level
jcallahan@31 1064
jcallahan@31 1065 self:UpdateTargetLocation()
jcallahan@2 1066 end
jcallahan@18 1067 end -- do-block
jcallahan@2 1068
jcallahan@12 1069 do
jcallahan@12 1070 local function UpdateQuestJuncture(point)
jcallahan@12 1071 local unit_name = _G.UnitName("questnpc")
jcallahan@9 1072
jcallahan@12 1073 if not unit_name then
jcallahan@12 1074 return
jcallahan@12 1075 end
jcallahan@34 1076 local unit_type, unit_id = ParseGUID(_G.UnitGUID("questnpc"))
jcallahan@9 1077
jcallahan@12 1078 if unit_type == private.UNIT_TYPES.OBJECT then
jcallahan@38 1079 UpdateDBEntryLocation("objects", unit_id)
jcallahan@12 1080 end
jcallahan@19 1081 local quest = DBEntry("quests", _G.GetQuestID())
jcallahan@12 1082 quest[point] = quest[point] or {}
jcallahan@12 1083 quest[point][("%s:%d"):format(private.UNIT_TYPE_NAMES[unit_type + 1], unit_id)] = true
jcallahan@24 1084
jcallahan@24 1085 return quest
jcallahan@12 1086 end
jcallahan@10 1087
jcallahan@12 1088
jcallahan@12 1089 function WDP:QUEST_COMPLETE()
jcallahan@12 1090 UpdateQuestJuncture("end")
jcallahan@10 1091 end
jcallahan@10 1092
jcallahan@12 1093
jcallahan@12 1094 function WDP:QUEST_DETAIL()
jcallahan@24 1095 local quest = UpdateQuestJuncture("begin")
jcallahan@24 1096
jcallahan@46 1097 if not quest then
jcallahan@46 1098 return
jcallahan@46 1099 end
jcallahan@24 1100 quest.classes = quest.classes or {}
jcallahan@27 1101 quest.classes[PLAYER_CLASS] = true
jcallahan@24 1102
jcallahan@24 1103 local _, race = _G.UnitRace("player")
jcallahan@24 1104 quest.races = quest.races or {}
jcallahan@24 1105 quest.races[race] = true
jcallahan@10 1106 end
jcallahan@12 1107 end -- do-block
jcallahan@9 1108
jcallahan@9 1109
jcallahan@4 1110 function WDP:QUEST_LOG_UPDATE()
jcallahan@38 1111 local selected_quest = _G.GetQuestLogSelection() -- Save current selection to be restored when we're done.
jcallahan@36 1112 local entry_index, processed_quests = 1, 0
jcallahan@36 1113 local _, num_quests = _G.GetNumQuestLogEntries()
jcallahan@36 1114
jcallahan@36 1115 while processed_quests <= num_quests do
jcallahan@36 1116 local _, _, _, _, is_header, _, _, _, quest_id = _G.GetQuestLogTitle(entry_index)
jcallahan@36 1117
jcallahan@36 1118 if not is_header then
jcallahan@36 1119 _G.SelectQuestLogEntry(entry_index);
jcallahan@36 1120
jcallahan@36 1121 local quest = DBEntry("quests", quest_id)
jcallahan@36 1122 quest.timer = _G.GetQuestLogTimeLeft()
jcallahan@37 1123 quest.can_share = _G.GetQuestLogPushable() and true or nil
jcallahan@36 1124 processed_quests = processed_quests + 1
jcallahan@36 1125 end
jcallahan@36 1126 entry_index = entry_index + 1
jcallahan@36 1127 end
jcallahan@36 1128 _G.SelectQuestLogEntry(selected_quest)
jcallahan@4 1129 self:UnregisterEvent("QUEST_LOG_UPDATE")
jcallahan@4 1130 end
jcallahan@4 1131
jcallahan@4 1132
jcallahan@4 1133 function WDP:UNIT_QUEST_LOG_CHANGED(event, unit_id)
jcallahan@4 1134 if unit_id ~= "player" then
jcallahan@4 1135 return
jcallahan@4 1136 end
jcallahan@4 1137 self:RegisterEvent("QUEST_LOG_UPDATE")
jcallahan@4 1138 end
jcallahan@4 1139
jcallahan@4 1140
jcallahan@27 1141 function WDP:TRAINER_SHOW()
jcallahan@27 1142 if not _G.IsTradeskillTrainer() then
jcallahan@27 1143 return
jcallahan@27 1144 end
jcallahan@34 1145 local unit_type, unit_idnum = ParseGUID(_G.UnitGUID("target"))
jcallahan@29 1146 local npc = NPCEntry(unit_idnum)
jcallahan@58 1147
jcallahan@58 1148 if not npc then
jcallahan@58 1149 return
jcallahan@58 1150 end
jcallahan@27 1151 npc.teaches = npc.teaches or {}
jcallahan@27 1152
jcallahan@27 1153 -- Get the initial trainer filters
jcallahan@27 1154 local available = _G.GetTrainerServiceTypeFilter("available")
jcallahan@27 1155 local unavailable = _G.GetTrainerServiceTypeFilter("unavailable")
jcallahan@27 1156 local used = _G.GetTrainerServiceTypeFilter("used")
jcallahan@27 1157
jcallahan@27 1158 -- Clear the trainer filters
jcallahan@27 1159 _G.SetTrainerServiceTypeFilter("available", 1)
jcallahan@27 1160 _G.SetTrainerServiceTypeFilter("unavailable", 1)
jcallahan@27 1161 _G.SetTrainerServiceTypeFilter("used", 1)
jcallahan@27 1162
jcallahan@27 1163 for index = 1, _G.GetNumTrainerServices(), 1 do
jcallahan@27 1164 local spell_name, rank_name, _, _, required_level = _G.GetTrainerServiceInfo(index)
jcallahan@27 1165
jcallahan@27 1166 if spell_name then
jcallahan@27 1167 DatamineTT:ClearLines()
jcallahan@27 1168 DatamineTT:SetTrainerService(index)
jcallahan@27 1169
jcallahan@27 1170 local _, _, spell_id = DatamineTT:GetSpell()
jcallahan@27 1171
jcallahan@43 1172 if spell_id then
jcallahan@43 1173 local profession, min_skill = _G.GetTrainerServiceSkillReq(index)
jcallahan@43 1174 profession = profession or "General"
jcallahan@43 1175
jcallahan@43 1176 local class_professions = npc.teaches[PLAYER_CLASS]
jcallahan@43 1177 if not class_professions then
jcallahan@43 1178 npc.teaches[PLAYER_CLASS] = {}
jcallahan@43 1179 class_professions = npc.teaches[PLAYER_CLASS]
jcallahan@43 1180 end
jcallahan@43 1181
jcallahan@43 1182 local profession_skills = class_professions[profession]
jcallahan@43 1183 if not profession_skills then
jcallahan@43 1184 class_professions[profession] = {}
jcallahan@43 1185 profession_skills = class_professions[profession]
jcallahan@43 1186 end
jcallahan@43 1187 profession_skills[spell_id] = ("%d:%d"):format(required_level, min_skill)
jcallahan@27 1188 end
jcallahan@27 1189 end
jcallahan@27 1190 end
jcallahan@27 1191
jcallahan@27 1192 -- Reset the filters to what they were before
jcallahan@27 1193 _G.SetTrainerServiceTypeFilter("available", available or 0)
jcallahan@27 1194 _G.SetTrainerServiceTypeFilter("unavailable", unavailable or 0)
jcallahan@27 1195 _G.SetTrainerServiceTypeFilter("used", used or 0)
jcallahan@27 1196 end
jcallahan@27 1197
jcallahan@27 1198
jcallahan@1 1199 function WDP:UNIT_SPELLCAST_SENT(event_name, unit_id, spell_name, spell_rank, target_name, spell_line)
jcallahan@1 1200 if private.tracked_line or unit_id ~= "player" then
jcallahan@1 1201 return
jcallahan@1 1202 end
jcallahan@1 1203 local spell_label = private.SPELL_LABELS_BY_NAME[spell_name]
jcallahan@1 1204
jcallahan@1 1205 if not spell_label then
jcallahan@1 1206 return
jcallahan@1 1207 end
jcallahan@18 1208 table.wipe(action_data)
jcallahan@1 1209
jcallahan@1 1210 local tt_item_name, tt_item_link = _G.GameTooltip:GetItem()
jcallahan@1 1211 local tt_unit_name, tt_unit_id = _G.GameTooltip:GetUnit()
jcallahan@1 1212
jcallahan@1 1213 if not tt_unit_name and _G.UnitName("target") == target_name then
jcallahan@1 1214 tt_unit_name = target_name
jcallahan@1 1215 tt_unit_id = "target"
jcallahan@1 1216 end
jcallahan@1 1217 local spell_flags = private.SPELL_FLAGS_BY_LABEL[spell_label]
jcallahan@28 1218 local zone_name, area_id, x, y, map_level, instance_token = CurrentLocationData()
jcallahan@28 1219
jcallahan@28 1220 action_data.instance_token = instance_token
jcallahan@28 1221 action_data.map_level = map_level
jcallahan@28 1222 action_data.x = x
jcallahan@28 1223 action_data.y = y
jcallahan@28 1224 action_data.zone = ("%s:%d"):format(zone_name, area_id)
jcallahan@1 1225
jcallahan@16 1226 if tt_unit_name and not tt_item_name then
jcallahan@16 1227 if bit.band(spell_flags, AF.NPC) == AF.NPC then
jcallahan@16 1228 if not tt_unit_id or tt_unit_name ~= target_name then
jcallahan@16 1229 return
jcallahan@16 1230 end
jcallahan@16 1231 action_data.type = AF.NPC
jcallahan@25 1232 action_data.label = spell_label:lower()
jcallahan@25 1233 action_data.unit_name = tt_unit_name
jcallahan@16 1234 end
jcallahan@16 1235 elseif bit.band(spell_flags, AF.ITEM) == AF.ITEM then
jcallahan@16 1236 action_data.type = AF.ITEM
jcallahan@25 1237 action_data.label = spell_label:lower()
jcallahan@16 1238
jcallahan@16 1239 if tt_item_name and tt_item_name == target_name then
jcallahan@28 1240 action_data.identifier = ItemLinkToID(tt_item_link)
jcallahan@16 1241 elseif target_name and target_name ~= "" then
jcallahan@16 1242 local _, target_item_link = _G.GetItemInfo(target_name)
jcallahan@28 1243 action_data.identifier = ItemLinkToID(target_item_link)
jcallahan@16 1244 end
jcallahan@16 1245 elseif not tt_item_name and not tt_unit_name then
jcallahan@17 1246 action_data.name = target_name
jcallahan@17 1247
jcallahan@1 1248 if bit.band(spell_flags, AF.OBJECT) == AF.OBJECT then
jcallahan@17 1249 if target_name == "" then
jcallahan@17 1250 return
jcallahan@17 1251 end
jcallahan@11 1252 local identifier = ("%s:%s"):format(spell_label, target_name)
jcallahan@38 1253 UpdateDBEntryLocation("objects", identifier)
jcallahan@11 1254
jcallahan@1 1255 action_data.type = AF.OBJECT
jcallahan@11 1256 action_data.identifier = identifier
jcallahan@1 1257 elseif bit.band(spell_flags, AF.ZONE) == AF.ZONE then
jcallahan@38 1258 local identifier = ("%s:%s"):format(spell_label, _G["GameTooltipTextLeft1"]:GetText() or "NONE") -- Possible fishing pool name.
jcallahan@52 1259 action_data.zone_data = UpdateDBEntryLocation("zones", identifier)
jcallahan@17 1260 action_data.type = AF.ZONE
jcallahan@38 1261 action_data.identifier = identifier
jcallahan@48 1262 action_data.spell_label = spell_label
jcallahan@1 1263 end
jcallahan@1 1264 end
jcallahan@1 1265 private.tracked_line = spell_line
jcallahan@0 1266 end
jcallahan@0 1267
jcallahan@0 1268
jcallahan@1 1269 function WDP:UNIT_SPELLCAST_SUCCEEDED(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@1 1273 private.tracked_line = nil
jcallahan@0 1274 end
jcallahan@0 1275
jcallahan@1 1276 function WDP:HandleSpellFailure(event_name, unit_id, spell_name, spell_rank, spell_line, spell_id)
jcallahan@1 1277 if unit_id ~= "player" then
jcallahan@1 1278 return
jcallahan@1 1279 end
jcallahan@0 1280
jcallahan@1 1281 if private.tracked_line == spell_line then
jcallahan@1 1282 private.tracked_line = nil
jcallahan@1 1283 end
jcallahan@0 1284 end