Zerotorescue@0: --[[-----------------------------------------------------------------------------
Zerotorescue@0: Frame Container
Zerotorescue@0: -------------------------------------------------------------------------------]]
Zerotorescue@0: local Type, Version = "Frame", 21
Zerotorescue@0: local AceGUI = LibStub and LibStub("AceGUI-3.0", true)
Zerotorescue@0: if not AceGUI or (AceGUI:GetWidgetVersion(Type) or 0) >= Version then return end
Zerotorescue@0: 
Zerotorescue@0: -- Lua APIs
Zerotorescue@0: local pairs, assert, type = pairs, assert, type
Zerotorescue@0: local wipe = table.wipe
Zerotorescue@0: 
Zerotorescue@0: -- WoW APIs
Zerotorescue@0: local PlaySound = PlaySound
Zerotorescue@0: local CreateFrame, UIParent = CreateFrame, UIParent
Zerotorescue@0: 
Zerotorescue@0: -- Global vars/functions that we don't upvalue since they might get hooked, or upgraded
Zerotorescue@0: -- List them here for Mikk's FindGlobals script
Zerotorescue@0: -- GLOBALS: CLOSE
Zerotorescue@0: 
Zerotorescue@0: --[[-----------------------------------------------------------------------------
Zerotorescue@0: Scripts
Zerotorescue@0: -------------------------------------------------------------------------------]]
Zerotorescue@0: local function Button_OnClick(frame)
Zerotorescue@0: 	PlaySound("gsTitleOptionExit")
Zerotorescue@0: 	frame.obj:Hide()
Zerotorescue@0: end
Zerotorescue@0: 
Zerotorescue@0: local function Frame_OnClose(frame)
Zerotorescue@0: 	frame.obj:Fire("OnClose")
Zerotorescue@0: end
Zerotorescue@0: 
Zerotorescue@0: local function Frame_OnMouseDown(frame)
Zerotorescue@0: 	AceGUI:ClearFocus()
Zerotorescue@0: end
Zerotorescue@0: 
Zerotorescue@0: local function Title_OnMouseDown(frame)
Zerotorescue@0: 	frame:GetParent():StartMoving()
Zerotorescue@0: 	AceGUI:ClearFocus()
Zerotorescue@0: end
Zerotorescue@0: 
Zerotorescue@0: local function MoverSizer_OnMouseUp(mover)
Zerotorescue@0: 	local frame = mover:GetParent()
Zerotorescue@0: 	frame:StopMovingOrSizing()
Zerotorescue@0: 	local self = frame.obj
Zerotorescue@0: 	local status = self.status or self.localstatus
Zerotorescue@0: 	status.width = frame:GetWidth()
Zerotorescue@0: 	status.height = frame:GetHeight()
Zerotorescue@0: 	status.top = frame:GetTop()
Zerotorescue@0: 	status.left = frame:GetLeft()
Zerotorescue@0: end
Zerotorescue@0: 
Zerotorescue@0: local function SizerSE_OnMouseDown(frame)
Zerotorescue@0: 	frame:GetParent():StartSizing("BOTTOMRIGHT")
Zerotorescue@0: 	AceGUI:ClearFocus()
Zerotorescue@0: end
Zerotorescue@0: 
Zerotorescue@0: local function SizerS_OnMouseDown(frame)
Zerotorescue@0: 	frame:GetParent():StartSizing("BOTTOM")
Zerotorescue@0: 	AceGUI:ClearFocus()
Zerotorescue@0: end
Zerotorescue@0: 
Zerotorescue@0: local function SizerE_OnMouseDown(frame)
Zerotorescue@0: 	frame:GetParent():StartSizing("RIGHT")
Zerotorescue@0: 	AceGUI:ClearFocus()
Zerotorescue@0: end
Zerotorescue@0: 
Zerotorescue@0: local function StatusBar_OnEnter(frame)
Zerotorescue@0: 	frame.obj:Fire("OnEnterStatusBar")
Zerotorescue@0: end
Zerotorescue@0: 
Zerotorescue@0: local function StatusBar_OnLeave(frame)
Zerotorescue@0: 	frame.obj:Fire("OnLeaveStatusBar")
Zerotorescue@0: end
Zerotorescue@0: 
Zerotorescue@0: --[[-----------------------------------------------------------------------------
Zerotorescue@0: Methods
Zerotorescue@0: -------------------------------------------------------------------------------]]
Zerotorescue@0: local methods = {
Zerotorescue@0: 	["OnAcquire"] = function(self)
Zerotorescue@0: 		self.frame:SetParent(UIParent)
Zerotorescue@0: 		self.frame:SetFrameStrata("FULLSCREEN_DIALOG")
Zerotorescue@0: 		self:SetTitle()
Zerotorescue@0: 		self:SetStatusText()
Zerotorescue@0: 		self:ApplyStatus()
Zerotorescue@0: 		self:Show()
Zerotorescue@0: 	end,
Zerotorescue@0: 
Zerotorescue@0: 	["OnRelease"] = function(self)
Zerotorescue@0: 		self.status = nil
Zerotorescue@0: 		wipe(self.localstatus)
Zerotorescue@0: 	end,
Zerotorescue@0: 
Zerotorescue@0: 	["OnWidthSet"] = function(self, width)
Zerotorescue@0: 		local content = self.content
Zerotorescue@0: 		local contentwidth = width - 34
Zerotorescue@0: 		if contentwidth < 0 then
Zerotorescue@0: 			contentwidth = 0
Zerotorescue@0: 		end
Zerotorescue@0: 		content:SetWidth(contentwidth)
Zerotorescue@0: 		content.width = contentwidth
Zerotorescue@0: 	end,
Zerotorescue@0: 
Zerotorescue@0: 	["OnHeightSet"] = function(self, height)
Zerotorescue@0: 		local content = self.content
Zerotorescue@0: 		local contentheight = height - 57
Zerotorescue@0: 		if contentheight < 0 then
Zerotorescue@0: 			contentheight = 0
Zerotorescue@0: 		end
Zerotorescue@0: 		content:SetHeight(contentheight)
Zerotorescue@0: 		content.height = contentheight
Zerotorescue@0: 	end,
Zerotorescue@0: 
Zerotorescue@0: 	["SetTitle"] = function(self, title)
Zerotorescue@0: 		self.titletext:SetText(title)
Zerotorescue@0: 	end,
Zerotorescue@0: 
Zerotorescue@0: 	["SetStatusText"] = function(self, text)
Zerotorescue@0: 		self.statustext:SetText(text)
Zerotorescue@0: 	end,
Zerotorescue@0: 
Zerotorescue@0: 	["Hide"] = function(self)
Zerotorescue@0: 		self.frame:Hide()
Zerotorescue@0: 	end,
Zerotorescue@0: 
Zerotorescue@0: 	["Show"] = function(self)
Zerotorescue@0: 		self.frame:Show()
Zerotorescue@0: 	end,
Zerotorescue@0: 
Zerotorescue@0: 	-- called to set an external table to store status in
Zerotorescue@0: 	["SetStatusTable"] = function(self, status)
Zerotorescue@0: 		assert(type(status) == "table")
Zerotorescue@0: 		self.status = status
Zerotorescue@0: 		self:ApplyStatus()
Zerotorescue@0: 	end,
Zerotorescue@0: 
Zerotorescue@0: 	["ApplyStatus"] = function(self)
Zerotorescue@0: 		local status = self.status or self.localstatus
Zerotorescue@0: 		local frame = self.frame
Zerotorescue@0: 		self:SetWidth(status.width or 700)
Zerotorescue@0: 		self:SetHeight(status.height or 500)
Zerotorescue@0: 		frame:ClearAllPoints()
Zerotorescue@0: 		if status.top and status.left then
Zerotorescue@0: 			frame:SetPoint("TOP", UIParent, "BOTTOM", 0, status.top)
Zerotorescue@0: 			frame:SetPoint("LEFT", UIParent, "LEFT", status.left, 0)
Zerotorescue@0: 		else
Zerotorescue@0: 			frame:SetPoint("CENTER")
Zerotorescue@0: 		end
Zerotorescue@0: 	end
Zerotorescue@0: }
Zerotorescue@0: 
Zerotorescue@0: --[[-----------------------------------------------------------------------------
Zerotorescue@0: Constructor
Zerotorescue@0: -------------------------------------------------------------------------------]]
Zerotorescue@0: local FrameBackdrop = {
Zerotorescue@0: 	bgFile = "Interface\\DialogFrame\\UI-DialogBox-Background",
Zerotorescue@0: 	edgeFile = "Interface\\DialogFrame\\UI-DialogBox-Border",
Zerotorescue@0: 	tile = true, tileSize = 32, edgeSize = 32,
Zerotorescue@0: 	insets = { left = 8, right = 8, top = 8, bottom = 8 }
Zerotorescue@0: }
Zerotorescue@0: 
Zerotorescue@0: local PaneBackdrop  = {
Zerotorescue@0: 	bgFile = "Interface\\ChatFrame\\ChatFrameBackground",
Zerotorescue@0: 	edgeFile = "Interface\\Tooltips\\UI-Tooltip-Border",
Zerotorescue@0: 	tile = true, tileSize = 16, edgeSize = 16,
Zerotorescue@0: 	insets = { left = 3, right = 3, top = 5, bottom = 3 }
Zerotorescue@0: }
Zerotorescue@0: 
Zerotorescue@0: local function Constructor()
Zerotorescue@0: 	local frame = CreateFrame("Frame", nil, UIParent)
Zerotorescue@0: 	frame:Hide()
Zerotorescue@0: 
Zerotorescue@0: 	frame:EnableMouse(true)
Zerotorescue@0: 	frame:SetMovable(true)
Zerotorescue@0: 	frame:SetResizable(true)
Zerotorescue@0: 	frame:SetFrameStrata("FULLSCREEN_DIALOG")
Zerotorescue@0: 	frame:SetBackdrop(FrameBackdrop)
Zerotorescue@0: 	frame:SetBackdropColor(0, 0, 0, 1)
Zerotorescue@0: 	frame:SetMinResize(400, 200)
Zerotorescue@0: 	frame:SetToplevel(true)
Zerotorescue@0: 	frame:SetScript("OnHide", Frame_OnClose)
Zerotorescue@0: 	frame:SetScript("OnMouseDown", Frame_OnMouseDown)
Zerotorescue@0: 
Zerotorescue@0: 	local closebutton = CreateFrame("Button", nil, frame, "UIPanelButtonTemplate")
Zerotorescue@0: 	closebutton:SetScript("OnClick", Button_OnClick)
Zerotorescue@0: 	closebutton:SetPoint("BOTTOMRIGHT", -27, 17)
Zerotorescue@0: 	closebutton:SetHeight(20)
Zerotorescue@0: 	closebutton:SetWidth(100)
Zerotorescue@0: 	closebutton:SetText(CLOSE)
Zerotorescue@0: 
Zerotorescue@0: 	local statusbg = CreateFrame("Button", nil, frame)
Zerotorescue@0: 	statusbg:SetPoint("BOTTOMLEFT", 15, 15)
Zerotorescue@0: 	statusbg:SetPoint("BOTTOMRIGHT", -132, 15)
Zerotorescue@0: 	statusbg:SetHeight(24)
Zerotorescue@0: 	statusbg:SetBackdrop(PaneBackdrop)
Zerotorescue@0: 	statusbg:SetBackdropColor(0.1,0.1,0.1)
Zerotorescue@0: 	statusbg:SetBackdropBorderColor(0.4,0.4,0.4)
Zerotorescue@0: 	statusbg:SetScript("OnEnter", StatusBar_OnEnter)
Zerotorescue@0: 	statusbg:SetScript("OnLeave", StatusBar_OnLeave)
Zerotorescue@0: 
Zerotorescue@0: 	local statustext = statusbg:CreateFontString(nil, "OVERLAY", "GameFontNormal")
Zerotorescue@0: 	statustext:SetPoint("TOPLEFT", 7, -2)
Zerotorescue@0: 	statustext:SetPoint("BOTTOMRIGHT", -7, 2)
Zerotorescue@0: 	statustext:SetHeight(20)
Zerotorescue@0: 	statustext:SetJustifyH("LEFT")
Zerotorescue@0: 	statustext:SetText("")
Zerotorescue@0: 
Zerotorescue@0: 	local titlebg = frame:CreateTexture(nil, "OVERLAY")
Zerotorescue@0: 	titlebg:SetTexture("Interface\\DialogFrame\\UI-DialogBox-Header")
Zerotorescue@0: 	titlebg:SetTexCoord(0.31, 0.67, 0, 0.63)
Zerotorescue@0: 	titlebg:SetPoint("TOP", 0, 12)
Zerotorescue@0: 	titlebg:SetWidth(100)
Zerotorescue@0: 	titlebg:SetHeight(40)
Zerotorescue@0: 
Zerotorescue@0: 	local title = CreateFrame("Frame", nil, frame)
Zerotorescue@0: 	title:EnableMouse(true)
Zerotorescue@0: 	title:SetScript("OnMouseDown", Title_OnMouseDown)
Zerotorescue@0: 	title:SetScript("OnMouseUp", MoverSizer_OnMouseUp)
Zerotorescue@0: 	title:SetAllPoints(titlebg)
Zerotorescue@0: 
Zerotorescue@0: 	local titletext = title:CreateFontString(nil, "OVERLAY", "GameFontNormal")
Zerotorescue@0: 	titletext:SetPoint("TOP", titlebg, "TOP", 0, -14)
Zerotorescue@0: 
Zerotorescue@0: 	local titlebg_l = frame:CreateTexture(nil, "OVERLAY")
Zerotorescue@0: 	titlebg_l:SetTexture("Interface\\DialogFrame\\UI-DialogBox-Header")
Zerotorescue@0: 	titlebg_l:SetTexCoord(0.21, 0.31, 0, 0.63)
Zerotorescue@0: 	titlebg_l:SetPoint("RIGHT", titlebg, "LEFT")
Zerotorescue@0: 	titlebg_l:SetWidth(30)
Zerotorescue@0: 	titlebg_l:SetHeight(40)
Zerotorescue@0: 
Zerotorescue@0: 	local titlebg_r = frame:CreateTexture(nil, "OVERLAY")
Zerotorescue@0: 	titlebg_r:SetTexture("Interface\\DialogFrame\\UI-DialogBox-Header")
Zerotorescue@0: 	titlebg_r:SetTexCoord(0.67, 0.77, 0, 0.63)
Zerotorescue@0: 	titlebg_r:SetPoint("LEFT", titlebg, "RIGHT")
Zerotorescue@0: 	titlebg_r:SetWidth(30)
Zerotorescue@0: 	titlebg_r:SetHeight(40)
Zerotorescue@0: 
Zerotorescue@0: 	local sizer_se = CreateFrame("Frame", nil, frame)
Zerotorescue@0: 	sizer_se:SetPoint("BOTTOMRIGHT")
Zerotorescue@0: 	sizer_se:SetWidth(25)
Zerotorescue@0: 	sizer_se:SetHeight(25)
Zerotorescue@0: 	sizer_se:EnableMouse()
Zerotorescue@0: 	sizer_se:SetScript("OnMouseDown",SizerSE_OnMouseDown)
Zerotorescue@0: 	sizer_se:SetScript("OnMouseUp", MoverSizer_OnMouseUp)
Zerotorescue@0: 
Zerotorescue@0: 	local line1 = sizer_se:CreateTexture(nil, "BACKGROUND")
Zerotorescue@0: 	line1:SetWidth(14)
Zerotorescue@0: 	line1:SetHeight(14)
Zerotorescue@0: 	line1:SetPoint("BOTTOMRIGHT", -8, 8)
Zerotorescue@0: 	line1:SetTexture("Interface\\Tooltips\\UI-Tooltip-Border")
Zerotorescue@0: 	local x = 0.1 * 14/17
Zerotorescue@0: 	line1:SetTexCoord(0.05 - x, 0.5, 0.05, 0.5 + x, 0.05, 0.5 - x, 0.5 + x, 0.5)
Zerotorescue@0: 
Zerotorescue@0: 	local line2 = sizer_se:CreateTexture(nil, "BACKGROUND")
Zerotorescue@0: 	line2:SetWidth(8)
Zerotorescue@0: 	line2:SetHeight(8)
Zerotorescue@0: 	line2:SetPoint("BOTTOMRIGHT", -8, 8)
Zerotorescue@0: 	line2:SetTexture("Interface\\Tooltips\\UI-Tooltip-Border")
Zerotorescue@0: 	local x = 0.1 * 8/17
Zerotorescue@0: 	line2:SetTexCoord(0.05 - x, 0.5, 0.05, 0.5 + x, 0.05, 0.5 - x, 0.5 + x, 0.5)
Zerotorescue@0: 
Zerotorescue@0: 	local sizer_s = CreateFrame("Frame", nil, frame)
Zerotorescue@0: 	sizer_s:SetPoint("BOTTOMRIGHT", -25, 0)
Zerotorescue@0: 	sizer_s:SetPoint("BOTTOMLEFT")
Zerotorescue@0: 	sizer_s:SetHeight(25)
Zerotorescue@0: 	sizer_s:EnableMouse(true)
Zerotorescue@0: 	sizer_s:SetScript("OnMouseDown", SizerS_OnMouseDown)
Zerotorescue@0: 	sizer_s:SetScript("OnMouseUp", MoverSizer_OnMouseUp)
Zerotorescue@0: 
Zerotorescue@0: 	local sizer_e = CreateFrame("Frame", nil, frame)
Zerotorescue@0: 	sizer_e:SetPoint("BOTTOMRIGHT", 0, 25)
Zerotorescue@0: 	sizer_e:SetPoint("TOPRIGHT")
Zerotorescue@0: 	sizer_e:SetWidth(25)
Zerotorescue@0: 	sizer_e:EnableMouse(true)
Zerotorescue@0: 	sizer_e:SetScript("OnMouseDown", SizerE_OnMouseDown)
Zerotorescue@0: 	sizer_e:SetScript("OnMouseUp", MoverSizer_OnMouseUp)
Zerotorescue@0: 
Zerotorescue@0: 	--Container Support
Zerotorescue@0: 	local content = CreateFrame("Frame", nil, frame)
Zerotorescue@0: 	content:SetPoint("TOPLEFT", 17, -27)
Zerotorescue@0: 	content:SetPoint("BOTTOMRIGHT", -17, 40)
Zerotorescue@0: 
Zerotorescue@0: 	local widget = {
Zerotorescue@0: 		localstatus = {},
Zerotorescue@0: 		titletext   = titletext,
Zerotorescue@0: 		statustext  = statustext,
Zerotorescue@0: 		content     = content,
Zerotorescue@0: 		frame       = frame,
Zerotorescue@0: 		type        = Type
Zerotorescue@0: 	}
Zerotorescue@0: 	for method, func in pairs(methods) do
Zerotorescue@0: 		widget[method] = func
Zerotorescue@0: 	end
Zerotorescue@0: 	closebutton.obj, statusbg.obj = widget, widget
Zerotorescue@0: 
Zerotorescue@0: 	return AceGUI:RegisterAsContainer(widget)
Zerotorescue@0: end
Zerotorescue@0: 
Zerotorescue@0: AceGUI:RegisterWidgetType(Type, Constructor, Version)