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.41 by root, Tue Jan 31 16:43:55 2006 UTC vs.
Revision 1.104 by sf-exg, Sun Jan 24 21:53:13 2010 UTC

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

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines