Merge pull request #27 from solocommand/socialite

Socialite Refactor

.pkgmeta

@@ -1,2 +1 @@
-required-dependencies:
-    - 489-titan-panel
+package-as: Socialite

Socialite.lua

@@ -0,0 +1,210 @@
+local addonName, addon = ...
+local L = addon.L
+local ldb = LibStub:GetLibrary("LibDataBroker-1.1")
+local ldbi = LibStub:GetLibrary('LibDBIcon-1.0')
+local function print(...) _G.print("|c259054ffSocialite:|r", ...) end
+
+local function showConfig()
+  InterfaceOptionsFrame_OpenToCategory(addonName)
+  InterfaceOptionsFrame_OpenToCategory(addonName)
+end
+
+local function normal(text)
+  if not text then return "" end
+  return NORMAL_FONT_COLOR_CODE..text..FONT_COLOR_CODE_CLOSE;
+end
+
+local function highlight(text)
+  if not text then return "" end
+  return HIGHLIGHT_FONT_COLOR_CODE..text..FONT_COLOR_CODE_CLOSE;
+end
+
+local function muted(text)
+  if not text then return "" end
+  return DISABLED_FONT_COLOR_CODE..text..FONT_COLOR_CODE_CLOSE;
+end
+
+-- Init & config panel
+do
+	local eventFrame = CreateFrame("Frame", nil, InterfaceOptionsFramePanelContainer)
+  eventFrame:SetScript("OnEvent", function(self, event, loadedAddon)
+    if loadedAddon ~= addonName then return end
+    self:UnregisterEvent("ADDON_LOADED")
+
+    if type(SocialiteSettings) ~= "table" then SocialiteSettings = {minimap={hide=false}} end
+    local sv = SocialiteSettings
+    if type(sv.minimap) ~= "table" then sv.minimap = {hide=false} end
+    if type(sv.ShowLabel) ~= "boolean" then sv.ShowLabel = true end
+    if type(sv.ShowRealID) ~= "boolean" then sv.ShowRealID = true end
+    if type(sv.ShowRealIDApp) ~= "boolean" then sv.ShowRealIDApp = false end
+    if type(sv.ShowRealIDBroadcasts) ~= "boolean" then sv.ShowRealIDBroadcasts = true end
+    if type(sv.ShowRealIDFactions) ~= "boolean" then sv.ShowRealIDFactions = true end
+    if type(sv.ShowRealIDNotes) ~= "boolean" then sv.ShowRealIDNotes = true end
+
+    if type(sv.ShowFriends) ~= "boolean" then sv.ShowFriends = true end
+    if type(sv.ShowFriendsNote) ~= "boolean" then sv.ShowFriendsNote = true end
+
+    if type(sv.ShowGuild) ~= "boolean" then sv.ShowGuild = true end
+    if type(sv.ShowGuildLabel) ~= "boolean" then sv.ShowGuildLabel = true end
+    if type(sv.ShowGuildNote) ~= "boolean" then sv.ShowGuildNote = true end
+    if type(sv.ShowGuildONote) ~= "boolean" then sv.ShowGuildONote = true end
+    if type(sv.ShowSplitRemoteChat) ~= "boolean" then sv.ShowSplitRemoteChat = false end
+    if type(sv.GuildSort) ~= "boolean" then sv.GuildSort = false end
+    if type(sv.GuildSortAscending) ~= "boolean" then sv.GuildSortAscending = false end
+    if type(sv.GuildSortKey) ~= "string" then sv.GuildSortKey = "rank" end
+
+    if type(sv.ShowGroupMembers) ~= "boolean" then sv.ShowGroupMembers = true end
+    if type(sv.ShowStatus) ~= "string" then sv.ShowStatus = "icon" end
+    if type(sv.TooltipInteraction) ~= "string" then sv.TooltipInteraction = "always" end
+
+    addon.db = sv
+
+		SlashCmdList.SOCIALITE = showConfig
+		SLASH_SOCIALITE1 = "/social"
+		SLASH_SOCIALITE2 = "/socialite"
+
+    ldbi:Register(addonName, addon.dataobj, addon.db.minimap)
+
+		self:SetScript("OnEvent", nil)
+	end)
+	eventFrame:RegisterEvent("ADDON_LOADED")
+  addon.frame = eventFrame
+end
+
+-- data text
+do
+  local f = CreateFrame("frame")
+  local text = "..loading.."
+  local tooltip = ""
+  local dataobj = ldb:NewDataObject("Socialite", {
+    type = "data source",
+    icon = "Interface\\FriendsFrame\\BroadcastIcon",
+    text = text,
+    OnEnter = function(frame)
+      addon.tooltip:Clear("LEFT", 0, "RIGHT", "LEFT", "RIGHT")
+      addon.tooltip:SetAutoHideDelay(0.2, frame)
+      addon:updateTooltip(frame)
+      addon.tooltip:SmartAnchorTo(frame)
+      addon.tooltip:Show()
+    end,
+    OnLeave = function()
+      local i = addon.db.TooltipInteraction
+      if i == "never" or (i == "outofcombat" and InCombatLockdown()) then
+        addon.tooltip:Hide()
+      end
+    end,
+    OnClick = function(self, button)
+      if button == "RightButton" then
+        showConfig()
+      else
+        if addon.db.ShowFriends or addon.db.ShowRealID then
+          -- ToggleFriendsFrame(1); -- friends tab
+          -- We want to show the friends tab, but there's a taint issue :/
+          if FriendsFrame:IsShown() then
+            HideUIPanel(FriendsFrame)
+          else
+            ShowUIPanel(FriendsFrame)
+          end
+        end
+
+        if addon.db.ShowGuild then ToggleGuildFrame(1) end
+      end
+    end
+  })
+
+  addon.dataobj = dataobj
+
+  local function updateText()
+    local text = ""
+    local comps = {}
+
+    -- Prefix/guild label
+    if (addon.db.ShowLabel) then
+      if (addon.db.ShowGuildLabel and addon.db.ShowGuild and IsInGuild()) then
+        local guildName = GetGuildInfo("player")
+        text = normal(guildName..": ")
+      else
+        text = L['Socialite']..': '
+      end
+    end
+
+    -- Battle.net Friends
+    local showRealID = addon.db.ShowRealID
+    local showRealIDApp = addon.db.ShowRealIDApp
+    if showRealID then
+      local friendsInGames, friendsInApps = addon:countRealID(showRealID)
+      if showRealID then
+        table.insert(comps, "|cff00A2E8"..friendsInGames.."|r")
+      end
+      if showRealIDApp then
+        table.insert(comps, "|cffcccccc"..friendsInApps.."|r")
+      end
+    end
+
+    -- Character Friends
+    if addon.db.ShowFriends then
+      table.insert(comps, "|cffFFFFFF"..C_FriendList.GetNumOnlineFriends().."|r")
+    end
+
+    -- Guild Members
+    if addon.db.ShowGuild and IsInGuild() then
+      local online, remote = select(2, GetNumGuildMembers())
+      local _, online, remote = GetNumGuildMembers()
+      if addon.db.ShowSplitRemoteChat then
+        remote = remote - online
+      else
+        online, remote = remote, nil
+      end
+      table.insert(comps, "|cff00FF00"..online.."|r")
+      if remote ~= nil then
+        table.insert(comps, "|cff00BB00"..remote.."|r")
+      end
+    end
+
+    dataobj.text = text..table.concat(comps, " |cffffd200/|r ")
+  end
+
+  function addon:updateTooltip(frame)
+    if not frame then return end
+    local ok, message = pcall(function ()
+      addon.tooltip:Clear()
+      addon.tooltip:AddColspanHeader(3, "LEFT", L["Socialite"])
+      addon.tooltip:AddColspanLine(3, "LEFT", muted(L["usageDescription"]))
+      local showRealID = addon.db.ShowRealID
+      local showRealIDApp = addon.db.ShowRealIDApp
+      if (showRealID or showRealIDApp) then
+        local friends, bnet = addon:parseRealID(showRealID)
+        if (showRealID) then
+          addon:renderBattleNet(frame, friends, false, "CollapseRealID")
+          if (showRealIDApp) then
+            addon:renderBattleNet(frame, bnet, true, "CollapseRealIDApp")
+          end
+        end
+      end
+      if (addon.db.ShowFriends) then addon:renderFriends(frame, "CollapseFriends") end
+      if (addon.db.ShowGuild) then addon:renderGuild(frame, "CollapseGuild", "CollapseRemoteChat") end
+    end)
+
+    if (not ok) then
+      print("error: "..message)
+      error(message, 0)
+    end
+  end
+
+  function addon:setDB(key, value)
+    addon.db[key] = value
+    updateText()
+  end
+
+  f:RegisterEvent("PLAYER_ENTERING_WORLD");
+  f:RegisterEvent("PLAYER_LOGIN")
+  f:RegisterEvent("GUILD_ROSTER_UPDATE")
+  f:RegisterEvent("FRIENDLIST_UPDATE")
+  f:RegisterEvent("CHAT_MSG_BN_INLINE_TOAST_BROADCAST")
+  f:RegisterEvent("BN_FRIEND_INFO_CHANGED")
+  f:RegisterEvent("BN_FRIEND_ACCOUNT_ONLINE")
+  f:RegisterEvent("BN_FRIEND_ACCOUNT_OFFLINE")
+
+  f:SetScript("OnEvent", updateText)
+
+end

Socialite.toc

@@ -0,0 +1,20 @@
+## Interface: 90001
+## Title: Socialite
+## Notes: A customizable data broker for displaying friends and guild members.
+## Author: solocommand
+## SavedVariables: SocialiteSettings
+## Version: @project-version@
+## X-ReleaseDate: @project-date-iso@
+## X-License: MIT
+
+embeds.xml
+
+i18n\enUS.lua
+# i18n\deDE.lua
+# i18n\esES.lua
+# i18n\ruRU.lua
+
+tooltip.lua
+functions.lua
+Socialite.lua
+config.lua