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 "error.h"
  44 #include <libchimara/chimara-glk.h>
  45 #include <libchimara/chimara-if.h>
  46
  47 /* Global pointers to widgets */
  48 GtkBuilder *builder = NULL;
  49 GtkUIManager *uimanager = NULL;
  50 GtkWidget *window = NULL;
  51 GtkWidget *glk = NULL;
  52
  53 static void
  54 on_started(ChimaraGlk *glk)
  55 {
  56     g_printerr("Started!\n");
  57 }
  58
  59 static void
  60 on_stopped(ChimaraGlk *glk)
  61 {
  62     g_printerr("Stopped!\n");
  63 }
  64
  65 static void
  66 on_command(ChimaraGlk *glk, gchar *input, gchar *response)
  67 {
  68         gchar *ellipsized = g_strdelimit(g_strndup(response, 20), "\n", ' ');
  69         g_print("%s - %s%s\n", input, ellipsized,
  70                 (strlen(ellipsized) < strlen(response))? "..." : "");
  71         g_free(ellipsized);
  72 }
  73
  74 static GObject *
  75 load_object(const gchar *name)
  76 {
  77         GObject *retval;
  78         if( (retval = gtk_builder_get_object(builder, name)) == NULL) {
  79                 error_dialog(NULL, NULL, "Error while getting object '%s'", name);
  80                 g_error("Error while getting object '%s'", name);
  81         }
  82         return retval;
  83 }
  84
  85 static void
  86 create_window(void)
  87 {
  88         GError *error = NULL;
  89
  90         builder = gtk_builder_new();
  91         if( !gtk_builder_add_from_file(builder, PACKAGE_SRC_DIR "/chimara.ui", &error) ) {
  92                 error_dialog(NULL, error, "Error while building interface: ");
  93                 return;
  94         }
  95
  96         window = GTK_WIDGET(load_object("chimara"));
  97         GtkActionGroup *actiongroup = GTK_ACTION_GROUP(load_object("actiongroup"));
  98
  99         /* Add all the actions to the action group. This for-loop is a temporary fix
 100         and can be removed once Glade supports adding actions and accelerators to an
 101         action group. */
 102         const gchar *actions[] = {
 103                 "game", "",
 104                 "open", "<ctrl>F7",
 105                 "save", NULL, /* NULL means use stock accelerator */
 106                 "quit", NULL,
 107                 "hint", "",
 108                 "char_input", "",
 109                 "char_input2", "",
 110                 NULL
 111         };
 112         const gchar **ptr;
 113         for(ptr = actions; *ptr; ptr += 2)
 114                 gtk_action_group_add_action_with_accel(actiongroup, GTK_ACTION(load_object(ptr[0])), ptr[1]);
 115
 116         uimanager = gtk_ui_manager_new();
 117         if( !gtk_ui_manager_add_ui_from_file(uimanager, PACKAGE_SRC_DIR "/chimara.menus", &error) ) {
 118                 error_dialog(NULL, error, "Error while building interface: ");
 119                 return;
 120         }
 121
 122         glk = chimara_if_new();
 123         //chimara_if_set_preferred_interpreter( CHIMARA_IF(glk), CHIMARA_IF_FORMAT_Z8, CHIMARA_IF_INTERPRETER_NITFOL);
 124
 125         g_object_set(glk,
 126                 "border-width", 6,
 127                 "spacing", 6,
 128                 "ignore-errors", TRUE,
 129                 NULL);
 130         chimara_glk_set_default_font_string(CHIMARA_GLK(glk), "Serif 12");
 131         chimara_glk_set_monospace_font_string(CHIMARA_GLK(glk), "Monospace 12");
 132         g_signal_connect(glk, "started", G_CALLBACK(on_started), NULL);
 133         g_signal_connect(glk, "stopped", G_CALLBACK(on_stopped), NULL);
 134         g_signal_connect(glk, "command", G_CALLBACK(on_command), NULL);
 135
 136         GtkBox *vbox = GTK_BOX( gtk_builder_get_object(builder, "vbox") );
 137         if(vbox == NULL)
 138         {
 139                 error_dialog(NULL, NULL, "Could not find vbox");
 140                 return;
 141         }
 142
 143         gtk_ui_manager_insert_action_group(uimanager, actiongroup, 0);
 144         GtkWidget *menubar = gtk_ui_manager_get_widget(uimanager, "/menubar");
 145         GtkWidget *toolbar = gtk_ui_manager_get_widget(uimanager, "/toolbar");
 146
 147         gtk_box_pack_end(vbox, glk, TRUE, TRUE, 0);
 148         gtk_box_pack_start(vbox, menubar, FALSE, FALSE, 0);
 149         gtk_box_pack_start(vbox, toolbar, FALSE, FALSE, 0);
 150
 151         gtk_builder_connect_signals(builder, glk);
 152 }
 153
 154 int
 155 main(int argc, char *argv[])
 156 {
 157         GError *error = NULL;
 158
 159 #ifdef ENABLE_NLS
 160         bindtextdomain(GETTEXT_PACKAGE, PACKAGE_LOCALE_DIR);
 161         bind_textdomain_codeset(GETTEXT_PACKAGE, "UTF-8");
 162         textdomain(GETTEXT_PACKAGE);
 163 #endif
 164
 165         if( !g_thread_supported() )
 166                 g_thread_init(NULL);
 167         gdk_threads_init();
 168         gtk_init(&argc, &argv);
 169
 170         create_window();
 171         gtk_widget_show_all(window);
 172
 173         g_object_unref( G_OBJECT(builder) );
 174         g_object_unref( G_OBJECT(uimanager) );
 175
 176         if(argc < 2) {
 177                 error_dialog(GTK_WINDOW(window), NULL, "Must provide a game file");
 178                 return 1;
 179         }
 180
 181     if( !chimara_if_run_game(CHIMARA_IF(glk), argv[1], &error) ) {
 182                 error_dialog(GTK_WINDOW(window), error, "Error starting Glk library: ");
 183                 return 1;
 184         }
 185         //chimara_glk_run( CHIMARA_GLK(glk), ".libs/multiwin.so", argc, argv, NULL);
 186
 187
 188     gdk_threads_enter();
 189         gtk_main();
 190         gdk_threads_leave();
 191
 192         chimara_glk_stop(CHIMARA_GLK(glk));
 193         chimara_glk_wait(CHIMARA_GLK(glk));
 194
 195         return 0;
 196 }