/*
 * "Software pw3270, desenvolvido com base nos códigos fontes do WC3270  e X3270
 * (Paul Mattes Paul.Mattes@usa.net), de emulação de terminal 3270 para acesso a
 * aplicativos mainframe. Registro no INPI sob o nome G3270.
 *
 * Copyright (C) <2008> <Banco do Brasil S.A.>
 *
 * Este programa é software livre. Você pode redistribuí-lo e/ou modificá-lo sob
 * os termos da GPL v.2 - Licença Pública Geral  GNU,  conforme  publicado  pela
 * Free Software Foundation.
 *
 * Este programa é distribuído na expectativa de  ser  útil,  mas  SEM  QUALQUER
 * GARANTIA; sem mesmo a garantia implícita de COMERCIALIZAÇÃO ou  de  ADEQUAÇÃO
 * A QUALQUER PROPÓSITO EM PARTICULAR. Consulte a Licença Pública Geral GNU para
 * obter mais detalhes.
 *
 * Você deve ter recebido uma cópia da Licença Pública Geral GNU junto com este
 * programa; se não, escreva para a Free Software Foundation, Inc., 51 Franklin
 * St, Fifth Floor, Boston, MA  02110-1301  USA
 *
 * Este programa está nomeado como - e possui - linhas de código.
 *
 * Contatos:
 *
 * perry.werneck@gmail.com	(Alexandre Perry de Souza Werneck)
 * erico.mendonca@gmail.com	(Erico Mascarenhas Mendonça)
 *
 */

 #include "private.h"
 #include <terminal.h>
 #include <v3270/actions.h>

/*--[ Implement ]------------------------------------------------------------------------------------*/

 void v3270_accelerator_map_reset(GtkWidget *widget)
 {
 	v3270 * terminal = GTK_V3270(widget);

 	if(terminal)
	{
		if(terminal->accelerators)
		{
			g_slist_free_full(terminal->accelerators,g_free);
			terminal->accelerators = NULL;
		}
		terminal->accelerators = v3270_accelerator_map_load_default(NULL);

	}

 }

 static gint compare_func(const V3270Accelerator *a, const V3270Accelerator *b)
 {
 	if(a->activate != b->activate)
		return a->activate - b->activate;

	return a->arg - b->arg;
 }

 GSList	* v3270_accelerator_map_sort(GSList * accelerators)
 {
	return g_slist_sort(accelerators, (GCompareFunc) compare_func);
 }

 void v3270_accelerator_map_foreach(GtkWidget *widget,void (*call)(const V3270Accelerator * accel, const char *keys, gpointer ptr), gpointer ptr)
 {
	GSList	* accelerator = GTK_V3270(widget)->accelerators;
	GString	* str = g_string_new("");

	while(accelerator)
	{
		V3270Accelerator * current = (V3270Accelerator *) accelerator->data;

		g_string_truncate(str,0);

		while(accelerator && (((V3270Accelerator *) accelerator->data)->activate == current->activate) && (((V3270Accelerator *) accelerator->data)->arg == current->arg))
		{
			V3270Accelerator *accel = (V3270Accelerator *) accelerator->data;
			if(accel->key)
			{

				if(str->str[0])
					g_string_append(str," ");

				if(accel->key)
				{
					g_autofree gchar * keyname = gtk_accelerator_name(accel->key,accel->mods);
					g_string_append(str,keyname);
				}

			}

			accelerator = g_slist_next(accelerator);
		}

		call(current,str->str,ptr);

	}

	g_string_free(str,TRUE);

 }

 V3270Accelerator * v3270_accelerator_map_add_entry(GtkWidget *widget, const gchar *name, const gchar *accelerator, GCallback callback, gpointer data)
 {
	GSList				* ix;
 	v3270 				* terminal = GTK_V3270(widget);
	V3270Accelerator	* accel = NULL;

	// Find accel by name
	for(ix = terminal->accelerators; ix; ix = g_slist_next(ix))
	{
		const gchar * nm = v3270_accelerator_get_name((V3270Accelerator *) ix->data);
		if(nm && !g_ascii_strcasecmp(name,nm))
		{
			accel = (V3270Accelerator *) ix->data;
			break;
		}
	}

	if(!accel)
	{
		// Not found, create a custom accelerator.
		debug("%s: Adding accelerator %s",__FUNCTION__,name);

		V3270CustomAccelerator *customAccel = g_new0(V3270CustomAccelerator,1);

		customAccel->parent.type	= V3270_ACCELERATOR_TYPE_CUSTOM;
		customAccel->name			= g_intern_string(name);

		terminal->accelerators = g_slist_prepend(terminal->accelerators,customAccel);

		accel = (V3270Accelerator *) customAccel;
	}

	accel->arg 		= data;
	accel->activate	= callback;

	v3270_accelerator_parse(accel, accelerator);

	if(accel->key)
	{
		// Any other accell in the same key and modifier? If yes, clear it.
		for(ix = terminal->accelerators; ix; ix = g_slist_next(ix))
		{
			V3270Accelerator * acc = (V3270Accelerator *) ix->data;
			if((acc == accel) || !(acc->key == accel->key && acc->mods == accel->mods))
				continue;

			debug("Resetting accelerator \"%s\"",v3270_accelerator_get_name(acc));

			acc->key 	= 0;
			acc->mods	= 0;

		}
	}

	// Sort!
	terminal->accelerators = v3270_accelerator_map_sort(terminal->accelerators);

	return accel;

 }

 const V3270Accelerator	* v3270_accelerator_map_lookup_entry(GtkWidget *widget, guint keyval, GdkModifierType state)
 {
 	g_return_val_if_fail(GTK_IS_V3270(widget),NULL);

 	// Convert keyval
	keyval = gdk_keyval_to_lower(keyval);

	// Remove unnecessary modifiers
	state &= gtk_accelerator_get_default_mod_mask(); // (GDK_SHIFT_MASK|GDK_CONTROL_MASK|GDK_ALT_MASK);

	GSList * ix;
	for(ix = GTK_V3270(widget)->accelerators; ix; ix = g_slist_next(ix))
	{
		V3270Accelerator *accel = (V3270Accelerator *) ix->data;

		// First check the keycode.
		if(accel->key != keyval)
			continue;

		if(accel->mods == state)
			return accel;

	}

 	return NULL;
 }