Trim trailing white spaces.
[geeqie.git] / src / pixbuf_util.c
index 319a23d..6d4ad5b 100644 (file)
@@ -1,6 +1,7 @@
 /*
- * GQview
+ * Geeqie
  * (C) 2004 John Ellis
+ * Copyright (C) 2008 - 2012 The Geeqie Team
  *
  * Author: John Ellis
  *
  */
 
 
-#include "gqview.h"
+#include "main.h"
 #include "pixbuf_util.h"
+#include "exif.h"
+#include "ui_fileops.h"
 
 #include "icons/icons_inline.h"
 
+#include <math.h>
+
 
 /*
  *-----------------------------------------------------------------------------
  *-----------------------------------------------------------------------------
  */
 
-gboolean pixbuf_to_file_as_png (GdkPixbuf *pixbuf, const char *filename)
+gboolean pixbuf_to_file_as_png(GdkPixbuf *pixbuf, const gchar *filename)
 {
        GError *error = NULL;
-       gint ret;
+       gboolean ret;
 
        if (!pixbuf || !filename) return FALSE;
 
        ret = gdk_pixbuf_save(pixbuf, filename, "png", &error,
-                             "tEXt::Software", "GQview "VERSION, NULL);
+                             "tEXt::Software", GQ_APPNAME " " VERSION, NULL);
 
        if (error)
                {
-               printf("Error saving png file: %s\n", error->message);
+               log_printf("Error saving png file: %s\n", error->message);
                g_error_free(error);
                }
 
@@ -58,7 +63,7 @@ gboolean pixbuf_to_file_as_jpg(GdkPixbuf *pixbuf, const gchar *filename, gint qu
        if (quality == -1) quality = 75;
        if (quality < 1 || quality > 100)
                {
-               printf("Jpeg not saved, invalid quality %d\n", quality);
+               log_printf("Jpeg not saved, invalid quality %d\n", quality);
                return FALSE;
                }
 
@@ -68,7 +73,7 @@ gboolean pixbuf_to_file_as_jpg(GdkPixbuf *pixbuf, const gchar *filename, gint qu
 
        if (error)
                {
-               printf("Error saving jpeg to %s\n%s\n", filename, error->message);
+               log_printf("Error saving jpeg to %s\n%s\n", filename, error->message);
                g_error_free(error);
                }
 
@@ -95,7 +100,14 @@ static PixbufInline inline_pixbuf_data[] = {
        { PIXBUF_INLINE_FOLDER_UP,      folder_up },
        { PIXBUF_INLINE_SCROLLER,       icon_scroller },
        { PIXBUF_INLINE_BROKEN,         icon_broken },
-       { PIXBUF_INLINE_LOGO,           gqview_logo },
+       { PIXBUF_INLINE_ICON,           gqview_icon },
+       { PIXBUF_INLINE_LOGO,           geeqie_logo },
+       { PIXBUF_INLINE_ICON_FLOAT,     icon_float },
+       { PIXBUF_INLINE_ICON_THUMB,     icon_thumb },
+       { PIXBUF_INLINE_ICON_BOOK,      icon_book },
+       { PIXBUF_INLINE_ICON_CONFIG,    icon_config },
+       { PIXBUF_INLINE_ICON_TOOLS,     icon_tools },
+       { PIXBUF_INLINE_ICON_VIEW,      icon_view },
        { NULL, NULL }
 };
 
@@ -115,11 +127,162 @@ GdkPixbuf *pixbuf_inline(const gchar *key)
                i++;
                }
 
-       printf("warning: inline pixbuf key \"%s\" not found.\n", key);
+       log_printf("warning: inline pixbuf key \"%s\" not found.\n", key);
 
        return NULL;
 }
 
+static void register_stock_icon(const gchar *key, GdkPixbuf *pixbuf)
+{
+       static GtkIconFactory *icon_factory = NULL;
+       GtkIconSet *icon_set;
+       
+       if (!icon_factory)
+               {
+               icon_factory = gtk_icon_factory_new();
+               gtk_icon_factory_add_default(icon_factory);
+               }
+       
+       icon_set = gtk_icon_set_new_from_pixbuf(pixbuf);
+       gtk_icon_factory_add(icon_factory, key, icon_set);
+}
+
+
+void pixbuf_inline_register_stock_icons(void)
+{
+       gint i;
+
+       i = 0;
+       while (inline_pixbuf_data[i].key)
+               {
+               register_stock_icon(inline_pixbuf_data[i].key, pixbuf_inline(inline_pixbuf_data[i].key));
+               i++;
+               }
+}
+
+gboolean register_theme_icon_as_stock(const gchar *key, const gchar *icon)
+{
+       GtkIconTheme *icon_theme;
+       GdkPixbuf *pixbuf;
+       GError *error = NULL;
+
+       icon_theme = gtk_icon_theme_get_default();
+       
+       if (gtk_icon_theme_has_icon(icon_theme, key)) return FALSE;
+
+       pixbuf = gtk_icon_theme_load_icon(icon_theme,
+                           icon, /* icon name */
+                           64, /* size */
+                           0,  /* flags */
+                           &error);
+       if (!pixbuf)
+               {
+               if (error)
+                       {
+                       DEBUG_1("Couldn't load icon %s: %s", icon, error->message);
+                       g_error_free(error);
+                       error = NULL;
+                       }
+                       
+               if (strchr(icon, '.'))
+                       {
+                       /* try again without extension */
+                       gchar *icon2 = remove_extension_from_path(icon);
+                       pixbuf = gtk_icon_theme_load_icon(icon_theme,
+                                          icon2, /* icon name */
+                                          64, /* size */
+                                          0,  /* flags */
+                                          &error);
+                       if (error)
+                               {
+                               DEBUG_1("Couldn't load icon %s: %s", icon2, error->message);
+                               g_error_free(error);
+                               }
+                       g_free(icon2);
+                       }
+               }
+
+       if (!pixbuf) return FALSE;
+       
+       register_stock_icon(key, pixbuf);
+       return TRUE;
+}
+
+gboolean pixbuf_scale_aspect(gint req_w, gint req_h,
+                            gint old_w, gint old_h,
+                            gint *new_w, gint *new_h)
+{
+       if (((gdouble)req_w / old_w) < ((gdouble)req_h / old_h))
+               {
+               *new_w = req_w;
+               *new_h = (gdouble)*new_w / old_w * old_h;
+               if (*new_h < 1) *new_h = 1;
+               }
+       else
+               {
+               *new_h = req_h;
+               *new_w = (gdouble)*new_h / old_h * old_w;
+               if (*new_w < 1) *new_w = 1;
+               }
+
+       return (*new_w != old_w || *new_h != old_h);
+}
+
+GdkPixbuf *pixbuf_fallback(FileData *fd, gint requested_width, gint requested_height)
+{
+       GdkPixbuf *pixbuf = pixbuf_inline(PIXBUF_INLINE_BROKEN); /* FIXME use different images according to FORMAT_CLASS */
+       
+       if (requested_width && requested_height)
+               {
+               gint w = gdk_pixbuf_get_width(pixbuf);
+               gint h = gdk_pixbuf_get_height(pixbuf);
+
+               if (w > requested_width || h > requested_height)
+                       {
+                       gint nw, nh;
+
+                       if (pixbuf_scale_aspect(requested_width, requested_height,
+                                                         w, h, &nw, &nh))
+                               {
+                               GdkPixbuf *tmp;
+
+                               tmp = pixbuf;
+                               pixbuf = gdk_pixbuf_scale_simple(tmp, nw, nh, GDK_INTERP_TILES);
+                               g_object_unref(G_OBJECT(tmp));
+                               }
+                       }
+               }
+       return pixbuf;
+}
+
+
+/*
+ *-----------------------------------------------------------------------------
+ * misc utils
+ *-----------------------------------------------------------------------------
+ */
+
+gboolean util_clip_region(gint x, gint y, gint w, gint h,
+                         gint clip_x, gint clip_y, gint clip_w, gint clip_h,
+                         gint *rx, gint *ry, gint *rw, gint *rh)
+{
+       if (clip_x + clip_w <= x ||
+           clip_x >= x + w ||
+           clip_y + clip_h <= y ||
+           clip_y >= y + h)
+               {
+               return FALSE;
+               }
+
+       *rx = MAX(x, clip_x);
+       *rw = MIN((x + w), (clip_x + clip_w)) - *rx;
+
+       *ry = MAX(y, clip_y);
+       *rh = MIN((y + h), (clip_y + clip_h)) - *ry;
+
+       return TRUE;
+}
+
 /*
  *-----------------------------------------------------------------------------
  * pixbuf rotation
@@ -128,7 +291,7 @@ GdkPixbuf *pixbuf_inline(const gchar *key)
 
 static void pixbuf_copy_block_rotate(guchar *src, gint src_row_stride, gint x, gint y,
                                     guchar *dest, gint dest_row_stride, gint w, gint h,
-                                    gint bytes_per_pixel, gint counter_clockwise)
+                                    gint bytes_per_pixel, gboolean counter_clockwise)
 {
        gint i, j;
        guchar *sp;
@@ -153,7 +316,7 @@ static void pixbuf_copy_block_rotate(guchar *src, gint src_row_stride, gint x, g
                        if (bytes_per_pixel == 4) *(dp) = *(sp++);      /* a */
                        }
                }
-       
+
 }
 
 static void pixbuf_copy_block(guchar *src, gint src_row_stride, gint w, gint h,
@@ -178,22 +341,18 @@ static void pixbuf_copy_block(guchar *src, gint src_row_stride, gint w, gint h,
  * Returns a copy of pixbuf src rotated 90 degrees clockwise or 90 counterclockwise
  *
  */
-GdkPixbuf *pixbuf_copy_rotate_90(GdkPixbuf *src, gint counter_clockwise)
+GdkPixbuf *pixbuf_copy_rotate_90(GdkPixbuf *src, gboolean counter_clockwise)
 {
        GdkPixbuf *dest;
-       gint has_alpha;
+       gboolean has_alpha;
        gint sw, sh, srs;
        gint dw, dh, drs;
        guchar *s_pix;
-        guchar *d_pix;
-#if 0
-       guchar *sp;
-        guchar *dp;
-#endif
+       guchar *d_pix;
        gint i, j;
        gint a;
        GdkPixbuf *buffer;
-        guchar *b_pix;
+       guchar *b_pix;
        gint brs;
        gint w, h;
 
@@ -245,7 +404,7 @@ GdkPixbuf *pixbuf_copy_rotate_90(GdkPixbuf *src, gint counter_clockwise)
                        }
                }
 
-       gdk_pixbuf_unref(buffer);
+       g_object_unref(buffer);
 
 #if 0
        /* this is the simple version of rotation (roughly 2-4x slower) */
@@ -280,16 +439,16 @@ GdkPixbuf *pixbuf_copy_rotate_90(GdkPixbuf *src, gint counter_clockwise)
  * TO do a 180 degree rotations set both mirror and flipped TRUE
  * if mirror and flip are FALSE, result is a simple copy.
  */
-GdkPixbuf *pixbuf_copy_mirror(GdkPixbuf *src, gint mirror, gint flip)
+GdkPixbuf *pixbuf_copy_mirror(GdkPixbuf *src, gboolean mirror, gboolean flip)
 {
        GdkPixbuf *dest;
-       gint has_alpha;
+       gboolean has_alpha;
        gint w, h, srs;
        gint drs;
        guchar *s_pix;
-        guchar *d_pix;
+       guchar *d_pix;
        guchar *sp;
-        guchar *dp;
+       guchar *dp;
        gint i, j;
        gint a;
 
@@ -345,10 +504,57 @@ GdkPixbuf *pixbuf_copy_mirror(GdkPixbuf *src, gint mirror, gint flip)
        return dest;
 }
 
+GdkPixbuf *pixbuf_apply_orientation(GdkPixbuf *pixbuf, gint orientation)
+{
+       GdkPixbuf *dest;
+       GdkPixbuf *tmp = NULL;
+       
+       switch (orientation)
+               {
+               case EXIF_ORIENTATION_TOP_LEFT:
+                       dest = gdk_pixbuf_copy(pixbuf);
+                       break;
+               case EXIF_ORIENTATION_TOP_RIGHT:
+                       /* mirrored */
+                       dest = pixbuf_copy_mirror(pixbuf, TRUE, FALSE);
+                       break;
+               case EXIF_ORIENTATION_BOTTOM_RIGHT:
+                       /* upside down */
+                       dest = pixbuf_copy_mirror(pixbuf, TRUE, TRUE);
+                       break;
+               case EXIF_ORIENTATION_BOTTOM_LEFT:
+                       /* flipped */
+                       dest = pixbuf_copy_mirror(pixbuf, FALSE, TRUE);
+                       break;
+               case EXIF_ORIENTATION_LEFT_TOP:
+                       tmp = pixbuf_copy_mirror(pixbuf, FALSE, TRUE);
+                       dest = pixbuf_copy_rotate_90(tmp, FALSE);
+                       break;
+               case EXIF_ORIENTATION_RIGHT_TOP:
+                       /* rotated -90 (270) */
+                       dest = pixbuf_copy_rotate_90(pixbuf, FALSE);
+                       break;
+               case EXIF_ORIENTATION_RIGHT_BOTTOM:
+                       tmp = pixbuf_copy_mirror(pixbuf, FALSE, TRUE);
+                       dest = pixbuf_copy_rotate_90(tmp, TRUE);
+                       break;
+               case EXIF_ORIENTATION_LEFT_BOTTOM:
+                       /* rotated 90 */
+                       dest = pixbuf_copy_rotate_90(pixbuf, TRUE);
+                       break;
+               default:
+                       dest = gdk_pixbuf_copy(pixbuf);
+                       break;
+               }
+       if (tmp) g_object_unref(tmp);
+       return dest;
+
+}
+
 
 /*
  *-----------------------------------------------------------------------------
- * pixbuf drawing
+ * pixbuf drawing (rectangles)
  *-----------------------------------------------------------------------------
  */
 
@@ -361,7 +567,7 @@ void pixbuf_draw_rect_fill(GdkPixbuf *pb,
                           gint x, gint y, gint w, gint h,
                           gint r, gint g, gint b, gint a)
 {
-       gint p_alpha;
+       gboolean has_alpha;
        gint pw, ph, prs;
        guchar *p_pix;
        guchar *pp;
@@ -375,13 +581,13 @@ void pixbuf_draw_rect_fill(GdkPixbuf *pb,
        if (x < 0 || x + w > pw) return;
        if (y < 0 || y + h > ph) return;
 
-       p_alpha = gdk_pixbuf_get_has_alpha(pb);
+       has_alpha = gdk_pixbuf_get_has_alpha(pb);
        prs = gdk_pixbuf_get_rowstride(pb);
        p_pix = gdk_pixbuf_get_pixels(pb);
 
-        for (i = 0; i < h; i++)
+       for (i = 0; i < h; i++)
                {
-               pp = p_pix + (y + i) * prs + (x * (p_alpha ? 4 : 3));
+               pp = p_pix + (y + i) * prs + (x * (has_alpha ? 4 : 3));
                for (j = 0; j < w; j++)
                        {
                        *pp = (r * a + *pp * (256-a)) >> 8;
@@ -390,7 +596,7 @@ void pixbuf_draw_rect_fill(GdkPixbuf *pb,
                        pp++;
                        *pp = (b * a + *pp * (256-a)) >> 8;
                        pp++;
-                       if (p_alpha) pp++;
+                       if (has_alpha) pp++;
                        }
                }
 }
@@ -414,7 +620,7 @@ void pixbuf_set_rect_fill(GdkPixbuf *pb,
                          gint x, gint y, gint w, gint h,
                          gint r, gint g, gint b, gint a)
 {
-       gint p_alpha;
+       gboolean has_alpha;
        gint pw, ph, prs;
        guchar *p_pix;
        guchar *pp;
@@ -428,19 +634,19 @@ void pixbuf_set_rect_fill(GdkPixbuf *pb,
        if (x < 0 || x + w > pw) return;
        if (y < 0 || y + h > ph) return;
 
-       p_alpha = gdk_pixbuf_get_has_alpha(pb);
+       has_alpha = gdk_pixbuf_get_has_alpha(pb);
        prs = gdk_pixbuf_get_rowstride(pb);
        p_pix = gdk_pixbuf_get_pixels(pb);
 
-        for (i = 0; i < h; i++)
+       for (i = 0; i < h; i++)
                {
-               pp = p_pix + (y + i) * prs + (x * (p_alpha ? 4 : 3));
+               pp = p_pix + (y + i) * prs + (x * (has_alpha ? 4 : 3));
                for (j = 0; j < w; j++)
                        {
                        *pp = r; pp++;
                        *pp = g; pp++;
                        *pp = b; pp++;
-                       if (p_alpha) { *pp = a; pp++; }
+                       if (has_alpha) { *pp = a; pp++; }
                        }
                }
 }
@@ -463,18 +669,18 @@ void pixbuf_set_rect(GdkPixbuf *pb,
 void pixbuf_pixel_set(GdkPixbuf *pb, gint x, gint y, gint r, gint g, gint b, gint a)
 {
        guchar *buf;
-       gint has_alpha;
+       gboolean has_alpha;
        gint rowstride;
        guchar *p;
 
        if (x < 0 || x >= gdk_pixbuf_get_width(pb) ||
-            y < 0 || y >= gdk_pixbuf_get_height(pb)) return;
+           y < 0 || y >= gdk_pixbuf_get_height(pb)) return;
 
        buf = gdk_pixbuf_get_pixels(pb);
        has_alpha = gdk_pixbuf_get_has_alpha(pb);
        rowstride = gdk_pixbuf_get_rowstride(pb);
 
-        p = buf + (y * rowstride) + (x * (has_alpha ? 4 : 3));
+       p = buf + (y * rowstride) + (x * (has_alpha ? 4 : 3));
        *p = r; p++;
        *p = g; p++;
        *p = b; p++;
@@ -494,11 +700,11 @@ static void pixbuf_copy_font(GdkPixbuf *src, gint sx, gint sy,
                             guint8 r, guint8 g, guint8 b, guint8 a)
 {
        gint sw, sh, srs;
-       gint s_alpha;
+       gboolean s_alpha;
        gint s_step;
        guchar *s_pix;
        gint dw, dh, drs;
-       gint d_alpha;
+       gboolean d_alpha;
        gint d_step;
        guchar *d_pix;
 
@@ -570,30 +776,35 @@ void pixbuf_draw_layout(GdkPixbuf *pixbuf, PangoLayout *layout, GtkWidget *widge
                        gint x, gint y,
                        guint8 r, guint8 g, guint8 b, guint8 a)
 {
-       GdkPixmap *pixmap;
        GdkPixbuf *buffer;
        gint w, h;
-       GdkGC *gc;
        gint sx, sy;
        gint dw, dh;
-
-       if (!widget || !widget->window) return;
+       cairo_surface_t *source;
+       cairo_t *cr;
 
        pango_layout_get_pixel_size(layout, &w, &h);
-       pixmap = gdk_pixmap_new(widget->window, w, h, -1);
-
-       gc = gdk_gc_new(widget->window);
-       gdk_gc_copy(gc, widget->style->black_gc);
-       gdk_draw_rectangle(pixmap, gc, TRUE, 0, 0, w, h);
-       gdk_gc_copy(gc, widget->style->white_gc);
-       gdk_draw_layout(pixmap, gc, 0, 0, layout);
-       g_object_unref(gc);
-
-       buffer = gdk_pixbuf_new(GDK_COLORSPACE_RGB, FALSE, 8, w, h);
-       gdk_pixbuf_get_from_drawable(buffer, pixmap,
-                                    gdk_drawable_get_colormap(widget->window),
-                                    0, 0, 0, 0, w, h);
-       g_object_unref(pixmap);
+       if (w < 1 || h < 1) return;
+
+       source = cairo_image_surface_create(CAIRO_FORMAT_ARGB32, w, h);
+
+       cr = cairo_create (source);
+       cairo_set_source_rgb(cr, 0, 0, 0);
+       cairo_rectangle (cr, 0, 0, w, h);
+       cairo_fill (cr);
+       cairo_set_source_rgb(cr, 1, 1, 1);
+       pango_cairo_show_layout (cr, layout);
+       cairo_destroy (cr);
+
+       buffer = gdk_pixbuf_new_from_data (cairo_image_surface_get_data (source),
+                                          GDK_COLORSPACE_RGB,
+                                          cairo_image_surface_get_format (source) == CAIRO_FORMAT_ARGB32,
+                                          8,
+                                          cairo_image_surface_get_width (source),
+                                          cairo_image_surface_get_height (source),
+                                          cairo_image_surface_get_stride (source),
+                                          NULL,
+                                          NULL);
 
        sx = 0;
        sy = 0;
@@ -617,10 +828,565 @@ void pixbuf_draw_layout(GdkPixbuf *pixbuf, PangoLayout *layout, GtkWidget *widge
        if (x + w > dw) w = dw - x;
        if (y + h > dh) h = dh - y;
 
-       pixbuf_copy_font(buffer, 0, 0,
+       pixbuf_copy_font(buffer, sx, sy,
                         pixbuf, x, y, w, h,
                         r, g, b, a);
 
        g_object_unref(buffer);
+       cairo_surface_destroy(source);
 }
 
+/*
+ *-----------------------------------------------------------------------------
+ * pixbuf drawing (triangle)
+ *-----------------------------------------------------------------------------
+ */
+
+void util_clip_triangle(gint x1, gint y1, gint x2, gint y2, gint x3, gint y3,
+                       gint *rx, gint *ry, gint *rw, gint *rh)
+{
+       gint tx, ty, tw, th;
+
+       tx = MIN(x1, x2);
+       tx = MIN(tx, x3);
+       ty = MIN(y1, y2);
+       ty = MIN(ty, y3);
+       tw = MAX(abs(x1 - x2), abs(x2 - x3));
+       tw = MAX(tw, abs(x3 - x1));
+       th = MAX(abs(y1 - y2), abs(y2 - y3));
+       th = MAX(th, abs(y3 - y1));
+
+       *rx = tx;
+       *ry = ty;
+       *rw = tw;
+       *rh = th;
+}
+
+void pixbuf_draw_triangle(GdkPixbuf *pb,
+                         gint clip_x, gint clip_y, gint clip_w, gint clip_h,
+                         gint x1, gint y1, gint x2, gint y2, gint x3, gint y3,
+                         guint8 r, guint8 g, guint8 b, guint8 a)
+{
+       gboolean has_alpha;
+       gint pw, ph, prs;
+       gint rx, ry, rw, rh;
+       gint tx, ty, tw, th;
+       gint fx1, fy1;
+       gint fx2, fy2;
+       gint fw, fh;
+       guchar *p_pix;
+       guchar *pp;
+       gint p_step;
+       gdouble slope1, slope2;
+       gint slope1_x, slope1_y;
+       gint y;
+       gint t;
+       gboolean middle = FALSE;
+
+       if (!pb) return;
+
+       pw = gdk_pixbuf_get_width(pb);
+       ph = gdk_pixbuf_get_height(pb);
+
+       if (!util_clip_region(0, 0, pw, ph,
+                             clip_x, clip_y, clip_w, clip_h,
+                             &rx, &ry, &rw, &rh)) return;
+
+       util_clip_triangle(x1, y1, x2, y2, x3, y3,
+                          &tx, &ty, &tw, &th);
+
+       if (!util_clip_region(rx, ry, rw, rh,
+                             tx, ty, tw, th,
+                             &fx1, &fy1, &fw, &fh)) return;
+       fx2 = fx1 + fw;
+       fy2 = fy1 + fh;
+
+       has_alpha = gdk_pixbuf_get_has_alpha(pb);
+       prs = gdk_pixbuf_get_rowstride(pb);
+       p_pix = gdk_pixbuf_get_pixels(pb);
+
+       p_step = (has_alpha) ? 4 : 3;
+
+       if (y1 > y2)
+               {
+               t = x1; x1 = x2; x2 = t;
+               t = y1; y1 = y2; y2 = t;
+               }
+       if (y2 > y3)
+               {
+               t = x2; x2 = x3; x3 = t;
+               t = y2; y2 = y3; y3 = t;
+               }
+       if (y1 > y2)
+               {
+               t = x1; x1 = x2; x2 = t;
+               t = y1; y1 = y2; y2 = t;
+               }
+
+       slope1 = (gdouble)(y2 - y1);
+       if (slope1) slope1 = (gdouble)(x2 - x1) / slope1;
+       slope1_x = x1;
+       slope1_y = y1;
+       slope2 = (gdouble)(y3 - y1);
+       if (slope2) slope2 = (gdouble)(x3 - x1) / slope2;
+
+       for (y = fy1; y < fy2; y++)
+               {
+               gint xa, xb;
+
+               if (!middle && y > y2)
+                       {
+                       slope1 = (gdouble)(y3 - y2);
+                       if (slope1) slope1 = (gdouble)(x3 - x2) / slope1;
+                       slope1_x = x2;
+                       slope1_y = y2;
+
+                       middle = TRUE;
+                       }
+
+               xa = slope1_x + ((gdouble)slope1 * (y - slope1_y) + 0.5);
+               xb = x1 + ((gdouble)slope2 * (y - y1) + 0.5);
+
+               if (xa > xb)
+                       {
+                       t = xa; xa = xb; xb = t;
+                       }
+
+               xa = CLAMP(xa, fx1, fx2);
+               xb = CLAMP(xb, fx1, fx2);
+
+               pp = p_pix + y * prs + xa * p_step;
+
+               while (xa < xb)
+                       {
+                       *pp = (r * a + *pp * (256-a)) >> 8;
+                       pp++;
+                       *pp = (g * a + *pp * (256-a)) >> 8;
+                       pp++;
+                       *pp = (b * a + *pp * (256-a)) >> 8;
+                       pp++;
+                       if (has_alpha) pp++;
+
+                       xa++;
+                       }
+               }
+}
+
+/*
+ *-----------------------------------------------------------------------------
+ * pixbuf drawing (line)
+ *-----------------------------------------------------------------------------
+ */
+
+static gboolean util_clip_line(gdouble clip_x, gdouble clip_y, gdouble clip_w, gdouble clip_h,
+                              gdouble x1, gdouble y1, gdouble x2, gdouble y2,
+                              gdouble *rx1, gdouble *ry1, gdouble *rx2, gdouble *ry2)
+{
+       gboolean flip = FALSE;
+       gdouble d;
+
+       if (x1 > x2)
+               {
+               gdouble t;
+
+               t = x1; x1 = x2; x2 = t;
+               t = y1; y1 = y2; y2 = t;
+               flip = TRUE;
+               }
+
+       if (x2 < clip_x || x1 > clip_x + clip_w) return FALSE;
+
+       if (y1 < y2)
+               {
+               if (y2 < clip_y || y1 > clip_y + clip_h) return FALSE;
+               }
+       else
+               {
+               if (y1 < clip_y || y2 > clip_y + clip_h) return FALSE;
+               }
+
+       d = x2 - x1;
+       if (d > 0.0)
+               {
+               gdouble slope;
+
+               slope = (y2 - y1) / d;
+               if (x1 < clip_x)
+                       {
+                       y1 = y1 + slope * (clip_x - x1);
+                       x1 = clip_x;
+                       }
+               if (x2 > clip_x + clip_w)
+                       {
+                       y2 = y2 + slope * (clip_x + clip_w - x2);
+                       x2 = clip_x + clip_w;
+                       }
+               }
+
+       if (y1 < y2)
+               {
+               if (y2 < clip_y || y1 > clip_y + clip_h) return FALSE;
+               }
+       else
+               {
+               gdouble t;
+
+               if (y1 < clip_y || y2 > clip_y + clip_h) return FALSE;
+
+               t = x1; x1 = x2; x2 = t;
+               t = y1; y1 = y2; y2 = t;
+               flip = !flip;
+               }
+
+       d = y2 - y1;
+       if (d > 0.0)
+               {
+               gdouble slope;
+
+               slope = (x2 - x1) / d;
+               if (y1 < clip_y)
+                       {
+                       x1 = x1 + slope * (clip_y - y1);
+                       y1 = clip_y;
+                       }
+               if (y2 > clip_y + clip_h)
+                       {
+                       x2 = x2 + slope * (clip_y + clip_h - y2);
+                       y2 = clip_y + clip_h;
+                       }
+               }
+
+       if (flip)
+               {
+               *rx1 = x2;
+               *ry1 = y2;
+               *rx2 = x1;
+               *ry2 = y1;
+               }
+       else
+               {
+               *rx1 = x1;
+               *ry1 = y1;
+               *rx2 = x2;
+               *ry2 = y2;
+               }
+
+       return TRUE;
+}
+
+void pixbuf_draw_line(GdkPixbuf *pb,
+                     gint clip_x, gint clip_y, gint clip_w, gint clip_h,
+                     gint x1, gint y1, gint x2, gint y2,
+                     guint8 r, guint8 g, guint8 b, guint8 a)
+{
+       gboolean has_alpha;
+       gint pw, ph, prs;
+       gint rx, ry, rw, rh;
+       gdouble rx1, ry1, rx2, ry2;
+       guchar *p_pix;
+       guchar *pp;
+       gint p_step;
+       gdouble slope;
+       gdouble x, y;
+       gint px, py;
+       gint cx1, cy1, cx2, cy2;
+
+       if (!pb) return;
+
+       pw = gdk_pixbuf_get_width(pb);
+       ph = gdk_pixbuf_get_height(pb);
+
+       if (!util_clip_region(0, 0, pw, ph,
+                             clip_x, clip_y, clip_w, clip_h,
+                             &rx, &ry, &rw, &rh)) return;
+       if (!util_clip_line((gdouble)rx, (gdouble)ry, (gdouble)rw, (gdouble)rh,
+                           (gdouble)x1, (gdouble)y1, (gdouble)x2, (gdouble)y2,
+                           &rx1, &ry1, &rx2, &ry2)) return;
+
+       cx1 = rx;
+       cy1 = ry;
+       cx2 = rx + rw;
+       cy2 = ry + rh;
+
+       has_alpha = gdk_pixbuf_get_has_alpha(pb);
+       prs = gdk_pixbuf_get_rowstride(pb);
+       p_pix = gdk_pixbuf_get_pixels(pb);
+
+       p_step = (has_alpha) ? 4 : 3;
+
+       if (fabs(rx2 - rx1) > fabs(ry2 - ry1))
+               {
+               if (rx1 > rx2)
+                       {
+                       gdouble t;
+                       t = rx1; rx1 = rx2; rx2 = t;
+                       t = ry1; ry1 = ry2; ry2 = t;
+                       }
+
+               slope = rx2 - rx1;
+               if (slope != 0.0) slope = (ry2 - ry1) / slope;
+               for (x = rx1; x < rx2; x += 1.0)
+                       {
+                       px = (gint)(x + 0.5);
+                       py = (gint)(ry1 + (x - rx1) * slope + 0.5);
+
+                       if (px >=  cx1 && px < cx2 && py >= cy1 && py < cy2)
+                               {
+                               pp = p_pix + py * prs + px * p_step;
+                               *pp = (r * a + *pp * (256-a)) >> 8;
+                               pp++;
+                               *pp = (g * a + *pp * (256-a)) >> 8;
+                               pp++;
+                               *pp = (b * a + *pp * (256-a)) >> 8;
+                               }
+                       }
+               }
+       else
+               {
+               if (ry1 > ry2)
+                       {
+                       gdouble t;
+                       t = rx1; rx1 = rx2; rx2 = t;
+                       t = ry1; ry1 = ry2; ry2 = t;
+                       }
+
+               slope = ry2 - ry1;
+               if (slope != 0.0) slope = (rx2 - rx1) / slope;
+               for (y = ry1; y < ry2; y += 1.0)
+                       {
+                       px = (gint)(rx1 + (y - ry1) * slope + 0.5);
+                       py = (gint)(y + 0.5);
+
+                       if (px >=  cx1 && px < cx2 && py >= cy1 && py < cy2)
+                               {
+                               pp = p_pix + py * prs + px * p_step;
+                               *pp = (r * a + *pp * (256-a)) >> 8;
+                               pp++;
+                               *pp = (g * a + *pp * (256-a)) >> 8;
+                               pp++;
+                               *pp = (b * a + *pp * (256-a)) >> 8;
+                               }
+                       }
+               }
+}
+
+/*
+ *-----------------------------------------------------------------------------
+ * pixbuf drawing (fades and shadows)
+ *-----------------------------------------------------------------------------
+ */
+
+static void pixbuf_draw_fade_linear(guchar *p_pix, gint prs, gboolean has_alpha,
+                                   gint s, gboolean vertical, gint border,
+                                   gint x1, gint y1, gint x2, gint y2,
+                                   guint8 r, guint8 g, guint8 b, guint8 a)
+{
+       guchar *pp;
+       gint p_step;
+       guint8 n = a;
+       gint i, j;
+
+       p_step = (has_alpha) ? 4 : 3;
+       for (j = y1; j < y2; j++)
+               {
+               pp = p_pix + j * prs + x1 * p_step;
+               if (!vertical) n = a - a * abs(j - s) / border;
+               for (i = x1; i < x2; i++)
+                       {
+                       if (vertical) n = a - a * abs(i - s) / border;
+                       *pp = (r * n + *pp * (256-n)) >> 8;
+                       pp++;
+                       *pp = (g * n + *pp * (256-n)) >> 8;
+                       pp++;
+                       *pp = (b * n + *pp * (256-n)) >> 8;
+                       pp++;
+                       if (has_alpha) pp++;
+                       }
+               }
+}
+
+static void pixbuf_draw_fade_radius(guchar *p_pix, gint prs, gboolean has_alpha,
+                                   gint sx, gint sy, gint border,
+                                   gint x1, gint y1, gint x2, gint y2,
+                                   guint8 r, guint8 g, guint8 b, guint8 a)
+{
+       guchar *pp;
+       gint p_step;
+       gint i, j;
+
+       p_step = (has_alpha) ? 4 : 3;
+       for (j = y1; j < y2; j++)
+               {
+               pp = p_pix + j * prs + x1 * p_step;
+               for (i = x1; i < x2; i++)
+                       {
+                       guint8 n;
+                       gint r;
+
+                       r = MIN(border, (gint)sqrt((i-sx)*(i-sx) + (j-sy)*(j-sy)));
+                       n = a - a * r / border;
+                       *pp = (r * n + *pp * (256-n)) >> 8;
+                       pp++;
+                       *pp = (g * n + *pp * (256-n)) >> 8;
+                       pp++;
+                       *pp = (b * n + *pp * (256-n)) >> 8;
+                       pp++;
+                       if (has_alpha) pp++;
+                       }
+               }
+}
+
+void pixbuf_draw_shadow(GdkPixbuf *pb,
+                       gint clip_x, gint clip_y, gint clip_w, gint clip_h,
+                       gint x, gint y, gint w, gint h, gint border,
+                       guint8 r, guint8 g, guint8 b, guint8 a)
+{
+       gint has_alpha;
+       gint pw, ph, prs;
+       gint rx, ry, rw, rh;
+       gint fx, fy, fw, fh;
+       guchar *p_pix;
+
+       if (!pb) return;
+
+       pw = gdk_pixbuf_get_width(pb);
+       ph = gdk_pixbuf_get_height(pb);
+
+       if (!util_clip_region(0, 0, pw, ph,
+                             clip_x, clip_y, clip_w, clip_h,
+                             &rx, &ry, &rw, &rh)) return;
+
+       has_alpha = gdk_pixbuf_get_has_alpha(pb);
+       prs = gdk_pixbuf_get_rowstride(pb);
+       p_pix = gdk_pixbuf_get_pixels(pb);
+
+       if (util_clip_region(x + border, y + border, w - border * 2, h - border * 2,
+                            rx, ry, rw, rh,
+                            &fx, &fy, &fw, &fh))
+               {
+               pixbuf_draw_rect_fill(pb, fx, fy, fw, fh, r, g, b, a);
+               }
+
+       if (border < 1) return;
+
+       if (util_clip_region(x, y + border, border, h - border * 2,
+                            rx, ry, rw, rh,
+                            &fx, &fy, &fw, &fh))
+               {
+               pixbuf_draw_fade_linear(p_pix, prs, has_alpha,
+                                       x + border, TRUE, border,
+                                       fx, fy, fx + fw, fy + fh,
+                                       r, g, b, a);
+               }
+       if (util_clip_region(x + w - border, y + border, border, h - border * 2,
+                            rx, ry, rw, rh,
+                            &fx, &fy, &fw, &fh))
+               {
+               pixbuf_draw_fade_linear(p_pix, prs, has_alpha,
+                                       x + w - border, TRUE, border,
+                                       fx, fy, fx + fw, fy + fh,
+                                       r, g, b, a);
+               }
+       if (util_clip_region(x + border, y, w - border * 2, border,
+                            rx, ry, rw, rh,
+                            &fx, &fy, &fw, &fh))
+               {
+               pixbuf_draw_fade_linear(p_pix, prs, has_alpha,
+                                       y + border, FALSE, border,
+                                       fx, fy, fx + fw, fy + fh,
+                                       r, g, b, a);
+               }
+       if (util_clip_region(x + border, y + h - border, w - border * 2, border,
+                            rx, ry, rw, rh,
+                            &fx, &fy, &fw, &fh))
+               {
+               pixbuf_draw_fade_linear(p_pix, prs, has_alpha,
+                                       y + h - border, FALSE, border,
+                                       fx, fy, fx + fw, fy + fh,
+                                       r, g, b, a);
+               }
+       if (util_clip_region(x, y, border, border,
+                            rx, ry, rw, rh,
+                            &fx, &fy, &fw, &fh))
+               {
+               pixbuf_draw_fade_radius(p_pix, prs, has_alpha,
+                                       x + border, y + border, border,
+                                       fx, fy, fx + fw, fy + fh,
+                                       r, g, b, a);
+               }
+       if (util_clip_region(x + w - border, y, border, border,
+                            rx, ry, rw, rh,
+                            &fx, &fy, &fw, &fh))
+               {
+               pixbuf_draw_fade_radius(p_pix, prs, has_alpha,
+                                       x + w - border, y + border, border,
+                                       fx, fy, fx + fw, fy + fh,
+                                       r, g, b, a);
+               }
+       if (util_clip_region(x, y + h - border, border, border,
+                            rx, ry, rw, rh,
+                            &fx, &fy, &fw, &fh))
+               {
+               pixbuf_draw_fade_radius(p_pix, prs, has_alpha,
+                                       x + border, y + h - border, border,
+                                       fx, fy, fx + fw, fy + fh,
+                                       r, g, b, a);
+               }
+       if (util_clip_region(x + w - border, y + h - border, border, border,
+                            rx, ry, rw, rh,
+                            &fx, &fy, &fw, &fh))
+               {
+               pixbuf_draw_fade_radius(p_pix, prs, has_alpha,
+                                       x + w - border, y + h - border, border,
+                                       fx, fy, fx + fw, fy + fh,
+                                       r, g, b, a);
+               }
+}
+
+
+/*
+ *-----------------------------------------------------------------------------
+ * pixbuf color alterations
+ *-----------------------------------------------------------------------------
+ */
+
+void pixbuf_desaturate_rect(GdkPixbuf *pb,
+                           gint x, gint y, gint w, gint h)
+{
+       gboolean has_alpha;
+       gint pw, ph, prs;
+       guchar *p_pix;
+       guchar *pp;
+       gint i, j;
+
+       if (!pb) return;
+
+       pw = gdk_pixbuf_get_width(pb);
+       ph = gdk_pixbuf_get_height(pb);
+
+       if (x < 0 || x + w > pw) return;
+       if (y < 0 || y + h > ph) return;
+
+       has_alpha = gdk_pixbuf_get_has_alpha(pb);
+       prs = gdk_pixbuf_get_rowstride(pb);
+       p_pix = gdk_pixbuf_get_pixels(pb);
+
+       for (i = 0; i < h; i++)
+               {
+               pp = p_pix + (y + i) * prs + (x * (has_alpha ? 4 : 3));
+               for (j = 0; j < w; j++)
+                       {
+                       guint8 grey;
+
+                       grey = (pp[0] + pp[1] + pp[2]) / 3;
+                       *pp = grey;
+                       pp++;
+                       *pp = grey;
+                       pp++;
+                       *pp = grey;
+                       pp++;
+                       if (has_alpha) pp++;
+                       }
+               }
+}
+/* vim: set shiftwidth=8 softtabstop=0 cindent cinoptions={1s: */