/* vifm
 * Copyright (C) 2001 Ken Steen.
 * Copyright (C) 2011 xaizek.
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA
 */

#include "map_menu.h"

#include <curses.h> /* KEY_* */

#include <stddef.h> /* wchar_t */
#include <stdlib.h> /* malloc() free() */
#include <string.h> /* strdup() strlen() strcat() */
#include <wchar.h> /* wcsncmp() wcslen() */

#include "../compat/curses.h"
#include "../compat/reallocarray.h"
#include "../engine/keys.h"
#include "../modes/modes.h"
#include "../ui/ui.h"
#include "../utils/str.h"
#include "../utils/string_array.h"
#include "../bracket_notation.h"
#include "menus.h"

static void add_mapping_item(const wchar_t lhs[], const wchar_t rhs[],
		const char descr[]);

/* Menu object is global to make it available in add_mapping_item(). */
static menu_data_t m;

/* Prefix to check LHS against. */
static const wchar_t *prefix;
/* Length of the prefix string. */
static size_t prefix_len;

int
show_map_menu(view_t *view, const char mode_str[], int mode,
		const wchar_t start[])
{
	const int dialogs = mode == SORT_MODE || mode == ATTR_MODE
	                 || mode == CHANGE_MODE || mode == FILE_INFO_MODE;

	char *prefix_str = wstr_to_spec(start);
	const char *fmt = (start[0] == L'\0')
	                ? "Mappings for %s mode%s"
	                : "Mappings for %s mode%s with prefix: %s";

	menus_init_data(&m, view,
			format_str(fmt, mode_str, dialogs ? "s" : "", prefix_str),
			strdup("No mappings found"));

	free(prefix_str);

	prefix = start;
	prefix_len = wcslen(prefix);

	vle_keys_list(mode, &add_mapping_item, dialogs);

	/* If we filtered out all meaningful lines or there were none, clear the
	 * menu. */
	if(m.len == 3)
	{
		free(m.items[0]);
		free(m.items);
		m.items = NULL;
		m.len = 0;
	}

	return menus_enter(&m, view);
}

/* Adds matching key information to the menu after pre-formatting. */
static void
add_mapping_item(const wchar_t lhs[], const wchar_t rhs[], const char descr[])
{
	enum { MAP_WIDTH = 11 };

	/* Skip group of mouse events, can't print them nicely in this form. */
	if(lhs[0] == K(KEY_MOUSE))
	{
		return;
	}

	const int is_separator = (lhs[0] == L'\0');
	if(!is_separator)
	{
		if(wcsncmp(prefix, lhs, prefix_len) != 0)
		{
			return;
		}
	}

	char *mb_lhs = wstr_to_spec(lhs);

	m.items = reallocarray(m.items, m.len + 1, sizeof(char *));

	if(is_separator)
	{
		m.items[m.len++] = strdup(descr);
	}
	else if(rhs[0] == L'\0' && descr[0] == '\0')
	{
		/* RHS is empty. */
		m.items[m.len++] = format_str("%-*s <nop>", MAP_WIDTH, mb_lhs);
	}
	else if(rhs[0] == L'\0')
	{
		m.items[m.len++] = format_str("%-*s %s", MAP_WIDTH, mb_lhs, descr);
	}
	else
	{
		char *const mb_rhs = wstr_to_spec(rhs);
		m.items[m.len++] = format_str("%-*s %s", MAP_WIDTH, mb_lhs, mb_rhs);
		free(mb_rhs);
	}

	free(mb_lhs);
}

/* vim: set tabstop=2 softtabstop=2 shiftwidth=2 noexpandtab cinoptions-=(0 : */
/* vim: set cinoptions+=t0 filetype=c : */