1 /*--------------------------------*-C-*---------------------------------*
3 *----------------------------------------------------------------------*
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>
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
17 * This program is free software; you can redistribute it and/or modify
18 * it under the terms of the GNU General Public License as published by
19 * the Free Software Foundation; either version 2 of the License, or
20 * (at your option) any later version.
22 * This program is distributed in the hope that it will be useful,
23 * but WITHOUT ANY WARRANTY; without even the implied warranty of
24 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
25 * GNU General Public License for more details.
27 * You should have received a copy of the GNU General Public License
28 * along with this program; if not, write to the Free Software
29 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
30 *---------------------------------------------------------------------*/
32 #include "../config.h" /* NECESSARY */
33 #include "rxvt.h" /* NECESSARY */
34 #include "main.intpro" /* PROTOS for internal routines */
38 #ifdef TTY_GID_SUPPORT
48 static char curlocale[128];
51 rxvt_set_locale (const char *locale)
53 if (locale && STRNCMP (locale, curlocale, 128))
55 STRNCPY (curlocale, locale, 128);
56 setlocale (LC_CTYPE, curlocale);
61 rxvt_term::operator new (size_t s)
70 rxvt_term::operator delete (void *p, size_t s)
75 rxvt_term::rxvt_term ()
77 rootwin_ev (this, &rxvt_term::rootwin_cb),
78 termwin_ev (this, &rxvt_term::x_cb),
79 vt_ev (this, &rxvt_term::x_cb),
80 #ifdef HAVE_SCROLLBARS
81 scrollbar_ev (this, &rxvt_term::x_cb),
84 menubar_ev (this, &rxvt_term::x_cb), fixme
87 cursor_blink_ev (this, &rxvt_term::cursor_blink_cb),
90 text_blink_ev (this, &rxvt_term::text_blink_cb),
93 pointer_ev (this, &rxvt_term::pointer_cb),
95 check_ev (this, &rxvt_term::check_cb),
96 destroy_ev (this, &rxvt_term::destroy_cb),
97 pty_ev (this, &rxvt_term::pty_cb),
98 incr_ev (this, &rxvt_term::incr_cb),
100 im_ev (this, &rxvt_term::im_cb)
103 cmdbuf_ptr = cmdbuf_endp = cmdbuf_base;
106 rxvt_term::~rxvt_term ()
116 #ifndef NO_SETOWNER_TTYDEV
117 privileged_ttydev (RESTORE);
120 privileged_utmp (RESTORE);
123 // TODO: free pixcolours, colours should become part of rxvt_display
127 displays.put (display);
131 rxvt_term::destroy ()
135 if (TermWin.parent[0])
136 XDestroyWindow (display->display, TermWin.parent[0]);
138 termwin_ev.stop (display);
139 vt_ev.stop (display);
143 im_ev.stop (display);
145 #ifdef HAVE_SCROLLBARS
146 scrollbar_ev.stop (display);
149 menubar_ev.stop (display);
156 cursor_blink_ev.stop ();
159 text_blink_ev.stop ();
165 destroy_ev.start (0);
169 rxvt_term::destroy_cb (time_watcher &w)
176 /*----------------------------------------------------------------------*/
180 rxvt_init (int argc, const char *const *argv)
182 SET_R (new rxvt_term);
184 if (!GET_R->init_vars () || !GET_R->init (argc, argv))
193 static int (*old_xerror_handler)(Display *dpy, XErrorEvent *event);
198 /* install exit handler for cleanup */
201 atexit(rxvt_clean_exit);
208 sigfillset (&sa.sa_mask);
209 sa.sa_flags = SA_NOCLDSTOP | SA_RESTART;
210 sa.sa_handler = SIG_IGN; sigaction (SIGHUP , &sa, 0);
211 sa.sa_handler = SIG_IGN; sigaction (SIGPIPE, &sa, 0);
212 sa.sa_handler = rxvt_Exit_signal; sigaction (SIGINT , &sa, 0);
213 sa.sa_handler = rxvt_Exit_signal; sigaction (SIGQUIT, &sa, 0);
214 sa.sa_handler = rxvt_Exit_signal; sigaction (SIGTERM, &sa, 0);
215 sa.sa_handler = rxvt_Child_signal; sigaction (SIGCHLD, &sa, 0);
217 /* need to trap SIGURG for SVR4 (Unixware) rlogin */
218 /* signal (SIGURG, SIG_DFL); */
220 old_xerror_handler = XSetErrorHandler ((XErrorHandler) rxvt_xerror_handler);
221 //XSetIOErrorHandler ((XErrorHandler) rxvt_xioerror_handler);
225 rxvt_term::init (int argc, const char *const *argv)
228 * Save and then give up any super-user privileges
229 * If we need privileges in any area then we must specifically request it.
230 * We should only need to be root in these cases:
231 * 1. write utmp entries on some systems
232 * 2. chown tty on some systems
239 const char **cmd_argv = init_resources (argc, argv);
244 menubar_read (rs[Rs_menu]);
246 #ifdef HAVE_SCROLLBARS
247 if (Options & Opt_scrollBar)
248 scrollBar.setIdle (); /* set existence for size calculations */
251 create_windows (argc, argv);
255 scr_reset (); /* initialize screen */
257 Gr_reset (); /* reset graphics */
262 XSynchronize(display->display, True);
266 #ifdef HAVE_SCROLLBARS
267 if (Options & Opt_scrollBar)
268 resize_scrollbar (); /* create and map scrollbar */
271 if (menubar_visible(r))
272 XMapWindow (display->display, menuBar.win);
275 if (Options & Opt_transparent)
277 XSelectInput (display->display, display->root, PropertyChangeMask);
278 check_our_parents ();
282 rootwin_ev.start (display, display->root);
284 XMapWindow (display->display, TermWin.vt);
285 XMapWindow (display->display, TermWin.parent[0]);
288 init_command (cmd_argv);
290 pty_ev.start (cmd_fd, EVENT_READ);
297 /* ------------------------------------------------------------------------- *
298 * SIGNAL HANDLING & EXIT HANDLER *
299 * ------------------------------------------------------------------------- */
301 * Catch a SIGCHLD signal and exit if the direct child has died
306 rxvt_Child_signal(int sig __attribute__ ((unused)))
308 int pid, save_errno = errno;
309 while ((pid = waitpid (-1, NULL, WNOHANG)) == -1 && errno == EINTR)
320 * Catch a fatal signal and tidy up before quitting
324 rxvt_Exit_signal(int sig)
326 signal(sig, SIG_DFL);
328 rxvt_print_error("signal %d", sig);
336 rxvt_xerror_handler (Display *display, XErrorEvent *event)
338 if (GET_R->allowedxerror == -1)
339 GET_R->allowedxerror = event->error_code;
342 old_xerror_handler (display, event);
349 /*----------------------------------------------------------------------*/
351 * Exit gracefully, clearing the utmp entry and restoring tty attributes
352 * TODO: if debugging, this should free up any known resources if we can
361 /* ------------------------------------------------------------------------- *
362 * MEMORY ALLOCATION WRAPPERS *
363 * ------------------------------------------------------------------------- */
366 rxvt_malloc(size_t size)
374 fprintf(stderr, APL_NAME ": memory allocation failure. Aborting");
382 rxvt_calloc(size_t number, size_t size)
386 p = calloc(number, size);
390 fprintf(stderr, APL_NAME ": memory allocation failure. Aborting");
398 rxvt_realloc(void *ptr, size_t size)
403 p = realloc(ptr, size);
409 fprintf(stderr, APL_NAME ": memory allocation failure. Aborting");
415 /* ------------------------------------------------------------------------- *
416 * PRIVILEGED OPERATIONS *
417 * ------------------------------------------------------------------------- */
418 /* take care of suid/sgid super-user (root) privileges */
420 rxvt_term::privileges (int mode)
422 #if ! defined(__CYGWIN32__)
423 # if !defined(HAVE_SETEUID) && defined(HAVE_SETREUID)
424 /* setreuid() is the poor man's setuid(), seteuid() */
425 # define seteuid(a) setreuid(-1, (a))
426 # define setegid(a) setregid(-1, (a))
427 # define HAVE_SETEUID
434 * change effective uid/gid - not real uid/gid - so we can switch
435 * back to root later, as required
467 rxvt_term::privileged_utmp (char action)
469 D_MAIN((stderr, "rxvt_privileged_utmp(%c); waiting for: %c (pid: %d)",
470 action, next_utmp_action, getpid()));
471 if (next_utmp_action != action || (action != SAVE && action != RESTORE)
472 || (Options & Opt_utmpInhibit)
473 || ttydev == NULL || *ttydev == '\0')
476 privileges (RESTORE);
479 next_utmp_action = RESTORE;
480 makeutent (ttydev, rs[Rs_display_name]);
483 { /* action == RESTORE */
484 next_utmp_action = IGNORE;
491 #ifndef NO_SETOWNER_TTYDEV
493 rxvt_term::privileged_ttydev (char action)
496 "privileged_ttydev (%c); waiting for: %c (pid: %d)",
497 action, next_tty_action, getpid()));
498 if (next_tty_action != action || (action != SAVE && action != RESTORE)
499 || ttydev == NULL || *ttydev == '\0')
502 privileges (RESTORE);
506 next_tty_action = RESTORE;
507 # ifndef RESET_TTY_TO_COMMON_DEFAULTS
508 /* store original tty status for restoration rxvt_clean_exit() -- rgg 04/12/95 */
509 if (lstat(ttydev, &ttyfd_stat) < 0) /* you lose out */
510 next_tty_action = IGNORE;
515 chown(ttydev, getuid(), ttygid); /* fail silently */
516 chmod(ttydev, ttymode);
524 { /* action == RESTORE */
525 next_tty_action = IGNORE;
526 # ifndef RESET_TTY_TO_COMMON_DEFAULTS
527 chmod(ttydev, ttyfd_stat.st_mode);
528 chown(ttydev, ttyfd_stat.st_uid, ttyfd_stat.st_gid);
531 (S_IRUSR | S_IWUSR | S_IRGRP | S_IWGRP | S_IROTH | S_IWOTH));
539 # ifndef RESET_TTY_TO_COMMON_DEFAULTS
540 D_MAIN((stderr, "%s \"%s\": mode %03o, uid %d, gid %d",
541 action == RESTORE ? "Restoring" : (action ==
543 "UNKNOWN ERROR for"), ttydev,
544 ttyfd_stat.st_mode, ttyfd_stat.st_uid,
550 /*----------------------------------------------------------------------*/
552 * window size/position calculcations for XSizeHint and other storage.
553 * if width/height are non-zero then override calculated width/height
556 rxvt_term::window_calc (unsigned int width, unsigned int height)
558 short recalc_x, recalc_y;
559 int x, y, sb_w, mb_h, flags;
561 unsigned int max_width, max_height;
563 D_SIZE((stderr, "< Cols/Rows: %3d x %3d ; Width/Height: %4d x %4d",
564 TermWin.ncol, TermWin.nrow, szHint.width,
566 szHint.flags = PMinSize | PResizeInc | PBaseSize | PWinGravity;
567 szHint.win_gravity = NorthWestGravity;
568 /* szHint.min_aspect.x = szHint.min_aspect.y = 1; */
570 recalc_x = recalc_y = 0;
572 if (!parsed_geometry)
576 flags = XParseGeometry(rs[Rs_geometry], &x, &y, &w, &h);
577 if (flags & WidthValue)
579 TermWin.ncol = BOUND_POSITIVE_INT16(w);
580 szHint.flags |= USSize;
582 if (flags & HeightValue)
584 TermWin.nrow = BOUND_POSITIVE_INT16(h);
585 szHint.flags |= USSize;
590 szHint.flags |= USPosition;
591 if (flags & XNegative)
594 szHint.win_gravity = NorthEastGravity;
600 szHint.flags |= USPosition;
601 if (flags & YNegative)
604 if (szHint.win_gravity == NorthEastGravity)
605 szHint.win_gravity = SouthEastGravity;
607 szHint.win_gravity = SouthWestGravity;
612 TermWin.width = TermWin.ncol * TermWin.fwidth;
613 TermWin.height = TermWin.nrow * TermWin.fheight;
614 max_width = MAX_COLS * TermWin.fwidth;
615 max_height = MAX_ROWS * TermWin.fheight;
617 szHint.base_width = szHint.base_height = 2 * TermWin.int_bwidth;
620 window_vt_x = window_vt_y = 0;
621 if (scrollbar_visible ())
623 sb_w = scrollbar_TotalWidth();
624 szHint.base_width += sb_w;
625 if (!(Options & Opt_scrollBar_right))
628 if (menubar_visible ())
630 mb_h = menuBar_TotalHeight();
631 szHint.base_height += mb_h;
634 szHint.width_inc = TermWin.fwidth;
635 szHint.height_inc = TermWin.fheight;
636 szHint.min_width = szHint.base_width + szHint.width_inc;
637 szHint.min_height = szHint.base_height + szHint.height_inc;
639 if (width && width - szHint.base_width < max_width)
641 szHint.width = width;
642 TermWin.width = width - szHint.base_width;
646 MIN_IT(TermWin.width, max_width);
647 szHint.width = szHint.base_width + TermWin.width;
649 if (height && height - szHint.base_height < max_height)
651 szHint.height = height;
652 TermWin.height = height - szHint.base_height;
656 MIN_IT(TermWin.height, max_height);
657 szHint.height = szHint.base_height + TermWin.height;
659 if (scrollbar_visible () && (Options & Opt_scrollBar_right))
660 window_sb_x = szHint.width - sb_w;
663 szHint.x += (DisplayWidth (display->display, DefaultScreen (display->display))
664 - szHint.width - 2 * TermWin.ext_bwidth);
666 szHint.y += (DisplayHeight (display->display, DefaultScreen (display->display))
667 - szHint.height - 2 * TermWin.ext_bwidth);
669 TermWin.ncol = TermWin.width / TermWin.fwidth;
670 TermWin.nrow = TermWin.height / TermWin.fheight;
671 D_SIZE((stderr, "> Cols/Rows: %3d x %3d ; Width/Height: %4d x %4d",
672 TermWin.ncol, TermWin.nrow, szHint.width,
677 /*----------------------------------------------------------------------*/
679 * Tell the teletype handler what size the window is.
680 * Called after a window size change.
683 rxvt_term::tt_winch ()
690 ws.ws_col = TermWin.ncol;
691 ws.ws_row = TermWin.nrow;
692 ws.ws_xpixel = ws.ws_ypixel = 0;
694 (void)ioctl (cmd_fd, TIOCSWINSZ, &ws);
696 if (ioctl (cmd_fd, TIOCSWINSZ, &ws) < 0)
697 D_SIZE((stderr, "Failed to send TIOCSWINSZ to fd %d", fd));
699 else if (cmd_pid) /* force through to the command */
700 kill (cmd_pid, SIGWINCH);
705 /*----------------------------------------------------------------------*/
706 /* rxvt_change_font() - Switch to a new font */
708 * init = 1 - initialize
710 * fontname == FONT_UP - switch to bigger font
711 * fontname == FONT_DN - switch to smaller font
714 rxvt_term::change_font (int init, const char *fontname)
718 rxvt_term::font_up_down (int n, int direction)
721 /*----------------------------------------------------------------------*/
722 /*----------------------------------------------------------------------*/
723 /* xterm sequences - title, iconName, color (exptl) */
725 rxvt_term::set_title (const char *str)
727 #ifndef SMART_WINDOW_TITLE
728 XStoreName(display->display, TermWin.parent[0], str);
732 if (XFetchName(display->display, TermWin.parent[0], &name) == 0)
734 if (name == NULL || STRCMP(name, str))
735 XStoreName(display->display, TermWin.parent[0], str);
742 rxvt_term::set_iconName (const char *str)
744 #ifndef SMART_WINDOW_TITLE
745 XSetIconName(display->display, TermWin.parent[0], str);
749 if (XGetIconName(display->display, TermWin.parent[0], &name))
751 if (name == NULL || STRCMP(name, str))
752 XSetIconName(display->display, TermWin.parent[0], str);
758 #ifdef XTERM_COLOR_CHANGE
760 rxvt_term::set_window_color (int idx, const char *color)
765 if (color == NULL || *color == '\0')
768 /* handle color aliases */
772 if (i >= 8 && i <= 15)
773 { /* bright colors */
775 # ifndef NO_BRIGHTCOLOR
776 PixColors[idx] = PixColors[minBrightCOLOR + i];
782 if (i >= 0 && i <= 7)
783 { /* normal colors */
784 PixColors[idx] = PixColors[minCOLOR + i];
789 if (!rXParseAllocColor (& xcol, color))
791 /* XStoreColor (display->display, XCMAP, XColor*); */
794 * FIXME: should free colors here, but no idea how to do it so instead,
795 * so just keep gobbling up the colormap
798 for (i = Color_Black; i <= Color_White; i++)
799 if (PixColors[idx] == PixColors[i])
803 /* fprintf (stderr, "XFreeColors: PixColors [%d] = %lu\n", idx, PixColors [idx]); */
804 XFreeColors(display->display, XCMAP, (PixColors + idx), 1,
805 DisplayPlanes(display->display, display->screen));
809 PixColors[idx] = xcol;
812 /* XSetWindowAttributes attr; */
815 if (idx == Color_bg && !(Options & Opt_transparent))
816 XSetWindowBackground(display->display, TermWin.vt,
817 PixColors[Color_bg]);
819 /* handle Color_BD, scrollbar background, etc. */
823 /* the only reasonable way to enforce a clean update */
828 # define set_window_color (idx,color) ((void)0)
829 #endif /* XTERM_COLOR_CHANGE */
832 rxvt_term::recolour_cursor ()
837 xcol[0] = PixColors[Color_pointer];
838 xcol[1] = PixColors[Color_bg];
839 XQueryColors (display->display, XCMAP, xcol, 2);
840 XRecolorCursor (display->display, TermWin_cursor, &(xcol[0]), &(xcol[1]));
844 /*----------------------------------------------------------------------*/
846 * find if fg/bg matches any of the normal (low-intensity) colors
849 rxvt_term::set_colorfgbg ()
852 const char *xpmb = "\0";
853 char fstr[sizeof("default") + 1], bstr[sizeof("default") + 1];
856 (char *)rxvt_malloc(sizeof("COLORFGBG=default;default;bg") + 1);
857 STRCPY(fstr, "default");
858 STRCPY(bstr, "default");
859 for (i = Color_Black; i <= Color_White; i++)
860 if (PixColors[Color_fg] == PixColors[i])
862 sprintf(fstr, "%d", (i - Color_Black));
865 for (i = Color_Black; i <= Color_White; i++)
866 if (PixColors[Color_bg] == PixColors[i])
868 sprintf(bstr, "%d", (i - Color_Black));
869 #ifdef XPM_BACKGROUND
874 sprintf(env_colorfgbg, "COLORFGBG=%s;%s%s", fstr, xpmb, bstr);
875 putenv(env_colorfgbg);
877 #ifndef NO_BRIGHTCOLOR
878 colorfgbg = DEFAULT_RSTYLE;
879 for (i = minCOLOR; i <= maxCOLOR; i++)
881 if (PixColors[Color_fg] == PixColors[i])
882 colorfgbg = SET_FGCOLOR(colorfgbg, i);
883 if (PixColors[Color_bg] == PixColors[i])
884 colorfgbg = SET_BGCOLOR(colorfgbg, i);
889 /*----------------------------------------------------------------------*/
891 * Colour determination for low colour displays, routine from
892 * Hans de Goede <hans@highrise.nl>
896 rxvt_term::rXParseAllocColor (rxvt_color *screen_in_out, const char *colour)
898 if (!screen_in_out->set (display, colour))
900 rxvt_print_error("can't allocate colour: %s", colour);
907 /* -------------------------------------------------------------------- *
908 * - WINDOW RESIZING - *
909 * -------------------------------------------------------------------- */
911 rxvt_term::resize_all_windows (unsigned int width, unsigned int height, int ignoreparent)
916 int old_width = szHint.width, old_height = szHint.height;
919 window_calc (width, height);
920 XSetWMNormalHints (display->display, TermWin.parent[0], &szHint);
925 * resize by Marius Gedminas <marius.gedminas@uosis.mif.vu.lt>
926 * reposition window on resize depending on placement on screen
930 unsigned int unused_w1, unused_h1, unused_b1, unused_d1;
933 XTranslateCoordinates (display->display, TermWin.parent[0], display->root,
934 0, 0, &x, &y, &unused_cr);
935 XGetGeometry (display->display, TermWin.parent[0], &unused_cr, &x1, &y1,
936 &unused_w1, &unused_h1, &unused_b1, &unused_d1);
938 * if display->root isn't the parent window, a WM will probably have offset
939 * our position for handles and decorations. Counter it
941 if (x1 != x || y1 != y)
947 x1 = (DisplayWidth (display->display, display->screen) - old_width) / 2;
948 y1 = (DisplayHeight (display->display, display->screen) - old_height) / 2;
949 dx = old_width - szHint.width;
950 dy = old_height - szHint.height;
952 /* Check position of the center of the window */
953 if (x < x1) /* left half */
955 else if (x == x1) /* exact center */
957 if (y < y1) /* top half */
959 else if (y == y1) /* exact center */
962 XMoveResizeWindow (display->display, TermWin.parent[0], x + dx, y + dy,
963 szHint.width, szHint.height);
965 XResizeWindow (display->display, TermWin.parent[0], szHint.width,
971 fix_screen = (TermWin.ncol != prev_ncol
972 || TermWin.nrow != prev_nrow);
974 if (fix_screen || width != old_width || height != old_height)
976 if (scrollbar_visible ())
978 XMoveResizeWindow (display->display, scrollBar.win, window_sb_x,
979 0, scrollbar_TotalWidth (), szHint.height);
983 if (menubar_visible ())
984 XMoveResizeWindow (display->display, menuBar.win, window_vt_x,
985 0, TermWin_TotalWidth (), menuBar_TotalHeight ());
987 XMoveResizeWindow (display->display, TermWin.vt, window_vt_x,
988 window_vt_y, TermWin_TotalWidth (),
989 TermWin_TotalHeight ());
992 Gr_Resize (old_width - szHint.base_width,
993 old_height - szHint.base_height);
996 #ifdef XPM_BACKGROUND
1002 if (fix_screen || old_height == 0)
1004 int curr_screen = -1;
1005 int old_ncol = prev_ncol;
1007 /* scr_reset only works on the primary screen */
1008 if (old_height) /* this is not the first time through */
1010 unsigned int ncol = TermWin.ncol;
1011 TermWin.ncol = prev_ncol; // save b/c scr_blank_screen_mem uses this
1012 curr_screen = scr_change_screen (PRIMARY);
1013 TermWin.ncol = ncol;
1018 if (curr_screen >= 0) /* this is not the first time through */
1020 scr_change_screen (curr_screen);
1021 selection_check (old_ncol != TermWin.ncol ? 4 : 0);
1025 old_width = szHint.width;
1026 old_height = szHint.height;
1029 IMSetStatusPosition ();
1034 * Set the width/height of the vt window in characters. Units are pixels.
1035 * good for toggling 80/132 columns
1038 rxvt_term::set_widthheight (unsigned int width, unsigned int height)
1040 XWindowAttributes wattr;
1042 if (width == 0 || height == 0)
1044 XGetWindowAttributes(display->display, display->root, &wattr);
1046 width = wattr.width - szHint.base_width;
1048 height = wattr.height - szHint.base_height;
1050 if (width != TermWin.width || height != TermWin.height)
1052 width += szHint.base_width;
1053 height += szHint.base_height;
1054 resize_all_windows (width, height, 0);
1058 /* -------------------------------------------------------------------- *
1059 * - X INPUT METHOD ROUTINES - *
1060 * -------------------------------------------------------------------- */
1064 rxvt_term::im_set_size (XRectangle *size)
1066 size->x = TermWin.int_bwidth;
1067 size->y = TermWin.int_bwidth;
1068 size->width = Width2Pixel(TermWin.ncol);
1069 size->height = Height2Pixel(TermWin.nrow);
1073 rxvt_term::im_set_color (unsigned long *fg, unsigned long *bg)
1075 *fg = PixColors[Color_fg];
1076 *bg = PixColors[Color_bg];
1079 /* Checking whether input method is running. */
1081 rxvt_term::IMisRunning ()
1086 char server[IMBUFSIZ];
1088 /* get current locale modifier */
1089 if ((p = XSetLocaleModifiers(NULL)) != NULL)
1091 STRCPY(server, "@server=");
1092 STRNCAT(server, &(p[4]), IMBUFSIZ - 9); /* skip "@im=" */
1093 if ((p = STRCHR(server + 1, '@')) != NULL) /* first one only */
1096 atom = XInternAtom(display->display, server, False);
1097 win = XGetSelectionOwner(display->display, atom);
1105 rxvt_term::IMSendSpot ()
1108 XVaNestedList preedit_attr;
1110 if (Input_Context == NULL
1111 || !TermWin.focus || !(input_style & XIMPreeditPosition)
1112 || !(event_type == KeyPress
1113 || event_type == Expose
1114 || event_type == NoExpose
1115 || event_type == SelectionNotify
1116 || event_type == ButtonRelease || event_type == FocusIn)
1120 im_set_position (&spot);
1122 preedit_attr = XVaCreateNestedList(0, XNSpotLocation, &spot, NULL);
1123 XSetICValues(Input_Context, XNPreeditAttributes, preedit_attr, NULL);
1124 XFree(preedit_attr);
1128 rxvt_term::im_set_preedit_area (XRectangle * preedit_rect, XRectangle * status_rect,
1129 XRectangle * needed_rect)
1133 if (scrollbar_visible () && !(Options & Opt_scrollBar_right))
1134 vtx = scrollbar_TotalWidth();
1136 mbh = menubar_visible () ? menuBar_TotalHeight() : 0;
1137 mbh -= TermWin.lineSpace;
1139 preedit_rect->x = needed_rect->width + vtx;
1140 preedit_rect->y = Height2Pixel(TermWin.nrow - 1) + mbh;
1142 preedit_rect->width = Width2Pixel(TermWin.ncol + 1) - needed_rect->width + vtx;
1143 preedit_rect->height = Height2Pixel(1);
1145 status_rect->x = vtx;
1146 status_rect->y = Height2Pixel(TermWin.nrow - 1) + mbh;
1148 status_rect->width = needed_rect->width ? needed_rect->width : Width2Pixel(TermWin.ncol + 1);
1149 status_rect->height = Height2Pixel(1);
1153 rxvt_term::im_destroy ()
1157 XDestroyIC (Input_Context);
1158 Input_Context = NULL;
1163 display->put_xim (input_method);
1169 * Try to open a XIM with the current modifiers, then see if we can
1170 * open a suitable preedit type
1173 rxvt_term::IM_get_IC (const char *modifiers)
1178 XRectangle rect, status_rect, needed_rect;
1179 unsigned long fg, bg;
1182 XIMStyles *xim_styles;
1183 XVaNestedList preedit_attr, status_attr;
1185 if (!((p = XSetLocaleModifiers (modifiers)) && *p))
1188 D_MAIN((stderr, "rxvt_IM_get_IC()"));
1189 input_method = display->get_xim (locale, modifiers);
1190 if (input_method == NULL)
1193 xim = input_method->xim;
1196 if (XGetIMValues (xim, XNQueryInputStyle, &xim_styles, NULL)
1197 || !xim_styles || !xim_styles->count_styles)
1199 display->put_xim (input_method);
1203 p = rs[Rs_preeditType] ? rs[Rs_preeditType] : "OverTheSpot,OffTheSpot,Root";
1204 s = rxvt_splitcommastring(p);
1205 for (i = found = 0; !found && s[i]; i++)
1207 if (!STRCMP(s[i], "OverTheSpot"))
1208 input_style = (XIMPreeditPosition | XIMStatusNothing);
1209 else if (!STRCMP(s[i], "OffTheSpot"))
1210 input_style = (XIMPreeditArea | XIMStatusArea);
1211 else if (!STRCMP(s[i], "Root"))
1212 input_style = (XIMPreeditNothing | XIMStatusNothing);
1214 for (j = 0; j < xim_styles->count_styles; j++)
1215 if (input_style == xim_styles->supported_styles[j])
1222 for (i = 0; s[i]; i++)
1230 display->put_xim (input_method);
1234 preedit_attr = status_attr = NULL;
1236 if (input_style & XIMPreeditPosition)
1238 im_set_size (&rect);
1239 im_set_position (&spot);
1240 im_set_color (&fg, &bg);
1242 preedit_attr = XVaCreateNestedList(0, XNArea, &rect,
1243 XNSpotLocation, &spot,
1244 XNForeground, fg, XNBackground, bg,
1245 //XNFontSet, TermWin.fontset,
1248 else if (input_style & XIMPreeditArea)
1250 im_set_color (&fg, &bg);
1253 * The necessary width of preedit area is unknown
1254 * until create input context.
1256 needed_rect.width = 0;
1258 im_set_preedit_area (&rect, &status_rect, &needed_rect);
1260 preedit_attr = XVaCreateNestedList(0, XNArea, &rect,
1261 XNForeground, fg, XNBackground, bg,
1262 //XNFontSet, TermWin.fontset,
1264 status_attr = XVaCreateNestedList(0, XNArea, &status_rect,
1265 XNForeground, fg, XNBackground, bg,
1266 //XNFontSet, TermWin.fontset,
1270 Input_Context = XCreateIC(xim, XNInputStyle, input_style,
1271 XNClientWindow, TermWin.parent[0],
1272 XNFocusWindow, TermWin.parent[0],
1273 preedit_attr ? XNPreeditAttributes : NULL,
1275 status_attr ? XNStatusAttributes : NULL,
1277 if (preedit_attr) XFree(preedit_attr);
1278 if (status_attr) XFree(status_attr);
1280 if (Input_Context == NULL)
1282 rxvt_print_error("failed to create input context");
1283 display->put_xim (input_method);
1287 if (input_style & XIMPreeditArea)
1288 IMSetStatusPosition ();
1290 D_MAIN((stderr, "rxvt_IM_get_IC() - successful connection"));
1297 int i, found, had_im;
1304 D_MAIN((stderr, "rxvt_IMInstantiateCallback()"));
1308 #if defined(HAVE_XSETLOCALE) || defined(HAVE_SETLOCALE)
1309 if (rs[Rs_imLocale])
1310 setlocale (LC_CTYPE, rs[Rs_imLocale]);
1313 p = rs[Rs_inputMethod];
1318 s = rxvt_splitcommastring (p);
1319 for (i = 0; s[i]; i++)
1323 STRCPY (buf, "@im=");
1324 STRNCAT (buf, s[i], IMBUFSIZ - 5);
1325 if (IM_get_IC (buf))
1332 for (i = 0; s[i]; i++)
1340 /* try with XMODIFIERS env. var. */
1344 /* try with no modifiers base IF the user didn't specify an IM */
1345 if (IM_get_IC ("@im=none"))
1349 #if defined(HAVE_XSETLOCALE) || defined(HAVE_SETLOCALE)
1350 if (rs[Rs_imLocale])
1351 setlocale (LC_CTYPE, locale);
1356 rxvt_term::IMSetStatusPosition ()
1358 XRectangle preedit_rect, status_rect, *needed_rect;
1359 XVaNestedList preedit_attr, status_attr;
1361 if (Input_Context == NULL
1362 || !TermWin.focus || !(input_style & XIMPreeditArea)
1366 /* Getting the necessary width of preedit area */
1367 status_attr = XVaCreateNestedList(0, XNAreaNeeded, &needed_rect, NULL);
1368 XGetICValues(Input_Context, XNStatusAttributes, status_attr, NULL);
1371 im_set_preedit_area (&preedit_rect, &status_rect, needed_rect);
1373 preedit_attr = XVaCreateNestedList(0, XNArea, &preedit_rect, NULL);
1374 status_attr = XVaCreateNestedList(0, XNArea, &status_rect, NULL);
1376 XSetICValues(Input_Context,
1377 XNPreeditAttributes, preedit_attr,
1378 XNStatusAttributes, status_attr, NULL);
1380 XFree(preedit_attr);
1383 #endif /* USE_XIM */
1385 /*----------------------------------------------------------------------*/
1386 rxvt_t rxvt_current_term;
1388 /*----------------------- end-of-file (C source) -----------------------*/