flickerstreak@63: --[[
flickerstreak@63:   ReAction.lua
flickerstreak@63: 
flickerstreak@182:   The ReAction core manages several collections:
flickerstreak@63:     - modules (via AceAddon)
flickerstreak@63:     - bars
flickerstreak@63:     - bar-type constructors
flickerstreak@63:     
flickerstreak@90:   and publishes events when those collections change. It also implements a couple properties
flickerstreak@63:   and has a couple convenience methods which drill down to particular modules.
flickerstreak@63:   
flickerstreak@90:   Most of the "real work" of the addon happens in Bar.lua, Overlay.lua, State.lua, and the various modules.
flickerstreak@63: 
flickerstreak@63:   Events (with handler arguments):
flickerstreak@63:   --------------------------------
flickerstreak@63:   "OnCreateBar" (bar, name)             : after a bar object is created
flickerstreak@63:   "OnDestroyBar" (bar, name)            : before a bar object is destroyed
flickerstreak@63:   "OnEraseBar" (bar, name)              : before a bar config is removed from the profile db
flickerstreak@63:   "OnRenameBar" (bar, oldname, newname) : after a bar is renamed
flickerstreak@63:   "OnRefreshBar" (bar, name)            : after a bar's state has been updated
flickerstreak@63:   "OnConfigModeChanged" (mode)          : after the config mode is changed
flickerstreak@63: 
flickerstreak@63:   ReAction is also an AceAddon-3.0 and contains an AceDB-3.0, which in turn publish more events.
flickerstreak@63: ]]--
flickerstreak@185: local _, addonTable = ...
flickerstreak@185: local ReAction = LibStub("AceAddon-3.0"):NewAddon( "ReAction",
flickerstreak@33:   "AceEvent-3.0"
flickerstreak@30: )
flickerstreak@185: ReAction.version = "1.0"
flickerstreak@175: addonTable.ReAction = ReAction
flickerstreak@27: 
flickerstreak@33: ------ LIBRARIES ------
flickerstreak@63: local callbacks = LibStub("CallbackHandler-1.0"):New(ReAction)
flickerstreak@184: local LKB = LibStub("LibKeyBound-1.0")
flickerstreak@33: local L = LibStub("AceLocale-3.0"):GetLocale("ReAction")
flickerstreak@33: ReAction.L = L
flickerstreak@184: ReAction.LKB = LKB
flickerstreak@182: ReAction.callbacks = callbacks
flickerstreak@33: 
flickerstreak@28: ------ PRIVATE ------
flickerstreak@116: local private = { }
flickerstreak@63: local bars = {}
flickerstreak@63: local defaultBarConfig = {}
flickerstreak@63: 
flickerstreak@116: 
flickerstreak@185: local SelectBar, DestroyBar, InitializeBars, TearDownBars, DeepCopy
flickerstreak@28: do
flickerstreak@28:   local pcall = pcall
flickerstreak@28:   local geterrorhandler = geterrorhandler
flickerstreak@63:   local self = ReAction
flickerstreak@63:   local inited = false
flickerstreak@28: 
flickerstreak@63:   function SelectBar(x)
flickerstreak@28:     local bar, name
flickerstreak@28:     if type(x) == "string" then
flickerstreak@28:       name = x
flickerstreak@63:       bar = self:GetBar(name)
flickerstreak@50:     else
flickerstreak@63:       for k,v in pairs(bars) do
flickerstreak@50:         if v == x then
flickerstreak@28:           name = k
flickerstreak@50:           bar = x
flickerstreak@28:         end
flickerstreak@28:       end
flickerstreak@28:     end
flickerstreak@28:     return bar, name
flickerstreak@28:   end
flickerstreak@28: 
flickerstreak@63:   function DestroyBar(x)
flickerstreak@28:     local bar, name = SelectBar(x)
flickerstreak@63:     if bar and name then
flickerstreak@63:       bars[name] = nil
flickerstreak@63:       callbacks:Fire("OnDestroyBar", bar, name)
flickerstreak@28:       bar:Destroy()
flickerstreak@28:     end
flickerstreak@28:   end
flickerstreak@28: 
flickerstreak@63:   function InitializeBars()
flickerstreak@63:     if not inited then
flickerstreak@63:       for name, config in pairs(self.db.profile.bars) do
flickerstreak@28:         if config then
flickerstreak@63:           self:CreateBar(name, config)
flickerstreak@28:         end
flickerstreak@28:       end
flickerstreak@101:       -- re-anchor and refresh in case anchor order does not match init order
flickerstreak@63:       for name, bar in pairs(bars) do
flickerstreak@63:         bar:ApplyAnchor()
flickerstreak@101:         callbacks:Fire("OnRefreshBar", bar, name)
flickerstreak@63:       end
flickerstreak@63:       inited = true
flickerstreak@28:     end
flickerstreak@28:   end
flickerstreak@28: 
flickerstreak@63:   function TearDownBars()
flickerstreak@63:     for name, bar in pairs(bars) do
flickerstreak@28:       if bar then
flickerstreak@63:         bars[name] = DestroyBar(bar)
flickerstreak@28:       end
flickerstreak@28:     end
flickerstreak@63:     inited = false
flickerstreak@28:   end
flickerstreak@28: 
flickerstreak@63:   function DeepCopy(x)
flickerstreak@28:     if type(x) ~= "table" then
flickerstreak@28:       return x
flickerstreak@28:     end
flickerstreak@28:     local r = {}
flickerstreak@28:     for k,v in pairs(x) do
flickerstreak@28:       r[k] = DeepCopy(v)
flickerstreak@28:     end
flickerstreak@28:     return r
flickerstreak@28:   end
flickerstreak@28: 
flickerstreak@28: end
flickerstreak@28: 
flickerstreak@28: 
flickerstreak@28: ------ HANDLERS ------
flickerstreak@28: function ReAction:OnInitialize()
flickerstreak@28:   self.db = LibStub("AceDB-3.0"):New("ReAction_DB", 
flickerstreak@28:     { 
flickerstreak@28:       profile = {
flickerstreak@28:         bars = { },
flickerstreak@184:         defaultBar = { },
flickerstreak@184:         closeOptionsOnEditorLaunch = true,
flickerstreak@185:         editorCloseOnLaunch = true,
flickerstreak@28:       }
flickerstreak@111:     },
flickerstreak@182:     true -- use global 'Default' (locale-specific)
flickerstreak@28:   )
flickerstreak@184:   LKB.RegisterCallback(self,"LIBKEYBOUND_ENABLED")
flickerstreak@184:   LKB.RegisterCallback(self,"LIBKEYBOUND_DISABLED")
flickerstreak@88: 
flickerstreak@182:   self:RegisterEvent("PLAYER_REGEN_DISABLED")
flickerstreak@63: 
flickerstreak@182:   self:InitializeOptions()
flickerstreak@28: end
flickerstreak@28: 
flickerstreak@28: function ReAction:OnEnable()
flickerstreak@28:   InitializeBars()
flickerstreak@28: end
flickerstreak@28: 
flickerstreak@28: function ReAction:OnDisable()
flickerstreak@28:   TearDownBars()
flickerstreak@28: end
flickerstreak@28: 
flickerstreak@33: function ReAction:PLAYER_REGEN_DISABLED()
flickerstreak@63:   if private.configMode == true then
flickerstreak@63:     self:UserError(L["ReAction config mode disabled during combat."])
flickerstreak@33:     self:SetConfigMode(false)
flickerstreak@88:     self:SetKeybindMode(false)
flickerstreak@185:     self:CloseEditor()
flickerstreak@33:   end
flickerstreak@33: end
flickerstreak@33: 
flickerstreak@88: function ReAction:LIBKEYBOUND_ENABLED( evt )
flickerstreak@88:   self:SetKeybindMode(true)
flickerstreak@88: end
flickerstreak@88: 
flickerstreak@88: function ReAction:LIBKEYBOUND_DISABLED( evt )
flickerstreak@88:   return self:SetKeybindMode(false)
flickerstreak@88: end
flickerstreak@88: 
flickerstreak@33: 
flickerstreak@28: 
flickerstreak@28: ------ API ------
flickerstreak@77: 
flickerstreak@61: function ReAction:UserError(msg)
flickerstreak@61:   -- any user errors should be flashed to the UIErrorsFrame
flickerstreak@61:   UIErrorsFrame:AddMessage(msg)
flickerstreak@61: end
flickerstreak@61: 
flickerstreak@184: function ReAction:RebuildAll()
flickerstreak@184:   TearDownBars()
flickerstreak@184:   InitializeBars()
flickerstreak@184: end
flickerstreak@184: 
flickerstreak@184: 
flickerstreak@63: -- usage:
flickerstreak@91: --  (1) ReAction:CreateBar(name, [cfgTable])
flickerstreak@63: --  (2) ReAction:CreateBar(name, "barType", [nRows], [nCols], [btnSize], [btnSpacing])
flickerstreak@91: function ReAction:CreateBar(name, config, ...)
flickerstreak@91:   local profile = self.db.profile
flickerstreak@91: 
flickerstreak@127:   if name then
flickerstreak@127:     if bars[name] then
flickerstreak@127:       self:UserError(format(L["ReAction: name '%s' already in use"],name))
flickerstreak@127:       return nil
flickerstreak@127:     end
flickerstreak@127:   else
flickerstreak@91:     local prefix = L["Bar "]
flickerstreak@91:     local i = 1
flickerstreak@91:     repeat
flickerstreak@91:       name = prefix..i
flickerstreak@91:       i = i + 1
flickerstreak@91:     until bars[name] == nil
flickerstreak@91:   end
flickerstreak@91: 
flickerstreak@91:   if type(config) == "string" then
flickerstreak@91:     config = defaultBarConfig[config]
flickerstreak@48:     if not config then
flickerstreak@91:       error(("ReAction:CreateBar() - unknown bar type '%s'"):format(tostring(select(1,...))))
flickerstreak@48:     end
flickerstreak@48:     config = DeepCopy(config)
flickerstreak@91:     config.btnRows    = select(1,...) or config.btnRows    or 1
flickerstreak@91:     config.btnColumns = select(2,...) or config.btnColumns or 12
flickerstreak@91:     config.btnWidth   = select(3,...) or config.btnWidth   or 36
flickerstreak@91:     config.btnHeight  = select(3,...) or config.btnHeight  or 36
flickerstreak@91:     config.spacing    = select(4,...) or config.spacing    or 3
flickerstreak@48:     config.width      = config.width or config.btnColumns*(config.btnWidth + config.spacing) + 1
flickerstreak@48:     config.height     = config.height or config.btnRows*(config.btnHeight + config.spacing) + 1
flickerstreak@81:     config.anchor     = config.anchor or "UIParent"
flickerstreak@81:     config.point      = config.point or "BOTTOM"
flickerstreak@81:     config.relpoint   = config.relpoint or "BOTTOM"
flickerstreak@48:     config.y          = config.y or 200
flickerstreak@48:     config.x          = config.x or 0
flickerstreak@48:   end
flickerstreak@91:   config = config or profile.bars[name] or DeepCopy(profile.defaultBar)
flickerstreak@91: 
flickerstreak@91:   profile.bars[name] = config
flickerstreak@91:   local bar = self.Bar:New( name, config )  -- ReAction.Bar defined in Bar.lua
flickerstreak@63:   bars[name] = bar
flickerstreak@63:   callbacks:Fire("OnCreateBar", bar, name)
flickerstreak@63:   if private.configMode then
flickerstreak@33:     bar:ShowControls(true)
flickerstreak@33:   end
flickerstreak@33: 
flickerstreak@28:   return bar
flickerstreak@28: end
flickerstreak@28: 
flickerstreak@28: function ReAction:EraseBar(x)
flickerstreak@28:   local bar, name = SelectBar(x)
flickerstreak@63:   if bar and name then
flickerstreak@63:     callbacks:Fire("OnEraseBar", bar, name)
flickerstreak@28:     DestroyBar(bar)
flickerstreak@28:     self.db.profile.bars[name] = nil
flickerstreak@28:   end
flickerstreak@28: end
flickerstreak@28: 
flickerstreak@28: function ReAction:GetBar(name)
flickerstreak@63:   return bars[name]
flickerstreak@63: end
flickerstreak@63: 
flickerstreak@90: -- returns pairs of name, bar
flickerstreak@63: function ReAction:IterateBars()
flickerstreak@63:   return pairs(bars)
flickerstreak@28: end
flickerstreak@28: 
flickerstreak@28: function ReAction:RenameBar(x, newname)
flickerstreak@28:   local bar, name = SelectBar(x)
flickerstreak@63:   if type(newname) ~= "string" then
flickerstreak@63:     error("ReAction:RenameBar() - second argument must be a string")
flickerstreak@63:   end
flickerstreak@63:   if bar and name and #newname > 0 then
flickerstreak@127:     if newname == name then
flickerstreak@127:       return
flickerstreak@127:     end
flickerstreak@63:     if bars[newname] then
flickerstreak@127:       self:UserError(format(L["ReAction: name '%s' already in use"],newname))
flickerstreak@47:     else
flickerstreak@63:       bars[newname], bars[name] = bars[name], nil
flickerstreak@47:       bar:SetName(newname or "")
flickerstreak@47:       local cfg = self.db.profile.bars
flickerstreak@47:       cfg[newname], cfg[name] = cfg[name], nil
flickerstreak@63:       callbacks:Fire("OnRenameBar", bar, name, newname)
flickerstreak@28:     end
flickerstreak@28:   end
flickerstreak@28: end
flickerstreak@28: 
flickerstreak@63: function ReAction:RefreshBar(x)
flickerstreak@63:   local bar, name = SelectBar(x)
flickerstreak@63:   if bar and name then
flickerstreak@63:     callbacks:Fire("OnRefreshBar", bar, name)
flickerstreak@63:   end
flickerstreak@63: end
flickerstreak@63: 
flickerstreak@53: function ReAction:RegisterBarType( name, config, isDefaultChoice )
flickerstreak@63:   defaultBarConfig[name] = config
flickerstreak@48:   if isDefaultChoice then
flickerstreak@81:     private.defaultBarConfigChoice = name
flickerstreak@48:   end
flickerstreak@185:   self:RefreshEditor()
flickerstreak@48: end
flickerstreak@48: 
flickerstreak@53: function ReAction:UnregisterBarType( name )
flickerstreak@63:   defaultBarConfig[name] = nil
flickerstreak@63:   if private.defaultBarConfigChoice == name then
flickerstreak@63:     private.defaultBarConfigChoice = nil
flickerstreak@48:   end
flickerstreak@185:   self:RefreshEditor()
flickerstreak@48: end
flickerstreak@48: 
flickerstreak@63: function ReAction:IterateBarTypes()
flickerstreak@63:   return pairs(defaultBarConfig)
flickerstreak@63: end
flickerstreak@63: 
flickerstreak@63: function ReAction:GetBarTypeConfig(name)
flickerstreak@63:   if name then
flickerstreak@63:     return defaultBarConfig[name]
flickerstreak@63:   end
flickerstreak@63: end
flickerstreak@63: 
flickerstreak@63: function ReAction:GetBarTypeOptions( fill )
flickerstreak@63:   fill = fill or { }
flickerstreak@63:   for k in self:IterateBarTypes() do
flickerstreak@63:     fill[k] = k
flickerstreak@63:   end
flickerstreak@63:   return fill
flickerstreak@63: end
flickerstreak@63: 
flickerstreak@63: function ReAction:GetDefaultBarType()
flickerstreak@63:   return private.defaultBarConfigChoice
flickerstreak@63: end
flickerstreak@63: 
flickerstreak@33: function ReAction:SetConfigMode( mode )
flickerstreak@77:   if mode ~= private.configMode then
flickerstreak@77:     private.configMode = mode
flickerstreak@77:     callbacks:Fire("OnConfigModeChanged", mode)
flickerstreak@77:   end
flickerstreak@63: end
flickerstreak@63: 
flickerstreak@63: function ReAction:GetConfigMode()
flickerstreak@63:   return private.configMode
flickerstreak@33: end
flickerstreak@38: 
flickerstreak@88: function ReAction:SetKeybindMode( mode )
flickerstreak@88:   if mode ~= private.kbMode then
flickerstreak@88:     if mode then
flickerstreak@184:       LKB:Activate()
flickerstreak@88:     else
flickerstreak@184:       LKB:Deactivate()
flickerstreak@88:     end
flickerstreak@184:     private.kbMode = LKB:IsShown() or false
flickerstreak@88:   end
flickerstreak@88: end
flickerstreak@88: 
flickerstreak@88: function ReAction:GetKeybindMode( mode )
flickerstreak@88:   return private.kbMode
flickerstreak@88: end