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