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

Diff Legend

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