Software Público Brasileiro

/*
 * "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 actions.c e possui - linhas de código.
 *
 * Contatos:
 *
 * perry.werneck@gmail.com	(Alexandre Perry de Souza Werneck)
 * erico.mendonca@gmail.com	(Erico Mascarenhas Mendonça)
 * licinio@bb.com.br		(Licínio Luis Branco)
 * kraucer@bb.com.br		(Kraucer Fernandes Mazuco)
 *
 */

 #include "private.h"
 #include "uiparser/parser.h"

 #include <v3270.h>
 #include <v3270/toggle.h>
 #include <v3270/filetransfer.h>

 #include <pw3270/plugin.h>
 #include <lib3270/actions.h>
 #include <lib3270/selection.h>
 #include <lib3270/trace.h>
 #include <lib3270/log.h>
 #include <lib3270/toggle.h>
 #include <stdlib.h>

 #if GTK_CHECK_VERSION(3,0,0)
	#include <gdk/gdkkeysyms-compat.h>
 #else
	#include <gdk/gdkkeysyms.h>
 #endif

 #ifndef GDK_ALT_MASK
	#define GDK_ALT_MASK GDK_MOD1_MASK
 #endif

 #ifndef GDK_NUMLOCK_MASK
	#define GDK_NUMLOCK_MASK GDK_MOD2_MASK
 #endif

 #define ERROR_DOMAIN g_quark_from_static_string(PACKAGE_NAME)

 #define TOGGLE_GDKDEBUG 			LIB3270_TOGGLE_COUNT+1
 #define TOGGLE_DYNAMIC_SPACING		LIB3270_TOGGLE_COUNT+2

 #if defined(X3270_TRACE)
	#define trace_action(a,w) lib3270_trace_event(v3270_get_session(w),"Action %s activated on widget %p\n",gtk_action_get_name(a),w);
 #else
	#define trace_action(a,w) /* */
 #endif // X3270_TRACE

/*--[ Keyboard Actions ]-----------------------------------------------------------------------------*/

 static struct _keyboard_actions
 {
	guint			  keyval;
	GdkModifierType	  state;
	GtkAction		* action;
 } keyboard_actions[] =
 {
	{ GDK_Left,				0,					NULL	},
	{ GDK_Up,				0,					NULL	},
	{ GDK_Right,			0,					NULL	},
	{ GDK_Down,				0,					NULL	},
	{ GDK_Tab,				0,					NULL	},
	{ GDK_ISO_Left_Tab,		GDK_SHIFT_MASK,		NULL	},
	{ GDK_KP_Left,			0,					NULL	},
	{ GDK_KP_Up,			0,					NULL	},
	{ GDK_KP_Right,			0,					NULL	},
	{ GDK_KP_Down,			0,					NULL	},

	{ GDK_KP_Add,			GDK_NUMLOCK_MASK,	NULL	},
	{ GDK_KP_Subtract,		GDK_NUMLOCK_MASK,	NULL	},

	{ GDK_3270_PrintScreen,	0,					NULL	},
	{ GDK_P,				GDK_CONTROL_MASK,	NULL	},

	{ GDK_Sys_Req,			0,					NULL	},

	{ GDK_Print,			GDK_CONTROL_MASK,	NULL	},
	{ GDK_Print,			GDK_SHIFT_MASK,		NULL	},
	{ GDK_Control_R,		0,					NULL	},
	{ GDK_Control_L,		0,					NULL	},


#ifdef WIN32
	{ GDK_Pause,			0,					NULL	},

#endif
};


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

static void do_lib3270_action(GtkAction *action, GtkWidget *widget)
{
	int	(*call)(H3270 *h) = (int (*)(H3270 *h)) g_object_get_data(G_OBJECT(action),"lib3270_call");

	trace_action(action,widget);

	if(call(v3270_get_session(widget)))
	{
		g_message("Action \"%s\" failed: %s",gtk_action_get_name(action),strerror(errno));
	}
}

static void connect_action(GtkAction *action, GtkWidget *widget)
{
	const gchar 	* host		= (const gchar *) g_object_get_data(G_OBJECT(action),"host");
	const gchar		* systype 	= (const gchar *) g_object_get_data(G_OBJECT(action),"type");
	const gchar		* colortype	= (const gchar *) g_object_get_data(G_OBJECT(action),"colors");
//	unsigned short	  colors;

//	trace_action(action,widget);

	lib3270_trace_event(
		v3270_get_session(widget),
		"Action %s activated on widget %p\nurl=%s\nsystype=%s\ncolortype=%s\n",
			gtk_action_get_name(action),
			widget,
			(host ? host : "-"),
			(systype ? systype : "-"),
			(colortype ? colortype : "-")
	);

	/*
	lib3270_trace_event(
				v3270_get_session(widget),"Action %s activated on widget %p\n",gtk_action_get_name(a),w);
	*/

	if(host)
		v3270_set_url(widget,host);

	if(systype)
		v3270_set_host_type_by_name(widget,systype);

	if(colortype)
		v3270_set_session_color_type(widget,atoi(colortype));

	host = lib3270_get_url(v3270_get_session(widget));

	trace("host=%s",host);

	if(host && *host)
	{
		if(v3270_reconnect(widget))
		{
			lib3270_trace_event(
					v3270_get_session(widget),
					"Recconect has failed: %s",
					strerror(errno)
			);
		}
		return;
	}

	lib3270_trace_event(v3270_get_session(widget),"No default host, opening dialog");
	hostname_action(action,widget);

}

static void disconnect_action(GtkAction *action, GtkWidget *widget)
{
	trace_action(action,widget);
	v3270_disconnect(widget);
}

static void activate_action(GtkAction *action, GtkWidget *widget)
{
	trace_action(action,widget);
	gtk_widget_activate(widget);
}

static void reload_action(GtkAction *action, GtkWidget *widget)
{
	trace_action(action,widget);
	v3270_reload(widget);
}

static void do_copy(GtkAction *action, GtkWidget *widget, gboolean cut)
{
	V3270_SELECT_FORMAT	  mode = V3270_SELECT_TEXT;
	const gchar 		* str = (const gchar *) g_object_get_data(G_OBJECT(action),"format");

	if(str)
	{
		static const struct _format
		{
			V3270_SELECT_FORMAT	  mode;
			const gchar			* name;
		} format[] =
		{
			{ V3270_SELECT_TEXT,	"text"		},
			{ V3270_SELECT_TABLE,	"table"		},
		};

		int f;

		for(f=0;f < G_N_ELEMENTS(format);f++)
		{
			if(!g_ascii_strcasecmp(format[f].name,str))
			{
				mode = format[f].mode;
				break;
			}
		}
	}

	trace_action(action,widget);
	v3270_copy_selection(widget,mode,cut);
}

static void copy_action(GtkAction *action, GtkWidget *widget)
{
	do_copy(action, widget, FALSE);
}

static void cut_action(GtkAction *action, GtkWidget *widget)
{
	do_copy(action, widget, TRUE);
}

static void append_action(GtkAction *action, GtkWidget *widget)
{
	trace_action(action,widget);
	v3270_append_selection(widget,FALSE);
}

static void paste_clipboard_action(GtkAction *action, GtkWidget *widget)
{
	trace_action(action,widget);
	v3270_paste(widget);
}

static void paste_next_action(GtkAction *action, GtkWidget *widget)
{
	trace_action(action,widget);
	lib3270_paste_next(v3270_get_session(widget));
}

static void kp_subtract_action(GtkAction *action, GtkWidget *widget)
{
	trace_action(action,widget);

	if(v3270_get_toggle(widget,LIB3270_TOGGLE_KP_ALTERNATIVE))
		v3270_backtab(widget);
	else
		v3270_set_string(widget,"-");

}

static void kp_add_action(GtkAction *action, GtkWidget *widget)
{
	trace_action(action,widget);

	if(v3270_get_toggle(widget,LIB3270_TOGGLE_KP_ALTERNATIVE))
		v3270_tab(widget);
	else
		v3270_set_string(widget,"+");

}

G_GNUC_INTERNAL void transfer_action(GtkAction *action, GtkWidget *widget)
{
	GtkWidget * dialog = v3270ft_new(gtk_widget_get_toplevel(widget));

	do {

		gtk_widget_show_all(dialog);

		switch(gtk_dialog_run(GTK_DIALOG(dialog))) {
		case GTK_RESPONSE_APPLY:
		case GTK_RESPONSE_OK:
		case GTK_RESPONSE_YES:
			gtk_widget_hide(dialog);
			v3270ft_transfer(dialog,v3270_get_session(widget));
			break;

		case GTK_RESPONSE_CANCEL:
		case GTK_RESPONSE_NO:
		case GTK_RESPONSE_DELETE_EVENT:
			v3270ft_remove_all(dialog);
			break;

		default:
			g_warning("Unexpected response from v3270ft");
		}

	} while(v3270ft_get_length(dialog) > 0);

	gtk_widget_destroy(dialog);

}

static void connect_standard_action(GtkAction *action, GtkWidget *widget, const gchar *name)
{
	static const struct _gtk_action
	{
		const gchar * name;
		void		  (*call)(GtkAction *action, GtkWidget *widget);
	}
	gtk_action[] =
	{
		{ "activate", 		activate_action			},
		{ "reload",			reload_action			},
		{ "connect", 		connect_action			},
		{ "disconnect", 	disconnect_action		},
		{ "hostname",		hostname_action			},
		{ "editcolors",		editcolors_action		},
		{ "printsettings",	print_settings_action	},
		{ "about",			about_dialog_action		},
		{ "kpsubtract", 	kp_subtract_action		},
		{ "kpadd",			kp_add_action			},
		{ "transfer",		transfer_action			},
	};

	int f;

	// Search for lib3270 predefined actions
	const LIB3270_ACTION * lib3270_action = lib3270_get_action(name);
	if(lib3270_action)
	{
		g_object_set_data(G_OBJECT(action),"lib3270_call",lib3270_action->activate);
		g_signal_connect(action,"activate",G_CALLBACK(do_lib3270_action),widget);
		return;
	}

	/*
	const LIB3270_ACTION * lib3270_actions = lib3270_get_actions();

	for(f=0; lib3270_actions[f].name; f++)
	{
		if(!g_ascii_strcasecmp(name,lib3270_actions[f].name))
		{
			g_object_set_data(G_OBJECT(action),"lib3270_call",lib3270_actions[f].activate);
			g_signal_connect(action,"activate",G_CALLBACK(do_lib3270_action),widget);
			return;
		}
	}
	*/

	/*
	for(f=0;f<G_N_ELEMENTS(lib3270_entry);f++)
	{
		if(!g_ascii_strcasecmp(name,lib3270_entry[f].name))
		{
			g_object_set_data(G_OBJECT(action),"lib3270_call",lib3270_entry[f].call);
			g_signal_connect(action,"activate",G_CALLBACK(do_lib3270_action),widget);
			return;
		}
	}
	*/

	// Search for application actions
	for(f=0;f<G_N_ELEMENTS(gtk_action);f++)
	{
		if(!g_ascii_strcasecmp(name,gtk_action[f].name))
		{
			g_signal_connect(action,"activate",G_CALLBACK(gtk_action[f].call),widget);
			return;
		}
	}

	if(!g_ascii_strcasecmp(name,"screensizes"))
		return;

	// Check for plugin actions
	if(!pw3270_setup_plugin_action(action, widget, name))
		return;

	// Not-found, disable action
	gtk_action_set_sensitive(action,FALSE);
}


static void lib3270_toggle_action(GtkToggleAction *action,GtkWidget *widget)
{
	LIB3270_TOGGLE_ID toggle = (LIB3270_TOGGLE_ID) GPOINTER_TO_INT(g_object_get_data(G_OBJECT(action),"toggle_id"));

	trace("Action %s toggled on widget %p (id=%d)\n",gtk_action_get_name(GTK_ACTION(action)),widget,(int) toggle);

	lib3270_trace_event(v3270_get_session(widget),"Action %s toggled on widget %p (id=%d)\n",gtk_action_get_name(GTK_ACTION(action)),widget,(int) toggle);

	if(toggle == TOGGLE_GDKDEBUG)
	{
		gdk_window_set_debug_updates(gtk_toggle_action_get_active(action));
	}
	else if(toggle == TOGGLE_DYNAMIC_SPACING)
	{
		v3270_set_dynamic_font_spacing(widget,gtk_toggle_action_get_active(action));
		set_boolean_to_config("toggle","dspacing",gtk_toggle_action_get_active(action));
	}
	else if(toggle < LIB3270_TOGGLE_COUNT)
	{
		lib3270_set_toggle(v3270_get_session(widget),toggle,gtk_toggle_action_get_active(action));
	}
}

static void selection_move_action(GtkAction *action, GtkWidget *widget)
{
	trace_action(action,widget);
	lib3270_move_selection(v3270_get_session(widget),(LIB3270_DIRECTION) GPOINTER_TO_INT(g_object_get_data(G_OBJECT(action),"direction")));
}

static void cursor_move_action(GtkAction *action, GtkWidget *widget)
{
	int flags = GPOINTER_TO_INT(g_object_get_data(G_OBJECT(action),"move_flags"));

	lib3270_trace_event(v3270_get_session(widget),"Action %s activated on widget %p flags=%04x\n",
									gtk_action_get_name(action),
									widget,
									(unsigned int) flags);

	lib3270_move_cursor(v3270_get_session(widget),(LIB3270_DIRECTION) (flags & 0x0F), (flags & 0x80) );
}

static void connect_move_action(GtkAction *action, GtkWidget *widget, const gchar *target, unsigned short flags, GError **error)
{
	if(!target)
	{
		gtk_action_set_sensitive(action,FALSE);
		return;
	}

	if(!g_ascii_strcasecmp(target,"selection"))
	{
		g_object_set_data(G_OBJECT(action),"direction",GINT_TO_POINTER((flags & 0x0F)));
		g_signal_connect(action,"activate",G_CALLBACK(selection_move_action),widget);
	}
	else if(!g_ascii_strcasecmp(target,"cursor"))
	{
		g_object_set_data(G_OBJECT(action),"move_flags",GINT_TO_POINTER( ((int) flags)));
		g_signal_connect(action,"activate",G_CALLBACK(cursor_move_action),widget);
	}
	else
	{
		*error = g_error_new(	ERROR_DOMAIN,
								ENOENT,
								_( "Unexpected target \"%s\""),
								target);
	}

}

static void action_pfkey(GtkAction *action, GtkWidget *widget)
{
	int key = GPOINTER_TO_INT(g_object_get_data(G_OBJECT(action),"pfkey"));

	lib3270_trace_event(v3270_get_session(widget),"Action %s activated on widget %p key=%d\n",gtk_action_get_name(action),widget,key);

	lib3270_pfkey(v3270_get_session(widget),key);
}

static void action_pakey(GtkAction *action, GtkWidget *widget)
{
	int key = GPOINTER_TO_INT(g_object_get_data(G_OBJECT(action),"pakey"));

	lib3270_trace_event(v3270_get_session(widget),"Action %s activated on widget %p key=%d\n",gtk_action_get_name(action),widget,key);
	lib3270_pakey(v3270_get_session(widget),key);
}

static void action_set_toggle(GtkAction *action, GtkWidget *widget)
{
	LIB3270_TOGGLE_ID id = (LIB3270_TOGGLE_ID) GPOINTER_TO_INT(g_object_get_data(G_OBJECT(action),"toggle_id"));

	trace("Action %s activated on widget %p toggle=%d\n",gtk_action_get_name(action),widget,id);

	lib3270_trace_event(v3270_get_session(widget),"Action %s activated on widget %p toggle=%d\n",gtk_action_get_name(action),widget,id);
	lib3270_set_toggle(v3270_get_session(widget),id,1);
}

static void action_reset_toggle(GtkAction *action, GtkWidget *widget)
{
	LIB3270_TOGGLE_ID id = (LIB3270_TOGGLE_ID) GPOINTER_TO_INT(g_object_get_data(G_OBJECT(action),"toggle_id"));

	trace("Action %s activated on widget %p toggle=%d\n",gtk_action_get_name(action),widget,id);

	lib3270_trace_event(v3270_get_session(widget),"Action %s activated on widget %p toggle=%d\n",gtk_action_get_name(action),widget,id);
	lib3270_set_toggle(v3270_get_session(widget),id,0);
}

static void action_select_all(GtkAction *action, GtkWidget *widget)
{
	trace_action(action,widget);
	v3270_select_all(widget);
}

static void action_select_field(GtkAction *action, GtkWidget *widget)
{
	lib3270_select_field(v3270_get_session(widget));
}

static void action_select_none(GtkAction *action, GtkWidget *widget)
{
	v3270_unselect(widget);
}

static void action_select_last(GtkAction *action, GtkWidget *widget)
{
	lib3270_reselect(v3270_get_session(widget));
}

static void action_zoom_in(GtkAction *action, GtkWidget *widget)
{
	trace("Action zoom_in activated on widget %p\n",widget);
	v3270_zoom_in(widget);
}

static void action_zoom_out(GtkAction *action, GtkWidget *widget)
{
	trace("Action zoom_out activated on widget %p\n",widget);
	v3270_zoom_out(widget);
}

static void action_zoom_fit(GtkAction *action, GtkWidget *widget)
{
	trace("Action zoom_fit activated on widget %p\n",widget);
	v3270_zoom_best(widget);
}

static void action_string(GtkAction *action, GtkWidget *widget)
{
	gchar *text = g_object_get_data(G_OBJECT(action),"value");
	if(text)
		lib3270_emulate_input(v3270_get_session(widget),text,strlen(text),0);
}

static int id_from_array(const gchar *key, const gchar **array, GError **error)
{
	int f;

	if(!key)
		return -1;

	for(f = 0;array[f];f++)
	{
		if(!g_ascii_strcasecmp(key,array[f]))
			return f;
	}

	*error = g_error_new(ERROR_DOMAIN,EINVAL, _("Unexpected or invalid attribute value \"%s\""), key );

	return -1;
}

static int get_attribute_id(const gchar *name, const gchar *key, gchar **nm, const gchar **src, const gchar **names, const gchar **values, GError **error)
{
 	const gchar *attr = ui_get_attribute(key,names,values);
 	int			 id;

 	if(!attr)
	{
		*error = g_error_new(ERROR_DOMAIN,EINVAL,_("Attribute \"%s\" is invalid or undefined" ), key);
		return -1;
	}

	id = id_from_array(attr,src,error);
	if(id >= 0)
	{
		if(*nm)
			g_free(*nm);
		*nm = g_strconcat(name,attr,NULL);
		return id;
	}

	if(!*error)
		*error = g_error_new(ERROR_DOMAIN,EINVAL,_("Unexpected or invalid %s attribute: \"%s\"" ), key, attr);

	return -1;
}

static int setup_block_action(const gchar *name, const gchar *attr, GError **error)
{
	int id = -1;

	if(!attr)
	{
		*error = g_error_new(ERROR_DOMAIN,EINVAL,_("%s action needs src attribute" ), name);
	}
	else
	{
		static const gchar * src[] = { "all", "selected", "copy", NULL };

		id = id_from_array(attr,src,error);
		if(id < 0)
		{
			*error = g_error_new(ERROR_DOMAIN,EINVAL,_("Unexpected or invalid %s attribute: \"%s\"" ), "src", attr);
		}
	}
	return id;
}

static GtkAction * new_action(const gchar *name, const gchar **names, const gchar **values)
{
#if GTK_CHECK_VERSION(2,16,0)
	return gtk_action_new(name,NULL,NULL,NULL);
#else
	const gchar *label		= ui_get_attribute("label",names,values);
	const gchar *tooltip	= ui_get_attribute("tooltip",names,values);
	const gchar *icon		= ui_get_attribute("icon",names,values);
	GtkAction	*action		= NULL;

	if(icon)
	{
		gchar * stock = g_strconcat("gtk-",icon,NULL);
		action = gtk_action_new(name,label,tooltip,stock);
		g_free(stock);
	}
	else
	{
		action = gtk_action_new(name,label,tooltip,NULL);
	}
	return action;
#endif // GTK(2,16)
}

static GtkAction * new_toggle(const gchar *name, const gchar **names, const gchar **values)
{
#if GTK_CHECK_VERSION(2,16,0)
	return GTK_ACTION(gtk_toggle_action_new(name,NULL,NULL,NULL));
#else
	const gchar		*label		= ui_get_attribute("label",names,values);
	const gchar		*tooltip	= ui_get_attribute("tooltip",names,values);
	const gchar 	*icon		= ui_get_attribute("icon",names,values);
	GtkToggleAction	*action		= NULL;

	if(icon)
	{
		gchar * stock = g_strconcat("gtk-",icon,NULL);
		action = gtk_toggle_action_new(name,label,tooltip,stock);
		g_free(stock);
	}
	else
	{
		action = gtk_toggle_action_new(name,label,tooltip,NULL);
	}
	return GTK_ACTION(action);
#endif // GTK(2,16)
}

GtkAction * ui_get_action(GtkWidget *widget, const gchar *name, GHashTable *hash, const gchar **names, const gchar **values, GError **error)
{
	static const gchar *actionname[ACTION_COUNT] = {	"pastenext",
														"reselect",
														"setfullscreen",
														"resetfullscreen"
 													};
 	GtkAction			* action 		= NULL;
	GtkAction	 		**toggle_action	= (GtkAction **) g_object_get_data(G_OBJECT(widget),"toggle_actions");
	UI_ATTR_DIRECTION	  dir			= ui_get_dir_attribute(names,values);
	unsigned short		  flags			= 0;
	const GCallback		* callback		= NULL;
	const gchar			* attr			= NULL;
	int					  id			= 0;
	gchar				* nm			= NULL;
	int					  f;

	enum _action_type
	{
		ACTION_TYPE_DEFAULT,
		ACTION_TYPE_TOGGLE,
		ACTION_TYPE_MOVE,
		ACTION_TYPE_PFKEY,
		ACTION_TYPE_PAKEY,
		ACTION_TYPE_SET,
		ACTION_TYPE_RESET,
		ACTION_TYPE_TABLE,
		ACTION_TYPE_STRING,
		ACTION_TYPE_LIB3270,

	} action_type = ACTION_TYPE_DEFAULT;

	if(dir != UI_ATTR_DIRECTION_NONE)
		flags |= ((unsigned char) dir) & 0x0F;

	if(ui_get_bool_attribute("selecting",names,values,FALSE))
		flags |= 0x80;

	// Build action name & type
	if(!g_ascii_strcasecmp(name,"toggle"))
	{
		action_type	= ACTION_TYPE_TOGGLE;
		attr		= ui_get_attribute("id",names,values);
		if(!attr)
			attr = ui_get_attribute("toggle",names,values);

		if(!g_ascii_strcasecmp(attr,"gdkdebug"))
		{
			id = TOGGLE_GDKDEBUG;
		}
		else if(!g_ascii_strcasecmp(attr,"dspacing"))
		{
			id = TOGGLE_DYNAMIC_SPACING;
		}
		else
		{
			id = lib3270_get_toggle_id(attr);
			if(id < 0)
			{
				*error = g_error_new(ERROR_DOMAIN,EINVAL,_("%s action needs a valid toggle name" ), name);
				return NULL;
			}
		}
		nm 	= g_strconcat(name,attr,NULL);
	}
	else if(!g_ascii_strcasecmp(name,"move"))
	{
		action_type	= ACTION_TYPE_MOVE;
		attr		= ui_get_attribute("target",names,values);

		if(!attr || dir == UI_ATTR_DIRECTION_NONE)
		{
			*error = g_error_new(ERROR_DOMAIN,EINVAL,"%s",_("Move action needs target & direction attributes" ));
			return NULL;
		}

		nm = g_strconcat((flags & 0x80) ? "select" : "move",attr,ui_get_dir_name(dir), NULL);

	}
	else if(!g_ascii_strcasecmp(name,"paste"))
	{
		static const GCallback cbk[] = {	G_CALLBACK(paste_clipboard_action),
											G_CALLBACK(paste_next_action),
											G_CALLBACK(paste_file_action)
										};
		static const gchar 		* src[] = { "clipboard", "next", "file", NULL };

		callback	= cbk;
		action_type	= ACTION_TYPE_TABLE;

		id = get_attribute_id(name,"src",&nm,src,names,values,error);
		if(id < 0)
			return NULL;

	}
	else if(!g_ascii_strcasecmp(name,"copy"))
	{
		static const GCallback cbk[] =	{	G_CALLBACK(copy_action),
											G_CALLBACK(append_action)
											};
		callback	= cbk;
		action_type	= ACTION_TYPE_TABLE;
		id 			= ui_get_bool_attribute("append",names,values,FALSE) ? 1 : 0;
		nm 			= g_strconcat(id == 0 ? "copy" : "copyappend",ui_get_attribute("format",names,values),NULL);
	}
	else if(!g_ascii_strcasecmp(name,"cut"))
	{
		static const GCallback cbk[] =	{	G_CALLBACK(cut_action),
											G_CALLBACK(cut_action)
											};
		callback	= cbk;
		action_type	= ACTION_TYPE_TABLE;
		id 			= ui_get_bool_attribute("append",names,values,FALSE) ? 1 : 0;
		nm 			= g_strconcat(id == 0 ? "cut" : "cutappend",ui_get_attribute("format",names,values),NULL);
	}
	else if(!g_ascii_strcasecmp(name,"erase"))
	{
		static const gchar * src[] = 	{	"input", "eof", "eol", "all", "char", "field", NULL };

		static const GCallback cbk[] =	{	G_CALLBACK(lib3270_eraseinput),
											G_CALLBACK(lib3270_eraseeof),
											G_CALLBACK(lib3270_eraseeol),
											G_CALLBACK(lib3270_clear),
											G_CALLBACK(lib3270_erase),
											G_CALLBACK(lib3270_deletefield)
										};
		callback	= cbk;
		action_type	= ACTION_TYPE_LIB3270;
		id = get_attribute_id(name,"target",&nm,src,names,values,error);
		if(id < 0)
			return NULL;
	}
	else if(!g_ascii_strcasecmp(name,"select"))
	{
		static const gchar * src[] = 	{	"all", "field", "none", "last", NULL };

		static const GCallback cbk[] =	{	G_CALLBACK(action_select_all),
											G_CALLBACK(action_select_field),
											G_CALLBACK(action_select_none),
											G_CALLBACK(action_select_last)
										};
		callback	= cbk;
		action_type	= ACTION_TYPE_TABLE;
		id = get_attribute_id(name,"target",&nm,src,names,values,error);
		if(id < 0)
			return NULL;
	}
	else if(!g_ascii_strcasecmp(name,"save"))
	{
		static const GCallback cbk[] = {	G_CALLBACK(save_all_action),
											G_CALLBACK(save_selected_action),
											G_CALLBACK(save_copy_action)
											};

		callback	= cbk;
		action_type	= ACTION_TYPE_TABLE;
		attr 		= ui_get_attribute("src",names,values);
		id			= setup_block_action(name,attr,error);
		if(*error)
			return NULL;
		nm = g_strconcat(name,attr,NULL);
	}
	else if(!g_ascii_strcasecmp(name,"print"))
	{
		static const GCallback cbk[] = {	G_CALLBACK(print_all_action),
											G_CALLBACK(print_selected_action),
											G_CALLBACK(print_copy_action)
											};

		callback	= cbk;
		action_type	= ACTION_TYPE_TABLE;
		attr 		= ui_get_attribute("src",names,values);
		id			= setup_block_action(name,attr,error);
		if(*error)
			return NULL;
		nm = g_strconcat(name,attr,NULL);
	}
	else if(!g_ascii_strcasecmp(name,"set"))
	{
		action_type	= ACTION_TYPE_SET;
		attr		= ui_get_attribute("toggle",names,values);
		id			= lib3270_get_toggle_id(attr);
		if(id < 0)
		{
			*error = g_error_new(ERROR_DOMAIN,EINVAL,_("%s action needs a valid toggle name" ), name);
			return NULL;
		}
		nm 	 = g_strconcat("set",attr,NULL);
	}
	else if(!g_ascii_strcasecmp(name,"reset"))
	{
		action_type	= ACTION_TYPE_RESET;
		attr		= ui_get_attribute("toggle",names,values);
		id			= lib3270_get_toggle_id(attr);
		if(id < 0)
		{
			*error = g_error_new(ERROR_DOMAIN,EINVAL,_("%s action needs a valid toggle name" ), name);
			return NULL;
		}
		nm = g_strconcat("reset",attr,NULL);
	}
	else if(!g_ascii_strcasecmp(name,"pfkey"))
	{
		action_type = ACTION_TYPE_PFKEY;
		attr 		= ui_get_attribute("id",names,values);
		if(!attr)
		{
			*error = g_error_new(ERROR_DOMAIN,EINVAL,_("%s action needs a valid id attribute" ),name);
			return NULL;
		}
		id   = atoi(attr);
		nm   = g_strdup_printf("pf%02d",id);
	}
	else if(!g_ascii_strcasecmp(name,"pakey"))
	{
		action_type = ACTION_TYPE_PAKEY;
		attr 		= ui_get_attribute("id",names,values);
		if(!attr)
		{
			*error = g_error_new(ERROR_DOMAIN,EINVAL,_("%s action needs a valid id attribute" ),name);
			return NULL;
		}
		id   = atoi(attr);
		nm   = g_strdup_printf("pa%02d",id);
	}
	else if(!g_ascii_strcasecmp(name,"string"))
	{
		action_type = ACTION_TYPE_STRING;
		attr 		= ui_get_attribute("value",names,values);
		if(!attr)
		{
			*error = g_error_new(ERROR_DOMAIN,EINVAL,_("%s action needs a valid value" ),name);
			return NULL;
		}
		attr = ui_get_attribute("name",names,values);
		nm = g_strdup(attr ? attr : name);
	}
	else if(!g_ascii_strcasecmp(name,"zoom"))
	{
		static const gchar * src[] = 	{	"in", "out", "fit", NULL };

		static const GCallback cbk[] =	{	G_CALLBACK(action_zoom_in),
											G_CALLBACK(action_zoom_out),
											G_CALLBACK(action_zoom_fit)
										};
		callback	= cbk;
		action_type	= ACTION_TYPE_TABLE;
		id = get_attribute_id(name,"mode",&nm,src,names,values,error);
		if(id < 0)
			return NULL;

	}
	else
	{
		attr = ui_get_attribute("name",names,values);
		nm = g_strdup(attr ? attr : name);
	}

	// Check if action is available
	action = g_hash_table_lookup(hash,nm);
	if(action)
	{
		g_free(nm);
		return action;
	}

	// Not available, create a new one
	switch(action_type)
	{
	case ACTION_TYPE_DEFAULT:
		action = new_action(nm,names,values);
		connect_standard_action(action,widget,name);
		break;

	case ACTION_TYPE_TOGGLE:
		action = new_toggle(nm,names,values);
		if(id < LIB3270_TOGGLE_COUNT)
		{
			const gchar *tooltip = lib3270_get_toggle_description(id);
			if(tooltip && *tooltip)
				gtk_action_set_tooltip(GTK_ACTION(action),tooltip);
			toggle_action[id] = action;

			gtk_toggle_action_set_active(GTK_TOGGLE_ACTION(action),(lib3270_get_toggle(v3270_get_session(widget),id) != 0));
		}
		else if(id == TOGGLE_DYNAMIC_SPACING)
		{
			gboolean active = get_boolean_from_config("toggle","dspacing",FALSE);
			v3270_set_dynamic_font_spacing(widget,active);
			gtk_toggle_action_set_active(GTK_TOGGLE_ACTION(action),active);
		}

		g_object_set_data(G_OBJECT(action),"toggle_id",GINT_TO_POINTER(id));
		g_signal_connect(action,"toggled",G_CALLBACK(lib3270_toggle_action),widget);
		break;

	case ACTION_TYPE_MOVE:
		action = new_action(nm,names,values);
		connect_move_action(action,widget,attr,flags,error);
		break;

	case ACTION_TYPE_PFKEY:
		action = new_action(nm,names,values);
		g_object_set_data(G_OBJECT(action),"pfkey",GINT_TO_POINTER(id));
		g_signal_connect(action,"activate",G_CALLBACK(action_pfkey),widget);
		break;

	case ACTION_TYPE_PAKEY:
		action = new_action(nm,names,values);
		g_object_set_data(G_OBJECT(action),"pakey",GINT_TO_POINTER(id));
		g_signal_connect(action,"activate",G_CALLBACK(action_pakey),widget);
		break;

	case ACTION_TYPE_SET:
		action = new_action(nm,names,values);
		g_object_set_data(G_OBJECT(action),"toggle_id",GINT_TO_POINTER(id));
		g_signal_connect(action,"activate",G_CALLBACK(action_set_toggle),widget);
		break;

	case ACTION_TYPE_RESET:
		action = new_action(nm,names,values);
		g_object_set_data(G_OBJECT(action),"toggle_id",GINT_TO_POINTER(id));
		g_signal_connect(action,"activate",G_CALLBACK(action_reset_toggle),widget);
		break;

	case ACTION_TYPE_TABLE:
		action = new_action(nm,names,values);
		g_signal_connect(action,"activate",callback[id],widget);
		break;

	case ACTION_TYPE_LIB3270:
		action = new_action(nm,names,values);
		g_object_set_data(G_OBJECT(action),"lib3270_call",callback[id]);
		g_signal_connect(action,"activate",G_CALLBACK(do_lib3270_action),widget);
		break;

	case ACTION_TYPE_STRING:
		action = new_action(nm,names,values);
		g_signal_connect(action,"activate",G_CALLBACK(action_string),widget);
		break;
	}

	for(f=0;f<ACTION_COUNT;f++)
	{
		if(!g_ascii_strcasecmp(actionname[f],nm))
		{
			GtkAction **named_action = (GtkAction **) g_object_get_data(G_OBJECT(widget),"named_actions");
			named_action[f] = action;
			break;
		}
	}

	g_hash_table_insert(hash,nm,action);

	return action;
}

static void action_text_script(GtkAction *action, GtkWidget *widget)
{
}

void ui_connect_text_script(GtkWidget *widget, GtkAction *action, const gchar *script_text, GError **error)
{
 	gchar *base = g_strstrip(g_strdup(script_text));
	gchar *text = g_strdup(base);
	g_free(base);

	gtk_action_set_sensitive(action,TRUE);
	g_object_set_data_full(G_OBJECT(action),"script_text",text,g_free);
	g_signal_connect(action,"activate",G_CALLBACK(action_text_script),widget);
}

void ui_set_scroll_actions(GtkWidget *widget, GtkAction *action[UI_ATTR_DIRECTION_COUNT])
{
	int f;

	for(f=0;f<4;f++)
	{
		if(action[f])
			v3270_set_scroll_action(widget, (GdkScrollDirection) f, action[f]);
	}

}

gboolean pw3270_set_keyboard_action(GtkWidget *widget, const gchar *key_name, GtkAction *action)
{
	guint			keyval;
	GdkModifierType	state;
	int				f;

	g_return_val_if_fail(GTK_IS_V3270(widget),FALSE);

	debug("keyboard_action.%s=%p",key_name,action);

	gtk_accelerator_parse(key_name,&keyval,&state);

	for(f=0; f < (int) G_N_ELEMENTS(keyboard_actions);f++)
	{
		if(keyboard_actions[f].keyval == keyval && keyboard_actions[f].state == state)
		{
			keyboard_actions[f].action = action;
			return TRUE;
		}
	}

	return FALSE;
}

gboolean handle_keypress(GtkWidget *terminal, guint keyval, GdkModifierType state, GtkWidget *window)
{
	size_t f;

	debug("pw3270::%s keyval=%u state=%u",__FUNCTION__,(unsigned int) keyval, (unsigned int) state);

	for(f=0; f < (int) G_N_ELEMENTS(keyboard_actions);f++)
	{
		if(keyboard_actions[f].keyval == keyval && keyboard_actions[f].state == state && keyboard_actions[f].action)
		{
			debug("Activating action %s",gtk_action_get_name(keyboard_actions[f].action));
			gtk_action_activate(keyboard_actions[f].action);
			return TRUE;
		}
	}

	return FALSE;
}