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