ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/rxvt-unicode/src/xpm.C
Revision: 1.69
Committed: Wed Aug 15 22:41:52 2007 UTC (16 years, 10 months ago) by sasha
Content type: text/plain
Branch: MAIN
Changes since 1.68: +3 -1 lines
Log Message:
fixed segfault on resize by getting rid of touch() in apply(). rearranged redraw calls on configure notify to be sane

File Contents

# User Rev Content
1 root 1.34 /*----------------------------------------------------------------------*
2 pcg 1.12 * File: xpm.C
3 pcg 1.1 *----------------------------------------------------------------------*
4     *
5     * All portions of code are copyright by their respective author/s.
6     * Copyright (c) 1997 Carsten Haitzler <raster@zip.com.au>
7     * Copyright (c) 1997,1998 Oezguer Kesim <kesim@math.fu-berlin.de>
8     * Copyright (c) 1998-2001 Geoff Wing <gcw@pobox.com>
9 root 1.33 * Copyright (c) 2005-2006 Marc Lehmann <pcg@goof.com>
10 pcg 1.1 *
11     * This program is free software; you can redistribute it and/or modify
12     * it under the terms of the GNU General Public License as published by
13     * the Free Software Foundation; either version 2 of the License, or
14     * (at your option) any later version.
15     *
16     * This program is distributed in the hope that it will be useful,
17     * but WITHOUT ANY WARRANTY; without even the implied warranty of
18     * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
19     * GNU General Public License for more details.
20     *
21     * You should have received a copy of the GNU General Public License
22     * along with this program; if not, write to the Free Software
23     * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
24     *---------------------------------------------------------------------*/
25    
26     #include "../config.h" /* NECESSARY */
27     #include "rxvt.h" /* NECESSARY */
28    
29     /*
30 sasha 1.56 * Pixmap geometry string interpretation :
31     * Each geometry string contains zero or one scale/position
32     * adjustment and may optionally be followed by a colon and one or more
33     * colon-delimited pixmap operations.
34     * The following table shows the valid geometry strings and their
35     * affects on the background image :
36     *
37     * WxH+X+Y Set scaling to W% by H%, and position to X% by Y%.
38     * W and H are percentages of the terminal window size.
39     * X and Y are also percentages; e.g., +50+50 centers
40     * the image in the window.
41     * WxH+X Assumes Y == X
42     * WxH Assumes Y == X == 50 (centers the image)
43     * W+X+Y Assumes H == W
44     * W+X Assumes H == W and Y == X
45     * W Assumes H == W and Y == X == 50
46 pcg 1.1 *
47 sasha 1.56 * Adjusting position only :
48     * =+X+Y Set position to X% by Y% (absolute).
49     * =+X Set position to X% by X%.
50     * +X+Y Adjust position horizontally X% and vertically Y%
51     * from current position (relative).
52 sasha 1.58 * +X Adjust position horizontally X% and vertically X%
53 sasha 1.56 * from current position.
54 pcg 1.1 *
55 sasha 1.56 * Adjusting scale only :
56     * Wx0 Multiply horizontal scaling factor by W%
57     * 0xH Multiply vertical scaling factor by H%
58     * 0x0 No scaling (show image at normal size).
59     *
60     * Pixmap Operations : (should be prepended by a colon)
61     * tile Tile image. Scaling/position modifiers above will affect
62     * the tile size and origin.
63     * propscale When scaling, scale proportionally. That is, maintain the
64     * proper aspect ratio for the image. Any portion of the
65     * background not covered by the image is filled with the
66     * current background color.
67     * hscale Scale horizontally, tile vertically ?
68     * vscale Tile horizontally, scale vertically ?
69     * scale Scale both up and down
70     * auto Same as 100x100+50+50
71 pcg 1.1 */
72 sasha 1.56
73     #ifdef HAVE_BG_PIXMAP
74     bool
75     bgPixmap_t::window_size_sensitive ()
76     {
77 sasha 1.63 # ifdef XPM_BACKGROUND
78     # ifdef HAVE_AFTERIMAGE
79 sasha 1.58 if (original_asim != NULL)
80 sasha 1.63 # endif
81 sasha 1.58 {
82     if (h_scale != 0 || v_scale != 0)
83     return true;
84     }
85 sasha 1.63 # endif
86     # ifdef ENABLE_TRANSPARENCY
87 sasha 1.65 if (flags & isTransparent)
88 sasha 1.58 return true;
89 sasha 1.63 # endif
90 sasha 1.58 return false;
91 sasha 1.56 }
92    
93 sasha 1.63 # ifdef XPM_BACKGROUND
94 sasha 1.58 static inline bool
95     check_set_scale_value (int geom_flags, int flag, unsigned int &scale, unsigned int new_value)
96     {
97     if (geom_flags & flag)
98     {
99     if (new_value > 1000)
100     new_value = 1000;
101     if (new_value != scale)
102     {
103     scale = new_value;
104     return true;
105     }
106     }
107     return false;
108     }
109    
110     static inline bool
111     check_set_align_value (int geom_flags, int flag, int &align, int new_value)
112     {
113     if (geom_flags & flag)
114     {
115     if (new_value < -100)
116     new_value = -100;
117     else if (new_value > 200)
118     new_value = 200;
119     if (new_value != align)
120     {
121     align = new_value;
122     return true;
123     }
124     }
125     return false;
126     }
127    
128 sasha 1.59 static inline int
129     make_align_position (int align, int window_size, int image_size)
130     {
131     int diff = window_size - image_size;
132     int smaller = MIN (image_size,window_size);
133    
134     if (align >= 0 && align <= 50)
135     return diff * align / 100;
136     else if (align > 50 && align <= 100)
137 sasha 1.62 return window_size - image_size - diff * (100 - align) / 100;
138 sasha 1.59 else if (align > 100 && align <= 200 )
139     return ((align - 100) * smaller / 100) + window_size - smaller;
140     else if (align > -100 && align < 0)
141     return ((align + 100) * smaller / 100) - image_size;
142     return 0;
143     }
144    
145 sasha 1.62 static inline int
146     make_clip_rectangle (int pos, int size, int target_size, int &dst_pos, int &dst_size)
147 sasha 1.59 {
148 sasha 1.62 int src_pos = 0;
149     dst_pos = 0;
150     dst_size = size;
151     if (pos < 0 && size > target_size)
152     {
153     src_pos = -pos;
154     dst_size += pos;
155     }
156     else if (pos > 0)
157     dst_pos = pos;
158    
159     if (dst_pos + dst_size > target_size)
160     dst_size = target_size - dst_pos;
161     return src_pos;
162 sasha 1.59 }
163    
164 sasha 1.56 bool
165 sasha 1.65 bgPixmap_t::set_geometry (const char *geom)
166 pcg 1.1 {
167 sasha 1.58 int geom_flags = 0, changed = 0;
168 root 1.28 int x = 0, y = 0;
169     unsigned int w = 0, h = 0;
170     unsigned int n;
171 sasha 1.65 unsigned long new_flags = (flags & (~geometryFlags));
172 root 1.28 char *p;
173 sasha 1.63 # define MAXLEN_GEOM 256 /* could be longer then regular geometry string */
174 pcg 1.1
175 pcg 1.7 if (geom == NULL)
176 sasha 1.56 return false;
177 root 1.28
178     char str[MAXLEN_GEOM];
179    
180 sasha 1.58 while (isspace(*geom)) ++geom;
181 root 1.17 if ((p = strchr (geom, ';')) == NULL)
182     p = strchr (geom, '\0');
183 root 1.28
184 pcg 1.7 n = (p - geom);
185 root 1.35 if (n < MAXLEN_GEOM)
186 pcg 1.7 {
187 sasha 1.58 char *ops;
188 sasha 1.65 new_flags |= geometrySet;
189 sasha 1.56
190 root 1.17 strncpy (str, geom, n);
191 pcg 1.7 str[n] = '\0';
192 sasha 1.58 if (str[0] == ':')
193     ops = &str[0];
194     else if (str[0] != 'x' && str[0] != 'X' && isalpha(str[0]))
195     ops = &str[0];
196 sasha 1.38 else
197     {
198 sasha 1.58 char *tmp;
199     ops = strchr (str, ':');
200     if (ops != NULL)
201     {
202     for (tmp = ops-1; tmp >= str && isspace(*tmp); --tmp);
203     *(++tmp) = '\0';
204     if (ops == tmp) ++ops;
205     }
206 sasha 1.38 }
207 root 1.28
208 sasha 1.58 if (ops > str || ops == NULL)
209 pcg 1.7 {
210 sasha 1.58 /* we have geometry string - let's handle it prior to applying ops */
211     geom_flags = XParseGeometry (str, &x, &y, &w, &h);
212 root 1.28
213 sasha 1.58 if ((geom_flags & XValue) && !(geom_flags & YValue))
214 pcg 1.7 {
215 sasha 1.58 y = x;
216     geom_flags |= YValue;
217 pcg 1.7 }
218 sasha 1.58
219 sasha 1.65 if (flags & geometrySet)
220 sasha 1.58 {/* new geometry is an adjustment to the old one ! */
221     if ((geom_flags & WidthValue) && (geom_flags & HeightValue))
222     {
223     if (w == 0 && h != 0)
224     {
225     w = h_scale;
226     h = (v_scale * h) / 100;
227     }
228     else if (h == 0 && w != 0)
229     {
230     w = (h_scale * w) / 100;
231     h = v_scale;
232     }
233     }
234     if (geom_flags & XValue)
235     {
236     if (str[0] != '=')
237     {
238     y += v_align;
239     x += h_align;
240     }
241     }
242 pcg 1.7 }
243 sasha 1.58 else /* setting up geometry from scratch */
244 pcg 1.7 {
245 sasha 1.58 if (!(geom_flags & XValue))
246     {/* use default geometry - centered */
247 sasha 1.65 x = y = defaultAlign;
248 sasha 1.58 }
249     else if (!(geom_flags & YValue))
250     y = x;
251 root 1.28
252 sasha 1.58 if ((geom_flags & (WidthValue|HeightValue)) == 0)
253     {/* use default geometry - scaled */
254 sasha 1.65 w = h = defaultScale;
255 sasha 1.58 }
256     else if (geom_flags & WidthValue)
257     {
258     if (!(geom_flags & HeightValue))
259 sasha 1.62 h = w;
260 sasha 1.58 }
261     else
262 sasha 1.62 w = h;
263 pcg 1.7 }
264 sasha 1.58 } /* done parsing geometry string */
265 sasha 1.65 else if (!(flags & geometrySet))
266 sasha 1.58 { /* default geometry - scaled and centered */
267 sasha 1.65 x = y = defaultAlign;
268     w = h = defaultScale;
269 sasha 1.58 }
270    
271 sasha 1.65 if (!(flags & geometrySet))
272 sasha 1.58 geom_flags |= WidthValue|HeightValue|XValue|YValue;
273 root 1.28
274 sasha 1.58 if (ops)
275 pcg 1.7 {
276 sasha 1.58 while (*ops)
277     {
278     while (*ops == ':' || isspace(*ops)) ++ops;
279 sasha 1.63 # define CHECK_GEOM_OPS(op_str) (strncasecmp (ops, (op_str), sizeof(op_str)-1) == 0)
280 sasha 1.58 if (CHECK_GEOM_OPS("tile"))
281     {
282     w = h = 0;
283     geom_flags |= WidthValue|HeightValue;
284     }
285     else if (CHECK_GEOM_OPS("propscale"))
286     {
287     if (w == 0 && h == 0)
288     {
289     w = 100;
290     geom_flags |= WidthValue;
291     }
292 sasha 1.65 new_flags |= propScale;
293 sasha 1.58 }
294     else if (CHECK_GEOM_OPS("hscale"))
295     {
296     if (w == 0)
297     w = 100;
298     h = 0;
299     geom_flags |= WidthValue|HeightValue;
300     }
301     else if (CHECK_GEOM_OPS("vscale"))
302     {
303     if (h == 0)
304     h = 100;
305     w = 0;
306     geom_flags |= WidthValue|HeightValue;
307     }
308     else if (CHECK_GEOM_OPS("scale"))
309     {
310     if (h == 0)
311     h = 100;
312     if (w == 0)
313     w = 100;
314     geom_flags |= WidthValue|HeightValue;
315     }
316     else if (CHECK_GEOM_OPS("auto"))
317     {
318     w = h = 100;
319     x = y = 50;
320     geom_flags |= WidthValue|HeightValue|XValue|YValue;
321     }
322 sasha 1.63 # undef CHECK_GEOM_OPS
323 sasha 1.58 while (*ops != ':' && *ops != '\0') ++ops;
324     } /* done parsing ops */
325 pcg 1.7 }
326 sasha 1.56
327 sasha 1.58 if (check_set_scale_value (geom_flags, WidthValue, h_scale, w))
328     ++changed;
329     if (check_set_scale_value (geom_flags, HeightValue, v_scale, h))
330     ++changed;
331     if (check_set_align_value (geom_flags, XValue, h_align, x))
332     ++changed;
333     if (check_set_align_value (geom_flags, YValue, v_align, y))
334     ++changed;
335 pcg 1.1 }
336 root 1.28
337 sasha 1.56 if (new_flags != flags)
338     {
339     flags = new_flags;
340     changed++;
341     }
342 sasha 1.58 //fprintf( stderr, "flags = %lX, scale = %ux%u, align=%+d%+d\n",
343     // flags, h_scale, v_scale, h_align, v_align);
344 sasha 1.56 return (changed > 0);
345 pcg 1.1 }
346    
347 sasha 1.63 # ifdef HAVE_AFTERIMAGE
348 sasha 1.60 bool
349 sasha 1.63 bgPixmap_t::render_asim (ASImage *background, ARGB32 background_tint)
350 sasha 1.59 {
351 sasha 1.60 if (target == NULL)
352     return false;
353 sasha 1.59
354     int target_width = (int)target->szHint.width;
355     int target_height = (int)target->szHint.height;
356 sasha 1.60 int new_pmap_width = target_width, new_pmap_height = target_height;
357     ASImage *result = NULL;
358    
359     int x = 0;
360     int y = 0;
361 sasha 1.59 int w = h_scale * target_width / 100;
362     int h = v_scale * target_height / 100;
363    
364 sasha 1.60 if (original_asim)
365     {
366     x = make_align_position (h_align, target_width, w > 0 ? w : (int)original_asim->width);
367     y = make_align_position (v_align, target_height, h > 0 ? h : (int)original_asim->height);
368     }
369    
370 sasha 1.62 if (original_asim == NULL
371     || x >= target_width
372     || y >= target_height
373     || (w > 0 && x + w <= 0)
374     || (h > 0 && y + h <= 0))
375 sasha 1.60 {
376     if (background)
377     {
378 sasha 1.62 new_pmap_width = background->width;
379     new_pmap_height = background->height;
380     result = background;
381     if (background_tint != TINT_LEAVE_SAME)
382     {
383     ASImage* tmp = tile_asimage (target->asv, background, 0, 0,
384     target_width, target_height, background_tint,
385     ASA_XImage, 100, ASIMAGE_QUALITY_DEFAULT);
386     if (tmp)
387     result = tmp;
388     }
389 sasha 1.60 }
390     else
391 sasha 1.62 new_pmap_width = new_pmap_height = 0;
392 sasha 1.60 }
393     else
394     {
395     result = original_asim;
396     if ((w > 0 && w != original_asim->width)
397     || (h > 0 && h != original_asim->height))
398     {
399     result = scale_asimage (target->asv, original_asim,
400     w > 0 ? w : original_asim->width,
401     h > 0 ? h : original_asim->height,
402     background ? ASA_ASImage : ASA_XImage,
403     100, ASIMAGE_QUALITY_DEFAULT);
404     }
405     if (background == NULL)
406     {/* if tiling - pixmap has to be sized exactly as the image */
407     if (h_scale == 0)
408     new_pmap_width = result->width;
409     if (v_scale == 0)
410     new_pmap_height = result->height;
411 sasha 1.62 /* we also need to tile our image in one or both directions */
412     if (h_scale == 0 || v_scale == 0)
413     {
414     ASImage *tmp = tile_asimage (target->asv, result,
415     (h_scale > 0) ? 0 : (int)result->width - x,
416     (v_scale > 0) ? 0 : (int)result->height - y,
417     result->width, result->height,
418     TINT_LEAVE_SAME, ASA_XImage,
419     100, ASIMAGE_QUALITY_DEFAULT);
420     if (tmp)
421     {
422     if (result != original_asim)
423     destroy_asimage (&result);
424     result = tmp;
425     }
426     }
427 sasha 1.60 }
428     else
429     {/* if blending background and image - pixmap has to be sized same as target window */
430     ASImageLayer *layers = create_image_layers (2);
431     ASImage *merged_im = NULL;
432    
433     layers[0].im = background;
434     layers[0].clip_width = target_width;
435     layers[0].clip_height = target_height;
436     layers[0].tint = background_tint;
437     layers[1].im = result;
438     if (w <= 0)
439     {/* tile horizontally */
440 sasha 1.62 while (x > 0) x -= (int)result->width;
441     layers[1].dst_x = x;
442     layers[1].clip_width = result->width+target_width;
443 sasha 1.60 }
444     else
445     {/* clip horizontally */
446 sasha 1.62 layers[1].dst_x = x;
447     layers[1].clip_width = result->width;
448 sasha 1.60 }
449     if (h <= 0)
450     {
451 sasha 1.62 while (y > 0) y -= (int)result->height;
452     layers[1].dst_y = y;
453     layers[1].clip_height = result->height + target_height;
454 sasha 1.60 }
455     else
456     {
457 sasha 1.62 layers[1].dst_y = y;
458     layers[1].clip_height = result->height;
459 sasha 1.60 }
460     if (target->rs[Rs_blendtype])
461     {
462     layers[1].merge_scanlines = blend_scanlines_name2func (target->rs[Rs_blendtype]);
463     if (layers[1].merge_scanlines == NULL)
464     layers[1].merge_scanlines = alphablend_scanlines;
465     }
466     ASImage *tmp = merge_layers (target->asv, layers, 2, target_width, target_height,
467     ASA_XImage, 0, ASIMAGE_QUALITY_DEFAULT);
468     if (tmp)
469     {
470     if (result != original_asim)
471     destroy_asimage (&result);
472     result = tmp;
473     }
474     free (layers);
475     }
476     }
477    
478     if (pixmap)
479     {
480     if (result == NULL
481     || pmap_width != new_pmap_width
482     || pmap_height != new_pmap_height
483     || pmap_depth != target->depth)
484     {
485     XFreePixmap (target->dpy, pixmap);
486     pixmap = None;
487     }
488     }
489    
490     if (result)
491     {
492     XGCValues gcv;
493     GC gc;
494    
495     /* create Pixmap */
496     if (pixmap == None)
497     {
498     pixmap = XCreatePixmap (target->dpy, target->vt, new_pmap_width, new_pmap_height, target->depth);
499     pmap_width = new_pmap_width;
500     pmap_height = new_pmap_height;
501     pmap_depth = target->depth;
502     }
503     /* fill with background color ( if result's not completely overlapping it)*/
504     gcv.foreground = target->pix_colors[Color_bg];
505     gc = XCreateGC (target->dpy, target->vt, GCForeground, &gcv);
506    
507 sasha 1.62 int src_x = 0, src_y = 0, dst_x = 0, dst_y = 0;
508     int dst_width = result->width, dst_height = result->height;
509     if (background == NULL)
510 sasha 1.60 {
511 sasha 1.62 if (h_scale > 0)
512     src_x = make_clip_rectangle (x, result->width, new_pmap_width, dst_x, dst_width);
513     if (v_scale > 0)
514     src_y = make_clip_rectangle (y, result->height, new_pmap_height, dst_y, dst_height);
515    
516     if (dst_x > 0 || dst_y > 0
517     || dst_x + dst_width < new_pmap_width
518     || dst_y + dst_height < new_pmap_height)
519     {
520     XFillRectangle (target->dpy, pixmap, gc, 0, 0, new_pmap_width, new_pmap_height);
521     }
522 sasha 1.60 }
523 sasha 1.62
524 sasha 1.60 /* put result on pixmap */
525 sasha 1.62 if (dst_x < new_pmap_width && dst_y < new_pmap_height)
526     asimage2drawable (target->asv, pixmap, result, gc, src_x, src_y, dst_x, dst_y, dst_width, dst_height, True);
527    
528     if (result != background && result != original_asim)
529     destroy_asimage (&result);
530 sasha 1.60
531     XFreeGC (target->dpy, gc);
532     }
533 sasha 1.59
534 sasha 1.60 return true;
535 sasha 1.59 }
536 sasha 1.63 # endif /* HAVE_AFTERIMAGE */
537 sasha 1.59
538 sasha 1.65 bool
539     bgPixmap_t::set_file (const char *file)
540 pcg 1.1 {
541 root 1.21 char *f;
542 pcg 1.1
543 pcg 1.9 assert (file != NULL);
544 pcg 1.1
545 pcg 1.7 if (*file != '\0')
546     {
547 sasha 1.63 # ifdef HAVE_AFTERIMAGE
548 sasha 1.65 if (target->asimman == NULL)
549     target->asimman = create_generic_imageman(target->rs[Rs_path]);
550 sasha 1.38 if ((f = strchr (file, ';')) == NULL)
551 sasha 1.65 original_asim = get_asimage( target->asimman, file, 0xFFFFFFFF, 100 );
552 sasha 1.38 else
553     {
554 ayin 1.42 size_t len = f - file;
555     f = (char *)malloc (len + 1);
556     strncpy (f, file, len);
557     f[len] = '\0';
558 sasha 1.65 original_asim = get_asimage( target->asimman, f, 0xFFFFFFFF, 100 );
559 sasha 1.38 free( f );
560     }
561 sasha 1.65 return (original_asim != NULL);
562 sasha 1.63 # endif
563 pcg 1.1 }
564 sasha 1.65 return false;
565 pcg 1.1 }
566    
567 sasha 1.63 # endif /* XPM_BACKGROUND */
568    
569     # ifdef ENABLE_TRANSPARENCY
570 sasha 1.65 bool
571     bgPixmap_t::set_transparent ()
572     {
573     if (!(flags & isTransparent))
574     {
575     flags |= isTransparent;
576     return true;
577     }
578     }
579    
580     bool
581     bgPixmap_t::set_blur_radius (const char *geom)
582     {
583     int changed = 0;
584     unsigned int hr, vr;
585     int junk;
586     int geom_flags = XParseGeometry (geom, &junk, &junk, &hr, &vr);
587     if (!(geom_flags&WidthValue))
588     hr = 1;
589     if (!(geom_flags&HeightValue))
590     vr = hr;
591    
592     if (h_blurRadius != hr)
593     {
594     ++changed;
595     h_blurRadius = hr;
596     }
597     if (v_blurRadius != vr)
598     {
599     ++changed;
600     v_blurRadius = vr;
601     }
602     return (changed>0);
603     }
604    
605     static inline unsigned long
606     compute_tint_shade_flags (rxvt_color *tint, int shade)
607     {
608     unsigned long flags = 0;
609    
610     if (shade > 0 && shade <100)
611     flags |= bgPixmap_t::tintNeeded;
612     else if (tint)
613     {
614     rgba c (rgba::MAX_CC,rgba::MAX_CC,rgba::MAX_CC);
615     tint->get (c);
616    
617     flags |= bgPixmap_t::tintNeeded;
618     if ((c.r > 0x000700 || c.g > 0x000700 || c.b > 0x000700)
619     && (c.r < 0x00f700 || c.g < 0x00f700 || c.b < 0x00f700))
620     {
621     flags |= bgPixmap_t::tintNeeded;
622     #define IS_COMPONENT_WHOLESOME(cmp) ((cmp) <= 0x000700 || (cmp) >= 0x00f700)
623     if (IS_COMPONENT_WHOLESOME (c.r)
624     && IS_COMPONENT_WHOLESOME (c.g)
625     && IS_COMPONENT_WHOLESOME (c.b))
626     flags |= bgPixmap_t::tintServerSide;
627     #undef IS_COMPONENT_WHOLESOME
628     }
629     }
630     return flags;
631     }
632    
633     bool
634     bgPixmap_t::set_tint (rxvt_color &new_tint)
635     {
636     if (tint != new_tint)
637     {
638     unsigned long new_flags = compute_tint_shade_flags (&new_tint, shade);
639     tint = new_tint;
640     flags = (flags & ~tintFlags) | new_flags | tintSet;
641     return true;
642     }
643     return false;
644     }
645    
646     bool
647     bgPixmap_t::unset_tint ()
648     {
649     unsigned long new_flags = compute_tint_shade_flags (NULL, shade);
650    
651     if (new_flags != (flags & tintFlags))
652     {
653     flags = (flags&~tintFlags)|new_flags;
654     return true;
655     }
656     return false;
657     }
658    
659     bool
660     bgPixmap_t::set_shade (const char *shade_str)
661     {
662     int new_shade = (shade_str) ? atoi (shade_str) : 0;
663    
664     if (new_shade == 100)
665     new_shade = 0;
666    
667     if (new_shade != shade)
668     {
669     unsigned long new_flags = compute_tint_shade_flags (&tint, new_shade);
670     shade = new_shade;
671     flags = (flags & ~tintFlags) | new_flags;
672     return true;
673     }
674     return false;
675     }
676    
677    
678 sasha 1.63 /* make_transparency_pixmap()
679     * Builds a pixmap sized the same as terminal window, with depth same as the root window
680     * that pixmap contains tiled portion of the root pixmap that is supposed to be covered by
681     * our window.
682     */
683 sasha 1.66 unsigned long
684 sasha 1.65 bgPixmap_t::make_transparency_pixmap ()
685 sasha 1.63 {
686 sasha 1.66 unsigned long result = 0;
687    
688 sasha 1.63 if (target == NULL)
689 sasha 1.66 return 0;
690 sasha 1.63
691 sasha 1.64 /* root dimentions may change from call to call - but Display structure should
692     * be always up-to-date, so let's use it :
693     */
694     Window root = target->display->root;
695     int screen = target->display->screen;
696     Display *dpy = target->dpy;
697     int root_width = DisplayWidth (dpy, screen);
698     int root_height = DisplayHeight (dpy, screen);
699     unsigned int root_pmap_width, root_pmap_height;
700     int window_width = target->szHint.width;
701     int window_height = target->szHint.height;
702 sasha 1.63 int sx, sy;
703 sasha 1.65 XGCValues gcv;
704 sasha 1.63
705 sasha 1.64 target->get_window_origin (sx, sy);
706    
707     /* check if we are outside of the visible part of the virtual screen : */
708     if (sx + window_width <= 0 || sy + window_height <= 0
709     || sx >= root_width || sy >= root_height)
710 sasha 1.66 return 0;
711 sasha 1.64
712     if (root_pixmap != None)
713     {/* we want to validate the pixmap and get it's size at the same time : */
714     int junk;
715     unsigned int ujunk;
716     /* root pixmap may be bad - allow a error */
717     target->allowedxerror = -1;
718     if (!XGetGeometry (dpy, root_pixmap, &root, &junk, &junk, &root_pmap_width, &root_pmap_height, &ujunk, &ujunk))
719     root_pixmap = None;
720     target->allowedxerror = 0;
721     }
722    
723     Pixmap tiled_root_pmap = XCreatePixmap (dpy, root, window_width, window_height, root_depth);
724     GC gc = NULL;
725 sasha 1.63
726 sasha 1.64 if (tiled_root_pmap == None) /* something really bad happened - abort */
727 sasha 1.66 return 0;
728 sasha 1.63
729 sasha 1.64 if (root_pixmap == None)
730     { /* use tricks to obtain the root background image :*/
731     /* we want to create Overrideredirect window overlapping out window
732     with background type of Parent Relative and then grab it */
733     XSetWindowAttributes attr;
734     Window src;
735     bool success = false;
736    
737     attr.background_pixmap = ParentRelative;
738     attr.backing_store = Always;
739     attr.event_mask = ExposureMask;
740     attr.override_redirect = True;
741     src = XCreateWindow (dpy, root, sx, sy, window_width, window_height, 0,
742     CopyFromParent, CopyFromParent, CopyFromParent,
743     CWBackPixmap|CWBackingStore|CWOverrideRedirect|CWEventMask,
744     &attr);
745    
746     if (src != None)
747     {
748     XEvent event;
749     int ev_count = 0;
750     XGrabServer (dpy);
751     XMapRaised (dpy, src);
752     XSync (dpy, False);
753     /* XSync should get window where it's properly exposed,
754     * but to be on the safe side - let's check for the actuall event to arrive : */
755     while (XCheckWindowEvent (dpy, src, ExposureMask, &event))
756     ++ev_count;
757     if (ev_count > 0);
758     { /* hooray! - we can grab the image! */
759     gc = XCreateGC (dpy, root, 0, NULL);
760 sasha 1.66 if (gc)
761     {
762     XCopyArea (dpy, src, tiled_root_pmap, gc, 0, 0, window_width, window_height, 0, 0);
763     success = true;
764     }
765 sasha 1.64 }
766     XDestroyWindow (dpy, src);
767     XUngrabServer (dpy);
768     //fprintf (stderr, "%s:%d: ev_count = %d\n", __FUNCTION__, __LINE__, ev_count);
769     }
770     if (!success)
771     {
772     XFreePixmap (dpy, tiled_root_pmap);
773     tiled_root_pmap = None;
774     }
775 sasha 1.66 else
776     result |= transpPmapTiled;
777 sasha 1.64 }
778     else
779     {/* strightforward pixmap copy */
780     gcv.tile = root_pixmap;
781     gcv.fill_style = FillTiled;
782     while (sx < 0) sx += (int)window_width;
783     while (sy < 0) sy += (int)window_height;
784     gcv.ts_x_origin = -sx;
785     gcv.ts_y_origin = -sy;
786     gc = XCreateGC (dpy, root, GCFillStyle | GCTile | GCTileStipXOrigin | GCTileStipYOrigin, &gcv);
787 sasha 1.66 if (gc)
788     {
789     XFillRectangle (dpy, tiled_root_pmap, gc, 0, 0, window_width, window_height);
790     result |= transpPmapTiled;
791     }
792 sasha 1.64 }
793 sasha 1.63
794 sasha 1.64 if (tiled_root_pmap != None)
795     {
796 sasha 1.65 if (flags & tintNeeded)
797     {
798     if ((flags & tintServerSide)
799     && h_blurRadius <= 1 && v_blurRadius <= 1
800     # ifdef HAVE_AFTERIMAGE
801     && original_asim == NULL
802     # endif
803     )
804     { /* In this case we can tint image server-side getting significant
805     * performance improvements, as we eliminate XImage transfer
806     */
807     gcv.foreground = Pixel (tint);
808     gcv.function = GXand;
809     gcv.fill_style = FillSolid;
810     if (gc)
811     XChangeGC (dpy, gc, GCFillStyle | GCForeground | GCFunction, &gcv);
812     else
813     gc = XCreateGC (dpy, root, GCFillStyle | GCForeground | GCFunction, &gcv);
814 sasha 1.66 if (gc)
815     {
816     XFillRectangle (dpy, tiled_root_pmap, gc, 0, 0, window_width, window_height);
817     result |= transpPmapTinted;
818     }
819 sasha 1.65 }
820     }
821 sasha 1.64 if (pixmap)
822     XFreePixmap (dpy, pixmap);
823     pixmap = tiled_root_pmap;
824     pmap_width = window_width;
825     pmap_height = window_height;
826     pmap_depth = root_depth;
827     }
828 sasha 1.65
829     if (gc)
830     XFreeGC (dpy, gc);
831 sasha 1.66
832     return result;
833 sasha 1.63 }
834 sasha 1.64
835 sasha 1.65 bool
836     bgPixmap_t::set_root_pixmap ()
837     {
838     Pixmap new_root_pixmap = None;
839    
840     new_root_pixmap = target->get_pixmap_property (XA_XROOTPMAP_ID);
841     if (new_root_pixmap == None)
842     new_root_pixmap = target->get_pixmap_property (XA_ESETROOT_PMAP_ID);
843    
844     if (new_root_pixmap != root_pixmap)
845     {
846     root_pixmap = new_root_pixmap;
847     return true;
848     }
849     return false;
850     }
851 sasha 1.63 # endif /* ENABLE_TRANSPARENCY */
852    
853 sasha 1.67 # ifndef HAVE_AFTERIMAGE
854     static void ShadeXImage(rxvt_term *term, XImage* srcImage, int shade, int rm, int gm, int bm);
855     #endif
856    
857    
858 sasha 1.65 bool
859 sasha 1.66 bgPixmap_t::render ()
860 sasha 1.65 {
861 sasha 1.66 unsigned long background_flags = 0;
862    
863     if (target == NULL)
864     return false;
865    
866     invalidate();
867 sasha 1.65 # ifdef ENABLE_TRANSPARENCY
868     if (flags & isTransparent)
869     {
870     /* we need to re-generate transparency pixmap in that case ! */
871 sasha 1.66 background_flags = make_transparency_pixmap ();
872     if (background_flags == 0)
873     return false;
874 sasha 1.67 else if ((background_flags & transpTransformations) == (flags & transpTransformations)
875     && pmap_depth == target->depth)
876     flags = flags & ~isInvalid;
877 sasha 1.65 }
878     # endif
879 sasha 1.66
880     XImage *result = NULL;
881 sasha 1.65 # ifdef HAVE_AFTERIMAGE
882 sasha 1.66 if (original_asim
883     || (background_flags & transpTransformations) != (flags & transpTransformations))
884     {
885     ASImage *background = NULL;
886     ARGB32 as_tint = TINT_LEAVE_SAME;
887     if (background_flags)
888     background = pixmap2ximage (target->asv, pixmap, 0, 0, pmap_width, pmap_height, AllPlanes, 100);
889    
890     if (!(background_flags & transpPmapTinted) && (flags & tintNeeded))
891     {
892     ShadingInfo as_shade;
893     as_shade.shading = (shade == 0) ? 100 : shade;
894    
895     rgba c (rgba::MAX_CC,rgba::MAX_CC,rgba::MAX_CC);
896 sasha 1.68 if (flags & tintSet)
897     tint.get (c);
898 sasha 1.66 as_shade.tintColor.red = c.r;
899     as_shade.tintColor.green = c.g;
900     as_shade.tintColor.blue = c.b;
901    
902     as_tint = shading2tint32 (&as_shade);
903     }
904     if (render_asim (background, as_tint))
905     flags = flags & ~isInvalid;
906     if (background)
907     destroy_asimage (&background);
908     }
909     else if (background_flags && pmap_depth != target->depth)
910     {
911     result = XGetImage (target->dpy, pixmap, 0, 0, pmap_width, pmap_height, AllPlanes, ZPixmap);
912     }
913     # else /* our own client-side tinting */
914 sasha 1.67 if (background_flags && (flags & isInvalid))
915 sasha 1.66 {
916     result = XGetImage (target->dpy, pixmap, 0, 0, pmap_width, pmap_height, AllPlanes, ZPixmap);
917     if (result != NULL && !(background_flags & transpPmapTinted) && (flags & tintNeeded))
918     {
919     rgba c (rgba::MAX_CC,rgba::MAX_CC,rgba::MAX_CC);
920 sasha 1.68 if (flags & tintSet)
921     tint.get (c);
922 sasha 1.67 ShadeXImage (target, result, shade, c.r, c.g, c.b);
923 sasha 1.66 }
924     }
925     # endif
926     if (result != NULL)
927     {
928     GC gc = XCreateGC (target->dpy, target->vt, 0UL, NULL);
929     if (gc)
930     {
931     if (pmap_depth != target->depth && pixmap != None)
932     {
933     XFreePixmap (target->dpy, pixmap);
934     pixmap = None;
935     }
936     if (pixmap == None)
937     {
938     pixmap = XCreatePixmap (target->dpy, target->vt, result->width, result->height, target->depth);
939     pmap_width = result->width;
940     pmap_height = result->height;
941     pmap_depth = target->depth;
942     }
943     XPutImage (target->dpy, pixmap, gc, result, 0, 0, 0, 0, result->width, result->height);
944     XFreeGC (target->dpy, gc);
945     flags = flags & ~isInvalid;
946     }
947     XDestroyImage (result);
948     }
949    
950     if (flags & isInvalid)
951     {
952     if (pixmap != None)
953     {
954     XFreePixmap (target->dpy, pixmap);
955     pixmap = None;
956     }
957     // TODO : we need to get rid of that garbadge :
958     target->am_transparent = target->am_pixmap_trans = 0;
959     }
960     else
961     target->am_transparent = target->am_pixmap_trans = 1;
962    
963     apply ();
964    
965 sasha 1.65 return true;
966     }
967    
968 sasha 1.64 bool
969     bgPixmap_t::set_target (rxvt_term *new_target)
970     {
971     if (new_target)
972     if (target != new_target)
973     {
974     target = new_target;
975     # ifdef ENABLE_TRANSPARENCY
976     root_depth = DefaultDepthOfScreen (ScreenOfDisplay (target->dpy, target->display->screen));
977     # endif
978     return true;
979     }
980     return false;
981     }
982    
983 sasha 1.63 void
984 sasha 1.66 bgPixmap_t::apply()
985 sasha 1.63 {
986     if (target)
987     {
988     if (pixmap != None)
989     { /* set target's background to pixmap */
990     # ifdef ENABLE_TRANSPARENCY
991 sasha 1.65 if (flags & isTransparent)
992 sasha 1.63 {
993     XSetWindowBackgroundPixmap (target->dpy, target->parent[0], pixmap);
994     XSetWindowBackgroundPixmap (target->dpy, target->vt, ParentRelative);
995 sasha 1.66 # if HAVE_SCROLLBARS
996 sasha 1.63 if (target->scrollBar.win)
997     XSetWindowBackgroundPixmap (target->dpy, target->scrollBar.win, ParentRelative);
998 sasha 1.66 # endif
999 sasha 1.63 }
1000     else
1001     # endif
1002     {
1003     /* force old pixmap dereference in case it was transparent before :*/
1004 sasha 1.66 XSetWindowBackground (target->dpy, target->parent[0], target->pix_colors[Color_border]);
1005 sasha 1.63 XSetWindowBackgroundPixmap (target->dpy, target->vt, pixmap);
1006     /* do we also need to set scrollbar's background here ? */
1007 sasha 1.66 # if HAVE_SCROLLBARS
1008     if (target->scrollBar.win)
1009     XSetWindowBackground (target->dpy, target->scrollBar.win, target->pix_colors[Color_border]);
1010     # endif
1011 sasha 1.63 }
1012     }
1013     else
1014     { /* set target background to a pixel */
1015 sasha 1.66 XSetWindowBackground (target->dpy, target->parent[0], target->pix_colors[Color_border]);
1016 sasha 1.63 XSetWindowBackground (target->dpy, target->vt, target->pix_colors[Color_bg]);
1017     /* do we also need to set scrollbar's background here ? */
1018 sasha 1.66 # if HAVE_SCROLLBARS
1019     if (target->scrollBar.win)
1020     XSetWindowBackground (target->dpy, target->scrollBar.win, target->pix_colors[Color_border]);
1021     # endif
1022 sasha 1.63 }
1023     /* don't want Expose on the parent */
1024     XClearArea (target->dpy, target->parent[0], 0, 0, 0, 0, False);
1025     /* do want Expose on the vt */
1026     XClearArea (target->dpy, target->parent[0], 0, 0, 0, 0, True);
1027 sasha 1.66 #if HAVE_SCROLLBARS
1028     if (target->scrollBar.win)
1029     {
1030     target->scrollBar.setIdle ();
1031     target->scrollbar_show (0);
1032     }
1033     #endif
1034 sasha 1.69 /* Is that really neccessary? we did a XClearArea to generate Expose events alreday ! */
1035 sasha 1.66 target->want_refresh = target->want_full_refresh = 1;
1036 sasha 1.69 /* TODO: why do we need a flush here ??? It causes segfault on resize ! */
1037     // target->flush ();
1038 sasha 1.63 }
1039     }
1040 sasha 1.56 #endif /* HAVE_BG_PIXMAP */
1041 ayin 1.39
1042 sasha 1.63
1043 sasha 1.64 void
1044     rxvt_term::get_window_origin (int &x, int &y)
1045     {
1046     Window cr;
1047     XTranslateCoordinates (dpy, parent[0], display->root, 0, 0, &x, &y, &cr);
1048     }
1049    
1050     Pixmap
1051     rxvt_term::get_pixmap_property (int prop_id)
1052     {
1053     if (prop_id > 0 && prop_id < NUM_XA)
1054     if (xa[prop_id])
1055     {
1056     int aformat, rootdepth;
1057     unsigned long nitems, bytes_after;
1058     Atom atype;
1059     unsigned char *prop = NULL;
1060     int result = XGetWindowProperty (dpy, display->root, xa[prop_id],
1061     0L, 1L, False, XA_PIXMAP, &atype, &aformat,
1062     &nitems, &bytes_after, &prop);
1063     if (result == Success && prop && atype == XA_PIXMAP)
1064     {
1065     return *(Pixmap *)prop;
1066     }
1067     }
1068     return None;
1069     }
1070    
1071 sasha 1.63
1072 root 1.41 #ifdef ENABLE_TRANSPARENCY
1073 ayin 1.57 #ifndef HAVE_AFTERIMAGE
1074 ayin 1.39 /* taken from aterm-0.4.2 */
1075    
1076     typedef uint32_t RUINT32T;
1077    
1078 ayin 1.43 static void
1079     ShadeXImage(rxvt_term *term, XImage* srcImage, int shade, int rm, int gm, int bm)
1080 ayin 1.39 {
1081     int sh_r, sh_g, sh_b;
1082     RUINT32T mask_r, mask_g, mask_b;
1083     RUINT32T *lookup, *lookup_r, *lookup_g, *lookup_b;
1084     unsigned int lower_lim_r, lower_lim_g, lower_lim_b;
1085     unsigned int upper_lim_r, upper_lim_g, upper_lim_b;
1086     int i;
1087    
1088     Visual *visual = term->visual;
1089    
1090 sasha 1.67 if (visual->c_class != TrueColor || srcImage->format != ZPixmap) return ;
1091 ayin 1.39
1092 sasha 1.67 if (shade == 0)
1093     shade = 100;
1094    
1095 ayin 1.39 /* for convenience */
1096     mask_r = visual->red_mask;
1097     mask_g = visual->green_mask;
1098     mask_b = visual->blue_mask;
1099    
1100     /* boring lookup table pre-initialization */
1101     switch (srcImage->bits_per_pixel) {
1102     case 15:
1103     if ((mask_r != 0x7c00) ||
1104     (mask_g != 0x03e0) ||
1105     (mask_b != 0x001f))
1106     return;
1107     lookup = (RUINT32T *) malloc (sizeof (RUINT32T)*(32+32+32));
1108     lookup_r = lookup;
1109     lookup_g = lookup+32;
1110     lookup_b = lookup+32+32;
1111     sh_r = 10;
1112     sh_g = 5;
1113     sh_b = 0;
1114     break;
1115     case 16:
1116     if ((mask_r != 0xf800) ||
1117     (mask_g != 0x07e0) ||
1118     (mask_b != 0x001f))
1119     return;
1120     lookup = (RUINT32T *) malloc (sizeof (RUINT32T)*(32+64+32));
1121     lookup_r = lookup;
1122     lookup_g = lookup+32;
1123     lookup_b = lookup+32+64;
1124     sh_r = 11;
1125     sh_g = 5;
1126     sh_b = 0;
1127     break;
1128     case 24:
1129     if ((mask_r != 0xff0000) ||
1130     (mask_g != 0x00ff00) ||
1131     (mask_b != 0x0000ff))
1132     return;
1133     lookup = (RUINT32T *) malloc (sizeof (RUINT32T)*(256+256+256));
1134     lookup_r = lookup;
1135     lookup_g = lookup+256;
1136     lookup_b = lookup+256+256;
1137     sh_r = 16;
1138     sh_g = 8;
1139     sh_b = 0;
1140     break;
1141     case 32:
1142     if ((mask_r != 0xff0000) ||
1143     (mask_g != 0x00ff00) ||
1144     (mask_b != 0x0000ff))
1145     return;
1146     lookup = (RUINT32T *) malloc (sizeof (RUINT32T)*(256+256+256));
1147     lookup_r = lookup;
1148     lookup_g = lookup+256;
1149     lookup_b = lookup+256+256;
1150     sh_r = 16;
1151     sh_g = 8;
1152     sh_b = 0;
1153     break;
1154     default:
1155     return; /* we do not support this color depth */
1156     }
1157    
1158     /* prepare limits for color transformation (each channel is handled separately) */
1159     if (shade < 0) {
1160     shade = -shade;
1161     if (shade < 0) shade = 0;
1162     if (shade > 100) shade = 100;
1163    
1164     lower_lim_r = 65535-rm;
1165     lower_lim_g = 65535-gm;
1166     lower_lim_b = 65535-bm;
1167    
1168     lower_lim_r = 65535-(unsigned int)(((RUINT32T)lower_lim_r)*((RUINT32T)shade)/100);
1169     lower_lim_g = 65535-(unsigned int)(((RUINT32T)lower_lim_g)*((RUINT32T)shade)/100);
1170     lower_lim_b = 65535-(unsigned int)(((RUINT32T)lower_lim_b)*((RUINT32T)shade)/100);
1171    
1172     upper_lim_r = upper_lim_g = upper_lim_b = 65535;
1173     } else {
1174     if (shade < 0) shade = 0;
1175     if (shade > 100) shade = 100;
1176    
1177     lower_lim_r = lower_lim_g = lower_lim_b = 0;
1178    
1179     upper_lim_r = (unsigned int)((((RUINT32T)rm)*((RUINT32T)shade))/100);
1180     upper_lim_g = (unsigned int)((((RUINT32T)gm)*((RUINT32T)shade))/100);
1181     upper_lim_b = (unsigned int)((((RUINT32T)bm)*((RUINT32T)shade))/100);
1182     }
1183    
1184     /* switch red and blue bytes if necessary, we need it for some weird XServers like XFree86 3.3.3.1 */
1185     if ((srcImage->bits_per_pixel == 24) && (mask_r >= 0xFF0000 ))
1186     {
1187     unsigned int tmp;
1188    
1189     tmp = lower_lim_r;
1190     lower_lim_r = lower_lim_b;
1191     lower_lim_b = tmp;
1192    
1193     tmp = upper_lim_r;
1194     upper_lim_r = upper_lim_b;
1195     upper_lim_b = tmp;
1196     }
1197    
1198     /* fill our lookup tables */
1199     for (i = 0; i <= mask_r>>sh_r; i++)
1200     {
1201     RUINT32T tmp;
1202     tmp = ((RUINT32T)i)*((RUINT32T)(upper_lim_r-lower_lim_r));
1203     tmp += ((RUINT32T)(mask_r>>sh_r))*((RUINT32T)lower_lim_r);
1204     lookup_r[i] = (tmp/65535)<<sh_r;
1205     }
1206     for (i = 0; i <= mask_g>>sh_g; i++)
1207     {
1208     RUINT32T tmp;
1209     tmp = ((RUINT32T)i)*((RUINT32T)(upper_lim_g-lower_lim_g));
1210     tmp += ((RUINT32T)(mask_g>>sh_g))*((RUINT32T)lower_lim_g);
1211     lookup_g[i] = (tmp/65535)<<sh_g;
1212     }
1213     for (i = 0; i <= mask_b>>sh_b; i++)
1214     {
1215     RUINT32T tmp;
1216     tmp = ((RUINT32T)i)*((RUINT32T)(upper_lim_b-lower_lim_b));
1217     tmp += ((RUINT32T)(mask_b>>sh_b))*((RUINT32T)lower_lim_b);
1218     lookup_b[i] = (tmp/65535)<<sh_b;
1219     }
1220    
1221     /* apply table to input image (replacing colors by newly calculated ones) */
1222     switch (srcImage->bits_per_pixel)
1223     {
1224     case 15:
1225     {
1226     unsigned short *p1, *pf, *p, *pl;
1227     p1 = (unsigned short *) srcImage->data;
1228     pf = (unsigned short *) (srcImage->data + srcImage->height * srcImage->bytes_per_line);
1229     while (p1 < pf)
1230     {
1231     p = p1;
1232     pl = p1 + srcImage->width;
1233     for (; p < pl; p++)
1234     {
1235     *p = lookup_r[(*p & 0x7c00)>>10] |
1236     lookup_g[(*p & 0x03e0)>> 5] |
1237     lookup_b[(*p & 0x001f)];
1238     }
1239     p1 = (unsigned short *) ((char *) p1 + srcImage->bytes_per_line);
1240     }
1241     break;
1242     }
1243     case 16:
1244     {
1245     unsigned short *p1, *pf, *p, *pl;
1246     p1 = (unsigned short *) srcImage->data;
1247     pf = (unsigned short *) (srcImage->data + srcImage->height * srcImage->bytes_per_line);
1248     while (p1 < pf)
1249     {
1250     p = p1;
1251     pl = p1 + srcImage->width;
1252     for (; p < pl; p++)
1253     {
1254     *p = lookup_r[(*p & 0xf800)>>11] |
1255     lookup_g[(*p & 0x07e0)>> 5] |
1256     lookup_b[(*p & 0x001f)];
1257     }
1258     p1 = (unsigned short *) ((char *) p1 + srcImage->bytes_per_line);
1259     }
1260     break;
1261     }
1262     case 24:
1263     {
1264     unsigned char *p1, *pf, *p, *pl;
1265     p1 = (unsigned char *) srcImage->data;
1266     pf = (unsigned char *) (srcImage->data + srcImage->height * srcImage->bytes_per_line);
1267     while (p1 < pf)
1268     {
1269     p = p1;
1270     pl = p1 + srcImage->width * 3;
1271     for (; p < pl; p += 3)
1272     {
1273     p[0] = lookup_r[(p[0] & 0xff0000)>>16];
1274     p[1] = lookup_r[(p[1] & 0x00ff00)>> 8];
1275     p[2] = lookup_r[(p[2] & 0x0000ff)];
1276     }
1277     p1 = (unsigned char *) ((char *) p1 + srcImage->bytes_per_line);
1278     }
1279     break;
1280     }
1281     case 32:
1282     {
1283     RUINT32T *p1, *pf, *p, *pl;
1284     p1 = (RUINT32T *) srcImage->data;
1285     pf = (RUINT32T *) (srcImage->data + srcImage->height * srcImage->bytes_per_line);
1286    
1287     while (p1 < pf)
1288     {
1289     p = p1;
1290     pl = p1 + srcImage->width;
1291     for (; p < pl; p++)
1292     {
1293     *p = lookup_r[(*p & 0xff0000)>>16] |
1294     lookup_g[(*p & 0x00ff00)>> 8] |
1295     lookup_b[(*p & 0x0000ff)] |
1296     (*p & ~0xffffff);
1297     }
1298     p1 = (RUINT32T *) ((char *) p1 + srcImage->bytes_per_line);
1299     }
1300     break;
1301     }
1302     }
1303    
1304     free (lookup);
1305     }
1306     #endif
1307    
1308     /*
1309     * Check our parents are still who we think they are.
1310     * Do transparency updates if required
1311     */
1312     int
1313     rxvt_term::check_our_parents ()
1314     {
1315     check_our_parents_ev.stop ();
1316     check_our_parents_ev.start (NOW + .1);
1317     return 0;
1318     }
1319    
1320     void
1321     rxvt_term::check_our_parents_cb (time_watcher &w)
1322     {
1323 sasha 1.66 #if 0 /* replaced by a bgPixmap_t::render() - leve here temporarily for reference */
1324    
1325 sasha 1.63 int i, aformat, rootdepth;
1326 ayin 1.39 unsigned long nitems, bytes_after;
1327     Atom atype;
1328     unsigned char *prop = NULL;
1329     Window root, oldp, *list;
1330     Pixmap rootpixmap = None;
1331     XWindowAttributes wattr, wrootattr;
1332     int sx, sy;
1333     Window cr;
1334 sasha 1.52 unsigned int rootpixmap_w = 0, rootpixmap_h = 0;
1335 ayin 1.39
1336     if (!option (Opt_transparent))
1337 sasha 1.63 return; /* Don't try any more */
1338 sasha 1.52 #if 0
1339     struct timeval stv;
1340     gettimeofday (&stv,NULL);
1341     #define PRINT_BACKGROUND_OP_TIME do{ struct timeval tv;gettimeofday (&tv,NULL); tv.tv_sec-= stv.tv_sec;\
1342     fprintf (stderr,"%d: elapsed %ld usec\n",__LINE__,\
1343     tv.tv_sec*1000000+tv.tv_usec-stv.tv_usec );}while(0)
1344     #else
1345     #define PRINT_BACKGROUND_OP_TIME do{}while(0)
1346     #endif
1347    
1348    
1349 ayin 1.39 XGetWindowAttributes (dpy, display->root, &wrootattr);
1350     rootdepth = wrootattr.depth;
1351    
1352     XGetWindowAttributes (dpy, parent[0], &wattr);
1353    
1354     if (rootdepth != wattr.depth)
1355     {
1356     if (am_transparent)
1357     {
1358     XSetWindowBackground (dpy, vt, pix_colors_focused[Color_bg]);
1359     am_transparent = am_pixmap_trans = 0;
1360     }
1361    
1362 sasha 1.63 return; /* Don't try any more */
1363 ayin 1.39 }
1364    
1365     /* Get all X ops out of the queue so that our information is up-to-date. */
1366     XSync (dpy, False);
1367    
1368     XTranslateCoordinates (dpy, parent[0], display->root,
1369     0, 0, &sx, &sy, &cr);
1370     /* check if we are outside of the visible part of the virtual screen : */
1371 ayin 1.51 if( sx + (int)szHint.width <= 0 || sy + (int)szHint.height <= 0
1372     || sx >= wrootattr.width || sy >= wrootattr.height )
1373 ayin 1.39 return /* 0 */ ;
1374     /*
1375     * Make the frame window set by the window manager have
1376     * the root background. Some window managers put multiple nested frame
1377     * windows for each client, so we have to take care about that.
1378     */
1379     i = (xa[XA_XROOTPMAP_ID]
1380     && XGetWindowProperty (dpy, display->root, xa[XA_XROOTPMAP_ID],
1381     0L, 1L, False, XA_PIXMAP, &atype, &aformat,
1382     &nitems, &bytes_after, &prop) == Success);
1383    
1384     if (!i || prop == NULL)
1385     i = (xa[XA_ESETROOT_PMAP_ID]
1386     && XGetWindowProperty (dpy, display->root, xa[XA_ESETROOT_PMAP_ID],
1387     0L, 1L, False, XA_PIXMAP, &atype, &aformat,
1388     &nitems, &bytes_after, &prop) == Success);
1389    
1390 ayin 1.61 if (!i || prop == NULL)
1391 sasha 1.52 rootpixmap = None;
1392 ayin 1.39 else
1393     {
1394 sasha 1.52 int junk;
1395     unsigned int ujunk;
1396     /* root pixmap may be bad - allow a error */
1397     allowedxerror = -1;
1398     if ((rootpixmap = *(Pixmap *)prop) != None)
1399     if (!XGetGeometry (dpy, rootpixmap, &root, &junk, &junk, &rootpixmap_w, &rootpixmap_h, &ujunk, &ujunk))
1400     rootpixmap = None;
1401     allowedxerror = 0;
1402 ayin 1.39 }
1403    
1404 sasha 1.52 if (prop != NULL)
1405     XFree (prop);
1406    
1407     if (rootpixmap != None)
1408 ayin 1.39 {
1409 sasha 1.49 Bool success = False;
1410 ayin 1.40 GC gc = NULL;
1411 ayin 1.39 XGCValues gcvalue;
1412 sasha 1.52 int shade = 100;
1413     rgba c (rgba::MAX_CC,rgba::MAX_CC,rgba::MAX_CC);
1414     Bool whole_tint = False, no_tint = True;
1415 ayin 1.51
1416 sasha 1.52 while (sx < 0) sx += (int)wrootattr.width;
1417     while (sy < 0) sy += (int)wrootattr.height;
1418 ayin 1.39
1419 sasha 1.52 if (rs[Rs_shade])
1420     shade = atoi (rs[Rs_shade]);
1421     if (ISSET_PIXCOLOR (Color_tint))
1422     pix_colors_focused [Color_tint].get (c);
1423 sasha 1.49 #define IS_COMPONENT_WHOLESOME(c) ((c) <=0x000700 || (c)>=0x00f700)
1424 sasha 1.52 if (shade >= 100)
1425     whole_tint = (IS_COMPONENT_WHOLESOME(c.r)
1426     && IS_COMPONENT_WHOLESOME(c.g)
1427     && IS_COMPONENT_WHOLESOME(c.b));
1428     no_tint = (c.r >= 0x00f700 && c.g >= 0x00f700 && c.b >= 0x00f700);
1429 sasha 1.49 #undef IS_COMPONENT_WHOLESOME
1430 sasha 1.64
1431     bgPixmap.make_transparency_pixmap();
1432 sasha 1.49
1433 sasha 1.52 if (whole_tint && !no_tint)
1434     {
1435     }
1436     success = True;
1437     #ifdef HAVE_AFTERIMAGE
1438 sasha 1.55 if (rs[Rs_blurradius] || bgPixmap.original_asim != NULL || (!whole_tint && (!no_tint || shade !=100)))
1439 sasha 1.52 {
1440     ARGB32 tint = TINT_LEAVE_SAME;
1441     ASImage *back_im = NULL;
1442    
1443 sasha 1.55 back_im = pixmap2ximage (asv, bgPixmap.pixmap, 0, 0, szHint.width, szHint.height, AllPlanes, 100);
1444 sasha 1.52 if (back_im != NULL)
1445     {
1446     if (!whole_tint && (!no_tint || shade !=100))
1447     {
1448     ShadingInfo as_shade;
1449     as_shade.shading = shade;
1450     as_shade.tintColor.red = c.r;
1451     as_shade.tintColor.green = c.g;
1452     as_shade.tintColor.blue = c.b;
1453     tint = shading2tint32 (&as_shade);
1454     }
1455    
1456     if (rs[Rs_blurradius] && back_im)
1457     {
1458 sasha 1.53 ASImage* tmp;
1459     int junk;
1460     unsigned int hr = 1, vr = 1;
1461     int flags = XParseGeometry (rs[Rs_blurradius], &junk, &junk, &hr, &vr);
1462     if (!(flags&WidthValue))
1463     hr = 1;
1464     if (!(flags&HeightValue))
1465     vr = hr;
1466     tmp = blur_asimage_gauss (asv, back_im, hr, vr, 0xFFFFFFFF,
1467 sasha 1.55 (bgPixmap.original_asim == NULL || tint == TINT_LEAVE_SAME)?ASA_XImage:ASA_ASImage,
1468 sasha 1.53 100, ASIMAGE_QUALITY_DEFAULT);
1469 sasha 1.52 if (tmp)
1470     {
1471     destroy_asimage (&back_im);
1472     back_im = tmp;
1473     }
1474     }
1475 sasha 1.62 /* TODO: temporary fix - redo the logic, so that same function can do both
1476     transparency and non-transparency */
1477 sasha 1.63 bgPixmap.render_asim (back_im, tint);
1478 sasha 1.62 destroy_asimage (&back_im);
1479 sasha 1.52
1480     } /* back_im != NULL */
1481     else
1482     success = False;
1483     }
1484     #else /* HAVE_AFTERIMAGE */
1485     if (!whole_tint && (!no_tint || shade !=100))
1486     {
1487 sasha 1.55 XImage *image = XGetImage (dpy, bgPixmap.pixmap, 0, 0, szHint.width, szHint.height, AllPlanes, ZPixmap);
1488 sasha 1.52 success = False;
1489     if (image != NULL)
1490     {
1491     PRINT_BACKGROUND_OP_TIME;
1492     if (gc == NULL)
1493     gc = XCreateGC (dpy, vt, 0UL, &gcvalue);
1494     if (ISSET_PIXCOLOR (Color_tint) || shade != 100)
1495     ShadeXImage (this, image, shade, c.r, c.g, c.b);
1496 sasha 1.55 XPutImage (dpy, bgPixmap.pixmap, gc, image, 0, 0, 0, 0, image->width, image->height);
1497 sasha 1.52 XDestroyImage (image);
1498     success = True;
1499     }
1500     }
1501 ayin 1.39 #endif /* HAVE_AFTERIMAGE */
1502 sasha 1.52 PRINT_BACKGROUND_OP_TIME;
1503    
1504 ayin 1.51 if (gc != NULL)
1505 ayin 1.39 XFreeGC (dpy, gc);
1506 sasha 1.63
1507 sasha 1.66 bgPixmap.apply();
1508 ayin 1.39 if (!success)
1509     am_pixmap_trans = 0;
1510     else
1511     {
1512     am_transparent = am_pixmap_trans = 1;
1513     }
1514 sasha 1.52 } /* rootpixmap != None */
1515 ayin 1.39
1516     if (am_pixmap_trans)
1517     {
1518 sasha 1.63 if (scrollBar.win)
1519     {
1520     scrollBar.setIdle ();
1521     scrollbar_show (0);
1522     }
1523 ayin 1.39
1524 sasha 1.63 if (am_transparent)
1525     {
1526     want_refresh = want_full_refresh = 1;
1527     if (am_pixmap_trans)
1528     flush ();
1529     }
1530 ayin 1.39 }
1531 sasha 1.66 #endif
1532 ayin 1.39 }
1533     #endif