moving from https://github.com/perberos/mate-desktop-environment

1 files changed, 971 insertions, 0 deletions

diff --git a/eel/eel-gdk-extensions.c b/eel/eel-gdk-extensions.c
new file mode 100644
index 00000000..acd85af5
--- /dev/null
+++ b/eel/eel-gdk-extensions.c
@@ -0,0 +1,971 @@
+/* -*- Mode: C; indent-tabs-mode: t; c-basic-offset: 8; tab-width: 8 -*- */
+
+/* eel-gdk-extensions.c: Graphics routines to augment what's in gdk.
+
+   Copyright (C) 1999, 2000 Eazel, Inc.
+
+   The Mate Library is free software; you can redistribute it and/or
+   modify it under the terms of the GNU Library General Public License as
+   published by the Free Software Foundation; either version 2 of the
+   License, or (at your option) any later version.
+
+   The Mate Library is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+   Library General Public License for more details.
+
+   You should have received a copy of the GNU Library General Public
+   License along with the Mate Library; see the file COPYING.LIB.  If not,
+   write to the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+   Boston, MA 02111-1307, USA.
+
+   Authors: Darin Adler <[email protected]>,
+            Pavel Cisler <[email protected]>,
+            Ramiro Estrugo <[email protected]>
+*/
+
+#include <config.h>
+#include "eel-gdk-extensions.h"
+
+#include "eel-glib-extensions.h"
+#include "eel-lib-self-check-functions.h"
+#include "eel-string.h"
+#include <gdk-pixbuf/gdk-pixbuf.h>
+#include <gdk/gdkprivate.h>
+#include <gdk/gdk.h>
+#include <gdk/gdkx.h>
+#include <stdlib.h>
+#include <pango/pango.h>
+
+#define GRADIENT_BAND_SIZE 4
+
+/**
+ * eel_gdk_rectangle_contains_rectangle:
+ * @outer: Rectangle possibly containing another rectangle.
+ * @inner: Rectangle that might be inside.
+ *
+ * Retun TRUE if inner rectangle is contained inside outer rectangle
+ */
+gboolean
+eel_gdk_rectangle_contains_rectangle (GdkRectangle outer, GdkRectangle inner)
+{
+    return outer.x <= inner.x && outer.x + outer.width >= inner.x + inner.width
+           && outer.y <= inner.y && outer.y + outer.height >= inner.y + inner.height;
+}
+
+/**
+ * eel_interpolate_color:
+ * @ratio: Place on line between colors to interpolate.
+ * @start_color: Color for one end.
+ * @end_color: Color for the other end
+ * @interpolated_color: Result.
+ *
+ * Compute a color between @start_color and @end_color in color space.
+ * Currently, the color space used is RGB, but a future version could
+ * instead do the interpolation in the best color space for expressing
+ * human perception.
+ */
+guint32
+eel_interpolate_color (gdouble ratio,
+                       guint32 start_rgb,
+                       guint32 end_rgb)
+{
+    guchar red, green, blue;
+
+    g_return_val_if_fail (ratio >= 0.0, 0);
+    g_return_val_if_fail (ratio <= 1.0, 0);
+
+    red = ((start_rgb >> 16) & 0xFF) * (1.0 - ratio) + ((end_rgb >> 16) & 0xFF) * ratio;
+    green = ((start_rgb >> 8) & 0xFF) * (1.0 - ratio) + ((end_rgb >> 8) & 0xFF) * ratio;
+    blue = (start_rgb & 0xFF) * (1.0 - ratio) + (end_rgb & 0xFF) * ratio;
+    return (((red << 8) | green) << 8) | blue;
+}
+
+/**
+ * eel_gradient_new
+ * @start_color: Color for the top or left.
+ * @end_color: Color for the bottom or right.
+ * @is_horizontal: Direction of the gradient.
+ *
+ * Create a string that combines the start and end colors along
+ * with the direction of the gradient in a standard format.
+ */
+char *
+eel_gradient_new (const char *start_color,
+                  const char *end_color,
+                  gboolean is_horizontal)
+{
+    /* Handle the special case where the start and end colors are identical.
+       Handle the special case where the end color is an empty string.
+    */
+    if (eel_strcmp(start_color, end_color) == 0 || end_color == NULL || end_color[0] == '\0')
+    {
+        return g_strdup (start_color);
+    }
+
+    /* Handle the special case where the start color is an empty string. */
+    if (start_color == NULL || start_color[0] == '\0')
+    {
+        return g_strdup (end_color);
+    }
+
+    /* Handle the general case. */
+    return g_strconcat (start_color, "-", end_color, is_horizontal ? ":h" : NULL, NULL);
+}
+
+/**
+ * eel_gradient_is_gradient
+ * @gradient_spec: A gradient spec. string.
+ *
+ * Return true if the spec. specifies a gradient instead of a solid color.
+ */
+gboolean
+eel_gradient_is_gradient (const char *gradient_spec)
+{
+    return eel_strchr (gradient_spec, '-') != NULL;
+}
+
+/**
+ * eel_gradient_is_horizontal
+ * @gradient_spec: A gradient spec. string.
+ *
+ * Return true if the spec. specifies a horizontal gradient.
+ */
+gboolean
+eel_gradient_is_horizontal (const char *gradient_spec)
+{
+    size_t length;
+
+    length = eel_strlen (gradient_spec);
+    return length >= 2 && gradient_spec[length - 2] == ':' && gradient_spec[length - 1] == 'h';
+}
+
+static char *
+eel_gradient_strip_trailing_direction_if_any (const char *gradient_spec)
+{
+    size_t length;
+
+    length = eel_strlen (gradient_spec);
+    if (length >= 2 && gradient_spec[length - 2] == ':'
+            && (gradient_spec[length - 1] == 'v' || gradient_spec[length - 1] == 'h'))
+    {
+        length -= 2;
+    }
+
+    return g_strndup (gradient_spec, length);
+}
+
+/* For parsing n-point gradients. Successive calls should pass the next_spec value
+ * set by the previous call as their first argument - to continue parsing where the
+ * previous call left off.
+ */
+char *
+eel_gradient_parse_one_color_spec (const char *spec, int *percent, const char **next_spec)
+{
+    char *result;
+    const char *rgb_end_ptr;
+    const char *percent_ptr;
+    const char *separator_ptr;
+
+    percent_ptr   = eel_strchr (spec, '%');
+    separator_ptr = eel_strchr (spec, '-');
+
+    if (percent_ptr != NULL && (separator_ptr == NULL || percent_ptr < separator_ptr))
+    {
+        if (percent != NULL)
+        {
+            *percent = (int) strtol (percent_ptr + 1, NULL, 10);
+        }
+        rgb_end_ptr = percent_ptr;
+    }
+    else
+    {
+        if (percent != NULL)
+        {
+            *percent = 100;
+        }
+        rgb_end_ptr = separator_ptr;
+    }
+
+    if (rgb_end_ptr != NULL)
+    {
+        result = g_strndup (spec, rgb_end_ptr - spec);
+    }
+    else
+    {
+        result = eel_gradient_strip_trailing_direction_if_any (spec);
+    }
+
+    /* It's important not to use spec after setting *next_spec because it's
+     * likely that *next_spec == spec.
+     */
+    if (next_spec != NULL)
+    {
+        *next_spec = (separator_ptr != NULL) ? separator_ptr + 1 : NULL;
+    }
+
+    return result;
+}
+
+/* FIXME bugzilla.eazel.com 5076:
+ * anyone using eel_gradient_get_start_color_spec or
+ * eel_gradient_get_end_color_spec is assuming the gradient
+ * is 2 colors which is questionable.
+ *
+ * Callers should be rewritten and these fns eliminated.
+ */
+
+/**
+ * eel_gradient_get_start_color_spec
+ * @gradient_spec: A gradient spec. string.
+ *
+ * Return the start color.
+ * This may be the entire gradient_spec if it's a solid color.
+ */
+char *
+eel_gradient_get_start_color_spec (const char *gradient_spec)
+{
+    return eel_gradient_parse_one_color_spec (gradient_spec, NULL, NULL);
+}
+
+/**
+ * eel_gradient_get_end_color_spec
+ * @gradient_spec: A gradient spec. string.
+ *
+ * Return the end color.
+ * This may be the entire gradient_spec if it's a solid color.
+ */
+char *
+eel_gradient_get_end_color_spec (const char *gradient_spec)
+{
+    char* color = NULL;
+
+    do
+    {
+        g_free (color);
+        color = eel_gradient_parse_one_color_spec (gradient_spec, NULL, &gradient_spec);
+    }
+    while (gradient_spec != NULL);
+
+    return color;
+}
+
+/* Do the work shared by all the set_color_spec functions below. */
+static char *
+eel_gradient_set_edge_color (const char *gradient_spec,
+                             const char *edge_color,
+                             gboolean is_horizontal,
+                             gboolean change_end)
+{
+    char *opposite_color;
+    char *result;
+
+    g_assert (edge_color != NULL);
+
+    /* Get the color from the existing gradient spec. for the opposite
+       edge. This will parse away all the stuff we don't want from the
+       old gradient spec.
+    */
+    opposite_color = change_end
+                     ? eel_gradient_get_start_color_spec (gradient_spec)
+                     : eel_gradient_get_end_color_spec (gradient_spec);
+
+    /* Create a new gradient spec. The eel_gradient_new function handles
+       some special cases, so we don't have to bother with them here.
+    */
+    result = eel_gradient_new (change_end ? opposite_color : edge_color,
+                               change_end ? edge_color : opposite_color,
+                               is_horizontal);
+
+    g_free (opposite_color);
+
+    return result;
+}
+
+/**
+ * eel_gradient_set_left_color_spec
+ * @gradient_spec: A gradient spec. string.
+ * @left_color: Color spec. to replace left color with.
+ *
+ * Changes the left color to what's passed in.
+ * This creates a horizontal gradient.
+ */
+char *
+eel_gradient_set_left_color_spec (const char *gradient_spec,
+                                  const char *left_color)
+{
+    g_return_val_if_fail (gradient_spec != NULL, NULL);
+    g_return_val_if_fail (left_color != NULL, NULL);
+
+    return eel_gradient_set_edge_color (gradient_spec, left_color, TRUE, FALSE);
+}
+
+/**
+ * eel_gradient_set_top_color_spec
+ * @gradient_spec: A gradient spec. string.
+ * @top_color: Color spec. to replace top color with.
+ *
+ * Changes the top color to what's passed in.
+ * This creates a vertical gradient.
+ */
+char *
+eel_gradient_set_top_color_spec (const char *gradient_spec,
+                                 const char *top_color)
+{
+    g_return_val_if_fail (gradient_spec != NULL, NULL);
+    g_return_val_if_fail (top_color != NULL, NULL);
+
+    return eel_gradient_set_edge_color (gradient_spec, top_color, FALSE, FALSE);
+}
+
+/**
+ * eel_gradient_set_right_color_spec
+ * @gradient_spec: A gradient spec. string.
+ * @right_color: Color spec. to replace right color with.
+ *
+ * Changes the right color to what's passed in.
+ * This creates a horizontal gradient.
+ */
+char *
+eel_gradient_set_right_color_spec (const char *gradient_spec,
+                                   const char *right_color)
+{
+    g_return_val_if_fail (gradient_spec != NULL, NULL);
+    g_return_val_if_fail (right_color != NULL, NULL);
+
+    return eel_gradient_set_edge_color (gradient_spec, right_color, TRUE, TRUE);
+}
+
+/**
+ * eel_gradient_set_bottom_color_spec
+ * @gradient_spec: A gradient spec. string.
+ * @bottom_color: Color spec. to replace bottom color with.
+ *
+ * Changes the bottom color to what's passed in.
+ * This creates a vertical gradient.
+ */
+char *
+eel_gradient_set_bottom_color_spec (const char *gradient_spec,
+                                    const char *bottom_color)
+{
+    g_return_val_if_fail (gradient_spec != NULL, NULL);
+    g_return_val_if_fail (bottom_color != NULL, NULL);
+
+    return eel_gradient_set_edge_color (gradient_spec, bottom_color, FALSE, TRUE);
+}
+
+/**
+ * eel_gdk_color_parse_with_white_default
+ * @color_spec: A color spec, or NULL.
+ * @color: Pointer to place to put resulting color.
+ *
+ * The same as gdk_color_parse, except sets the color to white if
+ * the spec. can't be parsed, instead of returning a boolean flag.
+ */
+void
+eel_gdk_color_parse_with_white_default (const char *color_spec,
+                                        GdkColor *color)
+{
+    gboolean got_color;
+
+    g_return_if_fail (color != NULL);
+
+    got_color = FALSE;
+    if (color_spec != NULL)
+    {
+        if (gdk_color_parse (color_spec, color))
+        {
+            got_color = TRUE;
+        }
+    }
+
+    if (!got_color)
+    {
+        color->red = 0xFFFF;
+        color->green = 0xFFFF;
+        color->blue = 0xFFFF;
+    }
+}
+
+/**
+ * eel_parse_rgb_with_white_default
+ * @color_spec: A color spec, or NULL.
+ * Returns: An rgb value.
+ *
+ * The same as gdk_color_parse, except sets the color to white if
+ * the spec. can't be parsed instead of returning a boolean flag
+ * and returns a guint32 rgb value instead of a GdkColor.
+ */
+guint32
+eel_parse_rgb_with_white_default (const char *color_spec)
+{
+    GdkColor color;
+
+    eel_gdk_color_parse_with_white_default (color_spec, &color);
+    return ((color.red << 8) & EEL_RGB_COLOR_RED)
+           | (color.green & EEL_RGB_COLOR_GREEN)
+           | ((color.blue >> 8) & EEL_RGB_COLOR_BLUE);
+}
+
+guint32
+eel_rgb16_to_rgb (gushort r, gushort g, gushort b)
+{
+    guint32 result;
+
+    result = (0xff0000 | (r & 0xff00));
+    result <<= 8;
+    result |= ((g & 0xff00) | (b >> 8));
+
+    return result;
+}
+
+guint32
+eel_rgb8_to_rgb (guchar r, guchar g, guchar b)
+{
+    return eel_rgb16_to_rgb (r << 8, g << 8, b << 8);
+}
+
+/**
+ * eel_gdk_color_to_rgb
+ * @color: A GdkColor style color.
+ * Returns: An rgb value.
+ *
+ * Converts from a GdkColor stlye color to a gdk_rgb one.
+ * Alpha gets set to fully opaque
+ */
+guint32
+eel_gdk_color_to_rgb (const GdkColor *color)
+{
+    return eel_rgb16_to_rgb (color->red, color->green, color->blue);
+}
+
+/**
+ * eel_gdk_rgb_to_color
+ * @color: a gdk_rgb style value.
+ *
+ * Converts from a gdk_rgb value style to a GdkColor one.
+ * The gdk_rgb color alpha channel is ignored.
+ *
+ * Return value: A GdkColor structure version of the given RGB color.
+ */
+GdkColor
+eel_gdk_rgb_to_color (guint32 color)
+{
+    GdkColor result;
+
+    result.red = ((color >> 16) & 0xFF) * 0x101;
+    result.green = ((color >> 8) & 0xFF) * 0x101;
+    result.blue = (color & 0xff) * 0x101;
+    result.pixel = 0;
+
+    return result;
+}
+
+/**
+ * eel_gdk_rgb_to_color_spec
+ * @color: a gdk_rgb style value.
+ *
+ * Converts from a gdk_rgb value style to a string color spec.
+ * The gdk_rgb color alpha channel is ignored.
+ *
+ * Return value: a newly allocated color spec.
+ */
+char *
+eel_gdk_rgb_to_color_spec (const guint32 color)
+{
+    return g_strdup_printf ("#%06X", (guint) (color & 0xFFFFFF));
+}
+
+static guint32
+eel_shift_color_component (guchar component, float shift_by)
+{
+    guint32 result;
+    if (shift_by > 1.0)
+    {
+        result = component * (2 - shift_by);
+    }
+    else
+    {
+        result = 0xff - shift_by * (0xff - component);
+    }
+
+    return result & 0xff;
+}
+
+/**
+ * eel_rgb_shift_color
+ * @color: A color.
+ * @shift_by: darken or lighten factor.
+ * Returns: An darkened or lightened rgb value.
+ *
+ * Darkens (@shift_by > 1) or lightens (@shift_by < 1)
+ * @color.
+ */
+guint32
+eel_rgb_shift_color (guint32 color, float shift_by)
+{
+    guint32 result;
+
+    /* shift red by shift_by */
+    result = eel_shift_color_component((color & 0x00ff0000) >> 16, shift_by);
+    result <<= 8;
+    /* shift green by shift_by */
+    result |=  eel_shift_color_component((color & 0x0000ff00) >> 8, shift_by);
+    result <<= 8;
+    /* shift blue by shift_by */
+    result |=  eel_shift_color_component((color & 0x000000ff), shift_by);
+
+    /* alpha doesn't change */
+    result |= (0xff000000 & color);
+
+    return result;
+}
+
+/**
+ * eel_gdk_color_is_dark:
+ *
+ * Return true if the given color is `dark'
+ */
+gboolean
+eel_gdk_color_is_dark (GdkColor *color)
+{
+    int intensity;
+
+    intensity = (((color->red >> 8) * 77)
+                 + ((color->green >> 8) * 150)
+                 + ((color->blue >> 8) * 28)) >> 8;
+
+    return intensity < 128;
+}
+
+/**
+ * eel_stipple_bitmap_for_screen:
+ *
+ * Get pointer to 50% stippled bitmap suitable for use
+ * on @screen. This is a global object; do not free.
+ */
+GdkBitmap *
+eel_stipple_bitmap_for_screen (GdkScreen *screen)
+{
+    static char       stipple_bits[] = { 0x02, 0x01 };
+    static GPtrArray *stipples = NULL;
+    int screen_num, n_screens, i;
+
+    if (stipples == NULL)
+    {
+        n_screens = gdk_display_get_n_screens (
+                        gdk_screen_get_display (screen));
+        stipples = g_ptr_array_sized_new (n_screens);
+
+        for (i = 0; i < n_screens; i++)
+        {
+            g_ptr_array_index (stipples, i) = NULL;
+        }
+    }
+
+    screen_num = gdk_screen_get_number (screen);
+
+    if (g_ptr_array_index (stipples, screen_num) == NULL)
+    {
+        g_ptr_array_index (stipples, screen_num) =
+            gdk_bitmap_create_from_data (
+                gdk_screen_get_root_window (screen),
+                stipple_bits, 2, 2);
+    }
+
+    return g_ptr_array_index (stipples, screen_num);
+}
+
+/**
+ * eel_stipple_bitmap:
+ *
+ * Get pointer to 50% stippled bitmap suitable for use
+ * on the default screen. This is a global object; do
+ * not free.
+ *
+ * This method is not multiscreen safe. Do not use it.
+ */
+GdkBitmap *
+eel_stipple_bitmap (void)
+{
+    return eel_stipple_bitmap_for_screen (gdk_screen_get_default ());
+}
+
+/**
+ * eel_gdk_window_bring_to_front:
+ *
+ * Raise window and give it focus.
+ */
+void
+eel_gdk_window_bring_to_front (GdkWindow *window)
+{
+    /* This takes care of un-iconifying the window and
+     * raising it if needed.
+     */
+    gdk_window_show (window);
+
+    /* If the window was already showing, it would not have
+     * the focus at this point. Do a little X trickery to
+     * ensure it is focused.
+     */
+    eel_gdk_window_focus (window, GDK_CURRENT_TIME);
+}
+
+void
+eel_gdk_window_focus (GdkWindow *window, guint32 timestamp)
+{
+    gdk_error_trap_push ();
+    XSetInputFocus (GDK_DISPLAY (),
+                    GDK_WINDOW_XWINDOW (window),
+                    RevertToParent,
+                    timestamp);
+    gdk_flush();
+    gdk_error_trap_pop ();
+}
+
+void
+eel_gdk_window_set_wm_protocols (GdkWindow *window,
+                                 GdkAtom *protocols,
+                                 int nprotocols)
+{
+    Atom *atoms;
+    int i;
+
+    atoms = g_new (Atom, nprotocols);
+    for (i = 0; i < nprotocols; i++)
+    {
+        atoms[i] = gdk_x11_atom_to_xatom (protocols[i]);
+    }
+
+    XSetWMProtocols (GDK_WINDOW_XDISPLAY (window),
+                     GDK_WINDOW_XWINDOW (window),
+                     atoms, nprotocols);
+
+    g_free (atoms);
+}
+
+/**
+ * eel_gdk_window_set_wm_hints_input:
+ *
+ * Set the WM_HINTS.input flag to the passed in value
+ */
+void
+eel_gdk_window_set_wm_hints_input (GdkWindow *window, gboolean status)
+{
+    Display *dpy;
+    Window id;
+    XWMHints *wm_hints;
+
+    g_return_if_fail (window != NULL);
+
+    dpy = GDK_WINDOW_XDISPLAY (window);
+    id = GDK_WINDOW_XWINDOW (window);
+
+    wm_hints = XGetWMHints (dpy, id);
+    if (wm_hints == 0)
+    {
+        wm_hints = XAllocWMHints ();
+    }
+
+    wm_hints->flags |= InputHint;
+    wm_hints->input = (status == FALSE) ? False : True;
+
+    XSetWMHints (dpy, id, wm_hints);
+    XFree (wm_hints);
+}
+
+void
+eel_gdk_window_set_invisible_cursor (GdkWindow *window)
+{
+    GdkBitmap *empty_bitmap;
+    GdkCursor *cursor;
+    GdkColor useless;
+    char invisible_cursor_bits[] = { 0x0 };
+
+    useless.red = useless.green = useless.blue = 0;
+    useless.pixel = 0;
+
+    empty_bitmap = gdk_bitmap_create_from_data (window,
+                   invisible_cursor_bits,
+                   1, 1);
+
+    cursor = gdk_cursor_new_from_pixmap (empty_bitmap,
+                                         empty_bitmap,
+                                         &useless,
+                                         &useless, 0, 0);
+
+    gdk_window_set_cursor (window, cursor);
+
+    gdk_cursor_unref (cursor);
+
+    g_object_unref (empty_bitmap);
+}
+
+EelGdkGeometryFlags
+eel_gdk_parse_geometry (const char *string, int *x_return, int *y_return,
+                        guint *width_return, guint *height_return)
+{
+    int x11_flags;
+    EelGdkGeometryFlags gdk_flags;
+
+    g_return_val_if_fail (string != NULL, EEL_GDK_NO_VALUE);
+    g_return_val_if_fail (x_return != NULL, EEL_GDK_NO_VALUE);
+    g_return_val_if_fail (y_return != NULL, EEL_GDK_NO_VALUE);
+    g_return_val_if_fail (width_return != NULL, EEL_GDK_NO_VALUE);
+    g_return_val_if_fail (height_return != NULL, EEL_GDK_NO_VALUE);
+
+    x11_flags = XParseGeometry (string, x_return, y_return,
+                                width_return, height_return);
+
+    gdk_flags = EEL_GDK_NO_VALUE;
+    if (x11_flags & XValue)
+    {
+        gdk_flags |= EEL_GDK_X_VALUE;
+    }
+    if (x11_flags & YValue)
+    {
+        gdk_flags |= EEL_GDK_Y_VALUE;
+    }
+    if (x11_flags & WidthValue)
+    {
+        gdk_flags |= EEL_GDK_WIDTH_VALUE;
+    }
+    if (x11_flags & HeightValue)
+    {
+        gdk_flags |= EEL_GDK_HEIGHT_VALUE;
+    }
+    if (x11_flags & XNegative)
+    {
+        gdk_flags |= EEL_GDK_X_NEGATIVE;
+    }
+    if (x11_flags & YNegative)
+    {
+        gdk_flags |= EEL_GDK_Y_NEGATIVE;
+    }
+
+    return gdk_flags;
+}
+
+void
+eel_gdk_draw_layout_with_drop_shadow (GdkDrawable         *drawable,
+                                      GdkGC               *gc,
+                                      GdkColor            *text_color,
+                                      GdkColor            *shadow_color,
+                                      int                  x,
+                                      int                  y,
+                                      PangoLayout         *layout)
+{
+    gdk_draw_layout_with_colors (drawable, gc,
+                                 x+1, y+1,
+                                 layout,
+                                 shadow_color, NULL);
+
+    gdk_draw_layout_with_colors (drawable, gc,
+                                 x, y,
+                                 layout,
+                                 text_color, NULL);
+}
+
+#if ! defined (EEL_OMIT_SELF_CHECK)
+
+static char *
+eel_gdk_color_as_hex_string (GdkColor color)
+{
+    return g_strdup_printf ("%04X%04X%04X",
+                            color.red, color.green, color.blue);
+}
+
+static char *
+eel_self_check_parse (const char *color_spec)
+{
+    GdkColor color;
+
+    eel_gdk_color_parse_with_white_default (color_spec, &color);
+    return eel_gdk_color_as_hex_string (color);
+}
+
+static char *
+eel_self_check_gdk_rgb_to_color (guint32 color)
+{
+    GdkColor result;
+
+    result = eel_gdk_rgb_to_color (color);
+
+    return eel_gdk_color_as_hex_string (result);
+}
+
+void
+eel_self_check_gdk_extensions (void)
+{
+    /* eel_interpolate_color */
+    EEL_CHECK_INTEGER_RESULT (eel_interpolate_color (0.0, 0, 0), 0);
+    EEL_CHECK_INTEGER_RESULT (eel_interpolate_color (0.0, 0, 0xFFFFFF), 0);
+    EEL_CHECK_INTEGER_RESULT (eel_interpolate_color (0.5, 0, 0xFFFFFF), 0x7F7F7F);
+    EEL_CHECK_INTEGER_RESULT (eel_interpolate_color (1.0, 0, 0xFFFFFF), 0xFFFFFF);
+
+    /* eel_gradient_new */
+    EEL_CHECK_STRING_RESULT (eel_gradient_new ("", "", FALSE), "");
+    EEL_CHECK_STRING_RESULT (eel_gradient_new ("a", "b", FALSE), "a-b");
+    EEL_CHECK_STRING_RESULT (eel_gradient_new ("a", "b", TRUE), "a-b:h");
+    EEL_CHECK_STRING_RESULT (eel_gradient_new ("a", "a", FALSE), "a");
+    EEL_CHECK_STRING_RESULT (eel_gradient_new ("a", "a", TRUE), "a");
+
+    /* eel_gradient_is_gradient */
+    EEL_CHECK_BOOLEAN_RESULT (eel_gradient_is_gradient (""), FALSE);
+    EEL_CHECK_BOOLEAN_RESULT (eel_gradient_is_gradient ("-"), TRUE);
+    EEL_CHECK_BOOLEAN_RESULT (eel_gradient_is_gradient ("a"), FALSE);
+    EEL_CHECK_BOOLEAN_RESULT (eel_gradient_is_gradient ("a-b"), TRUE);
+    EEL_CHECK_BOOLEAN_RESULT (eel_gradient_is_gradient ("a-b:h"), TRUE);
+
+    /* eel_gradient_get_start_color_spec */
+    EEL_CHECK_STRING_RESULT (eel_gradient_get_start_color_spec (""), "");
+    EEL_CHECK_STRING_RESULT (eel_gradient_get_start_color_spec ("-"), "");
+    EEL_CHECK_STRING_RESULT (eel_gradient_get_start_color_spec ("a"), "a");
+    EEL_CHECK_STRING_RESULT (eel_gradient_get_start_color_spec ("a-b"), "a");
+    EEL_CHECK_STRING_RESULT (eel_gradient_get_start_color_spec ("a-"), "a");
+    EEL_CHECK_STRING_RESULT (eel_gradient_get_start_color_spec ("-b"), "");
+    EEL_CHECK_STRING_RESULT (eel_gradient_get_start_color_spec ("a:h"), "a");
+    EEL_CHECK_STRING_RESULT (eel_gradient_get_start_color_spec ("a:v"), "a");
+    EEL_CHECK_STRING_RESULT (eel_gradient_get_start_color_spec ("a:c"), "a:c");
+    EEL_CHECK_STRING_RESULT (eel_gradient_get_start_color_spec ("a:-b"), "a:");
+    EEL_CHECK_STRING_RESULT (eel_gradient_get_start_color_spec ("a:-b:v"), "a:");
+
+    /* eel_gradient_get_end_color_spec */
+    EEL_CHECK_STRING_RESULT (eel_gradient_get_end_color_spec (""), "");
+    EEL_CHECK_STRING_RESULT (eel_gradient_get_end_color_spec ("-"), "");
+    EEL_CHECK_STRING_RESULT (eel_gradient_get_end_color_spec ("a"), "a");
+    EEL_CHECK_STRING_RESULT (eel_gradient_get_end_color_spec ("a-b"), "b");
+    EEL_CHECK_STRING_RESULT (eel_gradient_get_end_color_spec ("a-"), "");
+    EEL_CHECK_STRING_RESULT (eel_gradient_get_end_color_spec ("-b"), "b");
+    EEL_CHECK_STRING_RESULT (eel_gradient_get_end_color_spec ("a:h"), "a");
+    EEL_CHECK_STRING_RESULT (eel_gradient_get_end_color_spec ("a:v"), "a");
+    EEL_CHECK_STRING_RESULT (eel_gradient_get_end_color_spec ("a:c"), "a:c");
+    EEL_CHECK_STRING_RESULT (eel_gradient_get_end_color_spec ("a:-b"), "b");
+    EEL_CHECK_STRING_RESULT (eel_gradient_get_end_color_spec ("a:-b:v"), "b");
+
+    /* eel_gradient_set_left_color_spec */
+    EEL_CHECK_STRING_RESULT (eel_gradient_set_left_color_spec ("", ""), "");
+    EEL_CHECK_STRING_RESULT (eel_gradient_set_left_color_spec ("", "a"), "a");
+    EEL_CHECK_STRING_RESULT (eel_gradient_set_left_color_spec ("a", ""), "a");
+    EEL_CHECK_STRING_RESULT (eel_gradient_set_left_color_spec ("a", "a"), "a");
+    EEL_CHECK_STRING_RESULT (eel_gradient_set_left_color_spec ("a", "b"), "b-a:h");
+    EEL_CHECK_STRING_RESULT (eel_gradient_set_left_color_spec ("a-c:v", "b"), "b-c:h");
+    EEL_CHECK_STRING_RESULT (eel_gradient_set_left_color_spec ("a-c:v", "c"), "c");
+    EEL_CHECK_STRING_RESULT (eel_gradient_set_left_color_spec ("a:-b:v", "d"), "d-b:h");
+
+    /* eel_gradient_set_top_color_spec */
+    EEL_CHECK_STRING_RESULT (eel_gradient_set_top_color_spec ("", ""), "");
+    EEL_CHECK_STRING_RESULT (eel_gradient_set_top_color_spec ("", "a"), "a");
+    EEL_CHECK_STRING_RESULT (eel_gradient_set_top_color_spec ("a", ""), "a");
+    EEL_CHECK_STRING_RESULT (eel_gradient_set_top_color_spec ("a", "a"), "a");
+    EEL_CHECK_STRING_RESULT (eel_gradient_set_top_color_spec ("a", "b"), "b-a");
+    EEL_CHECK_STRING_RESULT (eel_gradient_set_top_color_spec ("a-c:v", "b"), "b-c");
+    EEL_CHECK_STRING_RESULT (eel_gradient_set_top_color_spec ("a-c:v", "c"), "c");
+    EEL_CHECK_STRING_RESULT (eel_gradient_set_top_color_spec ("a:-b:h", "d"), "d-b");
+
+    /* eel_gradient_set_right_color_spec */
+    EEL_CHECK_STRING_RESULT (eel_gradient_set_right_color_spec ("", ""), "");
+    EEL_CHECK_STRING_RESULT (eel_gradient_set_right_color_spec ("", "a"), "a");
+    EEL_CHECK_STRING_RESULT (eel_gradient_set_right_color_spec ("a", ""), "a");
+    EEL_CHECK_STRING_RESULT (eel_gradient_set_right_color_spec ("a", "a"), "a");
+    EEL_CHECK_STRING_RESULT (eel_gradient_set_right_color_spec ("a", "b"), "a-b:h");
+    EEL_CHECK_STRING_RESULT (eel_gradient_set_right_color_spec ("a-c:v", "b"), "a-b:h");
+    EEL_CHECK_STRING_RESULT (eel_gradient_set_right_color_spec ("a-c:v", "c"), "a-c:h");
+    EEL_CHECK_STRING_RESULT (eel_gradient_set_right_color_spec ("a:-b:v", "d"), "a:-d:h");
+
+    /* eel_gradient_set_bottom_color_spec */
+    EEL_CHECK_STRING_RESULT (eel_gradient_set_bottom_color_spec ("", ""), "");
+    EEL_CHECK_STRING_RESULT (eel_gradient_set_bottom_color_spec ("", "a"), "a");
+    EEL_CHECK_STRING_RESULT (eel_gradient_set_bottom_color_spec ("a", ""), "a");
+    EEL_CHECK_STRING_RESULT (eel_gradient_set_bottom_color_spec ("a", "a"), "a");
+    EEL_CHECK_STRING_RESULT (eel_gradient_set_bottom_color_spec ("a", "b"), "a-b");
+    EEL_CHECK_STRING_RESULT (eel_gradient_set_bottom_color_spec ("a-c:v", "b"), "a-b");
+    EEL_CHECK_STRING_RESULT (eel_gradient_set_bottom_color_spec ("a-c:v", "c"), "a-c");
+    EEL_CHECK_STRING_RESULT (eel_gradient_set_bottom_color_spec ("a:-b:h", "d"), "a:-d");
+
+    /* eel_gdk_color_parse_with_white_default */
+    EEL_CHECK_STRING_RESULT (eel_self_check_parse (""), "FFFFFFFFFFFF");
+    EEL_CHECK_STRING_RESULT (eel_self_check_parse ("a"), "FFFFFFFFFFFF");
+    EEL_CHECK_STRING_RESULT (eel_self_check_parse ("white"), "FFFFFFFFFFFF");
+    EEL_CHECK_STRING_RESULT (eel_self_check_parse ("black"), "000000000000");
+    EEL_CHECK_STRING_RESULT (eel_self_check_parse ("red"), "FFFF00000000");
+    EEL_CHECK_STRING_RESULT (eel_self_check_parse ("#012345"), "010123234545");
+    /* EEL_CHECK_STRING_RESULT (eel_self_check_parse ("rgb:0123/4567/89AB"), "#014589"); */
+
+    /* eel_gdk_rgb_to_color */
+    EEL_CHECK_STRING_RESULT (eel_self_check_gdk_rgb_to_color (EEL_RGB_COLOR_RED), "FFFF00000000");
+    EEL_CHECK_STRING_RESULT (eel_self_check_gdk_rgb_to_color (EEL_RGB_COLOR_BLACK), "000000000000");
+    EEL_CHECK_STRING_RESULT (eel_self_check_gdk_rgb_to_color (EEL_RGB_COLOR_WHITE), "FFFFFFFFFFFF");
+    EEL_CHECK_STRING_RESULT (eel_self_check_gdk_rgb_to_color (EEL_RGB_COLOR_PACK (0x01, 0x23, 0x45)), "010123234545");
+
+    /* EEL_RGBA_COLOR_PACK */
+    EEL_CHECK_INTEGER_RESULT (EEL_RGBA_COLOR_PACK (0xFF, 0x00, 0x00, 00), EEL_RGB_COLOR_RED);
+    EEL_CHECK_INTEGER_RESULT (EEL_RGBA_COLOR_PACK (0x00, 0xFF, 0x00, 00), EEL_RGB_COLOR_GREEN);
+    EEL_CHECK_INTEGER_RESULT (EEL_RGBA_COLOR_PACK (0x00, 0x00, 0xFF, 00), EEL_RGB_COLOR_BLUE);
+    EEL_CHECK_INTEGER_RESULT (EEL_RGBA_COLOR_PACK (0xFF, 0xFF, 0xFF, 00), EEL_RGB_COLOR_WHITE);
+    EEL_CHECK_INTEGER_RESULT (EEL_RGBA_COLOR_PACK (0x00, 0x00, 0x00, 00), EEL_RGB_COLOR_BLACK);
+
+    EEL_CHECK_INTEGER_RESULT (EEL_RGBA_COLOR_PACK (0xFF, 0x00, 0x00, 0xFF), EEL_RGBA_COLOR_OPAQUE_RED);
+    EEL_CHECK_INTEGER_RESULT (EEL_RGBA_COLOR_PACK (0x00, 0xFF, 0x00, 0xFF), EEL_RGBA_COLOR_OPAQUE_GREEN);
+    EEL_CHECK_INTEGER_RESULT (EEL_RGBA_COLOR_PACK (0x00, 0x00, 0xFF, 0xFF), EEL_RGBA_COLOR_OPAQUE_BLUE);
+    EEL_CHECK_INTEGER_RESULT (EEL_RGBA_COLOR_PACK (0xFF, 0xFF, 0xFF, 0xFF), EEL_RGBA_COLOR_OPAQUE_WHITE);
+    EEL_CHECK_INTEGER_RESULT (EEL_RGBA_COLOR_PACK (0x00, 0x00, 0x00, 0xFF), EEL_RGBA_COLOR_OPAQUE_BLACK);
+
+    /* EEL_RGB_COLOR_PACK */
+    EEL_CHECK_INTEGER_RESULT (EEL_RGB_COLOR_PACK (0xFF, 0x00, 0x00), EEL_RGBA_COLOR_OPAQUE_RED);
+    EEL_CHECK_INTEGER_RESULT (EEL_RGB_COLOR_PACK (0x00, 0xFF, 0x00), EEL_RGBA_COLOR_OPAQUE_GREEN);
+    EEL_CHECK_INTEGER_RESULT (EEL_RGB_COLOR_PACK (0x00, 0x00, 0xFF), EEL_RGBA_COLOR_OPAQUE_BLUE);
+    EEL_CHECK_INTEGER_RESULT (EEL_RGB_COLOR_PACK (0xFF, 0xFF, 0xFF), EEL_RGBA_COLOR_OPAQUE_WHITE);
+    EEL_CHECK_INTEGER_RESULT (EEL_RGB_COLOR_PACK (0x00, 0x00, 0x00), EEL_RGBA_COLOR_OPAQUE_BLACK);
+
+    /* EEL_RGBA_COLOR_GET_R */
+    EEL_CHECK_INTEGER_RESULT (EEL_RGBA_COLOR_GET_R (EEL_RGBA_COLOR_OPAQUE_RED), 0xFF);
+    EEL_CHECK_INTEGER_RESULT (EEL_RGBA_COLOR_GET_R (EEL_RGBA_COLOR_OPAQUE_GREEN), 0x00);
+    EEL_CHECK_INTEGER_RESULT (EEL_RGBA_COLOR_GET_R (EEL_RGBA_COLOR_OPAQUE_BLUE), 0x00);
+    EEL_CHECK_INTEGER_RESULT (EEL_RGBA_COLOR_GET_R (EEL_RGBA_COLOR_OPAQUE_WHITE), 0xFF);
+    EEL_CHECK_INTEGER_RESULT (EEL_RGBA_COLOR_GET_R (EEL_RGBA_COLOR_OPAQUE_BLACK), 0x00);
+    EEL_CHECK_INTEGER_RESULT (EEL_RGBA_COLOR_GET_R (EEL_RGB_COLOR_RED), 0xFF);
+    EEL_CHECK_INTEGER_RESULT (EEL_RGBA_COLOR_GET_R (EEL_RGB_COLOR_GREEN), 0x00);
+    EEL_CHECK_INTEGER_RESULT (EEL_RGBA_COLOR_GET_R (EEL_RGB_COLOR_BLUE), 0x00);
+    EEL_CHECK_INTEGER_RESULT (EEL_RGBA_COLOR_GET_R (EEL_RGB_COLOR_WHITE), 0xFF);
+    EEL_CHECK_INTEGER_RESULT (EEL_RGBA_COLOR_GET_R (EEL_RGB_COLOR_BLACK), 0x00);
+
+    /* EEL_RGBA_COLOR_GET_G */
+    EEL_CHECK_INTEGER_RESULT (EEL_RGBA_COLOR_GET_G (EEL_RGBA_COLOR_OPAQUE_RED), 0x00);
+    EEL_CHECK_INTEGER_RESULT (EEL_RGBA_COLOR_GET_G (EEL_RGBA_COLOR_OPAQUE_GREEN), 0xFF);
+    EEL_CHECK_INTEGER_RESULT (EEL_RGBA_COLOR_GET_G (EEL_RGBA_COLOR_OPAQUE_BLUE), 0x00);
+    EEL_CHECK_INTEGER_RESULT (EEL_RGBA_COLOR_GET_G (EEL_RGBA_COLOR_OPAQUE_WHITE), 0xFF);
+    EEL_CHECK_INTEGER_RESULT (EEL_RGBA_COLOR_GET_G (EEL_RGBA_COLOR_OPAQUE_BLACK), 0x00);
+    EEL_CHECK_INTEGER_RESULT (EEL_RGBA_COLOR_GET_G (EEL_RGB_COLOR_RED), 0x00);
+    EEL_CHECK_INTEGER_RESULT (EEL_RGBA_COLOR_GET_G (EEL_RGB_COLOR_GREEN), 0xFF);
+    EEL_CHECK_INTEGER_RESULT (EEL_RGBA_COLOR_GET_G (EEL_RGB_COLOR_BLUE), 0x00);
+    EEL_CHECK_INTEGER_RESULT (EEL_RGBA_COLOR_GET_G (EEL_RGB_COLOR_WHITE), 0xFF);
+    EEL_CHECK_INTEGER_RESULT (EEL_RGBA_COLOR_GET_G (EEL_RGB_COLOR_BLACK), 0x00);
+
+    /* EEL_RGBA_COLOR_GET_B */
+    EEL_CHECK_INTEGER_RESULT (EEL_RGBA_COLOR_GET_B (EEL_RGBA_COLOR_OPAQUE_RED), 0x00);
+    EEL_CHECK_INTEGER_RESULT (EEL_RGBA_COLOR_GET_B (EEL_RGBA_COLOR_OPAQUE_GREEN), 0x00);
+    EEL_CHECK_INTEGER_RESULT (EEL_RGBA_COLOR_GET_B (EEL_RGBA_COLOR_OPAQUE_BLUE), 0xFF);
+    EEL_CHECK_INTEGER_RESULT (EEL_RGBA_COLOR_GET_B (EEL_RGBA_COLOR_OPAQUE_WHITE), 0xFF);
+    EEL_CHECK_INTEGER_RESULT (EEL_RGBA_COLOR_GET_B (EEL_RGBA_COLOR_OPAQUE_BLACK), 0x00);
+    EEL_CHECK_INTEGER_RESULT (EEL_RGBA_COLOR_GET_B (EEL_RGB_COLOR_RED), 0x00);
+    EEL_CHECK_INTEGER_RESULT (EEL_RGBA_COLOR_GET_B (EEL_RGB_COLOR_GREEN), 0x00);
+    EEL_CHECK_INTEGER_RESULT (EEL_RGBA_COLOR_GET_B (EEL_RGB_COLOR_BLUE), 0xFF);
+    EEL_CHECK_INTEGER_RESULT (EEL_RGBA_COLOR_GET_B (EEL_RGB_COLOR_WHITE), 0xFF);
+    EEL_CHECK_INTEGER_RESULT (EEL_RGBA_COLOR_GET_B (EEL_RGB_COLOR_BLACK), 0x00);
+
+    /* EEL_RGBA_COLOR_GET_A */
+    EEL_CHECK_INTEGER_RESULT (EEL_RGBA_COLOR_GET_A (EEL_RGBA_COLOR_OPAQUE_RED), 0xFF);
+    EEL_CHECK_INTEGER_RESULT (EEL_RGBA_COLOR_GET_A (EEL_RGBA_COLOR_OPAQUE_GREEN), 0xFF);
+    EEL_CHECK_INTEGER_RESULT (EEL_RGBA_COLOR_GET_A (EEL_RGBA_COLOR_OPAQUE_BLUE), 0xFF);
+    EEL_CHECK_INTEGER_RESULT (EEL_RGBA_COLOR_GET_A (EEL_RGBA_COLOR_OPAQUE_WHITE), 0xFF);
+    EEL_CHECK_INTEGER_RESULT (EEL_RGBA_COLOR_GET_A (EEL_RGBA_COLOR_OPAQUE_BLACK), 0xFF);
+    EEL_CHECK_INTEGER_RESULT (EEL_RGBA_COLOR_GET_A (EEL_RGB_COLOR_RED), 0x00);
+    EEL_CHECK_INTEGER_RESULT (EEL_RGBA_COLOR_GET_A (EEL_RGB_COLOR_GREEN), 0x00);
+    EEL_CHECK_INTEGER_RESULT (EEL_RGBA_COLOR_GET_A (EEL_RGB_COLOR_BLUE), 0x00);
+    EEL_CHECK_INTEGER_RESULT (EEL_RGBA_COLOR_GET_A (EEL_RGB_COLOR_WHITE), 0x00);
+    EEL_CHECK_INTEGER_RESULT (EEL_RGBA_COLOR_GET_A (EEL_RGB_COLOR_BLACK), 0x00);
+
+}
+
+#endif /* ! EEL_OMIT_SELF_CHECK */