ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/rxvt-unicode/src/xpm.C
Revision: 1.70
Committed: Thu Aug 16 21:26:20 2007 UTC (16 years, 9 months ago) by sasha
Content type: text/plain
Branch: MAIN
Changes since 1.69: +60 -6 lines
Log Message:
reimplemted delayed rendering of the background pixmap with some logic to use different timeouts for different rendering algorithms

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