*** empty log message ***
[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::rootwin_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
527 #ifdef HAVE_AFTERIMAGE
528         if (rs [Rs_blurradius])
529           bgPixmap.set_blur_radius (rs [Rs_blurradius]);
530 #endif
531         if (ISSET_PIXCOLOR (Color_tint))
532           bgPixmap.set_tint (pix_colors_focused [Color_tint]);
533
534         if (rs [Rs_shade])
535           bgPixmap.set_shade (rs [Rs_shade]);
536
537         bgPixmap.set_root_pixmap ();
538         XSelectInput (dpy, display->root, PropertyChangeMask);
539         rootwin_ev.start (display, display->root);
540       }
541 #endif
542
543 #ifdef BG_IMAGE_FROM_FILE
544     if (rs[Rs_backgroundPixmap])
545       {
546         const char *p = rs[Rs_backgroundPixmap];
547
548         if ((p = strchr (p, ';')) != 0)
549           {
550             p++;
551             bgPixmap.set_geometry (p);
552           }
553         else
554           bgPixmap.set_defaultGeometry ();
555
556         if (bgPixmap.set_file (rs[Rs_backgroundPixmap]))
557           if (!bgPixmap.window_position_sensitive ())
558             update_background ();
559       }
560 #endif
561   }
562 #endif
563
564 #if ENABLE_PERL
565   rootwin_ev.start (display, display->root);
566 #endif
567
568   set_colorfgbg ();
569
570   init_command (cmd_argv);
571
572   free (cmd_argv);
573
574   if (pty->pty >= 0)
575     pty_ev.start (pty->pty, ev::READ);
576
577   HOOK_INVOKE ((this, HOOK_START, DT_END));
578
579 #if ENABLE_XEMBED
580   if (rs[Rs_embed])
581     {
582       long info[2] = { 0, XEMBED_MAPPED };
583
584       XChangeProperty (dpy, parent[0], xa[XA_XEMBED_INFO], xa[XA_XEMBED_INFO],
585                        32, PropModeReplace, (unsigned char *)&info, 2);
586     }
587 #endif
588
589   XMapWindow (dpy, vt);
590   XMapWindow (dpy, parent[0]);
591 }
592
593 static struct sig_handlers
594 {
595   ev::sig sw_term, sw_int;
596
597   /*
598    * Catch a fatal signal and tidy up before quitting
599    */
600   void sig_term (ev::sig &w, int revents);
601
602   sig_handlers ()
603   {
604     sw_term.set<sig_handlers, &sig_handlers::sig_term> (this);
605     sw_int .set<sig_handlers, &sig_handlers::sig_term> (this);
606   }
607 } sig_handlers;
608
609 void
610 sig_handlers::sig_term (ev::sig &w, int revents)
611 {
612   rxvt_emergency_cleanup ();
613   w.stop ();
614   kill (getpid (), w.signum);
615 }
616
617 char **rxvt_environ; // startup environment
618
619 void
620 rxvt_init ()
621 {
622   ptytty::init ();
623
624   if (!ev_default_loop (0))
625     rxvt_fatal ("cannot initialise libev (bad value for LIBEV_METHODS?)\n");
626
627   rxvt_environ = environ;
628
629   signal (SIGHUP,  SIG_IGN);
630   signal (SIGPIPE, SIG_IGN);
631
632   sig_handlers.sw_term.start (SIGTERM); ev_unref ();
633   sig_handlers.sw_int.start  (SIGINT);  ev_unref ();
634
635   /* need to trap SIGURG for SVR4 (Unixware) rlogin */
636   /* signal (SIGURG, SIG_DFL); */
637
638   old_xerror_handler = XSetErrorHandler ((XErrorHandler) rxvt_xerror_handler);
639   // TODO: handle this with exceptions and tolerate the memory loss
640   XSetIOErrorHandler (rxvt_xioerror_handler);
641
642   XrmInitialize ();
643 }
644
645 /*----------------------------------------------------------------------*/
646 /*
647  * window size/position calculations for XSizeHint and other storage.
648  * if width/height are non-zero then override calculated width/height
649  */
650 void
651 rxvt_term::window_calc (unsigned int newwidth, unsigned int newheight)
652 {
653   short recalc_x, recalc_y;
654   int x, y, sb_w, flags;
655   unsigned int w, h;
656   unsigned int max_width, max_height;
657
658   szHint.flags = PMinSize | PResizeInc | PBaseSize | PWinGravity;
659   szHint.win_gravity = NorthWestGravity;
660   /* szHint.min_aspect.x = szHint.min_aspect.y = 1; */
661
662   recalc_x = recalc_y = 0;
663   flags = 0;
664
665   if (!parsed_geometry)
666     {
667       parsed_geometry = 1;
668
669       if (rs[Rs_geometry])
670         flags = XParseGeometry (rs[Rs_geometry], &x, &y, &w, &h);
671
672       if (flags & WidthValue)
673         {
674           ncol = clamp (w, 0, std::numeric_limits<int16_t>::max ());
675           szHint.flags |= USSize;
676         }
677
678       if (flags & HeightValue)
679         {
680           nrow = clamp (h, 0, std::numeric_limits<int16_t>::max ());
681           szHint.flags |= USSize;
682         }
683
684       if (flags & XValue)
685         {
686           szHint.x = x;
687           szHint.flags |= USPosition;
688
689           if (flags & XNegative)
690             {
691               recalc_x = 1;
692               szHint.win_gravity = NorthEastGravity;
693             }
694         }
695
696       if (flags & YValue)
697         {
698           szHint.y = y;
699           szHint.flags |= USPosition;
700
701           if (flags & YNegative)
702             {
703               recalc_y = 1;
704
705               if (szHint.win_gravity == NorthEastGravity)
706                 szHint.win_gravity = SouthEastGravity;
707               else
708                 szHint.win_gravity = SouthWestGravity;
709             }
710         }
711     }
712
713   /* TODO: BOUNDS */
714   width = ncol * fwidth;
715   height = nrow * fheight;
716   max_width = MAX_COLS * fwidth;
717   max_height = MAX_ROWS * fheight;
718
719   szHint.base_width = szHint.base_height = 2 * int_bwidth;
720
721   sb_w = 0;
722   window_vt_x = window_vt_y = int_bwidth;
723
724   if (scrollBar.state)
725     {
726       sb_w = scrollbar_TotalWidth ();
727       szHint.base_width += sb_w;
728
729       if (!option (Opt_scrollBar_right))
730         window_vt_x += sb_w;
731     }
732
733   szHint.width_inc  = fwidth;
734   szHint.height_inc = fheight;
735   szHint.min_width  = szHint.base_width + szHint.width_inc;
736   szHint.min_height = szHint.base_height + szHint.height_inc;
737
738   if (newwidth && newwidth - szHint.base_width < max_width)
739     {
740       szHint.width = newwidth;
741       width = newwidth - szHint.base_width;
742     }
743   else
744     {
745       min_it (width, max_width);
746       szHint.width = szHint.base_width + width;
747     }
748
749   if (newheight && newheight - szHint.base_height < max_height)
750     {
751       szHint.height = newheight;
752       height = newheight - szHint.base_height;
753     }
754   else
755     {
756       min_it (height, max_height);
757       szHint.height = szHint.base_height + height;
758     }
759
760   if (scrollBar.state && option (Opt_scrollBar_right))
761     window_sb_x = szHint.width - sb_w;
762
763   if (recalc_x)
764     szHint.x += DisplayWidth  (dpy, display->screen) - szHint.width  - 2 * ext_bwidth;
765
766   if (recalc_y)
767     szHint.y += DisplayHeight (dpy, display->screen) - szHint.height - 2 * ext_bwidth;
768
769   ncol = width / fwidth;
770   nrow = height / fheight;
771 }
772
773 /*----------------------------------------------------------------------*/
774 /*
775  * Tell the teletype handler what size the window is.
776  * Called after a window size change.
777  */
778 void
779 rxvt_term::tt_winch ()
780 {
781   if (pty->pty < 0)
782     return;
783
784   struct winsize ws;
785
786   ws.ws_col = ncol;
787   ws.ws_row = nrow;
788   ws.ws_xpixel = width;
789   ws.ws_ypixel = height;
790   (void)ioctl (pty->pty, TIOCSWINSZ, &ws);
791
792 #if 0
793   // TIOCSWINSZ is supposed to do this automatically and correctly
794   if (cmd_pid)               /* force through to the command */
795     kill (-cmd_pid, SIGWINCH);
796 #endif
797 }
798
799 /*----------------------------------------------------------------------*/
800 /* set_fonts () - load and set the various fonts
801  *
802  * init = 1   - initialize
803  *
804  * fontname == FONT_UP  - switch to bigger font
805  * fontname == FONT_DN  - switch to smaller font
806  */
807 bool
808 rxvt_term::set_fonts ()
809 {
810   rxvt_fontset *fs = new rxvt_fontset (this);
811   rxvt_fontprop prop;
812
813   if (!fs
814       || !fs->populate (rs[Rs_font] ? rs[Rs_font] : "fixed")
815       || !fs->realize_font (1))
816     {
817       delete fs;
818       return false;
819     }
820
821 #if ENABLE_STYLES
822   for (int i = RS_styleCount; --i; )
823     if (fontset[i] != fontset[0])
824       delete fontset[i];
825 #endif
826
827   delete fontset[0];
828   fontset[0] = fs;
829
830   prop = (*fs)[1]->properties ();
831   prop.height += lineSpace;
832
833   fs->set_prop (prop, false);
834
835   fwidth  = prop.width;
836   fheight = prop.height;
837   fbase   = prop.ascent;
838
839   for (int style = 1; style < 4; style++)
840     {
841 #if ENABLE_STYLES
842       const char *res = rs[Rs_font + style];
843
844       if (res && !*res)
845         fontset[style] = fontset[0];
846       else
847         {
848           fontset[style] = fs = new rxvt_fontset (this);
849           rxvt_fontprop prop2 = prop;
850
851           if (res)
852             {
853               fs->populate (res);
854               fs->set_prop (prop2, false);
855             }
856           else
857             {
858               fs->populate (fontset[0]->fontdesc);
859
860               if (SET_STYLE (0, style) & RS_Bold)   prop2.weight = rxvt_fontprop::bold;
861               if (SET_STYLE (0, style) & RS_Italic) prop2.slant  = rxvt_fontprop::italic;
862
863               fs->set_prop (prop2, true);
864             }
865
866         }
867 #else
868       fontset[style] = fontset[0];
869 #endif
870     }
871
872   if (parent[0])
873     {
874       resize_all_windows (0, 0, 0);
875       scr_remap_chars ();
876       scr_touch (true);
877     }
878
879   return true;
880 }
881
882 void
883 rxvt_term::set_string_property (Atom prop, const char *str, int len)
884 {
885   XChangeProperty (dpy, parent[0],
886                    prop, XA_STRING, 8, PropModeReplace,
887                    (const unsigned char *)str, len >= 0 ? len : strlen (str));
888 }
889
890 void
891 rxvt_term::set_utf8_property (Atom prop, const char *str, int len)
892 {
893   wchar_t *ws = rxvt_mbstowcs (str, len);
894   char *s = rxvt_wcstoutf8 (ws);
895
896   XChangeProperty (dpy, parent[0],
897                    prop, xa[XA_UTF8_STRING], 8, PropModeReplace,
898                    (const unsigned char *)s, strlen (s));
899
900   free (s);
901   free (ws);
902 }
903
904 /*----------------------------------------------------------------------*/
905 /*----------------------------------------------------------------------*/
906 /* xterm sequences - title, iconName, color (exptl) */
907 void
908 rxvt_term::set_title (const char *str)
909 {
910   set_string_property (XA_WM_NAME, str);
911 #if ENABLE_EWMH
912   set_utf8_property (xa[XA_NET_WM_NAME], str);
913 #endif
914 }
915
916 void
917 rxvt_term::set_icon_name (const char *str)
918 {
919   set_string_property (XA_WM_ICON_NAME, str);
920 #if ENABLE_EWMH
921   set_utf8_property (xa[XA_NET_WM_ICON_NAME], str);
922 #endif
923 }
924
925 void
926 rxvt_term::set_window_color (int idx, const char *color)
927 {
928 #ifdef XTERM_COLOR_CHANGE
929   rxvt_color xcol;
930   int i;
931
932   if (color == NULL || *color == '\0')
933     return;
934
935   color = strdup (color);
936   allocated.push_back ((void *)color);
937   rs[Rs_color + idx] = color;
938
939   /* handle color aliases */
940   if (isdigit (*color))
941     {
942       i = atoi (color);
943
944       if (i >= 8 && i <= 15)
945         {
946           /* bright colors */
947           pix_colors_focused[idx] = pix_colors_focused[minBrightCOLOR + i - 8];
948           goto done;
949         }
950
951       if (i >= 0 && i <= 7)
952         {
953           /* normal colors */
954           pix_colors_focused[idx] = pix_colors_focused[minCOLOR + i];
955           goto done;
956         }
957     }
958
959   set_color (xcol, color);
960
961   /*
962    * FIXME: should free colors here, but no idea how to do it so instead,
963    * so just keep gobbling up the colormap
964    */
965
966   pix_colors_focused[idx] = xcol;
967
968 done:
969   /*TODO: handle Color_BD, scrollbar background, etc. */
970
971   update_fade_color (idx);
972   recolour_cursor ();
973   scr_recolour ();
974 #endif /* XTERM_COLOR_CHANGE */
975 }
976
977 void
978 rxvt_term::recolour_cursor ()
979 {
980   XColor fg, bg;
981
982   (ISSET_PIXCOLOR (Color_pointer_fg)
983      ? pix_colors_focused[Color_pointer_fg]
984      : pix_colors_focused[Color_fg]).get (fg);
985
986   (ISSET_PIXCOLOR (Color_pointer_bg)
987      ? pix_colors_focused[Color_pointer_bg]
988      : pix_colors_focused[Color_bg]).get (bg);
989
990   XRecolorCursor (dpy, TermWin_cursor, &fg, &bg);
991 }
992
993 /*----------------------------------------------------------------------*/
994 /*
995  * find if fg/bg matches any of the normal (low-intensity) colors
996  */
997 void
998 rxvt_term::set_colorfgbg ()
999 {
1000   unsigned int i;
1001   const char *xpmb = "";
1002   char fstr[sizeof ("default") + 1], bstr[sizeof ("default") + 1];
1003
1004   strcpy (fstr, "default");
1005   strcpy (bstr, "default");
1006   for (i = Color_Black; i <= Color_White; i++)
1007     if (pix_colors[Color_fg] == pix_colors[i])
1008       {
1009         sprintf (fstr, "%d", (i - Color_Black));
1010         break;
1011       }
1012
1013   for (i = Color_Black; i <= Color_White; i++)
1014     if (pix_colors[Color_bg] == pix_colors[i])
1015       {
1016         sprintf (bstr, "%d", (i - Color_Black));
1017 #ifdef BG_IMAGE_FROM_FILE
1018         xpmb = "default;";
1019 #endif
1020         break;
1021       }
1022
1023   sprintf (env_colorfgbg, "COLORFGBG=%s;%s%s", fstr, xpmb, bstr);
1024 }
1025
1026 /*----------------------------------------------------------------------*/
1027
1028 bool
1029 rxvt_term::set_color (rxvt_color &color, const char *name)
1030 {
1031   if (color.set (this, name))
1032     return true;
1033
1034   rxvt_warn ("can't get colour '%s', continuing without.\n", name);
1035   return false;
1036 }
1037
1038 void
1039 rxvt_term::alias_color (int dst, int src)
1040 {
1041   pix_colors[dst].set (this, rs[Rs_color + dst] = rs[Rs_color + src]);
1042 }
1043
1044 /* -------------------------------------------------------------------- *
1045  * -                         WINDOW RESIZING                          - *
1046  * -------------------------------------------------------------------- */
1047 void
1048 rxvt_term::resize_all_windows (unsigned int newwidth, unsigned int newheight, int ignoreparent)
1049 {
1050   int fix_screen;
1051   int old_width  = szHint.width;
1052   int old_height = szHint.height;
1053
1054   window_calc (newwidth, newheight);
1055
1056   if (!HOOK_INVOKE ((this, HOOK_RESIZE_ALL_WINDOWS, DT_INT, newwidth, DT_INT, newheight, DT_END)))
1057     XSetWMNormalHints (dpy, parent[0], &szHint);
1058
1059   if (!ignoreparent)
1060     {
1061 #ifdef SMART_RESIZE
1062       /*
1063        * resize by Marius Gedminas <marius.gedminas@uosis.mif.vu.lt>
1064        * reposition window on resize depending on placement on screen
1065        */
1066       int x, y, x1, y1;
1067       int dx, dy;
1068       unsigned int unused_w1, unused_h1, unused_b1, unused_d1;
1069       Window unused_cr;
1070
1071       XTranslateCoordinates (dpy, parent[0], display->root,
1072                              0, 0, &x, &y, &unused_cr);
1073       XGetGeometry (dpy, parent[0], &unused_cr, &x1, &y1,
1074                     &unused_w1, &unused_h1, &unused_b1, &unused_d1);
1075       /*
1076        * if display->root isn't the parent window, a WM will probably have offset
1077        * our position for handles and decorations.  Counter it
1078        */
1079       if (x1 != x || y1 != y)
1080         {
1081           x -= x1;
1082           y -= y1;
1083         }
1084
1085       x1 = (DisplayWidth  (dpy, display->screen) - old_width ) / 2;
1086       y1 = (DisplayHeight (dpy, display->screen) - old_height) / 2;
1087       dx = old_width  - szHint.width;
1088       dy = old_height - szHint.height;
1089
1090       /* Check position of the center of the window */
1091       if (x < x1)             /* left half */
1092         dx = 0;
1093       else if (x == x1)       /* exact center */
1094         dx /= 2;
1095       if (y < y1)             /* top half */
1096         dy = 0;
1097       else if (y == y1)       /* exact center */
1098         dy /= 2;
1099
1100       XMoveResizeWindow (dpy, parent[0], x + dx, y + dy,
1101                          szHint.width, szHint.height);
1102 #else
1103       XResizeWindow (dpy, parent[0], szHint.width, szHint.height);
1104 #endif
1105     }
1106
1107   fix_screen = ncol != prev_ncol || nrow != prev_nrow;
1108
1109   if (fix_screen || newwidth != old_width || newheight != old_height)
1110     {
1111       if (scrollBar.state)
1112         {
1113           XMoveResizeWindow (dpy, scrollBar.win,
1114                              window_sb_x, 0,
1115                              scrollbar_TotalWidth (), szHint.height);
1116           resize_scrollbar ();
1117         }
1118
1119       XMoveResizeWindow (dpy, vt,
1120                          window_vt_x, window_vt_y,
1121                          width, height);
1122
1123 #ifdef HAVE_BG_PIXMAP
1124       if (bgPixmap.window_size_sensitive ())
1125         update_background ();
1126 #endif
1127
1128       scr_clear ();
1129     }
1130
1131   if (fix_screen || old_height == 0)
1132     scr_reset ();
1133
1134   // TODO, with nvidia-8178, resizes kill the alpha channel, report if not fixed in newer version
1135   //scr_touch (false);
1136
1137 #ifdef HAVE_BG_PIXMAP
1138 //  TODO: this don't seem to have any effect - do we still need it ? If so - in which case exactly ?
1139 //  if (bgPixmap.pixmap)
1140 //    scr_touch (false);
1141 #endif
1142
1143 #ifdef USE_XIM
1144   IMSetPosition ();
1145 #endif
1146 }
1147
1148 /*
1149  * Set the width/height of the vt window in characters.  Units are pixels.
1150  * good for toggling 80/132 columns
1151  */
1152 void
1153 rxvt_term::set_widthheight (unsigned int newwidth, unsigned int newheight)
1154 {
1155   XWindowAttributes wattr;
1156
1157   if (newwidth == 0 || newheight == 0)
1158     {
1159       XGetWindowAttributes (dpy, display->root, &wattr);
1160
1161       if (newwidth == 0)
1162         newwidth = wattr.width - szHint.base_width;
1163       if (newheight == 0)
1164         newheight = wattr.height - szHint.base_height;
1165     }
1166
1167   if (newwidth != width || newheight != height)
1168     {
1169       newwidth += szHint.base_width;
1170       newheight += szHint.base_height;
1171       resize_all_windows (newwidth, newheight, 0);
1172     }
1173 }
1174
1175 /* -------------------------------------------------------------------- *
1176  * -                      X INPUT METHOD ROUTINES                     - *
1177  * -------------------------------------------------------------------- */
1178 #ifdef USE_XIM
1179
1180 void
1181 rxvt_term::im_set_color (unsigned long &fg, unsigned long &bg)
1182 {
1183   fg = pix_colors [Color_fg];
1184   bg = pix_colors [Color_bg];
1185 }
1186
1187 void
1188 rxvt_term::im_set_size (XRectangle &size)
1189 {
1190   // the int_bwidth terms make no sense to me
1191   size.x      = int_bwidth;
1192   size.y      = int_bwidth;
1193   size.width  = Width2Pixel (ncol) + int_bwidth;
1194   size.height = Height2Pixel (nrow) + int_bwidth;
1195 }
1196
1197 void
1198 rxvt_term::im_set_preedit_area (XRectangle &preedit_rect,
1199                                 XRectangle &status_rect,
1200                                 const XRectangle &needed_rect)
1201 {
1202   preedit_rect.x      = needed_rect.width;
1203   preedit_rect.y      = 0;
1204   preedit_rect.width  = Width2Pixel (ncol) - needed_rect.width + 1;
1205   preedit_rect.height = fheight;
1206
1207   status_rect.x       = 0;
1208   status_rect.y       = 0;
1209   status_rect.width   = needed_rect.width ? needed_rect.width : Width2Pixel (ncol) + 1;
1210   status_rect.height  = fheight;
1211 }
1212
1213 /* Checking whether input method is running. */
1214 bool
1215 rxvt_term::IMisRunning ()
1216 {
1217   char *p;
1218   Atom atom;
1219   Window win;
1220   char server[IMBUFSIZ];
1221
1222   /* get current locale modifier */
1223   if ((p = XSetLocaleModifiers (NULL)) != NULL)
1224     {
1225       strcpy (server, "@server=");
1226       strncat (server, & (p[4]), IMBUFSIZ - 9); /* skip "@im=" */
1227
1228       if ((p = strchr (server + 1, '@')) != NULL)      /* first one only */
1229         *p = '\0';
1230
1231       atom = XInternAtom (dpy, server, False);
1232       win = XGetSelectionOwner (dpy, atom);
1233
1234       if (win != None)
1235         return True;
1236     }
1237
1238   return False;
1239 }
1240
1241 void
1242 rxvt_term::IMSendSpot ()
1243 {
1244   XPoint nspot;
1245   XVaNestedList preedit_attr;
1246
1247   if (!Input_Context
1248       || !focus
1249       || !(input_style & (XIMPreeditPosition | XIMPreeditCallbacks)))
1250     return;
1251
1252   im_set_position (nspot);
1253
1254   if (nspot.x == spot.x && nspot.y == spot.y)
1255     return;
1256
1257   spot = nspot;
1258
1259   preedit_attr = XVaCreateNestedList (0, XNSpotLocation, &spot, NULL);
1260   XSetICValues (Input_Context, XNPreeditAttributes, preedit_attr, NULL);
1261   XFree (preedit_attr);
1262 }
1263
1264 void
1265 rxvt_term::im_destroy ()
1266 {
1267   if (input_method)
1268     {
1269       if (Input_Context && input_method->xim)
1270         XDestroyIC (Input_Context);
1271
1272       display->put_xim (input_method);
1273       input_method = 0;
1274     }
1275
1276   Input_Context = 0;
1277 }
1278
1279 #ifdef ENABLE_XIM_ONTHESPOT
1280
1281 static void
1282 xim_preedit_start (XIC ic, XPointer client_data, XPointer call_data)
1283 {
1284   ((rxvt_term *)client_data)->make_current ();
1285   HOOK_INVOKE (((rxvt_term *)client_data, HOOK_XIM_PREEDIT_START, DT_END));
1286 }
1287
1288 static void
1289 xim_preedit_done (XIC ic, XPointer client_data, XPointer call_data)
1290 {
1291   ((rxvt_term *)client_data)->make_current ();
1292   HOOK_INVOKE (((rxvt_term *)client_data, HOOK_XIM_PREEDIT_DONE, DT_END));
1293 }
1294
1295 static void
1296 xim_preedit_draw (XIC ic, XPointer client_data, XIMPreeditDrawCallbackStruct *call_data)
1297 {
1298   rxvt_term *term = (rxvt_term *)client_data;
1299   XIMText *text = call_data->text;
1300
1301   term->make_current ();
1302
1303   if (text)
1304     {
1305       void *str;
1306
1307       if (!text->encoding_is_wchar && text->string.multi_byte)
1308         {
1309           // of course, X makes it ugly again
1310           if (term->rs[Rs_imLocale])
1311             SET_LOCALE (term->rs[Rs_imLocale]);
1312
1313           str = rxvt_temp_buf ((text->length + 1) * sizeof (wchar_t));
1314           mbstowcs ((wchar_t *)str, text->string.multi_byte, text->length + 1);
1315
1316           if (term->rs[Rs_imLocale])
1317             SET_LOCALE (term->locale);
1318         }
1319       else
1320         str = (void *)text->string.wide_char;
1321
1322       HOOK_INVOKE ((term, HOOK_XIM_PREEDIT_DRAW,
1323                     DT_INT, call_data->caret,
1324                     DT_INT, call_data->chg_first,
1325                     DT_INT, call_data->chg_length,
1326                     DT_LCS_LEN, (void *)text->feedback, text->feedback ? (int)text->length : 0,
1327                     DT_WCS_LEN, str, str ? (int)text->length : 0,
1328                     DT_END));
1329     }
1330   else
1331     HOOK_INVOKE ((term, HOOK_XIM_PREEDIT_DRAW,
1332                   DT_INT, call_data->caret,
1333                   DT_INT, call_data->chg_first,
1334                   DT_INT, call_data->chg_length,
1335                   DT_END));
1336 }
1337
1338 #if 0
1339 static void
1340 xim_preedit_caret (XIC ic, XPointer client_data, XIMPreeditCaretCallbackStruct *call_data)
1341 {
1342   ((rxvt_term *)client_data)->make_current ();
1343   HOOK_INVOKE (((rxvt_term *)client_data, HOOK_XIM_PREEDIT_CARET,
1344                 DT_INT, call_data->position,
1345                 DT_INT, call_data->direction,
1346                 DT_INT, call_data->style,
1347                 DT_END));
1348 }
1349 #endif
1350
1351 #endif
1352
1353 /*
1354  * Try to open a XIM with the current modifiers, then see if we can
1355  * open a suitable preedit type
1356  */
1357 bool
1358 rxvt_term::IM_get_IC (const char *modifiers)
1359 {
1360   int i, j, found;
1361   XIM xim;
1362   XPoint spot;
1363   XRectangle rect, status_rect, needed_rect;
1364   unsigned long fg, bg;
1365   const char *p;
1366   char **s;
1367   XIMStyles *xim_styles;
1368 #ifdef ENABLE_XIM_ONTHESPOT
1369   XIMCallback xcb[4];
1370 #endif
1371
1372   set_environ (envv);
1373
1374   if (! ((p = XSetLocaleModifiers (modifiers)) && *p))
1375     return false;
1376
1377   input_method = display->get_xim (locale, modifiers);
1378   if (input_method == NULL)
1379     return false;
1380
1381   xim = input_method->xim;
1382   spot.x = spot.y = -1;
1383
1384   xim_styles = NULL;
1385   if (XGetIMValues (xim, XNQueryInputStyle, &xim_styles, NULL)
1386       || !xim_styles || !xim_styles->count_styles)
1387     {
1388       im_destroy ();
1389       return false;
1390     }
1391
1392   const char *pet[] = { rs[Rs_preeditType], "OverTheSpot,OffTheSpot,Root,None" };
1393
1394   for (int pi = 0; pi < 2; pi++)
1395     {
1396       p = pet[pi];
1397
1398       if (!p)
1399         continue;
1400
1401       s = rxvt_splitcommastring (p);
1402
1403       for (i = found = 0; !found && s[i]; i++)
1404         {
1405           if (!strcmp (s[i], "OverTheSpot"))
1406             input_style = XIMPreeditPosition | XIMStatusNothing;
1407           else if (!strcmp (s[i], "OffTheSpot"))
1408             input_style = XIMPreeditArea | XIMStatusArea;
1409           else if (!strcmp (s[i], "Root"))
1410             input_style = XIMPreeditNothing | XIMStatusNothing;
1411           else if (!strcmp (s[i], "None"))
1412             input_style = XIMPreeditNone | XIMStatusNone;
1413 #ifdef ENABLE_XIM_ONTHESPOT
1414           else if (SHOULD_INVOKE (HOOK_XIM_PREEDIT_START) && !strcmp (s[i], "OnTheSpot"))
1415             input_style = XIMPreeditCallbacks | XIMStatusNothing;
1416 #endif
1417           else
1418             input_style = XIMPreeditNothing | XIMStatusNothing;
1419
1420           for (j = 0; j < xim_styles->count_styles; j++)
1421             if (input_style == xim_styles->supported_styles[j])
1422               {
1423                 rxvt_freecommastring (s);
1424
1425                 found = 1;
1426                 goto foundpet;
1427               }
1428
1429         }
1430
1431       rxvt_freecommastring (s);
1432     }
1433
1434 foundpet:
1435
1436   XFree (xim_styles);
1437
1438   if (!found)
1439     {
1440       im_destroy ();
1441       return false;
1442     }
1443
1444   XFontSet fs = 0;
1445   XVaNestedList preedit_attr = 0, status_attr = 0;
1446
1447   if (input_style & (XIMPreeditPosition | XIMPreeditArea))
1448     {
1449       // fake us a font-set, please
1450       char **missing_charset_list;
1451       int missing_charset_count;
1452       char *def_string;
1453       char pat[512];
1454
1455       sprintf (pat,
1456                "-*-*-*-R-*-*-%d-*-*-*-*-*-*,"
1457                "-*-*-*-R-*-*-%d-*-*-*-*-*-*,"
1458                "-*-*-*-R-*-*-%d-*-*-*-*-*-*,"
1459                "-*-*-*-R-*-*-%d-*-*-*-*-*-*,"
1460                "-*-*-*-R-*-*-%d-*-*-*-*-*-*,"
1461                "*",
1462                fheight,
1463                fheight + 1, fheight - 1,
1464                fheight - 2, fheight + 2);
1465
1466       fs = XCreateFontSet (dpy, rs[Rs_imFont] ? rs[Rs_imFont] : pat,
1467                            &missing_charset_list, &missing_charset_count, &def_string);
1468
1469       if (missing_charset_list)
1470         XFreeStringList (missing_charset_list);
1471
1472       if (!fs)
1473         {
1474           input_style &= ~(XIMPreeditPosition | XIMPreeditArea);
1475           rxvt_warn ("unable to create fontset for input method, try \"-pt Root\". Continuing.\n");
1476         }
1477     }
1478
1479   if (input_style & XIMPreeditPosition)
1480     {
1481       im_set_size (rect);
1482       im_set_position (spot);
1483       im_set_color (fg, bg);
1484
1485       preedit_attr = XVaCreateNestedList (0,
1486                                           XNForeground, fg,
1487                                           XNBackground, bg,
1488                                           XNArea, &rect,
1489                                           XNSpotLocation, &spot,
1490                                           XNFontSet, fs,
1491                                           NULL);
1492     }
1493   else if (input_style & XIMPreeditArea)
1494     {
1495       im_set_color (fg, bg);
1496
1497       /*
1498        * The necessary width of preedit area is unknown
1499        * until create input context.
1500        */
1501       needed_rect.width = 0;
1502       im_set_preedit_area (rect, status_rect, needed_rect);
1503
1504       preedit_attr = XVaCreateNestedList (0,
1505                                           XNForeground, fg,
1506                                           XNBackground, bg,
1507                                           XNArea, &rect,
1508                                           XNFontSet, fs,
1509                                           NULL);
1510       status_attr = XVaCreateNestedList (0,
1511                                          XNForeground, fg,
1512                                          XNBackground, bg,
1513                                          XNArea, &status_rect,
1514                                          XNFontSet, fs,
1515                                          NULL);
1516     }
1517 #if ENABLE_XIM_ONTHESPOT
1518   else if (input_style & XIMPreeditCallbacks)
1519     {
1520       im_set_position (spot);
1521
1522       xcb[0].client_data = (XPointer)this; xcb[0].callback = (XIMProc)xim_preedit_start;
1523       xcb[1].client_data = (XPointer)this; xcb[1].callback = (XIMProc)xim_preedit_done;
1524       xcb[2].client_data = (XPointer)this; xcb[2].callback = (XIMProc)xim_preedit_draw;
1525 # if 0
1526       xcb[3].client_data = (XPointer)this; xcb[3].callback = (XIMProc)xim_preedit_caret;
1527 # endif
1528
1529       preedit_attr = XVaCreateNestedList (0,
1530                                           XNSpotLocation, &spot,
1531                                           XNPreeditStartCallback, &xcb[0],
1532                                           XNPreeditDoneCallback , &xcb[1],
1533                                           XNPreeditDrawCallback , &xcb[2],
1534 # if 0
1535                                           XNPreeditCaretCallback, &xcb[3],
1536 # endif
1537                                           NULL);
1538     }
1539 #endif
1540
1541   Input_Context = XCreateIC (xim,
1542                              XNInputStyle, input_style,
1543                              XNClientWindow, vt,
1544                              XNFocusWindow, parent[0],
1545                              preedit_attr ? XNPreeditAttributes : NULL,
1546                              preedit_attr,
1547                              status_attr ? XNStatusAttributes : NULL,
1548                              status_attr, NULL);
1549
1550   if (preedit_attr) XFree (preedit_attr);
1551   if (status_attr)  XFree (status_attr);
1552   if (fs)           XFreeFontSet (dpy, fs);
1553
1554   if (Input_Context == NULL)
1555     {
1556       rxvt_warn ("failed to create input context, continuing without XIM.\n");
1557       im_destroy ();
1558       return false;
1559     }
1560
1561 #if 0
1562   // unfortunately, only the focus window is used by XIM, hard to fix
1563   if (!XGetICValues (Input_Context, XNFilterEvents, &vt_emask_xim, NULL))
1564     vt_select_input ();
1565 #endif
1566
1567   IMSetPosition ();
1568
1569   return true;
1570 }
1571
1572 void
1573 rxvt_term::im_cb ()
1574 {
1575   int i;
1576   const char *p;
1577   char **s;
1578   char buf[IMBUFSIZ];
1579
1580   make_current ();
1581
1582   im_destroy ();
1583
1584   if (Input_Context)
1585     return;
1586
1587 #if defined(HAVE_XSETLOCALE) || defined(HAVE_SETLOCALE)
1588   if (rs[Rs_imLocale])
1589     SET_LOCALE (rs[Rs_imLocale]);
1590 #endif
1591
1592   p = rs[Rs_inputMethod];
1593   if (p && *p)
1594     {
1595       bool found = false;
1596
1597       s = rxvt_splitcommastring (p);
1598
1599       for (i = 0; s[i]; i++)
1600         {
1601           if (*s[i])
1602             {
1603               strcpy (buf, "@im=");
1604               strncat (buf, s[i], IMBUFSIZ - 5);
1605               if (IM_get_IC (buf))
1606                 {
1607                   found = true;
1608                   break;
1609                 }
1610             }
1611         }
1612
1613       rxvt_freecommastring (s);
1614
1615       if (found)
1616         goto done;
1617     }
1618
1619   /* try with XMODIFIERS env. var. */
1620   if (IM_get_IC (""))
1621     goto done;
1622
1623   /* try with no modifiers base IF the user didn't specify an IM */
1624   if (IM_get_IC ("@im=none"))
1625     goto done;
1626
1627 done:
1628 #if defined(HAVE_XSETLOCALE) || defined(HAVE_SETLOCALE)
1629   if (rs[Rs_imLocale])
1630     SET_LOCALE (locale);
1631 #endif
1632 }
1633
1634 void
1635 rxvt_term::IMSetPosition ()
1636 {
1637   XRectangle preedit_rect, status_rect, *needed_rect;
1638   XVaNestedList preedit_attr, status_attr;
1639
1640   if (!Input_Context
1641       || !focus
1642       || !(input_style & (XIMPreeditArea | XIMPreeditPosition))
1643       || !IMisRunning ())
1644     return;
1645
1646   if (input_style & XIMPreeditPosition)
1647     {
1648       im_set_size (preedit_rect);
1649       preedit_attr = XVaCreateNestedList (0, XNArea, &preedit_rect, NULL);
1650
1651       XSetICValues (Input_Context,
1652                     XNPreeditAttributes, preedit_attr, NULL);
1653     }
1654   else
1655     {
1656       /* Getting the necessary width of preedit area */
1657       status_attr = XVaCreateNestedList (0, XNAreaNeeded, &needed_rect, NULL);
1658       XGetICValues (Input_Context, XNStatusAttributes, status_attr, NULL);
1659       XFree (status_attr);
1660
1661       im_set_preedit_area (preedit_rect, status_rect, *needed_rect);
1662       XFree (needed_rect);
1663
1664       preedit_attr = XVaCreateNestedList (0, XNArea, &preedit_rect, NULL);
1665       status_attr  = XVaCreateNestedList (0, XNArea, &status_rect,  NULL);
1666
1667       XSetICValues (Input_Context,
1668                     XNPreeditAttributes, preedit_attr,
1669                     XNStatusAttributes,  status_attr,
1670                     NULL);
1671
1672       XFree (status_attr);
1673     }
1674
1675    XFree (preedit_attr);
1676 }
1677 #endif /* USE_XIM */
1678
1679 void
1680 rxvt_term::get_window_origin (int &x, int &y)
1681 {
1682   Window cr;
1683   XTranslateCoordinates (dpy, parent[0], display->root, 0, 0, &x, &y, &cr);
1684 /*  fprintf (stderr, "origin is %+d%+d\n", x, y);*/
1685 }
1686
1687 Pixmap
1688 rxvt_term::get_pixmap_property (int prop_id)
1689 {
1690   if (prop_id > 0 && prop_id < NUM_XA)
1691     if (xa[prop_id])
1692       {
1693         int aformat;
1694         unsigned long nitems, bytes_after;
1695         Atom atype;
1696         unsigned char *prop = NULL;
1697         int result = XGetWindowProperty (dpy, display->root, xa[prop_id],
1698                                          0L, 1L, False, XA_PIXMAP, &atype, &aformat,
1699                                          &nitems, &bytes_after, &prop);
1700         if (result == Success && prop && atype == XA_PIXMAP)
1701           {
1702             return *(Pixmap *)prop;
1703           }
1704       }
1705   return None;
1706 }
1707
1708 #ifdef HAVE_BG_PIXMAP
1709 # if TRACE_PIXMAPS
1710 #  undef update_background
1711 void
1712 rxvt_term::trace_update_background (const char *file, int line)
1713 {
1714   fprintf (stderr, "%s:%d:update_background()\n", file, line);
1715   update_background ();
1716 }
1717 # endif
1718
1719 void
1720 rxvt_term::update_background ()
1721 {
1722   bgPixmap.invalidate ();
1723
1724   /* no chance of real time refresh if we are blurring! */
1725   if (bgPixmap.invalid_since + 0.50 < ev::now ()
1726       && !(bgPixmap.flags & bgPixmap_t::blurNeeded))
1727     {
1728       update_background_ev.stop ();
1729       bgPixmap.render ();
1730     }
1731   else
1732     {
1733       ev_tstamp refresh;
1734
1735       if (!bgPixmap.need_client_side_rendering ())
1736         refresh = .05;
1737       else if (bgPixmap.flags & bgPixmap_t::blurNeeded)
1738         refresh = .20; /* very slow !!! */
1739       else
1740         refresh = .07;
1741
1742       update_background_ev.start (refresh);
1743     }
1744 }
1745
1746 void
1747 rxvt_term::update_background_cb (ev::timer &w, int revents)
1748 {
1749   make_current ();
1750   bgPixmap.render ();
1751   refresh_check ();
1752 }
1753
1754 #endif /* HAVE_BG_PIXMAP */
1755
1756 /*----------------------- end-of-file (C source) -----------------------*/