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