Software Público Brasileiro

/*
* Copyright 2008, Banco do Brasil S.A.
*
* This file is part of g3270
*
* This program file 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; version 3 of the License.
*
* 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 in a file named COPYING; if not, write to the
* Free Software Foundation, Inc.,
* 51 Franklin Street, Fifth Floor,
* Boston, MA 02110-1301 USA
*
* Authors:
*
* Perry Werneck<perry.werneck@gmail.com>
*
*/

 #include "g3270.h"
 #include <gdk/gdkkeysyms.h>

 #include "lib/hostc.h"
 #include "lib/actionsc.h"
 #include "lib/kybdc.h"
 #include "lib/togglesc.h"

/*---[ Globals ]--------------------------------------------------------------*/

 GtkWidget	*top_window		= 0;
 GtkWidget  *terminal		= 0;
 GtkWidget  *top_menu		= 0;
 GThread    *MainThread     = 0;
 GdkPixbuf	*icon			= 0;

#ifdef USE_GNOME
 GnomeClient *client = 0;
#endif

/*---[ Main program ]---------------------------------------------------------*/

 void action_exit(GtkWidget *w, gpointer data)
 {
 	action_save(w,data);
 	gtk_main_quit();
 }

 static gboolean delete_event( GtkWidget *widget, GdkEvent  *event, gpointer data )
 {
 	action_exit(widget,0);
    return FALSE;
 }

 gboolean map_event(GtkWidget *widget, GdkEvent  *event, gpointer   user_data)
 {
 	DBGTracex(widget->window);

    return 0;
 }

 static void destroy( GtkWidget *widget, gpointer   data )
 {
    gtk_main_quit();
 }

 static int GetFunctionKey(GdkEventKey *event)
 {
 	int rc = (event->keyval - GDK_F1)+1;

 	if(event->state & GDK_SHIFT_MASK)
 	   rc += 12;

	DBGPrintf("F%d %s",rc,event->type == GDK_KEY_PRESS ? "Pressed" : "Released");

	return rc;
 }

 static gboolean key_press_event(GtkWidget *widget, GdkEventKey *event, gpointer user_data)
 {
 	// http://developer.gnome.org/doc/API/2.0/gtk/GtkWidget.html#GtkWidget-key-press-event
 	char ks[6];

    if(IS_FUNCTION_KEY(event))
    {
    	snprintf(ks,5,"%d",GetFunctionKey(event));
		action_internal(PF_action, IA_DEFAULT, ks, CN);
    	return TRUE;
    }

    return FALSE;
 }

 static gboolean key_release_event(GtkWidget *widget, GdkEventKey *event, gpointer user_data)
 {

    if(IS_FUNCTION_KEY(event))
    {
    	GetFunctionKey(event);
    	return TRUE;
    }

 	return 0;
 }

 static gboolean window_state_event(GtkWidget *widget, GdkEventWindowState *event)
 {
 	return FALSE;
 }

 static void CreateMainWindow(const char *cl_hostname)
 {
 	GtkWidget	*vbox;
	GtkWidget   *toolbar;
 	FILE 		*arq	= 0;

    top_window = gtk_window_new(GTK_WINDOW_TOPLEVEL);

	// Set default toogle values
	set_toggle(MARGINED_PASTE,1,TT_INITIAL);
	set_toggle(CURSOR_POS,1,TT_INITIAL);

	action_restore(NULL,NULL);

#if GTK == 1
	gtk_window_set_wmclass(GTK_WINDOW(top_window),"toplevel",PROJECT_NAME);
	#error Is it working?
#else
    gtk_window_set_role(GTK_WINDOW(top_window), PACKAGE_NAME "0" );
#endif

	g_signal_connect(G_OBJECT(top_window),	"delete_event", 		G_CALLBACK(delete_event),			NULL);
    g_signal_connect(G_OBJECT(top_window),	"destroy", 				G_CALLBACK(destroy),				NULL);
    g_signal_connect(G_OBJECT(top_window),	"map-event",			G_CALLBACK(map_event),				NULL);
    g_signal_connect(G_OBJECT(top_window),	"key-press-event",		G_CALLBACK(key_press_event),		0);
    g_signal_connect(G_OBJECT(top_window), 	"key-release-event",	G_CALLBACK(key_release_event),		0);
    g_signal_connect(G_OBJECT(top_window), 	"window-state-event",	G_CALLBACK(window_state_event),		0);

    UpdateWindowTitle();

    vbox = gtk_vbox_new(FALSE,0);
    gtk_container_add(GTK_CONTAINER(top_window),vbox);

	// Load extensions
#ifdef EXTENSIONS
	LoadExtensions(EXTENSIONS);
#endif

	// Load menu bar
    top_menu = LoadMenu(top_window);
    if(top_menu)
       gtk_box_pack_start(GTK_BOX(vbox), top_menu, FALSE, TRUE, 0);

	// Load toolbar
	toolbar = LoadToolbar(top_window);
    if(toolbar)
       gtk_box_pack_start(GTK_BOX(vbox), toolbar, FALSE, TRUE, 0);

	// Preset toggles
	if(toggled(FULLSCREEN))
		gtk_window_fullscreen(GTK_WINDOW(top_window));
	else
		gtk_window_unfullscreen(GTK_WINDOW(top_window));


    /* Load colors */
	LoadTerminalColors(arq);

    // Create terminal window
	terminal = g3270_new(cl_hostname);
	gtk_box_pack_start(GTK_BOX(vbox),terminal,TRUE,TRUE,0);

	DBGPrintf("Program icon: %s",DATADIR "/icon.jpg");
    icon = gdk_pixbuf_new_from_file(DATADIR "/icon.jpg", NULL);
    if(icon)
    	gtk_window_set_icon(GTK_WINDOW(top_window),icon);

	if(arq)
		fclose(arq);

	gtk_widget_grab_focus(terminal);
	gtk_widget_grab_default(terminal);
	gtk_window_set_position(GTK_WINDOW(top_window),GTK_WIN_POS_CENTER);

 }

#ifdef USE_GNOME
static gint save_session (GnomeClient *client, gint phase, GnomeSaveStyle save_style,
              gint is_shutdown, GnomeInteractStyle interact_style,
              gint is_fast, gpointer client_data)
{
	gchar** argv;
	guint argc;

	Log("Saving session for %s",(char *) client_data);

	action_save(0,0);

	/* allocate 0-filled, so it will be NULL-terminated */
	argv = g_malloc0(sizeof(gchar*)*4);
	argc = 0;

	argv[argc++] = client_data;

	if(cl_hostname)
	{
		argv[argc++] = ((gchar *) cl_hostname);
	}

	gnome_client_set_clone_command(client, argc, argv);
	gnome_client_set_restart_command(client, argc, argv);

	return TRUE;
}

static gint session_die(GnomeClient* client, gpointer client_data)
{
	Log("Exiting by gnome's request");
	gtk_exit(0);
	return FALSE;
}
#endif

 int main(int argc, char **argv)
 {
#ifdef USE_GNOME
	GnomeProgram *program;
	GOptionContext *context;
#endif

    printf(PACKAGE_NAME " Build " BUILD "\n");
    fflush(stdout);

    Log(PACKAGE_NAME " Build " BUILD );

    /* Populate callback tables */
    CHKPoint();
	set_3270_screen(&g3270_screen_callbacks);

	// FIXME (perry#9#): Looks like this is not necessary since the library doesn't process keyboard.
    CHKPoint();
    set_3270_keyboard(&g3270_keyboard_info);

#ifdef USE_GNOME

	context = g_option_context_new (_("- 3270 Emulator for Gnome"));

	program = gnome_program_init (	PACKAGE_NAME,
									PACKAGE_VERSION,
									LIBGNOMEUI_MODULE, argc, argv,
									GNOME_PARAM_GOPTION_CONTEXT, 		context,
									GNOME_PARAM_HUMAN_READABLE_NAME,	_("3270 Emulator"),
									NULL
								);

	CHKPoint();
	client = gnome_master_client();
	DBGPrintf("Gnome: %p",client);
	gtk_signal_connect(GTK_OBJECT(client), "save_yourself", GTK_SIGNAL_FUNC(save_session), argv[0]);
	gtk_signal_connect(GTK_OBJECT(client), "die", GTK_SIGNAL_FUNC(session_die), NULL);
	DBGMessage("Gnome session setup finished");
	CHKPoint();

#else

	g_thread_init(NULL);
	gdk_threads_init();
	gtk_init(&argc, &argv);


#endif


    MainThread = g_thread_self();
    DBGPrintf("Main thread: %p",MainThread);

    /* Parse 3270 command line */
    parse_3270_command_line(argc, (const char **) argv, &cl_hostname);

    if(!cl_hostname)
       cl_hostname = getenv("HOST3270_0");

//    DBGMessage(cl_hostname);
    CreateMainWindow(cl_hostname);

	if(terminal)
	{
#ifdef EXTENSIONS
		SetExtensionsChar("g3270ServerChanged",cl_hostname);
#endif

		DBGMessage("Starting gtk main loop");
		gtk_widget_show_all(top_window);
		CHKPoint();
		gtk_main();

#ifdef EXTENSIONS
		UnloadExtensions();
#endif

	}

    return 0;
 }

 void UpdateWindowTitle(void)
 {
    char title[512];
    const char *ptr = query_qualified_host();

    if(top_window)
    {
       strncpy(title,PACKAGE_NAME,511);
       strncat(title," ",511);

       if(ptr)
       {
          strncat(title,ptr,511);
          strncat(title," ",511);
       }
       else if(cl_hostname)
       {
          strncat(title,cl_hostname,511);
          strncat(title," ",511);
       }

       LockThreads();
       gtk_window_set_title(GTK_WINDOW(top_window),title);
       UnlockThreads();

    }
 }

 void gdk_lock(void)
 {
 	// Calls from mainthread are builto from the internal gtk_main_loop and
 	// they're already locked.
 	if(g_thread_self() == MainThread)
 	   return;

    gdk_threads_enter();
 }

 void gdk_unlock(void)
 {
 	// Calls from mainthread are builto from the internal gtk_main_loop and
 	// they're already locked.
 	if(g_thread_self() == MainThread)
 	   return;

    gdk_threads_leave();
 }