module 'aux.tabs.search'

local filter_util = require 'aux.util.filter'

_G.aux_auto_buy_filters = t
_G.aux_favorite_searches = t
_G.aux_recent_searches = t

function update_search_listings()
	local autobuy_filter_rows = t
	for i, autobuy_filter in aux_auto_buy_filters do
		local name = strsub(autobuy_filter.prettified, 1, 250)
		tinsert(autobuy_filter_rows, {
			cols = {{ value=name }},
			search = autobuy_filter,
			index = i,
		})
	end
	auto_buy_listing:SetData(autobuy_filter_rows)

	local favorite_search_rows = t
	for i, favorite_search in aux_favorite_searches do
		local name = strsub(favorite_search.prettified, 1, 250)
		tinsert(favorite_search_rows, {
			cols = {{ value=name }},
			search = favorite_search,
			index = i,
		})
	end
	favorite_searches_listing:SetData(favorite_search_rows)

	local recent_search_rows = t
	for i, recent_search in aux_recent_searches do
		local name = strsub(recent_search.prettified, 1, 250)
		tinsert(recent_search_rows, {
			cols = {{ value=name }},
			search = recent_search,
			index = i,
		})
	end
	recent_searches_listing:SetData(recent_search_rows)
end

function new_recent_search(filter_string, prettified)
	tinsert(aux_recent_searches, 1, {
		filter_string = filter_string,
		prettified = prettified,
	})
	while getn(aux_recent_searches) > 50 do
		tremove(aux_recent_searches)
	end
	update_search_listings()
end

handlers = {
	OnClick = function(st, data, _, button)
		if not data then return end
		if button == 'LeftButton' and IsShiftKeyDown() then
			search_box:SetText(data.search.filter_string)
		elseif button == 'RightButton' and IsShiftKeyDown() then
			add_filter(data.search.filter_string)
		elseif button == 'LeftButton' and IsControlKeyDown() then
			if st == favorite_searches_listing then
				move_up(aux_favorite_searches, data.index)
			elseif st == auto_buy_listing then
				move_up(aux_auto_buy_filters, data.index)
			end
			update_search_listings()
		elseif button == 'RightButton' and IsControlKeyDown() then
			if st == favorite_searches_listing then
				move_down(aux_favorite_searches, data.index)
			elseif st == auto_buy_listing then
				move_down(aux_auto_buy_filters, data.index)
			end
			update_search_listings()
		elseif button == 'RightButton' and IsAltKeyDown() then
			if st == auto_buy_listing then
				tremove(aux_auto_buy_filters, data.index)
			else
				add_auto_buy(data.search.filter_string)
			end
			update_search_listings()
		elseif button == 'LeftButton' then
			search_box:SetText(data.search.filter_string)
			execute()
		elseif button == 'RightButton' then
			if st == favorite_searches_listing then
				tremove(aux_favorite_searches, data.index)
			else
				tinsert(aux_favorite_searches, 1, data.search)
			end
			update_search_listings()
		end
	end,
	OnEnter = function(st, data, self)
		if not data then return end
		GameTooltip_SetDefaultAnchor(GameTooltip, UIParent)
		GameTooltip:AddLine(gsub(data.search.prettified, ';', '\n\n'), 255/255, 254/255, 250/255, true)
		GameTooltip:Show()
	end,
	OnLeave = function()
		GameTooltip:ClearLines()
		GameTooltip:Hide()
	end
}

function get_auto_buy_validator()
	local validators = t
	for _, filter in aux_auto_buy_filters do
		local queries, error = filter_util.queries(filter.filter_string)
		if queries then
			tinsert(validators, queries[1].validator)
		else
			print('Invalid auto buy filter:', error)
		end
	end
	return function(record)
		return any(validators, function(validator) return validator(record) end)
	end
end

function add_favorite(filter_string)
	local queries, error = filter_util.queries(filter_string)
	if queries then
		tinsert(aux_favorite_searches, 1, T(
			'filter_string', filter_string,
			'prettified', join(map(queries, function(query) return query.prettified end), ';')
		))
		update_search_listings()
	else
		print('Invalid filter:', error)
	end
end

function add_auto_buy(filter_string)
	local queries, error = filter_util.queries(filter_string)
	if queries then
		if getn(queries) > 1 then
			print'Error: The automatic buyout filter does not support multi-queries'
		elseif size(queries[1].blizzard_query) > 0 and not filter_util.parse_filter_string(filter_string).blizzard.exact then
			print'Error: The automatic buyout filter does not support Blizzard filters'
		else
			tinsert(aux_auto_buy_filters, 1, T(
				'filter_string', filter_string,
				'prettified', join(map(queries, function(query) return query.prettified end), ';')
			))
		end
	else
		print('Invalid filter:', error)
	end
end

function move_up(list, index)
	if list[index - 1] then
		list[index], list[index - 1] = list[index - 1], list[index]
	end
end

function move_down(list, index)
	if list[index + 1] then
		list[index], list[index + 1] = list[index + 1], list[index]
	end
end