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

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines