ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/rxvt-unicode/src/main.C
Revision: 1.390
Committed: Thu May 22 18:54:33 2014 UTC (10 years ago) by root
Content type: text/plain
Branch: MAIN
Changes since 1.389: +1 -1 lines
Log Message:
GPLv3

File Contents

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