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