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.37 by root, Mon Jan 30 17:49:48 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",
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, (char *)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)
238: refcounted (id) 299: refcounted (id)
239, x_ev (this, &rxvt_display::x_cb)
240, selection_owner (0) 300, selection_owner (0)
241{ 301{
302 x_ev .set<rxvt_display, &rxvt_display::x_cb > (this);
303 flush_ev.set<rxvt_display, &rxvt_display::flush_cb> (this);
242} 304}
243 305
244XrmDatabase 306XrmDatabase
245rxvt_display::get_resources () 307rxvt_display::get_resources (bool refresh)
246{ 308{
247 char *homedir = (char *)getenv ("HOME"); 309 char *homedir = getenv ("HOME");
248 char fname[1024]; 310 char fname[1024];
249 311
250 /* 312 /*
251 * get resources using the X library function 313 * get resources using the X library function
252 */ 314 */
253 char *displayResource, *xe; 315 char *displayResource, *xe;
254 XrmDatabase database, rdb1; 316 XrmDatabase rdb1, database = 0;
255
256 database = NULL;
257 317
258 // 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
259 320
260 // 6. System wide per application default file. 321 // 6. System wide per application default file.
261 322
262 /* Add in $XAPPLRESDIR/Rxvt only; not bothering with XUSERFILESEARCHPATH */ 323 /* Add in $XAPPLRESDIR/Rxvt only; not bothering with XUSERFILESEARCHPATH */
263 if ((xe = (char *)getenv ("XAPPLRESDIR"))) 324 if ((xe = getenv ("XAPPLRESDIR")))
264 { 325 {
265 snprintf (fname, sizeof (fname), "%s/%s", xe, RESCLASS); 326 snprintf (fname, sizeof (fname), "%s/%s", xe, RESCLASS);
266 327
267 if ((rdb1 = XrmGetFileDatabase (fname))) 328 if ((rdb1 = XrmGetFileDatabase (fname)))
268 XrmMergeDatabases (rdb1, &database); 329 XrmMergeDatabases (rdb1, &database);
270 331
271 // 5. User's per application default file. 332 // 5. User's per application default file.
272 // none 333 // none
273 334
274 // 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
275 /* 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
276 displayResource = XResourceManagerString (display); 379 displayResource = XResourceManagerString (dpy);
277 380
278 if (displayResource != NULL) 381 if (displayResource)
279 { 382 {
280 if ((rdb1 = XrmGetStringDatabase (displayResource))) 383 if ((rdb1 = XrmGetStringDatabase (displayResource)))
281 XrmMergeDatabases (rdb1, &database); 384 XrmMergeDatabases (rdb1, &database);
282 } 385 }
283 else if (homedir)
284 {
285 snprintf (fname, sizeof (fname), "%s/.Xdefaults", homedir);
286 386
287 if ((rdb1 = XrmGetFileDatabase (fname))) 387#if !XLIB_ILLEGAL_ACCESS
288 XrmMergeDatabases (rdb1, &database); 388 if (refresh && displayResource)
289 } 389 XFree (displayResource);
390#endif
290 391
291 /* Get screen specific resources */ 392 /* Get screen specific resources */
292 displayResource = XScreenResourceString (ScreenOfDisplay (display, screen)); 393 displayResource = XScreenResourceString (ScreenOfDisplay (dpy, screen));
293 394
294 if (displayResource != NULL) 395 if (displayResource)
295 { 396 {
296 if ((rdb1 = XrmGetStringDatabase (displayResource))) 397 if ((rdb1 = XrmGetStringDatabase (displayResource)))
297 /* Merge with screen-independent resources */ 398 /* Merge with screen-independent resources */
298 XrmMergeDatabases (rdb1, &database); 399 XrmMergeDatabases (rdb1, &database);
299 400
300 XFree (displayResource); 401 XFree (displayResource);
301 } 402 }
302 403
303 // 3. User's per host defaults file 404 // 3. User's per host defaults file
304 /* Add in XENVIRONMENT file */ 405 /* Add in XENVIRONMENT file */
305 if ((xe = (char *)getenv ("XENVIRONMENT")) 406 if ((xe = getenv ("XENVIRONMENT"))
306 && (rdb1 = XrmGetFileDatabase (xe))) 407 && (rdb1 = XrmGetFileDatabase (xe)))
307 XrmMergeDatabases (rdb1, &database); 408 XrmMergeDatabases (rdb1, &database);
308 else if (homedir) 409 else if (homedir)
309 { 410 {
310 struct utsname un; 411 struct utsname un;
327 if (id[0] == ':') 428 if (id[0] == ':')
328 { 429 {
329 val = rxvt_malloc (5 + strlen (id) + 1); 430 val = rxvt_malloc (5 + strlen (id) + 1);
330 strcpy (val, "unix/"); 431 strcpy (val, "unix/");
331 strcat (val, id); 432 strcat (val, id);
332 display = XOpenDisplay (val); 433 dpy = XOpenDisplay (val);
333 free (val); 434 free (val);
334 } 435 }
335 else 436 else
336#endif 437#endif
337 display = 0; 438 dpy = 0;
338 439
339 if (!display) 440 if (!dpy)
340 display = XOpenDisplay (id); 441 dpy = XOpenDisplay (id);
341 442
342 if (!display) 443 if (!dpy)
343 return false; 444 return false;
344 445
345 screen = DefaultScreen (display); 446 screen = DefaultScreen (dpy);
346 root = DefaultRootWindow (display); 447 root = DefaultRootWindow (dpy);
347 448
348 assert (sizeof (xa_names) / sizeof (char *) == NUM_XA); 449 assert (sizeof (xa_names) / sizeof (char *) == NUM_XA);
349 XInternAtoms (display, (char **)xa_names, NUM_XA, False, xa); 450 XInternAtoms (dpy, (char **)xa_names, NUM_XA, False, xa);
350 451
351 XrmSetDatabase (display, get_resources ()); 452 XrmSetDatabase (dpy, get_resources (false));
352 453
353#ifdef POINTER_BLANK 454#ifdef POINTER_BLANK
354 XColor blackcolour; 455 XColor blackcolour;
355 blackcolour.red = 0; 456 blackcolour.red = 0;
356 blackcolour.green = 0; 457 blackcolour.green = 0;
357 blackcolour.blue = 0; 458 blackcolour.blue = 0;
358 Font f = XLoadFont (display, "fixed"); 459 Font f = XLoadFont (dpy, "fixed");
359 blank_cursor = XCreateGlyphCursor (display, f, f, ' ', ' ', 460 blank_cursor = XCreateGlyphCursor (dpy, f, f, ' ', ' ',
360 &blackcolour, &blackcolour); 461 &blackcolour, &blackcolour);
361 XUnloadFont (display, f); 462 XUnloadFont (dpy, f);
362#endif 463#endif
363 464
364 int fd = XConnectionNumber (display); 465 int fd = XConnectionNumber (dpy);
365 466
366#ifndef NO_SLOW_LINK_SUPPORT
367 // try to detect wether we have a local connection. 467 // try to detect wether we have a local connection.
368 // assume unix domains socket == local, everything else not 468 // assume unix domain socket == local, everything else not
369 // TODO: might want to check for inet/127.0.0.1 469 // TODO: might want to check for inet/127.0.0.1
370 is_local = 0; 470 is_local = 0;
371 sockaddr_un sa; 471 sockaddr_un sa;
372 socklen_t sl = sizeof (sa); 472 socklen_t sl = sizeof (sa);
373 473
374 if (!getsockname (fd, (sockaddr *)&sa, &sl)) 474 if (!getsockname (fd, (sockaddr *)&sa, &sl))
375 is_local = sa.sun_family == AF_LOCAL; 475 is_local = sa.sun_family == AF_UNIX;
376#endif
377 476
477 flush_ev.start ();
378 x_ev.start (fd, EVENT_READ); 478 x_ev.start (fd, ev::READ);
379 fcntl (fd, F_SETFD, FD_CLOEXEC); 479 fcntl (fd, F_SETFD, FD_CLOEXEC);
380 480
381 XSelectInput (display, root, PropertyChangeMask); 481 XSelectInput (dpy, root, PropertyChangeMask);
382 482
383 flush (); 483 flush ();
384 484
385 return true; 485 return true;
386} 486}
387 487
388void 488void
389rxvt_display::ref_next () 489rxvt_display::ref_next ()
390{ 490{
391 // TODO: somehow check wether the database files/resources changed 491 // TODO: somehow check wether the database files/resources changed
392 // before re-loading/parsing 492 // before affording re-loading/parsing
393 XrmDestroyDatabase (XrmGetDatabase (display)); 493 XrmDestroyDatabase (XrmGetDatabase (dpy));
394 XrmSetDatabase (display, get_resources ()); 494 XrmSetDatabase (dpy, get_resources (true));
395} 495}
396 496
397rxvt_display::~rxvt_display () 497rxvt_display::~rxvt_display ()
398{ 498{
399 if (!display) 499 if (!dpy)
400 return; 500 return;
401 501
402#ifdef POINTER_BLANK 502#ifdef POINTER_BLANK
403 XFreeCursor (display, blank_cursor); 503 XFreeCursor (dpy, blank_cursor);
404#endif 504#endif
405 x_ev.stop (); 505 x_ev.stop ();
506 flush_ev.stop ();
406#ifdef USE_XIM 507#ifdef USE_XIM
407 xims.clear (); 508 xims.clear ();
408#endif 509#endif
409 XCloseDisplay (display); 510 XCloseDisplay (dpy);
410} 511}
411 512
412#ifdef USE_XIM 513#ifdef USE_XIM
413void rxvt_display::im_change_cb () 514void rxvt_display::im_change_cb ()
414{ 515{
422 // registers, as xlib crashes due to a race otherwise. 523 // registers, as xlib crashes due to a race otherwise.
423 Atom actual_type, *atoms; 524 Atom actual_type, *atoms;
424 int actual_format; 525 int actual_format;
425 unsigned long nitems, bytes_after; 526 unsigned long nitems, bytes_after;
426 527
427 if (XGetWindowProperty (display, root, xa[XA_XIM_SERVERS], 0L, 1000000L, 528 if (XGetWindowProperty (dpy, root, xa[XA_XIM_SERVERS], 0L, 1000000L,
428 False, XA_ATOM, &actual_type, &actual_format, 529 False, XA_ATOM, &actual_type, &actual_format,
429 &nitems, &bytes_after, (unsigned char **)&atoms) 530 &nitems, &bytes_after, (unsigned char **)&atoms)
430 != Success ) 531 != Success )
431 return; 532 return;
432 533
433 if (actual_type == XA_ATOM && actual_format == 32) 534 if (actual_type == XA_ATOM && actual_format == 32)
434 for (int i = 0; i < nitems; i++) 535 for (int i = 0; i < nitems; i++)
435 if (XGetSelectionOwner (display, atoms[i])) 536 if (XGetSelectionOwner (dpy, atoms[i]))
436 { 537 {
437 im_change_cb (); 538 im_change_cb ();
438 break; 539 break;
439 } 540 }
440 541
441 XFree (atoms); 542 XFree (atoms);
442} 543}
443#endif 544#endif
444 545
445void rxvt_display::x_cb (io_watcher &w, short revents) 546void rxvt_display::x_cb (ev::io &w, int revents)
446{ 547{
447 do 548 while (XEventsQueued (dpy, QueuedAfterReading))
448 { 549 {
449 XEvent xev; 550 XEvent xev;
450 XNextEvent (display, &xev); 551 XNextEvent (dpy, &xev);
451 552
452#ifdef USE_XIM 553#ifdef USE_XIM
453 if (!XFilterEvent (&xev, None)) 554 if (!XFilterEvent (&xev, None))
454 { 555 {
455 if (xev.type == PropertyNotify 556 if (xev.type == PropertyNotify
456 && xev.xany.window == root 557 && xev.xany.window == root
457 && xev.xproperty.atom == xa[XA_XIM_SERVERS]) 558 && xev.xproperty.atom == xa[XA_XIM_SERVERS])
458 im_change_check (); 559 im_change_check ();
459#endif 560#endif
561 if (xev.type == MappingNotify)
562 XRefreshKeyboardMapping (&xev.xmapping);
563
460 for (int i = xw.size (); i--; ) 564 for (int i = xw.size (); i--; )
461 { 565 {
462 if (!xw[i]) 566 if (!xw[i])
463 xw.erase_unordered (i); 567 xw.erase_unordered (i);
464 else if (xw[i]->window == xev.xany.window) 568 else if (xw[i]->window == xev.xany.window)
466 } 570 }
467#ifdef USE_XIM 571#ifdef USE_XIM
468 } 572 }
469#endif 573#endif
470 } 574 }
471 while (XEventsQueued (display, QueuedAlready)); 575}
472 576
577void rxvt_display::flush_cb (ev::prepare &w, int revents)
578{
579 w.stop ();
473 XFlush (display); 580 XFlush (dpy);
474}
475
476void rxvt_display::flush ()
477{
478 if (XEventsQueued (display, QueuedAlready))
479 x_cb (x_ev, EVENT_READ);
480
481 XFlush (display);
482} 581}
483 582
484void rxvt_display::reg (xevent_watcher *w) 583void rxvt_display::reg (xevent_watcher *w)
485{ 584{
585 if (!w->active)
586 {
486 xw.push_back (w); 587 xw.push_back (w);
487 w->active = xw.size (); 588 w->active = xw.size ();
589 }
488} 590}
489 591
490void rxvt_display::unreg (xevent_watcher *w) 592void rxvt_display::unreg (xevent_watcher *w)
491{ 593{
492 if (w->active) 594 if (w->active)
595 {
493 xw[w->active - 1] = 0; 596 xw[w->active - 1] = 0;
597 w->active = 0;
598 }
494} 599}
495 600
496void rxvt_display::set_selection_owner (rxvt_term *owner) 601void rxvt_display::set_selection_owner (rxvt_term *owner)
497{ 602{
498 if (selection_owner && selection_owner != owner) 603 if (selection_owner && selection_owner != owner)
500 605
501 selection_owner = owner; 606 selection_owner = owner;
502} 607}
503 608
504#ifdef USE_XIM 609#ifdef USE_XIM
610
505void rxvt_display::reg (im_watcher *w) 611void rxvt_display::reg (im_watcher *w)
506{ 612{
507 imw.push_back (w); 613 imw.push_back (w);
508} 614}
509 615
533 return xim; 639 return xim;
534} 640}
535 641
536void rxvt_display::put_xim (rxvt_xim *xim) 642void rxvt_display::put_xim (rxvt_xim *xim)
537{ 643{
538#if XLIB_IS_RACEFREE 644# if XLIB_IS_RACEFREE
539 xims.put (xim); 645 xims.put (xim);
540#endif 646# endif
541} 647}
648
542#endif 649#endif
543 650
544Atom rxvt_display::atom (const char *name) 651Atom rxvt_display::atom (const char *name)
545{ 652{
546 return XInternAtom (display, name, False); 653 return XInternAtom (dpy, name, False);
547} 654}
548 655
549///////////////////////////////////////////////////////////////////////////// 656/////////////////////////////////////////////////////////////////////////////
550 657
551template class refcache<rxvt_display>; 658template class refcache<rxvt_display>;
552refcache<rxvt_display> displays; 659refcache<rxvt_display> displays;
553 660
554///////////////////////////////////////////////////////////////////////////// 661/////////////////////////////////////////////////////////////////////////////
555 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
670bool
671rxvt_color::alloc (rxvt_screen *screen, const rgba &color)
672{
673#if XFT
674 XRenderPictFormat *format;
675
676 // FUCKING Xft gets it wrong, of course, so work around it.
677 // Transparency users should eat shit and die, and then
678 // XRenderQueryPictIndexValues themselves plenty.
679 if ((screen->visual->c_class == TrueColor)
680 && (format = XRenderFindVisualFormat (screen->dpy, screen->visual)))
681 {
682 // the fun lies in doing everything manually...
683 c.color.red = color.r;
684 c.color.green = color.g;
685 c.color.blue = color.b;
686 c.color.alpha = color.a;
687
688 c.pixel = insert_component (color.r, format->direct.redMask , format->direct.red )
689 | insert_component (color.g, format->direct.greenMask, format->direct.green)
690 | insert_component (color.b, format->direct.blueMask , format->direct.blue )
691 | insert_component (color.a, format->direct.alphaMask, format->direct.alpha);
692
693 return true;
694 }
695 else
696 {
697 XRenderColor d;
698
699 d.red = color.r;
700 d.green = color.g;
701 d.blue = color.b;
702 d.alpha = color.a;
703
704 return XftColorAllocValue (screen->dpy, screen->visual, screen->cmap, &d, &c);
705 }
706#else
707 c.red = color.r;
708 c.green = color.g;
709 c.blue = color.b;
710
711 if (screen->visual->c_class == TrueColor)
712 {
713 c.pixel = (color.r >> (16 - popcount (screen->visual->red_mask )) << ctz (screen->visual->red_mask ))
714 | (color.g >> (16 - popcount (screen->visual->green_mask)) << ctz (screen->visual->green_mask))
715 | (color.b >> (16 - popcount (screen->visual->blue_mask )) << ctz (screen->visual->blue_mask ));
716
717 return true;
718 }
719 else if (XAllocColor (screen->dpy, screen->cmap, &c))
720 return true;
721 else
722 c.pixel = (color.r + color.g + color.b) > 128*3
723 ? WhitePixelOfScreen (DefaultScreenOfDisplay (screen->dpy))
724 : BlackPixelOfScreen (DefaultScreenOfDisplay (screen->dpy));
725#endif
726
727 return false;
728}
729
556bool 730bool
557rxvt_color::set (rxvt_screen *screen, const char *name) 731rxvt_color::set (rxvt_screen *screen, const char *name)
558{ 732{
733 rgba c;
734 char eos;
735 int skip;
736
737 // parse the nonstandard "[alphapercent]" prefix
738 if (1 <= sscanf (name, "[%hd]%n", &c.a, &skip))
739 {
740 c.a = lerp<int, int, int> (0, rgba::MAX_CC, c.a);
741 name += skip;
742 }
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;
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
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 || screen->visual->c_class == DirectColor)
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 if (screen->visual->c_class == TrueColor || screen->visual->c_class == DirectColor)
639 {
640 p = (rgba.r * (screen->visual->red_mask >> ctz (screen->visual->red_mask ))
641 / rxvt_rgba::MAX_CC) << ctz (screen->visual->red_mask )
642 | (rgba.g * (screen->visual->green_mask >> ctz (screen->visual->green_mask))
643 / rxvt_rgba::MAX_CC) << ctz (screen->visual->green_mask)
644 | (rgba.b * (screen->visual->blue_mask >> ctz (screen->visual->blue_mask ))
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
670rxvt_color::get (rxvt_screen *screen, rxvt_rgba &rgba)
671{
672#if XFT
673 rgba.r = c.color.red;
674 rgba.g = c.color.green;
675 rgba.b = c.color.blue;
676 rgba.a = c.color.alpha;
677#else
678 XColor c;
679
680 c.pixel = p;
681 XQueryColor (screen->xdisp, screen->cmap, &c);
682
683 rgba.r = c.red;
684 rgba.g = c.green;
685 rgba.b = c.blue;
686 rgba.a = rxvt_rgba::MAX_CC;
687#endif
688}
689
690void
691rxvt_color::free (rxvt_screen *screen)
692{
693#if XFT
694 XftColorFree (screen->xdisp, screen->visual, screen->cmap, &c);
695#else
696 XFreeColors (screen->xdisp, screen->cmap, &p, 1, AllPlanes); 868 XFreeColors (screen->dpy, screen->cmap, &c.pixel, 1, AllPlanes);
697#endif 869#endif
698} 870}
699 871
700rxvt_color 872void
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) 873rxvt_color::fade (rxvt_screen *screen, int percent, rxvt_color &result, const rgba &to)
719{ 874{
720 rxvt_rgba c, fc; 875 rgba c;
721 rxvt_color faded; 876 get (c);
722
723 get (screen, c);
724 fadeto.get (screen, fc);
725 877
726 faded.set ( 878 result.set (
727 screen, 879 screen,
728 rxvt_rgba ( 880 rgba (
729 lerp (fc.r, c.r, percent), 881 lerp (c.r, to.r, percent),
730 lerp (fc.g, c.g, percent), 882 lerp (c.g, to.g, percent),
731 lerp (fc.b, c.b, percent), 883 lerp (c.b, to.b, percent),
732 lerp (fc.a, c.a, percent) 884 lerp (c.a, to.a, percent)
733 ) 885 )
734 ); 886 );
887}
735 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);
736 return faded; 896 return res;
737} 897}
738 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