[ViewVC] Diff of: cvs/rxvt-unicode/src/rxvttoolkit.C

Comparing rxvt-unicode/src/rxvttoolkit.C (file contents):
Revision 1.24 by root, Wed Jan 25 00:42:21 2006 UTC vs.
Revision 1.115 by sf-exg, Fri Feb 11 01:24:46 2011 UTC

…		…
1	/---------------------------------C----------------------------------	1	/----------------------------------------------------------------------
2	* File: rxvttoolkit.C	2	* File: rxvttoolkit.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) 2003-2004 Marc Lehmann <pcg@goof.com>	6	* Copyright (c) 2003-2007 Marc Lehmann <pcg@goof.com>
7	*	7	*
8	* This program is free software; you can redistribute it and/or modify	8	* This program is free software; you can redistribute it and/or modify
9	* it under the terms of the GNU General Public License as published by	9	* it under the terms of the GNU General Public License as published by
10	* the Free Software Foundation; either version 2 of the License, or	10	* the Free Software Foundation; either version 2 of the License, or
11	* (at your option) any later version.	11	* (at your option) any later version.
26		26
27	#include <unistd.h>	27	#include <unistd.h>
28	#include <fcntl.h>	28	#include <fcntl.h>
29		29
30	#include <sys/utsname.h>	30	#include <sys/utsname.h>
31
32	#ifndef NO_SLOW_LINK_SUPPORT
33	# include <sys/socket.h>	31	#include <sys/socket.h>
34	# include <sys/un.h>	32	#include <sys/un.h>
		33
		34	#if XFT
		35	# include <X11/extensions/Xrender.h>
		36	#endif
		37
		38	static const char *const xa_names[] =
		39	{
		40	"TEXT",
		41	"COMPOUND_TEXT",
		42	"UTF8_STRING",
		43	"MULTIPLE",
		44	"TARGETS",
		45	"TIMESTAMP",
		46	"VT_SELECTION",
		47	"INCR",
		48	"WM_PROTOCOLS",
		49	"WM_DELETE_WINDOW",
		50	"CLIPBOARD",
		51	"AVERAGE_WIDTH",
		52	"WEIGHT_NAME",
		53	"SLANT",
		54	"CHARSET_REGISTRY",
		55	"CHARSET_ENCODING",
		56	#if ENABLE_FRILLS
		57	"_MOTIF_WM_HINTS",
		58	#endif
		59	#if ENABLE_EWMH
		60	"_NET_WM_PID",
		61	"_NET_WM_NAME",
		62	"_NET_WM_ICON_NAME",
		63	"_NET_WM_PING",
		64	"_NET_WM_ICON",
		65	#endif
		66	#if USE_XIM
		67	"WM_LOCALE_NAME",
		68	"XIM_SERVERS",
		69	#endif
		70	#ifdef ENABLE_TRANSPARENCY
		71	"_XROOTPMAP_ID",
		72	"ESETROOT_PMAP_ID",
		73	#endif
		74	#if ENABLE_XEMBED
		75	"_XEMBED",
		76	"_XEMBED_INFO",
		77	#endif
		78	#if !ENABLE_MINIMAL
		79	"SCREEN_RESOURCES",
		80	"XDCCC_LINEAR_RGB_CORRECTION",
		81	"XDCCC_LINEAR_RGB_MATRICES",
		82	"WM_COLORMAP_WINDOWS",
		83	"WM_STATE",
		84	"cursor",
		85	# if USE_XIM
		86	"TRANSPORT",
		87	"LOCALES",
		88	"_XIM_PROTOCOL",
		89	"_XIM_XCONNECT",
		90	"_XIM_MOREDATA",
35	#endif	91	# endif
		92	#endif
		93	};
		94
		95	/////////////////////////////////////////////////////////////////////////////
36		96
37	refcounted::refcounted (const char *id)	97	refcounted::refcounted (const char *id)
38	{	98	{
39	this->id = strdup (id);	99	this->id = strdup (id);
40	}	100	}
…		…
115	bool	175	bool
116	rxvt_xim::ref_init ()	176	rxvt_xim::ref_init ()
117	{	177	{
118	display = GET_R->display; //HACK: TODO	178	display = GET_R->display; //HACK: TODO
119		179
120	xim = XOpenIM (display->display, NULL, NULL, NULL);	180	xim = XOpenIM (display->dpy, 0, 0, 0);
121		181
122	if (!xim)	182	if (!xim)
123	return false;	183	return false;
124		184
125	XIMCallback ximcallback;	185	XIMCallback ximcallback;
126	ximcallback.client_data = (XPointer)this;	186	ximcallback.client_data = (XPointer)this;
127	ximcallback.callback = im_destroy_cb;	187	ximcallback.callback = im_destroy_cb;
128		188
129	XSetIMValues (xim, XNDestroyCallback, &ximcallback, NULL);	189	XSetIMValues (xim, XNDestroyCallback, &ximcallback, (char *)0);
130		190
131	return true;	191	return true;
132	}	192	}
133		193
134	rxvt_xim::~rxvt_xim ()	194	rxvt_xim::~rxvt_xim ()
…		…
139		199
140	#endif	200	#endif
141		201
142	/////////////////////////////////////////////////////////////////////////////	202	/////////////////////////////////////////////////////////////////////////////
143		203
		204	#if XFT
		205	rxvt_drawable::~rxvt_drawable ()
		206	{
		207	if (xftdrawable)
		208	XftDrawDestroy (xftdrawable);
		209	}
		210
		211	rxvt_drawable::operator XftDraw *()
		212	{
		213	if (!xftdrawable)
		214	xftdrawable = XftDrawCreate (screen->dpy, drawable, screen->visual, screen->cmap);
		215
		216	return xftdrawable;
		217	}
		218	#endif
		219
		220	/////////////////////////////////////////////////////////////////////////////
		221
		222	#if XFT
		223
		224	// not strictly necessary as it is only used with superclass of zero_initialised
		225	rxvt_screen::rxvt_screen ()
		226	: scratch_area (0)
		227	{
		228	}
		229
		230	rxvt_drawable &rxvt_screen::scratch_drawable (int w, int h)
		231	{
		232	if (!scratch_area \|\| w > scratch_w \|\| h > scratch_h)
		233	{
		234	if (scratch_area)
		235	{
		236	XFreePixmap (dpy, scratch_area->drawable);
		237	delete scratch_area;
		238	}
		239
		240	Pixmap pm = XCreatePixmap (dpy, RootWindowOfScreen (ScreenOfDisplay (dpy, display->screen)),
		241	scratch_w = w, scratch_h = h, depth);
		242
		243	scratch_area = new rxvt_drawable (this, pm);
		244	}
		245
		246	return *scratch_area;
		247	}
		248
		249	#endif
		250
		251	void
		252	rxvt_screen::set (rxvt_display *disp)
		253	{
		254	display = disp;
		255	dpy = disp->dpy;
		256
		257	Screen *screen = ScreenOfDisplay (dpy, disp->screen);
		258
		259	depth = DefaultDepthOfScreen (screen);
		260	visual = DefaultVisualOfScreen (screen);
		261	cmap = DefaultColormapOfScreen (screen);
		262	}
		263
		264	void
		265	rxvt_screen::select_visual (int bitdepth)
		266	{
		267	#if XFT
		268	XVisualInfo vinfo;
		269
		270	if (XMatchVisualInfo (dpy, display->screen, bitdepth, TrueColor, &vinfo))
		271	{
		272	depth = bitdepth;
		273	visual = vinfo.visual;
		274	cmap = XCreateColormap (dpy, display->root, visual, AllocNone);
		275	}
		276	#endif
		277	}
		278
		279	void
		280	rxvt_screen::clear ()
		281	{
		282	#if XFT
		283	if (scratch_area)
		284	{
		285	XFreePixmap (dpy, scratch_area->drawable);
		286	delete scratch_area;
		287	}
		288	#endif
		289
		290	if (cmap != DefaultColormapOfScreen (ScreenOfDisplay (dpy, display->screen)))
		291	XFreeColormap (dpy, cmap);
		292	}
		293
		294	/////////////////////////////////////////////////////////////////////////////
		295
144	rxvt_display::rxvt_display (const char *id)	296	rxvt_display::rxvt_display (const char *id)
145	: refcounted (id)	297	: refcounted (id)
146	, x_ev (this, &rxvt_display::x_cb)
147	, selection_owner (0)	298	, selection_owner (0)
		299	, clipboard_owner (0)
148	{	300	{
		301	x_ev .set<rxvt_display, &rxvt_display::x_cb > (this);
		302	flush_ev.set<rxvt_display, &rxvt_display::flush_cb> (this);
149	}	303	}
150		304
151	XrmDatabase	305	XrmDatabase
152	rxvt_display::get_resources ()	306	rxvt_display::get_resources (bool refresh)
153	{	307	{
154	char homedir = (char )getenv ("HOME");	308	char *homedir = getenv ("HOME");
155	char fname[1024];	309	char fname[1024];
156		310
157	/*	311	/*
158	* get resources using the X library function	312	* get resources using the X library function
159	*/	313	*/
160	char displayResource, xe;	314	char displayResource, xe;
161	XrmDatabase database, rdb1;	315	XrmDatabase rdb1, database = 0;
162		316
163	database = NULL;	317	#if !XLIB_ILLEGAL_ACCESS
		318	/* work around a bug in XrmSetDatabase where it frees the db, see ref_next */
		319	database = XrmGetStringDatabase ("");
		320	#endif
164		321
165	// for ordering, see for example http://www.faqs.org/faqs/Xt-FAQ/ Subject: 20	322	// for ordering, see for example http://www.faqs.org/faqs/Xt-FAQ/ Subject: 20
		323	// as opposed to "standard practise", we always read in ~/.Xdefaults
166		324
167	// 6. System wide per application default file.	325	// 6. System wide per application default file.
168		326
169	/* Add in $XAPPLRESDIR/Rxvt only; not bothering with XUSERFILESEARCHPATH */	327	/* Add in $XAPPLRESDIR/Rxvt only; not bothering with XUSERFILESEARCHPATH */
170	if ((xe = (char *)getenv ("XAPPLRESDIR")))	328	if ((xe = getenv ("XAPPLRESDIR")))
171	{	329	{
172	snprintf (fname, sizeof (fname), "%s/%s", xe, RESCLASS);	330	snprintf (fname, sizeof (fname), "%s/%s", xe, RESCLASS);
173		331
174	if ((rdb1 = XrmGetFileDatabase (fname)))	332	if ((rdb1 = XrmGetFileDatabase (fname)))
175	XrmMergeDatabases (rdb1, &database);	333	XrmMergeDatabases (rdb1, &database);
…		…
177		335
178	// 5. User's per application default file.	336	// 5. User's per application default file.
179	// none	337	// none
180		338
181	// 4. User's defaults file.	339	// 4. User's defaults file.
		340	if (homedir)
		341	{
		342	snprintf (fname, sizeof (fname), "%s/.Xdefaults", homedir);
		343
		344	if ((rdb1 = XrmGetFileDatabase (fname)))
		345	XrmMergeDatabases (rdb1, &database);
		346	}
		347
182	/* Get any Xserver defaults */	348	/* Get any Xserver defaults */
		349	if (refresh)
		350	{
		351	// fucking xlib keeps a copy of the rm string
		352	Atom actual_type;
		353	int actual_format;
		354	unsigned long nitems, nremaining;
		355	char *val = 0;
		356
		357	#if XLIB_ILLEGAL_ACCESS
		358	if (dpy->xdefaults)
		359	XFree (dpy->xdefaults);
		360	#endif
		361
		362	if (XGetWindowProperty (dpy, RootWindow (dpy, 0), XA_RESOURCE_MANAGER,
		363	0L, 100000000L, False,
		364	XA_STRING, &actual_type, &actual_format,
		365	&nitems, &nremaining,
		366	(unsigned char **)&val) == Success
		367	&& actual_type == XA_STRING
		368	&& actual_format == 8)
		369	displayResource = val;
		370	else
		371	{
		372	displayResource = 0;
		373
		374	if (val)
		375	XFree (val);
		376	}
		377
		378	#if XLIB_ILLEGAL_ACCESS
		379	dpy->xdefaults = displayResource;
		380	#endif
		381	}
		382	else
183	displayResource = XResourceManagerString (display);	383	displayResource = XResourceManagerString (dpy);
184		384
185	if (displayResource != NULL)	385	if (displayResource)
186	{	386	{
187	if ((rdb1 = XrmGetStringDatabase (displayResource)))	387	if ((rdb1 = XrmGetStringDatabase (displayResource)))
188	XrmMergeDatabases (rdb1, &database);	388	XrmMergeDatabases (rdb1, &database);
189	}	389	}
190	else if (homedir)
191	{
192	snprintf (fname, sizeof (fname), "%s/.Xdefaults", homedir);
193		390
194	if ((rdb1 = XrmGetFileDatabase (fname)))	391	#if !XLIB_ILLEGAL_ACCESS
195	XrmMergeDatabases (rdb1, &database);	392	if (refresh && displayResource)
196	}	393	XFree (displayResource);
		394	#endif
197		395
198	/* Get screen specific resources */	396	/* Get screen specific resources */
199	displayResource = XScreenResourceString (ScreenOfDisplay (display, screen));	397	displayResource = XScreenResourceString (ScreenOfDisplay (dpy, screen));
200		398
201	if (displayResource != NULL)	399	if (displayResource)
202	{	400	{
203	if ((rdb1 = XrmGetStringDatabase (displayResource)))	401	if ((rdb1 = XrmGetStringDatabase (displayResource)))
204	/* Merge with screen-independent resources */	402	/* Merge with screen-independent resources */
205	XrmMergeDatabases (rdb1, &database);	403	XrmMergeDatabases (rdb1, &database);
206		404
207	XFree (displayResource);	405	XFree (displayResource);
208	}	406	}
209		407
210	// 3. User's per host defaults file	408	// 3. User's per host defaults file
211	/* Add in XENVIRONMENT file */	409	/* Add in XENVIRONMENT file */
212	if ((xe = (char *)getenv ("XENVIRONMENT"))	410	if ((xe = getenv ("XENVIRONMENT"))
213	&& (rdb1 = XrmGetFileDatabase (xe)))	411	&& (rdb1 = XrmGetFileDatabase (xe)))
214	XrmMergeDatabases (rdb1, &database);	412	XrmMergeDatabases (rdb1, &database);
215	else if (homedir)	413	else if (homedir)
216	{	414	{
217	struct utsname un;	415	struct utsname un;
…		…
231	bool rxvt_display::ref_init ()	429	bool rxvt_display::ref_init ()
232	{	430	{
233	#ifdef LOCAL_X_IS_UNIX	431	#ifdef LOCAL_X_IS_UNIX
234	if (id[0] == ':')	432	if (id[0] == ':')
235	{	433	{
236	val = rxvt_malloc (5 + strlen (id) + 1);	434	if (!(val = rxvt_temp_buf<char> (5 + strlen (id) + 1)))
		435	return false;
237	strcpy (val, "unix/");	436	strcpy (val, "unix/");
238	strcat (val, id);	437	strcat (val, id);
239	display = XOpenDisplay (val);	438	dpy = XOpenDisplay (val);
240	free (val);
241	}	439	}
242	else	440	else
243	#endif	441	#endif
244	display = 0;	442	dpy = 0;
245		443
246	if (!display)	444	if (!dpy)
247	display = XOpenDisplay (id);	445	dpy = XOpenDisplay (id);
248		446
249	if (!display)	447	if (!dpy)
250	return false;	448	return false;
251		449
252	screen = DefaultScreen (display);	450	screen = DefaultScreen (dpy);
253	root = DefaultRootWindow (display);	451	root = DefaultRootWindow (dpy);
254	visual = DefaultVisual (display, screen);
255	cmap = DefaultColormap (display, screen);
256	depth = DefaultDepth (display, screen);
257		452
		453	assert (ARRAY_LENGTH(xa_names) == NUM_XA);
		454	XInternAtoms (dpy, (char **)xa_names, NUM_XA, False, xa);
		455
258	XrmSetDatabase (display, get_resources ());	456	XrmSetDatabase (dpy, get_resources (false));
259		457
260	#ifdef POINTER_BLANK	458	#ifdef POINTER_BLANK
261	XColor blackcolour;	459	XColor blackcolour;
262	blackcolour.red = 0;	460	blackcolour.red = 0;
263	blackcolour.green = 0;	461	blackcolour.green = 0;
264	blackcolour.blue = 0;	462	blackcolour.blue = 0;
265	Font f = XLoadFont (display, "fixed");	463	Font f = XLoadFont (dpy, "fixed");
266	blank_cursor = XCreateGlyphCursor (display, f, f, ' ', ' ',	464	blank_cursor = XCreateGlyphCursor (dpy, f, f, ' ', ' ',
267	&blackcolour, &blackcolour);	465	&blackcolour, &blackcolour);
268	XUnloadFont (display, f);	466	XUnloadFont (dpy, f);
269	#endif	467	#endif
270		468
271	#ifdef PREFER_24BIT
272	/*
273	* If depth is not 24, look for a 24bit visual.
274	*/
275	if (depth != 24)
276	{
277	XVisualInfo vinfo;
278
279	if (XMatchVisualInfo (display, screen, 24, TrueColor, &vinfo))
280	{
281	depth = 24;
282	visual = vinfo.visual;
283	cmap = XCreateColormap (display,
284	RootWindow (display, screen),
285	visual, AllocNone);
286	}
287	}
288	#endif
289
290	int fd = XConnectionNumber (display);	469	int fd = XConnectionNumber (dpy);
291		470
292	#ifndef NO_SLOW_LINK_SUPPORT
293	// try to detect wether we have a local connection.	471	// try to detect whether we have a local connection.
294	// assume unix domains socket == local, everything else not	472	// assume unix domain socket == local, everything else not
295	// TODO: might want to check for inet/127.0.0.1	473	// TODO: might want to check for inet/127.0.0.1
296	is_local = 0;	474	is_local = 0;
297	sockaddr_un sa;	475	sockaddr_un sa;
298	socklen_t sl = sizeof (sa);	476	socklen_t sl = sizeof (sa);
299		477
300	if (!getsockname (fd, (sockaddr *)&sa, &sl))	478	if (!getsockname (fd, (sockaddr *)&sa, &sl))
301	is_local = sa.sun_family == AF_LOCAL;	479	is_local = sa.sun_family == AF_UNIX;
302	#endif
303		480
		481	flush_ev.start ();
304	x_ev.start (fd, EVENT_READ);	482	x_ev.start (fd, ev::READ);
305	fcntl (fd, F_SETFD, FD_CLOEXEC);	483	fcntl (fd, F_SETFD, FD_CLOEXEC);
306		484
307	XSelectInput (display, root, PropertyChangeMask);	485	XSelectInput (dpy, root, PropertyChangeMask);
308	#ifdef USE_XIM
309	xa_xim_servers = XInternAtom (display, "XIM_SERVERS", 0);
310	#endif
311		486
312	flush ();	487	flush ();
313		488
314	return true;	489	return true;
315	}	490	}
316		491
317	void	492	void
318	rxvt_display::ref_next ()	493	rxvt_display::ref_next ()
319	{	494	{
320	// TODO: somehow check wether the database files/resources changed	495	// TODO: somehow check whether the database files/resources changed
321	// before re-loading/parsing	496	// before affording re-loading/parsing
322	XrmDestroyDatabase (XrmGetDatabase (display));	497	XrmDestroyDatabase (XrmGetDatabase (dpy));
		498	#if XLIB_ILLEGAL_ACCESS
		499	/* work around a bug in XrmSetDatabase where it frees the db */
		500	dpy->db = 0;
		501	#endif
323	XrmSetDatabase (display, get_resources ());	502	XrmSetDatabase (dpy, get_resources (true));
324	}	503	}
325		504
326	rxvt_display::~rxvt_display ()	505	rxvt_display::~rxvt_display ()
327	{	506	{
328	if (!display)	507	if (!dpy)
329	return;	508	return;
330		509
331	#ifdef POINTER_BLANK	510	#ifdef POINTER_BLANK
332	XFreeCursor (display, blank_cursor);	511	XFreeCursor (dpy, blank_cursor);
333	#endif	512	#endif
334	x_ev.stop ();	513	x_ev.stop ();
		514	flush_ev.stop ();
335	#ifdef USE_XIM	515	#ifdef USE_XIM
336	xims.clear ();	516	xims.clear ();
337	#endif	517	#endif
		518	XrmDestroyDatabase (XrmGetDatabase (dpy));
338	XCloseDisplay (display);	519	XCloseDisplay (dpy);
339	}	520	}
340		521
341	#ifdef USE_XIM	522	#ifdef USE_XIM
342	void rxvt_display::im_change_cb ()	523	void rxvt_display::im_change_cb ()
343	{	524	{
…		…
351	// registers, as xlib crashes due to a race otherwise.	532	// registers, as xlib crashes due to a race otherwise.
352	Atom actual_type, *atoms;	533	Atom actual_type, *atoms;
353	int actual_format;	534	int actual_format;
354	unsigned long nitems, bytes_after;	535	unsigned long nitems, bytes_after;
355		536
356	if (XGetWindowProperty (display, root, xa_xim_servers, 0L, 1000000L,	537	if (XGetWindowProperty (dpy, root, xa[XA_XIM_SERVERS], 0L, 1000000L,
357	False, XA_ATOM, &actual_type, &actual_format,	538	False, XA_ATOM, &actual_type, &actual_format,
358	&nitems, &bytes_after, (unsigned char **)&atoms)	539	&nitems, &bytes_after, (unsigned char **)&atoms)
359	!= Success )	540	!= Success)
360	return;	541	return;
361		542
362	if (actual_type == XA_ATOM && actual_format == 32)	543	if (actual_type == XA_ATOM && actual_format == 32)
363	for (int i = 0; i < nitems; i++)	544	for (int i = 0; i < nitems; i++)
364	if (XGetSelectionOwner (display, atoms[i]))	545	if (XGetSelectionOwner (dpy, atoms[i]))
365	{	546	{
366	im_change_cb ();	547	im_change_cb ();
367	break;	548	break;
368	}	549	}
369		550
370	XFree (atoms);	551	XFree (atoms);
371	}	552	}
372	#endif	553	#endif
373		554
374	void rxvt_display::x_cb (io_watcher &w, short revents)	555	void rxvt_display::x_cb (ev::io &w, int revents)
375	{	556	{
		557	flush_ev.start ();
		558	}
		559
		560	void rxvt_display::flush_cb (ev::prepare &w, int revents)
		561	{
		562	while (XEventsQueued (dpy, QueuedAfterFlush))
376	do	563	do
377	{	564	{
378	XEvent xev;	565	XEvent xev;
379	XNextEvent (display, &xev);	566	XNextEvent (dpy, &xev);
380		567
381	#ifdef USE_XIM	568	#ifdef USE_XIM
382	if (!XFilterEvent (&xev, None))	569	if (!XFilterEvent (&xev, None))
383	{	570	{
384	if (xev.type == PropertyNotify	571	if (xev.type == PropertyNotify
385	&& xev.xany.window == root	572	&& xev.xany.window == root
386	&& xev.xproperty.atom == xa_xim_servers)	573	&& xev.xproperty.atom == xa[XA_XIM_SERVERS])
387	im_change_check ();	574	im_change_check ();
388	#endif	575	#endif
		576	if (xev.type == MappingNotify)
		577	XRefreshKeyboardMapping (&xev.xmapping);
		578
389	for (int i = xw.size (); i--; )	579	for (int i = xw.size (); i--; )
390	{	580	{
391	if (!xw[i])	581	if (!xw[i])
392	xw.erase_unordered (i);	582	xw.erase_unordered (i);
393	else if (xw[i]->window == xev.xany.window)	583	else if (xw[i]->window == xev.xany.window)
394	xw[i]->call (xev);	584	xw[i]->call (xev);
395	}	585	}
396	#ifdef USE_XIM	586	#ifdef USE_XIM
397	}	587	}
398	#endif	588	#endif
399	}	589	}
400	while (XEventsQueued (display, QueuedAlready));	590	while (XEventsQueued (dpy, QueuedAlready));
401		591
402	XFlush (display);	592	w.stop ();
403	}
404
405	void rxvt_display::flush ()
406	{
407	if (XEventsQueued (display, QueuedAlready))
408	x_cb (x_ev, EVENT_READ);
409
410	XFlush (display);
411	}	593	}
412		594
413	void rxvt_display::reg (xevent_watcher *w)	595	void rxvt_display::reg (xevent_watcher *w)
414	{	596	{
		597	if (!w->active)
		598	{
415	xw.push_back (w);	599	xw.push_back (w);
416	w->active = xw.size ();	600	w->active = xw.size ();
		601	}
417	}	602	}
418		603
419	void rxvt_display::unreg (xevent_watcher *w)	604	void rxvt_display::unreg (xevent_watcher *w)
420	{	605	{
421	if (w->active)	606	if (w->active)
		607	{
422	xw[w->active - 1] = 0;	608	xw[w->active - 1] = 0;
		609	w->active = 0;
		610	}
423	}	611	}
424		612
425	void rxvt_display::set_selection_owner (rxvt_term *owner)	613	void rxvt_display::set_selection_owner (rxvt_term *owner, bool clipboard)
426	{	614	{
		615	rxvt_term * &cur_owner = !clipboard ? selection_owner : clipboard_owner;
		616
427	if (selection_owner && selection_owner != owner)	617	if (cur_owner && cur_owner != owner)
428	selection_owner->selection_clear ();	618	{
		619	rxvt_term *term = cur_owner;
		620	term->selection_clear (clipboard);
		621	term->flush ();
		622	}
429		623
430	selection_owner = owner;	624	cur_owner = owner;
431	}	625	}
432		626
433	#ifdef USE_XIM	627	#ifdef USE_XIM
		628
434	void rxvt_display::reg (im_watcher *w)	629	void rxvt_display::reg (im_watcher *w)
435	{	630	{
436	imw.push_back (w);	631	imw.push_back (w);
437	}	632	}
438		633
…		…
447	int l, m;	642	int l, m;
448		643
449	l = strlen (locale);	644	l = strlen (locale);
450	m = strlen (modifiers);	645	m = strlen (modifiers);
451		646
452	if (!(id = (char *)malloc (l + m + 2)))	647	if (!(id = rxvt_temp_buf<char> (l + m + 2)))
453	return 0;	648	return 0;
454		649
455	memcpy (id, locale, l); id[l] = '\n';	650	memcpy (id, locale, l); id[l] = '\n';
456	memcpy (id + l + 1, modifiers, m); id[l + m + 1] = 0;	651	memcpy (id + l + 1, modifiers, m); id[l + m + 1] = 0;
457		652
458	rxvt_xim *xim = xims.get (id);	653	rxvt_xim *xim = xims.get (id);
459		654
460	free (id);
461
462	return xim;	655	return xim;
463	}	656	}
464		657
465	void rxvt_display::put_xim (rxvt_xim *xim)	658	void rxvt_display::put_xim (rxvt_xim *xim)
466	{	659	{
467	#if XLIB_IS_RACEFREE	660	# if XLIB_IS_RACEFREE
468	xims.put (xim);	661	xims.put (xim);
469	#endif	662	# endif
470	}	663	}
		664
471	#endif	665	#endif
472		666
473	Atom rxvt_display::atom (const char *name)	667	Atom rxvt_display::atom (const char *name)
474	{	668	{
475	return XInternAtom (display, name, False);	669	return XInternAtom (dpy, name, False);
476	}	670	}
477		671
478	/////////////////////////////////////////////////////////////////////////////	672	/////////////////////////////////////////////////////////////////////////////
479		673
480	template class refcache<rxvt_display>;	674	template class refcache<rxvt_display>;
481	refcache<rxvt_display> displays;	675	refcache<rxvt_display> displays;
482		676
483	/////////////////////////////////////////////////////////////////////////////	677	/////////////////////////////////////////////////////////////////////////////
484		678	//
		679
		680	static unsigned int
		681	insert_component (unsigned int value, unsigned int mask, unsigned int shift)
		682	{
		683	return (value * (mask + 1) >> 16) << shift;
		684	}
		685
485	bool	686	bool
486	rxvt_color::set (rxvt_display *display, Pixel p)	687	rxvt_color::alloc (rxvt_screen *screen, const rgba &color)
487	{	688	{
		689	//TODO: only supports 24 bit
		690	int alpha = color.a >= 0xff00 ? 0xffff : color.a;
		691
488	#if XFT	692	#if XFT
489	XColor xc;	693	XRenderPictFormat *format;
490		694
491	xc.pixel = p;	695	// FUCKING Xft gets it wrong, of course, so work around it.
492	if (!XQueryColor (display->display, display->cmap, &xc))	696	// Transparency users should eat shit and die, and then
493	return false;	697	// XRenderQueryPictIndexValues themselves plenty.
		698	if ((screen->visual->c_class == TrueColor)
		699	&& (format = XRenderFindVisualFormat (screen->dpy, screen->visual)))
		700	{
		701	// the fun lies in doing everything manually...
		702	c.color.red = color.r;
		703	c.color.green = color.g;
		704	c.color.blue = color.b;
		705	c.color.alpha = alpha;
494		706
		707	c.pixel = insert_component (color.r, format->direct.redMask , format->direct.red )
		708	\| insert_component (color.g, format->direct.greenMask, format->direct.green)
		709	\| insert_component (color.b, format->direct.blueMask , format->direct.blue )
		710	\| insert_component (alpha , format->direct.alphaMask, format->direct.alpha);
		711
		712	return true;
		713	}
		714	else
		715	{
495	XRenderColor d;	716	XRenderColor d;
496		717
497	d.red = xc.red;	718	d.red = color.r;
498	d.green = xc.green;	719	d.green = color.g;
499	d.blue = xc.blue;	720	d.blue = color.b;
500	d.alpha = 0xffff;	721	d.alpha = alpha;
501		722
502	return	723	return XftColorAllocValue (screen->dpy, screen->visual, screen->cmap, &d, &c);
503	XftColorAllocValue (display->display,	724	}
504	display->visual,
505	display->cmap,
506	&d, &c);
507	#else	725	#else
508	this->p = p;	726	c.red = color.r;
509	#endif	727	c.green = color.g;
		728	c.blue = color.b;
510		729
		730	if (screen->visual->c_class == TrueColor)
		731	{
		732	c.pixel = (color.r >> (16 - rxvt_popcount (screen->visual->red_mask )) << rxvt_ctz (screen->visual->red_mask ))
		733	\| (color.g >> (16 - rxvt_popcount (screen->visual->green_mask)) << rxvt_ctz (screen->visual->green_mask))
		734	\| (color.b >> (16 - rxvt_popcount (screen->visual->blue_mask )) << rxvt_ctz (screen->visual->blue_mask ));
		735
		736	return true;
		737	}
		738	else if (XAllocColor (screen->dpy, screen->cmap, &c))
511	return true;	739	return true;
		740	else
		741	c.pixel = (color.r + color.g + color.b) > 128*3
		742	? WhitePixelOfScreen (DefaultScreenOfDisplay (screen->dpy))
		743	: BlackPixelOfScreen (DefaultScreenOfDisplay (screen->dpy));
		744	#endif
		745
		746	return false;
512	}	747	}
513		748
514	bool	749	bool
515	rxvt_color::set (rxvt_display display, const char name)	750	rxvt_color::set (rxvt_screen screen, const char name)
		751	{
		752	rgba c;
		753	char eos;
		754	int skip;
		755
		756	c.a = rgba::MAX_CC;
		757
		758	// parse the nonstandard "[alphapercent]" prefix
		759	if (1 <= sscanf (name, "[%hd]%n", &c.a, &skip))
		760	{
		761	c.a = lerp<int, int, int> (0, rgba::MAX_CC, c.a);
		762	name += skip;
		763	}
		764
		765	// parse the non-standard "rgba:rrrr/gggg/bbbb/aaaa" format
		766	if (strlen (name) != 4+5*4 \|\| 4 != sscanf (name, "rgba:%4hx/%4hx/%4hx/%4hx%c", &c.r, &c.g, &c.b, &c.a, &eos))
		767	{
		768	XColor xc;
		769
		770	if (XParseColor (screen->dpy, screen->cmap, name, &xc))
		771	{
		772	c.r = xc.red;
		773	c.g = xc.green;
		774	c.b = xc.blue;
		775	}
		776	else
		777	{
		778	c.r = 0xffff;
		779	c.g = 0x6969;
		780	c.b = 0xb4b4;
		781
		782	rxvt_warn ("unable to parse color '%s', using pink instead.\n", name);
		783	}
		784	}
		785
		786	return set (screen, c);
		787	}
		788
		789	bool
		790	rxvt_color::set (rxvt_screen *screen, const rgba &color)
		791	{
		792	bool got = alloc (screen, color);
		793
		794	#if !ENABLE_MINIMAL
		795	int cmap_size = screen->visual->map_entries;
		796
		797	if (!got
		798	&& screen->visual->c_class == PseudoColor
		799	&& cmap_size < 4096)
		800	{
		801	XColor *colors = new XColor [screen->visual->map_entries];
		802
		803	for (int i = 0; i < cmap_size; i++)
		804	colors [i].pixel = i;
		805
		806	// many kilobytes transfer per colour, but pseudocolor isn't worth
		807	// many extra optimisations.
		808	XQueryColors (screen->dpy, screen->cmap, colors, cmap_size);
		809
		810	int diff = 0x7fffffffUL;
		811	XColor *best = colors;
		812
		813	for (int i = 0; i < cmap_size; i++)
		814	{
		815	int d = (squared_diff<int> (color.r >> 2, colors [i].red >> 2))
		816	+ (squared_diff<int> (color.g >> 2, colors [i].green >> 2))
		817	+ (squared_diff<int> (color.b >> 2, colors [i].blue >> 2));
		818
		819	if (d < diff)
		820	{
		821	diff = d;
		822	best = colors + i;
		823	}
		824	}
		825
		826	//rxvt_warn ("could not allocate %04x %04x %04x, getting %04x %04x %04x instead (%d)\n",
		827	// color.r, color.g, color.b, best->red, best->green, best->blue, diff);
		828
		829	got = alloc (screen, rgba (best->red, best->green, best->blue));
		830
		831	delete [] colors;
		832	}
		833	#endif
		834
		835	return got;
		836	}
		837
		838	void
		839	rxvt_color::get (rgba &color)
516	{	840	{
517	#if XFT	841	#if XFT
518	return XftColorAllocName (display->display, display->visual, display->cmap,	842	color.r = c.color.red;
519	name, &c);	843	color.g = c.color.green;
		844	color.b = c.color.blue;
		845	color.a = c.color.alpha;
520	#else	846	#else
521	XColor xc;	847	color.r = c.red;
		848	color.g = c.green;
		849	color.b = c.blue;
		850	color.a = rgba::MAX_CC;
		851	#endif
		852	}
522		853
523	if (XParseColor (display->display, display->cmap, name, &xc))	854	void
524	return set (display, xc.red, xc.green, xc.blue);	855	rxvt_color::get (XColor &color)
		856	{
		857	rgba c;
		858	get (c);
		859
		860	color.red = c.r;
		861	color.green = c.g;
		862	color.blue = c.b;
		863	color.pixel = (Pixel)*this;
		864	}
		865
		866	void
		867	rxvt_color::free (rxvt_screen *screen)
		868	{
		869	if (screen->visual->c_class == TrueColor)
		870	return; // nothing to do
		871
		872	#if XFT
		873	XftColorFree (screen->dpy, screen->visual, screen->cmap, &c);
		874	#else
		875	XFreeColors (screen->dpy, screen->cmap, &c.pixel, 1, AllPlanes);
		876	#endif
		877	}
		878
		879	void
		880	rxvt_color::fade (rxvt_screen *screen, int percent, rxvt_color &result, const rgba &to)
		881	{
		882	rgba c;
		883	get (c);
		884
		885	result.set (
		886	screen,
		887	rgba (
		888	lerp (c.r, to.r, percent),
		889	lerp (c.g, to.g, percent),
		890	lerp (c.b, to.b, percent),
		891	lerp (c.a, to.a, percent)
		892	)
		893	);
		894	}
		895
		896	rxvt_selection::rxvt_selection (rxvt_display disp, int selnum, Time tm, Window win, Atom prop, sel_cb cb, void ptr)
		897	: display (disp), request_time (tm), request_win (win), request_prop (prop), request_cb (cb), user_data (ptr)
		898	{
		899	assert (selnum >= Sel_Primary && selnum <= Sel_Clipboard);
		900
		901	timer_ev.set<rxvt_selection, &rxvt_selection::timer_cb> (this);
		902	timer_ev.repeat = 10.;
		903	x_ev.set<rxvt_selection, &rxvt_selection::x_cb> (this);
		904
		905	incr_buf = 0;
		906	incr_buf_size = incr_buf_fill = 0;
		907	selection_wait = Sel_normal;
		908
		909	#if X_HAVE_UTF8_STRING
		910	selection_type = Sel_UTF8String;
		911	if (request (display->xa[XA_UTF8_STRING], selnum))
		912	return;
		913	#else
		914	selection_type = Sel_CompoundText;
		915	if (request (display->xa[XA_COMPOUND_TEXT], selnum))
		916	return;
		917	#endif
		918
		919	// fallback to CUT_BUFFER0 if the requested property has no owner
		920	handle_selection (display->root, XA_CUT_BUFFER0, false);
		921	}
		922
		923	rxvt_selection::~rxvt_selection ()
		924	{
		925	stop ();
		926	}
		927
		928	void
		929	rxvt_selection::stop ()
		930	{
		931	free (incr_buf);
		932	incr_buf = 0;
		933	timer_ev.stop ();
		934	x_ev.stop (display);
		935	}
		936
		937	bool
		938	rxvt_selection::request (Atom target, int selnum)
		939	{
		940	Atom sel;
		941
		942	selection_type \|= selnum;
		943
		944	if (selnum == Sel_Primary)
		945	sel = XA_PRIMARY;
		946	else if (selnum == Sel_Secondary)
		947	sel = XA_SECONDARY;
		948	else
		949	sel = display->xa[XA_CLIPBOARD];
		950
		951	if (XGetSelectionOwner (display->dpy, sel) != None)
		952	{
		953	XConvertSelection (display->dpy, sel, target, request_prop,
		954	request_win, request_time);
		955	x_ev.start (display, request_win);
		956	timer_ev.again ();
		957	return true;
		958	}
525		959
526	return false;	960	return false;
527	#endif
528	}	961	}
529		962
530	bool
531	rxvt_color::set (rxvt_display *display, unsigned short cr, unsigned short cg, unsigned short cb)
532	{
533	XColor xc;
534
535	xc.red = cr;
536	xc.green = cg;
537	xc.blue = cb;
538	xc.flags = DoRed \| DoGreen \| DoBlue;
539
540	if (XAllocColor (display->display, display->cmap, &xc))
541	return set (display, xc.pixel);
542
543	return false;
544	}
545
546	void	963	void
547	rxvt_color::get (rxvt_display *display, unsigned short &cr, unsigned short &cg, unsigned short &cb)	964	rxvt_selection::handle_selection (Window win, Atom prop, bool delete_prop)
548	{	965	{
549	#if XFT	966	Display *dpy = display->dpy;
550	cr = c.color.red;	967	char *data = 0;
551	cg = c.color.green;	968	unsigned int data_len = 0;
552	cb = c.color.blue;	969	unsigned long bytes_after;
553	#else	970	XTextProperty ct;
554	XColor c;
555		971
556	c.pixel = p;	972	// check for failed XConvertSelection
557	XQueryColor (display->display, display->cmap, &c);	973	if (prop == None)
		974	{
		975	bool error = true;
		976	int selnum = selection_type & Sel_whereMask;
558		977
559	cr = c.red;	978	if (selection_type & Sel_CompoundText)
560	cg = c.green;	979	{
561	cb = c.blue;	980	selection_type = 0;
562	#endif	981	error = !request (XA_STRING, selnum);
563	}	982	}
564		983
		984	if (selection_type & Sel_UTF8String)
		985	{
		986	selection_type = Sel_CompoundText;
		987	error = !request (display->xa[XA_COMPOUND_TEXT], selnum);
		988	}
		989
		990	if (error)
		991	{
		992	ct.value = 0;
		993	goto bailout;
		994	}
		995
		996	return;
		997	}
		998
		999	// length == (2^31 - 1) / 4, as gdk
		1000	if (XGetWindowProperty (dpy, win, prop,
		1001	0, 0x1fffffff,
		1002	delete_prop, AnyPropertyType,
		1003	&ct.encoding, &ct.format,
		1004	&ct.nitems, &bytes_after,
		1005	&ct.value) != Success)
		1006	{
		1007	ct.value = 0;
		1008	goto bailout;
		1009	}
		1010
		1011	if (ct.encoding == None)
		1012	goto bailout;
		1013
		1014	if (ct.value == 0)
		1015	goto bailout;
		1016
		1017	if (ct.encoding == display->xa[XA_INCR])
		1018	{
		1019	// INCR selection, start handshake
		1020	if (!delete_prop)
		1021	XDeleteProperty (dpy, win, prop);
		1022
		1023	selection_wait = Sel_incr;
		1024	timer_ev.again ();
		1025
		1026	goto bailout;
		1027	}
		1028
		1029	if (ct.nitems == 0)
		1030	{
		1031	if (selection_wait == Sel_incr)
		1032	{
		1033	XFree (ct.value);
		1034
		1035	// finally complete, now paste the whole thing
		1036	selection_wait = Sel_normal;
		1037	ct.value = (unsigned char *)incr_buf;
		1038	ct.nitems = incr_buf_fill;
		1039	incr_buf = 0;
		1040	timer_ev.stop ();
		1041	}
		1042	else
		1043	{
		1044	// avoid recursion
		1045	if (win != display->root \|\| prop != XA_CUT_BUFFER0)
		1046	{
		1047	XFree (ct.value);
		1048
		1049	// fallback to CUT_BUFFER0 if the requested property
		1050	// has an owner but is empty
		1051	handle_selection (display->root, XA_CUT_BUFFER0, False);
		1052	return;
		1053	}
		1054
		1055	goto bailout;
		1056	}
		1057	}
		1058	else if (selection_wait == Sel_incr)
		1059	{
		1060	timer_ev.again ();
		1061
		1062	while (incr_buf_fill + ct.nitems > incr_buf_size)
		1063	{
		1064	incr_buf_size = incr_buf_size ? incr_buf_size * 2 : 128*1024;
		1065	incr_buf = (char *)rxvt_realloc (incr_buf, incr_buf_size);
		1066	}
		1067
		1068	memcpy (incr_buf + incr_buf_fill, ct.value, ct.nitems);
		1069	incr_buf_fill += ct.nitems;
		1070
		1071	goto bailout;
		1072	}
		1073
		1074	char **cl;
		1075	int cr;
		1076
		1077	// we honour the first item only
		1078
		1079	#if !ENABLE_MINIMAL
		1080	// xlib is horribly broken with respect to UTF8_STRING, and nobody cares to fix it
		1081	// so recode it manually
		1082	if (ct.encoding == display->xa[XA_UTF8_STRING])
		1083	{
		1084	wchar_t w = rxvt_utf8towcs ((const char )ct.value, ct.nitems);
		1085	data = rxvt_wcstombs (w);
		1086	free (w);
		1087	}
		1088	else
		1089	#endif
		1090	if (XmbTextPropertyToTextList (dpy, &ct, &cl, &cr) >= 0
		1091	&& cl)
		1092	{
		1093	data = strdup (cl[0]);
		1094	XFreeStringList (cl);
		1095	}
		1096	else
		1097	{
		1098	// paste raw
		1099	data = strdup ((const char *)ct.value);
		1100	}
		1101
		1102	data_len = strlen (data);
		1103
		1104	bailout:
		1105	XFree (ct.value);
		1106
		1107	if (selection_wait == Sel_normal)
		1108	{
		1109	stop ();
		1110	request_cb (data, data_len, this, user_data);
		1111	free (data);
		1112	}
		1113	}
		1114
565	void	1115	void
566	rxvt_color::free (rxvt_display *display)	1116	rxvt_selection::timer_cb (ev::timer &w, int revents)
567	{	1117	{
568	#if XFT	1118	if (selection_wait == Sel_incr)
569	XftColorFree (display->display, display->visual, display->cmap, &c);	1119	rxvt_warn ("data loss: timeout on INCR selection paste, ignoring.\n");
570	#else
571	XFreeColors (display->display, display->cmap, &p, 1, AllPlanes);
572	#endif
573	}
574		1120
575	rxvt_color	1121	stop ();
576	rxvt_color::fade (rxvt_display *display, int percent)	1122	request_cb (NULL, 0, this, user_data);
577	{
578	percent = 100 - percent;
579
580	unsigned short cr, cg, cb;
581	rxvt_color faded;
582
583	get (display, cr, cg, cb);
584
585	faded.set (
586	display,
587	cr * percent / 100,
588	cg * percent / 100,
589	cb * percent / 100
590	);
591
592	return faded;
593	}	1123	}
594		1124
595	#define LERP(a,b,p) (a * p + b * (100 - p)) / 100	1125	void
596		1126	rxvt_selection::x_cb (XEvent &xev)
597	rxvt_color
598	rxvt_color::fade (rxvt_display *display, int percent, rxvt_color &fadeto)
599	{	1127	{
600	percent = 100 - percent;	1128	switch (xev.type)
		1129	{
		1130	case PropertyNotify:
		1131	if (selection_wait == Sel_incr
		1132	&& xev.xproperty.atom == request_prop
		1133	&& xev.xproperty.state == PropertyNewValue)
		1134	handle_selection (xev.xproperty.window, xev.xproperty.atom, true);
		1135	break;
601		1136
602	unsigned short cr, cg, cb;	1137	case SelectionNotify:
603	unsigned short fcr, fcg, fcb;	1138	if (selection_wait == Sel_normal
604	rxvt_color faded;	1139	&& xev.xselection.time == request_time
605		1140	&& xev.xselection.property == request_prop)
606	get (display, cr, cg, cb);	1141	{
607	fadeto.get(display, fcr, fcg, fcb);	1142	timer_ev.stop ();
608		1143	handle_selection (xev.xselection.requestor, xev.xselection.property, true);
609	faded.set (	1144	}
610	display,	1145	break;
611	LERP (cr, fcr, percent),	1146	}
612	LERP (cg, fcg, percent),
613	LERP (cb, fcb, percent)
614	);
615
616	return faded;
617	}	1147	}
618

Diff Legend

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

Comparing rxvt-unicode/src/rxvttoolkit.C (file contents): Revision 1.24 by root, Wed Jan 25 00:42:21 2006 UTC vs. Revision 1.115 by sf-exg, Fri Feb 11 01:24:46 2011 UTC

Diff Legend

Comparing rxvt-unicode/src/rxvttoolkit.C (file contents):
Revision 1.24 by root, Wed Jan 25 00:42:21 2006 UTC vs.
Revision 1.115 by sf-exg, Fri Feb 11 01:24:46 2011 UTC