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.34 by root, Mon Jan 30 02:21:20 2006 UTC vs.
Revision 1.102 by root, Tue Nov 4 11:03:29 2008 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-2007 Marc Lehmann <pcg@goof.com>
7 * 7 *
8 * This program is free software; you can redistribute it and/or modify 8 * 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 9 * 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 10 * the Free Software Foundation; either version 2 of the License, or
11 * (at your option) any later version. 11 * (at your option) any later version.
26 26
27#include <unistd.h> 27#include <unistd.h>
28#include <fcntl.h> 28#include <fcntl.h>
29 29
30#include <sys/utsname.h> 30#include <sys/utsname.h>
31
32#ifndef NO_SLOW_LINK_SUPPORT
33# include <sys/socket.h> 31#include <sys/socket.h>
34# include <sys/un.h> 32#include <sys/un.h>
35#endif
36 33
37#if XFT 34#if XFT
38# include <X11/extensions/Xrender.h> 35# include <X11/extensions/Xrender.h>
39#endif 36#endif
40 37
62#if ENABLE_EWMH 59#if ENABLE_EWMH
63 "_NET_WM_PID", 60 "_NET_WM_PID",
64 "_NET_WM_NAME", 61 "_NET_WM_NAME",
65 "_NET_WM_ICON_NAME", 62 "_NET_WM_ICON_NAME",
66 "_NET_WM_PING", 63 "_NET_WM_PING",
64 "_NET_WM_ICON",
67#endif 65#endif
68#if USE_XIM 66#if USE_XIM
69 "WM_LOCALE_NAME", 67 "WM_LOCALE_NAME",
70 "XIM_SERVERS", 68 "XIM_SERVERS",
71#endif 69#endif
72#ifdef TRANSPARENT 70#ifdef ENABLE_TRANSPARENCY
73 "_XROOTPMAP_ID", 71 "_XROOTPMAP_ID",
74 "ESETROOT_PMAP_ID", 72 "ESETROOT_PMAP_ID",
75#endif 73#endif
76#if ENABLE_XEMBED 74#if ENABLE_XEMBED
77 "_XEMBED", 75 "_XEMBED",
81 "SCREEN_RESOURCES", 79 "SCREEN_RESOURCES",
82 "XDCCC_LINEAR_RGB_CORRECTION", 80 "XDCCC_LINEAR_RGB_CORRECTION",
83 "XDCCC_LINEAR_RGB_MATRICES", 81 "XDCCC_LINEAR_RGB_MATRICES",
84 "WM_COLORMAP_WINDOWS", 82 "WM_COLORMAP_WINDOWS",
85 "WM_STATE", 83 "WM_STATE",
84 "cursor",
85# if USE_XIM
86 "TRANSPORT",
87 "LOCALES",
88 "_XIM_PROTOCOL",
89 "_XIM_XCONNECT",
90 "_XIM_MOREDATA",
91# endif
86#endif 92#endif
87}; 93};
88 94
89///////////////////////////////////////////////////////////////////////////// 95/////////////////////////////////////////////////////////////////////////////
90 96
169bool 175bool
170rxvt_xim::ref_init () 176rxvt_xim::ref_init ()
171{ 177{
172 display = GET_R->display; //HACK: TODO 178 display = GET_R->display; //HACK: TODO
173 179
174 xim = XOpenIM (display->display, NULL, NULL, NULL); 180 xim = XOpenIM (display->dpy, 0, 0, 0);
175 181
176 if (!xim) 182 if (!xim)
177 return false; 183 return false;
178 184
179 XIMCallback ximcallback; 185 XIMCallback ximcallback;
180 ximcallback.client_data = (XPointer)this; 186 ximcallback.client_data = (XPointer)this;
181 ximcallback.callback = im_destroy_cb; 187 ximcallback.callback = im_destroy_cb;
182 188
183 XSetIMValues (xim, XNDestroyCallback, &ximcallback, NULL); 189 XSetIMValues (xim, XNDestroyCallback, &ximcallback, (char *)0);
184 190
185 return true; 191 return true;
186} 192}
187 193
188rxvt_xim::~rxvt_xim () 194rxvt_xim::~rxvt_xim ()
193 199
194#endif 200#endif
195 201
196///////////////////////////////////////////////////////////////////////////// 202/////////////////////////////////////////////////////////////////////////////
197 203
204#if XFT
205rxvt_drawable::~rxvt_drawable ()
206{
207 if (xftdrawable)
208 XftDrawDestroy (xftdrawable);
209}
210
211rxvt_drawable::operator XftDraw *()
212{
213 if (!xftdrawable)
214 xftdrawable = XftDrawCreate (screen->dpy, drawable, screen->visual, screen->cmap);
215
216 return xftdrawable;
217}
218#endif
219
220/////////////////////////////////////////////////////////////////////////////
221
222#if XFT
223
224// not strictly necessary as it is only used with superclass of zero_initialised
225rxvt_screen::rxvt_screen ()
226: scratch_area (0)
227{
228}
229
230rxvt_drawable &rxvt_screen::scratch_drawable (int w, int h)
231{
232 // it's actually faster to re-allocate every time. don't ask me
233 // why, but its likely no big deal there are no roundtrips
234 // (I think/hope).
235 if (!scratch_area || w > scratch_w || h > scratch_h || 1/*D*/)
236 {
237 if (scratch_area)
238 {
239 XFreePixmap (dpy, scratch_area->drawable);
240 delete scratch_area;
241 }
242
243 Pixmap pm = XCreatePixmap (dpy, RootWindowOfScreen (ScreenOfDisplay (dpy, display->screen)),
244 scratch_w = w, scratch_h = h, depth);
245
246 scratch_area = new rxvt_drawable (this, pm);
247 }
248
249 return *scratch_area;
250}
251
252#endif
253
198void 254void
199rxvt_screen::set (rxvt_display *disp) 255rxvt_screen::set (rxvt_display *disp)
200{ 256{
201 display = disp; 257 display = disp;
202 xdisp = disp->display; 258 dpy = disp->dpy;
203 259
204 Screen *screen = ScreenOfDisplay (xdisp, disp->screen); 260 Screen *screen = ScreenOfDisplay (dpy, disp->screen);
205 261
206 depth = DefaultDepthOfScreen (screen); 262 depth = DefaultDepthOfScreen (screen);
207 visual = DefaultVisualOfScreen (screen); 263 visual = DefaultVisualOfScreen (screen);
208 cmap = DefaultColormapOfScreen (screen); 264 cmap = DefaultColormapOfScreen (screen);
209} 265}
210 266
211void 267void
212rxvt_screen::set (rxvt_display *disp, int bitdepth) 268rxvt_screen::select_visual (int bitdepth)
213{ 269{
214 set (disp);
215
216#if XFT 270#if XFT
217 XVisualInfo vinfo; 271 XVisualInfo vinfo;
218 272
219 if (XMatchVisualInfo (xdisp, display->screen, bitdepth, TrueColor, &vinfo)) 273 if (XMatchVisualInfo (dpy, display->screen, bitdepth, TrueColor, &vinfo))
220 { 274 {
221 depth = bitdepth; 275 depth = bitdepth;
222 visual = vinfo.visual; 276 visual = vinfo.visual;
223 cmap = XCreateColormap (xdisp, disp->root, visual, AllocNone); 277 cmap = XCreateColormap (dpy, display->root, visual, AllocNone);
224 } 278 }
225#endif 279#endif
226} 280}
227 281
228void 282void
229rxvt_screen::clear () 283rxvt_screen::clear ()
230{ 284{
285#if XFT
286 if (scratch_area)
287 {
288 XFreePixmap (dpy, scratch_area->drawable);
289 delete scratch_area;
290 }
291#endif
292
231 if (cmap != DefaultColormapOfScreen (ScreenOfDisplay (xdisp, display->screen))) 293 if (cmap != DefaultColormapOfScreen (ScreenOfDisplay (dpy, display->screen)))
232 XFreeColormap (xdisp, cmap); 294 XFreeColormap (dpy, cmap);
233} 295}
234 296
235///////////////////////////////////////////////////////////////////////////// 297/////////////////////////////////////////////////////////////////////////////
236 298
237rxvt_display::rxvt_display (const char *id) 299rxvt_display::rxvt_display (const char *id)
238: refcounted (id) 300: refcounted (id)
239, x_ev (this, &rxvt_display::x_cb)
240, selection_owner (0) 301, selection_owner (0)
241{ 302{
303 x_ev .set<rxvt_display, &rxvt_display::x_cb > (this);
304 flush_ev.set<rxvt_display, &rxvt_display::flush_cb> (this);
242} 305}
243 306
244XrmDatabase 307XrmDatabase
245rxvt_display::get_resources () 308rxvt_display::get_resources (bool refresh)
246{ 309{
247 char *homedir = (char *)getenv ("HOME"); 310 char *homedir = getenv ("HOME");
248 char fname[1024]; 311 char fname[1024];
249 312
250 /* 313 /*
251 * get resources using the X library function 314 * get resources using the X library function
252 */ 315 */
253 char *displayResource, *xe; 316 char *displayResource, *xe;
254 XrmDatabase database, rdb1; 317 XrmDatabase rdb1, database = 0;
255
256 database = NULL;
257 318
258 // for ordering, see for example http://www.faqs.org/faqs/Xt-FAQ/ Subject: 20 319 // for ordering, see for example http://www.faqs.org/faqs/Xt-FAQ/ Subject: 20
320 // as opposed to "standard practise", we always read in ~/.Xdefaults
259 321
260 // 6. System wide per application default file. 322 // 6. System wide per application default file.
261 323
262 /* Add in $XAPPLRESDIR/Rxvt only; not bothering with XUSERFILESEARCHPATH */ 324 /* Add in $XAPPLRESDIR/Rxvt only; not bothering with XUSERFILESEARCHPATH */
263 if ((xe = (char *)getenv ("XAPPLRESDIR"))) 325 if ((xe = getenv ("XAPPLRESDIR")))
264 { 326 {
265 snprintf (fname, sizeof (fname), "%s/%s", xe, RESCLASS); 327 snprintf (fname, sizeof (fname), "%s/%s", xe, RESCLASS);
266 328
267 if ((rdb1 = XrmGetFileDatabase (fname))) 329 if ((rdb1 = XrmGetFileDatabase (fname)))
268 XrmMergeDatabases (rdb1, &database); 330 XrmMergeDatabases (rdb1, &database);
270 332
271 // 5. User's per application default file. 333 // 5. User's per application default file.
272 // none 334 // none
273 335
274 // 4. User's defaults file. 336 // 4. User's defaults file.
337 if (homedir)
338 {
339 snprintf (fname, sizeof (fname), "%s/.Xdefaults", homedir);
340
341 if ((rdb1 = XrmGetFileDatabase (fname)))
342 XrmMergeDatabases (rdb1, &database);
343 }
344
275 /* Get any Xserver defaults */ 345 /* Get any Xserver defaults */
346 if (refresh)
347 {
348 // fucking xlib keeps a copy of the rm string
349 Atom actual_type;
350 int actual_format;
351 unsigned long nitems, nremaining;
352 char *val = 0;
353
354#if XLIB_ILLEGAL_ACCESS
355 if (dpy->xdefaults)
356 XFree (dpy->xdefaults);
357#endif
358
359 if (XGetWindowProperty (dpy, RootWindow (dpy, 0), XA_RESOURCE_MANAGER,
360 0L, 100000000L, False,
361 XA_STRING, &actual_type, &actual_format,
362 &nitems, &nremaining,
363 (unsigned char **)&val) == Success
364 && actual_type == XA_STRING
365 && actual_format == 8)
366 displayResource = val;
367 else
368 {
369 displayResource = 0;
370
371 if (val)
372 XFree(val);
373 }
374
375#if XLIB_ILLEGAL_ACCESS
376 dpy->xdefaults = displayResource;
377#endif
378 }
379 else
276 displayResource = XResourceManagerString (display); 380 displayResource = XResourceManagerString (dpy);
277 381
278 if (displayResource != NULL) 382 if (displayResource)
279 { 383 {
280 if ((rdb1 = XrmGetStringDatabase (displayResource))) 384 if ((rdb1 = XrmGetStringDatabase (displayResource)))
281 XrmMergeDatabases (rdb1, &database); 385 XrmMergeDatabases (rdb1, &database);
282 } 386 }
283 else if (homedir)
284 {
285 snprintf (fname, sizeof (fname), "%s/.Xdefaults", homedir);
286 387
287 if ((rdb1 = XrmGetFileDatabase (fname))) 388#if !XLIB_ILLEGAL_ACCESS
288 XrmMergeDatabases (rdb1, &database); 389 if (refresh && displayResource)
289 } 390 XFree (displayResource);
391#endif
290 392
291 /* Get screen specific resources */ 393 /* Get screen specific resources */
292 displayResource = XScreenResourceString (ScreenOfDisplay (display, screen)); 394 displayResource = XScreenResourceString (ScreenOfDisplay (dpy, screen));
293 395
294 if (displayResource != NULL) 396 if (displayResource)
295 { 397 {
296 if ((rdb1 = XrmGetStringDatabase (displayResource))) 398 if ((rdb1 = XrmGetStringDatabase (displayResource)))
297 /* Merge with screen-independent resources */ 399 /* Merge with screen-independent resources */
298 XrmMergeDatabases (rdb1, &database); 400 XrmMergeDatabases (rdb1, &database);
299 401
300 XFree (displayResource); 402 XFree (displayResource);
301 } 403 }
302 404
303 // 3. User's per host defaults file 405 // 3. User's per host defaults file
304 /* Add in XENVIRONMENT file */ 406 /* Add in XENVIRONMENT file */
305 if ((xe = (char *)getenv ("XENVIRONMENT")) 407 if ((xe = getenv ("XENVIRONMENT"))
306 && (rdb1 = XrmGetFileDatabase (xe))) 408 && (rdb1 = XrmGetFileDatabase (xe)))
307 XrmMergeDatabases (rdb1, &database); 409 XrmMergeDatabases (rdb1, &database);
308 else if (homedir) 410 else if (homedir)
309 { 411 {
310 struct utsname un; 412 struct utsname un;
327 if (id[0] == ':') 429 if (id[0] == ':')
328 { 430 {
329 val = rxvt_malloc (5 + strlen (id) + 1); 431 val = rxvt_malloc (5 + strlen (id) + 1);
330 strcpy (val, "unix/"); 432 strcpy (val, "unix/");
331 strcat (val, id); 433 strcat (val, id);
332 display = XOpenDisplay (val); 434 dpy = XOpenDisplay (val);
333 free (val); 435 free (val);
334 } 436 }
335 else 437 else
336#endif 438#endif
337 display = 0; 439 dpy = 0;
338 440
339 if (!display) 441 if (!dpy)
340 display = XOpenDisplay (id); 442 dpy = XOpenDisplay (id);
341 443
342 if (!display) 444 if (!dpy)
343 return false; 445 return false;
344 446
345 screen = DefaultScreen (display); 447 screen = DefaultScreen (dpy);
346 root = DefaultRootWindow (display); 448 root = DefaultRootWindow (dpy);
347 449
348 assert (sizeof (xa_names) / sizeof (char *) == NUM_XA); 450 assert (sizeof (xa_names) / sizeof (char *) == NUM_XA);
349 XInternAtoms (display, (char **)xa_names, NUM_XA, False, xa); 451 XInternAtoms (dpy, (char **)xa_names, NUM_XA, False, xa);
350 452
351 XrmSetDatabase (display, get_resources ()); 453 XrmSetDatabase (dpy, get_resources (false));
352 454
353#ifdef POINTER_BLANK 455#ifdef POINTER_BLANK
354 XColor blackcolour; 456 XColor blackcolour;
355 blackcolour.red = 0; 457 blackcolour.red = 0;
356 blackcolour.green = 0; 458 blackcolour.green = 0;
357 blackcolour.blue = 0; 459 blackcolour.blue = 0;
358 Font f = XLoadFont (display, "fixed"); 460 Font f = XLoadFont (dpy, "fixed");
359 blank_cursor = XCreateGlyphCursor (display, f, f, ' ', ' ', 461 blank_cursor = XCreateGlyphCursor (dpy, f, f, ' ', ' ',
360 &blackcolour, &blackcolour); 462 &blackcolour, &blackcolour);
361 XUnloadFont (display, f); 463 XUnloadFont (dpy, f);
362#endif 464#endif
363 465
364 int fd = XConnectionNumber (display); 466 int fd = XConnectionNumber (dpy);
365 467
366#ifndef NO_SLOW_LINK_SUPPORT
367 // try to detect wether we have a local connection. 468 // try to detect wether we have a local connection.
368 // assume unix domains socket == local, everything else not 469 // assume unix domain socket == local, everything else not
369 // TODO: might want to check for inet/127.0.0.1 470 // TODO: might want to check for inet/127.0.0.1
370 is_local = 0; 471 is_local = 0;
371 sockaddr_un sa; 472 sockaddr_un sa;
372 socklen_t sl = sizeof (sa); 473 socklen_t sl = sizeof (sa);
373 474
374 if (!getsockname (fd, (sockaddr *)&sa, &sl)) 475 if (!getsockname (fd, (sockaddr *)&sa, &sl))
375 is_local = sa.sun_family == AF_LOCAL; 476 is_local = sa.sun_family == AF_UNIX;
376#endif
377 477
478 flush_ev.start ();
378 x_ev.start (fd, EVENT_READ); 479 x_ev.start (fd, ev::READ);
379 fcntl (fd, F_SETFD, FD_CLOEXEC); 480 fcntl (fd, F_SETFD, FD_CLOEXEC);
380 481
381 XSelectInput (display, root, PropertyChangeMask); 482 XSelectInput (dpy, root, PropertyChangeMask);
382 483
383 flush (); 484 flush ();
384 485
385 return true; 486 return true;
386} 487}
387 488
388void 489void
389rxvt_display::ref_next () 490rxvt_display::ref_next ()
390{ 491{
391 // TODO: somehow check wether the database files/resources changed 492 // TODO: somehow check wether the database files/resources changed
392 // before re-loading/parsing 493 // before affording re-loading/parsing
393 XrmDestroyDatabase (XrmGetDatabase (display)); 494 XrmDestroyDatabase (XrmGetDatabase (dpy));
394 XrmSetDatabase (display, get_resources ()); 495 XrmSetDatabase (dpy, get_resources (true));
395} 496}
396 497
397rxvt_display::~rxvt_display () 498rxvt_display::~rxvt_display ()
398{ 499{
399 if (!display) 500 if (!dpy)
400 return; 501 return;
401 502
402#ifdef POINTER_BLANK 503#ifdef POINTER_BLANK
403 XFreeCursor (display, blank_cursor); 504 XFreeCursor (dpy, blank_cursor);
404#endif 505#endif
405 x_ev.stop (); 506 x_ev.stop ();
507 flush_ev.stop ();
406#ifdef USE_XIM 508#ifdef USE_XIM
407 xims.clear (); 509 xims.clear ();
408#endif 510#endif
409 XCloseDisplay (display); 511 XCloseDisplay (dpy);
410} 512}
411 513
412#ifdef USE_XIM 514#ifdef USE_XIM
413void rxvt_display::im_change_cb () 515void rxvt_display::im_change_cb ()
414{ 516{
422 // registers, as xlib crashes due to a race otherwise. 524 // registers, as xlib crashes due to a race otherwise.
423 Atom actual_type, *atoms; 525 Atom actual_type, *atoms;
424 int actual_format; 526 int actual_format;
425 unsigned long nitems, bytes_after; 527 unsigned long nitems, bytes_after;
426 528
427 if (XGetWindowProperty (display, root, xa[XA_XIM_SERVERS], 0L, 1000000L, 529 if (XGetWindowProperty (dpy, root, xa[XA_XIM_SERVERS], 0L, 1000000L,
428 False, XA_ATOM, &actual_type, &actual_format, 530 False, XA_ATOM, &actual_type, &actual_format,
429 &nitems, &bytes_after, (unsigned char **)&atoms) 531 &nitems, &bytes_after, (unsigned char **)&atoms)
430 != Success ) 532 != Success )
431 return; 533 return;
432 534
433 if (actual_type == XA_ATOM && actual_format == 32) 535 if (actual_type == XA_ATOM && actual_format == 32)
434 for (int i = 0; i < nitems; i++) 536 for (int i = 0; i < nitems; i++)
435 if (XGetSelectionOwner (display, atoms[i])) 537 if (XGetSelectionOwner (dpy, atoms[i]))
436 { 538 {
437 im_change_cb (); 539 im_change_cb ();
438 break; 540 break;
439 } 541 }
440 542
441 XFree (atoms); 543 XFree (atoms);
442} 544}
443#endif 545#endif
444 546
445void rxvt_display::x_cb (io_watcher &w, short revents) 547void rxvt_display::x_cb (ev::io &w, int revents)
446{ 548{
549 flush_ev.start ();
550}
551
552void rxvt_display::flush_cb (ev::prepare &w, int revents)
553{
554 while (XEventsQueued (dpy, QueuedAfterFlush))
447 do 555 do
448 { 556 {
449 XEvent xev; 557 XEvent xev;
450 XNextEvent (display, &xev); 558 XNextEvent (dpy, &xev);
451 559
452#ifdef USE_XIM 560#ifdef USE_XIM
453 if (!XFilterEvent (&xev, None)) 561 if (!XFilterEvent (&xev, None))
454 { 562 {
455 if (xev.type == PropertyNotify 563 if (xev.type == PropertyNotify
456 && xev.xany.window == root 564 && xev.xany.window == root
457 && xev.xproperty.atom == xa[XA_XIM_SERVERS]) 565 && xev.xproperty.atom == xa[XA_XIM_SERVERS])
458 im_change_check (); 566 im_change_check ();
459#endif 567#endif
568 if (xev.type == MappingNotify)
569 XRefreshKeyboardMapping (&xev.xmapping);
570
460 for (int i = xw.size (); i--; ) 571 for (int i = xw.size (); i--; )
461 { 572 {
462 if (!xw[i]) 573 if (!xw[i])
463 xw.erase_unordered (i); 574 xw.erase_unordered (i);
464 else if (xw[i]->window == xev.xany.window) 575 else if (xw[i]->window == xev.xany.window)
465 xw[i]->call (xev); 576 xw[i]->call (xev);
466 } 577 }
467#ifdef USE_XIM 578#ifdef USE_XIM
468 } 579 }
469#endif 580#endif
470 } 581 }
471 while (XEventsQueued (display, QueuedAlready)); 582 while (XEventsQueued (dpy, QueuedAlready));
472 583
473 XFlush (display); 584 w.stop ();
474}
475
476void rxvt_display::flush ()
477{
478 if (XEventsQueued (display, QueuedAlready))
479 x_cb (x_ev, EVENT_READ);
480
481 XFlush (display);
482} 585}
483 586
484void rxvt_display::reg (xevent_watcher *w) 587void rxvt_display::reg (xevent_watcher *w)
485{ 588{
589 if (!w->active)
590 {
486 xw.push_back (w); 591 xw.push_back (w);
487 w->active = xw.size (); 592 w->active = xw.size ();
593 }
488} 594}
489 595
490void rxvt_display::unreg (xevent_watcher *w) 596void rxvt_display::unreg (xevent_watcher *w)
491{ 597{
492 if (w->active) 598 if (w->active)
599 {
493 xw[w->active - 1] = 0; 600 xw[w->active - 1] = 0;
601 w->active = 0;
602 }
494} 603}
495 604
496void rxvt_display::set_selection_owner (rxvt_term *owner) 605void rxvt_display::set_selection_owner (rxvt_term *owner)
497{ 606{
498 if (selection_owner && selection_owner != owner) 607 if (selection_owner && selection_owner != owner)
608 {
609 rxvt_term *owner = selection_owner;
610
499 selection_owner->selection_clear (); 611 owner->selection_clear ();
612 owner->flush ();
613 }
500 614
501 selection_owner = owner; 615 selection_owner = owner;
502} 616}
503 617
504#ifdef USE_XIM 618#ifdef USE_XIM
619
505void rxvt_display::reg (im_watcher *w) 620void rxvt_display::reg (im_watcher *w)
506{ 621{
507 imw.push_back (w); 622 imw.push_back (w);
508} 623}
509 624
533 return xim; 648 return xim;
534} 649}
535 650
536void rxvt_display::put_xim (rxvt_xim *xim) 651void rxvt_display::put_xim (rxvt_xim *xim)
537{ 652{
538#if XLIB_IS_RACEFREE 653# if XLIB_IS_RACEFREE
539 xims.put (xim); 654 xims.put (xim);
540#endif 655# endif
541} 656}
657
542#endif 658#endif
543 659
544Atom rxvt_display::atom (const char *name) 660Atom rxvt_display::atom (const char *name)
545{ 661{
546 return XInternAtom (display, name, False); 662 return XInternAtom (dpy, name, False);
547} 663}
548 664
549///////////////////////////////////////////////////////////////////////////// 665/////////////////////////////////////////////////////////////////////////////
550 666
551template class refcache<rxvt_display>; 667template class refcache<rxvt_display>;
552refcache<rxvt_display> displays; 668refcache<rxvt_display> displays;
553 669
554///////////////////////////////////////////////////////////////////////////// 670/////////////////////////////////////////////////////////////////////////////
555 671//
672
673static unsigned int
674insert_component (unsigned int value, unsigned int mask, unsigned int shift)
675{
676 return (value * (mask + 1) >> 16) << shift;
677}
678
679bool
680rxvt_color::alloc (rxvt_screen *screen, const rgba &color)
681{
682 //TODO: only supports 24 bit
683 int alpha = color.a >= 0xff00 ? 0xffff : color.a;
684
685#if XFT
686 XRenderPictFormat *format;
687
688 // FUCKING Xft gets it wrong, of course, so work around it.
689 // Transparency users should eat shit and die, and then
690 // XRenderQueryPictIndexValues themselves plenty.
691 if ((screen->visual->c_class == TrueColor)
692 && (format = XRenderFindVisualFormat (screen->dpy, screen->visual)))
693 {
694 // the fun lies in doing everything manually...
695 c.color.red = color.r;
696 c.color.green = color.g;
697 c.color.blue = color.b;
698 c.color.alpha = alpha;
699
700 c.pixel = insert_component (color.r, format->direct.redMask , format->direct.red )
701 | insert_component (color.g, format->direct.greenMask, format->direct.green)
702 | insert_component (color.b, format->direct.blueMask , format->direct.blue )
703 | insert_component (alpha , format->direct.alphaMask, format->direct.alpha);
704
705 return true;
706 }
707 else
708 {
709 XRenderColor d;
710
711 d.red = color.r;
712 d.green = color.g;
713 d.blue = color.b;
714 d.alpha = alpha;
715
716 return XftColorAllocValue (screen->dpy, screen->visual, screen->cmap, &d, &c);
717 }
718#else
719 c.red = color.r;
720 c.green = color.g;
721 c.blue = color.b;
722
723 if (screen->visual->c_class == TrueColor)
724 {
725 c.pixel = (color.r >> (16 - popcount (screen->visual->red_mask )) << ctz (screen->visual->red_mask ))
726 | (color.g >> (16 - popcount (screen->visual->green_mask)) << ctz (screen->visual->green_mask))
727 | (color.b >> (16 - popcount (screen->visual->blue_mask )) << ctz (screen->visual->blue_mask ));
728
729 return true;
730 }
731 else if (XAllocColor (screen->dpy, screen->cmap, &c))
732 return true;
733 else
734 c.pixel = (color.r + color.g + color.b) > 128*3
735 ? WhitePixelOfScreen (DefaultScreenOfDisplay (screen->dpy))
736 : BlackPixelOfScreen (DefaultScreenOfDisplay (screen->dpy));
737#endif
738
739 return false;
740}
741
556bool 742bool
557rxvt_color::set (rxvt_screen *screen, const char *name) 743rxvt_color::set (rxvt_screen *screen, const char *name)
558{ 744{
745 rgba c;
746 char eos;
747 int skip;
748
749 c.a = rgba::MAX_CC;
750
751 // parse the nonstandard "[alphapercent]" prefix
752 if (1 <= sscanf (name, "[%hd]%n", &c.a, &skip))
753 {
754 c.a = lerp<int, int, int> (0, rgba::MAX_CC, c.a);
755 name += skip;
756 }
757
758 // parse the non-standard "rgba:rrrr/gggg/bbbb/aaaa" format
759 if (strlen (name) != 4+5*4 || 4 != sscanf (name, "rgba:%4hx/%4hx/%4hx/%4hx%c", &c.r, &c.g, &c.b, &c.a, &eos))
760 {
761 XColor xc;
762
763 if (XParseColor (screen->dpy, screen->cmap, name, &xc))
764 {
765 c.r = xc.red;
766 c.g = xc.green;
767 c.b = xc.blue;
768 }
769 else
770 {
771 c.r = 0xffff;
772 c.g = 0x6969;
773 c.b = 0xb4b4;
774
775 rxvt_warn ("unable to parse color '%s', using pink instead.\n", name);
776 }
777 }
778
779 return set (screen, c);
780}
781
782bool
783rxvt_color::set (rxvt_screen *screen, const rgba &color)
784{
785 bool got = alloc (screen, color);
786
787#if !ENABLE_MINIMAL
788 int cmap_size = screen->visual->map_entries;
789
790 if (!got
791 && screen->visual->c_class == PseudoColor
792 && cmap_size < 4096)
793 {
794 XColor *colors = new XColor [screen->visual->map_entries];
795
796 for (int i = 0; i < cmap_size; i++)
797 colors [i].pixel = i;
798
799 // many kilobytes transfer per colour, but pseudocolor isn't worth
800 // many extra optimisations.
801 XQueryColors (screen->dpy, screen->cmap, colors, cmap_size);
802
803 int diff = 0x7fffffffUL;
804 XColor *best = colors;
805
806 for (int i = 0; i < cmap_size; i++)
807 {
808 int d = (squared_diff<int> (color.r >> 2, colors [i].red >> 2))
809 + (squared_diff<int> (color.g >> 2, colors [i].green >> 2))
810 + (squared_diff<int> (color.b >> 2, colors [i].blue >> 2));
811
812 if (d < diff)
813 {
814 diff = d;
815 best = colors + i;
816 }
817 }
818
819 //rxvt_warn ("could not allocate %04x %04x %04x, getting %04x %04x %04x instead (%d)\n",
820 // color.r, color.g, color.b, best->red, best->green, best->blue, diff);
821
822 got = alloc (screen, rgba (best->red, best->green, best->blue));
823
824 delete [] colors;
825 }
826#endif
827
828 return got;
829}
830
831void
832rxvt_color::get (rgba &color)
833{
559#if XFT 834#if XFT
560 int l = strlen (name); 835 color.r = c.color.red;
561 rxvt_rgba r; 836 color.g = c.color.green;
562 char eos; 837 color.b = c.color.blue;
563 int mult; 838 color.a = c.color.alpha;
564
565 // shortcutting this saves countless server RTTs for the built-in colours
566 if (l == 3+3*3 && 3 == sscanf (name, "rgb:%hx/%hx/%hx/%hx%c", &r.r, &r.g, &r.b, &r.a, &eos))
567 {
568 r.a = rxvt_rgba::MAX_CC;
569 mult = rxvt_rgba::MAX_CC / 0x00ff;
570 }
571
572 // parse a number of non-standard ARGB colour specifications
573 else if ( l == 1+4*1 && 4 == sscanf (name, "#%1hx%1hx%1hx%1hx%c", &r.a, &r.r, &r.g, &r.b, &eos))
574 mult = rxvt_rgba::MAX_CC / 0x000f;
575 else if (l == 1+4*2 && 4 == sscanf (name, "#%2hx%2hx%2hx%2hx%c", &r.a, &r.r, &r.g, &r.b, &eos))
576 mult = rxvt_rgba::MAX_CC / 0x00ff;
577 else if (l == 1+4*4 && 4 == sscanf (name, "#%4hx%4hx%4hx%4hx%c", &r.a, &r.r, &r.g, &r.b, &eos))
578 mult = rxvt_rgba::MAX_CC / 0xffff;
579 else if (l == 4+5*4 && 4 == sscanf (name, "rgba:%hx/%hx/%hx/%hx%c", &r.r, &r.g, &r.b, &r.a, &eos))
580 mult = rxvt_rgba::MAX_CC / 0xffff;
581
582 // slow case: server round trip
583 else
584 return XftColorAllocName (screen->xdisp, screen->visual, screen->cmap, name, &c);
585
586 r.r *= mult; r.g *= mult; r.b *= mult; r.a *= mult;
587
588 return set (screen, r);
589#else 839#else
590 XColor xc; 840 color.r = c.red;
591 841 color.g = c.green;
592 if (XParseColor (screen->xdisp, screen->cmap, name, &xc)) 842 color.b = c.blue;
593 return set (screen, rxvt_rgba (xc.red, xc.green, xc.blue)); 843 color.a = rgba::MAX_CC;
594
595 return false;
596#endif 844#endif
597} 845}
598 846
599bool 847void
848rxvt_color::get (XColor &color)
849{
850 rgba c;
851 get (c);
852
853 color.red = c.r;
854 color.green = c.g;
855 color.blue = c.b;
856 color.pixel = (Pixel)*this;
857}
858
859void
600rxvt_color::set (rxvt_screen *screen, rxvt_rgba rgba) 860rxvt_color::free (rxvt_screen *screen)
601{ 861{
862 if (screen->visual->c_class == TrueColor)
863 return; // nothing to do
864
602#if XFT 865#if XFT
603 XRenderPictFormat *format;
604
605 // FUCKING Xft gets it wrong, of course, so work around it
606 // transparency users should eat shit and die, and then
607 // XRenderQueryPictIndexValues themselves plenty.
608 if (screen->visual->c_class == TrueColor
609 && (format = XRenderFindVisualFormat (screen->xdisp, screen->visual)))
610 {
611 // the fun lies in doing everything manually...
612 c.color.red = rgba.r;
613 c.color.green = rgba.g;
614 c.color.blue = rgba.b;
615 c.color.alpha = rgba.a;
616
617 c.pixel = ((rgba.r * format->direct.redMask / rxvt_rgba::MAX_CC) << format->direct.red )
618 | ((rgba.g * format->direct.greenMask / rxvt_rgba::MAX_CC) << format->direct.green)
619 | ((rgba.b * format->direct.blueMask / rxvt_rgba::MAX_CC) << format->direct.blue )
620 | ((rgba.a * format->direct.alphaMask / rxvt_rgba::MAX_CC) << format->direct.alpha);
621
622 return true;
623 }
624 else
625 {
626 XRenderColor d;
627
628 d.red = rgba.r;
629 d.green = rgba.g;
630 d.blue = rgba.b;
631 d.alpha = rgba.a;
632
633 return XftColorAllocValue (screen->xdisp, screen->visual, screen->cmap, &d, &c); 866 XftColorFree (screen->dpy, screen->visual, screen->cmap, &c);
634 }
635
636 return false;
637#else 867#else
638 XColor xc;
639
640 xc.red = rgba.r;
641 xc.green = rgba.g;
642 xc.blue = rgba.b;
643 xc.flags = DoRed | DoGreen | DoBlue;
644
645 if (XAllocColor (screen->xdisp, screen->cmap, &xc))
646 {
647 p = xc.pixel;
648 return true;
649 }
650
651 return false;
652#endif
653}
654
655void
656rxvt_color::get (rxvt_screen *screen, rxvt_rgba &rgba)
657{
658#if XFT
659 rgba.r = c.color.red;
660 rgba.g = c.color.green;
661 rgba.b = c.color.blue;
662 rgba.a = c.color.alpha;
663#else
664 XColor c;
665
666 c.pixel = p;
667 XQueryColor (screen->xdisp, screen->cmap, &c);
668
669 rgba.r = c.red;
670 rgba.g = c.green;
671 rgba.b = c.blue;
672 rgba.a = rxvt_rgba::MAX_CC;
673#endif
674}
675
676void
677rxvt_color::free (rxvt_screen *screen)
678{
679#if XFT
680 XftColorFree (screen->xdisp, screen->visual, screen->cmap, &c);
681#else
682 XFreeColors (screen->xdisp, screen->cmap, &p, 1, AllPlanes); 868 XFreeColors (screen->dpy, screen->cmap, &c.pixel, 1, AllPlanes);
683#endif 869#endif
684} 870}
685 871
686rxvt_color 872void
687rxvt_color::fade (rxvt_screen *screen, int percent)
688{
689 rxvt_color faded;
690
691 rxvt_rgba c;
692 get (screen, c);
693
694 c.r = lerp (0, c.r, percent);
695 c.g = lerp (0, c.g, percent);
696 c.b = lerp (0, c.b, percent);
697
698 faded.set (screen, c);
699
700 return faded;
701}
702
703rxvt_color
704rxvt_color::fade (rxvt_screen *screen, int percent, rxvt_color &fadeto) 873rxvt_color::fade (rxvt_screen *screen, int percent, rxvt_color &result, const rgba &to)
705{ 874{
706 rxvt_rgba c, fc; 875 rgba c;
707 rxvt_color faded; 876 get (c);
708
709 get (screen, c);
710 fadeto.get (screen, fc);
711 877
712 faded.set ( 878 result.set (
713 screen, 879 screen,
714 rxvt_rgba ( 880 rgba (
715 lerp (fc.r, c.r, percent), 881 lerp (c.r, to.r, percent),
716 lerp (fc.g, c.g, percent), 882 lerp (c.g, to.g, percent),
717 lerp (fc.b, c.b, percent), 883 lerp (c.b, to.b, percent),
718 lerp (fc.a, c.a, percent) 884 lerp (c.a, to.a, percent)
719 ) 885 )
720 ); 886 );
887}
721 888
889#if TRACE_PIXMAPS
890# undef XCreatePixmap
891# undef XFreePixmap
892Pixmap trace_XCreatePixmap (const char *file, int line, Display *dpy, Window r, unsigned int w, unsigned int h, unsigned int d)
893{
894 Pixmap res = XCreatePixmap (dpy, r, w, h, d);
895 fprintf (stderr, "%s:%d: XCreatePixmap (%p,%lX,%u,%u,%u) returned %lX\n", file, line, dpy, r, w, h, d, res);
722 return faded; 896 return res;
723} 897}
724 898
899void trace_XFreePixmap (const char *file, int line, Display *dpy, Pixmap p)
900{
901 fprintf (stderr, "%s:%d: XFreePixmap (%p,%lX)\n", file, line, dpy, p);
902 XFreePixmap (dpy,p);
903}
904#endif

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines