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.40 by root, Tue Jan 31 16:19:16 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",
177bool 175bool
178rxvt_xim::ref_init () 176rxvt_xim::ref_init ()
179{ 177{
180 display = GET_R->display; //HACK: TODO 178 display = GET_R->display; //HACK: TODO
181 179
182 xim = XOpenIM (display->display, NULL, NULL, NULL); 180 xim = XOpenIM (display->dpy, 0, 0, 0);
183 181
184 if (!xim) 182 if (!xim)
185 return false; 183 return false;
186 184
187 XIMCallback ximcallback; 185 XIMCallback ximcallback;
188 ximcallback.client_data = (XPointer)this; 186 ximcallback.client_data = (XPointer)this;
189 ximcallback.callback = im_destroy_cb; 187 ximcallback.callback = im_destroy_cb;
190 188
191 XSetIMValues (xim, XNDestroyCallback, &ximcallback, NULL); 189 XSetIMValues (xim, XNDestroyCallback, &ximcallback, (char *)0);
192 190
193 return true; 191 return true;
194} 192}
195 193
196rxvt_xim::~rxvt_xim () 194rxvt_xim::~rxvt_xim ()
201 199
202#endif 200#endif
203 201
204///////////////////////////////////////////////////////////////////////////// 202/////////////////////////////////////////////////////////////////////////////
205 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
206void 254void
207rxvt_screen::set (rxvt_display *disp) 255rxvt_screen::set (rxvt_display *disp)
208{ 256{
209 display = disp; 257 display = disp;
210 xdisp = disp->display; 258 dpy = disp->dpy;
211 259
212 Screen *screen = ScreenOfDisplay (xdisp, disp->screen); 260 Screen *screen = ScreenOfDisplay (dpy, disp->screen);
213 261
214 depth = DefaultDepthOfScreen (screen); 262 depth = DefaultDepthOfScreen (screen);
215 visual = DefaultVisualOfScreen (screen); 263 visual = DefaultVisualOfScreen (screen);
216 cmap = DefaultColormapOfScreen (screen); 264 cmap = DefaultColormapOfScreen (screen);
217} 265}
218 266
219void 267void
220rxvt_screen::set (rxvt_display *disp, int bitdepth) 268rxvt_screen::select_visual (int bitdepth)
221{ 269{
222 set (disp);
223
224#if XFT 270#if XFT
225 XVisualInfo vinfo; 271 XVisualInfo vinfo;
226 272
227 if (XMatchVisualInfo (xdisp, display->screen, bitdepth, TrueColor, &vinfo)) 273 if (XMatchVisualInfo (dpy, display->screen, bitdepth, TrueColor, &vinfo))
228 { 274 {
229 depth = bitdepth; 275 depth = bitdepth;
230 visual = vinfo.visual; 276 visual = vinfo.visual;
231 cmap = XCreateColormap (xdisp, disp->root, visual, AllocNone); 277 cmap = XCreateColormap (dpy, display->root, visual, AllocNone);
232 } 278 }
233#endif 279#endif
234} 280}
235 281
236void 282void
237rxvt_screen::clear () 283rxvt_screen::clear ()
238{ 284{
285#if XFT
286 if (scratch_area)
287 {
288 XFreePixmap (dpy, scratch_area->drawable);
289 delete scratch_area;
290 }
291#endif
292
239 if (cmap != DefaultColormapOfScreen (ScreenOfDisplay (xdisp, display->screen))) 293 if (cmap != DefaultColormapOfScreen (ScreenOfDisplay (dpy, display->screen)))
240 XFreeColormap (xdisp, cmap); 294 XFreeColormap (dpy, cmap);
241} 295}
242 296
243///////////////////////////////////////////////////////////////////////////// 297/////////////////////////////////////////////////////////////////////////////
244 298
245rxvt_display::rxvt_display (const char *id) 299rxvt_display::rxvt_display (const char *id)
246: refcounted (id) 300: refcounted (id)
247, x_ev (this, &rxvt_display::x_cb)
248, selection_owner (0) 301, selection_owner (0)
249{ 302{
303 x_ev .set<rxvt_display, &rxvt_display::x_cb > (this);
304 flush_ev.set<rxvt_display, &rxvt_display::flush_cb> (this);
250} 305}
251 306
252XrmDatabase 307XrmDatabase
253rxvt_display::get_resources () 308rxvt_display::get_resources (bool refresh)
254{ 309{
255 char *homedir = (char *)getenv ("HOME"); 310 char *homedir = getenv ("HOME");
256 char fname[1024]; 311 char fname[1024];
257 312
258 /* 313 /*
259 * get resources using the X library function 314 * get resources using the X library function
260 */ 315 */
261 char *displayResource, *xe; 316 char *displayResource, *xe;
262 XrmDatabase database, rdb1; 317 XrmDatabase rdb1, database = 0;
263
264 database = NULL;
265 318
266 // 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
267 321
268 // 6. System wide per application default file. 322 // 6. System wide per application default file.
269 323
270 /* Add in $XAPPLRESDIR/Rxvt only; not bothering with XUSERFILESEARCHPATH */ 324 /* Add in $XAPPLRESDIR/Rxvt only; not bothering with XUSERFILESEARCHPATH */
271 if ((xe = (char *)getenv ("XAPPLRESDIR"))) 325 if ((xe = getenv ("XAPPLRESDIR")))
272 { 326 {
273 snprintf (fname, sizeof (fname), "%s/%s", xe, RESCLASS); 327 snprintf (fname, sizeof (fname), "%s/%s", xe, RESCLASS);
274 328
275 if ((rdb1 = XrmGetFileDatabase (fname))) 329 if ((rdb1 = XrmGetFileDatabase (fname)))
276 XrmMergeDatabases (rdb1, &database); 330 XrmMergeDatabases (rdb1, &database);
278 332
279 // 5. User's per application default file. 333 // 5. User's per application default file.
280 // none 334 // none
281 335
282 // 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
283 /* 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
284 displayResource = XResourceManagerString (display); 380 displayResource = XResourceManagerString (dpy);
285 381
286 if (displayResource != NULL) 382 if (displayResource)
287 { 383 {
288 if ((rdb1 = XrmGetStringDatabase (displayResource))) 384 if ((rdb1 = XrmGetStringDatabase (displayResource)))
289 XrmMergeDatabases (rdb1, &database); 385 XrmMergeDatabases (rdb1, &database);
290 } 386 }
291 else if (homedir)
292 {
293 snprintf (fname, sizeof (fname), "%s/.Xdefaults", homedir);
294 387
295 if ((rdb1 = XrmGetFileDatabase (fname))) 388#if !XLIB_ILLEGAL_ACCESS
296 XrmMergeDatabases (rdb1, &database); 389 if (refresh && displayResource)
297 } 390 XFree (displayResource);
391#endif
298 392
299 /* Get screen specific resources */ 393 /* Get screen specific resources */
300 displayResource = XScreenResourceString (ScreenOfDisplay (display, screen)); 394 displayResource = XScreenResourceString (ScreenOfDisplay (dpy, screen));
301 395
302 if (displayResource != NULL) 396 if (displayResource)
303 { 397 {
304 if ((rdb1 = XrmGetStringDatabase (displayResource))) 398 if ((rdb1 = XrmGetStringDatabase (displayResource)))
305 /* Merge with screen-independent resources */ 399 /* Merge with screen-independent resources */
306 XrmMergeDatabases (rdb1, &database); 400 XrmMergeDatabases (rdb1, &database);
307 401
308 XFree (displayResource); 402 XFree (displayResource);
309 } 403 }
310 404
311 // 3. User's per host defaults file 405 // 3. User's per host defaults file
312 /* Add in XENVIRONMENT file */ 406 /* Add in XENVIRONMENT file */
313 if ((xe = (char *)getenv ("XENVIRONMENT")) 407 if ((xe = getenv ("XENVIRONMENT"))
314 && (rdb1 = XrmGetFileDatabase (xe))) 408 && (rdb1 = XrmGetFileDatabase (xe)))
315 XrmMergeDatabases (rdb1, &database); 409 XrmMergeDatabases (rdb1, &database);
316 else if (homedir) 410 else if (homedir)
317 { 411 {
318 struct utsname un; 412 struct utsname un;
335 if (id[0] == ':') 429 if (id[0] == ':')
336 { 430 {
337 val = rxvt_malloc (5 + strlen (id) + 1); 431 val = rxvt_malloc (5 + strlen (id) + 1);
338 strcpy (val, "unix/"); 432 strcpy (val, "unix/");
339 strcat (val, id); 433 strcat (val, id);
340 display = XOpenDisplay (val); 434 dpy = XOpenDisplay (val);
341 free (val); 435 free (val);
342 } 436 }
343 else 437 else
344#endif 438#endif
345 display = 0; 439 dpy = 0;
346 440
347 if (!display) 441 if (!dpy)
348 display = XOpenDisplay (id); 442 dpy = XOpenDisplay (id);
349 443
350 if (!display) 444 if (!dpy)
351 return false; 445 return false;
352 446
353 screen = DefaultScreen (display); 447 screen = DefaultScreen (dpy);
354 root = DefaultRootWindow (display); 448 root = DefaultRootWindow (dpy);
355 449
356 assert (sizeof (xa_names) / sizeof (char *) == NUM_XA); 450 assert (sizeof (xa_names) / sizeof (char *) == NUM_XA);
357 XInternAtoms (display, (char **)xa_names, NUM_XA, False, xa); 451 XInternAtoms (dpy, (char **)xa_names, NUM_XA, False, xa);
358 452
359 XrmSetDatabase (display, get_resources ()); 453 XrmSetDatabase (dpy, get_resources (false));
360 454
361#ifdef POINTER_BLANK 455#ifdef POINTER_BLANK
362 XColor blackcolour; 456 XColor blackcolour;
363 blackcolour.red = 0; 457 blackcolour.red = 0;
364 blackcolour.green = 0; 458 blackcolour.green = 0;
365 blackcolour.blue = 0; 459 blackcolour.blue = 0;
366 Font f = XLoadFont (display, "fixed"); 460 Font f = XLoadFont (dpy, "fixed");
367 blank_cursor = XCreateGlyphCursor (display, f, f, ' ', ' ', 461 blank_cursor = XCreateGlyphCursor (dpy, f, f, ' ', ' ',
368 &blackcolour, &blackcolour); 462 &blackcolour, &blackcolour);
369 XUnloadFont (display, f); 463 XUnloadFont (dpy, f);
370#endif 464#endif
371 465
372 int fd = XConnectionNumber (display); 466 int fd = XConnectionNumber (dpy);
373 467
374#ifndef NO_SLOW_LINK_SUPPORT
375 // try to detect wether we have a local connection. 468 // try to detect wether we have a local connection.
376 // assume unix domains socket == local, everything else not 469 // assume unix domain socket == local, everything else not
377 // TODO: might want to check for inet/127.0.0.1 470 // TODO: might want to check for inet/127.0.0.1
378 is_local = 0; 471 is_local = 0;
379 sockaddr_un sa; 472 sockaddr_un sa;
380 socklen_t sl = sizeof (sa); 473 socklen_t sl = sizeof (sa);
381 474
382 if (!getsockname (fd, (sockaddr *)&sa, &sl)) 475 if (!getsockname (fd, (sockaddr *)&sa, &sl))
383 is_local = sa.sun_family == AF_LOCAL; 476 is_local = sa.sun_family == AF_UNIX;
384#endif
385 477
478 flush_ev.start ();
386 x_ev.start (fd, EVENT_READ); 479 x_ev.start (fd, ev::READ);
387 fcntl (fd, F_SETFD, FD_CLOEXEC); 480 fcntl (fd, F_SETFD, FD_CLOEXEC);
388 481
389 XSelectInput (display, root, PropertyChangeMask); 482 XSelectInput (dpy, root, PropertyChangeMask);
390 483
391 flush (); 484 flush ();
392 485
393 return true; 486 return true;
394} 487}
395 488
396void 489void
397rxvt_display::ref_next () 490rxvt_display::ref_next ()
398{ 491{
399 // TODO: somehow check wether the database files/resources changed 492 // TODO: somehow check wether the database files/resources changed
400 // before re-loading/parsing 493 // before affording re-loading/parsing
401 XrmDestroyDatabase (XrmGetDatabase (display)); 494 XrmDestroyDatabase (XrmGetDatabase (dpy));
402 XrmSetDatabase (display, get_resources ()); 495 XrmSetDatabase (dpy, get_resources (true));
403} 496}
404 497
405rxvt_display::~rxvt_display () 498rxvt_display::~rxvt_display ()
406{ 499{
407 if (!display) 500 if (!dpy)
408 return; 501 return;
409 502
410#ifdef POINTER_BLANK 503#ifdef POINTER_BLANK
411 XFreeCursor (display, blank_cursor); 504 XFreeCursor (dpy, blank_cursor);
412#endif 505#endif
413 x_ev.stop (); 506 x_ev.stop ();
507 flush_ev.stop ();
414#ifdef USE_XIM 508#ifdef USE_XIM
415 xims.clear (); 509 xims.clear ();
416#endif 510#endif
417 XCloseDisplay (display); 511 XCloseDisplay (dpy);
418} 512}
419 513
420#ifdef USE_XIM 514#ifdef USE_XIM
421void rxvt_display::im_change_cb () 515void rxvt_display::im_change_cb ()
422{ 516{
430 // registers, as xlib crashes due to a race otherwise. 524 // registers, as xlib crashes due to a race otherwise.
431 Atom actual_type, *atoms; 525 Atom actual_type, *atoms;
432 int actual_format; 526 int actual_format;
433 unsigned long nitems, bytes_after; 527 unsigned long nitems, bytes_after;
434 528
435 if (XGetWindowProperty (display, root, xa[XA_XIM_SERVERS], 0L, 1000000L, 529 if (XGetWindowProperty (dpy, root, xa[XA_XIM_SERVERS], 0L, 1000000L,
436 False, XA_ATOM, &actual_type, &actual_format, 530 False, XA_ATOM, &actual_type, &actual_format,
437 &nitems, &bytes_after, (unsigned char **)&atoms) 531 &nitems, &bytes_after, (unsigned char **)&atoms)
438 != Success ) 532 != Success )
439 return; 533 return;
440 534
441 if (actual_type == XA_ATOM && actual_format == 32) 535 if (actual_type == XA_ATOM && actual_format == 32)
442 for (int i = 0; i < nitems; i++) 536 for (int i = 0; i < nitems; i++)
443 if (XGetSelectionOwner (display, atoms[i])) 537 if (XGetSelectionOwner (dpy, atoms[i]))
444 { 538 {
445 im_change_cb (); 539 im_change_cb ();
446 break; 540 break;
447 } 541 }
448 542
449 XFree (atoms); 543 XFree (atoms);
450} 544}
451#endif 545#endif
452 546
453void rxvt_display::x_cb (io_watcher &w, short revents) 547void rxvt_display::x_cb (ev::io &w, int revents)
454{ 548{
549 flush_ev.start ();
550}
551
552void rxvt_display::flush_cb (ev::prepare &w, int revents)
553{
554 while (XEventsQueued (dpy, QueuedAfterFlush))
455 do 555 do
456 { 556 {
457 XEvent xev; 557 XEvent xev;
458 XNextEvent (display, &xev); 558 XNextEvent (dpy, &xev);
459 559
460#ifdef USE_XIM 560#ifdef USE_XIM
461 if (!XFilterEvent (&xev, None)) 561 if (!XFilterEvent (&xev, None))
462 { 562 {
463 if (xev.type == PropertyNotify 563 if (xev.type == PropertyNotify
464 && xev.xany.window == root 564 && xev.xany.window == root
465 && xev.xproperty.atom == xa[XA_XIM_SERVERS]) 565 && xev.xproperty.atom == xa[XA_XIM_SERVERS])
466 im_change_check (); 566 im_change_check ();
467#endif 567#endif
568 if (xev.type == MappingNotify)
569 XRefreshKeyboardMapping (&xev.xmapping);
570
468 for (int i = xw.size (); i--; ) 571 for (int i = xw.size (); i--; )
469 { 572 {
470 if (!xw[i]) 573 if (!xw[i])
471 xw.erase_unordered (i); 574 xw.erase_unordered (i);
472 else if (xw[i]->window == xev.xany.window) 575 else if (xw[i]->window == xev.xany.window)
473 xw[i]->call (xev); 576 xw[i]->call (xev);
474 } 577 }
475#ifdef USE_XIM 578#ifdef USE_XIM
476 } 579 }
477#endif 580#endif
478 } 581 }
479 while (XEventsQueued (display, QueuedAlready)); 582 while (XEventsQueued (dpy, QueuedAlready));
480 583
481 XFlush (display); 584 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} 585}
491 586
492void rxvt_display::reg (xevent_watcher *w) 587void rxvt_display::reg (xevent_watcher *w)
493{ 588{
589 if (!w->active)
590 {
494 xw.push_back (w); 591 xw.push_back (w);
495 w->active = xw.size (); 592 w->active = xw.size ();
593 }
496} 594}
497 595
498void rxvt_display::unreg (xevent_watcher *w) 596void rxvt_display::unreg (xevent_watcher *w)
499{ 597{
500 if (w->active) 598 if (w->active)
599 {
501 xw[w->active - 1] = 0; 600 xw[w->active - 1] = 0;
601 w->active = 0;
602 }
502} 603}
503 604
504void rxvt_display::set_selection_owner (rxvt_term *owner) 605void rxvt_display::set_selection_owner (rxvt_term *owner)
505{ 606{
506 if (selection_owner && selection_owner != owner) 607 if (selection_owner && selection_owner != owner)
608 {
609 rxvt_term *owner = selection_owner;
610
507 selection_owner->selection_clear (); 611 owner->selection_clear ();
612 owner->flush ();
613 }
508 614
509 selection_owner = owner; 615 selection_owner = owner;
510} 616}
511 617
512#ifdef USE_XIM 618#ifdef USE_XIM
619
513void rxvt_display::reg (im_watcher *w) 620void rxvt_display::reg (im_watcher *w)
514{ 621{
515 imw.push_back (w); 622 imw.push_back (w);
516} 623}
517 624
541 return xim; 648 return xim;
542} 649}
543 650
544void rxvt_display::put_xim (rxvt_xim *xim) 651void rxvt_display::put_xim (rxvt_xim *xim)
545{ 652{
546#if XLIB_IS_RACEFREE 653# if XLIB_IS_RACEFREE
547 xims.put (xim); 654 xims.put (xim);
548#endif 655# endif
549} 656}
657
550#endif 658#endif
551 659
552Atom rxvt_display::atom (const char *name) 660Atom rxvt_display::atom (const char *name)
553{ 661{
554 return XInternAtom (display, name, False); 662 return XInternAtom (dpy, name, False);
555} 663}
556 664
557///////////////////////////////////////////////////////////////////////////// 665/////////////////////////////////////////////////////////////////////////////
558 666
559template class refcache<rxvt_display>; 667template class refcache<rxvt_display>;
560refcache<rxvt_display> displays; 668refcache<rxvt_display> displays;
561 669
562///////////////////////////////////////////////////////////////////////////// 670/////////////////////////////////////////////////////////////////////////////
563 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
564bool 679bool
565rxvt_color::alloc (rxvt_screen *screen, const rxvt_rgba &color) 680rxvt_color::alloc (rxvt_screen *screen, const rgba &color)
566{ 681{
682 //TODO: only supports 24 bit
683 int alpha = color.a >= 0xff00 ? 0xffff : color.a;
684
567#if XFT 685#if XFT
568 XRenderPictFormat *format; 686 XRenderPictFormat *format;
569 687
570 // FUCKING Xft gets it wrong, of course, so work around it 688 // FUCKING Xft gets it wrong, of course, so work around it.
571 // transparency users should eat shit and die, and then 689 // Transparency users should eat shit and die, and then
572 // XRenderQueryPictIndexValues themselves plenty. 690 // XRenderQueryPictIndexValues themselves plenty.
573 if ((screen->visual->c_class == TrueColor || screen->visual->c_class == DirectColor) 691 if ((screen->visual->c_class == TrueColor)
574 && (format = XRenderFindVisualFormat (screen->xdisp, screen->visual))) 692 && (format = XRenderFindVisualFormat (screen->dpy, screen->visual)))
575 { 693 {
576 // the fun lies in doing everything manually... 694 // the fun lies in doing everything manually...
577 c.color.red = color.r; 695 c.color.red = color.r;
578 c.color.green = color.g; 696 c.color.green = color.g;
579 c.color.blue = color.b; 697 c.color.blue = color.b;
580 c.color.alpha = color.a; 698 c.color.alpha = alpha;
581 699
582 c.pixel = ((color.r * format->direct.redMask / rxvt_rgba::MAX_CC) << format->direct.red ) 700 c.pixel = insert_component (color.r, format->direct.redMask , format->direct.red )
583 | ((color.g * format->direct.greenMask / rxvt_rgba::MAX_CC) << format->direct.green) 701 | insert_component (color.g, format->direct.greenMask, format->direct.green)
584 | ((color.b * format->direct.blueMask / rxvt_rgba::MAX_CC) << format->direct.blue ) 702 | insert_component (color.b, format->direct.blueMask , format->direct.blue )
585 | ((color.a * format->direct.alphaMask / rxvt_rgba::MAX_CC) << format->direct.alpha); 703 | insert_component (alpha , format->direct.alphaMask, format->direct.alpha);
586 704
587 return true; 705 return true;
588 } 706 }
589 else 707 else
590 { 708 {
591 XRenderColor d; 709 XRenderColor d;
592 710
593 d.red = color.r; 711 d.red = color.r;
594 d.green = color.g; 712 d.green = color.g;
595 d.blue = color.b; 713 d.blue = color.b;
596 d.alpha = color.a; 714 d.alpha = alpha;
597 715
598 return XftColorAllocValue (screen->xdisp, screen->visual, screen->cmap, &d, &c); 716 return XftColorAllocValue (screen->dpy, screen->visual, screen->cmap, &d, &c);
599 } 717 }
600#else 718#else
601 if (screen->visual->c_class == TrueColor || screen->visual->c_class == DirectColor) 719 c.red = color.r;
720 c.green = color.g;
721 c.blue = color.b;
722
723 if (screen->visual->c_class == TrueColor)
602 { 724 {
603 p = (color.r * (screen->visual->red_mask >> ctz (screen->visual->red_mask )) 725 c.pixel = (color.r >> (16 - popcount (screen->visual->red_mask )) << ctz (screen->visual->red_mask ))
604 / rxvt_rgba::MAX_CC) << ctz (screen->visual->red_mask ) 726 | (color.g >> (16 - popcount (screen->visual->green_mask)) << ctz (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 )) 727 | (color.b >> (16 - popcount (screen->visual->blue_mask )) << ctz (screen->visual->blue_mask ));
608 / rxvt_rgba::MAX_CC) << ctz (screen->visual->blue_mask );
609 728
610 return true; 729 return true;
611 } 730 }
731 else if (XAllocColor (screen->dpy, screen->cmap, &c))
732 return true;
612 else 733 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))
621 {
622 p = xc.pixel;
623 return true;
624 }
625 else
626 p = (color.r + color.g + color.b) > 128*3 734 c.pixel = (color.r + color.g + color.b) > 128*3
627 ? WhitePixelOfScreen (DefaultScreenOfDisplay (screen->xdisp)) 735 ? WhitePixelOfScreen (DefaultScreenOfDisplay (screen->dpy))
628 : BlackPixelOfScreen (DefaultScreenOfDisplay (screen->xdisp)); 736 : BlackPixelOfScreen (DefaultScreenOfDisplay (screen->dpy));
629 }
630#endif 737#endif
631 738
632 return false; 739 return false;
633} 740}
634 741
635bool 742bool
636rxvt_color::set (rxvt_screen *screen, const char *name) 743rxvt_color::set (rxvt_screen *screen, const char *name)
637{ 744{
638 rxvt_rgba c; 745 rgba c;
639 char eos; 746 char eos;
640 int skip; 747 int skip;
641 748
749 c.a = rgba::MAX_CC;
750
751 // parse the nonstandard "[alphapercent]" prefix
642 if (1 <= sscanf (name, "[%hx]%n", &c.a, &skip)) 752 if (1 <= sscanf (name, "[%hd]%n", &c.a, &skip))
643 { 753 {
644 switch (skip) 754 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; 755 name += skip;
653 } 756 }
654 else
655 c.a = rxvt_rgba::MAX_CC;
656 757
657 // parse the non-standard rgba format 758 // 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)) 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))
659 { 760 {
660 XColor xc, xc_exact; 761 XColor xc;
661 762
662 if (XParseColor (screen->xdisp, screen->cmap, name, &xc)) 763 if (XParseColor (screen->dpy, screen->cmap, name, &xc))
663 { 764 {
664 c.r = xc.red; 765 c.r = xc.red;
665 c.g = xc.green; 766 c.g = xc.green;
666 c.b = xc.blue; 767 c.b = xc.blue;
667 } 768 }
677 778
678 return set (screen, c); 779 return set (screen, c);
679} 780}
680 781
681bool 782bool
682rxvt_color::set (rxvt_screen *screen, const rxvt_rgba &color) 783rxvt_color::set (rxvt_screen *screen, const rgba &color)
683{ 784{
684 bool got = alloc (screen, color); 785 bool got = alloc (screen, color);
685 786
686#if !ENABLE_MINIMAL 787#if !ENABLE_MINIMAL
687 int cmap_size = screen->visual->map_entries; 788 int cmap_size = screen->visual->map_entries;
692 { 793 {
693 XColor *colors = new XColor [screen->visual->map_entries]; 794 XColor *colors = new XColor [screen->visual->map_entries];
694 795
695 for (int i = 0; i < cmap_size; i++) 796 for (int i = 0; i < cmap_size; i++)
696 colors [i].pixel = i; 797 colors [i].pixel = i;
697 798
799 // many kilobytes transfer per colour, but pseudocolor isn't worth
800 // many extra optimisations.
698 XQueryColors (screen->xdisp, screen->cmap, colors, cmap_size); 801 XQueryColors (screen->dpy, screen->cmap, colors, cmap_size);
699 802
700 int diff = 0x7fffffffUL; 803 int diff = 0x7fffffffUL;
701 XColor *best = colors; 804 XColor *best = colors;
702 805
703 for (int i = 0; i < cmap_size; i++) 806 for (int i = 0; i < cmap_size; i++)
713 } 816 }
714 } 817 }
715 818
716 //rxvt_warn ("could not allocate %04x %04x %04x, getting %04x %04x %04x instead (%d)\n", 819 //rxvt_warn ("could not allocate %04x %04x %04x, getting %04x %04x %04x instead (%d)\n",
717 // color.r, color.g, color.b, best->red, best->green, best->blue, diff); 820 // color.r, color.g, color.b, best->red, best->green, best->blue, diff);
718 821
719 got = alloc (screen, rxvt_rgba (best->red, best->green, best->blue)); 822 got = alloc (screen, rgba (best->red, best->green, best->blue));
720 823
721 delete colors; 824 delete [] colors;
722 } 825 }
723#endif 826#endif
724 827
725 return got; 828 return got;
726} 829}
727 830
728void 831void
729rxvt_color::get (rxvt_screen *screen, rxvt_rgba &color) 832rxvt_color::get (rgba &color)
730{ 833{
731#if XFT 834#if XFT
732 color.r = c.color.red; 835 color.r = c.color.red;
733 color.g = c.color.green; 836 color.g = c.color.green;
734 color.b = c.color.blue; 837 color.b = c.color.blue;
735 color.a = c.color.alpha; 838 color.a = c.color.alpha;
736#else 839#else
737 XColor c;
738
739 c.pixel = p;
740 XQueryColor (screen->xdisp, screen->cmap, &c);
741
742 color.r = c.red; 840 color.r = c.red;
743 color.g = c.green; 841 color.g = c.green;
744 color.b = c.blue; 842 color.b = c.blue;
745 color.a = rxvt_rgba::MAX_CC; 843 color.a = rgba::MAX_CC;
746#endif 844#endif
747} 845}
748 846
749void 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
750rxvt_color::free (rxvt_screen *screen) 860rxvt_color::free (rxvt_screen *screen)
751{ 861{
862 if (screen->visual->c_class == TrueColor)
863 return; // nothing to do
864
752#if XFT 865#if XFT
753 XftColorFree (screen->xdisp, screen->visual, screen->cmap, &c); 866 XftColorFree (screen->dpy, screen->visual, screen->cmap, &c);
754#else 867#else
755 XFreeColors (screen->xdisp, screen->cmap, &p, 1, AllPlanes); 868 XFreeColors (screen->dpy, screen->cmap, &c.pixel, 1, AllPlanes);
756#endif 869#endif
757} 870}
758 871
759rxvt_color 872void
760rxvt_color::fade (rxvt_screen *screen, int percent, const rxvt_rgba &to) 873rxvt_color::fade (rxvt_screen *screen, int percent, rxvt_color &result, const rgba &to)
761{ 874{
762 rxvt_rgba c; 875 rgba c;
763 get (screen, c); 876 get (c);
764 877
765 rxvt_color faded; 878 result.set (
766 faded.set (
767 screen, 879 screen,
768 rxvt_rgba ( 880 rgba (
769 lerp (to.r, c.r, percent), 881 lerp (c.r, to.r, percent),
770 lerp (to.g, c.g, percent), 882 lerp (c.g, to.g, percent),
771 lerp (to.b, c.b, percent), 883 lerp (c.b, to.b, percent),
772 lerp (to.a, c.a, percent) 884 lerp (c.a, to.a, percent)
773 ) 885 )
774 ); 886 );
887}
775 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);
776 return faded; 896 return res;
777} 897}
778 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