Mercurial > wow > wowdb-profiler

annotate Main.lua @ 52:2bfdce67c71e

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