- Fixed a bug that made Nitfol crash since [130]
[rodin/chimara.git] / tests / main.c
1 /* -*- Mode: C; indent-tabs-mode: t; c-basic-offset: 4; tab-width: 4 -*- */
2 /*
3  * main.c
4  * Copyright (C) Philip en Marijn 2008 <>
5  * 
6  * main.c is free software copyrighted by Philip en Marijn.
7  * 
8  * Redistribution and use in source and binary forms, with or without
9  * modification, are permitted provided that the following conditions
10  * are met:
11  * 1. Redistributions of source code must retain the above copyright
12  *    notice, this list of conditions and the following disclaimer.
13  * 2. Redistributions in binary form must reproduce the above copyright
14  *    notice, this list of conditions and the following disclaimer in the
15  *    documentation and/or other materials provided with the distribution.
16  * 3. Neither the name ``Philip en Marijn'' nor the name of any other
17  *    contributor may be used to endorse or promote products derived
18  *    from this software without specific prior written permission.
19  * 
20  * main.c IS PROVIDED BY Philip en Marijn ``AS IS'' AND ANY EXPRESS
21  * OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
22  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
23  * ARE DISCLAIMED.  IN NO EVENT SHALL Philip en Marijn OR ANY OTHER CONTRIBUTORS
24  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
25  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
26  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR
27  * BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
28  * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
29  * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
30  * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
31  */
32
33 #include <sys/types.h>
34 #include <sys/stat.h>
35 #include <unistd.h>
36 #include <string.h>
37 #include <stdio.h>
38
39 #include <glib.h>
40 #include <glib/gi18n.h>
41 #include <gtk/gtk.h>
42
43 #include "callbacks.h"
44 #include "error.h"
45 #include <libchimara/chimara-glk.h>
46 #include <libchimara/chimara-if.h>
47
48 /* Global pointers to widgets */
49 GtkBuilder *builder = NULL;
50 GtkUIManager *uimanager = NULL;
51 GtkWidget *window = NULL;
52 GtkWidget *glk = NULL;
53
54 static void
55 on_started(ChimaraGlk *glk)
56 {
57     g_printerr("Started!\n");
58 }
59
60 static void
61 on_stopped(ChimaraGlk *glk)
62 {
63     g_printerr("Stopped!\n");
64 }
65
66 static void
67 on_command(ChimaraGlk *glk, gchar *input, gchar *response)
68 {
69         g_print("Command: %s\nResponse: %s\n", input, response);
70 }
71
72 static GObject *
73 load_object(const gchar *name)
74 {
75         GObject *retval;
76         if( (retval = gtk_builder_get_object(builder, name)) == NULL) {
77                 error_dialog(NULL, NULL, "Error while getting object '%s'", name);
78                 g_error("Error while getting object '%s'", name);
79         }
80         return retval;
81 }
82
83 static void
84 create_window(void)
85 {
86         GError *error = NULL;
87
88         builder = gtk_builder_new();
89         if( !gtk_builder_add_from_file(builder, "chimara.ui", &error) ) {
90                 error_dialog(NULL, error, "Error while building interface: ");  
91                 return;
92         }
93
94         window = GTK_WIDGET(load_object("chimara"));
95         GtkActionGroup *actiongroup = GTK_ACTION_GROUP(load_object("actiongroup"));
96
97         /* Add all the actions to the action group. This for-loop is a temporary fix
98         and can be removed once Glade supports adding actions and accelerators to an
99         action group. */
100         const gchar *actions[] = { 
101                 "game", "",
102                 "open", "<ctrl>F7", 
103                 "save", NULL, /* NULL means use stock accelerator */
104                 "quit", NULL,
105                 NULL
106         };
107         const gchar **ptr;
108         for(ptr = actions; *ptr; ptr += 2)
109                 gtk_action_group_add_action_with_accel(actiongroup, GTK_ACTION(load_object(ptr[0])), ptr[1]);
110
111         uimanager = gtk_ui_manager_new();
112         if( !gtk_ui_manager_add_ui_from_file(uimanager, "chimara.menus", &error) ) {
113                 error_dialog(NULL, error, "Error while building interface: ");
114                 return;
115         }
116         
117         glk = chimara_if_new();
118         g_object_set(glk, 
119                 "border-width", 6, 
120                 "spacing", 6,
121                 "ignore-errors", TRUE,
122                 NULL);
123         chimara_glk_set_default_font_string(CHIMARA_GLK(glk), "Serif 12");
124         chimara_glk_set_monospace_font_string(CHIMARA_GLK(glk), "Monospace 12");
125         g_signal_connect(glk, "started", G_CALLBACK(on_started), NULL);
126         g_signal_connect(glk, "stopped", G_CALLBACK(on_stopped), NULL);
127         g_signal_connect(glk, "command", G_CALLBACK(on_command), NULL);
128         
129         GtkBox *vbox = GTK_BOX( gtk_builder_get_object(builder, "vbox") );                      
130         if(vbox == NULL)
131         {
132                 error_dialog(NULL, NULL, "Could not find vbox");
133                 return;
134         }
135
136         gtk_ui_manager_insert_action_group(uimanager, actiongroup, 0);
137         GtkWidget *menubar = gtk_ui_manager_get_widget(uimanager, "/menubar");
138         GtkWidget *toolbar = gtk_ui_manager_get_widget(uimanager, "/toolbar");
139
140         gtk_box_pack_end(vbox, glk, TRUE, TRUE, 0);
141         gtk_box_pack_start(vbox, menubar, FALSE, FALSE, 0);
142         gtk_box_pack_start(vbox, toolbar, FALSE, FALSE, 0);
143         
144         gtk_builder_connect_signals(builder, NULL);
145 }
146
147 int
148 main(int argc, char *argv[])
149 {
150         GError *error = NULL;
151
152 #ifdef ENABLE_NLS
153         bindtextdomain(GETTEXT_PACKAGE, PACKAGE_LOCALE_DIR);
154         bind_textdomain_codeset(GETTEXT_PACKAGE, "UTF-8");
155         textdomain(GETTEXT_PACKAGE);
156 #endif
157
158         if( !g_thread_supported() )
159                 g_thread_init(NULL);
160         gdk_threads_init();
161         gtk_init(&argc, &argv);
162
163         create_window();
164         gtk_widget_show_all(window);
165
166         g_object_unref( G_OBJECT(builder) );
167         g_object_unref( G_OBJECT(uimanager) );
168
169         if(argc < 2) {
170                 error_dialog(GTK_WINDOW(window), NULL, "Must provide a game file");
171                 return 1;
172         }
173         
174     if( !chimara_if_run_game(CHIMARA_IF(glk), argv[1], &error) ) {
175                 error_dialog(GTK_WINDOW(window), error, "Error starting Glk library: ");
176                 return 1;
177         }
178
179     gdk_threads_enter();
180         gtk_main();
181         gdk_threads_leave();
182
183         chimara_glk_stop(CHIMARA_GLK(glk));
184         chimara_glk_wait(CHIMARA_GLK(glk));
185
186         return 0;
187 }