X-Git-Url: https://git.stderr.nl/gitweb?a=blobdiff_plain;f=src%2Fmain.c;h=936255952e6a914f53ab4b93fb27ee58f46b685a;hb=b1f1dc50b22b30c4d7176e1ff7c0805e80fe0724;hp=30a7bdfed65ee3ee4c4cab9663c2ec200ac9ccfd;hpb=65fae93f40acb49a7d18202bbf7fdac05cb12a19;p=projects%2Fchimara%2Fchimara.git

diff --git a/src/main.c b/src/main.c
index 30a7bdf..9362559 100644
--- a/src/main.c
+++ b/src/main.c
@@ -36,60 +36,62 @@
 #include <string.h>
 #include <stdio.h>
 
+#include <glib.h>
+#include <glib/gi18n.h>
 #include <gtk/gtk.h>
 
 #include "callbacks.h"
 #include "error.h"
-#include "glk.h"
+#include "chimara-glk.h"
 
-/*
- * Standard gettext macros.
- */
-#ifdef ENABLE_NLS
-#  include <libintl.h>
-#  undef _
-#  define _(String) dgettext (PACKAGE, String)
-#  ifdef gettext_noop
-#    define N_(String) gettext_noop (String)
-#  else
-#    define N_(String) (String)
-#  endif
-#else
-#  define textdomain(String) (String)
-#  define gettext(String) (String)
-#  define dgettext(Domain,Message) (Message)
-#  define dcgettext(Domain,Message,Type) (Message)
-#  define bindtextdomain(Domain,Directory) (Domain)
-#  define _(String) (String)
-#  define N_(String) (String)
-#endif
+/* Global pointers to widgets */
+GtkBuilder *builder = NULL;
+GtkWidget *window = NULL;
+GtkWidget *glk = NULL;
 
-#include "callbacks.h"
+static void
+on_started(ChimaraGlk *glk)
+{
+    g_printerr("Started!\n");
+}
 
-/* The global builder object to be used to request handles to widgets */
-GtkBuilder *builder = NULL;
-	
-GtkWidget*
-create_window(void)
+static void
+on_stopped(ChimaraGlk *glk)
 {
-	GtkWidget *window;
+    g_printerr("Stopped!\n");
+}
 
+static void
+create_window(void)
+{
 	if( (window = GTK_WIDGET(gtk_builder_get_object(builder, "gargoyle-gtk"))) == NULL ) {
 		error_dialog(NULL, NULL, "Error while getting main window object");
-		return NULL;
+		return;
 	}
 
 	gtk_builder_connect_signals(builder, NULL);
 	
-	return window;
-}
+	glk = chimara_glk_new();
+	g_object_set(glk, "border-width", 6, "spacing", 6, NULL);
+	chimara_glk_set_default_font_string(CHIMARA_GLK(glk), "Sans 11");
+	chimara_glk_set_monospace_font_string(CHIMARA_GLK(glk), "Monospace 10");
+	g_signal_connect(glk, "started", G_CALLBACK(on_started), NULL);
+	g_signal_connect(glk, "stopped", G_CALLBACK(on_stopped), NULL);
+	
+	GtkBox *vbox = GTK_BOX( gtk_builder_get_object(builder, "vbox") );			
+	if(vbox == NULL)
+	{
+		error_dialog(NULL, NULL, "Could not find vbox");
+		return;
+	}
 
+	gtk_box_pack_end(vbox, glk, TRUE, TRUE, 0);
+}
 
 int
 main(int argc, char *argv[])
 {
 	GError *error = NULL;
- 	GtkWidget *window;
 
 #ifdef ENABLE_NLS
 	bindtextdomain(GETTEXT_PACKAGE, PACKAGE_LOCALE_DIR);
@@ -97,21 +99,36 @@ main(int argc, char *argv[])
 	textdomain(GETTEXT_PACKAGE);
 #endif
 
+	if( !g_thread_supported() )
+		g_thread_init(NULL);
+
+	gdk_threads_init();
+    
 	gtk_set_locale();
 	gtk_init(&argc, &argv);
 
    	builder = gtk_builder_new();
-	if( !gtk_builder_add_from_file(builder, "gargoyle-gtk.ui", &error) ) {
+	if( !gtk_builder_add_from_file(builder, "chimara.ui", &error) ) {
 		error_dialog(NULL, error, "Error while building interface: ");	
 		return 1;
 	}
 
-	window = create_window();
-	gtk_widget_show(window);
-
-	glk_main();
+	create_window();
+	gtk_widget_show_all(window);
 
 	g_object_unref( G_OBJECT(builder) );
 
+    if( !chimara_glk_run(CHIMARA_GLK(glk), "../interpreters/nitfol/.libs/nitfol.so", &error) ) {
+        error_dialog(GTK_WINDOW(window), error, "Error starting Glk library: ");
+        return 1;
+    }
+
+    gdk_threads_enter();
+	gtk_main();
+	gdk_threads_leave();
+
+	chimara_glk_stop(CHIMARA_GLK(glk));
+	chimara_glk_wait(CHIMARA_GLK(glk));
+
 	return 0;
 }