player/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 #include "preferences.h"
  48
  49 /* Static global pointers to widgets */
  50 static GtkUIManager *uimanager = NULL;
  51 static GtkWidget *window = NULL;
  52 static GtkWidget *glk = NULL;
  53
  54 /* Global global pointers */
  55 GtkBuilder *builder = NULL;
  56 GtkWidget *aboutwindow = NULL;
  57 GtkWidget *prefswindow = NULL;
  58
  59 GObject *
  60 load_object(const gchar *name)
  61 {
  62         GObject *retval;
  63         if( (retval = gtk_builder_get_object(builder, name)) == NULL) {
  64                 error_dialog(NULL, NULL, "Error while getting object '%s'", name);
  65                 g_error("Error while getting object '%s'", name);
  66         }
  67         return retval;
  68 }
  69
  70 static void
  71 change_window_title(ChimaraGlk *glk, GParamSpec *pspec, GtkWindow *window)
  72 {
  73         gchar *program_name, *story_name, *title;
  74         g_object_get(glk, "program-name", &program_name, "story-name", &story_name, NULL);
  75         if(!program_name) {
  76                 gtk_window_set_title(window, "Chimara");
  77                 return;
  78         }
  79         else if(!story_name)
  80                 title = g_strdup_printf("%s - Chimara", program_name);
  81         else
  82                 title = g_strdup_printf("%s - %s - Chimara", program_name, story_name);
  83
  84         g_free(program_name);
  85         g_free(story_name);
  86         gtk_window_set_title(window, title);
  87         g_free(title);
  88 }
  89
  90 static void
  91 create_window(void)
  92 {
  93         GError *error = NULL;
  94
  95         builder = gtk_builder_new();
  96         if( !gtk_builder_add_from_file(builder, PACKAGE_DATA_DIR "/chimara.ui", &error) ) {
  97 #ifdef DEBUG
  98                 g_error_free(error);
  99                 error = NULL;
 100                 if( !gtk_builder_add_from_file(builder, PACKAGE_SRC_DIR "/chimara.ui", &error) ) {
 101 #endif /* DEBUG */
 102                         error_dialog(NULL, error, "Error while building interface: ");
 103                         return;
 104 #ifdef DEBUG
 105                 }
 106 #endif /* DEBUG */
 107         }
 108
 109         window = GTK_WIDGET(load_object("chimara"));
 110         aboutwindow = GTK_WIDGET(load_object("aboutwindow"));
 111         prefswindow = GTK_WIDGET(load_object("prefswindow"));
 112         GtkActionGroup *actiongroup = GTK_ACTION_GROUP(load_object("actiongroup"));
 113
 114         const gchar **ptr;
 115         GtkRecentFilter *filter = gtk_recent_filter_new();
 116         /* TODO: Use mimetypes and construct the filter dynamically depending on
 117         what plugins are installed */
 118         const gchar *patterns[] = {
 119                 "*.z[1-8]", "*.[zg]lb", "*.[zg]blorb", "*.ulx", "*.blb", "*.blorb", NULL
 120         };
 121
 122         for(ptr = patterns; *ptr; ptr++)
 123                 gtk_recent_filter_add_pattern(filter, *ptr);
 124         GtkRecentChooser *recent = GTK_RECENT_CHOOSER(load_object("recent"));
 125         gtk_recent_chooser_add_filter(recent, filter);
 126
 127         uimanager = gtk_ui_manager_new();
 128         if( !gtk_ui_manager_add_ui_from_file(uimanager, PACKAGE_DATA_DIR "/chimara.menus", &error) ) {
 129 #ifdef DEBUG
 130                 g_error_free(error);
 131                 error = NULL;
 132                 if( !gtk_ui_manager_add_ui_from_file(uimanager, PACKAGE_SRC_DIR "/chimara.menus", &error) ) {
 133 #endif /* DEBUG */
 134                         error_dialog(NULL, error, "Error while building interface: ");
 135                         return;
 136 #ifdef DEBUG
 137                 }
 138 #endif /* DEBUG */
 139         }
 140
 141         glk = chimara_if_new();
 142         g_object_set(glk,
 143             "ignore-errors", TRUE,
 144             /*"interpreter-number", CHIMARA_IF_ZMACHINE_TANDY_COLOR,*/
 145             NULL);
 146         if( !chimara_glk_set_css_from_file(CHIMARA_GLK(glk), PACKAGE_DATA_DIR "/style.css", &error) ) {
 147 #ifdef DEBUG
 148                 g_error_free(error);
 149                 error = NULL;
 150                 if( !chimara_glk_set_css_from_file(CHIMARA_GLK(glk), PACKAGE_SRC_DIR "/style.css", &error) ) {
 151 #endif /* DEBUG */
 152                         error_dialog(NULL, error, "Couldn't open CSS file: ");
 153                         return;
 154 #ifdef DEBUG
 155                 }
 156 #endif /* DEBUG */
 157         }
 158         chimara_if_set_preferred_interpreter(CHIMARA_IF(glk),
 159             CHIMARA_IF_FORMAT_Z5,
 160             CHIMARA_IF_INTERPRETER_FROTZ);
 161         chimara_if_set_preferred_interpreter(CHIMARA_IF(glk),
 162             CHIMARA_IF_FORMAT_Z6,
 163             CHIMARA_IF_INTERPRETER_NITFOL);
 164         chimara_if_set_preferred_interpreter(CHIMARA_IF(glk),
 165             CHIMARA_IF_FORMAT_Z8,
 166             CHIMARA_IF_INTERPRETER_FROTZ);
 167         chimara_if_set_preferred_interpreter(CHIMARA_IF(glk),
 168             CHIMARA_IF_FORMAT_Z_BLORB,
 169             CHIMARA_IF_INTERPRETER_FROTZ);
 170         chimara_if_set_preferred_interpreter(CHIMARA_IF(glk),
 171             CHIMARA_IF_FORMAT_GLULX,
 172             CHIMARA_IF_INTERPRETER_GLULXE);
 173         chimara_if_set_preferred_interpreter(CHIMARA_IF(glk),
 174             CHIMARA_IF_FORMAT_GLULX_BLORB,
 175             CHIMARA_IF_INTERPRETER_GLULXE);
 176
 177         /* DON'T UNCOMMENT THIS your eyes will burn
 178          but it is a good test of programmatically altering just one style
 179         chimara_glk_set_css_from_string(CHIMARA_GLK(glk),
 180             "buffer.normal { font-family: 'Comic Sans MS'; }");*/
 181
 182         GtkBox *vbox = GTK_BOX( gtk_builder_get_object(builder, "vbox") );
 183         if(vbox == NULL)
 184         {
 185                 error_dialog(NULL, NULL, "Could not find vbox");
 186                 return;
 187         }
 188
 189         gtk_ui_manager_insert_action_group(uimanager, actiongroup, 0);
 190         GtkWidget *menubar = gtk_ui_manager_get_widget(uimanager, "/menubar");
 191         //GtkWidget *toolbar = gtk_ui_manager_get_widget(uimanager, "/toolbar");
 192
 193         gtk_box_pack_end(vbox, glk, TRUE, TRUE, 0);
 194         gtk_box_pack_start(vbox, menubar, FALSE, FALSE, 0);
 195         //gtk_box_pack_start(vbox, toolbar, FALSE, FALSE, 0);
 196
 197         gtk_builder_connect_signals(builder, glk);
 198         g_signal_connect(glk, "notify::program-name", G_CALLBACK(change_window_title), window);
 199         g_signal_connect(glk, "notify::story-name", G_CALLBACK(change_window_title), window);
 200
 201         /* Create preferences window */
 202         //preferences_create(CHIMARA_GLK(glk));
 203 }
 204
 205 int
 206 main(int argc, char *argv[])
 207 {
 208         GError *error = NULL;
 209
 210 #ifdef ENABLE_NLS
 211         bindtextdomain(GETTEXT_PACKAGE, PACKAGE_LOCALE_DIR);
 212         bind_textdomain_codeset(GETTEXT_PACKAGE, "UTF-8");
 213         textdomain(GETTEXT_PACKAGE);
 214 #endif
 215
 216         if( !g_thread_supported() )
 217                 g_thread_init(NULL);
 218         gdk_threads_init();
 219         gtk_init(&argc, &argv);
 220
 221         create_window();
 222         gtk_widget_show_all(window);
 223
 224         g_object_unref( G_OBJECT(uimanager) );
 225
 226         if(argc >= 2) {
 227                 if( !chimara_if_run_game(CHIMARA_IF(glk), argv[1], &error) ) {
 228                         error_dialog(GTK_WINDOW(window), error, "Error starting Glk library: ");
 229                         return 1;
 230                 }
 231         }
 232
 233     gdk_threads_enter();
 234         gtk_main();
 235         gdk_threads_leave();
 236
 237         chimara_glk_stop(CHIMARA_GLK(glk));
 238         chimara_glk_wait(CHIMARA_GLK(glk));
 239
 240         g_object_unref( G_OBJECT(builder) );
 241
 242         return 0;
 243 }