#include "chimara-glk-private.h"
#include "stream.h"
#include "fileref.h"
+#include "style.h"
+#include "garglk.h"
extern GPrivate *glk_data_key;
void
garglk_set_story_name(const char *name)
{
- g_printerr("garglk_set_story_name(\"%s\");\n", name);
ChimaraGlkPrivate *glk_data = g_private_get(glk_data_key);
glk_data->story_name = g_strdup(name);
g_object_notify(G_OBJECT(glk_data->self), "story-name");
WARNING(_("Not implemented"));
}
+/* TODO document */
+void
+garglk_set_zcolors_stream(strid_t str, glui32 fg, glui32 bg)
+{
+ VALID_STREAM(str, return);
+ g_return_if_fail(str->window != NULL);
+
+ winid_t window = str->window;
+
+ GtkTextBuffer *buffer = gtk_text_view_get_buffer( GTK_TEXT_VIEW(window->widget) );
+ GtkTextTagTable *tags = gtk_text_buffer_get_tag_table(buffer);
+ GdkColor fore, back;
+ GdkColor *fore_pointer = NULL;
+ GdkColor *back_pointer = NULL;
+ gchar *fore_name;
+ gchar *back_name;
+
+ switch(fg) {
+ case zcolor_Transparent:
+ case zcolor_Cursor:
+ WARNING(_("zcolor_Transparent, zcolor_Cursor not implemented"));
+ // Fallthrough to default
+ case zcolor_Default:
+ fore_name = "default";
+ break;
+ case zcolor_Current:
+ {
+ if(window->zcolor) {
+ // Get the current foreground color
+ GdkColor *current_color;
+ g_object_get(window->zcolor, "foreground-gdk", ¤t_color, NULL);
+ fore_name = g_strdup_printf("%02X%02X%02X", current_color->red, current_color->green, current_color->blue);
+
+ // Copy the color and use it
+ fore.red = current_color->red;
+ fore.green = current_color->green;
+ fore.blue = current_color->blue;
+ fore_pointer = &fore;
+ } else {
+ fore_name = "default";
+ }
+ break;
+ }
+ default:
+ glkcolor_to_gdkcolor(fg, &fore);
+ fore_pointer = &fore;
+ fore_name = g_strdup_printf("%02X%02X%02X",
+ ((fg & 0xff0000) >> 16),
+ ((fg & 0x00ff00) >> 8),
+ (fg & 0x0000ff)
+ );
+ }
+
+ switch(bg) {
+ case zcolor_Transparent:
+ case zcolor_Cursor:
+ WARNING(_("zcolor_Transparent, zcolor_Cursor not implemented"));
+ // Fallthrough to default
+ case zcolor_Default:
+ back_name = "default";
+ break;
+ case zcolor_Current:
+ {
+ if(window->zcolor) {
+ // Get the current background color
+ GdkColor *current_color;
+ g_object_get(window->zcolor, "background-gdk", ¤t_color, NULL);
+ back_name = g_strdup_printf("%02X%02X%02X", current_color->red, current_color->green, current_color->blue);
+
+ // Copy the color and use it
+ back.red = current_color->red;
+ back.green = current_color->green;
+ back.blue = current_color->blue;
+ back_pointer = &back;
+ } else {
+ back_name = "default";
+ }
+ break;
+ }
+ default:
+ glkcolor_to_gdkcolor(bg, &back);
+ back_pointer = &back;
+ back_name = g_strdup_printf("%02X%02X%02X",
+ ((bg & 0xff0000) >> 16),
+ ((bg & 0x00ff00) >> 8),
+ (bg & 0x0000ff)
+ );
+ }
+
+ char *name = g_strdup_printf("zcolor:#%s/#%s", fore_name, back_name);
+
+ if(fore_pointer == NULL && back_pointer == NULL) {
+ // NULL value means to ignore the zcolor property altogether
+ window->zcolor = NULL;
+ } else {
+ // See if we have used this color combination before
+ GtkTextTag *tag = gtk_text_tag_table_lookup(tags, name);
+
+ if(tag == NULL) {
+ // Create a new texttag with the specified colors
+ tag = gtk_text_buffer_create_tag(
+ buffer,
+ name,
+ "foreground-gdk", fore_pointer,
+ "foreground-set", fore_pointer != NULL,
+ "background-gdk", back_pointer,
+ "background-set", back_pointer != NULL,
+ NULL
+ );
+ }
+
+ // From now on, text will be drawn in the specified colors
+ window->zcolor = tag;
+ }
+}
+
/**
* garglk_set_zcolors:
* @fg: one of the <code>zcolor_</code> constants.
{
ChimaraGlkPrivate *glk_data = g_private_get(glk_data_key);
g_return_if_fail(glk_data->current_stream != NULL);
- g_return_if_fail(glk_data->current_stream->window != NULL);
-
- WARNING(_("Not implemented"));
+
+ garglk_set_zcolors_stream(glk_data->current_stream, fg, bg);
}
static void
apply_reverse_color(GtkTextTag *tag, gpointer data)
{
- g_object_set_data( G_OBJECT(tag), "reverse_color", data );
+ const gchar *tag_name;
+ g_object_get(tag, "name", &tag_name, NULL);
+
+ if( g_str_has_prefix(tag_name, "glk-") )
+ g_object_set_data( G_OBJECT(tag), "reverse_color", data );
+}
+
+/* TODO document */
+void
+garglk_set_reversevideo_stream(strid_t str, glui32 reverse)
+{
+ VALID_STREAM(str, return);
+
+ GtkTextBuffer *buffer = gtk_text_view_get_buffer( GTK_TEXT_VIEW(str->window->widget) );
+ GtkTextTagTable *tags = gtk_text_buffer_get_tag_table(buffer);
+ gtk_text_tag_table_foreach( tags, apply_reverse_color, GINT_TO_POINTER(reverse) );
}
/**
g_return_if_fail(glk_data->current_stream != NULL);
g_return_if_fail(glk_data->current_stream->window != NULL);
- GtkTextBuffer *buffer = gtk_text_view_get_buffer( GTK_TEXT_VIEW(glk_data->current_stream->window->widget) );
- GtkTextTagTable *tags = gtk_text_buffer_get_tag_table(buffer);
- gtk_text_tag_table_foreach( tags, apply_reverse_color, GINT_TO_POINTER(reverse) );
+ garglk_set_reversevideo_stream(glk_data->current_stream, reverse);
}