ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/rxvt-unicode/src/xpm.C
(Generate patch)

Comparing rxvt-unicode/src/xpm.C (file contents):
Revision 1.8 by pcg, Mon Feb 9 07:11:49 2004 UTC vs.
Revision 1.67 by sasha, Tue Aug 14 14:06:51 2007 UTC

1/*--------------------------------*-C-*---------------------------------* 1/*----------------------------------------------------------------------*
2 * File: xpm.c 2 * File: xpm.C
3 *----------------------------------------------------------------------* 3 *----------------------------------------------------------------------*
4 * $Id: xpm.C,v 1.8 2004/02/09 07:11:49 pcg Exp $
5 * 4 *
6 * All portions of code are copyright by their respective author/s. 5 * All portions of code are copyright by their respective author/s.
7 * Copyright (c) 1997 Carsten Haitzler <raster@zip.com.au> 6 * Copyright (c) 1997 Carsten Haitzler <raster@zip.com.au>
8 * Copyright (c) 1997,1998 Oezguer Kesim <kesim@math.fu-berlin.de> 7 * Copyright (c) 1997,1998 Oezguer Kesim <kesim@math.fu-berlin.de>
9 * Copyright (c) 1998-2001 Geoff Wing <gcw@pobox.com> 8 * Copyright (c) 1998-2001 Geoff Wing <gcw@pobox.com>
9 * Copyright (c) 2005-2006 Marc Lehmann <pcg@goof.com>
10 * 10 *
11 * This program is free software; you can redistribute it and/or modify 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 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 13 * the Free Software Foundation; either version 2 of the License, or
14 * (at your option) any later version. 14 * (at your option) any later version.
23 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. 23 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
24 *---------------------------------------------------------------------*/ 24 *---------------------------------------------------------------------*/
25 25
26#include "../config.h" /* NECESSARY */ 26#include "../config.h" /* NECESSARY */
27#include "rxvt.h" /* NECESSARY */ 27#include "rxvt.h" /* NECESSARY */
28#include "xpm.intpro" /* PROTOS for internal routines */
29
30#ifdef XPM_BACKGROUND
31 28
32/* 29/*
33 * These GEOM strings indicate absolute size/position: 30 * Pixmap geometry string interpretation :
34 * @ `WxH+X+Y' 31 * Each geometry string contains zero or one scale/position
35 * @ `WxH+X' -> Y = X 32 * adjustment and may optionally be followed by a colon and one or more
36 * @ `WxH' -> Y = X = 50 33 * colon-delimited pixmap operations.
37 * @ `W+X+Y' -> H = W 34 * The following table shows the valid geometry strings and their
38 * @ `W+X' -> H = W, Y = X 35 * affects on the background image :
39 * @ `W' -> H = W, X = Y = 50
40 * @ `0xH' -> H *= H/100, X = Y = 50 (W unchanged)
41 * @ `Wx0' -> W *= W/100, X = Y = 50 (H unchanged)
42 * @ `=+X+Y' -> (H, W unchanged)
43 * @ `=+X' -> Y = X (H, W unchanged)
44 * 36 *
45 * These GEOM strings adjust position relative to current position: 37 * WxH+X+Y Set scaling to W% by H%, and position to X% by Y%.
46 * @ `+X+Y' 38 * W and H are percentages of the terminal window size.
47 * @ `+X' -> Y = X 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
48 * 46 *
49 * And this GEOM string is for querying current scale/position: 47 * Adjusting position only :
50 * @ `?' 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 * +X Adjust position horizontally X% and vertically X%
53 * from current position.
54 *
55 * 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 */
72
73#ifdef HAVE_BG_PIXMAP
74bool
75bgPixmap_t::window_size_sensitive ()
76{
77# ifdef XPM_BACKGROUND
78# ifdef HAVE_AFTERIMAGE
79 if (original_asim != NULL)
80# endif
81 {
82 if (h_scale != 0 || v_scale != 0)
83 return true;
84 }
85# endif
86# ifdef ENABLE_TRANSPARENCY
87 if (flags & isTransparent)
88 return true;
89# endif
90 return false;
91}
92
93# ifdef XPM_BACKGROUND
94static inline bool
95check_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
110static inline bool
111check_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
128static inline int
129make_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 return window_size - image_size - diff * (100 - align) / 100;
138 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
145static inline int
146make_clip_rectangle (int pos, int size, int target_size, int &dst_pos, int &dst_size)
147{
148 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}
163
164bool
165bgPixmap_t::set_geometry (const char *geom)
166{
167 int geom_flags = 0, changed = 0;
168 int x = 0, y = 0;
169 unsigned int w = 0, h = 0;
170 unsigned int n;
171 unsigned long new_flags = (flags & (~geometryFlags));
172 char *p;
173# define MAXLEN_GEOM 256 /* could be longer then regular geometry string */
174
175 if (geom == NULL)
176 return false;
177
178 char str[MAXLEN_GEOM];
179
180 while (isspace(*geom)) ++geom;
181 if ((p = strchr (geom, ';')) == NULL)
182 p = strchr (geom, '\0');
183
184 n = (p - geom);
185 if (n < MAXLEN_GEOM)
186 {
187 char *ops;
188 new_flags |= geometrySet;
189
190 strncpy (str, geom, n);
191 str[n] = '\0';
192 if (str[0] == ':')
193 ops = &str[0];
194 else if (str[0] != 'x' && str[0] != 'X' && isalpha(str[0]))
195 ops = &str[0];
196 else
197 {
198 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 }
207
208 if (ops > str || ops == NULL)
209 {
210 /* we have geometry string - let's handle it prior to applying ops */
211 geom_flags = XParseGeometry (str, &x, &y, &w, &h);
212
213 if ((geom_flags & XValue) && !(geom_flags & YValue))
214 {
215 y = x;
216 geom_flags |= YValue;
217 }
218
219 if (flags & geometrySet)
220 {/* 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 }
243 else /* setting up geometry from scratch */
244 {
245 if (!(geom_flags & XValue))
246 {/* use default geometry - centered */
247 x = y = defaultAlign;
248 }
249 else if (!(geom_flags & YValue))
250 y = x;
251
252 if ((geom_flags & (WidthValue|HeightValue)) == 0)
253 {/* use default geometry - scaled */
254 w = h = defaultScale;
255 }
256 else if (geom_flags & WidthValue)
257 {
258 if (!(geom_flags & HeightValue))
259 h = w;
260 }
261 else
262 w = h;
263 }
264 } /* done parsing geometry string */
265 else if (!(flags & geometrySet))
266 { /* default geometry - scaled and centered */
267 x = y = defaultAlign;
268 w = h = defaultScale;
269 }
270
271 if (!(flags & geometrySet))
272 geom_flags |= WidthValue|HeightValue|XValue|YValue;
273
274 if (ops)
275 {
276 while (*ops)
277 {
278 while (*ops == ':' || isspace(*ops)) ++ops;
279# define CHECK_GEOM_OPS(op_str) (strncasecmp (ops, (op_str), sizeof(op_str)-1) == 0)
280 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 new_flags |= propScale;
293 }
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# undef CHECK_GEOM_OPS
323 while (*ops != ':' && *ops != '\0') ++ops;
324 } /* done parsing ops */
325 }
326
327 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 }
336
337 if (new_flags != flags)
338 {
339 flags = new_flags;
340 changed++;
341 }
342//fprintf( stderr, "flags = %lX, scale = %ux%u, align=%+d%+d\n",
343// flags, h_scale, v_scale, h_align, v_align);
344 return (changed > 0);
345}
346
347# ifdef HAVE_AFTERIMAGE
348bool
349bgPixmap_t::render_asim (ASImage *background, ARGB32 background_tint)
350{
351 if (target == NULL)
352 return false;
353
354 int target_width = (int)target->szHint.width;
355 int target_height = (int)target->szHint.height;
356 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 int w = h_scale * target_width / 100;
362 int h = v_scale * target_height / 100;
363
364 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 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 {
376 if (background)
377 {
378 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 }
390 else
391 new_pmap_width = new_pmap_height = 0;
392 }
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 /* 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 }
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 while (x > 0) x -= (int)result->width;
441 layers[1].dst_x = x;
442 layers[1].clip_width = result->width+target_width;
443 }
444 else
445 {/* clip horizontally */
446 layers[1].dst_x = x;
447 layers[1].clip_width = result->width;
448 }
449 if (h <= 0)
450 {
451 while (y > 0) y -= (int)result->height;
452 layers[1].dst_y = y;
453 layers[1].clip_height = result->height + target_height;
454 }
455 else
456 {
457 layers[1].dst_y = y;
458 layers[1].clip_height = result->height;
459 }
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 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 {
511 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 }
523
524 /* put result on pixmap */
525 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
531 XFreeGC (target->dpy, gc);
532 }
533
534 return true;
535}
536# endif /* HAVE_AFTERIMAGE */
537
538bool
539bgPixmap_t::set_file (const char *file)
540{
541 char *f;
542
543 assert (file != NULL);
544
545 if (*file != '\0')
546 {
547# ifdef HAVE_AFTERIMAGE
548 if (target->asimman == NULL)
549 target->asimman = create_generic_imageman(target->rs[Rs_path]);
550 if ((f = strchr (file, ';')) == NULL)
551 original_asim = get_asimage( target->asimman, file, 0xFFFFFFFF, 100 );
552 else
553 {
554 size_t len = f - file;
555 f = (char *)malloc (len + 1);
556 strncpy (f, file, len);
557 f[len] = '\0';
558 original_asim = get_asimage( target->asimman, f, 0xFFFFFFFF, 100 );
559 free( f );
560 }
561 return (original_asim != NULL);
562# endif
563 }
564 return false;
565}
566
567# endif /* XPM_BACKGROUND */
568
569# ifdef ENABLE_TRANSPARENCY
570bool
571bgPixmap_t::set_transparent ()
572{
573 if (!(flags & isTransparent))
574 {
575 flags |= isTransparent;
576 return true;
577 }
578}
579
580bool
581bgPixmap_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
605static inline unsigned long
606compute_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
633bool
634bgPixmap_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
646bool
647bgPixmap_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
659bool
660bgPixmap_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/* 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 */
683unsigned long
684bgPixmap_t::make_transparency_pixmap ()
685{
686 unsigned long result = 0;
687
688 if (target == NULL)
689 return 0;
690
691 /* 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 int sx, sy;
703 XGCValues gcv;
704
705 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 return 0;
711
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
726 if (tiled_root_pmap == None) /* something really bad happened - abort */
727 return 0;
728
729 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 if (gc)
761 {
762 XCopyArea (dpy, src, tiled_root_pmap, gc, 0, 0, window_width, window_height, 0, 0);
763 success = true;
764 }
765 }
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 else
776 result |= transpPmapTiled;
777 }
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 if (gc)
788 {
789 XFillRectangle (dpy, tiled_root_pmap, gc, 0, 0, window_width, window_height);
790 result |= transpPmapTiled;
791 }
792 }
793
794 if (tiled_root_pmap != None)
795 {
796 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 if (gc)
815 {
816 XFillRectangle (dpy, tiled_root_pmap, gc, 0, 0, window_width, window_height);
817 result |= transpPmapTinted;
818 }
819 }
820 }
821 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
829 if (gc)
830 XFreeGC (dpy, gc);
831
832 return result;
833}
834
835bool
836bgPixmap_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# endif /* ENABLE_TRANSPARENCY */
852
853# ifndef HAVE_AFTERIMAGE
854static void ShadeXImage(rxvt_term *term, XImage* srcImage, int shade, int rm, int gm, int bm);
855#endif
856
857
858bool
859bgPixmap_t::render ()
860{
861 unsigned long background_flags = 0;
862
863 if (target == NULL)
864 return false;
865
866 invalidate();
867# ifdef ENABLE_TRANSPARENCY
868 if (flags & isTransparent)
869 {
870 /* we need to re-generate transparency pixmap in that case ! */
871 background_flags = make_transparency_pixmap ();
872 if (background_flags == 0)
873 return false;
874 else if ((background_flags & transpTransformations) == (flags & transpTransformations)
875 && pmap_depth == target->depth)
876 flags = flags & ~isInvalid;
877 }
878# endif
879
880 XImage *result = NULL;
881# ifdef HAVE_AFTERIMAGE
882 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 tint.get (c);
897 as_shade.tintColor.red = c.r;
898 as_shade.tintColor.green = c.g;
899 as_shade.tintColor.blue = c.b;
900
901 as_tint = shading2tint32 (&as_shade);
902 }
903 if (render_asim (background, as_tint))
904 flags = flags & ~isInvalid;
905 if (background)
906 destroy_asimage (&background);
907 }
908 else if (background_flags && pmap_depth != target->depth)
909 {
910 result = XGetImage (target->dpy, pixmap, 0, 0, pmap_width, pmap_height, AllPlanes, ZPixmap);
911 }
912# else /* our own client-side tinting */
913 if (background_flags && (flags & isInvalid))
914 {
915 result = XGetImage (target->dpy, pixmap, 0, 0, pmap_width, pmap_height, AllPlanes, ZPixmap);
916 if (result != NULL && !(background_flags & transpPmapTinted) && (flags & tintNeeded))
917 {
918 rgba c (rgba::MAX_CC,rgba::MAX_CC,rgba::MAX_CC);
919 tint.get (c);
920 ShadeXImage (target, result, shade, c.r, c.g, c.b);
921 }
922 }
923# endif
924 if (result != NULL)
925 {
926 GC gc = XCreateGC (target->dpy, target->vt, 0UL, NULL);
927 if (gc)
928 {
929 if (pmap_depth != target->depth && pixmap != None)
930 {
931 XFreePixmap (target->dpy, pixmap);
932 pixmap = None;
933 }
934 if (pixmap == None)
935 {
936 pixmap = XCreatePixmap (target->dpy, target->vt, result->width, result->height, target->depth);
937 pmap_width = result->width;
938 pmap_height = result->height;
939 pmap_depth = target->depth;
940 }
941 XPutImage (target->dpy, pixmap, gc, result, 0, 0, 0, 0, result->width, result->height);
942 XFreeGC (target->dpy, gc);
943 flags = flags & ~isInvalid;
944 }
945 XDestroyImage (result);
946 }
947
948 if (flags & isInvalid)
949 {
950 if (pixmap != None)
951 {
952 XFreePixmap (target->dpy, pixmap);
953 pixmap = None;
954 }
955// TODO : we need to get rid of that garbadge :
956 target->am_transparent = target->am_pixmap_trans = 0;
957 }
958 else
959 target->am_transparent = target->am_pixmap_trans = 1;
960
961 apply ();
962
963 return true;
964}
965
966bool
967bgPixmap_t::set_target (rxvt_term *new_target)
968{
969 if (new_target)
970 if (target != new_target)
971 {
972 target = new_target;
973# ifdef ENABLE_TRANSPARENCY
974 root_depth = DefaultDepthOfScreen (ScreenOfDisplay (target->dpy, target->display->screen));
975# endif
976 return true;
977 }
978 return false;
979}
980
981void
982bgPixmap_t::apply()
983{
984 if (target)
985 {
986 if (pixmap != None)
987 { /* set target's background to pixmap */
988# ifdef ENABLE_TRANSPARENCY
989 if (flags & isTransparent)
990 {
991 XSetWindowBackgroundPixmap (target->dpy, target->parent[0], pixmap);
992 XSetWindowBackgroundPixmap (target->dpy, target->vt, ParentRelative);
993# if HAVE_SCROLLBARS
994 if (target->scrollBar.win)
995 XSetWindowBackgroundPixmap (target->dpy, target->scrollBar.win, ParentRelative);
996# endif
997 }
998 else
999# endif
1000 {
1001 /* force old pixmap dereference in case it was transparent before :*/
1002 XSetWindowBackground (target->dpy, target->parent[0], target->pix_colors[Color_border]);
1003 XSetWindowBackgroundPixmap (target->dpy, target->vt, pixmap);
1004 /* do we also need to set scrollbar's background here ? */
1005# if HAVE_SCROLLBARS
1006 if (target->scrollBar.win)
1007 XSetWindowBackground (target->dpy, target->scrollBar.win, target->pix_colors[Color_border]);
1008# endif
1009 }
1010 }
1011 else
1012 { /* set target background to a pixel */
1013 XSetWindowBackground (target->dpy, target->parent[0], target->pix_colors[Color_border]);
1014 XSetWindowBackground (target->dpy, target->vt, target->pix_colors[Color_bg]);
1015 /* do we also need to set scrollbar's background here ? */
1016# if HAVE_SCROLLBARS
1017 if (target->scrollBar.win)
1018 XSetWindowBackground (target->dpy, target->scrollBar.win, target->pix_colors[Color_border]);
1019# endif
1020 }
1021 /* don't want Expose on the parent */
1022 XClearArea (target->dpy, target->parent[0], 0, 0, 0, 0, False);
1023 /* do want Expose on the vt */
1024 XClearArea (target->dpy, target->parent[0], 0, 0, 0, 0, True);
1025#if HAVE_SCROLLBARS
1026 if (target->scrollBar.win)
1027 {
1028 target->scrollBar.setIdle ();
1029 target->scrollbar_show (0);
1030 }
1031#endif
1032 target->want_refresh = target->want_full_refresh = 1;
1033 target->flush ();
1034 }
1035}
1036#endif /* HAVE_BG_PIXMAP */
1037
1038
1039void
1040rxvt_term::get_window_origin (int &x, int &y)
1041{
1042 Window cr;
1043 XTranslateCoordinates (dpy, parent[0], display->root, 0, 0, &x, &y, &cr);
1044}
1045
1046Pixmap
1047rxvt_term::get_pixmap_property (int prop_id)
1048{
1049 if (prop_id > 0 && prop_id < NUM_XA)
1050 if (xa[prop_id])
1051 {
1052 int aformat, rootdepth;
1053 unsigned long nitems, bytes_after;
1054 Atom atype;
1055 unsigned char *prop = NULL;
1056 int result = XGetWindowProperty (dpy, display->root, xa[prop_id],
1057 0L, 1L, False, XA_PIXMAP, &atype, &aformat,
1058 &nitems, &bytes_after, &prop);
1059 if (result == Success && prop && atype == XA_PIXMAP)
1060 {
1061 return *(Pixmap *)prop;
1062 }
1063 }
1064 return None;
1065}
1066
1067
1068#ifdef ENABLE_TRANSPARENCY
1069#ifndef HAVE_AFTERIMAGE
1070/* taken from aterm-0.4.2 */
1071
1072typedef uint32_t RUINT32T;
1073
1074static void
1075ShadeXImage(rxvt_term *term, XImage* srcImage, int shade, int rm, int gm, int bm)
1076{
1077 int sh_r, sh_g, sh_b;
1078 RUINT32T mask_r, mask_g, mask_b;
1079 RUINT32T *lookup, *lookup_r, *lookup_g, *lookup_b;
1080 unsigned int lower_lim_r, lower_lim_g, lower_lim_b;
1081 unsigned int upper_lim_r, upper_lim_g, upper_lim_b;
1082 int i;
1083
1084 Visual *visual = term->visual;
1085
1086 if (visual->c_class != TrueColor || srcImage->format != ZPixmap) return ;
1087
1088 if (shade == 0)
1089 shade = 100;
1090
1091 /* for convenience */
1092 mask_r = visual->red_mask;
1093 mask_g = visual->green_mask;
1094 mask_b = visual->blue_mask;
1095
1096 /* boring lookup table pre-initialization */
1097 switch (srcImage->bits_per_pixel) {
1098 case 15:
1099 if ((mask_r != 0x7c00) ||
1100 (mask_g != 0x03e0) ||
1101 (mask_b != 0x001f))
1102 return;
1103 lookup = (RUINT32T *) malloc (sizeof (RUINT32T)*(32+32+32));
1104 lookup_r = lookup;
1105 lookup_g = lookup+32;
1106 lookup_b = lookup+32+32;
1107 sh_r = 10;
1108 sh_g = 5;
1109 sh_b = 0;
1110 break;
1111 case 16:
1112 if ((mask_r != 0xf800) ||
1113 (mask_g != 0x07e0) ||
1114 (mask_b != 0x001f))
1115 return;
1116 lookup = (RUINT32T *) malloc (sizeof (RUINT32T)*(32+64+32));
1117 lookup_r = lookup;
1118 lookup_g = lookup+32;
1119 lookup_b = lookup+32+64;
1120 sh_r = 11;
1121 sh_g = 5;
1122 sh_b = 0;
1123 break;
1124 case 24:
1125 if ((mask_r != 0xff0000) ||
1126 (mask_g != 0x00ff00) ||
1127 (mask_b != 0x0000ff))
1128 return;
1129 lookup = (RUINT32T *) malloc (sizeof (RUINT32T)*(256+256+256));
1130 lookup_r = lookup;
1131 lookup_g = lookup+256;
1132 lookup_b = lookup+256+256;
1133 sh_r = 16;
1134 sh_g = 8;
1135 sh_b = 0;
1136 break;
1137 case 32:
1138 if ((mask_r != 0xff0000) ||
1139 (mask_g != 0x00ff00) ||
1140 (mask_b != 0x0000ff))
1141 return;
1142 lookup = (RUINT32T *) malloc (sizeof (RUINT32T)*(256+256+256));
1143 lookup_r = lookup;
1144 lookup_g = lookup+256;
1145 lookup_b = lookup+256+256;
1146 sh_r = 16;
1147 sh_g = 8;
1148 sh_b = 0;
1149 break;
1150 default:
1151 return; /* we do not support this color depth */
1152 }
1153
1154 /* prepare limits for color transformation (each channel is handled separately) */
1155 if (shade < 0) {
1156 shade = -shade;
1157 if (shade < 0) shade = 0;
1158 if (shade > 100) shade = 100;
1159
1160 lower_lim_r = 65535-rm;
1161 lower_lim_g = 65535-gm;
1162 lower_lim_b = 65535-bm;
1163
1164 lower_lim_r = 65535-(unsigned int)(((RUINT32T)lower_lim_r)*((RUINT32T)shade)/100);
1165 lower_lim_g = 65535-(unsigned int)(((RUINT32T)lower_lim_g)*((RUINT32T)shade)/100);
1166 lower_lim_b = 65535-(unsigned int)(((RUINT32T)lower_lim_b)*((RUINT32T)shade)/100);
1167
1168 upper_lim_r = upper_lim_g = upper_lim_b = 65535;
1169 } else {
1170 if (shade < 0) shade = 0;
1171 if (shade > 100) shade = 100;
1172
1173 lower_lim_r = lower_lim_g = lower_lim_b = 0;
1174
1175 upper_lim_r = (unsigned int)((((RUINT32T)rm)*((RUINT32T)shade))/100);
1176 upper_lim_g = (unsigned int)((((RUINT32T)gm)*((RUINT32T)shade))/100);
1177 upper_lim_b = (unsigned int)((((RUINT32T)bm)*((RUINT32T)shade))/100);
1178 }
1179
1180 /* switch red and blue bytes if necessary, we need it for some weird XServers like XFree86 3.3.3.1 */
1181 if ((srcImage->bits_per_pixel == 24) && (mask_r >= 0xFF0000 ))
1182 {
1183 unsigned int tmp;
1184
1185 tmp = lower_lim_r;
1186 lower_lim_r = lower_lim_b;
1187 lower_lim_b = tmp;
1188
1189 tmp = upper_lim_r;
1190 upper_lim_r = upper_lim_b;
1191 upper_lim_b = tmp;
1192 }
1193
1194 /* fill our lookup tables */
1195 for (i = 0; i <= mask_r>>sh_r; i++)
1196 {
1197 RUINT32T tmp;
1198 tmp = ((RUINT32T)i)*((RUINT32T)(upper_lim_r-lower_lim_r));
1199 tmp += ((RUINT32T)(mask_r>>sh_r))*((RUINT32T)lower_lim_r);
1200 lookup_r[i] = (tmp/65535)<<sh_r;
1201 }
1202 for (i = 0; i <= mask_g>>sh_g; i++)
1203 {
1204 RUINT32T tmp;
1205 tmp = ((RUINT32T)i)*((RUINT32T)(upper_lim_g-lower_lim_g));
1206 tmp += ((RUINT32T)(mask_g>>sh_g))*((RUINT32T)lower_lim_g);
1207 lookup_g[i] = (tmp/65535)<<sh_g;
1208 }
1209 for (i = 0; i <= mask_b>>sh_b; i++)
1210 {
1211 RUINT32T tmp;
1212 tmp = ((RUINT32T)i)*((RUINT32T)(upper_lim_b-lower_lim_b));
1213 tmp += ((RUINT32T)(mask_b>>sh_b))*((RUINT32T)lower_lim_b);
1214 lookup_b[i] = (tmp/65535)<<sh_b;
1215 }
1216
1217 /* apply table to input image (replacing colors by newly calculated ones) */
1218 switch (srcImage->bits_per_pixel)
1219 {
1220 case 15:
1221 {
1222 unsigned short *p1, *pf, *p, *pl;
1223 p1 = (unsigned short *) srcImage->data;
1224 pf = (unsigned short *) (srcImage->data + srcImage->height * srcImage->bytes_per_line);
1225 while (p1 < pf)
1226 {
1227 p = p1;
1228 pl = p1 + srcImage->width;
1229 for (; p < pl; p++)
1230 {
1231 *p = lookup_r[(*p & 0x7c00)>>10] |
1232 lookup_g[(*p & 0x03e0)>> 5] |
1233 lookup_b[(*p & 0x001f)];
1234 }
1235 p1 = (unsigned short *) ((char *) p1 + srcImage->bytes_per_line);
1236 }
1237 break;
1238 }
1239 case 16:
1240 {
1241 unsigned short *p1, *pf, *p, *pl;
1242 p1 = (unsigned short *) srcImage->data;
1243 pf = (unsigned short *) (srcImage->data + srcImage->height * srcImage->bytes_per_line);
1244 while (p1 < pf)
1245 {
1246 p = p1;
1247 pl = p1 + srcImage->width;
1248 for (; p < pl; p++)
1249 {
1250 *p = lookup_r[(*p & 0xf800)>>11] |
1251 lookup_g[(*p & 0x07e0)>> 5] |
1252 lookup_b[(*p & 0x001f)];
1253 }
1254 p1 = (unsigned short *) ((char *) p1 + srcImage->bytes_per_line);
1255 }
1256 break;
1257 }
1258 case 24:
1259 {
1260 unsigned char *p1, *pf, *p, *pl;
1261 p1 = (unsigned char *) srcImage->data;
1262 pf = (unsigned char *) (srcImage->data + srcImage->height * srcImage->bytes_per_line);
1263 while (p1 < pf)
1264 {
1265 p = p1;
1266 pl = p1 + srcImage->width * 3;
1267 for (; p < pl; p += 3)
1268 {
1269 p[0] = lookup_r[(p[0] & 0xff0000)>>16];
1270 p[1] = lookup_r[(p[1] & 0x00ff00)>> 8];
1271 p[2] = lookup_r[(p[2] & 0x0000ff)];
1272 }
1273 p1 = (unsigned char *) ((char *) p1 + srcImage->bytes_per_line);
1274 }
1275 break;
1276 }
1277 case 32:
1278 {
1279 RUINT32T *p1, *pf, *p, *pl;
1280 p1 = (RUINT32T *) srcImage->data;
1281 pf = (RUINT32T *) (srcImage->data + srcImage->height * srcImage->bytes_per_line);
1282
1283 while (p1 < pf)
1284 {
1285 p = p1;
1286 pl = p1 + srcImage->width;
1287 for (; p < pl; p++)
1288 {
1289 *p = lookup_r[(*p & 0xff0000)>>16] |
1290 lookup_g[(*p & 0x00ff00)>> 8] |
1291 lookup_b[(*p & 0x0000ff)] |
1292 (*p & ~0xffffff);
1293 }
1294 p1 = (RUINT32T *) ((char *) p1 + srcImage->bytes_per_line);
1295 }
1296 break;
1297 }
1298 }
1299
1300 free (lookup);
1301}
1302#endif
1303
1304/*
1305 * Check our parents are still who we think they are.
1306 * Do transparency updates if required
51 */ 1307 */
52int 1308int
53rxvt_term::scale_pixmap (const char *geom) 1309rxvt_term::check_our_parents ()
54{ 1310{
55 int flags, changed = 0; 1311 check_our_parents_ev.stop ();
56 int x = 0, y = 0; 1312 check_our_parents_ev.start (NOW + .1);
57 unsigned int w = 0, h = 0;
58 unsigned int n;
59 char *p, *str;
60 bgPixmap_t *bgpixmap = &(bgPixmap);
61
62#define MAXLEN_GEOM sizeof("[1000x1000+1000+1000]")
63
64 if (geom == NULL)
65 return 0; 1313 return 0;
66 str = (char *)rxvt_malloc (MAXLEN_GEOM + 1); 1314}
67 if (!STRCMP(geom, "?")) 1315
68 { 1316void
69 sprintf(str, "[%dx%d+%d+%d]", /* can't presume snprintf() ! */ 1317rxvt_term::check_our_parents_cb (time_watcher &w)
70 min(bgpixmap->w, 9999), min(bgpixmap->h, 9999), 1318{
71 min(bgpixmap->x, 9999), min(bgpixmap->y, 9999)); 1319#if 0 /* replaced by a bgPixmap_t::render() - leve here temporarily for reference */
72 xterm_seq (XTerm_title, str, CHAR_ST); 1320
73 free(str); 1321 int i, aformat, rootdepth;
74 return 0; 1322 unsigned long nitems, bytes_after;
1323 Atom atype;
1324 unsigned char *prop = NULL;
1325 Window root, oldp, *list;
1326 Pixmap rootpixmap = None;
1327 XWindowAttributes wattr, wrootattr;
1328 int sx, sy;
1329 Window cr;
1330 unsigned int rootpixmap_w = 0, rootpixmap_h = 0;
1331
1332 if (!option (Opt_transparent))
1333 return; /* Don't try any more */
1334#if 0
1335 struct timeval stv;
1336 gettimeofday (&stv,NULL);
1337#define PRINT_BACKGROUND_OP_TIME do{ struct timeval tv;gettimeofday (&tv,NULL); tv.tv_sec-= stv.tv_sec;\
1338 fprintf (stderr,"%d: elapsed %ld usec\n",__LINE__,\
1339 tv.tv_sec*1000000+tv.tv_usec-stv.tv_usec );}while(0)
1340#else
1341#define PRINT_BACKGROUND_OP_TIME do{}while(0)
1342#endif
1343
1344
1345 XGetWindowAttributes (dpy, display->root, &wrootattr);
1346 rootdepth = wrootattr.depth;
1347
1348 XGetWindowAttributes (dpy, parent[0], &wattr);
1349
1350 if (rootdepth != wattr.depth)
75 } 1351 {
76 1352 if (am_transparent)
77 if ((p = STRCHR(geom, ';')) == NULL) 1353 {
78 p = STRCHR(geom, '\0'); 1354 XSetWindowBackground (dpy, vt, pix_colors_focused[Color_bg]);
79 n = (p - geom); 1355 am_transparent = am_pixmap_trans = 0;
80 if (n <= MAXLEN_GEOM)
81 {
82 STRNCPY(str, geom, n);
83 str[n] = '\0';
84
85 flags = XParseGeometry(str, &x, &y, &w, &h);
86 if (!flags)
87 { 1356 }
88 flags |= WidthValue; 1357
89 w = 0; 1358 return; /* Don't try any more */
90 } /* default is tile */ 1359 }
91 if (flags & WidthValue) 1360
1361 /* Get all X ops out of the queue so that our information is up-to-date. */
1362 XSync (dpy, False);
1363
1364 XTranslateCoordinates (dpy, parent[0], display->root,
1365 0, 0, &sx, &sy, &cr);
1366 /* check if we are outside of the visible part of the virtual screen : */
1367 if( sx + (int)szHint.width <= 0 || sy + (int)szHint.height <= 0
1368 || sx >= wrootattr.width || sy >= wrootattr.height )
1369 return /* 0 */ ;
1370 /*
1371 * Make the frame window set by the window manager have
1372 * the root background. Some window managers put multiple nested frame
1373 * windows for each client, so we have to take care about that.
1374 */
1375 i = (xa[XA_XROOTPMAP_ID]
1376 && XGetWindowProperty (dpy, display->root, xa[XA_XROOTPMAP_ID],
1377 0L, 1L, False, XA_PIXMAP, &atype, &aformat,
1378 &nitems, &bytes_after, &prop) == Success);
1379
1380 if (!i || prop == NULL)
1381 i = (xa[XA_ESETROOT_PMAP_ID]
1382 && XGetWindowProperty (dpy, display->root, xa[XA_ESETROOT_PMAP_ID],
1383 0L, 1L, False, XA_PIXMAP, &atype, &aformat,
1384 &nitems, &bytes_after, &prop) == Success);
1385
1386 if (!i || prop == NULL)
1387 rootpixmap = None;
1388 else
1389 {
1390 int junk;
1391 unsigned int ujunk;
1392 /* root pixmap may be bad - allow a error */
1393 allowedxerror = -1;
1394 if ((rootpixmap = *(Pixmap *)prop) != None)
1395 if (!XGetGeometry (dpy, rootpixmap, &root, &junk, &junk, &rootpixmap_w, &rootpixmap_h, &ujunk, &ujunk))
1396 rootpixmap = None;
1397 allowedxerror = 0;
1398 }
1399
1400 if (prop != NULL)
1401 XFree (prop);
1402
1403 if (rootpixmap != None)
1404 {
1405 Bool success = False;
1406 GC gc = NULL;
1407 XGCValues gcvalue;
1408 int shade = 100;
1409 rgba c (rgba::MAX_CC,rgba::MAX_CC,rgba::MAX_CC);
1410 Bool whole_tint = False, no_tint = True;
1411
1412 while (sx < 0) sx += (int)wrootattr.width;
1413 while (sy < 0) sy += (int)wrootattr.height;
1414
1415 if (rs[Rs_shade])
1416 shade = atoi (rs[Rs_shade]);
1417 if (ISSET_PIXCOLOR (Color_tint))
1418 pix_colors_focused [Color_tint].get (c);
1419#define IS_COMPONENT_WHOLESOME(c) ((c) <=0x000700 || (c)>=0x00f700)
1420 if (shade >= 100)
1421 whole_tint = (IS_COMPONENT_WHOLESOME(c.r)
1422 && IS_COMPONENT_WHOLESOME(c.g)
1423 && IS_COMPONENT_WHOLESOME(c.b));
1424 no_tint = (c.r >= 0x00f700 && c.g >= 0x00f700 && c.b >= 0x00f700);
1425#undef IS_COMPONENT_WHOLESOME
1426
1427 bgPixmap.make_transparency_pixmap();
1428
1429 if (whole_tint && !no_tint)
1430 {
92 { 1431 }
93 if (!(flags & XValue)) 1432 success = True;
94 x = 50; 1433#ifdef HAVE_AFTERIMAGE
95 if (!(flags & HeightValue)) 1434 if (rs[Rs_blurradius] || bgPixmap.original_asim != NULL || (!whole_tint && (!no_tint || shade !=100)))
96 h = w;
97 if (w && !h)
98 { 1435 {
99 w = (bgpixmap->w * w) / 100; 1436 ARGB32 tint = TINT_LEAVE_SAME;
100 h = bgpixmap->h; 1437 ASImage *back_im = NULL;
1438
1439 back_im = pixmap2ximage (asv, bgPixmap.pixmap, 0, 0, szHint.width, szHint.height, AllPlanes, 100);
1440 if (back_im != NULL)
101 } 1441 {
102 else if (h && !w) 1442 if (!whole_tint && (!no_tint || shade !=100))
103 { 1443 {
104 w = bgpixmap->w; 1444 ShadingInfo as_shade;
105 h = (bgpixmap->h * h) / 100; 1445 as_shade.shading = shade;
1446 as_shade.tintColor.red = c.r;
1447 as_shade.tintColor.green = c.g;
1448 as_shade.tintColor.blue = c.b;
1449 tint = shading2tint32 (&as_shade);
1450 }
1451
1452 if (rs[Rs_blurradius] && back_im)
1453 {
1454 ASImage* tmp;
1455 int junk;
1456 unsigned int hr = 1, vr = 1;
1457 int flags = XParseGeometry (rs[Rs_blurradius], &junk, &junk, &hr, &vr);
1458 if (!(flags&WidthValue))
1459 hr = 1;
1460 if (!(flags&HeightValue))
1461 vr = hr;
1462 tmp = blur_asimage_gauss (asv, back_im, hr, vr, 0xFFFFFFFF,
1463 (bgPixmap.original_asim == NULL || tint == TINT_LEAVE_SAME)?ASA_XImage:ASA_ASImage,
1464 100, ASIMAGE_QUALITY_DEFAULT);
1465 if (tmp)
1466 {
1467 destroy_asimage (&back_im);
1468 back_im = tmp;
1469 }
1470 }
1471 /* TODO: temporary fix - redo the logic, so that same function can do both
1472 transparency and non-transparency */
1473 bgPixmap.render_asim (back_im, tint);
1474 destroy_asimage (&back_im);
1475
1476 } /* back_im != NULL */
1477 else
1478 success = False;
1479 }
1480#else /* HAVE_AFTERIMAGE */
1481 if (!whole_tint && (!no_tint || shade !=100))
1482 {
1483 XImage *image = XGetImage (dpy, bgPixmap.pixmap, 0, 0, szHint.width, szHint.height, AllPlanes, ZPixmap);
1484 success = False;
1485 if (image != NULL)
106 } 1486 {
107 if (w > 1000) 1487 PRINT_BACKGROUND_OP_TIME;
108 w = 1000; 1488 if (gc == NULL)
109 if (h > 1000) 1489 gc = XCreateGC (dpy, vt, 0UL, &gcvalue);
110 h = 1000; 1490 if (ISSET_PIXCOLOR (Color_tint) || shade != 100)
111 if (bgpixmap->w != (short)w) 1491 ShadeXImage (this, image, shade, c.r, c.g, c.b);
1492 XPutImage (dpy, bgPixmap.pixmap, gc, image, 0, 0, 0, 0, image->width, image->height);
1493 XDestroyImage (image);
1494 success = True;
112 { 1495 }
113 bgpixmap->w = (short)w;
114 changed++;
115 }
116 if (bgpixmap->h != (short)h)
117 {
118 bgpixmap->h = (short)h;
119 changed++;
120 }
121 }
122 if (!(flags & YValue))
123 { 1496 }
124 if (flags & XNegative) 1497#endif /* HAVE_AFTERIMAGE */
125 flags |= YNegative; 1498 PRINT_BACKGROUND_OP_TIME;
126 y = x; 1499
1500 if (gc != NULL)
1501 XFreeGC (dpy, gc);
127 } 1502
128 1503 bgPixmap.apply();
129 if (!(flags & WidthValue) && geom[0] != '=') 1504 if (!success)
130 { 1505 am_pixmap_trans = 0;
131 x += bgpixmap->x;
132 y += bgpixmap->y;
133 }
134 else 1506 else
135 { 1507 {
136 if (flags & XNegative) 1508 am_transparent = am_pixmap_trans = 1;
137 x += 100;
138 if (flags & YNegative)
139 y += 100;
140 }
141 MIN_IT(x, 100);
142 MIN_IT(y, 100);
143 MAX_IT(x, 0);
144 MAX_IT(y, 0);
145 if (bgpixmap->x != x)
146 { 1509 }
147 bgpixmap->x = x; 1510 } /* rootpixmap != None */
148 changed++; 1511
1512 if (am_pixmap_trans)
1513 {
1514 if (scrollBar.win)
149 } 1515 {
150 if (bgpixmap->y != y) 1516 scrollBar.setIdle ();
1517 scrollbar_show (0);
151 { 1518 }
152 bgpixmap->y = y; 1519
153 changed++; 1520 if (am_transparent)
154 } 1521 {
155 } 1522 want_refresh = want_full_refresh = 1;
156 free(str); 1523 if (am_pixmap_trans)
157 return changed; 1524 flush ();
158}
159
160void
161rxvt_term::resize_pixmap ()
162{
163 XGCValues gcvalue;
164 GC gc;
165 unsigned int width = TermWin_TotalWidth();
166 unsigned int height = TermWin_TotalHeight();
167
168 if (TermWin.pixmap != None)
169 XFreePixmap(display->display, TermWin.pixmap);
170
171 if (bgPixmap.pixmap == None)
172 { /* So be it: I'm not using pixmaps */
173 TermWin.pixmap = None;
174 if (!(Options & Opt_transparent) || am_transparent == 0)
175 XSetWindowBackground(display->display, TermWin.vt,
176 PixColors[Color_bg]);
177 return;
178 }
179
180 gcvalue.foreground = PixColors[Color_bg];
181 gc = XCreateGC(display->display, TermWin.vt, GCForeground, &gcvalue);
182
183 if (bgPixmap.pixmap != None)
184 { /* we have a specified pixmap */
185 unsigned int w = bgPixmap.w, h = bgPixmap.h,
186 x = bgPixmap.x, y = bgPixmap.y;
187 unsigned int xpmh = xpmAttr.height,
188 xpmw = xpmAttr.width;
189
190 /*
191 * don't zoom pixmap too much nor expand really small pixmaps
192 */
193 if (w > 1000 || h > 1000)
194 w = 1;
195 else if (width > (10 * xpmw)
196 || height > (10 * xpmh))
197 w = 0; /* tile */
198
199 if (w == 0)
200 { 1525 }
201 /* basic X tiling - let the X server do it */
202 TermWin.pixmap = XCreatePixmap(display->display, TermWin.vt,
203 xpmw, xpmh,
204 (unsigned int)XDEPTH);
205 XCopyArea(display->display, bgPixmap.pixmap, TermWin.pixmap, gc,
206 0, 0, xpmw, xpmh, 0, 0);
207 }
208 else
209 {
210 float incr, p;
211 Pixmap tmp;
212
213 TermWin.pixmap = XCreatePixmap(display->display, TermWin.vt,
214 width, height,
215 (unsigned int)XDEPTH);
216 /*
217 * horizontal scaling
218 */
219 rxvt_pixmap_incr(&w, &x, &incr, &p, width, xpmw);
220
221 tmp = XCreatePixmap(display->display, TermWin.vt,
222 width, xpmh, (unsigned int)XDEPTH);
223 XFillRectangle(display->display, tmp, gc, 0, 0, width,
224 xpmh);
225
226 for ( /*nil */ ; x < w; x++, p += incr)
227 {
228 if (p >= xpmw)
229 p = 0;
230 /* copy one column from the original pixmap to the tmp pixmap */
231 XCopyArea(display->display, bgPixmap.pixmap, tmp, gc,
232 (int)p, 0, 1, xpmh, (int)x, 0);
233 }
234
235 /*
236 * vertical scaling
237 */
238 rxvt_pixmap_incr(&h, &y, &incr, &p, height, xpmh);
239
240 if (y > 0)
241 XFillRectangle(display->display, TermWin.pixmap, gc, 0, 0, width,
242 y);
243 if (h < height)
244 XFillRectangle(display->display, TermWin.pixmap, gc, 0, (int)h,
245 width, height - h + 1);
246 for ( /*nil */ ; y < h; y++, p += incr)
247 {
248 if (p >= xpmh)
249 p = 0;
250 /* copy one row from the tmp pixmap to the main pixmap */
251 XCopyArea(display->display, tmp, TermWin.pixmap, gc,
252 0, (int)p, width, 1, 0, (int)y);
253 }
254 XFreePixmap(display->display, tmp);
255 }
256 }
257 XSetWindowBackgroundPixmap(display->display, TermWin.vt, TermWin.pixmap);
258 XFreeGC(display->display, gc);
259 am_transparent = 0;
260
261 XClearWindow(display->display, TermWin.vt);
262
263 XSync(display->display, False);
264}
265
266/*
267 * Calculate tiling sizes and increments
268 * At start, p == 0, incr == xpmwidthheight
269 */
270/* INTPROTO */
271static void
272rxvt_pixmap_incr(unsigned int *wh, unsigned int *xy, float *incr, float *p, unsigned int widthheight, unsigned int xpmwidthheight)
273{
274 unsigned int cwh, cxy;
275 float cincr, cp;
276
277 cp = 0;
278 cincr = (float)xpmwidthheight;
279 cxy = *xy;
280 cwh = *wh;
281 if (cwh == 1)
282 { /* display one image, no horizontal/vertical scaling */
283 cincr = (float)widthheight;
284 if (xpmwidthheight <= widthheight)
285 {
286 cwh = xpmwidthheight;
287 cxy = (cxy * (widthheight - cwh)) / 100; /* beware! order */
288 cwh += cxy;
289 }
290 else
291 {
292 cxy = 0;
293 cwh = widthheight;
294 }
295 }
296 else if (cwh < 10)
297 { /* fit WH images across/down screen */
298 cincr *= cwh;
299 cxy = 0;
300 cwh = widthheight;
301 }
302 else
303 { 1526 }
304 cincr *= 100.0 / cwh; 1527#endif
305 if (cwh < 100)
306 { /* contract */
307 float pos;
308
309 cwh = (cwh * widthheight) / 100;
310 pos = (float)cxy / 100 * widthheight - (cwh / 2);
311
312 cxy = (widthheight - cwh);
313 if (pos <= 0)
314 cxy = 0;
315 else if (pos < cxy)
316 cxy = (int) pos;
317 cwh += cxy;
318 }
319 else
320 { /* expand */
321 if (cxy > 0)
322 { /* position */
323 float pos;
324
325 pos = (float)cxy / 100 * xpmwidthheight - (cincr / 2);
326 cp = xpmwidthheight - cincr;
327 if (pos <= 0)
328 cp = 0;
329 else if (pos < cp)
330 cp = pos;
331 }
332 cxy = 0;
333 cwh = widthheight;
334 }
335 }
336 cincr /= widthheight;
337 *wh = cwh;
338 *xy = cxy;
339 *incr = cincr;
340 *p = cp;
341} 1528}
342 1529#endif
343Pixmap
344rxvt_term::set_bgPixmap (const char *file)
345{
346 char *f;
347
348 assert(file != NULL);
349
350 if (bgPixmap.pixmap != None)
351 {
352 XFreePixmap(display->display, bgPixmap.pixmap);
353 bgPixmap.pixmap = None;
354 }
355 XSetWindowBackground(display->display, TermWin.vt, PixColors[Color_bg]);
356
357 if (*file != '\0')
358 {
359 /* XWindowAttributes attr; */
360
361 /*
362 * we already have the required attributes
363 */
364 /* XGetWindowAttributes(display->display, TermWin.vt, &attr); */
365
366 xpmAttr.closeness = 30000;
367 xpmAttr.colormap = XCMAP;
368 xpmAttr.visual = XVISUAL;
369 xpmAttr.depth = XDEPTH;
370 xpmAttr.valuemask = (XpmCloseness | XpmColormap | XpmVisual |
371 XpmDepth | XpmSize | XpmReturnPixels);
372
373 /* search environment variables here too */
374 f = (char *)rxvt_File_find(file, ".xpm", rs[Rs_path]);
375 if (f == NULL
376 || XpmReadFileToPixmap(display->display, display->root, f,
377 &bgPixmap.pixmap, NULL,
378 &xpmAttr))
379 {
380 char *p;
381
382 /* semi-colon delimited */
383 if ((p = STRCHR(file, ';')) == NULL)
384 p = STRCHR(file, '\0');
385
386 rxvt_print_error("couldn't load XPM file \"%.*s\"", (p - file),
387 file);
388 }
389 free(f);
390 }
391 resize_pixmap ();
392 return bgPixmap.pixmap;
393}
394
395#endif /* XPM_BACKGROUND */

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines