Mercurial > wow > wowdb-profiler

annotate Main.lua @ 51:9f23fb15adc5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Record amount of required Conquest Points for the season for merchant items.
author James D. Callahan III <jcallahan@curse.com>
date Thu, 28 Jun 2012 14:30:20 -0500
parents 66034def453b
children 2bfdce67c71e
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@47 257 local function UpdateDBEntryLocation(entry_type, identifier, location_label)
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@47 263 local location_field = location_label or "locations"
jcallahan@41 264 entry[difficulty_token] = entry[difficulty_token] or {}
jcallahan@47 265 entry[difficulty_token][location_field] = entry[difficulty_token][location_field] or {}
jcallahan@10 266
jcallahan@31 267 local zone_token = ("%s:%d"):format(zone_name, area_id)
jcallahan@47 268 local zone_data = entry[difficulty_token][location_field][zone_token]
jcallahan@24 269
jcallahan@31 270 if not zone_data then
jcallahan@31 271 zone_data = {}
jcallahan@47 272 entry[difficulty_token][location_field][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@48 501 function WDP:CHAT_MSG_LOOT(event, message)
jcallahan@48 502 if action_data.spell_label ~= "EXTRACT_GAS" then
jcallahan@48 503 return
jcallahan@48 504 end
jcallahan@48 505 local item_link, quantity = deformat(message, _G.LOOT_ITEM_PUSHED_SELF_MULTIPLE)
jcallahan@48 506
jcallahan@48 507 if not item_link then
jcallahan@48 508 quantity, item_link = 1, deformat(message, _G.LOOT_ITEM_PUSHED_SELF)
jcallahan@48 509 end
jcallahan@48 510
jcallahan@48 511 if not item_link then
jcallahan@48 512 return
jcallahan@48 513 end
jcallahan@48 514 local item_id = ItemLinkToID(item_link)
jcallahan@48 515
jcallahan@48 516 if not item_id then
jcallahan@48 517 return
jcallahan@48 518 end
jcallahan@48 519 action_data.loot_list = {
jcallahan@48 520 ("%d:%d"):format(item_id, quantity)
jcallahan@48 521 }
jcallahan@48 522 GenericLootUpdate("zones")
jcallahan@48 523 table.wipe(action_data)
jcallahan@48 524 end
jcallahan@48 525
jcallahan@48 526
jcallahan@23 527 do
jcallahan@40 528 local SOBER_MATCH = _G.DRUNK_MESSAGE_ITEM_SELF1:gsub("%%s", ".+")
jcallahan@40 529
jcallahan@40 530 local DRUNK_COMPARES = {
jcallahan@40 531 _G.DRUNK_MESSAGE_SELF2,
jcallahan@40 532 _G.DRUNK_MESSAGE_SELF3,
jcallahan@40 533 _G.DRUNK_MESSAGE_SELF4,
jcallahan@40 534 }
jcallahan@40 535
jcallahan@40 536 local DRUNK_MATCHES = {
jcallahan@40 537 _G.DRUNK_MESSAGE_SELF2:gsub("%%s", ".+"),
jcallahan@40 538 _G.DRUNK_MESSAGE_SELF3:gsub("%%s", ".+"),
jcallahan@40 539 _G.DRUNK_MESSAGE_SELF4:gsub("%%s", ".+"),
jcallahan@40 540 }
jcallahan@40 541
jcallahan@40 542 function WDP:CHAT_MSG_SYSTEM(event, message)
jcallahan@40 543 if currently_drunk then
jcallahan@40 544 if message == _G.DRUNK_MESSAGE_SELF1 or message:match(SOBER_MATCH) then
jcallahan@40 545 currently_drunk = nil
jcallahan@40 546 end
jcallahan@40 547 return
jcallahan@40 548 end
jcallahan@40 549
jcallahan@40 550 for index = 1, #DRUNK_MATCHES do
jcallahan@40 551 if message == DRUNK_COMPARES[index] or message:match(DRUNK_MATCHES[index]) then
jcallahan@40 552 currently_drunk = true
jcallahan@40 553 break
jcallahan@40 554 end
jcallahan@40 555 end
jcallahan@40 556 end
jcallahan@40 557 end
jcallahan@40 558
jcallahan@40 559 -- do-block
jcallahan@40 560
jcallahan@40 561 do
jcallahan@23 562 local FLAGS_NPC = bit.bor(_G.COMBATLOG_OBJECT_TYPE_GUARDIAN, _G.COMBATLOG_OBJECT_CONTROL_NPC)
jcallahan@23 563 local FLAGS_NPC_CONTROL = bit.bor(_G.COMBATLOG_OBJECT_AFFILIATION_OUTSIDER, _G.COMBATLOG_OBJECT_CONTROL_NPC)
jcallahan@23 564
jcallahan@23 565
jcallahan@23 566 local function RecordNPCSpell(sub_event, source_guid, source_name, source_flags, dest_guid, dest_name, dest_flags, spell_id, spell_name)
jcallahan@23 567 if not spell_id then
jcallahan@23 568 return
jcallahan@23 569 end
jcallahan@34 570 local source_type, source_id = ParseGUID(source_guid)
jcallahan@23 571
jcallahan@23 572 if not source_id or source_type ~= private.UNIT_TYPES.NPC then
jcallahan@23 573 return
jcallahan@23 574 end
jcallahan@23 575
jcallahan@23 576 if bit.band(FLAGS_NPC_CONTROL, source_flags) == FLAGS_NPC_CONTROL and bit.band(FLAGS_NPC, source_flags) ~= 0 then
jcallahan@29 577 local encounter_data = NPCEntry(source_id).encounter_data[InstanceDifficultyToken()]
jcallahan@28 578 encounter_data.spells = encounter_data.spells or {}
jcallahan@28 579 encounter_data.spells[spell_id] = (encounter_data.spells[spell_id] or 0) + 1
jcallahan@23 580 end
jcallahan@23 581 end
jcallahan@23 582
jcallahan@23 583 local COMBAT_LOG_FUNCS = {
jcallahan@23 584 SPELL_AURA_APPLIED = RecordNPCSpell,
jcallahan@23 585 SPELL_CAST_START = RecordNPCSpell,
jcallahan@48 586 SPELL_CAST_SUCCESS = RecordNPCSpell,
jcallahan@23 587 }
jcallahan@23 588
jcallahan@23 589
jcallahan@23 590 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 591 local combat_log_func = COMBAT_LOG_FUNCS[sub_event]
jcallahan@23 592
jcallahan@23 593 if not combat_log_func then
jcallahan@23 594 return
jcallahan@23 595 end
jcallahan@23 596 combat_log_func(sub_event, source_guid, source_name, source_flags, dest_guid, dest_name, dest_flags, ...)
jcallahan@23 597 end
jcallahan@23 598 end -- do-block
jcallahan@23 599
jcallahan@23 600
jcallahan@44 601 do
jcallahan@44 602 local DIPLOMACY_SPELL_ID = 20599
jcallahan@44 603 local MR_POP_RANK1_SPELL_ID = 78634
jcallahan@44 604 local MR_POP_RANK2_SPELL_ID = 78635
jcallahan@44 605
jcallahan@44 606 local REP_BUFFS = {
jcallahan@44 607 [_G.GetSpellInfo(30754)] = "CENARION_FAVOR",
jcallahan@44 608 [_G.GetSpellInfo(24705)] = "GRIM_VISAGE",
jcallahan@44 609 [_G.GetSpellInfo(32098)] = "HONOR_HOLD_FAVOR",
jcallahan@44 610 [_G.GetSpellInfo(39913)] = "NAZGRELS_FERVOR",
jcallahan@44 611 [_G.GetSpellInfo(39953)] = "SONG_OF_BATTLE",
jcallahan@44 612 [_G.GetSpellInfo(61849)] = "SPIRIT_OF_SHARING",
jcallahan@44 613 [_G.GetSpellInfo(32096)] = "THRALLMARS_FAVOR",
jcallahan@44 614 [_G.GetSpellInfo(39911)] = "TROLLBANES_COMMAND",
jcallahan@44 615 [_G.GetSpellInfo(95987)] = "UNBURDENED",
jcallahan@44 616 [_G.GetSpellInfo(100951)] = "WOW_ANNIVERSARY",
jcallahan@44 617 }
jcallahan@44 618
jcallahan@44 619
jcallahan@44 620 local FACTION_NAMES = {
jcallahan@44 621 CENARION_CIRCLE = _G.GetFactionInfoByID(609),
jcallahan@44 622 HONOR_HOLD = _G.GetFactionInfoByID(946),
jcallahan@44 623 THE_SHATAR = _G.GetFactionInfoByID(935),
jcallahan@44 624 THRALLMAR = _G.GetFactionInfoByID(947),
jcallahan@44 625 }
jcallahan@44 626
jcallahan@44 627
jcallahan@44 628 local MODIFIERS = {
jcallahan@44 629 CENARION_FAVOR = {
jcallahan@44 630 faction = FACTION_NAMES.CENARION_CIRCLE,
jcallahan@44 631 modifier = 0.25,
jcallahan@44 632 },
jcallahan@44 633 GRIM_VISAGE = {
jcallahan@44 634 modifier = 0.1,
jcallahan@44 635 },
jcallahan@44 636 HONOR_HOLD_FAVOR = {
jcallahan@44 637 faction = FACTION_NAMES.HONOR_HOLD,
jcallahan@44 638 modifier = 0.25,
jcallahan@44 639 },
jcallahan@44 640 NAZGRELS_FERVOR = {
jcallahan@44 641 faction = FACTION_NAMES.THRALLMAR,
jcallahan@44 642 modifier = 0.1,
jcallahan@44 643 },
jcallahan@44 644 SONG_OF_BATTLE = {
jcallahan@44 645 faction = FACTION_NAMES.THE_SHATAR,
jcallahan@44 646 modifier = 0.1,
jcallahan@44 647 },
jcallahan@44 648 SPIRIT_OF_SHARING = {
jcallahan@44 649 modifier = 0.1,
jcallahan@44 650 },
jcallahan@44 651 THRALLMARS_FAVOR = {
jcallahan@44 652 faction = FACTION_NAMES.THRALLMAR,
jcallahan@44 653 modifier = 0.25,
jcallahan@44 654 },
jcallahan@44 655 TROLLBANES_COMMAND = {
jcallahan@44 656 faction = FACTION_NAMES.HONOR_HOLD,
jcallahan@44 657 modifier = 0.1,
jcallahan@44 658 },
jcallahan@44 659 UNBURDENED = {
jcallahan@44 660 modifier = 0.1,
jcallahan@44 661 },
jcallahan@44 662 WOW_ANNIVERSARY = {
jcallahan@44 663 modifier = 0.08,
jcallahan@44 664 }
jcallahan@44 665 }
jcallahan@44 666
jcallahan@44 667
jcallahan@44 668 function WDP:COMBAT_TEXT_UPDATE(event, message_type, faction_name, amount)
jcallahan@44 669 if message_type ~= "FACTION" then
jcallahan@44 670 return
jcallahan@44 671 end
jcallahan@44 672 UpdateFactionData()
jcallahan@44 673
jcallahan@46 674 if not faction_name or not faction_standings[faction_name] then
jcallahan@46 675 return
jcallahan@46 676 end
jcallahan@44 677 local npc = NPCEntry(action_data.identifier)
jcallahan@46 678
jcallahan@44 679 if not npc then
jcallahan@44 680 return
jcallahan@44 681 end
jcallahan@44 682 local encounter_data = npc.encounter_data[InstanceDifficultyToken()].stats
jcallahan@44 683 local reputation_data = encounter_data[action_data.npc_level].reputations
jcallahan@44 684
jcallahan@44 685 if not reputation_data then
jcallahan@44 686 reputation_data = {}
jcallahan@44 687 encounter_data[action_data.npc_level].reputations = reputation_data
jcallahan@44 688 end
jcallahan@44 689 local modifier = 1
jcallahan@44 690
jcallahan@44 691 if _G.IsSpellKnown(DIPLOMACY_SPELL_ID) then
jcallahan@44 692 modifier = modifier + 0.1
jcallahan@44 693 end
jcallahan@44 694
jcallahan@44 695 if _G.IsSpellKnown(MR_POP_RANK2_SPELL_ID) then
jcallahan@44 696 modifier = modifier + 0.1
jcallahan@44 697 elseif _G.IsSpellKnown(MR_POP_RANK1_SPELL_ID) then
jcallahan@44 698 modifier = modifier + 0.05
jcallahan@44 699 end
jcallahan@44 700
jcallahan@44 701 for buff_name, buff_label in pairs(REP_BUFFS) do
jcallahan@44 702 if _G.UnitBuff("player", buff_name) then
jcallahan@44 703 local modded_faction = MODIFIERS[buff_label].faction
jcallahan@44 704
jcallahan@44 705 if not modded_faction or faction_name == modded_faction then
jcallahan@44 706 modifier = modifier + MODIFIERS[buff_label].modifier
jcallahan@44 707 end
jcallahan@44 708 end
jcallahan@44 709 end
jcallahan@44 710 reputation_data[("%s:%s"):format(faction_name, faction_standings[faction_name])] = math.floor(amount / modifier)
jcallahan@32 711 end
jcallahan@44 712 end -- do-block
jcallahan@18 713
jcallahan@18 714
jcallahan@42 715 function WDP:ITEM_TEXT_BEGIN()
jcallahan@42 716 local unit_type, unit_idnum = ParseGUID(_G.UnitGUID("npc"))
jcallahan@42 717
jcallahan@42 718 if not unit_idnum or unit_type ~= private.UNIT_TYPES.OBJECT or _G.UnitName("npc") ~= _G.ItemTextGetItem() then
jcallahan@42 719 return
jcallahan@42 720 end
jcallahan@42 721 UpdateDBEntryLocation("objects", unit_idnum)
jcallahan@42 722 end
jcallahan@42 723
jcallahan@42 724
jcallahan@13 725 do
jcallahan@40 726 local RE_GOLD = _G.GOLD_AMOUNT:gsub("%%d", "(%%d+)")
jcallahan@40 727 local RE_SILVER = _G.SILVER_AMOUNT:gsub("%%d", "(%%d+)")
jcallahan@40 728 local RE_COPPER = _G.COPPER_AMOUNT:gsub("%%d", "(%%d+)")
jcallahan@13 729
jcallahan@13 730
jcallahan@13 731 local function _moneyMatch(money, re)
jcallahan@13 732 return money:match(re) or 0
jcallahan@1 733 end
jcallahan@1 734
jcallahan@0 735
jcallahan@13 736 local function _toCopper(money)
jcallahan@13 737 if not money then
jcallahan@13 738 return 0
jcallahan@13 739 end
jcallahan@40 740 return _moneyMatch(money, RE_GOLD) * 10000 + _moneyMatch(money, RE_SILVER) * 100 + _moneyMatch(money, RE_COPPER)
jcallahan@1 741 end
jcallahan@1 742
jcallahan@1 743
jcallahan@13 744 local LOOT_VERIFY_FUNCS = {
jcallahan@16 745 [AF.ITEM] = function()
jcallahan@16 746 local locked_item_id
jcallahan@16 747
jcallahan@16 748 for bag_index = 0, _G.NUM_BAG_FRAMES do
jcallahan@16 749 for slot_index = 1, _G.GetContainerNumSlots(bag_index) do
jcallahan@16 750 local _, _, is_locked = _G.GetContainerItemInfo(bag_index, slot_index)
jcallahan@16 751
jcallahan@16 752 if is_locked then
jcallahan@16 753 locked_item_id = ItemLinkToID(_G.GetContainerItemLink(bag_index, slot_index))
jcallahan@16 754 end
jcallahan@16 755 end
jcallahan@16 756 end
jcallahan@16 757
jcallahan@28 758 if not locked_item_id or (action_data.identifier and action_data.identifier ~= locked_item_id) then
jcallahan@16 759 return false
jcallahan@16 760 end
jcallahan@28 761 action_data.identifier = locked_item_id
jcallahan@16 762 return true
jcallahan@16 763 end,
jcallahan@13 764 [AF.NPC] = function()
jcallahan@17 765 if not _G.UnitExists("target") or _G.UnitIsFriend("player", "target") or _G.UnitIsPlayer("target") or _G.UnitPlayerControlled("target") then
jcallahan@15 766 return false
jcallahan@13 767 end
jcallahan@34 768 local unit_type, id_num = ParseGUID(_G.UnitGUID("target"))
jcallahan@27 769 action_data.identifier = id_num
jcallahan@13 770 return true
jcallahan@13 771 end,
jcallahan@14 772 [AF.OBJECT] = true,
jcallahan@17 773 [AF.ZONE] = function()
jcallahan@38 774 return _G.IsFishingLoot()
jcallahan@17 775 end,
jcallahan@13 776 }
jcallahan@13 777
jcallahan@13 778
jcallahan@13 779 local LOOT_UPDATE_FUNCS = {
jcallahan@16 780 [AF.ITEM] = function()
jcallahan@28 781 GenericLootUpdate("items")
jcallahan@28 782 end,
jcallahan@28 783 [AF.NPC] = function()
jcallahan@29 784 local npc = NPCEntry(action_data.identifier)
jcallahan@28 785
jcallahan@28 786 if not npc then
jcallahan@28 787 return
jcallahan@28 788 end
jcallahan@29 789 local encounter_data = npc.encounter_data[InstanceDifficultyToken()]
jcallahan@25 790 local loot_type = action_data.label or "drops"
jcallahan@33 791 npc.loot_counts = npc.loot_counts or {}
jcallahan@33 792 npc.loot_counts[loot_type] = (npc.loot_counts[loot_type] or 0) + 1
jcallahan@29 793 encounter_data[loot_type] = encounter_data[loot_type] or {}
jcallahan@16 794
jcallahan@17 795 for index = 1, #action_data.loot_list do
jcallahan@29 796 table.insert(encounter_data[loot_type], action_data.loot_list[index])
jcallahan@16 797 end
jcallahan@16 798 end,
jcallahan@13 799 [AF.OBJECT] = function()
jcallahan@28 800 GenericLootUpdate("objects", InstanceDifficultyToken())
jcallahan@17 801 end,
jcallahan@17 802 [AF.ZONE] = function()
jcallahan@41 803 local location_token = ("%s:%s:%s"):format(action_data.map_level, action_data.x, action_data.y)
jcallahan@41 804
jcallahan@41 805 -- This will start life as a boolean true.
jcallahan@41 806 if _G.type(action_data.zone_data[location_token]) ~= "table" then
jcallahan@41 807 action_data.zone_data[location_token] = {
jcallahan@41 808 drops = {}
jcallahan@41 809 }
jcallahan@41 810 end
jcallahan@41 811 local loot_count = ("%s_count"):format(action_data.label or "drops")
jcallahan@41 812 action_data.zone_data[location_token][loot_count] = (action_data.zone_data[location_token][loot_count] or 0) + 1
jcallahan@41 813
jcallahan@41 814 for index = 1, #action_data.loot_list do
jcallahan@41 815 table.insert(action_data.zone_data[location_token].drops, action_data.loot_list[index])
jcallahan@41 816 end
jcallahan@13 817 end,
jcallahan@13 818 }
jcallahan@13 819
jcallahan@13 820
jcallahan@13 821 function WDP:LOOT_OPENED()
jcallahan@18 822 if action_data.looting then
jcallahan@18 823 return
jcallahan@18 824 end
jcallahan@18 825
jcallahan@13 826 if not action_data.type then
jcallahan@13 827 action_data.type = AF.NPC
jcallahan@1 828 end
jcallahan@13 829 local verify_func = LOOT_VERIFY_FUNCS[action_data.type]
jcallahan@13 830 local update_func = LOOT_UPDATE_FUNCS[action_data.type]
jcallahan@13 831
jcallahan@14 832 if not verify_func or not update_func then
jcallahan@13 833 return
jcallahan@13 834 end
jcallahan@13 835
jcallahan@14 836 if _G.type(verify_func) == "function" and not verify_func() then
jcallahan@14 837 return
jcallahan@14 838 end
jcallahan@18 839 -- TODO: Remove this check once the MoP client goes live
jcallahan@18 840 local wow_version = private.wow_version
jcallahan@13 841 local loot_registry = {}
jcallahan@17 842 action_data.loot_list = {}
jcallahan@18 843 action_data.looting = true
jcallahan@13 844
jcallahan@18 845 if wow_version == "5.0.1" then
jcallahan@18 846 for loot_slot = 1, _G.GetNumLootItems() do
jcallahan@18 847 local icon_texture, item_text, quantity, quality, locked = _G.GetLootSlotInfo(loot_slot)
jcallahan@13 848
jcallahan@18 849 local slot_type = _G.GetLootSlotType(loot_slot)
jcallahan@18 850
jcallahan@18 851 if slot_type == _G.LOOT_SLOT_ITEM then
jcallahan@18 852 local item_id = ItemLinkToID(_G.GetLootSlotLink(loot_slot))
jcallahan@18 853 loot_registry[item_id] = (loot_registry[item_id]) or 0 + quantity
jcallahan@18 854 elseif slot_type == _G.LOOT_SLOT_MONEY then
jcallahan@18 855 table.insert(action_data.loot_list, ("money:%d"):format(_toCopper(item_text)))
jcallahan@18 856 elseif slot_type == _G.LOOT_SLOT_CURRENCY then
jcallahan@18 857 table.insert(action_data.loot_list, ("currency:%d:%s"):format(quantity, icon_texture:match("[^\\]+$"):lower()))
jcallahan@18 858 end
jcallahan@18 859 end
jcallahan@18 860 else
jcallahan@18 861 for loot_slot = 1, _G.GetNumLootItems() do
jcallahan@18 862 local icon_texture, item_text, quantity, quality, locked = _G.GetLootSlotInfo(loot_slot)
jcallahan@18 863 if _G.LootSlotIsItem(loot_slot) then
jcallahan@18 864 local item_id = ItemLinkToID(_G.GetLootSlotLink(loot_slot))
jcallahan@18 865 loot_registry[item_id] = (loot_registry[item_id]) or 0 + quantity
jcallahan@18 866 elseif _G.LootSlotIsCoin(loot_slot) then
jcallahan@18 867 table.insert(action_data.loot_list, ("money:%d"):format(_toCopper(item_text)))
jcallahan@18 868 elseif _G.LootSlotIsCurrency(loot_slot) then
jcallahan@18 869 table.insert(action_data.loot_list, ("currency:%d:%s"):format(quantity, icon_texture:match("[^\\]+$"):lower()))
jcallahan@18 870 end
jcallahan@13 871 end
jcallahan@13 872 end
jcallahan@13 873
jcallahan@13 874 for item_id, quantity in pairs(loot_registry) do
jcallahan@17 875 table.insert(action_data.loot_list, ("%d:%d"):format(item_id, quantity))
jcallahan@13 876 end
jcallahan@13 877 update_func()
jcallahan@1 878 end
jcallahan@13 879 end -- do-block
jcallahan@0 880
jcallahan@0 881
jcallahan@44 882 do
jcallahan@44 883 local POINT_MATCH_PATTERNS = {
jcallahan@44 884 ("^%s$"):format(_G.ITEM_REQ_ARENA_RATING:gsub("%%d", "(%%d+)")), -- May no longer be necessary
jcallahan@44 885 ("^%s$"):format(_G.ITEM_REQ_ARENA_RATING_3V3:gsub("%%d", "(%%d+)")), -- May no longer be necessary
jcallahan@44 886 ("^%s$"):format(_G.ITEM_REQ_ARENA_RATING_5V5:gsub("%%d", "(%%d+)")), -- May no longer be necessary
jcallahan@44 887 ("^%s$"):format(_G.ITEM_REQ_ARENA_RATING_BG:gsub("%%d", "(%%d+)")),
jcallahan@44 888 ("^%s$"):format(_G.ITEM_REQ_ARENA_RATING_3V3_BG:gsub("%%d", "(%%d+)")),
jcallahan@44 889 }
jcallahan@5 890
jcallahan@44 891 function WDP:UpdateMerchantItems(event)
jcallahan@44 892 local unit_type, unit_idnum = ParseGUID(_G.UnitGUID("target"))
jcallahan@4 893
jcallahan@44 894 if unit_type ~= private.UNIT_TYPES.NPC or not unit_idnum then
jcallahan@44 895 return
jcallahan@44 896 end
jcallahan@44 897 local _, merchant_standing = UnitFactionStanding("target")
jcallahan@44 898 local merchant = NPCEntry(unit_idnum)
jcallahan@44 899 merchant.sells = merchant.sells or {}
jcallahan@5 900
jcallahan@44 901 local num_items = _G.GetMerchantNumItems()
jcallahan@35 902
jcallahan@44 903 for item_index = 1, num_items do
jcallahan@44 904 local _, _, copper_price, stack_size, num_available, _, extended_cost = _G.GetMerchantItemInfo(item_index)
jcallahan@44 905 local item_id = ItemLinkToID(_G.GetMerchantItemLink(item_index))
jcallahan@5 906
jcallahan@44 907 if item_id and item_id > 0 then
jcallahan@44 908 local price_string = ActualCopperCost(copper_price, merchant_standing)
jcallahan@5 909
jcallahan@44 910 if extended_cost then
jcallahan@44 911 local bg_points = 0
jcallahan@44 912 local personal_points = 0
jcallahan@51 913 local required_conquest
jcallahan@5 914
jcallahan@44 915 DatamineTT:ClearLines()
jcallahan@44 916 DatamineTT:SetMerchantItem(item_index)
jcallahan@5 917
jcallahan@44 918 for line_index = 1, DatamineTT:NumLines() do
jcallahan@44 919 local current_line = _G["WDPDatamineTTTextLeft" .. line_index]
jcallahan@5 920
jcallahan@44 921 if not current_line then
jcallahan@44 922 break
jcallahan@44 923 end
jcallahan@51 924 required_conquest = current_line:GetText():match("Requires earning a total of (%d+)\nConquest Points for the season.")
jcallahan@5 925
jcallahan@44 926 for match_index = 1, #POINT_MATCH_PATTERNS do
jcallahan@44 927 local match1, match2 = current_line:GetText():match(POINT_MATCH_PATTERNS[match_index])
jcallahan@44 928 personal_points = personal_points + (match1 or 0)
jcallahan@44 929 bg_points = bg_points + (match2 or 0)
jcallahan@5 930
jcallahan@44 931 if match1 or match2 then
jcallahan@44 932 break
jcallahan@44 933 end
jcallahan@44 934 end
jcallahan@5 935 end
jcallahan@44 936 local currency_list = {}
jcallahan@44 937 local item_count = _G.GetMerchantItemCostInfo(item_index)
jcallahan@50 938
jcallahan@50 939 -- Keeping this around in case Blizzard makes the two points diverge at some point.
jcallahan@51 940 -- price_string = ("%s:%s:%s:%s"):format(price_string, bg_points, personal_points, required_conquest or 0)
jcallahan@51 941 price_string = ("%s:%s:%s"):format(price_string, personal_points, required_conquest or 0)
jcallahan@5 942
jcallahan@44 943 for cost_index = 1, item_count do
jcallahan@44 944 local icon_texture, amount_required, currency_link = _G.GetMerchantItemCostItem(item_index, cost_index)
jcallahan@44 945 local currency_id = currency_link and ItemLinkToID(currency_link) or nil
jcallahan@44 946
jcallahan@44 947 if (not currency_id or currency_id < 1) and icon_texture then
jcallahan@44 948 currency_id = icon_texture:match("[^\\]+$"):lower()
jcallahan@44 949 end
jcallahan@44 950
jcallahan@44 951 if currency_id then
jcallahan@44 952 currency_list[#currency_list + 1] = ("(%s:%s)"):format(amount_required, currency_id)
jcallahan@44 953 end
jcallahan@44 954 end
jcallahan@44 955
jcallahan@44 956 for currency_index = 1, #currency_list do
jcallahan@44 957 price_string = ("%s:%s"):format(price_string, currency_list[currency_index])
jcallahan@5 958 end
jcallahan@5 959 end
jcallahan@44 960 merchant.sells[("%s:%s:[%s]"):format(item_id, stack_size, price_string)] = num_available
jcallahan@44 961 end
jcallahan@44 962 end
jcallahan@5 963
jcallahan@44 964 if _G.CanMerchantRepair() then
jcallahan@44 965 merchant.can_repair = true
jcallahan@5 966 end
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@48 1241 action_data.zone_data = UpdateDBEntryLocation("zones", identifier, (spell_label == "FISHING") and "fishing_locations" or nil)
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