+#define _GNU_SOURCE
+
+#include "gdk_imlib.h"
+#include "gdk_imlib_private.h"
+
+void
+gcalc_map_tables(GdkImlibImage * im)
+{
+ int i;
+ double g, b, c, ii, v;
+
+ if (!im)
+ return;
+
+ g = ((double)im->mod.gamma) / 256;
+ b = ((double)im->mod.brightness) / 256;
+ c = ((double)im->mod.contrast) / 256;
+ if (g < 0.01)
+ g = 0.01;
+
+ for (i = 0; i < 256; i++)
+ {
+ ii = ((double)i) / 256;
+ v = ((ii - 0.5) * c) + 0.5 + (b - 1);
+ if (v > 0)
+ v = pow(((ii - 0.5) * c) + 0.5 + (b - 1), 1 / g) * 256;
+ else
+ v = 0;
+ if (v > 255)
+ v = 255;
+ else if (v < 0)
+ v = 0;
+ im->rmap[i] = (unsigned char)v;
+ im->gmap[i] = (unsigned char)v;
+ im->bmap[i] = (unsigned char)v;
+ }
+ g = ((double)im->rmod.gamma) / 256;
+ b = ((double)im->rmod.brightness) / 256;
+ c = ((double)im->rmod.contrast) / 256;
+ if (g < 0.01)
+ g = 0.01;
+
+ for (i = 0; i < 256; i++)
+ {
+ ii = ((double)im->rmap[i]) / 256;
+ v = ((ii - 0.5) * c) + 0.5 + (b - 1);
+ if (v > 0)
+ v = pow(((ii - 0.5) * c) + 0.5 + (b - 1), 1 / g) * 256;
+ else
+ v = 0;
+ if (v > 255)
+ v = 255;
+ else if (v < 0)
+ v = 0;
+ im->rmap[i] = (unsigned char)v;
+ }
+ g = ((double)im->gmod.gamma) / 256;
+ b = ((double)im->gmod.brightness) / 256;
+ c = ((double)im->gmod.contrast) / 256;
+ if (g < 0.01)
+ g = 0.01;
+
+ for (i = 0; i < 256; i++)
+ {
+ ii = ((double)im->gmap[i]) / 256;
+ v = ((ii - 0.5) * c) + 0.5 + (b - 1);
+ if (v > 0)
+ v = pow(((ii - 0.5) * c) + 0.5 + (b - 1), 1 / g) * 256;
+ else
+ v = 0;
+ if (v > 255)
+ v = 255;
+ else if (v < 0)
+ v = 0;
+ im->gmap[i] = (unsigned char)v;
+ }
+ g = ((double)im->bmod.gamma) / 256;
+ b = ((double)im->bmod.brightness) / 256;
+ c = ((double)im->bmod.contrast) / 256;
+ if (g < 0.01)
+ g = 0.01;
+ for (i = 0; i < 256; i++)
+ {
+ ii = ((double)im->bmap[i]) / 256;
+ v = ((ii - 0.5) * c) + 0.5 + (b - 1);
+ if (v > 0)
+ v = pow(((ii - 0.5) * c) + 0.5 + (b - 1), 1 / g) * 256;
+ else
+ v = 0;
+ if (v > 255)
+ v = 255;
+ else if (v < 0)
+ v = 0;
+ im->bmap[i] = (unsigned char)v;
+ }
+ gdirty_pixmaps(im);
+}
+
+gint
+gdk_imlib_load_file_to_pixmap(char *filename, GdkPixmap ** pmap, GdkBitmap ** mask)
+{
+ GdkImlibImage *im;
+
+ im = gdk_imlib_load_image(filename);
+ if (!im)
+ {
+ if (pmap)
+ *pmap = NULL;
+ if (mask)
+ *mask = NULL;
+ return 0;
+ }
+ if (!gdk_imlib_render(im, im->rgb_width, im->rgb_height))
+ {
+ gdk_imlib_destroy_image(im);
+ if (pmap)
+ *pmap = NULL;
+ if (mask)
+ *mask = NULL;
+ return 0;
+ }
+ if (pmap)
+ *pmap = gdk_imlib_move_image(im);
+ if (mask)
+ *mask = gdk_imlib_move_mask(im);
+ gdk_imlib_destroy_image(im);
+ return 1;
+}
+
+void
+gdk_imlib_set_image_modifier(GdkImlibImage * im, GdkImlibColorModifier * mod)
+{
+ if (!im || !mod)
+ return;
+ im->mod.gamma = mod->gamma;
+ im->mod.brightness = mod->brightness;
+ im->mod.contrast = mod->contrast;
+ gcalc_map_tables(im);
+}
+
+void
+gdk_imlib_set_image_red_modifier(GdkImlibImage * im, GdkImlibColorModifier * mod)
+{
+ if (!im || !mod)
+ return;
+ im->rmod.gamma = mod->gamma;
+ im->rmod.brightness = mod->brightness;
+ im->rmod.contrast = mod->contrast;
+ gcalc_map_tables(im);
+}
+
+void
+gdk_imlib_set_image_green_modifier(GdkImlibImage * im, GdkImlibColorModifier * mod)
+{
+ if (!im || !mod)
+ return;
+ im->gmod.gamma = mod->gamma;
+ im->gmod.brightness = mod->brightness;
+ im->gmod.contrast = mod->contrast;
+ gcalc_map_tables(im);
+}
+
+void
+gdk_imlib_set_image_blue_modifier(GdkImlibImage * im, GdkImlibColorModifier * mod)
+{
+ if (!im | !mod)
+ return;
+ im->bmod.gamma = mod->gamma;
+ im->bmod.brightness = mod->brightness;
+ im->bmod.contrast = mod->contrast;
+ gcalc_map_tables(im);
+}
+
+void
+gdk_imlib_get_image_modifier(GdkImlibImage * im, GdkImlibColorModifier * mod)
+{
+ if (!im || !mod)
+ return;
+ mod->gamma = im->mod.gamma;
+ mod->brightness = im->mod.brightness;
+ mod->contrast = im->mod.contrast;
+ gcalc_map_tables(im);
+}
+
+void
+gdk_imlib_get_image_red_modifier(GdkImlibImage * im, GdkImlibColorModifier * mod)
+{
+ if (!im || !mod)
+ return;
+ mod->gamma = im->rmod.gamma;
+ mod->brightness = im->rmod.brightness;
+ mod->contrast = im->rmod.contrast;
+}
+
+void
+gdk_imlib_get_image_green_modifier(GdkImlibImage * im, GdkImlibColorModifier * mod)
+{
+ if (!im || !mod)
+ return;
+ mod->gamma = im->gmod.gamma;
+ mod->brightness = im->gmod.brightness;
+ mod->contrast = im->gmod.contrast;
+}
+
+void
+gdk_imlib_get_image_blue_modifier(GdkImlibImage * im, GdkImlibColorModifier * mod)
+{
+ if (!im || !mod)
+ return;
+ mod->gamma = im->bmod.gamma;
+ mod->brightness = im->bmod.brightness;
+ mod->contrast = im->bmod.contrast;
+}
+
+void
+gdk_imlib_set_image_red_curve(GdkImlibImage * im, unsigned char *mod)
+{
+ int i;
+
+ if (!im || !mod)
+ return;
+ for (i = 0; i < 256; i++)
+ im->rmap[i] = mod[i];
+ gdirty_pixmaps(im);
+ im->mod.contrast = 257;
+}
+
+void
+gdk_imlib_set_image_green_curve(GdkImlibImage * im, unsigned char *mod)
+{
+ int i;
+
+ if (!im || !mod)
+ return;
+ for (i = 0; i < 256; i++)
+ im->gmap[i] = mod[i];
+ gdirty_pixmaps(im);
+ im->mod.contrast = 257;
+}
+
+void
+gdk_imlib_set_image_blue_curve(GdkImlibImage * im, unsigned char *mod)
+{
+ int i;
+
+ if (!im || !mod)
+ return;
+ for (i = 0; i < 256; i++)
+ im->bmap[i] = mod[i];
+ gdirty_pixmaps(im);
+ im->mod.contrast = 257;
+}
+
+void
+gdk_imlib_get_image_red_curve(GdkImlibImage * im, unsigned char *mod)
+{
+ int i;
+
+ if ((!im) || (!mod))
+ return;
+ for (i = 0; i < 256; i++)
+ mod[i] = im->rmap[i];
+}
+
+void
+gdk_imlib_get_image_green_curve(GdkImlibImage * im, unsigned char *mod)
+{
+ int i;
+
+ if (!im || !mod)
+ return;
+ for (i = 0; i < 256; i++)
+ mod[i] = im->gmap[i];
+}
+
+void
+gdk_imlib_get_image_blue_curve(GdkImlibImage * im, unsigned char *mod)
+{
+ int i;
+
+ if (!im || !mod)
+ return;
+ for (i = 0; i < 256; i++)
+ mod[i] = im->bmap[i];
+}
+
+void
+gdk_imlib_apply_modifiers_to_rgb(GdkImlibImage * im)
+{
+ int x, y;
+ unsigned char *ptr;
+
+ if (!im)
+ return;
+ ptr = im->rgb_data;
+ for (y = 0; y < im->rgb_height; y++)
+ {
+ for (x = 0; x < im->rgb_width; x++)
+ {
+ *ptr = im->rmap[*ptr];
+ ptr++;
+ *ptr = im->gmap[*ptr];
+ ptr++;
+ *ptr = im->bmap[*ptr];
+ ptr++;
+ }
+ }
+ im->mod.gamma = 256;
+ im->mod.brightness = 256;
+ im->mod.contrast = 256;
+ im->rmod.gamma = 256;
+ im->rmod.brightness = 256;
+ im->rmod.contrast = 256;
+ im->gmod.gamma = 256;
+ im->gmod.brightness = 256;
+ im->gmod.contrast = 256;
+ im->bmod.gamma = 256;
+ im->bmod.brightness = 256;
+ im->bmod.contrast = 256;
+ gcalc_map_tables(im);
+ gdirty_images(im);
+ gdirty_pixmaps(im);
+}
+
+void
+gdk_imlib_crop_image(GdkImlibImage * im, gint x, gint y, gint w, gint h)
+{
+ unsigned char *data;
+ int xx, yy, w3, w4;
+ unsigned char *ptr1, *ptr2;
+
+ if (!im)
+ return;
+ if (x < 0)
+ {
+ w += x;
+ x = 0;
+ }
+ if (y < 0)
+ {
+ h += y;
+ y = 0;
+ }
+ if (x >= im->rgb_width)
+ return;
+ if (y >= im->rgb_height)
+ return;
+ if (w <= 0)
+ return;
+ if (h <= 0)
+ return;
+ if (x + w > im->rgb_width)
+ w = im->rgb_width - x;
+ if (y + h > im->rgb_height)
+ h = im->rgb_height - y;
+ if (w <= 0)
+ return;
+ if (h <= 0)
+ return;
+
+ w3 = im->rgb_width * 3;
+ w4 = (im->rgb_width - w) * 3;
+ data = malloc(w * h * 3);
+ if (data == NULL)
+ return;
+ ptr1 = im->rgb_data + (y * w3) + (x * 3);
+ ptr2 = data;
+ for (yy = 0; yy < h; yy++)
+ {
+ for (xx = 0; xx < w; xx++)
+ {
+ *ptr2++ = *ptr1++;
+ *ptr2++ = *ptr1++;
+ *ptr2++ = *ptr1++;
+ }
+ ptr1 += w4;
+ }
+ free(im->rgb_data);
+ im->rgb_data = data;
+ if (im->border.left > x)
+ im->border.left = im->border.left - x;
+ else
+ im->border.left = 0;
+ if (im->border.top > y)
+ im->border.top = im->border.top - y;
+ else
+ im->border.top = 0;
+ if (im->rgb_width - im->border.right < x + w)
+ im->border.right = im->border.right - (im->rgb_width - (x + w));
+ else
+ im->border.right = 0;
+ if (im->rgb_height - im->border.bottom < y + h)
+ im->border.bottom = im->border.bottom - (im->rgb_height - (y + h));
+ else
+ im->border.bottom = 0;
+ im->rgb_width = w;
+ im->rgb_height = h;
+ gdirty_images(im);
+ gdirty_pixmaps(im);
+}
+
+void
+gdk_imlib_changed_image(GdkImlibImage * im)
+{
+ if (!im)
+ return;
+ gdirty_images(im);
+ gdirty_pixmaps(im);
+}
+
+void
+gdk_imlib_apply_image(GdkImlibImage * im, GdkWindow * p)
+{
+ GdkPixmap *pp, *mm;
+ int w, h;
+
+ if (!im || !p)
+ return;
+ gdk_window_get_size(p, &w, &h);
+ if (w <= 0 || h <= 0)
+ return;
+ gdk_imlib_render(im, w, h);
+ pp = gdk_imlib_move_image(im);
+ mm = gdk_imlib_move_mask(im);
+ gdk_window_set_back_pixmap(p, pp, 0);
+ if (mm)
+ gdk_window_shape_combine_mask(p, mm, 0, 0);
+ gdk_window_clear(p);
+ gdk_imlib_free_pixmap(pp);
+}
+
+void
+gdk_imlib_paste_image(GdkImlibImage * im, GdkWindow * p, gint x, gint y, gint w, gint h)
+{
+ GdkGC *gc;
+ GdkPixmap *pp, *mm;
+
+ if (!im || !p)
+ return;
+ if ((w <= 0) || (h <= 0))
+ return;
+ gc = gdk_gc_new(p);
+ gdk_imlib_render(im, w, h);
+ pp = gdk_imlib_move_image(im);
+ mm = gdk_imlib_move_mask(im);
+ if (mm)
+ {
+ gdk_gc_set_clip_mask(gc, mm);
+ gdk_gc_set_clip_origin(gc, x, y);
+ }
+ gdk_draw_pixmap(p, gc, pp, 0, 0, x, y, w, h);
+ gdk_imlib_free_pixmap(pp);
+ gdk_gc_destroy(gc);
+}
+
+void
+gdk_imlib_paste_image_border(GdkImlibImage * im, GdkWindow * p, gint x, gint y, gint w, gint h)
+{
+ GdkGC *gc;
+ GdkPixmap *pp, *mm;
+
+ if (!im)
+ return;
+
+ if (w <= 0 || h <= 0)
+ return;
+ gc = gdk_gc_new(p);
+ gdk_imlib_render(im, w, h);
+ pp = gdk_imlib_move_image(im);
+ mm = gdk_imlib_move_mask(im);
+ if (mm)
+ {
+ gdk_gc_set_clip_mask(gc, mm);
+ gdk_gc_set_clip_origin(gc, x, y);
+ }
+ if ((w <= (im->border.left + im->border.right)) ||
+ (h <= (im->border.top + im->border.bottom)))
+ gdk_draw_pixmap(p, gc, pp, 0, 0, x, y, w, h);
+ else
+ {
+ gdk_draw_pixmap(p, gc, pp, 0, 0, x, y, w, im->border.top);
+ gdk_draw_pixmap(p, gc, pp, 0, h - im->border.bottom,
+ x, y + (h - im->border.bottom),
+ w, im->border.bottom);
+ gdk_draw_pixmap(p, gc, pp, 0, im->border.top,
+ x, y + im->border.top,
+ im->border.left, h - (im->border.top + im->border.bottom));
+ gdk_draw_pixmap(p, gc, pp, w - im->border.right, h - im->border.bottom,
+ x + (w - im->border.right), y + (h - im->border.bottom),
+ im->border.right, h - (im->border.top + im->border.bottom));
+ }
+ gdk_imlib_free_pixmap(pp);
+ gdk_gc_destroy(gc);
+}
+
+void
+gdk_imlib_flip_image_horizontal(GdkImlibImage * im)
+{
+ unsigned char *ptr1, *ptr2, r, rr;
+ int x, y;
+ int w3;
+
+ if (!im)
+ return;
+ w3 = im->rgb_width * 3;
+ for (y = 0; y < im->rgb_height; y++)
+ {
+ ptr1 = im->rgb_data + (y * w3);
+ ptr2 = im->rgb_data + (y * w3) + w3 - 3;
+ for (x = 0; x < im->rgb_width >> 1; x++)
+ {
+ r = *ptr1;
+ rr = *ptr2;
+ *ptr2++ = r;
+ *ptr1++ = rr;
+
+ r = *ptr1;
+ rr = *ptr2;
+ *ptr2++ = r;
+ *ptr1++ = rr;
+
+ r = *ptr1;
+ rr = *ptr2;
+ *ptr2 = r;
+ *ptr1++ = rr;
+
+ ptr2 -= 5;
+ }
+ }
+ w3 = im->border.left;
+ im->border.left = im->border.right;
+ im->border.right = w3;
+ gdirty_images(im);
+ gdirty_pixmaps(im);
+}
+
+void
+gdk_imlib_flip_image_vertical(GdkImlibImage * im)
+{
+ unsigned char *ptr1, *ptr2, r, rr;
+ int x, y, yy;
+ int w3;
+
+ if (!im)
+ return;
+
+ w3 = im->rgb_width * 3;
+ for (yy = im->rgb_height - 1, y = 0; y < im->rgb_height >> 1; y++, yy--)
+ {
+ ptr1 = im->rgb_data + (y * w3);
+ ptr2 = im->rgb_data + (yy * w3);
+ for (x = 0; x < im->rgb_width; x++)
+ {
+ r = *ptr1;
+ rr = *ptr2;
+ *ptr2++ = r;
+ *ptr1++ = rr;
+ r = *ptr1;
+ rr = *ptr2;
+ *ptr2++ = r;
+ *ptr1++ = rr;
+ r = *ptr1;
+ rr = *ptr2;
+ *ptr2++ = r;
+ *ptr1++ = rr;
+ }
+ }
+ w3 = im->border.top;
+ im->border.top = im->border.bottom;
+ im->border.bottom = w3;
+ gdirty_images(im);
+ gdirty_pixmaps(im);
+}
+
+void
+gdk_imlib_rotate_image(GdkImlibImage * im, gint d)
+{
+ unsigned char *data;
+ int x, y, w3, w4;
+ unsigned char *ptr1, *ptr2;
+
+ if (!im)
+ return;
+ w3 = im->rgb_width * 3;
+ w4 = im->rgb_height * 3;
+
+ data = malloc(im->rgb_width * im->rgb_height * 3);
+ if (data == NULL)
+ return;
+
+ for (y = 0; y < im->rgb_height; y++)
+ {
+ ptr1 = im->rgb_data + (y * w3);
+ ptr2 = data + (y * 3);
+ for (x = 0; x < im->rgb_width; x++)
+ {
+ *ptr2++ = *ptr1++;
+ *ptr2++ = *ptr1++;
+ *ptr2 = *ptr1++;
+ ptr2 += w4 - 2;
+ }
+ }
+ free(im->rgb_data);
+ im->rgb_data = data;
+ w3 = im->rgb_width;
+ im->rgb_width = im->rgb_height;
+ im->rgb_height = w3;
+ w3 = im->border.top;
+ im->border.top = im->border.left;
+ im->border.left = w3;
+ w3 = im->border.bottom;
+ im->border.bottom = im->border.right;
+ im->border.right = w3;
+ gdirty_images(im);
+ gdirty_pixmaps(im);
+}
+
+GdkImlibImage *
+gdk_imlib_create_image_from_data(unsigned char *data, unsigned char *alpha, gint w, gint h)
+{
+ GdkImlibImage *im;
+ char s[128];
+
+ if (!data || w <= 0 || h <= 0)
+ return NULL;
+
+ im = malloc(sizeof(GdkImlibImage));
+ if (!im)
+ return NULL;
+
+ im->rgb_width = w;
+ im->rgb_height = h;
+ im->rgb_data = malloc(im->rgb_width * im->rgb_height * 3);
+ if (!im->rgb_data)
+ {
+ free(im);
+ return NULL;
+ }
+
+ memcpy(im->rgb_data, data, im->rgb_width * im->rgb_height * 3);
+/* im->alpha_data=alpha; */
+ im->alpha_data = NULL;
+ g_snprintf(s, sizeof(s), "creat_%x_%x", (int)time(NULL), (int)rand());
+ im->filename = malloc(strlen(s) + 1);
+ if (im->filename)
+ strcpy(im->filename, s);
+ im->width = 0;
+ im->height = 0;
+ im->shape_color.r = -1;
+ im->shape_color.g = -1;
+ im->shape_color.b = -1;
+ im->border.left = 0;
+ im->border.right = 0;
+ im->border.top = 0;
+ im->border.bottom = 0;
+ im->pixmap = NULL;
+ im->shape_mask = NULL;
+ im->cache = 1;
+ im->mod.gamma = id->mod.gamma;
+ im->mod.brightness = id->mod.brightness;
+ im->mod.contrast = id->mod.contrast;
+ im->rmod.gamma = id->rmod.gamma;
+ im->rmod.brightness = id->rmod.brightness;
+ im->rmod.contrast = id->rmod.contrast;
+ im->gmod.gamma = id->gmod.gamma;
+ im->gmod.brightness = id->gmod.brightness;
+ im->gmod.contrast = id->gmod.contrast;
+ im->bmod.gamma = id->bmod.gamma;
+ im->bmod.brightness = id->bmod.brightness;
+ im->bmod.contrast = id->bmod.contrast;
+ if (id->cache.on_image)
+ gadd_image(im, im->filename);
+ gcalc_map_tables(im);
+ return im;
+}
+
+GdkImlibImage *
+gdk_imlib_clone_image(GdkImlibImage * im)
+{
+ GdkImlibImage *im2;
+ char *s;
+
+ if (!im)
+ return NULL;
+ im2 = malloc(sizeof(GdkImlibImage));
+ if (!im2)
+ return NULL;
+ im2->rgb_width = im->rgb_width;
+ im2->rgb_height = im->rgb_height;
+ im2->rgb_data = malloc(im2->rgb_width * im2->rgb_height * 3);
+ if (!im2->rgb_data)
+ {
+ free(im2);
+ return NULL;
+ }
+
+ memcpy(im2->rgb_data, im->rgb_data, im2->rgb_width * im2->rgb_height * 3);
+ if (im->alpha_data)
+ {
+ im2->alpha_data = malloc(im2->rgb_width * im2->rgb_height);
+ if (!im2->alpha_data)
+ {
+ free(im2->rgb_data);
+ free(im2);
+ return NULL;
+ }
+ memcpy(im2->alpha_data, im->alpha_data, im2->rgb_width * im2->rgb_height);
+ }
+ else
+ im2->alpha_data = NULL;
+ s = malloc(strlen(im->filename) + 320);
+ if (s)
+ {
+ g_snprintf(s, sizeof(s), "%s_%x_%x", im->filename, (int)time(NULL), (int)rand());
+ im2->filename = malloc(strlen(s) + 1);
+ if (im2->filename)
+ strcpy(im2->filename, s);
+ free(s);
+ }
+ else
+ im2->filename = NULL;
+ im2->width = 0;
+ im2->height = 0;
+ im2->shape_color.r = im->shape_color.r;
+ im2->shape_color.g = im->shape_color.g;
+ im2->shape_color.b = im->shape_color.b;
+ im2->border.left = im->border.left;
+ im2->border.right = im->border.right;
+ im2->border.top = im->border.top;
+ im2->border.bottom = im->border.bottom;
+ im2->pixmap = NULL;
+ im2->shape_mask = NULL;
+ im2->cache = 1;
+ im2->mod.gamma = im->mod.gamma;
+ im2->mod.brightness = im->mod.brightness;
+ im2->mod.contrast = im->mod.contrast;
+ im2->rmod.gamma = im->rmod.gamma;
+ im2->rmod.brightness = im->rmod.brightness;
+ im2->rmod.contrast = im->rmod.contrast;
+ im2->gmod.gamma = im->gmod.gamma;
+ im2->gmod.brightness = im->gmod.brightness;
+ im2->gmod.contrast = im->gmod.contrast;
+ im2->bmod.gamma = im->bmod.gamma;
+ im2->bmod.brightness = im->bmod.brightness;
+ im2->bmod.contrast = im->bmod.contrast;
+ gcalc_map_tables(im2);
+ if (id->cache.on_image)
+ gadd_image(im2, im2->filename);
+ return im2;
+}
+
+GdkImlibImage *
+gdk_imlib_clone_scaled_image(GdkImlibImage * im, int w, int h)
+{
+ GdkImlibImage *im2;
+ char *s;
+
+ if (!im || w <= 0 || h <= 0)
+ return NULL;
+
+ im2 = malloc(sizeof(GdkImlibImage));
+ if (!im2)
+ return NULL;
+ im2->rgb_width = w;
+ im2->rgb_height = h;
+ im2->rgb_data = malloc(w * h * 3);
+ if (!im2->rgb_data)
+ {
+ free(im2);
+ return NULL;
+ }
+ {
+ int x, y, *xarray;
+ unsigned char **yarray, *ptr, *ptr2, *ptr22;
+ int l, r, m, pos, inc, w3;
+
+ xarray = malloc(sizeof(int) * w);
+
+ if (!xarray)
+ {
+ fprintf(stderr, "ERROR: Cannot allocate X co-ord buffer\n");
+ free(im2->rgb_data);
+ free(im2);
+ return NULL;
+ }
+ yarray = malloc(sizeof(unsigned char *) * h);
+
+ if (!yarray)
+ {
+ fprintf(stderr, "ERROR: Cannot allocate Y co-ord buffer\n");
+ free(xarray);
+ free(im2->rgb_data);
+ free(im2);
+ return NULL;
+ }
+ ptr22 = im->rgb_data;
+ w3 = im->rgb_width * 3;
+ inc = 0;
+ if (w < im->border.left + im->border.right)
+ {
+ l = w >> 1;
+ r = w - l;
+ m = 0;
+ }
+ else
+ {
+ l = im->border.left;
+ r = im->border.right;
+ m = w - l - r;
+ }
+ if (m > 0)
+ inc = ((im->rgb_width - im->border.left - im->border.right) << 16) / m;
+ pos = 0;
+ if (l)
+ {
+ for (x = 0; x < l; x++)
+ {
+ xarray[x] = (pos >> 16) + (pos >> 16) + (pos >> 16);
+ pos += 0x10000;
+ }
+ }
+ if (m)
+ {
+ for (x = l; x < l + m; x++)
+ {
+ xarray[x] = (pos >> 16) + (pos >> 16) + (pos >> 16);
+ pos += inc;
+ }
+ }
+ pos = (im->rgb_width - r) << 16;
+ for (x = w - r; x < w; x++)
+ {
+ xarray[x] = (pos >> 16) + (pos >> 16) + (pos >> 16);
+ pos += 0x10000;
+ }
+
+ if (h < im->border.top + im->border.bottom)
+ {
+ l = h >> 1;
+ r = h - l;
+ m = 0;
+ }
+ else
+ {
+ l = im->border.top;
+ r = im->border.bottom;
+ m = h - l - r;
+ }
+ if (m > 0)
+ inc = ((im->rgb_height - im->border.top - im->border.bottom) << 16) / m;
+ pos = 0;
+ for (x = 0; x < l; x++)
+ {
+ yarray[x] = ptr22 + ((pos >> 16) * w3);
+ pos += 0x10000;
+ }
+ if (m)
+ {
+ for (x = l; x < l + m; x++)
+ {
+ yarray[x] = ptr22 + ((pos >> 16) * w3);
+ pos += inc;
+ }
+ }
+ pos = (im->rgb_height - r) << 16;
+ for (x = h - r; x < h; x++)
+ {
+ yarray[x] = ptr22 + ((pos >> 16) * w3);
+ pos += 0x10000;
+ }
+
+ ptr = im2->rgb_data;
+ for (y = 0; y < h; y++)
+ {
+ for (x = 0; x < w; x++)
+ {
+ ptr2 = yarray[y] + xarray[x];
+ *ptr++ = (int)*ptr2++;
+ *ptr++ = (int)*ptr2++;
+ *ptr++ = (int)*ptr2;
+ }
+ }
+ }
+ if (im->alpha_data)
+ {
+ im2->alpha_data = NULL;
+ /* yet to be filled in */
+ }
+ else
+ im2->alpha_data = NULL;
+
+ s = malloc(strlen(im->filename) + 320);
+ if (s)
+ {
+ g_snprintf(s, sizeof(s), "%s_%x_%x_%x_%x", im->filename, (int)time(NULL), w, h, (int)rand());
+ im2->filename = malloc(strlen(s) + 1);
+ if (im2->filename)
+ strcpy(im2->filename, s);
+ free(s);
+ }
+ else
+ im2->filename = NULL;
+ im2->width = 0;
+ im2->height = 0;
+ im2->shape_color.r = im->shape_color.r;
+ im2->shape_color.g = im->shape_color.g;
+ im2->shape_color.b = im->shape_color.b;
+ im2->border.left = im->border.left;
+ im2->border.right = im->border.right;
+ im2->border.top = im->border.top;
+ im2->border.bottom = im->border.bottom;
+ im2->pixmap = NULL;
+ im2->shape_mask = NULL;
+ im2->cache = 1;
+ im2->mod.gamma = im->mod.gamma;
+ im2->mod.brightness = im->mod.brightness;
+ im2->mod.contrast = im->mod.contrast;
+ im2->rmod.gamma = im->rmod.gamma;
+ im2->rmod.brightness = im->rmod.brightness;
+ im2->rmod.contrast = im->rmod.contrast;
+ im2->gmod.gamma = im->gmod.gamma;
+ im2->gmod.brightness = im->gmod.brightness;
+ im2->gmod.contrast = im->gmod.contrast;
+ im2->bmod.gamma = im->bmod.gamma;
+ im2->bmod.brightness = im->bmod.brightness;
+ im2->bmod.contrast = im->bmod.contrast;
+ gcalc_map_tables(im2);
+ if (id->cache.on_image)
+ gadd_image(im2, im2->filename);
+ return im2;
+}
+
+GdkImlibImage *
+gdk_imlib_create_image_from_xpm_data(char **data)
+{
+ GdkImlibImage *im;
+ unsigned char *ptr;
+ int pc, c, i, j, k, ncolors, cpp, comment, transp, quote,
+ context, len, count, done;
+ int w, h;
+ char *line, s[65536], tok[65536], col[65536];
+ XColor xcol;
+ struct _cmap
+ {
+ char str[8];
+ char transp;
+ int r, g, b;
+ }
+ *cmap;
+ int lookup[128][128];
+
+ if (!data)
+ return NULL;
+ im = malloc(sizeof(GdkImlibImage));
+ if (!im)
+ return NULL;
+ count = 0;
+ transp = 0;
+ done = 0;
+
+ c = ' ';
+ comment = 0;
+ quote = 0;
+ context = 0;
+ ptr = NULL;
+
+ while (!done)
+ {
+ line = data[count++];
+ if (context == 0)
+ {
+ /* Header */
+ sscanf(line, "%i %i %i %i", &w, &h, &ncolors, &cpp);
+ if (cpp > 7)
+ {
+ fprintf(stderr, "gdk_imlib ERROR: XPM data with characters per pixel > 7 not supported\n");
+ free(im);
+ return NULL;
+ }
+ if (w > 32767)
+ {
+ fprintf(stderr, "gdk_imlib ERROR: Image width > 32767 pixels for data\n");
+ free(im);
+ return NULL;
+ }
+ if (h > 32767)
+ {
+ fprintf(stderr, "gdk_imlib ERROR: Image height > 32767 pixels for data\n");
+ free(im);
+ return NULL;
+ }
+ cmap = malloc(sizeof(struct _cmap) * ncolors);
+
+ if (!cmap)
+ {
+ free(im);
+ return NULL;
+ }
+ im->rgb_width = w;
+ im->rgb_height = h;
+ im->rgb_data = malloc(im->rgb_width * im->rgb_height * 3);
+ if (!im->rgb_data)
+ {
+ free(cmap);
+ free(im);
+ return NULL;
+ }
+ im->alpha_data = NULL;
+ g_snprintf(s, sizeof(s), "creat_%x_%x", (int)time(NULL), (int)rand());
+ im->filename = malloc(strlen(s) + 1);
+ if (im->filename)
+ strcpy(im->filename, s);
+ im->width = 0;
+ im->height = 0;
+ im->border.left = 0;
+ im->border.right = 0;
+ im->border.top = 0;
+ im->border.bottom = 0;
+ im->pixmap = NULL;
+ im->shape_mask = NULL;
+ im->cache = 1;
+ im->mod.gamma = id->mod.gamma;
+ im->mod.brightness = id->mod.brightness;
+ im->mod.contrast = id->mod.contrast;
+ im->rmod.gamma = id->rmod.gamma;
+ im->rmod.brightness = id->rmod.brightness;
+ im->rmod.contrast = id->rmod.contrast;
+ im->gmod.gamma = id->gmod.gamma;
+ im->gmod.brightness = id->gmod.brightness;
+ im->gmod.contrast = id->gmod.contrast;
+ im->bmod.gamma = id->bmod.gamma;
+ im->bmod.brightness = id->bmod.brightness;
+ im->bmod.contrast = id->bmod.contrast;
+ ptr = im->rgb_data;
+ j = 0;
+ context++;
+ }
+ else if (context == 1)
+ {
+ int colptr;
+
+ /* Color Table */
+ if (j < ncolors)
+ {
+ tok[0] = 0;
+ col[0] = 0;
+ s[0] = 0;
+ colptr = 0;
+ len = strlen(line);
+ strncpy(cmap[j].str, line, cpp);
+ cmap[j].str[cpp] = 0;
+ cmap[j].r = -1;
+ cmap[j].transp = 0;
+ for (k = cpp; k < len; k++)
+ {
+ if (line[k] != ' ')
+ {
+ sscanf(&line[k], "%65536s", s);
+ k += strlen(s);
+ if ((!strcmp(s, "m")) || (!strcmp(s, "s")) ||
+ (!strcmp(s, "g4")) || (!strcmp(s, "g")) ||
+ (!strcmp(s, "c")) || (k >= len))
+ {
+ if (k >= len)
+ {
+ int ls;
+
+ ls = strlen(s);
+
+ if (col[0] && colptr < sizeof(col))
+ {
+ strcpy(col + colptr, " ");
+ colptr++;
+ }
+ if (colptr + ls <= sizeof(col))
+ {
+ strcpy(col + colptr, s);
+ colptr += ls;
+ }
+
+ }
+ if (col[0])
+ {
+ if (!strcasecmp(col, "none"))
+ {
+ transp = 1;
+ cmap[j].transp = 1;
+ }
+ else
+ {
+ if ((cmap[j].r < 0) ||
+ (!strcmp(tok, "c")))
+ {
+ XParseColor(id->x.disp,
+ id->x.root_cmap,
+ col, &xcol);
+ cmap[j].r = xcol.red >> 8;
+ cmap[j].g = xcol.green >> 8;
+ cmap[j].b = xcol.blue >> 8;
+ if ((cmap[j].r == 255) &&
+ (cmap[j].g == 0) &&
+ (cmap[j].b == 255))
+ cmap[j].r = 254;
+ }
+ }
+ }
+ if (strlen(s) < sizeof(tok))
+ strcpy(tok, s);
+ col[0] = 0;
+ }
+ else
+ {
+ int ls;
+
+ ls = strlen(s);
+
+ if (col[0] && colptr < sizeof(col))
+ {
+ strcpy(col + colptr, " ");
+ colptr++;
+ }
+ if (ls + colptr < sizeof(col))
+ {
+ strcpy(col + colptr, s);
+ colptr += ls;
+ }
+ }
+ }
+ }
+ }
+ j++;
+ if (j >= ncolors)
+ {
+ if (cpp == 1)
+ for (i = 0; i < ncolors; i++)
+ lookup[cmap[i].str[0]][cmap[i].str[1]] = i;
+ if (cpp == 2)
+ for (i = 0; i < ncolors; i++)
+ lookup[cmap[i].str[0]][cmap[i].str[1]] = i;
+ context++;
+ }
+ }
+ else
+ {
+ /* Image Data */
+ i = 0;
+ if (cpp == 0)
+ {
+ }
+ else if (cpp == 1)
+ {
+ if (transp)
+ {
+ for (i = 0; ((i < 65536) && (line[i])); i++)
+ {
+ col[0] = line[i];
+ if (cmap[lookup[col[0]][0]].transp)
+ {
+ *ptr++ = 255;
+ *ptr++ = 0;
+ *ptr++ = 255;
+ }
+ else
+ {
+ *ptr++ = (unsigned char)cmap[lookup[col[0]][0]].r;
+ *ptr++ = (unsigned char)cmap[lookup[col[0]][0]].g;
+ *ptr++ = (unsigned char)cmap[lookup[col[0]][0]].b;
+ }
+ }
+ }
+ else
+ {
+ for (i = 0; ((i < 65536) && (line[i])); i++)
+ {
+ col[0] = line[i];
+ *ptr++ = (unsigned char)cmap[lookup[col[0]][0]].r;
+ *ptr++ = (unsigned char)cmap[lookup[col[0]][0]].g;
+ *ptr++ = (unsigned char)cmap[lookup[col[0]][0]].b;
+ }
+ }
+ }
+ else if (cpp == 2)
+ {
+ if (transp)
+ {
+ for (i = 0; ((i < 65536) && (line[i])); i++)
+ {
+ col[0] = line[i++];
+ col[1] = line[i];
+ if (cmap[lookup[col[0]][col[1]]].transp)
+ {
+ *ptr++ = 255;
+ *ptr++ = 0;
+ *ptr++ = 255;
+ }
+ else
+ {
+ *ptr++ = (unsigned char)cmap[lookup[col[0]][col[1]]].r;
+ *ptr++ = (unsigned char)cmap[lookup[col[0]][col[1]]].g;
+ *ptr++ = (unsigned char)cmap[lookup[col[0]][col[1]]].b;
+ }
+ }
+ }
+ else
+ {
+ for (i = 0; ((i < 65536) && (line[i])); i++)
+ {
+ col[0] = line[i++];
+ col[1] = line[i];
+ *ptr++ = (unsigned char)cmap[lookup[col[0]][col[1]]].r;
+ *ptr++ = (unsigned char)cmap[lookup[col[0]][col[1]]].g;
+ *ptr++ = (unsigned char)cmap[lookup[col[0]][col[1]]].b;
+ }
+ }
+ }
+ else
+ {
+ if (transp)
+ {
+ for (i = 0; ((i < 65536) && (line[i])); i++)
+ {
+ for (j = 0; j < cpp; j++, i++)
+ {
+ col[j] = line[i];
+ }
+ col[j] = 0;
+ i--;
+ for (j = 0; j < ncolors; j++)
+ {
+ if (!strcmp(col, cmap[j].str))
+ {
+ if (cmap[j].transp)
+ {
+ *ptr++ = 255;
+ *ptr++ = 0;
+ *ptr++ = 255;
+ }
+ else
+ {
+ *ptr++ = (unsigned char)cmap[j].r;
+ *ptr++ = (unsigned char)cmap[j].g;
+ *ptr++ = (unsigned char)cmap[j].b;
+ }
+ j = ncolors;
+ }
+ }
+ }
+ }
+ else
+ {
+ for (i = 0; ((i < 65536) && (line[i])); i++)
+ {
+ for (j = 0; j < cpp; j++, i++)
+ {
+ col[j] = line[i];
+ }
+ col[j] = 0;
+ i--;
+ for (j = 0; j < ncolors; j++)
+ {
+ if (!strcmp(col, cmap[j].str))
+ {
+ *ptr++ = (unsigned char)cmap[j].r;
+ *ptr++ = (unsigned char)cmap[j].g;
+ *ptr++ = (unsigned char)cmap[j].b;
+ j = ncolors;
+ }
+ }
+ }
+ }
+ }
+ }
+ if ((ptr) && ((ptr - im->rgb_data) >= w * h * 3))
+ done = 1;
+ }
+ if (!transp)
+ {
+ im->shape_color.r = -1;
+ im->shape_color.g = -1;
+ im->shape_color.b = -1;
+ }
+ else
+ {
+ im->shape_color.r = 255;
+ im->shape_color.g = 0;
+ im->shape_color.b = 255;
+ }
+ if (id->cache.on_image)
+ gadd_image(im, im->filename);
+ gcalc_map_tables(im);
+ free(cmap);
+ return im;
+}
+
+gint
+gdk_imlib_data_to_pixmap(char **data, GdkPixmap ** pmap, GdkBitmap ** mask)
+{
+ GdkImlibImage *im;
+
+ im = gdk_imlib_create_image_from_xpm_data(data);
+ if (!im)
+ {
+ if (pmap)
+ *pmap = NULL;
+ if (mask)
+ *mask = NULL;
+ return 0;
+ }
+ if (!gdk_imlib_render(im, im->rgb_width, im->rgb_height))
+ {
+ gdk_imlib_destroy_image(im);
+ if (pmap)
+ *pmap = NULL;
+ if (mask)
+ *mask = NULL;
+ return 0;
+ }
+ if (pmap)
+ *pmap = gdk_imlib_move_image(im);
+ if (mask)
+ *mask = gdk_imlib_move_mask(im);
+ gdk_imlib_kill_image(im);
+ return 1;
+}
+
+#include <signal.h>
+#include <sys/wait.h>
+
+/*
+ * Helper library
+ */
+
+static int hpid;
+void *oldpiper; /* actually sighandler_t but BSD uses sig_t. */
+
+FILE *
+open_helper(const char *instring, const char *fn, const char *mode)
+{
+ char buf[256]; /* This is safe since our input strings
+
+ *
+ * * are bounded */
+ static char *vec[16];
+ char *p = strdup(instring);
+ char *pp;
+ char *ep;
+ int vn = 0;
+ int pid;
+ FILE *fp = NULL;
+ char *ofil = NULL;
+ int ofd = -1;
+
+ int pfd[2];
+
+ if (p == NULL)
+ return NULL;
+
+ if (strncmp(instring, "%Q", 2) == 0)
+ {
+ /*
+ * Generate a quanting pipeline
+ */
+ fprintf(stderr, "Not currently supported: install ImageMagic.\n");
+ return NULL;
+ }
+ /*
+ * Ok split the instring on spaces and translate
+ * %C %P %F and %s
+ *
+ * FIXME: We need to handle a format string that begins
+ * %Q to indicate an 8bit quant in the pipeline first.
+ */
+
+ pp = p;
+
+ while (vn < 15)
+ {
+ while (*pp && isspace(*pp))
+ pp++;
+ ep = pp;
+ while (*ep && !isspace(*ep))
+ ep++;
+ if (*pp == 0)
+ break;
+ /* pp->ep is now the input string block */
+ if (*ep)
+ *ep++ = 0;
+
+ if (strcmp(pp, "%s") == 0)
+ vec[vn] = strdup(fn);
+ else if (strncmp(pp, "%P/", 3) == 0)
+ {
+ strcpy(buf, NETPBM_PATH);
+ strcat(buf, pp + 2);
+ if ((vec[vn] = strdup(buf)) == NULL)
+ break;
+ }
+ else if (strncmp(pp, "%J", 3) == 0)
+ {
+ if ((vec[vn] = strdup(DJPEG_PROG)) == NULL)
+ break;
+ }
+ else if (strncmp(pp, "%H", 3) == 0)
+ {
+ if ((vec[vn] = strdup(CJPEG_PROG)) == NULL)
+ break;
+ }
+ else if (strncmp(pp, "%C/", 3) == 0)
+ {
+ strcpy(buf, CONVERT_PATH);
+ strcat(buf, pp + 2);
+ if ((vec[vn] = strdup(buf)) == NULL)
+ break;
+ }
+ else if (strncmp(pp, ">%s", 3) == 0)
+ {
+ ofil = pp;
+ vn++;
+ pp = ep;
+ continue;
+ }
+ else
+ {
+ if ((vec[vn] = strdup(pp)) == NULL)
+ break;
+ }
+ vn++;
+ pp = ep;
+ }
+
+ vec[vn] = NULL;
+
+ if (pipe(pfd) == -1)
+ goto oops;
+
+ if (*mode == 'r')
+ {
+ fp = fdopen(pfd[0], "r");
+ if (fp == NULL)
+ goto oops;
+ }
+ else if (*mode == 'w')
+ {
+ fp = fdopen(pfd[1], "w");
+ if (fp == NULL)
+ goto oops;
+ }
+ else
+ goto oops;
+
+ if (ofil != NULL)
+ if ((ofd = open(ofil, O_WRONLY | O_TRUNC | O_CREAT)) == -1)
+ goto oops;
+
+ switch (pid = fork())
+ {
+ case -1:
+ break;
+ case 0:
+ signal(SIGPIPE, SIG_DFL);
+ if (*mode == 'r')
+ dup2(pfd[1], 1);
+ if (*mode == 'w')
+ {
+ dup2(pfd[0], 0);
+ if (ofd != -1)
+ {
+ dup2(ofd, 1);
+ close(1);
+ }
+ }
+ close(pfd[0]);
+ close(pfd[1]);
+ execv(vec[0], vec);
+ perror(vec[0]);
+ /*
+ * This MUST be _exit or we will hit the SIGPIPE
+ * handler in ways we dont want. We want our parent
+ * to flush the inherited file buffers not us.
+ */
+ _exit(1);
+ default:
+ hpid = pid;
+
+ if (ofd != -1)
+ close(ofd);
+ if (*mode == 'r')
+ close(pfd[1]);
+ else
+ close(pfd[0]);
+ }
+ for (vn = 0; vn < 16; vn++)
+ if (vec[vn])
+ free(vec[vn]);
+ oldpiper = signal(SIGPIPE, SIG_IGN);
+ return fp;
+
+ oops:
+ if (ofd != -1)
+ close(ofd);
+ if (fp)
+ fclose(fp);
+ for (vn = 0; vn < 16; vn++)
+ if (vec[vn])
+ free(vec[vn]);
+ return NULL;
+}
+
+int
+close_helper(FILE * fp)
+{
+ int info;
+
+ fclose(fp);
+ signal(SIGPIPE, oldpiper);
+ waitpid(hpid, &info, 0);
+ return WEXITSTATUS(info);
+}