#define _GNU_SOURCE #include #include "gdk_imlib.h" #include "gdk_imlib_private.h" #include 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; char same = 1; if (!im || !mod) return; for (i = 0; i < 256; i++) { if (im->rmap[i] != mod[i]) { same = 0; i = 256; } } if (same) 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; char same = 1; if (!im || !mod) return; for (i = 0; i < 256; i++) { if (im->gmap[i] != mod[i]) { same = 0; i = 256; } } if (same) 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; char same = 1; if (!im || !mod) return; for (i = 0; i < 256; i++) { if (im->bmap[i] != mod[i]) { same = 0; i = 256; } } if (same) 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); } GdkImlibImage * gdk_imlib_crop_and_clone_image(GdkImlibImage * im, int x, int y, int w, int h) { unsigned char *data; int xx, yy, w3, w4; unsigned char *ptr1, *ptr2; GdkImlibImage *im2; char *s; if (!im) return NULL; im2 = malloc(sizeof(GdkImlibImage)); if (!im2) return NULL; if (x < 0) { w += x; x = 0; } if (y < 0) { h += y; y = 0; } if (x >= im->rgb_width) return NULL; if (y >= im->rgb_height) return NULL; if (w <= 0) return NULL; if (h <= 0) return NULL; 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 NULL; if (h <= 0) return NULL; w3 = im->rgb_width * 3; w4 = (im->rgb_width - w) * 3; data = malloc(w * h * 3); if (data == NULL) return NULL; 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; } if (im->border.left > x) im2->border.left = im->border.left - x; else im2->border.left = 0; if (im->border.top > y) im2->border.top = im->border.top - y; else im2->border.top = 0; if (im->rgb_width - im->border.right < x + w) im2->border.right = im->border.right - (im->rgb_width - (x + w)); else im2->border.right = 0; if (im->rgb_height - im->border.bottom < y + h) im2->border.bottom = im->border.bottom - (im->rgb_height - (y + h)); else im2->border.bottom = 0; im2->rgb_data = data; im2->rgb_width = w; im2->rgb_height = h; 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->pixmap = 0; im2->shape_mask = 0; 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; } 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, im->border.top, x + (w - im->border.right), y + im->border.top, 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, *end; int 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]; j = 0; cmap = NULL; 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; end = 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; end = im->rgb_data + (im->rgb_width * im->rgb_height * 3); j = 0; context++; } else if (context == 1) { int colptr; int hascolor, iscolor; /* Color Table */ if (j < ncolors) { iscolor = 0; hascolor = 0; 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, "c")) iscolor = 1; 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"))) && (!hascolor))) { 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 (iscolor) hascolor = 1; } } } 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[(int)cmap[i].str[0]][(int)cmap[i].str[1]] = i; if (cpp == 2) for (i = 0; i < ncolors; i++) lookup[(int)cmap[i].str[0]][(int)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) && (ptr < end) && (line[i])); i++) { col[0] = line[i]; if (cmap[lookup[(int)col[0]][0]].transp) { *ptr++ = 255; *ptr++ = 0; *ptr++ = 255; } else { *ptr++ = (unsigned char)cmap[lookup[(int)col[0]][0]].r; *ptr++ = (unsigned char)cmap[lookup[(int)col[0]][0]].g; *ptr++ = (unsigned char)cmap[lookup[(int)col[0]][0]].b; } } } else { for (i = 0; ((i < 65536) && (ptr < end) && (line[i])); i++) { col[0] = line[i]; *ptr++ = (unsigned char)cmap[lookup[(int)col[0]][0]].r; *ptr++ = (unsigned char)cmap[lookup[(int)col[0]][0]].g; *ptr++ = (unsigned char)cmap[lookup[(int)col[0]][0]].b; } } } else if (cpp == 2) { if (transp) { for (i = 0; ((i < 65536) && (ptr < end) && (line[i])); i++) { col[0] = line[i++]; col[1] = line[i]; if (cmap[lookup[(int)col[0]][(int)col[1]]].transp) { *ptr++ = 255; *ptr++ = 0; *ptr++ = 255; } else { *ptr++ = (unsigned char)cmap[lookup[(int)col[0]][(int)col[1]]].r; *ptr++ = (unsigned char)cmap[lookup[(int)col[0]][(int)col[1]]].g; *ptr++ = (unsigned char)cmap[lookup[(int)col[0]][(int)col[1]]].b; } } } else { for (i = 0; ((i < 65536) && (ptr < end) && (line[i])); i++) { col[0] = line[i++]; col[1] = line[i]; *ptr++ = (unsigned char)cmap[lookup[(int)col[0]][(int)col[1]]].r; *ptr++ = (unsigned char)cmap[lookup[(int)col[0]][(int)col[1]]].g; *ptr++ = (unsigned char)cmap[lookup[(int)col[0]][(int)col[1]]].b; } } } else { if (transp) { for (i = 0; ((i < 65536) && (ptr < end) && (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) && (ptr < end) && (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 #include /* * Helper library */ static int hpid; void (*oldpiper) (int); /* 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); } static char x_error = 0; static void __handle_x_error(Display * d, XErrorEvent * ev) { d = NULL; ev = NULL; x_error = 1; } GdkImlibImage * gdk_imlib_create_image_from_drawable(GdkWindow *gwin, GdkBitmap *gmask, int x, int y, int width, int height) { unsigned char *data = NULL, *ptr, r, g, b; unsigned long pixel; int i, xx, yy, w, h, inx, iny, clipx, clipy, rx, ry; XImage *xim; #ifdef HAVE_SHM XShmSegmentInfo shminfo; #endif XWindowAttributes xatt, ratt; Colormap cmap; static char shm_checked = 0, shm = 1; XErrorHandler erh = NULL; Window chld; char is_pixmap = 0; Visual *vis; GdkImlibImage *im; GdkImlibColor ctab[256]; Display *disp; Window win; Pixmap mask; inx = 0; iny = 0; w = width; h = height; vis = id->x.visual; disp = id->x.disp; win = GDK_WINDOW_XWINDOW(gwin); if (gmask) mask = GDK_WINDOW_XWINDOW(gmask); else mask = 0; XGrabServer(disp); erh = XSetErrorHandler((XErrorHandler) __handle_x_error); x_error = 0; XGetWindowAttributes(disp, win, &xatt); XFlush(disp); if (x_error) { x_error = 0; is_pixmap = 1; XGetGeometry(disp, win, &chld, &rx, &rx, (unsigned int *)&xatt.width, (unsigned int *)&xatt.height, (unsigned int *)&rx, (unsigned int *)&xatt.depth); XFlush(disp); if (x_error) { XUngrabServer(disp); XFlush(disp); XSetErrorHandler((XErrorHandler) erh); return NULL; } } XSetErrorHandler((XErrorHandler) erh); if (!is_pixmap) { XGetWindowAttributes(disp, xatt.root, &ratt); XTranslateCoordinates(disp, win, xatt.root, 0, 0, &rx, &ry, &chld); if ((xatt.map_state != IsViewable) && (xatt.backing_store == NotUseful)) { XUngrabServer(disp); XFlush(disp); return NULL; } } clipx = 0; clipy = 0; x = x - inx; y = y - iny; width = xatt.width - x; height = xatt.height - y; if (width > w) width = w; if (height > h) height = h; if (!is_pixmap) { if ((rx + x + width) > ratt.width) width = ratt.width - (rx + x); if ((ry + y + height) > ratt.height) height = ratt.height - (ry + y); } if (x < 0) { clipx = -x; width += x; x = 0; } if (y < 0) { clipy = -y; height += y; y = 0; } if (!is_pixmap) { if ((rx + x) < 0) { clipx -= (rx + x); width += (rx + x); x = -rx; } if ((ry + y) < 0) { clipy -= (ry + y); height += (ry + y); y = -ry; } } if ((width <= 0) || (height <= 0)) { XUngrabServer(disp); XSync(disp, False); return NULL; } #ifdef HAVE_SHM if (shm) { if (!shm_checked) { erh = XSetErrorHandler((XErrorHandler) __handle_x_error); } xim = XShmCreateImage(disp, vis, xatt.depth, ZPixmap, NULL, &shminfo, width, height); if (!shm_checked) { XSync(disp, False); if (x_error) { shm = 0; XDestroyImage(xim); xim = XGetImage(disp, win, x, y, width, height, 0xffffffff, ZPixmap); XSetErrorHandler((XErrorHandler) erh); shm_checked = 1; } else { shminfo.shmid = shmget(IPC_PRIVATE, xim->bytes_per_line * xim->height, IPC_CREAT | 0666); if (shminfo.shmid < 0) { shm = 0; XDestroyImage(xim); xim = XGetImage(disp, win, x, y, width, height, 0xffffffff, ZPixmap); XSetErrorHandler((XErrorHandler) erh); shm_checked = 1; } else { shminfo.shmaddr = xim->data = shmat(shminfo.shmid, 0, 0); shminfo.readOnly = False; XShmAttach(disp, &shminfo); } } } else { shminfo.shmid = shmget(IPC_PRIVATE, xim->bytes_per_line * xim->height, IPC_CREAT | 0666); if (shminfo.shmid < 0) { shm = 0; XDestroyImage(xim); xim = XGetImage(disp, win, x, y, width, height, 0xffffffff, ZPixmap); XSetErrorHandler((XErrorHandler) erh); shm_checked = 1; } else { shminfo.shmaddr = xim->data = shmat(shminfo.shmid, 0, 0); shminfo.readOnly = False; XShmAttach(disp, &shminfo); } } if (!shm_checked) { XSync(disp, False); if (x_error) { shm = 0; XDestroyImage(xim); xim = XGetImage(disp, win, x, y, width, height, 0xffffffff, ZPixmap); shm_checked = 1; } XSetErrorHandler((XErrorHandler) erh); shm_checked = 1; } } else #endif /* HAVE_SHM */ xim = XGetImage(disp, win, x, y, width, height, 0xffffffff, ZPixmap); #ifdef HAVE_SHM if (shm) XShmGetImage(disp, win, xim, x, y, 0xffffffff); #endif XUngrabServer(disp); XFlush(disp); if (xatt.depth == 1) { ctab[0].r = 255; ctab[0].g = 255; ctab[0].b = 255; ctab[1].r = 0; ctab[1].g = 0; ctab[1].b = 0; } if (xatt.depth <= 8) { XColor cols[256]; if (!is_pixmap) { cmap = xatt.colormap; if (cmap == None) cmap = id->x.root_cmap; } else cmap = id->x.root_cmap; for (i = 0; i < (1 << id->x.depth); i++) { cols[i].pixel = i; cols[i].flags = DoRed|DoGreen|DoBlue; } XQueryColors(disp, cmap, cols, 1 << id->x.depth); for (i = 0; i < (1 << id->x.depth); i++) { ctab[i].r = cols[i].red >> 8; ctab[i].g = cols[i].green >> 8; ctab[i].b = cols[i].blue >> 8; ctab[i].pixel = cols[i].pixel; } } data = malloc(width * height *3); if (data) { ptr = data; switch (xatt.depth) { case 0: case 1: case 2: case 3: case 4: case 5: case 6: case 7: case 8: for (yy = 0; yy < height; yy++) { for (xx = 0; xx < width; xx++) { pixel = XGetPixel(xim, xx, yy); r = ctab[pixel & 0xff].r; g = ctab[pixel & 0xff].g; b = ctab[pixel & 0xff].b; *ptr++ = r; *ptr++ = g; *ptr++ = b; } } break; case 15: for (yy = 0; yy < height; yy++) { for (xx = 0; xx < width; xx++) { pixel = XGetPixel(xim, xx, yy); r = (pixel >> 7) & 0xf8; g = (pixel >> 3) & 0xf8; b = (pixel << 3) & 0xf8; *ptr++ = r; *ptr++ = g; *ptr++ = b; } } break; case 16: for (yy = 0; yy < height; yy++) { for (xx = 0; xx < width; xx++) { pixel = XGetPixel(xim, xx, yy); r = (pixel >> 8) & 0xf8; g = (pixel >> 3) & 0xfc; b = (pixel << 3) & 0xf8; *ptr++ = r; *ptr++ = g; *ptr++ = b; } } break; case 24: case 32: for (yy = 0; yy < height; yy++) { for (xx = 0; xx < width; xx++) { pixel = XGetPixel(xim, xx, yy); r = (pixel >> 16) & 0xff; g = (pixel >> 8) & 0xff; b = pixel & 0xff; *ptr++ = r; *ptr++ = g; *ptr++ = b; } } break; default: for (yy = 0; yy < height; yy++) { for (xx = 0; xx < width; xx++) { r = rand(); g = rand(); b = rand(); *ptr++ = r; *ptr++ = g; *ptr++ = b; } } break; } } #ifdef HAVE_SHM if (shm) { XSync(disp, False); XShmDetach(disp, &shminfo); shmdt(shminfo.shmaddr); shmctl(shminfo.shmid, IPC_RMID, 0); } #endif XDestroyImage(xim); if (data) { im = gdk_imlib_create_image_from_data(data, NULL, width, height); free(data); return im; } else return NULL; }