Mercurial > wow > wowdb-profiler

annotate Main.lua @ 41:7db268f39c50

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