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

Diff Legend

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