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

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines