ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/rxvt-unicode/src/main.C
(Generate patch)

Comparing rxvt-unicode/src/main.C (file contents):
Revision 1.21 by pcg, Thu Jan 29 23:26:01 2004 UTC vs.
Revision 1.203 by root, Wed Jan 25 02:42:06 2006 UTC

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

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines