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.29 by root, Sun Jan 29 21:45:47 2006 UTC vs.
Revision 1.123 by sf-exg, Thu Mar 24 23:55:31 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-2011 Marc Lehmann <schmorp@schmorp.de>
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
35#if XFT
36# include <X11/extensions/Xrender.h>
37#endif
38
37const char *const xa_names[] = 39static const char *const xa_names[] =
38 { 40{
39 "TEXT", 41 "TEXT",
40 "COMPOUND_TEXT", 42 "COMPOUND_TEXT",
41 "UTF8_STRING", 43 "UTF8_STRING",
42 "MULTIPLE", 44 "MULTIPLE",
43 "TARGETS", 45 "TARGETS",
44 "TIMESTAMP", 46 "TIMESTAMP",
45 "VT_SELECTION", 47 "VT_SELECTION",
46 "INCR", 48 "INCR",
47 "WM_PROTOCOLS", 49 "WM_PROTOCOLS",
48 "WM_DELETE_WINDOW", 50 "WM_DELETE_WINDOW",
49 "CLIPBOARD", 51 "CLIPBOARD",
52 "AVERAGE_WIDTH",
53 "WEIGHT_NAME",
54 "SLANT",
55 "CHARSET_REGISTRY",
56 "CHARSET_ENCODING",
50#if ENABLE_FRILLS 57#if ENABLE_FRILLS
51 "_MOTIF_WM_HINTS", 58 "_MOTIF_WM_HINTS",
52#endif 59#endif
53#if ENABLE_EWMH 60#if ENABLE_EWMH
54 "_NET_WM_PID", 61 "_NET_WM_PID",
55 "_NET_WM_NAME", 62 "_NET_WM_NAME",
56 "_NET_WM_ICON_NAME", 63 "_NET_WM_ICON_NAME",
57 "_NET_WM_PING", 64 "_NET_WM_PING",
65 "_NET_WM_ICON",
58#endif 66#endif
59#if USE_XIM 67#if USE_XIM
60 "WM_LOCALE_NAME", 68 "WM_LOCALE_NAME",
61 "XIM_SERVERS", 69 "XIM_SERVERS",
62#endif 70#endif
63#ifdef TRANSPARENT 71#ifdef ENABLE_TRANSPARENCY
64 "_XROOTPMAP_ID", 72 "_XROOTPMAP_ID",
65 "ESETROOT_PMAP_ID", 73 "ESETROOT_PMAP_ID",
66#endif 74#endif
67#if ENABLE_XEMBED 75#if ENABLE_XEMBED
68 "_XEMBED", 76 "_XEMBED",
69 "_XEMBED_INFO", 77 "_XEMBED_INFO",
78#endif
79#if !ENABLE_MINIMAL
80 "SCREEN_RESOURCES",
81 "XDCCC_LINEAR_RGB_CORRECTION",
82 "XDCCC_LINEAR_RGB_MATRICES",
83 "WM_COLORMAP_WINDOWS",
84 "WM_STATE",
85 "cursor",
86# if USE_XIM
87 "TRANSPORT",
88 "LOCALES",
89 "_XIM_PROTOCOL",
90 "_XIM_XCONNECT",
91 "_XIM_MOREDATA",
70#endif 92# endif
71 }; 93#endif
94};
72 95
73///////////////////////////////////////////////////////////////////////////// 96/////////////////////////////////////////////////////////////////////////////
74 97
75refcounted::refcounted (const char *id) 98refcounted::refcounted (const char *id)
76{ 99{
… …
153bool 176bool
154rxvt_xim::ref_init () 177rxvt_xim::ref_init ()
155{ 178{
156 display = GET_R->display; //HACK: TODO 179 display = GET_R->display; //HACK: TODO
157 180
158 xim = XOpenIM (display->display, NULL, NULL, NULL); 181 xim = XOpenIM (display->dpy, 0, 0, 0);
159 182
160 if (!xim) 183 if (!xim)
161 return false; 184 return false;
162 185
163 XIMCallback ximcallback; 186 XIMCallback ximcallback;
164 ximcallback.client_data = (XPointer)this; 187 ximcallback.client_data = (XPointer)this;
165 ximcallback.callback = im_destroy_cb; 188 ximcallback.callback = im_destroy_cb;
166 189
167 XSetIMValues (xim, XNDestroyCallback, &ximcallback, NULL); 190 XSetIMValues (xim, XNDestroyCallback, &ximcallback, (char *)0);
168 191
169 return true; 192 return true;
170} 193}
171 194
172rxvt_xim::~rxvt_xim () 195rxvt_xim::~rxvt_xim ()
… …
177 200
178#endif 201#endif
179 202
180///////////////////////////////////////////////////////////////////////////// 203/////////////////////////////////////////////////////////////////////////////
181 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
182void 252void
183rxvt_screen::set (rxvt_display *disp) 253rxvt_screen::set (rxvt_display *disp)
184{ 254{
185 display = disp; 255 display = disp;
186 xdisp = disp->display; 256 dpy = disp->dpy;
187 257
188 Screen *screen = ScreenOfDisplay (xdisp, disp->screen); 258 Screen *screen = ScreenOfDisplay (dpy, disp->screen);
189 259
190 depth = DefaultDepthOfScreen (screen); 260 depth = DefaultDepthOfScreen (screen);
191 visual = DefaultVisualOfScreen (screen); 261 visual = DefaultVisualOfScreen (screen);
192 cmap = DefaultColormapOfScreen (screen); 262 cmap = DefaultColormapOfScreen (screen);
193} 263}
194 264
195void 265void
196rxvt_screen::set (rxvt_display *disp, int bitdepth) 266rxvt_screen::select_visual (int bitdepth)
197{ 267{
198 set (disp); 268#if XFT
199
200 XVisualInfo vinfo; 269 XVisualInfo vinfo;
201 270
202 if (XMatchVisualInfo (xdisp, display->screen, bitdepth, TrueColor, &vinfo)) 271 if (XMatchVisualInfo (dpy, display->screen, bitdepth, TrueColor, &vinfo))
203 { 272 {
204 depth = bitdepth; 273 depth = bitdepth;
205 visual = vinfo.visual; 274 visual = vinfo.visual;
206 cmap = XCreateColormap (xdisp, disp->root, visual, AllocNone); 275 cmap = XCreateColormap (dpy, display->root, visual, AllocNone);
207 } 276 }
277#endif
208} 278}
209 279
210void 280void
211rxvt_screen::clear () 281rxvt_screen::clear ()
212{ 282{
283#if XFT
284 if (scratch_area)
285 {
286 XFreePixmap (dpy, scratch_area->drawable);
287 delete scratch_area;
288 }
289#endif
290
213 if (cmap != DefaultColormapOfScreen (ScreenOfDisplay (xdisp, display->screen))) 291 if (cmap != DefaultColormapOfScreen (ScreenOfDisplay (dpy, display->screen)))
214 XFreeColormap (xdisp, cmap); 292 XFreeColormap (dpy, cmap);
215} 293}
216 294
217///////////////////////////////////////////////////////////////////////////// 295/////////////////////////////////////////////////////////////////////////////
218 296
219rxvt_display::rxvt_display (const char *id) 297rxvt_display::rxvt_display (const char *id)
220: refcounted (id) 298: refcounted (id)
221, x_ev (this, &rxvt_display::x_cb)
222, selection_owner (0) 299, selection_owner (0)
300, clipboard_owner (0)
223{ 301{
302 x_ev .set<rxvt_display, &rxvt_display::x_cb > (this);
303 flush_ev.set<rxvt_display, &rxvt_display::flush_cb> (this);
224} 304}
225 305
226XrmDatabase 306XrmDatabase
227rxvt_display::get_resources () 307rxvt_display::get_resources (bool refresh)
228{ 308{
229 char *homedir = (char *)getenv ("HOME"); 309 char *homedir = getenv ("HOME");
230 char fname[1024]; 310 char fname[1024];
231 311
232 /* 312 /*
233 * get resources using the X library function 313 * get resources using the X library function
234 */ 314 */
235 char *displayResource, *xe; 315 char *displayResource, *xe;
236 XrmDatabase database, rdb1; 316 XrmDatabase rdb1, database = 0;
237 317
238 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
239 322
240 // 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
241 325
242 // 6. System wide per application default file. 326 // 6. System wide per application default file.
243 327
244 /* Add in $XAPPLRESDIR/Rxvt only; not bothering with XUSERFILESEARCHPATH */ 328 /* Add in $XAPPLRESDIR/Rxvt only; not bothering with XUSERFILESEARCHPATH */
245 if ((xe = (char *)getenv ("XAPPLRESDIR"))) 329 if ((xe = getenv ("XAPPLRESDIR")))
246 { 330 {
247 snprintf (fname, sizeof (fname), "%s/%s", xe, RESCLASS); 331 snprintf (fname, sizeof (fname), "%s/%s", xe, RESCLASS);
248 332
249 if ((rdb1 = XrmGetFileDatabase (fname))) 333 if ((rdb1 = XrmGetFileDatabase (fname)))
250 XrmMergeDatabases (rdb1, &database); 334 XrmMergeDatabases (rdb1, &database);
… …
252 336
253 // 5. User's per application default file. 337 // 5. User's per application default file.
254 // none 338 // none
255 339
256 // 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
257 /* 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
258 displayResource = XResourceManagerString (display); 384 displayResource = XResourceManagerString (dpy);
259 385
260 if (displayResource != NULL) 386 if (displayResource)
261 { 387 {
262 if ((rdb1 = XrmGetStringDatabase (displayResource))) 388 if ((rdb1 = XrmGetStringDatabase (displayResource)))
263 XrmMergeDatabases (rdb1, &database); 389 XrmMergeDatabases (rdb1, &database);
264 } 390 }
265 else if (homedir)
266 {
267 snprintf (fname, sizeof (fname), "%s/.Xdefaults", homedir);
268 391
269 if ((rdb1 = XrmGetFileDatabase (fname))) 392#if !XLIB_ILLEGAL_ACCESS
270 XrmMergeDatabases (rdb1, &database); 393 if (refresh && displayResource)
271 } 394 XFree (displayResource);
395#endif
272 396
273 /* Get screen specific resources */ 397 /* Get screen specific resources */
274 displayResource = XScreenResourceString (ScreenOfDisplay (display, screen)); 398 displayResource = XScreenResourceString (ScreenOfDisplay (dpy, screen));
275 399
276 if (displayResource != NULL) 400 if (displayResource)
277 { 401 {
278 if ((rdb1 = XrmGetStringDatabase (displayResource))) 402 if ((rdb1 = XrmGetStringDatabase (displayResource)))
279 /* Merge with screen-independent resources */ 403 /* Merge with screen-independent resources */
280 XrmMergeDatabases (rdb1, &database); 404 XrmMergeDatabases (rdb1, &database);
281 405
282 XFree (displayResource); 406 XFree (displayResource);
283 } 407 }
284 408
285 // 3. User's per host defaults file 409 // 3. User's per host defaults file
286 /* Add in XENVIRONMENT file */ 410 /* Add in XENVIRONMENT file */
287 if ((xe = (char *)getenv ("XENVIRONMENT")) 411 if ((xe = getenv ("XENVIRONMENT"))
288 && (rdb1 = XrmGetFileDatabase (xe))) 412 && (rdb1 = XrmGetFileDatabase (xe)))
289 XrmMergeDatabases (rdb1, &database); 413 XrmMergeDatabases (rdb1, &database);
290 else if (homedir) 414 else if (homedir)
291 { 415 {
292 struct utsname un; 416 struct utsname un;
… …
306bool rxvt_display::ref_init () 430bool rxvt_display::ref_init ()
307{ 431{
308#ifdef LOCAL_X_IS_UNIX 432#ifdef LOCAL_X_IS_UNIX
309 if (id[0] == ':') 433 if (id[0] == ':')
310 { 434 {
311 val = rxvt_malloc (5 + strlen (id) + 1); 435 if (!(val = rxvt_temp_buf<char> (5 + strlen (id) + 1)))
436 return false;
312 strcpy (val, "unix/"); 437 strcpy (val, "unix/");
313 strcat (val, id); 438 strcat (val, id);
314 display = XOpenDisplay (val); 439 dpy = XOpenDisplay (val);
315 free (val);
316 } 440 }
317 else 441 else
318#endif 442#endif
319 display = 0; 443 dpy = 0;
320 444
321 if (!display) 445 if (!dpy)
322 display = XOpenDisplay (id); 446 dpy = XOpenDisplay (id);
323 447
324 if (!display) 448 if (!dpy)
325 return false; 449 return false;
326 450
327 screen = DefaultScreen (display); 451 screen = DefaultScreen (dpy);
328 root = DefaultRootWindow (display); 452 root = DefaultRootWindow (dpy);
329 453
330 assert (sizeof (xa_names) / sizeof (char *) == NUM_XA); 454 assert (ARRAY_LENGTH(xa_names) == NUM_XA);
331 XInternAtoms (display, (char **)xa_names, NUM_XA, False, xa); 455 XInternAtoms (dpy, (char **)xa_names, NUM_XA, False, xa);
332 456
333 XrmSetDatabase (display, get_resources ()); 457 XrmSetDatabase (dpy, get_resources (false));
334 458
335#ifdef POINTER_BLANK 459#ifdef POINTER_BLANK
336 XColor blackcolour; 460 XColor blackcolour;
337 blackcolour.red = 0; 461 blackcolour.red = 0;
338 blackcolour.green = 0; 462 blackcolour.green = 0;
339 blackcolour.blue = 0; 463 blackcolour.blue = 0;
340 Font f = XLoadFont (display, "fixed"); 464 Font f = XLoadFont (dpy, "fixed");
341 blank_cursor = XCreateGlyphCursor (display, f, f, ' ', ' ', 465 blank_cursor = XCreateGlyphCursor (dpy, f, f, ' ', ' ',
342 &blackcolour, &blackcolour); 466 &blackcolour, &blackcolour);
343 XUnloadFont (display, f); 467 XUnloadFont (dpy, f);
344#endif 468#endif
345 469
346 int fd = XConnectionNumber (display); 470 int fd = XConnectionNumber (dpy);
347 471
348#ifndef NO_SLOW_LINK_SUPPORT
349 // try to detect wether we have a local connection. 472 // try to detect whether we have a local connection.
350 // assume unix domains socket == local, everything else not 473 // assume unix domain socket == local, everything else not
351 // TODO: might want to check for inet/127.0.0.1 474 // TODO: might want to check for inet/127.0.0.1
352 is_local = 0; 475 is_local = 0;
353 sockaddr_un sa; 476 sockaddr_un sa;
354 socklen_t sl = sizeof (sa); 477 socklen_t sl = sizeof (sa);
355 478
356 if (!getsockname (fd, (sockaddr *)&sa, &sl)) 479 if (!getsockname (fd, (sockaddr *)&sa, &sl))
357 is_local = sa.sun_family == AF_LOCAL; 480 is_local = sa.sun_family == AF_UNIX;
358#endif
359 481
482 flush_ev.start ();
360 x_ev.start (fd, EVENT_READ); 483 x_ev.start (fd, ev::READ);
361 fcntl (fd, F_SETFD, FD_CLOEXEC); 484 fcntl (fd, F_SETFD, FD_CLOEXEC);
362 485
363 XSelectInput (display, root, PropertyChangeMask); 486 XSelectInput (dpy, root, PropertyChangeMask);
364 487
365 flush (); 488 flush ();
366 489
367 return true; 490 return true;
368} 491}
369 492
370void 493void
371rxvt_display::ref_next () 494rxvt_display::ref_next ()
372{ 495{
373 // TODO: somehow check wether the database files/resources changed 496 // TODO: somehow check whether the database files/resources changed
374 // before re-loading/parsing 497 // before affording re-loading/parsing
375 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
376 XrmSetDatabase (display, get_resources ()); 503 XrmSetDatabase (dpy, get_resources (true));
377} 504}
378 505
379rxvt_display::~rxvt_display () 506rxvt_display::~rxvt_display ()
380{ 507{
381 if (!display) 508 if (!dpy)
382 return; 509 return;
383 510
384#ifdef POINTER_BLANK 511#ifdef POINTER_BLANK
385 XFreeCursor (display, blank_cursor); 512 XFreeCursor (dpy, blank_cursor);
386#endif 513#endif
387 x_ev.stop (); 514 x_ev.stop ();
515 flush_ev.stop ();
388#ifdef USE_XIM 516#ifdef USE_XIM
389 xims.clear (); 517 xims.clear ();
390#endif 518#endif
519 XrmDestroyDatabase (XrmGetDatabase (dpy));
391 XCloseDisplay (display); 520 XCloseDisplay (dpy);
392} 521}
393 522
394#ifdef USE_XIM 523#ifdef USE_XIM
395void rxvt_display::im_change_cb () 524void rxvt_display::im_change_cb ()
396{ 525{
… …
404 // registers, as xlib crashes due to a race otherwise. 533 // registers, as xlib crashes due to a race otherwise.
405 Atom actual_type, *atoms; 534 Atom actual_type, *atoms;
406 int actual_format; 535 int actual_format;
407 unsigned long nitems, bytes_after; 536 unsigned long nitems, bytes_after;
408 537
409 if (XGetWindowProperty (display, root, xa[XA_XIM_SERVERS], 0L, 1000000L, 538 if (XGetWindowProperty (dpy, root, xa[XA_XIM_SERVERS], 0L, 1000000L,
410 False, XA_ATOM, &actual_type, &actual_format, 539 False, XA_ATOM, &actual_type, &actual_format,
411 &nitems, &bytes_after, (unsigned char **)&atoms) 540 &nitems, &bytes_after, (unsigned char **)&atoms)
412 != Success ) 541 != Success)
413 return; 542 return;
414 543
415 if (actual_type == XA_ATOM && actual_format == 32) 544 if (actual_type == XA_ATOM && actual_format == 32)
416 for (int i = 0; i < nitems; i++) 545 for (int i = 0; i < nitems; i++)
417 if (XGetSelectionOwner (display, atoms[i])) 546 if (XGetSelectionOwner (dpy, atoms[i]))
418 { 547 {
419 im_change_cb (); 548 im_change_cb ();
420 break; 549 break;
421 } 550 }
422 551
423 XFree (atoms); 552 XFree (atoms);
424} 553}
425#endif 554#endif
426 555
427void rxvt_display::x_cb (io_watcher &w, short revents) 556void rxvt_display::x_cb (ev::io &w, int revents)
428{ 557{
558 flush_ev.start ();
559}
560
561void rxvt_display::flush_cb (ev::prepare &w, int revents)
562{
563 while (XEventsQueued (dpy, QueuedAfterFlush))
429 do 564 do
430 { 565 {
431 XEvent xev; 566 XEvent xev;
432 XNextEvent (display, &xev); 567 XNextEvent (dpy, &xev);
433 568
434#ifdef USE_XIM 569#ifdef USE_XIM
435 if (!XFilterEvent (&xev, None)) 570 if (!XFilterEvent (&xev, None))
436 { 571 {
437 if (xev.type == PropertyNotify 572 if (xev.type == PropertyNotify
438 && xev.xany.window == root 573 && xev.xany.window == root
439 && xev.xproperty.atom == xa[XA_XIM_SERVERS]) 574 && xev.xproperty.atom == xa[XA_XIM_SERVERS])
440 im_change_check (); 575 im_change_check ();
441#endif 576#endif
577 if (xev.type == MappingNotify)
578 XRefreshKeyboardMapping (&xev.xmapping);
579
442 for (int i = xw.size (); i--; ) 580 for (int i = xw.size (); i--; )
443 { 581 {
444 if (!xw[i]) 582 if (!xw[i])
445 xw.erase_unordered (i); 583 xw.erase_unordered (i);
446 else if (xw[i]->window == xev.xany.window) 584 else if (xw[i]->window == xev.xany.window)
447 xw[i]->call (xev); 585 xw[i]->call (xev);
448 } 586 }
449#ifdef USE_XIM 587#ifdef USE_XIM
450 } 588 }
451#endif 589#endif
452 } 590 }
453 while (XEventsQueued (display, QueuedAlready)); 591 while (XEventsQueued (dpy, QueuedAlready));
454 592
455 XFlush (display); 593 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} 594}
465 595
466void rxvt_display::reg (xevent_watcher *w) 596void rxvt_display::reg (xevent_watcher *w)
467{ 597{
598 if (!w->active)
599 {
468 xw.push_back (w); 600 xw.push_back (w);
469 w->active = xw.size (); 601 w->active = xw.size ();
602 }
470} 603}
471 604
472void rxvt_display::unreg (xevent_watcher *w) 605void rxvt_display::unreg (xevent_watcher *w)
473{ 606{
474 if (w->active) 607 if (w->active)
608 {
475 xw[w->active - 1] = 0; 609 xw[w->active - 1] = 0;
610 w->active = 0;
611 }
476} 612}
477 613
478void rxvt_display::set_selection_owner (rxvt_term *owner) 614void rxvt_display::set_selection_owner (rxvt_term *owner, bool clipboard)
479{ 615{
616 rxvt_term * &cur_owner = !clipboard ? selection_owner : clipboard_owner;
617
480 if (selection_owner && selection_owner != owner) 618 if (cur_owner && cur_owner != owner)
481 selection_owner->selection_clear (); 619 {
620 rxvt_term *term = cur_owner;
621 term->selection_clear (clipboard);
622 term->flush ();
623 }
482 624
483 selection_owner = owner; 625 cur_owner = owner;
484} 626}
485 627
486#ifdef USE_XIM 628#ifdef USE_XIM
629
487void rxvt_display::reg (im_watcher *w) 630void rxvt_display::reg (im_watcher *w)
488{ 631{
489 imw.push_back (w); 632 imw.push_back (w);
490} 633}
491 634
… …
500 int l, m; 643 int l, m;
501 644
502 l = strlen (locale); 645 l = strlen (locale);
503 m = strlen (modifiers); 646 m = strlen (modifiers);
504 647
505 if (!(id = (char *)malloc (l + m + 2))) 648 if (!(id = rxvt_temp_buf<char> (l + m + 2)))
506 return 0; 649 return 0;
507 650
508 memcpy (id, locale, l); id[l] = '\n'; 651 memcpy (id, locale, l); id[l] = '\n';
509 memcpy (id + l + 1, modifiers, m); id[l + m + 1] = 0; 652 memcpy (id + l + 1, modifiers, m); id[l + m + 1] = 0;
510 653
511 rxvt_xim *xim = xims.get (id); 654 rxvt_xim *xim = xims.get (id);
512 655
513 free (id);
514
515 return xim; 656 return xim;
516} 657}
517 658
518void rxvt_display::put_xim (rxvt_xim *xim) 659void rxvt_display::put_xim (rxvt_xim *xim)
519{ 660{
520#if XLIB_IS_RACEFREE 661# if XLIB_IS_RACEFREE
521 xims.put (xim); 662 xims.put (xim);
522#endif 663# endif
523} 664}
665
524#endif 666#endif
525 667
526Atom rxvt_display::atom (const char *name) 668Atom rxvt_display::atom (const char *name)
527{ 669{
528 return XInternAtom (display, name, False); 670 return XInternAtom (dpy, name, False);
529} 671}
530 672
531///////////////////////////////////////////////////////////////////////////// 673/////////////////////////////////////////////////////////////////////////////
532 674
533template class refcache<rxvt_display>; 675template class refcache<rxvt_display>;
534refcache<rxvt_display> displays; 676refcache<rxvt_display> displays;
535 677
536///////////////////////////////////////////////////////////////////////////// 678/////////////////////////////////////////////////////////////////////////////
537 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
538bool 750bool
539rxvt_color::set (rxvt_screen *screen, const char *name) 751rxvt_color::set (rxvt_screen *screen, const char *name)
540{ 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{
541#if XFT 842#if XFT
542 int l = strlen (name); 843 color.r = c.color.red;
543 rxvt_rgba r; 844 color.g = c.color.green;
544 char eos; 845 color.b = c.color.blue;
545 int mult; 846 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 = rxvt_rgba::MAX_CC / 0x000f;
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 = rxvt_rgba::MAX_CC / 0x00ff;
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 = rxvt_rgba::MAX_CC / 0xffff;
553 else if (l == 4+5*4 && 4 == sscanf (name, "rgba:%hx/%hx/%hx/%hx%c", &r.r, &r.g, &r.b, &r.a, &eos))
554 mult = rxvt_rgba::MAX_CC / 0xffff;
555 else
556 return XftColorAllocName (screen->xdisp, screen->visual, screen->cmap, name, &c);
557
558 r.r *= mult; r.g *= mult; r.b *= mult; r.a *= mult;
559 return set (screen, r);
560#else 847#else
561 XColor xc; 848 color.r = c.red;
562 849 color.g = c.green;
563 if (XParseColor (screen->xdisp, screen->cmap, name, &xc)) 850 color.b = c.blue;
564 return set (screen, rxvt_rgba (xc.red, xc.green, xc.blue)); 851 color.a = rgba::MAX_CC;
565
566 return false;
567#endif 852#endif
568} 853}
569 854
570bool 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
571rxvt_color::set (rxvt_screen *screen, rxvt_rgba rgba) 868rxvt_color::free (rxvt_screen *screen)
572{ 869{
870 if (screen->visual->c_class == TrueColor)
871 return; // nothing to do
872
573#if XFT 873#if XFT
574 XRenderColor d;
575
576 d.red = rgba.r;
577 d.green = rgba.g;
578 d.blue = rgba.b;
579 d.alpha = rgba.a;
580
581 if (XftColorAllocValue (screen->xdisp, screen->visual, screen->cmap, &d, &c)) 874 XftColorFree (screen->dpy, screen->visual, screen->cmap, &c);
582 {
583 // FUCKING Xft gets it wrong, of course, fix it for the common case
584 // transparency users should eat shit and die, and then
585 // XRenderQueryPictIndexValues themselves plenty.
586 if (screen->depth == 32
587 && screen->visual->c_class == TrueColor
588 && screen->visual->red_mask == 0x00ff0000
589 && screen->visual->green_mask == 0x0000ff00
590 && screen->visual->blue_mask == 0x000000ff)
591 c.pixel = c.pixel & 0x00ffffffUL | ((rgba.a >> 8) << 24);
592
593 return true;
594 }
595
596 return false;
597#else 875#else
598 XColor xc;
599
600 xc.red = rgba.r;
601 xc.green = rgba.g;
602 xc.blue = rgba.b;
603 xc.flags = DoRed | DoGreen | DoBlue;
604
605 if (XAllocColor (screen->xdisp, screen->cmap, &xc))
606 {
607 p = xc.pixel;
608 return true;
609 }
610
611 return false;
612#endif
613}
614
615void
616rxvt_color::get (rxvt_screen *screen, rxvt_rgba &rgba)
617{
618#if XFT
619 rgba.r = c.color.red;
620 rgba.g = c.color.green;
621 rgba.b = c.color.blue;
622 rgba.a = c.color.alpha;
623#else
624 XColor c;
625
626 c.pixel = p;
627 XQueryColor (screen->xdisp, screen->cmap, &c);
628
629 rgba.r = c.red;
630 rgba.g = c.green;
631 rgba.b = c.blue;
632 rgba.a = rxvt_rgba::MAX_CC;
633#endif
634}
635
636void
637rxvt_color::free (rxvt_screen *screen)
638{
639#if XFT
640 XftColorFree (screen->xdisp, screen->visual, screen->cmap, &c);
641#else
642 XFreeColors (screen->xdisp, screen->cmap, &p, 1, AllPlanes); 876 XFreeColors (screen->dpy, screen->cmap, &c.pixel, 1, AllPlanes);
643#endif 877#endif
644} 878}
645 879
646rxvt_color 880void
647rxvt_color::fade (rxvt_screen *screen, int percent)
648{
649 rxvt_color faded;
650
651 rxvt_rgba c;
652 get (screen, c);
653
654 c.r = lerp (0, c.r, percent);
655 c.g = lerp (0, c.g, percent);
656 c.b = lerp (0, c.b, percent);
657
658 faded.set (screen, c);
659
660 return faded;
661}
662
663rxvt_color
664rxvt_color::fade (rxvt_screen *screen, int percent, rxvt_color &fadeto) 881rxvt_color::fade (rxvt_screen *screen, int percent, rxvt_color &result, const rgba &to)
665{ 882{
666 rxvt_rgba c, fc; 883 rgba c;
667 rxvt_color faded; 884 get (c);
668
669 get (screen, c);
670 fadeto.get (screen, fc);
671 885
672 faded.set ( 886 result.set (
673 screen, 887 screen,
674 rxvt_rgba ( 888 rgba (
675 lerp (fc.r, c.r, percent), 889 lerp (c.r, to.r, percent),
676 lerp (fc.g, c.g, percent), 890 lerp (c.g, to.g, percent),
677 lerp (fc.b, c.b, percent), 891 lerp (c.b, to.b, percent),
678 lerp (fc.a, c.a, percent) 892 lerp (c.a, to.a, percent)
679 ) 893 )
680 ); 894 );
895}
681 896
897rxvt_selection::rxvt_selection (rxvt_display *disp, int selnum, Time tm, Window win, Atom prop, rxvt_term *term)
898: display (disp), request_time (tm), request_win (win), request_prop (prop), term (term)
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 ENABLE_FRILLS
932 if (selnum == Sel_Primary && display->selection_owner)
933 {
934 /* internal selection */
935 char *str = rxvt_wcstombs (display->selection_owner->selection.text, display->selection_owner->selection.len);
936 finish (str, strlen (str));
937 free (str);
938 return;
939 }
940#endif
941
942#if X_HAVE_UTF8_STRING
943 selection_type = Sel_UTF8String;
944 if (request (display->xa[XA_UTF8_STRING], selnum))
945 return;
946#else
947 selection_type = Sel_CompoundText;
948 if (request (display->xa[XA_COMPOUND_TEXT], selnum))
949 return;
950#endif
951
952 // fallback to CUT_BUFFER0 if the requested property has no owner
953 handle_selection (display->root, XA_CUT_BUFFER0, false);
954}
955
956void
957rxvt_selection::finish (char *data, unsigned int len)
958{
959 if (term)
960 {
961 if (data)
962 term->paste (data, len);
963
964 term->selection_req = 0;
965 delete this;
966 }
967#if ENABLE_PERL
968 else
969 {
970 stop (); // we do not really trust perl callbacks
971 rxvt_perl.selection_finish (this, data, len);
972 }
973#endif
974}
975
976bool
977rxvt_selection::request (Atom target, int selnum)
978{
979 Atom sel;
980
981 selection_type |= selnum;
982
983 if (selnum == Sel_Primary)
984 sel = XA_PRIMARY;
985 else if (selnum == Sel_Secondary)
986 sel = XA_SECONDARY;
987 else
988 sel = display->xa[XA_CLIPBOARD];
989
990 if (XGetSelectionOwner (display->dpy, sel) != None)
991 {
992 XConvertSelection (display->dpy, sel, target, request_prop,
993 request_win, request_time);
994 x_ev.start (display, request_win);
995 timer_ev.again ();
996 return true;
997 }
998
682 return faded; 999 return false;
683} 1000}
684 1001
1002void
1003rxvt_selection::handle_selection (Window win, Atom prop, bool delete_prop)
1004{
1005 Display *dpy = display->dpy;
1006 char *data = 0;
1007 unsigned int data_len = 0;
1008 unsigned long bytes_after;
1009 XTextProperty ct;
1010
1011 // check for failed XConvertSelection
1012 if (prop == None)
1013 {
1014 bool error = true;
1015 int selnum = selection_type & Sel_whereMask;
1016
1017 if (selection_type & Sel_CompoundText)
1018 {
1019 selection_type = 0;
1020 error = !request (XA_STRING, selnum);
1021 }
1022
1023 if (selection_type & Sel_UTF8String)
1024 {
1025 selection_type = Sel_CompoundText;
1026 error = !request (display->xa[XA_COMPOUND_TEXT], selnum);
1027 }
1028
1029 if (error)
1030 {
1031 ct.value = 0;
1032 goto bailout;
1033 }
1034
1035 return;
1036 }
1037
1038 // length == (2^31 - 1) / 4, as gdk
1039 if (XGetWindowProperty (dpy, win, prop,
1040 0, 0x1fffffff,
1041 delete_prop, AnyPropertyType,
1042 &ct.encoding, &ct.format,
1043 &ct.nitems, &bytes_after,
1044 &ct.value) != Success)
1045 {
1046 ct.value = 0;
1047 goto bailout;
1048 }
1049
1050 if (ct.encoding == None)
1051 goto bailout;
1052
1053 if (ct.value == 0)
1054 goto bailout;
1055
1056 if (ct.encoding == display->xa[XA_INCR])
1057 {
1058 // INCR selection, start handshake
1059 if (!delete_prop)
1060 XDeleteProperty (dpy, win, prop);
1061
1062 selection_wait = Sel_incr;
1063 timer_ev.again ();
1064
1065 goto bailout;
1066 }
1067
1068 if (ct.nitems == 0)
1069 {
1070 if (selection_wait == Sel_incr)
1071 {
1072 XFree (ct.value);
1073
1074 // finally complete, now paste the whole thing
1075 selection_wait = Sel_normal;
1076 ct.value = (unsigned char *)incr_buf;
1077 ct.nitems = incr_buf_fill;
1078 incr_buf = 0;
1079 timer_ev.stop ();
1080 }
1081 else
1082 {
1083 // avoid recursion
1084 if (win != display->root || prop != XA_CUT_BUFFER0)
1085 {
1086 XFree (ct.value);
1087
1088 // fallback to CUT_BUFFER0 if the requested property
1089 // has an owner but is empty
1090 handle_selection (display->root, XA_CUT_BUFFER0, False);
1091 return;
1092 }
1093
1094 goto bailout;
1095 }
1096 }
1097 else if (selection_wait == Sel_incr)
1098 {
1099 timer_ev.again ();
1100
1101 while (incr_buf_fill + ct.nitems > incr_buf_size)
1102 {
1103 incr_buf_size = incr_buf_size ? incr_buf_size * 2 : 128*1024;
1104 incr_buf = (char *)rxvt_realloc (incr_buf, incr_buf_size);
1105 }
1106
1107 memcpy (incr_buf + incr_buf_fill, ct.value, ct.nitems);
1108 incr_buf_fill += ct.nitems;
1109
1110 goto bailout;
1111 }
1112
1113 char **cl;
1114 int cr;
1115
1116 // we honour the first item only
1117
1118#if !ENABLE_MINIMAL
1119 // xlib is horribly broken with respect to UTF8_STRING, and nobody cares to fix it
1120 // so recode it manually
1121 if (ct.encoding == display->xa[XA_UTF8_STRING])
1122 {
1123 wchar_t *w = rxvt_utf8towcs ((const char *)ct.value, ct.nitems);
1124 data = rxvt_wcstombs (w);
1125 free (w);
1126 }
1127 else
1128#endif
1129 if (XmbTextPropertyToTextList (dpy, &ct, &cl, &cr) >= 0
1130 && cl)
1131 {
1132 data = strdup (cl[0]);
1133 XFreeStringList (cl);
1134 }
1135 else
1136 {
1137 // paste raw
1138 data = strdup ((const char *)ct.value);
1139 }
1140
1141 data_len = strlen (data);
1142
1143bailout:
1144 XFree (ct.value);
1145
1146 if (selection_wait == Sel_normal)
1147 {
1148 finish (data, data_len);
1149 free (data);
1150 }
1151}
1152
1153void
1154rxvt_selection::timer_cb (ev::timer &w, int revents)
1155{
1156 if (selection_wait == Sel_incr)
1157 rxvt_warn ("data loss: timeout on INCR selection paste, ignoring.\n");
1158
1159 finish ();
1160}
1161
1162void
1163rxvt_selection::x_cb (XEvent &xev)
1164{
1165 switch (xev.type)
1166 {
1167 case PropertyNotify:
1168 if (selection_wait == Sel_incr
1169 && xev.xproperty.atom == request_prop
1170 && xev.xproperty.state == PropertyNewValue)
1171 handle_selection (xev.xproperty.window, xev.xproperty.atom, true);
1172 break;
1173
1174 case SelectionNotify:
1175 if (selection_wait == Sel_normal
1176 && xev.xselection.time == request_time
1177 && xev.xselection.property == request_prop)
1178 {
1179 timer_ev.stop ();
1180 handle_selection (xev.xselection.requestor, xev.xselection.property, true);
1181 }
1182 break;
1183 }
1184}

Diff Legend

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