#include "foobar2000-sdk-pch.h"
#include "file_operation_callback.h"
#include "playlist.h"
#include "metadb.h"


static void g_on_files_deleted_sorted(const pfc::list_base_const_t<const char *> & p_items)
{
	//library_manager::get()->on_files_deleted_sorted(p_items);
	playlist_manager::get()->on_files_deleted_sorted(p_items);

	FB2K_FOR_EACH_SERVICE(file_operation_callback,  on_files_deleted_sorted(p_items));
}

static void g_on_files_moved_sorted(const pfc::list_base_const_t<const char *> & p_from,const pfc::list_base_const_t<const char *> & p_to)
{
	{
		auto api = playlist_manager::get();
		api->on_files_moved_sorted(p_from,p_to);
		api->on_files_deleted_sorted(p_from);
	}
	FB2K_FOR_EACH_SERVICE(file_operation_callback, on_files_moved_sorted(p_from,p_to));
}

static void g_on_files_copied_sorted(const pfc::list_base_const_t<const char *> & p_from,const pfc::list_base_const_t<const char *> & p_to)
{
	FB2K_FOR_EACH_SERVICE(file_operation_callback, on_files_copied_sorted(p_from,p_to));
}

void file_operation_callback::g_on_files_deleted(const pfc::list_base_const_t<const char *> & p_items)
{
	core_api::ensure_main_thread();
	t_size count = p_items.get_count();
	if (count > 0)
	{
		if (count == 1) g_on_files_deleted_sorted(p_items);
		else
		{
			pfc::array_t<t_size> order; order.set_size(count);
			order_helper::g_fill(order);
			p_items.sort_get_permutation_t(metadb::path_compare,order.get_ptr());
			g_on_files_deleted_sorted(pfc::list_permutation_t<const char*>(p_items,order.get_ptr(),count));
		}
	}
}

void file_operation_callback::g_on_files_moved(const pfc::list_base_const_t<const char *> & p_from,const pfc::list_base_const_t<const char *> & p_to)
{
	core_api::ensure_main_thread();
	pfc::dynamic_assert(p_from.get_count() == p_to.get_count());
	t_size count = p_from.get_count();
	if (count > 0)
	{
		if (count == 1) g_on_files_moved_sorted(p_from,p_to);
		else
		{
			pfc::array_t<t_size> order; order.set_size(count);
			order_helper::g_fill(order);
			p_from.sort_get_permutation_t(metadb::path_compare,order.get_ptr());
			g_on_files_moved_sorted(pfc::list_permutation_t<const char*>(p_from,order.get_ptr(),count),pfc::list_permutation_t<const char*>(p_to,order.get_ptr(),count));
		}
	}
}

void file_operation_callback::g_on_files_copied(const pfc::list_base_const_t<const char *> & p_from,const pfc::list_base_const_t<const char *> & p_to)
{
	if (core_api::assert_main_thread())
	{
		assert(p_from.get_count() == p_to.get_count());
		t_size count = p_from.get_count();
		if (count > 0)
		{
			if (count == 1) g_on_files_copied_sorted(p_from,p_to);
			else
			{
				pfc::array_t<t_size> order; order.set_size(count);
				order_helper::g_fill(order);
				p_from.sort_get_permutation_t(metadb::path_compare,order.get_ptr());
				g_on_files_copied_sorted(pfc::list_permutation_t<const char*>(p_from,order.get_ptr(),count),pfc::list_permutation_t<const char*>(p_to,order.get_ptr(),count));
			}
		}
	}
}
bool file_operation_callback::g_search_sorted_list(const pfc::list_base_const_t<const char*> & p_list,const char * p_string,t_size & p_index) {
	return pfc::binarySearch<metadb::path_comparator>::run(p_list,0,p_list.get_count(),p_string,p_index);
}

bool file_operation_callback::g_update_list_on_moved_ex(metadb_handle_list_ref p_list,t_pathlist p_from,t_pathlist p_to, metadb_handle_list_ref itemsAdded, metadb_handle_list_ref itemsRemoved) {
	auto api = metadb::get();
	bool changed = false;
	itemsAdded.remove_all(); itemsRemoved.remove_all();
	for(t_size walk = 0; walk < p_list.get_count(); ++walk) {
		metadb_handle_ptr item = p_list[walk];
		t_size index;
		if (g_search_sorted_list(p_from,item->get_path(),index)) {
			metadb_handle_ptr newItem;
			api->handle_create_replace_path_canonical(newItem,item,p_to[index]);
			p_list.replace_item(walk,newItem);
			changed = true;
			itemsAdded.add_item(newItem); itemsRemoved.add_item(item);
		}
	}
	return changed;
}
bool file_operation_callback::g_update_list_on_moved(metadb_handle_list_ref p_list,const pfc::list_base_const_t<const char *> & p_from,const pfc::list_base_const_t<const char *> & p_to) {
	auto api = metadb::get();
	bool changed = false;
	for(t_size walk = 0; walk < p_list.get_count(); ++walk) {
		metadb_handle_ptr item = p_list[walk];
		t_size index;
		if (g_search_sorted_list(p_from,item->get_path(),index)) {
			metadb_handle_ptr newItem;
			api->handle_create_replace_path_canonical(newItem,item,p_to[index]);
			p_list.replace_item(walk,newItem);
			changed = true;
		}
	}
	return changed;
}


bool file_operation_callback::g_mark_dead_entries(metadb_handle_list_cref items, bit_array_var & mask, t_pathlist deadPaths) {
	bool found = false;
	const t_size total = items.get_count();
	for(t_size walk = 0; walk < total; ++walk) {
		t_size index;
		if (g_search_sorted_list(deadPaths,items[walk]->get_path(),index)) {
			mask.set(walk,true); found = true;
		} else {
			mask.set(walk,false);
		}
	}
	return found;
}