Mercurial > wow > wowdb-profiler

annotate Main.lua @ 74:06daf4cb1cf9

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