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