ViewVC Help

View File | Revision Log | Show Annotations | Download File

/cvs/rxvt-unicode/src/xpm.C

Comparing rxvt-unicode/src/xpm.C (file contents):
Revision 1.25 by root, Wed Dec 21 14:19:19 2005 UTC vs.
Revision 1.68 by sasha, Wed Aug 15 17:05:07 2007 UTC

1	/*--------------------------------*-C-*---------------------------------*	1	/*----------------------------------------------------------------------*
2	* File: xpm.C	2	* File: xpm.C
3	*----------------------------------------------------------------------*	3	*----------------------------------------------------------------------*
4	*	4	*
5	* All portions of code are copyright by their respective author/s.	5	* All portions of code are copyright by their respective author/s.
6	* Copyright (c) 1997 Carsten Haitzler <raster@zip.com.au>	6	* Copyright (c) 1997 Carsten Haitzler <raster@zip.com.au>
7	* Copyright (c) 1997,1998 Oezguer Kesim <kesim@math.fu-berlin.de>	7	* Copyright (c) 1997,1998 Oezguer Kesim <kesim@math.fu-berlin.de>
8	* 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>
9	*	10	*
10	* 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
11	* 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
12	* the Free Software Foundation; either version 2 of the License, or	13	* the Free Software Foundation; either version 2 of the License, or
13	* (at your option) any later version.	14	* (at your option) any later version.
…		…
23	*---------------------------------------------------------------------*/	24	*---------------------------------------------------------------------*/
24		25
25	#include "../config.h" /* NECESSARY */	26	#include "../config.h" /* NECESSARY */
26	#include "rxvt.h" /* NECESSARY */	27	#include "rxvt.h" /* NECESSARY */
27		28
28	#ifdef XPM_BACKGROUND
29
30	static void rxvt_pixmap_incr (unsigned int *wh, unsigned int *xy, float *incr, float *p, unsigned int widthheight, unsigned int xpmwidthheight);
31
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
		74	bool
		75	bgPixmap_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
		94	static inline bool
		95	check_set_scale_value (int geom_flags, int flag, unsigned int &scale, unsigned int new_value)
		96	{
		97	if (geom_flags & flag)
		98	{
		99	if (new_value > 1000)
		100	new_value = 1000;
		101	if (new_value != scale)
		102	{
		103	scale = new_value;
		104	return true;
		105	}
		106	}
		107	return false;
		108	}
		109
		110	static inline bool
		111	check_set_align_value (int geom_flags, int flag, int &align, int new_value)
		112	{
		113	if (geom_flags & flag)
		114	{
		115	if (new_value < -100)
		116	new_value = -100;
		117	else if (new_value > 200)
		118	new_value = 200;
		119	if (new_value != align)
		120	{
		121	align = new_value;
		122	return true;
		123	}
		124	}
		125	return false;
		126	}
		127
		128	static inline int
		129	make_align_position (int align, int window_size, int image_size)
		130	{
		131	int diff = window_size - image_size;
		132	int smaller = MIN (image_size,window_size);
		133
		134	if (align >= 0 && align <= 50)
		135	return diff * align / 100;
		136	else if (align > 50 && align <= 100)
		137	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
		145	static inline int
		146	make_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
		164	bool
		165	bgPixmap_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
		348	bool
		349	bgPixmap_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
		538	bool
		539	bgPixmap_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
		570	bool
		571	bgPixmap_t::set_transparent ()
		572	{
		573	if (!(flags & isTransparent))
		574	{
		575	flags |= isTransparent;
		576	return true;
		577	}
		578	}
		579
		580	bool
		581	bgPixmap_t::set_blur_radius (const char *geom)
		582	{
		583	int changed = 0;
		584	unsigned int hr, vr;
		585	int junk;
		586	int geom_flags = XParseGeometry (geom, &junk, &junk, &hr, &vr);
		587	if (!(geom_flags&WidthValue))
		588	hr = 1;
		589	if (!(geom_flags&HeightValue))
		590	vr = hr;
		591
		592	if (h_blurRadius != hr)
		593	{
		594	++changed;
		595	h_blurRadius = hr;
		596	}
		597	if (v_blurRadius != vr)
		598	{
		599	++changed;
		600	v_blurRadius = vr;
		601	}
		602	return (changed>0);
		603	}
		604
		605	static inline unsigned long
		606	compute_tint_shade_flags (rxvt_color *tint, int shade)
		607	{
		608	unsigned long flags = 0;
		609
		610	if (shade > 0 && shade <100)
		611	flags |= bgPixmap_t::tintNeeded;
		612	else if (tint)
		613	{
		614	rgba c (rgba::MAX_CC,rgba::MAX_CC,rgba::MAX_CC);
		615	tint->get (c);
		616
		617	flags |= bgPixmap_t::tintNeeded;
		618	if ((c.r > 0x000700 || c.g > 0x000700 || c.b > 0x000700)
		619	&& (c.r < 0x00f700 || c.g < 0x00f700 || c.b < 0x00f700))
		620	{
		621	flags |= bgPixmap_t::tintNeeded;
		622	#define IS_COMPONENT_WHOLESOME(cmp) ((cmp) <= 0x000700 || (cmp) >= 0x00f700)
		623	if (IS_COMPONENT_WHOLESOME (c.r)
		624	&& IS_COMPONENT_WHOLESOME (c.g)
		625	&& IS_COMPONENT_WHOLESOME (c.b))
		626	flags |= bgPixmap_t::tintServerSide;
		627	#undef IS_COMPONENT_WHOLESOME
		628	}
		629	}
		630	return flags;
		631	}
		632
		633	bool
		634	bgPixmap_t::set_tint (rxvt_color &new_tint)
		635	{
		636	if (tint != new_tint)
		637	{
		638	unsigned long new_flags = compute_tint_shade_flags (&new_tint, shade);
		639	tint = new_tint;
		640	flags = (flags & ~tintFlags) | new_flags | tintSet;
		641	return true;
		642	}
		643	return false;
		644	}
		645
		646	bool
		647	bgPixmap_t::unset_tint ()
		648	{
		649	unsigned long new_flags = compute_tint_shade_flags (NULL, shade);
		650
		651	if (new_flags != (flags & tintFlags))
		652	{
		653	flags = (flags&~tintFlags)|new_flags;
		654	return true;
		655	}
		656	return false;
		657	}
		658
		659	bool
		660	bgPixmap_t::set_shade (const char *shade_str)
		661	{
		662	int new_shade = (shade_str) ? atoi (shade_str) : 0;
		663
		664	if (new_shade == 100)
		665	new_shade = 0;
		666
		667	if (new_shade != shade)
		668	{
		669	unsigned long new_flags = compute_tint_shade_flags (&tint, new_shade);
		670	shade = new_shade;
		671	flags = (flags & ~tintFlags) | new_flags;
		672	return true;
		673	}
		674	return false;
		675	}
		676
		677
		678	/* make_transparency_pixmap()
		679	* Builds a pixmap sized the same as terminal window, with depth same as the root window
		680	* that pixmap contains tiled portion of the root pixmap that is supposed to be covered by
		681	* our window.
		682	*/
		683	unsigned long
		684	bgPixmap_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
		835	bool
		836	bgPixmap_t::set_root_pixmap ()
		837	{
		838	Pixmap new_root_pixmap = None;
		839
		840	new_root_pixmap = target->get_pixmap_property (XA_XROOTPMAP_ID);
		841	if (new_root_pixmap == None)
		842	new_root_pixmap = target->get_pixmap_property (XA_ESETROOT_PMAP_ID);
		843
		844	if (new_root_pixmap != root_pixmap)
		845	{
		846	root_pixmap = new_root_pixmap;
		847	return true;
		848	}
		849	return false;
		850	}
		851	# endif /* ENABLE_TRANSPARENCY */
		852
		853	# ifndef HAVE_AFTERIMAGE
		854	static void ShadeXImage(rxvt_term *term, XImage* srcImage, int shade, int rm, int gm, int bm);
		855	#endif
		856
		857
		858	bool
		859	bgPixmap_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	if (flags & tintSet)
		897	tint.get (c);
		898	as_shade.tintColor.red = c.r;
		899	as_shade.tintColor.green = c.g;
		900	as_shade.tintColor.blue = c.b;
		901
		902	as_tint = shading2tint32 (&as_shade);
		903	}
		904	if (render_asim (background, as_tint))
		905	flags = flags & ~isInvalid;
		906	if (background)
		907	destroy_asimage (&background);
		908	}
		909	else if (background_flags && pmap_depth != target->depth)
		910	{
		911	result = XGetImage (target->dpy, pixmap, 0, 0, pmap_width, pmap_height, AllPlanes, ZPixmap);
		912	}
		913	# else /* our own client-side tinting */
		914	if (background_flags && (flags & isInvalid))
		915	{
		916	result = XGetImage (target->dpy, pixmap, 0, 0, pmap_width, pmap_height, AllPlanes, ZPixmap);
		917	if (result != NULL && !(background_flags & transpPmapTinted) && (flags & tintNeeded))
		918	{
		919	rgba c (rgba::MAX_CC,rgba::MAX_CC,rgba::MAX_CC);
		920	if (flags & tintSet)
		921	tint.get (c);
		922	ShadeXImage (target, result, shade, c.r, c.g, c.b);
		923	}
		924	}
		925	# endif
		926	if (result != NULL)
		927	{
		928	GC gc = XCreateGC (target->dpy, target->vt, 0UL, NULL);
		929	if (gc)
		930	{
		931	if (pmap_depth != target->depth && pixmap != None)
		932	{
		933	XFreePixmap (target->dpy, pixmap);
		934	pixmap = None;
		935	}
		936	if (pixmap == None)
		937	{
		938	pixmap = XCreatePixmap (target->dpy, target->vt, result->width, result->height, target->depth);
		939	pmap_width = result->width;
		940	pmap_height = result->height;
		941	pmap_depth = target->depth;
		942	}
		943	XPutImage (target->dpy, pixmap, gc, result, 0, 0, 0, 0, result->width, result->height);
		944	XFreeGC (target->dpy, gc);
		945	flags = flags & ~isInvalid;
		946	}
		947	XDestroyImage (result);
		948	}
		949
		950	if (flags & isInvalid)
		951	{
		952	if (pixmap != None)
		953	{
		954	XFreePixmap (target->dpy, pixmap);
		955	pixmap = None;
		956	}
		957	// TODO : we need to get rid of that garbadge :
		958	target->am_transparent = target->am_pixmap_trans = 0;
		959	}
		960	else
		961	target->am_transparent = target->am_pixmap_trans = 1;
		962
		963	apply ();
		964
		965	return true;
		966	}
		967
		968	bool
		969	bgPixmap_t::set_target (rxvt_term *new_target)
		970	{
		971	if (new_target)
		972	if (target != new_target)
		973	{
		974	target = new_target;
		975	# ifdef ENABLE_TRANSPARENCY
		976	root_depth = DefaultDepthOfScreen (ScreenOfDisplay (target->dpy, target->display->screen));
		977	# endif
		978	return true;
		979	}
		980	return false;
		981	}
		982
		983	void
		984	bgPixmap_t::apply()
		985	{
		986	if (target)
		987	{
		988	if (pixmap != None)
		989	{ /* set target's background to pixmap */
		990	# ifdef ENABLE_TRANSPARENCY
		991	if (flags & isTransparent)
		992	{
		993	XSetWindowBackgroundPixmap (target->dpy, target->parent[0], pixmap);
		994	XSetWindowBackgroundPixmap (target->dpy, target->vt, ParentRelative);
		995	# if HAVE_SCROLLBARS
		996	if (target->scrollBar.win)
		997	XSetWindowBackgroundPixmap (target->dpy, target->scrollBar.win, ParentRelative);
		998	# endif
		999	}
		1000	else
		1001	# endif
		1002	{
		1003	/* force old pixmap dereference in case it was transparent before :*/
		1004	XSetWindowBackground (target->dpy, target->parent[0], target->pix_colors[Color_border]);
		1005	XSetWindowBackgroundPixmap (target->dpy, target->vt, pixmap);
		1006	/* do we also need to set scrollbar's background here ? */
		1007	# if HAVE_SCROLLBARS
		1008	if (target->scrollBar.win)
		1009	XSetWindowBackground (target->dpy, target->scrollBar.win, target->pix_colors[Color_border]);
		1010	# endif
		1011	}
		1012	}
		1013	else
		1014	{ /* set target background to a pixel */
		1015	XSetWindowBackground (target->dpy, target->parent[0], target->pix_colors[Color_border]);
		1016	XSetWindowBackground (target->dpy, target->vt, target->pix_colors[Color_bg]);
		1017	/* do we also need to set scrollbar's background here ? */
		1018	# if HAVE_SCROLLBARS
		1019	if (target->scrollBar.win)
		1020	XSetWindowBackground (target->dpy, target->scrollBar.win, target->pix_colors[Color_border]);
		1021	# endif
		1022	}
		1023	/* don't want Expose on the parent */
		1024	XClearArea (target->dpy, target->parent[0], 0, 0, 0, 0, False);
		1025	/* do want Expose on the vt */
		1026	XClearArea (target->dpy, target->parent[0], 0, 0, 0, 0, True);
		1027	#if HAVE_SCROLLBARS
		1028	if (target->scrollBar.win)
		1029	{
		1030	target->scrollBar.setIdle ();
		1031	target->scrollbar_show (0);
		1032	}
		1033	#endif
		1034	target->want_refresh = target->want_full_refresh = 1;
		1035	target->flush ();
		1036	}
		1037	}
		1038	#endif /* HAVE_BG_PIXMAP */
		1039
		1040
		1041	void
		1042	rxvt_term::get_window_origin (int &x, int &y)
		1043	{
		1044	Window cr;
		1045	XTranslateCoordinates (dpy, parent[0], display->root, 0, 0, &x, &y, &cr);
		1046	}
		1047
		1048	Pixmap
		1049	rxvt_term::get_pixmap_property (int prop_id)
		1050	{
		1051	if (prop_id > 0 && prop_id < NUM_XA)
		1052	if (xa[prop_id])
		1053	{
		1054	int aformat, rootdepth;
		1055	unsigned long nitems, bytes_after;
		1056	Atom atype;
		1057	unsigned char *prop = NULL;
		1058	int result = XGetWindowProperty (dpy, display->root, xa[prop_id],
		1059	0L, 1L, False, XA_PIXMAP, &atype, &aformat,
		1060	&nitems, &bytes_after, &prop);
		1061	if (result == Success && prop && atype == XA_PIXMAP)
		1062	{
		1063	return *(Pixmap *)prop;
		1064	}
		1065	}
		1066	return None;
		1067	}
		1068
		1069
		1070	#ifdef ENABLE_TRANSPARENCY
		1071	#ifndef HAVE_AFTERIMAGE
		1072	/* taken from aterm-0.4.2 */
		1073
		1074	typedef uint32_t RUINT32T;
		1075
		1076	static void
		1077	ShadeXImage(rxvt_term *term, XImage* srcImage, int shade, int rm, int gm, int bm)
		1078	{
		1079	int sh_r, sh_g, sh_b;
		1080	RUINT32T mask_r, mask_g, mask_b;
		1081	RUINT32T *lookup, *lookup_r, *lookup_g, *lookup_b;
		1082	unsigned int lower_lim_r, lower_lim_g, lower_lim_b;
		1083	unsigned int upper_lim_r, upper_lim_g, upper_lim_b;
		1084	int i;
		1085
		1086	Visual *visual = term->visual;
		1087
		1088	if (visual->c_class != TrueColor || srcImage->format != ZPixmap) return ;
		1089
		1090	if (shade == 0)
		1091	shade = 100;
		1092
		1093	/* for convenience */
		1094	mask_r = visual->red_mask;
		1095	mask_g = visual->green_mask;
		1096	mask_b = visual->blue_mask;
		1097
		1098	/* boring lookup table pre-initialization */
		1099	switch (srcImage->bits_per_pixel) {
		1100	case 15:
		1101	if ((mask_r != 0x7c00) ||
		1102	(mask_g != 0x03e0) ||
		1103	(mask_b != 0x001f))
		1104	return;
		1105	lookup = (RUINT32T *) malloc (sizeof (RUINT32T)*(32+32+32));
		1106	lookup_r = lookup;
		1107	lookup_g = lookup+32;
		1108	lookup_b = lookup+32+32;
		1109	sh_r = 10;
		1110	sh_g = 5;
		1111	sh_b = 0;
		1112	break;
		1113	case 16:
		1114	if ((mask_r != 0xf800) ||
		1115	(mask_g != 0x07e0) ||
		1116	(mask_b != 0x001f))
		1117	return;
		1118	lookup = (RUINT32T *) malloc (sizeof (RUINT32T)*(32+64+32));
		1119	lookup_r = lookup;
		1120	lookup_g = lookup+32;
		1121	lookup_b = lookup+32+64;
		1122	sh_r = 11;
		1123	sh_g = 5;
		1124	sh_b = 0;
		1125	break;
		1126	case 24:
		1127	if ((mask_r != 0xff0000) ||
		1128	(mask_g != 0x00ff00) ||
		1129	(mask_b != 0x0000ff))
		1130	return;
		1131	lookup = (RUINT32T *) malloc (sizeof (RUINT32T)*(256+256+256));
		1132	lookup_r = lookup;
		1133	lookup_g = lookup+256;
		1134	lookup_b = lookup+256+256;
		1135	sh_r = 16;
		1136	sh_g = 8;
		1137	sh_b = 0;
		1138	break;
		1139	case 32:
		1140	if ((mask_r != 0xff0000) ||
		1141	(mask_g != 0x00ff00) ||
		1142	(mask_b != 0x0000ff))
		1143	return;
		1144	lookup = (RUINT32T *) malloc (sizeof (RUINT32T)*(256+256+256));
		1145	lookup_r = lookup;
		1146	lookup_g = lookup+256;
		1147	lookup_b = lookup+256+256;
		1148	sh_r = 16;
		1149	sh_g = 8;
		1150	sh_b = 0;
		1151	break;
		1152	default:
		1153	return; /* we do not support this color depth */
		1154	}
		1155
		1156	/* prepare limits for color transformation (each channel is handled separately) */
		1157	if (shade < 0) {
		1158	shade = -shade;
		1159	if (shade < 0) shade = 0;
		1160	if (shade > 100) shade = 100;
		1161
		1162	lower_lim_r = 65535-rm;
		1163	lower_lim_g = 65535-gm;
		1164	lower_lim_b = 65535-bm;
		1165
		1166	lower_lim_r = 65535-(unsigned int)(((RUINT32T)lower_lim_r)*((RUINT32T)shade)/100);
		1167	lower_lim_g = 65535-(unsigned int)(((RUINT32T)lower_lim_g)*((RUINT32T)shade)/100);
		1168	lower_lim_b = 65535-(unsigned int)(((RUINT32T)lower_lim_b)*((RUINT32T)shade)/100);
		1169
		1170	upper_lim_r = upper_lim_g = upper_lim_b = 65535;
		1171	} else {
		1172	if (shade < 0) shade = 0;
		1173	if (shade > 100) shade = 100;
		1174
		1175	lower_lim_r = lower_lim_g = lower_lim_b = 0;
		1176
		1177	upper_lim_r = (unsigned int)((((RUINT32T)rm)*((RUINT32T)shade))/100);
		1178	upper_lim_g = (unsigned int)((((RUINT32T)gm)*((RUINT32T)shade))/100);
		1179	upper_lim_b = (unsigned int)((((RUINT32T)bm)*((RUINT32T)shade))/100);
		1180	}
		1181
		1182	/* switch red and blue bytes if necessary, we need it for some weird XServers like XFree86 3.3.3.1 */
		1183	if ((srcImage->bits_per_pixel == 24) && (mask_r >= 0xFF0000 ))
		1184	{
		1185	unsigned int tmp;
		1186
		1187	tmp = lower_lim_r;
		1188	lower_lim_r = lower_lim_b;
		1189	lower_lim_b = tmp;
		1190
		1191	tmp = upper_lim_r;
		1192	upper_lim_r = upper_lim_b;
		1193	upper_lim_b = tmp;
		1194	}
		1195
		1196	/* fill our lookup tables */
		1197	for (i = 0; i <= mask_r>>sh_r; i++)
		1198	{
		1199	RUINT32T tmp;
		1200	tmp = ((RUINT32T)i)*((RUINT32T)(upper_lim_r-lower_lim_r));
		1201	tmp += ((RUINT32T)(mask_r>>sh_r))*((RUINT32T)lower_lim_r);
		1202	lookup_r[i] = (tmp/65535)<<sh_r;
		1203	}
		1204	for (i = 0; i <= mask_g>>sh_g; i++)
		1205	{
		1206	RUINT32T tmp;
		1207	tmp = ((RUINT32T)i)*((RUINT32T)(upper_lim_g-lower_lim_g));
		1208	tmp += ((RUINT32T)(mask_g>>sh_g))*((RUINT32T)lower_lim_g);
		1209	lookup_g[i] = (tmp/65535)<<sh_g;
		1210	}
		1211	for (i = 0; i <= mask_b>>sh_b; i++)
		1212	{
		1213	RUINT32T tmp;
		1214	tmp = ((RUINT32T)i)*((RUINT32T)(upper_lim_b-lower_lim_b));
		1215	tmp += ((RUINT32T)(mask_b>>sh_b))*((RUINT32T)lower_lim_b);
		1216	lookup_b[i] = (tmp/65535)<<sh_b;
		1217	}
		1218
		1219	/* apply table to input image (replacing colors by newly calculated ones) */
		1220	switch (srcImage->bits_per_pixel)
		1221	{
		1222	case 15:
		1223	{
		1224	unsigned short *p1, *pf, *p, *pl;
		1225	p1 = (unsigned short *) srcImage->data;
		1226	pf = (unsigned short *) (srcImage->data + srcImage->height * srcImage->bytes_per_line);
		1227	while (p1 < pf)
		1228	{
		1229	p = p1;
		1230	pl = p1 + srcImage->width;
		1231	for (; p < pl; p++)
		1232	{
		1233	*p = lookup_r[(*p & 0x7c00)>>10] |
		1234	lookup_g[(*p & 0x03e0)>> 5] |
		1235	lookup_b[(*p & 0x001f)];
		1236	}
		1237	p1 = (unsigned short *) ((char *) p1 + srcImage->bytes_per_line);
		1238	}
		1239	break;
		1240	}
		1241	case 16:
		1242	{
		1243	unsigned short *p1, *pf, *p, *pl;
		1244	p1 = (unsigned short *) srcImage->data;
		1245	pf = (unsigned short *) (srcImage->data + srcImage->height * srcImage->bytes_per_line);
		1246	while (p1 < pf)
		1247	{
		1248	p = p1;
		1249	pl = p1 + srcImage->width;
		1250	for (; p < pl; p++)
		1251	{
		1252	*p = lookup_r[(*p & 0xf800)>>11] |
		1253	lookup_g[(*p & 0x07e0)>> 5] |
		1254	lookup_b[(*p & 0x001f)];
		1255	}
		1256	p1 = (unsigned short *) ((char *) p1 + srcImage->bytes_per_line);
		1257	}
		1258	break;
		1259	}
		1260	case 24:
		1261	{
		1262	unsigned char *p1, *pf, *p, *pl;
		1263	p1 = (unsigned char *) srcImage->data;
		1264	pf = (unsigned char *) (srcImage->data + srcImage->height * srcImage->bytes_per_line);
		1265	while (p1 < pf)
		1266	{
		1267	p = p1;
		1268	pl = p1 + srcImage->width * 3;
		1269	for (; p < pl; p += 3)
		1270	{
		1271	p[0] = lookup_r[(p[0] & 0xff0000)>>16];
		1272	p[1] = lookup_r[(p[1] & 0x00ff00)>> 8];
		1273	p[2] = lookup_r[(p[2] & 0x0000ff)];
		1274	}
		1275	p1 = (unsigned char *) ((char *) p1 + srcImage->bytes_per_line);
		1276	}
		1277	break;
		1278	}
		1279	case 32:
		1280	{
		1281	RUINT32T *p1, *pf, *p, *pl;
		1282	p1 = (RUINT32T *) srcImage->data;
		1283	pf = (RUINT32T *) (srcImage->data + srcImage->height * srcImage->bytes_per_line);
		1284
		1285	while (p1 < pf)
		1286	{
		1287	p = p1;
		1288	pl = p1 + srcImage->width;
		1289	for (; p < pl; p++)
		1290	{
		1291	*p = lookup_r[(*p & 0xff0000)>>16] |
		1292	lookup_g[(*p & 0x00ff00)>> 8] |
		1293	lookup_b[(*p & 0x0000ff)] |
		1294	(*p & ~0xffffff);
		1295	}
		1296	p1 = (RUINT32T *) ((char *) p1 + srcImage->bytes_per_line);
		1297	}
		1298	break;
		1299	}
		1300	}
		1301
		1302	free (lookup);
		1303	}
		1304	#endif
		1305
		1306	/*
		1307	* Check our parents are still who we think they are.
		1308	* Do transparency updates if required
51	*/	1309	*/
52	int	1310	int
53	rxvt_term::scale_pixmap (const char *geom)	1311	rxvt_term::check_our_parents ()
54	{	1312	{
55	int flags, changed = 0;	1313	check_our_parents_ev.stop ();
56	int x = 0, y = 0;	1314	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;	1315	return 0;
66	str = (char *)rxvt_malloc (MAXLEN_GEOM + 1);	1316	}
67	if (!strcmp (geom, "?"))	1317
68	{	1318	void
69	sprintf (str, "[%dx%d+%d+%d]", /* can't presume snprintf () ! */	1319	rxvt_term::check_our_parents_cb (time_watcher &w)
70	min (bgpixmap->w, 9999), min (bgpixmap->h, 9999),	1320	{
71	min (bgpixmap->x, 9999), min (bgpixmap->y, 9999));	1321	#if 0 /* replaced by a bgPixmap_t::render() - leve here temporarily for reference */
72	process_xterm_seq (XTerm_title, str, CHAR_ST);	1322
73	free (str);	1323	int i, aformat, rootdepth;
74	return 0;	1324	unsigned long nitems, bytes_after;
		1325	Atom atype;
		1326	unsigned char *prop = NULL;
		1327	Window root, oldp, *list;
		1328	Pixmap rootpixmap = None;
		1329	XWindowAttributes wattr, wrootattr;
		1330	int sx, sy;
		1331	Window cr;
		1332	unsigned int rootpixmap_w = 0, rootpixmap_h = 0;
		1333
		1334	if (!option (Opt_transparent))
		1335	return; /* Don't try any more */
		1336	#if 0
		1337	struct timeval stv;
		1338	gettimeofday (&stv,NULL);
		1339	#define PRINT_BACKGROUND_OP_TIME do{ struct timeval tv;gettimeofday (&tv,NULL); tv.tv_sec-= stv.tv_sec;\
		1340	fprintf (stderr,"%d: elapsed %ld usec\n",__LINE__,\
		1341	tv.tv_sec*1000000+tv.tv_usec-stv.tv_usec );}while(0)
		1342	#else
		1343	#define PRINT_BACKGROUND_OP_TIME do{}while(0)
		1344	#endif
		1345
		1346
		1347	XGetWindowAttributes (dpy, display->root, &wrootattr);
		1348	rootdepth = wrootattr.depth;
		1349
		1350	XGetWindowAttributes (dpy, parent[0], &wattr);
		1351
		1352	if (rootdepth != wattr.depth)
75	}	1353	{
76		1354	if (am_transparent)
77	if ((p = strchr (geom, ';')) == NULL)	1355	{
78	p = strchr (geom, '\0');	1356	XSetWindowBackground (dpy, vt, pix_colors_focused[Color_bg]);
79	n = (p - geom);	1357	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	{	1358	}
88	flags |= WidthValue;	1359
89	w = 0;	1360	return; /* Don't try any more */
90	} /* default is tile */	1361	}
91	if (flags & WidthValue)	1362
		1363	/* Get all X ops out of the queue so that our information is up-to-date. */
		1364	XSync (dpy, False);
		1365
		1366	XTranslateCoordinates (dpy, parent[0], display->root,
		1367	0, 0, &sx, &sy, &cr);
		1368	/* check if we are outside of the visible part of the virtual screen : */
		1369	if( sx + (int)szHint.width <= 0 || sy + (int)szHint.height <= 0
		1370	|| sx >= wrootattr.width || sy >= wrootattr.height )
		1371	return /* 0 */ ;
		1372	/*
		1373	* Make the frame window set by the window manager have
		1374	* the root background. Some window managers put multiple nested frame
		1375	* windows for each client, so we have to take care about that.
		1376	*/
		1377	i = (xa[XA_XROOTPMAP_ID]
		1378	&& XGetWindowProperty (dpy, display->root, xa[XA_XROOTPMAP_ID],
		1379	0L, 1L, False, XA_PIXMAP, &atype, &aformat,
		1380	&nitems, &bytes_after, &prop) == Success);
		1381
		1382	if (!i || prop == NULL)
		1383	i = (xa[XA_ESETROOT_PMAP_ID]
		1384	&& XGetWindowProperty (dpy, display->root, xa[XA_ESETROOT_PMAP_ID],
		1385	0L, 1L, False, XA_PIXMAP, &atype, &aformat,
		1386	&nitems, &bytes_after, &prop) == Success);
		1387
		1388	if (!i || prop == NULL)
		1389	rootpixmap = None;
		1390	else
		1391	{
		1392	int junk;
		1393	unsigned int ujunk;
		1394	/* root pixmap may be bad - allow a error */
		1395	allowedxerror = -1;
		1396	if ((rootpixmap = *(Pixmap *)prop) != None)
		1397	if (!XGetGeometry (dpy, rootpixmap, &root, &junk, &junk, &rootpixmap_w, &rootpixmap_h, &ujunk, &ujunk))
		1398	rootpixmap = None;
		1399	allowedxerror = 0;
		1400	}
		1401
		1402	if (prop != NULL)
		1403	XFree (prop);
		1404
		1405	if (rootpixmap != None)
		1406	{
		1407	Bool success = False;
		1408	GC gc = NULL;
		1409	XGCValues gcvalue;
		1410	int shade = 100;
		1411	rgba c (rgba::MAX_CC,rgba::MAX_CC,rgba::MAX_CC);
		1412	Bool whole_tint = False, no_tint = True;
		1413
		1414	while (sx < 0) sx += (int)wrootattr.width;
		1415	while (sy < 0) sy += (int)wrootattr.height;
		1416
		1417	if (rs[Rs_shade])
		1418	shade = atoi (rs[Rs_shade]);
		1419	if (ISSET_PIXCOLOR (Color_tint))
		1420	pix_colors_focused [Color_tint].get (c);
		1421	#define IS_COMPONENT_WHOLESOME(c) ((c) <=0x000700 || (c)>=0x00f700)
		1422	if (shade >= 100)
		1423	whole_tint = (IS_COMPONENT_WHOLESOME(c.r)
		1424	&& IS_COMPONENT_WHOLESOME(c.g)
		1425	&& IS_COMPONENT_WHOLESOME(c.b));
		1426	no_tint = (c.r >= 0x00f700 && c.g >= 0x00f700 && c.b >= 0x00f700);
		1427	#undef IS_COMPONENT_WHOLESOME
		1428
		1429	bgPixmap.make_transparency_pixmap();
		1430
		1431	if (whole_tint && !no_tint)
		1432	{
92	{	1433	}
93	if (! (flags & XValue))	1434	success = True;
94	x = 50;	1435	#ifdef HAVE_AFTERIMAGE
95	if (! (flags & HeightValue))	1436	if (rs[Rs_blurradius] || bgPixmap.original_asim != NULL || (!whole_tint && (!no_tint || shade !=100)))
96	h = w;
97	if (w && !h)
98	{	1437	{
99	w = (bgpixmap->w * w) / 100;	1438	ARGB32 tint = TINT_LEAVE_SAME;
100	h = bgpixmap->h;	1439	ASImage *back_im = NULL;
		1440
		1441	back_im = pixmap2ximage (asv, bgPixmap.pixmap, 0, 0, szHint.width, szHint.height, AllPlanes, 100);
		1442	if (back_im != NULL)
101	}	1443	{
102	else if (h && !w)	1444	if (!whole_tint && (!no_tint || shade !=100))
103	{	1445	{
104	w = bgpixmap->w;	1446	ShadingInfo as_shade;
105	h = (bgpixmap->h * h) / 100;	1447	as_shade.shading = shade;
		1448	as_shade.tintColor.red = c.r;
		1449	as_shade.tintColor.green = c.g;
		1450	as_shade.tintColor.blue = c.b;
		1451	tint = shading2tint32 (&as_shade);
		1452	}
		1453
		1454	if (rs[Rs_blurradius] && back_im)
		1455	{
		1456	ASImage* tmp;
		1457	int junk;
		1458	unsigned int hr = 1, vr = 1;
		1459	int flags = XParseGeometry (rs[Rs_blurradius], &junk, &junk, &hr, &vr);
		1460	if (!(flags&WidthValue))
		1461	hr = 1;
		1462	if (!(flags&HeightValue))
		1463	vr = hr;
		1464	tmp = blur_asimage_gauss (asv, back_im, hr, vr, 0xFFFFFFFF,
		1465	(bgPixmap.original_asim == NULL || tint == TINT_LEAVE_SAME)?ASA_XImage:ASA_ASImage,
		1466	100, ASIMAGE_QUALITY_DEFAULT);
		1467	if (tmp)
		1468	{
		1469	destroy_asimage (&back_im);
		1470	back_im = tmp;
		1471	}
		1472	}
		1473	/* TODO: temporary fix - redo the logic, so that same function can do both
		1474	transparency and non-transparency */
		1475	bgPixmap.render_asim (back_im, tint);
		1476	destroy_asimage (&back_im);
		1477
		1478	} /* back_im != NULL */
		1479	else
		1480	success = False;
		1481	}
		1482	#else /* HAVE_AFTERIMAGE */
		1483	if (!whole_tint && (!no_tint || shade !=100))
		1484	{
		1485	XImage *image = XGetImage (dpy, bgPixmap.pixmap, 0, 0, szHint.width, szHint.height, AllPlanes, ZPixmap);
		1486	success = False;
		1487	if (image != NULL)
106	}	1488	{
107	if (w > 1000)	1489	PRINT_BACKGROUND_OP_TIME;
108	w = 1000;	1490	if (gc == NULL)
109	if (h > 1000)	1491	gc = XCreateGC (dpy, vt, 0UL, &gcvalue);
110	h = 1000;	1492	if (ISSET_PIXCOLOR (Color_tint) || shade != 100)
111	if (bgpixmap->w != (short)w)	1493	ShadeXImage (this, image, shade, c.r, c.g, c.b);
		1494	XPutImage (dpy, bgPixmap.pixmap, gc, image, 0, 0, 0, 0, image->width, image->height);
		1495	XDestroyImage (image);
		1496	success = True;
112	{	1497	}
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	{	1498	}
124	if (flags & XNegative)	1499	#endif /* HAVE_AFTERIMAGE */
125	flags |= YNegative;	1500	PRINT_BACKGROUND_OP_TIME;
126	y = x;	1501
		1502	if (gc != NULL)
		1503	XFreeGC (dpy, gc);
127	}	1504
128		1505	bgPixmap.apply();
129	if (! (flags & WidthValue) && geom[0] != '=')	1506	if (!success)
130	{	1507	am_pixmap_trans = 0;
131	x += bgpixmap->x;
132	y += bgpixmap->y;
133	}
134	else	1508	else
135	{	1509	{
136	if (flags & XNegative)	1510	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	{	1511	}
147	bgpixmap->x = x;	1512	} /* rootpixmap != None */
148	changed++;	1513
		1514	if (am_pixmap_trans)
		1515	{
		1516	if (scrollBar.win)
149	}	1517	{
150	if (bgpixmap->y != y)	1518	scrollBar.setIdle ();
		1519	scrollbar_show (0);
151	{	1520	}
152	bgpixmap->y = y;	1521
153	changed++;	1522	if (am_transparent)
154	}	1523	{
155	}	1524	want_refresh = want_full_refresh = 1;
156	free (str);	1525	if (am_pixmap_trans)
157	return changed;	1526	flush ();
158	}
159
160	void
161	rxvt_term::resize_pixmap ()
162	{
163	XGCValues gcvalue;
164	GC gc;
165	unsigned int width = TermWin_TotalWidth ();
166	unsigned int height = TermWin_TotalHeight ();
167	dDisp;
168
169	if (pixmap != None)
170	XFreePixmap (disp, pixmap);
171
172	if (bgPixmap.pixmap == None)
173	{ /* So be it: I'm not using pixmaps */
174	pixmap = None;
175
176	if (!(options & Opt_transparent) || !am_transparent)
177	XSetWindowBackground (disp, vt,
178	pix_colors[Color_bg]);
179
180	return;
181	}
182
183	gcvalue.foreground = pix_colors[Color_bg];
184	gc = XCreateGC (disp, vt, GCForeground, &gcvalue);
185
186	if (bgPixmap.pixmap != None)
187	{ /* we have a specified pixmap */
188	unsigned int w = bgPixmap.w, h = bgPixmap.h,
189	x = bgPixmap.x, y = bgPixmap.y;
190	unsigned int xpmh = xpmAttr.height,
191	xpmw = xpmAttr.width;
192
193	/*
194	* don't zoom pixmap too much nor expand really small pixmaps
195	*/
196	if (w > 1000 || h > 1000)
197	w = 1;
198	else if (width > (10 * xpmw)
199	|| height > (10 * xpmh))
200	w = 0; /* tile */
201
202	if (w == 0)
203	{	1527	}
204	/* basic X tiling - let the X server do it */
205	pixmap = XCreatePixmap (disp, vt,
206	xpmw, xpmh,
207	(unsigned int)display->depth);
208	XCopyArea (disp, bgPixmap.pixmap, pixmap, gc,
209	0, 0, xpmw, xpmh, 0, 0);
210	}
211	else
212	{
213	float incr, p;
214	Pixmap tmp;
215
216	pixmap = XCreatePixmap (disp, vt,
217	width, height,
218	(unsigned int)display->depth);
219	/*
220	* horizontal scaling
221	*/
222	rxvt_pixmap_incr (&w, &x, &incr, &p, width, xpmw);
223
224	tmp = XCreatePixmap (disp, vt,
225	width, xpmh, (unsigned int)display->depth);
226	XFillRectangle (disp, tmp, gc, 0, 0, width,
227	xpmh);
228
229	for ( /*nil */ ; x < w; x++, p += incr)
230	{
231	if (p >= xpmw)
232	p = 0;
233	/* copy one column from the original pixmap to the tmp pixmap */
234	XCopyArea (disp, bgPixmap.pixmap, tmp, gc,
235	(int)p, 0, 1, xpmh, (int)x, 0);
236	}
237
238	/*
239	* vertical scaling
240	*/
241	rxvt_pixmap_incr (&h, &y, &incr, &p, height, xpmh);
242
243	if (y > 0)
244	XFillRectangle (disp, pixmap, gc, 0, 0, width, y);
245
246	if (h < height)
247	XFillRectangle (disp, pixmap, gc, 0, (int)h, width, height - h + 1);
248
249	for ( /*nil */ ; y < h; y++, p += incr)
250	{
251	if (p >= xpmh)
252	p = 0;
253
254	/* copy one row from the tmp pixmap to the main pixmap */
255	XCopyArea (disp, tmp, pixmap, gc,
256	0, (int)p, width, 1, 0, (int)y);
257	}
258
259	XFreePixmap (disp, tmp);
260	}
261	}
262
263	XSetWindowBackgroundPixmap (disp, vt, pixmap);
264	XFreeGC (disp, gc);
265	am_transparent = 0;
266	}
267
268	/*
269	* Calculate tiling sizes and increments
270	* At start, p == 0, incr == xpmwidthheight
271	*/
272	static void
273	rxvt_pixmap_incr (unsigned int *wh, unsigned int *xy, float *incr, float *p, unsigned int widthheight, unsigned int xpmwidthheight)
274	{
275	unsigned int cwh, cxy;
276	float cincr, cp;
277
278	cp = 0;
279	cincr = (float)xpmwidthheight;
280	cxy = *xy;
281	cwh = *wh;
282	if (cwh == 1)
283	{ /* display one image, no horizontal/vertical scaling */
284	cincr = (float)widthheight;
285	if (xpmwidthheight <= widthheight)
286	{
287	cwh = xpmwidthheight;
288	cxy = (cxy * (widthheight - cwh)) / 100; /* beware! order */
289	cwh += cxy;
290	}
291	else
292	{
293	cxy = 0;
294	cwh = widthheight;
295	}
296	}
297	else if (cwh < 10)
298	{ /* fit WH images across/down screen */
299	cincr *= cwh;
300	cxy = 0;
301	cwh = widthheight;
302	}
303	else
304	{	1528	}
305	cincr *= 100.0 / cwh;	1529	#endif
306	if (cwh < 100)
307	{ /* contract */
308	float pos;
309
310	cwh = (cwh * widthheight) / 100;
311	pos = (float)cxy / 100 * widthheight - (cwh / 2);
312
313	cxy = (widthheight - cwh);
314	if (pos <= 0)
315	cxy = 0;
316	else if (pos < cxy)
317	cxy = (int) pos;
318	cwh += cxy;
319	}
320	else
321	{ /* expand */
322	if (cxy > 0)
323	{ /* position */
324	float pos;
325
326	pos = (float)cxy / 100 * xpmwidthheight - (cincr / 2);
327	cp = xpmwidthheight - cincr;
328	if (pos <= 0)
329	cp = 0;
330	else if (pos < cp)
331	cp = pos;
332	}
333	cxy = 0;
334	cwh = widthheight;
335	}
336	}
337	cincr /= widthheight;
338	*wh = cwh;
339	*xy = cxy;
340	*incr = cincr;
341	*p = cp;
342	}	1530	}
343		1531	#endif
344	Pixmap
345	rxvt_term::set_bgPixmap (const char *file)
346	{
347	char *f;
348
349	assert (file != NULL);
350
351	if (bgPixmap.pixmap != None)
352	{
353	XFreePixmap (display->display, bgPixmap.pixmap);
354	bgPixmap.pixmap = None;
355	}
356
357	XSetWindowBackground (display->display, vt, pix_colors[Color_bg]);
358
359	if (*file != '\0')
360	{
361	/* XWindowAttributes attr; */
362
363	/*
364	* we already have the required attributes
365	*/
366	/* XGetWindowAttributes (display->display, vt, &attr); */
367
368	xpmAttr.closeness = 30000;
369	xpmAttr.colormap = display->cmap;
370	xpmAttr.visual = display->visual;
371	xpmAttr.depth = display->depth;
372	xpmAttr.valuemask = (XpmCloseness | XpmColormap | XpmVisual |
373	XpmDepth | XpmSize | XpmReturnPixels);
374
375	/* search environment variables here too */
376	f = (char *)rxvt_File_find (file, ".xpm", rs[Rs_path]);
377	if (f == NULL
378	|| XpmReadFileToPixmap (display->display, display->root, f,
379	&bgPixmap.pixmap, NULL,
380	&xpmAttr))
381	{
382	char *p;
383
384	/* semi-colon delimited */
385	if ((p = strchr (file, ';')) == NULL)
386	p = strchr (file, '\0');
387
388	rxvt_warn ("couldn't load XPM file \"%.*s\", ignoring.\n", (p - file), file);
389	}
390
391	free (f);
392	}
393
394	resize_pixmap ();
395	return bgPixmap.pixmap;
396	}
397
398	#endif /* XPM_BACKGROUND */

Diff Legend

–	Removed lines
+	Added lines
<	Changed lines
>	Changed lines