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.10 by pcg, Wed Mar 17 03:47:14 2004 UTC vs.
Revision 1.65 by sasha, Fri Aug 10 22:10:36 2007 UTC

1	/*--------------------------------*-C-*---------------------------------*	1	/*----------------------------------------------------------------------*
2	* File: xpm.c	2	* File: xpm.C
3	*----------------------------------------------------------------------*	3	*----------------------------------------------------------------------*
4	* $Id: xpm.C,v 1.10 2004/03/17 03:47:14 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
		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	bool
		684	bgPixmap_t::make_transparency_pixmap ()
		685	{
		686	if (target == NULL)
		687	return false;
		688
		689	/* root dimentions may change from call to call - but Display structure should
		690	* be always up-to-date, so let's use it :
		691	*/
		692	Window root = target->display->root;
		693	int screen = target->display->screen;
		694	Display *dpy = target->dpy;
		695	int root_width = DisplayWidth (dpy, screen);
		696	int root_height = DisplayHeight (dpy, screen);
		697	unsigned int root_pmap_width, root_pmap_height;
		698	int window_width = target->szHint.width;
		699	int window_height = target->szHint.height;
		700	int sx, sy;
		701	XGCValues gcv;
		702
		703	target->get_window_origin (sx, sy);
		704
		705	/* check if we are outside of the visible part of the virtual screen : */
		706	if (sx + window_width <= 0 || sy + window_height <= 0
		707	|| sx >= root_width || sy >= root_height)
		708	return false;
		709
		710	if (root_pixmap != None)
		711	{/* we want to validate the pixmap and get it's size at the same time : */
		712	int junk;
		713	unsigned int ujunk;
		714	/* root pixmap may be bad - allow a error */
		715	target->allowedxerror = -1;
		716	if (!XGetGeometry (dpy, root_pixmap, &root, &junk, &junk, &root_pmap_width, &root_pmap_height, &ujunk, &ujunk))
		717	root_pixmap = None;
		718	target->allowedxerror = 0;
		719	}
		720
		721	Pixmap tiled_root_pmap = XCreatePixmap (dpy, root, window_width, window_height, root_depth);
		722	GC gc = NULL;
		723
		724	if (tiled_root_pmap == None) /* something really bad happened - abort */
		725	return false;
		726
		727	if (root_pixmap == None)
		728	{ /* use tricks to obtain the root background image :*/
		729	/* we want to create Overrideredirect window overlapping out window
		730	with background type of Parent Relative and then grab it */
		731	XSetWindowAttributes attr;
		732	Window src;
		733	bool success = false;
		734
		735	attr.background_pixmap = ParentRelative;
		736	attr.backing_store = Always;
		737	attr.event_mask = ExposureMask;
		738	attr.override_redirect = True;
		739	src = XCreateWindow (dpy, root, sx, sy, window_width, window_height, 0,
		740	CopyFromParent, CopyFromParent, CopyFromParent,
		741	CWBackPixmap|CWBackingStore|CWOverrideRedirect|CWEventMask,
		742	&attr);
		743
		744	if (src != None)
		745	{
		746	XEvent event;
		747	int ev_count = 0;
		748	XGrabServer (dpy);
		749	XMapRaised (dpy, src);
		750	XSync (dpy, False);
		751	/* XSync should get window where it's properly exposed,
		752	* but to be on the safe side - let's check for the actuall event to arrive : */
		753	while (XCheckWindowEvent (dpy, src, ExposureMask, &event))
		754	++ev_count;
		755	if (ev_count > 0);
		756	{ /* hooray! - we can grab the image! */
		757	gc = XCreateGC (dpy, root, 0, NULL);
		758	XCopyArea (dpy, src, tiled_root_pmap, gc, 0, 0, window_width, window_height, 0, 0);
		759	success = true;
		760	}
		761	XDestroyWindow (dpy, src);
		762	XUngrabServer (dpy);
		763	//fprintf (stderr, "%s:%d: ev_count = %d\n", __FUNCTION__, __LINE__, ev_count);
		764	}
		765	if (!success)
		766	{
		767	XFreePixmap (dpy, tiled_root_pmap);
		768	tiled_root_pmap = None;
		769	}
		770	}
		771	else
		772	{/* strightforward pixmap copy */
		773	gcv.tile = root_pixmap;
		774	gcv.fill_style = FillTiled;
		775	while (sx < 0) sx += (int)window_width;
		776	while (sy < 0) sy += (int)window_height;
		777	gcv.ts_x_origin = -sx;
		778	gcv.ts_y_origin = -sy;
		779	gc = XCreateGC (dpy, root, GCFillStyle | GCTile | GCTileStipXOrigin | GCTileStipYOrigin, &gcv);
		780	XFillRectangle (dpy, tiled_root_pmap, gc, 0, 0, window_width, window_height);
		781	}
		782
		783	if (tiled_root_pmap != None)
		784	{
		785	if (flags & tintNeeded)
		786	{
		787	if ((flags & tintServerSide)
		788	&& h_blurRadius <= 1 && v_blurRadius <= 1
		789	# ifdef HAVE_AFTERIMAGE
		790	&& original_asim == NULL
		791	# endif
		792	)
		793	{ /* In this case we can tint image server-side getting significant
		794	* performance improvements, as we eliminate XImage transfer
		795	*/
		796	gcv.foreground = Pixel (tint);
		797	gcv.function = GXand;
		798	gcv.fill_style = FillSolid;
		799	if (gc)
		800	XChangeGC (dpy, gc, GCFillStyle | GCForeground | GCFunction, &gcv);
		801	else
		802	gc = XCreateGC (dpy, root, GCFillStyle | GCForeground | GCFunction, &gcv);
		803	XFillRectangle (dpy, tiled_root_pmap, gc, 0, 0, window_width, window_height);
		804	}
		805	}
		806	if (pixmap)
		807	XFreePixmap (dpy, pixmap);
		808	pixmap = tiled_root_pmap;
		809	pmap_width = window_width;
		810	pmap_height = window_height;
		811	pmap_depth = root_depth;
		812	}
		813
		814	if (gc)
		815	XFreeGC (dpy, gc);
		816	}
		817
		818	bool
		819	bgPixmap_t::set_root_pixmap ()
		820	{
		821	Pixmap new_root_pixmap = None;
		822
		823	new_root_pixmap = target->get_pixmap_property (XA_XROOTPMAP_ID);
		824	if (new_root_pixmap == None)
		825	new_root_pixmap = target->get_pixmap_property (XA_ESETROOT_PMAP_ID);
		826
		827	if (new_root_pixmap != root_pixmap)
		828	{
		829	root_pixmap = new_root_pixmap;
		830	return true;
		831	}
		832	return false;
		833	}
		834	# endif /* ENABLE_TRANSPARENCY */
		835
		836	bool
		837	bgPixmap_t::render_background ()
		838	{
		839	/* TODO: temporary implementation - need to move check_parents stuff in here */
		840	# ifdef ENABLE_TRANSPARENCY
		841	if (flags & isTransparent)
		842	{
		843	/* we need to re-generate transparency pixmap in that case ! */
		844	target->check_our_parents ();
		845	return true;
		846	}
		847	# endif
		848	# ifdef HAVE_AFTERIMAGE
		849	render_asim (NULL, TINT_LEAVE_SAME);
		850	apply_background ();
		851	return true;
		852	# endif
		853	return false;
		854	}
		855
		856	bool
		857	bgPixmap_t::set_target (rxvt_term *new_target)
		858	{
		859	if (new_target)
		860	if (target != new_target)
		861	{
		862	target = new_target;
		863	# ifdef ENABLE_TRANSPARENCY
		864	root_depth = DefaultDepthOfScreen (ScreenOfDisplay (target->dpy, target->display->screen));
		865	# endif
		866	return true;
		867	}
		868	return false;
		869	}
		870
		871	void
		872	bgPixmap_t::apply_background()
		873	{
		874	if (target)
		875	{
		876	if (pixmap != None)
		877	{ /* set target's background to pixmap */
		878	# ifdef ENABLE_TRANSPARENCY
		879	if (flags & isTransparent)
		880	{
		881	XSetWindowBackgroundPixmap (target->dpy, target->parent[0], pixmap);
		882	XSetWindowBackgroundPixmap (target->dpy, target->vt, ParentRelative);
		883	if (target->scrollBar.win)
		884	XSetWindowBackgroundPixmap (target->dpy, target->scrollBar.win, ParentRelative);
		885	}
		886	else
		887	# endif
		888	{
		889	/* force old pixmap dereference in case it was transparent before :*/
		890	XSetWindowBackground (target->dpy, target->parent[0], target->pix_colors[Color_bg]);
		891	XSetWindowBackgroundPixmap (target->dpy, target->vt, pixmap);
		892	/* do we also need to set scrollbar's background here ? */
		893	}
		894	}
		895	else
		896	{ /* set target background to a pixel */
		897	XSetWindowBackground (target->dpy, target->parent[0], target->pix_colors[Color_bg]);
		898	XSetWindowBackground (target->dpy, target->vt, target->pix_colors[Color_bg]);
		899	/* do we also need to set scrollbar's background here ? */
		900	}
		901	/* don't want Expose on the parent */
		902	XClearArea (target->dpy, target->parent[0], 0, 0, 0, 0, False);
		903	/* do want Expose on the vt */
		904	XClearArea (target->dpy, target->parent[0], 0, 0, 0, 0, True);
		905	}
		906	}
		907	#endif /* HAVE_BG_PIXMAP */
		908
		909
		910	void
		911	rxvt_term::get_window_origin (int &x, int &y)
		912	{
		913	Window cr;
		914	XTranslateCoordinates (dpy, parent[0], display->root, 0, 0, &x, &y, &cr);
		915	}
		916
		917	Pixmap
		918	rxvt_term::get_pixmap_property (int prop_id)
		919	{
		920	if (prop_id > 0 && prop_id < NUM_XA)
		921	if (xa[prop_id])
		922	{
		923	int aformat, rootdepth;
		924	unsigned long nitems, bytes_after;
		925	Atom atype;
		926	unsigned char *prop = NULL;
		927	int result = XGetWindowProperty (dpy, display->root, xa[prop_id],
		928	0L, 1L, False, XA_PIXMAP, &atype, &aformat,
		929	&nitems, &bytes_after, &prop);
		930	if (result == Success && prop && atype == XA_PIXMAP)
		931	{
		932	return *(Pixmap *)prop;
		933	}
		934	}
		935	return None;
		936	}
		937
		938
		939	#ifdef ENABLE_TRANSPARENCY
		940	#ifndef HAVE_AFTERIMAGE
		941	/* taken from aterm-0.4.2 */
		942
		943	typedef uint32_t RUINT32T;
		944
		945	static void
		946	ShadeXImage(rxvt_term *term, XImage* srcImage, int shade, int rm, int gm, int bm)
		947	{
		948	int sh_r, sh_g, sh_b;
		949	RUINT32T mask_r, mask_g, mask_b;
		950	RUINT32T *lookup, *lookup_r, *lookup_g, *lookup_b;
		951	unsigned int lower_lim_r, lower_lim_g, lower_lim_b;
		952	unsigned int upper_lim_r, upper_lim_g, upper_lim_b;
		953	int i;
		954
		955	Visual *visual = term->visual;
		956
		957	if( visual->c_class != TrueColor || srcImage->format != ZPixmap ) return ;
		958
		959	/* for convenience */
		960	mask_r = visual->red_mask;
		961	mask_g = visual->green_mask;
		962	mask_b = visual->blue_mask;
		963
		964	/* boring lookup table pre-initialization */
		965	switch (srcImage->bits_per_pixel) {
		966	case 15:
		967	if ((mask_r != 0x7c00) ||
		968	(mask_g != 0x03e0) ||
		969	(mask_b != 0x001f))
		970	return;
		971	lookup = (RUINT32T *) malloc (sizeof (RUINT32T)*(32+32+32));
		972	lookup_r = lookup;
		973	lookup_g = lookup+32;
		974	lookup_b = lookup+32+32;
		975	sh_r = 10;
		976	sh_g = 5;
		977	sh_b = 0;
		978	break;
		979	case 16:
		980	if ((mask_r != 0xf800) ||
		981	(mask_g != 0x07e0) ||
		982	(mask_b != 0x001f))
		983	return;
		984	lookup = (RUINT32T *) malloc (sizeof (RUINT32T)*(32+64+32));
		985	lookup_r = lookup;
		986	lookup_g = lookup+32;
		987	lookup_b = lookup+32+64;
		988	sh_r = 11;
		989	sh_g = 5;
		990	sh_b = 0;
		991	break;
		992	case 24:
		993	if ((mask_r != 0xff0000) ||
		994	(mask_g != 0x00ff00) ||
		995	(mask_b != 0x0000ff))
		996	return;
		997	lookup = (RUINT32T *) malloc (sizeof (RUINT32T)*(256+256+256));
		998	lookup_r = lookup;
		999	lookup_g = lookup+256;
		1000	lookup_b = lookup+256+256;
		1001	sh_r = 16;
		1002	sh_g = 8;
		1003	sh_b = 0;
		1004	break;
		1005	case 32:
		1006	if ((mask_r != 0xff0000) ||
		1007	(mask_g != 0x00ff00) ||
		1008	(mask_b != 0x0000ff))
		1009	return;
		1010	lookup = (RUINT32T *) malloc (sizeof (RUINT32T)*(256+256+256));
		1011	lookup_r = lookup;
		1012	lookup_g = lookup+256;
		1013	lookup_b = lookup+256+256;
		1014	sh_r = 16;
		1015	sh_g = 8;
		1016	sh_b = 0;
		1017	break;
		1018	default:
		1019	return; /* we do not support this color depth */
		1020	}
		1021
		1022	/* prepare limits for color transformation (each channel is handled separately) */
		1023	if (shade < 0) {
		1024	shade = -shade;
		1025	if (shade < 0) shade = 0;
		1026	if (shade > 100) shade = 100;
		1027
		1028	lower_lim_r = 65535-rm;
		1029	lower_lim_g = 65535-gm;
		1030	lower_lim_b = 65535-bm;
		1031
		1032	lower_lim_r = 65535-(unsigned int)(((RUINT32T)lower_lim_r)*((RUINT32T)shade)/100);
		1033	lower_lim_g = 65535-(unsigned int)(((RUINT32T)lower_lim_g)*((RUINT32T)shade)/100);
		1034	lower_lim_b = 65535-(unsigned int)(((RUINT32T)lower_lim_b)*((RUINT32T)shade)/100);
		1035
		1036	upper_lim_r = upper_lim_g = upper_lim_b = 65535;
		1037	} else {
		1038	if (shade < 0) shade = 0;
		1039	if (shade > 100) shade = 100;
		1040
		1041	lower_lim_r = lower_lim_g = lower_lim_b = 0;
		1042
		1043	upper_lim_r = (unsigned int)((((RUINT32T)rm)*((RUINT32T)shade))/100);
		1044	upper_lim_g = (unsigned int)((((RUINT32T)gm)*((RUINT32T)shade))/100);
		1045	upper_lim_b = (unsigned int)((((RUINT32T)bm)*((RUINT32T)shade))/100);
		1046	}
		1047
		1048	/* switch red and blue bytes if necessary, we need it for some weird XServers like XFree86 3.3.3.1 */
		1049	if ((srcImage->bits_per_pixel == 24) && (mask_r >= 0xFF0000 ))
		1050	{
		1051	unsigned int tmp;
		1052
		1053	tmp = lower_lim_r;
		1054	lower_lim_r = lower_lim_b;
		1055	lower_lim_b = tmp;
		1056
		1057	tmp = upper_lim_r;
		1058	upper_lim_r = upper_lim_b;
		1059	upper_lim_b = tmp;
		1060	}
		1061
		1062	/* fill our lookup tables */
		1063	for (i = 0; i <= mask_r>>sh_r; i++)
		1064	{
		1065	RUINT32T tmp;
		1066	tmp = ((RUINT32T)i)*((RUINT32T)(upper_lim_r-lower_lim_r));
		1067	tmp += ((RUINT32T)(mask_r>>sh_r))*((RUINT32T)lower_lim_r);
		1068	lookup_r[i] = (tmp/65535)<<sh_r;
		1069	}
		1070	for (i = 0; i <= mask_g>>sh_g; i++)
		1071	{
		1072	RUINT32T tmp;
		1073	tmp = ((RUINT32T)i)*((RUINT32T)(upper_lim_g-lower_lim_g));
		1074	tmp += ((RUINT32T)(mask_g>>sh_g))*((RUINT32T)lower_lim_g);
		1075	lookup_g[i] = (tmp/65535)<<sh_g;
		1076	}
		1077	for (i = 0; i <= mask_b>>sh_b; i++)
		1078	{
		1079	RUINT32T tmp;
		1080	tmp = ((RUINT32T)i)*((RUINT32T)(upper_lim_b-lower_lim_b));
		1081	tmp += ((RUINT32T)(mask_b>>sh_b))*((RUINT32T)lower_lim_b);
		1082	lookup_b[i] = (tmp/65535)<<sh_b;
		1083	}
		1084
		1085	/* apply table to input image (replacing colors by newly calculated ones) */
		1086	switch (srcImage->bits_per_pixel)
		1087	{
		1088	case 15:
		1089	{
		1090	unsigned short *p1, *pf, *p, *pl;
		1091	p1 = (unsigned short *) srcImage->data;
		1092	pf = (unsigned short *) (srcImage->data + srcImage->height * srcImage->bytes_per_line);
		1093	while (p1 < pf)
		1094	{
		1095	p = p1;
		1096	pl = p1 + srcImage->width;
		1097	for (; p < pl; p++)
		1098	{
		1099	*p = lookup_r[(*p & 0x7c00)>>10] |
		1100	lookup_g[(*p & 0x03e0)>> 5] |
		1101	lookup_b[(*p & 0x001f)];
		1102	}
		1103	p1 = (unsigned short *) ((char *) p1 + srcImage->bytes_per_line);
		1104	}
		1105	break;
		1106	}
		1107	case 16:
		1108	{
		1109	unsigned short *p1, *pf, *p, *pl;
		1110	p1 = (unsigned short *) srcImage->data;
		1111	pf = (unsigned short *) (srcImage->data + srcImage->height * srcImage->bytes_per_line);
		1112	while (p1 < pf)
		1113	{
		1114	p = p1;
		1115	pl = p1 + srcImage->width;
		1116	for (; p < pl; p++)
		1117	{
		1118	*p = lookup_r[(*p & 0xf800)>>11] |
		1119	lookup_g[(*p & 0x07e0)>> 5] |
		1120	lookup_b[(*p & 0x001f)];
		1121	}
		1122	p1 = (unsigned short *) ((char *) p1 + srcImage->bytes_per_line);
		1123	}
		1124	break;
		1125	}
		1126	case 24:
		1127	{
		1128	unsigned char *p1, *pf, *p, *pl;
		1129	p1 = (unsigned char *) srcImage->data;
		1130	pf = (unsigned char *) (srcImage->data + srcImage->height * srcImage->bytes_per_line);
		1131	while (p1 < pf)
		1132	{
		1133	p = p1;
		1134	pl = p1 + srcImage->width * 3;
		1135	for (; p < pl; p += 3)
		1136	{
		1137	p[0] = lookup_r[(p[0] & 0xff0000)>>16];
		1138	p[1] = lookup_r[(p[1] & 0x00ff00)>> 8];
		1139	p[2] = lookup_r[(p[2] & 0x0000ff)];
		1140	}
		1141	p1 = (unsigned char *) ((char *) p1 + srcImage->bytes_per_line);
		1142	}
		1143	break;
		1144	}
		1145	case 32:
		1146	{
		1147	RUINT32T *p1, *pf, *p, *pl;
		1148	p1 = (RUINT32T *) srcImage->data;
		1149	pf = (RUINT32T *) (srcImage->data + srcImage->height * srcImage->bytes_per_line);
		1150
		1151	while (p1 < pf)
		1152	{
		1153	p = p1;
		1154	pl = p1 + srcImage->width;
		1155	for (; p < pl; p++)
		1156	{
		1157	*p = lookup_r[(*p & 0xff0000)>>16] |
		1158	lookup_g[(*p & 0x00ff00)>> 8] |
		1159	lookup_b[(*p & 0x0000ff)] |
		1160	(*p & ~0xffffff);
		1161	}
		1162	p1 = (RUINT32T *) ((char *) p1 + srcImage->bytes_per_line);
		1163	}
		1164	break;
		1165	}
		1166	}
		1167
		1168	free (lookup);
		1169	}
		1170	#endif
		1171
		1172	/*
		1173	* Check our parents are still who we think they are.
		1174	* Do transparency updates if required
51	*/	1175	*/
52	int	1176	int
53	rxvt_term::scale_pixmap (const char *geom)	1177	rxvt_term::check_our_parents ()
54	{	1178	{
55	int flags, changed = 0;	1179	check_our_parents_ev.stop ();
56	int x = 0, y = 0;	1180	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;	1181	return 0;
66	str = (char *)rxvt_malloc (MAXLEN_GEOM + 1);	1182	}
67	if (!STRCMP (geom, "?"))	1183
68	{	1184	void
69	sprintf (str, "[%dx%d+%d+%d]", /* can't presume snprintf () ! */	1185	rxvt_term::check_our_parents_cb (time_watcher &w)
70	min (bgpixmap->w, 9999), min (bgpixmap->h, 9999),	1186	{
71	min (bgpixmap->x, 9999), min (bgpixmap->y, 9999));	1187	int i, aformat, rootdepth;
72	xterm_seq (XTerm_title, str, CHAR_ST);	1188	unsigned long nitems, bytes_after;
73	free (str);	1189	Atom atype;
74	return 0;	1190	unsigned char *prop = NULL;
		1191	Window root, oldp, *list;
		1192	Pixmap rootpixmap = None;
		1193	XWindowAttributes wattr, wrootattr;
		1194	int sx, sy;
		1195	Window cr;
		1196	unsigned int rootpixmap_w = 0, rootpixmap_h = 0;
		1197
		1198	if (!option (Opt_transparent))
		1199	return; /* Don't try any more */
		1200	#if 0
		1201	struct timeval stv;
		1202	gettimeofday (&stv,NULL);
		1203	#define PRINT_BACKGROUND_OP_TIME do{ struct timeval tv;gettimeofday (&tv,NULL); tv.tv_sec-= stv.tv_sec;\
		1204	fprintf (stderr,"%d: elapsed %ld usec\n",__LINE__,\
		1205	tv.tv_sec*1000000+tv.tv_usec-stv.tv_usec );}while(0)
		1206	#else
		1207	#define PRINT_BACKGROUND_OP_TIME do{}while(0)
		1208	#endif
		1209
		1210
		1211	XGetWindowAttributes (dpy, display->root, &wrootattr);
		1212	rootdepth = wrootattr.depth;
		1213
		1214	XGetWindowAttributes (dpy, parent[0], &wattr);
		1215
		1216	if (rootdepth != wattr.depth)
75	}	1217	{
76		1218	if (am_transparent)
77	if ((p = STRCHR (geom, ';')) == NULL)	1219	{
78	p = STRCHR (geom, '\0');	1220	XSetWindowBackground (dpy, vt, pix_colors_focused[Color_bg]);
79	n = (p - geom);	1221	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	{	1222	}
88	flags |= WidthValue;	1223
89	w = 0;	1224	return; /* Don't try any more */
90	} /* default is tile */	1225	}
91	if (flags & WidthValue)	1226
		1227	/* Get all X ops out of the queue so that our information is up-to-date. */
		1228	XSync (dpy, False);
		1229
		1230	XTranslateCoordinates (dpy, parent[0], display->root,
		1231	0, 0, &sx, &sy, &cr);
		1232	/* check if we are outside of the visible part of the virtual screen : */
		1233	if( sx + (int)szHint.width <= 0 || sy + (int)szHint.height <= 0
		1234	|| sx >= wrootattr.width || sy >= wrootattr.height )
		1235	return /* 0 */ ;
		1236	/*
		1237	* Make the frame window set by the window manager have
		1238	* the root background. Some window managers put multiple nested frame
		1239	* windows for each client, so we have to take care about that.
		1240	*/
		1241	i = (xa[XA_XROOTPMAP_ID]
		1242	&& XGetWindowProperty (dpy, display->root, xa[XA_XROOTPMAP_ID],
		1243	0L, 1L, False, XA_PIXMAP, &atype, &aformat,
		1244	&nitems, &bytes_after, &prop) == Success);
		1245
		1246	if (!i || prop == NULL)
		1247	i = (xa[XA_ESETROOT_PMAP_ID]
		1248	&& XGetWindowProperty (dpy, display->root, xa[XA_ESETROOT_PMAP_ID],
		1249	0L, 1L, False, XA_PIXMAP, &atype, &aformat,
		1250	&nitems, &bytes_after, &prop) == Success);
		1251
		1252	if (!i || prop == NULL)
		1253	rootpixmap = None;
		1254	else
		1255	{
		1256	int junk;
		1257	unsigned int ujunk;
		1258	/* root pixmap may be bad - allow a error */
		1259	allowedxerror = -1;
		1260	if ((rootpixmap = *(Pixmap *)prop) != None)
		1261	if (!XGetGeometry (dpy, rootpixmap, &root, &junk, &junk, &rootpixmap_w, &rootpixmap_h, &ujunk, &ujunk))
		1262	rootpixmap = None;
		1263	allowedxerror = 0;
		1264	}
		1265
		1266	if (prop != NULL)
		1267	XFree (prop);
		1268
		1269	if (rootpixmap != None)
		1270	{
		1271	Bool success = False;
		1272	GC gc = NULL;
		1273	XGCValues gcvalue;
		1274	int shade = 100;
		1275	rgba c (rgba::MAX_CC,rgba::MAX_CC,rgba::MAX_CC);
		1276	Bool whole_tint = False, no_tint = True;
		1277
		1278	while (sx < 0) sx += (int)wrootattr.width;
		1279	while (sy < 0) sy += (int)wrootattr.height;
		1280
		1281	if (rs[Rs_shade])
		1282	shade = atoi (rs[Rs_shade]);
		1283	if (ISSET_PIXCOLOR (Color_tint))
		1284	pix_colors_focused [Color_tint].get (c);
		1285	#define IS_COMPONENT_WHOLESOME(c) ((c) <=0x000700 || (c)>=0x00f700)
		1286	if (shade >= 100)
		1287	whole_tint = (IS_COMPONENT_WHOLESOME(c.r)
		1288	&& IS_COMPONENT_WHOLESOME(c.g)
		1289	&& IS_COMPONENT_WHOLESOME(c.b));
		1290	no_tint = (c.r >= 0x00f700 && c.g >= 0x00f700 && c.b >= 0x00f700);
		1291	#undef IS_COMPONENT_WHOLESOME
		1292
		1293	bgPixmap.make_transparency_pixmap();
		1294
		1295	if (whole_tint && !no_tint)
		1296	{
92	{	1297	}
93	if (! (flags & XValue))	1298	success = True;
94	x = 50;	1299	#ifdef HAVE_AFTERIMAGE
95	if (! (flags & HeightValue))	1300	if (rs[Rs_blurradius] || bgPixmap.original_asim != NULL || (!whole_tint && (!no_tint || shade !=100)))
96	h = w;
97	if (w && !h)
98	{	1301	{
99	w = (bgpixmap->w * w) / 100;	1302	ARGB32 tint = TINT_LEAVE_SAME;
100	h = bgpixmap->h;	1303	ASImage *back_im = NULL;
		1304
		1305	back_im = pixmap2ximage (asv, bgPixmap.pixmap, 0, 0, szHint.width, szHint.height, AllPlanes, 100);
		1306	if (back_im != NULL)
101	}	1307	{
102	else if (h && !w)	1308	if (!whole_tint && (!no_tint || shade !=100))
103	{	1309	{
104	w = bgpixmap->w;	1310	ShadingInfo as_shade;
105	h = (bgpixmap->h * h) / 100;	1311	as_shade.shading = shade;
		1312	as_shade.tintColor.red = c.r;
		1313	as_shade.tintColor.green = c.g;
		1314	as_shade.tintColor.blue = c.b;
		1315	tint = shading2tint32 (&as_shade);
		1316	}
		1317
		1318	if (rs[Rs_blurradius] && back_im)
		1319	{
		1320	ASImage* tmp;
		1321	int junk;
		1322	unsigned int hr = 1, vr = 1;
		1323	int flags = XParseGeometry (rs[Rs_blurradius], &junk, &junk, &hr, &vr);
		1324	if (!(flags&WidthValue))
		1325	hr = 1;
		1326	if (!(flags&HeightValue))
		1327	vr = hr;
		1328	tmp = blur_asimage_gauss (asv, back_im, hr, vr, 0xFFFFFFFF,
		1329	(bgPixmap.original_asim == NULL || tint == TINT_LEAVE_SAME)?ASA_XImage:ASA_ASImage,
		1330	100, ASIMAGE_QUALITY_DEFAULT);
		1331	if (tmp)
		1332	{
		1333	destroy_asimage (&back_im);
		1334	back_im = tmp;
		1335	}
		1336	}
		1337	/* TODO: temporary fix - redo the logic, so that same function can do both
		1338	transparency and non-transparency */
		1339	bgPixmap.render_asim (back_im, tint);
		1340	destroy_asimage (&back_im);
		1341
		1342	} /* back_im != NULL */
		1343	else
		1344	success = False;
		1345	}
		1346	#else /* HAVE_AFTERIMAGE */
		1347	if (!whole_tint && (!no_tint || shade !=100))
		1348	{
		1349	XImage *image = XGetImage (dpy, bgPixmap.pixmap, 0, 0, szHint.width, szHint.height, AllPlanes, ZPixmap);
		1350	success = False;
		1351	if (image != NULL)
106	}	1352	{
107	if (w > 1000)	1353	PRINT_BACKGROUND_OP_TIME;
108	w = 1000;	1354	if (gc == NULL)
109	if (h > 1000)	1355	gc = XCreateGC (dpy, vt, 0UL, &gcvalue);
110	h = 1000;	1356	if (ISSET_PIXCOLOR (Color_tint) || shade != 100)
111	if (bgpixmap->w != (short)w)	1357	ShadeXImage (this, image, shade, c.r, c.g, c.b);
		1358	XPutImage (dpy, bgPixmap.pixmap, gc, image, 0, 0, 0, 0, image->width, image->height);
		1359	XDestroyImage (image);
		1360	success = True;
112	{	1361	}
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	{	1362	}
124	if (flags & XNegative)	1363	#endif /* HAVE_AFTERIMAGE */
125	flags |= YNegative;	1364	PRINT_BACKGROUND_OP_TIME;
126	y = x;	1365
		1366	if (gc != NULL)
		1367	XFreeGC (dpy, gc);
127	}	1368
128		1369	bgPixmap.apply_background();
129	if (! (flags & WidthValue) && geom[0] != '=')	1370	if (!success)
130	{	1371	am_pixmap_trans = 0;
131	x += bgpixmap->x;
132	y += bgpixmap->y;
133	}
134	else	1372	else
135	{	1373	{
136	if (flags & XNegative)	1374	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	{	1375	}
147	bgpixmap->x = x;	1376	} /* rootpixmap != None */
148	changed++;	1377
		1378	if (am_pixmap_trans)
		1379	{
		1380	if (scrollBar.win)
149	}	1381	{
150	if (bgpixmap->y != y)	1382	scrollBar.setIdle ();
		1383	scrollbar_show (0);
151	{	1384	}
152	bgpixmap->y = y;	1385
153	changed++;	1386	if (am_transparent)
154	}	1387	{
155	}	1388	want_refresh = want_full_refresh = 1;
156	free (str);	1389	if (am_pixmap_trans)
157	return changed;	1390	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
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	{	1391	}
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 */
271	static void
272	rxvt_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	{	1392	}
304	cincr *= 100.0 / cwh;
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	}	1393	}
342		1394	#endif
343	Pixmap
344	rxvt_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_warn ("couldn't load XPM file \"%.*s\", ignoring.", (p - file), file);
387	}
388
389	free (f);
390	}
391
392	resize_pixmap ();
393	return bgPixmap.pixmap;
394	}
395
396	#endif /* XPM_BACKGROUND */

Diff Legend

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