--- rxvt-unicode/src/background.C 2010/08/29 15:12:41 1.44 +++ rxvt-unicode/src/background.C 2012/06/10 15:01:14 1.237 @@ -3,8 +3,9 @@ *----------------------------------------------------------------------* * * All portions of code are copyright by their respective author/s. - * Copyright (c) 2005-2008 Marc Lehmann + * Copyright (c) 2005-2008 Marc Lehmann * Copyright (c) 2007 Sasha Vasko + * Copyright (c) 2010-2012 Emanuele Giaquinta * * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by @@ -24,1555 +25,594 @@ #include "../config.h" /* NECESSARY */ #include "rxvt.h" /* NECESSARY */ -#define DO_TIMING_TEST 0 - -#if DO_TIMING_TEST -# include -#define TIMING_TEST_START(id) \ - struct timeval timing_test_##id##_stv; \ - gettimeofday (&timing_test_##id##_stv, NULL); - -#define TIMING_TEST_PRINT_RESULT(id) \ - do { \ - struct timeval tv; \ - gettimeofday (&tv, NULL); \ - tv.tv_sec -= (timing_test_##id##_stv).tv_sec; \ - fprintf (stderr, "%s: %s: %d: elapsed %ld usec\n", #id, __FILE__, __LINE__, \ - tv.tv_sec * 1000000 + tv.tv_usec - (timing_test_##id##_stv).tv_usec); \ - } while (0) - -#else -#define TIMING_TEST_START(id) do {} while (0) -#define TIMING_TEST_PRINT_RESULT(id) do {} while (0) -#endif - -/* - * Pixmap geometry string interpretation : - * Each geometry string contains zero or one scale/position - * adjustment and may optionally be followed by a colon and one or more - * colon-delimited pixmap operations. - * The following table shows the valid geometry strings and their - * effects on the background image : - * - * WxH+X+Y Set scaling to W% by H%, and position to X% by Y%. - * W and H are percentages of the terminal window size. - * X and Y are also percentages; e.g., +50+50 centers - * the image in the window. - * WxH+X Assumes Y == X - * WxH Assumes Y == X == 50 (centers the image) - * W+X+Y Assumes H == W - * W+X Assumes H == W and Y == X - * W Assumes H == W and Y == X == 50 - * - * Adjusting position only : - * =+X+Y Set position to X% by Y% (absolute). - * =+X Set position to X% by X%. - * +X+Y Adjust position horizontally X% and vertically Y% - * from current position (relative). - * +X Adjust position horizontally X% and vertically X% - * from current position. - * - * Adjusting scale only : - * Wx0 Multiply horizontal scaling factor by W% - * 0xH Multiply vertical scaling factor by H% - * 0x0 No scaling (show image at normal size). - * - * Pixmap Operations : (should be prepended by a colon) - * tile Tile image. Scaling/position modifiers above will affect - * the tile size and origin. - * propscale When scaling, scale proportionally. That is, maintain the - * proper aspect ratio for the image. Any portion of the - * background not covered by the image is filled with the - * current background color. - * hscale Scale horizontally, tile vertically ? - * vscale Tile horizontally, scale vertically ? - * scale Scale both up and down - * auto Same as 100x100+50+50 - */ - #ifdef HAVE_BG_PIXMAP -bgPixmap_t::bgPixmap_t () -{ - // this is basically redundant as bgPixmap_t is only used in - // zero_initialised-derived structs -#ifdef HAVE_AFTERIMAGE - original_asim = NULL; -#endif -#ifdef BG_IMAGE_FROM_FILE - h_scale = v_scale = 0; - h_align = v_align = 0; -#endif - flags = 0; - pixmap = None; - valid_since = invalid_since = 0; - target = 0; -} void -bgPixmap_t::destroy () +rxvt_term::bg_destroy () { -#ifdef HAVE_AFTERIMAGE - if (original_asim) - safe_asimage_destroy (original_asim); -#endif +# if ENABLE_TRANSPARENCY + delete root_img; + root_img = 0; +# endif + +# if BG_IMAGE_FROM_FILE + fimage.destroy (); +# endif - if (pixmap && target) - XFreePixmap (target->dpy, pixmap); + delete bg_img; + bg_img = 0; } bool -bgPixmap_t::window_size_sensitive () +rxvt_term::bg_set_position (int x, int y) { -# ifdef ENABLE_TRANSPARENCY - if (flags & isTransparent) - return true; -# endif -# ifdef BG_IMAGE_FROM_FILE -# ifdef HAVE_AFTERIMAGE - if (original_asim) -# endif + if (target_x != x + || target_y != y) { - if (h_scale != 0 || v_scale != 0 - || h_align != 0 || v_align != 0) - return true; + target_x = x; + target_y = y; + return true; } -# endif - return false; } bool -bgPixmap_t::window_position_sensitive () +rxvt_term::bg_window_size_sensitive () { -# ifdef ENABLE_TRANSPARENCY - if (flags & isTransparent) +# if ENABLE_TRANSPARENCY + if (bg_flags & BG_IS_TRANSPARENT) return true; # endif -# ifdef BG_IMAGE_FROM_FILE -# ifdef HAVE_AFTERIMAGE - if (original_asim) -# endif +# if BG_IMAGE_FROM_FILE + if (fimage.img) { - if (h_align == rootAlign || v_align == rootAlign) + if ((fimage.flags & IM_IS_SIZE_SENSITIVE) + || fimage.img->w > szHint.width + || fimage.img->h > szHint.height) return true; } # endif return false; -}; +} -bool bgPixmap_t::need_client_side_rendering () +bool +rxvt_term::bg_window_position_sensitive () { -# ifdef HAVE_AFTERIMAGE - if (original_asim) +# if ENABLE_TRANSPARENCY + if (bg_flags & BG_IS_TRANSPARENT) return true; # endif -# ifdef ENABLE_TRANSPARENCY - if (flags & isTransparent) + +# if BG_IMAGE_FROM_FILE + if (fimage.img) { -# ifdef HAVE_AFTERIMAGE // can't blur without libAI anyways - if ((flags & blurNeeded) && !(flags & blurServerSide)) - return true; -# endif - if ((flags & tintNeeded) && !(flags & tintServerSide)) + if (fimage.flags & IM_ROOT_ALIGN) return true; } # endif - return false; -} -# ifdef BG_IMAGE_FROM_FILE -static inline bool -check_set_scale_value (int geom_flags, int flag, unsigned int &scale, unsigned int new_value) -{ - if (geom_flags & flag) - { - if (new_value > 1000) - new_value = 1000; - if (new_value != scale) - { - scale = new_value; - return true; - } - } - return false; -} - -static inline bool -check_set_align_value (int geom_flags, int flag, int &align, int new_value) -{ - if (geom_flags & flag) - { - if (new_value != bgPixmap_t::rootAlign) - { - if (new_value < -100) - new_value = -100; - else if (new_value > 200) - new_value = 200; - } - if (new_value != align) - { - align = new_value; - return true; - } - } return false; } +# if BG_IMAGE_FROM_FILE static inline int make_align_position (int align, int window_size, int image_size) { - int diff = window_size - image_size; - int smaller = MIN (image_size,window_size); - - if (align >= 0 && align <= 50) - return diff * align / 100; - else if (align > 50 && align <= 100) - return window_size - image_size - diff * (100 - align) / 100; - else if (align > 100 && align <= 200 ) - return ((align - 100) * smaller / 100) + window_size - smaller; - else if (align > -100 && align < 0) - return ((align + 100) * smaller / 100) - image_size; - return 0; + if (align >= 0 && align <= 100) + return lerp (0, window_size - image_size, align); + else if (align > 100) + return lerp (window_size - image_size, window_size, align - 100); + else + return lerp (-image_size, 0, align + 100); } static inline int make_clip_rectangle (int pos, int size, int target_size, int &dst_pos, int &dst_size) { int src_pos = 0; - dst_pos = 0; + dst_pos = pos; dst_size = size; - if (pos < 0 && size > target_size) + if (pos < 0) { src_pos = -pos; + dst_pos = 0; dst_size += pos; } - else if (pos > 0) - dst_pos = pos; - if (dst_pos + dst_size > target_size) - dst_size = target_size - dst_pos; + min_it (dst_size, target_size - dst_pos); return src_pos; } +static void +parse_style (const char *style, int &x, int &y, unsigned int &w, unsigned int &h, uint8_t &flags) +{ + if (!strcasecmp (style, "tiled")) + { + flags = IM_TILE; + w = h = noScale; + x = y = 0; + } + else if (!strcasecmp (style, "aspect-stretched")) + { + flags = IM_KEEP_ASPECT; + w = h = windowScale; + x = y = centerAlign; + } + else if (!strcasecmp (style, "stretched")) + { + flags = 0; + w = h = windowScale; + x = y = centerAlign; + } + else if (!strcasecmp (style, "centered")) + { + flags = 0; + w = h = noScale; + x = y = centerAlign; + } + else if (!strcasecmp (style, "root-tiled")) + { + flags = IM_TILE|IM_ROOT_ALIGN; + w = h = noScale; + x = y = 0; + } +} + bool -bgPixmap_t::set_geometry (const char *geom) +rxvt_image::set_geometry (const char *geom, bool update) { - int geom_flags = 0, changed = 0; - int x = 0, y = 0; - unsigned int w = 0, h = 0; - unsigned int n; - unsigned long new_flags = (flags & (~geometryFlags)); - const char *p; -# define MAXLEN_GEOM 256 /* could be longer than regular geometry string */ + bool changed = false; + int geom_flags = 0; + int x = h_align; + int y = v_align; + unsigned int w = h_scale; + unsigned int h = v_scale; + uint8_t new_flags = 0; if (geom == NULL) return false; - char str[MAXLEN_GEOM]; + if (geom[0]) + { + char **arr = rxvt_strsplit (':', geom); - while (isspace(*geom)) ++geom; - if ((p = strchr (geom, ';')) == NULL) - p = strchr (geom, '\0'); - - n = (p - geom); - if (n < MAXLEN_GEOM) - { - char *ops; - new_flags |= geometrySet; - - memcpy (str, geom, n); - str[n] = '\0'; - if (str[0] == ':') - ops = &str[0]; - else if (str[0] != 'x' && str[0] != 'X' && isalpha(str[0])) - ops = &str[0]; - else + for (int i = 0; arr[i]; i++) { - char *tmp; - ops = strchr (str, ':'); - if (ops != NULL) + if (!strncasecmp (arr[i], "style=", 6)) { - for (tmp = ops-1; tmp >= str && isspace(*tmp); --tmp); - *(++tmp) = '\0'; - if (ops == tmp) ++ops; + parse_style (arr[i] + 6, x, y, w, h, new_flags); + geom_flags = WidthValue|HeightValue|XValue|YValue; } - } - - if (ops > str || ops == NULL) - { - /* we have geometry string - let's handle it prior to applying ops */ - geom_flags = XParseGeometry (str, &x, &y, &w, &h); + else if (!strcasecmp (arr[i], "op=tile")) + new_flags |= IM_TILE; + else if (!strcasecmp (arr[i], "op=keep-aspect")) + new_flags |= IM_KEEP_ASPECT; + else if (!strcasecmp (arr[i], "op=root-align")) + new_flags |= IM_ROOT_ALIGN; - if ((geom_flags & XValue) && !(geom_flags & YValue)) + // deprecated + else if (!strcasecmp (arr[i], "tile")) { - y = x; - geom_flags |= YValue; + new_flags |= IM_TILE; + w = h = noScale; + geom_flags |= WidthValue|HeightValue; } - - if (flags & geometrySet) + else if (!strcasecmp (arr[i], "propscale")) { - /* new geometry is an adjustment to the old one ! */ - if ((geom_flags & WidthValue) && (geom_flags & HeightValue)) - { - if (w == 0 && h != 0) - { - w = h_scale; - h = (v_scale * h) / 100; - } - else if (h == 0 && w != 0) - { - w = (h_scale * w) / 100; - h = v_scale; - } - } - if (geom_flags & XValue) - { - if (str[0] != '=') - { - y += v_align; - x += h_align; - } - } + new_flags |= IM_KEEP_ASPECT; + w = h = windowScale; + geom_flags |= WidthValue|HeightValue; } - else /* setting up geometry from scratch */ + else if (!strcasecmp (arr[i], "hscale")) { - if (!(geom_flags & XValue)) - { - /* use default geometry - centered */ - x = y = defaultAlign; - } - else if (!(geom_flags & YValue)) - y = x; - - if ((geom_flags & (WidthValue|HeightValue)) == 0) - { - /* use default geometry - scaled */ - w = h = defaultScale; - } - else if (geom_flags & WidthValue) - { - if (!(geom_flags & HeightValue)) - h = w; - } - else - w = h; + new_flags |= IM_TILE; + w = windowScale; + h = noScale; + geom_flags |= WidthValue|HeightValue; + } + else if (!strcasecmp (arr[i], "vscale")) + { + new_flags |= IM_TILE; + h = windowScale; + w = noScale; + geom_flags |= WidthValue|HeightValue; + } + else if (!strcasecmp (arr[i], "scale")) + { + w = h = windowScale; + geom_flags |= WidthValue|HeightValue; + } + else if (!strcasecmp (arr[i], "auto")) + { + w = h = windowScale; + x = y = centerAlign; + geom_flags |= WidthValue|HeightValue|XValue|YValue; + } + else if (!strcasecmp (arr[i], "root")) + { + new_flags |= IM_TILE|IM_ROOT_ALIGN; + w = h = noScale; + geom_flags |= WidthValue|HeightValue; } - } /* done parsing geometry string */ - else if (!(flags & geometrySet)) - { - /* default geometry - scaled and centered */ - x = y = defaultAlign; - w = h = defaultScale; - } - if (!(flags & geometrySet)) - geom_flags |= WidthValue|HeightValue|XValue|YValue; + else + geom_flags |= XParseGeometry (arr[i], &x, &y, &w, &h); + } /* done parsing ops */ - if (ops) - { - while (*ops) - { - while (*ops == ':' || isspace(*ops)) ++ops; + rxvt_free_strsplit (arr); + } -# define CHECK_GEOM_OPS(op_str) (strncasecmp (ops, (op_str), sizeof (op_str) - 1) == 0) - if (CHECK_GEOM_OPS ("tile")) - { - w = h = noScale; - geom_flags |= WidthValue|HeightValue; - } - else if (CHECK_GEOM_OPS ("propscale")) - { - if (w == 0 && h == 0) - { - w = windowScale; - geom_flags |= WidthValue; - } - new_flags |= propScale; - } - else if (CHECK_GEOM_OPS ("hscale")) - { - if (w == 0) w = windowScale; - - h = noScale; - geom_flags |= WidthValue|HeightValue; - } - else if (CHECK_GEOM_OPS ("vscale")) - { - if (h == 0) h = windowScale; - - w = noScale; - geom_flags |= WidthValue|HeightValue; - } - else if (CHECK_GEOM_OPS ("scale")) - { - if (h == 0) h = windowScale; - if (w == 0) w = windowScale; - - geom_flags |= WidthValue|HeightValue; - } - else if (CHECK_GEOM_OPS ("auto")) - { - w = h = windowScale; - x = y = centerAlign; - geom_flags |= WidthValue|HeightValue|XValue|YValue; - } - else if (CHECK_GEOM_OPS ("root")) - { - w = h = noScale; - x = y = rootAlign; - geom_flags |= WidthValue|HeightValue|XValue|YValue; - } -# undef CHECK_GEOM_OPS - - while (*ops != ':' && *ops != '\0') ++ops; - } /* done parsing ops */ - } - - if (check_set_scale_value (geom_flags, WidthValue, h_scale, w)) ++changed; - if (check_set_scale_value (geom_flags, HeightValue, v_scale, h)) ++changed; - if (check_set_align_value (geom_flags, XValue, h_align, x)) ++changed; - if (check_set_align_value (geom_flags, YValue, v_align, y)) ++changed; + new_flags |= flags & ~IM_GEOMETRY_FLAGS; + + if (!update) + { + if (!(geom_flags & XValue)) + x = y = defaultAlign; + else if (!(geom_flags & YValue)) + y = x; + + if (!(geom_flags & (WidthValue|HeightValue))) + w = h = defaultScale; + else if (!(geom_flags & HeightValue)) + h = w; + else if (!(geom_flags & WidthValue)) + w = h; } - if (new_flags != flags) + clamp_it (x, -100, 200); + clamp_it (y, -100, 200); + + if (flags != new_flags + || h_scale != w + || v_scale != h + || h_align != x + || v_align != y) { flags = new_flags; - changed++; + h_scale = w; + v_scale = h; + h_align = x; + v_align = y; + changed = true; } -//fprintf (stderr, "flags = %lX, scale = %ux%u, align=%+d%+d\n", -// flags, h_scale, v_scale, h_align, v_align); - return (changed > 0); + if (is_size_sensitive ()) + flags |= IM_IS_SIZE_SENSITIVE; + else + flags &= ~IM_IS_SIZE_SENSITIVE; + + return changed; } -# ifdef HAVE_AFTERIMAGE -bool -bgPixmap_t::render_asim (ASImage *background, ARGB32 background_tint) +void +rxvt_term::get_image_geometry (rxvt_image &image, int &w, int &h, int &x, int &y) { - if (target == NULL) - return false; - - target->init_asv (); + int image_width = image.img->w; + int image_height = image.img->h; + int target_width = szHint.width; + int target_height = szHint.height; + int h_scale = min (image.h_scale, 32767 * 100 / target_width); + int v_scale = min (image.v_scale, 32767 * 100 / target_height); - ASImage *result = 0; + w = h_scale * target_width / 100; + h = v_scale * target_height / 100; - int target_width = target->szHint.width; - int target_height = target->szHint.height; - int new_pmap_width = target_width; - int new_pmap_height = target_height; - - int x = 0; - int y = 0; - int w = h_scale * target_width / 100; - int h = v_scale * target_height / 100; - - TIMING_TEST_START (asim); - - if (original_asim) + if (image.flags & IM_KEEP_ASPECT) { - if (h_align == rootAlign || v_align == rootAlign) - { - target->get_window_origin(x, y); - x = -x; - y = -y; - } - - if (h_align != rootAlign) - x = make_align_position (h_align, target_width, w > 0 ? w : (int)original_asim->width); - - if (v_align != rootAlign) - y = make_align_position (v_align, target_height, h > 0 ? h : (int)original_asim->height); + float scale = (float)w / image_width; + min_it (scale, (float)h / image_height); + w = image_width * scale + 0.5; + h = image_height * scale + 0.5; } - if (!original_asim - || x >= target_width - || y >= target_height - || (w > 0 && x + w <= 0) - || (h > 0 && y + h <= 0)) - { - if (background) - { - new_pmap_width = background->width; - new_pmap_height = background->height; - result = background; + if (!w) w = image_width; + if (!h) h = image_height; - if (background_tint != TINT_LEAVE_SAME) - { - ASImage *tmp = tile_asimage (target->asv, background, 0, 0, - target_width, target_height, background_tint, - ASA_XImage, 100, ASIMAGE_QUALITY_DEFAULT); - if (tmp) - result = tmp; - } - } - else - new_pmap_width = new_pmap_height = 0; + if (image.flags & IM_ROOT_ALIGN) + { + x = -target_x; + y = -target_y; } else { - result = original_asim; - - if ((w > 0 && w != original_asim->width) - || (h > 0 && h != original_asim->height)) - { - result = scale_asimage (target->asv, original_asim, - w > 0 ? w : original_asim->width, - h > 0 ? h : original_asim->height, - background ? ASA_ASImage : ASA_XImage, - 100, ASIMAGE_QUALITY_DEFAULT); - } - - if (background == NULL) - { - /* if tiling - pixmap has to be sized exactly as the image, - but there is no need to make it bigger than the window! */ - if (h_scale == 0) - new_pmap_width = min (result->width, target_width); - if (v_scale == 0) - new_pmap_height = min (result->height, target_height); - /* we also need to tile our image in one or both directions */ - if (h_scale == 0 || v_scale == 0) - { - ASImage *tmp = tile_asimage (target->asv, result, - (h_scale > 0) ? 0 : (int)result->width - x, - (v_scale > 0) ? 0 : (int)result->height - y, - new_pmap_width, - new_pmap_height, - TINT_LEAVE_SAME, ASA_XImage, - 100, ASIMAGE_QUALITY_DEFAULT); - if (tmp) - { - if (result != original_asim) - destroy_asimage (&result); - - result = tmp; - } - } - } - else - { - /* if blending background and image - pixmap has to be sized same as target window */ - ASImageLayer *layers = create_image_layers (2); - - layers[0].im = background; - layers[0].clip_width = target_width; - layers[0].clip_height = target_height; - layers[0].tint = background_tint; - layers[1].im = result; - - if (w <= 0) - { - /* tile horizontally */ - while (x > 0) x -= (int)result->width; - layers[1].dst_x = x; - layers[1].clip_width = result->width+target_width; - } - else - { - /* clip horizontally */ - layers[1].dst_x = x; - layers[1].clip_width = result->width; - } + x = make_align_position (image.h_align, target_width, w); + y = make_align_position (image.v_align, target_height, h); + } +} - if (h <= 0) - { - while (y > 0) y -= (int)result->height; - layers[1].dst_y = y; - layers[1].clip_height = result->height + target_height; - } - else - { - layers[1].dst_y = y; - layers[1].clip_height = result->height; - } +bool +rxvt_term::render_image (rxvt_image &image) +{ + int target_width = szHint.width; + int target_height = szHint.height; - if (target->rs[Rs_blendtype]) - { - layers[1].merge_scanlines = blend_scanlines_name2func (target->rs[Rs_blendtype]); - if (layers[1].merge_scanlines == NULL) - layers[1].merge_scanlines = alphablend_scanlines; - } + int x = 0; + int y = 0; + int w = 0; + int h = 0; - ASImage *tmp = merge_layers (target->asv, layers, 2, target_width, target_height, - ASA_XImage, 0, ASIMAGE_QUALITY_DEFAULT); + get_image_geometry (image, w, h, x, y); - if (tmp) - { - if (result != original_asim) - destroy_asimage (&result); + if (!(image.flags & IM_ROOT_ALIGN) + && (x >= target_width + || y >= target_height + || x + w <= 0 + || y + h <= 0)) + return false; - result = tmp; - } + rxvt_img *img = image.img->scale (w, h); - free (layers); - } - } - TIMING_TEST_PRINT_RESULT (asim); + if (image.flags & IM_TILE) + img->repeat_mode (RepeatNormal); + else + img->repeat_mode (RepeatNone); + img->sub_rect (-x, -y, target_width, target_height)->replace (img); - if (pixmap) + if (bg_flags & BG_IS_VALID) { - if (result == NULL - || pmap_width != new_pmap_width - || pmap_height != new_pmap_height - || pmap_depth != target->depth) - { - XFreePixmap (target->dpy, pixmap); - pixmap = None; - } + double factor = image.alpha * 1. / 0xffff; + bg_img->blend (img, factor)->replace (img); } - if (result) - { - XGCValues gcv; - GC gc; + XRenderPictFormat *format = XRenderFindVisualFormat (dpy, visual); + img->convert_format (format, pix_colors [Color_bg])->replace (img); - /* create Pixmap */ - if (pixmap == None) - { - pixmap = XCreatePixmap (target->dpy, target->vt, new_pmap_width, new_pmap_height, target->depth); - pmap_width = new_pmap_width; - pmap_height = new_pmap_height; - pmap_depth = target->depth; - } - /* fill with background color ( if result's not completely overlapping it)*/ - gcv.foreground = target->pix_colors[Color_bg]; - gc = XCreateGC (target->dpy, target->vt, GCForeground, &gcv); - - int src_x = 0, src_y = 0, dst_x = 0, dst_y = 0; - int dst_width = result->width, dst_height = result->height; - if (background == NULL) - { - if (h_scale > 0) src_x = make_clip_rectangle (x, result->width , new_pmap_width , dst_x, dst_width ); - if (v_scale > 0) src_y = make_clip_rectangle (y, result->height, new_pmap_height, dst_y, dst_height); - - if (dst_x > 0 || dst_y > 0 - || dst_x + dst_width < new_pmap_width - || dst_y + dst_height < new_pmap_height) - XFillRectangle (target->dpy, pixmap, gc, 0, 0, new_pmap_width, new_pmap_height); - } - - /* put result on pixmap */ - if (dst_x < new_pmap_width && dst_y < new_pmap_height) - asimage2drawable (target->asv, pixmap, result, gc, src_x, src_y, dst_x, dst_y, dst_width, dst_height, True); + delete bg_img; + bg_img = img; - if (result != background && result != original_asim) - destroy_asimage (&result); + return true; +} - XFreeGC (target->dpy, gc); - TIMING_TEST_PRINT_RESULT (asim); - } +rxvt_image::rxvt_image () +{ + alpha = 0xffff; + flags = 0; + h_scale = + v_scale = defaultScale; + h_align = + v_align = defaultAlign; - return true; + img = 0; } -# endif /* HAVE_AFTERIMAGE */ bool -bgPixmap_t::set_file (const char *file) +rxvt_image::set_file_geometry (rxvt_screen *s, const char *file) { - assert (file); + if (!file || !*file) + return false; - if (*file) + const char *p = strchr (file, ';'); + + if (p) { - if (const char *p = strchr (file, ';')) - { - size_t len = p - file; - char *f = rxvt_temp_buf (len + 1); - memcpy (f, file, len); - f[len] = '\0'; - file = f; - } - -# ifdef HAVE_AFTERIMAGE - if (!target->asimman) - target->asimman = create_generic_imageman (target->rs[Rs_path]); - original_asim = get_asimage (target->asimman, file, 0xFFFFFFFF, 100); - return original_asim; -# endif + size_t len = p - file; + char *f = rxvt_temp_buf (len + 1); + memcpy (f, file, len); + f[len] = '\0'; + file = f; } - return false; + bool ret = set_file (s, file); + alpha = 0x8000; + if (ret) + set_geometry (p ? p + 1 : ""); + return ret; } -# endif /* BG_IMAGE_FROM_FILE */ - -# ifdef ENABLE_TRANSPARENCY bool -bgPixmap_t::set_transparent () +rxvt_image::set_file (rxvt_screen *s, const char *file) { - if (!(flags & isTransparent)) - { - flags |= isTransparent; - return true; - } - - return false; + delete img; + img = rxvt_img::new_from_file (s, file); + return img != 0; } +# endif /* BG_IMAGE_FROM_FILE */ + bool -bgPixmap_t::set_blur_radius (const char *geom) +image_effects::set_blur (const char *geom) { - int changed = 0; + bool changed = false; unsigned int hr, vr; int junk; int geom_flags = XParseGeometry (geom, &junk, &junk, &hr, &vr); - if (!(geom_flags&WidthValue)) + if (!(geom_flags & WidthValue)) hr = 1; - if (!(geom_flags&HeightValue)) + if (!(geom_flags & HeightValue)) vr = hr; + min_it (hr, 128); + min_it (vr, 128); + if (h_blurRadius != hr) { - ++changed; + changed = true; h_blurRadius = hr; } if (v_blurRadius != vr) { - ++changed; + changed = true; v_blurRadius = vr; } - if (v_blurRadius == 0 && h_blurRadius == 0) - flags &= ~blurNeeded; - else - flags |= blurNeeded; - - return (changed>0); -} - -static inline unsigned long -compute_tint_shade_flags (rxvt_color *tint, int shade) -{ - unsigned long flags = 0; - rgba c (rgba::MAX_CC,rgba::MAX_CC,rgba::MAX_CC); - bool has_shade = (shade > 0 && shade < 100) || (shade > 100 && shade < 200); - - if (tint) - { - tint->get (c); -# define IS_COMPONENT_WHOLESOME(cmp) ((cmp) <= 0x000700 || (cmp) >= 0x00f700) - if (!has_shade && IS_COMPONENT_WHOLESOME (c.r) - && IS_COMPONENT_WHOLESOME (c.g) - && IS_COMPONENT_WHOLESOME (c.b)) - flags |= bgPixmap_t::tintWholesome; -# undef IS_COMPONENT_WHOLESOME - } - - if (has_shade) - flags |= bgPixmap_t::tintNeeded; - else if (tint) - { - if ((c.r > 0x000700 || c.g > 0x000700 || c.b > 0x000700) - && (c.r < 0x00f700 || c.g < 0x00f700 || c.b < 0x00f700)) - { - flags |= bgPixmap_t::tintNeeded; - } - } - - if (flags & bgPixmap_t::tintNeeded) - { - if (flags & bgPixmap_t::tintWholesome) - flags |= bgPixmap_t::tintServerSide; - else - { -#if XFT - flags |= bgPixmap_t::tintServerSide; -#endif - } - } - - return flags; + return changed; } bool -bgPixmap_t::set_tint (rxvt_color &new_tint) +image_effects::set_tint (const rxvt_color &new_tint) { - if (tint != new_tint) + if (!tint_set || tint != new_tint) { - unsigned long new_flags = compute_tint_shade_flags (&new_tint, shade); tint = new_tint; - flags = (flags & ~tintFlags) | new_flags | tintSet; - return true; - } - - return false; -} - -bool -bgPixmap_t::unset_tint () -{ - unsigned long new_flags = compute_tint_shade_flags (NULL, shade); + tint_set = true; - if (new_flags != (flags & tintFlags)) - { - flags = (flags&~tintFlags)|new_flags; - return true; + return true; } return false; } bool -bgPixmap_t::set_shade (const char *shade_str) +image_effects::set_shade (const char *shade_str) { - int new_shade = (shade_str) ? atoi (shade_str) : 0; + int new_shade = atoi (shade_str); - if (new_shade < 0 && new_shade > -100) + clamp_it (new_shade, -100, 200); + if (new_shade < 0) new_shade = 200 - (100 + new_shade); - else if (new_shade == 100) - new_shade = 0; if (new_shade != shade) { - unsigned long new_flags = compute_tint_shade_flags ((flags & tintSet) ? &tint : NULL, new_shade); shade = new_shade; - flags = (flags & (~tintFlags | tintSet)) | new_flags; return true; } return false; } -/* make_transparency_pixmap() - * Builds a pixmap sized the same as terminal window, with depth same as the root window - * that pixmap contains tiled portion of the root pixmap that is supposed to be covered by +# if ENABLE_TRANSPARENCY +/* + * Builds a pixmap of the same size as the terminal window that contains + * the tiled portion of the root pixmap that is supposed to be covered by * our window. */ -unsigned long -bgPixmap_t::make_transparency_pixmap () +bool +rxvt_term::render_root_image () { - unsigned long result = 0; - - if (target == NULL) - return 0; - /* root dimensions may change from call to call - but Display structure should * be always up-to-date, so let's use it : */ - Window root = target->display->root; - int screen = target->display->screen; - Display *dpy = target->dpy; + int screen = display->screen; int root_width = DisplayWidth (dpy, screen); int root_height = DisplayHeight (dpy, screen); - unsigned int root_pmap_width, root_pmap_height; - int window_width = target->szHint.width; - int window_height = target->szHint.height; + int window_width = szHint.width; + int window_height = szHint.height; int sx, sy; - XGCValues gcv; - TIMING_TEST_START (tp); - target->get_window_origin (sx, sy); + sx = target_x; + sy = target_y; + + if (!root_img) + return false; /* check if we are outside of the visible part of the virtual screen : */ if (sx + window_width <= 0 || sy + window_height <= 0 || sx >= root_width || sy >= root_height) return 0; - if (root_pixmap != None) - { - /* we want to validate the pixmap and get it's size at the same time : */ - int junk; - unsigned int ujunk; - /* root pixmap may be bad - allow a error */ - target->allowedxerror = -1; - - if (!XGetGeometry (dpy, root_pixmap, &root, &junk, &junk, &root_pmap_width, &root_pmap_height, &ujunk, &ujunk)) - root_pixmap = None; - - target->allowedxerror = 0; - } - - Pixmap tiled_root_pmap = XCreatePixmap (dpy, root, window_width, window_height, root_depth); - GC gc = NULL; + while (sx < 0) sx += root_img->w; + while (sy < 0) sy += root_img->h; - if (tiled_root_pmap == None) /* something really bad happened - abort */ - return 0; - - if (root_pixmap == None) - { - /* use tricks to obtain the root background image :*/ - /* we want to create Overrideredirect window overlapping out window - with background type of Parent Relative and then grab it */ - XSetWindowAttributes attr; - Window src; - bool success = false; - - attr.background_pixmap = ParentRelative; - attr.backing_store = Always; - attr.event_mask = ExposureMask; - attr.override_redirect = True; - src = XCreateWindow (dpy, root, sx, sy, window_width, window_height, 0, - CopyFromParent, CopyFromParent, CopyFromParent, - CWBackPixmap|CWBackingStore|CWOverrideRedirect|CWEventMask, - &attr); - - if (src != None) - { - XEvent event; - int ev_count = 0; - XGrabServer (dpy); - XMapRaised (dpy, src); - XSync (dpy, False); - - /* XSync should get window where it's properly exposed, - * but to be on the safe side - let's check for the actual event to arrive : */ - while (XCheckWindowEvent (dpy, src, ExposureMask, &event)) - ++ev_count; + rxvt_img *img = root_img->sub_rect (sx, sy, window_width, window_height); - if (ev_count > 0); - { - /* hooray! - we can grab the image! */ - gc = XCreateGC (dpy, root, 0, NULL); - if (gc) - { - XCopyArea (dpy, src, tiled_root_pmap, gc, 0, 0, window_width, window_height, 0, 0); - success = true; - } - } - - XDestroyWindow (dpy, src); - XUngrabServer (dpy); - //fprintf (stderr, "%s:%d: ev_count = %d\n", __FUNCTION__, __LINE__, ev_count); - } - - if (!success) - { - XFreePixmap (dpy, tiled_root_pmap); - tiled_root_pmap = None; - } - else - result |= transpPmapTiled; - } - else - { - /* straightforward pixmap copy */ - gcv.tile = root_pixmap; - gcv.fill_style = FillTiled; - - while (sx < 0) sx += (int)root_width; - while (sy < 0) sy += (int)root_height; - - gcv.ts_x_origin = -sx; - gcv.ts_y_origin = -sy; - gc = XCreateGC (dpy, root, GCFillStyle | GCTile | GCTileStipXOrigin | GCTileStipYOrigin, &gcv); - - if (gc) - { - XFillRectangle (dpy, tiled_root_pmap, gc, 0, 0, window_width, window_height); - result |= transpPmapTiled; - } - } - TIMING_TEST_PRINT_RESULT (tp); + if (root_effects.need_blur ()) + img->blur (root_effects.h_blurRadius, root_effects.v_blurRadius)->replace (img); - if (tiled_root_pmap != None) - { - if (!need_client_side_rendering ()) - { - if ((flags & tintNeeded)) - { - if (flags & tintWholesome) - { - /* In this case we can tint image server-side getting significant - * performance improvements, as we eliminate XImage transfer - */ - gcv.foreground = Pixel (tint); - gcv.function = GXand; - gcv.fill_style = FillSolid; - if (gc) - XChangeGC (dpy, gc, GCFillStyle | GCForeground | GCFunction, &gcv); - else - gc = XCreateGC (dpy, root, GCFillStyle | GCForeground | GCFunction, &gcv); - if (gc) - { - XFillRectangle (dpy, tiled_root_pmap, gc, 0, 0, window_width, window_height); - result |= transpPmapTinted; - } - } - else - { -# if XFT - Picture back_pic = 0; - rgba c (rgba::MAX_CC,rgba::MAX_CC,rgba::MAX_CC); - - if (flags & tintSet) - tint.get (c); - - if (shade > 0 && shade < 100) - { - c.r = (c.r * shade) / 100; - c.g = (c.g * shade) / 100; - c.b = (c.b * shade) / 100; - } - else if (shade > 100 && shade < 200) - { - c.r = (c.r * (200 - shade)) / 100; - c.g = (c.g * (200 - shade)) / 100; - c.b = (c.b * (200 - shade)) / 100; - } - - XRenderPictFormat pf; - pf.type = PictTypeDirect; - pf.depth = 32; - pf.direct.redMask = 0xff; - pf.direct.greenMask = 0xff; - pf.direct.blueMask = 0xff; - pf.direct.alphaMask = 0xff; - - XRenderPictFormat *solid_format = XRenderFindFormat (dpy, - (PictFormatType| - PictFormatDepth| - PictFormatRedMask| - PictFormatGreenMask| - PictFormatBlueMask| - PictFormatAlphaMask), - &pf, - 0); - XRenderPictFormat *root_format = XRenderFindVisualFormat (dpy, DefaultVisualOfScreen (ScreenOfDisplay (dpy, target->display->screen))); - XRenderPictureAttributes pa ; - - back_pic = XRenderCreatePicture (dpy, tiled_root_pmap, root_format, 0, &pa); - - pa.repeat = True; - - Pixmap overlay_pmap = XCreatePixmap (dpy, root, 1, 1, 32); - Picture overlay_pic = XRenderCreatePicture (dpy, overlay_pmap, solid_format, CPRepeat, &pa); - XFreePixmap (dpy, overlay_pmap); - - pa.component_alpha = True; - Pixmap mask_pmap = XCreatePixmap (dpy, root, 1, 1, 32); - Picture mask_pic = XRenderCreatePicture (dpy, mask_pmap, solid_format, CPRepeat|CPComponentAlpha, &pa); - XFreePixmap (dpy, mask_pmap); - - if (mask_pic && overlay_pic && back_pic) - { - XRenderColor mask_c; - - memset (&mask_c, (shade > 100) ? 0xFF : 0x0, sizeof (mask_c)); - mask_c.alpha = 0xffff; - XRenderFillRectangle (dpy, PictOpSrc, overlay_pic, &mask_c, 0, 0, 1, 1); - - mask_c.alpha = 0; - mask_c.red = 0xffff - c.r; - mask_c.green = 0xffff - c.g; - mask_c.blue = 0xffff - c.b; - XRenderFillRectangle (dpy, PictOpSrc, mask_pic, &mask_c, 0, 0, 1, 1); - XRenderComposite (dpy, PictOpOver, overlay_pic, mask_pic, back_pic, 0, 0, 0, 0, 0, 0, window_width, window_height); - result |= transpPmapTinted; - } - - XRenderFreePicture (dpy, mask_pic); - XRenderFreePicture (dpy, overlay_pic); - XRenderFreePicture (dpy, back_pic); -# if DO_TIMING_TEST - XSync (dpy, False); -# endif -# endif - } - } - } /* server side rendering completed */ - - if (pixmap) - XFreePixmap (dpy, pixmap); - - pixmap = tiled_root_pmap; - pmap_width = window_width; - pmap_height = window_height; - pmap_depth = root_depth; - } + if (root_effects.need_tint ()) + tint_image (img, root_effects.tint, root_effects.tint_set, root_effects.shade); - if (gc) - XFreeGC (dpy, gc); + XRenderPictFormat *format = XRenderFindVisualFormat (dpy, visual); + img->convert_format (format, pix_colors [Color_bg])->replace (img); - TIMING_TEST_PRINT_RESULT (tp); + delete bg_img; + bg_img = img; - return result; + return true; } -bool -bgPixmap_t::set_root_pixmap () +void +rxvt_term::bg_set_root_pixmap () { - Pixmap new_root_pixmap = target->get_pixmap_property (XA_XROOTPMAP_ID); - if (new_root_pixmap == None) - new_root_pixmap = target->get_pixmap_property (XA_ESETROOT_PMAP_ID); - - if (new_root_pixmap != root_pixmap) - { - root_pixmap = new_root_pixmap; - return true; - } - - return false; + delete root_img; + root_img = rxvt_img::new_from_root (this); } # endif /* ENABLE_TRANSPARENCY */ -# ifndef HAVE_AFTERIMAGE -static void ShadeXImage(rxvt_term *term, XImage *srcImage, int shade, int rm, int gm, int bm); -# endif - -bool -bgPixmap_t::render () +void +rxvt_term::bg_render () { - unsigned long background_flags = 0; - - if (target == NULL) - return false; + if (bg_flags & BG_INHIBIT_RENDER) + return; - TIMING_TEST_START (tp); - - invalidate (); -# ifdef ENABLE_TRANSPARENCY - if (flags & isTransparent) + bg_invalidate (); +# if ENABLE_TRANSPARENCY + if (bg_flags & BG_IS_TRANSPARENT) { /* we need to re-generate transparency pixmap in that case ! */ - background_flags = make_transparency_pixmap (); - if (background_flags == 0) - return false; - else if ((background_flags & transpTransformations) == (flags & transpTransformations) - && pmap_depth == target->depth) - flags = flags & ~isInvalid; + if (render_root_image ()) + bg_flags |= BG_IS_VALID; } # endif - XImage *result = NULL; -# ifdef HAVE_AFTERIMAGE - if (original_asim - || (background_flags & transpTransformations) != (flags & transpTransformations)) - { - target->init_asv (); - - ASImage *background = NULL; - ARGB32 as_tint = TINT_LEAVE_SAME; - if (background_flags) - background = pixmap2ximage (target->asv, pixmap, 0, 0, pmap_width, pmap_height, AllPlanes, 100); - -# ifdef ENABLE_TRANSPARENCY - if (!(background_flags & transpPmapTinted) && (flags & tintNeeded)) - { - ShadingInfo as_shade; - as_shade.shading = (shade == 0) ? 100 : shade; - - rgba c (rgba::MAX_CC,rgba::MAX_CC,rgba::MAX_CC); - if (flags & tintSet) - tint.get (c); - as_shade.tintColor.red = c.r; - as_shade.tintColor.green = c.g; - as_shade.tintColor.blue = c.b; - - as_tint = shading2tint32 (&as_shade); - } - - if (!(background_flags & transpPmapBlured) && (flags & blurNeeded) && background != NULL) - { - ASImage *tmp = blur_asimage_gauss (target->asv, background, h_blurRadius, v_blurRadius, 0xFFFFFFFF, - (original_asim == NULL || tint == TINT_LEAVE_SAME)?ASA_XImage:ASA_ASImage, - 100, ASIMAGE_QUALITY_DEFAULT); - if (tmp) - { - destroy_asimage (&background); - background = tmp; - } - } -# endif - - if (render_asim (background, as_tint)) - flags = flags & ~isInvalid; - if (background) - destroy_asimage (&background); - } - else if (background_flags && pmap_depth != target->depth) - result = XGetImage (target->dpy, pixmap, 0, 0, pmap_width, pmap_height, AllPlanes, ZPixmap); - -# elif !XFT /* our own client-side tinting */ - - /* ATTENTION: We ASSUME that XFT will let us do all the tinting necessary server-side. - This may need to be changed in need_client_side_rendering() logic is altered !!! */ - - if (background_flags && (flags & isInvalid)) - { - result = XGetImage (target->dpy, pixmap, 0, 0, pmap_width, pmap_height, AllPlanes, ZPixmap); - - if (result != NULL && !(background_flags & transpPmapTinted) && (flags & tintNeeded)) - { - rgba c (rgba::MAX_CC,rgba::MAX_CC,rgba::MAX_CC); - if (flags & tintSet) - tint.get (c); - ShadeXImage (target, result, shade, c.r, c.g, c.b); - } - } -# endif /* HAVE_AFTERIMAGE */ - - if (result) +# if BG_IMAGE_FROM_FILE + if (fimage.img) { - GC gc = XCreateGC (target->dpy, target->vt, 0UL, NULL); - - if (gc) - { - if (/*pmap_depth != target->depth &&*/ pixmap != None) - { - XFreePixmap (target->dpy, pixmap); - pixmap = None; - } - - if (pixmap == None) - { - pixmap = XCreatePixmap (target->dpy, target->vt, result->width, result->height, target->depth); - pmap_width = result->width; - pmap_height = result->height; - pmap_depth = target->depth; - } - - if (pmap_depth != result->depth) - { - /* Bad Match error will ensue ! stupid X !!!! */ - if (result->depth == 24 && pmap_depth == 32) - result->depth = 32; - else if (result->depth == 32 && pmap_depth == 24) - result->depth = 24; - else - { - /* TODO: implement image recoding */ - } - } - - if (pmap_depth == result->depth) - XPutImage (target->dpy, pixmap, gc, result, 0, 0, 0, 0, result->width, result->height); - - XFreeGC (target->dpy, gc); - flags = flags & ~isInvalid; - } - - XDestroyImage (result); + if (render_image (fimage)) + bg_flags |= BG_IS_VALID; } +# endif - if (flags & isInvalid) + if (!(bg_flags & BG_IS_VALID)) { - if (pixmap != None) - { - XFreePixmap (target->dpy, pixmap); - pixmap = None; - } + delete bg_img; + bg_img = 0; } - apply (); + scr_recolour (false); + bg_flags |= BG_NEEDS_REFRESH; - XSync (target->dpy, False); - valid_since = ev::now (); - - TIMING_TEST_PRINT_RESULT (tp); - - return true; + bg_valid_since = ev::now (); } -bool -bgPixmap_t::set_target (rxvt_term *new_target) +void +rxvt_term::bg_init () { - if (new_target) - if (target != new_target) - { - target = new_target; -# ifdef ENABLE_TRANSPARENCY - root_depth = DefaultDepthOfScreen (ScreenOfDisplay (target->dpy, target->display->screen)); -# endif - return true; - } - - return false; +#if BG_IMAGE_FROM_FILE + if (rs[Rs_backgroundPixmap]) + { + if (fimage.set_file_geometry (this, rs[Rs_backgroundPixmap]) + && !bg_window_position_sensitive ()) + update_background (); + } +#endif } void -bgPixmap_t::apply () +rxvt_term::tint_image (rxvt_img *img, rxvt_color &tint, bool tint_set, int shade) { - if (target) - { - flags &= ~isVtOrigin; + rgba c (rgba::MAX_CC, rgba::MAX_CC, rgba::MAX_CC); - if (pixmap != None) - { - /* set target's background to pixmap */ -# ifdef ENABLE_TRANSPARENCY - if (flags & isTransparent) - { - XSetWindowBackgroundPixmap (target->dpy, target->parent[0], pixmap); - XSetWindowBackgroundPixmap (target->dpy, target->vt, ParentRelative); + if (tint_set) + tint.get (c); - if (target->scrollBar.win) - XSetWindowBackgroundPixmap (target->dpy, target->scrollBar.win, ParentRelative); - } - else -# endif - { - flags |= isVtOrigin; - /* force old pixmap dereference in case it was transparent before :*/ - XSetWindowBackground (target->dpy, target->parent[0], target->pix_colors[Color_border]); - XSetWindowBackgroundPixmap (target->dpy, target->vt, pixmap); - /* do we also need to set scrollbar's background here ? */ - - if (target->scrollBar.win) - XSetWindowBackground (target->dpy, target->scrollBar.win, target->pix_colors[Color_border]); - } - } - else - { - /* set target background to a pixel */ - XSetWindowBackground (target->dpy, target->parent[0], target->pix_colors[Color_border]); - XSetWindowBackground (target->dpy, target->vt, target->pix_colors[Color_bg]); - /* do we also need to set scrollbar's background here ? */ - if (target->scrollBar.win) - XSetWindowBackground (target->dpy, target->scrollBar.win, target->pix_colors[Color_border]); - } - - /* don't want Expose on the parent or vt. It is better to use - scr_touch or we get a great deal of flicker otherwise: */ - XClearWindow (target->dpy, target->parent[0]); + if (shade > 100) + { + c.r = c.r * (200 - shade) / 100; + c.g = c.g * (200 - shade) / 100; + c.b = c.b * (200 - shade) / 100; + } + else + { + c.r = c.r * shade / 100; + c.g = c.g * shade / 100; + c.b = c.b * shade / 100; + } - if (target->scrollBar.state && target->scrollBar.win) - { - target->scrollBar.state = STATE_IDLE; - target->scrollBar.show (0); - } + img->contrast (c.r, c.g, c.b, c.a); - target->want_refresh = 1; - flags |= hasChanged; + if (shade > 100) + { + c.a = 0xffff; + c.r = + c.g = + c.b = 0xffff * (shade - 100) / 100; + img->brightness (c.r, c.g, c.b, c.a); } } #endif /* HAVE_BG_PIXMAP */ - -#if defined(ENABLE_TRANSPARENCY) && !defined(HAVE_AFTERIMAGE) && !XFT -/* taken from aterm-0.4.2 */ - -typedef uint32_t RUINT32T; - -static void -ShadeXImage(rxvt_term *term, XImage *srcImage, int shade, int rm, int gm, int bm) -{ - int sh_r, sh_g, sh_b; - RUINT32T mask_r, mask_g, mask_b; - RUINT32T *lookup, *lookup_r, *lookup_g, *lookup_b; - unsigned int lower_lim_r, lower_lim_g, lower_lim_b; - unsigned int upper_lim_r, upper_lim_g, upper_lim_b; - int i; - - Visual *visual = term->visual; - - if (visual->c_class != TrueColor || srcImage->format != ZPixmap) return ; - - if (shade == 0) - shade = 100; - - /* for convenience */ - mask_r = visual->red_mask; - mask_g = visual->green_mask; - mask_b = visual->blue_mask; - - /* boring lookup table pre-initialization */ - switch (srcImage->bits_per_pixel) { - case 15: - if ((mask_r != 0x7c00) || - (mask_g != 0x03e0) || - (mask_b != 0x001f)) - return; - lookup = (RUINT32T *) malloc (sizeof (RUINT32T)*(32+32+32)); - lookup_r = lookup; - lookup_g = lookup+32; - lookup_b = lookup+32+32; - sh_r = 10; - sh_g = 5; - sh_b = 0; - break; - case 16: - if ((mask_r != 0xf800) || - (mask_g != 0x07e0) || - (mask_b != 0x001f)) - return; - lookup = (RUINT32T *) malloc (sizeof (RUINT32T)*(32+64+32)); - lookup_r = lookup; - lookup_g = lookup+32; - lookup_b = lookup+32+64; - sh_r = 11; - sh_g = 5; - sh_b = 0; - break; - case 24: - if ((mask_r != 0xff0000) || - (mask_g != 0x00ff00) || - (mask_b != 0x0000ff)) - return; - lookup = (RUINT32T *) malloc (sizeof (RUINT32T)*(256+256+256)); - lookup_r = lookup; - lookup_g = lookup+256; - lookup_b = lookup+256+256; - sh_r = 16; - sh_g = 8; - sh_b = 0; - break; - case 32: - if ((mask_r != 0xff0000) || - (mask_g != 0x00ff00) || - (mask_b != 0x0000ff)) - return; - lookup = (RUINT32T *) malloc (sizeof (RUINT32T)*(256+256+256)); - lookup_r = lookup; - lookup_g = lookup+256; - lookup_b = lookup+256+256; - sh_r = 16; - sh_g = 8; - sh_b = 0; - break; - default: - return; /* we do not support this color depth */ - } - - /* prepare limits for color transformation (each channel is handled separately) */ - if (shade < 0) { - shade = -shade; - if (shade < 0) shade = 0; - if (shade > 100) shade = 100; - - lower_lim_r = 65535-rm; - lower_lim_g = 65535-gm; - lower_lim_b = 65535-bm; - - lower_lim_r = 65535-(unsigned int)(((RUINT32T)lower_lim_r)*((RUINT32T)shade)/100); - lower_lim_g = 65535-(unsigned int)(((RUINT32T)lower_lim_g)*((RUINT32T)shade)/100); - lower_lim_b = 65535-(unsigned int)(((RUINT32T)lower_lim_b)*((RUINT32T)shade)/100); - - upper_lim_r = upper_lim_g = upper_lim_b = 65535; - } else { - if (shade < 0) shade = 0; - if (shade > 100) shade = 100; - - lower_lim_r = lower_lim_g = lower_lim_b = 0; - - upper_lim_r = (unsigned int)((((RUINT32T)rm)*((RUINT32T)shade))/100); - upper_lim_g = (unsigned int)((((RUINT32T)gm)*((RUINT32T)shade))/100); - upper_lim_b = (unsigned int)((((RUINT32T)bm)*((RUINT32T)shade))/100); - } - - /* switch red and blue bytes if necessary, we need it for some weird XServers like XFree86 3.3.3.1 */ - if ((srcImage->bits_per_pixel == 24) && (mask_r >= 0xFF0000 )) - { - unsigned int tmp; - - tmp = lower_lim_r; - lower_lim_r = lower_lim_b; - lower_lim_b = tmp; - - tmp = upper_lim_r; - upper_lim_r = upper_lim_b; - upper_lim_b = tmp; - } - - /* fill our lookup tables */ - for (i = 0; i <= mask_r>>sh_r; i++) - { - RUINT32T tmp; - tmp = ((RUINT32T)i)*((RUINT32T)(upper_lim_r-lower_lim_r)); - tmp += ((RUINT32T)(mask_r>>sh_r))*((RUINT32T)lower_lim_r); - lookup_r[i] = (tmp/65535)<>sh_g; i++) - { - RUINT32T tmp; - tmp = ((RUINT32T)i)*((RUINT32T)(upper_lim_g-lower_lim_g)); - tmp += ((RUINT32T)(mask_g>>sh_g))*((RUINT32T)lower_lim_g); - lookup_g[i] = (tmp/65535)<>sh_b; i++) - { - RUINT32T tmp; - tmp = ((RUINT32T)i)*((RUINT32T)(upper_lim_b-lower_lim_b)); - tmp += ((RUINT32T)(mask_b>>sh_b))*((RUINT32T)lower_lim_b); - lookup_b[i] = (tmp/65535)<bits_per_pixel) - { - case 15: - { - unsigned short *p1, *pf, *p, *pl; - p1 = (unsigned short *) srcImage->data; - pf = (unsigned short *) (srcImage->data + srcImage->height * srcImage->bytes_per_line); - while (p1 < pf) - { - p = p1; - pl = p1 + srcImage->width; - for (; p < pl; p++) - { - *p = lookup_r[(*p & 0x7c00)>>10] | - lookup_g[(*p & 0x03e0)>> 5] | - lookup_b[(*p & 0x001f)]; - } - p1 = (unsigned short *) ((char *) p1 + srcImage->bytes_per_line); - } - break; - } - case 16: - { - unsigned short *p1, *pf, *p, *pl; - p1 = (unsigned short *) srcImage->data; - pf = (unsigned short *) (srcImage->data + srcImage->height * srcImage->bytes_per_line); - while (p1 < pf) - { - p = p1; - pl = p1 + srcImage->width; - for (; p < pl; p++) - { - *p = lookup_r[(*p & 0xf800)>>11] | - lookup_g[(*p & 0x07e0)>> 5] | - lookup_b[(*p & 0x001f)]; - } - p1 = (unsigned short *) ((char *) p1 + srcImage->bytes_per_line); - } - break; - } - case 24: - { - unsigned char *p1, *pf, *p, *pl; - p1 = (unsigned char *) srcImage->data; - pf = (unsigned char *) (srcImage->data + srcImage->height * srcImage->bytes_per_line); - while (p1 < pf) - { - p = p1; - pl = p1 + srcImage->width * 3; - for (; p < pl; p += 3) - { - p[0] = lookup_r[(p[0] & 0xff0000)>>16]; - p[1] = lookup_r[(p[1] & 0x00ff00)>> 8]; - p[2] = lookup_r[(p[2] & 0x0000ff)]; - } - p1 = (unsigned char *) ((char *) p1 + srcImage->bytes_per_line); - } - break; - } - case 32: - { - RUINT32T *p1, *pf, *p, *pl; - p1 = (RUINT32T *) srcImage->data; - pf = (RUINT32T *) (srcImage->data + srcImage->height * srcImage->bytes_per_line); - - while (p1 < pf) - { - p = p1; - pl = p1 + srcImage->width; - for (; p < pl; p++) - { - *p = lookup_r[(*p & 0xff0000)>>16] | - lookup_g[(*p & 0x00ff00)>> 8] | - lookup_b[(*p & 0x0000ff)] | - (*p & ~0xffffff); - } - p1 = (RUINT32T *) ((char *) p1 + srcImage->bytes_per_line); - } - break; - } - } - - free (lookup); -} -#endif /* defined(ENABLE_TRANSPARENCY) && !defined(HAVE_AFTERIMAGE) */