--Testbed.lua

Testbed = LibStub("AceAddon-3.0"):NewAddon("Testbed", "AceConsole-3.0","AceEvent-3.0", "AceHook-3.0", "AceSerializer-3.0")

function strapp(a, b)
	return a..b
end

function Testbed:OnEnable()

end

function Testbed:OnDisable()

end

function Testbed:StartRecv()
	self.recvbuffer = ""
	self.isrecv = true
end

function Testbed:EndRecv()
	self.isrecv = false
	message(self.recvbuffer)
	assert( loadstring(self.recvbuffer))();
	self.recvbuffer = ""
end

function Testbed:RecvData( packet )
	if packet.size then
		self.recvbuffer = strapp(self.recvbuffer, packet.buffer)
	end
end

function Testbed:SendCtrlPacket( packet_type, who )
	local packet =
	{
		status = packet_type,
		buffer = nil,
		size = nil
	}
	return packet
end

function Testbed:OnInitialize()
	self.isrecv = false
	self.debug = 1
	self.prefix = "tb|"
	self.recvbuffer = ""
	self:RegisterEvent("CHAT_MSG_ADDON")
end

function Testbed:CHAT_MSG_ADDON(prefix, message, channel, sender)
	local PACKET_START = 7
	local PACKET_END = 9
	local PACKET_ERROR = 12

	local good, packet = Testbed:Deserialize(message)
	if good then
		if packet.status then
			if packet.status == PACKET_START then
				Testbed:StartRecv()
			elseif packet.status == PACKET_END then
				Testbed:EndRecv()
			end
		elseif packet.buffer then
			Testbed:RecvData(packet)
		end
	end
end

function Testbed:CreateDefaultDB()

end