ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/rxvt-unicode/src/rxvttoolkit.C
(Generate patch)

Comparing rxvt-unicode/src/rxvttoolkit.C (file contents):
Revision 1.36 by root, Mon Jan 30 17:43:20 2006 UTC vs.
Revision 1.120 by root, Mon Feb 21 07:18:19 2011 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 * Copyright (c) 2011 Emanuele Giaquinta <e.giaquinta@glauco.it>
7 * 8 *
8 * This program is free software; you can redistribute it and/or modify 9 * 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 10 * 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 11 * the Free Software Foundation; either version 2 of the License, or
11 * (at your option) any later version. 12 * (at your option) any later version.
26 27
27#include <unistd.h> 28#include <unistd.h>
28#include <fcntl.h> 29#include <fcntl.h>
29 30
30#include <sys/utsname.h> 31#include <sys/utsname.h>
31
32#ifndef NO_SLOW_LINK_SUPPORT
33# include <sys/socket.h> 32#include <sys/socket.h>
34# include <sys/un.h> 33#include <sys/un.h>
35#endif
36 34
37#if XFT 35#if XFT
38# include <X11/extensions/Xrender.h> 36# include <X11/extensions/Xrender.h>
39#endif 37#endif
40 38
41const char *const xa_names[] = 39static const char *const xa_names[] =
42{ 40{
43 "TEXT", 41 "TEXT",
44 "COMPOUND_TEXT", 42 "COMPOUND_TEXT",
45 "UTF8_STRING", 43 "UTF8_STRING",
46 "MULTIPLE", 44 "MULTIPLE",
62#if ENABLE_EWMH 60#if ENABLE_EWMH
63 "_NET_WM_PID", 61 "_NET_WM_PID",
64 "_NET_WM_NAME", 62 "_NET_WM_NAME",
65 "_NET_WM_ICON_NAME", 63 "_NET_WM_ICON_NAME",
66 "_NET_WM_PING", 64 "_NET_WM_PING",
65 "_NET_WM_ICON",
67#endif 66#endif
68#if USE_XIM 67#if USE_XIM
69 "WM_LOCALE_NAME", 68 "WM_LOCALE_NAME",
70 "XIM_SERVERS", 69 "XIM_SERVERS",
71#endif 70#endif
72#ifdef TRANSPARENT 71#ifdef ENABLE_TRANSPARENCY
73 "_XROOTPMAP_ID", 72 "_XROOTPMAP_ID",
74 "ESETROOT_PMAP_ID", 73 "ESETROOT_PMAP_ID",
75#endif 74#endif
76#if ENABLE_XEMBED 75#if ENABLE_XEMBED
77 "_XEMBED", 76 "_XEMBED",
81 "SCREEN_RESOURCES", 80 "SCREEN_RESOURCES",
82 "XDCCC_LINEAR_RGB_CORRECTION", 81 "XDCCC_LINEAR_RGB_CORRECTION",
83 "XDCCC_LINEAR_RGB_MATRICES", 82 "XDCCC_LINEAR_RGB_MATRICES",
84 "WM_COLORMAP_WINDOWS", 83 "WM_COLORMAP_WINDOWS",
85 "WM_STATE", 84 "WM_STATE",
85 "cursor",
86# if USE_XIM
87 "TRANSPORT",
88 "LOCALES",
89 "_XIM_PROTOCOL",
90 "_XIM_XCONNECT",
91 "_XIM_MOREDATA",
92# endif
86#endif 93#endif
87}; 94};
88 95
89///////////////////////////////////////////////////////////////////////////// 96/////////////////////////////////////////////////////////////////////////////
90 97
169bool 176bool
170rxvt_xim::ref_init () 177rxvt_xim::ref_init ()
171{ 178{
172 display = GET_R->display; //HACK: TODO 179 display = GET_R->display; //HACK: TODO
173 180
174 xim = XOpenIM (display->display, NULL, NULL, NULL); 181 xim = XOpenIM (display->dpy, 0, 0, 0);
175 182
176 if (!xim) 183 if (!xim)
177 return false; 184 return false;
178 185
179 XIMCallback ximcallback; 186 XIMCallback ximcallback;
180 ximcallback.client_data = (XPointer)this; 187 ximcallback.client_data = (XPointer)this;
181 ximcallback.callback = im_destroy_cb; 188 ximcallback.callback = im_destroy_cb;
182 189
183 XSetIMValues (xim, XNDestroyCallback, &ximcallback, NULL); 190 XSetIMValues (xim, XNDestroyCallback, &ximcallback, (char *)0);
184 191
185 return true; 192 return true;
186} 193}
187 194
188rxvt_xim::~rxvt_xim () 195rxvt_xim::~rxvt_xim ()
193 200
194#endif 201#endif
195 202
196///////////////////////////////////////////////////////////////////////////// 203/////////////////////////////////////////////////////////////////////////////
197 204
205#if XFT
206rxvt_drawable::~rxvt_drawable ()
207{
208 if (xftdrawable)
209 XftDrawDestroy (xftdrawable);
210}
211
212rxvt_drawable::operator XftDraw *()
213{
214 if (!xftdrawable)
215 xftdrawable = XftDrawCreate (screen->dpy, drawable, screen->visual, screen->cmap);
216
217 return xftdrawable;
218}
219#endif
220
221/////////////////////////////////////////////////////////////////////////////
222
223#if XFT
224
225// not strictly necessary as it is only used with superclass of zero_initialised
226rxvt_screen::rxvt_screen ()
227: scratch_area (0)
228{
229}
230
231rxvt_drawable &rxvt_screen::scratch_drawable (int w, int h)
232{
233 if (!scratch_area || w > scratch_w || h > scratch_h)
234 {
235 if (scratch_area)
236 {
237 XFreePixmap (dpy, scratch_area->drawable);
238 delete scratch_area;
239 }
240
241 Pixmap pm = XCreatePixmap (dpy, RootWindowOfScreen (ScreenOfDisplay (dpy, display->screen)),
242 scratch_w = w, scratch_h = h, depth);
243
244 scratch_area = new rxvt_drawable (this, pm);
245 }
246
247 return *scratch_area;
248}
249
250#endif
251
198void 252void
199rxvt_screen::set (rxvt_display *disp) 253rxvt_screen::set (rxvt_display *disp)
200{ 254{
201 display = disp; 255 display = disp;
202 xdisp = disp->display; 256 dpy = disp->dpy;
203 257
204 Screen *screen = ScreenOfDisplay (xdisp, disp->screen); 258 Screen *screen = ScreenOfDisplay (dpy, disp->screen);
205 259
206 depth = DefaultDepthOfScreen (screen); 260 depth = DefaultDepthOfScreen (screen);
207 visual = DefaultVisualOfScreen (screen); 261 visual = DefaultVisualOfScreen (screen);
208 cmap = DefaultColormapOfScreen (screen); 262 cmap = DefaultColormapOfScreen (screen);
209} 263}
210 264
211void 265void
212rxvt_screen::set (rxvt_display *disp, int bitdepth) 266rxvt_screen::select_visual (int bitdepth)
213{ 267{
214 set (disp);
215
216#if XFT 268#if XFT
217 XVisualInfo vinfo; 269 XVisualInfo vinfo;
218 270
219 if (XMatchVisualInfo (xdisp, display->screen, bitdepth, TrueColor, &vinfo)) 271 if (XMatchVisualInfo (dpy, display->screen, bitdepth, TrueColor, &vinfo))
220 { 272 {
221 depth = bitdepth; 273 depth = bitdepth;
222 visual = vinfo.visual; 274 visual = vinfo.visual;
223 cmap = XCreateColormap (xdisp, disp->root, visual, AllocNone); 275 cmap = XCreateColormap (dpy, display->root, visual, AllocNone);
224 } 276 }
225#endif 277#endif
226} 278}
227 279
228void 280void
229rxvt_screen::clear () 281rxvt_screen::clear ()
230{ 282{
283#if XFT
284 if (scratch_area)
285 {
286 XFreePixmap (dpy, scratch_area->drawable);
287 delete scratch_area;
288 }
289#endif
290
231 if (cmap != DefaultColormapOfScreen (ScreenOfDisplay (xdisp, display->screen))) 291 if (cmap != DefaultColormapOfScreen (ScreenOfDisplay (dpy, display->screen)))
232 XFreeColormap (xdisp, cmap); 292 XFreeColormap (dpy, cmap);
233} 293}
234 294
235///////////////////////////////////////////////////////////////////////////// 295/////////////////////////////////////////////////////////////////////////////
236 296
237rxvt_display::rxvt_display (const char *id) 297rxvt_display::rxvt_display (const char *id)
238: refcounted (id) 298: refcounted (id)
239, x_ev (this, &rxvt_display::x_cb)
240, selection_owner (0) 299, selection_owner (0)
300, clipboard_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 317
256 database = NULL; 318#if !XLIB_ILLEGAL_ACCESS
319 /* work around a bug in XrmSetDatabase where it frees the db, see ref_next */
320 database = XrmGetStringDatabase ("");
321#endif
257 322
258 // for ordering, see for example http://www.faqs.org/faqs/Xt-FAQ/ Subject: 20 323 // for ordering, see for example http://www.faqs.org/faqs/Xt-FAQ/ Subject: 20
324 // as opposed to "standard practise", we always read in ~/.Xdefaults
259 325
260 // 6. System wide per application default file. 326 // 6. System wide per application default file.
261 327
262 /* Add in $XAPPLRESDIR/Rxvt only; not bothering with XUSERFILESEARCHPATH */ 328 /* Add in $XAPPLRESDIR/Rxvt only; not bothering with XUSERFILESEARCHPATH */
263 if ((xe = (char *)getenv ("XAPPLRESDIR"))) 329 if ((xe = getenv ("XAPPLRESDIR")))
264 { 330 {
265 snprintf (fname, sizeof (fname), "%s/%s", xe, RESCLASS); 331 snprintf (fname, sizeof (fname), "%s/%s", xe, RESCLASS);
266 332
267 if ((rdb1 = XrmGetFileDatabase (fname))) 333 if ((rdb1 = XrmGetFileDatabase (fname)))
268 XrmMergeDatabases (rdb1, &database); 334 XrmMergeDatabases (rdb1, &database);
270 336
271 // 5. User's per application default file. 337 // 5. User's per application default file.
272 // none 338 // none
273 339
274 // 4. User's defaults file. 340 // 4. User's defaults file.
341 if (homedir)
342 {
343 snprintf (fname, sizeof (fname), "%s/.Xdefaults", homedir);
344
345 if ((rdb1 = XrmGetFileDatabase (fname)))
346 XrmMergeDatabases (rdb1, &database);
347 }
348
275 /* Get any Xserver defaults */ 349 /* Get any Xserver defaults */
350 if (refresh)
351 {
352 // fucking xlib keeps a copy of the rm string
353 Atom actual_type;
354 int actual_format;
355 unsigned long nitems, nremaining;
356 char *val = 0;
357
358#if XLIB_ILLEGAL_ACCESS
359 if (dpy->xdefaults)
360 XFree (dpy->xdefaults);
361#endif
362
363 if (XGetWindowProperty (dpy, RootWindow (dpy, 0), XA_RESOURCE_MANAGER,
364 0L, 100000000L, False,
365 XA_STRING, &actual_type, &actual_format,
366 &nitems, &nremaining,
367 (unsigned char **)&val) == Success
368 && actual_type == XA_STRING
369 && actual_format == 8)
370 displayResource = val;
371 else
372 {
373 displayResource = 0;
374
375 if (val)
376 XFree (val);
377 }
378
379#if XLIB_ILLEGAL_ACCESS
380 dpy->xdefaults = displayResource;
381#endif
382 }
383 else
276 displayResource = XResourceManagerString (display); 384 displayResource = XResourceManagerString (dpy);
277 385
278 if (displayResource != NULL) 386 if (displayResource)
279 { 387 {
280 if ((rdb1 = XrmGetStringDatabase (displayResource))) 388 if ((rdb1 = XrmGetStringDatabase (displayResource)))
281 XrmMergeDatabases (rdb1, &database); 389 XrmMergeDatabases (rdb1, &database);
282 } 390 }
283 else if (homedir)
284 {
285 snprintf (fname, sizeof (fname), "%s/.Xdefaults", homedir);
286 391
287 if ((rdb1 = XrmGetFileDatabase (fname))) 392#if !XLIB_ILLEGAL_ACCESS
288 XrmMergeDatabases (rdb1, &database); 393 if (refresh && displayResource)
289 } 394 XFree (displayResource);
395#endif
290 396
291 /* Get screen specific resources */ 397 /* Get screen specific resources */
292 displayResource = XScreenResourceString (ScreenOfDisplay (display, screen)); 398 displayResource = XScreenResourceString (ScreenOfDisplay (dpy, screen));
293 399
294 if (displayResource != NULL) 400 if (displayResource)
295 { 401 {
296 if ((rdb1 = XrmGetStringDatabase (displayResource))) 402 if ((rdb1 = XrmGetStringDatabase (displayResource)))
297 /* Merge with screen-independent resources */ 403 /* Merge with screen-independent resources */
298 XrmMergeDatabases (rdb1, &database); 404 XrmMergeDatabases (rdb1, &database);
299 405
300 XFree (displayResource); 406 XFree (displayResource);
301 } 407 }
302 408
303 // 3. User's per host defaults file 409 // 3. User's per host defaults file
304 /* Add in XENVIRONMENT file */ 410 /* Add in XENVIRONMENT file */
305 if ((xe = (char *)getenv ("XENVIRONMENT")) 411 if ((xe = getenv ("XENVIRONMENT"))
306 && (rdb1 = XrmGetFileDatabase (xe))) 412 && (rdb1 = XrmGetFileDatabase (xe)))
307 XrmMergeDatabases (rdb1, &database); 413 XrmMergeDatabases (rdb1, &database);
308 else if (homedir) 414 else if (homedir)
309 { 415 {
310 struct utsname un; 416 struct utsname un;
324bool rxvt_display::ref_init () 430bool rxvt_display::ref_init ()
325{ 431{
326#ifdef LOCAL_X_IS_UNIX 432#ifdef LOCAL_X_IS_UNIX
327 if (id[0] == ':') 433 if (id[0] == ':')
328 { 434 {
329 val = rxvt_malloc (5 + strlen (id) + 1); 435 if (!(val = rxvt_temp_buf<char> (5 + strlen (id) + 1)))
436 return false;
330 strcpy (val, "unix/"); 437 strcpy (val, "unix/");
331 strcat (val, id); 438 strcat (val, id);
332 display = XOpenDisplay (val); 439 dpy = XOpenDisplay (val);
333 free (val);
334 } 440 }
335 else 441 else
336#endif 442#endif
337 display = 0; 443 dpy = 0;
338 444
339 if (!display) 445 if (!dpy)
340 display = XOpenDisplay (id); 446 dpy = XOpenDisplay (id);
341 447
342 if (!display) 448 if (!dpy)
343 return false; 449 return false;
344 450
345 screen = DefaultScreen (display); 451 screen = DefaultScreen (dpy);
346 root = DefaultRootWindow (display); 452 root = DefaultRootWindow (dpy);
347 453
348 assert (sizeof (xa_names) / sizeof (char *) == NUM_XA); 454 assert (ARRAY_LENGTH(xa_names) == NUM_XA);
349 XInternAtoms (display, (char **)xa_names, NUM_XA, False, xa); 455 XInternAtoms (dpy, (char **)xa_names, NUM_XA, False, xa);
350 456
351 XrmSetDatabase (display, get_resources ()); 457 XrmSetDatabase (dpy, get_resources (false));
352 458
353#ifdef POINTER_BLANK 459#ifdef POINTER_BLANK
354 XColor blackcolour; 460 XColor blackcolour;
355 blackcolour.red = 0; 461 blackcolour.red = 0;
356 blackcolour.green = 0; 462 blackcolour.green = 0;
357 blackcolour.blue = 0; 463 blackcolour.blue = 0;
358 Font f = XLoadFont (display, "fixed"); 464 Font f = XLoadFont (dpy, "fixed");
359 blank_cursor = XCreateGlyphCursor (display, f, f, ' ', ' ', 465 blank_cursor = XCreateGlyphCursor (dpy, f, f, ' ', ' ',
360 &blackcolour, &blackcolour); 466 &blackcolour, &blackcolour);
361 XUnloadFont (display, f); 467 XUnloadFont (dpy, f);
362#endif 468#endif
363 469
364 int fd = XConnectionNumber (display); 470 int fd = XConnectionNumber (dpy);
365 471
366#ifndef NO_SLOW_LINK_SUPPORT
367 // try to detect wether we have a local connection. 472 // try to detect whether we have a local connection.
368 // assume unix domains socket == local, everything else not 473 // assume unix domain socket == local, everything else not
369 // TODO: might want to check for inet/127.0.0.1 474 // TODO: might want to check for inet/127.0.0.1
370 is_local = 0; 475 is_local = 0;
371 sockaddr_un sa; 476 sockaddr_un sa;
372 socklen_t sl = sizeof (sa); 477 socklen_t sl = sizeof (sa);
373 478
374 if (!getsockname (fd, (sockaddr *)&sa, &sl)) 479 if (!getsockname (fd, (sockaddr *)&sa, &sl))
375 is_local = sa.sun_family == AF_LOCAL; 480 is_local = sa.sun_family == AF_UNIX;
376#endif
377 481
482 flush_ev.start ();
378 x_ev.start (fd, EVENT_READ); 483 x_ev.start (fd, ev::READ);
379 fcntl (fd, F_SETFD, FD_CLOEXEC); 484 fcntl (fd, F_SETFD, FD_CLOEXEC);
380 485
381 XSelectInput (display, root, PropertyChangeMask); 486 XSelectInput (dpy, root, PropertyChangeMask);
382 487
383 flush (); 488 flush ();
384 489
385 return true; 490 return true;
386} 491}
387 492
388void 493void
389rxvt_display::ref_next () 494rxvt_display::ref_next ()
390{ 495{
391 // TODO: somehow check wether the database files/resources changed 496 // TODO: somehow check whether the database files/resources changed
392 // before re-loading/parsing 497 // before affording re-loading/parsing
393 XrmDestroyDatabase (XrmGetDatabase (display)); 498 XrmDestroyDatabase (XrmGetDatabase (dpy));
499#if XLIB_ILLEGAL_ACCESS
500 /* work around a bug in XrmSetDatabase where it frees the db */
501 dpy->db = 0;
502#endif
394 XrmSetDatabase (display, get_resources ()); 503 XrmSetDatabase (dpy, get_resources (true));
395} 504}
396 505
397rxvt_display::~rxvt_display () 506rxvt_display::~rxvt_display ()
398{ 507{
399 if (!display) 508 if (!dpy)
400 return; 509 return;
401 510
402#ifdef POINTER_BLANK 511#ifdef POINTER_BLANK
403 XFreeCursor (display, blank_cursor); 512 XFreeCursor (dpy, blank_cursor);
404#endif 513#endif
405 x_ev.stop (); 514 x_ev.stop ();
515 flush_ev.stop ();
406#ifdef USE_XIM 516#ifdef USE_XIM
407 xims.clear (); 517 xims.clear ();
408#endif 518#endif
519 XrmDestroyDatabase (XrmGetDatabase (dpy));
409 XCloseDisplay (display); 520 XCloseDisplay (dpy);
410} 521}
411 522
412#ifdef USE_XIM 523#ifdef USE_XIM
413void rxvt_display::im_change_cb () 524void rxvt_display::im_change_cb ()
414{ 525{
422 // registers, as xlib crashes due to a race otherwise. 533 // registers, as xlib crashes due to a race otherwise.
423 Atom actual_type, *atoms; 534 Atom actual_type, *atoms;
424 int actual_format; 535 int actual_format;
425 unsigned long nitems, bytes_after; 536 unsigned long nitems, bytes_after;
426 537
427 if (XGetWindowProperty (display, root, xa[XA_XIM_SERVERS], 0L, 1000000L, 538 if (XGetWindowProperty (dpy, root, xa[XA_XIM_SERVERS], 0L, 1000000L,
428 False, XA_ATOM, &actual_type, &actual_format, 539 False, XA_ATOM, &actual_type, &actual_format,
429 &nitems, &bytes_after, (unsigned char **)&atoms) 540 &nitems, &bytes_after, (unsigned char **)&atoms)
430 != Success ) 541 != Success)
431 return; 542 return;
432 543
433 if (actual_type == XA_ATOM && actual_format == 32) 544 if (actual_type == XA_ATOM && actual_format == 32)
434 for (int i = 0; i < nitems; i++) 545 for (int i = 0; i < nitems; i++)
435 if (XGetSelectionOwner (display, atoms[i])) 546 if (XGetSelectionOwner (dpy, atoms[i]))
436 { 547 {
437 im_change_cb (); 548 im_change_cb ();
438 break; 549 break;
439 } 550 }
440 551
441 XFree (atoms); 552 XFree (atoms);
442} 553}
443#endif 554#endif
444 555
445void rxvt_display::x_cb (io_watcher &w, short revents) 556void rxvt_display::x_cb (ev::io &w, int revents)
446{ 557{
558 flush_ev.start ();
559}
560
561void rxvt_display::flush_cb (ev::prepare &w, int revents)
562{
563 while (XEventsQueued (dpy, QueuedAfterFlush))
447 do 564 do
448 { 565 {
449 XEvent xev; 566 XEvent xev;
450 XNextEvent (display, &xev); 567 XNextEvent (dpy, &xev);
451 568
452#ifdef USE_XIM 569#ifdef USE_XIM
453 if (!XFilterEvent (&xev, None)) 570 if (!XFilterEvent (&xev, None))
454 { 571 {
455 if (xev.type == PropertyNotify 572 if (xev.type == PropertyNotify
456 && xev.xany.window == root 573 && xev.xany.window == root
457 && xev.xproperty.atom == xa[XA_XIM_SERVERS]) 574 && xev.xproperty.atom == xa[XA_XIM_SERVERS])
458 im_change_check (); 575 im_change_check ();
459#endif 576#endif
577 if (xev.type == MappingNotify)
578 XRefreshKeyboardMapping (&xev.xmapping);
579
460 for (int i = xw.size (); i--; ) 580 for (int i = xw.size (); i--; )
461 { 581 {
462 if (!xw[i]) 582 if (!xw[i])
463 xw.erase_unordered (i); 583 xw.erase_unordered (i);
464 else if (xw[i]->window == xev.xany.window) 584 else if (xw[i]->window == xev.xany.window)
465 xw[i]->call (xev); 585 xw[i]->call (xev);
466 } 586 }
467#ifdef USE_XIM 587#ifdef USE_XIM
468 } 588 }
469#endif 589#endif
470 } 590 }
471 while (XEventsQueued (display, QueuedAlready)); 591 while (XEventsQueued (dpy, QueuedAlready));
472 592
473 XFlush (display); 593 w.stop ();
474}
475
476void rxvt_display::flush ()
477{
478 if (XEventsQueued (display, QueuedAlready))
479 x_cb (x_ev, EVENT_READ);
480
481 XFlush (display);
482} 594}
483 595
484void rxvt_display::reg (xevent_watcher *w) 596void rxvt_display::reg (xevent_watcher *w)
485{ 597{
598 if (!w->active)
599 {
486 xw.push_back (w); 600 xw.push_back (w);
487 w->active = xw.size (); 601 w->active = xw.size ();
602 }
488} 603}
489 604
490void rxvt_display::unreg (xevent_watcher *w) 605void rxvt_display::unreg (xevent_watcher *w)
491{ 606{
492 if (w->active) 607 if (w->active)
608 {
493 xw[w->active - 1] = 0; 609 xw[w->active - 1] = 0;
610 w->active = 0;
611 }
494} 612}
495 613
496void rxvt_display::set_selection_owner (rxvt_term *owner) 614void rxvt_display::set_selection_owner (rxvt_term *owner, bool clipboard)
497{ 615{
616 rxvt_term * &cur_owner = !clipboard ? selection_owner : clipboard_owner;
617
498 if (selection_owner && selection_owner != owner) 618 if (cur_owner && cur_owner != owner)
499 selection_owner->selection_clear (); 619 {
620 rxvt_term *term = cur_owner;
621 term->selection_clear (clipboard);
622 term->flush ();
623 }
500 624
501 selection_owner = owner; 625 cur_owner = owner;
502} 626}
503 627
504#ifdef USE_XIM 628#ifdef USE_XIM
629
505void rxvt_display::reg (im_watcher *w) 630void rxvt_display::reg (im_watcher *w)
506{ 631{
507 imw.push_back (w); 632 imw.push_back (w);
508} 633}
509 634
518 int l, m; 643 int l, m;
519 644
520 l = strlen (locale); 645 l = strlen (locale);
521 m = strlen (modifiers); 646 m = strlen (modifiers);
522 647
523 if (!(id = (char *)malloc (l + m + 2))) 648 if (!(id = rxvt_temp_buf<char> (l + m + 2)))
524 return 0; 649 return 0;
525 650
526 memcpy (id, locale, l); id[l] = '\n'; 651 memcpy (id, locale, l); id[l] = '\n';
527 memcpy (id + l + 1, modifiers, m); id[l + m + 1] = 0; 652 memcpy (id + l + 1, modifiers, m); id[l + m + 1] = 0;
528 653
529 rxvt_xim *xim = xims.get (id); 654 rxvt_xim *xim = xims.get (id);
530 655
531 free (id);
532
533 return xim; 656 return xim;
534} 657}
535 658
536void rxvt_display::put_xim (rxvt_xim *xim) 659void rxvt_display::put_xim (rxvt_xim *xim)
537{ 660{
538#if XLIB_IS_RACEFREE 661# if XLIB_IS_RACEFREE
539 xims.put (xim); 662 xims.put (xim);
540#endif 663# endif
541} 664}
665
542#endif 666#endif
543 667
544Atom rxvt_display::atom (const char *name) 668Atom rxvt_display::atom (const char *name)
545{ 669{
546 return XInternAtom (display, name, False); 670 return XInternAtom (dpy, name, False);
547} 671}
548 672
549///////////////////////////////////////////////////////////////////////////// 673/////////////////////////////////////////////////////////////////////////////
550 674
551template class refcache<rxvt_display>; 675template class refcache<rxvt_display>;
552refcache<rxvt_display> displays; 676refcache<rxvt_display> displays;
553 677
554///////////////////////////////////////////////////////////////////////////// 678/////////////////////////////////////////////////////////////////////////////
555 679//
680
681static unsigned int
682insert_component (unsigned int value, unsigned int mask, unsigned int shift)
683{
684 return (value * (mask + 1) >> 16) << shift;
685}
686
687bool
688rxvt_color::alloc (rxvt_screen *screen, const rgba &color)
689{
690 //TODO: only supports 24 bit
691 int alpha = color.a >= 0xff00 ? 0xffff : color.a;
692
693#if XFT
694 XRenderPictFormat *format;
695
696 // FUCKING Xft gets it wrong, of course, so work around it.
697 // Transparency users should eat shit and die, and then
698 // XRenderQueryPictIndexValues themselves plenty.
699 if ((screen->visual->c_class == TrueColor)
700 && (format = XRenderFindVisualFormat (screen->dpy, screen->visual)))
701 {
702 // the fun lies in doing everything manually...
703 c.color.red = color.r;
704 c.color.green = color.g;
705 c.color.blue = color.b;
706 c.color.alpha = alpha;
707
708 c.pixel = insert_component (color.r, format->direct.redMask , format->direct.red )
709 | insert_component (color.g, format->direct.greenMask, format->direct.green)
710 | insert_component (color.b, format->direct.blueMask , format->direct.blue )
711 | insert_component (alpha , format->direct.alphaMask, format->direct.alpha);
712
713 return true;
714 }
715 else
716 {
717 XRenderColor d;
718
719 d.red = color.r;
720 d.green = color.g;
721 d.blue = color.b;
722 d.alpha = alpha;
723
724 return XftColorAllocValue (screen->dpy, screen->visual, screen->cmap, &d, &c);
725 }
726#else
727 c.red = color.r;
728 c.green = color.g;
729 c.blue = color.b;
730
731 if (screen->visual->c_class == TrueColor)
732 {
733 c.pixel = (color.r >> (16 - rxvt_popcount (screen->visual->red_mask )) << rxvt_ctz (screen->visual->red_mask ))
734 | (color.g >> (16 - rxvt_popcount (screen->visual->green_mask)) << rxvt_ctz (screen->visual->green_mask))
735 | (color.b >> (16 - rxvt_popcount (screen->visual->blue_mask )) << rxvt_ctz (screen->visual->blue_mask ));
736
737 return true;
738 }
739 else if (XAllocColor (screen->dpy, screen->cmap, &c))
740 return true;
741 else
742 c.pixel = (color.r + color.g + color.b) > 128*3
743 ? WhitePixelOfScreen (DefaultScreenOfDisplay (screen->dpy))
744 : BlackPixelOfScreen (DefaultScreenOfDisplay (screen->dpy));
745#endif
746
747 return false;
748}
749
556bool 750bool
557rxvt_color::set (rxvt_screen *screen, const char *name) 751rxvt_color::set (rxvt_screen *screen, const char *name)
558{ 752{
753 rgba c;
754 char eos;
755 int skip;
756
757 c.a = rgba::MAX_CC;
758
759 // parse the nonstandard "[alphapercent]" prefix
760 if (1 <= sscanf (name, "[%hd]%n", &c.a, &skip))
761 {
762 c.a = lerp<int, int, int> (0, rgba::MAX_CC, c.a);
763 name += skip;
764 }
765
766 // parse the non-standard "rgba:rrrr/gggg/bbbb/aaaa" format
767 if (strlen (name) != 4+5*4 || 4 != sscanf (name, "rgba:%4hx/%4hx/%4hx/%4hx%c", &c.r, &c.g, &c.b, &c.a, &eos))
768 {
769 XColor xc;
770
771 if (XParseColor (screen->dpy, screen->cmap, name, &xc))
772 {
773 c.r = xc.red;
774 c.g = xc.green;
775 c.b = xc.blue;
776 }
777 else
778 {
779 c.r = 0xffff;
780 c.g = 0x6969;
781 c.b = 0xb4b4;
782
783 rxvt_warn ("unable to parse color '%s', using pink instead.\n", name);
784 }
785 }
786
787 return set (screen, c);
788}
789
790bool
791rxvt_color::set (rxvt_screen *screen, const rgba &color)
792{
793 bool got = alloc (screen, color);
794
795#if !ENABLE_MINIMAL
796 int cmap_size = screen->visual->map_entries;
797
798 if (!got
799 && screen->visual->c_class == PseudoColor
800 && cmap_size < 4096)
801 {
802 XColor *colors = new XColor [screen->visual->map_entries];
803
804 for (int i = 0; i < cmap_size; i++)
805 colors [i].pixel = i;
806
807 // many kilobytes transfer per colour, but pseudocolor isn't worth
808 // many extra optimisations.
809 XQueryColors (screen->dpy, screen->cmap, colors, cmap_size);
810
811 int diff = 0x7fffffffUL;
812 XColor *best = colors;
813
814 for (int i = 0; i < cmap_size; i++)
815 {
816 int d = (squared_diff<int> (color.r >> 2, colors [i].red >> 2))
817 + (squared_diff<int> (color.g >> 2, colors [i].green >> 2))
818 + (squared_diff<int> (color.b >> 2, colors [i].blue >> 2));
819
820 if (d < diff)
821 {
822 diff = d;
823 best = colors + i;
824 }
825 }
826
827 //rxvt_warn ("could not allocate %04x %04x %04x, getting %04x %04x %04x instead (%d)\n",
828 // color.r, color.g, color.b, best->red, best->green, best->blue, diff);
829
830 got = alloc (screen, rgba (best->red, best->green, best->blue));
831
832 delete [] colors;
833 }
834#endif
835
836 return got;
837}
838
839void
840rxvt_color::get (rgba &color)
841{
559#if XFT 842#if XFT
560 int l = strlen (name); 843 color.r = c.color.red;
561 rxvt_rgba r; 844 color.g = c.color.green;
562 char eos; 845 color.b = c.color.blue;
563 int mult; 846 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 847#else
590 XColor xc; 848 color.r = c.red;
591 849 color.g = c.green;
592 if (XParseColor (screen->xdisp, screen->cmap, name, &xc)) 850 color.b = c.blue;
593 return set (screen, rxvt_rgba (xc.red, xc.green, xc.blue)); 851 color.a = rgba::MAX_CC;
594
595 return false;
596#endif 852#endif
597} 853}
598 854
599bool 855void
856rxvt_color::get (XColor &color)
857{
858 rgba c;
859 get (c);
860
861 color.red = c.r;
862 color.green = c.g;
863 color.blue = c.b;
864 color.pixel = (Pixel)*this;
865}
866
867void
600rxvt_color::set (rxvt_screen *screen, rxvt_rgba rgba) 868rxvt_color::free (rxvt_screen *screen)
601{ 869{
870 if (screen->visual->c_class == TrueColor)
871 return; // nothing to do
872
602#if XFT 873#if XFT
603 XRenderPictFormat *format;
604
605 // FUCKING Xft gets it wrong, of course, so work around it
606 // transparency users should eat shit and die, and then
607 // XRenderQueryPictIndexValues themselves plenty.
608 if (screen->visual->c_class == TrueColor
609 && (format = XRenderFindVisualFormat (screen->xdisp, screen->visual)))
610 {
611 // the fun lies in doing everything manually...
612 c.color.red = rgba.r;
613 c.color.green = rgba.g;
614 c.color.blue = rgba.b;
615 c.color.alpha = rgba.a;
616
617 c.pixel = ((rgba.r * format->direct.redMask / rxvt_rgba::MAX_CC) << format->direct.red )
618 | ((rgba.g * format->direct.greenMask / rxvt_rgba::MAX_CC) << format->direct.green)
619 | ((rgba.b * format->direct.blueMask / rxvt_rgba::MAX_CC) << format->direct.blue )
620 | ((rgba.a * format->direct.alphaMask / rxvt_rgba::MAX_CC) << format->direct.alpha);
621
622 return true;
623 }
624 else
625 {
626 XRenderColor d;
627
628 d.red = rgba.r;
629 d.green = rgba.g;
630 d.blue = rgba.b;
631 d.alpha = rgba.a;
632
633 return XftColorAllocValue (screen->xdisp, screen->visual, screen->cmap, &d, &c); 874 XftColorFree (screen->dpy, screen->visual, screen->cmap, &c);
634 }
635
636 return false;
637#else 875#else
638 if (screen->visual->c_class == TrueColor)
639 {
640 p = ((rgba.r * ((1 << screen->visual->bits_per_rgb) - 1)
641 / rxvt_rgba::MAX_CC) << ctz (screen->visual->red_mask ))
642 | ((rgba.g * ((1 << screen->visual->bits_per_rgb) - 1)
643 / rxvt_rgba::MAX_CC) << ctz (screen->visual->green_mask))
644 | ((rgba.b * ((1 << screen->visual->bits_per_rgb) - 1)
645 / rxvt_rgba::MAX_CC) << ctz (screen->visual->blue_mask ));
646
647 return true;
648 }
649 else
650 {
651 XColor xc;
652
653 xc.red = rgba.r;
654 xc.green = rgba.g;
655 xc.blue = rgba.b;
656 xc.flags = DoRed | DoGreen | DoBlue;
657
658 if (XAllocColor (screen->xdisp, screen->cmap, &xc))
659 {
660 p = xc.pixel;
661 return true;
662 }
663 }
664
665 return false;
666#endif
667}
668
669void
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); 876 XFreeColors (screen->dpy, screen->cmap, &c.pixel, 1, AllPlanes);
697#endif 877#endif
698} 878}
699 879
700rxvt_color 880void
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) 881rxvt_color::fade (rxvt_screen *screen, int percent, rxvt_color &result, const rgba &to)
719{ 882{
720 rxvt_rgba c, fc; 883 rgba c;
721 rxvt_color faded; 884 get (c);
722
723 get (screen, c);
724 fadeto.get (screen, fc);
725 885
726 faded.set ( 886 result.set (
727 screen, 887 screen,
728 rxvt_rgba ( 888 rgba (
729 lerp (fc.r, c.r, percent), 889 lerp (c.r, to.r, percent),
730 lerp (fc.g, c.g, percent), 890 lerp (c.g, to.g, percent),
731 lerp (fc.b, c.b, percent), 891 lerp (c.b, to.b, percent),
732 lerp (fc.a, c.a, percent) 892 lerp (c.a, to.a, percent)
733 ) 893 )
734 ); 894 );
895}
735 896
897rxvt_selection::rxvt_selection (rxvt_display *disp, int selnum, Time tm, Window win, Atom prop, rxvt_term *term, void *cb_sv)
898: display (disp), request_time (tm), request_win (win), request_prop (prop), term (term), cb_sv (cb_sv)
899{
900 assert (selnum >= Sel_Primary && selnum <= Sel_Clipboard);
901
902 timer_ev.set<rxvt_selection, &rxvt_selection::timer_cb> (this);
903 timer_ev.repeat = 10.;
904 x_ev.set<rxvt_selection, &rxvt_selection::x_cb> (this);
905
906 incr_buf = 0;
907 incr_buf_size = incr_buf_fill = 0;
908 selection_wait = Sel_normal;
909 selection_type = selnum;
910}
911
912void
913rxvt_selection::stop ()
914{
915 free (incr_buf);
916 incr_buf = 0;
917 timer_ev.stop ();
918 x_ev.stop (display);
919}
920
921rxvt_selection::~rxvt_selection ()
922{
923 stop ();
924}
925
926void
927rxvt_selection::run ()
928{
929 int selnum = selection_type;
930
931#if X_HAVE_UTF8_STRING
932 selection_type = Sel_UTF8String;
933 if (request (display->xa[XA_UTF8_STRING], selnum))
934 return;
935#else
936 selection_type = Sel_CompoundText;
937 if (request (display->xa[XA_COMPOUND_TEXT], selnum))
938 return;
939#endif
940
941 // fallback to CUT_BUFFER0 if the requested property has no owner
942 handle_selection (display->root, XA_CUT_BUFFER0, false);
943}
944
945void
946rxvt_selection::finish (char *data, unsigned int len)
947{
948 if (term)
949 {
950 if (data)
951 term->paste (data, len);
952
953 term->selection_req = 0;
954 delete this;
955 }
956#if ENABLE_PERL
957 else
958 {
959 stop ();
960 abort (); //TODO
961 }
962#endif
963}
964
965bool
966rxvt_selection::request (Atom target, int selnum)
967{
968 Atom sel;
969
970 selection_type |= selnum;
971
972 if (selnum == Sel_Primary)
973 sel = XA_PRIMARY;
974 else if (selnum == Sel_Secondary)
975 sel = XA_SECONDARY;
976 else
977 sel = display->xa[XA_CLIPBOARD];
978
979 if (XGetSelectionOwner (display->dpy, sel) != None)
980 {
981 XConvertSelection (display->dpy, sel, target, request_prop,
982 request_win, request_time);
983 x_ev.start (display, request_win);
984 timer_ev.again ();
985 return true;
986 }
987
736 return faded; 988 return false;
737} 989}
738 990
991void
992rxvt_selection::handle_selection (Window win, Atom prop, bool delete_prop)
993{
994 Display *dpy = display->dpy;
995 char *data = 0;
996 unsigned int data_len = 0;
997 unsigned long bytes_after;
998 XTextProperty ct;
999
1000 // check for failed XConvertSelection
1001 if (prop == None)
1002 {
1003 bool error = true;
1004 int selnum = selection_type & Sel_whereMask;
1005
1006 if (selection_type & Sel_CompoundText)
1007 {
1008 selection_type = 0;
1009 error = !request (XA_STRING, selnum);
1010 }
1011
1012 if (selection_type & Sel_UTF8String)
1013 {
1014 selection_type = Sel_CompoundText;
1015 error = !request (display->xa[XA_COMPOUND_TEXT], selnum);
1016 }
1017
1018 if (error)
1019 {
1020 ct.value = 0;
1021 goto bailout;
1022 }
1023
1024 return;
1025 }
1026
1027 // length == (2^31 - 1) / 4, as gdk
1028 if (XGetWindowProperty (dpy, win, prop,
1029 0, 0x1fffffff,
1030 delete_prop, AnyPropertyType,
1031 &ct.encoding, &ct.format,
1032 &ct.nitems, &bytes_after,
1033 &ct.value) != Success)
1034 {
1035 ct.value = 0;
1036 goto bailout;
1037 }
1038
1039 if (ct.encoding == None)
1040 goto bailout;
1041
1042 if (ct.value == 0)
1043 goto bailout;
1044
1045 if (ct.encoding == display->xa[XA_INCR])
1046 {
1047 // INCR selection, start handshake
1048 if (!delete_prop)
1049 XDeleteProperty (dpy, win, prop);
1050
1051 selection_wait = Sel_incr;
1052 timer_ev.again ();
1053
1054 goto bailout;
1055 }
1056
1057 if (ct.nitems == 0)
1058 {
1059 if (selection_wait == Sel_incr)
1060 {
1061 XFree (ct.value);
1062
1063 // finally complete, now paste the whole thing
1064 selection_wait = Sel_normal;
1065 ct.value = (unsigned char *)incr_buf;
1066 ct.nitems = incr_buf_fill;
1067 incr_buf = 0;
1068 timer_ev.stop ();
1069 }
1070 else
1071 {
1072 // avoid recursion
1073 if (win != display->root || prop != XA_CUT_BUFFER0)
1074 {
1075 XFree (ct.value);
1076
1077 // fallback to CUT_BUFFER0 if the requested property
1078 // has an owner but is empty
1079 handle_selection (display->root, XA_CUT_BUFFER0, False);
1080 return;
1081 }
1082
1083 goto bailout;
1084 }
1085 }
1086 else if (selection_wait == Sel_incr)
1087 {
1088 timer_ev.again ();
1089
1090 while (incr_buf_fill + ct.nitems > incr_buf_size)
1091 {
1092 incr_buf_size = incr_buf_size ? incr_buf_size * 2 : 128*1024;
1093 incr_buf = (char *)rxvt_realloc (incr_buf, incr_buf_size);
1094 }
1095
1096 memcpy (incr_buf + incr_buf_fill, ct.value, ct.nitems);
1097 incr_buf_fill += ct.nitems;
1098
1099 goto bailout;
1100 }
1101
1102 char **cl;
1103 int cr;
1104
1105 // we honour the first item only
1106
1107#if !ENABLE_MINIMAL
1108 // xlib is horribly broken with respect to UTF8_STRING, and nobody cares to fix it
1109 // so recode it manually
1110 if (ct.encoding == display->xa[XA_UTF8_STRING])
1111 {
1112 wchar_t *w = rxvt_utf8towcs ((const char *)ct.value, ct.nitems);
1113 data = rxvt_wcstombs (w);
1114 free (w);
1115 }
1116 else
1117#endif
1118 if (XmbTextPropertyToTextList (dpy, &ct, &cl, &cr) >= 0
1119 && cl)
1120 {
1121 data = strdup (cl[0]);
1122 XFreeStringList (cl);
1123 }
1124 else
1125 {
1126 // paste raw
1127 data = strdup ((const char *)ct.value);
1128 }
1129
1130 data_len = strlen (data);
1131
1132bailout:
1133 XFree (ct.value);
1134
1135 if (selection_wait == Sel_normal)
1136 {
1137 finish (data, data_len);
1138 free (data);
1139 }
1140}
1141
1142void
1143rxvt_selection::timer_cb (ev::timer &w, int revents)
1144{
1145 if (selection_wait == Sel_incr)
1146 rxvt_warn ("data loss: timeout on INCR selection paste, ignoring.\n");
1147
1148 finish ();
1149}
1150
1151void
1152rxvt_selection::x_cb (XEvent &xev)
1153{
1154 switch (xev.type)
1155 {
1156 case PropertyNotify:
1157 if (selection_wait == Sel_incr
1158 && xev.xproperty.atom == request_prop
1159 && xev.xproperty.state == PropertyNewValue)
1160 handle_selection (xev.xproperty.window, xev.xproperty.atom, true);
1161 break;
1162
1163 case SelectionNotify:
1164 if (selection_wait == Sel_normal
1165 && xev.xselection.time == request_time
1166 && xev.xselection.property == request_prop)
1167 {
1168 timer_ev.stop ();
1169 handle_selection (xev.xselection.requestor, xev.xselection.property, true);
1170 }
1171 break;
1172 }
1173}

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines