Added an initialization function, which must be called at every entry point of the...
[rodin/chimara.git] / libchimara / chimara-glk.c
index 172e765a23c63b0aa6141cf176530b1f5b23f7b8..ae39f168c892e49639e39af559b9ebaf5cb0c3c8 100644 (file)
@@ -2,7 +2,8 @@
 
 #include <math.h>
 #include <gtk/gtk.h>
-#include <glib/gi18n.h>
+#include <config.h>
+#include <glib/gi18n-lib.h>
 #include <gmodule.h>
 #include <pango/pango.h>
 #include "chimara-glk.h"
@@ -12,6 +13,7 @@
 #include "window.h"
 #include "glkstart.h"
 #include "glkunix.h"
+#include "init.h"
 
 #define CHIMARA_GLK_MIN_WIDTH 0
 #define CHIMARA_GLK_MIN_HEIGHT 0
@@ -200,11 +202,14 @@ request_recurse(winid_t win, GtkRequisition *requisition, guint spacing)
                GtkRequisition child1, child2;
                request_recurse(win->window_node->children->data, &child1, spacing);
                request_recurse(win->window_node->children->next->data, &child2, spacing);
+
+               glui32 division = win->split_method & winmethod_DivisionMask;
+               glui32 direction = win->split_method & winmethod_DirMask;
                
                /* If the split is fixed, get the size of the fixed child */
-               if((win->split_method & winmethod_DivisionMask) == winmethod_Fixed)
+               if(division == winmethod_Fixed)
                {
-                       switch(win->split_method & winmethod_DirMask)
+                       switch(direction)
                        {
                                case winmethod_Left:
                                        child1.width = win->key_window?
@@ -230,7 +235,7 @@ request_recurse(winid_t win, GtkRequisition *requisition, guint spacing)
                }
                
                /* Add the children's requests */
-               switch(win->split_method & winmethod_DirMask)
+               switch(direction)
                {
                        case winmethod_Left:
                        case winmethod_Right:
@@ -282,15 +287,24 @@ allocate_recurse(winid_t win, GtkAllocation *allocation, guint spacing)
 {
        if(win->type == wintype_Pair)
        {
+               glui32 division = win->split_method & winmethod_DivisionMask;
+               glui32 direction = win->split_method & winmethod_DirMask;
+
+               /* If the space gets too small to honor the spacing property, then just 
+                ignore spacing in this window and below. */
+               if( (spacing > allocation->width && (direction == winmethod_Left || direction == winmethod_Right))
+                  || (spacing > allocation->height && (direction == winmethod_Above || direction == winmethod_Below)) )
+                       spacing = 0;
+               
                GtkAllocation child1, child2;
                child1.x = allocation->x;
                child1.y = allocation->y;
                
-               if((win->split_method & winmethod_DivisionMask) == winmethod_Fixed)
+               if(division == winmethod_Fixed)
                {
                        /* If the key window has been closed, then default to 0; otherwise
                         use the key window to determine the size */
-                       switch(win->split_method & winmethod_DirMask)
+                       switch(direction)
                        {
                                case winmethod_Left:
                                        child1.width = win->key_window? 
@@ -317,46 +331,46 @@ allocate_recurse(winid_t win, GtkAllocation *allocation, guint spacing)
                else /* proportional */
                {
                        gdouble fraction = win->constraint_size / 100.0;
-                       switch(win->split_method & winmethod_DirMask)
+                       switch(direction)
                        {
                                case winmethod_Left:
-                                       child1.width = (glui32) ceil( fraction * (allocation->width - spacing) );
+                                       child1.width = MAX(0, (gint)ceil(fraction * (allocation->width - spacing)) );
                                        break;
                                case winmethod_Right:
-                                       child2.width = (glui32) ceil( fraction * (allocation->width - spacing) );
+                                       child2.width = MAX(0, (gint)ceil(fraction * (allocation->width - spacing)) );
                                        break;
                                case winmethod_Above:
-                                       child1.height = (glui32) ceil( fraction * (allocation->height - spacing) );
+                                       child1.height = MAX(0, (gint)ceil(fraction * (allocation->height - spacing)) );
                                        break;
                                case winmethod_Below:
-                                       child2.height = (glui32) ceil( fraction * (allocation->height - spacing) );
+                                       child2.height = MAX(0, (gint)ceil(fraction * (allocation->height - spacing)) );
                                        break;
                        }
                }
                
                /* Fill in the rest of the size requisitions according to the child specified above */
-               switch(win->split_method & winmethod_DirMask)
+               switch(direction)
                {
                        case winmethod_Left:
-                               child2.width = allocation->width - spacing - child1.width;
+                               child2.width = MAX(0, allocation->width - spacing - child1.width);
                                child2.x = child1.x + child1.width + spacing;
                                child2.y = child1.y;
                                child1.height = child2.height = allocation->height;
                                break;
                        case winmethod_Right:
-                               child1.width = allocation->width - spacing - child2.width;
+                               child1.width = MAX(0, allocation->width - spacing - child2.width);
                                child2.x = child1.x + child1.width + spacing;
                                child2.y = child1.y;
                                child1.height = child2.height = allocation->height;
                                break;
                        case winmethod_Above:
-                               child2.height = allocation->height - spacing - child1.height;
+                               child2.height = MAX(0, allocation->height - spacing - child1.height);
                                child2.x = child1.x;
                                child2.y = child1.y + child1.height + spacing;
                                child1.width = child2.width = allocation->width;
                                break;
                        case winmethod_Below:
-                               child1.height = allocation->height - spacing - child2.height;
+                               child1.height = MAX(0, allocation->height - spacing - child2.height);
                                child2.x = child1.x;
                                child2.y = child1.y + child1.height + spacing;
                                child1.width = child2.width = allocation->width;
@@ -472,7 +486,7 @@ chimara_glk_size_allocate(GtkWidget *widget, GtkAllocation *allocation)
                if(!priv->ignore_next_arrange_event)
                {
                        if(arrange)
-                               event_throw(evtype_Arrange, arrange == priv->root_window->data? NULL : arrange, 0, 0);
+                               event_throw(CHIMARA_GLK(widget), evtype_Arrange, arrange == priv->root_window->data? NULL : arrange, 0, 0);
                }
                else
                        priv->ignore_next_arrange_event = FALSE;
@@ -661,6 +675,9 @@ chimara_glk_class_init(ChimaraGlkClass *klass)
 GtkWidget *
 chimara_glk_new(void)
 {
+       /* This is a library entry point; initialize the library */
+       chimara_init();
+
     ChimaraGlk *self = CHIMARA_GLK(g_object_new(CHIMARA_TYPE_GLK, NULL));
     ChimaraGlkPrivate *priv = CHIMARA_GLK_PRIVATE(self);
     
@@ -917,19 +934,21 @@ struct StartupData {
        glk_main_t glk_main;
        glkunix_startup_code_t glkunix_startup_code;
        glkunix_startup_t args;
+       ChimaraGlkPrivate *glk_data;
 };
 
 /* glk_enter() is the actual function called in the new thread in which glk_main() runs.  */
 static gpointer
 glk_enter(struct StartupData *startup)
 {
-    extern ChimaraGlkPrivate *glk_data;
+       extern GPrivate *glk_data_key;
+       g_private_set(glk_data_key, startup->glk_data);
        
        /* Run startup function */
        if(startup->glkunix_startup_code) {
-               glk_data->in_startup = TRUE;
+               startup->glk_data->in_startup = TRUE;
                int result = startup->glkunix_startup_code(&startup->args);
-               glk_data->in_startup = FALSE;
+               startup->glk_data->in_startup = FALSE;
                
                int i = 0;
                while(i < startup->args.argc)
@@ -941,10 +960,10 @@ glk_enter(struct StartupData *startup)
        }
        
        /* Run main function */
-    g_signal_emit_by_name(glk_data->self, "started");
+    g_signal_emit_by_name(startup->glk_data->self, "started");
        (startup->glk_main)();
-       g_slice_free(struct StartupData, startup);      
-       g_signal_emit_by_name(glk_data->self, "stopped");
+       g_signal_emit_by_name(startup->glk_data->self, "stopped");
+       g_slice_free(struct StartupData, startup);
        return NULL;
 }
 
@@ -1007,11 +1026,7 @@ chimara_glk_run(ChimaraGlk *glk, gchar *plugin, int argc, char *argv[], GError *
                /* Set the program name */
                startup->args.argv[0] = g_strdup(plugin);
     }
-
-       extern ChimaraGlkPrivate *glk_data;
-    /* Set the thread's private data */
-    /* TODO: Do this with a GPrivate */
-    glk_data = priv;
+       startup->glk_data = priv;
        
     /* Run in a separate thread */
        priv->thread = g_thread_create((GThreadFunc)glk_enter, startup, TRUE, error);
@@ -1032,7 +1047,14 @@ chimara_glk_stop(ChimaraGlk *glk)
 {
     g_return_if_fail(glk || CHIMARA_IS_GLK(glk));
     /* TODO: check if glk is actually running a program */
-       signal_abort();
+       ChimaraGlkPrivate *priv = CHIMARA_GLK_PRIVATE(glk);
+       if(priv->abort_lock) {
+               g_mutex_lock(priv->abort_lock);
+               priv->abort_signalled = TRUE;
+               g_mutex_unlock(priv->abort_lock);
+               /* Stop blocking on the event queue condition */
+               event_throw(glk, evtype_Abort, NULL, 0, 0);
+       }
 }
 
 /**