Mercurial > wow > wowdb-profiler

annotate Main.lua @ 56:b58277aa11da

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