handler.lua

local addon,ns = ...
local Growl = CreateFrame("Frame")
local Growls = {}
local CFG = ns.CFG
local DATA = ns.DATA
local media = "Interface\\AddOns\\Growl\\media\\"
local tex = "Interface\\Buttons\\WHITE8X8"
local bg = media.."smoke.tga"
local font =  media.."string.ttf"
local defaultIcon = media.."help.tga"


function Growl:New(obj,index)
	if not index then 
		index = #Growls+1
	end

	--main button
	obj = obj or CreateFrame("Button", "Growl"..index, UIParent)
	obj:SetSize(280, 70)
	local SETPOINT = {
		TOPLEFT = function(obj) 
			if index == 1 then
				obj:SetPoint("TOPLEFT", UIParent, 20, -20)
			elseif index > 1 then
				obj:SetPoint("TOPLEFT", "Growl"..index - 1, "BOTTOMLEFT", 0, -20)
			end
		end,
		BOTTOMLEFT = function(obj)
			if index == 1 then
				obj:SetPoint("BOTTOMLEFT", UIParent, 20, 20)
			elseif index > 1 then
				obj:SetPoint("BOTTOMLEFT", "Growl"..index - 1, "TOPLEFT", 0 , 20)
			end
		end,
		TOPRIGHT = function(obj)
			if index == 1 then
				obj:SetPoint("TOPRIGHT", UIParent, -20, -20)
			elseif index > 1 then
				obj:SetPoint("TOPRIGHT", "Growl"..index - 1, "BOTTOMRIGHT", 0 , -20)
			end
		end,
		BOTTOMRIGHT = function(obj)
			if index == 1 then
				obj:SetPoint("BOTTOMRIGHT", UIParent, -20, 20)
			elseif index > 1 then
				obj:SetPoint("BOTTOMRIGHT", "Growl"..index - 1, "TOPRIGHT", 0 , 20)
			end
		end,
	}
	do
		local point = CFG.POINT or "TOPLEFT"
		SETPOINT[point](obj)
	end
	obj.tex = obj:CreateTexture(nil, "BACKGROUND")
	obj.tex:SetSize(obj:GetWidth(),obj:GetHeight())
	obj.tex:SetPoint("TOPLEFT",obj)
	obj.tex:SetPoint("BOTTOMRIGHT",obj)
	obj.tex:SetTexCoord(.787,.213,.785,.215)
	obj.tex:SetTexture(bg)
	obj.tex:SetVertexColor(.1, .1, .1, .7)

	--close button
	obj.close = CreateFrame("Button", "Growl"..index.."CloseButton", obj)
	obj.close:SetFrameLevel(obj:GetFrameLevel()+1)
	obj.close:SetSize(20, 20)
	obj.close:SetPoint("TOPRIGHT", obj, -5, -5)
	obj.close.text = obj.close:CreateFontString(nil,"OVERLAY")
	obj.close.text:SetFont(font, 18, "CHROMEOUTLINE")
	obj.close.text:SetPoint("CENTER", obj.close)
	obj.close.text:SetText("x")
	obj.close.text:SetTextColor(.5, .5, .5, 1)

	--tex icon
	obj.icon = CreateFrame("Frame", "Growl"..index.."Icon",obj)
	obj.icon:SetSize(obj:GetHeight()-20, obj:GetHeight()-20)
	obj.icon:SetPoint("TOPLEFT", obj, 10, -10)
	obj.icon.tex = obj.icon:CreateTexture(nil, "OVERLAY")
	obj.icon.tex:SetTexture(defaultIcon)
	obj.icon.tex:SetAllPoints(obj.icon)
	obj.icon.tex:SetVertexColor(1, 1, 1, .5)

	--title
	obj.title = CreateFrame("Frame", "Growl"..index.."Title", obj)
	obj.title:SetSize(obj:GetWidth() - obj.icon:GetWidth()-30, obj:GetHeight()/5)
	obj.title:SetPoint("TOPLEFT", obj.icon, "TOPRIGHT", 10, 0)
	obj.title.tex = obj.title:CreateTexture(nil,"OVERLAY")
	obj.title.text = obj.title:CreateFontString(nil, "OVERLAY")
	obj.title.text:SetFont(font, 14, "CHROMEOUTLINE")
	obj.title.text:SetText("test")
	obj.title.text:SetPoint("LEFT",obj.title)

	--content
	obj.content = CreateFrame("Frame","Growl"..index.."Content",obj)
	obj.content:SetSize(obj:GetWidth() - obj.icon:GetWidth()-30, obj:GetHeight() - obj.title:GetHeight()-20)

	obj.content.tex = obj.title:CreateTexture(nil,"OVERLAY")
	obj.content:SetPoint("TOPLEFT", obj.title, "BOTTOMLEFT", 0, -4)
	obj.content.text = obj.content:CreateFontString(nil,"OVERLAY")
	obj.content.text:SetFont(font,12,"NORMAL")
	obj.content.text:SetPoint("TOPLEFT",obj.content)
	obj.content.text:SetWidth(obj.content:GetWidth())
	obj.content.text:SetJustifyH("LEFT")
	obj.content.text:SetJustifyV("TOP")
	obj.content.text:SetHeight(obj.content:GetHeight())
	obj.content.text:SetText("test content")

	obj:SetAlpha(0)
	obj:Hide()
	obj.nextUpdate = 0
	obj.source = nil 
	obj.fullMsg = ""
	table.insert(Growls,obj)
end

function Growl:StartShow(obj,time,isOnEnter)
	obj:Show()
	local oldTime = time or GetTime()
	if isOnEnter then
		obj:Show()
		obj:SetAlpha(1)
		obj:SetScript("OnUpdate",nil)
		return
	end
	obj:SetScript("OnUpdate",function(self,elapsed)
		self.nextUpdate = self.nextUpdate + elapsed
		if self.nextUpdate > 0.01 then
			local newTime = GetTime()	
			if (newTime - oldTime) < 1 then
				local tempAlpha = tonumber(string.format("%6.2f",(newTime - oldTime)))
				self:SetAlpha(tempAlpha)
			else
				self:SetAlpha(1)
				self:SetScript("OnUpdate",nil)
			end
			self.nextUpdate = 0
		end
	end)
end

function Growl:StartHide(obj,time)
	local oldTime = time or GetTime()
	obj:SetScript("OnUpdate",function(self,elapsed)
		self.nextUpdate = self.nextUpdate + elapsed
		if self.nextUpdate > 0.01 then
			local newTime = GetTime()	
			if (newTime - oldTime) < 1 then
				local tempAlpha = tonumber(string.format("%6.2f",(newTime - oldTime)))
				self:SetAlpha(1-tempAlpha)
			else
				self:SetAlpha(0)
				self:SetScript("OnUpdate",nil)
				self:Hide()
			end
			self.nextUpdate = 0
		end
	end)
end

function Growl:SetAttributes(obj,flag)
	local setAttributes = {
		Enter = function(obj)  
			obj:SetScript("OnEnter",function()
				if obj:IsShown() then
					Growl:StartShow(obj,GetTime(),true)
				end
			end)
		end,
		Leave = function(obj)
			obj:SetScript("OnLeave",function()
				if obj:IsShown() then
					Growl:StartHide(obj,GetTime()+1)
				end
			end)
		end,
		Close = function(obj)
			obj.close:SetScript("OnEnter",function()
				obj.close.text:SetTextColor(1,1,1,1)
				if obj:IsShown() then
					Growl:StartShow(obj,GetTime(),true)
				end
			end)
			obj.close:SetScript("OnLeave",function()
				obj.close.text:SetTextColor(.5,.5,.5,1)
			end)
			obj.close:SetScript("OnClick",function()
				if obj:IsShown() then
					obj:SetAlpha(0)
					obj:Hide()
				end
			end)
		end,
		Clicks = function(obj)
			obj:SetScript("OnClick",function(self,event,...)
				if obj.source and obj.source == "PLAYER" then
					ChatFrame_ReplyTell(ChatFrame1)
				elseif obj.source and obj.source == "ITEM" then
					ToggleAllBags()	
					if BagItemSearchBox ~= nil then
						BagItemSearchBox:SetFocus()
						BagItemSearchBox:SetText(obj.content.text:GetText())
					end
				--elseif then   
				--TODO
				end
			end)
		end,
	} 
	do
		setAttributes[flag](obj)
	end
end

function Growl.Animation(objects,index,value,...)
	Growl:StartShow(objects[index],GetTime())
	objects[index].title.text:SetText(value.title(...) or "")
	objects[index].content.text:SetText(value.content(...) or "")
	objects[index].source = value.source
	objects[index].icon.tex:SetTexture(media..value.icon or defaultIcon)
	Growl:StartHide(objects[index],GetTime() + value.delay)
end


--function Growl:Sleep(obj,time,...)
--	local handler = obj:GetScript("OnEvent") 
--	--print(handler)
--	if time then
--		local oldTime = GetTime()
--		obj:SetScript("OnUpdate",function(self,elapsed,...)
--			self.nextUpdate = self.nextUpdate + elapsed
--			if self.nextUpdate > 0.1 then
--				local newTime = GetTime()
--				if (newTime - oldTime) < time then
--					self:SetScript("OnEvent",nil)	
--				else
--					self:SetScript("OnEvent",handler())
--					self:SetScript("OnUpdate",nil)
--				end
--			end
--			self.nextUpdate = 0
--		end)
--	end
--end

function Growl:Load(objs)
	for k, v in pairs(DATA) do
		if v and v.EVENT then
			Growl:RegisterEvent(v.EVENT)
		end
	end
		Growl:SetScript("OnEvent", function(self, event, ...)
			for k, v in pairs(DATA) do
				if event == v.EVENT and CFG[k] then
					if v.content(...) then 
						for i = 1, #objs do
							local obj = objs[i]
							if not obj:IsShown() then
								Growl.Animation(objs, i ,v,...)
								--	if v.filter then
								--		Growl:Sleep(objs[i],v.filter,...)
								--	end
								break
							end
						end
					end
				end
			end
		end)
	end

ns.Growl = Growl