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

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines