BuffWindow.lua

local addonName, vars = ...
local L = vars.L

local bit, math, date, string, select, table, time, tonumber, unpack, wipe, pairs, ipairs =
      bit, math, date, string, select, table, time, tonumber, unpack, wipe, pairs, ipairs

local GetSpellInfo, UnitBuff, UnitIsConnected, UnitIsDeadOrGhost =
      GetSpellInfo, UnitBuff, UnitIsConnected, UnitIsDeadOrGhost

-- Change here and in BigBrother.lua
local spellidmin = 250000 -- minimum allowed spellid in this addon (bfa is > 250000)

local foodmin = 40 -- minimum food stat level to allow

local BarHeight=18
local BarWidth=250
local WindowWidth=BarWidth+32
local TotalBuffs=7
local PlayersShown=8
local RowsCreated=PlayersShown+1
local BuffSpacing=18

local BuffWindow_Functions={}

local BuffWindow_ResizeWindow, BuffWindow_UpdateWindow, BuffWindow_UpdateBuffs

local RL = AceLibrary("Roster-2.1")

vars.svnrev["BuffWindow.lua"] = tonumber(("$Revision: 401 $"):match("%d+"))

-- tie-in for third party addons to add tooltips
-- table maps GUID => {  highlight = boolean, [addonname] = "status text" }
BigBrother.unitstatus = {}
BigBrother.unitstatus.refresh = function()
   if BigBrother_BuffWindow and BigBrother_BuffWindow:IsShown() then
      BigBrother:BuffWindow_Update()
   end
end

local function spellData(spellID, ignoreMissing, ...)
	local name,rank,icon = GetSpellInfo(spellID)
	if (not name) then
	  if (not ignoreMissing) then
	    BigBrother:Print("MISSING BUFF SPELLID: " .. spellID)
	  end
	  name = "UNKNOWN"
	  icon = ""
	end
	return name, icon, spellID, ...
end

--[[ Load up local tables from master spell ID tables ]]

local function currentFlixir(spellID)
  -- return spellID >= 79000 and spellID < 93000 -- cata
  return spellID >= 105600
end

vars.Flasks = {}
for _,v in ipairs(vars.SpellData.flasks) do
	table.insert( vars.Flasks, { spellData(v, nil, nil, not currentFlixir(v)) } )
end

vars.Elixirs_Battle={}
for _,v in ipairs(vars.SpellData.elixirBattle) do
	table.insert( vars.Elixirs_Battle, { spellData(v, nil, nil, not currentFlixir(v)) } )
end

vars.Elixirs_Guardian={}
for _,v in ipairs(vars.SpellData.elixirGuardian) do
	table.insert( vars.Elixirs_Guardian, { spellData(v, nil, nil, not currentFlixir(v)) } )
end
vars.Elixirs={}
for i,v in ipairs(vars.Elixirs_Battle) do
	table.insert( vars.Elixirs, v )
end
for i,v in ipairs(vars.Elixirs_Guardian) do
	table.insert( vars.Elixirs, v )
end

vars.AugmentRunes = {}
for _,v in ipairs(vars.SpellData.AugmentRunes) do
	table.insert( vars.AugmentRunes, { spellData(v) } )
end

vars.VantusRunes = {}
for _,v in ipairs(vars.SpellData.VantusRunes) do
	table.insert( vars.VantusRunes, { spellData(v) } )
end

vars.CombatBuffs = {}
for _,v in ipairs(vars.SpellData.CombatBuffs) do
	table.insert( vars.CombatBuffs, { spellData(v) } )
end

vars.Foodbuffs={}
for i,v in ipairs(vars.SpellData.foods) do
	table.insert(vars.Foodbuffs,  { spellData(v) })
end

local scanfoodcache = {}
local scantt = CreateFrame("GameTooltip", "BigBrotherScanTooltip", UIParent, "GameTooltipTemplate")
local function scanfood(spellid)
  local f = scanfoodcache[spellid]
  if f then return f end
  f = { spellData(spellid) }
  scantt:ClearLines()
  scantt:SetOwner(UIParent, "ANCHOR_NONE");
  scantt:SetSpellByID(spellid)
  local line = getglobal(scantt:GetName() .. "TextLeft3")
  line = line and line:GetText()
  if not line then return f end
  local statval = 0
  for v in string.gmatch(line, "%d+") do  -- assume largest number in tooltip is the statval
     statval = math.max(statval,tonumber(v))
  end
  --if statval >= 100 and string.find(line, ITEM_MOD_STAMINA_SHORT) then -- normalize for MoP stam bonus
    --  statval = statval * 300 / 450
  --end
  --print(spellid, f[1], statval)
  if statval >= foodmin or
     spellid == 66623 then -- bountiful feast
     -- food is good
  elseif statval == 0 then -- scan failed (client cache miss), retry next call
     return f
  else
     -- food is bad
     f[4] = true
  end
  scanfoodcache[spellid] = f
  return f
end

local function Sort_RaidBuffs(a,b)
	if a.totalBuffs ~= b.totalBuffs then
		return a.totalBuffs < b.totalBuffs
	elseif a.buffMask ~= b.buffMask then
		return a.buffMask < b.buffMask
	else
		return a.name < b.name
	end
end

local function Sort_ByClass(a,b)
	if a.class<b.class then
		return true
	elseif a.class>b.class then
		return false
	elseif a.name<b.name then
		return true
	end
	return false
end

local function headerColor(s)
  return "|cffffff00"..s.."|r"
end

-- convenience shorthand for buff table
local DE = "DEATHKNIGHT"
local DH = "DEMONHUNTER"
local DR = "DRUID"
local HU = "HUNTER"
local HP = "HUNTER" -- pet
local MA = "MAGE"
local MO = "MONK"
local PA = "PALADIN"
local PR = "PRIEST"
local RO = "ROGUE"
local SH = "SHAMAN"
local WA = "WARRIOR"
local WK = "WARLOCK"

local function dump_spell_info(class, id, lesserEffect, pettag)
    local info = (class or "*")
    if pettag then info = info.."("..pettag..")" end
    if lesserEffect then info = "["..info.."]" end
    info = info..":"..GetSpellInfo(id)
    GameTooltip:ClearLines()
    GameTooltip:SetOwner(UIParent, "ANCHOR_NONE");
    GameTooltip:SetSpellByID(id)
    for i=1,10 do
      local line = _G["GameTooltipTextLeft"..i]
      line = line and line:GetText()
      if line and #line > 15 then info = info.."/"..line end
    end
    print(info)
end

local function BTspell(class, id, lesserEffect, pettag)
  local name, icon = spellData(id, false)
  if lesserEffect and type(lesserEffect) == "string" and not pettag then
    pettag = lesserEffect
    lesserEffect = false
  end

  if false then -- debugging
    dump_spell_info(class, id, lesserEffect, pettag)
  end

  return name, icon, class, lesserEffect, pettag
end


local BigBrother_BuffTable={
	{
		name=L["Consumables"],
		sortFunc=Sort_RaidBuffs,
		buffs={
			{ 
			  -- stamina 10%
			   {BTspell(PR,21562)},		-- Power Word: Fortitude
			}, 
			{
			   -- int 10%
			   {BTspell(MA,1459)}, 		-- Arcane Intellect
			   -- {BTspell(MA,61316)}, 	-- Dalaran Brilliance
			},
			{ 
			   -- str/agi 10%
			   {BTspell(WA,6673)}, 		-- Battle Shout
			},
			-- vars.Elixirs_Battle,
			-- vars.Elixirs_Guardian,
			-- {}, {},
			vars.Flasks,
      		vars.Foodbuffs,
			vars.AugmentRunes,
			vars.VantusRunes,
		},
		header={
			STAT_STAMINA, 	-- "Stamina"
			STAT_INTELLECT, -- "Intellect"
			STAT_STR_AGI, 	-- "Str/Agi";
			-- {}, {},
			-- {headerColor(L["Battle Elixirs"]),   select(2,spellData(60344))},
			-- {headerColor(L["Guardian Elixirs"]), select(2,spellData(54494))},
			{headerColor(L["Flasks"]),           select(2,spellData(67019))},
			{headerColor(spellData(62349)),      select(2,spellData(62349))},
			{headerColor(L["Augment Runes"]),    select(2,spellData(175457))},
			{headerColor(L["Vantus Rune"]),      select(2,spellData(191464))},
		}
	},
}

-- default each header to the buff spells and icon to first one
for _,page in ipairs(BigBrother_BuffTable) do
  local hiddenBuffs = {
      --[GetSpellInfo(31876)] = true, -- communion doesnt show
    }
  for col = 1, #page.buffs do
    if type(page.header[col]) ~= "table" then
      local label = page.header[col] or ""
      if #label > 0 then label = headerColor(label).."\n " end
      for _,data in ipairs(page.buffs[col]) do
        local spellname = data[1]
	if hiddenBuffs[spellname] then
	  spellname = "("..spellname..")"
	end
        if data[5] and GetLocale() == "enUS" then -- pet tag
          spellname = spellname.." ("..data[5]..")"
        end
	if not data[4] then -- omit lesser effect spells
	  local class = data[3]
	  local color = class and RAID_CLASS_COLORS[class] and RAID_CLASS_COLORS[class].colorStr;
	  local coords = class and CLASS_ICON_TCOORDS[class]
	  local texture = ""
	  if coords then
	    local sz = 256
	    texture = "\124TInterface\\Glues\\CharacterCreate\\UI-CharacterCreate-Classes:16:16:::"..sz..":"..sz..":"..
	              math.floor(coords[1]*sz)..":"..
	              math.floor(coords[2]*sz)..":"..
	              math.floor(coords[3]*sz)..":"..
	              math.floor(coords[4]*sz)..":"..
		      "\124t "
	  end
          if #label > 0 then
            label = label.."\n"
          end
	  if color then
	    spellname = texture.."\124c"..color..spellname.."\124r"
	  end
          label = label..spellname
	end
      end
      page.header[col] = { label, page.buffs[col][1][2] }
    end
  end
end

-- index the buff table to optimize scanning
local BuffTable_index = {}
BigBrother.BuffTable_index = BuffTable_index
for pageid,page in ipairs(BigBrother_BuffTable) do
  for colid, col in ipairs(page.buffs) do
    for order, spellinfo in ipairs(col) do
      spellinfo.page = pageid
      spellinfo.col = colid
      spellinfo.order = order
      local id = spellinfo[1]
      BuffTable_index[id] = BuffTable_index[id] or {}
      table.insert(BuffTable_index[id], spellinfo)
    end
  end
end

function BuffWindow_Functions:CreateBuffRow(parent, xoffset, yoffset)
	local Row=CreateFrame("Button",nil,parent)

	Row:SetPoint("TOPLEFT",parent,"TOPLEFT",xoffset,yoffset)
	Row:SetHeight(BarHeight)
	Row:SetWidth(BarWidth)
	Row:Show()

	Row:SetScript("OnClick", function(self,button)
	      local u = self.unit
	      if u and u ~= "header" and UnitExists(u) and CanInspect(u) and UnitIsConnected(u)
	           and UnitIsVisible(u) and CheckInteractDistance(u, 1) then
	         InspectUnit(u)
	      end end)

	Row:SetScript("OnEnter", function(self)
	      local guid = self.guid
	      local status = guid and BigBrother.unitstatus[guid]
	      if status then
	        GameTooltip:SetOwner(self, "ANCHOR_TOPRIGHT")
		    GameTooltip:ClearLines();
	        local gotone
		for k,v in pairs(status) do
		  if k ~= "highlight" then
		    gotone = true
		    GameTooltip:AddLine(k..": "..v);
		  end
		end
		if gotone then GameTooltip:Show() end
	      end end)
	Row:SetScript("OnLeave", function(self) GameTooltip:Hide() end)

	Row.Background=Row:CreateTexture(nil,"BACKGROUND")
	Row.Background:SetAllPoints(Row)
	Row.Background:SetTexture("Interface\\Buttons\\WHITE8X8.blp")
	Row.Background:SetGradientAlpha("HORIZONTAL",1.0/2,0.0,0.0,0.8,1.0/2,0.0,0.0,0.0)
	Row.Background:Show()

	Row.Name=Row:CreateFontString(nil,"OVERLAY","GameFontNormal")
	Row.Name:SetPoint("LEFT",Row,"LEFT",4,0)
	Row.Name:SetTextColor(1.0,1.0,1.0)
	Row.Name:SetText("Test")



	Row.Buff={}
	for i=1,TotalBuffs do
		Row.Buff[i]=CreateFrame("FRAME",nil,Row)
		Row.Buff[i]:SetPoint("RIGHT",Row,"RIGHT",-4-(TotalBuffs-i)*BuffSpacing,0)
		Row.Buff[i]:SetHeight(16)
		Row.Buff[i]:SetWidth(16)

		Row.Buff[i].texture=Row.Buff[i]:CreateTexture(nil,"OVERLAY")
		Row.Buff[i].texture:SetAllPoints(Row.Buff[i])
		Row.Buff[i].texture:SetTexture("Interface\\Buttons\\UI-CheckBox-Check.blp")

		Row.Buff[i].BuffName = nil
		--GameTooltip:ClearLines();GameTooltip:AddLine(this.BuffName);GameTooltip:Show()
		Row.Buff[i]:SetScript("OnEnter", BuffWindow_Functions.OnEnterBuff)
		Row.Buff[i]:SetScript("OnLeave", BuffWindow_Functions.OnLeaveBuff)
		Row.Buff[i]:EnableMouse(true)
		
		Row.Buff[i].ID = nil
        Row.Buff[i].remTime = 0

		Row.Buff[i]:Show()
	end

	Row.SetPlayer=BuffWindow_Functions.SetPlayer
	Row.SetBuffValue=BuffWindow_Functions.SetBuffValue
	Row.SetBuffIcon=BuffWindow_Functions.SetBuffIcon
	Row.SetBuffName=BuffWindow_Functions.SetBuffName

	return Row
end

function BuffWindow_Functions:OnEnterBuff()
	GameTooltip:SetOwner(self, "ANCHOR_TOPRIGHT")
    GameTooltip:ClearLines()

    if self.unit == "header" then
      --GameTooltip:SetText(self.BuffName) -- sometimes gives weird spacing at bottom
	  for line in self.BuffName:gmatch("[^\n]+") do
	    GameTooltip:AddLine(line)
	  end
	else
        --show buff by id
        self.ID = select(10,AuraUtil.FindAuraByName(self.BuffName, self.unit))
        GameTooltip:AddSpellByID(self.ID)

        --show remaining time in minutes
        self.remTime = math.floor((select(6,AuraUtil.FindAuraByName(self.BuffName, self.unit))-GetTime())/60)

        if self.remTime < 0 then
            GameTooltip:AddLine("unknown time remaining",1,1,1)
        elseif self.remTime > 60 then
            self.remTime = math.floor(self.remTime/60)
            if self.remTime == 1 then
                GameTooltip:AddLine(self.remTime .. " hour remaining",1,1,1)
            else
                GameTooltip:AddLine(self.remTime .. " hours remaining",1,1,1)
            end
        elseif self.remTime == 1 then
            GameTooltip:AddLine(self.remTime .. " minute remaining",1,1,1)
        else
            GameTooltip:AddLine(self.remTime .. " minutes remaining",1,1,1)
        end
    end

	GameTooltip:Show()
end

function BuffWindow_Functions:OnLeaveBuff()
	GameTooltip:Hide()
end


function BuffWindow_Functions:SetPlayer(player,class,unit)
	local guid = UnitGUID(unit)
	self.Name:SetText(player)
	self.unit = unit
	self.guid = guid
	local status = BigBrother.unitstatus[guid]
	if status and status.highlight then
	    self.Name:SetTextColor(1.0,0.2,0.2)
	else
	    self.Name:SetTextColor(1,1,1)
	end
	local color
 	if unit == "header" then
	  color={["r"]=1,["g"]=1,["b"]=1}
	elseif not UnitIsConnected(unit) then
	  color={["r"]=0.5,["g"]=0.5,["b"]=0.5}
	elseif UnitIsDeadOrGhost(unit) then
	  color={["r"]=0.1,["g"]=0.1,["b"]=0.1}
        else
          color=RAID_CLASS_COLORS[class]
	end
	self.Background:SetGradientAlpha("HORIZONTAL",color.r/1.5,color.g/1.5,color.b/1.5,0.8,color.r/1.5,color.g/2,color.b/1.5,0)
end

function BuffWindow_Functions:SetBuffValue(num,enabled)
	if enabled then
		self.Buff[num]:Show()
	else
		self.Buff[num]:Hide()
	end
end

function BuffWindow_Functions:SetBuffIcon(num,texture,dimmed)
	self.Buff[num].texture:SetTexture(texture)
        if dimmed then
	   self.Buff[num].texture:SetAlpha(0.5)
        else
	   self.Buff[num].texture:SetAlpha(1.0)
        end
end

function BuffWindow_Functions:SetBuffName(num,buffName,unit)
	self.Buff[num].BuffName=buffName
	self.Buff[num].unit=unit
end

local update_events = { "UNIT_AURA", "GROUP_ROSTER_UPDATE" }
function BigBrother:RegisterEvents()
  for _,e in pairs(update_events) do
    self:RegisterBucketEvent(e, 0.25, "BuffWindow_Update")
  end
end
function BigBrother:UnregisterEvents()
  self:UnregisterAllBucketEvents()
end

function BigBrother:ToggleBuffWindow()
	if BigBrother_BuffWindow then
		if BigBrother_BuffWindow:IsShown() then
			BigBrother_BuffWindow:Hide()
			self:UnregisterEvents()
		else
			BuffWindow_UpdateBuffs()
			BuffWindow_UpdateWindow()
			BigBrother_BuffWindow:Show()
			self:RegisterEvents()
		end
	else
		self:CreateBuffWindow()
	end
	local scale = BigBrother.db.profile.BuffWindowScale or 1
	BigBrother_BuffWindow:SetScale(scale)
end

function BigBrother:CreateBuffWindow()
	local BuffWindow = CreateFrame("FRAME","BigBrother_BuffWindow",UIParent)

	BuffWindow:SetBackdrop({bgFile = "Interface/Tooltips/UI-Tooltip-Background",
                                            edgeFile = "Interface/Tooltips/UI-Tooltip-Border",
                                            tile = true, tileSize = 16, edgeSize = 16,
                                            insets = { left = 4, right = 4, top = 4, bottom = 4 }});
	BuffWindow:SetBackdropColor(0,0,0,0.5);
	BuffWindow:SetWidth(WindowWidth)
	BuffWindow:SetMovable(true)
	BuffWindow:SetClampedToScreen(true)
	BuffWindow:EnableMouse(true)

  BuffWindow:ClearAllPoints()
	if BigBrother.db.profile.BuffWindow_posX then
     BuffWindow:SetPoint("TOPLEFT", UIParent, "BOTTOMLEFT",
                         BigBrother.db.profile.BuffWindow_posX,
                         BigBrother.db.profile.BuffWindow_posY)
     BuffWindow:SetHeight(BigBrother.db.profile.BuffWindow_height or 190);
	else
     BuffWindow:SetPoint("CENTER",UIParent)
     BuffWindow:SetHeight(190);
	end

	BuffWindow:SetScript("OnMouseDown", function()
						  BigBrother_BuffWindow:StartMoving();
						  BigBrother_BuffWindow.isMoving = true;
						end)
	BuffWindow:SetScript("OnMouseUp", function()
						if ( BigBrother_BuffWindow.isMoving ) then
						  BigBrother_BuffWindow:StopMovingOrSizing();
						  BigBrother_BuffWindow.isMoving = false;
						  BigBrother.db.profile.BuffWindow_posX = BigBrother_BuffWindow:GetLeft();
						  BigBrother.db.profile.BuffWindow_posY = BigBrother_BuffWindow:GetTop();
	                                          BigBrother.db.profile.BuffWindow_height = BigBrother_BuffWindow:GetHeight();
						 end
						end)

	BuffWindow:SetScript("OnHide", function()
						if ( BigBrother_BuffWindow.isMoving ) then
						  BigBrother_BuffWindow:StopMovingOrSizing();
						  BigBrother_BuffWindow.isMoving = false;
						 end
						end)

	BuffWindow:Show()

	BuffWindow.Title=BuffWindow:CreateFontString(nil,"OVERLAY","GameFontNormal")
	BuffWindow.Title:SetPoint("TOP",BuffWindow,"TOP",0,-8)
	BuffWindow.Title:SetTextColor(1.0,1.0,1.0)

	BuffWindow.LeftButton=CreateFrame("Button",nil,BuffWindow)
	BuffWindow.LeftButton:SetNormalTexture("Interface\\Buttons\\UI-SpellbookIcon-PrevPage-Up.blp")
	BuffWindow.LeftButton:SetPushedTexture("Interface\\Buttons\\UI-SpellbookIcon-PrevPage-Down.blp")
	BuffWindow.LeftButton:SetWidth(16)
	BuffWindow.LeftButton:SetHeight(18)
	BuffWindow.LeftButton:SetPoint("TOPLEFT",BuffWindow,"TOPLEFT",64,-5)
	BuffWindow.LeftButton:SetScript("OnClick",function()
							BigBrother_BuffWindow.SelectedBuffs=BigBrother_BuffWindow.SelectedBuffs-1
							if BigBrother_BuffWindow.SelectedBuffs==0 then
								BigBrother_BuffWindow.SelectedBuffs=table.getn(BigBrother_BuffTable)
							end
							BuffWindow_UpdateBuffs()
							BuffWindow_UpdateWindow()
						end)

	BuffWindow.RightButton=CreateFrame("Button",nil,BuffWindow)
	BuffWindow.RightButton:SetNormalTexture("Interface\\Buttons\\UI-SpellbookIcon-NextPage-Up.blp")
	BuffWindow.RightButton:SetPushedTexture("Interface\\Buttons\\UI-SpellbookIcon-NextPage-Down.blp")

	BuffWindow.RightButton:SetWidth(16)
	BuffWindow.RightButton:SetHeight(18)
	BuffWindow.RightButton:SetPoint("TOPRIGHT",BuffWindow,"TOPRIGHT",-64,-5)
	BuffWindow.RightButton:SetScript("OnClick",function()
							BigBrother_BuffWindow.SelectedBuffs=BigBrother_BuffWindow.SelectedBuffs+1
							if BigBrother_BuffWindow.SelectedBuffs>table.getn(BigBrother_BuffTable) then
								BigBrother_BuffWindow.SelectedBuffs=1

							end
							BuffWindow_UpdateBuffs()
							BuffWindow_UpdateWindow()
						end)

	BuffWindow.CloseButton=CreateFrame("Button",nil,BuffWindow)
	BuffWindow.CloseButton:SetNormalTexture("Interface\\Buttons\\UI-Panel-MinimizeButton-Up.blp")
	BuffWindow.CloseButton:SetPushedTexture("Interface\\Buttons\\UI-Panel-MinimizeButton-Down.blp")
	BuffWindow.CloseButton:SetHighlightTexture("Interface\\Buttons\\UI-Panel-MinimizeButton-Highlight.blp")
	BuffWindow.CloseButton:SetWidth(20)
	BuffWindow.CloseButton:SetHeight(20)
	BuffWindow.CloseButton:SetPoint("TOPRIGHT",BuffWindow,"TOPRIGHT",-4,-4)
	BuffWindow.CloseButton:SetScript("OnClick",function() BigBrother_BuffWindow:Hide();self:UnregisterEvents() end)

	BuffWindow.RCButton=CreateFrame("Button", nil, BuffWindow)
	BuffWindow.RCButton:SetNormalTexture("Interface\\RAIDFRAME\\ReadyCheck-Waiting")
	BuffWindow.RCButton:SetWidth(12)
	BuffWindow.RCButton:SetHeight(12)
	BuffWindow.RCButton:SetPoint("TOPLEFT", BuffWindow, "TOPLEFT", 8, -8)
	BuffWindow.RCButton:SetScript("OnClick",function() DoReadyCheck() end)
	BuffWindow.RCButton:SetScript("OnEnter",function()
	      GameTooltip:SetOwner(BuffWindow, "ANCHOR_CURSOR"); GameTooltip:SetText(READY_CHECK); GameTooltip:Show() end)
	BuffWindow.RCButton:SetScript("OnLeave",function() GameTooltip:Hide() end)

        BuffWindow.MenuButton=CreateFrame("Button", nil, BuffWindow)
        BuffWindow.MenuButton:SetNormalTexture("Interface\\AddOns\\BigBrother\\icon")
        BuffWindow.MenuButton:SetWidth(12)
        BuffWindow.MenuButton:SetHeight(12)
        BuffWindow.MenuButton:SetPoint("TOPLEFT", BuffWindow.RCButton, "TOPRIGHT", 8, 0)
        BuffWindow.MenuButton:SetScript("OnClick",function() BigBrother:OpenMenu(BuffWindow.MenuButton,BigBrother) end)
        BuffWindow.MenuButton:SetScript("OnEnter",function()
              GameTooltip:SetOwner(BuffWindow, "ANCHOR_CURSOR"); GameTooltip:SetText(OPTIONS_MENU); GameTooltip:Show() end)
        BuffWindow.MenuButton:SetScript("OnLeave",function() GameTooltip:Hide() end)

	BuffWindow.Rows={}
	for i=1,RowsCreated do
		BuffWindow.Rows[i]=BuffWindow_Functions:CreateBuffRow(BuffWindow,8,-4-i*(BuffSpacing+2))
	end

	BuffWindow.ScrollBar=CreateFrame("SCROLLFRAME","BuffWindow_ScrollBar",BuffWindow,"FauxScrollFrameTemplate")
	BuffWindow.ScrollBar:SetScript("OnVerticalScroll", function(self, offset) FauxScrollFrame_OnVerticalScroll(self, offset, 20, BuffWindow_UpdateWindow) end)

	BuffWindow.ScrollBar:SetPoint("TOPLEFT", BuffWindow.Rows[2], "TOPLEFT", 0, 0)
	BuffWindow.ScrollBar:SetPoint("BOTTOMRIGHT", BuffWindow.Rows[8], "BOTTOMRIGHT", -4, 0)

	-- drag handle

	BuffWindow.draghandle = CreateFrame("Frame", nil, BuffWindow)
	BuffWindow.draghandle:Show()
	BuffWindow.draghandle:SetFrameLevel( BuffWindow:GetFrameLevel() + 10 ) -- place this above everything
	BuffWindow.draghandle:SetWidth(WindowWidth)
	BuffWindow.draghandle:SetHeight(16)
	BuffWindow.draghandle:SetPoint("BOTTOM", BuffWindow, "BOTTOM", 0, 0)
	BuffWindow.draghandle:EnableMouse(true)
	BuffWindow.draghandle:SetScript("OnMouseDown", function() BigBrother_BuffWindow.isResizing = true; BigBrother_BuffWindow:StartSizing("BOTTOMRIGHT") end )
	BuffWindow.draghandle:SetScript("OnMouseUp", function() BigBrother_BuffWindow:StopMovingOrSizing(); BigBrother_BuffWindow.isResizing = false; end )

	BuffWindow:SetMinResize(WindowWidth,110)
	BuffWindow:SetMaxResize(WindowWidth,530.5)
	BuffWindow:SetResizable(true);

	BuffWindow:SetScript("OnSizeChanged", function()
						if ( BigBrother_BuffWindow.isResizing ) then
							BuffWindow_ResizeWindow()
						end
					end)


	BigBrother_BuffWindow=BuffWindow
	BigBrother_BuffWindow.SelectedBuffs=1
	BuffWindow_UpdateBuffs()
	BuffWindow_ResizeWindow()
	self:RegisterEvents()
end

--When called will update buffs and the window
function BigBrother:BuffWindow_Update()
	BuffWindow_UpdateBuffs()
	BuffWindow_UpdateWindow()
end


local PlayerList={}
--When called will update the table of what buffs everyone has
function BuffWindow_UpdateBuffs()
	local unit
	local thispage = BigBrother_BuffWindow.SelectedBuffs
	local BuffChecking=BigBrother_BuffTable[thispage]
	local Filter=BuffChecking.filter
	local index = 1

	local foodcol
	for col, BuffList in pairs(BuffChecking.buffs) do
	  if BuffList == vars.Foodbuffs then
	    foodcol = col
	    break
	  end
	end

	for unit in RL:IterateRoster(false) do
		if BigBrother.db.profile.Groups[unit.subgroup] then
			if (not Filter) or Filter[unit.class] then
				local player = PlayerList[index]

				if player==nil then
					player = {}
					PlayerList[index] = player
				end

				player.name=unit.name
				player.class=unit.class
				player.totalBuffs = 0
				player.buffMask = 0
				player.buff = wipe(player.buff or {})
				player.unit=unit.unitid
				if BigBrother.oldscan then -- slow legacy scan code
				    for i, BuffList in pairs(BuffChecking.buffs) do
					for _, buffs in pairs(BuffList) do
						local spellid = select(10,UnitBuff(unit.unitid, buffs[1]))
						if spellid then
							if BuffList == vars.Foodbuffs then
							  player.buff[i] = scanfood(spellid)
							else
							  player.buff[i] = buffs
							end
							player.totalBuffs = player.totalBuffs + 1
							if not buffs[4] then -- binary sort by non-weak buffs
							  player.buffMask = bit.bor(player.buffMask, 2^i)
							end
							break
						end
					end
				    end
				else -- optimized scan code
				    player.buffMask = 0
				    for b=1,40 do
				      local name, _,_,_,_,_,_,_,_, spellid = UnitBuff(unit.unitid, b)

				      if not name then break end
				      local spellinfo = BuffTable_index[name]
				      if spellinfo then
				        for _,buffinfo in ipairs(spellinfo) do -- handle multi-column buffs
					  if buffinfo.page == thispage then
				            local col = buffinfo.col
					    local bestinfo = player.buff[col]
					    if not bestinfo then -- first buff for this col
					      player.totalBuffs = player.totalBuffs + 1
					    end
					    if not bestinfo or
					       buffinfo.order < bestinfo.order then
					       if col == foodcol then
						 buffinfo = scanfood(spellid)
						 buffinfo.order = 0
					       end
					       player.buff[col] = buffinfo
					       if not buffinfo[4] then -- binary sort by non-weak buffs
					         player.buffMask = bit.bor(player.buffMask, 2^col)
					       end
					    end
					  end
					end
				      end
				    end
				end

				index = index + 1
			end
		end
	end

  while PlayerList[index] do -- clear the rest of the table so we dont get nil holes that lead to ill-defined behavior in sort
	  PlayerList[index] = nil
	  index = index + 1
	end

	table.sort(PlayerList,BuffChecking.sortFunc)
	BigBrother_BuffWindow.List=PlayerList
end

function BuffWindow_UpdateWindow()
	local PlayerList=BigBrother_BuffWindow.List
	local Rows=BigBrother_BuffWindow.Rows
	local endOfList = false

	FauxScrollFrame_Update(BigBrother_BuffWindow.ScrollBar, table.getn(PlayerList), PlayersShown, 20)
	local offset = FauxScrollFrame_GetOffset(BigBrother_BuffWindow.ScrollBar)

	BigBrother_BuffWindow.Title:SetText(BigBrother_BuffTable[BigBrother_BuffWindow.SelectedBuffs].name)

        local header = BigBrother_BuffTable[BigBrother_BuffWindow.SelectedBuffs].header
        local roffset = 0
        if header then
          local headerRow = Rows[1]
          headerRow:SetPlayer("",nil,"header")
	  for j=1,TotalBuffs do
	    if header[j][2] then
               headerRow:SetBuffIcon(j,header[j][2],true)
               headerRow:SetBuffName(j,header[j][1], "header")
               headerRow:SetBuffValue(j,true)
            else
               headerRow:SetBuffValue(j,false)
            end
          end
          roffset = 1
          headerRow:Show()
	end

	for i=1,PlayersShown do
		if not endOfList and PlayerList[i+offset] then
			local Player=PlayerList[i+offset]
			Rows[i+roffset]:SetPlayer(Player.name,Player.class,Player.unit)
			for j=1,TotalBuffs do
                if Player.buff[j] then
                    --check if a buff is from this addon
                    dimmthis = true
					if tonumber(Player.buff[j][3]) ~= nil then
						if Player.buff[j][3]>spellidmin then
							dimmthis = false
						end
					end;

                    Rows[i+roffset]:SetBuffIcon(j,Player.buff[j][2],dimmthis)
                    Rows[i+roffset]:SetBuffName(j,Player.buff[j][1], Player.unit)
                    Rows[i+roffset]:SetBuffValue(j,true)
                else
                    Rows[i+roffset]:SetBuffValue(j,false)
                end
			end
			Rows[i+roffset]:Show()
		else
			endOfList = true
			Rows[i+roffset]:Hide()
		end
	end
end

function BuffWindow_ResizeWindow()

	local NumVisibleRows=math.floor( (BigBrother_BuffWindow:GetHeight() - (BuffSpacing+4)-8) / (BuffSpacing+2) )

	if NumVisibleRows>RowsCreated then
		for i=(1+RowsCreated),NumVisibleRows do
			BigBrother_BuffWindow.Rows[i]=BuffWindow_Functions:CreateBuffRow(BigBrother_BuffWindow,8,-4-i*(BuffSpacing+2))
			BigBrother_BuffWindow.Rows[i]:Hide()
		end
		RowsCreated=NumVisibleRows
	end

	if NumVisibleRows<PlayersShown+1 then
		for i=(1+NumVisibleRows),PlayersShown+1 do
			BigBrother_BuffWindow.Rows[i]:Hide()
		end
	end
	PlayersShown=NumVisibleRows-1

	BigBrother_BuffWindow.ScrollBar:SetPoint("BOTTOMRIGHT", BigBrother_BuffWindow.Rows[NumVisibleRows], "BOTTOMRIGHT", -4, 0)
	BuffWindow_UpdateWindow()

	BigBrother.db.profile.BuffWindow_height = BigBrother_BuffWindow:GetHeight();
end