1 |
/*----------------------------------------------------------------------* |
2 |
* File: main.C |
3 |
*----------------------------------------------------------------------* |
4 |
* |
5 |
* All portions of code are copyright by their respective author/s. |
6 |
* Copyright (c) 1992 John Bovey, University of Kent at Canterbury <jdb@ukc.ac.uk> |
7 |
* - original version |
8 |
* Copyright (c) 1994 Robert Nation <nation@rocket.sanders.lockheed.com> |
9 |
* - extensive modifications |
10 |
* Copyright (c) 1995 Garrett D'Amore <garrett@netcom.com> |
11 |
* Copyright (c) 1997 mj olesen <olesen@me.QueensU.CA> |
12 |
* - extensive modifications |
13 |
* Copyright (c) 1997,1998 Oezguer Kesim <kesim@math.fu-berlin.de> |
14 |
* Copyright (c) 1998-2001 Geoff Wing <gcw@pobox.com> |
15 |
* - extensive modifications |
16 |
* Copyright (c) 2003-2014 Marc Lehmann <schmorp@schmorp.de> |
17 |
* Copyright (c) 2015 Emanuele Giaquinta <e.giaquinta@glauco.it> |
18 |
* |
19 |
* This program is free software; you can redistribute it and/or modify |
20 |
* it under the terms of the GNU General Public License as published by |
21 |
* the Free Software Foundation; either version 3 of the License, or |
22 |
* (at your option) any later version. |
23 |
* |
24 |
* This program is distributed in the hope that it will be useful, |
25 |
* but WITHOUT ANY WARRANTY; without even the implied warranty of |
26 |
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
27 |
* GNU General Public License for more details. |
28 |
* |
29 |
* You should have received a copy of the GNU General Public License |
30 |
* along with this program; if not, write to the Free Software |
31 |
* Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. |
32 |
*---------------------------------------------------------------------*/ |
33 |
|
34 |
#include "../config.h" /* NECESSARY */ |
35 |
#include "rxvt.h" /* NECESSARY */ |
36 |
#include "init.h" |
37 |
#include "keyboard.h" |
38 |
#include "rxvtperl.h" |
39 |
|
40 |
#include <limits> |
41 |
|
42 |
#include <assert.h> |
43 |
#include <signal.h> |
44 |
#include <string.h> |
45 |
|
46 |
#include <termios.h> |
47 |
|
48 |
#ifdef HAVE_XSETLOCALE |
49 |
# define X_LOCALE |
50 |
# include <X11/Xlocale.h> |
51 |
#else |
52 |
# include <locale.h> |
53 |
#endif |
54 |
|
55 |
struct termios rxvt_term::def_tio; |
56 |
vector<rxvt_term *> rxvt_term::termlist; |
57 |
|
58 |
// used to tell global functions which terminal instance is "active" |
59 |
rxvt_t rxvt_current_term; |
60 |
|
61 |
static char curlocale[128], savelocale[128]; |
62 |
|
63 |
bool |
64 |
rxvt_set_locale (const char *locale) noexcept |
65 |
{ |
66 |
int size = strlen (locale) + 1; |
67 |
|
68 |
if (size > sizeof (curlocale)) |
69 |
rxvt_fatal ("locale string too long, aborting.\n"); |
70 |
|
71 |
if (!locale || !memcmp (locale, curlocale, size)) |
72 |
return false; |
73 |
|
74 |
memcpy (curlocale, locale, size); |
75 |
setlocale (LC_CTYPE, curlocale); |
76 |
return true; |
77 |
} |
78 |
|
79 |
void |
80 |
rxvt_push_locale (const char *locale) noexcept |
81 |
{ |
82 |
strcpy (savelocale, curlocale); |
83 |
rxvt_set_locale (locale); |
84 |
} |
85 |
|
86 |
void |
87 |
rxvt_pop_locale () noexcept |
88 |
{ |
89 |
rxvt_set_locale (savelocale); |
90 |
} |
91 |
|
92 |
#if ENABLE_COMBINING |
93 |
class rxvt_composite_vec rxvt_composite; |
94 |
|
95 |
text_t rxvt_composite_vec::compose (unicode_t c1, unicode_t c2) |
96 |
{ |
97 |
compose_char *cc; |
98 |
|
99 |
// break compose chains, as stupid readline really likes to duplicate |
100 |
// composing characters for some reason, near the end of a line. |
101 |
cc = (*this)[c1]; |
102 |
while (cc) |
103 |
{ |
104 |
if (cc->c2 == c2) return c1; |
105 |
cc = (*this)[cc->c1]; |
106 |
} |
107 |
|
108 |
// check to see whether this combination already exists otherwise |
109 |
for (cc = v.begin (); cc < v.end (); cc++) |
110 |
if (cc->c1 == c1 && cc->c2 == c2) |
111 |
return COMPOSE_LO + (cc - v.begin ()); |
112 |
|
113 |
// allocate a new combination |
114 |
if (v.size () == COMPOSE_HI - COMPOSE_LO + 1) |
115 |
{ |
116 |
static int seen; |
117 |
|
118 |
if (!seen++) |
119 |
rxvt_warn ("too many unrepresentable composite characters, try --enable-unicode3\n"); |
120 |
|
121 |
return REPLACEMENT_CHAR; |
122 |
} |
123 |
|
124 |
v.push_back (compose_char (c1, c2)); |
125 |
|
126 |
return v.size () - 1 + COMPOSE_LO; |
127 |
} |
128 |
|
129 |
int rxvt_composite_vec::expand (unicode_t c, wchar_t *r) |
130 |
{ |
131 |
compose_char *cc = (*this)[c]; |
132 |
|
133 |
if (!cc) |
134 |
{ |
135 |
if (r) *r = c; |
136 |
return 1; |
137 |
} |
138 |
|
139 |
int len = expand (cc->c1, r); |
140 |
|
141 |
if (r) r += len; |
142 |
|
143 |
if (cc->c2 != NOCHAR) |
144 |
{ |
145 |
len++; |
146 |
if (r) *r++ = cc->c2; |
147 |
} |
148 |
|
149 |
return len; |
150 |
|
151 |
} |
152 |
#endif |
153 |
|
154 |
rxvt_term::rxvt_term () |
155 |
{ |
156 |
#ifdef CURSOR_BLINK |
157 |
cursor_blink_ev.set <rxvt_term, &rxvt_term::cursor_blink_cb> (this); cursor_blink_ev.set (0., CURSOR_BLINK_INTERVAL); |
158 |
#endif |
159 |
#ifdef TEXT_BLINK |
160 |
text_blink_ev.set <rxvt_term, &rxvt_term::text_blink_cb> (this); text_blink_ev.set (0., TEXT_BLINK_INTERVAL); |
161 |
#endif |
162 |
#ifndef NO_SCROLLBAR_BUTTON_CONTINUAL_SCROLLING |
163 |
cont_scroll_ev.set <rxvt_term, &rxvt_term::cont_scroll_cb> (this); |
164 |
#endif |
165 |
#ifdef SELECTION_SCROLLING |
166 |
sel_scroll_ev.set <rxvt_term, &rxvt_term::sel_scroll_cb> (this); |
167 |
#endif |
168 |
#if defined(MOUSE_WHEEL) && defined(MOUSE_SLIP_WHEELING) |
169 |
slip_wheel_ev.set <rxvt_term, &rxvt_term::slip_wheel_cb> (this); |
170 |
#endif |
171 |
#if ENABLE_PERL |
172 |
rootwin_ev.set <rxvt_term, &rxvt_term::rootwin_cb> (this), |
173 |
#endif |
174 |
scrollbar_ev.set <rxvt_term, &rxvt_term::x_cb> (this), |
175 |
#if USE_XIM |
176 |
im_ev.set <rxvt_term, &rxvt_term::im_cb> (this), |
177 |
#endif |
178 |
#ifdef POINTER_BLANK |
179 |
pointer_ev.set <rxvt_term, &rxvt_term::pointer_cb> (this); |
180 |
#endif |
181 |
#ifndef NO_BELL |
182 |
bell_ev.set <rxvt_term, &rxvt_term::bell_cb> (this); |
183 |
#endif |
184 |
child_ev.set <rxvt_term, &rxvt_term::child_cb> (this); |
185 |
flush_ev.set <rxvt_term, &rxvt_term::flush_cb> (this); |
186 |
destroy_ev.set <rxvt_term, &rxvt_term::destroy_cb> (this); |
187 |
pty_ev.set <rxvt_term, &rxvt_term::pty_cb> (this); |
188 |
termwin_ev.set <rxvt_term, &rxvt_term::x_cb> (this); |
189 |
vt_ev.set <rxvt_term, &rxvt_term::x_cb> (this); |
190 |
|
191 |
cmdbuf_ptr = cmdbuf_endp = cmdbuf_base; |
192 |
|
193 |
termlist.push_back (this); |
194 |
|
195 |
#ifdef KEYSYM_RESOURCE |
196 |
keyboard = new keyboard_manager; |
197 |
#endif |
198 |
} |
199 |
|
200 |
// clean up the most important stuff, do *not* call x or free mem etc. |
201 |
// for use before an emergency exit |
202 |
void |
203 |
rxvt_term::emergency_cleanup () |
204 |
{ |
205 |
if (cmd_pid) |
206 |
kill (-cmd_pid, SIGHUP); |
207 |
|
208 |
pty_ev.stop (); |
209 |
delete pty; pty = 0; |
210 |
} |
211 |
|
212 |
rxvt_term::~rxvt_term () |
213 |
{ |
214 |
termlist.erase (find (termlist.begin (), termlist.end(), this)); |
215 |
|
216 |
emergency_cleanup (); |
217 |
|
218 |
#if ENABLE_STYLES |
219 |
for (int i = RS_styleCount; --i; ) |
220 |
if (fontset[i] != fontset[0]) |
221 |
delete fontset[i]; |
222 |
#endif |
223 |
delete fontset[0]; |
224 |
|
225 |
#if HAVE_IMG |
226 |
delete bg_img; |
227 |
#endif |
228 |
|
229 |
if (display) |
230 |
{ |
231 |
selection_clear (); |
232 |
selection_clear (true); |
233 |
|
234 |
#if USE_XIM |
235 |
im_destroy (); |
236 |
#endif |
237 |
scrollBar.destroy (); |
238 |
|
239 |
if (gc) |
240 |
XFreeGC (dpy, gc); |
241 |
|
242 |
delete drawable; |
243 |
|
244 |
// destroy all windows |
245 |
if (parent) |
246 |
XDestroyWindow (dpy, parent); |
247 |
|
248 |
for (int i = 0; i < TOTAL_COLORS; i++) |
249 |
if (ISSET_PIXCOLOR (i)) |
250 |
{ |
251 |
pix_colors_focused [i].free (this); |
252 |
#if OFF_FOCUS_FADING |
253 |
if (rs[Rs_fade]) |
254 |
pix_colors_unfocused [i].free (this); |
255 |
#endif |
256 |
} |
257 |
|
258 |
clear (); |
259 |
|
260 |
display->flush (); /* ideally .put should do this */ |
261 |
displays.put (display); |
262 |
} |
263 |
|
264 |
scr_release (); |
265 |
|
266 |
/* clear all resources */ |
267 |
for (int i = 0; i < allocated.size (); i++) |
268 |
free (allocated [i]); |
269 |
|
270 |
free (selection.text); |
271 |
free (selection.clip_text); |
272 |
free (locale); |
273 |
free (v_buffer); |
274 |
|
275 |
delete selection_req; |
276 |
|
277 |
if (env && memcmp (env, envv->begin (), envv->size () * sizeof (char *))) |
278 |
rxvt_warn ("env has been modified, probably as a result of a lib calling setenv.\n"); |
279 |
|
280 |
delete [] env; |
281 |
|
282 |
delete envv; |
283 |
delete argv; |
284 |
|
285 |
#ifdef KEYSYM_RESOURCE |
286 |
delete keyboard; |
287 |
#endif |
288 |
#ifndef NO_RESOURCES |
289 |
XrmDestroyDatabase (option_db); |
290 |
#endif |
291 |
|
292 |
SET_R ((rxvt_term *)0); |
293 |
} |
294 |
|
295 |
// child has exited, usually destroys |
296 |
void |
297 |
rxvt_term::child_cb (ev::child &w, int status) |
298 |
{ |
299 |
HOOK_INVOKE ((this, HOOK_CHILD_EXIT, DT_INT, status, DT_END)); |
300 |
|
301 |
cmd_pid = 0; |
302 |
|
303 |
if (!option (Opt_hold)) |
304 |
destroy (); |
305 |
} |
306 |
|
307 |
void |
308 |
rxvt_term::destroy () |
309 |
{ |
310 |
if (destroy_ev.is_active ()) |
311 |
return; |
312 |
|
313 |
HOOK_INVOKE ((this, HOOK_DESTROY, DT_END)); |
314 |
|
315 |
#if ENABLE_OVERLAY |
316 |
scr_overlay_off (); |
317 |
#endif |
318 |
|
319 |
if (display) |
320 |
{ |
321 |
#if USE_XIM |
322 |
im_ev.stop (display); |
323 |
#endif |
324 |
scrollbar_ev.stop (display); |
325 |
#if ENABLE_PERL |
326 |
rootwin_ev.stop (display); |
327 |
#endif |
328 |
termwin_ev.stop (display); |
329 |
vt_ev.stop (display); |
330 |
} |
331 |
|
332 |
flush_ev.stop (); |
333 |
pty_ev.stop (); |
334 |
#ifdef CURSOR_BLINK |
335 |
cursor_blink_ev.stop (); |
336 |
#endif |
337 |
#ifdef TEXT_BLINK |
338 |
text_blink_ev.stop (); |
339 |
#endif |
340 |
#ifndef NO_SCROLLBAR_BUTTON_CONTINUAL_SCROLLING |
341 |
cont_scroll_ev.stop (); |
342 |
#endif |
343 |
#ifdef SELECTION_SCROLLING |
344 |
sel_scroll_ev.stop (); |
345 |
#endif |
346 |
#ifdef POINTER_BLANK |
347 |
pointer_ev.stop (); |
348 |
#endif |
349 |
|
350 |
destroy_ev.start (); |
351 |
} |
352 |
|
353 |
void |
354 |
rxvt_term::destroy_cb (ev::idle &w, int revents) |
355 |
{ |
356 |
make_current (); |
357 |
|
358 |
delete this; |
359 |
} |
360 |
|
361 |
void |
362 |
rxvt_term::set_option (uint8_t opt, bool set) noexcept |
363 |
{ |
364 |
if (!opt) |
365 |
return; |
366 |
|
367 |
uint8_t mask = 1 << (opt & 7); |
368 |
uint8_t &val = options [opt >> 3]; |
369 |
|
370 |
val = val & ~mask | (set ? mask : 0); |
371 |
} |
372 |
|
373 |
/*----------------------------------------------------------------------*/ |
374 |
/* |
375 |
* Exit gracefully, clearing the utmp entry and restoring tty attributes |
376 |
*/ |
377 |
static XErrorHandler old_xerror_handler; |
378 |
|
379 |
static void |
380 |
rxvt_emergency_cleanup () |
381 |
{ |
382 |
for (rxvt_term **t = rxvt_term::termlist.begin (); t < rxvt_term::termlist.end (); t++) |
383 |
(*t)->emergency_cleanup (); |
384 |
} |
385 |
|
386 |
#if !ENABLE_MINIMAL |
387 |
static void ecb_cold |
388 |
print_x_error (Display *dpy, XErrorEvent *event) |
389 |
{ |
390 |
char buffer[BUFSIZ]; |
391 |
char mesg[BUFSIZ]; |
392 |
char number[32]; |
393 |
|
394 |
rxvt_warn ("An X Error occurred, trying to continue after report.\n"); |
395 |
|
396 |
XGetErrorDatabaseText (dpy, "XlibMessage", "ErrorSerial", "Error Serial #%d", mesg, BUFSIZ); |
397 |
snprintf (buffer, BUFSIZ, "+ %s\n", mesg); rxvt_warn (buffer, event->serial); |
398 |
|
399 |
XGetErrorText (dpy, event->error_code, buffer, BUFSIZ); |
400 |
XGetErrorDatabaseText (dpy, "XlibMessage", "XError", "X Error", mesg, BUFSIZ); |
401 |
rxvt_warn ("+ %s: %s\n", mesg, buffer); |
402 |
|
403 |
XGetErrorDatabaseText (dpy, "XlibMessage", "MajorCode", "Request Major code %d", mesg, BUFSIZ); |
404 |
snprintf (buffer, BUFSIZ, "+ %s\n", mesg); rxvt_warn (buffer, event->request_code); |
405 |
|
406 |
if (event->request_code >= 128) |
407 |
{ |
408 |
#if 0 |
409 |
/* XListExtensions and probably query extensions hangs when there are multiple queues errors */ |
410 |
int nexts; |
411 |
char **exts = XListExtensions (dpy, &nexts); |
412 |
|
413 |
while (nexts) |
414 |
{ |
415 |
char *extname = exts [nexts - 1]; |
416 |
int major, first_event, first_error; |
417 |
|
418 |
if (XQueryExtension (dpy, extname, &major, &first_event, &first_error) && major == event->request_code) |
419 |
{ |
420 |
XGetErrorDatabaseText (dpy, "XlibMessage", "MinorCode", "Request Minor code %d", mesg, BUFSIZ); |
421 |
rxvt_warn ("+ (which is extension %s minor code %d)\n", extname, event->minor_code); |
422 |
|
423 |
snprintf (buffer, BUFSIZ, "%s.%d", extname, event->minor_code); |
424 |
XGetErrorDatabaseText (dpy, "XRequest", buffer, "an unregistered minor code", buffer, BUFSIZ); |
425 |
rxvt_warn ("+ (which is %s)\n", buffer); |
426 |
|
427 |
break; |
428 |
} |
429 |
|
430 |
printf ("nextss %d %s\n", nexts, extname);//D |
431 |
--nexts; |
432 |
++exts; |
433 |
} |
434 |
#else |
435 |
int nexts = 0; |
436 |
char **exts = 0; |
437 |
#endif |
438 |
|
439 |
if (!nexts) |
440 |
{ |
441 |
rxvt_warn ("+ (which is an unknown extension)\n", buffer); |
442 |
|
443 |
XGetErrorDatabaseText (dpy, "XlibMessage", "MinorCode", "Request Minor code %d", mesg, BUFSIZ); |
444 |
snprintf (buffer, BUFSIZ, "+ %s\n", mesg); rxvt_warn (buffer, event->minor_code); |
445 |
|
446 |
#if 0 |
447 |
sprintf (number, "RENDER.%d", event->minor_code); |
448 |
XGetErrorDatabaseText (dpy, "XRequest", number, "", buffer, BUFSIZ); |
449 |
rxvt_warn ("+ (which is %s)\n", buffer); |
450 |
#endif |
451 |
} |
452 |
|
453 |
XFreeExtensionList (exts); |
454 |
} |
455 |
else |
456 |
{ |
457 |
sprintf (number, "%d", event->request_code); |
458 |
XGetErrorDatabaseText (dpy, "XRequest", number, "", buffer, BUFSIZ); |
459 |
rxvt_warn ("+ (which is %s)\n", buffer); |
460 |
} |
461 |
|
462 |
if (event->error_code == BadWindow |
463 |
|| event->error_code == BadPixmap |
464 |
|| event->error_code == BadCursor |
465 |
|| event->error_code == BadFont |
466 |
|| event->error_code == BadDrawable |
467 |
|| event->error_code == BadColor |
468 |
|| event->error_code == BadGC |
469 |
|| event->error_code == BadIDChoice |
470 |
|| event->error_code == BadValue |
471 |
|| event->error_code == BadAtom) |
472 |
{ |
473 |
if (event->error_code == BadValue) |
474 |
XGetErrorDatabaseText (dpy, "XlibMessage", "Value", "Value 0x%x", mesg, BUFSIZ); |
475 |
else if (event->error_code == BadAtom) |
476 |
XGetErrorDatabaseText (dpy, "XlibMessage", "AtomID", "AtomID 0x%x", mesg, BUFSIZ); |
477 |
else |
478 |
XGetErrorDatabaseText (dpy, "XlibMessage", "ResourceID", "ResourceID 0x%x", mesg, BUFSIZ); |
479 |
|
480 |
snprintf (buffer, BUFSIZ, "+ %s\n", mesg); rxvt_warn (buffer, event->resourceid); |
481 |
} |
482 |
} |
483 |
#endif |
484 |
|
485 |
int ecb_cold |
486 |
rxvt_xerror_handler (Display *display, XErrorEvent *event) |
487 |
{ |
488 |
if (GET_R && GET_R->allowedxerror == -1) |
489 |
GET_R->allowedxerror = event->error_code; |
490 |
else |
491 |
{ |
492 |
// GET_R is most likely not the terminal which caused the error, |
493 |
// so just output the error and continue |
494 |
#if ENABLE_MINIMAL |
495 |
old_xerror_handler (display, event); |
496 |
#else |
497 |
print_x_error (display, event); |
498 |
#endif |
499 |
} |
500 |
|
501 |
return 0; |
502 |
} |
503 |
|
504 |
int ecb_cold |
505 |
rxvt_xioerror_handler (Display *display) |
506 |
{ |
507 |
rxvt_warn ("X connection to '%s' broken, unable to recover, exiting.\n", |
508 |
DisplayString (display)); |
509 |
rxvt_emergency_cleanup (); |
510 |
_exit (EXIT_FAILURE); |
511 |
} |
512 |
|
513 |
static struct sig_handlers |
514 |
{ |
515 |
ev::sig sw_term, sw_int; |
516 |
|
517 |
/* |
518 |
* Catch a fatal signal and tidy up before quitting |
519 |
*/ |
520 |
void sig_term (ev::sig &w, int revents); |
521 |
|
522 |
sig_handlers () |
523 |
{ |
524 |
sw_term.set<sig_handlers, &sig_handlers::sig_term> (this); |
525 |
sw_int .set<sig_handlers, &sig_handlers::sig_term> (this); |
526 |
} |
527 |
} sig_handlers; |
528 |
|
529 |
void |
530 |
sig_handlers::sig_term (ev::sig &w, int revents) |
531 |
{ |
532 |
rxvt_emergency_cleanup (); |
533 |
w.stop (); |
534 |
kill (getpid (), w.signum); |
535 |
} |
536 |
|
537 |
static void |
538 |
rxvt_get_ttymode (struct termios *tio) |
539 |
{ |
540 |
if (tcgetattr (STDIN_FILENO, tio) < 0) |
541 |
memset (tio, 0, sizeof (struct termios)); |
542 |
|
543 |
for (int i = 0; i < NCCS; i++) |
544 |
tio->c_cc[i] = VDISABLE; |
545 |
|
546 |
tio->c_cc[VINTR] = CINTR; |
547 |
tio->c_cc[VQUIT] = CQUIT; |
548 |
tio->c_cc[VERASE] = CERASE; |
549 |
#ifdef VERASE2 |
550 |
tio->c_cc[VERASE2] = CERASE2; |
551 |
#endif |
552 |
tio->c_cc[VKILL] = CKILL; |
553 |
tio->c_cc[VEOF] = CEOF; |
554 |
tio->c_cc[VSTART] = CSTART; |
555 |
tio->c_cc[VSTOP] = CSTOP; |
556 |
tio->c_cc[VSUSP] = CSUSP; |
557 |
# ifdef VDSUSP |
558 |
tio->c_cc[VDSUSP] = CDSUSP; |
559 |
# endif |
560 |
# ifdef VREPRINT |
561 |
tio->c_cc[VREPRINT] = CRPRNT; |
562 |
# endif |
563 |
# ifdef VDISCRD |
564 |
tio->c_cc[VDISCRD] = CFLUSH; |
565 |
# endif |
566 |
# ifdef VWERSE |
567 |
tio->c_cc[VWERSE] = CWERASE; |
568 |
# endif |
569 |
# ifdef VLNEXT |
570 |
tio->c_cc[VLNEXT] = CLNEXT; |
571 |
# endif |
572 |
# ifdef VSTATUS |
573 |
tio->c_cc[VSTATUS] = CSTATUS; |
574 |
# endif |
575 |
|
576 |
# if VMIN != VEOF |
577 |
tio->c_cc[VMIN] = 1; |
578 |
# endif |
579 |
# if VTIME != VEOL |
580 |
tio->c_cc[VTIME] = 0; |
581 |
# endif |
582 |
|
583 |
/* input modes */ |
584 |
tio->c_iflag = (BRKINT | IGNPAR | ICRNL |
585 |
# ifdef IMAXBEL |
586 |
| IMAXBEL |
587 |
# endif |
588 |
| IXON); |
589 |
|
590 |
/* output modes */ |
591 |
tio->c_oflag = (OPOST | ONLCR); |
592 |
|
593 |
/* control modes */ |
594 |
tio->c_cflag = (CS8 | CREAD); |
595 |
|
596 |
/* local modes */ |
597 |
tio->c_lflag = (ISIG | ICANON | IEXTEN | ECHO |
598 |
# if defined (ECHOCTL) && defined (ECHOKE) |
599 |
| ECHOCTL | ECHOKE |
600 |
# endif |
601 |
| ECHOE | ECHOK); |
602 |
} |
603 |
|
604 |
char **rxvt_environ; // startup environment |
605 |
|
606 |
void |
607 |
rxvt_init () |
608 |
{ |
609 |
assert (("fontMask must not overlap other RS masks", |
610 |
0 == (RS_fontMask & (RS_Sel | RS_baseattrMask | RS_customMask | RS_bgMask | RS_fgMask)))); |
611 |
|
612 |
rxvt_get_ttymode (&rxvt_term::def_tio); |
613 |
|
614 |
// get rid of stdin/stdout as we don't need them, to free resources |
615 |
dup2 (STDERR_FILENO, STDIN_FILENO); |
616 |
dup2 (STDERR_FILENO, STDOUT_FILENO); |
617 |
|
618 |
if (!ev_default_loop ()) |
619 |
rxvt_fatal ("cannot initialise libev (bad value for LIBEV_METHODS?)\n"); |
620 |
|
621 |
rxvt_environ = environ; |
622 |
|
623 |
signal (SIGHUP, SIG_IGN); |
624 |
signal (SIGPIPE, SIG_IGN); |
625 |
|
626 |
sig_handlers.sw_term.start (SIGTERM); ev_unref (); |
627 |
sig_handlers.sw_int.start (SIGINT); ev_unref (); |
628 |
|
629 |
old_xerror_handler = XSetErrorHandler ((XErrorHandler) rxvt_xerror_handler); |
630 |
// TODO: handle this with exceptions and tolerate the memory loss |
631 |
XSetIOErrorHandler (rxvt_xioerror_handler); |
632 |
|
633 |
XrmInitialize (); |
634 |
|
635 |
#if HAVE_PIXBUF |
636 |
g_type_init (); |
637 |
#endif |
638 |
} |
639 |
|
640 |
/*----------------------------------------------------------------------*/ |
641 |
/* |
642 |
* window size/position calculations for XSizeHint and other storage. |
643 |
* if width/height are non-zero then override calculated width/height |
644 |
*/ |
645 |
void |
646 |
rxvt_term::window_calc (unsigned int newwidth, unsigned int newheight) |
647 |
{ |
648 |
short recalc_x, recalc_y; |
649 |
int x, y, flags; |
650 |
unsigned int w, h; |
651 |
unsigned int max_width, max_height; |
652 |
|
653 |
szHint.flags = PMinSize | PResizeInc | PBaseSize | PWinGravity; |
654 |
szHint.win_gravity = NorthWestGravity; |
655 |
/* szHint.min_aspect.x = szHint.min_aspect.y = 1; */ |
656 |
|
657 |
recalc_x = recalc_y = 0; |
658 |
flags = 0; |
659 |
|
660 |
if (!parsed_geometry) |
661 |
{ |
662 |
parsed_geometry = 1; |
663 |
|
664 |
if (rs[Rs_geometry]) |
665 |
flags = XParseGeometry (rs[Rs_geometry], &x, &y, &w, &h); |
666 |
|
667 |
if (flags & WidthValue) |
668 |
{ |
669 |
if (!w) |
670 |
rxvt_fatal ("illegal window geometry (width and height must be non-zero), aborting.\n"); |
671 |
|
672 |
ncol = clamp (w, 1, std::numeric_limits<int16_t>::max ()); |
673 |
szHint.flags |= USSize; |
674 |
} |
675 |
|
676 |
if (flags & HeightValue) |
677 |
{ |
678 |
if (!h) |
679 |
rxvt_fatal ("illegal window geometry (width and height must be non-zero), aborting.\n"); |
680 |
|
681 |
nrow = clamp (h, 1, std::numeric_limits<int16_t>::max ()); |
682 |
szHint.flags |= USSize; |
683 |
} |
684 |
|
685 |
if (flags & XValue) |
686 |
{ |
687 |
szHint.x = x; |
688 |
szHint.flags |= USPosition; |
689 |
|
690 |
if (flags & XNegative) |
691 |
{ |
692 |
recalc_x = 1; |
693 |
szHint.win_gravity = NorthEastGravity; |
694 |
} |
695 |
} |
696 |
|
697 |
if (flags & YValue) |
698 |
{ |
699 |
szHint.y = y; |
700 |
szHint.flags |= USPosition; |
701 |
|
702 |
if (flags & YNegative) |
703 |
{ |
704 |
recalc_y = 1; |
705 |
|
706 |
if (szHint.win_gravity == NorthEastGravity) |
707 |
szHint.win_gravity = SouthEastGravity; |
708 |
else |
709 |
szHint.win_gravity = SouthWestGravity; |
710 |
} |
711 |
} |
712 |
} |
713 |
|
714 |
/* TODO: BOUNDS */ |
715 |
width = ncol * fwidth; |
716 |
height = nrow * fheight; |
717 |
max_width = MAX_COLS * fwidth; |
718 |
max_height = MAX_ROWS * fheight; |
719 |
|
720 |
szHint.base_width = szHint.base_height = 2 * int_bwidth; |
721 |
|
722 |
window_vt_x = window_vt_y = int_bwidth; |
723 |
|
724 |
if (scrollBar.state) |
725 |
{ |
726 |
int sb_w = scrollBar.total_width (); |
727 |
szHint.base_width += sb_w; |
728 |
|
729 |
if (!option (Opt_scrollBar_right)) |
730 |
window_vt_x += sb_w; |
731 |
} |
732 |
|
733 |
szHint.width_inc = fwidth; |
734 |
szHint.height_inc = fheight; |
735 |
szHint.min_width = szHint.base_width + szHint.width_inc; |
736 |
szHint.min_height = szHint.base_height + szHint.height_inc; |
737 |
|
738 |
if (newwidth && newwidth - szHint.base_width < max_width) |
739 |
{ |
740 |
szHint.width = newwidth; |
741 |
width = newwidth - szHint.base_width; |
742 |
} |
743 |
else |
744 |
{ |
745 |
min_it (width, max_width); |
746 |
szHint.width = szHint.base_width + width; |
747 |
} |
748 |
|
749 |
if (newheight && newheight - szHint.base_height < max_height) |
750 |
{ |
751 |
szHint.height = newheight; |
752 |
height = newheight - szHint.base_height; |
753 |
} |
754 |
else |
755 |
{ |
756 |
min_it (height, max_height); |
757 |
szHint.height = szHint.base_height + height; |
758 |
} |
759 |
|
760 |
if (recalc_x) |
761 |
szHint.x += DisplayWidth (dpy, display->screen) - szHint.width - 2 * ext_bwidth; |
762 |
|
763 |
if (recalc_y) |
764 |
szHint.y += DisplayHeight (dpy, display->screen) - szHint.height - 2 * ext_bwidth; |
765 |
|
766 |
ncol = width / fwidth; |
767 |
nrow = height / fheight; |
768 |
|
769 |
// When the size of the vt window is not a multiple of the cell |
770 |
// size, i.e., when the wm does not honour our size hints, there are |
771 |
// extra areas not covered by the terminal screen. Such gaps, when a |
772 |
// bg pixmap is set, would have to be cleared manually to properly |
773 |
// refresh the background. We take the simpler route and shrink the |
774 |
// vt window so as to avoid creating gaps. |
775 |
vt_width = ncol * fwidth; |
776 |
vt_height = nrow * fheight; |
777 |
} |
778 |
|
779 |
/*----------------------------------------------------------------------*/ |
780 |
/* |
781 |
* Tell the teletype handler what size the window is. |
782 |
* Called after a window size change. |
783 |
*/ |
784 |
void |
785 |
rxvt_term::tt_winch () |
786 |
{ |
787 |
if (pty->pty < 0) |
788 |
return; |
789 |
|
790 |
struct winsize ws; |
791 |
|
792 |
ws.ws_col = ncol; |
793 |
ws.ws_row = nrow; |
794 |
ws.ws_xpixel = vt_width; |
795 |
ws.ws_ypixel = vt_height; |
796 |
ioctl (pty->pty, TIOCSWINSZ, &ws); |
797 |
|
798 |
#if 0 |
799 |
// TIOCSWINSZ is supposed to do this automatically and correctly |
800 |
if (cmd_pid) /* force through to the command */ |
801 |
kill (-cmd_pid, SIGWINCH); |
802 |
#endif |
803 |
} |
804 |
|
805 |
/*----------------------------------------------------------------------*/ |
806 |
/* load and set the various fonts */ |
807 |
bool |
808 |
rxvt_term::set_fonts () |
809 |
{ |
810 |
rxvt_fontset *fs = new rxvt_fontset (this); |
811 |
rxvt_fontprop prop; |
812 |
|
813 |
if (!fs |
814 |
|| !fs->populate (rs[Rs_font] ? rs[Rs_font] : "fixed") |
815 |
|| !fs->realize_font (1)) |
816 |
{ |
817 |
delete fs; |
818 |
return false; |
819 |
} |
820 |
|
821 |
#if ENABLE_STYLES |
822 |
for (int i = RS_styleCount; --i; ) |
823 |
if (fontset[i] != fontset[0]) |
824 |
delete fontset[i]; |
825 |
#endif |
826 |
|
827 |
delete fontset[0]; |
828 |
fontset[0] = fs; |
829 |
|
830 |
prop = (*fs)[rxvt_fontset::firstFont]->properties (); |
831 |
prop.width = max (prop.width + letterSpace, 1); |
832 |
|
833 |
fs->set_prop (prop, false); |
834 |
|
835 |
fwidth = prop.width; |
836 |
fheight = prop.height + lineSpace; |
837 |
fbase = prop.ascent; |
838 |
|
839 |
for (int style = 1; style < 4; style++) |
840 |
{ |
841 |
#if ENABLE_STYLES |
842 |
const char *res = rs[Rs_font + style]; |
843 |
|
844 |
if (res && !*res) |
845 |
fontset[style] = fontset[0]; |
846 |
else |
847 |
{ |
848 |
fontset[style] = fs = new rxvt_fontset (this); |
849 |
rxvt_fontprop prop2 = prop; |
850 |
|
851 |
if (res) |
852 |
{ |
853 |
fs->populate (res); |
854 |
fs->set_prop (prop2, false); |
855 |
} |
856 |
else |
857 |
{ |
858 |
fs->populate (fontset[0]->fontdesc); |
859 |
|
860 |
if (SET_STYLE (0, style) & RS_Bold) prop2.weight = rxvt_fontprop::bold; |
861 |
if (SET_STYLE (0, style) & RS_Italic) prop2.slant = rxvt_fontprop::italic; |
862 |
|
863 |
fs->set_prop (prop2, true); |
864 |
} |
865 |
|
866 |
} |
867 |
#else |
868 |
fontset[style] = fontset[0]; |
869 |
#endif |
870 |
} |
871 |
|
872 |
if (parent) |
873 |
{ |
874 |
resize_all_windows (0, 0, 0); |
875 |
scr_remap_chars (); |
876 |
scr_touch (true); |
877 |
} |
878 |
|
879 |
return true; |
880 |
} |
881 |
|
882 |
void |
883 |
rxvt_term::set_string_property (Atom prop, const char *str, int len) |
884 |
{ |
885 |
XChangeProperty (dpy, parent, |
886 |
prop, XA_STRING, 8, PropModeReplace, |
887 |
(const unsigned char *)str, len >= 0 ? len : strlen (str)); |
888 |
} |
889 |
|
890 |
void |
891 |
rxvt_term::set_mbstring_property (Atom prop, const char *str, int len) |
892 |
{ |
893 |
XTextProperty ct; |
894 |
|
895 |
if (XmbTextListToTextProperty (dpy, (char **)&str, 1, XStdICCTextStyle, &ct) >= 0) |
896 |
{ |
897 |
XSetTextProperty (dpy, parent, &ct, prop); |
898 |
XFree (ct.value); |
899 |
} |
900 |
} |
901 |
|
902 |
void |
903 |
rxvt_term::set_utf8_property (Atom prop, const char *str, int len) |
904 |
{ |
905 |
wchar_t *ws = rxvt_mbstowcs (str, len); |
906 |
char *s = rxvt_wcstoutf8 (ws); |
907 |
|
908 |
XChangeProperty (dpy, parent, |
909 |
prop, xa[XA_UTF8_STRING], 8, PropModeReplace, |
910 |
(const unsigned char *)s, strlen (s)); |
911 |
|
912 |
free (s); |
913 |
free (ws); |
914 |
} |
915 |
|
916 |
/*----------------------------------------------------------------------*/ |
917 |
/*----------------------------------------------------------------------*/ |
918 |
/* xterm sequences - title, iconName, color (exptl) */ |
919 |
void |
920 |
rxvt_term::set_title (const char *str) |
921 |
{ |
922 |
set_mbstring_property (XA_WM_NAME, str); |
923 |
#if ENABLE_EWMH |
924 |
set_utf8_property (xa[XA_NET_WM_NAME], str); |
925 |
#endif |
926 |
} |
927 |
|
928 |
void |
929 |
rxvt_term::set_icon_name (const char *str) |
930 |
{ |
931 |
set_mbstring_property (XA_WM_ICON_NAME, str); |
932 |
#if ENABLE_EWMH |
933 |
set_utf8_property (xa[XA_NET_WM_ICON_NAME], str); |
934 |
#endif |
935 |
} |
936 |
|
937 |
void |
938 |
rxvt_term::set_window_color (int idx, const char *color) |
939 |
{ |
940 |
#ifdef XTERM_COLOR_CHANGE |
941 |
if (color == NULL || *color == '\0') |
942 |
return; |
943 |
|
944 |
color = strdup (color); |
945 |
allocated.push_back ((void *)color); |
946 |
rs[Rs_color + idx] = color; |
947 |
|
948 |
/* handle color aliases */ |
949 |
if (isdigit (*color)) |
950 |
{ |
951 |
int i = atoi (color); |
952 |
|
953 |
if (i >= 8 && i <= 15) |
954 |
{ |
955 |
/* bright colors */ |
956 |
alias_color (idx, minBrightCOLOR + i - 8); |
957 |
goto done; |
958 |
} |
959 |
|
960 |
if (i >= 0 && i <= 7) |
961 |
{ |
962 |
/* normal colors */ |
963 |
alias_color (idx, minCOLOR + i); |
964 |
goto done; |
965 |
} |
966 |
} |
967 |
|
968 |
pix_colors_focused[idx].free (this); |
969 |
set_color (pix_colors_focused[idx], color); |
970 |
|
971 |
done: |
972 |
/*TODO: handle Color_BD, scrollbar background, etc. */ |
973 |
|
974 |
update_fade_color (idx); |
975 |
recolor_cursor (); |
976 |
scr_recolor (); |
977 |
#endif /* XTERM_COLOR_CHANGE */ |
978 |
} |
979 |
|
980 |
void |
981 |
rxvt_term::recolor_cursor () |
982 |
{ |
983 |
XColor fg, bg; |
984 |
|
985 |
(ISSET_PIXCOLOR (Color_pointer_fg) |
986 |
? pix_colors_focused[Color_pointer_fg] |
987 |
: pix_colors_focused[Color_fg]).get (fg); |
988 |
|
989 |
(ISSET_PIXCOLOR (Color_pointer_bg) |
990 |
? pix_colors_focused[Color_pointer_bg] |
991 |
: pix_colors_focused[Color_bg]).get (bg); |
992 |
|
993 |
XRecolorCursor (dpy, TermWin_cursor, &fg, &bg); |
994 |
} |
995 |
|
996 |
/*----------------------------------------------------------------------*/ |
997 |
/* |
998 |
* find if fg/bg matches any of the normal (low-intensity) colors |
999 |
*/ |
1000 |
char * |
1001 |
rxvt_term::get_colorfgbg () |
1002 |
{ |
1003 |
unsigned int i; |
1004 |
const char *xpmb = ""; |
1005 |
char fstr[] = "default"; |
1006 |
char bstr[] = "default"; |
1007 |
char *env_colorfgbg; |
1008 |
|
1009 |
for (i = Color_Black; i <= Color_White; i++) |
1010 |
if (pix_colors[Color_fg] == pix_colors[i]) |
1011 |
{ |
1012 |
sprintf (fstr, "%d", i - Color_Black); |
1013 |
break; |
1014 |
} |
1015 |
|
1016 |
for (i = Color_Black; i <= Color_White; i++) |
1017 |
if (pix_colors[Color_bg] == pix_colors[i]) |
1018 |
{ |
1019 |
sprintf (bstr, "%d", i - Color_Black); |
1020 |
#if HAVE_IMG |
1021 |
xpmb = "default;"; |
1022 |
#endif |
1023 |
break; |
1024 |
} |
1025 |
|
1026 |
env_colorfgbg = (char *)rxvt_malloc (sizeof ("COLORFGBG=default;default;bg")); |
1027 |
sprintf (env_colorfgbg, "COLORFGBG=%s;%s%s", fstr, xpmb, bstr); |
1028 |
return env_colorfgbg; |
1029 |
} |
1030 |
|
1031 |
/*----------------------------------------------------------------------*/ |
1032 |
|
1033 |
bool |
1034 |
rxvt_term::set_color (rxvt_color &color, const char *name) |
1035 |
{ |
1036 |
if (color.set (this, name)) |
1037 |
return true; |
1038 |
|
1039 |
rxvt_warn ("can't get colour '%s', continuing without.\n", name); |
1040 |
return false; |
1041 |
} |
1042 |
|
1043 |
void |
1044 |
rxvt_term::alias_color (int dst, int src) |
1045 |
{ |
1046 |
pix_colors[dst].free (this); |
1047 |
pix_colors[dst].set (this, rs[Rs_color + dst] = rs[Rs_color + src]); |
1048 |
} |
1049 |
|
1050 |
#ifdef SMART_RESIZE |
1051 |
static unsigned int |
1052 |
get_parent_bw (Display *dpy, Window w) |
1053 |
{ |
1054 |
int idummy; |
1055 |
unsigned int udummy; |
1056 |
Window wdummy, parent; |
1057 |
Window *children; |
1058 |
unsigned int nchildren, border_width; |
1059 |
|
1060 |
XQueryTree (dpy, w, &wdummy, &parent, &children, &nchildren); |
1061 |
XFree (children); |
1062 |
XGetGeometry (dpy, parent, &wdummy, &idummy, &idummy, |
1063 |
&udummy, &udummy, &border_width, &udummy); |
1064 |
|
1065 |
return border_width; |
1066 |
} |
1067 |
#endif |
1068 |
|
1069 |
/* -------------------------------------------------------------------- * |
1070 |
* - WINDOW RESIZING - * |
1071 |
* -------------------------------------------------------------------- */ |
1072 |
void |
1073 |
rxvt_term::resize_all_windows (unsigned int newwidth, unsigned int newheight, int ignoreparent) |
1074 |
{ |
1075 |
int fix_screen; |
1076 |
int old_width = szHint.width; |
1077 |
int old_height = szHint.height; |
1078 |
|
1079 |
window_calc (newwidth, newheight); |
1080 |
|
1081 |
bool set_hint = !HOOK_INVOKE ((this, HOOK_RESIZE_ALL_WINDOWS, DT_INT, newwidth, DT_INT, newheight, DT_END)); |
1082 |
|
1083 |
// to avoid races between us and the wm, we clear the incremental size hints around the xresizewindow |
1084 |
if (set_hint) |
1085 |
{ |
1086 |
szHint.flags &= ~(PBaseSize | PResizeInc); |
1087 |
XSetWMNormalHints (dpy, parent, &szHint); |
1088 |
szHint.flags |= PBaseSize | PResizeInc; |
1089 |
} |
1090 |
|
1091 |
if (!ignoreparent) |
1092 |
{ |
1093 |
#ifdef SMART_RESIZE |
1094 |
/* |
1095 |
* resize by Marius Gedminas <marius.gedminas@uosis.mif.vu.lt> |
1096 |
* reposition window on resize depending on placement on screen |
1097 |
*/ |
1098 |
int x, y, x1, y1; |
1099 |
int dx, dy; |
1100 |
unsigned int unused_w1, unused_h1, unused_b1, unused_d1; |
1101 |
Window unused_cr; |
1102 |
|
1103 |
XTranslateCoordinates (dpy, parent, display->root, |
1104 |
0, 0, &x, &y, &unused_cr); |
1105 |
XGetGeometry (dpy, parent, &unused_cr, &x1, &y1, |
1106 |
&unused_w1, &unused_h1, &unused_b1, &unused_d1); |
1107 |
/* |
1108 |
* if display->root isn't the parent window, a WM will probably have offset |
1109 |
* our position for handles and decorations. Counter it |
1110 |
*/ |
1111 |
if (x1 != x || y1 != y) |
1112 |
{ |
1113 |
unsigned int border_width = get_parent_bw (dpy, parent); |
1114 |
|
1115 |
x -= x1 + border_width; |
1116 |
y -= y1 + border_width; |
1117 |
} |
1118 |
|
1119 |
x1 = (DisplayWidth (dpy, display->screen) - old_width ) / 2; |
1120 |
y1 = (DisplayHeight (dpy, display->screen) - old_height) / 2; |
1121 |
dx = old_width - szHint.width; |
1122 |
dy = old_height - szHint.height; |
1123 |
|
1124 |
/* Check position of the center of the window */ |
1125 |
if (x < x1) /* left half */ |
1126 |
dx = 0; |
1127 |
else if (x == x1) /* exact center */ |
1128 |
dx /= 2; |
1129 |
if (y < y1) /* top half */ |
1130 |
dy = 0; |
1131 |
else if (y == y1) /* exact center */ |
1132 |
dy /= 2; |
1133 |
|
1134 |
XMoveResizeWindow (dpy, parent, x + dx, y + dy, |
1135 |
szHint.width, szHint.height); |
1136 |
#else |
1137 |
XResizeWindow (dpy, parent, szHint.width, szHint.height); |
1138 |
#endif |
1139 |
} |
1140 |
|
1141 |
if (set_hint) |
1142 |
XSetWMNormalHints (dpy, parent, &szHint); |
1143 |
|
1144 |
fix_screen = ncol != prev_ncol || nrow != prev_nrow; |
1145 |
|
1146 |
if (fix_screen || newwidth != old_width || newheight != old_height) |
1147 |
{ |
1148 |
if (scrollBar.state) |
1149 |
scrollBar.resize (); |
1150 |
|
1151 |
XMoveResizeWindow (dpy, vt, |
1152 |
window_vt_x, window_vt_y, |
1153 |
vt_width, vt_height); |
1154 |
|
1155 |
HOOK_INVOKE ((this, HOOK_SIZE_CHANGE, DT_INT, newwidth, DT_INT, newheight, DT_END)); |
1156 |
} |
1157 |
|
1158 |
if (fix_screen || old_height == 0) |
1159 |
scr_reset (); |
1160 |
|
1161 |
#if USE_XIM |
1162 |
im_set_position (); |
1163 |
#endif |
1164 |
} |
1165 |
|
1166 |
/* |
1167 |
* Set the width/height of the vt window in characters. Units are pixels. |
1168 |
* good for toggling 80/132 columns |
1169 |
*/ |
1170 |
void |
1171 |
rxvt_term::set_widthheight (unsigned int newwidth, unsigned int newheight) |
1172 |
{ |
1173 |
XWindowAttributes wattr; |
1174 |
|
1175 |
if (newwidth == 0 || newheight == 0) |
1176 |
{ |
1177 |
XGetWindowAttributes (dpy, display->root, &wattr); |
1178 |
|
1179 |
if (newwidth == 0) |
1180 |
newwidth = wattr.width - szHint.base_width; |
1181 |
if (newheight == 0) |
1182 |
newheight = wattr.height - szHint.base_height; |
1183 |
} |
1184 |
|
1185 |
if (newwidth != vt_width || newheight != vt_height) |
1186 |
{ |
1187 |
newwidth += szHint.base_width; |
1188 |
newheight += szHint.base_height; |
1189 |
resize_all_windows (newwidth, newheight, 0); |
1190 |
} |
1191 |
} |
1192 |
|
1193 |
/* -------------------------------------------------------------------- * |
1194 |
* - X INPUT METHOD ROUTINES - * |
1195 |
* -------------------------------------------------------------------- */ |
1196 |
#if USE_XIM |
1197 |
|
1198 |
void |
1199 |
rxvt_term::im_set_color (unsigned long &fg, unsigned long &bg) |
1200 |
{ |
1201 |
fg = pix_colors [Color_fg]; |
1202 |
bg = pix_colors [Color_bg]; |
1203 |
} |
1204 |
|
1205 |
void |
1206 |
rxvt_term::im_set_size (XRectangle &size) |
1207 |
{ |
1208 |
// the int_bwidth terms make no sense to me |
1209 |
size.x = int_bwidth; |
1210 |
size.y = int_bwidth; |
1211 |
size.width = Width2Pixel (ncol) + int_bwidth; |
1212 |
size.height = Height2Pixel (nrow) + int_bwidth; |
1213 |
} |
1214 |
|
1215 |
void |
1216 |
rxvt_term::im_set_preedit_area (XRectangle &preedit_rect, |
1217 |
XRectangle &status_rect, |
1218 |
const XRectangle &needed_rect) |
1219 |
{ |
1220 |
preedit_rect.x = needed_rect.width; |
1221 |
preedit_rect.y = 0; |
1222 |
preedit_rect.width = Width2Pixel (ncol) - needed_rect.width + 1; |
1223 |
preedit_rect.height = fheight; |
1224 |
|
1225 |
status_rect.x = 0; |
1226 |
status_rect.y = 0; |
1227 |
status_rect.width = needed_rect.width ? needed_rect.width : Width2Pixel (ncol) + 1; |
1228 |
status_rect.height = fheight; |
1229 |
} |
1230 |
|
1231 |
/* Checking whether input method is running. */ |
1232 |
bool |
1233 |
rxvt_term::im_is_running () |
1234 |
{ |
1235 |
Atom atom; |
1236 |
Window win; |
1237 |
char server[IMBUFSIZ]; |
1238 |
|
1239 |
/* get current locale modifier */ |
1240 |
if (char *p = XSetLocaleModifiers (0)) |
1241 |
{ |
1242 |
strcpy (server, "@server="); |
1243 |
strncat (server, p + 4, IMBUFSIZ - 9); /* skip "@im=" */ |
1244 |
|
1245 |
if (p = strchr (server + 1, '@')) /* first one only */ |
1246 |
*p = '\0'; |
1247 |
|
1248 |
atom = XInternAtom (dpy, server, False); |
1249 |
win = XGetSelectionOwner (dpy, atom); |
1250 |
|
1251 |
if (win != None) |
1252 |
return true; |
1253 |
} |
1254 |
|
1255 |
return false; |
1256 |
} |
1257 |
|
1258 |
void |
1259 |
rxvt_term::im_send_spot () |
1260 |
{ |
1261 |
XPoint nspot; |
1262 |
XVaNestedList preedit_attr; |
1263 |
|
1264 |
if (!Input_Context |
1265 |
|| !focus |
1266 |
|| !(input_style & (XIMPreeditPosition | XIMPreeditCallbacks))) |
1267 |
return; |
1268 |
|
1269 |
im_set_position (nspot); |
1270 |
|
1271 |
if (nspot.x == spot.x && nspot.y == spot.y) |
1272 |
return; |
1273 |
|
1274 |
spot = nspot; |
1275 |
|
1276 |
preedit_attr = XVaCreateNestedList (0, XNSpotLocation, &spot, NULL); |
1277 |
XSetICValues (Input_Context, XNPreeditAttributes, preedit_attr, NULL); |
1278 |
XFree (preedit_attr); |
1279 |
} |
1280 |
|
1281 |
void |
1282 |
rxvt_term::im_destroy () |
1283 |
{ |
1284 |
if (input_method) |
1285 |
{ |
1286 |
if (Input_Context && input_method->xim) |
1287 |
XDestroyIC (Input_Context); |
1288 |
|
1289 |
display->put_xim (input_method); |
1290 |
input_method = 0; |
1291 |
} |
1292 |
|
1293 |
Input_Context = 0; |
1294 |
} |
1295 |
|
1296 |
#ifdef ENABLE_XIM_ONTHESPOT |
1297 |
|
1298 |
static void |
1299 |
xim_preedit_start (XIC ic, XPointer client_data, XPointer call_data) |
1300 |
{ |
1301 |
((rxvt_term *)client_data)->make_current (); |
1302 |
HOOK_INVOKE (((rxvt_term *)client_data, HOOK_XIM_PREEDIT_START, DT_END)); |
1303 |
} |
1304 |
|
1305 |
static void |
1306 |
xim_preedit_done (XIC ic, XPointer client_data, XPointer call_data) |
1307 |
{ |
1308 |
((rxvt_term *)client_data)->make_current (); |
1309 |
HOOK_INVOKE (((rxvt_term *)client_data, HOOK_XIM_PREEDIT_DONE, DT_END)); |
1310 |
} |
1311 |
|
1312 |
static void |
1313 |
xim_preedit_draw (XIC ic, XPointer client_data, XIMPreeditDrawCallbackStruct *call_data) |
1314 |
{ |
1315 |
rxvt_term *term = (rxvt_term *)client_data; |
1316 |
XIMText *text = call_data->text; |
1317 |
|
1318 |
term->make_current (); |
1319 |
|
1320 |
if (text) |
1321 |
{ |
1322 |
wchar_t *str; |
1323 |
|
1324 |
if (!text->encoding_is_wchar && text->string.multi_byte) |
1325 |
{ |
1326 |
// of course, X makes it ugly again |
1327 |
if (term->rs[Rs_imLocale]) |
1328 |
SET_LOCALE (term->rs[Rs_imLocale]); |
1329 |
|
1330 |
str = rxvt_temp_buf<wchar_t> (text->length + 1); |
1331 |
mbstowcs (str, text->string.multi_byte, text->length + 1); |
1332 |
|
1333 |
if (term->rs[Rs_imLocale]) |
1334 |
SET_LOCALE (term->locale); |
1335 |
} |
1336 |
else |
1337 |
str = text->string.wide_char; |
1338 |
|
1339 |
HOOK_INVOKE ((term, HOOK_XIM_PREEDIT_DRAW, |
1340 |
DT_INT, call_data->caret, |
1341 |
DT_INT, call_data->chg_first, |
1342 |
DT_INT, call_data->chg_length, |
1343 |
DT_LCS_LEN, (void *)text->feedback, text->feedback ? (int)text->length : 0, |
1344 |
DT_WCS_LEN, str, str ? (int)text->length : 0, |
1345 |
DT_END)); |
1346 |
} |
1347 |
else |
1348 |
HOOK_INVOKE ((term, HOOK_XIM_PREEDIT_DRAW, |
1349 |
DT_INT, call_data->caret, |
1350 |
DT_INT, call_data->chg_first, |
1351 |
DT_INT, call_data->chg_length, |
1352 |
DT_END)); |
1353 |
} |
1354 |
|
1355 |
#if 0 |
1356 |
static void |
1357 |
xim_preedit_caret (XIC ic, XPointer client_data, XIMPreeditCaretCallbackStruct *call_data) |
1358 |
{ |
1359 |
((rxvt_term *)client_data)->make_current (); |
1360 |
HOOK_INVOKE (((rxvt_term *)client_data, HOOK_XIM_PREEDIT_CARET, |
1361 |
DT_INT, call_data->position, |
1362 |
DT_INT, call_data->direction, |
1363 |
DT_INT, call_data->style, |
1364 |
DT_END)); |
1365 |
} |
1366 |
#endif |
1367 |
|
1368 |
#endif |
1369 |
|
1370 |
/* |
1371 |
* Try to open a XIM with the current modifiers, then see if we can |
1372 |
* open a suitable preedit type |
1373 |
*/ |
1374 |
bool |
1375 |
rxvt_term::im_get_ic (const char *modifiers) |
1376 |
{ |
1377 |
int i, j, found; |
1378 |
XIM xim; |
1379 |
XPoint spot; |
1380 |
XRectangle rect, status_rect, needed_rect; |
1381 |
unsigned long fg, bg; |
1382 |
const char *p; |
1383 |
char **s; |
1384 |
XIMStyles *xim_styles; |
1385 |
|
1386 |
set_environ (env); |
1387 |
|
1388 |
if (!((p = XSetLocaleModifiers (modifiers)) && *p)) |
1389 |
return false; |
1390 |
|
1391 |
input_method = display->get_xim (locale, modifiers); |
1392 |
if (input_method == NULL) |
1393 |
return false; |
1394 |
|
1395 |
xim = input_method->xim; |
1396 |
spot.x = spot.y = -1; |
1397 |
|
1398 |
xim_styles = NULL; |
1399 |
if (XGetIMValues (xim, XNQueryInputStyle, &xim_styles, NULL) |
1400 |
|| !xim_styles || !xim_styles->count_styles) |
1401 |
{ |
1402 |
im_destroy (); |
1403 |
return false; |
1404 |
} |
1405 |
|
1406 |
const char *pet[] = { rs[Rs_preeditType], "OverTheSpot,OffTheSpot,Root,None" }; |
1407 |
|
1408 |
for (int pi = 0; pi < 2; pi++) |
1409 |
{ |
1410 |
p = pet[pi]; |
1411 |
|
1412 |
if (!p) |
1413 |
continue; |
1414 |
|
1415 |
s = rxvt_strsplit (',', p); |
1416 |
|
1417 |
for (i = found = 0; !found && s[i]; i++) |
1418 |
{ |
1419 |
if (!strcmp (s[i], "OverTheSpot")) |
1420 |
input_style = XIMPreeditPosition | XIMStatusNothing; |
1421 |
else if (!strcmp (s[i], "OffTheSpot")) |
1422 |
input_style = XIMPreeditArea | XIMStatusArea; |
1423 |
else if (!strcmp (s[i], "Root")) |
1424 |
input_style = XIMPreeditNothing | XIMStatusNothing; |
1425 |
else if (!strcmp (s[i], "None")) |
1426 |
input_style = XIMPreeditNone | XIMStatusNone; |
1427 |
#ifdef ENABLE_XIM_ONTHESPOT |
1428 |
else if (SHOULD_INVOKE (HOOK_XIM_PREEDIT_START) && !strcmp (s[i], "OnTheSpot")) |
1429 |
input_style = XIMPreeditCallbacks | XIMStatusNothing; |
1430 |
#endif |
1431 |
else |
1432 |
input_style = XIMPreeditNothing | XIMStatusNothing; |
1433 |
|
1434 |
for (j = 0; j < xim_styles->count_styles; j++) |
1435 |
if (input_style == xim_styles->supported_styles[j]) |
1436 |
{ |
1437 |
rxvt_free_strsplit (s); |
1438 |
|
1439 |
found = 1; |
1440 |
goto foundpet; |
1441 |
} |
1442 |
|
1443 |
} |
1444 |
|
1445 |
rxvt_free_strsplit (s); |
1446 |
} |
1447 |
|
1448 |
foundpet: |
1449 |
|
1450 |
XFree (xim_styles); |
1451 |
|
1452 |
if (!found) |
1453 |
{ |
1454 |
im_destroy (); |
1455 |
return false; |
1456 |
} |
1457 |
|
1458 |
XFontSet fs = 0; |
1459 |
XVaNestedList preedit_attr = 0, status_attr = 0; |
1460 |
|
1461 |
if (input_style & (XIMPreeditPosition | XIMPreeditArea)) |
1462 |
{ |
1463 |
// fake us a font-set, please |
1464 |
char **missing_charset_list; |
1465 |
int missing_charset_count; |
1466 |
char *def_string; |
1467 |
char pat[512]; |
1468 |
|
1469 |
sprintf (pat, |
1470 |
"-*-*-*-R-*-*-%d-*-*-*-*-*-*," |
1471 |
"-*-*-*-R-*-*-%d-*-*-*-*-*-*," |
1472 |
"-*-*-*-R-*-*-%d-*-*-*-*-*-*," |
1473 |
"-*-*-*-R-*-*-%d-*-*-*-*-*-*," |
1474 |
"-*-*-*-R-*-*-%d-*-*-*-*-*-*," |
1475 |
"*", |
1476 |
fheight, |
1477 |
fheight + 1, fheight - 1, |
1478 |
fheight - 2, fheight + 2); |
1479 |
|
1480 |
fs = XCreateFontSet (dpy, rs[Rs_imFont] ? rs[Rs_imFont] : pat, |
1481 |
&missing_charset_list, &missing_charset_count, &def_string); |
1482 |
|
1483 |
if (missing_charset_list) |
1484 |
XFreeStringList (missing_charset_list); |
1485 |
|
1486 |
if (!fs) |
1487 |
{ |
1488 |
input_style &= ~(XIMPreeditPosition | XIMPreeditArea); |
1489 |
rxvt_warn ("unable to create fontset for input method, try \"-pt Root\". Continuing.\n"); |
1490 |
} |
1491 |
} |
1492 |
|
1493 |
if (input_style & XIMPreeditPosition) |
1494 |
{ |
1495 |
im_set_size (rect); |
1496 |
im_set_position (spot); |
1497 |
im_set_color (fg, bg); |
1498 |
|
1499 |
preedit_attr = XVaCreateNestedList (0, |
1500 |
XNForeground, fg, |
1501 |
XNBackground, bg, |
1502 |
XNArea, &rect, |
1503 |
XNSpotLocation, &spot, |
1504 |
XNFontSet, fs, |
1505 |
NULL); |
1506 |
} |
1507 |
else if (input_style & XIMPreeditArea) |
1508 |
{ |
1509 |
im_set_color (fg, bg); |
1510 |
|
1511 |
/* |
1512 |
* The necessary width of preedit area is unknown |
1513 |
* until create input context. |
1514 |
*/ |
1515 |
needed_rect.width = 0; |
1516 |
im_set_preedit_area (rect, status_rect, needed_rect); |
1517 |
|
1518 |
preedit_attr = XVaCreateNestedList (0, |
1519 |
XNForeground, fg, |
1520 |
XNBackground, bg, |
1521 |
XNArea, &rect, |
1522 |
XNFontSet, fs, |
1523 |
NULL); |
1524 |
status_attr = XVaCreateNestedList (0, |
1525 |
XNForeground, fg, |
1526 |
XNBackground, bg, |
1527 |
XNArea, &status_rect, |
1528 |
XNFontSet, fs, |
1529 |
NULL); |
1530 |
} |
1531 |
#if ENABLE_XIM_ONTHESPOT |
1532 |
else if (input_style & XIMPreeditCallbacks) |
1533 |
{ |
1534 |
XIMCallback xcb[4]; |
1535 |
|
1536 |
im_set_position (spot); |
1537 |
|
1538 |
xcb[0].client_data = (XPointer)this; xcb[0].callback = (XIMProc)xim_preedit_start; |
1539 |
xcb[1].client_data = (XPointer)this; xcb[1].callback = (XIMProc)xim_preedit_done; |
1540 |
xcb[2].client_data = (XPointer)this; xcb[2].callback = (XIMProc)xim_preedit_draw; |
1541 |
# if 0 |
1542 |
xcb[3].client_data = (XPointer)this; xcb[3].callback = (XIMProc)xim_preedit_caret; |
1543 |
# endif |
1544 |
|
1545 |
preedit_attr = XVaCreateNestedList (0, |
1546 |
XNSpotLocation, &spot, |
1547 |
XNPreeditStartCallback, &xcb[0], |
1548 |
XNPreeditDoneCallback , &xcb[1], |
1549 |
XNPreeditDrawCallback , &xcb[2], |
1550 |
# if 0 |
1551 |
XNPreeditCaretCallback, &xcb[3], |
1552 |
# endif |
1553 |
NULL); |
1554 |
} |
1555 |
#endif |
1556 |
|
1557 |
Input_Context = XCreateIC (xim, |
1558 |
XNInputStyle, input_style, |
1559 |
XNClientWindow, vt, |
1560 |
XNFocusWindow, parent, |
1561 |
preedit_attr ? XNPreeditAttributes : NULL, |
1562 |
preedit_attr, |
1563 |
status_attr ? XNStatusAttributes : NULL, |
1564 |
status_attr, NULL); |
1565 |
|
1566 |
if (preedit_attr) XFree (preedit_attr); |
1567 |
if (status_attr) XFree (status_attr); |
1568 |
if (fs) XFreeFontSet (dpy, fs); |
1569 |
|
1570 |
if (Input_Context == NULL) |
1571 |
{ |
1572 |
rxvt_warn ("failed to create input context, continuing without XIM.\n"); |
1573 |
im_destroy (); |
1574 |
return false; |
1575 |
} |
1576 |
|
1577 |
#if 0 |
1578 |
// unfortunately, only the focus window is used by XIM, hard to fix |
1579 |
if (!XGetICValues (Input_Context, XNFilterEvents, &vt_emask_xim, NULL)) |
1580 |
vt_select_input (); |
1581 |
#endif |
1582 |
|
1583 |
im_set_position (); |
1584 |
|
1585 |
return true; |
1586 |
} |
1587 |
|
1588 |
void |
1589 |
rxvt_term::im_cb () |
1590 |
{ |
1591 |
int i; |
1592 |
const char *p; |
1593 |
char **s; |
1594 |
char buf[IMBUFSIZ]; |
1595 |
|
1596 |
make_current (); |
1597 |
|
1598 |
im_destroy (); |
1599 |
|
1600 |
if (Input_Context) |
1601 |
return; |
1602 |
|
1603 |
if (rs[Rs_imLocale]) |
1604 |
SET_LOCALE (rs[Rs_imLocale]); |
1605 |
|
1606 |
p = rs[Rs_inputMethod]; |
1607 |
if (p && *p) |
1608 |
{ |
1609 |
bool found = false; |
1610 |
|
1611 |
s = rxvt_strsplit (',', p); |
1612 |
|
1613 |
for (i = 0; s[i]; i++) |
1614 |
{ |
1615 |
if (*s[i]) |
1616 |
{ |
1617 |
strcpy (buf, "@im="); |
1618 |
strncat (buf, s[i], IMBUFSIZ - 5); |
1619 |
if (im_get_ic (buf)) |
1620 |
{ |
1621 |
found = true; |
1622 |
break; |
1623 |
} |
1624 |
} |
1625 |
} |
1626 |
|
1627 |
rxvt_free_strsplit (s); |
1628 |
|
1629 |
if (found) |
1630 |
goto done; |
1631 |
} |
1632 |
|
1633 |
/* try with XMODIFIERS env. var. */ |
1634 |
if (im_get_ic ("")) |
1635 |
goto done; |
1636 |
|
1637 |
/* try with no modifiers base IF the user didn't specify an IM */ |
1638 |
if (im_get_ic ("@im=none")) |
1639 |
goto done; |
1640 |
|
1641 |
done: |
1642 |
if (rs[Rs_imLocale]) |
1643 |
SET_LOCALE (locale); |
1644 |
} |
1645 |
|
1646 |
void |
1647 |
rxvt_term::im_set_position () |
1648 |
{ |
1649 |
XRectangle preedit_rect, status_rect, *needed_rect; |
1650 |
XVaNestedList preedit_attr, status_attr; |
1651 |
|
1652 |
if (!Input_Context |
1653 |
|| !focus |
1654 |
|| !(input_style & (XIMPreeditArea | XIMPreeditPosition)) |
1655 |
|| !im_is_running ()) |
1656 |
return; |
1657 |
|
1658 |
if (input_style & XIMPreeditPosition) |
1659 |
{ |
1660 |
im_set_size (preedit_rect); |
1661 |
preedit_attr = XVaCreateNestedList (0, XNArea, &preedit_rect, NULL); |
1662 |
|
1663 |
XSetICValues (Input_Context, |
1664 |
XNPreeditAttributes, preedit_attr, NULL); |
1665 |
} |
1666 |
else |
1667 |
{ |
1668 |
/* Getting the necessary width of preedit area */ |
1669 |
status_attr = XVaCreateNestedList (0, XNAreaNeeded, &needed_rect, NULL); |
1670 |
XGetICValues (Input_Context, XNStatusAttributes, status_attr, NULL); |
1671 |
XFree (status_attr); |
1672 |
|
1673 |
im_set_preedit_area (preedit_rect, status_rect, *needed_rect); |
1674 |
XFree (needed_rect); |
1675 |
|
1676 |
preedit_attr = XVaCreateNestedList (0, XNArea, &preedit_rect, NULL); |
1677 |
status_attr = XVaCreateNestedList (0, XNArea, &status_rect, NULL); |
1678 |
|
1679 |
XSetICValues (Input_Context, |
1680 |
XNPreeditAttributes, preedit_attr, |
1681 |
XNStatusAttributes, status_attr, |
1682 |
NULL); |
1683 |
|
1684 |
XFree (status_attr); |
1685 |
} |
1686 |
|
1687 |
XFree (preedit_attr); |
1688 |
} |
1689 |
#endif /* USE_XIM */ |
1690 |
|
1691 |
void |
1692 |
rxvt_term::get_window_origin (int &x, int &y) |
1693 |
{ |
1694 |
Window cr; |
1695 |
XTranslateCoordinates (dpy, parent, display->root, 0, 0, &x, &y, &cr); |
1696 |
} |
1697 |
|
1698 |
/*----------------------- end-of-file (C source) -----------------------*/ |