ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/rxvt-unicode/src/main.C
Revision: 1.261
Committed: Mon Nov 19 15:33:34 2007 UTC (16 years, 6 months ago) by root
Content type: text/plain
Branch: MAIN
Changes since 1.260: +8 -7 lines
Log Message:
*** empty log message ***

File Contents

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