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