Overhauled the whole reverse video thing.
[projects/chimara/chimara.git] / libchimara / style.c
index 5bbbb5be22ec3385da336297a6a9cfe21a12e2cf..6cd3bd0b53762ec243c4170b0b6246218800e513 100644 (file)
@@ -17,6 +17,7 @@ static void style_add_tag_to_textbuffer(gpointer key, gpointer tag, gpointer tag
 static void style_copy_tag_to_textbuffer(gpointer key, gpointer tag, gpointer target_table);
 static void text_tag_to_attr_list(GtkTextTag *tag, PangoAttrList *list);
 GtkTextTag* gtk_text_tag_copy(GtkTextTag *tag);
+static void style_cascade_colors(GtkTextTag *tag, GtkTextTag *glk_tag, GtkTextTag *default_tag, GdkColor **foreground, GdkColor **background);
 
 /**
  * glk_set_style:
@@ -111,6 +112,10 @@ get_glk_tag_name(glui32 style)
  */
 void
 glk_set_style_stream(strid_t str, glui32 styl) {
+#ifdef DEBUG_STYLES
+       g_printf("glk_set_style(str->rock=%d, styl=%d)\n", str->rock, styl);
+#endif
+
        if(str->window == NULL)
                return;
 
@@ -219,10 +224,11 @@ gtk_text_tag_copy(GtkTextTag *tag)
        #undef _COPY_FLAG
 
        /* Copy the data that was added manually */
-       gpointer reverse_color = g_object_get_data( G_OBJECT(tag), "reverse_color" );
+       gpointer reverse_color = g_object_get_data( G_OBJECT(tag), "reverse-color" );
 
-       if(reverse_color)
-               g_object_set_data( G_OBJECT(copy), "reverse_color", reverse_color );
+       if(reverse_color) {
+               g_object_set_data( G_OBJECT(copy), "reverse-color", reverse_color );
+       }
 
        return copy;
 }
@@ -676,7 +682,7 @@ gdkcolor_to_glkcolor(GdkColor *color)
 
 /* Internal function: changes a GTK tag to correspond with the given style. */
 static void
-apply_stylehint_to_tag(GtkTextTag *tag, GtkTextTag *default_tag, glui32 wintype, glui32 hint, glsi32 val)
+apply_stylehint_to_tag(GtkTextTag *tag, glui32 wintype, glui32 styl, glui32 hint, glsi32 val)
 {
        g_return_if_fail(tag != NULL);
 
@@ -777,36 +783,46 @@ apply_stylehint_to_tag(GtkTextTag *tag, GtkTextTag *default_tag, glui32 wintype,
                break;
 
        case stylehint_ReverseColor:
-               if(reverse_color != val) {
+       {
+               // Determine the current colors
+               
+               // If all fails, use black/white
+               // FIXME: Use system theme here
+               GdkColor foreground, background;
+               gdk_color_parse("black", &foreground);
+               gdk_color_parse("white", &background);
+               GdkColor *current_foreground = &foreground;
+               GdkColor *current_background = &background;
+
+               if(wintype == wintype_TextBuffer) {
+                       GtkTextTag* default_tag = g_hash_table_lookup(glk_data->styles->text_buffer, "default");
+                       GtkTextTag* base_tag = g_hash_table_lookup(glk_data->styles->text_buffer, get_tag_name(styl));
+                       style_cascade_colors(base_tag, tag, default_tag, &current_foreground, &current_background);
+               }
+               else if(wintype == wintype_TextGrid) {
+                       GtkTextTag* default_tag = g_hash_table_lookup(glk_data->styles->text_grid, "default");
+                       GtkTextTag* base_tag = g_hash_table_lookup(glk_data->styles->text_grid, get_tag_name(styl));
+                       style_cascade_colors(base_tag, tag, default_tag, &current_foreground, &current_background);
+               }
+
+               if(val) {
                        /* Flip the fore- and background colors */
-                       GdkColor* foreground_color;
-                       GdkColor* background_color;
-                       gint f_set, b_set, df_set, db_set = 0;
-                       g_object_get(tag_object, "foreground-set", &f_set, "background-set", &b_set, NULL);
-                       g_object_get(default_tag, "foreground-set", &df_set, "background-set", &db_set, NULL);
-
-                       if(f_set)
-                               g_object_get(tag_object, "foreground-gdk", &foreground_color, NULL);
-                       else if(df_set)
-                               g_object_get(default_tag, "foreground-gdk", &foreground_color, NULL);
-                       if(b_set)
-                               g_object_get(tag_object, "background-gdk", &background_color, NULL);
-                       else if(db_set)
-                               g_object_get(default_tag, "background-gdk", &background_color, NULL);
-
-                       if(b_set || db_set)
-                               g_object_set(tag_object, "foreground-gdk", background_color, NULL);
-                       else
-                               g_object_set(tag_object, "foreground", "#ffffff", NULL);
-
-                       if(f_set || df_set)
-                               g_object_set(tag_object, "background-gdk", foreground_color, NULL);
-                       else
-                               g_object_set(tag_object, "background", "#000000", NULL);
-
-                       g_object_set_data( tag_object, "reverse-color", GINT_TO_POINTER(val != 0) );
+                       GdkColor *temp = current_foreground;
+                       current_foreground = current_background;
+                       current_background = temp;
                }
+
+               g_object_set(tag,
+                       "foreground-gdk", current_foreground,
+                       "foreground-set", TRUE,
+                       "background-gdk", current_background,
+                       "background-set", TRUE,
+                       NULL
+               );
+
+               g_object_set_data( tag_object, "reverse-color", GINT_TO_POINTER(val != 0) );
                break;
+       }
 
        default:
                WARNING("Unknown style hint");
@@ -914,19 +930,21 @@ query_tag(GtkTextTag *tag, glui32 wintype, glui32 hint)
 void
 glk_stylehint_set(glui32 wintype, glui32 styl, glui32 hint, glsi32 val)
 {
+#ifdef DEBUG_STYLES
+       g_printf("glk_stylehint_set(wintype=%d, styl=%d, hint=%d, val=%d)\n", wintype, styl, hint, val);
+#endif
+
        ChimaraGlkPrivate *glk_data = g_private_get(glk_data_key);
 
-       GtkTextTag *to_change, *default_tag;
+       GtkTextTag *to_change;
        if(wintype == wintype_TextBuffer || wintype == wintype_AllTypes) {
                to_change = g_hash_table_lookup( glk_data->glk_styles->text_buffer, get_glk_tag_name(styl) );
-               default_tag = g_hash_table_lookup( glk_data->styles->text_buffer, get_tag_name(styl) );
-               apply_stylehint_to_tag(to_change, default_tag, wintype_TextBuffer, hint, val);
+               apply_stylehint_to_tag(to_change, wintype_TextBuffer, styl, hint, val);
        }
 
        if(wintype == wintype_TextGrid || wintype == wintype_AllTypes) {
                to_change = g_hash_table_lookup( glk_data->glk_styles->text_grid, get_glk_tag_name(styl) );
-               default_tag = g_hash_table_lookup( glk_data->styles->text_grid, get_tag_name(styl) );
-               apply_stylehint_to_tag(to_change, default_tag, wintype_TextGrid, hint, val);
+               apply_stylehint_to_tag(to_change, wintype_TextGrid, styl, hint, val);
        }
 }
 
@@ -947,6 +965,10 @@ glk_stylehint_set(glui32 wintype, glui32 styl, glui32 hint, glsi32 val)
 void
 glk_stylehint_clear(glui32 wintype, glui32 styl, glui32 hint)
 {
+#ifdef DEBUG_STYLES
+       g_printf("glk_stylehint_clear(wintype=%d, styl=%d, hint=%d)\n", wintype, styl, hint);
+#endif
+
        ChimaraGlkPrivate *glk_data = g_private_get(glk_data_key);
        GtkTextTag *tag;
 
@@ -986,6 +1008,10 @@ glk_stylehint_clear(glui32 wintype, glui32 styl, glui32 hint)
 glui32
 glk_style_distinguish(winid_t win, glui32 styl1, glui32 styl2)
 {
+#ifdef DEBUG_STYLES
+       g_printf("glk_style_distinguish(win->rock=%d, styl1=%d, styl2=%d)\n", win->rock, styl1, styl2);
+#endif
+
        /* FIXME */
        return styl1 != styl2;
 }
@@ -1062,6 +1088,10 @@ glk_style_distinguish(winid_t win, glui32 styl1, glui32 styl2)
 glui32
 glk_style_measure(winid_t win, glui32 styl, glui32 hint, glui32 *result)
 {
+#ifdef DEBUG_STYLES
+       g_printf("glk_style_measure(win->rock=%d, styl=%d, hint=%d, result=...)\n", win->rock, styl, hint);
+#endif
+
        ChimaraGlkPrivate *glk_data = g_private_get(glk_data_key);
        GtkTextTag *tag;
 
@@ -1175,3 +1205,67 @@ style_update(ChimaraGlk *glk)
        GtkTextTag *pager_tag = GTK_TEXT_TAG( g_hash_table_lookup(priv->styles->text_buffer, "pager") );
        text_tag_to_attr_list(pager_tag, priv->pager_attr_list);
 }
+
+/* Determine the current colors used to render the text for a given stream. 
+ * This can be set in a number of places */
+static void
+style_cascade_colors(GtkTextTag *tag, GtkTextTag *glk_tag, GtkTextTag *default_tag, GdkColor **foreground, GdkColor **background)
+{
+       gboolean foreground_set = FALSE;
+       gboolean background_set = FALSE;
+       gint reverse_color;
+
+       // Default color
+       reverse_color = GPOINTER_TO_INT( g_object_get_data(G_OBJECT(default_tag), "reverse-color") );
+       g_object_get(default_tag, "foreground-set", &foreground_set, "background-set", &background_set, NULL);
+       if(foreground_set)
+               g_object_get(default_tag, "foreground-gdk", reverse_color ? background:foreground, NULL);
+       if(background_set)
+               g_object_get(default_tag, "background-gdk", reverse_color ? foreground:background, NULL);
+
+       // Player defined color
+       reverse_color = GPOINTER_TO_INT( g_object_get_data(G_OBJECT(tag), "reverse-color") );
+       g_object_get(tag, "foreground-set", &foreground_set, "background-set", &background_set, NULL);
+       if(foreground_set)
+               g_object_get(tag, "foreground-gdk", reverse_color ? background:foreground, NULL);
+       if(background_set)
+               g_object_get(tag, "background-gdk", reverse_color ? foreground:background, NULL);
+
+       // GLK defined color
+       reverse_color = GPOINTER_TO_INT( g_object_get_data(G_OBJECT(glk_tag), "reverse-color") );
+       g_object_get(glk_tag, "foreground-set", &foreground_set, "background-set", &background_set, NULL);
+       if(foreground_set)
+               g_object_get(glk_tag, "foreground-gdk", reverse_color ? background:foreground, NULL);
+       if(background_set)
+               g_object_get(glk_tag, "background-gdk", reverse_color ? foreground:background, NULL);
+
+}
+
+/* Determine the current colors used to render the text for a given stream. 
+ * This can be set in a number of places */
+void
+style_stream_colors(strid_t str, GdkColor **foreground, GdkColor **background)
+{
+       VALID_STREAM(str, return);
+       g_return_if_fail(str->window != NULL);
+       g_return_if_fail(str->window->type != wintype_TextBuffer || str->window->type != wintype_TextGrid);
+       
+       GtkTextBuffer *buffer = gtk_text_view_get_buffer( GTK_TEXT_VIEW(str->window->widget) ); 
+       GtkTextTagTable *tags = gtk_text_buffer_get_tag_table(buffer);
+       GtkTextTag* default_tag = gtk_text_tag_table_lookup(tags, "default");
+       GtkTextTag* tag = gtk_text_tag_table_lookup(tags, str->style);
+       GtkTextTag* glk_tag = gtk_text_tag_table_lookup(tags, str->glk_style);
+
+       style_cascade_colors(tag, glk_tag, default_tag, foreground, background);
+
+       gboolean foreground_set, background_set;
+
+       // Windows can have zcolors defined
+       if(str->window->zcolor) {
+               g_object_get(str->window->zcolor, "foreground-set", &foreground_set, "background-set", &background_set, NULL);
+               if(foreground_set)
+                       g_object_get(str->window->zcolor, "foreground-gdk", foreground, NULL);
+               if(background_set)
+                       g_object_get(str->window->zcolor, "background-gdk", background, NULL);
+       }
+}