Mercurial > wow > wowdb-profiler

annotate Main.lua @ 39:938abe259516

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