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.39 by root, Tue Jan 31 00:25:16 2006 UTC vs.
Revision 1.126 by sf-exg, Wed May 25 08:55:52 2011 UTC

1/*--------------------------------*-C-*---------------------------------* 1/*----------------------------------------------------------------------*
2 * File: rxvttoolkit.C 2 * File: rxvttoolkit.C
3 *----------------------------------------------------------------------* 3 *----------------------------------------------------------------------*
4 * 4 *
5 * All portions of code are copyright by their respective author/s. 5 * All portions of code are copyright by their respective author/s.
6 * Copyright (c) 2003-2004 Marc Lehmann <pcg@goof.com> 6 * Copyright (c) 2003-2011 Marc Lehmann <schmorp@schmorp.de>
7 * Copyright (c) 2011 Emanuele Giaquinta <e.giaquinta@glauco.it>
7 * 8 *
8 * This program is free software; you can redistribute it and/or modify 9 * This program is free software; you can redistribute it and/or modify
9 * it under the terms of the GNU General Public License as published by 10 * it under the terms of the GNU General Public License as published by
10 * the Free Software Foundation; either version 2 of the License, or 11 * the Free Software Foundation; either version 2 of the License, or
11 * (at your option) any later version. 12 * (at your option) any later version.
… …
26 27
27#include <unistd.h> 28#include <unistd.h>
28#include <fcntl.h> 29#include <fcntl.h>
29 30
30#include <sys/utsname.h> 31#include <sys/utsname.h>
31
32#ifndef NO_SLOW_LINK_SUPPORT
33# include <sys/socket.h> 32#include <sys/socket.h>
34# include <sys/un.h> 33#include <sys/un.h>
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 if (!(val = rxvt_temp_buf<char> (5 + strlen (id) + 1)))
436 return false;
338 strcpy (val, "unix/"); 437 strcpy (val, "unix/");
339 strcat (val, id); 438 strcat (val, id);
340 display = XOpenDisplay (val); 439 dpy = XOpenDisplay (val);
341 free (val);
342 } 440 }
343 else 441 else
344#endif 442#endif
345 display = 0; 443 dpy = 0;
346 444
347 if (!display) 445 if (!dpy)
348 display = XOpenDisplay (id); 446 dpy = XOpenDisplay (id);
349 447
350 if (!display) 448 if (!dpy)
351 return false; 449 return false;
352 450
353 screen = DefaultScreen (display); 451 screen = DefaultScreen (dpy);
354 root = DefaultRootWindow (display); 452 root = DefaultRootWindow (dpy);
355 453
356 assert (sizeof (xa_names) / sizeof (char *) == NUM_XA); 454 assert (ARRAY_LENGTH(xa_names) == NUM_XA);
357 XInternAtoms (display, (char **)xa_names, NUM_XA, False, xa); 455 XInternAtoms (dpy, (char **)xa_names, NUM_XA, False, xa);
358 456
359 XrmSetDatabase (display, get_resources ()); 457 XrmSetDatabase (dpy, get_resources (false));
360 458
361#ifdef POINTER_BLANK 459#ifdef POINTER_BLANK
362 XColor blackcolour; 460 XColor blackcolour;
363 blackcolour.red = 0; 461 blackcolour.red = 0;
364 blackcolour.green = 0; 462 blackcolour.green = 0;
365 blackcolour.blue = 0; 463 blackcolour.blue = 0;
366 Font f = XLoadFont (display, "fixed"); 464 Font f = XLoadFont (dpy, "fixed");
367 blank_cursor = XCreateGlyphCursor (display, f, f, ' ', ' ', 465 blank_cursor = XCreateGlyphCursor (dpy, f, f, ' ', ' ',
368 &blackcolour, &blackcolour); 466 &blackcolour, &blackcolour);
369 XUnloadFont (display, f); 467 XUnloadFont (dpy, f);
370#endif 468#endif
371 469
372 int fd = XConnectionNumber (display); 470 int fd = XConnectionNumber (dpy);
373 471
374#ifndef NO_SLOW_LINK_SUPPORT
375 // try to detect wether we have a local connection. 472 // try to detect whether we have a local connection.
376 // assume unix domains socket == local, everything else not 473 // assume unix domain socket == local, everything else not
377 // TODO: might want to check for inet/127.0.0.1 474 // TODO: might want to check for inet/127.0.0.1
378 is_local = 0; 475 is_local = 0;
379 sockaddr_un sa; 476 sockaddr_un sa;
380 socklen_t sl = sizeof (sa); 477 socklen_t sl = sizeof (sa);
381 478
382 if (!getsockname (fd, (sockaddr *)&sa, &sl)) 479 if (!getsockname (fd, (sockaddr *)&sa, &sl))
383 is_local = sa.sun_family == AF_LOCAL; 480 is_local = sa.sun_family == AF_UNIX;
384#endif
385 481
482 flush_ev.start ();
386 x_ev.start (fd, EVENT_READ); 483 x_ev.start (fd, ev::READ);
387 fcntl (fd, F_SETFD, FD_CLOEXEC); 484 fcntl (fd, F_SETFD, FD_CLOEXEC);
388 485
389 XSelectInput (display, root, PropertyChangeMask); 486 XSelectInput (dpy, root, PropertyChangeMask);
390 487
391 flush (); 488 flush ();
392 489
393 return true; 490 return true;
394} 491}
395 492
396void 493void
397rxvt_display::ref_next () 494rxvt_display::ref_next ()
398{ 495{
399 // TODO: somehow check wether the database files/resources changed 496 // TODO: somehow check whether the database files/resources changed
400 // before re-loading/parsing 497 // before affording re-loading/parsing
401 XrmDestroyDatabase (XrmGetDatabase (display)); 498 XrmDestroyDatabase (XrmGetDatabase (dpy));
499#if XLIB_ILLEGAL_ACCESS
500 /* work around a bug in XrmSetDatabase where it frees the db */
501 dpy->db = 0;
502#endif
402 XrmSetDatabase (display, get_resources ()); 503 XrmSetDatabase (dpy, get_resources (true));
403} 504}
404 505
405rxvt_display::~rxvt_display () 506rxvt_display::~rxvt_display ()
406{ 507{
407 if (!display) 508 if (!dpy)
408 return; 509 return;
409 510
410#ifdef POINTER_BLANK 511#ifdef POINTER_BLANK
411 XFreeCursor (display, blank_cursor); 512 XFreeCursor (dpy, blank_cursor);
412#endif 513#endif
413 x_ev.stop (); 514 x_ev.stop ();
515 flush_ev.stop ();
414#ifdef USE_XIM 516#ifdef USE_XIM
415 xims.clear (); 517 xims.clear ();
416#endif 518#endif
519 XrmDestroyDatabase (XrmGetDatabase (dpy));
417 XCloseDisplay (display); 520 XCloseDisplay (dpy);
418} 521}
419 522
420#ifdef USE_XIM 523#ifdef USE_XIM
421void rxvt_display::im_change_cb () 524void rxvt_display::im_change_cb ()
422{ 525{
… …
430 // registers, as xlib crashes due to a race otherwise. 533 // registers, as xlib crashes due to a race otherwise.
431 Atom actual_type, *atoms; 534 Atom actual_type, *atoms;
432 int actual_format; 535 int actual_format;
433 unsigned long nitems, bytes_after; 536 unsigned long nitems, bytes_after;
434 537
435 if (XGetWindowProperty (display, root, xa[XA_XIM_SERVERS], 0L, 1000000L, 538 if (XGetWindowProperty (dpy, root, xa[XA_XIM_SERVERS], 0L, 1000000L,
436 False, XA_ATOM, &actual_type, &actual_format, 539 False, XA_ATOM, &actual_type, &actual_format,
437 &nitems, &bytes_after, (unsigned char **)&atoms) 540 &nitems, &bytes_after, (unsigned char **)&atoms)
438 != Success ) 541 != Success)
439 return; 542 return;
440 543
441 if (actual_type == XA_ATOM && actual_format == 32) 544 if (actual_type == XA_ATOM && actual_format == 32)
442 for (int i = 0; i < nitems; i++) 545 for (int i = 0; i < nitems; i++)
443 if (XGetSelectionOwner (display, atoms[i])) 546 if (XGetSelectionOwner (dpy, atoms[i]))
444 { 547 {
445 im_change_cb (); 548 im_change_cb ();
446 break; 549 break;
447 } 550 }
448 551
449 XFree (atoms); 552 XFree (atoms);
450} 553}
451#endif 554#endif
452 555
453void rxvt_display::x_cb (io_watcher &w, short revents) 556void rxvt_display::x_cb (ev::io &w, int revents)
454{ 557{
558 flush_ev.start ();
559}
560
561void rxvt_display::flush_cb (ev::prepare &w, int revents)
562{
563 while (XEventsQueued (dpy, QueuedAfterFlush))
455 do 564 do
456 { 565 {
457 XEvent xev; 566 XEvent xev;
458 XNextEvent (display, &xev); 567 XNextEvent (dpy, &xev);
459 568
460#ifdef USE_XIM 569#ifdef USE_XIM
461 if (!XFilterEvent (&xev, None)) 570 if (!XFilterEvent (&xev, None))
462 { 571 {
463 if (xev.type == PropertyNotify 572 if (xev.type == PropertyNotify
464 && xev.xany.window == root 573 && xev.xany.window == root
465 && xev.xproperty.atom == xa[XA_XIM_SERVERS]) 574 && xev.xproperty.atom == xa[XA_XIM_SERVERS])
466 im_change_check (); 575 im_change_check ();
467#endif 576#endif
577 if (xev.type == MappingNotify)
578 XRefreshKeyboardMapping (&xev.xmapping);
579
468 for (int i = xw.size (); i--; ) 580 for (int i = xw.size (); i--; )
469 { 581 {
470 if (!xw[i]) 582 if (!xw[i])
471 xw.erase_unordered (i); 583 xw.erase_unordered (i);
472 else if (xw[i]->window == xev.xany.window) 584 else if (xw[i]->window == xev.xany.window)
473 xw[i]->call (xev); 585 xw[i]->call (xev);
474 } 586 }
475#ifdef USE_XIM 587#ifdef USE_XIM
476 } 588 }
477#endif 589#endif
478 } 590 }
479 while (XEventsQueued (display, QueuedAlready)); 591 while (XEventsQueued (dpy, QueuedAlready));
480 592
481 XFlush (display); 593 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} 594}
491 595
492void rxvt_display::reg (xevent_watcher *w) 596void rxvt_display::reg (xevent_watcher *w)
493{ 597{
598 if (!w->active)
599 {
494 xw.push_back (w); 600 xw.push_back (w);
495 w->active = xw.size (); 601 w->active = xw.size ();
602 }
496} 603}
497 604
498void rxvt_display::unreg (xevent_watcher *w) 605void rxvt_display::unreg (xevent_watcher *w)
499{ 606{
500 if (w->active) 607 if (w->active)
608 {
501 xw[w->active - 1] = 0; 609 xw[w->active - 1] = 0;
610 w->active = 0;
611 }
502} 612}
503 613
504void rxvt_display::set_selection_owner (rxvt_term *owner) 614void rxvt_display::set_selection_owner (rxvt_term *owner, bool clipboard)
505{ 615{
616 rxvt_term * &cur_owner = !clipboard ? selection_owner : clipboard_owner;
617
506 if (selection_owner && selection_owner != owner) 618 if (cur_owner && cur_owner != owner)
507 selection_owner->selection_clear (); 619 {
620 rxvt_term *term = cur_owner;
621 term->selection_clear (clipboard);
622 term->flush ();
623 }
508 624
509 selection_owner = owner; 625 cur_owner = owner;
510} 626}
511 627
512#ifdef USE_XIM 628#ifdef USE_XIM
629
513void rxvt_display::reg (im_watcher *w) 630void rxvt_display::reg (im_watcher *w)
514{ 631{
515 imw.push_back (w); 632 imw.push_back (w);
516} 633}
517 634
… …
526 int l, m; 643 int l, m;
527 644
528 l = strlen (locale); 645 l = strlen (locale);
529 m = strlen (modifiers); 646 m = strlen (modifiers);
530 647
531 if (!(id = (char *)malloc (l + m + 2))) 648 if (!(id = rxvt_temp_buf<char> (l + m + 2)))
532 return 0; 649 return 0;
533 650
534 memcpy (id, locale, l); id[l] = '\n'; 651 memcpy (id, locale, l); id[l] = '\n';
535 memcpy (id + l + 1, modifiers, m); id[l + m + 1] = 0; 652 memcpy (id + l + 1, modifiers, m); id[l + m + 1] = 0;
536 653
537 rxvt_xim *xim = xims.get (id); 654 rxvt_xim *xim = xims.get (id);
538 655
539 free (id);
540
541 return xim; 656 return xim;
542} 657}
543 658
544void rxvt_display::put_xim (rxvt_xim *xim) 659void rxvt_display::put_xim (rxvt_xim *xim)
545{ 660{
546#if XLIB_IS_RACEFREE 661# if XLIB_IS_RACEFREE
547 xims.put (xim); 662 xims.put (xim);
548#endif 663# endif
549} 664}
665
550#endif 666#endif
551 667
552Atom rxvt_display::atom (const char *name) 668Atom rxvt_display::atom (const char *name)
553{ 669{
554 return XInternAtom (display, name, False); 670 return XInternAtom (dpy, name, False);
555} 671}
556 672
557///////////////////////////////////////////////////////////////////////////// 673/////////////////////////////////////////////////////////////////////////////
558 674
559template class refcache<rxvt_display>; 675template class refcache<rxvt_display>;
560refcache<rxvt_display> displays; 676refcache<rxvt_display> displays;
561 677
562///////////////////////////////////////////////////////////////////////////// 678/////////////////////////////////////////////////////////////////////////////
563 679//
680
681static unsigned int
682insert_component (unsigned int value, unsigned int mask, unsigned int shift)
683{
684 return (value * (mask + 1) >> 16) << shift;
685}
686
564bool 687bool
565rxvt_color::alloc (rxvt_screen *screen, rxvt_rgba rgba) 688rxvt_color::alloc (rxvt_screen *screen, const rgba &color)
566{ 689{
690 //TODO: only supports 24 bit
691 int alpha = color.a >= 0xff00 ? 0xffff : color.a;
692
567#if XFT 693#if XFT
568 XRenderPictFormat *format; 694 XRenderPictFormat *format;
569 695
570 // FUCKING Xft gets it wrong, of course, so work around it 696 // FUCKING Xft gets it wrong, of course, so work around it.
571 // transparency users should eat shit and die, and then 697 // Transparency users should eat shit and die, and then
572 // XRenderQueryPictIndexValues themselves plenty. 698 // XRenderQueryPictIndexValues themselves plenty.
573 if ((screen->visual->c_class == TrueColor || screen->visual->c_class == DirectColor) 699 if ((screen->visual->c_class == TrueColor)
574 && (format = XRenderFindVisualFormat (screen->xdisp, screen->visual))) 700 && (format = XRenderFindVisualFormat (screen->dpy, screen->visual)))
575 { 701 {
576 // the fun lies in doing everything manually... 702 // the fun lies in doing everything manually...
577 c.color.red = rgba.r; 703 c.color.red = color.r;
578 c.color.green = rgba.g; 704 c.color.green = color.g;
579 c.color.blue = rgba.b; 705 c.color.blue = color.b;
580 c.color.alpha = rgba.a; 706 c.color.alpha = alpha;
581 707
582 c.pixel = ((rgba.r * format->direct.redMask / rxvt_rgba::MAX_CC) << format->direct.red ) 708 // Xft wants premultiplied alpha, but abuses the alpha channel
583 | ((rgba.g * format->direct.greenMask / rxvt_rgba::MAX_CC) << format->direct.green) 709 // as blend factor, and doesn't allow us to set the alpha channel
584 | ((rgba.b * format->direct.blueMask / rxvt_rgba::MAX_CC) << format->direct.blue ) 710 c.color.red = c.color.red * alpha / 0xffff;
585 | ((rgba.a * format->direct.alphaMask / rxvt_rgba::MAX_CC) << format->direct.alpha); 711 c.color.green = c.color.green * alpha / 0xffff;
712 c.color.blue = c.color.blue * alpha / 0xffff;
713
714 c.pixel = insert_component (c.color.red , format->direct.redMask , format->direct.red )
715 | insert_component (c.color.green, format->direct.greenMask, format->direct.green)
716 | insert_component (c.color.blue , format->direct.blueMask , format->direct.blue )
717 | insert_component (alpha , format->direct.alphaMask, format->direct.alpha);
586 718
587 return true; 719 return true;
588 } 720 }
589 else 721 else
590 { 722 {
591 XRenderColor d; 723 XRenderColor d;
592 724
593 d.red = rgba.r; 725 d.red = color.r;
594 d.green = rgba.g; 726 d.green = color.g;
595 d.blue = rgba.b; 727 d.blue = color.b;
596 d.alpha = rgba.a; 728 d.alpha = alpha;
597 729
598 return XftColorAllocValue (screen->xdisp, screen->visual, screen->cmap, &d, &c); 730 return XftColorAllocValue (screen->dpy, screen->visual, screen->cmap, &d, &c);
599 } 731 }
600#else 732#else
601 if (screen->visual->c_class == TrueColor || screen->visual->c_class == DirectColor) 733 c.red = color.r;
734 c.green = color.g;
735 c.blue = color.b;
736
737 if (screen->visual->c_class == TrueColor)
602 { 738 {
603 p = (rgba.r * (screen->visual->red_mask >> ctz (screen->visual->red_mask )) 739 c.pixel = (color.r >> (16 - rxvt_popcount (screen->visual->red_mask )) << rxvt_ctz (screen->visual->red_mask ))
604 / rxvt_rgba::MAX_CC) << ctz (screen->visual->red_mask ) 740 | (color.g >> (16 - rxvt_popcount (screen->visual->green_mask)) << rxvt_ctz (screen->visual->green_mask))
605 | (rgba.g * (screen->visual->green_mask >> ctz (screen->visual->green_mask)) 741 | (color.b >> (16 - rxvt_popcount (screen->visual->blue_mask )) << rxvt_ctz (screen->visual->blue_mask ));
606 / rxvt_rgba::MAX_CC) << ctz (screen->visual->green_mask)
607 | (rgba.b * (screen->visual->blue_mask >> ctz (screen->visual->blue_mask ))
608 / rxvt_rgba::MAX_CC) << ctz (screen->visual->blue_mask );
609 742
610 return true; 743 return true;
611 } 744 }
745 else if (XAllocColor (screen->dpy, screen->cmap, &c))
746 return true;
612 else 747 else
613 { 748 c.pixel = (color.r + color.g + color.b) > 128*3
614 XColor xc;
615
616 xc.red = rgba.r;
617 xc.green = rgba.g;
618 xc.blue = rgba.b;
619
620 if (XAllocColor (screen->xdisp, screen->cmap, &xc))
621 {
622 p = xc.pixel;
623 return true;
624 }
625 else
626 p = (rgba.r + rgba.g + rgba.b) > 128*3
627 ? WhitePixelOfScreen (DefaultScreenOfDisplay (screen->xdisp)) 749 ? WhitePixelOfScreen (DefaultScreenOfDisplay (screen->dpy))
628 : BlackPixelOfScreen (DefaultScreenOfDisplay (screen->xdisp)); 750 : BlackPixelOfScreen (DefaultScreenOfDisplay (screen->dpy));
629 }
630#endif 751#endif
631 752
632 return false; 753 return false;
633} 754}
634 755
635bool 756bool
636rxvt_color::set (rxvt_screen *screen, const char *name) 757rxvt_color::set (rxvt_screen *screen, const char *name)
637{ 758{
638 rxvt_rgba c; 759 rgba c;
639 char eos; 760 char eos;
640 int skip; 761 int skip;
641 762
763 c.a = rgba::MAX_CC;
764
765 // parse the nonstandard "[alphapercent]" prefix
642 if (1 <= sscanf (name, "[%hx]%n", &c.a, &skip)) 766 if (1 <= sscanf (name, "[%hd]%n", &c.a, &skip))
643 { 767 {
644 switch (skip) 768 c.a = lerp<int, int, int> (0, rgba::MAX_CC, c.a);
645 {
646 case 2 + 1: c.a *= rxvt_rgba::MAX_CC / 0x000f; break;
647 case 2 + 2: c.a *= rxvt_rgba::MAX_CC / 0x00ff; break;
648 case 2 + 3: c.a *= rxvt_rgba::MAX_CC / 0x0fff; break;
649 case 2 + 4: c.a *= rxvt_rgba::MAX_CC / 0xffff; break;
650 }
651
652 name += skip; 769 name += skip;
653 } 770 }
654 else
655 c.a = rxvt_rgba::MAX_CC;
656 771
657 // parse the non-standard rgba format 772 // parse the non-standard "rgba:rrrr/gggg/bbbb/aaaa" format
658 if (strlen (name) != 4+5*4 || 4 != sscanf (name, "rgba:%hx/%hx/%hx/%hx%c", &c.r, &c.g, &c.b, &c.a, &eos)) 773 if (strlen (name) != 4+5*4 || 4 != sscanf (name, "rgba:%4hx/%4hx/%4hx/%4hx%c", &c.r, &c.g, &c.b, &c.a, &eos))
659 { 774 {
660 XColor xc, xc_exact; 775 XColor xc;
661 776
662 if (XParseColor (screen->xdisp, screen->cmap, name, &xc)) 777 if (XParseColor (screen->dpy, screen->cmap, name, &xc))
663 { 778 {
664 c.r = xc.red; 779 c.r = xc.red;
665 c.g = xc.green; 780 c.g = xc.green;
666 c.b = xc.blue; 781 c.b = xc.blue;
667 } 782 }
… …
677 792
678 return set (screen, c); 793 return set (screen, c);
679} 794}
680 795
681bool 796bool
682rxvt_color::set (rxvt_screen *screen, rxvt_rgba rgba) 797rxvt_color::set (rxvt_screen *screen, const rgba &color)
683{ 798{
684 bool got = alloc (screen, rgba); 799 bool got = alloc (screen, color);
685 800
686#if !ENABLE_MINIMAL 801#if !ENABLE_MINIMAL
687 int cmap_size = screen->visual->map_entries; 802 int cmap_size = screen->visual->map_entries;
688 803
689 if (!got 804 if (!got
… …
692 { 807 {
693 XColor *colors = new XColor [screen->visual->map_entries]; 808 XColor *colors = new XColor [screen->visual->map_entries];
694 809
695 for (int i = 0; i < cmap_size; i++) 810 for (int i = 0; i < cmap_size; i++)
696 colors [i].pixel = i; 811 colors [i].pixel = i;
697 812
813 // many kilobytes transfer per colour, but pseudocolor isn't worth
814 // many extra optimisations.
698 XQueryColors (screen->xdisp, screen->cmap, colors, cmap_size); 815 XQueryColors (screen->dpy, screen->cmap, colors, cmap_size);
699 816
700 int diff = 0x7fffffffUL; 817 int diff = 0x7fffffffUL;
701 XColor *best = colors; 818 XColor *best = colors;
702 819
703 for (int i = 0; i < cmap_size; i++) 820 for (int i = 0; i < cmap_size; i++)
704 { 821 {
705 int d = (squared_diff<int> (rgba.r >> 2, colors [i].red >> 2)) 822 int d = (squared_diff<int> (color.r >> 2, colors [i].red >> 2))
706 + (squared_diff<int> (rgba.g >> 2, colors [i].green >> 2)) 823 + (squared_diff<int> (color.g >> 2, colors [i].green >> 2))
707 + (squared_diff<int> (rgba.b >> 2, colors [i].blue >> 2)); 824 + (squared_diff<int> (color.b >> 2, colors [i].blue >> 2));
708 825
709 if (d < diff) 826 if (d < diff)
710 { 827 {
711 diff = d; 828 diff = d;
712 best = colors + i; 829 best = colors + i;
713 } 830 }
714 } 831 }
715 832
716 //rxvt_warn ("could not allocate %04x %04x %04x, getting %04x %04x %04x instead (%d)\n", 833 //rxvt_warn ("could not allocate %04x %04x %04x, getting %04x %04x %04x instead (%d)\n",
717 // rgba.r, rgba.g, rgba.b, best->red, best->green, best->blue, diff); 834 // color.r, color.g, color.b, best->red, best->green, best->blue, diff);
718 835
719 got = alloc (screen, rxvt_rgba (best->red, best->green, best->blue)); 836 got = alloc (screen, rgba (best->red, best->green, best->blue));
720 837
721 delete colors; 838 delete [] colors;
722 } 839 }
723#endif 840#endif
724 841
725 return got; 842 return got;
726} 843}
727 844
728void 845void
729rxvt_color::get (rxvt_screen *screen, rxvt_rgba &rgba) 846rxvt_color::get (rgba &color)
730{ 847{
731#if XFT 848#if XFT
732 rgba.r = c.color.red; 849 color.r = c.color.red;
733 rgba.g = c.color.green; 850 color.g = c.color.green;
734 rgba.b = c.color.blue; 851 color.b = c.color.blue;
735 rgba.a = c.color.alpha; 852 color.a = c.color.alpha;
736#else 853#else
737 XColor c;
738
739 c.pixel = p;
740 XQueryColor (screen->xdisp, screen->cmap, &c);
741
742 rgba.r = c.red; 854 color.r = c.red;
743 rgba.g = c.green; 855 color.g = c.green;
744 rgba.b = c.blue; 856 color.b = c.blue;
745 rgba.a = rxvt_rgba::MAX_CC; 857 color.a = rgba::MAX_CC;
746#endif 858#endif
747} 859}
748 860
749void 861void
862rxvt_color::get (XColor &color)
863{
864 rgba c;
865 get (c);
866
867 color.red = c.r;
868 color.green = c.g;
869 color.blue = c.b;
870 color.pixel = (Pixel)*this;
871}
872
873void
750rxvt_color::free (rxvt_screen *screen) 874rxvt_color::free (rxvt_screen *screen)
751{ 875{
876 if (screen->visual->c_class == TrueColor)
877 return; // nothing to do
878
752#if XFT 879#if XFT
753 XftColorFree (screen->xdisp, screen->visual, screen->cmap, &c); 880 XftColorFree (screen->dpy, screen->visual, screen->cmap, &c);
754#else 881#else
755 XFreeColors (screen->xdisp, screen->cmap, &p, 1, AllPlanes); 882 XFreeColors (screen->dpy, screen->cmap, &c.pixel, 1, AllPlanes);
756#endif 883#endif
757} 884}
758 885
759rxvt_color 886void
760rxvt_color::fade (rxvt_screen *screen, int percent)
761{
762 rxvt_color faded;
763
764 rxvt_rgba c;
765 get (screen, c);
766
767 c.r = lerp (0, c.r, percent);
768 c.g = lerp (0, c.g, percent);
769 c.b = lerp (0, c.b, percent);
770
771 faded.set (screen, c);
772
773 return faded;
774}
775
776rxvt_color
777rxvt_color::fade (rxvt_screen *screen, int percent, rxvt_color &fadeto) 887rxvt_color::fade (rxvt_screen *screen, int percent, rxvt_color &result, const rgba &to)
778{ 888{
779 rxvt_rgba c, fc; 889 rgba c;
780 rxvt_color faded; 890 get (c);
781
782 get (screen, c);
783 fadeto.get (screen, fc);
784 891
785 faded.set ( 892 result.set (
786 screen, 893 screen,
787 rxvt_rgba ( 894 rgba (
788 lerp (fc.r, c.r, percent), 895 lerp (c.r, to.r, percent),
789 lerp (fc.g, c.g, percent), 896 lerp (c.g, to.g, percent),
790 lerp (fc.b, c.b, percent), 897 lerp (c.b, to.b, percent),
791 lerp (fc.a, c.a, percent) 898 lerp (c.a, to.a, percent)
792 ) 899 )
793 ); 900 );
901}
794 902
903rxvt_selection::rxvt_selection (rxvt_display *disp, int selnum, Time tm, Window win, Atom prop, rxvt_term *term)
904: display (disp), request_time (tm), request_win (win), request_prop (prop), term (term)
905{
906 assert (selnum >= Sel_Primary && selnum <= Sel_Clipboard);
907
908 timer_ev.set<rxvt_selection, &rxvt_selection::timer_cb> (this);
909 timer_ev.repeat = 10.;
910 x_ev.set<rxvt_selection, &rxvt_selection::x_cb> (this);
911
912 incr_buf = 0;
913 incr_buf_size = incr_buf_fill = 0;
914 selection_wait = Sel_normal;
915 selection_type = selnum;
916}
917
918void
919rxvt_selection::stop ()
920{
921 free (incr_buf);
922 incr_buf = 0;
923 timer_ev.stop ();
924 x_ev.stop (display);
925}
926
927rxvt_selection::~rxvt_selection ()
928{
929 stop ();
930}
931
932void
933rxvt_selection::run ()
934{
935 int selnum = selection_type;
936
937#if ENABLE_FRILLS
938 if (selnum == Sel_Primary && display->selection_owner)
939 {
940 /* internal selection */
941 char *str = rxvt_wcstombs (display->selection_owner->selection.text, display->selection_owner->selection.len);
942 finish (str, strlen (str));
943 free (str);
944 return;
945 }
946#endif
947
948#if X_HAVE_UTF8_STRING
949 selection_type = Sel_UTF8String;
950 if (request (display->xa[XA_UTF8_STRING], selnum))
951 return;
952#else
953 selection_type = Sel_CompoundText;
954 if (request (display->xa[XA_COMPOUND_TEXT], selnum))
955 return;
956#endif
957
958 // fallback to CUT_BUFFER0 if the requested property has no owner
959 handle_selection (display->root, XA_CUT_BUFFER0, false);
960}
961
962void
963rxvt_selection::finish (char *data, unsigned int len)
964{
965 if (term)
966 {
967 if (data)
968 term->paste (data, len);
969
970 term->selection_req = 0;
971 delete this;
972 }
973#if ENABLE_PERL
974 else
975 {
976 stop (); // we do not really trust perl callbacks
977 rxvt_perl.selection_finish (this, data, len);
978 }
979#endif
980}
981
982bool
983rxvt_selection::request (Atom target, int selnum)
984{
985 Atom sel;
986
987 selection_type |= selnum;
988
989 if (selnum == Sel_Primary)
990 sel = XA_PRIMARY;
991 else if (selnum == Sel_Secondary)
992 sel = XA_SECONDARY;
993 else
994 sel = display->xa[XA_CLIPBOARD];
995
996 if (XGetSelectionOwner (display->dpy, sel) != None)
997 {
998 XConvertSelection (display->dpy, sel, target, request_prop,
999 request_win, request_time);
1000 x_ev.start (display, request_win);
1001 timer_ev.again ();
1002 return true;
1003 }
1004
795 return faded; 1005 return false;
796} 1006}
797 1007
1008void
1009rxvt_selection::handle_selection (Window win, Atom prop, bool delete_prop)
1010{
1011 Display *dpy = display->dpy;
1012 char *data = 0;
1013 unsigned int data_len = 0;
1014 unsigned long bytes_after;
1015 XTextProperty ct;
1016
1017 // check for failed XConvertSelection
1018 if (prop == None)
1019 {
1020 bool error = true;
1021 int selnum = selection_type & Sel_whereMask;
1022
1023 if (selection_type & Sel_CompoundText)
1024 {
1025 selection_type = 0;
1026 error = !request (XA_STRING, selnum);
1027 }
1028
1029 if (selection_type & Sel_UTF8String)
1030 {
1031 selection_type = Sel_CompoundText;
1032 error = !request (display->xa[XA_COMPOUND_TEXT], selnum);
1033 }
1034
1035 if (error)
1036 {
1037 ct.value = 0;
1038 goto bailout;
1039 }
1040
1041 return;
1042 }
1043
1044 // length == (2^31 - 1) / 4, as gdk
1045 if (XGetWindowProperty (dpy, win, prop,
1046 0, 0x1fffffff,
1047 delete_prop, AnyPropertyType,
1048 &ct.encoding, &ct.format,
1049 &ct.nitems, &bytes_after,
1050 &ct.value) != Success)
1051 {
1052 ct.value = 0;
1053 goto bailout;
1054 }
1055
1056 if (ct.encoding == None)
1057 goto bailout;
1058
1059 if (ct.value == 0)
1060 goto bailout;
1061
1062 if (ct.encoding == display->xa[XA_INCR])
1063 {
1064 // INCR selection, start handshake
1065 if (!delete_prop)
1066 XDeleteProperty (dpy, win, prop);
1067
1068 selection_wait = Sel_incr;
1069 timer_ev.again ();
1070
1071 goto bailout;
1072 }
1073
1074 if (ct.nitems == 0)
1075 {
1076 if (selection_wait == Sel_incr)
1077 {
1078 XFree (ct.value);
1079
1080 // finally complete, now paste the whole thing
1081 selection_wait = Sel_normal;
1082 ct.value = (unsigned char *)incr_buf;
1083 ct.nitems = incr_buf_fill;
1084 incr_buf = 0;
1085 timer_ev.stop ();
1086 }
1087 else
1088 {
1089 // avoid recursion
1090 if (win != display->root || prop != XA_CUT_BUFFER0)
1091 {
1092 XFree (ct.value);
1093
1094 // fallback to CUT_BUFFER0 if the requested property
1095 // has an owner but is empty
1096 handle_selection (display->root, XA_CUT_BUFFER0, False);
1097 return;
1098 }
1099
1100 goto bailout;
1101 }
1102 }
1103 else if (selection_wait == Sel_incr)
1104 {
1105 timer_ev.again ();
1106
1107 while (incr_buf_fill + ct.nitems > incr_buf_size)
1108 {
1109 incr_buf_size = incr_buf_size ? incr_buf_size * 2 : 128*1024;
1110 incr_buf = (char *)rxvt_realloc (incr_buf, incr_buf_size);
1111 }
1112
1113 memcpy (incr_buf + incr_buf_fill, ct.value, ct.nitems);
1114 incr_buf_fill += ct.nitems;
1115
1116 goto bailout;
1117 }
1118
1119 char **cl;
1120 int cr;
1121
1122 // we honour the first item only
1123
1124#if !ENABLE_MINIMAL
1125 // xlib is horribly broken with respect to UTF8_STRING, and nobody cares to fix it
1126 // so recode it manually
1127 if (ct.encoding == display->xa[XA_UTF8_STRING])
1128 {
1129 wchar_t *w = rxvt_utf8towcs ((const char *)ct.value, ct.nitems);
1130 data = rxvt_wcstombs (w);
1131 free (w);
1132 }
1133 else
1134#endif
1135 if (XmbTextPropertyToTextList (dpy, &ct, &cl, &cr) >= 0
1136 && cl)
1137 {
1138 data = strdup (cl[0]);
1139 XFreeStringList (cl);
1140 }
1141 else
1142 {
1143 // paste raw
1144 data = strdup ((const char *)ct.value);
1145 }
1146
1147 data_len = strlen (data);
1148
1149bailout:
1150 XFree (ct.value);
1151
1152 if (selection_wait == Sel_normal)
1153 {
1154 finish (data, data_len);
1155 free (data);
1156 }
1157}
1158
1159void
1160rxvt_selection::timer_cb (ev::timer &w, int revents)
1161{
1162 if (selection_wait == Sel_incr)
1163 rxvt_warn ("data loss: timeout on INCR selection paste, ignoring.\n");
1164
1165 finish ();
1166}
1167
1168void
1169rxvt_selection::x_cb (XEvent &xev)
1170{
1171 switch (xev.type)
1172 {
1173 case PropertyNotify:
1174 if (selection_wait == Sel_incr
1175 && xev.xproperty.atom == request_prop
1176 && xev.xproperty.state == PropertyNewValue)
1177 handle_selection (xev.xproperty.window, xev.xproperty.atom, true);
1178 break;
1179
1180 case SelectionNotify:
1181 if (selection_wait == Sel_normal
1182 && xev.xselection.time == request_time)
1183 {
1184 timer_ev.stop ();
1185 handle_selection (xev.xselection.requestor, xev.xselection.property, true);
1186 }
1187 break;
1188 }
1189}

Diff Legend

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