Mercurial > wow > askmrrobot

annotate Core.lua @ 59:ee701ce45354 v22

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Couple minor bug fixes, added french localization.
author yellowfive
date Sun, 07 Jun 2015 14:28:59 -0700
parents 01b63b8ed811
children cf2b6b9a8337
rev   line source
yellowfive@57 1 -- AskMrRobot
yellowfive@57 2 -- Does cool stuff associated with askmrrobot.com:
yellowfive@57 3 -- Import/Export gear and optimization solutions from/to the website
yellowfive@57 4 -- Improve the combat logging experience and augment it with extra data not available directly in the log file
yellowfive@57 5 -- Team Optimizer convenience functionality
yellowfive@57 6
yellowfive@57 7 AskMrRobot = LibStub("AceAddon-3.0"):NewAddon("AskMrRobot", "AceEvent-3.0", "AceComm-3.0", "AceConsole-3.0", "AceSerializer-3.0")
yellowfive@57 8 local Amr = AskMrRobot
yellowfive@57 9 Amr.Serializer = LibStub("AskMrRobot-Serializer")
yellowfive@57 10
yellowfive@57 11 Amr.ADDON_NAME = "AskMrRobot"
yellowfive@57 12
yellowfive@57 13 -- types of inter-addon messages that we receive, used to parcel them out to the proper handlers
yellowfive@57 14 Amr.MessageTypes = {
yellowfive@57 15 Version = "_V",
yellowfive@57 16 VersionRequest = "_VR",
yellowfive@57 17 Team = "_T"
yellowfive@57 18 }
yellowfive@57 19
yellowfive@57 20 local L = LibStub("AceLocale-3.0"):GetLocale("AskMrRobot", true)
yellowfive@57 21 local AceGUI = LibStub("AceGUI-3.0")
yellowfive@57 22
yellowfive@57 23 -- minimap icon and LDB support
yellowfive@57 24 local _amrLDB = LibStub("LibDataBroker-1.1"):NewDataObject(Amr.ADDON_NAME, {
yellowfive@57 25 type = "launcher",
yellowfive@57 26 text = "Ask Mr. Robot",
yellowfive@57 27 icon = "Interface\\AddOns\\" .. Amr.ADDON_NAME .. "\\Media\\icon",
yellowfive@57 28 OnClick = function(self, button, down)
yellowfive@57 29 if button == "LeftButton" then
yellowfive@57 30 if IsControlKeyDown() then
yellowfive@57 31 Amr:Wipe()
yellowfive@57 32 else
yellowfive@57 33 Amr:Toggle()
yellowfive@57 34 end
yellowfive@57 35 elseif button == "RightButton" then
yellowfive@57 36 Amr:EquipGearSet()
yellowfive@57 37 end
yellowfive@57 38 end,
yellowfive@57 39 OnTooltipShow = function(tt)
yellowfive@57 40 tt:AddLine("Ask Mr. Robot", 1, 1, 1);
yellowfive@57 41 tt:AddLine(" ");
yellowfive@57 42 tt:AddLine(L.MinimapTooltip)
yellowfive@57 43 end
yellowfive@57 44 })
yellowfive@57 45 local _icon = LibStub("LibDBIcon-1.0")
yellowfive@57 46
yellowfive@57 47
yellowfive@57 48 -- initialize the database
yellowfive@57 49 local function initializeDb()
yellowfive@57 50
yellowfive@57 51 local defaults = {
yellowfive@57 52 char = {
yellowfive@57 53 FirstUse = true, -- true if this is first time use, gets cleared after seeing the export help splash window
yellowfive@57 54 SubSpecs = {}, -- last seen subspecs for this character, used to deal with some ambiguous specs
yellowfive@57 55 Equipped = {}, -- for each spec group (1 or 2), slot id to item link
yellowfive@57 56 BagItems = {}, -- list of item links for bag
yellowfive@57 57 BankItems = {}, -- list of item links for bank
yellowfive@57 58 VoidItems = {}, -- list of item links for void storage
yellowfive@57 59 BagItemsAndCounts = {}, -- used mainly for the shopping list
yellowfive@57 60 BankItemsAndCounts = {}, -- used mainly for the shopping list
yellowfive@57 61 GearSets = {}, -- imported gear sets, key by spec group (1 or 2), slot id to item object
yellowfive@57 62 ExtraItemData = {}, -- for each spec group (1 or 2): mainly for legacy support, item id to object with socketColor and duplicateId information
yellowfive@57 63 ExtraGemData = {}, -- for each spec group (1 or 2): gem enchant id to gem display information, and data used to detect identical gems (mainly for legacy support)
yellowfive@57 64 ExtraEnchantData = {}, -- for each spec group (1 or 2): enchant id to enchant display information and material information
yellowfive@57 65 Logging = { -- character logging settings
yellowfive@57 66 Enabled = false, -- whether logging is currently on or not
yellowfive@57 67 LastZone = nil, -- last zone the player was in
yellowfive@57 68 LastDiff = nil, -- last difficulty for the last zone the player was in
yellowfive@57 69 LastWipe = nil -- last time a wipe was called by this player
yellowfive@57 70 },
yellowfive@57 71 TeamOpt = {
yellowfive@57 72 AllItems = {}, -- all equippable items no matter where it is, list of item unique ids, used to determine when a player gains a new equippable item
yellowfive@57 73 History = {}, -- history of drops since joining the current group
yellowfive@57 74 Rolls = {}, -- current loot choices for a loot distribution in progress
yellowfive@57 75 Role = nil, -- Leader or Member, changes UI to the mode most appropriate for this user
yellowfive@57 76 Loot = {}, -- the last loot seen by the master looter
yellowfive@57 77 LootGuid = nil, -- guid of the last unit looted by the master looter, will be "container" if there is no target
yellowfive@57 78 LootInProgress = false -- true if looting is currently in progress
yellowfive@57 79 }
yellowfive@57 80 },
yellowfive@57 81 profile = {
yellowfive@57 82 minimap = { -- minimap hide/show and position settings
yellowfive@57 83 hide = false
yellowfive@57 84 },
yellowfive@57 85 window = {}, -- main window position settings
yellowfive@57 86 lootWindow = {}, -- loot window position settings
yellowfive@57 87 shopWindow = {}, -- shopping list window position settings
yellowfive@57 88 options = {
yellowfive@57 89 autoGear = false, -- auto-equip saved gear sets when changing specs
yellowfive@57 90 shopAh = false -- auto-show shopping list at AH
yellowfive@57 91 },
yellowfive@57 92 Logging = { -- global logging settings
yellowfive@57 93 Auto = {} -- for each instanceId, for each difficultyId, true if auto-logging enabled
yellowfive@57 94 }
yellowfive@57 95 },
yellowfive@57 96 global = {
yellowfive@57 97 Region = nil, -- region that this user is in, all characters on the same account should be the same region
yellowfive@57 98 Shopping = {}, -- shopping list data stored globally for access on any character
yellowfive@57 99 Logging = { -- a lot of log data is stored globally for simplicity, can only be raiding with one character at a time
yellowfive@57 100 Wipes = {}, -- times that a wipe was called
yellowfive@57 101 PlayerData = {}, -- player data gathered at fight start
yellowfive@57 102 PlayerExtras = {} -- player extra data like auras, gathered at fight start
yellowfive@57 103 },
yellowfive@57 104 TeamOpt = { -- this stuff is stored globally in case a player e.g. switches to an alt in a raid group
yellowfive@57 105 LootGear = {}, -- gear info that needs to be transmitted with the next loot
yellowfive@57 106 Rankings = {}, -- last rankings imported by the loot ranker
yellowfive@57 107 RankingString = nil -- last ranking string imported, kept around for efficient serialization
yellowfive@57 108 }
yellowfive@57 109 }
yellowfive@57 110 }
yellowfive@57 111
yellowfive@57 112 -- set defaults for auto-logging
yellowfive@57 113 for i, instanceId in ipairs(Amr.InstanceIdsOrdered) do
yellowfive@57 114 local byDiff = defaults.profile.Logging.Auto[instanceId]
yellowfive@57 115 if not byDiff then
yellowfive@57 116 byDiff = {}
yellowfive@57 117 defaults.profile.Logging.Auto[instanceId] = byDiff
yellowfive@57 118 end
yellowfive@57 119
yellowfive@57 120 for k, difficultyId in pairs(Amr.Difficulties) do
yellowfive@57 121 if byDiff[difficultyId] == nil then
yellowfive@57 122 byDiff[difficultyId] = false
yellowfive@57 123 end
yellowfive@57 124 end
yellowfive@57 125 end
yellowfive@57 126
yellowfive@57 127 Amr.db = LibStub("AceDB-3.0"):New("AskMrRobotDb2", defaults)
yellowfive@57 128
yellowfive@57 129 Amr.db.RegisterCallback(Amr, "OnProfileChanged", "RefreshConfig")
yellowfive@57 130 Amr.db.RegisterCallback(Amr, "OnProfileCopied", "RefreshConfig")
yellowfive@57 131 Amr.db.RegisterCallback(Amr, "OnProfileReset", "RefreshConfig")
yellowfive@57 132 end
yellowfive@57 133
yellowfive@57 134 function Amr:OnInitialize()
yellowfive@57 135
yellowfive@57 136 initializeDb()
yellowfive@57 137
yellowfive@57 138 Amr:RegisterChatCommand("amr", "SlashCommand")
yellowfive@57 139
yellowfive@57 140 _icon:Register(Amr.ADDON_NAME, _amrLDB, self.db.profile.minimap)
yellowfive@57 141
yellowfive@57 142 -- listen for inter-addon communication
yellowfive@57 143 self:RegisterComm(Amr.ChatPrefix, "OnCommReceived")
yellowfive@57 144 end
yellowfive@57 145
yellowfive@57 146 local _enteredWorld = false
yellowfive@57 147 local _pendingInit = false
yellowfive@57 148
yellowfive@57 149 function finishInitialize()
yellowfive@57 150
yellowfive@57 151 -- record region, the only thing that we still can't get from the log file
yellowfive@57 152 Amr.db.global.Region = Amr.RegionNames[GetCurrentRegion()]
yellowfive@57 153
yellowfive@57 154 -- make sure that some initialization is deferred until after PLAYER_ENTERING_WORLD event so that data we need is available;
yellowfive@57 155 -- also delay this initialization for a few extra seconds to deal with some event spam that is otherwise hard to identify and ignore when a player logs in
yellowfive@57 156 Amr.Wait(5, function()
yellowfive@57 157 Amr:InitializeVersions()
yellowfive@57 158 Amr:InitializeGear()
yellowfive@57 159 Amr:InitializeExport()
yellowfive@57 160 Amr:InitializeCombatLog()
yellowfive@57 161 Amr:InitializeTeamOpt()
yellowfive@57 162 end)
yellowfive@57 163 end
yellowfive@57 164
yellowfive@57 165 function onPlayerEnteringWorld()
yellowfive@57 166
yellowfive@57 167 _enteredWorld = true
yellowfive@57 168
yellowfive@57 169 if _pendingInit then
yellowfive@57 170 finishInitialize()
yellowfive@57 171 _pendingInit = false
yellowfive@57 172 end
yellowfive@57 173 end
yellowfive@57 174
yellowfive@57 175 function Amr:OnEnable()
yellowfive@57 176
yellowfive@57 177 -- listen for changes to the snapshot enable state, and always make sure it is enabled if using the core AskMrRobot addon
yellowfive@57 178 self:RegisterMessage("AMR_SNAPSHOT_STATE_CHANGED", function(eventName, isEnabled)
yellowfive@57 179 if not isEnabled then
yellowfive@57 180 -- immediately re-enable on any attempt to disable
yellowfive@57 181 Amr.Serializer:EnableSnapshots()
yellowfive@57 182 end
yellowfive@57 183 end)
yellowfive@57 184 self.Serializer:EnableSnapshots()
yellowfive@57 185
yellowfive@57 186 -- update based on current configuration whenever enabled
yellowfive@57 187 self:RefreshConfig()
yellowfive@57 188
yellowfive@57 189 -- if we have fully entered the world, do initialization; otherwise wait for PLAYER_ENTERING_WORLD to continue
yellowfive@57 190 if not _enteredWorld then
yellowfive@57 191 _pendingInit = true
yellowfive@57 192 else
yellowfive@57 193 _pendingInit = false
yellowfive@57 194 finishInitialize()
yellowfive@57 195 end
yellowfive@57 196 end
yellowfive@57 197
yellowfive@57 198 function Amr:OnDisable()
yellowfive@57 199 -- disabling is not supported
yellowfive@57 200 end
yellowfive@57 201
yellowfive@57 202
yellowfive@57 203 ----------------------------------------------------------------------------------------
yellowfive@57 204 -- Slash Commands
yellowfive@57 205 ----------------------------------------------------------------------------------------
yellowfive@57 206 local _slashMethods = {
yellowfive@57 207 hide = "Hide",
yellowfive@57 208 show = "Show",
yellowfive@57 209 toggle = "Toggle",
yellowfive@57 210 equip = "EquipGearSet", -- parameter is "primary" or "secondary", or no parameter to toggle
yellowfive@57 211 version = "PrintVersions",
yellowfive@57 212 wipe = "Wipe",
yellowfive@57 213 undowipe = "UndoWipe",
yellowfive@57 214 test = "Test"
yellowfive@57 215 }
yellowfive@57 216
yellowfive@57 217 function Amr:SlashCommand(input)
yellowfive@57 218 input = string.lower(input)
yellowfive@57 219 local parts = {}
yellowfive@57 220 for w in input:gmatch("%S+") do
yellowfive@57 221 table.insert(parts, w)
yellowfive@57 222 end
yellowfive@57 223
yellowfive@57 224 if #parts == 0 then return end
yellowfive@57 225
yellowfive@57 226 local func = _slashMethods[parts[1]]
yellowfive@57 227 if not func then return end
yellowfive@57 228
yellowfive@57 229 local funcArgs = {}
yellowfive@57 230 for i = 2, #parts do
yellowfive@57 231 table.insert(funcArgs, parts[i])
yellowfive@57 232 end
yellowfive@57 233
yellowfive@57 234 Amr[func](Amr, unpack(funcArgs))
yellowfive@57 235 end
yellowfive@57 236
yellowfive@57 237
yellowfive@57 238 ----------------------------------------------------------------------------------------
yellowfive@57 239 -- Configuration
yellowfive@57 240 ----------------------------------------------------------------------------------------
yellowfive@57 241
yellowfive@57 242 -- refresh all state based on the current values of configuration options
yellowfive@57 243 function Amr:RefreshConfig()
yellowfive@57 244
yellowfive@57 245 self:UpdateMinimap()
yellowfive@57 246 self:RefreshOptionsUi()
yellowfive@57 247 self:RefreshLogUi()
yellowfive@57 248 end
yellowfive@57 249
yellowfive@57 250 function Amr:UpdateMinimap()
yellowfive@57 251
yellowfive@57 252 if self.db.profile.minimap.hide or not Amr:IsEnabled() then
yellowfive@57 253 _icon:Hide(Amr.ADDON_NAME)
yellowfive@57 254 else
yellowfive@57 255 -- change icon color if logging
yellowfive@57 256 if Amr:IsLogging() then
yellowfive@57 257 _amrLDB.icon = 'Interface\\AddOns\\AskMrRobot\\Media\\icon_green'
yellowfive@57 258 else
yellowfive@57 259 _amrLDB.icon = 'Interface\\AddOns\\AskMrRobot\\Media\\icon'
yellowfive@57 260 end
yellowfive@57 261
yellowfive@57 262 _icon:Show(Amr.ADDON_NAME)
yellowfive@57 263 end
yellowfive@57 264 end
yellowfive@57 265
yellowfive@57 266
yellowfive@57 267 ----------------------------------------------------------------------------------------
yellowfive@57 268 -- Version Checking
yellowfive@57 269 ----------------------------------------------------------------------------------------
yellowfive@57 270
yellowfive@57 271 -- version of addon being run by each person in the player's raid or group
yellowfive@57 272 Amr.GroupVersions = {}
yellowfive@57 273
yellowfive@57 274 local function toGroupVersionKey(realm, name)
yellowfive@57 275 realm = string.gsub(realm, "%s+", "")
yellowfive@57 276 return name .. "-" .. realm
yellowfive@57 277 end
yellowfive@57 278
yellowfive@57 279 -- prune out version information for players no longer in the current raid group
yellowfive@57 280 local function pruneVersionInfo()
yellowfive@57 281
yellowfive@57 282 local newVersions = {}
yellowfive@57 283 local units = Amr:GetGroupUnitIdentifiers()
yellowfive@57 284
yellowfive@57 285 for i, unitId in ipairs(units) do
yellowfive@57 286 local realm, name = Amr:GetRealmAndName(unitId)
yellowfive@57 287 if realm then
yellowfive@57 288 local key = toGroupVersionKey(realm, name)
yellowfive@57 289 newVersions[key] = Amr.GroupVersions[key]
yellowfive@57 290 end
yellowfive@57 291 end
yellowfive@57 292
yellowfive@57 293 Amr.GroupVersions = newVersions
yellowfive@57 294 end
yellowfive@57 295
yellowfive@57 296 -- send version information to other people in the same raid group
yellowfive@57 297 local function sendVersionInfo()
yellowfive@57 298
yellowfive@57 299 local realm = GetRealmName()
yellowfive@57 300 local name = UnitName("player")
yellowfive@57 301 local ver = GetAddOnMetadata(Amr.ADDON_NAME, "Version")
yellowfive@57 302
yellowfive@57 303 local msg = string.format("%s\n%s\n%s\n%s", Amr.MessageTypes.Version, realm, name, ver)
yellowfive@57 304 Amr:SendAmrCommMessage(msg)
yellowfive@57 305 end
yellowfive@57 306
yellowfive@57 307 local function onVersionInfoReceived(message)
yellowfive@57 308
yellowfive@57 309 -- message will be of format: realm\nname\nversion
yellowfive@57 310 local parts = {}
yellowfive@57 311 for part in string.gmatch(message, "([^\n]+)") do
yellowfive@57 312 table.insert(parts, part)
yellowfive@57 313 end
yellowfive@57 314
yellowfive@57 315 local key = toGroupVersionKey(parts[2], parts[3])
yellowfive@57 316 local ver = parts[4]
yellowfive@57 317
yellowfive@57 318 Amr.GroupVersions[key] = tonumber(ver)
yellowfive@57 319
yellowfive@57 320 -- make sure that versions are properly pruned in case this message arrived late and the player has since been removed from the group
yellowfive@57 321 pruneVersionInfo()
yellowfive@57 322 end
yellowfive@57 323
yellowfive@57 324 -- get the addon version another person in the player's raid/group is running, or 0 if they are not running the addon
yellowfive@57 325 function Amr:GetAddonVersion(realm, name)
yellowfive@57 326 local ver = Amr.GroupVersions[toGroupVersionKey(realm, name)]
yellowfive@57 327 return ver or 0
yellowfive@57 328 end
yellowfive@57 329
yellowfive@57 330 function Amr:PrintVersions()
yellowfive@57 331
yellowfive@57 332 if not IsInGroup() and not IsInRaid() then
yellowfive@57 333 self:Print(L.VersionChatNotGrouped)
yellowfive@57 334 return
yellowfive@57 335 end
yellowfive@57 336
yellowfive@57 337 local units = self:GetGroupUnitIdentifiers()
yellowfive@57 338
yellowfive@57 339 local msg = {}
yellowfive@57 340 table.insert(msg, L.VersionChatTitle)
yellowfive@57 341
yellowfive@57 342 for i, unitId in ipairs(units) do
yellowfive@57 343 local realm, name = self:GetRealmAndName(unitId)
yellowfive@57 344 if realm then
yellowfive@57 345 local key = toGroupVersionKey(realm, name)
yellowfive@57 346 local ver = Amr.GroupVersions[key]
yellowfive@57 347 if not ver then
yellowfive@57 348 table.insert(msg, key .. " |cFFFF0000" .. L.VersionChatNotInstalled .. "|r")
yellowfive@57 349 else
yellowfive@57 350 table.insert(msg, key .. " v" .. ver)
yellowfive@57 351 end
yellowfive@57 352 end
yellowfive@57 353 end
yellowfive@57 354
yellowfive@57 355 msg = table.concat(msg, "\n")
yellowfive@57 356 print(msg)
yellowfive@57 357 end
yellowfive@57 358
yellowfive@57 359 function Amr:InitializeVersions()
yellowfive@57 360 Amr:AddEventHandler("GROUP_ROSTER_UPDATE", pruneVersionInfo)
yellowfive@57 361 Amr:AddEventHandler("GROUP_ROSTER_UPDATE", sendVersionInfo)
yellowfive@57 362
yellowfive@57 363 -- request version information from anyone in my group upon initialization
yellowfive@57 364 if IsInGroup() or IsInRaid() then
yellowfive@57 365 Amr:SendAmrCommMessage(Amr.MessageTypes.VersionRequest)
yellowfive@57 366 end
yellowfive@57 367 end
yellowfive@57 368
yellowfive@57 369
yellowfive@57 370 ----------------------------------------------------------------------------------------
yellowfive@57 371 -- Generic Helpers
yellowfive@57 372 ----------------------------------------------------------------------------------------
yellowfive@57 373
yellowfive@57 374 local _waitTable = {}
yellowfive@57 375 local _waitFrame = nil
yellowfive@57 376
yellowfive@57 377 -- execute the specified function after the specified delay (in seconds)
yellowfive@57 378 function Amr.Wait(delay, func, ...)
yellowfive@57 379 if not _waitFrame then
yellowfive@57 380 _waitFrame = CreateFrame("Frame", "AmrWaitFrame", UIParent)
yellowfive@57 381 _waitFrame:SetScript("OnUpdate", function (self, elapse)
yellowfive@57 382 local count = #_waitTable
yellowfive@57 383 local i = 1
yellowfive@57 384 while(i <= count) do
yellowfive@57 385 local waitRecord = table.remove(_waitTable, i)
yellowfive@57 386 local d = table.remove(waitRecord, 1)
yellowfive@57 387 local f = table.remove(waitRecord, 1)
yellowfive@57 388 local p = table.remove(waitRecord, 1)
yellowfive@57 389 if d > elapse then
yellowfive@57 390 table.insert(_waitTable, i, { d-elapse, f, p })
yellowfive@57 391 i = i + 1
yellowfive@57 392 else
yellowfive@57 393 count = count - 1
yellowfive@57 394 f(unpack(p))
yellowfive@57 395 end
yellowfive@57 396 end
yellowfive@57 397 end)
yellowfive@57 398 end
yellowfive@57 399 table.insert(_waitTable, { delay, func, {...} })
yellowfive@57 400 return true
yellowfive@57 401 end
yellowfive@57 402
yellowfive@57 403 -- helper to iterate over a table in order by its keys
yellowfive@57 404 function Amr.spairs(t, order)
yellowfive@57 405 -- collect the keys
yellowfive@57 406 local keys = {}
yellowfive@57 407 for k in pairs(t) do keys[#keys+1] = k end
yellowfive@57 408
yellowfive@57 409 -- if order function given, sort by it by passing the table and keys a, b,
yellowfive@57 410 -- otherwise just sort the keys
yellowfive@57 411 if order then
yellowfive@57 412 table.sort(keys, function(a,b) return order(t, a, b) end)
yellowfive@57 413 else
yellowfive@57 414 table.sort(keys)
yellowfive@57 415 end
yellowfive@57 416
yellowfive@57 417 -- return the iterator function
yellowfive@57 418 local i = 0
yellowfive@57 419 return function()
yellowfive@57 420 i = i + 1
yellowfive@57 421 if keys[i] then
yellowfive@57 422 return keys[i], t[keys[i]]
yellowfive@57 423 end
yellowfive@57 424 end
yellowfive@57 425 end
yellowfive@57 426
yellowfive@57 427 function Amr.StartsWith(str, prefix)
yellowfive@57 428 if string.len(str) < string.len(prefix) then return false end
yellowfive@57 429 return string.sub(str, 1, string.len(prefix)) == prefix
yellowfive@57 430 end
yellowfive@57 431
yellowfive@57 432 -- helper to get the unit identifiers (e.g. to pass to GetUnitName) for all members of the player's current group/raid
yellowfive@57 433 function Amr:GetGroupUnitIdentifiers()
yellowfive@57 434
yellowfive@57 435 local units = {}
yellowfive@57 436 if IsInRaid() then
yellowfive@57 437 for i = 1,40 do
yellowfive@57 438 table.insert(units, "raid" .. i)
yellowfive@57 439 end
yellowfive@57 440 elseif IsInGroup() then
yellowfive@57 441 table.insert(units, "player")
yellowfive@57 442 for i = 1,4 do
yellowfive@57 443 table.insert(units, "party" .. i)
yellowfive@57 444 end
yellowfive@57 445 else
yellowfive@57 446 table.insert(units, "player")
yellowfive@57 447 end
yellowfive@57 448
yellowfive@57 449 return units
yellowfive@57 450 end
yellowfive@57 451
yellowfive@57 452 -- helper to get the realm and name from a unitId (e.g. "player" or "raid1")
yellowfive@57 453 function Amr:GetRealmAndName(unitId)
yellowfive@57 454
yellowfive@57 455 local name = GetUnitName(unitId, true)
yellowfive@57 456 if not name then return end
yellowfive@57 457
yellowfive@57 458 local realm = GetRealmName()
yellowfive@57 459 local splitPos = string.find(name, "-")
yellowfive@57 460 if splitPos ~= nil then
yellowfive@57 461 realm = string.sub(name, splitPos + 1)
yellowfive@57 462 name = string.sub(name, 1, splitPos - 1)
yellowfive@57 463 end
yellowfive@57 464
yellowfive@57 465 return realm, name
yellowfive@57 466 end
yellowfive@57 467
yellowfive@57 468 -- find the unitid of a player given the name and realm... this comes from the server so the realm will be in english...
yellowfive@57 469 -- TODO: more robust handling of players with same name but different realms in the same group on non-english clients
yellowfive@57 470 function Amr:GetUnitId(unitRealm, unitName)
yellowfive@57 471
yellowfive@57 472 local nameMatches = {}
yellowfive@57 473
yellowfive@57 474 local units = Amr:GetGroupUnitIdentifiers()
yellowfive@57 475 for i, unitId in ipairs(units) do
yellowfive@57 476 local realm, name = Amr:GetRealmAndName(unitId)
yellowfive@57 477 if realm then
yellowfive@57 478 -- remove spaces to ensure proper matches
yellowfive@57 479 realm = string.gsub(realm, "%s+", "")
yellowfive@57 480 unitRealm = string.gsub(unitRealm, "%s+", "")
yellowfive@57 481
yellowfive@57 482 if unitRealm == realm and unitName == name then return unitId end
yellowfive@57 483 if unitName == name then
yellowfive@57 484 table.insert(nameMatches, unitId)
yellowfive@57 485 end
yellowfive@57 486 end
yellowfive@57 487 end
yellowfive@57 488
yellowfive@57 489 -- only one player with same name, must be the player of interest
yellowfive@57 490 if #nameMatches == 1 then return nameMatches[1] end
yellowfive@57 491
yellowfive@57 492 -- could not find or ambiguous
yellowfive@57 493 return nil
yellowfive@57 494 end
yellowfive@57 495
yellowfive@57 496
yellowfive@57 497 -- scanning tooltip b/c for some odd reason the api has no way to get basic item properties...
yellowfive@57 498 -- so you have to generate a fake item tooltip and search for pre-defined strings in the display text
yellowfive@57 499 local _scanTt
yellowfive@57 500 function Amr:GetScanningTooltip()
yellowfive@57 501 if not _scanTt then
yellowfive@57 502 _scanTt = CreateFrame("GameTooltip", "AmrUiScanTooltip", nil, "GameTooltipTemplate")
yellowfive@57 503 _scanTt:SetOwner(UIParent, "ANCHOR_NONE")
yellowfive@57 504 end
yellowfive@57 505 return _scanTt
yellowfive@57 506 end
yellowfive@57 507
yellowfive@57 508 local function scanTooltipHelper(txt, ...)
yellowfive@57 509 for i = 1, select("#", ...) do
yellowfive@57 510 local region = select(i, ...)
yellowfive@57 511 if region and region:GetObjectType() == "FontString" then
yellowfive@57 512 local text = region:GetText() -- string or nil
yellowfive@57 513 print(text)
yellowfive@57 514 end
yellowfive@57 515 end
yellowfive@57 516 end
yellowfive@57 517
yellowfive@57 518 -- search the tooltip for txt, returns true if it is encountered on any line
yellowfive@57 519 function Amr:IsTextInTooltip(tt, txt)
yellowfive@57 520 local regions = { tt:GetRegions() }
yellowfive@57 521 for i, region in ipairs(regions) do
yellowfive@57 522 if region and region:GetObjectType() == "FontString" then
yellowfive@57 523 if region:GetText() == txt then
yellowfive@57 524 return true
yellowfive@57 525 end
yellowfive@57 526 end
yellowfive@57 527 end
yellowfive@57 528 return false
yellowfive@57 529 end
yellowfive@57 530
yellowfive@59 531 -- helper to determine if we can equip an item (it is already soulbound or account bound)
yellowfive@59 532 function Amr:CanEquip(bagId, slotId)
yellowfive@57 533 local tt = self:GetScanningTooltip()
yellowfive@57 534 tt:ClearLines()
yellowfive@57 535 if bagId then
yellowfive@57 536 tt:SetBagItem(bagId, slotId)
yellowfive@57 537 else
yellowfive@57 538 tt:SetInventoryItem("player", slotId)
yellowfive@57 539 end
yellowfive@59 540 if self:IsTextInTooltip(tt, ITEM_SOULBOUND) then return true end
yellowfive@59 541 if self:IsTextInTooltip(tt, ITEM_BNETACCOUNTBOUND) then return true end
yellowfive@59 542 if self:IsTextInTooltip(tt, ITEM_ACCOUNTBOUND) then return true end
yellowfive@57 543 end
yellowfive@57 544
yellowfive@57 545 -- helper to determine if an item has a unique constraint
yellowfive@57 546 function Amr:IsUnique(bagId, slotId)
yellowfive@57 547 local tt = self:GetScanningTooltip()
yellowfive@57 548 tt:ClearLines()
yellowfive@57 549 if bagId then
yellowfive@57 550 tt:SetBagItem(bagId, slotId)
yellowfive@57 551 else
yellowfive@57 552 tt:SetInventoryItem("player", slotId)
yellowfive@57 553 end
yellowfive@57 554 if self:IsTextInTooltip(tt, ITEM_UNIQUE_EQUIPPABLE) then return true end
yellowfive@57 555 if self:IsTextInTooltip(tt, ITEM_UNIQUE) then return true end
yellowfive@57 556 return false
yellowfive@57 557 end
yellowfive@57 558
yellowfive@57 559
yellowfive@57 560 ----------------------------------------------------------------------------------------
yellowfive@57 561 -- Inter-Addon Communication
yellowfive@57 562 ----------------------------------------------------------------------------------------
yellowfive@57 563 function Amr:SendAmrCommMessage(message, channel)
yellowfive@57 564 -- prepend version to all messages
yellowfive@57 565 local v = GetAddOnMetadata(Amr.ADDON_NAME, "Version")
yellowfive@57 566 message = v .. "\r" .. message
yellowfive@57 567
yellowfive@57 568 Amr:SendCommMessage(Amr.ChatPrefix, message, channel or "RAID")
yellowfive@57 569 end
yellowfive@57 570
yellowfive@57 571 function Amr:OnCommReceived(prefix, message, distribution, sender)
yellowfive@57 572
yellowfive@57 573 local parts = {}
yellowfive@57 574 for part in string.gmatch(message, "([^\r]+)") do
yellowfive@57 575 table.insert(parts, part)
yellowfive@57 576 end
yellowfive@57 577
yellowfive@57 578 local ver = parts[1]
yellowfive@57 579 if ver then ver = tonumber(ver) end
yellowfive@57 580 if ver then
yellowfive@57 581 -- newest versions of the addon start all messages with a version number
yellowfive@57 582 message = parts[2]
yellowfive@57 583 end
yellowfive@57 584
yellowfive@57 585 -- we always allow version checks, even from old versions of the addon that aren't otherwise compatible
yellowfive@57 586 if Amr.StartsWith(message, Amr.MessageTypes.Version) then
yellowfive@57 587 -- version checking between group members
yellowfive@57 588 if Amr.StartsWith(message, Amr.MessageTypes.VersionRequest) then
yellowfive@57 589 sendVersionInfo()
yellowfive@57 590 else
yellowfive@57 591 onVersionInfoReceived(message)
yellowfive@57 592 end
yellowfive@57 593
yellowfive@57 594 return
yellowfive@57 595 end
yellowfive@57 596
yellowfive@57 597 -- any other kind of message is ignored if the version is too old
yellowfive@57 598 if not ver or ver < Amr.MIN_ADDON_VERSION then return end
yellowfive@57 599
yellowfive@57 600 if Amr.StartsWith(message, Amr.MessageTypes.Team) then
yellowfive@57 601 -- if fully initialized, process team optimizer messages
yellowfive@57 602 if Amr["ProcessTeamMessage"] then
yellowfive@57 603 Amr:ProcessTeamMessage(message)
yellowfive@57 604 end
yellowfive@57 605 else
yellowfive@57 606 -- if we are fully loaded, process a player snapshot when it is received (combat logging)
yellowfive@57 607 if Amr["ProcessPlayerSnapshot"] then
yellowfive@57 608 self:ProcessPlayerSnapshot(message)
yellowfive@57 609 end
yellowfive@57 610 end
yellowfive@57 611 end
yellowfive@57 612
yellowfive@57 613
yellowfive@57 614 ----------------------------------------------------------------------------------------
yellowfive@57 615 -- Events
yellowfive@57 616 ----------------------------------------------------------------------------------------
yellowfive@57 617 local _eventHandlers = {}
yellowfive@57 618
yellowfive@57 619 local function handleEvent(eventName, ...)
yellowfive@57 620 local list = _eventHandlers[eventName]
yellowfive@57 621 if list then
yellowfive@57 622 --print(eventName .. " handled")
yellowfive@57 623 for i, handler in ipairs(list) do
yellowfive@57 624 if type(handler) == "function" then
yellowfive@57 625 handler(select(1, ...))
yellowfive@57 626 else
yellowfive@57 627 Amr[handler](Amr, select(1, ...))
yellowfive@57 628 end
yellowfive@57 629 end
yellowfive@57 630 end
yellowfive@57 631 end
yellowfive@57 632
yellowfive@57 633 -- WoW and Ace seem to work on a "one handler" kind of approach to events (as far as I can tell from the sparse documentation of both).
yellowfive@57 634 -- This is a simple wrapper to allow adding multiple handlers to the same event, thus allowing better encapsulation of code from file to file.
yellowfive@57 635 function Amr:AddEventHandler(eventName, methodOrName)
yellowfive@57 636 local list = _eventHandlers[eventName]
yellowfive@57 637 if not list then
yellowfive@57 638 list = {}
yellowfive@57 639 _eventHandlers[eventName] = list
yellowfive@57 640 Amr:RegisterEvent(eventName, handleEvent)
yellowfive@57 641 end
yellowfive@57 642 table.insert(list, methodOrName)
yellowfive@57 643 end
yellowfive@57 644
yellowfive@57 645 Amr:AddEventHandler("PLAYER_ENTERING_WORLD", onPlayerEnteringWorld)
yellowfive@57 646
yellowfive@57 647
yellowfive@57 648 ----------------------------------------------------------------------------------------
yellowfive@57 649 -- Debugging
yellowfive@57 650 ----------------------------------------------------------------------------------------
yellowfive@57 651 --[[
yellowfive@57 652 function Amr:Test(val1, val2, val3)
yellowfive@57 653
yellowfive@57 654 local link = GetLootSlotLink(tonumber(val1))
yellowfive@57 655 local index = Amr:TestLootIndex(link)
yellowfive@57 656 print("loot index: " .. index)
yellowfive@57 657
yellowfive@57 658 if val2 then
yellowfive@57 659 local candidate = Amr:TestLootCandidate(link, val2, val3)
yellowfive@57 660 print("loot candidate: " .. candidate)
yellowfive@57 661
yellowfive@57 662 GiveMasterLoot(index, candidate)
yellowfive@57 663 end
yellowfive@57 664 end
yellowfive@57 665 ]]