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