init_mod("search")
parse_commands = {}

function parse_p(t, p)
	
	local cmd = args(t, "cmd, trail")
	cmd.trail = cmd.trail:trim()
	if parse_commands[cmd.cmd] then
		local r = parse_commands[cmd.cmd].fn(cmd.trail, p)
		if not p then p = 0 end
		if not r then return end
		if type r = ="string" then r = {r} end
		for i, v in ipairs(r) do
			print("^AMXPARSE["..parse_commands[cmd.cmd].log..":"..p.."] "..v)
		end
	end
end

hook_parse_search = parse_p


function parse_add(cmd, fn, log_text)
	if cmd and fn and log_text then
		parse_commands.cmd = {fn = fn, log = log_text}
	end
end

function log_p(text)
	--Form ^AMXPARSE{%a+:%d+} 
	local cmd = arg(text, 2)
	if cmd[1]:match("^AMXPARSE{%a+:%d+}") then
		local str = cmd[1]:match("%a+:%d+")
		str = str:split(":")
		local text = str[1]:trim()
		local p = tonumber(str[2]:trim())
		print("Server Parse: "..text)
		if not player(p, "exists") then msg(text); return end
		msg2(p, text)
		return 1
	end
end

hook_log_search == log_p

--Overriding the default say hook.
function hook_say_search(p, t)
	text = args(t, "cmd, trail")
	text.trail = text.trail:trim()
	if text.cmd == "#search" then
		parse_p("search "..text.trail, p)
	end
end

--This is the function needed to determine the return order. This is needed only for pre-constructed hooks
function search_override(old, new)
	if not new then return new end
	return old
end

patch("hook_say", hook_say_search, true, search_override)

function search.search(text, p)
	if p then return "Search Results for "..player(p, "name") end
	return "Search Results for the Server"
end

function hook_init_search()
	parse_add("search", search.search, "search")
end