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

Comparing rxvt-unicode/src/rxvttoolkit.C (file contents):
Revision 1.53 by root, Sun Feb 19 16:25:13 2006 UTC vs.
Revision 1.142 by root, Thu May 22 18:54:33 2014 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 3 of the License, or
11	* (at your option) any later version.	12	* (at your option) any later version.
12	*	13	*
13	* This program is distributed in the hope that it will be useful,	14	* This program is distributed in the hope that it will be useful,
14	* but WITHOUT ANY WARRANTY; without even the implied warranty of	15	* but WITHOUT ANY WARRANTY; without even the implied warranty of
15	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the	16	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
33		34
34	#if XFT	35	#if XFT
35	# include <X11/extensions/Xrender.h>	36	# include <X11/extensions/Xrender.h>
36	#endif	37	#endif
37		38
38	const char *const xa_names[] =	39	static const char *const xa_names[] =
39	{	40	{
40	"TEXT",	41	"TEXT",
41	"COMPOUND_TEXT",	42	"COMPOUND_TEXT",
42	"UTF8_STRING",	43	"UTF8_STRING",
43	"MULTIPLE",	44	"MULTIPLE",
…		…
59	#if ENABLE_EWMH	60	#if ENABLE_EWMH
60	"_NET_WM_PID",	61	"_NET_WM_PID",
61	"_NET_WM_NAME",	62	"_NET_WM_NAME",
62	"_NET_WM_ICON_NAME",	63	"_NET_WM_ICON_NAME",
63	"_NET_WM_PING",	64	"_NET_WM_PING",
		65	"_NET_WM_ICON",
64	#endif	66	#endif
65	#if USE_XIM	67	#if USE_XIM
66	"WM_LOCALE_NAME",	68	"WM_LOCALE_NAME",
67	"XIM_SERVERS",	69	"XIM_SERVERS",
68	#endif	70	#endif
69	#ifdef TRANSPARENT	71	#if HAVE_IMG \|\| ENABLE_PERL
70	"_XROOTPMAP_ID",	72	"_XROOTPMAP_ID",
71	"ESETROOT_PMAP_ID",	73	"ESETROOT_PMAP_ID",
72	#endif	74	#endif
73	#if ENABLE_XEMBED	75	#if ENABLE_XEMBED
74	"_XEMBED",	76	"_XEMBED",
…		…
151	put (*this->begin ());	153	put (*this->begin ());
152	}	154	}
153		155
154	/////////////////////////////////////////////////////////////////////////////	156	/////////////////////////////////////////////////////////////////////////////
155		157
156	#ifdef USE_XIM	158	#if USE_XIM
157		159
158	static void	160	static void
159	#if XIMCB_PROTO_BROKEN	161	#if XIMCB_PROTO_BROKEN
160	im_destroy_cb (XIC unused1, XPointer client_data, XPointer unused3)	162	im_destroy_cb (XIC unused1, XPointer client_data, XPointer unused3)
161	#else	163	#else
…		…
183		185
184	XIMCallback ximcallback;	186	XIMCallback ximcallback;
185	ximcallback.client_data = (XPointer)this;	187	ximcallback.client_data = (XPointer)this;
186	ximcallback.callback = im_destroy_cb;	188	ximcallback.callback = im_destroy_cb;
187		189
188	XSetIMValues (xim, XNDestroyCallback, &ximcallback, 0);	190	XSetIMValues (xim, XNDestroyCallback, &ximcallback, (char *)0);
189		191
190	return true;	192	return true;
191	}	193	}
192		194
193	rxvt_xim::~rxvt_xim ()	195	rxvt_xim::~rxvt_xim ()
…		…
226	{	228	{
227	}	229	}
228		230
229	rxvt_drawable &rxvt_screen::scratch_drawable (int w, int h)	231	rxvt_drawable &rxvt_screen::scratch_drawable (int w, int h)
230	{	232	{
231	// it's actually faster to re-allocate every time. don't ask me
232	// why, but its likely no big deal there are no roundtrips
233	// (I think/hope).
234	if (!scratch_area \|\| w > scratch_w \|\| h > scratch_h \|\| 1/D/)	233	if (!scratch_area \|\| w > scratch_w \|\| h > scratch_h)
235	{	234	{
236	if (scratch_area)	235	if (scratch_area)
237	{	236	{
238	XFreePixmap (dpy, scratch_area->drawable);	237	XFreePixmap (dpy, scratch_area->drawable);
239	delete scratch_area;	238	delete scratch_area;
…		…
261	depth = DefaultDepthOfScreen (screen);	260	depth = DefaultDepthOfScreen (screen);
262	visual = DefaultVisualOfScreen (screen);	261	visual = DefaultVisualOfScreen (screen);
263	cmap = DefaultColormapOfScreen (screen);	262	cmap = DefaultColormapOfScreen (screen);
264	}	263	}
265		264
266	void	265	#if ENABLE_FRILLS
267	rxvt_screen::set (rxvt_display *disp, int bitdepth)
268	{
269	set (disp);
270		266
271	#if XFT	267	void
		268	rxvt_screen::select_visual (int id)
		269	{
272	XVisualInfo vinfo;	270	XVisualInfo vinfo;
		271	vinfo.visualid = id;
		272	int n;
		273
		274	if (XVisualInfo *vi = XGetVisualInfo (dpy, VisualIDMask, &vinfo, &n))
		275	{
		276	depth = vi->depth;
		277	visual = vi->visual;
		278
		279	XFree (vi);
		280
		281	cmap = XCreateColormap (dpy, display->root, visual, AllocNone);
		282	}
		283	else
		284	rxvt_warn ("cannot requested visual id 0x%02x, using default visual.\n", id);
		285	}
		286
		287	void
		288	rxvt_screen::select_depth (int bitdepth)
		289	{
		290	XVisualInfo vinfo;
273		291
274	if (XMatchVisualInfo (dpy, display->screen, bitdepth, TrueColor, &vinfo))	292	if (XMatchVisualInfo (dpy, display->screen, bitdepth, TrueColor, &vinfo))
275	{
276	depth = bitdepth;
277	visual = vinfo.visual;	293	select_visual (vinfo.visualid);
278	cmap = XCreateColormap (dpy, disp->root, visual, AllocNone);	294	else
279	}	295	rxvt_warn ("no visual found for requested depth %d, using default visual.\n", bitdepth);
280	#endif
281	}	296	}
		297
		298	#endif
282		299
283	void	300	void
284	rxvt_screen::clear ()	301	rxvt_screen::clear ()
285	{	302	{
286	#if XFT	303	#if XFT
…		…
297		314
298	/////////////////////////////////////////////////////////////////////////////	315	/////////////////////////////////////////////////////////////////////////////
299		316
300	rxvt_display::rxvt_display (const char *id)	317	rxvt_display::rxvt_display (const char *id)
301	: refcounted (id)	318	: refcounted (id)
302	, x_ev (this, &rxvt_display::x_cb)
303	, selection_owner (0)	319	, selection_owner (0)
		320	, clipboard_owner (0)
304	{	321	{
		322	x_ev .set<rxvt_display, &rxvt_display::x_cb > (this);
		323	flush_ev.set<rxvt_display, &rxvt_display::flush_cb> (this);
305	}	324	}
306		325
307	XrmDatabase	326	XrmDatabase
308	rxvt_display::get_resources (bool refresh)	327	rxvt_display::get_resources (bool refresh)
309	{	328	{
310	char homedir = (char )getenv ("HOME");	329	char *homedir = getenv ("HOME");
311	char fname[1024];	330	char fname[1024];
312		331
313	/*	332	/*
314	* get resources using the X library function	333	* get resources using the X library function
315	*/	334	*/
316	char displayResource, xe;	335	char displayResource, xe;
317	XrmDatabase rdb1, database = 0;	336	XrmDatabase rdb1, database = 0;
318		337
		338	#if !XLIB_ILLEGAL_ACCESS
		339	/* work around a bug in XrmSetDatabase where it frees the db, see ref_next */
		340	database = XrmGetStringDatabase ("");
		341	#endif
		342
319	// for ordering, see for example http://www.faqs.org/faqs/Xt-FAQ/ Subject: 20	343	// for ordering, see for example http://www.faqs.org/faqs/Xt-FAQ/ Subject: 20
		344	// as opposed to "standard practise", we always read in ~/.Xdefaults
320		345
321	// 6. System wide per application default file.	346	// 6. System wide per application default file.
322		347
323	/* Add in $XAPPLRESDIR/Rxvt only; not bothering with XUSERFILESEARCHPATH */	348	/* Add in $XAPPLRESDIR/Rxvt only; not bothering with XUSERFILESEARCHPATH */
324	if ((xe = (char *)getenv ("XAPPLRESDIR")))	349	if ((xe = getenv ("XAPPLRESDIR")))
325	{	350	{
326	snprintf (fname, sizeof (fname), "%s/%s", xe, RESCLASS);	351	snprintf (fname, sizeof (fname), "%s/%s", xe, RESCLASS);
327		352
328	if ((rdb1 = XrmGetFileDatabase (fname)))	353	if ((rdb1 = XrmGetFileDatabase (fname)))
329	XrmMergeDatabases (rdb1, &database);	354	XrmMergeDatabases (rdb1, &database);
…		…
331		356
332	// 5. User's per application default file.	357	// 5. User's per application default file.
333	// none	358	// none
334		359
335	// 4. User's defaults file.	360	// 4. User's defaults file.
		361	if (homedir)
		362	{
		363	snprintf (fname, sizeof (fname), "%s/.Xdefaults", homedir);
		364
		365	if ((rdb1 = XrmGetFileDatabase (fname)))
		366	XrmMergeDatabases (rdb1, &database);
		367	}
		368
336	/* Get any Xserver defaults */	369	/* Get any Xserver defaults */
337	if (refresh)	370	if (refresh)
338	{	371	{
339	// fucking xlib keeps a copy of the rm string	372	// fucking xlib keeps a copy of the rm string
340	Atom actual_type;	373	Atom actual_type;
…		…
345	#if XLIB_ILLEGAL_ACCESS	378	#if XLIB_ILLEGAL_ACCESS
346	if (dpy->xdefaults)	379	if (dpy->xdefaults)
347	XFree (dpy->xdefaults);	380	XFree (dpy->xdefaults);
348	#endif	381	#endif
349		382
350	if (XGetWindowProperty (dpy, root, XA_RESOURCE_MANAGER,	383	if (XGetWindowProperty (dpy, RootWindow (dpy, 0), XA_RESOURCE_MANAGER,
351	0L, 100000000L, False,	384	0L, 100000000L, False,
352	XA_STRING, &actual_type, &actual_format,	385	XA_STRING, &actual_type, &actual_format,
353	&nitems, &nremaining,	386	&nitems, &nremaining,
354	(unsigned char **)&val) == Success	387	(unsigned char **)&val) == Success
355	&& actual_type == XA_STRING	388	&& actual_type == XA_STRING
356	&& actual_format == 8)	389	&& actual_format == 8)
357	displayResource = val;	390	displayResource = val;
358	else	391	else
359	{	392	{
360	displayResource = 0;	393	displayResource = 0;
		394
361	if (val)	395	if (val)
362	XFree(val);	396	XFree (val);
363	}	397	}
364		398
365	#if XLIB_ILLEGAL_ACCESS	399	#if XLIB_ILLEGAL_ACCESS
366	dpy->xdefaults = displayResource;	400	dpy->xdefaults = displayResource;
367	#endif	401	#endif
368	}	402	}
…		…
370	displayResource = XResourceManagerString (dpy);	404	displayResource = XResourceManagerString (dpy);
371		405
372	if (displayResource)	406	if (displayResource)
373	{	407	{
374	if ((rdb1 = XrmGetStringDatabase (displayResource)))	408	if ((rdb1 = XrmGetStringDatabase (displayResource)))
375	XrmMergeDatabases (rdb1, &database);
376	}
377	else if (homedir)
378	{
379	snprintf (fname, sizeof (fname), "%s/.Xdefaults", homedir);
380
381	if ((rdb1 = XrmGetFileDatabase (fname)))
382	XrmMergeDatabases (rdb1, &database);	409	XrmMergeDatabases (rdb1, &database);
383	}	410	}
384		411
385	#if !XLIB_ILLEGAL_ACCESS	412	#if !XLIB_ILLEGAL_ACCESS
386	if (refresh && displayResource)	413	if (refresh && displayResource)
…		…
399	XFree (displayResource);	426	XFree (displayResource);
400	}	427	}
401		428
402	// 3. User's per host defaults file	429	// 3. User's per host defaults file
403	/* Add in XENVIRONMENT file */	430	/* Add in XENVIRONMENT file */
404	if ((xe = (char *)getenv ("XENVIRONMENT"))	431	if ((xe = getenv ("XENVIRONMENT"))
405	&& (rdb1 = XrmGetFileDatabase (xe)))	432	&& (rdb1 = XrmGetFileDatabase (xe)))
406	XrmMergeDatabases (rdb1, &database);	433	XrmMergeDatabases (rdb1, &database);
407	else if (homedir)	434	else if (homedir)
408	{	435	{
409	struct utsname un;	436	struct utsname un;
…		…
423	bool rxvt_display::ref_init ()	450	bool rxvt_display::ref_init ()
424	{	451	{
425	#ifdef LOCAL_X_IS_UNIX	452	#ifdef LOCAL_X_IS_UNIX
426	if (id[0] == ':')	453	if (id[0] == ':')
427	{	454	{
428	val = rxvt_malloc (5 + strlen (id) + 1);	455	char *val = rxvt_temp_buf<char> (5 + strlen (id) + 1);
		456
429	strcpy (val, "unix/");	457	strcpy (val, "unix/");
430	strcat (val, id);	458	strcat (val, id);
		459
431	dpy = XOpenDisplay (val);	460	dpy = XOpenDisplay (val);
432	free (val);
433	}	461	}
434	else	462	else
435	#endif	463	#endif
436	dpy = 0;	464	dpy = 0;
437		465
…		…
442	return false;	470	return false;
443		471
444	screen = DefaultScreen (dpy);	472	screen = DefaultScreen (dpy);
445	root = DefaultRootWindow (dpy);	473	root = DefaultRootWindow (dpy);
446		474
447	assert (sizeof (xa_names) / sizeof (char *) == NUM_XA);	475	assert (ecb_array_length (xa_names) == NUM_XA);
448	XInternAtoms (dpy, (char **)xa_names, NUM_XA, False, xa);	476	XInternAtoms (dpy, (char **)xa_names, NUM_XA, False, xa);
449		477
450	XrmSetDatabase (dpy, get_resources (false));	478	XrmSetDatabase (dpy, get_resources (false));
451		479
452	#ifdef POINTER_BLANK	480	#ifdef POINTER_BLANK
…		…
458	blank_cursor = XCreateGlyphCursor (dpy, f, f, ' ', ' ',	486	blank_cursor = XCreateGlyphCursor (dpy, f, f, ' ', ' ',
459	&blackcolour, &blackcolour);	487	&blackcolour, &blackcolour);
460	XUnloadFont (dpy, f);	488	XUnloadFont (dpy, f);
461	#endif	489	#endif
462		490
		491	flags = 0;
		492	#if XRENDER
		493	int major, minor;
		494	if (XRenderQueryVersion (dpy, &major, &minor))
		495	if (major > 0 \|\| (major == 0 && minor >= 10))
		496	{
		497	flags \|= DISPLAY_HAS_RENDER;
		498
		499	#if 0
		500	if (major > 0 \|\| (major == 0 && minor >= 11))
		501	flags \|= DISPLAY_HAS_RENDER_MUL;
		502	#endif
		503
		504	if (XFilters *filters = XRenderQueryFilters (dpy, root))
		505	{
		506	for (int i = 0; i < filters->nfilter; i++)
		507	if (!strcmp (filters->filter [i], FilterConvolution))
		508	flags \|= DISPLAY_HAS_RENDER_CONV;
		509
		510	XFree (filters);
		511	}
		512	}
		513	#endif
		514
463	int fd = XConnectionNumber (dpy);	515	int fd = XConnectionNumber (dpy);
464		516
465	// try to detect wether we have a local connection.	517	// try to detect whether we have a local connection.
466	// assume unix domains socket == local, everything else not	518	// assume unix domain socket == local, everything else not
467	// TODO: might want to check for inet/127.0.0.1	519	// TODO: might want to check for inet/127.0.0.1
468	is_local = 0;	520	is_local = 0;
469	sockaddr_un sa;	521	sockaddr_un sa;
470	socklen_t sl = sizeof (sa);	522	socklen_t sl = sizeof (sa);
471		523
472	if (!getsockname (fd, (sockaddr *)&sa, &sl))	524	if (!getsockname (fd, (sockaddr *)&sa, &sl))
473	is_local = sa.sun_family == AF_LOCAL;	525	is_local = sa.sun_family == AF_UNIX;
474		526
		527	flush_ev.start ();
475	x_ev.start (fd, EVENT_READ);	528	x_ev.start (fd, ev::READ);
476	fcntl (fd, F_SETFD, FD_CLOEXEC);	529	fcntl (fd, F_SETFD, FD_CLOEXEC);
477		530
478	XSelectInput (dpy, root, PropertyChangeMask);	531	XSelectInput (dpy, root, PropertyChangeMask);
479		532
480	flush ();	533	flush ();
…		…
483	}	536	}
484		537
485	void	538	void
486	rxvt_display::ref_next ()	539	rxvt_display::ref_next ()
487	{	540	{
488	// TODO: somehow check wether the database files/resources changed	541	// TODO: somehow check whether the database files/resources changed
489	// before affording re-loading/parsing	542	// before affording re-loading/parsing
490	XrmDestroyDatabase (XrmGetDatabase (dpy));	543	XrmDestroyDatabase (XrmGetDatabase (dpy));
		544	#if XLIB_ILLEGAL_ACCESS
		545	/* work around a bug in XrmSetDatabase where it frees the db */
		546	dpy->db = 0;
		547	#endif
491	XrmSetDatabase (dpy, get_resources (true));	548	XrmSetDatabase (dpy, get_resources (true));
492	}	549	}
493		550
494	rxvt_display::~rxvt_display ()	551	rxvt_display::~rxvt_display ()
495	{	552	{
…		…
498		555
499	#ifdef POINTER_BLANK	556	#ifdef POINTER_BLANK
500	XFreeCursor (dpy, blank_cursor);	557	XFreeCursor (dpy, blank_cursor);
501	#endif	558	#endif
502	x_ev.stop ();	559	x_ev.stop ();
		560	flush_ev.stop ();
503	#ifdef USE_XIM	561	#if USE_XIM
504	xims.clear ();	562	xims.clear ();
505	#endif	563	#endif
		564	XrmDestroyDatabase (XrmGetDatabase (dpy));
506	XCloseDisplay (dpy);	565	XCloseDisplay (dpy);
507	}	566	}
508		567
509	#ifdef USE_XIM	568	#if USE_XIM
510	void rxvt_display::im_change_cb ()	569	void rxvt_display::im_change_cb ()
511	{	570	{
512	for (im_watcher **i = imw.begin (); i != imw.end (); ++i)	571	for (im_watcher **i = imw.begin (); i != imw.end (); ++i)
513	(*i)->call ();	572	(*i)->call ();
514	}	573	}
…		…
522	unsigned long nitems, bytes_after;	581	unsigned long nitems, bytes_after;
523		582
524	if (XGetWindowProperty (dpy, root, xa[XA_XIM_SERVERS], 0L, 1000000L,	583	if (XGetWindowProperty (dpy, root, xa[XA_XIM_SERVERS], 0L, 1000000L,
525	False, XA_ATOM, &actual_type, &actual_format,	584	False, XA_ATOM, &actual_type, &actual_format,
526	&nitems, &bytes_after, (unsigned char **)&atoms)	585	&nitems, &bytes_after, (unsigned char **)&atoms)
527	!= Success )	586	!= Success)
528	return;	587	return;
529		588
530	if (actual_type == XA_ATOM && actual_format == 32)	589	if (actual_type == XA_ATOM && actual_format == 32)
531	for (int i = 0; i < nitems; i++)	590	for (int i = 0; i < nitems; i++)
532	if (XGetSelectionOwner (dpy, atoms[i]))	591	if (XGetSelectionOwner (dpy, atoms[i]))
533	{	592	{
534	im_change_cb ();	593	im_change_cb ();
535	break;	594	break;
…		…
537		596
538	XFree (atoms);	597	XFree (atoms);
539	}	598	}
540	#endif	599	#endif
541		600
542	void rxvt_display::x_cb (io_watcher &w, short revents)	601	void rxvt_display::x_cb (ev::io &w, int revents)
543	{	602	{
		603	flush_ev.start ();
		604	}
		605
		606	void rxvt_display::flush_cb (ev::prepare &w, int revents)
		607	{
		608	while (XEventsQueued (dpy, QueuedAfterFlush))
544	do	609	do
545	{	610	{
546	XEvent xev;	611	XEvent xev;
547	XNextEvent (dpy, &xev);	612	XNextEvent (dpy, &xev);
548		613
549	#ifdef USE_XIM	614	#if USE_XIM
550	if (!XFilterEvent (&xev, None))	615	if (!XFilterEvent (&xev, None))
551	{	616	{
552	if (xev.type == PropertyNotify	617	if (xev.type == PropertyNotify
553	&& xev.xany.window == root	618	&& xev.xany.window == root
554	&& xev.xproperty.atom == xa[XA_XIM_SERVERS])	619	&& xev.xproperty.atom == xa[XA_XIM_SERVERS])
555	im_change_check ();	620	im_change_check ();
556	#endif	621	#endif
		622	if (xev.type == MappingNotify)
		623	XRefreshKeyboardMapping (&xev.xmapping);
		624
557	for (int i = xw.size (); i--; )	625	for (int i = xw.size (); i--; )
558	{	626	{
559	if (!xw[i])	627	if (!xw[i])
560	xw.erase_unordered (i);	628	xw.erase_unordered (i);
561	else if (xw[i]->window == xev.xany.window)	629	else if (xw[i]->window == xev.xany.window)
562	xw[i]->call (xev);	630	xw[i]->call (xev);
563	}	631	}
564	#ifdef USE_XIM	632	#if USE_XIM
565	}	633	}
566	#endif	634	#endif
567	}	635	}
568	while (XEventsQueued (dpy, QueuedAlready));	636	while (XEventsQueued (dpy, QueuedAlready));
569		637
570	XFlush (dpy);	638	w.stop ();
571	}
572
573	void rxvt_display::flush ()
574	{
575	if (XEventsQueued (dpy, QueuedAlready))
576	x_cb (x_ev, EVENT_READ);
577
578	XFlush (dpy);
579	}	639	}
580		640
581	void rxvt_display::reg (xevent_watcher *w)	641	void rxvt_display::reg (xevent_watcher *w)
582	{	642	{
		643	if (!w->active)
		644	{
583	xw.push_back (w);	645	xw.push_back (w);
584	w->active = xw.size ();	646	w->active = xw.size ();
		647	}
585	}	648	}
586		649
587	void rxvt_display::unreg (xevent_watcher *w)	650	void rxvt_display::unreg (xevent_watcher *w)
588	{	651	{
589	if (w->active)	652	if (w->active)
		653	{
590	xw[w->active - 1] = 0;	654	xw[w->active - 1] = 0;
		655	w->active = 0;
		656	}
591	}	657	}
592		658
593	void rxvt_display::set_selection_owner (rxvt_term *owner)	659	void rxvt_display::set_selection_owner (rxvt_term *owner, bool clipboard)
594	{	660	{
		661	rxvt_term * &cur_owner = !clipboard ? selection_owner : clipboard_owner;
		662
595	if (selection_owner && selection_owner != owner)	663	if (cur_owner && cur_owner != owner)
596	selection_owner->selection_clear ();	664	{
		665	rxvt_term *term = cur_owner;
		666	term->selection_clear (clipboard);
		667	term->flush ();
		668	}
597		669
598	selection_owner = owner;	670	cur_owner = owner;
599	}	671	}
600		672
601	#ifdef USE_XIM	673	#if USE_XIM
602		674
603	void rxvt_display::reg (im_watcher *w)	675	void rxvt_display::reg (im_watcher *w)
604	{	676	{
605	imw.push_back (w);	677	imw.push_back (w);
606	}	678	}
…		…
616	int l, m;	688	int l, m;
617		689
618	l = strlen (locale);	690	l = strlen (locale);
619	m = strlen (modifiers);	691	m = strlen (modifiers);
620		692
621	if (!(id = (char *)malloc (l + m + 2)))	693	if (!(id = rxvt_temp_buf<char> (l + m + 2)))
622	return 0;	694	return 0;
623		695
624	memcpy (id, locale, l); id[l] = '\n';	696	memcpy (id, locale, l); id[l] = '\n';
625	memcpy (id + l + 1, modifiers, m); id[l + m + 1] = 0;	697	memcpy (id + l + 1, modifiers, m); id[l + m + 1] = 0;
626		698
627	rxvt_xim *xim = xims.get (id);	699	rxvt_xim *xim = xims.get (id);
628
629	free (id);
630		700
631	return xim;	701	return xim;
632	}	702	}
633		703
634	void rxvt_display::put_xim (rxvt_xim *xim)	704	void rxvt_display::put_xim (rxvt_xim *xim)
…		…
643	Atom rxvt_display::atom (const char *name)	713	Atom rxvt_display::atom (const char *name)
644	{	714	{
645	return XInternAtom (dpy, name, False);	715	return XInternAtom (dpy, name, False);
646	}	716	}
647		717
		718	Pixmap
		719	rxvt_display::get_pixmap_property (Atom property)
		720	{
		721	Pixmap pixmap = None;
		722
		723	int aformat;
		724	unsigned long nitems, bytes_after;
		725	Atom atype;
		726	unsigned char *prop;
		727	int result = XGetWindowProperty (dpy, root, property,
		728	0L, 1L, False, XA_PIXMAP, &atype, &aformat,
		729	&nitems, &bytes_after, &prop);
		730	if (result == Success)
		731	{
		732	if (atype == XA_PIXMAP)
		733	pixmap = (Pixmap )prop;
		734	XFree (prop);
		735	}
		736
		737	return pixmap;
		738	}
		739
648	/////////////////////////////////////////////////////////////////////////////	740	/////////////////////////////////////////////////////////////////////////////
649		741
650	template class refcache<rxvt_display>;	742	template class refcache<rxvt_display>;
651	refcache<rxvt_display> displays;	743	refcache<rxvt_display> displays;
652		744
653	/////////////////////////////////////////////////////////////////////////////	745	/////////////////////////////////////////////////////////////////////////////
654		746	//
		747
		748	static unsigned int
		749	insert_component (unsigned int value, unsigned int mask, unsigned int shift)
		750	{
		751	return (value * (mask + 1) >> 16) << shift;
		752	}
		753
655	bool	754	bool
656	rxvt_color::alloc (rxvt_screen *screen, const rgba &color)	755	rxvt_color::alloc (rxvt_screen *screen, const rgba &color)
657	{	756	{
		757	//TODO: only supports 24 bit
		758	unsigned int alpha = color.a >= 0xff00 ? 0xffff : color.a;
		759
658	#if XFT	760	#if XFT
659	XRenderPictFormat *format;	761	XRenderPictFormat *format;
660		762
661	// FUCKING Xft gets it wrong, of course, so work around it.	763	// FUCKING Xft gets it wrong, of course, so work around it.
662	// Transparency users should eat shit and die, and then	764	// Transparency users should eat shit and die, and then
…		…
666	{	768	{
667	// the fun lies in doing everything manually...	769	// the fun lies in doing everything manually...
668	c.color.red = color.r;	770	c.color.red = color.r;
669	c.color.green = color.g;	771	c.color.green = color.g;
670	c.color.blue = color.b;	772	c.color.blue = color.b;
671	c.color.alpha = color.a;	773	c.color.alpha = alpha;
672		774
		775	// Xft wants premultiplied alpha, but abuses the alpha channel
		776	// as blend factor, and doesn't allow us to set the alpha channel
		777	c.color.red = c.color.red * alpha / 0xffff;
		778	c.color.green = c.color.green * alpha / 0xffff;
		779	c.color.blue = c.color.blue * alpha / 0xffff;
		780
673	c.pixel = ((color.r * format->direct.redMask / rgba::MAX_CC) << format->direct.red )	781	c.pixel = insert_component (c.color.red , format->direct.redMask , format->direct.red )
674	\| ((color.g * format->direct.greenMask / rgba::MAX_CC) << format->direct.green)	782	\| insert_component (c.color.green, format->direct.greenMask, format->direct.green)
675	\| ((color.b * format->direct.blueMask / rgba::MAX_CC) << format->direct.blue )	783	\| insert_component (c.color.blue , format->direct.blueMask , format->direct.blue )
676	\| ((color.a * format->direct.alphaMask / rgba::MAX_CC) << format->direct.alpha);	784	\| insert_component (alpha , format->direct.alphaMask, format->direct.alpha);
677		785
678	return true;	786	return true;
679	}	787	}
680	else	788	else
681	{	789	{
682	XRenderColor d;	790	XRenderColor d;
683		791
684	d.red = color.r;	792	d.red = color.r;
685	d.green = color.g;	793	d.green = color.g;
686	d.blue = color.b;	794	d.blue = color.b;
687	d.alpha = color.a;	795	d.alpha = alpha;
688		796
689	return XftColorAllocValue (screen->dpy, screen->visual, screen->cmap, &d, &c);	797	if (XftColorAllocValue (screen->dpy, screen->visual, screen->cmap, &d, &c))
		798	return true;
690	}	799	}
691	#else	800	#else
692	c.red = color.r;	801	c.red = color.r;
693	c.green = color.g;	802	c.green = color.g;
694	c.blue = color.b;	803	c.blue = color.b;
695		804
696	if (screen->visual->c_class == TrueColor)	805	if (screen->visual->c_class == TrueColor)
697	{	806	{
698	c.pixel = (color.r * (screen->visual->red_mask >> ctz (screen->visual->red_mask ))	807	c.pixel = (color.r >> (16 - ecb_popcount32 (screen->visual->red_mask )) << ecb_ctz32 (screen->visual->red_mask ))
699	/ rgba::MAX_CC) << ctz (screen->visual->red_mask )	808	\| (color.g >> (16 - ecb_popcount32 (screen->visual->green_mask)) << ecb_ctz32 (screen->visual->green_mask))
700	\| (color.g * (screen->visual->green_mask >> ctz (screen->visual->green_mask))
701	/ rgba::MAX_CC) << ctz (screen->visual->green_mask)
702	\| (color.b * (screen->visual->blue_mask >> ctz (screen->visual->blue_mask ))	809	\| (color.b >> (16 - ecb_popcount32 (screen->visual->blue_mask )) << ecb_ctz32 (screen->visual->blue_mask ));
703	/ rgba::MAX_CC) << ctz (screen->visual->blue_mask );
704		810
705	return true;	811	return true;
706	}	812	}
707	else if (XAllocColor (screen->dpy, screen->cmap, &c))	813	else if (XAllocColor (screen->dpy, screen->cmap, &c))
708	return true;	814	return true;
709	else	815	#endif
		816
710	c.pixel = (color.r + color.g + color.b) > 128*3	817	c.pixel = (color.r + color.g + color.b) > 128*3
711	? WhitePixelOfScreen (DefaultScreenOfDisplay (screen->dpy))	818	? WhitePixelOfScreen (DefaultScreenOfDisplay (screen->dpy))
712	: BlackPixelOfScreen (DefaultScreenOfDisplay (screen->dpy));	819	: BlackPixelOfScreen (DefaultScreenOfDisplay (screen->dpy));
713	#endif
714		820
715	return false;	821	return false;
716	}	822	}
717		823
718	bool	824	bool
…		…
720	{	826	{
721	rgba c;	827	rgba c;
722	char eos;	828	char eos;
723	int skip;	829	int skip;
724		830
		831	c.a = rgba::MAX_CC;
		832
725	// parse the nonstandard "[alphapercent]" prefix	833	// parse the nonstandard "[alphapercent]" prefix
726	if (1 <= sscanf (name, "[%hd]%n", &c.a, &skip))	834	if (1 <= sscanf (name, "[%hd]%n", &c.a, &skip))
727	{	835	{
728	c.a = lerp<int, int, int> (0, rgba::MAX_CC, c.a);	836	c.a = lerp<int, int, int> (0, rgba::MAX_CC, c.a);
729	name += skip;	837	name += skip;
730	}	838	}
731	else
732	c.a = rgba::MAX_CC;
733		839
734	// parse the non-standard "rgba:rrrr/gggg/bbbb/aaaa" format	840	// parse the non-standard "rgba:rrrr/gggg/bbbb/aaaa" format
735	if (strlen (name) != 4+5*4 \|\| 4 != sscanf (name, "rgba:%4hx/%4hx/%4hx/%4hx%c", &c.r, &c.g, &c.b, &c.a, &eos))	841	if (strlen (name) != 4+5*4 \|\| 4 != sscanf (name, "rgba:%4hx/%4hx/%4hx/%4hx%c", &c.r, &c.g, &c.b, &c.a, &eos))
736	{	842	{
737	XColor xc, xc_exact;	843	XColor xc;
738		844
739	if (XParseColor (screen->dpy, screen->cmap, name, &xc))	845	if (XParseColor (screen->dpy, screen->cmap, name, &xc))
740	{	846	{
741	c.r = xc.red;	847	c.r = xc.red;
742	c.g = xc.green;	848	c.g = xc.green;
…		…
769	{	875	{
770	XColor *colors = new XColor [screen->visual->map_entries];	876	XColor *colors = new XColor [screen->visual->map_entries];
771		877
772	for (int i = 0; i < cmap_size; i++)	878	for (int i = 0; i < cmap_size; i++)
773	colors [i].pixel = i;	879	colors [i].pixel = i;
774		880
775	// many kilobytes transfer per colour, but pseudocolor isn't worth	881	// many kilobytes transfer per colour, but pseudocolor isn't worth
776	// many extra optimisations.	882	// many extra optimisations.
777	XQueryColors (screen->dpy, screen->cmap, colors, cmap_size);	883	XQueryColors (screen->dpy, screen->cmap, colors, cmap_size);
778		884
779	int diff = 0x7fffffffUL;	885	int diff = 0x7fffffffUL;
…		…
792	}	898	}
793	}	899	}
794		900
795	//rxvt_warn ("could not allocate %04x %04x %04x, getting %04x %04x %04x instead (%d)\n",	901	//rxvt_warn ("could not allocate %04x %04x %04x, getting %04x %04x %04x instead (%d)\n",
796	// color.r, color.g, color.b, best->red, best->green, best->blue, diff);	902	// color.r, color.g, color.b, best->red, best->green, best->blue, diff);
797		903
798	got = alloc (screen, rgba (best->red, best->green, best->blue));	904	got = alloc (screen, rgba (best->red, best->green, best->blue));
799		905
800	delete colors;	906	delete [] colors;
801	}	907	}
802	#endif	908	#endif
803		909
804	return got;	910	return got;
805	}	911	}
806		912
807	void	913	void
808	rxvt_color::get (rgba &color)	914	rxvt_color::get (rgba &color) const
809	{	915	{
810	#if XFT	916	#if XFT
811	color.r = c.color.red;	917	color.r = c.color.red;
812	color.g = c.color.green;	918	color.g = c.color.green;
813	color.b = c.color.blue;	919	color.b = c.color.blue;
…		…
819	color.a = rgba::MAX_CC;	925	color.a = rgba::MAX_CC;
820	#endif	926	#endif
821	}	927	}
822		928
823	void	929	void
824	rxvt_color::get (XColor &color)	930	rxvt_color::get (XColor &color) const
825	{	931	{
826	rgba c;	932	rgba c;
827	get (c);	933	get (c);
828		934
829	color.red = c.r;	935	color.red = c.r;
830	color.green = c.g;	936	color.green = c.g;
831	color.blue = c.b;	937	color.blue = c.b;
832	color.pixel = (Pixel)*this;	938	color.pixel = (Pixel)*this;
833	}	939	}
834		940
835	void	941	void
836	rxvt_color::free (rxvt_screen *screen)	942	rxvt_color::free (rxvt_screen *screen)
837	{	943	{
838	if (screen->visual->c_class == TrueColor)	944	if (screen->visual->c_class == TrueColor)
839	return; // nothing to do	945	return; // nothing to do
840		946
…		…
860	lerp (c.a, to.a, percent)	966	lerp (c.a, to.a, percent)
861	)	967	)
862	);	968	);
863	}	969	}
864		970
		971	rxvt_selection::rxvt_selection (rxvt_display disp, int selnum, Time tm, Window win, Atom prop, rxvt_term term)
		972	: display (disp), request_time (tm), request_win (win), request_prop (prop), term (term)
		973	{
		974	assert (selnum >= Sel_Primary && selnum <= Sel_Clipboard);
		975
		976	timer_ev.set<rxvt_selection, &rxvt_selection::timer_cb> (this);
		977	timer_ev.repeat = 10.;
		978	x_ev.set<rxvt_selection, &rxvt_selection::x_cb> (this);
		979
		980	incr_buf = 0;
		981	incr_buf_size = incr_buf_fill = 0;
		982	selection_wait = Sel_normal;
		983	selection_type = selnum;
		984	cb_sv = 0;
		985	}
		986
		987	void
		988	rxvt_selection::stop ()
		989	{
		990	free (incr_buf);
		991	incr_buf = 0;
		992	timer_ev.stop ();
		993	x_ev.stop (display);
		994	}
		995
		996	rxvt_selection::~rxvt_selection ()
		997	{
		998	stop ();
		999	}
		1000
		1001	void
		1002	rxvt_selection::run ()
		1003	{
		1004	int selnum = selection_type;
		1005
		1006	#if ENABLE_FRILLS
		1007	if (selnum == Sel_Primary && display->selection_owner)
		1008	{
		1009	/* internal selection */
		1010	char *str = rxvt_wcstombs (display->selection_owner->selection.text, display->selection_owner->selection.len);
		1011	finish (str, strlen (str));
		1012	free (str);
		1013	return;
		1014	}
		1015	#endif
		1016
		1017	#if X_HAVE_UTF8_STRING
		1018	selection_type = Sel_UTF8String;
		1019	if (request (display->xa[XA_UTF8_STRING], selnum))
		1020	return;
		1021	#else
		1022	selection_type = Sel_CompoundText;
		1023	if (request (display->xa[XA_COMPOUND_TEXT], selnum))
		1024	return;
		1025	#endif
		1026
		1027	// fallback to CUT_BUFFER0 if the requested property has no owner
		1028	handle_selection (display->root, XA_CUT_BUFFER0, false);
		1029	}
		1030
		1031	void
		1032	rxvt_selection::finish (char *data, unsigned int len)
		1033	{
		1034	if (!cb_sv)
		1035	{
		1036	if (data)
		1037	term->paste (data, len);
		1038
		1039	term->selection_req = 0;
		1040	delete this;
		1041	}
		1042	#if ENABLE_PERL
		1043	else
		1044	{
		1045	stop (); // we do not really trust perl callbacks
		1046	rxvt_perl.selection_finish (this, data, len);
		1047	}
		1048	#endif
		1049	}
		1050
		1051	bool
		1052	rxvt_selection::request (Atom target, int selnum)
		1053	{
		1054	Atom sel;
		1055
		1056	selection_type \|= selnum;
		1057
		1058	if (selnum == Sel_Primary)
		1059	sel = XA_PRIMARY;
		1060	else if (selnum == Sel_Secondary)
		1061	sel = XA_SECONDARY;
		1062	else
		1063	sel = display->xa[XA_CLIPBOARD];
		1064
		1065	if (XGetSelectionOwner (display->dpy, sel) != None)
		1066	{
		1067	XConvertSelection (display->dpy, sel, target, request_prop,
		1068	request_win, request_time);
		1069	x_ev.start (display, request_win);
		1070	timer_ev.again ();
		1071	return true;
		1072	}
		1073
		1074	return false;
		1075	}
		1076
		1077	void
		1078	rxvt_selection::handle_selection (Window win, Atom prop, bool delete_prop)
		1079	{
		1080	Display *dpy = display->dpy;
		1081	char *data = 0;
		1082	unsigned int data_len = 0;
		1083	unsigned long bytes_after;
		1084	XTextProperty ct;
		1085
		1086	// check for failed XConvertSelection
		1087	if (prop == None)
		1088	{
		1089	bool error = true;
		1090	int selnum = selection_type & Sel_whereMask;
		1091
		1092	if (selection_type & Sel_CompoundText)
		1093	{
		1094	selection_type = 0;
		1095	error = !request (XA_STRING, selnum);
		1096	}
		1097
		1098	if (selection_type & Sel_UTF8String)
		1099	{
		1100	selection_type = Sel_CompoundText;
		1101	error = !request (display->xa[XA_COMPOUND_TEXT], selnum);
		1102	}
		1103
		1104	if (error)
		1105	{
		1106	ct.value = 0;
		1107	goto bailout;
		1108	}
		1109
		1110	return;
		1111	}
		1112
		1113	// length == (2^31 - 1) / 4, as gdk
		1114	if (XGetWindowProperty (dpy, win, prop,
		1115	0, 0x1fffffff,
		1116	delete_prop, AnyPropertyType,
		1117	&ct.encoding, &ct.format,
		1118	&ct.nitems, &bytes_after,
		1119	&ct.value) != Success)
		1120	{
		1121	ct.value = 0;
		1122	goto bailout;
		1123	}
		1124
		1125	if (ct.encoding == None)
		1126	goto bailout;
		1127
		1128	if (ct.value == 0)
		1129	goto bailout;
		1130
		1131	if (ct.encoding == display->xa[XA_INCR])
		1132	{
		1133	// INCR selection, start handshake
		1134	if (!delete_prop)
		1135	XDeleteProperty (dpy, win, prop);
		1136
		1137	selection_wait = Sel_incr;
		1138	timer_ev.again ();
		1139
		1140	goto bailout;
		1141	}
		1142
		1143	if (ct.nitems == 0)
		1144	{
		1145	if (selection_wait == Sel_incr)
		1146	{
		1147	XFree (ct.value);
		1148
		1149	// finally complete, now paste the whole thing
		1150	selection_wait = Sel_normal;
		1151	ct.value = (unsigned char *)incr_buf;
		1152	ct.nitems = incr_buf_fill;
		1153	incr_buf = 0;
		1154	timer_ev.stop ();
		1155	}
		1156	else
		1157	{
		1158	// avoid recursion
		1159	if (win != display->root \|\| prop != XA_CUT_BUFFER0)
		1160	{
		1161	XFree (ct.value);
		1162
		1163	// fallback to CUT_BUFFER0 if the requested property
		1164	// has an owner but is empty
		1165	handle_selection (display->root, XA_CUT_BUFFER0, False);
		1166	return;
		1167	}
		1168
		1169	goto bailout;
		1170	}
		1171	}
		1172	else if (selection_wait == Sel_incr)
		1173	{
		1174	timer_ev.again ();
		1175
		1176	while (incr_buf_fill + ct.nitems > incr_buf_size)
		1177	{
		1178	incr_buf_size = incr_buf_size ? incr_buf_size * 2 : 128*1024;
		1179	incr_buf = (char *)rxvt_realloc (incr_buf, incr_buf_size);
		1180	}
		1181
		1182	memcpy (incr_buf + incr_buf_fill, ct.value, ct.nitems);
		1183	incr_buf_fill += ct.nitems;
		1184
		1185	goto bailout;
		1186	}
		1187
		1188	char **cl;
		1189	int cr;
		1190
		1191	// we honour the first item only
		1192
		1193	#if !ENABLE_MINIMAL
		1194	// xlib is horribly broken with respect to UTF8_STRING, and nobody cares to fix it
		1195	// so recode it manually
		1196	if (ct.encoding == display->xa[XA_UTF8_STRING])
		1197	{
		1198	wchar_t w = rxvt_utf8towcs ((const char )ct.value, ct.nitems);
		1199	data = rxvt_wcstombs (w);
		1200	free (w);
		1201	}
		1202	else
		1203	#endif
		1204	if (XmbTextPropertyToTextList (dpy, &ct, &cl, &cr) >= 0
		1205	&& cl)
		1206	{
		1207	data = strdup (cl[0]);
		1208	XFreeStringList (cl);
		1209	}
		1210	else
		1211	{
		1212	// paste raw
		1213	data = strdup ((const char *)ct.value);
		1214	}
		1215
		1216	data_len = strlen (data);
		1217
		1218	bailout:
		1219	XFree (ct.value);
		1220
		1221	if (selection_wait == Sel_normal)
		1222	{
		1223	finish (data, data_len);
		1224	free (data);
		1225	}
		1226	}
		1227
		1228	void
		1229	rxvt_selection::timer_cb (ev::timer &w, int revents)
		1230	{
		1231	if (selection_wait == Sel_incr)
		1232	rxvt_warn ("data loss: timeout on INCR selection paste, ignoring.\n");
		1233
		1234	finish ();
		1235	}
		1236
		1237	void
		1238	rxvt_selection::x_cb (XEvent &xev)
		1239	{
		1240	switch (xev.type)
		1241	{
		1242	case PropertyNotify:
		1243	if (selection_wait == Sel_incr
		1244	&& xev.xproperty.atom == request_prop
		1245	&& xev.xproperty.state == PropertyNewValue)
		1246	handle_selection (xev.xproperty.window, xev.xproperty.atom, true);
		1247	break;
		1248
		1249	case SelectionNotify:
		1250	if (selection_wait == Sel_normal
		1251	&& xev.xselection.time == request_time)
		1252	{
		1253	timer_ev.stop ();
		1254	handle_selection (xev.xselection.requestor, xev.xselection.property, true);
		1255	}
		1256	break;
		1257	}
		1258	}

Diff Legend

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

Comparing rxvt-unicode/src/rxvttoolkit.C (file contents): Revision 1.53 by root, Sun Feb 19 16:25:13 2006 UTC vs. Revision 1.142 by root, Thu May 22 18:54:33 2014 UTC

Diff Legend

Comparing rxvt-unicode/src/rxvttoolkit.C (file contents):
Revision 1.53 by root, Sun Feb 19 16:25:13 2006 UTC vs.
Revision 1.142 by root, Thu May 22 18:54:33 2014 UTC