Mercurial > wow > buffalo2

annotate Init.lua @ 6:589de8ea05b9

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
- validate tracked objects' existence by use of those handler.Info tables we made - apply collision checking to action buttons when their corresponding entry has scrolled out
author Nenue
date Fri, 01 Apr 2016 01:30:42 -0400
parents 3397aae1f44d
children 9455693fc290
rev   line source
Nenue@0 1 --- Modulizer framework
Nenue@0 2 -- OnInitialize
Nenue@0 3 -- OnUpdate
Nenue@0 4 -- OnEnable -- run when GetSpecialization() returns true
Nenue@0 5
Nenue@0 6 local ADDON, A = ...
Nenue@0 7 Veneer = Veneer or CreateFrame('Frame', 'Veneer', UIParent)
Nenue@0 8 local B = Veneer
Nenue@3 9 local wipe, min, max, random, tinsert, tremove = table.wipe, math.min, math.max, math.random, table.insert, table.remove
Nenue@0 10 local pairs, ipairs, select, unpack, _G = pairs, ipairs, select, unpack, _G
Nenue@0 11 local type, tostring, format = type, tostring, string.format
Nenue@0 12 A.frame = B
Nenue@0 13
Nenue@0 14 --- Cache tables
Nenue@0 15 local initOnced
Nenue@0 16 local modules = {}
Nenue@0 17 local queuedModules = {}
Nenue@3 18 local checkForConfig = {}
Nenue@0 19 local moduleStack = {
Nenue@0 20 }
Nenue@0 21
Nenue@0 22 --- Various region categories
Nenue@0 23 B.displays = {}
Nenue@0 24 B.configLayers = {}
Nenue@0 25 B.configLayersRef = {}
Nenue@0 26
Nenue@0 27 --@debug@
Nenue@0 28 --- Generates a print handler pointing to a static channel signature
Nenue@0 29 -- @usage func = B.print(sig)
Nenue@0 30 -- @param sig channel name or number
Nenue@0 31 local printfuncs = {}
Nenue@0 32 B.print = function(pref, ...)
Nenue@0 33 if Devian and Devian.InWorkspace() then
Nenue@0 34 printfuncs[pref] = printfuncs[pref] or function(...) print(pref, ...) end
Nenue@0 35
Nenue@0 36 return printfuncs[pref]
Nenue@0 37 else
Nenue@0 38 return function () end
Nenue@0 39 end
Nenue@0 40 end
Nenue@0 41
Nenue@0 42 local rgb = {}
Nenue@0 43 local getcolor = function()
Nenue@0 44 local n, p = 0, 4
Nenue@0 45 for i = 1, 3 do
Nenue@0 46 rgb[i] = min(random(n,p) * 64, 255)
Nenue@0 47 if rgb[i] == 255 then
Nenue@0 48 p = 4
Nenue@0 49 elseif rgb[i] > 0 then
Nenue@0 50 n = 2
Nenue@0 51 end
Nenue@0 52 end
Nenue@0 53 return unpack(rgb)
Nenue@0 54 end
Nenue@0 55
Nenue@0 56 local color = {}
Nenue@0 57 local fprints = {}
Nenue@0 58 B.fprint = function()
Nenue@0 59 if not (Devian and Devian.InWorkspace()) then
Nenue@0 60 return function() end
Nenue@0 61 end
Nenue@0 62
Nenue@0 63
Nenue@0 64 local sig = debugstack(2,1)
Nenue@0 65 if fprints[sig] then
Nenue@0 66 return fprints[sig]
Nenue@0 67 end
Nenue@0 68
Nenue@0 69 local func = sig:match("%`(%a+)%'")
Nenue@0 70 if not func then
Nenue@0 71 func = sig:match("<(.-)>")
Nenue@0 72 end
Nenue@0 73 func = func:gsub('(%l+)(%u)', function(a, b) return a:sub(0,2) .. b end, 1)
Nenue@0 74 func = func:gsub('^.+%\\', '')
Nenue@0 75 if not func then
Nenue@0 76 func = 'noname'
Nenue@0 77 end
Nenue@0 78
Nenue@0 79 local r, g, b = getcolor()
Nenue@0 80 color[sig] = color[sig] or format('|cFF%02X%02X%02X%s|r', r, g, b, func)
Nenue@0 81
Nenue@0 82 --print(color[func] .. ' ( ' .. table.concat(args, ', ')..' )' )
Nenue@0 83 func = B.print(func)
Nenue@0 84 fprints[sig] = func
Nenue@0 85 return func
Nenue@0 86 end
Nenue@0 87
Nenue@0 88 --@end-debug@
Nenue@0 89 --[=[@non-debug@
Nenue@0 90 B.print = function() end
Nenue@0 91 --@end-non-debug@]=]
Nenue@0 92
Nenue@0 93 -- for the Mikk script
Nenue@0 94 -- GLOBALS: NUM_LE_RAID_BUFF_TYPES
Nenue@0 95 -- GLOBALS: BUFF_FLASH_TIME_ON, BUFF_FLASH_TIME_OFF, BUFF_MIN_ALPHA, BUFF_WARNING_TIME, BUFF_DURATION_WARNING_TIME
Nenue@0 96 -- GLOBALS: BUFFS_PER_ROW, BUFF_MAX_DISPLAY, BUFF_ACTUAL_DISPLAY, DEBUFF_MAX_DISPLAY, DEBUFF_ACTUAL_DISPLAY, BUFF_ROW_SPACING
Nenue@0 97 -- GLOBALS: CONSOLIDATED_BUFFS_PER_ROW, CONSOLIDATED_BUFF_ROW_HEIGHT, NUM_TEMP_ENCHANT_FRAMES
Nenue@0 98 -- GLOBALS: BUFF_BUTTON_HEIGHT, BUFF_FRAME_BASE_EXTENT, BUFF_HORIZ_SPACING
Nenue@0 99
Nenue@0 100 local print = B.print('Bfl')
Nenue@0 101
Nenue@0 102 --- Template for making perpendicular traversals of the displays structure; also makes sure the table is there
Nenue@0 103 B.Abstract = function(dest, key, table)
Nenue@0 104 if table then
Nenue@0 105 for _, v in pairs(dest) do
Nenue@0 106 v[key] = {}
Nenue@0 107 end
Nenue@0 108 end
Nenue@0 109 B[key] = setmetatable({}, {
Nenue@0 110 __index = function(t, k)
Nenue@0 111 return dest[k][key]
Nenue@0 112 end,
Nenue@0 113 __newindex = function(_, k, v)
Nenue@0 114 print('abstract write ('..key..'):', k)
Nenue@0 115 dest[k][key] = v
Nenue@0 116 end,
Nenue@0 117 __tostring = function() return 'Abstract:'..key..'' end
Nenue@0 118 })
Nenue@0 119
Nenue@0 120
Nenue@0 121 return B[key]
Nenue@0 122 end
Nenue@0 123
Nenue@0 124
Nenue@0 125 --- localize for speed
Nenue@0 126 local layers, refs, displays = B.configLayers, B.configLayersRef, B.displays
Nenue@0 127
Nenue@0 128 local ModulesCall = function(func)
Nenue@0 129
Nenue@0 130 local n = 0
Nenue@0 131 for i = 1, #moduleStack do
Nenue@0 132 print('calling level '..i)
Nenue@0 133 local stackset = moduleStack[i]
Nenue@0 134
Nenue@0 135 for name, module in pairs(stackset) do
Nenue@0 136 n = n + 1
Nenue@0 137 print(n..' '..name..'.'..func..'()')
Nenue@0 138
Nenue@0 139
Nenue@0 140 if module[func] then
Nenue@0 141 module[func](module)
Nenue@0 142 end
Nenue@0 143 end
Nenue@0 144 end
Nenue@0 145 end
Nenue@0 146
Nenue@0 147
Nenue@0 148 local Enable = function()
Nenue@0 149 end
Nenue@0 150
Nenue@0 151 --- The things that happen repeatedly
Nenue@0 152 local Init = function ()
Nenue@0 153 end
Nenue@0 154
Nenue@0 155
Nenue@0 156 --- Things that happen immediately upon entering world
Nenue@0 157 local InitOnce = function()
Nenue@0 158 print('entering world first time')
Nenue@0 159 local defaults = B.ConfDefaults
Nenue@0 160 print('|cFFFFFF00Veneer|r')
Nenue@0 161 if not VeneerData then
Nenue@0 162 VeneerData = {}
Nenue@0 163 for k,v in pairs(defaults) do
Nenue@0 164 VeneerData[k] = v
Nenue@0 165 end
Nenue@0 166 print('Veneer defaults being used.')
Nenue@0 167 end
Nenue@0 168
Nenue@0 169 B.Conf = setmetatable(VeneerData, {__index = function(_, k) return defaults[k] end})
Nenue@0 170
Nenue@0 171 -- suffix tables
Nenue@0 172 for name, display in pairs(displays) do
Nenue@0 173 display.conf = setmetatable({}, {
Nenue@0 174 __index = function(_, k)
Nenue@0 175 --print('config check '.. name .. k)
Nenue@0 176 return B.Conf[name .. k] or B.Conf['BuffButton' .. k]
Nenue@0 177 end,
Nenue@0 178 __newindex = function(_, k , v)
Nenue@0 179 B.Conf[name..k] = v
Nenue@0 180 end,
Nenue@0 181 })
Nenue@0 182 end
Nenue@0 183
Nenue@0 184 -- To ensure that modules are run in controlled order, walk the dependency list; if the dep shows up
Nenue@0 185 -- in the loaded manifest, remove the value. If the dep list isn't empty, move that module to the next
Nenue@0 186 -- layer.
Nenue@0 187 local loaded = {}
Nenue@0 188 local stackLevels = #moduleStack
Nenue@0 189 local i = 1
Nenue@0 190 moduleStack[1] = modules
Nenue@0 191 repeat
Nenue@0 192 print('setting init level '.. i)
Nenue@0 193 local queue = moduleStack[i]
Nenue@0 194 for name, module in pairs(queue) do
Nenue@0 195
Nenue@0 196 if queuedModules[name] and #queuedModules[name] > 0 then
Nenue@0 197 local p = #queuedModules[name]
Nenue@0 198 for j = 1, p do
Nenue@0 199 local dep = queuedModules[name][j]
Nenue@0 200
Nenue@0 201 if loaded[dep] then
Nenue@0 202 print( ' ' .. dep .. ' OK')
Nenue@0 203 queuedModules[name][j] = nil
Nenue@0 204 for k = j, p do
Nenue@0 205 print(' shift ' .. (k+1) .. ' ('..tostring(queuedModules[name][k+1])..') to ' .. k ..'')
Nenue@0 206 queuedModules[name][k] = queuedModules[name][k+1]
Nenue@0 207 end
Nenue@0 208 end
Nenue@0 209 end
Nenue@0 210
Nenue@0 211 if #queuedModules[name] == 0 then
Nenue@0 212 queuedModules[name] = nil
Nenue@0 213 print(' |cFF00FFFF'.. name ..'|r deps OK')
Nenue@0 214 loaded[name] = true
Nenue@0 215 else
Nenue@0 216
Nenue@0 217 print(' |cFFFF8800' .. name ..'|r pending')
Nenue@0 218 local next = i+1
Nenue@0 219 if not moduleStack[next] then
Nenue@0 220 moduleStack[next] = {}
Nenue@0 221 end
Nenue@0 222 stackLevels = next
Nenue@0 223 moduleStack[next][name] = module
Nenue@0 224 queue[name] = nil
Nenue@0 225 end
Nenue@0 226
Nenue@0 227 else
Nenue@0 228 print(' |cFF00FF00'.. name ..'|r no deps')
Nenue@0 229 loaded[name] = true
Nenue@0 230 end
Nenue@0 231 end
Nenue@0 232 i = i + 1
Nenue@0 233 until i > stackLevels
Nenue@0 234
Nenue@0 235
Nenue@0 236 for level, batch in ipairs(moduleStack) do
Nenue@0 237 print('config level', level)
Nenue@0 238 for name, module in pairs(batch) do
Nenue@0 239 print('integrity check', name)
Nenue@0 240
Nenue@0 241 --[===[@non-debug@
Nenue@0 242 if module.defaults and not VeneerData[name] then
Nenue@0 243 --@end-non-debug@]===]
Nenue@0 244 print('Adding defaults from module ', name)
Nenue@0 245 VeneerData[name] = module.default
Nenue@0 246 --[===[@non-debug@
Nenue@0 247 end
Nenue@0 248 --@end-non-debug@]===]
Nenue@0 249 end
Nenue@0 250 end
Nenue@3 251
Nenue@3 252
Nenue@3 253 if #checkForConfig >= 1 then
Nenue@3 254 local queuedFrame = tremove(checkForConfig)
Nenue@3 255 while queuedFrame do
Nenue@3 256 B.SetConfigLayers(queuedFrame)
Nenue@3 257 B.InitXMLFrame(queuedFrame)
Nenue@3 258 queuedFrame = tremove(checkForConfig)
Nenue@3 259 end
Nenue@3 260 end
Nenue@0 261 -- remove from existing
Nenue@0 262 end
Nenue@0 263
Nenue@0 264 --- Fires an update to all modules
Nenue@0 265 local lastUpdate
Nenue@0 266 function B.UpdateAll(...)
Nenue@0 267 lastUpdate = GetTime()
Nenue@0 268 ModulesCall('OnUpdate', lastUpdate)
Nenue@0 269 end
Nenue@0 270
Nenue@0 271 B:RegisterEvent('PLAYER_ENTERING_WORLD')
Nenue@0 272 B:SetScript('OnEvent', function(self, event)
Nenue@0 273 if event == 'PLAYER_ENTERING_WORLD' then
Nenue@0 274 if not initOnced then
Nenue@0 275 InitOnce()
Nenue@0 276 ModulesCall('OnInitialize')
Nenue@0 277 initOnced = true
Nenue@0 278 C_Timer.After(1, function()
Nenue@0 279 if GetSpecialization() then
Nenue@0 280 print(GetSpecialization(), 'enabling')
Nenue@0 281 ModulesCall('OnEnable')
Nenue@0 282 B:SetScript('OnUpdate', nil)
Nenue@0 283 end
Nenue@0 284
Nenue@0 285 end)
Nenue@0 286 end
Nenue@0 287
Nenue@0 288 end
Nenue@0 289
Nenue@0 290 B.UpdateAll()
Nenue@0 291 end)
Nenue@0 292
Nenue@0 293 --- Modulizer method
Nenue@0 294 --
Nenue@0 295 function B:RegisterModule (name, module, ...)
Nenue@0 296 if modules[name] then
Nenue@0 297 print('pulling modules[|cFFFF8800'.. tostring(name) ..'|r]')
Nenue@0 298 return modules[name]
Nenue@0 299 end
Nenue@0 300
Nenue@0 301 print('new module |cFF00BBFF'.. tostring(name) ..'|r')
Nenue@0 302 if module then
Nenue@0 303 if modules[name] then
Nenue@0 304 error("Module table for '"..tostring(name).."' already exists.")
Nenue@0 305 end
Nenue@0 306 else
Nenue@0 307 module = CreateFrame('Frame', 'Veneer' .. tostring(name) .. 'Handler', B, 'VeneerHandlerTemplate')
Nenue@0 308 end
Nenue@0 309 modules[name] = module
Nenue@3 310 B[name] = module
Nenue@0 311 if select('#', ...) >= 1 then
Nenue@0 312 local numDeps = select('#', ...)
Nenue@0 313 print(' '..numDeps..' deps detected')
Nenue@0 314 for i = 1, numDeps do
Nenue@0 315 local dep = select(i, ...)
Nenue@0 316 -- means that init/enable funcs are ordered to run after deps do their things
Nenue@0 317 queuedModules[name] = queuedModules[name] or {}
Nenue@0 318 tinsert(queuedModules[name], dep)
Nenue@0 319 print(' needs '..dep)
Nenue@0 320 end
Nenue@0 321 end
Nenue@0 322 return module
Nenue@0 323 end
Nenue@0 324
Nenue@0 325
Nenue@0 326 B.SetConfigLayers = function(frame)
Nenue@0 327 local print = B.fprint()
Nenue@0 328 if not frame.config then
Nenue@0 329 print(frame:GetName(), 'has no config layers')
Nenue@0 330 return
Nenue@0 331 end
Nenue@0 332 print('Registering config layers from', frame:GetName())
Nenue@0 333
Nenue@0 334 for i, subframe in ipairs(frame.config) do
Nenue@0 335 -- make sure there are no duplicates
Nenue@0 336 if not refs[subframe] then
Nenue@0 337 local key = #layers+1
Nenue@0 338 layers[key] = subframe
Nenue@0 339 refs[subframe] = key
Nenue@0 340 end
Nenue@0 341 print(' ', i, subframe:GetName())
Nenue@0 342 end
Nenue@0 343 end
Nenue@0 344
Nenue@0 345 B.RemoveConfigLayers = function(frame)
Nenue@3 346
Nenue@0 347 local print = B.fprint()
Nenue@0 348 print('|cFFFF0000RemoveConfigLayers', frame:GetName())
Nenue@0 349 for i, subframe in pairs(layers) do
Nenue@0 350 if subframe:GetParent() == frame then
Nenue@0 351 print('|cFFFF8800 ', subframe:GetParent():GetName(), '|cFFFFFF00', subframe:GetName())
Nenue@0 352 layers[i]:Hide()
Nenue@0 353 layers[i] = nil
Nenue@0 354 refs[subframe] = nil
Nenue@0 355 end
Nenue@0 356 end
Nenue@0 357 end
Nenue@0 358
Nenue@0 359 B.UpdateConfigLayers = function()
Nenue@0 360 local print = B.fprint()
Nenue@0 361 local func = B.Conf.GuidesMode and 'Show' or 'Hide'
Nenue@0 362 local numAnchors = 0
Nenue@0 363 for name, display in pairs(displays) do
Nenue@0 364 numAnchors = numAnchors + 1
Nenue@0 365 display.anchor:EnableMouse(B.Conf.GuidesMode)
Nenue@0 366 if B.Conf.GuidesMode then
Nenue@0 367 display.anchor:SetScript('OnUpdate', display.anchor.OnUpdate)
Nenue@0 368 else
Nenue@0 369 display.anchor:SetScript('OnUpdate', nil)
Nenue@0 370
Nenue@0 371 for i, anchorButton in ipairs(display.anchor.anchorButton) do
Nenue@0 372 anchorButton:Hide()
Nenue@0 373 end
Nenue@0 374
Nenue@0 375 end
Nenue@0 376
Nenue@0 377 end
Nenue@0 378 for id, region in pairs(layers) do
Nenue@0 379 print(id, region:GetName(), func)
Nenue@0 380 region[func](region)
Nenue@0 381 end
Nenue@0 382
Nenue@0 383 print('['..func..'] updated', #layers, 'regions,', numAnchors, 'frames')
Nenue@3 384 end
Nenue@3 385
Nenue@3 386 --- Generic handlers for keeping track of XML-defined frames
Nenue@3 387 B.OnLoad = function(self)
Nenue@3 388 tinsert(checkForConfig, self)
Nenue@3 389 end
Nenue@3 390
Nenue@3 391 B.InitXMLFrame = function(self)
Nenue@3 392 print('|cFF00FF00hello from '..self:GetName())
Nenue@3 393
Nenue@3 394 self:RegisterForDrag('LeftButton')
Nenue@3 395 if not B.Conf.FramePosition then
Nenue@3 396 B.Conf.FramePosition = {}
Nenue@3 397 end
Nenue@3 398 if B.Conf.FramePosition[self:GetName()] then
Nenue@3 399 print('restoring frame position', unpack(B.Conf.FramePosition[self:GetName()]))
Nenue@3 400 self:ClearAllPoints()
Nenue@3 401 local anchorTo, relativePoint, x, y = unpack(B.Conf.FramePosition[self:GetName()])
Nenue@3 402 self:SetPoint(anchorTo, UIParent, relativePoint, x, y)
Nenue@3 403 end
Nenue@3 404 end
Nenue@3 405
Nenue@3 406 B.OnDragStart = function(self)
Nenue@3 407 self.xA = self:GetLeft()
Nenue@3 408 self.yA = self:GetBottom()
Nenue@3 409 self.anchorTo, self.relativeTo, self.relativePoint, self.x, self.y = self:GetPoint(1)
Nenue@3 410 print('acquire anchor', self:GetPoint(1))
Nenue@3 411 print(self:GetName(), 'start moving ('..self.x..', '..self.y..')')
Nenue@3 412 self:StartMoving()
Nenue@3 413 end
Nenue@3 414
Nenue@3 415 B.OnDragStop = function(self)
Nenue@3 416 print(self:GetName(), 'stop moving ('..self:GetLeft()..', '..self:GetBottom()..')')
Nenue@3 417 local xB = self:GetLeft() - self.xA
Nenue@3 418 local yB = self:GetBottom() - self.yA
Nenue@3 419 print('storing anchor point', self.anchorTo, self.relativePoint, self.x + xB, self.y + yB)
Nenue@3 420
Nenue@3 421 self:StopMovingOrSizing()
Nenue@3 422 B.Conf.FramePosition[self:GetName()] = {self.anchorTo, self.relativePoint, self.x + xB, self.y + yB}
Nenue@3 423 B.InitXMLFrame(self)
Nenue@3 424
Nenue@0 425 end