ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/rxvt-unicode/src/rxvttoolkit.C
(Generate patch)

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

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines