local K={}K.__index=K function K.AddChannel(B,K,n)if B.ChatChannels[K:lower()]then error(string.format("\067\104\097\110\110\101\108 \037\113 \097\108\114\097\100\121 \101\120\105\115\116\115\046",K))end local function D(n,D)if D:lower()=="\047\108\101\097\118\101"then local D=B:GetChannel(K)local f=B:GetSpeaker(n)if D and f then if D.Leavable then f:LeaveChannel(K)local n=ChatLocalization:FormatMessageToSend("\071\097\109\101\067\104\097\116\095\067\104\097\116\083\101\114\118\105\099\101\095\089\111\117\072\097\118\101\076\101\102\116\067\104\097\110\110\101\108",string.format("\089\111\117 \104\097\118\101 \108\101\102\116 \099\104\097\110\110\101\108 \'\037\115\'",K),"\082\066\088\095\078\065\077\069",K)f:SendSystemMessage(n,"\083\121\115\116\101\109")else f:SendSystemMessage(ChatLocalization:FormatMessageToSend("\071\097\109\101\067\104\097\116\095\067\104\097\116\083\101\114\118\105\099\101\095\067\097\110\110\111\116\076\101\097\118\101\067\104\097\110\110\101\108","\089\111\117 \099\097\110\110\111\116 \108\101\097\118\101 \116\104\105\115 \099\104\097\110\110\101\108\046"),K)end end return true end return false end local f=ChatChannel.new(B,K)B.ChatChannels[K:lower()]=f f:RegisterProcessCommandsFunction("\100\101\102\097\117\108\116\095\099\111\109\109\097\110\100\115",D,ChatConstants.HighPriority)local k,I=pcall(function()B.eChannelAdded:Fire(K)end)if not k and I then print("\069\114\114\111\114 \097\100\100\100\105\110\103 \099\104\097\110\110\101\108\058 "..I)end if n~=nil then f.AutoJoin=n if n then for n,B in pairs(B.Speakers)do B:JoinChannel(K)end end end return f end function K.RemoveChannel(n,K)if n.ChatChannels[K:lower()]then local B=n.ChatChannels[K:lower()].Name n.ChatChannels[K:lower()]:InternalDestroy()n.ChatChannels[K:lower()]=nil local D,f=pcall(function()n.eChannelRemoved:Fire(B)end)if not D and f then print("\069\114\114\111\114 \114\101\109\111\118\105\110\103 \099\104\097\110\110\101\108\058 "..f)end else warn(string.format("\067\104\097\110\110\101\108 \037\113 \100\111\101\115 \110\111\116 \101\120\105\115\116\046",K))end end function K.GetChannel(n,K)return n.ChatChannels[K:lower()]end function K.AddSpeaker(n,K)if n.Speakers[K:lower()]then error("\083\112\101\097\107\101\114 \""..(K.."\" \097\108\114\101\097\100\121 \101\120\105\115\116\115\033"))end local B=Speaker.new(n,K)n.Speakers[K:lower()]=B local D,f=pcall(function()n.eSpeakerAdded:Fire(K)end)if not D and f then print("\069\114\114\111\114 \097\100\100\105\110\103 \115\112\101\097\107\101\114\058 "..f)end return B end function K.InternalUnmuteSpeaker(n,K)for n,B in pairs(n.ChatChannels)do if B:IsSpeakerMuted(K)then B:UnmuteSpeaker(K)end end end function K.RemoveSpeaker(n,K)if n.Speakers[K:lower()]then local B=n.Speakers[K:lower()].Name n:InternalUnmuteSpeaker(B)n.Speakers[K:lower()]:InternalDestroy()n.Speakers[K:lower()]=nil local D,f=pcall(function()n.eSpeakerRemoved:Fire(B)end)if not D and f then print("\069\114\114\111\114 \114\101\109\111\118\105\110\103 \115\112\101\097\107\101\114\058 "..f)end else warn("\083\112\101\097\107\101\114 \""..(K.."\" \100\111\101\115 \110\111\116 \101\120\105\115\116\033"))end end function K.GetSpeaker(n,K)return n.Speakers[K:lower()]end function K.GetSpeakerByUserOrDisplayName(n,K)local B=n.Speakers[K:lower()]if B then return B end for n,B in pairs(n.Speakers)do local D=B:GetPlayer()if D and D.DisplayName:lower()==K:lower()then return B end end end function K.GetChannelList(K)local n={}for K,B in pairs(K.ChatChannels)do if not B.Private then table.insert(n,B.Name)end end return n end function K.GetAutoJoinChannelList(K)local n={}for K,B in pairs(K.ChatChannels)do if B.AutoJoin then table.insert(n,B)end end return n end function K.GetSpeakerList(K)local n={}for K,B in pairs(K.Speakers)do table.insert(n,B.Name)end return n end function K.SendGlobalSystemMessage(n,K)for n,B in pairs(n.Speakers)do B:SendSystemMessage(K,nil)end end function K.RegisterFilterMessageFunction(D,K,n,B)if D.FilterMessageFunctions:HasFunction(K)then error(string.format("\070\105\108\116\101\114\077\101\115\115\097\103\101\070\117\110\099\116\105\111\110 \'\037\115\' \097\108\114\101\097\100\121 \101\120\105\115\116\115",K))end D.FilterMessageFunctions:AddFunction(K,n,B)end function K.FilterMessageFunctionExists(n,K)return n.FilterMessageFunctions:HasFunction(K)end function K.UnregisterFilterMessageFunction(n,K)if not n.FilterMessageFunctions:HasFunction(K)then error(string.format("\070\105\108\116\101\114\077\101\115\115\097\103\101\070\117\110\099\116\105\111\110 \'\037\115\' \100\111\101\115 \110\111\116 \101\120\105\115\116\115",K))end n.FilterMessageFunctions:RemoveFunction(K)end function K.RegisterProcessCommandsFunction(D,K,n,B)if D.ProcessCommandsFunctions:HasFunction(K)then error(string.format("\080\114\111\099\101\115\115\067\111\109\109\097\110\100\115\070\117\110\099\116\105\111\110 \'\037\115\' \097\108\114\101\097\100\121 \101\120\105\115\116\115",K))end D.ProcessCommandsFunctions:AddFunction(K,n,B)end function K.ProcessCommandsFunctionExists(n,K)return n.ProcessCommandsFunctions:HasFunction(K)end function K.UnregisterProcessCommandsFunction(n,K)if not n.ProcessCommandsFunctions:HasFunction(K)then error(string.format("\080\114\111\099\101\115\115\067\111\109\109\097\110\100\115\070\117\110\099\116\105\111\110 \'\037\115\' \100\111\101\115 \110\111\116 \101\120\105\115\116",K))end n.ProcessCommandsFunctions:RemoveFunction(K)end local n=0 local B=0 local D=0 function K.InternalNotifyFilterIssue(K)if tick()-B>FILTER_THRESHOLD_TIME then D=0 end D=D+1 B=tick()if D>=FILTER_NOTIFCATION_THRESHOLD then if tick()-n>FILTER_NOTIFCATION_INTERVAL then n=tick()local B=K:GetChannel("\083\121\115\116\101\109")if B then B:SendSystemMessage(ChatLocalization:FormatMessageToSend("\071\097\109\101\067\104\097\116\095\067\104\097\116\083\101\114\118\105\099\101\095\067\104\097\116\070\105\108\116\101\114\073\115\115\117\101\115","\084\104\101 \099\104\097\116 \102\105\108\116\101\114 \105\115 \099\117\114\114\101\110\116\108\121 \101\120\112\101\114\105\101\110\099\105\110\103 \105\115\115\117\101\115 \097\110\100 \109\101\115\115\097\103\101\115 \109\097\121 \098\101 \115\108\111\119 \116\111 \097\112\112\101\097\114\046"),errorExtraData)end end end end local f={}

local methods = {}
methods.__index = methods

function methods:AddChannel(channelName, autoJoin)
	if (self.ChatChannels[channelName:lower()]) then
		error(string.format("Channel %q alrady exists.", channelName))
	end

	local function DefaultChannelCommands(fromSpeaker, message)
		if (message:lower() == "/leave") then
			local channel = self:GetChannel(channelName)
			local speaker = self:GetSpeaker(fromSpeaker)
			if (channel and speaker) then
				if (channel.Leavable) then
					speaker:LeaveChannel(channelName)
					local msg = ChatLocalization:FormatMessageToSend(
						"GameChat_ChatService_YouHaveLeftChannel",
						string.format("You have left channel '%s'", channelName),
						"RBX_NAME",
						channelName)
					speaker:SendSystemMessage(msg, "System")
				else
					speaker:SendSystemMessage(ChatLocalization:FormatMessageToSend("GameChat_ChatService_CannotLeaveChannel","You cannot leave this channel."), channelName)
				end
			end

			return true
		end
		return false
	end


	local channel = ChatChannel.new(self, channelName)
	self.ChatChannels[channelName:lower()] = channel

	channel:RegisterProcessCommandsFunction("default_commands", DefaultChannelCommands, ChatConstants.HighPriority)

	local success, err = pcall(function() self.eChannelAdded:Fire(channelName) end)
	if not success and err then
		print("Error addding channel: " ..err)
	end

	if autoJoin ~= nil then
		channel.AutoJoin = autoJoin
		if autoJoin then
			for _, speaker in pairs(self.Speakers) do
				speaker:JoinChannel(channelName)
			end
		end
	end

	return channel
end

function methods:RemoveChannel(channelName)
	if (self.ChatChannels[channelName:lower()]) then
		local n = self.ChatChannels[channelName:lower()].Name

		self.ChatChannels[channelName:lower()]:InternalDestroy()
		self.ChatChannels[channelName:lower()] = nil

		local success, err = pcall(function() self.eChannelRemoved:Fire(n) end)
		if not success and err then
			print("Error removing channel: " ..err)
		end
	else
		warn(string.format("Channel %q does not exist.", channelName))
	end
end

function methods:GetChannel(channelName)
	return self.ChatChannels[channelName:lower()]
end


function methods:AddSpeaker(speakerName)
	if (self.Speakers[speakerName:lower()]) then
		error("Speaker \"" .. speakerName .. "\" already exists!")
	end

	local speaker = Speaker.new(self, speakerName)
	self.Speakers[speakerName:lower()] = speaker

	local success, err = pcall(function() self.eSpeakerAdded:Fire(speakerName) end)
	if not success and err then
		print("Error adding speaker: " ..err)
	end

	return speaker
end

function methods:InternalUnmuteSpeaker(speakerName)
	for channelName, channel in pairs(self.ChatChannels) do
		if channel:IsSpeakerMuted(speakerName) then
			channel:UnmuteSpeaker(speakerName)
		end
	end
end

function methods:RemoveSpeaker(speakerName)
	if (self.Speakers[speakerName:lower()]) then
		local n = self.Speakers[speakerName:lower()].Name

		self:InternalUnmuteSpeaker(n)

		self.Speakers[speakerName:lower()]:InternalDestroy()
		self.Speakers[speakerName:lower()] = nil

		local success, err = pcall(function() self.eSpeakerRemoved:Fire(n) end)
		if not success and err then
			print("Error removing speaker: " ..err)
		end

	else
		warn("Speaker \"" .. speakerName .. "\" does not exist!")
	end
end

function methods:GetSpeaker(speakerName)
	return self.Speakers[speakerName:lower()]
end

function methods:GetSpeakerByUserOrDisplayName(speakerName)
	local speakerByUserName = self.Speakers[speakerName:lower()]

	if speakerByUserName then
		return speakerByUserName
	end

	for _, potentialSpeaker in pairs(self.Speakers) do
		local player = potentialSpeaker:GetPlayer()

		if player and player.DisplayName:lower() == speakerName:lower() then
			return potentialSpeaker
		end
	end
end

function methods:GetChannelList()
	local list = {}
	for i, channel in pairs(self.ChatChannels) do
		if (not channel.Private) then
			table.insert(list, channel.Name)
		end
	end
	return list
end

function methods:GetAutoJoinChannelList()
	local list = {}
	for i, channel in pairs(self.ChatChannels) do
		if channel.AutoJoin then
			table.insert(list, channel)
		end
	end
	return list
end

function methods:GetSpeakerList()
	local list = {}
	for i, speaker in pairs(self.Speakers) do
		table.insert(list, speaker.Name)
	end
	return list
end

function methods:SendGlobalSystemMessage(message)
	for i, speaker in pairs(self.Speakers) do
		speaker:SendSystemMessage(message, nil)
	end
end

function methods:RegisterFilterMessageFunction(funcId, func, priority)
	if self.FilterMessageFunctions:HasFunction(funcId) then
		error(string.format("FilterMessageFunction '%s' already exists", funcId))
	end
	self.FilterMessageFunctions:AddFunction(funcId, func, priority)
end

function methods:FilterMessageFunctionExists(funcId)
	return self.FilterMessageFunctions:HasFunction(funcId)
end

function methods:UnregisterFilterMessageFunction(funcId)
	if not self.FilterMessageFunctions:HasFunction(funcId) then
		error(string.format("FilterMessageFunction '%s' does not exists", funcId))
	end
	self.FilterMessageFunctions:RemoveFunction(funcId)
end

function methods:RegisterProcessCommandsFunction(funcId, func, priority)
	if self.ProcessCommandsFunctions:HasFunction(funcId) then
		error(string.format("ProcessCommandsFunction '%s' already exists", funcId))
	end
	self.ProcessCommandsFunctions:AddFunction(funcId, func, priority)
end

function methods:ProcessCommandsFunctionExists(funcId)
	return self.ProcessCommandsFunctions:HasFunction(funcId)
end

function methods:UnregisterProcessCommandsFunction(funcId)
	if not self.ProcessCommandsFunctions:HasFunction(funcId) then
		error(string.format("ProcessCommandsFunction '%s' does not exist", funcId))
	end
	self.ProcessCommandsFunctions:RemoveFunction(funcId)
end

local LastFilterNoficationTime = 0
local LastFilterIssueTime = 0
local FilterIssueCount = 0
function methods:InternalNotifyFilterIssue()
	if (tick() - LastFilterIssueTime) > FILTER_THRESHOLD_TIME then
		FilterIssueCount = 0
	end
	FilterIssueCount = FilterIssueCount + 1
	LastFilterIssueTime = tick()
	if FilterIssueCount >= FILTER_NOTIFCATION_THRESHOLD then
		if (tick() - LastFilterNoficationTime) > FILTER_NOTIFCATION_INTERVAL then
			LastFilterNoficationTime = tick()
			local systemChannel = self:GetChannel("System")
			if systemChannel then
				systemChannel:SendSystemMessage(
					ChatLocalization:FormatMessageToSend(
						"GameChat_ChatService_ChatFilterIssues",
						"The chat filter is currently experiencing issues and messages may be slow to appear."
					),
					errorExtraData
				)
			end
		end
	end
end

local StudioMessageFilteredCache = {}
