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

Diff Legend

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