--- rxvt-unicode/src/main.C 2003/12/03 23:19:44 1.10 +++ rxvt-unicode/src/main.C 2014/05/22 18:54:33 1.390 @@ -1,7 +1,6 @@ -/*--------------------------------*-C-*---------------------------------* - * File: main.c +/*----------------------------------------------------------------------* + * File: main.C *----------------------------------------------------------------------* - * $Id: main.C,v 1.10 2003/12/03 23:19:44 pcg Exp $ * * All portions of code are copyright by their respective author/s. * Copyright (c) 1992 John Bovey, University of Kent at Canterbury @@ -14,10 +13,11 @@ * Copyright (c) 1997,1998 Oezguer Kesim * Copyright (c) 1998-2001 Geoff Wing * - extensive modifications + * Copyright (c) 2003-2010 Marc Lehmann * * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by - * the Free Software Foundation; either version 2 of the License, or + * the Free Software Foundation; either version 3 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, @@ -32,585 +32,746 @@ #include "../config.h" /* NECESSARY */ #include "rxvt.h" /* NECESSARY */ -#include "main.intpro" /* PROTOS for internal routines */ +#include "init.h" +#include "keyboard.h" +#include "rxvtperl.h" +#include + +#include #include +#include -#ifdef TTY_GID_SUPPORT -# include -#endif +#include -#ifdef HAVE_TERMIOS_H -# include +#ifdef HAVE_XSETLOCALE +# define X_LOCALE +# include +#else +# include #endif -void * -rxvt_term::operator new (size_t s) +struct termios rxvt_term::def_tio; +vector rxvt_term::termlist; + +// used to tell global functions which terminal instance is "active" +rxvt_t rxvt_current_term; + +static char curlocale[128], savelocale[128]; + +bool +rxvt_set_locale (const char *locale) NOTHROW { - void *p = malloc (s); + int size = strlen (locale) + 1; + + if (size > sizeof (curlocale)) + rxvt_fatal ("locale string too long, aborting.\n"); + + if (!locale || !memcmp (locale, curlocale, size)) + return false; - MEMSET (p, 0, s); - return p; + memcpy (curlocale, locale, size); + setlocale (LC_CTYPE, curlocale); + return true; } void -rxvt_term::operator delete (void *p, size_t s) +rxvt_push_locale (const char *locale) NOTHROW { - free (p); + strcpy (savelocale, curlocale); + rxvt_set_locale (locale); } -rxvt_term::rxvt_term () -: pty_ev (this, &rxvt_term::pty_cb), -#ifdef CURSOR_BLINK - blink_ev (this, &rxvt_term::blink_cb), -#endif -#ifdef POINTER_BLANK - pointer_ev (this, &rxvt_term::pointer_cb), -#endif - x_ev (this, &rxvt_term::x_cb), - destroy_ev (this, &rxvt_term::destroy_cb), - check_ev (this, &rxvt_term::check_cb) +void +rxvt_pop_locale () NOTHROW { - cmdbuf_ptr = cmdbuf_endp = cmdbuf_base; + rxvt_set_locale (savelocale); } -rxvt_term::~rxvt_term () +#if ENABLE_COMBINING +class rxvt_composite_vec rxvt_composite; + +text_t rxvt_composite_vec::compose (unicode_t c1, unicode_t c2) { - rxvt_scr_release (this); + compose_char *cc; -#ifndef NO_SETOWNER_TTYDEV - rxvt_privileged_ttydev (this, RESTORE); -#endif -#ifdef UTMP_SUPPORT - rxvt_privileged_utmp (this, RESTORE); -#endif -#ifdef USE_XIM - if (Input_Context != NULL) + // break compose chains, as stupid readline really likes to duplicate + // composing characters for some reason, near the end of a line. + cc = (*this)[c1]; + while (cc) { - XDestroyIC (Input_Context); - Input_Context = NULL; + if (cc->c2 == c2) return c1; + cc = (*this)[cc->c1]; } -#endif - if (cmd_fd >= 0) - close (cmd_fd); + // check to see whether this combination already exists otherwise + for (cc = v.begin (); cc < v.end (); cc++) + if (cc->c1 == c1 && cc->c2 == c2) + return COMPOSE_LO + (cc - v.begin ()); + + // allocate a new combination + if (v.size () == COMPOSE_HI - COMPOSE_LO + 1) + { + static int seen; + + if (!seen++) + rxvt_warn ("too many unrepresentable composite characters, try --enable-unicode3\n"); - if (Xfd >= 0) - XCloseDisplay (Xdisplay); + return REPLACEMENT_CHAR; + } + + v.push_back (compose_char (c1, c2)); - delete PixColors; + return v.size () - 1 + COMPOSE_LO; } -void -rxvt_term::destroy () +int rxvt_composite_vec::expand (unicode_t c, wchar_t *r) { - check_ev.stop (); - pty_ev.stop (); - x_ev.stop (); + compose_char *cc = (*this)[c]; + + if (!cc) + { + if (r) *r = c; + return 1; + } + + int len = expand (cc->c1, r); + + if (r) r += len; + + if (cc->c2 != NOCHAR) + { + len++; + if (r) *r++ = cc->c2; + } + + return len; + +} +#endif + +rxvt_term::rxvt_term () +{ +#if HAVE_BG_PIXMAP + update_background_ev.set (this); +#endif #ifdef CURSOR_BLINK - blink_ev.stop (); + cursor_blink_ev.set (this); cursor_blink_ev.set (0., CURSOR_BLINK_INTERVAL); +#endif +#ifdef TEXT_BLINK + text_blink_ev.set (this); text_blink_ev.set (0., TEXT_BLINK_INTERVAL); +#endif +#ifndef NO_SCROLLBAR_BUTTON_CONTINUAL_SCROLLING + cont_scroll_ev.set (this); +#endif +#ifdef SELECTION_SCROLLING + sel_scroll_ev.set (this); +#endif +#if defined(MOUSE_WHEEL) && defined(MOUSE_SLIP_WHEELING) + slip_wheel_ev.set (this); +#endif +#if BG_IMAGE_FROM_ROOT || ENABLE_PERL + rootwin_ev.set (this), +#endif + scrollbar_ev.set (this), +#if USE_XIM + im_ev.set (this), #endif #ifdef POINTER_BLANK - pointer_ev.stop (); + pointer_ev.set (this); +#endif +#ifndef NO_BELL + bell_ev.set (this); #endif + child_ev.set (this); + flush_ev.set (this); + destroy_ev.set (this); + pty_ev.set (this); + termwin_ev.set (this); + vt_ev.set (this); - destroy_ev.start (0); + cmdbuf_ptr = cmdbuf_endp = cmdbuf_base; + + termlist.push_back (this); + +#ifdef KEYSYM_RESOURCE + keyboard = new keyboard_manager; +#endif } +// clean up the most important stuff, do *not* call x or free mem etc. +// for use before an emergency exit void -rxvt_term::destroy_cb (time_watcher &w) +rxvt_term::emergency_cleanup () { - SET_R (this); + if (cmd_pid) + kill (-cmd_pid, SIGHUP); - delete this; + pty_ev.stop (); + delete pty; pty = 0; } -/*----------------------------------------------------------------------*/ -/* rxvt_init() */ -/* LIBPROTO */ -rxvt_t -rxvt_init (int argc, const char *const *argv) +rxvt_term::~rxvt_term () { - SET_R (new rxvt_term); - dR; + termlist.erase (find (termlist.begin (), termlist.end(), this)); - if (!R->init_vars () || !R->init (argc, argv)) - { - delete R; - return NULL; - } + emergency_cleanup (); - return R; -} +#if ENABLE_STYLES + for (int i = RS_styleCount; --i; ) + if (fontset[i] != fontset[0]) + delete fontset[i]; +#endif + delete fontset[0]; -/* EXTPROTO */ -void -rxvt_init_signals () -{ -/* install exit handler for cleanup */ -#if 0 -#ifdef HAVE_ATEXIT - atexit(rxvt_clean_exit); -#else +#ifdef HAVE_BG_PIXMAP + bg_destroy (); #endif + +#if HAVE_IMG + delete bg_img; #endif - struct sigaction sa; + if (display) + { + selection_clear (); + selection_clear (true); - sigfillset (&sa.sa_mask); - sa.sa_flags = SA_NOCLDSTOP | SA_RESTART; - sa.sa_handler = SIG_IGN; sigaction (SIGHUP , &sa, 0); - sa.sa_handler = SIG_IGN; sigaction (SIGPIPE, &sa, 0); - sa.sa_handler = rxvt_Exit_signal; sigaction (SIGINT , &sa, 0); - sa.sa_handler = rxvt_Exit_signal; sigaction (SIGQUIT, &sa, 0); - sa.sa_handler = rxvt_Exit_signal; sigaction (SIGTERM, &sa, 0); - sa.sa_handler = rxvt_Child_signal; sigaction (SIGCHLD, &sa, 0); +#if USE_XIM + im_destroy (); +#endif + scrollBar.destroy (); -/* need to trap SIGURG for SVR4 (Unixware) rlogin */ -/* signal (SIGURG, SIG_DFL); */ + if (gc) + XFreeGC (dpy, gc); - XSetErrorHandler ((XErrorHandler) rxvt_xerror_handler); - //XSetIOErrorHandler ((XErrorHandler) rxvt_xioerror_handler); -} + delete drawable; -bool -rxvt_term::init (int argc, const char *const *argv) -{ - dR;//TODO (scrollbar, setidle) + // destroy all windows + if (parent) + XDestroyWindow (dpy, parent); - /* - * Save and then give up any super-user privileges - * If we need privileges in any area then we must specifically request it. - * We should only need to be root in these cases: - * 1. write utmp entries on some systems - * 2. chown tty on some systems - */ - rxvt_privileges (this, SAVE); - rxvt_privileges (this, IGNORE); + for (int i = 0; i < TOTAL_COLORS; i++) + if (ISSET_PIXCOLOR (i)) + { + pix_colors_focused [i].free (this); +#if OFF_FOCUS_FADING + pix_colors_unfocused [i].free (this); +#endif + } + + clear (); + + display->flush (); /* ideally .put should do this */ + displays.put (display); + } + + scr_release (); - rxvt_init_secondary (this); + /* clear all resources */ + for (int i = 0; i < allocated.size (); i++) + free (allocated [i]); - const char **cmd_argv = rxvt_init_resources (this, argc, argv); + free (selection.text); + free (selection.clip_text); + free (locale); + free (v_buffer); -#if (MENUBAR_MAX) - rxvt_menubar_read (this, rs[Rs_menu]); + delete selection_req; + + delete envv; + delete argv; + +#ifdef KEYSYM_RESOURCE + delete keyboard; #endif -#ifdef HAVE_SCROLLBARS - if (Options & Opt_scrollBar) - scrollbar_setIdle (); /* set existence for size calculations */ +#ifndef NO_RESOURCES + XrmDestroyDatabase (option_db); #endif +} + +// child has exited, usually destroys +void +rxvt_term::child_cb (ev::child &w, int status) +{ + HOOK_INVOKE ((this, HOOK_CHILD_EXIT, DT_INT, status, DT_END)); + + cmd_pid = 0; + + if (!option (Opt_hold)) + destroy (); +} - rxvt_Create_Windows (this, argc, argv); +void +rxvt_term::destroy () +{ + if (destroy_ev.is_active ()) + return; - rxvt_init_xlocale (this); + HOOK_INVOKE ((this, HOOK_DESTROY, DT_END)); - rxvt_scr_reset (this); /* initialize screen */ -#ifdef RXVT_GRAPHICS - rxvt_Gr_reset (this); /* reset graphics */ +#if ENABLE_OVERLAY + scr_overlay_off (); #endif -#if 0 -#ifdef DEBUG_X - XSynchronize(Xdisplay, True); + if (display) + { +#if USE_XIM + im_ev.stop (display); #endif + scrollbar_ev.stop (display); +#if BG_IMAGE_FROM_ROOT || ENABLE_PERL + rootwin_ev.stop (display); #endif + termwin_ev.stop (display); + vt_ev.stop (display); + } -#ifdef HAVE_SCROLLBARS - if (Options & Opt_scrollBar) - rxvt_Resize_scrollBar (this); /* create and map scrollbar */ + flush_ev.stop (); + pty_ev.stop (); +#ifdef CURSOR_BLINK + cursor_blink_ev.stop (); #endif -#if (MENUBAR_MAX) - if (menubar_visible(r)) - XMapWindow (Xdisplay, menuBar.win); +#ifdef TEXT_BLINK + text_blink_ev.stop (); #endif -#ifdef TRANSPARENT - if (Options & Opt_transparent) - { - XSelectInput (Xdisplay, Xroot, PropertyChangeMask); - rxvt_check_our_parents (this); - } +#ifndef NO_SCROLLBAR_BUTTON_CONTINUAL_SCROLLING + cont_scroll_ev.stop (); +#endif +#ifdef SELECTION_SCROLLING + sel_scroll_ev.stop (); +#endif +#ifdef POINTER_BLANK + pointer_ev.stop (); #endif - XMapWindow (Xdisplay, TermWin.vt); - XMapWindow (Xdisplay, TermWin.parent[0]); - rxvt_init_env (this); - rxvt_init_command (this, cmd_argv); + destroy_ev.start (); +} + +void +rxvt_term::destroy_cb (ev::idle &w, int revents) +{ + make_current (); - x_ev.start (Xfd, EVENT_READ); - pty_ev.start (cmd_fd, EVENT_READ); + delete this; +} - check_ev.start (); +void +rxvt_term::set_option (uint8_t opt, bool set) NOTHROW +{ + if (!opt) + return; - process_x_events (); + uint8_t mask = 1 << (opt & 7); + uint8_t &val = options [opt >> 3]; - return true; + val = val & ~mask | (set ? mask : 0); } -/* ------------------------------------------------------------------------- * - * SIGNAL HANDLING & EXIT HANDLER * - * ------------------------------------------------------------------------- */ +/*----------------------------------------------------------------------*/ /* - * Catch a SIGCHLD signal and exit if the direct child has died + * Exit gracefully, clearing the utmp entry and restoring tty attributes */ -/* ARGSUSED */ -/* EXTPROTO */ -RETSIGTYPE -rxvt_Child_signal(int sig __attribute__ ((unused))) -{ - int pid, save_errno = errno; - while ((pid = waitpid (-1, NULL, WNOHANG)) == -1 && errno == EINTR) - ; - errno = save_errno; +static XErrorHandler old_xerror_handler; -#if 0 - if (pid == R->cmd_pid) - exit (EXIT_SUCCESS); -#endif +static void +rxvt_emergency_cleanup () +{ + for (rxvt_term **t = rxvt_term::termlist.begin (); t < rxvt_term::termlist.end (); t++) + (*t)->emergency_cleanup (); } -/* - * Catch a fatal signal and tidy up before quitting - */ -/* EXTPROTO */ -RETSIGTYPE -rxvt_Exit_signal(int sig) +#if !ENABLE_MINIMAL +static void ecb_cold +print_x_error (Display *dpy, XErrorEvent *event) { - signal(sig, SIG_DFL); -#ifdef DEBUG_CMD - rxvt_print_error("signal %d", sig); + char buffer[BUFSIZ]; + char mesg[BUFSIZ]; + char number[32]; + + rxvt_warn ("An X Error occurred, trying to continue after report.\n"); + + XGetErrorDatabaseText (dpy, "XlibMessage", "ErrorSerial", "Error Serial #%d", mesg, BUFSIZ); + snprintf (buffer, BUFSIZ, "+ %s\n", mesg); rxvt_warn (buffer, event->serial); + + XGetErrorText (dpy, event->error_code, buffer, BUFSIZ); + XGetErrorDatabaseText (dpy, "XlibMessage", "XError", "X Error", mesg, BUFSIZ); + rxvt_warn ("+ %s: %s\n", mesg, buffer); + + XGetErrorDatabaseText (dpy, "XlibMessage", "MajorCode", "Request Major code %d", mesg, BUFSIZ); + snprintf (buffer, BUFSIZ, "+ %s\n", mesg); rxvt_warn (buffer, event->request_code); + + if (event->request_code >= 128) + { +#if 0 + /* XListExtensions and probably query extensions hangs when there are multiple queues errors */ + int nexts; + char **exts = XListExtensions (dpy, &nexts); + + while (nexts) + { + char *extname = exts [nexts - 1]; + int major, first_event, first_error; + + if (XQueryExtension (dpy, extname, &major, &first_event, &first_error) && major == event->request_code) + { + XGetErrorDatabaseText (dpy, "XlibMessage", "MinorCode", "Request Minor code %d", mesg, BUFSIZ); + rxvt_warn ("+ (which is extension %s minor code %d)\n", extname, event->minor_code); + + snprintf (buffer, BUFSIZ, "%s.%d", extname, event->minor_code); + XGetErrorDatabaseText (dpy, "XRequest", buffer, "an unregistered minor code", buffer, BUFSIZ); + rxvt_warn ("+ (which is %s)\n", buffer); + + break; + } + + printf ("nextss %d %s\n", nexts, extname);//D + --nexts; + ++exts; + } +#else + int nexts = 0; + char **exts = 0; #endif - rxvt_clean_exit(); - kill(getpid(), sig); + + if (!nexts) + { + rxvt_warn ("+ (which is an unknown extension)\n", buffer); + + XGetErrorDatabaseText (dpy, "XlibMessage", "MinorCode", "Request Minor code %d", mesg, BUFSIZ); + snprintf (buffer, BUFSIZ, "+ %s\n", mesg); rxvt_warn (buffer, event->minor_code); + +#if 0 + sprintf (number, "RENDER.%d", event->minor_code); + XGetErrorDatabaseText (dpy, "XRequest", number, "", buffer, BUFSIZ); + rxvt_warn ("+ (which is %s)\n", buffer); +#endif + } + + XFreeExtensionList (exts); + } + else + { + sprintf (number, "%d", event->request_code); + XGetErrorDatabaseText (dpy, "XRequest", number, "", buffer, BUFSIZ); + rxvt_warn ("+ (which is %s)\n", buffer); + } + + if (event->error_code == BadWindow + || event->error_code == BadPixmap + || event->error_code == BadCursor + || event->error_code == BadFont + || event->error_code == BadDrawable + || event->error_code == BadColor + || event->error_code == BadGC + || event->error_code == BadIDChoice + || event->error_code == BadValue + || event->error_code == BadAtom) + { + if (event->error_code == BadValue) + XGetErrorDatabaseText (dpy, "XlibMessage", "Value", "Value 0x%x", mesg, BUFSIZ); + else if (event->error_code == BadAtom) + XGetErrorDatabaseText (dpy, "XlibMessage", "AtomID", "AtomID 0x%x", mesg, BUFSIZ); + else + XGetErrorDatabaseText (dpy, "XlibMessage", "ResourceID", "ResourceID 0x%x", mesg, BUFSIZ); + + snprintf (buffer, BUFSIZ, "+ %s\n", mesg); rxvt_warn (buffer, event->resourceid); + } } +#endif -/* ARGSUSED */ -/* INTPROTO */ -int -rxvt_xerror_handler(const Display * display - __attribute__ ((unused)), const XErrorEvent * event) +int ecb_cold +rxvt_xerror_handler (Display *display, XErrorEvent *event) { - dR; - - if (R->allowedxerror == -1) - R->allowedxerror = event->error_code; + if (GET_R->allowedxerror == -1) + GET_R->allowedxerror = event->error_code; else { - rxvt_print_error("XError: Request: %d . %d, Error: %d", - event->request_code, event->minor_code, - event->error_code); - - R->destroy (); + // GET_R is most likely not the terminal which caused the error, + // so just output the error and continue +#if ENABLE_MINIMAL + old_xerror_handler (display, event); +#else + print_x_error (display, event); +#endif } return 0; } -/*----------------------------------------------------------------------*/ -/* - * Exit gracefully, clearing the utmp entry and restoring tty attributes - * TODO: if debugging, this should free up any known resources if we can - */ -/* EXTPROTO */ -void -rxvt_clean_exit () +int ecb_cold +rxvt_xioerror_handler (Display *display) { - dR; - - R->destroy (); + rxvt_warn ("X connection to '%s' broken, unable to recover, exiting.\n", + DisplayString (display)); + rxvt_emergency_cleanup (); + _exit (EXIT_FAILURE); } -/* ------------------------------------------------------------------------- * - * MEMORY ALLOCATION WRAPPERS * - * ------------------------------------------------------------------------- */ -/* EXTPROTO */ -void * -rxvt_malloc(size_t size) +static struct sig_handlers { - void *p; + ev::sig sw_term, sw_int; - p = malloc(size); - if (p) - return p; + /* + * Catch a fatal signal and tidy up before quitting + */ + void sig_term (ev::sig &w, int revents); - fprintf(stderr, APL_NAME ": memory allocation failure. Aborting"); - rxvt_clean_exit(); - exit(EXIT_FAILURE); -/* NOTREACHED */ -} + sig_handlers () + { + sw_term.set (this); + sw_int .set (this); + } +} sig_handlers; -/* EXTPROTO */ -void * -rxvt_calloc(size_t number, size_t size) +void +sig_handlers::sig_term (ev::sig &w, int revents) { - void *p; - - p = calloc(number, size); - if (p) - return p; - - fprintf(stderr, APL_NAME ": memory allocation failure. Aborting"); - rxvt_clean_exit(); - exit(EXIT_FAILURE); -/* NOTREACHED */ + rxvt_emergency_cleanup (); + w.stop (); + kill (getpid (), w.signum); } -/* EXTPROTO */ -void * -rxvt_realloc(void *ptr, size_t size) +static void +rxvt_get_ttymode (struct termios *tio) { - void *p; + if (tcgetattr (STDIN_FILENO, tio) < 0) + memset (tio, 0, sizeof (struct termios)); - if (ptr) - p = realloc(ptr, size); - else - p = malloc(size); - if (p) - return p; - - fprintf(stderr, APL_NAME ": memory allocation failure. Aborting"); - rxvt_clean_exit(); - exit(EXIT_FAILURE); -/* NOTREACHED */ -} - -/* ------------------------------------------------------------------------- * - * PRIVILEGED OPERATIONS * - * ------------------------------------------------------------------------- */ -/* take care of suid/sgid super-user (root) privileges */ -/* INTPROTO */ -void -rxvt_privileges(pR_ int mode) -{ -#if ! defined(__CYGWIN32__) -# if !defined(HAVE_SETEUID) && defined(HAVE_SETREUID) -/* setreuid() is the poor man's setuid(), seteuid() */ -# define seteuid(a) setreuid(-1, (a)) -# define setegid(a) setregid(-1, (a)) -# define HAVE_SETEUID -# endif -# ifdef HAVE_SETEUID - switch (mode) { - case IGNORE: - /* - * change effective uid/gid - not real uid/gid - so we can switch - * back to root later, as required - */ - seteuid(getuid()); - setegid(getgid()); - break; - case SAVE: - R->euid = geteuid(); - R->egid = getegid(); - break; - case RESTORE: - seteuid(R->euid); - setegid(R->egid); - break; - } -# else - switch (mode) { - case IGNORE: - setuid(getuid()); - setgid(getgid()); - /* FALLTHROUGH */ - case SAVE: - /* FALLTHROUGH */ - case RESTORE: - break; - } -# endif -#endif -} + for (int i = 0; i < NCCS; i++) + tio->c_cc[i] = VDISABLE; -#ifdef UTMP_SUPPORT -/* EXTPROTO */ -void -rxvt_privileged_utmp(pR_ char action) -{ - D_MAIN((stderr, "rxvt_privileged_utmp(%c); waiting for: %c (pid: %d)", - action, R->next_utmp_action, getpid())); - if (R->next_utmp_action != action || (action != SAVE && action != RESTORE) - || (R->Options & Opt_utmpInhibit) - || R->ttydev == NULL || *R->ttydev == '\0') - return; - - rxvt_privileges(aR_ RESTORE); - if (action == SAVE) { - R->next_utmp_action = RESTORE; - rxvt_makeutent(aR_ R->ttydev, R->rs[Rs_display_name]); - } else { /* action == RESTORE */ - R->next_utmp_action = IGNORE; - rxvt_cleanutent(aR); - } - rxvt_privileges(aR_ IGNORE); -} + tio->c_cc[VINTR] = CINTR; + tio->c_cc[VQUIT] = CQUIT; + tio->c_cc[VERASE] = CERASE; +#ifdef VERASE2 + tio->c_cc[VERASE2] = CERASE2; #endif + tio->c_cc[VKILL] = CKILL; + tio->c_cc[VEOF] = CEOF; + tio->c_cc[VSTART] = CSTART; + tio->c_cc[VSTOP] = CSTOP; + tio->c_cc[VSUSP] = CSUSP; +# ifdef VDSUSP + tio->c_cc[VDSUSP] = CDSUSP; +# endif +# ifdef VREPRINT + tio->c_cc[VREPRINT] = CRPRNT; +# endif +# ifdef VDISCRD + tio->c_cc[VDISCRD] = CFLUSH; +# endif +# ifdef VWERSE + tio->c_cc[VWERSE] = CWERASE; +# endif +# ifdef VLNEXT + tio->c_cc[VLNEXT] = CLNEXT; +# endif +# ifdef VSTATUS + tio->c_cc[VSTATUS] = CSTATUS; +# endif -#ifndef NO_SETOWNER_TTYDEV -/* EXTPROTO */ -void -rxvt_privileged_ttydev(pR_ char action) -{ - D_MAIN((stderr, - "rxvt_privileged_ttydev(aR_ %c); waiting for: %c (pid: %d)", - action, R->next_tty_action, getpid())); - if (R->next_tty_action != action || (action != SAVE && action != RESTORE) - || R->ttydev == NULL || *R->ttydev == '\0') - return; - - rxvt_privileges(aR_ RESTORE); - - if (action == SAVE) { - R->next_tty_action = RESTORE; -# ifndef RESET_TTY_TO_COMMON_DEFAULTS -/* store original tty status for restoration rxvt_clean_exit() -- rgg 04/12/95 */ - if (lstat(R->ttydev, &R->ttyfd_stat) < 0) /* you lose out */ - R->next_tty_action = IGNORE; - else +# if VMIN != VEOF + tio->c_cc[VMIN] = 1; # endif - { - chown(R->ttydev, getuid(), R->ttygid); /* fail silently */ - chmod(R->ttydev, R->ttymode); -# ifdef HAVE_REVOKE - revoke(R->ttydev); +# if VTIME != VEOL + tio->c_cc[VTIME] = 0; # endif - } - } else { /* action == RESTORE */ - R->next_tty_action = IGNORE; -# ifndef RESET_TTY_TO_COMMON_DEFAULTS - chmod(R->ttydev, R->ttyfd_stat.st_mode); - chown(R->ttydev, R->ttyfd_stat.st_uid, R->ttyfd_stat.st_gid); -# else - chmod(R->ttydev, - (S_IRUSR | S_IWUSR | S_IRGRP | S_IWGRP | S_IROTH | S_IWOTH)); - chown(R->ttydev, 0, 0); + + /* input modes */ + tio->c_iflag = (BRKINT | IGNPAR | ICRNL +# ifdef IMAXBEL + | IMAXBEL # endif - } + | IXON); - rxvt_privileges(aR_ IGNORE); + /* output modes */ + tio->c_oflag = (OPOST | ONLCR); -# ifndef RESET_TTY_TO_COMMON_DEFAULTS - D_MAIN((stderr, "%s \"%s\": mode %03o, uid %d, gid %d", - action == RESTORE ? "Restoring" : (action == - SAVE ? "Saving" : - "UNKNOWN ERROR for"), R->ttydev, - R->ttyfd_stat.st_mode, R->ttyfd_stat.st_uid, - R->ttyfd_stat.st_gid)); + /* control modes */ + tio->c_cflag = (CS8 | CREAD); + + /* local modes */ + tio->c_lflag = (ISIG | ICANON | IEXTEN | ECHO +# if defined (ECHOCTL) && defined (ECHOKE) + | ECHOCTL | ECHOKE # endif + | ECHOE | ECHOK); } + +char **rxvt_environ; // startup environment + +void +rxvt_init () +{ + assert (("fontMask must not overlap other RS masks", + 0 == (RS_fontMask & (RS_Sel | RS_baseattrMask | RS_customMask | RS_bgMask | RS_fgMask)))); + + rxvt_get_ttymode (&rxvt_term::def_tio); + + // get rid of stdin/stdout as we don't need them, to free resources + dup2 (STDERR_FILENO, STDIN_FILENO); + dup2 (STDERR_FILENO, STDOUT_FILENO); + + if (!ev_default_loop ()) + rxvt_fatal ("cannot initialise libev (bad value for LIBEV_METHODS?)\n"); + + rxvt_environ = environ; + + signal (SIGHUP, SIG_IGN); + signal (SIGPIPE, SIG_IGN); + + sig_handlers.sw_term.start (SIGTERM); ev_unref (); + sig_handlers.sw_int.start (SIGINT); ev_unref (); + + old_xerror_handler = XSetErrorHandler ((XErrorHandler) rxvt_xerror_handler); + // TODO: handle this with exceptions and tolerate the memory loss + XSetIOErrorHandler (rxvt_xioerror_handler); + + XrmInitialize (); + +#if HAVE_PIXBUF + g_type_init (); #endif +} /*----------------------------------------------------------------------*/ /* - * window size/position calculcations for XSizeHint and other storage. + * window size/position calculations for XSizeHint and other storage. * if width/height are non-zero then override calculated width/height */ -/* EXTPROTO */ void -rxvt_window_calc(pR_ unsigned int width, unsigned int height) +rxvt_term::window_calc (unsigned int newwidth, unsigned int newheight) { - short recalc_x, recalc_y; - int x, y, sb_w, mb_h, flags; - unsigned int w, h; - unsigned int max_width, max_height; - - D_SIZE((stderr, "< Cols/Rows: %3d x %3d ; Width/Height: %4d x %4d", - R->TermWin.ncol, R->TermWin.nrow, R->szHint.width, - R->szHint.height)); - R->szHint.flags = PMinSize | PResizeInc | PBaseSize | PWinGravity; - R->szHint.win_gravity = NorthWestGravity; -/* R->szHint.min_aspect.x = R->szHint.min_aspect.y = 1; */ - - recalc_x = recalc_y = 0; - flags = 0; - if (!R->parsed_geometry) { - R->parsed_geometry = 1; - if (R->rs[Rs_geometry]) - flags = XParseGeometry(R->rs[Rs_geometry], &x, &y, &w, &h); - if (flags & WidthValue) { - R->TermWin.ncol = BOUND_POSITIVE_INT16(w); - R->szHint.flags |= USSize; + short recalc_x, recalc_y; + int x, y, flags; + unsigned int w, h; + unsigned int max_width, max_height; + + szHint.flags = PMinSize | PResizeInc | PBaseSize | PWinGravity; + szHint.win_gravity = NorthWestGravity; + /* szHint.min_aspect.x = szHint.min_aspect.y = 1; */ + + recalc_x = recalc_y = 0; + flags = 0; + + if (!parsed_geometry) + { + parsed_geometry = 1; + + if (rs[Rs_geometry]) + flags = XParseGeometry (rs[Rs_geometry], &x, &y, &w, &h); + + if (flags & WidthValue) + { + if (!w) + rxvt_fatal ("illegal window geometry (width and height must be non-zero), aborting.\n"); + + ncol = clamp (w, 1, std::numeric_limits::max ()); + szHint.flags |= USSize; } - if (flags & HeightValue) { - R->TermWin.nrow = BOUND_POSITIVE_INT16(h); - R->szHint.flags |= USSize; + + if (flags & HeightValue) + { + if (!h) + rxvt_fatal ("illegal window geometry (width and height must be non-zero), aborting.\n"); + + nrow = clamp (h, 1, std::numeric_limits::max ()); + szHint.flags |= USSize; } - if (flags & XValue) { - R->szHint.x = x; - R->szHint.flags |= USPosition; - if (flags & XNegative) { - recalc_x = 1; - R->szHint.win_gravity = NorthEastGravity; + + if (flags & XValue) + { + szHint.x = x; + szHint.flags |= USPosition; + + if (flags & XNegative) + { + recalc_x = 1; + szHint.win_gravity = NorthEastGravity; } } - if (flags & YValue) { - R->szHint.y = y; - R->szHint.flags |= USPosition; - if (flags & YNegative) { - recalc_y = 1; - if (R->szHint.win_gravity == NorthEastGravity) - R->szHint.win_gravity = SouthEastGravity; - else - R->szHint.win_gravity = SouthWestGravity; + + if (flags & YValue) + { + szHint.y = y; + szHint.flags |= USPosition; + + if (flags & YNegative) + { + recalc_y = 1; + + if (szHint.win_gravity == NorthEastGravity) + szHint.win_gravity = SouthEastGravity; + else + szHint.win_gravity = SouthWestGravity; } } } -/* TODO: BOUNDS */ - R->TermWin.width = R->TermWin.ncol * R->TermWin.fwidth; - R->TermWin.height = R->TermWin.nrow * R->TermWin.fheight; - max_width = MAX_COLS * R->TermWin.fwidth; - max_height = MAX_ROWS * R->TermWin.fheight; - - R->szHint.base_width = R->szHint.base_height = 2 * R->TermWin.int_bwidth; - - sb_w = mb_h = 0; - R->window_vt_x = R->window_vt_y = 0; - if (scrollbar_visible(R)) { - sb_w = scrollbar_TotalWidth(); - R->szHint.base_width += sb_w; - if (!(R->Options & Opt_scrollBar_right)) - R->window_vt_x = sb_w; - } - if (menubar_visible(R)) { - mb_h = menuBar_TotalHeight(); - R->szHint.base_height += mb_h; - R->window_vt_y = mb_h; - } - R->szHint.width_inc = R->TermWin.fwidth; - R->szHint.height_inc = R->TermWin.fheight; - R->szHint.min_width = R->szHint.base_width + R->szHint.width_inc; - R->szHint.min_height = R->szHint.base_height + R->szHint.height_inc; - - if (width && width - R->szHint.base_width < max_width) { - R->szHint.width = width; - R->TermWin.width = width - R->szHint.base_width; - } else { - MIN_IT(R->TermWin.width, max_width); - R->szHint.width = R->szHint.base_width + R->TermWin.width; - } - if (height && height - R->szHint.base_height < max_height) { - R->szHint.height = height; - R->TermWin.height = height - R->szHint.base_height; - } else { - MIN_IT(R->TermWin.height, max_height); - R->szHint.height = R->szHint.base_height + R->TermWin.height; - } - if (scrollbar_visible(R) && (R->Options & Opt_scrollBar_right)) - R->window_sb_x = R->szHint.width - sb_w; - - if (recalc_x) - R->szHint.x += (DisplayWidth(R->Xdisplay, Xscreen) - - R->szHint.width - 2 * R->TermWin.ext_bwidth); - if (recalc_y) - R->szHint.y += (DisplayHeight(R->Xdisplay, Xscreen) - - R->szHint.height - 2 * R->TermWin.ext_bwidth); - - R->TermWin.ncol = R->TermWin.width / R->TermWin.fwidth; - R->TermWin.nrow = R->TermWin.height / R->TermWin.fheight; - D_SIZE((stderr, "> Cols/Rows: %3d x %3d ; Width/Height: %4d x %4d", - R->TermWin.ncol, R->TermWin.nrow, R->szHint.width, - R->szHint.height)); - return; + + /* TODO: BOUNDS */ + width = ncol * fwidth; + height = nrow * fheight; + max_width = MAX_COLS * fwidth; + max_height = MAX_ROWS * fheight; + + szHint.base_width = szHint.base_height = 2 * int_bwidth; + + window_vt_x = window_vt_y = int_bwidth; + + if (scrollBar.state) + { + int sb_w = scrollBar.total_width (); + szHint.base_width += sb_w; + + if (!option (Opt_scrollBar_right)) + window_vt_x += sb_w; + } + + szHint.width_inc = fwidth; + szHint.height_inc = fheight; + szHint.min_width = szHint.base_width + szHint.width_inc; + szHint.min_height = szHint.base_height + szHint.height_inc; + + if (newwidth && newwidth - szHint.base_width < max_width) + { + szHint.width = newwidth; + width = newwidth - szHint.base_width; + } + else + { + min_it (width, max_width); + szHint.width = szHint.base_width + width; + } + + if (newheight && newheight - szHint.base_height < max_height) + { + szHint.height = newheight; + height = newheight - szHint.base_height; + } + else + { + min_it (height, max_height); + szHint.height = szHint.base_height + height; + } + + if (recalc_x) + szHint.x += DisplayWidth (dpy, display->screen) - szHint.width - 2 * ext_bwidth; + + if (recalc_y) + szHint.y += DisplayHeight (dpy, display->screen) - szHint.height - 2 * ext_bwidth; + + ncol = width / fwidth; + nrow = height / fheight; + + // When the size of the vt window is not a multiple of the cell + // size, i.e., when the wm does not honour our size hints, there are + // extra areas not covered by the terminal screen. Such gaps, when a + // bg pixmap is set, would have to be cleared manually to properly + // refresh the background. We take the simpler route and shrink the + // vt window so as to avoid creating gaps. + vt_width = ncol * fwidth; + vt_height = nrow * fheight; } /*----------------------------------------------------------------------*/ @@ -621,338 +782,373 @@ void rxvt_term::tt_winch () { - struct winsize ws; - - if (cmd_fd < 0) + if (pty->pty < 0) return; - ws.ws_col = TermWin.ncol; - ws.ws_row = TermWin.nrow; - ws.ws_xpixel = ws.ws_ypixel = 0; -#ifndef DEBUG_SIZE - (void)ioctl (cmd_fd, TIOCSWINSZ, &ws); -#else - if (ioctl (cmd_fd, TIOCSWINSZ, &ws) < 0) - D_SIZE((stderr, "Failed to send TIOCSWINSZ to fd %d", fd)); -# ifdef SIGWINCH - else if (cmd_pid) /* force through to the command */ - kill (cmd_pid, SIGWINCH); -# endif + struct winsize ws; + + ws.ws_col = ncol; + ws.ws_row = nrow; + ws.ws_xpixel = vt_width; + ws.ws_ypixel = vt_height; + ioctl (pty->pty, TIOCSWINSZ, &ws); + +#if 0 + // TIOCSWINSZ is supposed to do this automatically and correctly + if (cmd_pid) /* force through to the command */ + kill (-cmd_pid, SIGWINCH); #endif } /*----------------------------------------------------------------------*/ -/* rxvt_change_font() - Switch to a new font */ -/* - * init = 1 - initialize - * - * fontname == FONT_UP - switch to bigger font - * fontname == FONT_DN - switch to smaller font - */ -/* EXTPROTO */ +/* load and set the various fonts */ +bool +rxvt_term::set_fonts () +{ + rxvt_fontset *fs = new rxvt_fontset (this); + rxvt_fontprop prop; + + if (!fs + || !fs->populate (rs[Rs_font] ? rs[Rs_font] : "fixed") + || !fs->realize_font (1)) + { + delete fs; + return false; + } + +#if ENABLE_STYLES + for (int i = RS_styleCount; --i; ) + if (fontset[i] != fontset[0]) + delete fontset[i]; +#endif + + delete fontset[0]; + fontset[0] = fs; + + prop = (*fs)[rxvt_fontset::firstFont]->properties (); + prop.width = max (prop.width + letterSpace, 1); + + fs->set_prop (prop, false); + + fwidth = prop.width; + fheight = prop.height + lineSpace; + fbase = prop.ascent; + + for (int style = 1; style < 4; style++) + { +#if ENABLE_STYLES + const char *res = rs[Rs_font + style]; + + if (res && !*res) + fontset[style] = fontset[0]; + else + { + fontset[style] = fs = new rxvt_fontset (this); + rxvt_fontprop prop2 = prop; + + if (res) + { + fs->populate (res); + fs->set_prop (prop2, false); + } + else + { + fs->populate (fontset[0]->fontdesc); + + if (SET_STYLE (0, style) & RS_Bold) prop2.weight = rxvt_fontprop::bold; + if (SET_STYLE (0, style) & RS_Italic) prop2.slant = rxvt_fontprop::italic; + + fs->set_prop (prop2, true); + } + + } +#else + fontset[style] = fontset[0]; +#endif + } + + if (parent) + { + resize_all_windows (0, 0, 0); + scr_remap_chars (); + scr_touch (true); + } + + return true; +} + +void +rxvt_term::set_string_property (Atom prop, const char *str, int len) +{ + XChangeProperty (dpy, parent, + prop, XA_STRING, 8, PropModeReplace, + (const unsigned char *)str, len >= 0 ? len : strlen (str)); +} + void -rxvt_change_font(pR_ int init, const char *fontname) +rxvt_term::set_mbstring_property (Atom prop, const char *str, int len) { + XTextProperty ct; + + if (XmbTextListToTextProperty (dpy, (char **)&str, 1, XStdICCTextStyle, &ct) >= 0) + { + XSetTextProperty (dpy, parent, &ct, prop); + XFree (ct.value); + } } -/* INTPROTO */ void -rxvt_font_up_down(pR_ int n, int direction) +rxvt_term::set_utf8_property (Atom prop, const char *str, int len) { + wchar_t *ws = rxvt_mbstowcs (str, len); + char *s = rxvt_wcstoutf8 (ws); + + XChangeProperty (dpy, parent, + prop, xa[XA_UTF8_STRING], 8, PropModeReplace, + (const unsigned char *)s, strlen (s)); + + free (s); + free (ws); } /*----------------------------------------------------------------------*/ /*----------------------------------------------------------------------*/ /* xterm sequences - title, iconName, color (exptl) */ -/* EXTPROTO */ void -rxvt_set_title(pR_ const char *str) +rxvt_term::set_title (const char *str) { -#ifndef SMART_WINDOW_TITLE - XStoreName(R->Xdisplay, R->TermWin.parent[0], str); -#else - char *name; - - if (XFetchName(R->Xdisplay, R->TermWin.parent[0], &name) == 0) - name = NULL; - if (name == NULL || STRCMP(name, str)) - XStoreName(R->Xdisplay, R->TermWin.parent[0], str); - if (name) - XFree(name); + set_mbstring_property (XA_WM_NAME, str); +#if ENABLE_EWMH + set_utf8_property (xa[XA_NET_WM_NAME], str); #endif } -/* EXTPROTO */ void -rxvt_set_iconName(pR_ const char *str) +rxvt_term::set_icon_name (const char *str) { -#ifndef SMART_WINDOW_TITLE - XSetIconName(R->Xdisplay, R->TermWin.parent[0], str); -#else - char *name; - - if (XGetIconName(R->Xdisplay, R->TermWin.parent[0], &name)) - name = NULL; - if (name == NULL || STRCMP(name, str)) - XSetIconName(R->Xdisplay, R->TermWin.parent[0], str); - if (name) - XFree(name); + set_mbstring_property (XA_WM_ICON_NAME, str); +#if ENABLE_EWMH + set_utf8_property (xa[XA_NET_WM_ICON_NAME], str); #endif } -#ifdef XTERM_COLOR_CHANGE -/* EXTPROTO */ void -rxvt_set_window_color(pR_ int idx, const char *color) +rxvt_term::set_window_color (int idx, const char *color) { - rxvt_color xcol; - int i; +#ifdef XTERM_COLOR_CHANGE + rxvt_color xcol; - if (color == NULL || *color == '\0') - return; - -/* handle color aliases */ - if (isdigit(*color)) { - i = atoi(color); - if (i >= 8 && i <= 15) { /* bright colors */ - i -= 8; -# ifndef NO_BRIGHTCOLOR - R->PixColors[idx] = R->PixColors[minBrightCOLOR + i]; - SET_PIXCOLOR(R, idx); - goto Done; -# endif + if (color == NULL || *color == '\0') + return; + + color = strdup (color); + allocated.push_back ((void *)color); + rs[Rs_color + idx] = color; + + /* handle color aliases */ + if (isdigit (*color)) + { + int i = atoi (color); + + if (i >= 8 && i <= 15) + { + /* bright colors */ + pix_colors_focused[idx] = pix_colors_focused[minBrightCOLOR + i - 8]; + goto done; } - if (i >= 0 && i <= 7) { /* normal colors */ - R->PixColors[idx] = R->PixColors[minCOLOR + i]; - SET_PIXCOLOR(R, idx); - goto Done; + + if (i >= 0 && i <= 7) + { + /* normal colors */ + pix_colors_focused[idx] = pix_colors_focused[minCOLOR + i]; + goto done; } } - if (!rxvt_rXParseAllocColor(aR_ & xcol, color)) - return; -/* XStoreColor (R->Xdisplay, XCMAP, XColor*); */ -/* - * FIXME: should free colors here, but no idea how to do it so instead, - * so just keep gobbling up the colormap - */ -# if 0 - for (i = Color_Black; i <= Color_White; i++) - if (R->PixColors[idx] == R->PixColors[i]) - break; - if (i > Color_White) { - /* fprintf (stderr, "XFreeColors: R->PixColors [%d] = %lu\n", idx, R->PixColors [idx]); */ - XFreeColors(R->Xdisplay, XCMAP, (R->PixColors + idx), 1, - DisplayPlanes(R->Xdisplay, Xscreen)); - } -# endif + set_color (xcol, color); - R->PixColors[idx] = xcol; - SET_PIXCOLOR(R, idx); + /* + * FIXME: should free colors here, but no idea how to do it so instead, + * so just keep gobbling up the colormap + */ -/* XSetWindowAttributes attr; */ -/* Cursor cursor; */ - Done: - if (idx == Color_bg && !(R->Options & Opt_transparent)) - XSetWindowBackground(R->Xdisplay, R->TermWin.vt, - R->PixColors[Color_bg]); - -/* handle Color_BD, scrollbar background, etc. */ - - rxvt_set_colorfgbg(aR); - rxvt_recolour_cursor(aR); -/* the only reasonable way to enforce a clean update */ - rxvt_scr_poweron(aR); -} + pix_colors_focused[idx] = xcol; -#else -# define rxvt_set_window_color(aR_ idx,color) ((void)0) -#endif /* XTERM_COLOR_CHANGE */ +done: + /*TODO: handle Color_BD, scrollbar background, etc. */ + + update_fade_color (idx); + recolour_cursor (); + scr_recolour (); +#endif /* XTERM_COLOR_CHANGE */ +} -/* EXTPROTO */ void -rxvt_recolour_cursor(pR) +rxvt_term::recolour_cursor () { - rxvt_color xcol[2]; + XColor fg, bg; -#if TODO - xcol[0] = R->PixColors[Color_pointer]; - xcol[1] = R->PixColors[Color_bg]; - XQueryColors(R->Xdisplay, XCMAP, xcol, 2); - XRecolorCursor(R->Xdisplay, R->TermWin_cursor, &(xcol[0]), &(xcol[1])); -#endif + (ISSET_PIXCOLOR (Color_pointer_fg) + ? pix_colors_focused[Color_pointer_fg] + : pix_colors_focused[Color_fg]).get (fg); + + (ISSET_PIXCOLOR (Color_pointer_bg) + ? pix_colors_focused[Color_pointer_bg] + : pix_colors_focused[Color_bg]).get (bg); + + XRecolorCursor (dpy, TermWin_cursor, &fg, &bg); } /*----------------------------------------------------------------------*/ /* * find if fg/bg matches any of the normal (low-intensity) colors */ -/* INTPROTO */ -void -rxvt_set_colorfgbg(pR) +char * +rxvt_term::get_colorfgbg () { - unsigned int i; - const char *xpmb = "\0"; - char fstr[sizeof("default") + 1], bstr[sizeof("default") + 1]; - - R->env_colorfgbg = - (char *)rxvt_malloc(sizeof("COLORFGBG=default;default;bg") + 1); - STRCPY(fstr, "default"); - STRCPY(bstr, "default"); - for (i = Color_Black; i <= Color_White; i++) - if (R->PixColors[Color_fg] == R->PixColors[i]) { - sprintf(fstr, "%d", (i - Color_Black)); - break; - } - for (i = Color_Black; i <= Color_White; i++) - if (R->PixColors[Color_bg] == R->PixColors[i]) { - sprintf(bstr, "%d", (i - Color_Black)); -#ifdef XPM_BACKGROUND - xpmb = "default;"; -#endif - break; - } - sprintf(R->env_colorfgbg, "COLORFGBG=%s;%s%s", fstr, xpmb, bstr); - putenv(R->env_colorfgbg); + unsigned int i; + const char *xpmb = ""; + char fstr[] = "default"; + char bstr[] = "default"; + char *env_colorfgbg; + + for (i = Color_Black; i <= Color_White; i++) + if (pix_colors[Color_fg] == pix_colors[i]) + { + sprintf (fstr, "%d", i - Color_Black); + break; + } -#ifndef NO_BRIGHTCOLOR - R->colorfgbg = DEFAULT_RSTYLE; - for (i = minCOLOR; i <= maxCOLOR; i++) { - if (R->PixColors[Color_fg] == R->PixColors[i]) - R->colorfgbg = SET_FGCOLOR(R->colorfgbg, i); - if (R->PixColors[Color_bg] == R->PixColors[i]) - R->colorfgbg = SET_BGCOLOR(R->colorfgbg, i); - } + for (i = Color_Black; i <= Color_White; i++) + if (pix_colors[Color_bg] == pix_colors[i]) + { + sprintf (bstr, "%d", i - Color_Black); +#if BG_IMAGE_FROM_FILE + xpmb = "default;"; #endif + break; + } + + env_colorfgbg = (char *)rxvt_malloc (sizeof ("COLORFGBG=default;default;bg")); + sprintf (env_colorfgbg, "COLORFGBG=%s;%s%s", fstr, xpmb, bstr); + return env_colorfgbg; } /*----------------------------------------------------------------------*/ -/* - * Colour determination for low colour displays, routine from - * Hans de Goede - */ - -/* EXTPROTO */ -int -rxvt_rXParseAllocColor(pR_ rxvt_color * screen_in_out, const char *colour) -{ - screen_in_out->set(aR_ colour); - - if (!screen_in_out->set(aR_ colour)) { - rxvt_print_error("can't allocate colour: %s", colour); - return false; - } +bool +rxvt_term::set_color (rxvt_color &color, const char *name) +{ + if (color.set (this, name)) return true; + + rxvt_warn ("can't get colour '%s', continuing without.\n", name); + return false; +} + +void +rxvt_term::alias_color (int dst, int src) +{ + pix_colors[dst].set (this, rs[Rs_color + dst] = rs[Rs_color + src]); } /* -------------------------------------------------------------------- * * - WINDOW RESIZING - * * -------------------------------------------------------------------- */ -/* EXTPROTO */ void -rxvt_resize_all_windows(pR_ unsigned int width, unsigned int height, - int ignoreparent) +rxvt_term::resize_all_windows (unsigned int newwidth, unsigned int newheight, int ignoreparent) { - int fix_screen; + int fix_screen; + int old_width = szHint.width; + int old_height = szHint.height; -#ifdef SMART_RESIZE - int old_width = R->szHint.width, old_height = R->szHint.height; -#endif + window_calc (newwidth, newheight); + + bool set_hint = !HOOK_INVOKE ((this, HOOK_RESIZE_ALL_WINDOWS, DT_INT, newwidth, DT_INT, newheight, DT_END)); - rxvt_window_calc(aR_ width, height); - XSetWMNormalHints(R->Xdisplay, R->TermWin.parent[0], &R->szHint); - if (!ignoreparent) { + // to avoid races between us and the wm, we clear the incremental size hints around the xresizewindow + if (set_hint) + { + szHint.flags &= ~(PBaseSize | PResizeInc); + XSetWMNormalHints (dpy, parent, &szHint); + szHint.flags |= PBaseSize | PResizeInc; + } + + if (!ignoreparent) + { #ifdef SMART_RESIZE -/* - * resize by Marius Gedminas - * reposition window on resize depending on placement on screen - */ - int x, y, x1, y1; - int dx, dy; - unsigned int unused_w1, unused_h1, unused_b1, unused_d1; - Window unused_cr; - - XTranslateCoordinates(R->Xdisplay, R->TermWin.parent[0], Xroot, - 0, 0, &x, &y, &unused_cr); - XGetGeometry(R->Xdisplay, R->TermWin.parent[0], &unused_cr, &x1, &y1, - &unused_w1, &unused_h1, &unused_b1, &unused_d1); - /* - * if Xroot isn't the parent window, a WM will probably have offset - * our position for handles and decorations. Counter it - */ - if (x1 != x || y1 != y) { - x -= x1; - y -= y1; + /* + * resize by Marius Gedminas + * reposition window on resize depending on placement on screen + */ + int x, y, x1, y1; + int dx, dy; + unsigned int unused_w1, unused_h1, unused_b1, unused_d1; + Window unused_cr; + + XTranslateCoordinates (dpy, parent, display->root, + 0, 0, &x, &y, &unused_cr); + XGetGeometry (dpy, parent, &unused_cr, &x1, &y1, + &unused_w1, &unused_h1, &unused_b1, &unused_d1); + /* + * if display->root isn't the parent window, a WM will probably have offset + * our position for handles and decorations. Counter it + */ + if (x1 != x || y1 != y) + { + x -= x1; + y -= y1; } - x1 = (DisplayWidth(R->Xdisplay, Xscreen) - old_width) / 2; - y1 = (DisplayHeight(R->Xdisplay, Xscreen) - old_height) / 2; - dx = old_width - R->szHint.width; - dy = old_height - R->szHint.height; - - /* Check position of the center of the window */ - if (x < x1) /* left half */ - dx = 0; - else if (x == x1) /* exact center */ - dx /= 2; - if (y < y1) /* top half */ - dy = 0; - else if (y == y1) /* exact center */ - dy /= 2; + x1 = (DisplayWidth (dpy, display->screen) - old_width ) / 2; + y1 = (DisplayHeight (dpy, display->screen) - old_height) / 2; + dx = old_width - szHint.width; + dy = old_height - szHint.height; + + /* Check position of the center of the window */ + if (x < x1) /* left half */ + dx = 0; + else if (x == x1) /* exact center */ + dx /= 2; + if (y < y1) /* top half */ + dy = 0; + else if (y == y1) /* exact center */ + dy /= 2; - XMoveResizeWindow(R->Xdisplay, R->TermWin.parent[0], x + dx, y + dy, - R->szHint.width, R->szHint.height); + XMoveResizeWindow (dpy, parent, x + dx, y + dy, + szHint.width, szHint.height); #else - XResizeWindow(R->Xdisplay, R->TermWin.parent[0], R->szHint.width, - R->szHint.height); + XResizeWindow (dpy, parent, szHint.width, szHint.height); #endif } - fix_screen = (R->TermWin.ncol != R->prev_ncol - || R->TermWin.nrow != R->prev_nrow); - if (fix_screen || width != R->old_width || height != R->old_height) { - if (scrollbar_visible(R)) { - XMoveResizeWindow(R->Xdisplay, R->scrollBar.win, R->window_sb_x, - 0, scrollbar_TotalWidth(), R->szHint.height); - rxvt_Resize_scrollBar(aR); - } - if (menubar_visible(R)) - XMoveResizeWindow(R->Xdisplay, R->menuBar.win, R->window_vt_x, - 0, TermWin_TotalWidth(), menuBar_TotalHeight()); - XMoveResizeWindow(R->Xdisplay, R->TermWin.vt, R->window_vt_x, - R->window_vt_y, TermWin_TotalWidth(), - TermWin_TotalHeight()); -#ifdef RXVT_GRAPHICS - if (R->old_height) - rxvt_Gr_Resize(aR_ R->old_width - R->szHint.base_width, - R->old_height - R->szHint.base_height); -#endif - rxvt_scr_clear(aR); -#ifdef XPM_BACKGROUND - rxvt_resize_pixmap(aR); -#endif - } + if (set_hint) + XSetWMNormalHints (dpy, parent, &szHint); - if (fix_screen || R->old_height == 0) { - int curr_screen = -1; - uint16_t old_ncol = R->prev_ncol; - - /* scr_reset only works on the primary screen */ - if (R->old_height) /* this is not the first time through */ - curr_screen = rxvt_scr_change_screen(aR_ PRIMARY); - rxvt_scr_reset(aR); - if (curr_screen >= 0) { /* this is not the first time through */ - rxvt_scr_change_screen(aR_ curr_screen); - rxvt_selection_check(aR_(old_ncol != R->TermWin.ncol ? 4 : 0)); - } + fix_screen = ncol != prev_ncol || nrow != prev_nrow; + + if (fix_screen || newwidth != old_width || newheight != old_height) + { + if (scrollBar.state) + scrollBar.resize (); + + XMoveResizeWindow (dpy, vt, + window_vt_x, window_vt_y, + vt_width, vt_height); + + HOOK_INVOKE ((this, HOOK_SIZE_CHANGE, DT_INT, newwidth, DT_INT, newheight, DT_END)); + +#ifdef HAVE_BG_PIXMAP + if (bg_window_size_sensitive ()) + update_background (); +#endif } - R->old_width = R->szHint.width; - R->old_height = R->szHint.height; + if (fix_screen || old_height == 0) + scr_reset (); -#ifdef USE_XIM - rxvt_IMSetStatusPosition(aR); +#if USE_XIM + im_set_position (); #endif } @@ -960,361 +1156,560 @@ * Set the width/height of the vt window in characters. Units are pixels. * good for toggling 80/132 columns */ -/* EXTPROTO */ void -rxvt_set_widthheight(pR_ unsigned int width, unsigned int height) +rxvt_term::set_widthheight (unsigned int newwidth, unsigned int newheight) { - XWindowAttributes wattr; + XWindowAttributes wattr; - if (width == 0 || height == 0) { - XGetWindowAttributes(R->Xdisplay, Xroot, &wattr); - if (width == 0) - width = wattr.width - R->szHint.base_width; - if (height == 0) - height = wattr.height - R->szHint.base_height; - } - if (width != R->TermWin.width || height != R->TermWin.height) { - width += R->szHint.base_width; - height += R->szHint.base_height; - rxvt_resize_all_windows(aR_ width, height, 0); + if (newwidth == 0 || newheight == 0) + { + XGetWindowAttributes (dpy, display->root, &wattr); + + if (newwidth == 0) + newwidth = wattr.width - szHint.base_width; + if (newheight == 0) + newheight = wattr.height - szHint.base_height; + } + + if (newwidth != vt_width || newheight != vt_height) + { + newwidth += szHint.base_width; + newheight += szHint.base_height; + resize_all_windows (newwidth, newheight, 0); } } /* -------------------------------------------------------------------- * * - X INPUT METHOD ROUTINES - * * -------------------------------------------------------------------- */ -#ifdef USE_XIM -/* INTPROTO */ +#if USE_XIM + +void +rxvt_term::im_set_color (unsigned long &fg, unsigned long &bg) +{ + fg = pix_colors [Color_fg]; + bg = pix_colors [Color_bg]; +} + void -rxvt_setSize(pR_ XRectangle * size) +rxvt_term::im_set_size (XRectangle &size) { - size->x = R->TermWin.int_bwidth; - size->y = R->TermWin.int_bwidth; - size->width = Width2Pixel(R->TermWin.ncol); - size->height = Height2Pixel(R->TermWin.nrow); + // the int_bwidth terms make no sense to me + size.x = int_bwidth; + size.y = int_bwidth; + size.width = Width2Pixel (ncol) + int_bwidth; + size.height = Height2Pixel (nrow) + int_bwidth; } -/* INTPROTO */ void -rxvt_setColor(pR_ unsigned long *fg, unsigned long *bg) +rxvt_term::im_set_preedit_area (XRectangle &preedit_rect, + XRectangle &status_rect, + const XRectangle &needed_rect) { - *fg = R->PixColors[Color_fg]; - *bg = R->PixColors[Color_bg]; + preedit_rect.x = needed_rect.width; + preedit_rect.y = 0; + preedit_rect.width = Width2Pixel (ncol) - needed_rect.width + 1; + preedit_rect.height = fheight; + + status_rect.x = 0; + status_rect.y = 0; + status_rect.width = needed_rect.width ? needed_rect.width : Width2Pixel (ncol) + 1; + status_rect.height = fheight; } /* Checking whether input method is running. */ -/* INTPROTO */ -Bool -rxvt_IMisRunning(pR) +bool +rxvt_term::im_is_running () { - char *p; - Atom atom; - Window win; - char server[IMBUFSIZ]; + Atom atom; + Window win; + char server[IMBUFSIZ]; + + /* get current locale modifier */ + if (char *p = XSetLocaleModifiers (0)) + { + strcpy (server, "@server="); + strncat (server, p + 4, IMBUFSIZ - 9); /* skip "@im=" */ + + if (p = strchr (server + 1, '@')) /* first one only */ + *p = '\0'; -/* get current locale modifier */ - if ((p = XSetLocaleModifiers(NULL)) != NULL) { - STRCPY(server, "@server="); - STRNCAT(server, &(p[4]), IMBUFSIZ - 9); /* skip "@im=" */ - if ((p = STRCHR(server + 1, '@')) != NULL) /* first one only */ - *p = '\0'; + atom = XInternAtom (dpy, server, False); + win = XGetSelectionOwner (dpy, atom); - atom = XInternAtom(R->Xdisplay, server, False); - win = XGetSelectionOwner(R->Xdisplay, atom); - if (win != None) - return True; + if (win != None) + return true; } - return False; + + return false; } -/* EXTPROTO */ void -rxvt_IMSendSpot(pR) +rxvt_term::im_send_spot () { - XPoint spot; - XVaNestedList preedit_attr; + XPoint nspot; + XVaNestedList preedit_attr; + + if (!Input_Context + || !focus + || !(input_style & (XIMPreeditPosition | XIMPreeditCallbacks))) + return; + + im_set_position (nspot); - if (R->Input_Context == NULL - || !R->TermWin.focus || !(R->input_style & XIMPreeditPosition) - || !(R->event_type == KeyPress - || R->event_type == Expose - || R->event_type == NoExpose - || R->event_type == SelectionNotify - || R->event_type == ButtonRelease || R->event_type == FocusIn) - || !rxvt_IMisRunning(aR)) - return; + if (nspot.x == spot.x && nspot.y == spot.y) + return; - rxvt_setPosition(aR_ & spot); + spot = nspot; - preedit_attr = XVaCreateNestedList(0, XNSpotLocation, &spot, NULL); - XSetICValues(R->Input_Context, XNPreeditAttributes, preedit_attr, NULL); - XFree(preedit_attr); + preedit_attr = XVaCreateNestedList (0, XNSpotLocation, &spot, NULL); + XSetICValues (Input_Context, XNPreeditAttributes, preedit_attr, NULL); + XFree (preedit_attr); } -/* EXTPROTO */ void -rxvt_setTermFontSet(pR_ int idx) +rxvt_term::im_destroy () { - char *string; - long length; - int success = 0; + if (input_method) + { + if (Input_Context && input_method->xim) + XDestroyIC (Input_Context); - if (idx < 0 || idx >= MAX_NFONTS) - return; + display->put_xim (input_method); + input_method = 0; + } + + Input_Context = 0; } -/* INTPROTO */ -void -rxvt_setPreeditArea (pR_ XRectangle * preedit_rect, XRectangle * status_rect, - XRectangle * needed_rect) +#ifdef ENABLE_XIM_ONTHESPOT + +static void +xim_preedit_start (XIC ic, XPointer client_data, XPointer call_data) { - int mbh, vtx = 0; + ((rxvt_term *)client_data)->make_current (); + HOOK_INVOKE (((rxvt_term *)client_data, HOOK_XIM_PREEDIT_START, DT_END)); +} + +static void +xim_preedit_done (XIC ic, XPointer client_data, XPointer call_data) +{ + ((rxvt_term *)client_data)->make_current (); + HOOK_INVOKE (((rxvt_term *)client_data, HOOK_XIM_PREEDIT_DONE, DT_END)); +} - if (scrollbar_visible(R) && !(R->Options & Opt_scrollBar_right)) - vtx = scrollbar_TotalWidth(); - mbh = menubar_visible(R) ? menuBar_TotalHeight() : 0; - mbh -= R->TermWin.lineSpace; +static void +xim_preedit_draw (XIC ic, XPointer client_data, XIMPreeditDrawCallbackStruct *call_data) +{ + rxvt_term *term = (rxvt_term *)client_data; + XIMText *text = call_data->text; + + term->make_current (); - preedit_rect->x = needed_rect->width + vtx; - preedit_rect->y = Height2Pixel(R->TermWin.nrow - 1) + mbh; + if (text) + { + wchar_t *str; - preedit_rect->width = Width2Pixel(R->TermWin.ncol + 1) - needed_rect->width - + vtx; - preedit_rect->height = Height2Pixel(1); + if (!text->encoding_is_wchar && text->string.multi_byte) + { + // of course, X makes it ugly again + if (term->rs[Rs_imLocale]) + SET_LOCALE (term->rs[Rs_imLocale]); - status_rect->x = vtx; - status_rect->y = Height2Pixel(R->TermWin.nrow - 1) + mbh; + str = rxvt_temp_buf (text->length + 1); + mbstowcs (str, text->string.multi_byte, text->length + 1); - status_rect->width = needed_rect->width ? needed_rect->width - : Width2Pixel(R->TermWin.ncol + 1); - status_rect->height = Height2Pixel(1); + if (term->rs[Rs_imLocale]) + SET_LOCALE (term->locale); + } + else + str = text->string.wide_char; + + HOOK_INVOKE ((term, HOOK_XIM_PREEDIT_DRAW, + DT_INT, call_data->caret, + DT_INT, call_data->chg_first, + DT_INT, call_data->chg_length, + DT_LCS_LEN, (void *)text->feedback, text->feedback ? (int)text->length : 0, + DT_WCS_LEN, str, str ? (int)text->length : 0, + DT_END)); + } + else + HOOK_INVOKE ((term, HOOK_XIM_PREEDIT_DRAW, + DT_INT, call_data->caret, + DT_INT, call_data->chg_first, + DT_INT, call_data->chg_length, + DT_END)); } -/* ARGSUSED */ -/* INTPROTO */ -void -rxvt_IMDestroyCallback(XIM xim __attribute__ ((unused)), XPointer client_data - __attribute__ ((unused)), XPointer call_data - __attribute__ ((unused))) +#if 0 +static void +xim_preedit_caret (XIC ic, XPointer client_data, XIMPreeditCaretCallbackStruct *call_data) { - dR; - - R->Input_Context = NULL; -/* To avoid Segmentation Fault in C locale: Solaris only? */ - if (STRCMP(R->locale, "C")) - XRegisterIMInstantiateCallback(R->Xdisplay, NULL, NULL, NULL, - rxvt_IMInstantiateCallback, NULL); + ((rxvt_term *)client_data)->make_current (); + HOOK_INVOKE (((rxvt_term *)client_data, HOOK_XIM_PREEDIT_CARET, + DT_INT, call_data->position, + DT_INT, call_data->direction, + DT_INT, call_data->style, + DT_END)); } +#endif + +#endif /* - * X manual pages and include files don't match on some systems: - * some think this is an XIDProc and others an XIMProc so we can't - * use the first argument - need to update this to be nice for - * both types via some sort of configure detection + * Try to open a XIM with the current modifiers, then see if we can + * open a suitable preedit type */ -/* ARGSUSED */ -/* EXTPROTO */ +bool +rxvt_term::im_get_ic (const char *modifiers) +{ + int i, j, found; + XIM xim; + XPoint spot; + XRectangle rect, status_rect, needed_rect; + unsigned long fg, bg; + const char *p; + char **s; + XIMStyles *xim_styles; + + set_environ (envv); + + if (!((p = XSetLocaleModifiers (modifiers)) && *p)) + return false; + + input_method = display->get_xim (locale, modifiers); + if (input_method == NULL) + return false; + + xim = input_method->xim; + spot.x = spot.y = -1; + + xim_styles = NULL; + if (XGetIMValues (xim, XNQueryInputStyle, &xim_styles, NULL) + || !xim_styles || !xim_styles->count_styles) + { + im_destroy (); + return false; + } + + const char *pet[] = { rs[Rs_preeditType], "OverTheSpot,OffTheSpot,Root,None" }; + + for (int pi = 0; pi < 2; pi++) + { + p = pet[pi]; + + if (!p) + continue; + + s = rxvt_strsplit (',', p); + + for (i = found = 0; !found && s[i]; i++) + { + if (!strcmp (s[i], "OverTheSpot")) + input_style = XIMPreeditPosition | XIMStatusNothing; + else if (!strcmp (s[i], "OffTheSpot")) + input_style = XIMPreeditArea | XIMStatusArea; + else if (!strcmp (s[i], "Root")) + input_style = XIMPreeditNothing | XIMStatusNothing; + else if (!strcmp (s[i], "None")) + input_style = XIMPreeditNone | XIMStatusNone; +#ifdef ENABLE_XIM_ONTHESPOT + else if (SHOULD_INVOKE (HOOK_XIM_PREEDIT_START) && !strcmp (s[i], "OnTheSpot")) + input_style = XIMPreeditCallbacks | XIMStatusNothing; +#endif + else + input_style = XIMPreeditNothing | XIMStatusNothing; + + for (j = 0; j < xim_styles->count_styles; j++) + if (input_style == xim_styles->supported_styles[j]) + { + rxvt_free_strsplit (s); + + found = 1; + goto foundpet; + } + + } + + rxvt_free_strsplit (s); + } + +foundpet: + + XFree (xim_styles); + + if (!found) + { + im_destroy (); + return false; + } + + XFontSet fs = 0; + XVaNestedList preedit_attr = 0, status_attr = 0; + + if (input_style & (XIMPreeditPosition | XIMPreeditArea)) + { + // fake us a font-set, please + char **missing_charset_list; + int missing_charset_count; + char *def_string; + char pat[512]; + + sprintf (pat, + "-*-*-*-R-*-*-%d-*-*-*-*-*-*," + "-*-*-*-R-*-*-%d-*-*-*-*-*-*," + "-*-*-*-R-*-*-%d-*-*-*-*-*-*," + "-*-*-*-R-*-*-%d-*-*-*-*-*-*," + "-*-*-*-R-*-*-%d-*-*-*-*-*-*," + "*", + fheight, + fheight + 1, fheight - 1, + fheight - 2, fheight + 2); + + fs = XCreateFontSet (dpy, rs[Rs_imFont] ? rs[Rs_imFont] : pat, + &missing_charset_list, &missing_charset_count, &def_string); + + if (missing_charset_list) + XFreeStringList (missing_charset_list); + + if (!fs) + { + input_style &= ~(XIMPreeditPosition | XIMPreeditArea); + rxvt_warn ("unable to create fontset for input method, try \"-pt Root\". Continuing.\n"); + } + } + + if (input_style & XIMPreeditPosition) + { + im_set_size (rect); + im_set_position (spot); + im_set_color (fg, bg); + + preedit_attr = XVaCreateNestedList (0, + XNForeground, fg, + XNBackground, bg, + XNArea, &rect, + XNSpotLocation, &spot, + XNFontSet, fs, + NULL); + } + else if (input_style & XIMPreeditArea) + { + im_set_color (fg, bg); + + /* + * The necessary width of preedit area is unknown + * until create input context. + */ + needed_rect.width = 0; + im_set_preedit_area (rect, status_rect, needed_rect); + + preedit_attr = XVaCreateNestedList (0, + XNForeground, fg, + XNBackground, bg, + XNArea, &rect, + XNFontSet, fs, + NULL); + status_attr = XVaCreateNestedList (0, + XNForeground, fg, + XNBackground, bg, + XNArea, &status_rect, + XNFontSet, fs, + NULL); + } +#if ENABLE_XIM_ONTHESPOT + else if (input_style & XIMPreeditCallbacks) + { + XIMCallback xcb[4]; + + im_set_position (spot); + + xcb[0].client_data = (XPointer)this; xcb[0].callback = (XIMProc)xim_preedit_start; + xcb[1].client_data = (XPointer)this; xcb[1].callback = (XIMProc)xim_preedit_done; + xcb[2].client_data = (XPointer)this; xcb[2].callback = (XIMProc)xim_preedit_draw; +# if 0 + xcb[3].client_data = (XPointer)this; xcb[3].callback = (XIMProc)xim_preedit_caret; +# endif + + preedit_attr = XVaCreateNestedList (0, + XNSpotLocation, &spot, + XNPreeditStartCallback, &xcb[0], + XNPreeditDoneCallback , &xcb[1], + XNPreeditDrawCallback , &xcb[2], +# if 0 + XNPreeditCaretCallback, &xcb[3], +# endif + NULL); + } +#endif + + Input_Context = XCreateIC (xim, + XNInputStyle, input_style, + XNClientWindow, vt, + XNFocusWindow, parent, + preedit_attr ? XNPreeditAttributes : NULL, + preedit_attr, + status_attr ? XNStatusAttributes : NULL, + status_attr, NULL); + + if (preedit_attr) XFree (preedit_attr); + if (status_attr) XFree (status_attr); + if (fs) XFreeFontSet (dpy, fs); + + if (Input_Context == NULL) + { + rxvt_warn ("failed to create input context, continuing without XIM.\n"); + im_destroy (); + return false; + } + +#if 0 + // unfortunately, only the focus window is used by XIM, hard to fix + if (!XGetICValues (Input_Context, XNFilterEvents, &vt_emask_xim, NULL)) + vt_select_input (); +#endif + + im_set_position (); + + return true; +} + void -rxvt_IMInstantiateCallback(Display * unused - __attribute__ ((unused)), XPointer client_data - __attribute__ ((unused)), XPointer call_data - __attribute__ ((unused))) -{ - dR; - int i, found, had_im; - const char *p; - char **s; - char buf[IMBUFSIZ]; - - D_MAIN((stderr, "rxvt_IMInstantiateCallback()")); - if (R->Input_Context) - return; - - found = had_im = 0; - p = R->rs[Rs_inputMethod]; - if (p && *p) { - had_im = 1; - s = rxvt_splitcommastring(p); - for (i = 0; s[i]; i++) { - if (*s[i]) { - STRCPY(buf, "@im="); - STRNCAT(buf, s[i], IMBUFSIZ - 5); - if ((p = XSetLocaleModifiers(buf)) != NULL && *p - && (rxvt_IM_get_IC(aR) == True)) { - found = 1; - break; +rxvt_term::im_cb () +{ + int i; + const char *p; + char **s; + char buf[IMBUFSIZ]; + + make_current (); + + im_destroy (); + + if (Input_Context) + return; + + if (rs[Rs_imLocale]) + SET_LOCALE (rs[Rs_imLocale]); + + p = rs[Rs_inputMethod]; + if (p && *p) + { + bool found = false; + + s = rxvt_strsplit (',', p); + + for (i = 0; s[i]; i++) + { + if (*s[i]) + { + strcpy (buf, "@im="); + strncat (buf, s[i], IMBUFSIZ - 5); + if (im_get_ic (buf)) + { + found = true; + break; } } } - for (i = 0; s[i]; i++) - free(s[i]); - free(s); - } - if (found) - return; - -/* try with XMODIFIERS env. var. */ - if ((p = XSetLocaleModifiers("")) != NULL && *p) { - rxvt_IM_get_IC(aR); - return; - } - -/* try with no modifiers base IF the user didn't specify an IM */ - if (!had_im && (p = XSetLocaleModifiers("@im=none")) != NULL && *p - && rxvt_IM_get_IC(aR) == True) - return; + + rxvt_free_strsplit (s); + + if (found) + goto done; + } + + /* try with XMODIFIERS env. var. */ + if (im_get_ic ("")) + goto done; + + /* try with no modifiers base IF the user didn't specify an IM */ + if (im_get_ic ("@im=none")) + goto done; + +done: + if (rs[Rs_imLocale]) + SET_LOCALE (locale); } -/* - * Try to open a XIM with the current modifiers, then see if we can - * open a suitable preedit type - */ -/* INTPROTO */ -Bool -rxvt_IM_get_IC(pR) -{ - int i, j, found; - XIM xim; - XPoint spot; - XRectangle rect, status_rect, needed_rect; - unsigned long fg, bg; - const char *p; - char **s; - XIMStyles *xim_styles; - XVaNestedList preedit_attr, status_attr; - XIMCallback ximcallback; - - D_MAIN((stderr, "rxvt_IM_get_IC()")); - xim = XOpenIM(R->Xdisplay, NULL, NULL, NULL); - if (xim == NULL) - return False; - - xim_styles = NULL; - if (XGetIMValues(xim, XNQueryInputStyle, &xim_styles, NULL) - || !xim_styles || !xim_styles->count_styles) { - XCloseIM(xim); - return False; - } - - p = R->rs[Rs_preeditType] ? R->rs[Rs_preeditType] - : "OverTheSpot,OffTheSpot,Root"; - s = rxvt_splitcommastring(p); - for (i = found = 0; !found && s[i]; i++) { - if (!STRCMP(s[i], "OverTheSpot")) - R->input_style = (XIMPreeditPosition | XIMStatusNothing); - else if (!STRCMP(s[i], "OffTheSpot")) - R->input_style = (XIMPreeditArea | XIMStatusArea); - else if (!STRCMP(s[i], "Root")) - R->input_style = (XIMPreeditNothing | XIMStatusNothing); +void +rxvt_term::im_set_position () +{ + XRectangle preedit_rect, status_rect, *needed_rect; + XVaNestedList preedit_attr, status_attr; - for (j = 0; j < xim_styles->count_styles; j++) - if (R->input_style == xim_styles->supported_styles[j]) { - found = 1; - break; - } + if (!Input_Context + || !focus + || !(input_style & (XIMPreeditArea | XIMPreeditPosition)) + || !im_is_running ()) + return; + + if (input_style & XIMPreeditPosition) + { + im_set_size (preedit_rect); + preedit_attr = XVaCreateNestedList (0, XNArea, &preedit_rect, NULL); + + XSetICValues (Input_Context, + XNPreeditAttributes, preedit_attr, NULL); } - for (i = 0; s[i]; i++) - free(s[i]); - free(s); - XFree(xim_styles); - - if (!found) { - XCloseIM(xim); - return False; - } - - ximcallback.callback = rxvt_IMDestroyCallback; - -/* XXX: not sure why we need this (as well as IC one below) */ - XSetIMValues(xim, XNDestroyCallback, &ximcallback, NULL); - - preedit_attr = status_attr = NULL; - - if (R->input_style & XIMPreeditPosition) { - rxvt_setSize(aR_ & rect); - rxvt_setPosition(aR_ & spot); - rxvt_setColor(aR_ & fg, &bg); - - preedit_attr = XVaCreateNestedList(0, XNArea, &rect, - XNSpotLocation, &spot, - XNForeground, fg, XNBackground, bg, - //XNFontSet, R->TermWin.fontset, - NULL); - } else if (R->input_style & XIMPreeditArea) { - rxvt_setColor(aR_ & fg, &bg); - - /* - * The necessary width of preedit area is unknown - * until create input context. - */ - needed_rect.width = 0; - - rxvt_setPreeditArea(aR_ & rect, &status_rect, &needed_rect); - - preedit_attr = XVaCreateNestedList(0, XNArea, &rect, - XNForeground, fg, XNBackground, bg, - //XNFontSet, R->TermWin.fontset, - NULL); - status_attr = XVaCreateNestedList(0, XNArea, &status_rect, - XNForeground, fg, XNBackground, bg, - //XNFontSet, R->TermWin.fontset, - NULL); + else + { + /* Getting the necessary width of preedit area */ + status_attr = XVaCreateNestedList (0, XNAreaNeeded, &needed_rect, NULL); + XGetICValues (Input_Context, XNStatusAttributes, status_attr, NULL); + XFree (status_attr); + + im_set_preedit_area (preedit_rect, status_rect, *needed_rect); + XFree (needed_rect); + + preedit_attr = XVaCreateNestedList (0, XNArea, &preedit_rect, NULL); + status_attr = XVaCreateNestedList (0, XNArea, &status_rect, NULL); + + XSetICValues (Input_Context, + XNPreeditAttributes, preedit_attr, + XNStatusAttributes, status_attr, + NULL); + + XFree (status_attr); } - R->Input_Context = XCreateIC(xim, XNInputStyle, R->input_style, - XNClientWindow, R->TermWin.parent[0], - XNFocusWindow, R->TermWin.parent[0], - XNDestroyCallback, &ximcallback, - preedit_attr ? XNPreeditAttributes : NULL, - preedit_attr, - status_attr ? XNStatusAttributes : NULL, - status_attr, NULL); - if (preedit_attr) - XFree(preedit_attr); - if (status_attr) - XFree(status_attr); - if (R->Input_Context == NULL) { - rxvt_print_error("failed to create input context"); - XCloseIM(xim); - return False; - } - if (R->input_style & XIMPreeditArea) - rxvt_IMSetStatusPosition(aR); - D_MAIN((stderr, "rxvt_IM_get_IC() - successful connection")); - return True; -} - -/* EXTPROTO */ -void -rxvt_IMSetStatusPosition(pR) -{ - XRectangle preedit_rect, status_rect, *needed_rect; - XVaNestedList preedit_attr, status_attr; - - if (R->Input_Context == NULL - || !R->TermWin.focus || !(R->input_style & XIMPreeditArea) - || !rxvt_IMisRunning(aR)) - return; - -/* Getting the necessary width of preedit area */ - status_attr = XVaCreateNestedList(0, XNAreaNeeded, &needed_rect, NULL); - XGetICValues(R->Input_Context, XNStatusAttributes, status_attr, NULL); - XFree(status_attr); - - rxvt_setPreeditArea(aR_ & preedit_rect, &status_rect, needed_rect); - - preedit_attr = XVaCreateNestedList(0, XNArea, &preedit_rect, NULL); - status_attr = XVaCreateNestedList(0, XNArea, &status_rect, NULL); - - XSetICValues(R->Input_Context, - XNPreeditAttributes, preedit_attr, - XNStatusAttributes, status_attr, NULL); - XFree(preedit_attr); - XFree(status_attr); + XFree (preedit_attr); } -#endif /* USE_XIM */ +#endif /* USE_XIM */ -/*----------------------------------------------------------------------*/ -rxvt_t rxvt_current_term; +void +rxvt_term::get_window_origin (int &x, int &y) +{ + Window cr; + XTranslateCoordinates (dpy, parent, display->root, 0, 0, &x, &y, &cr); +} + +#ifdef HAVE_BG_PIXMAP + +void +rxvt_term::update_background () +{ + if (update_background_ev.is_active ()) + return; + + ev_tstamp to_wait = 0.5 - (ev::now () - bg_valid_since); + + if (to_wait <= 0.) + bg_render (); + else + update_background_ev.start (to_wait); +} + +void +rxvt_term::update_background_cb (ev::timer &w, int revents) +{ + make_current (); + + update_background_ev.stop (); + bg_render (); + refresh_check (); +} + +#endif /* HAVE_BG_PIXMAP */ /*----------------------- end-of-file (C source) -----------------------*/