Mercurial > wow > askmrrobot

annotate Core.lua @ 106:e635cd648e01 v49

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
7.2 update
author yellowfive
date Tue, 28 Mar 2017 16:10:00 -0700
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 ]]