Mercurial > wow > askmrrobot

annotate Core.lua @ 105:3ce266c86bd3

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