--- rxvt-unicode/src/command.C 2003/11/25 17:34:47 1.7 +++ rxvt-unicode/src/command.C 2006/01/06 03:40:19 1.240 @@ -1,7 +1,6 @@ /*--------------------------------*-C-*---------------------------------* - * File: command.c + * File: command.C *----------------------------------------------------------------------* - * $Id: command.C,v 1.7 2003/11/25 17:34:47 pcg Exp $ * * All portions of code are copyright by their respective author/s. * Copyright (c) 1992 John Bovey, University of Kent at Canterbury @@ -28,6 +27,7 @@ * Copyright (c) 2001 Marius Gedminas * - Ctrl/Mod4+Tab works like Meta+Tab (options) * Copyright (c) 2003 Rob McMullen + * Copyright (c) 2003-2005 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 @@ -45,979 +45,1160 @@ *----------------------------------------------------------------------*/ /*{{{ includes: */ -#include "../config.h" /* NECESSARY */ -#include "rxvt.h" /* NECESSARY */ +#include "../config.h" +#include "rxvt.h" +#include "rxvtperl.h" #include "version.h" #include "command.h" +#if HAVE_SCHED_YIELD +#undef HAVE_SCHED_YIELD // disabled for the time being +//# include +#endif + +#ifdef KEYSYM_RESOURCE +# include "keyboard.h" +#endif + +#include + /*----------------------------------------------------------------------*/ +#define IS_CONTROL(ch) !((ch) & 0xffffff60UL) + +// exception thrown when the command parser runs out of input data +class out_of_input { } out_of_input; + +#if ENABLE_FRILLS || ISO_14755 + +#define ISO_14755_STARTED 0x80000000UL +#define ISO_14755_51 0x40000000UL // basic (section 5.1) +#define ISO_14755_52 0x20000000UL // keycap (section 5.2) +#define ISO_14755_54 0x10000000UL // code feedback (section 5.4) +#define ISO_14755_MASK 0x0fffffffUL + +#if ISO_14755 +static unsigned short iso14755_symtab[] = { + // keysym, unicode + XK_Left, 0x2190, + XK_KP_Left, 0x2190, + XK_Up, 0x2191, + XK_KP_Up, 0x2191, + XK_Right, 0x2192, + XK_KP_Right, 0x2192, + XK_Down, 0x2193, + XK_KP_Down, 0x2193, + XK_Linefeed, 0x21b4, + XK_Return, 0x21b5, + XK_KP_Enter, 0x21b5, + + XK_Prior, 0x21de, + XK_Next, 0x21df, + XK_Tab, 0x21e5, + XK_ISO_Left_Tab, 0x21e6, + XK_Shift_L, 0x21e7, + XK_Shift_R, 0x21e7, + + XK_Shift_Lock, 0x21eb, + XK_ISO_Lock, 0x21eb, + XK_ISO_Lock, 0x21eb, + XK_Caps_Lock, 0x21ec, + XK_Num_Lock, 0x21ed, + XK_ISO_Level3_Shift, 0x21ee, + XK_ISO_Level3_Lock, 0x21ef, + XK_ISO_Group_Lock, 0x21f0, + XK_Home, 0x21f1, + XK_End, 0x21f2, + + XK_Execute, 0x2318, + XK_Begin, 0x2320, + XK_Delete, 0x2326, + XK_Clear, 0x2327, + XK_BackSpace, 0x232b, + XK_Insert, 0x2380, + XK_Control_L, 0x2388, + XK_Control_R, 0x2388, + XK_Pause, 0x2389, + XK_Break, 0x238a, + XK_Escape, 0x238b, + XK_Undo, 0x238c, + XK_Print, 0x2399, + + XK_space, 0x2423, + +#ifdef XK_KP_Begin + XK_KP_Prior, 0x21de, + XK_KP_Next, 0x21df, + XK_KP_Begin, 0x2320, + XK_KP_Insert, 0x2380, + XK_KP_Delete, 0x2326, + XK_KP_Space, 0x2422, +#endif + 0, +}; + +void +rxvt_term::iso14755_54 (int x, int y) +{ + x = Pixel2Col (x); + y = Pixel2Row (y); + + if (!IN_RANGE_EXC (x, 0, ncol) + || !IN_RANGE_EXC (y, 0, nrow)) + return; + + for (;;) + { + const line_t &l = ROW(y - view_start); + + text_t t = l.t[x]; + + if (t != NOCHAR || !x) + { + iso14755_51 (l.t[x], l.r[x], x, y); + iso14755buf = ISO_14755_54; + break; + } + + x--; + } +} + +void +rxvt_term::iso14755_51 (unicode_t ch, rend_t r, int x, int y) +{ + rxvt_fontset *fs = FONTSET (r); + rxvt_font *f = (*fs)[fs->find_font (ch)]; + wchar_t *chr, *alloc, ch2, *fname; + int len; + + fname = rxvt_utf8towcs (f->name); + +# if ENABLE_COMBINING + if (IS_COMPOSE (ch)) + { + len = rxvt_composite.expand (ch, 0); + alloc = chr = new wchar_t[len]; + rxvt_composite.expand (ch, chr); + } + else +# endif + { + ch2 = ch; + + alloc = 0; + chr = &ch2; + len = 1; + } + + char attr[80]; // plenty + + sprintf (attr, "%08x = fg %d bg %d%s%s%s%s%s%s", + (int)r, + fgcolor_of (r), bgcolor_of (r), + r & RS_Bold ? " bold" : "", + r & RS_Italic ? " italic" : "", + r & RS_Blink ? " blink" : "", + r & RS_RVid ? " rvid" : "", + r & RS_Uline ? " uline" : "", + r & RS_Careful ? " careful" : ""); + + int width = wcswidth (fname, wcslen (fname)); + + max_it (width, 8+5); // for char + hey + max_it (width, strlen (attr)); + + if (y >= 0) + { + y = (y >= nrow - len - 4 && x < width + 2) ? 0 : -1; + x = 0; + } + + scr_overlay_new (x, y, width, len + 2); + + r = SET_STYLE (OVERLAY_RSTYLE, GET_STYLE (r)); + + for (int y = 0; y < len; y++) + { + char buf[9]; + + ch = *chr++; + + sprintf (buf, "%8x", ch); + scr_overlay_set (0, y, buf); + scr_overlay_set (9, y, '='); +# if !UNICODE3 + if (ch >= 0x10000) + ch = 0xfffd; +# endif + scr_overlay_set (11, y, ch, r); + scr_overlay_set (12, y, NOCHAR, r); + } + + scr_overlay_set (0, len , attr); + scr_overlay_set (0, len + 1, fname); + + free (fname); + +# if ENABLE_COMBINING + if (alloc) + delete [] alloc; +# endif +} +#endif + +void +rxvt_term::commit_iso14755 () +{ + wchar_t ch[2]; + + ch[0] = iso14755buf & ISO_14755_MASK; + ch[1] = 0; + + if (iso14755buf & ISO_14755_51) + { + char mb[16]; + int len; + + // allow verbatim 0-bytes and control-bytes to be entered + if (ch[0] >= 0x20) + len = wcstombs (mb, ch, 16); + else + { + mb[0] = ch[0]; + len = 1; + } + + if (len > 0) + tt_write (mb, len); + else + scr_bell (); + } + + iso14755buf = 0; +} + +int +rxvt_term::hex_keyval (XKeyEvent &ev) +{ + // check wether this event corresponds to a hex digit + // if the modifiers had not been pressed. + for (int index = 0; index < 8; index++) + { + KeySym k = XLookupKeysym (&ev, index); + + if (k >= XK_KP_0 && k <= XK_KP_9) return k - XK_KP_0; + else if (k >= XK_0 && k <= XK_9) return k - XK_0; + else if (k >= XK_a && k <= XK_f) return k - XK_a + 10; + else if (k >= XK_A && k <= XK_F) return k - XK_A + 10; + } + + return -1; +} +#endif + /*{{{ Convert the keypress event into a string */ -/* INTPROTO */ void -rxvt_lookup_key(pR_ XKeyEvent *ev) +rxvt_term::lookup_key (XKeyEvent &ev) { - int ctrl, meta, shft, len; - unsigned int newlen; - KeySym keysym; + int ctrl, meta, shft, len; + unsigned int newlen; + KeySym keysym; #ifdef DEBUG_CMD - static int debug_key = 1; /* accessible by a debugger only */ -#endif -#ifdef USE_XIM - int valid_keysym; + static int debug_key = 1; /* accessible by a debugger only */ #endif - unsigned char *kbuf = R->kbuf; + int valid_keysym; + char kbuf[KBUFSZ]; -/* - * use Num_Lock to toggle Keypad on/off. If Num_Lock is off, allow an - * escape sequence to toggle the Keypad. - * - * Always permit `shift' to override the current setting - */ - shft = (ev->state & ShiftMask); - ctrl = (ev->state & ControlMask); - meta = (ev->state & R->ModMetaMask); - if (R->numlock_state || (ev->state & R->ModNumLockMask)) { - R->numlock_state = (ev->state & R->ModNumLockMask); - PrivMode((!R->numlock_state), PrivMode_aplKP); + /* + * use Num_Lock to toggle Keypad on/off. If Num_Lock is off, allow an + * escape sequence to toggle the Keypad. + * + * Always permit `shift' to override the current setting + */ + shft = ev.state & ShiftMask; + ctrl = ev.state & ControlMask; + meta = ev.state & ModMetaMask; + + if (numlock_state || (ev.state & ModNumLockMask)) + { + numlock_state = (ev.state & ModNumLockMask); + PrivMode ((!numlock_state), PrivMode_aplKP); } + + kbuf[0] = 0; + #ifdef USE_XIM - if (R->Input_Context != NULL) { - Status status_return; + if (Input_Context) + { + Status status_return; - kbuf[0] = '\0'; +#if 0 #ifdef X_HAVE_UTF8_STRING - len = Xutf8LookupString(R->Input_Context, ev, (char *)kbuf, - KBUFSZ, &keysym, &status_return); -#else - len = XmbLookupString(R->Input_Context, ev, (char *)kbuf, - KBUFSZ, &keysym, &status_return); + if (enc_utf8 && 0) // currently disabled, doesn't seem to work, nor is useful + len = Xutf8LookupString (Input_Context, &ev, kbuf, + KBUFSZ, &keysym, &status_return); + else #endif - valid_keysym = ((status_return == XLookupKeySym) - || (status_return == XLookupBoth)); - } else { - len = XLookupString(ev, (char *)kbuf, KBUFSZ, &keysym, - &R->compose); - valid_keysym = 1; - } -#else /* USE_XIM */ - len = XLookupString(ev, (char *)kbuf, KBUFSZ, &keysym, - &R->compose); -/* - * map unmapped Latin[2-4]/Katakana/Arabic/Cyrillic/Greek entries -> Latin1 - * good for installations with correct fonts, but without XLOCALE - */ - if (!len) { - if ((keysym >= 0x0100) && (keysym < 0x0800)) { - kbuf[0] = (keysym & 0xFF); - kbuf[1] = '\0'; - len = 1; - } else - kbuf[0] = '\0'; - } -#endif /* USE_XIM */ +#endif + { + wchar_t wkbuf[KBUFSZ + 1]; -#ifdef USE_XIM - if (valid_keysym) + // the XOpenIM manpage lies about hardcoding the locale + // at the point of XOpenIM, so temporarily switch locales + if (rs[Rs_imLocale]) + SET_LOCALE (rs[Rs_imLocale]); + + // assume wchar_t == unicode or better + len = XwcLookupString (Input_Context, &ev, wkbuf, + KBUFSZ, &keysym, &status_return); + + if (rs[Rs_imLocale]) + SET_LOCALE (locale); + + if (status_return == XLookupChars + || status_return == XLookupBoth) + { + /* make sure the user can type ctrl-@, i.e. NUL */ + if (len == 1 && *wkbuf == 0) + { + kbuf[0] = 0; + len = 1; + } + else + { + wkbuf[len] = 0; + len = wcstombs ((char *)kbuf, wkbuf, KBUFSZ); + if (len < 0) + len = 0; + } + } + else + len = 0; + } + + valid_keysym = status_return == XLookupKeySym + || status_return == XLookupBoth; + } + else #endif { -/* for some backwards compatibility */ -#if defined(HOTKEY_CTRL) || defined(HOTKEY_META) -# ifdef HOTKEY_CTRL - if (ctrl) { -# else - if (meta) { -# endif - if (keysym == R->ks_bigfont) { - rxvt_change_font(aR_ 0, FONT_UP); - return; - } else if (keysym == R->ks_smallfont) { - rxvt_change_font(aR_ 0, FONT_DN); - return; - } - } + len = XLookupString (&ev, kbuf, KBUFSZ, &keysym, &compose); + valid_keysym = keysym != NoSymbol; + } + + if (valid_keysym) + { +#ifdef KEYSYM_RESOURCE + if (keyboard->dispatch (this, keysym, ev.state)) + return; #endif - if (R->TermWin.saveLines) { + if (saveLines) + { #ifdef UNSHIFTED_SCROLLKEYS - if (!ctrl && !meta) { + if (!ctrl && !meta) #else - if (IS_SCROLL_MOD) { + if (IS_SCROLL_MOD) #endif - int lnsppg; + { + int lnsppg; #ifdef PAGING_CONTEXT_LINES - lnsppg = R->TermWin.nrow - PAGING_CONTEXT_LINES; + lnsppg = nrow - PAGING_CONTEXT_LINES; #else - lnsppg = R->TermWin.nrow * 4 / 5; + lnsppg = nrow * 4 / 5; #endif - if (keysym == XK_Prior) { - rxvt_scr_page(aR_ UP, lnsppg); - return; - } else if (keysym == XK_Next) { - rxvt_scr_page(aR_ DN, lnsppg); - return; - } - } + if (keysym == XK_Prior) + { + scr_page (UP, lnsppg); + return; + } + else if (keysym == XK_Next) + { + scr_page (DN, lnsppg); + return; + } + } #ifdef SCROLL_ON_UPDOWN_KEYS - if (IS_SCROLL_MOD) { - if (keysym == XK_Up) { - rxvt_scr_page(aR_ UP, 1); - return; - } else if (keysym == XK_Down) { - rxvt_scr_page(aR_ DN, 1); - return; - } - } + if (IS_SCROLL_MOD) + { + if (keysym == XK_Up) + { + scr_page (UP, 1); + return; + } + else if (keysym == XK_Down) + { + scr_page (DN, 1); + return; + } + } #endif #ifdef SCROLL_ON_HOMEEND_KEYS - if (IS_SCROLL_MOD) { - if (keysym == XK_Home) { - rxvt_scr_move_to(aR_ 0, 1); - return; - } else if (keysym == XK_End) { - rxvt_scr_move_to(aR_ 1, 0); - return; - } - } -#endif - } - - if (shft) { - /* Shift + F1 - F10 generates F11 - F20 */ - if (keysym >= XK_F1 && keysym <= XK_F10) { - keysym += (XK_F11 - XK_F1); - shft = 0; /* turn off Shift */ - } else if (!ctrl && !meta && (R->PrivateModes & PrivMode_ShiftKeys)) { - switch (keysym) { - /* normal XTerm key bindings */ - case XK_Insert: /* Shift+Insert = paste mouse selection */ - rxvt_selection_request(aR_ ev->time, 0, 0); - return; - /* rxvt extras */ - case XK_KP_Add: /* Shift+KP_Add = bigger font */ - rxvt_change_font(aR_ 0, FONT_UP); - return; - case XK_KP_Subtract: /* Shift+KP_Subtract = smaller font */ - rxvt_change_font(aR_ 0, FONT_DN); - return; - } - } - } -#ifdef PRINTPIPE - if (keysym == XK_Print) { - rxvt_scr_printscreen(aR_ ctrl | shft); - return; - } -#endif -#ifdef GREEK_SUPPORT - if (keysym == R->ks_greekmodeswith) { - R->greek_mode = !R->greek_mode; - if (R->greek_mode) { - rxvt_xterm_seq(aR_ XTerm_title, - (greek_getmode() == GREEK_ELOT928 - ? "[Greek: iso]" : "[Greek: ibm]"), CHAR_ST); - greek_reset(); - } else - rxvt_xterm_seq(aR_ XTerm_title, APL_NAME "-" VERSION, CHAR_ST); - return; - } + if (IS_SCROLL_MOD) + { + if (keysym == XK_Home) + { + scr_move_to (0, 1); + return; + } + else if (keysym == XK_End) + { + scr_move_to (1, 0); + return; + } + } #endif + } - if (keysym >= 0xFF00 && keysym <= 0xFFFF) { -#ifdef KEYSYM_RESOURCE - if (!(shft | ctrl) && R->Keysym_map[keysym & 0xFF] != NULL) { - unsigned int l; - const unsigned char *kbuf0; - const unsigned char ch = C0_ESC; - - kbuf0 = (R->Keysym_map[keysym & 0xFF]); - l = (unsigned int)*kbuf0++; - - /* escape prefix */ - if (meta) -# ifdef META8_OPTION - if (R->meta_char == C0_ESC) + if (shft) + { + /* Shift + F1 - F10 generates F11 - F20 */ + if (keysym >= XK_F1 && keysym <= XK_F10) + { + keysym += (XK_F11 - XK_F1); + shft = 0; /* turn off Shift */ + } + else if (!ctrl && !meta && (priv_modes & PrivMode_ShiftKeys)) + { + switch (keysym) + { + /* normal XTerm key bindings */ + case XK_Insert: /* Shift+Insert = paste mouse selection */ + selection_request (ev.time, 0, 0); + return; +#if TODO + /* rxvt extras */ + case XK_KP_Add: /* Shift+KP_Add = bigger font */ + change_font (FONT_UP); + return; + case XK_KP_Subtract: /* Shift+KP_Subtract = smaller font */ + change_font (FONT_DN); + return; +#endif + } + } + } + +#if ENABLE_FRILLS || ISO_14755 + // ISO 14755 support + if (shft && ctrl) + { + int hv; + + if (iso14755buf & ISO_14755_51 + && (keysym == XK_space || keysym == XK_KP_Space + || keysym == XK_Return || keysym == XK_KP_Enter)) + { + commit_iso14755 (); + iso14755buf = ISO_14755_51; +# if ISO_14755 + iso14755_51 (0); # endif - rxvt_tt_write(aR_ &ch, 1); - rxvt_tt_write(aR_ kbuf0, l); - return; - } else -#endif - { - newlen = 1; - switch (keysym) { -#ifndef NO_BACKSPACE_KEY - case XK_BackSpace: - if (R->PrivateModes & PrivMode_HaveBackSpace) { - kbuf[0] = (!!(R->PrivateModes & PrivMode_BackSpace) - ^ !!ctrl) ? '\b' : '\177'; - kbuf[1] = '\0'; - } else - STRCPY(kbuf, R->key_backspace); -# ifdef MULTICHAR_SET - if ((R->Options & Opt_mc_hack) && R->screen.cur.col > 0) { - int col, row; - - newlen = STRLEN(kbuf); - col = R->screen.cur.col - 1; - row = R->screen.cur.row + R->TermWin.saveLines; - if (IS_MULTI2(R->screen.rend[row][col])) - MEMMOVE(kbuf + newlen, kbuf, newlen + 1); - } + return; + } + else if ((hv = hex_keyval (ev)) >= 0) + { + iso14755buf = ((iso14755buf << 4) & ISO_14755_MASK) + | hv | ISO_14755_51; +# if ISO_14755 + iso14755_51 (iso14755buf & ISO_14755_MASK); +# endif + return; + } + else + { +# if ENABLE_OVERLAY + scr_overlay_off (); # endif - break; + iso14755buf = 0; + } + } + else if ((ctrl && (keysym == XK_Shift_L || keysym == XK_Shift_R)) + || (shft && (keysym == XK_Control_L || keysym == XK_Control_R))) + if (!(iso14755buf & ISO_14755_STARTED)) + { + iso14755buf |= ISO_14755_STARTED; +# if ENABLE_OVERLAY + scr_overlay_new (0, -1, sizeof ("ISO 14755 mode") - 1, 1); + scr_overlay_set (0, 0, "ISO 14755 mode"); +# endif + } +#endif + +#ifdef PRINTPIPE + if (keysym == XK_Print) + { + scr_printscreen (ctrl | shft); + return; + } +#endif + + if (keysym >= 0xFF00 && keysym <= 0xFFFF) + { + { + newlen = 1; + switch (keysym) + { +#ifndef NO_BACKSPACE_KEY + case XK_BackSpace: + if (priv_modes & PrivMode_HaveBackSpace) + { + kbuf[0] = (!! (priv_modes & PrivMode_BackSpace) + ^ !!ctrl) ? '\b' : '\177'; + kbuf[1] = '\0'; + } + else + strcpy (kbuf, key_backspace); + break; #endif #ifndef NO_DELETE_KEY - case XK_Delete: - STRCPY(kbuf, R->key_delete); -# ifdef MULTICHAR_SET - if (R->Options & Opt_mc_hack) { - int col, row; - - newlen = STRLEN(kbuf); - col = R->screen.cur.col; - row = R->screen.cur.row + R->TermWin.saveLines; - if (IS_MULTI1(R->screen.rend[row][col])) - MEMMOVE(kbuf + newlen, kbuf, newlen + 1); - } +# ifdef XK_KP_Prior + case XK_KP_Delete: + /* allow shift to override */ + if ((priv_modes & PrivMode_aplKP) ? !shft : shft) + { + strcpy (kbuf, "\033On"); + break; + } + /* FALLTHROUGH */ # endif - break; + case XK_Delete: + strcpy (kbuf, key_delete); + break; #endif - case XK_Tab: - if (shft) - STRCPY(kbuf, "\033[Z"); - else { + case XK_Tab: + if (shft) + strcpy (kbuf, "\033[Z"); + else + { #ifdef CTRL_TAB_MAKES_META - if (ctrl) - meta = 1; + if (ctrl) + meta = 1; #endif #ifdef MOD4_TAB_MAKES_META - if (ev->state & Mod4Mask) - meta = 1; + if (ev.state & Mod4Mask) + meta = 1; #endif - newlen = 0; - } - break; - + newlen = 0; + } + break; #ifdef XK_KP_Left - case XK_KP_Up: /* \033Ox or standard */ - case XK_KP_Down: /* \033Or or standard */ - case XK_KP_Right: /* \033Ov or standard */ - case XK_KP_Left: /* \033Ot or standard */ - if ((R->PrivateModes & PrivMode_aplKP) ? !shft : shft) { - STRCPY(kbuf, "\033OZ"); - kbuf[2] = ("txvr"[keysym - XK_KP_Left]); - break; - } else - /* translate to std. cursor key */ - keysym = XK_Left + (keysym - XK_KP_Left); - /* FALLTHROUGH */ -#endif - case XK_Up: /* "\033[A" */ - case XK_Down: /* "\033[B" */ - case XK_Right: /* "\033[C" */ - case XK_Left: /* "\033[D" */ - STRCPY(kbuf, "\033[Z"); - kbuf[2] = ("DACB"[keysym - XK_Left]); - /* do Shift first */ - if (shft) - kbuf[2] = ("dacb"[keysym - XK_Left]); - else if (ctrl) { - kbuf[1] = 'O'; - kbuf[2] = ("dacb"[keysym - XK_Left]); - } else if (R->PrivateModes & PrivMode_aplCUR) - kbuf[1] = 'O'; -#ifdef MULTICHAR_SET - //TODO: ?? - if (R->Options & Opt_mc_hack) { - int col, row, m; - - col = R->screen.cur.col; - row = R->screen.cur.row + R->TermWin.saveLines; - m = 0; - if (keysym == XK_Right - && IS_MULTI1(R->screen.rend[row][col])) - m = 1; - else if (keysym == XK_Left) { - if (col > 0) { - if (IS_MULTI2(R->screen.rend[row][col - 1])) - m = 1; - } else if (R->screen.cur.row > 0) { - col = R->screen.tlen[--row]; - if (col == -1) - col = R->TermWin.ncol - 1; - else - col--; - if (col > 0 - && IS_MULTI2(R->screen.rend[row][col])) - m = 1; - } - } - if (m) - MEMMOVE(kbuf + 3, kbuf, 3 + 1); - } -#endif - break; + case XK_KP_Up: /* \033Ox or standard */ + case XK_KP_Down: /* \033Or or standard */ + case XK_KP_Right: /* \033Ov or standard */ + case XK_KP_Left: /* \033Ot or standard */ + if ((priv_modes & PrivMode_aplKP) ? !shft : shft) + { + strcpy (kbuf, "\033OZ"); + kbuf[2] = "txvr"[keysym - XK_KP_Left]; + break; + } + else + /* translate to std. cursor key */ + keysym = XK_Left + (keysym - XK_KP_Left); + /* FALLTHROUGH */ +#endif + case XK_Up: /* "\033[A" */ + case XK_Down: /* "\033[B" */ + case XK_Right: /* "\033[C" */ + case XK_Left: /* "\033[D" */ + strcpy (kbuf, "\033[Z"); + kbuf[2] = "DACB"[keysym - XK_Left]; + /* do Shift first */ + if (shft) + kbuf[2] = "dacb"[keysym - XK_Left]; + else if (ctrl) + { + kbuf[1] = 'O'; + kbuf[2] = "dacb"[keysym - XK_Left]; + } + else if (priv_modes & PrivMode_aplCUR) + kbuf[1] = 'O'; + break; #ifndef UNSHIFTED_SCROLLKEYS # ifdef XK_KP_Prior - case XK_KP_Prior: - /* allow shift to override */ - if ((R->PrivateModes & PrivMode_aplKP) ? !shft : shft) { - STRCPY(kbuf, "\033Oy"); - break; - } - /* FALLTHROUGH */ + case XK_KP_Prior: + /* allow shift to override */ + if ((priv_modes & PrivMode_aplKP) ? !shft : shft) + { + strcpy (kbuf, "\033Oy"); + break; + } + /* FALLTHROUGH */ # endif - case XK_Prior: - STRCPY(kbuf, "\033[5~"); - break; + case XK_Prior: + strcpy (kbuf, "\033[5~"); + break; # ifdef XK_KP_Next - case XK_KP_Next: - /* allow shift to override */ - if ((R->PrivateModes & PrivMode_aplKP) ? !shft : shft) { - STRCPY(kbuf, "\033Os"); - break; - } - /* FALLTHROUGH */ + case XK_KP_Next: + /* allow shift to override */ + if ((priv_modes & PrivMode_aplKP) ? !shft : shft) + { + strcpy (kbuf, "\033Os"); + break; + } + /* FALLTHROUGH */ # endif - case XK_Next: - STRCPY(kbuf, "\033[6~"); - break; -#endif - case XK_KP_Enter: - /* allow shift to override */ - if ((R->PrivateModes & PrivMode_aplKP) ? !shft : shft) { - STRCPY(kbuf, "\033OM"); - } else { - kbuf[0] = '\r'; - kbuf[1] = '\0'; - } - break; + case XK_Next: + strcpy (kbuf, "\033[6~"); + break; +#endif + case XK_KP_Enter: + /* allow shift to override */ + if ((priv_modes & PrivMode_aplKP) ? !shft : shft) + { + strcpy (kbuf, "\033OM"); + break; + } + + /* FALLTHROUGH */ + + case XK_Return: + if (priv_modes & PrivMode_LFNL) + { + kbuf[0] = '\015'; + kbuf[1] = '\012'; + kbuf[2] = '\0'; + } + else + { + kbuf[0] = '\015'; + kbuf[1] = '\0'; + } + break; #ifdef XK_KP_Begin - case XK_KP_Begin: - STRCPY(kbuf, "\033Ou"); - break; - - case XK_KP_Insert: - STRCPY(kbuf, "\033Op"); - break; - - case XK_KP_Delete: - STRCPY(kbuf, "\033On"); - break; -#endif - case XK_KP_F1: /* "\033OP" */ - case XK_KP_F2: /* "\033OQ" */ - case XK_KP_F3: /* "\033OR" */ - case XK_KP_F4: /* "\033OS" */ - STRCPY(kbuf, "\033OP"); - kbuf[2] += (keysym - XK_KP_F1); - break; - - case XK_KP_Multiply: /* "\033Oj" : "*" */ - case XK_KP_Add: /* "\033Ok" : "+" */ - case XK_KP_Separator: /* "\033Ol" : "," */ - case XK_KP_Subtract: /* "\033Om" : "-" */ - case XK_KP_Decimal: /* "\033On" : "." */ - case XK_KP_Divide: /* "\033Oo" : "/" */ - case XK_KP_0: /* "\033Op" : "0" */ - case XK_KP_1: /* "\033Oq" : "1" */ - case XK_KP_2: /* "\033Or" : "2" */ - case XK_KP_3: /* "\033Os" : "3" */ - case XK_KP_4: /* "\033Ot" : "4" */ - case XK_KP_5: /* "\033Ou" : "5" */ - case XK_KP_6: /* "\033Ov" : "6" */ - case XK_KP_7: /* "\033Ow" : "7" */ - case XK_KP_8: /* "\033Ox" : "8" */ - case XK_KP_9: /* "\033Oy" : "9" */ - /* allow shift to override */ - if ((R->PrivateModes & PrivMode_aplKP) ? !shft : shft) { - STRCPY(kbuf, "\033Oj"); - kbuf[2] += (keysym - XK_KP_Multiply); - } else { - kbuf[0] = ('*' + (keysym - XK_KP_Multiply)); - kbuf[1] = '\0'; - } - break; - - case XK_Find: - STRCPY(kbuf, "\033[1~"); - break; - case XK_Insert: - STRCPY(kbuf, "\033[2~"); - break; + case XK_KP_Begin: + strcpy (kbuf, "\033Ou"); + break; + +#endif + case XK_KP_F1: /* "\033OP" */ + case XK_KP_F2: /* "\033OQ" */ + case XK_KP_F3: /* "\033OR" */ + case XK_KP_F4: /* "\033OS" */ + strcpy (kbuf, "\033OP"); + kbuf[2] += (keysym - XK_KP_F1); + break; + + case XK_KP_Multiply: /* "\033Oj" : "*" */ + case XK_KP_Add: /* "\033Ok" : "+" */ + case XK_KP_Separator: /* "\033Ol" : "," */ + case XK_KP_Subtract: /* "\033Om" : "-" */ + case XK_KP_Decimal: /* "\033On" : "." */ + case XK_KP_Divide: /* "\033Oo" : "/" */ + case XK_KP_0: /* "\033Op" : "0" */ + case XK_KP_1: /* "\033Oq" : "1" */ + case XK_KP_2: /* "\033Or" : "2" */ + case XK_KP_3: /* "\033Os" : "3" */ + case XK_KP_4: /* "\033Ot" : "4" */ + case XK_KP_5: /* "\033Ou" : "5" */ + case XK_KP_6: /* "\033Ov" : "6" */ + case XK_KP_7: /* "\033Ow" : "7" */ + case XK_KP_8: /* "\033Ox" : "8" */ + case XK_KP_9: /* "\033Oy" : "9" */ + /* allow shift to override */ + if ((priv_modes & PrivMode_aplKP) ? !shft : shft) + { + strcpy (kbuf, "\033Oj"); + kbuf[2] += (keysym - XK_KP_Multiply); + } + else + { + kbuf[0] = ('*' + (keysym - XK_KP_Multiply)); + kbuf[1] = '\0'; + } + break; + + case XK_Find: + strcpy (kbuf, "\033[1~"); + break; + +#ifdef XK_KP_End + case XK_KP_Insert: + /* allow shift to override */ + if ((priv_modes & PrivMode_aplKP) ? !shft : shft) + { + strcpy (kbuf, "\033Op"); + break; + } + /* FALLTHROUGH */ +#endif + case XK_Insert: + strcpy (kbuf, "\033[2~"); + break; #ifdef DXK_Remove /* support for DEC remove like key */ - case DXK_Remove: - /* FALLTHROUGH */ + case DXK_Remove: + /* FALLTHROUGH */ #endif - case XK_Execute: - STRCPY(kbuf, "\033[3~"); - break; - case XK_Select: - STRCPY(kbuf, "\033[4~"); - break; + case XK_Execute: + strcpy (kbuf, "\033[3~"); + break; + case XK_Select: + strcpy (kbuf, "\033[4~"); + break; #ifdef XK_KP_End - case XK_KP_End: - /* allow shift to override */ - if ((R->PrivateModes & PrivMode_aplKP) ? !shft : shft) { - STRCPY(kbuf, "\033Oq"); - break; - } - /* FALLTHROUGH */ -#endif - case XK_End: - STRCPY(kbuf, KS_END); - break; + case XK_KP_End: + /* allow shift to override */ + if ((priv_modes & PrivMode_aplKP) ? !shft : shft) + { + strcpy (kbuf, "\033Oq"); + break; + } + /* FALLTHROUGH */ +#endif + case XK_End: + strcpy (kbuf, KS_END); + break; #ifdef XK_KP_Home - case XK_KP_Home: - /* allow shift to override */ - if ((R->PrivateModes & PrivMode_aplKP) ? !shft : shft) { - STRCPY(kbuf, "\033Ow"); - break; - } - /* FALLTHROUGH */ -#endif - case XK_Home: - STRCPY(kbuf, KS_HOME); - break; + case XK_KP_Home: + /* allow shift to override */ + if ((priv_modes & PrivMode_aplKP) ? !shft : shft) + { + strcpy (kbuf, "\033Ow"); + break; + } + /* FALLTHROUGH */ +#endif + case XK_Home: + strcpy (kbuf, KS_HOME); + break; #define FKEY(n, fkey) \ - sprintf((char *)kbuf,"\033[%2d~", (int)((n) + (keysym - fkey))) + sprintf ((char *)kbuf,"\033[%2d~", (int) ((n) + (keysym - fkey))) - case XK_F1: /* "\033[11~" */ - case XK_F2: /* "\033[12~" */ - case XK_F3: /* "\033[13~" */ - case XK_F4: /* "\033[14~" */ - case XK_F5: /* "\033[15~" */ - FKEY(11, XK_F1); - break; - case XK_F6: /* "\033[17~" */ - case XK_F7: /* "\033[18~" */ - case XK_F8: /* "\033[19~" */ - case XK_F9: /* "\033[20~" */ - case XK_F10: /* "\033[21~" */ - FKEY(17, XK_F6); - break; - case XK_F11: /* "\033[23~" */ - case XK_F12: /* "\033[24~" */ - case XK_F13: /* "\033[25~" */ - case XK_F14: /* "\033[26~" */ - FKEY(23, XK_F11); - break; - case XK_F15: /* "\033[28~" */ - case XK_F16: /* "\033[29~" */ - FKEY(28, XK_F15); - break; - case XK_Help: /* "\033[28~" */ - FKEY(28, XK_Help); - break; - case XK_Menu: /* "\033[29~" */ - FKEY(29, XK_Menu); - break; - case XK_F17: /* "\033[31~" */ - case XK_F18: /* "\033[32~" */ - case XK_F19: /* "\033[33~" */ - case XK_F20: /* "\033[34~" */ - case XK_F21: /* "\033[35~" */ - case XK_F22: /* "\033[36~" */ - case XK_F23: /* "\033[37~" */ - case XK_F24: /* "\033[38~" */ - case XK_F25: /* "\033[39~" */ - case XK_F26: /* "\033[40~" */ - case XK_F27: /* "\033[41~" */ - case XK_F28: /* "\033[42~" */ - case XK_F29: /* "\033[43~" */ - case XK_F30: /* "\033[44~" */ - case XK_F31: /* "\033[45~" */ - case XK_F32: /* "\033[46~" */ - case XK_F33: /* "\033[47~" */ - case XK_F34: /* "\033[48~" */ - case XK_F35: /* "\033[49~" */ - FKEY(31, XK_F17); - break; + case XK_F1: /* "\033[11~" */ + case XK_F2: /* "\033[12~" */ + case XK_F3: /* "\033[13~" */ + case XK_F4: /* "\033[14~" */ + case XK_F5: /* "\033[15~" */ + FKEY (11, XK_F1); + break; + case XK_F6: /* "\033[17~" */ + case XK_F7: /* "\033[18~" */ + case XK_F8: /* "\033[19~" */ + case XK_F9: /* "\033[20~" */ + case XK_F10: /* "\033[21~" */ + FKEY (17, XK_F6); + break; + case XK_F11: /* "\033[23~" */ + case XK_F12: /* "\033[24~" */ + case XK_F13: /* "\033[25~" */ + case XK_F14: /* "\033[26~" */ + FKEY (23, XK_F11); + break; + case XK_F15: /* "\033[28~" */ + case XK_F16: /* "\033[29~" */ + FKEY (28, XK_F15); + break; + case XK_Help: /* "\033[28~" */ + FKEY (28, XK_Help); + break; + case XK_Menu: /* "\033[29~" */ + FKEY (29, XK_Menu); + break; + case XK_F17: /* "\033[31~" */ + case XK_F18: /* "\033[32~" */ + case XK_F19: /* "\033[33~" */ + case XK_F20: /* "\033[34~" */ + case XK_F21: /* "\033[35~" */ + case XK_F22: /* "\033[36~" */ + case XK_F23: /* "\033[37~" */ + case XK_F24: /* "\033[38~" */ + case XK_F25: /* "\033[39~" */ + case XK_F26: /* "\033[40~" */ + case XK_F27: /* "\033[41~" */ + case XK_F28: /* "\033[42~" */ + case XK_F29: /* "\033[43~" */ + case XK_F30: /* "\033[44~" */ + case XK_F31: /* "\033[45~" */ + case XK_F32: /* "\033[46~" */ + case XK_F33: /* "\033[47~" */ + case XK_F34: /* "\033[48~" */ + case XK_F35: /* "\033[49~" */ + FKEY (31, XK_F17); + break; #undef FKEY - default: - newlen = 0; - break; - } - if (newlen) - len = STRLEN(kbuf); - } - /* - * Pass meta for all function keys, if 'meta' option set - */ -#ifdef META8_OPTION - if (meta && (R->meta_char == 0x80) && len > 0) - kbuf[len - 1] |= 0x80; -#endif - } else if (ctrl && keysym == XK_minus) { - len = 1; - kbuf[0] = '\037'; /* Ctrl-Minus generates ^_ (31) */ - } else { -#ifdef META8_OPTION - /* set 8-bit on */ - if (meta && (R->meta_char == 0x80)) { - unsigned char *ch; - - for (ch = kbuf; ch < kbuf + len; ch++) - *ch |= 0x80; - meta = 0; - } -#endif -#ifdef GREEK_SUPPORT - if (R->greek_mode) - len = greek_xlat(kbuf, len); -#endif - /* nil */ ; - } - } - - if (len <= 0) - return; /* not mapped */ - - if (R->Options & Opt_scrollTtyKeypress) - if (R->TermWin.view_start) { - R->TermWin.view_start = 0; - R->want_refresh = 1; - } + default: + newlen = 0; + break; + } -/* - * these modifications only affect the static keybuffer - * pass Shift/Control indicators for function keys ending with `~' - * - * eg, - * Prior = "ESC[5~" - * Shift+Prior = "ESC[5$" - * Ctrl+Prior = "ESC[5^" - * Ctrl+Shift+Prior = "ESC[5@" - * Meta adds an Escape prefix (with META8_OPTION, if meta == ). - */ - if (kbuf[0] == C0_ESC && kbuf[1] == '[' && kbuf[len - 1] == '~') - kbuf[len - 1] = (shft ? (ctrl ? '@' : '$') : (ctrl ? '^' : '~')); + if (newlen) + len = strlen (kbuf); + } -/* escape prefix */ - if (meta + /* + * Pass meta for all function keys, if 'meta' option set + */ #ifdef META8_OPTION - && (R->meta_char == C0_ESC) + if (meta && (meta_char == 0x80) && len > 0) + kbuf[len - 1] |= 0x80; #endif - ) { - const unsigned char ch = C0_ESC; - - rxvt_tt_write(aR_ &ch, 1); - } -#ifdef DEBUG_CMD - if (debug_key) { /* Display keyboard buffer contents */ - char *p; - int i; - - fprintf(stderr, "key 0x%04X [%d]: `", (unsigned int)keysym, len); - for (i = 0, p = kbuf; i < len; i++, p++) - fprintf(stderr, (*p >= ' ' && *p < '\177' ? "%c" : "\\%03o"), *p); - fprintf(stderr, "'\n"); - } -#endif /* DEBUG_CMD */ - rxvt_tt_write(aR_ kbuf, (unsigned int)len); -} -/*}}} */ -#if (MENUBAR_MAX) -/*{{{ rxvt_cmd_write(), rxvt_cmd_getc() */ -/* attempt to `write' count to the input buffer */ -/* EXTPROTO */ -unsigned int -rxvt_cmd_write(pR_ const unsigned char *str, unsigned int count) -{ - unsigned int n, s; - unsigned char *cmdbuf_base = R->cmdbuf_base, - *cmdbuf_endp = R->cmdbuf_endp, - *cmdbuf_ptr = R->cmdbuf_ptr; - - n = cmdbuf_ptr - cmdbuf_base; - s = cmdbuf_base + BUFSIZ - 1 - cmdbuf_endp; - if (n > 0 && s < count) { - MEMMOVE(cmdbuf_base, cmdbuf_ptr, - (unsigned int)(cmdbuf_endp - cmdbuf_ptr)); - cmdbuf_ptr = cmdbuf_base; - cmdbuf_endp -= n; - s += n; - } - if (count > s) { - rxvt_print_error("data loss: cmd_write too large"); - count = s; - } - for (; count--;) - *cmdbuf_endp++ = *str++; - R->cmdbuf_ptr = cmdbuf_ptr; - R->cmdbuf_endp = cmdbuf_endp; - return 0; -} -#endif /* MENUBAR_MAX */ - -void -rxvt_term::process_x_events () -{ - do - { - XEvent xev; - - XNextEvent (Xdisplay, &xev); - -#if defined(CURSOR_BLINK) - if ((Options & Opt_cursorBlink) - && xev.type == KeyPress) + } + else if (ctrl && keysym == XK_minus) { - if (hidden_cursor) - { - hidden_cursor = 0; - want_refresh = 1; - } - - blink_ev.start (NOW + BLINK_INTERVAL); + len = 1; + kbuf[0] = '\037'; /* Ctrl-Minus generates ^_ (31) */ } -#endif - -#if defined(POINTER_BLANK) - if ((Options & Opt_pointerBlank) - && (pointerBlankDelay > 0)) + else if (keysym == XK_ISO_Left_Tab) { - if (xev.type == MotionNotify - || xev.type == ButtonPress - || xev.type == ButtonRelease) - if (hidden_pointer) - pointer_unblank (); - - if (xev.type == KeyPress && hidden_pointer == 0) - pointer_blank (); + strcpy (kbuf, "\033[Z"); + len = 3; } -#endif + else + { +#ifdef META8_OPTION + /* set 8-bit on */ + if (meta && (meta_char == 0x80)) + { + char *ch; -#ifdef USE_XIM - if (!XFilterEvent (&xev, xev.xany.window)) + for (ch = kbuf; ch < kbuf + len; ch++) + *ch |= 0x80; + + meta = 0; + } #endif - rxvt_process_x_event (this, &xev); + /* nil */ ; + } } - while (XPending (Xdisplay)); -} -void -rxvt_term::blink_cb (time_watcher &w) -{ - w.at += BLINK_INTERVAL; - hidden_cursor = !hidden_cursor; - want_refresh = 1; - flush(); -} + if (HOOK_INVOKE ((this, HOOK_KEY_PRESS, DT_XEVENT, &ev, DT_STRING_LEN, kbuf, len, DT_END))) + return; -void -rxvt_term::x_cb (io_watcher &w, short revents) -{ - process_x_events (); + if (len <= 0) + return; /* not mapped */ - flush (); -} + if (OPTION (Opt_scrollTtyKeypress)) + if (view_start) + { + view_start = 0; + want_refresh = 1; + } -// read the next character, currently handles UTF-8 -// will probably handle all sorts of other stuff in the future -uint32_t -rxvt_term::next_char () -{ - struct mbstate &s = mbstate; + /* + * these modifications only affect the static keybuffer + * pass Shift/Control indicators for function keys ending with `~' + * + * eg, + * Prior = "ESC[5~" + * Shift+Prior = "ESC[5$" + * Ctrl+Prior = "ESC[5^" + * Ctrl+Shift+Prior = "ESC[5@" + * Meta adds an Escape prefix (with META8_OPTION, if meta == ). + */ + if (kbuf[0] == C0_ESC && kbuf[1] == '[' && kbuf[len - 1] == '~') + kbuf[len - 1] = (shft ? (ctrl ? '@' : '$') : (ctrl ? '^' : '~')); - while (cmdbuf_ptr < cmdbuf_endp) + /* escape prefix */ + if (meta +#ifdef META8_OPTION + && meta_char == C0_ESC +#endif + ) { - uint8_t ch = *cmdbuf_ptr; - - if (s.cnt) - { - if ((ch & 0xc0) == 0x80) - { - cmdbuf_ptr++; - - /* continuation */ - s.reg = (s.reg << 6) | (ch & 0x7f); - - if (--s.cnt == 0 && s.reg >= 128) /* if !inrange then corruption or Racking */ - return s.reg; - - continue; - } - else - { - s.cnt = 0; - return s.orig; /* the _occasional_ non-utf-8 character may slip through... */ - } - } - - if ((ch & 0xc0) == 0xc0) - { - cmdbuf_ptr++; - - /* first byte */ - s.orig = ch; /* for broken encodings */ - s.reg = ch; - if ((ch & 0xe0) == 0xc0) { s.reg &= 0x1f; s.cnt = 1; } - if ((ch & 0xf0) == 0xe0) { s.reg &= 0x0f; s.cnt = 2; } - if ((ch & 0xf8) == 0xf0) { s.reg &= 0x07; s.cnt = 3; } - if ((ch & 0xfc) == 0xf8) { s.reg &= 0x03; s.cnt = 4; } - if ((ch & 0xfe) == 0xfc) { s.reg &= 0x01; s.cnt = 5; } - } - else - { - cmdbuf_ptr++; /* _occasional_ non-utf8 may slip through... */ - return ch; - } + const char ch = C0_ESC; + tt_write (&ch, 1); } - return NOCHAR; +#if defined(DEBUG_CMD) + /* Display keyboard buffer contents */ + unsigned char *p; + int i; + + fprintf (stderr, "key 0x%04X [%d]: `", (unsigned int)keysym, len); + for (i = 0, p = kbuf; i < len; i++, p++) + fprintf (stderr, (*p >= ' ' && *p < '\177' ? "%c" : "\\%03o"), *p); + fprintf (stderr, "'\n"); +#endif /* DEBUG_CMD */ + tt_write (kbuf, (unsigned int)len); } +/*}}} */ -bool -rxvt_term::pty_fill (size_t count) +#if MENUBAR_MAX || defined (KEYSYM_RESOURCE) +/*{{{ rxvt_cmd_write (), rxvt_cmd_getc () */ +/* attempt to `write' count to the input buffer */ +unsigned int +rxvt_term::cmd_write (const char *str, unsigned int count) { - ssize_t n = cmdbuf_endp - cmdbuf_ptr; + unsigned int n, s; - memmove (cmdbuf_base, cmdbuf_ptr, n); - cmdbuf_ptr = cmdbuf_base; - cmdbuf_endp = cmdbuf_ptr + n; - - n = read (cmd_fd, cmdbuf_endp, count); + n = cmdbuf_ptr - cmdbuf_base; + s = cmdbuf_base + CBUFSIZ - 1 - cmdbuf_endp; - if (n > 0) + if (n > 0 && s < count) { - cmdbuf_endp += n; - return true; + memmove (cmdbuf_base, cmdbuf_ptr, + (unsigned int) (cmdbuf_endp - cmdbuf_ptr)); + cmdbuf_ptr = cmdbuf_base; + cmdbuf_endp -= n; + s += n; } - else if (n < 0 && errno == EAGAIN) - return false; - rxvt_clean_exit(); - exit(EXIT_FAILURE); /* bad order of events? */ + if (count > s) + { + rxvt_warn ("data loss: cmd_write too large, continuing.\n"); + count = s; + } + + for (; count--;) + *cmdbuf_endp++ = *str++; + + cmd_parse (); + + return 0; } +#endif void -rxvt_term::pty_cb (io_watcher &w, short revents) +rxvt_term::flush () { - while (pty_fill (BUFSIZ - (cmdbuf_endp - cmdbuf_ptr))) - { - /* once we know the shell is running, send the screen size. Again! */ - //ch = rxvt_cmd_getc(aR); /* wait for something */ - //rxvt_tt_winsize(cmd_fd, TermWin.ncol, TermWin.nrow, cmd_pid); + flush_ev.stop (); - uint32_t ch = NOCHAR; +#ifdef TRANSPARENT + if (want_full_refresh) + { + want_full_refresh = 0; + scr_clear (); + scr_touch (false); + } +#endif - for (;;) + if (want_refresh) + { + if (SHOULD_INVOKE (HOOK_LINE_UPDATE)) { - if (ch == NOCHAR) - ch = next_char (); + int row = -view_start; - if (ch == NOCHAR) // TODO: improve - break; + while (row > -nsaved && ROW (row - 1).is_longer ()) + --row; - if (ch >= ' ' || ch == '\t' || ch == '\n' || ch == '\r') + while (row < -view_start + nrow) { - /* Read a text string from the input buffer */ - uint32_t buf[BUFSIZ]; - bool refreshnow = false; - int nlines = 0; - uint32_t *str = buf; - - *str++ = ch; + int start_row = row; + line_t *l; - for (;;) + do { - ch = next_char (); + l = &ROW (row); - if (ch == NOCHAR || (ch < ' ' && ch != '\t' && ch != '\n' && ch != '\r')) - break; - else + if (!(l->f & LINE_FILTERED)) { - *str++ = ch; - - if (ch == '\n') + // line not filtered, mark it as filtered + l->f |= LINE_FILTERED; + while (l->is_longer ()) { - nlines++; - refresh_count++; - - if (!(Options & Opt_jumpScroll) - || (refresh_count >= (refresh_limit * (TermWin.nrow - 1)))) - { - refreshnow = true; - ch = NOCHAR; - break; - } + l = &ROW (++row); + l->f |= LINE_FILTERED; } - if (str >= buf + BUFSIZ) - { - ch = NOCHAR; - break; - } + // and filter it + HOOK_INVOKE ((this, HOOK_LINE_UPDATE, DT_INT, start_row, DT_END)); + + break; } } + while (l->is_longer ()); - rxvt_scr_add_lines (this, buf, nlines, str - buf); + row++; + } + + } - /* - * If there have been a lot of new lines, then update the screen - * What the heck I'll cheat and only refresh less than every page-full. - * the number of pages between refreshes is refresh_limit, which - * is incremented here because we must be doing flat-out scrolling. - * - * refreshing should be correct for small scrolls, because of the - * time-out - */ - if (refreshnow) - { - if ((Options & Opt_jumpScroll) && refresh_limit < REFRESH_PERIOD) - refresh_limit++; + scr_refresh (refresh_type); + scrollbar_show (1); +#ifdef USE_XIM + IMSendSpot (); +#endif + } - rxvt_scr_refresh (this, refresh_type); - } + display->flush (); +} - } - else - { - switch (ch) - { - default: - rxvt_process_nonprinting (this, ch); - break; - case C0_ESC: /* escape char */ - rxvt_process_escape_seq (this); - break; - /*case 0x9b: */ /* CSI */ - /* rxvt_process_csi_seq (this); */ - } +void +rxvt_term::check_cb (check_watcher &w) +{ + SET_R (this); + SET_LOCALE (locale); - ch = NOCHAR; - } - } - } + display->flush (); + + if (want_refresh && !flush_ev.active) + flush_ev.start (NOW + 1. / 60.); // refresh at max. 60 hz normally +} +void +rxvt_term::flush_cb (time_watcher &w) +{ + SET_R (this); + SET_LOCALE (locale); + + refresh_limit = 1; + refresh_count = 0; flush (); } +#ifdef CURSOR_BLINK void -rxvt_term::flush () +rxvt_term::cursor_blink_cb (time_watcher &w) { -#ifdef TRANSPARENT - if (want_full_refresh) + hidden_cursor = !hidden_cursor; + want_refresh = 1; + + w.start (w.at + BLINK_INTERVAL); +} +#endif + +#ifdef TEXT_BLINK +void +rxvt_term::text_blink_cb (time_watcher &w) +{ + if (scr_refresh_rend (RS_Blink, RS_Blink)) { - want_full_refresh = 0; - rxvt_scr_clear (this); - rxvt_scr_touch (this, False); + hidden_text = !hidden_text; want_refresh = 1; + w.start (w.at + TEXT_BLINK_INTERVAL); } +} #endif - if (want_refresh) +#ifndef NO_SCROLLBAR_BUTTON_CONTINUAL_SCROLLING +void +rxvt_term::cont_scroll_cb (time_watcher &w) +{ + if ((scrollbar_isUp() || scrollbar_isDn()) && + scr_page (scrollbar_isUp() ? UP : DN, 1)) { - rxvt_scr_refresh (this, refresh_type); - rxvt_scrollbar_show (this, 1); -#ifdef USE_XIM - rxvt_IMSendSpot (this); -#endif + refresh_type |= SMOOTH_REFRESH; + want_refresh = 1; + w.start (w.at + SCROLLBAR_CONTINUOUS_DELAY); } +} +#endif - XFlush (Xdisplay); +#ifdef SELECTION_SCROLLING +void +rxvt_term::sel_scroll_cb (time_watcher &w) +{ + if (scr_page (scroll_selection_dir, scroll_selection_lines)) + { + selection_extend (selection_save_x, selection_save_y, selection_save_state); + refresh_type |= SMOOTH_REFRESH; + want_refresh = 1; + w.start (w.at + SCROLLBAR_CONTINUOUS_DELAY); + } } +#endif -/* rxvt_cmd_getc() - Return next input character */ -/* - * Return the next input character after first passing any keyboard input - * to the command. - */ -/* INTPROTO */ -uint32_t -rxvt_cmd_getc(pR) +#if defined(MOUSE_WHEEL) && defined(MOUSE_SLIP_WHEELING) +void +rxvt_term::slip_wheel_cb (time_watcher &w) { - for (;;) + if (mouse_slip_wheel_speed == 0 + || mouse_slip_wheel_speed < 0 ? scr_page (DN, -mouse_slip_wheel_speed) + : scr_page (UP, mouse_slip_wheel_speed)) { - uint32_t c = R->next_char (); - if (c != NOCHAR) - return c; - - // incomplete sequences should occur rarely, still, a better solution - // would be preferred. either setjmp/longjmp or better design. - fcntl (R->cmd_fd, F_SETFL, 0); - R->pty_fill (1); - fcntl (R->cmd_fd, F_SETFL, O_NONBLOCK); + if (view_start == nsaved || + view_start == 0) + mouse_slip_wheel_speed = 0; + + refresh_type |= SMOOTH_REFRESH; + want_refresh = 1; + w.start (w.at + SCROLLBAR_CONTINUOUS_DELAY); } +} +#endif -#if 0 -#define TIMEOUT_USEC 5000 - fd_set readfds; - int quick_timeout, select_res; - int want_motion_time, want_keypress_time; - struct timeval value; -#if defined(POINTER_BLANK) || defined(CURSOR_BLINK) - struct timeval tp; +#if HAVE_SCHED_YIELD +static struct event_handler +{ + check_watcher cw_yield; + + void yield (check_watcher &w) + { + sched_yield (); + w.stop (); + } + + event_handler () + : cw_yield (this, &event_handler::yield) + { + } +} event_handler; #endif - for (;;) { - /* loop until we can return something */ +bool +rxvt_term::pty_fill () +{ + ssize_t n = cmdbuf_endp - cmdbuf_ptr; + + if (CBUFSIZ == n) + { + rxvt_warn ("PLEASE REPORT: pty_fill on full buffer, draining input, continuing.\n"); + n = 0; + } + + memmove (cmdbuf_base, cmdbuf_ptr, n); + cmdbuf_ptr = cmdbuf_base; + cmdbuf_endp = cmdbuf_ptr + n; - if (R->v_bufstr < R->v_bufptr) /* output any pending chars */ - rxvt_tt_write(aR_ NULL, 0); + ssize_t r = read (pty.pty, cmdbuf_endp, CBUFSIZ - n); -#if defined(MOUSE_WHEEL) && defined(MOUSE_SLIP_WHEELING) - if (R->mouse_slip_wheel_speed) { - quick_timeout = 1; - if (!R->mouse_slip_wheel_delay-- - && rxvt_scr_page(aR_ R->mouse_slip_wheel_speed > 0 ? UP : DN, - abs(R->mouse_slip_wheel_speed))) { - R->mouse_slip_wheel_delay = SCROLLBAR_CONTINUOUS_DELAY; - R->refresh_type |= SMOOTH_REFRESH; - R->want_refresh = 1; - } - } -#endif /* MOUSE_WHEEL && MOUSE_SLIP_WHEELING */ -#ifdef SELECTION_SCROLLING - if (R->pending_scroll_selection) { - quick_timeout = 1; - if (!R->scroll_selection_delay-- - && rxvt_scr_page(aR_ R->scroll_selection_dir, - R->scroll_selection_lines)) { - rxvt_selection_extend(aR_ R->selection_save_x, - R->selection_save_y, R->selection_save_state); - R->scroll_selection_delay = SCROLLBAR_CONTINUOUS_DELAY; - R->refresh_type |= SMOOTH_REFRESH; - R->want_refresh = 1; - } - } + if (r > 0) + { + cmdbuf_endp += r; + return true; + } + else if (r < 0 && (errno == EAGAIN || errno == EINTR)) + { +#if HAVE_SCHED_YIELD + if (display->is_local) + event_handler.cw_yield.start (); #endif -#ifndef NO_SCROLLBAR_BUTTON_CONTINUAL_SCROLLING - if (scrollbar_isUp() || scrollbar_isDn()) { - quick_timeout = 1; - if (!R->scroll_arrow_delay-- - && rxvt_scr_page(aR_ scrollbar_isUp() ? UP : DN, 1)) { - R->scroll_arrow_delay = SCROLLBAR_CONTINUOUS_DELAY; - R->refresh_type |= SMOOTH_REFRESH; - R->want_refresh = 1; - } - } -#endif /* NO_SCROLLBAR_BUTTON_CONTINUAL_SCROLLING */ + } + else + { + pty_ev.stop (); -#ifdef TRANSPARENT - quick_timeout |= R->want_full_refresh; -#endif -#endif + if (!OPTION (Opt_hold)) + destroy (); + } + + return false; +} + +void +rxvt_term::pty_cb (io_watcher &w, short revents) +{ + SET_R (this); + SET_LOCALE (locale); + + if (revents & EVENT_READ) + // loop, but don't allow a single term to monopolize us + while (pty_fill ()) + if (cmd_parse ()) + break; + + if (revents & EVENT_WRITE) + pty_write (); } void rxvt_term::pointer_unblank () { - XDefineCursor (Xdisplay, TermWin.vt, TermWin_cursor); - rxvt_recolour_cursor (this); + XDefineCursor (display->display, vt, TermWin_cursor); + recolour_cursor (); #ifdef POINTER_BLANK hidden_pointer = 0; - if (Options & Opt_pointerBlank) + if (OPTION (Opt_pointerBlank)) pointer_ev.start (NOW + pointerBlankDelay); #endif } @@ -1026,13 +1207,11 @@ void rxvt_term::pointer_blank () { - pointer_ev.stop (); - - if (!(Options & Opt_pointerBlank)) + if (! OPTION (Opt_pointerBlank)) return; - XDefineCursor (Xdisplay, TermWin.vt, blank_cursor); - XFlush (Xdisplay); + XDefineCursor (display->display, vt, display->blank_cursor); + XFlush (display->display); hidden_pointer = 1; } @@ -1040,1350 +1219,2034 @@ void rxvt_term::pointer_cb (time_watcher &w) { + SET_R (this); + SET_LOCALE (locale); + pointer_blank (); } #endif -/* INTPROTO */ void -rxvt_mouse_report(pR_ const XButtonEvent *ev) +rxvt_term::mouse_report (XButtonEvent &ev) { - int button_number, key_state = 0; - int x, y; + int button_number, key_state = 0; + int x, y; - x = ev->x; - y = ev->y; - rxvt_pixel_position(aR_ &x, &y); - - if (R->MEvent.button == AnyButton) { - button_number = 3; - } else { - button_number = R->MEvent.button - Button1; - /* add 0x3D for wheel events, like xterm does */ - if (button_number >= 3) - button_number += (64 - 3); - } - - if (R->PrivateModes & PrivMode_MouseX10) { - /* - * do not report ButtonRelease - * no state info allowed - */ - key_state = 0; - if (button_number == 3) - return; - } else { - /* XTerm mouse reporting needs these values: - * 4 = Shift - * 8 = Meta - * 16 = Control - * plus will add in our own Double-Click reporting - * 32 = Double Click - */ - key_state = ((R->MEvent.state & ShiftMask) ? 4 : 0) - + ((R->MEvent.state & R->ModMetaMask) ? 8 : 0) - + ((R->MEvent.state & ControlMask) ? 16 : 0); + x = ev.x; + y = ev.y; + pixel_position (&x, &y); + + if (MEvent.button == AnyButton) + button_number = 3; + else + { + button_number = MEvent.button - Button1; + /* add 0x3D for wheel events, like xterm does */ + if (button_number >= 3) + button_number += (64 - 3); + } + + if (priv_modes & PrivMode_MouseX10) + { + /* + * do not report ButtonRelease + * no state info allowed + */ + key_state = 0; + if (button_number == 3) + return; + } + else + { + /* XTerm mouse reporting needs these values: + * 4 = Shift + * 8 = Meta + * 16 = Control + * plus will add in our own Double-Click reporting + * 32 = Double Click + */ + key_state = ((MEvent.state & ShiftMask) ? 4 : 0) + + ((MEvent.state & ModMetaMask) ? 8 : 0) + + ((MEvent.state & ControlMask) ? 16 : 0); #ifdef MOUSE_REPORT_DOUBLECLICK - key_state += ((R->MEvent.clicks > 1) ? 32 : 0); + key_state += ((MEvent.clicks > 1) ? 32 : 0); #endif } -#ifdef DEBUG_MOUSEREPORT - fprintf(stderr, "Mouse ["); - if (key_state & 16) - fputc('C', stderr); - if (key_state & 4) - fputc('S', stderr); - if (key_state & 8) - fputc('A', stderr); - if (key_state & 32) - fputc('2', stderr); - fprintf(stderr, "]: <%d>, %d/%d\n", - button_number, - x + 1, - y + 1); -#else - rxvt_tt_printf(aR_ "\033[M%c%c%c", - (32 + button_number + key_state), - (32 + x + 1), - (32 + y + 1)); -#endif +#if DEBUG_MOUSEREPORT + fprintf (stderr, "Mouse ["); + if (key_state & 16) + fputc ('C', stderr); + if (key_state & 4) + fputc ('S', stderr); + if (key_state & 8) + fputc ('A', stderr); + if (key_state & 32) + fputc ('2', stderr); + fprintf (stderr, "]: <%d>, %d/%d\n", + button_number, + x + 1, + y + 1); +#endif + + tt_printf ("\033[M%c%c%c", + (32 + button_number + key_state), + (32 + x + 1), + (32 + y + 1)); } #ifdef USING_W11LIB -/* EXTPROTO */ void -rxvt_W11_process_x_event(XEvent *ev) +rxvt_W11_process_x_event (XEvent *ev) { - rxvt_t *r = rxvt_get_r(); + rxvt_t *r = rxvt_get_r (); - rxvt_process_x_event(aR_ ev); + x_cb (*ev); } #endif /*{{{ process an X event */ -/* INTPROTO */ void -rxvt_process_x_event(pR_ XEvent *ev) +rxvt_term::x_cb (XEvent &ev) { - int i, want_timeout; - Window unused_root, unused_child; - int unused_root_x, unused_root_y; - unsigned int unused_mask; - struct timeval tp; - -#ifdef DEBUG_X - const char *const eventnames[] = - { /* mason - this matches my system */ - "", - "", - "KeyPress", - "KeyRelease", - "ButtonPress", - "ButtonRelease", - "MotionNotify", - "EnterNotify", - "LeaveNotify", - "FocusIn", - "FocusOut", - "KeymapNotify", - "Expose", - "GraphicsExpose", - "NoExpose", - "VisibilityNotify", - "CreateNotify", - "DestroyNotify", - "UnmapNotify", - "MapNotify", - "MapRequest", - "ReparentNotify", - "ConfigureNotify", - "ConfigureRequest", - "GravityNotify", - "ResizeRequest", - "CirculateNotify", - "CirculateRequest", - "PropertyNotify", - "SelectionClear", - "SelectionRequest", - "SelectionNotify", - "ColormapNotify", - "ClientMessage", - "MappingNotify" - }; - struct tm *ltt; -#endif - - /* - * check if we need to get the time for any timeouts - */ - - for (i = NUM_TIMEOUTS; i--; ) - if (R->timeout[i].tv_sec) { - want_timeout = 1; - break; - } - -#ifndef DEBUG_X - if (want_timeout) -#endif - (void)gettimeofday(&tp, NULL); - -#ifdef DEBUG_X - ltt = localtime(&(tp.tv_sec)); - D_X((stderr, "Event: %-16s %-7s %08lx (%4d-%02d-%02d %02d:%02d:%02d.%.6ld) %s %lu", eventnames[ev->type], (ev->xany.window == R->TermWin.parent[0] ? "parent" : (ev->xany.window == R->TermWin.vt ? "vt" : (ev->xany.window == R->scrollBar.win ? "scroll" : (ev->xany.window == R->menuBar.win ? "menubar" : "UNKNOWN")))), (ev->xany.window == R->TermWin.parent[0] ? R->TermWin.parent[0] : (ev->xany.window == R->TermWin.vt ? R->TermWin.vt : (ev->xany.window == R->scrollBar.win ? R->scrollBar.win : (ev->xany.window == R->menuBar.win ? R->menuBar.win : 0)))), ltt->tm_year + 1900, ltt->tm_mon + 1, ltt->tm_mday, ltt->tm_hour, ltt->tm_min, ltt->tm_sec, tp.tv_usec, ev->xany.send_event ? "S" : " ", ev->xany.serial)); -#endif - - /* X event timeouts */ - if (want_timeout) - for (i = NUM_TIMEOUTS; i--; ) { - if (R->timeout[i].tv_sec == 0) - continue; - if ((tp.tv_sec < R->timeout[i].tv_sec) - || (tp.tv_sec == R->timeout[i].tv_sec - && tp.tv_usec < R->timeout[i].tv_usec)) - continue; - R->timeout[i].tv_sec = 0; - switch(i) { - case TIMEOUT_INCR: - rxvt_print_error("data loss: timeout on INCR selection paste"); - R->selection_wait = Sel_none; - break; - default: - break; - } - } - - switch (ev->type) { - case KeyPress: - rxvt_lookup_key(aR_ (XKeyEvent *)ev); - break; + dDisp; + + SET_R (this); + SET_LOCALE (locale); + +#if defined(CURSOR_BLINK) + if (OPTION (Opt_cursorBlink) && ev.type == KeyPress) + { + if (hidden_cursor) + { + hidden_cursor = 0; + want_refresh = 1; + } + + cursor_blink_ev.start (NOW + BLINK_INTERVAL); + } +#endif + +#if defined(POINTER_BLANK) + if (OPTION (Opt_pointerBlank) && pointerBlankDelay > 0) + { + if (ev.type == MotionNotify + || ev.type == ButtonPress + || ev.type == ButtonRelease) + if (hidden_pointer) + pointer_unblank (); + + if (ev.type == KeyPress && hidden_pointer == 0) + pointer_blank (); + } +#endif + + Window unused_root, unused_child; + int unused_root_x, unused_root_y; + unsigned int unused_mask; + + switch (ev.type) + { + case KeyPress: +#if ISO_14755 + if (!(iso14755buf & ISO_14755_52)) +#endif + lookup_key (ev.xkey); + + break; + + case KeyRelease: + { +#if (MOUSE_WHEEL && MOUSE_SLIP_WHEELING) || ISO_14755 + KeySym ks; + + ks = XLookupKeysym (&ev.xkey, ev.xkey.state & ShiftMask ? 1 : 0); // sorry, only shift supported :/ +#endif + +#if ENABLE_FRILLS || ISO_14755 + // ISO 14755 support + if (iso14755buf) + if (iso14755buf & ISO_14755_52) + { +# if ENABLE_OVERLAY + scr_overlay_off (); +# endif +# if ISO_14755 + // iso14755 part 5.2 handling: release time + // first: controls + if ((ev.xkey.state & ControlMask) + && ((ks >= 0x40 && ks <= 0x5f) + || (ks >= 0x61 && ks <= 0x7f))) + { + iso14755buf = ISO_14755_51 | 0x2400 | (ks & 0x1f); + commit_iso14755 (); + return; // case-break; + } + + for (unsigned short *i = iso14755_symtab; i[0]; i+= 2) + if (i[0] == ks) + { + iso14755buf = ISO_14755_51 | i[1]; + commit_iso14755 (); + return; // case-break; + } + + scr_bell (); +# endif + iso14755buf = 0; + break; + } + else if ((ev.xkey.state & (ShiftMask | ControlMask)) != (ShiftMask | ControlMask)) + { +# if ENABLE_OVERLAY + scr_overlay_off (); +# endif + if (iso14755buf & ISO_14755_51) + commit_iso14755 (); +#if ISO_14755 + else if (iso14755buf & ISO_14755_STARTED) + { + iso14755buf = ISO_14755_52; // iso14755 part 5.2: remember empty begin/end pair + + scr_overlay_new (0, -1, sizeof ("KEYCAP PICTURE INSERT MODE") - 1, 1); + scr_overlay_set (0, 0, "KEYCAP PICTURE INSERT MODE"); + } +# endif + else + iso14755buf = 0; + } +#endif #if defined(MOUSE_WHEEL) && defined(MOUSE_SLIP_WHEELING) - case KeyRelease: - { - if (!(ev->xkey.state & ControlMask)) - R->mouse_slip_wheel_speed = 0; - else { - KeySym ks; - - ks = XKeycodeToKeysym(R->Xdisplay, ev->xkey.keycode, 0); - if (ks == XK_Control_L || ks == XK_Control_R) - R->mouse_slip_wheel_speed = 0; - } - break; - } -#endif - - case ButtonPress: - rxvt_button_press(aR_ (XButtonEvent *)ev); - break; - - case ButtonRelease: - rxvt_button_release(aR_ (XButtonEvent *)ev); - break; - - case ClientMessage: - if (ev->xclient.format == 32 - && (Atom)ev->xclient.data.l[0] == R->xa[XA_WMDELETEWINDOW]) - exit(EXIT_SUCCESS); + if (!(ev.xkey.state & ControlMask)) + slip_wheel_ev.stop (); + else if (ks == XK_Control_L || ks == XK_Control_R) + mouse_slip_wheel_speed = 0; +#endif + break; + } + + case ButtonPress: + button_press (ev.xbutton); + break; + + case ButtonRelease: + button_release (ev.xbutton); + break; + + case ClientMessage: + if (ev.xclient.format == 32 + && ev.xclient.message_type == xa[XA_WM_PROTOCOLS]) + { + if (ev.xclient.data.l[0] == xa[XA_WM_DELETE_WINDOW]) + destroy (); +#if ENABLE_EWMH + else if (ev.xclient.data.l[0] == xa[XA_NET_WM_PING]) + XSendEvent (disp, ev.xclient.window = display->root, + False, SubstructureRedirectMask | SubstructureNotifyMask, + &ev); +#endif + } +#if ENABLE_XEMBED + else if (ev.xclient.format == 32 && ev.xclient.message_type == xa[XA_XEMBED]) + { + if (ev.xclient.data.l[1] == XEMBED_FOCUS_IN) + focus_in (); + else if (ev.xclient.data.l[1] == XEMBED_FOCUS_OUT) + focus_out (); + } +#endif #ifdef OFFIX_DND - /* OffiX Dnd (drag 'n' drop) protocol */ - if (ev->xclient.message_type == R->xa[XA_DNDPROTOCOL] - && (ev->xclient.data.l[0] == DndFile - || ev->xclient.data.l[0] == DndDir - || ev->xclient.data.l[0] == DndLink)) { - /* Get Dnd data */ - Atom ActualType; - int ActualFormat; - unsigned char *data; - unsigned long Size, RemainingBytes; - - XGetWindowProperty(R->Xdisplay, Xroot, - R->xa[XA_DNDSELECTION], - 0L, 1000000L, - False, AnyPropertyType, - &ActualType, &ActualFormat, - &Size, &RemainingBytes, - &data); - XChangeProperty(R->Xdisplay, Xroot, - XA_CUT_BUFFER0, XA_STRING, - 8, PropModeReplace, - data, STRLEN(data)); - rxvt_selection_paste(aR_ Xroot, XA_CUT_BUFFER0, True); - XSetInputFocus(R->Xdisplay, Xroot, RevertToNone, CurrentTime); - } + /* OffiX Dnd (drag 'n' drop) protocol */ + else if (ev.xclient.message_type == xa[XA_DNDPROTOCOL] + && (ev.xclient.data.l[0] == DndFile + || ev.xclient.data.l[0] == DndDir + || ev.xclient.data.l[0] == DndLink)) + { + /* Get Dnd data */ + Atom ActualType; + int ActualFormat; + unsigned char *data; + unsigned long Size, RemainingBytes; + + XGetWindowProperty (disp, display->root, + xa[XA_DNDSELECTION], + 0L, 1000000L, + False, AnyPropertyType, + &ActualType, &ActualFormat, + &Size, &RemainingBytes, + &data); + set_string_property (XA_CUT_BUFFER0, data); + XFree (data); + selection_paste (display->root, XA_CUT_BUFFER0, true); + XSetInputFocus (disp, display->root, RevertToNone, CurrentTime); + } #endif /* OFFIX_DND */ - break; + break; - case MappingNotify: - XRefreshKeyboardMapping(&(ev->xmapping)); - break; - - /* - * XXX: this is not the _current_ arrangement - * Here's my conclusion: - * If the window is completely unobscured, use bitblt's - * to scroll. Even then, they're only used when doing partial - * screen scrolling. When partially obscured, we have to fill - * in the GraphicsExpose parts, which means that after each refresh, - * we need to wait for the graphics expose or Noexpose events, - * which ought to make things real slow! - */ - case VisibilityNotify: - switch (ev->xvisibility.state) { - case VisibilityUnobscured: - R->refresh_type = FAST_REFRESH; - break; - case VisibilityPartiallyObscured: - R->refresh_type = SLOW_REFRESH; - break; - default: - R->refresh_type = NO_REFRESH; - break; - } - break; - - case FocusIn: - if (!R->TermWin.focus) { - R->TermWin.focus = 1; - R->want_refresh = 1; -#ifdef USE_XIM - if (R->Input_Context != NULL) - XSetICFocus(R->Input_Context); -#endif -#ifdef CURSOR_BLINK - if (R->Options & Opt_cursorBlink) - R->blink_ev.start (NOW + BLINK_INTERVAL); + case MappingNotify: + XRefreshKeyboardMapping (&ev.xmapping); + break; + + /* + * XXX: this is not the _current_ arrangement + * Here's my conclusion: + * If the window is completely unobscured, use bitblt's + * to scroll. Even then, they're only used when doing partial + * screen scrolling. When partially obscured, we have to fill + * in the GraphicsExpose parts, which means that after each refresh, + * we need to wait for the graphics expose or Noexpose events, + * which ought to make things real slow! + */ + case VisibilityNotify: + switch (ev.xvisibility.state) + { + case VisibilityUnobscured: + refresh_type = FAST_REFRESH; + break; + case VisibilityPartiallyObscured: + refresh_type = SLOW_REFRESH; + break; + default: + refresh_type = NO_REFRESH; + break; + } + break; + + case FocusIn: + focus_in (); + break; + + case FocusOut: + focus_out (); + break; + + case ConfigureNotify: + if (ev.xconfigure.window == parent[0]) + { + while (XCheckTypedWindowEvent (disp, ev.xconfigure.window, ConfigureNotify, &ev)) + ; + + if (szHint.width != ev.xconfigure.width || szHint.height != ev.xconfigure.height) + { + seen_resize = 1; + resize_all_windows (ev.xconfigure.width, ev.xconfigure.height, 1); + } + +#ifdef TRANSPARENT /* XXX: maybe not needed - leave in for now */ + if (OPTION (Opt_transparent)) + check_our_parents (); #endif - } - break; + } + break; - case FocusOut: - if (R->TermWin.focus) { - R->TermWin.focus = 0; - R->want_refresh = 1; -#ifdef USE_XIM - if (R->Input_Context != NULL) - XUnsetICFocus(R->Input_Context); + case PropertyNotify: + if (ev.xproperty.atom == xa[XA_VT_SELECTION] + && ev.xproperty.state == PropertyNewValue) + selection_property (ev.xproperty.window, ev.xproperty.atom); + + break; + + case SelectionClear: + selection_clear (); + break; + + case SelectionNotify: + if (selection_wait == Sel_normal) + selection_paste (ev.xselection.requestor, ev.xselection.property, true); + break; + + case SelectionRequest: + selection_send (ev.xselectionrequest); + break; + + case UnmapNotify: + mapped = 0; +#ifdef TEXT_BLINK + text_blink_ev.stop (); #endif -#ifdef CURSOR_BLINK - if (R->Options & Opt_cursorBlink) - R->blink_ev.stop (); - R->hidden_cursor = 0; -#endif - } - break; - - case ConfigureNotify: - if (ev->xconfigure.window == R->TermWin.parent[0]) { - int height, width; - - do { /* Wrap lots of configures into one */ - width = ev->xconfigure.width; - height = ev->xconfigure.height; - D_SIZE((stderr, "Size: ConfigureNotify: %4d x %4d", width, height)); - } while (XCheckTypedWindowEvent(R->Xdisplay, ev->xconfigure.window, - ConfigureNotify, ev)); - if (R->szHint.width != width || R->szHint.height != height) { - D_SIZE((stderr, "Size: Resizing from: %4d x %4d", R->szHint.width, R->szHint.height)); - rxvt_resize_all_windows(aR_ (unsigned int)width, - (unsigned int)height, 1); - } -#ifdef DEBUG_SIZE - else { - D_SIZE((stderr, "Size: Not resizing")); - } + break; + + case MapNotify: + mapped = 1; +#ifdef TEXT_BLINK + text_blink_ev.start (NOW + TEXT_BLINK_INTERVAL); #endif -#ifdef TRANSPARENT /* XXX: maybe not needed - leave in for now */ - if (R->Options & Opt_transparent) { - rxvt_check_our_parents(aR); - if (R->am_transparent) - R->want_full_refresh = 1; - } -#endif - } - break; - - case SelectionClear: - rxvt_selection_clear(aR); - break; - - case SelectionNotify: - if (R->selection_wait == Sel_normal) - rxvt_selection_paste(aR_ ev->xselection.requestor, - ev->xselection.property, True); - break; - - case SelectionRequest: - rxvt_selection_send(aR_ &(ev->xselectionrequest)); - break; - - case UnmapNotify: - R->TermWin.mapped = 0; - break; - - case MapNotify: - R->TermWin.mapped = 1; - break; - - case PropertyNotify: - if (ev->xproperty.atom == R->xa[XA_VT_SELECTION]) { - if (ev->xproperty.state == PropertyNewValue) - rxvt_selection_property(aR_ ev->xproperty.window, - ev->xproperty.atom); - break; - } + break; + #ifdef TRANSPARENT - /* - * if user used some Esetroot compatible prog to set the root bg, - * use the property to determine the pixmap. We use it later on. - */ - if (R->xa[XA_XROOTPMAPID] == 0) - R->xa[XA_XROOTPMAPID] = XInternAtom(R->Xdisplay, - "_XROOTPMAP_ID", False); - if (ev->xproperty.atom != R->xa[XA_XROOTPMAPID]) - break; - /* FALLTHROUGH */ - case ReparentNotify: - if ((R->Options & Opt_transparent) && rxvt_check_our_parents(aR)) { - if (R->am_transparent) - R->want_full_refresh = 1; - } + case ReparentNotify: + rootwin_cb (ev); + break; #endif /* TRANSPARENT */ - break; - case GraphicsExpose: - case Expose: - if (ev->xany.window == R->TermWin.vt) { -#ifdef NO_SLOW_LINK_SUPPORT - rxvt_scr_expose(aR_ ev->xexpose.x, ev->xexpose.y, - ev->xexpose.width, ev->xexpose.height, False); -#else - // don't understand this, so commented it out - rxvt_scr_expose(aR_ ev->xexpose.x, ev->xexpose.y, - ev->xexpose.width, ev->xexpose.height, False); - //rxvt_scr_expose(aR_ ev->xexpose.x, 0, - // ev->xexpose.width, R->TermWin.height, False); -#endif - R->want_refresh = 1; - } else { - XEvent unused_xevent; - - while (XCheckTypedWindowEvent(R->Xdisplay, ev->xany.window, - Expose, - &unused_xevent)) ; - while (XCheckTypedWindowEvent(R->Xdisplay, ev->xany.window, - GraphicsExpose, - &unused_xevent)) ; - if (isScrollbarWindow(ev->xany.window)) { - scrollbar_setIdle(); - rxvt_scrollbar_show(aR_ 0); - } + case GraphicsExpose: + case Expose: + if (ev.xany.window == vt) + { + do + scr_expose (ev.xexpose.x, ev.xexpose.y, + ev.xexpose.width, ev.xexpose.height, False); + while (XCheckTypedWindowEvent (disp, vt, ev.xany.type, &ev)); + + ev.xany.type = ev.xany.type == Expose ? GraphicsExpose : Expose; + + while (XCheckTypedWindowEvent (disp, vt, ev.xany.type, &ev)) + scr_expose (ev.xexpose.x, ev.xexpose.y, + ev.xexpose.width, ev.xexpose.height, False); + + scr_refresh (refresh_type); + } + else + { + XEvent unused_event; + + while (XCheckTypedWindowEvent (disp, ev.xany.window, Expose, &unused_event)) + ; + while (XCheckTypedWindowEvent (disp, ev.xany.window, GraphicsExpose, &unused_event)) + ; + + if (isScrollbarWindow (ev.xany.window)) + { + scrollBar.setIdle (); + scrollbar_show (0); + } #ifdef MENUBAR - if (menubar_visible(aR) && isMenuBarWindow(ev->xany.window)) - rxvt_menubar_expose(aR); + if (menubar_visible () && isMenuBarWindow (ev.xany.window)) + menubar_expose (); #endif -#ifdef RXVT_GRAPHICS - rxvt_Gr_expose(aR_ ev->xany.window); + +#ifdef TRANSPARENT + if (am_transparent && ev.xany.window == parent[0]) + XClearWindow (disp, ev.xany.window); #endif - } - break; + } + break; - case MotionNotify: + case MotionNotify: #ifdef POINTER_BLANK - if (R->hidden_pointer) - R->pointer_unblank (); + if (hidden_pointer) + pointer_unblank (); #endif #if MENUBAR - if (isMenuBarWindow(ev->xany.window)) { - rxvt_menubar_control(aR_ &(ev->xbutton)); - break; - } -#endif - if ((R->PrivateModes & PrivMode_mouse_report) && !(R->bypass_keystate)) - break; - - if (ev->xany.window == R->TermWin.vt) { - if ((ev->xbutton.state & (Button1Mask | Button3Mask))) { - while (XCheckTypedWindowEvent(R->Xdisplay, R->TermWin.vt, - MotionNotify, ev)) ; - XQueryPointer(R->Xdisplay, R->TermWin.vt, - &unused_root, &unused_child, - &unused_root_x, &unused_root_y, - &(ev->xbutton.x), &(ev->xbutton.y), - &unused_mask); + if (isMenuBarWindow (ev.xany.window)) + { + menubar_control (ev.xbutton); + break; + } +#endif + if ((priv_modes & PrivMode_mouse_report) && !bypass_keystate) + break; + + if (ev.xany.window == vt) + { + if (HOOK_INVOKE ((this, HOOK_MOTION_NOTIFY, DT_XEVENT, &ev, DT_END))) + ; // nop + else if (ev.xbutton.state & (Button1Mask | Button3Mask)) + { + while (XCheckTypedWindowEvent (disp, vt, MotionNotify, &ev)) + ; + + XQueryPointer (disp, vt, + &unused_root, &unused_child, + &unused_root_x, &unused_root_y, + &ev.xbutton.x, &ev.xbutton.y, + &ev.xbutton.state); #ifdef MOUSE_THRESHOLD - /* deal with a `jumpy' mouse */ - if ((ev->xmotion.time - R->MEvent.time) > MOUSE_THRESHOLD) { + /* deal with a `jumpy' mouse */ + if ((ev.xmotion.time - MEvent.time) > MOUSE_THRESHOLD) + { +#endif +#if ISO_14755 + // 5.4 + if (iso14755buf & (ISO_14755_STARTED | ISO_14755_54)) + { + iso14755_54 (ev.xbutton.x, ev.xbutton.y); + break; + } #endif - rxvt_selection_extend(aR_ (ev->xbutton.x), (ev->xbutton.y), - (ev->xbutton.state & Button3Mask) ? 2 : 0); + selection_extend (ev.xbutton.x, ev.xbutton.y, + ev.xbutton.state & Button3Mask ? 2 : 0); + #ifdef SELECTION_SCROLLING - if (ev->xbutton.yTermWin.int_bwidth || - Pixel2Row(ev->xbutton.y)>(R->TermWin.nrow-1)) { - int dist; - - R->pending_scroll_selection=1; - - /* don't clobber the current delay if we are - * already in the middle of scrolling. - */ - if (R->scroll_selection_delay<=0) - R->scroll_selection_delay=SCROLLBAR_CONTINUOUS_DELAY; - - /* save the event params so we can highlight - * the selection in the pending-scroll loop - */ - R->selection_save_x=ev->xbutton.x; - R->selection_save_y=ev->xbutton.y; - R->selection_save_state= - (ev->xbutton.state & Button3Mask) ? 2 : 0; - - /* calc number of lines to scroll */ - if (ev->xbutton.yTermWin.int_bwidth) { - R->scroll_selection_dir = UP; - dist = R->TermWin.int_bwidth - ev->xbutton.y; - } - else { - R->scroll_selection_dir = DN; - dist = ev->xbutton.y - - (R->TermWin.int_bwidth + R->TermWin.height); - } - R->scroll_selection_lines=(Pixel2Height(dist)/ - SELECTION_SCROLL_LINE_SPEEDUP)+1; - MIN_IT(R->scroll_selection_lines, - SELECTION_SCROLL_MAX_LINES); - } - else { - /* we are within the text window, so we - * shouldn't be scrolling - */ - R->pending_scroll_selection = 0; - } + if (ev.xbutton.y < int_bwidth + || Pixel2Row (ev.xbutton.y) > (nrow-1)) + { + int dist; + + /* don't clobber the current delay if we are + * already in the middle of scrolling. + */ + if (!sel_scroll_ev.active) + sel_scroll_ev.start (NOW + SCROLLBAR_INITIAL_DELAY); + + /* save the event params so we can highlight + * the selection in the pending-scroll loop + */ + selection_save_x = ev.xbutton.x; + selection_save_y = ev.xbutton.y; + selection_save_state = (ev.xbutton.state & Button3Mask) ? 2 : 0; + + /* calc number of lines to scroll */ + if (ev.xbutton.y < int_bwidth) + { + scroll_selection_dir = UP; + dist = int_bwidth - ev.xbutton.y; + } + else + { + scroll_selection_dir = DN; + dist = ev.xbutton.y - (int_bwidth + height); + } + + scroll_selection_lines = Pixel2Height (dist) + / SELECTION_SCROLL_LINE_SPEEDUP + + 1; + min_it (scroll_selection_lines, + SELECTION_SCROLL_MAX_LINES); + } + else + { + /* we are within the text window, so we + * shouldn't be scrolling + */ + if (sel_scroll_ev.active) + sel_scroll_ev.stop(); + } #endif #ifdef MOUSE_THRESHOLD - } + } #endif - } - } else if (isScrollbarWindow(ev->xany.window) && scrollbar_isMotion()) { - while (XCheckTypedWindowEvent(R->Xdisplay, R->scrollBar.win, - MotionNotify, ev)) ; - XQueryPointer(R->Xdisplay, R->scrollBar.win, - &unused_root, &unused_child, - &unused_root_x, &unused_root_y, - &(ev->xbutton.x), &(ev->xbutton.y), - &unused_mask); - rxvt_scr_move_to(aR_ scrollbar_position(ev->xbutton.y) - R->csrO, - scrollbar_size()); - rxvt_scr_refresh(aR_ R->refresh_type); - R->refresh_limit = 0; - rxvt_scrollbar_show(aR_ 1); - } - break; + } + } + else if (isScrollbarWindow (ev.xany.window) && scrollbar_isMotion ()) + { + while (XCheckTypedWindowEvent (disp, scrollBar.win, + MotionNotify, &ev)) + ; + + XQueryPointer (disp, scrollBar.win, + &unused_root, &unused_child, + &unused_root_x, &unused_root_y, + &ev.xbutton.x, &ev.xbutton.y, + &unused_mask); + scr_move_to (scrollbar_position (ev.xbutton.y) - csrO, + scrollbar_size ()); + scr_refresh (refresh_type); + refresh_limit = 0; + scrollbar_show (1); + } + break; } } -/* INTPROTO */ -void -rxvt_button_press(pR_ XButtonEvent *ev) -{ - int reportmode = 0, clickintime; - - R->bypass_keystate = ev->state & (R->ModMetaMask | ShiftMask); - if (!R->bypass_keystate) - reportmode = !!(R->PrivateModes & PrivMode_mouse_report); -/* - * VT window processing of button press - */ - if (ev->window == R->TermWin.vt) - { -#if RXVT_GRAPHICS - if (ev->subwindow != None) - rxvt_Gr_ButtonPress(ev->x, ev->y); - else +void +rxvt_term::focus_in () +{ + if (!focus) + { + focus = 1; + want_refresh = 1; + + HOOK_INVOKE ((this, HOOK_FOCUS_OUT, DT_END)); + +#if USE_XIM + if (Input_Context != NULL) + { + IMSetStatusPosition (); + XSetICFocus (Input_Context); + } #endif - { - clickintime = ev->time - R->MEvent.time < MULTICLICK_TIME; - if (reportmode) - { - /* mouse report from vt window */ - /* save the xbutton state (for ButtonRelease) */ - R->MEvent.state = ev->state; +#if CURSOR_BLINK + if (OPTION (Opt_cursorBlink)) + cursor_blink_ev.start (NOW + BLINK_INTERVAL); +#endif +#if OFF_FOCUS_FADING + if (rs[Rs_fade]) + { + pix_colors = pix_colors_focused; + scr_recolour (); + } +#endif + } +} + +void +rxvt_term::focus_out () +{ + if (focus) + { + focus = 0; + want_refresh = 1; + + HOOK_INVOKE ((this, HOOK_FOCUS_OUT, DT_END)); + +#if ENABLE_FRILLS || ISO_14755 + if (iso14755buf) + { + iso14755buf = 0; +# if ENABLE_OVERLAY + scr_overlay_off (); +# endif + } +#endif +#if USE_XIM + if (Input_Context != NULL) + XUnsetICFocus (Input_Context); +#endif +#if CURSOR_BLINK + if (OPTION (Opt_cursorBlink)) + cursor_blink_ev.stop (); + hidden_cursor = 0; +#endif +#if OFF_FOCUS_FADING + if (rs[Rs_fade]) + { + pix_colors = pix_colors_unfocused; + scr_recolour (); + } +#endif + } +} + +#if TRANSPARENT +void +rxvt_term::rootwin_cb (XEvent &ev) +{ + SET_R (this); + SET_LOCALE (locale); + + switch (ev.type) + { + case PropertyNotify: + /* + * if user used some Esetroot compatible prog to set the root bg, + * use the property to determine the pixmap. We use it later on. + */ + if (ev.xproperty.atom != xa[XA_XROOTPMAP_ID] + && ev.xproperty.atom != xa[XA_ESETROOT_PMAP_ID]) + return; + + /* FALLTHROUGH */ + case ReparentNotify: + if (OPTION (Opt_transparent) && check_our_parents () && am_transparent) + want_refresh = want_full_refresh = 1; + break; + } +} +#endif + +void +rxvt_term::button_press (XButtonEvent &ev) +{ + int reportmode = 0, clickintime; + + bypass_keystate = ev.state & (ModMetaMask | ShiftMask); + + if (!bypass_keystate) + reportmode = !! (priv_modes & PrivMode_mouse_report); + + /* + * VT window processing of button press + */ + if (ev.window == vt) + { +#if ISO_14755 + // 5.4 + if (iso14755buf & (ISO_14755_STARTED | ISO_14755_54)) + { + iso14755_54 (ev.x, ev.y); + return; + } +#endif + + clickintime = ev.time - MEvent.time < MULTICLICK_TIME; + + if (reportmode) + { + /* mouse report from vt window */ + /* save the xbutton state (for ButtonRelease) */ + MEvent.state = ev.state; #ifdef MOUSE_REPORT_DOUBLECLICK - if (ev->button == R->MEvent.button && clickintime) - { - /* same button, within alloted time */ - R->MEvent.clicks++; - if (R->MEvent.clicks > 1) - { - /* only report double clicks */ - R->MEvent.clicks = 2; - rxvt_mouse_report(aR_ ev); - - /* don't report the release */ - R->MEvent.clicks = 0; - R->MEvent.button = AnyButton; - } - } - else - { - /* different button, or time expired */ - R->MEvent.clicks = 1; - R->MEvent.button = ev->button; - rxvt_mouse_report(aR_ ev); - } + if (ev.button == MEvent.button && clickintime) + { + /* same button, within alloted time */ + MEvent.clicks++; + if (MEvent.clicks > 1) + { + /* only report double clicks */ + MEvent.clicks = 2; + mouse_report (ev); + + /* don't report the release */ + MEvent.clicks = 0; + MEvent.button = AnyButton; + } + } + else + { + /* different button, or time expired */ + MEvent.clicks = 1; + MEvent.button = ev.button; + mouse_report (ev); + } #else - R->MEvent.button = ev->button; - rxvt_mouse_report(aR_ ev); + MEvent.button = ev.button; + mouse_report (ev); #endif /* MOUSE_REPORT_DOUBLECLICK */ - } - else + + } + else + { + if (ev.button != MEvent.button) + MEvent.clicks = 0; + + if (!HOOK_INVOKE ((this, HOOK_BUTTON_PRESS, DT_XEVENT, &ev, DT_END))) + switch (ev.button) { - if (ev->button != R->MEvent.button) - R->MEvent.clicks = 0; - switch (ev->button) - { - case Button1: - if (R->MEvent.button == Button1 && clickintime) - R->MEvent.clicks++; - else - R->MEvent.clicks = 1; - rxvt_selection_click(aR_ R->MEvent.clicks, ev->x, ev->y); - R->MEvent.button = Button1; - break; + case Button1: + /* allow meta + click to select rectangular areas */ + /* should be done in screen.C */ +#if ENABLE_FRILLS + selection.rect = !!(ev.state & ModMetaMask); +#else + selection.rect = false; +#endif - case Button3: - if (R->MEvent.button == Button3 && clickintime) - rxvt_selection_rotate(aR_ ev->x, ev->y); - else - rxvt_selection_extend(aR_ ev->x, ev->y, 1); - R->MEvent.button = Button3; - break; - } - } - R->MEvent.time = ev->time; - return; - } - } + /* allow shift+left click to extend selection */ + if (ev.state & ShiftMask && ! (priv_modes & PrivMode_mouse_report)) + { + if (MEvent.button == Button1 && clickintime) + selection_rotate (ev.x, ev.y); + else + selection_extend (ev.x, ev.y, 1); + } + else + { + if (MEvent.button == Button1 && clickintime) + MEvent.clicks++; + else + MEvent.clicks = 1; -/* - * Scrollbar window processing of button press - */ - if (isScrollbarWindow(ev->window)) - { - scrollbar_setIdle(); - /* - * Rxvt-style scrollbar: - * move up if mouse is above slider - * move dn if mouse is below slider - * - * XTerm-style scrollbar: - * Move display proportional to pointer location - * pointer near top -> scroll one line - * pointer near bot -> scroll full page - */ + selection_click (MEvent.clicks, ev.x, ev.y); + } + + MEvent.button = Button1; + break; + + case Button3: + if (MEvent.button == Button3 && clickintime) + selection_rotate (ev.x, ev.y); + else + selection_extend (ev.x, ev.y, 1); + + MEvent.button = Button3; + break; + } + } + + MEvent.time = ev.time; + return; + } + + /* + * Scrollbar window processing of button press + */ + if (isScrollbarWindow (ev.window)) + { + scrollBar.setIdle (); + /* + * Rxvt-style scrollbar: + * move up if mouse is above slider + * move dn if mouse is below slider + * + * XTerm-style scrollbar: + * Move display proportional to pointer location + * pointer near top -> scroll one line + * pointer near bot -> scroll full page + */ #ifndef NO_SCROLLBAR_REPORT - if (reportmode) { - /* - * Mouse report disabled scrollbar: - * arrow buttons - send up/down - * click on scrollbar - send pageup/down - */ - if ((R->scrollBar.style == R_SB_NEXT - && scrollbarnext_upButton(ev->y)) - || (R->scrollBar.style == R_SB_RXVT - && scrollbarrxvt_upButton(ev->y))) - rxvt_tt_printf(aR_ "\033[A"); - else if ((R->scrollBar.style == R_SB_NEXT - && scrollbarnext_dnButton(ev->y)) - || (R->scrollBar.style == R_SB_RXVT - && scrollbarrxvt_dnButton(ev->y))) - rxvt_tt_printf(aR_ "\033[B"); - else - switch (ev->button) { - case Button2: - rxvt_tt_printf(aR_ "\014"); - break; - case Button1: - rxvt_tt_printf(aR_ "\033[6~"); - break; - case Button3: - rxvt_tt_printf(aR_ "\033[5~"); - break; - } - } - else + if (reportmode) + { + /* + * Mouse report disabled scrollbar: + * arrow buttons - send up/down + * click on scrollbar - send pageup/down + */ + if ((scrollBar.style == R_SB_NEXT + && scrollbarnext_upButton (ev.y)) + || (scrollBar.style == R_SB_RXVT + && scrollbarrxvt_upButton (ev.y))) + tt_printf ("\033[A"); + else if ((scrollBar.style == R_SB_NEXT + && scrollbarnext_dnButton (ev.y)) + || (scrollBar.style == R_SB_RXVT + && scrollbarrxvt_dnButton (ev.y))) + tt_printf ("\033[B"); + else + switch (ev.button) + { + case Button2: + tt_printf ("\014"); + break; + case Button1: + tt_printf ("\033[6~"); + break; + case Button3: + tt_printf ("\033[5~"); + break; + } + } + else #endif /* NO_SCROLLBAR_REPORT */ - { - char upordown = 0; - if (R->scrollBar.style == R_SB_NEXT) { - if (scrollbarnext_upButton(ev->y)) - upordown = -1; /* up */ - else if (scrollbarnext_dnButton(ev->y)) - upordown = 1; /* down */ - } else if (R->scrollBar.style == R_SB_RXVT) { - if (scrollbarrxvt_upButton(ev->y)) - upordown = -1; /* up */ - else if (scrollbarrxvt_dnButton(ev->y)) - upordown = 1; /* down */ - } - if (upordown) { + { + char upordown = 0; + + if (scrollBar.style == R_SB_NEXT) + { + if (scrollbarnext_upButton (ev.y)) + upordown = -1; /* up */ + else if (scrollbarnext_dnButton (ev.y)) + upordown = 1; /* down */ + } + else if (scrollBar.style == R_SB_RXVT) + { + if (scrollbarrxvt_upButton (ev.y)) + upordown = -1; /* up */ + else if (scrollbarrxvt_dnButton (ev.y)) + upordown = 1; /* down */ + } + if (upordown) + { #ifndef NO_SCROLLBAR_BUTTON_CONTINUAL_SCROLLING - R->scroll_arrow_delay = SCROLLBAR_INITIAL_DELAY; + cont_scroll_ev.start (NOW + SCROLLBAR_INITIAL_DELAY); #endif - if (rxvt_scr_page(aR_ upordown < 0 ? UP : DN, 1)) { - if (upordown < 0) - scrollbar_setUp(); - else - scrollbar_setDn(); - } - } else - switch (ev->button) { - case Button2: - switch (R->scrollbar_align) { - case R_SB_ALIGN_TOP: - R->csrO = 0; - break; - case R_SB_ALIGN_CENTRE: - R->csrO = (R->scrollBar.bot - R->scrollBar.top) / 2; - break; - case R_SB_ALIGN_BOTTOM: - R->csrO = R->scrollBar.bot - R->scrollBar.top; - break; - } - if (R->scrollBar.style == R_SB_XTERM - || scrollbar_above_slider(ev->y) - || scrollbar_below_slider(ev->y)) - rxvt_scr_move_to(aR_ - scrollbar_position(ev->y) - R->csrO, - scrollbar_size()); - scrollbar_setMotion(); - break; - - case Button1: - if (R->scrollbar_align == R_SB_ALIGN_CENTRE) - R->csrO = ev->y - R->scrollBar.top; - /* FALLTHROUGH */ - - case Button3: - if (R->scrollBar.style != R_SB_XTERM) { - if (scrollbar_above_slider(ev->y)) + if (scr_page (upordown < 0 ? UP : DN, 1)) + { + if (upordown < 0) + scrollBar.setUp (); + else + scrollBar.setDn (); + } + } + else + switch (ev.button) + { + case Button2: + switch (scrollbar_align) + { + case R_SB_ALIGN_TOP: + csrO = 0; + break; + case R_SB_ALIGN_CENTRE: + csrO = (scrollBar.bot - scrollBar.top) / 2; + break; + case R_SB_ALIGN_BOTTOM: + csrO = scrollBar.bot - scrollBar.top; + break; + } + + if (scrollBar.style == R_SB_XTERM + || scrollbar_above_slider (ev.y) + || scrollbar_below_slider (ev.y)) + scr_move_to (scrollbar_position (ev.y) - csrO, scrollbar_size ()); + + scrollBar.setMotion (); + break; + + case Button1: + if (scrollbar_align == R_SB_ALIGN_CENTRE) + csrO = ev.y - scrollBar.top; + /* FALLTHROUGH */ + + case Button3: + if (scrollBar.style != R_SB_XTERM) + { + if (scrollbar_above_slider (ev.y)) # ifdef RXVT_SCROLL_FULL - rxvt_scr_page(aR_ UP, R->TermWin.nrow - 1); + scr_page (UP, nrow - 1); # else - rxvt_scr_page(aR_ UP, R->TermWin.nrow / 4); + scr_page (UP, nrow / 4); # endif - else if (scrollbar_below_slider(ev->y)) + else if (scrollbar_below_slider (ev.y)) # ifdef RXVT_SCROLL_FULL - rxvt_scr_page(aR_ DN, R->TermWin.nrow - 1); + scr_page (DN, nrow - 1); # else - rxvt_scr_page(aR_ DN, R->TermWin.nrow / 4); + scr_page (DN, nrow / 4); # endif - else - scrollbar_setMotion(); - } else { - rxvt_scr_page(aR_ (ev->button == Button1 ? DN : UP), - (R->TermWin.nrow - * scrollbar_position(ev->y) - / scrollbar_size())); - } - break; - } - } - return; + else + scrollBar.setMotion (); + } + else + { + scr_page ((ev.button == Button1 ? DN : UP), + (nrow + * scrollbar_position (ev.y) + / scrollbar_size ())); + } + + break; + } + } + return; } #if MENUBAR - /* - * Menubar window processing of button press - */ - if (isMenuBarWindow(ev->window)) - rxvt_menubar_control(aR_ ev); + /* + * Menubar window processing of button press + */ + if (isMenuBarWindow (ev.window)) + menubar_control (ev); #endif } -/* INTPROTO */ void -rxvt_button_release(pR_ XButtonEvent *ev) +rxvt_term::button_release (XButtonEvent &ev) { - int reportmode = 0; + int reportmode = 0; - R->csrO = 0; /* reset csr Offset */ - if (!R->bypass_keystate) - reportmode = !!(R->PrivateModes & PrivMode_mouse_report); + csrO = 0; /* reset csr Offset */ + if (!bypass_keystate) + reportmode = !! (priv_modes & PrivMode_mouse_report); - if (scrollbar_isUpDn()) { - scrollbar_setIdle(); - rxvt_scrollbar_show(aR_ 0); + if (scrollbar_isUpDn ()) + { + scrollBar.setIdle (); + scrollbar_show (0); #ifndef NO_SCROLLBAR_BUTTON_CONTINUAL_SCROLLING - R->refresh_type &= ~SMOOTH_REFRESH; + refresh_type &= ~SMOOTH_REFRESH; #endif } + #ifdef SELECTION_SCROLLING - R->pending_scroll_selection=0; + if (sel_scroll_ev.active) + sel_scroll_ev.stop(); #endif - if (ev->window == R->TermWin.vt) - { -#ifdef RXVT_GRAPHICS - if (ev->subwindow != None) - rxvt_Gr_ButtonRelease(ev->x, ev->y); - else + + if (ev.window == vt) + { +#if ISO_14755 + // 5.4 + if (iso14755buf & (ISO_14755_STARTED | ISO_14755_54)) + return; #endif - { - if (reportmode) - { - /* mouse report from vt window */ - /* don't report release of wheel "buttons" */ - if (ev->button >= 4) - return; + if (reportmode) + { + /* mouse report from vt window */ + /* don't report release of wheel "buttons" */ + if (ev.button >= 4) + return; #ifdef MOUSE_REPORT_DOUBLECLICK - /* only report the release of 'slow' single clicks */ - if (R->MEvent.button != AnyButton - && (ev->button != R->MEvent.button - || (ev->time - R->MEvent.time - > MULTICLICK_TIME / 2))) - { - R->MEvent.clicks = 0; - R->MEvent.button = AnyButton; - rxvt_mouse_report(aR_ ev); - } + /* only report the release of 'slow' single clicks */ + if (MEvent.button != AnyButton + && (ev.button != MEvent.button + || (ev.time - MEvent.time + > MULTICLICK_TIME / 2))) + { + MEvent.clicks = 0; + MEvent.button = AnyButton; + mouse_report (ev); + } #else /* MOUSE_REPORT_DOUBLECLICK */ - R->MEvent.button = AnyButton; - rxvt_mouse_report(aR_ ev); + MEvent.button = AnyButton; + mouse_report (ev); #endif /* MOUSE_REPORT_DOUBLECLICK */ - return; - } - /* - * dumb hack to compensate for the failure of click-and-drag - * when overriding mouse reporting - */ - if (R->PrivateModes & PrivMode_mouse_report - && R->bypass_keystate - && ev->button == Button1 && R->MEvent.clicks <= 1) - rxvt_selection_extend(aR_ ev->x, ev->y, 0); - - switch (ev->button) { - case Button1: - case Button3: - rxvt_selection_make(aR_ ev->time); - break; - case Button2: - rxvt_selection_request(aR_ ev->time, ev->x, ev->y); - break; + return; + } + + /* + * dumb hack to compensate for the failure of click-and-drag + * when overriding mouse reporting + */ + if (priv_modes & PrivMode_mouse_report + && bypass_keystate + && ev.button == Button1 && MEvent.clicks <= 1) + selection_extend (ev.x, ev.y, 0); + + if (!HOOK_INVOKE ((this, HOOK_BUTTON_RELEASE, DT_XEVENT, &ev, DT_END))) + return; + + switch (ev.button) + { + case Button1: + case Button3: + selection_make (ev.time); + break; + case Button2: + selection_request (ev.time, ev.x, ev.y); + break; #ifdef MOUSE_WHEEL - case Button4: - case Button5: - { - int i, v; - - v = (ev->button == Button4) ? UP : DN; - if (ev->state & ShiftMask) - i = 1; - else if ((R->Options & Opt_mouseWheelScrollPage)) - i = R->TermWin.nrow - 1; - else - i = 5; + case Button4: + case Button5: + { + int i; + page_dirn v; + + v = ev.button == Button4 ? UP : DN; + + if (ev.state & ShiftMask) + i = 1; + else if (OPTION (Opt_mouseWheelScrollPage)) + i = nrow - 1; + else + i = 5; + # ifdef MOUSE_SLIP_WHEELING - if (ev->state & ControlMask) - { - R->mouse_slip_wheel_speed += (v ? -1 : 1); - R->mouse_slip_wheel_delay = SCROLLBAR_CONTINUOUS_DELAY; - } + if (ev.state & ControlMask) + { + mouse_slip_wheel_speed += v ? -1 : 1; + if (mouse_slip_wheel_speed < -nrow) mouse_slip_wheel_speed = -nrow; + if (mouse_slip_wheel_speed > +nrow) mouse_slip_wheel_speed = +nrow; + + if (slip_wheel_ev.at < NOW) + slip_wheel_ev.at = NOW + SCROLLBAR_CONTINUOUS_DELAY; + + slip_wheel_ev.start (); + } + else + { # endif # ifdef JUMP_MOUSE_WHEEL - rxvt_scr_page(aR_ v, i); - rxvt_scr_refresh(aR_ SMOOTH_REFRESH); - rxvt_scrollbar_show(aR_ 1); + scr_page (v, i); + scr_refresh (SMOOTH_REFRESH); + scrollbar_show (1); # else - for (; i--;) - { - rxvt_scr_page(aR_ v, 1); - rxvt_scr_refresh(aR_ SMOOTH_REFRESH); - rxvt_scrollbar_show(aR_ 1); - } + while (i--) + { + scr_page (v, 1); + scr_refresh (SMOOTH_REFRESH); + scrollbar_show (1); + } # endif - } - break; +# ifdef MOUSE_SLIP_WHEELING + } #endif - } - } - } + } + break; +#endif + } + } #ifdef MENUBAR - else if (isMenuBarWindow(ev->window)) - rxvt_menubar_control(aR_ ev); + else if (isMenuBarWindow (ev.window)) + menubar_control (ev); #endif } - #ifdef TRANSPARENT +#if TINTING +/* taken from aterm-0.4.2 */ + +typedef uint32_t RUINT32T; + +void ShadeXImage(rxvt_display *display, XImage* srcImage, int shade, int rm, int gm, int bm) +{ + int sh_r, sh_g, sh_b; + RUINT32T mask_r, mask_g, mask_b; + RUINT32T *lookup, *lookup_r, *lookup_g, *lookup_b; + unsigned int lower_lim_r, lower_lim_g, lower_lim_b; + unsigned int upper_lim_r, upper_lim_g, upper_lim_b; + int i; + + Visual *visual = display->visual; + + if( visual->c_class != TrueColor || srcImage->format != ZPixmap ) return ; + + /* for convenience */ + mask_r = visual->red_mask; + mask_g = visual->green_mask; + mask_b = visual->blue_mask; + + /* boring lookup table pre-initialization */ + switch (srcImage->bits_per_pixel) { + case 15: + if ((mask_r != 0x7c00) || + (mask_g != 0x03e0) || + (mask_b != 0x001f)) + return; + lookup = (RUINT32T *) malloc (sizeof (RUINT32T)*(32+32+32)); + lookup_r = lookup; + lookup_g = lookup+32; + lookup_b = lookup+32+32; + sh_r = 10; + sh_g = 5; + sh_b = 0; + break; + case 16: + if ((mask_r != 0xf800) || + (mask_g != 0x07e0) || + (mask_b != 0x001f)) + return; + lookup = (RUINT32T *) malloc (sizeof (RUINT32T)*(32+64+32)); + lookup_r = lookup; + lookup_g = lookup+32; + lookup_b = lookup+32+64; + sh_r = 11; + sh_g = 5; + sh_b = 0; + break; + case 24: + if ((mask_r != 0xff0000) || + (mask_g != 0x00ff00) || + (mask_b != 0x0000ff)) + return; + lookup = (RUINT32T *) malloc (sizeof (RUINT32T)*(256+256+256)); + lookup_r = lookup; + lookup_g = lookup+256; + lookup_b = lookup+256+256; + sh_r = 16; + sh_g = 8; + sh_b = 0; + break; + case 32: + if ((mask_r != 0xff0000) || + (mask_g != 0x00ff00) || + (mask_b != 0x0000ff)) + return; + lookup = (RUINT32T *) malloc (sizeof (RUINT32T)*(256+256+256)); + lookup_r = lookup; + lookup_g = lookup+256; + lookup_b = lookup+256+256; + sh_r = 16; + sh_g = 8; + sh_b = 0; + break; + default: + return; /* we do not support this color depth */ + } + + /* prepare limits for color transformation (each channel is handled separately) */ + if (shade < 0) { + shade = -shade; + if (shade < 0) shade = 0; + if (shade > 100) shade = 100; + + lower_lim_r = 65535-rm; + lower_lim_g = 65535-gm; + lower_lim_b = 65535-bm; + + lower_lim_r = 65535-(unsigned int)(((RUINT32T)lower_lim_r)*((RUINT32T)shade)/100); + lower_lim_g = 65535-(unsigned int)(((RUINT32T)lower_lim_g)*((RUINT32T)shade)/100); + lower_lim_b = 65535-(unsigned int)(((RUINT32T)lower_lim_b)*((RUINT32T)shade)/100); + + upper_lim_r = upper_lim_g = upper_lim_b = 65535; + } else { + if (shade < 0) shade = 0; + if (shade > 100) shade = 100; + + lower_lim_r = lower_lim_g = lower_lim_b = 0; + + upper_lim_r = (unsigned int)((((RUINT32T)rm)*((RUINT32T)shade))/100); + upper_lim_g = (unsigned int)((((RUINT32T)gm)*((RUINT32T)shade))/100); + upper_lim_b = (unsigned int)((((RUINT32T)bm)*((RUINT32T)shade))/100); + } + + /* switch red and blue bytes if necessary, we need it for some weird XServers like XFree86 3.3.3.1 */ + if ((srcImage->bits_per_pixel == 24) && (mask_r >= 0xFF0000 )) + { + unsigned int tmp; + + tmp = lower_lim_r; + lower_lim_r = lower_lim_b; + lower_lim_b = tmp; + + tmp = upper_lim_r; + upper_lim_r = upper_lim_b; + upper_lim_b = tmp; + } + + /* fill our lookup tables */ + for (i = 0; i <= mask_r>>sh_r; i++) + { + RUINT32T tmp; + tmp = ((RUINT32T)i)*((RUINT32T)(upper_lim_r-lower_lim_r)); + tmp += ((RUINT32T)(mask_r>>sh_r))*((RUINT32T)lower_lim_r); + lookup_r[i] = (tmp/65535)<>sh_g; i++) + { + RUINT32T tmp; + tmp = ((RUINT32T)i)*((RUINT32T)(upper_lim_g-lower_lim_g)); + tmp += ((RUINT32T)(mask_g>>sh_g))*((RUINT32T)lower_lim_g); + lookup_g[i] = (tmp/65535)<>sh_b; i++) + { + RUINT32T tmp; + tmp = ((RUINT32T)i)*((RUINT32T)(upper_lim_b-lower_lim_b)); + tmp += ((RUINT32T)(mask_b>>sh_b))*((RUINT32T)lower_lim_b); + lookup_b[i] = (tmp/65535)<bits_per_pixel) + { + case 15: + { + unsigned short *p1, *pf, *p, *pl; + p1 = (unsigned short *) srcImage->data; + pf = (unsigned short *) (srcImage->data + srcImage->height * srcImage->bytes_per_line); + while (p1 < pf) + { + p = p1; + pl = p1 + srcImage->width; + for (; p < pl; p++) + { + *p = lookup_r[(*p & 0x7c00)>>10] | + lookup_g[(*p & 0x03e0)>> 5] | + lookup_b[(*p & 0x001f)]; + } + p1 = (unsigned short *) ((char *) p1 + srcImage->bytes_per_line); + } + break; + } + case 16: + { + unsigned short *p1, *pf, *p, *pl; + p1 = (unsigned short *) srcImage->data; + pf = (unsigned short *) (srcImage->data + srcImage->height * srcImage->bytes_per_line); + while (p1 < pf) + { + p = p1; + pl = p1 + srcImage->width; + for (; p < pl; p++) + { + *p = lookup_r[(*p & 0xf800)>>11] | + lookup_g[(*p & 0x07e0)>> 5] | + lookup_b[(*p & 0x001f)]; + } + p1 = (unsigned short *) ((char *) p1 + srcImage->bytes_per_line); + } + break; + } + case 24: + { + unsigned char *p1, *pf, *p, *pl; + p1 = (unsigned char *) srcImage->data; + pf = (unsigned char *) (srcImage->data + srcImage->height * srcImage->bytes_per_line); + while (p1 < pf) + { + p = p1; + pl = p1 + srcImage->width * 3; + for (; p < pl; p += 3) + { + p[0] = lookup_r[(p[0] & 0xff0000)>>16]; + p[1] = lookup_r[(p[1] & 0x00ff00)>> 8]; + p[2] = lookup_r[(p[2] & 0x0000ff)]; + } + p1 = (unsigned char *) ((char *) p1 + srcImage->bytes_per_line); + } + break; + } + case 32: + { + RUINT32T *p1, *pf, *p, *pl; + p1 = (RUINT32T *) srcImage->data; + pf = (RUINT32T *) (srcImage->data + srcImage->height * srcImage->bytes_per_line); + + while (p1 < pf) + { + p = p1; + pl = p1 + srcImage->width; + for (; p < pl; p++) + { + *p = lookup_r[(*p & 0xff0000)>>16] | + lookup_g[(*p & 0x00ff00)>> 8] | + lookup_b[(*p & 0x0000ff)] | + (*p & ~0xffffff); + } + p1 = (RUINT32T *) ((char *) p1 + srcImage->bytes_per_line); + } + break; + } + } + + free (lookup); +} +#endif + /* * Check our parents are still who we think they are. * Do transparency updates if required */ -/* EXTPROTO */ int -rxvt_check_our_parents(pR) +rxvt_term::check_our_parents () { - int i, pchanged, aformat, have_pixmap, rootdepth; - unsigned long nitems, bytes_after; - Atom atype; - unsigned char *prop = NULL; - Window root, oldp, *list; - Pixmap rootpixmap = None; - XWindowAttributes wattr, wrootattr; - - pchanged = 0; - - if (!(R->Options & Opt_transparent)) - return pchanged; /* Don't try any more */ - - XGetWindowAttributes(R->Xdisplay, Xroot, &wrootattr); - rootdepth = wrootattr.depth; - - XGetWindowAttributes(R->Xdisplay, R->TermWin.parent[0], &wattr); - if (rootdepth != wattr.depth) { - if (R->am_transparent) { - pchanged = 1; - XSetWindowBackground(R->Xdisplay, R->TermWin.vt, - R->PixColors[Color_bg]); - R->am_transparent = R->am_pixmap_trans = 0; - } - return pchanged; /* Don't try any more */ + int i, pchanged, aformat, have_pixmap, rootdepth; + unsigned long nitems, bytes_after; + Atom atype; + unsigned char *prop = NULL; + Window root, oldp, *list; + Pixmap rootpixmap = None; + XWindowAttributes wattr, wrootattr; + dDisp; + + pchanged = 0; + + if (!OPTION (Opt_transparent)) + return pchanged; /* Don't try any more */ + + XGetWindowAttributes (disp, display->root, &wrootattr); + rootdepth = wrootattr.depth; + + XGetWindowAttributes (disp, parent[0], &wattr); + + if (rootdepth != wattr.depth) + { + if (am_transparent) + { + pchanged = 1; + XSetWindowBackground (disp, vt, pix_colors_focused[Color_bg]); + am_transparent = am_pixmap_trans = 0; + } + + return pchanged; /* Don't try any more */ } -/* Get all X ops out of the queue so that our information is up-to-date. */ - XSync(R->Xdisplay, False); + /* Get all X ops out of the queue so that our information is up-to-date. */ + XSync (disp, False); -/* - * Make the frame window set by the window manager have - * the root background. Some window managers put multiple nested frame - * windows for each client, so we have to take care about that. - */ - i = (R->xa[XA_XROOTPMAPID] != 0 - && (XGetWindowProperty(R->Xdisplay, Xroot, R->xa[XA_XROOTPMAPID], - 0L, 1L, False, XA_PIXMAP, &atype, &aformat, - &nitems, &bytes_after, &prop) == Success)); - if (!i || prop == NULL) - have_pixmap = 0; - else { - have_pixmap = 1; - rootpixmap = *((Pixmap *)prop); - XFree(prop); + /* + * Make the frame window set by the window manager have + * the root background. Some window managers put multiple nested frame + * windows for each client, so we have to take care about that. + */ + i = (xa[XA_XROOTPMAP_ID] + && XGetWindowProperty (disp, display->root, xa[XA_XROOTPMAP_ID], + 0L, 1L, False, XA_PIXMAP, &atype, &aformat, + &nitems, &bytes_after, &prop) == Success); + + if (!i || prop == NULL) + i = (xa[XA_ESETROOT_PMAP_ID] + && XGetWindowProperty (disp, display->root, xa[XA_ESETROOT_PMAP_ID], + 0L, 1L, False, XA_PIXMAP, &atype, &aformat, + &nitems, &bytes_after, &prop) == Success); + + if (!i || prop == NULL +#if TINTING + || !rs[Rs_color + Color_tint] +#endif + ) + have_pixmap = 0; + else + { + have_pixmap = 1; + rootpixmap = *(Pixmap *)prop; + XFree (prop); } - if (have_pixmap) { -/* - * Copy Xroot pixmap transparency - */ - int sx, sy, nx, ny; - unsigned int nw, nh; - Window cr; - XImage *image; - GC gc; - XGCValues gcvalue; - - XTranslateCoordinates(R->Xdisplay, R->TermWin.parent[0], Xroot, - 0, 0, &sx, &sy, &cr); - nw = (unsigned int)R->szHint.width; - nh = (unsigned int)R->szHint.height; - nx = ny = 0; - if (sx < 0) { - nw += sx; - nx = -sx; - sx = 0; - } - if (sy < 0) { - nh += sy; - ny = -sy; - sy = 0; - } - MIN_IT(nw, (unsigned int)(wrootattr.width - sx)); - MIN_IT(nh, (unsigned int)(wrootattr.height - sy)); - R->allowedxerror = -1; - image = XGetImage(R->Xdisplay, rootpixmap, sx, sy, nw, nh, AllPlanes, - ZPixmap); - /* XXX: handle BadMatch - usually because we're outside the pixmap */ - /* XXX: may need a delay here? */ - R->allowedxerror = 0; - if (image == NULL) { - if (R->am_transparent && R->am_pixmap_trans) { - pchanged = 1; - if (R->TermWin.pixmap != None) { - XFreePixmap(R->Xdisplay, R->TermWin.pixmap); - R->TermWin.pixmap = None; - } - } - R->am_pixmap_trans = 0; - } else { - if (R->TermWin.pixmap != None) - XFreePixmap(R->Xdisplay, R->TermWin.pixmap); - R->TermWin.pixmap = XCreatePixmap(R->Xdisplay, R->TermWin.vt, - (unsigned int)R->szHint.width, - (unsigned int)R->szHint.height, - (unsigned int)image->depth); - gc = XCreateGC(R->Xdisplay, R->TermWin.vt, 0UL, &gcvalue); - XPutImage(R->Xdisplay, R->TermWin.pixmap, gc, image, 0, 0, - nx, ny, (unsigned int)image->width, - (unsigned int)image->height); - XFreeGC(R->Xdisplay, gc); - XDestroyImage(image); - XSetWindowBackgroundPixmap(R->Xdisplay, R->TermWin.vt, - R->TermWin.pixmap); - if (!R->am_transparent || !R->am_pixmap_trans) - pchanged = 1; - R->am_transparent = R->am_pixmap_trans = 1; - } + + if (have_pixmap) + { + /* + * Copy display->root pixmap transparency + */ + int sx, sy, nx, ny; + unsigned int nw, nh; + Window cr; + XImage *image; + GC gc; + XGCValues gcvalue; + + XTranslateCoordinates (disp, parent[0], display->root, + 0, 0, &sx, &sy, &cr); + nw = (unsigned int)szHint.width; + nh = (unsigned int)szHint.height; + nx = ny = 0; + + if (sx < 0) + { + nw += sx; + nx = -sx; + sx = 0; + } + + if (sy < 0) + { + nh += sy; + ny = -sy; + sy = 0; + } + + min_it (nw, (unsigned int) (wrootattr.width - sx)); + min_it (nh, (unsigned int) (wrootattr.height - sy)); + + XSync (disp, False); + allowedxerror = -1; + image = XGetImage (disp, rootpixmap, sx, sy, nw, nh, AllPlanes, ZPixmap); + + /* XXX: handle BadMatch - usually because we're outside the pixmap */ + /* XXX: may need a delay here? */ + allowedxerror = 0; + + if (image == NULL) + { + if (am_transparent && am_pixmap_trans) + { + pchanged = 1; + if (pixmap != None) + { + XFreePixmap (disp, pixmap); + pixmap = None; + } + } + + am_pixmap_trans = 0; + } + else + { + if (pixmap != None) + XFreePixmap (disp, pixmap); + +#if TINTING + if (ISSET_PIXCOLOR (Color_tint)) + { + unsigned short rm, gm, bm; + int shade = rs[Rs_shade] ? atoi (rs[Rs_shade]) : 100; + + pix_colors_focused[Color_tint].get (display, rm, gm, bm); + + ShadeXImage (display, image, shade, rm, gm, bm); + } +#endif + + pixmap = XCreatePixmap (disp, vt, + szHint.width, szHint.height, image->depth); + gc = XCreateGC (disp, vt, 0UL, &gcvalue); + XPutImage (disp, pixmap, gc, image, 0, 0, + nx, ny, image->width, image->height); + XFreeGC (disp, gc); + XDestroyImage (image); + XSetWindowBackgroundPixmap (disp, parent[0], pixmap); + XClearWindow (disp, parent[0]); + + if (!am_transparent || !am_pixmap_trans) + pchanged = 1; + + am_transparent = am_pixmap_trans = 1; + } } - if (!R->am_pixmap_trans) { - unsigned int n; -/* - * InheritPixmap transparency - */ - D_X((stderr, "InheritPixmap Seeking to %08lx", Xroot)); - for (i = 1; i < (int)(sizeof(R->TermWin.parent) / sizeof(Window)); - i++) { - oldp = R->TermWin.parent[i]; - XQueryTree(R->Xdisplay, R->TermWin.parent[i - 1], &root, - &R->TermWin.parent[i], &list, &n); - XFree(list); - D_X((stderr, "InheritPixmap Parent[%d] = %08lx", i, R->TermWin.parent[i])); - if (R->TermWin.parent[i] == Xroot) { - if (oldp != None) - pchanged = 1; - break; - } - if (oldp != R->TermWin.parent[i]) - pchanged = 1; - } - n = 0; - if (pchanged) { - for (; n < (unsigned int)i; n++) { - XGetWindowAttributes(R->Xdisplay, R->TermWin.parent[n], &wattr); - D_X((stderr, "InheritPixmap Checking Parent[%d]: %s", n, (wattr.depth == rootdepth && wattr.class != InputOnly) ? "OK" : "FAIL")); - if (wattr.depth != rootdepth || wattr.class == InputOnly) { - n = (int)(sizeof(R->TermWin.parent) / sizeof(Window)) + 1; - break; - } - } - } - if (n > (int)(sizeof(R->TermWin.parent) - / sizeof(R->TermWin.parent[0]))) { - D_X((stderr, "InheritPixmap Turning off")); - XSetWindowBackground(R->Xdisplay, R->TermWin.parent[0], - R->PixColors[Color_fg]); - XSetWindowBackground(R->Xdisplay, R->TermWin.vt, - R->PixColors[Color_bg]); - R->am_transparent = 0; - /* XXX: also turn off Opt_transparent? */ - } else { - /* wait (an arbitrary period) for the WM to do its thing - * needed for fvwm2.2.2 (and before?) */ -# ifdef HAVE_NANOSLEEP - struct timespec rqt; - - rqt.tv_sec = 1; - rqt.tv_nsec = 0; - nanosleep(&rqt, NULL); -# else - sleep(1); -# endif - D_X((stderr, "InheritPixmap Turning on (%d parents)", i - 1)); - for (n = 0; n < (unsigned int)i; n++) - XSetWindowBackgroundPixmap(R->Xdisplay, R->TermWin.parent[n], - ParentRelative); - XSetWindowBackgroundPixmap(R->Xdisplay, R->TermWin.vt, - ParentRelative); - R->am_transparent = 1; - } - for (; i < (int)(sizeof(R->TermWin.parent) / sizeof(Window)); i++) - R->TermWin.parent[i] = None; + + if (am_pixmap_trans) + XSetWindowBackgroundPixmap (disp, vt, ParentRelative); + else + { + unsigned int n; + /* + * InheritPixmap transparency + */ + for (i = 1; i < (int) (sizeof (parent) / sizeof (Window)); i++) + { + oldp = parent[i]; + XQueryTree (disp, parent[i - 1], &root, + &parent[i], &list, &n); + XFree (list); + + if (parent[i] == display->root) + { + if (oldp != None) + pchanged = 1; + + break; + } + + if (oldp != parent[i]) + pchanged = 1; + } + + n = 0; + + if (pchanged) + { + for (; n < (unsigned int)i; n++) + { + XGetWindowAttributes (disp, parent[n], &wattr); + if (wattr.depth != rootdepth || wattr.c_class == InputOnly) + { + n = (int) (sizeof (parent) / sizeof (Window)) + 1; + break; + } + } + } + + if (n > (int) (sizeof (parent) / sizeof (parent[0]))) + { + XSetWindowBackground (disp, parent[0], pix_colors_focused[Color_border]); + XSetWindowBackground (disp, vt, pix_colors_focused[Color_bg]); + am_transparent = 0; + /* XXX: also turn off Opt_transparent? */ + } + else + { +#if WAIT_FOR_WM + /* wait (an arbitrary period) for the WM to do its thing + * needed for fvwm2.2.2 (and before?) */ + sleep (1); +#endif + for (n = 0; n < (unsigned int)i; n++) + { + XSetWindowBackgroundPixmap (disp, parent[n], ParentRelative); + XClearWindow (disp, parent[n]); + } + + XSetWindowBackgroundPixmap (disp, vt, ParentRelative); + am_transparent = 1; + } + + for (; i < (int) (sizeof (parent) / sizeof (Window)); i++) + parent[i] = None; } - return pchanged; + + if (scrollBar.win) + { + XSetWindowBackgroundPixmap (disp, scrollBar.win, ParentRelative); + scrollBar.setIdle (); + scrollbar_show (0); + } + + if (am_transparent) + { + want_refresh = want_full_refresh = 1; + if (am_pixmap_trans) + flush (); + } + + return pchanged; } #endif /*}}} */ +bool +rxvt_term::cmd_parse () +{ + bool flag = false; + unicode_t ch = NOCHAR; + char *seq_begin; // remember start of esc-sequence here + + for (;;) + { + if (ch == NOCHAR) + { + seq_begin = cmdbuf_ptr; + ch = next_char (); + + if (ch == NOCHAR) + break; + } + + if (!IS_CONTROL (ch) || ch == C0_LF || ch == C0_CR || ch == C0_HT) + { + if (!seen_input) + { + seen_input = 1; + // many badly-written programs (e.g. jed) contain a race condition: + // they first read the screensize and then install a SIGWINCH handler. + // some window managers resize the window early, and these programs + // then sometimes get the size wrong. + // unfortunately other programs are even more buggy and dislike + // being sent SIGWINCH, so only do it when we were in fact being + // resized. + if (seen_resize && cmd_pid) + kill (-cmd_pid, SIGWINCH); + } + + /* Read a text string from the input buffer */ + unicode_t buf[UBUFSIZ]; + bool refreshnow = false; + int nlines = 0; + unicode_t *str = buf; + unicode_t *eol = str + min (ncol, UBUFSIZ); + + for (;;) + { + if (ch == NOCHAR || (IS_CONTROL (ch) && ch != C0_LF && ch != C0_CR && ch != C0_HT)) + break; + + *str++ = ch; + + if (ch == C0_LF || str >= eol) + { + if (ch == C0_LF) + nlines++; + + refresh_count++; + + if (!OPTION (Opt_jumpScroll) + || (refresh_count >= refresh_limit * (nrow - 1))) + { + refreshnow = true; + refresh_count = 0; + ch = NOCHAR; + break; + } + + // scr_add_lines only works for nlines <= nrow - 1. + if (nlines >= nrow - 1) + { + if (!HOOK_INVOKE ((this, HOOK_ADD_LINES, DT_USTRING_LEN, buf, str - buf, DT_END))) + scr_add_lines (buf, nlines, str - buf); + + nlines = 0; + str = buf; + eol = str + min (ncol, UBUFSIZ); + } + + if (str >= eol) + { + if (eol >= buf + UBUFSIZ) + { + ch = NOCHAR; + break; + } + else + eol = min (eol + ncol, buf + UBUFSIZ); + } + + } + + seq_begin = cmdbuf_ptr; + ch = next_char (); + } + + if (!HOOK_INVOKE ((this, HOOK_ADD_LINES, DT_USTRING_LEN, buf, str - buf, DT_END))) + scr_add_lines (buf, nlines, str - buf); + + /* + * If there have been a lot of new lines, then update the screen + * What the heck I'll cheat and only refresh less than every page-full. + * the number of pages between refreshes is refresh_limit, which + * is incremented here because we must be doing flat-out scrolling. + */ + if (refreshnow) + { + if (OPTION (Opt_jumpScroll) && refresh_limit < REFRESH_PERIOD) + refresh_limit++; + else + { + flag = true; + scr_refresh (refresh_type); + flush_ev.stop (); + } + } + + } + else + { + try + { + process_nonprinting (ch); + } + catch (const class out_of_input &o) + { + // we ran out of input, retry later + cmdbuf_ptr = seq_begin; + break; + } + + ch = NOCHAR; + } + } + + return flag; +} + +// read the next octet +unicode_t +rxvt_term::next_octet () +{ + return cmdbuf_ptr < cmdbuf_endp + ? *cmdbuf_ptr++ + : NOCHAR; +} + +// read the next character +unicode_t +rxvt_term::next_char () +{ + while (cmdbuf_ptr < cmdbuf_endp) + { + // assume 7-bit to be ascii ALWAYS + if ((unsigned char)*cmdbuf_ptr <= 0x7f && *cmdbuf_ptr != 0x1b) + return *cmdbuf_ptr++; + + wchar_t wc; + size_t len = mbrtowc (&wc, cmdbuf_ptr, cmdbuf_endp - cmdbuf_ptr, mbstate); + + if (len == (size_t)-2) + { + // the mbstate stores incomplete sequences. didn't know this :/ + cmdbuf_ptr = cmdbuf_endp; + break; + } + + if (len == (size_t)-1) + return *cmdbuf_ptr++; // the _occasional_ latin1 character is allowed to slip through + + // assume wchar == unicode + cmdbuf_ptr += len; + return wc & UNICODE_MASK; + } + + return NOCHAR; +} + +/* rxvt_cmd_getc () - Return next input character */ +/* + * Return the next input character after first passing any keyboard input + * to the command. + */ +unicode_t +rxvt_term::cmd_getc () +{ + unicode_t c = next_char (); + + if (c == NOCHAR) + throw out_of_input; + + return c; +} + +unicode_t +rxvt_term::cmd_get8 () +{ + unicode_t c = next_octet (); + + if (c == NOCHAR) + throw out_of_input; + + return c; +} + /*{{{ print pipe */ /*----------------------------------------------------------------------*/ #ifdef PRINTPIPE -/* EXTPROTO */ -FILE * -rxvt_popen_printer(pR) +FILE * +rxvt_term::popen_printer () { - FILE *stream = popen(R->rs[Rs_print_pipe], "w"); + FILE *stream = popen (rs[Rs_print_pipe], "w"); - if (stream == NULL) - rxvt_print_error("can't open printer pipe"); - return stream; + if (stream == NULL) + rxvt_warn ("can't open printer pipe, not printing.\n"); + + return stream; } -/* EXTPROTO */ int -rxvt_pclose_printer(FILE *stream) +rxvt_term::pclose_printer (FILE *stream) { - fflush(stream); -/* pclose() reported not to work on SunOS 4.1.3 */ -# if defined (__sun__) /* TODO: RESOLVE THIS */ -/* pclose works provided SIGCHLD handler uses waitpid */ - return pclose(stream); /* return fclose (stream); */ -# else - return pclose(stream); -# endif + fflush (stream); + return pclose (stream); } /* * simulate attached vt100 printer */ -/* INTPROTO */ void -rxvt_process_print_pipe(pR) +rxvt_term::process_print_pipe () { - int done; - FILE *fd; + int done; + FILE *fd; - if ((fd = rxvt_popen_printer(aR)) == NULL) - return; + if ((fd = popen_printer ()) == NULL) + return; -/* - * Send all input to the printer until either ESC[4i or ESC[?4i - * is received. - */ - for (done = 0; !done;) { - unsigned char buf[8]; - unsigned char ch; - unsigned int i, len; - - if ((ch = rxvt_cmd_getc(aR)) != C0_ESC) { - if (putc(ch, fd) == EOF) - break; /* done = 1 */ - } else { - len = 0; - buf[len++] = ch; - - if ((buf[len++] = rxvt_cmd_getc(aR)) == '[') { - if ((ch = rxvt_cmd_getc(aR)) == '?') { - buf[len++] = '?'; - ch = rxvt_cmd_getc(aR); - } - if ((buf[len++] = ch) == '4') { - if ((buf[len++] = rxvt_cmd_getc(aR)) == 'i') - break; /* done = 1 */ - } - } - for (i = 0; i < len; i++) - if (putc(buf[i], fd) == EOF) { - done = 1; - break; - } - } + /* + * Send all input to the printer until either ESC[4i or ESC[?4i + * is received. + */ + for (done = 0; !done;) + { + unsigned char buf[8]; + unicode_t ch; + unsigned int i, len; + + if ((ch = cmd_getc ()) != C0_ESC) + { + if (putc (ch, fd) == EOF) + break; /* done = 1 */ + } + else + { + len = 0; + buf[len++] = ch; + + if ((buf[len++] = cmd_getc ()) == '[') + { + if ((ch = cmd_getc ()) == '?') + { + buf[len++] = '?'; + ch = cmd_getc (); + } + if ((buf[len++] = ch) == '4') + { + if ((buf[len++] = cmd_getc ()) == 'i') + break; /* done = 1 */ + } + } + + for (i = 0; i < len; i++) + if (putc (buf[i], fd) == EOF) + { + done = 1; + break; + } + } } - rxvt_pclose_printer(fd); + + pclose_printer (fd); } #endif /* PRINTPIPE */ /*}}} */ /* *INDENT-OFF* */ enum { - C1_40 = 0x40, - C1_41 , C1_BPH, C1_NBH, C1_44 , C1_NEL, C1_SSA, C1_ESA, - C1_HTS, C1_HTJ, C1_VTS, C1_PLD, C1_PLU, C1_RI , C1_SS2, C1_SS3, - C1_DCS, C1_PU1, C1_PU2, C1_STS, C1_CCH, C1_MW , C1_SPA, C1_EPA, - C1_SOS, C1_59 , C1_SCI, C1_CSI, CS_ST , C1_OSC, C1_PM , C1_APC + C1_40 = 0x40, + C1_41 , C1_BPH, C1_NBH, C1_44 , C1_NEL, C1_SSA, C1_ESA, + C1_HTS, C1_HTJ, C1_VTS, C1_PLD, C1_PLU, C1_RI , C1_SS2, C1_SS3, + C1_DCS, C1_PU1, C1_PU2, C1_STS, C1_CCH, C1_MW , C1_SPA, C1_EPA, + C1_SOS, C1_59 , C1_SCI, C1_CSI, CS_ST , C1_OSC, C1_PM , C1_APC, }; /* *INDENT-ON* */ /*{{{ process non-printing single characters */ -/* INTPROTO */ void -rxvt_process_nonprinting(pR_ unsigned char ch) +rxvt_term::process_nonprinting (unicode_t ch) { - switch (ch) { - case C0_ENQ: /* terminal Status */ - if (R->rs[Rs_answerbackstring]) - rxvt_tt_write(aR_ - (const unsigned char *)R->rs[Rs_answerbackstring], - (unsigned int)STRLEN(R->rs[Rs_answerbackstring])); - else - rxvt_tt_write(aR_ (unsigned char *)VT100_ANS, - (unsigned int)STRLEN(VT100_ANS)); - break; - case C0_BEL: /* bell */ - rxvt_scr_bell(aR); - break; - case C0_BS: /* backspace */ - rxvt_scr_backspace(aR); - break; - case C0_HT: /* tab */ - rxvt_scr_tab(aR_ 1); - break; - case C0_CR: /* carriage return */ - rxvt_scr_gotorc(aR_ 0, 0, R_RELATIVE); - break; - case C0_VT: /* vertical tab, form feed */ - case C0_FF: - case C0_LF: /* line feed */ - rxvt_scr_index(aR_ UP); - break; - case C0_SO: /* shift out - acs */ - rxvt_scr_charset_choose(aR_ 1); - break; - case C0_SI: /* shift in - acs */ - rxvt_scr_charset_choose(aR_ 0); - break; + switch (ch) + { + case C0_ESC: + process_escape_seq (); + break; + case C0_ENQ: /* terminal Status */ + if (rs[Rs_answerbackstring]) + tt_write (rs [Rs_answerbackstring], strlen (rs [Rs_answerbackstring])); + else + tt_write (VT100_ANS, strlen (VT100_ANS)); + break; + case C0_BEL: /* bell */ + scr_bell (); + break; + case C0_BS: /* backspace */ + scr_backspace (); + break; + case C0_HT: /* tab */ + scr_tab (1); + break; + case C0_CR: /* carriage return */ + scr_gotorc (0, 0, R_RELATIVE); + break; + case C0_VT: /* vertical tab, form feed */ + case C0_FF: + case C0_LF: /* line feed */ + scr_index (UP); + break; + case C0_SO: /* shift out - acs */ + scr_charset_choose (1); + break; + case C0_SI: /* shift in - acs */ + scr_charset_choose (0); + break; + +#ifdef EIGHT_BIT_CONTROLS + // 8-bit controls + case 0x90: /* DCS */ + process_dcs_seq (); + break; + case 0x9b: /* CSI */ + process_csi_seq (); + break; + case 0x9d: /* CSI */ + process_osc_seq (); + break; +#endif } } /*}}} */ /*{{{ process VT52 escape sequences */ -/* INTPROTO */ void -rxvt_process_escape_vt52(pR_ unsigned char ch) +rxvt_term::process_escape_vt52 (unicode_t ch) { - int row, col; - - switch (ch) { - case 'A': /* cursor up */ - rxvt_scr_gotorc(aR_ -1, 0, R_RELATIVE | C_RELATIVE); - break; - case 'B': /* cursor down */ - rxvt_scr_gotorc(aR_ 1, 0, R_RELATIVE | C_RELATIVE); - break; - case 'C': /* cursor right */ - rxvt_scr_gotorc(aR_ 0, 1, R_RELATIVE | C_RELATIVE); - break; - case 'D': /* cursor left */ - rxvt_scr_gotorc(aR_ 0, -1, R_RELATIVE | C_RELATIVE); - break; - case 'H': /* cursor home */ - rxvt_scr_gotorc(aR_ 0, 0, 0); - break; - case 'I': /* cursor up and scroll down if needed */ - rxvt_scr_index(aR_ DN); - break; - case 'J': /* erase to end of screen */ - rxvt_scr_erase_screen(aR_ 0); - break; - case 'K': /* erase to end of line */ - rxvt_scr_erase_line(aR_ 0); - break; - case 'Y': /* move to specified row and col */ - /* full command is 'ESC Y row col' where row and col - * are encoded by adding 32 and sending the ascii - * character. eg. SPACE = 0, '+' = 13, '0' = 18, - * etc. */ - row = rxvt_cmd_getc(aR) - ' '; - col = rxvt_cmd_getc(aR) - ' '; - rxvt_scr_gotorc(aR_ row, col, 0); - break; - case 'Z': /* identify the terminal type */ - rxvt_tt_printf(aR_ "\033/Z"); /* I am a VT100 emulating a VT52 */ - break; - case '<': /* turn off VT52 mode */ - PrivMode(0, PrivMode_vt52); - break; - case 'F': /* use special graphics character set */ - case 'G': /* use regular character set */ - /* unimplemented */ - break; - case '=': /* use alternate keypad mode */ - case '>': /* use regular keypad mode */ - /* unimplemented */ - break; + int row, col; + + switch (ch) + { + case 'A': /* cursor up */ + scr_gotorc (-1, 0, R_RELATIVE | C_RELATIVE); + break; + case 'B': /* cursor down */ + scr_gotorc (1, 0, R_RELATIVE | C_RELATIVE); + break; + case 'C': /* cursor right */ + scr_gotorc (0, 1, R_RELATIVE | C_RELATIVE); + break; + case 'D': /* cursor left */ + scr_gotorc (0, -1, R_RELATIVE | C_RELATIVE); + break; + case 'H': /* cursor home */ + scr_gotorc (0, 0, 0); + break; + case 'I': /* cursor up and scroll down if needed */ + scr_index (DN); + break; + case 'J': /* erase to end of screen */ + scr_erase_screen (0); + break; + case 'K': /* erase to end of line */ + scr_erase_line (0); + break; + case 'Y': /* move to specified row and col */ + /* full command is 'ESC Y row col' where row and col + * are encoded by adding 32 and sending the ascii + * character. eg. SPACE = 0, '+' = 13, '0' = 18, + * etc. */ + row = cmd_getc () - ' '; + col = cmd_getc () - ' '; + scr_gotorc (row, col, 0); + break; + case 'Z': /* identify the terminal type */ + tt_printf ("\033/Z"); /* I am a VT100 emulating a VT52 */ + break; + case '<': /* turn off VT52 mode */ + PrivMode (0, PrivMode_vt52); + break; + case 'F': /* use special graphics character set */ + case 'G': /* use regular character set */ + /* unimplemented */ + break; + case '=': /* use alternate keypad mode */ + case '>': /* use regular keypad mode */ + /* unimplemented */ + break; } } /*}}} */ /*{{{ process escape sequences */ -/* INTPROTO */ void -rxvt_process_escape_seq(pR) +rxvt_term::process_escape_seq () { - unsigned char ch = rxvt_cmd_getc(aR); + unicode_t ch = cmd_getc (); - if (R->PrivateModes & PrivMode_vt52) { - rxvt_process_escape_vt52(aR_ ch); - return; - } - - switch (ch) { - /* case 1: do_tek_mode (); break; */ - case '#': - if (rxvt_cmd_getc(aR) == '8') - rxvt_scr_E(aR); - break; - case '(': - rxvt_scr_charset_set(aR_ 0, (unsigned int)rxvt_cmd_getc(aR)); - break; - case ')': - rxvt_scr_charset_set(aR_ 1, (unsigned int)rxvt_cmd_getc(aR)); - break; - case '*': - rxvt_scr_charset_set(aR_ 2, (unsigned int)rxvt_cmd_getc(aR)); - break; - case '+': - rxvt_scr_charset_set(aR_ 3, (unsigned int)rxvt_cmd_getc(aR)); - break; -#ifdef MULTICHAR_SET - case '$': - rxvt_scr_charset_set(aR_ -2, (unsigned int)rxvt_cmd_getc(aR)); - break; -#endif -#ifndef NO_FRILLS - case '6': - rxvt_scr_backindex(aR); - break; -#endif - case '7': - rxvt_scr_cursor(aR_ SAVE); - break; - case '8': - rxvt_scr_cursor(aR_ RESTORE); - break; -#ifndef NO_FRILLS - case '9': - rxvt_scr_forwardindex(aR); - break; -#endif - case '=': - case '>': - PrivMode((ch == '='), PrivMode_aplKP); - break; - - case C1_40: - rxvt_cmd_getc(aR); - break; - case C1_44: - rxvt_scr_index(aR_ UP); - break; - - /* 8.3.87: NEXT LINE */ - case C1_NEL: /* ESC E */ - { - uint32_t nlcr[] = { '\n', '\r' }; - rxvt_scr_add_lines(aR_ nlcr, 1, 2); - } - break; - - /* kidnapped escape sequence: Should be 8.3.48 */ - case C1_ESA: /* ESC G */ - rxvt_process_graphics(aR); - break; - - /* 8.3.63: CHARACTER TABULATION SET */ - case C1_HTS: /* ESC H */ - rxvt_scr_set_tab(aR_ 1); - break; - - /* 8.3.105: REVERSE LINE FEED */ - case C1_RI: /* ESC M */ - rxvt_scr_index(aR_ DN); - break; - - /* 8.3.142: SINGLE-SHIFT TWO */ - /*case C1_SS2: scr_single_shift (2); break; */ - - /* 8.3.143: SINGLE-SHIFT THREE */ - /*case C1_SS3: scr_single_shift (3); break; */ - - /* 8.3.27: DEVICE CONTROL STRING */ - case C1_DCS: /* ESC P */ - rxvt_process_dcs_seq(aR); - break; - - /* 8.3.110: SINGLE CHARACTER INTRODUCER */ - case C1_SCI: /* ESC Z */ - rxvt_tt_write(aR_ (const unsigned char *)ESCZ_ANSWER, - (unsigned int)(sizeof(ESCZ_ANSWER) - 1)); - break; /* steal obsolete ESC [ c */ - - /* 8.3.16: CONTROL SEQUENCE INTRODUCER */ - case C1_CSI: /* ESC [ */ - rxvt_process_csi_seq(aR); - break; - - /* 8.3.90: OPERATING SYSTEM COMMAND */ - case C1_OSC: /* ESC ] */ - rxvt_process_osc_seq(aR); - break; - - /* 8.3.106: RESET TO INITIAL STATE */ - case 'c': - rxvt_scr_poweron(aR); - rxvt_scrollbar_show(aR_ 1); - break; - - /* 8.3.79: LOCKING-SHIFT TWO (see ISO2022) */ - case 'n': - rxvt_scr_charset_choose(aR_ 2); - break; - - /* 8.3.81: LOCKING-SHIFT THREE (see ISO2022) */ - case 'o': - rxvt_scr_charset_choose(aR_ 3); - break; + if (priv_modes & PrivMode_vt52) + { + process_escape_vt52 (ch); + return; + } + + switch (ch) + { + /* case 1: do_tek_mode (); break; */ + case '#': + if (cmd_getc () == '8') + scr_E (); + break; + case '(': + scr_charset_set (0, (unsigned int)cmd_getc ()); + break; + case ')': + scr_charset_set (1, (unsigned int)cmd_getc ()); + break; + case '*': + scr_charset_set (2, (unsigned int)cmd_getc ()); + break; + case '+': + scr_charset_set (3, (unsigned int)cmd_getc ()); + break; +#if ENABLE_FRILLS + case '6': + scr_backindex (); + break; +#endif + case '7': + scr_cursor (SAVE); + break; + case '8': + scr_cursor (RESTORE); + break; +#if ENABLE_FRILLS + case '9': + scr_forwardindex (); + break; +#endif + case '=': + case '>': + PrivMode ((ch == '='), PrivMode_aplKP); + break; + + case C1_40: + cmd_getc (); + break; + case C1_44: + scr_index (UP); + break; + + /* 8.3.87: NEXT LINE */ + case C1_NEL: /* ESC E */ + { + unicode_t nlcr[] = { C0_LF, C0_CR }; + scr_add_lines (nlcr, 1, 2); + } + break; + + /* kidnapped escape sequence: Should be 8.3.48 */ + case C1_ESA: /* ESC G */ + process_graphics (); + break; + + /* 8.3.63: CHARACTER TABULATION SET */ + case C1_HTS: /* ESC H */ + scr_set_tab (1); + break; + + /* 8.3.105: REVERSE LINE FEED */ + case C1_RI: /* ESC M */ + scr_index (DN); + break; + + /* 8.3.142: SINGLE-SHIFT TWO */ + /*case C1_SS2: scr_single_shift (2); break; */ + + /* 8.3.143: SINGLE-SHIFT THREE */ + /*case C1_SS3: scr_single_shift (3); break; */ + + /* 8.3.27: DEVICE CONTROL STRING */ + case C1_DCS: /* ESC P */ + process_dcs_seq (); + break; + + /* 8.3.110: SINGLE CHARACTER INTRODUCER */ + case C1_SCI: /* ESC Z */ + tt_write (ESCZ_ANSWER, sizeof (ESCZ_ANSWER) - 1); + break; /* steal obsolete ESC [ c */ + + /* 8.3.16: CONTROL SEQUENCE INTRODUCER */ + case C1_CSI: /* ESC [ */ + process_csi_seq (); + break; + + /* 8.3.90: OPERATING SYSTEM COMMAND */ + case C1_OSC: /* ESC ] */ + process_osc_seq (); + break; + + /* 8.3.106: RESET TO INITIAL STATE */ + case 'c': + mbstate.reset (); + scr_poweron (); + scrollbar_show (1); + break; + + /* 8.3.79: LOCKING-SHIFT TWO (see ISO2022) */ + case 'n': + scr_charset_choose (2); + break; + + /* 8.3.81: LOCKING-SHIFT THREE (see ISO2022) */ + case 'o': + scr_charset_choose (3); + break; } } /*}}} */ @@ -2391,405 +3254,427 @@ /*{{{ process CONTROL SEQUENCE INTRODUCER (CSI) sequences `ESC[' */ /* *INDENT-OFF* */ enum { - CSI_ICH = 0x40, - CSI_CUU, CSI_CUD, CSI_CUF, CSI_CUB, CSI_CNL, CSI_CPL, CSI_CHA, - CSI_CUP, CSI_CHT, CSI_ED , CSI_EL , CSI_IL , CSI_DL , CSI_EF , CSI_EA , - CSI_DCH, CSI_SEE, CSI_CPR, CSI_SU , CSI_SD , CSI_NP , CSI_PP , CSI_CTC, - CSI_ECH, CSI_CVT, CSI_CBT, CSI_SRS, CSI_PTX, CSI_SDS, CSI_SIMD, CSI_5F, - CSI_HPA, CSI_HPR, CSI_REP, CSI_DA , CSI_VPA, CSI_VPR, CSI_HVP, CSI_TBC, - CSI_SM , CSI_MC , CSI_HPB, CSI_VPB, CSI_RM , CSI_SGR, CSI_DSR, CSI_DAQ, - CSI_70 , CSI_71 , CSI_72 , CSI_73 , CSI_74 , CSI_75 , CSI_76 , CSI_77 , - CSI_78 , CSI_79 , CSI_7A , CSI_7B , CSI_7C , CSI_7D , CSI_7E , CSI_7F + CSI_ICH = 0x40, + CSI_CUU, CSI_CUD, CSI_CUF, CSI_CUB, CSI_CNL, CSI_CPL, CSI_CHA, + CSI_CUP, CSI_CHT, CSI_ED , CSI_EL , CSI_IL , CSI_DL , CSI_EF , CSI_EA , + CSI_DCH, CSI_SEE, CSI_CPR, CSI_SU , CSI_SD , CSI_NP , CSI_PP , CSI_CTC, + CSI_ECH, CSI_CVT, CSI_CBT, CSI_SRS, CSI_PTX, CSI_SDS, CSI_SIMD, CSI_5F, + CSI_HPA, CSI_HPR, CSI_REP, CSI_DA , CSI_VPA, CSI_VPR, CSI_HVP, CSI_TBC, + CSI_SM , CSI_MC , CSI_HPB, CSI_VPB, CSI_RM , CSI_SGR, CSI_DSR, CSI_DAQ, + CSI_70 , CSI_71 , CSI_72 , CSI_73 , CSI_74 , CSI_75 , CSI_76 , CSI_77 , + CSI_78 , CSI_79 , CSI_7A , CSI_7B , CSI_7C , CSI_7D , CSI_7E , CSI_7F }; #define make_byte(b7,b6,b5,b4,b3,b2,b1,b0) \ (((b7) << 7) | ((b6) << 6) | ((b5) << 5) | ((b4) << 4) \ | ((b3) << 3) | ((b2) << 2) | ((b1) << 1) | (b0)) #define get_byte_array_bit(array, bit) \ - (!!((array)[(bit) / 8] & (128 >> ((bit) & 7)))) + (!! ((array)[ (bit) / 8] & (128 >> ((bit) & 7)))) -const unsigned char csi_defaults[] = { - make_byte(1,1,1,1,1,1,1,1), /* @, A, B, C, D, E, F, G, */ - make_byte(1,1,0,0,1,1,0,0), /* H, I, J, K, L, M, N, O, */ - make_byte(1,0,1,1,1,1,1,0), /* P, Q, R, S, T, U, V, W, */ - make_byte(1,1,1,0,0,0,1,0), /* X, Y, Z, [, \, ], ^, _, */ - make_byte(1,1,1,0,1,1,1,0), /* `, a, b, c, d, e, f, g, */ - make_byte(0,0,1,1,0,0,0,0), /* h, i, j, k, l, m, n, o, */ - make_byte(0,0,0,0,0,0,0,0), /* p, q, r, s, t, u, v, w, */ - make_byte(0,0,0,0,0,0,0,0) /* x, y, z, {, |, }, ~, */ -}; +const unsigned char csi_defaults[] = + { + make_byte (1,1,1,1,1,1,1,1), /* @, A, B, C, D, E, F, G, */ + make_byte (1,1,0,0,1,1,0,0), /* H, I, J, K, L, M, N, O, */ + make_byte (1,0,1,1,1,1,1,0), /* P, Q, R, S, T, U, V, W, */ + make_byte (1,1,1,0,0,0,1,0), /* X, Y, Z, [, \, ], ^, _, */ + make_byte (1,1,1,0,1,1,1,0), /* `, a, b, c, d, e, f, g, */ + make_byte (0,0,1,1,0,0,0,0), /* h, i, j, k, l, m, n, o, */ + make_byte (0,0,0,0,0,0,0,0), /* p, q, r, s, t, u, v, w, */ + make_byte (0,0,0,0,0,0,0,0), /* x, y, z, {, |, }, ~, */ + }; /* *INDENT-ON* */ -/* INTPROTO */ void -rxvt_process_csi_seq(pR) +rxvt_term::process_csi_seq () { - unsigned char ch, priv, i; - unsigned int nargs, p; - int n, ndef; - int arg[ESC_ARGS]; - - for (nargs = ESC_ARGS; nargs > 0;) - arg[--nargs] = 0; - - priv = 0; - ch = rxvt_cmd_getc(aR); - if (ch >= '<' && ch <= '?') { /* '<' '=' '>' '?' */ - priv = ch; - ch = rxvt_cmd_getc(aR); - } -/* read any numerical arguments */ - for (n = -1; ch < CSI_ICH; ) { - if (isdigit(ch)) { - if (n < 0) - n = ch - '0'; - else - n = n * 10 + ch - '0'; - } else if (ch == ';') { - if (nargs < ESC_ARGS) - arg[nargs++] = n; - n = -1; - } else if (ch == '\b') { - rxvt_scr_backspace(aR); - } else if (ch == C0_ESC) { - rxvt_process_escape_seq(aR); - return; - } else if (ch < ' ') { - rxvt_process_nonprinting(aR_ ch); - } - ch = rxvt_cmd_getc(aR); - } - - if (ch > CSI_7F) - return; - - if (nargs < ESC_ARGS) - arg[nargs++] = n; - - i = ch - CSI_ICH; - ndef = get_byte_array_bit(csi_defaults, i); - for (p = 0; p < nargs; p++) - if (arg[p] == -1) - arg[p] = ndef; + unicode_t ch, priv, i; + unsigned int nargs, p; + int n, ndef; + int arg[ESC_ARGS]; + + for (nargs = ESC_ARGS; nargs > 0;) + arg[--nargs] = 0; + + priv = 0; + ch = cmd_getc (); + if (ch >= '<' && ch <= '?') + { /* '<' '=' '>' '?' */ + priv = ch; + ch = cmd_getc (); + } + + /* read any numerical arguments */ + for (n = -1; ch < CSI_ICH; ) + { + if (isdigit (ch)) + { + if (n < 0) + n = ch - '0'; + else + n = n * 10 + ch - '0'; + } + else if (ch == ';') + { + if (nargs < ESC_ARGS) + arg[nargs++] = n; + n = -1; + } + else if (IS_CONTROL (ch)) + process_nonprinting (ch); + + ch = cmd_getc (); + } + + if (ch > CSI_7F) + return; + + if (nargs < ESC_ARGS) + arg[nargs++] = n; + + i = ch - CSI_ICH; + ndef = get_byte_array_bit (csi_defaults, i); + for (p = 0; p < nargs; p++) + if (arg[p] == -1) + arg[p] = ndef; #ifdef DEBUG_CMD - fprintf(stderr, "CSI "); - for (p = 0; p < nargs; p++) - fprintf(stderr, "%d%s", arg[p], p < nargs - 1 ? ";" : ""); - fprintf(stderr, "%c\n", ch); + fprintf (stderr, "CSI "); + for (p = 0; p < nargs; p++) + fprintf (stderr, "%d%s", arg[p], p < nargs - 1 ? ";" : ""); + fprintf (stderr, "%c\n", ch); #endif -/* - * private mode handling - */ - if (priv) { - switch (priv) { - case '>': - if (ch == CSI_DA) /* secondary device attributes */ - rxvt_tt_printf(aR_ "\033[>%d;%-.8s;0c", 'R', VSTRING); - break; - case '?': - if (ch == 'h' || ch == 'l' || ch == 'r' || ch == 's' || ch == 't') - rxvt_process_terminal_mode(aR_ ch, priv, nargs, arg); - break; - } - return; + /* + * private mode handling + */ + if (priv) + { + switch (priv) + { + case '>': + if (ch == CSI_DA) /* secondary device attributes */ + tt_printf ("\033[>%d;%c%c;0c", 'U', VERSION[0], VERSION[2]); + break; + case '?': + if (ch == 'h' || ch == 'l' || ch == 'r' || ch == 's' || ch == 't') + process_terminal_mode (ch, priv, nargs, arg); + break; + } + return; } - switch (ch) { -/* - * ISO/IEC 6429:1992(E) CSI sequences (defaults in parentheses) - */ + switch (ch) + { + /* + * ISO/IEC 6429:1992 (E) CSI sequences (defaults in parentheses) + */ #ifdef PRINTPIPE - case CSI_MC: /* 8.3.83: (0) MEDIA COPY */ - switch (arg[0]) { - case 0: /* initiate transfer to primary aux device */ - rxvt_scr_printscreen(aR_ 0); - break; - case 5: /* start relay to primary aux device */ - rxvt_process_print_pipe(aR); - break; - } - break; -#endif - - case CSI_CUU: /* 8.3.22: (1) CURSOR UP */ - case CSI_VPR: /* 8.3.161: (1) LINE POSITION FORWARD */ - arg[0] = -arg[0]; - /* FALLTHROUGH */ - case CSI_CUD: /* 8.3.19: (1) CURSOR DOWN */ - case CSI_VPB: /* 8.3.160: (1) LINE POSITION BACKWARD */ - rxvt_scr_gotorc(aR_ arg[0], 0, RELATIVE); - break; + case CSI_MC: /* 8.3.83: (0) MEDIA COPY */ + switch (arg[0]) + { + case 0: /* initiate transfer to primary aux device */ + scr_printscreen (0); + break; + case 5: /* start relay to primary aux device */ + process_print_pipe (); + break; + } + break; +#endif + + case CSI_CUU: /* 8.3.22: (1) CURSOR UP */ + case CSI_VPR: /* 8.3.161: (1) LINE POSITION FORWARD */ + arg[0] = -arg[0]; + /* FALLTHROUGH */ + case CSI_CUD: /* 8.3.19: (1) CURSOR DOWN */ + case CSI_VPB: /* 8.3.160: (1) LINE POSITION BACKWARD */ + scr_gotorc (arg[0], 0, RELATIVE); + break; - case CSI_CUB: /* 8.3.18: (1) CURSOR LEFT */ - case CSI_HPB: /* 8.3.59: (1) CHARACTER POSITION BACKWARD */ + case CSI_CUB: /* 8.3.18: (1) CURSOR LEFT */ + case CSI_HPB: /* 8.3.59: (1) CHARACTER POSITION BACKWARD */ #ifdef ISO6429 - arg[0] = -arg[0]; + arg[0] = -arg[0]; #else /* emulate common DEC VTs */ - arg[0] = arg[0] ? -arg[0] : -1; + arg[0] = arg[0] ? -arg[0] : -1; #endif - /* FALLTHROUGH */ - case CSI_CUF: /* 8.3.20: (1) CURSOR RIGHT */ - case CSI_HPR: /* 8.3.60: (1) CHARACTER POSITION FORWARD */ + /* FALLTHROUGH */ + case CSI_CUF: /* 8.3.20: (1) CURSOR RIGHT */ + case CSI_HPR: /* 8.3.60: (1) CHARACTER POSITION FORWARD */ #ifdef ISO6429 - rxvt_scr_gotorc(aR_ 0, arg[0], RELATIVE); + scr_gotorc (0, arg[0], RELATIVE); #else /* emulate common DEC VTs */ - rxvt_scr_gotorc(aR_ 0, arg[0] ? arg[0] : 1, RELATIVE); + scr_gotorc (0, arg[0] ? arg[0] : 1, RELATIVE); #endif - break; + break; - case CSI_CPL: /* 8.3.13: (1) CURSOR PRECEDING LINE */ - arg[0] = -arg[0]; - /* FALLTHROUGH */ - case CSI_CNL: /* 8.3.12: (1) CURSOR NEXT LINE */ - rxvt_scr_gotorc(aR_ arg[0], 0, R_RELATIVE); - break; - - case CSI_CHA: /* 8.3.9: (1) CURSOR CHARACTER ABSOLUTE */ - case CSI_HPA: /* 8.3.58: (1) CURSOR POSITION ABSOLUTE */ - rxvt_scr_gotorc(aR_ 0, arg[0] - 1, R_RELATIVE); - break; - - case CSI_VPA: /* 8.3.159: (1) LINE POSITION ABSOLUTE */ - rxvt_scr_gotorc(aR_ arg[0] - 1, 0, C_RELATIVE); - break; - - case CSI_CUP: /* 8.3.21: (1,1) CURSOR POSITION */ - case CSI_HVP: /* 8.3.64: (1,1) CHARACTER AND LINE POSITION */ - rxvt_scr_gotorc(aR_ arg[0] - 1, nargs < 2 ? 0 : (arg[1] - 1), 0); - break; - - case CSI_CBT: /* 8.3.7: (1) CURSOR BACKWARD TABULATION */ - arg[0] = -arg[0]; - /* FALLTHROUGH */ - case CSI_CHT: /* 8.3.10: (1) CURSOR FORWARD TABULATION */ - rxvt_scr_tab(aR_ arg[0]); - break; - - case CSI_ED: /* 8.3.40: (0) ERASE IN PAGE */ - rxvt_scr_erase_screen(aR_ arg[0]); - break; - - case CSI_EL: /* 8.3.42: (0) ERASE IN LINE */ - rxvt_scr_erase_line(aR_ arg[0]); - break; - - case CSI_ICH: /* 8.3.65: (1) INSERT CHARACTER */ - rxvt_scr_insdel_chars(aR_ arg[0], INSERT); - break; - - case CSI_IL: /* 8.3.68: (1) INSERT LINE */ - rxvt_scr_insdel_lines(aR_ arg[0], INSERT); - break; - - case CSI_DL: /* 8.3.33: (1) DELETE LINE */ - rxvt_scr_insdel_lines(aR_ arg[0], DELETE); - break; - - case CSI_ECH: /* 8.3.39: (1) ERASE CHARACTER */ - rxvt_scr_insdel_chars(aR_ arg[0], ERASE); - break; - - case CSI_DCH: /* 8.3.26: (1) DELETE CHARACTER */ - rxvt_scr_insdel_chars(aR_ arg[0], DELETE); - break; - - case CSI_SD: /* 8.3.114: (1) SCROLL DOWN */ - arg[0] = -arg[0]; - /* FALLTHROUGH */ - case CSI_SU: /* 8.3.148: (1) SCROLL UP */ - rxvt_scroll_text(aR_ R->screen.tscroll, R->screen.bscroll, arg[0], 0); - break; - - case CSI_DA: /* 8.3.24: (0) DEVICE ATTRIBUTES */ - rxvt_tt_write(aR_ (const unsigned char *)VT100_ANS, - (unsigned int)(sizeof(VT100_ANS) - 1)); - break; - - case CSI_SGR: /* 8.3.118: (0) SELECT GRAPHIC RENDITION */ - rxvt_process_sgr_mode(aR_ nargs, arg); - break; - - case CSI_DSR: /* 8.3.36: (0) DEVICE STATUS REPORT */ - switch (arg[0]) { - case 5: /* DSR requested */ - rxvt_tt_printf(aR_ "\033[0n"); - break; - case 6: /* CPR requested */ - rxvt_scr_report_position(aR); - break; -#if defined (ENABLE_DISPLAY_ANSWER) - case 7: /* unofficial extension */ - rxvt_tt_printf(aR_ "%-.250s\n", R->rs[Rs_display_name]); - break; -#endif - case 8: /* unofficial extension */ - rxvt_xterm_seq(aR_ XTerm_title, APL_NAME "-" VERSION, CHAR_ST); - break; - } - break; - - case CSI_TBC: /* 8.3.155: (0) TABULATION CLEAR */ - switch (arg[0]) { - case 0: /* char tab stop cleared at active position */ - rxvt_scr_set_tab(aR_ 0); - break; - /* case 1: */ /* line tab stop cleared in active line */ - /* case 2: */ /* char tab stops cleared in active line */ - case 3: /* all char tab stops are cleared */ - /* case 4: */ /* all line tab stops are cleared */ - case 5: /* all tab stops are cleared */ - rxvt_scr_set_tab(aR_ -1); - break; - } - break; - - case CSI_CTC: /* 8.3.17: (0) CURSOR TABULATION CONTROL */ - switch (arg[0]) { - case 0: /* char tab stop set at active position */ - rxvt_scr_set_tab(aR_ 1); - break; /* = ESC H */ - /* case 1: */ /* line tab stop set at active line */ - case 2: /* char tab stop cleared at active position */ - rxvt_scr_set_tab(aR_ 0); - break; /* = ESC [ 0 g */ - /* case 3: */ /* line tab stop cleared at active line */ - /* case 4: */ /* char tab stops cleared at active line */ - case 5: /* all char tab stops are cleared */ - rxvt_scr_set_tab(aR_ -1); - break; /* = ESC [ 3 g */ - /* case 6: */ /* all line tab stops are cleared */ - } - break; - - case CSI_RM: /* 8.3.107: RESET MODE */ - if (arg[0] == 4) - rxvt_scr_insert_mode(aR_ 0); - break; - - case CSI_SM: /* 8.3.126: SET MODE */ - if (arg[0] == 4) - rxvt_scr_insert_mode(aR_ 1); - break; + case CSI_CPL: /* 8.3.13: (1) CURSOR PRECEDING LINE */ + arg[0] = -arg[0]; + /* FALLTHROUGH */ + case CSI_CNL: /* 8.3.12: (1) CURSOR NEXT LINE */ + scr_gotorc (arg[0], 0, R_RELATIVE); + break; -/* - * PRIVATE USE beyond this point. All CSI_7? sequences here - */ - case CSI_72: /* DECSTBM: set top and bottom margins */ - if (nargs == 1) - rxvt_scr_scroll_region(aR_ arg[0] - 1, MAX_ROWS - 1); - else if (nargs == 0 || arg[0] >= arg[1]) - rxvt_scr_scroll_region(aR_ 0, MAX_ROWS - 1); - else - rxvt_scr_scroll_region(aR_ arg[0] - 1, arg[1] - 1); - break; - - case CSI_73: - rxvt_scr_cursor(aR_ SAVE); - break; - case CSI_75: - rxvt_scr_cursor(aR_ RESTORE); - break; - -#ifndef NO_FRILLS - case CSI_74: - rxvt_process_window_ops(aR_ arg, nargs); - break; -#endif - - case CSI_78: /* DECREQTPARM */ - if (arg[0] == 0 || arg[0] == 1) - rxvt_tt_printf(aR_ "\033[%d;1;1;112;112;1;0x", arg[0] + 2); - /* FALLTHROUGH */ + case CSI_CHA: /* 8.3.9: (1) CURSOR CHARACTER ABSOLUTE */ + case CSI_HPA: /* 8.3.58: (1) CURSOR POSITION ABSOLUTE */ + scr_gotorc (0, arg[0] - 1, R_RELATIVE); + break; - default: - break; + case CSI_VPA: /* 8.3.159: (1) LINE POSITION ABSOLUTE */ + scr_gotorc (arg[0] - 1, 0, C_RELATIVE); + break; + + case CSI_CUP: /* 8.3.21: (1,1) CURSOR POSITION */ + case CSI_HVP: /* 8.3.64: (1,1) CHARACTER AND LINE POSITION */ + scr_gotorc (arg[0] - 1, nargs < 2 ? 0 : (arg[1] - 1), 0); + break; + + case CSI_CBT: /* 8.3.7: (1) CURSOR BACKWARD TABULATION */ + arg[0] = -arg[0]; + /* FALLTHROUGH */ + case CSI_CHT: /* 8.3.10: (1) CURSOR FORWARD TABULATION */ + scr_tab (arg[0]); + break; + + case CSI_ED: /* 8.3.40: (0) ERASE IN PAGE */ + scr_erase_screen (arg[0]); + break; + + case CSI_EL: /* 8.3.42: (0) ERASE IN LINE */ + scr_erase_line (arg[0]); + break; + + case CSI_ICH: /* 8.3.65: (1) INSERT CHARACTER */ + scr_insdel_chars (arg[0], INSERT); + break; + + case CSI_IL: /* 8.3.68: (1) INSERT LINE */ + scr_insdel_lines (arg[0], INSERT); + break; + + case CSI_DL: /* 8.3.33: (1) DELETE LINE */ + scr_insdel_lines (arg[0], DELETE); + break; + + case CSI_ECH: /* 8.3.39: (1) ERASE CHARACTER */ + scr_insdel_chars (arg[0], ERASE); + break; + + case CSI_DCH: /* 8.3.26: (1) DELETE CHARACTER */ + scr_insdel_chars (arg[0], DELETE); + break; + + case CSI_SD: /* 8.3.114: (1) SCROLL DOWN */ + arg[0] = -arg[0]; + /* FALLTHROUGH */ + case CSI_SU: /* 8.3.148: (1) SCROLL UP */ + scr_scroll_text (screen.tscroll, screen.bscroll, arg[0]); + break; + + case CSI_DA: /* 8.3.24: (0) DEVICE ATTRIBUTES */ + tt_write (VT100_ANS, sizeof (VT100_ANS) - 1); + break; + + case CSI_SGR: /* 8.3.118: (0) SELECT GRAPHIC RENDITION */ + process_sgr_mode (nargs, arg); + break; + + case CSI_DSR: /* 8.3.36: (0) DEVICE STATUS REPORT */ + switch (arg[0]) + { + case 5: /* DSR requested */ + tt_printf ("\033[0n"); + break; + case 6: /* CPR requested */ + scr_report_position (); + break; + case 7: /* unofficial extension */ + if (OPTION (Opt_insecure)) + tt_printf ("%-.250s\012", rs[Rs_display_name]); + break; + case 8: /* unofficial extension */ + process_xterm_seq (XTerm_title, RESNAME "-" VERSION, CHAR_ST); + break; + } + break; + + case CSI_TBC: /* 8.3.155: (0) TABULATION CLEAR */ + switch (arg[0]) + { + case 0: /* char tab stop cleared at active position */ + scr_set_tab (0); + break; + /* case 1: */ /* line tab stop cleared in active line */ + /* case 2: */ /* char tab stops cleared in active line */ + case 3: /* all char tab stops are cleared */ + /* case 4: */ /* all line tab stops are cleared */ + case 5: /* all tab stops are cleared */ + scr_set_tab (-1); + break; + } + break; + + case CSI_CTC: /* 8.3.17: (0) CURSOR TABULATION CONTROL */ + switch (arg[0]) + { + case 0: /* char tab stop set at active position */ + scr_set_tab (1); + break; /* = ESC H */ + /* case 1: */ /* line tab stop set at active line */ + case 2: /* char tab stop cleared at active position */ + scr_set_tab (0); + break; /* = ESC [ 0 g */ + /* case 3: */ /* line tab stop cleared at active line */ + /* case 4: */ /* char tab stops cleared at active line */ + case 5: /* all char tab stops are cleared */ + scr_set_tab (-1); + break; /* = ESC [ 3 g */ + /* case 6: */ /* all line tab stops are cleared */ + } + break; + + case CSI_RM: /* 8.3.107: RESET MODE */ + if (arg[0] == 4) + scr_insert_mode (0); + else if (arg[0] == 20) + priv_modes &= ~PrivMode_LFNL; + break; + + case CSI_SM: /* 8.3.126: SET MODE */ + if (arg[0] == 4) + scr_insert_mode (1); + else if (arg[0] == 20) + priv_modes |= PrivMode_LFNL; + break; + + /* + * PRIVATE USE beyond this point. All CSI_7? sequences here + */ + case CSI_72: /* DECSTBM: set top and bottom margins */ + if (nargs == 1) + scr_scroll_region (arg[0] - 1, MAX_ROWS - 1); + else if (nargs == 0 || arg[0] >= arg[1]) + scr_scroll_region (0, MAX_ROWS - 1); + else + scr_scroll_region (arg[0] - 1, arg[1] - 1); + break; + + case CSI_73: + scr_cursor (SAVE); + break; + case CSI_75: + scr_cursor (RESTORE); + break; + +#if ENABLE_FRILLS + case CSI_74: + process_window_ops (arg, nargs); + break; +#endif + + case CSI_78: /* DECREQTPARM */ + if (arg[0] == 0 || arg[0] == 1) + tt_printf ("\033[%d;1;1;128;128;1;0x", arg[0] + 2); + break; + + default: + break; } } /*}}} */ -#ifndef NO_FRILLS +#if ENABLE_FRILLS /* ARGSUSED */ -/* INTPROTO */ void -rxvt_process_window_ops(pR_ const int *args, unsigned int nargs) +rxvt_term::process_window_ops (const int *args, unsigned int nargs) { - int x, y; -#if 0 - char *s; -#endif - XWindowAttributes wattr; - Window wdummy; + int x, y; + XWindowAttributes wattr; + Window wdummy; + dDisp; - if (nargs == 0) - return; - switch (args[0]) { - /* - * commands - */ - case 1: /* deiconify window */ - XMapWindow(R->Xdisplay, R->TermWin.parent[0]); - break; - case 2: /* iconify window */ - XIconifyWindow(R->Xdisplay, R->TermWin.parent[0], - DefaultScreen(R->Xdisplay)); - break; - case 3: /* set position (pixels) */ - XMoveWindow(R->Xdisplay, R->TermWin.parent[0], args[1], args[2]); - break; - case 4: /* set size (pixels) */ - rxvt_set_widthheight(aR_ (unsigned int)args[2], (unsigned int)args[1]); - break; - case 5: /* raise window */ - XRaiseWindow(R->Xdisplay, R->TermWin.parent[0]); - break; - case 6: /* lower window */ - XLowerWindow(R->Xdisplay, R->TermWin.parent[0]); - break; - case 7: /* refresh window */ - rxvt_scr_touch(aR_ True); - break; - case 8: /* set size (chars) */ - rxvt_set_widthheight(aR_ (unsigned int)(args[2] * R->TermWin.fwidth), - (unsigned int)(args[1] * R->TermWin.fheight)); - break; - default: - if (args[0] >= 24) /* set height (chars) */ - rxvt_set_widthheight(aR_ (unsigned int)R->TermWin.width, - (unsigned int)(args[1] * R->TermWin.fheight)); - break; - /* - * reports - some output format copied from XTerm - */ - case 11: /* report window state */ - XGetWindowAttributes(R->Xdisplay, R->TermWin.parent[0], &wattr); - rxvt_tt_printf(aR_ "\033[%dt", wattr.map_state == IsViewable ? 1 : 2); - break; - case 13: /* report window position */ - XGetWindowAttributes(R->Xdisplay, R->TermWin.parent[0], &wattr); - XTranslateCoordinates(R->Xdisplay, R->TermWin.parent[0], wattr.root, - -wattr.border_width, -wattr.border_width, - &x, &y, &wdummy); - rxvt_tt_printf(aR_ "\033[3;%d;%dt", x, y); - break; - case 14: /* report window size (pixels) */ - XGetWindowAttributes(R->Xdisplay, R->TermWin.parent[0], &wattr); - rxvt_tt_printf(aR_ "\033[4;%d;%dt", wattr.height, wattr.width); - break; - case 18: /* report window size (chars) */ - rxvt_tt_printf(aR_ "\033[8;%d;%dt", R->TermWin.nrow, R->TermWin.ncol); - break; -#if 0 /* XXX: currently disabled due to security concerns */ - case 20: /* report icon label */ - XGetIconName(R->Xdisplay, R->TermWin.parent[0], &s); - rxvt_tt_printf(aR_ "\033]L%-.200s\234", s ? s : ""); /* 8bit ST */ - break; - case 21: /* report window title */ - XFetchName(R->Xdisplay, R->TermWin.parent[0], &s); - rxvt_tt_printf(aR_ "\033]l%-.200s\234", s ? s : ""); /* 8bit ST */ - break; -#endif + if (nargs == 0) + return; + + switch (args[0]) + { + /* + * commands + */ + case 1: /* deiconify window */ + XMapWindow (disp, parent[0]); + break; + case 2: /* iconify window */ + XIconifyWindow (disp, parent[0], display->screen); + break; + case 3: /* set position (pixels) */ + XMoveWindow (disp, parent[0], args[1], args[2]); + break; + case 4: /* set size (pixels) */ + set_widthheight ((unsigned int)args[2], (unsigned int)args[1]); + break; + case 5: /* raise window */ + XRaiseWindow (disp, parent[0]); + break; + case 6: /* lower window */ + XLowerWindow (disp, parent[0]); + break; + case 7: /* refresh window */ + scr_touch (true); + break; + case 8: /* set size (chars) */ + set_widthheight ((unsigned int) (args[2] * fwidth), + (unsigned int) (args[1] * fheight)); + break; + + //case 9: NYI, TODO, restore maximized window or maximize window + default: + if (args[0] >= 24) /* set height (chars) */ + set_widthheight ((unsigned int)width, + (unsigned int) (args[1] * fheight)); + break; + + + /* + * reports - some output format copied from XTerm + */ + case 11: /* report window state */ + XGetWindowAttributes (disp, parent[0], &wattr); + tt_printf ("\033[%dt", wattr.map_state == IsViewable ? 1 : 2); + break; + case 13: /* report window position */ + XGetWindowAttributes (disp, parent[0], &wattr); + XTranslateCoordinates (disp, parent[0], wattr.root, + -wattr.border_width, -wattr.border_width, + &x, &y, &wdummy); + tt_printf ("\033[3;%d;%dt", x, y); + break; + case 14: /* report window size (pixels) */ + XGetWindowAttributes (disp, parent[0], &wattr); + tt_printf ("\033[4;%d;%dt", wattr.height, wattr.width); + break; + case 18: /* report text area size (chars) */ + tt_printf ("\033[8;%d;%dt", nrow, ncol); + break; + case 19: /* report window size (chars) */ + tt_printf ("\033[9;%d;%dt", nrow, ncol); + break; + case 20: /* report icon label */ + { + char *s; + XGetIconName (disp, parent[0], &s); + tt_printf ("\033]L%-.250s\234", OPTION (Opt_insecure) && s ? s : ""); /* 8bit ST */ + XFree (s); + } + break; + case 21: /* report window title */ + { + char *s; + XFetchName (disp, parent[0], &s); + tt_printf ("\033]l%-.250s\234", OPTION (Opt_insecure) && s ? s : ""); /* 8bit ST */ + XFree (s); + } + break; } } #endif @@ -2797,215 +3682,351 @@ /*----------------------------------------------------------------------*/ /* * get input up until STRING TERMINATOR (or BEL) - * ends_how is terminator used. returned input must be free()d + * ends_how is terminator used. returned input must be free()'d */ -/* INTPROTO */ -unsigned char * -rxvt_get_to_st(pR_ unsigned char *ends_how) -{ - int seen_esc = 0; /* seen escape? */ - unsigned int n = 0; - unsigned char *s; - unsigned char ch, string[STRING_MAX]; - - for (; (ch = rxvt_cmd_getc(aR));) { - if (ch == C0_BEL - || ch == CHAR_ST - || (ch == 0x5c && seen_esc)) /* 7bit ST */ - break; - if (ch == C0_ESC) { - seen_esc = 1; - continue; - } else if (ch == '\t') - ch = ' '; /* translate '\t' to space */ - else if (ch < 0x08 || (ch > 0x0d && ch < 0x20)) - return NULL; /* other control character - exit */ - if (n < sizeof(string) - 1) - string[n++] = ch; - seen_esc = 0; - } - string[n++] = '\0'; - if ((s = (unsigned char *)rxvt_malloc(n)) == NULL) - return NULL; - *ends_how = (ch == 0x5c ? C0_ESC : ch); - STRNCPY(s, string, n); - return s; +char * +rxvt_term::get_to_st (unicode_t &ends_how) +{ + unicode_t ch; + bool seen_esc = false; + unsigned int n = 0; + wchar_t string[STRING_MAX]; + + while ((ch = cmd_getc ()) != NOCHAR) + { + if (seen_esc) + { + if (ch == 0x5c) /* 7bit ST */ + break; + else + return NULL; + } + else if (ch == C0_ESC) + { + seen_esc = true; + continue; + } + else if (ch == C0_BEL || ch == CHAR_ST) + break; + else if (ch < 0x20) + return NULL; /* other control character - exit */ + + seen_esc = false; + + if (n >= STRING_MAX - 1) + // stop at some sane length + return NULL; + + if (ch == C0_SYN) + string[n++] = cmd_get8 (); + else + string[n++] = ch; + } + + string[n++] = '\0'; + + ends_how = (ch == 0x5c ? C0_ESC : ch); + + return rxvt_wcstombs (string); } /*----------------------------------------------------------------------*/ /* * process DEVICE CONTROL STRING `ESC P ... (ST|BEL)' or `0x90 ... (ST|BEL)' */ -/* INTPROTO */ void -rxvt_process_dcs_seq(pR) +rxvt_term::process_dcs_seq () { - unsigned char eh, *s; -/* - * Not handled yet - */ - s = rxvt_get_to_st(aR_ &eh); - if (s) - free(s); - return; + char *s; + unicode_t eh; + + /* + * Not handled yet + */ + s = get_to_st (eh); + if (s) + free (s); + + return; } /*----------------------------------------------------------------------*/ /* * process OPERATING SYSTEM COMMAND sequence `ESC ] Ps ; Pt (ST|BEL)' */ -/* INTPROTO */ void -rxvt_process_osc_seq(pR) +rxvt_term::process_osc_seq () { - unsigned char ch, eh, *s; - int arg; + unicode_t ch, eh; + int arg; - ch = rxvt_cmd_getc(aR); - for (arg = 0; isdigit(ch); ch = rxvt_cmd_getc(aR)) - arg = arg * 10 + (ch - '0'); - - if (ch == ';') { - s = rxvt_get_to_st(aR_ &eh); - if (s) { - /* - * rxvt_menubar_dispatch() violates the constness of the string, - * so do it here - */ - if (arg == XTerm_Menu) -#if 0 /* XXX: currently disabled due to security concerns */ - rxvt_menubar_dispatch(aR_ (char *)s); -#else - 0; -#endif - else - rxvt_xterm_seq(aR_ arg, (char *)s, eh); - free(s); - } + ch = cmd_getc (); + for (arg = 0; isdigit (ch); ch = cmd_getc ()) + arg = arg * 10 + (ch - '0'); + + if (ch == ';') + { + char *s = get_to_st (eh); + + if (s) + { + process_xterm_seq (arg, s, eh); + free (s); + } + } +} + +void +rxvt_term::process_color_seq (int report, int color, const char *str, char resp) +{ + if (str[0] == '?' && !str[1]) + { + unsigned short r, g, b; + pix_colors_focused[color].get (display, r, g, b); + tt_printf ("\033]%d;rgb:%04x/%04x/%04x%c", report, r, g, b, resp); } + else + set_window_color (color, str); } + /* * XTerm escape sequences: ESC ] Ps;Pt (ST|BEL) - * 0 = change iconName/title - * 1 = change iconName - * 2 = change title - * 4 = change color - * 12 = change text color - * 13 = change mouse foreground color - * 17 = change highlight character colour - * 18 = change bold character color - * 19 = change underlined character color - * 46 = change logfile (not implemented) - * 50 = change font - * - * rxvt extensions: - * 10 = menu (may change in future) - * 20 = bg pixmap - * 39 = change default fg color - * 49 = change default bg color - * 55 = dump scrollback buffer and all of screen */ -/* EXTPROTO */ void -rxvt_xterm_seq(pR_ int op, const char *str, unsigned char resp __attribute__((unused))) +rxvt_term::process_xterm_seq (int op, const char *str, char resp) { - int changed = 0; - int color; - char *buf, *name; - - assert(str != NULL); - switch (op) { - case XTerm_name: - rxvt_set_title(aR_ str); - /* FALLTHROUGH */ - case XTerm_iconName: - rxvt_set_iconName(aR_ str); - break; - case XTerm_title: - rxvt_set_title(aR_ str); - break; - case XTerm_Color: - for (buf = (char *)str; buf && *buf;) { - if ((name = STRCHR(buf, ';')) == NULL) - break; - *name++ = '\0'; - color = atoi(buf); - if (color < 0 || color >= TOTAL_COLORS) - break; - if ((buf = STRCHR(name, ';')) != NULL) - *buf++ = '\0'; - rxvt_set_window_color(aR_ color + minCOLOR, name); - } - break; + int changed = 0; + int color; + char *buf, *name; + bool query = str[0] == '?' && !str[1]; + int saveop = op; + dDisp; + + assert (str != NULL); + switch (op) + { + case XTerm_name: + set_title (str); + /* FALLTHROUGH */ + case XTerm_iconName: + set_icon_name (str); + break; + case XTerm_title: + set_title (str); + break; + case XTerm_property: + if (str[0] == '?') + { + Atom prop = display->atom (str + 1); + Atom actual_type; + int actual_format; + unsigned long nitems; + unsigned long bytes_after; + unsigned char *value = 0; + const char *str = ""; + + if (prop + && XGetWindowProperty (disp, parent[0], + prop, 0, 1<<16, 0, AnyPropertyType, + &actual_type, &actual_format, + &nitems, &bytes_after, &value) == Success + && actual_type != None + && actual_format == 8) + str = (const char *)(value); + + tt_printf ("\033]%d;%s%c", XTerm_property, str, resp); + + XFree (value); + } + else + { + char *eq = strchr (str, '='); // constness lost, but verified to be ok + + if (eq) + { + *eq = 0; + set_utf8_property (display->atom (str), eq + 1); + } + else + XDeleteProperty (disp, parent[0], + display->atom (str)); + } + break; + + case XTerm_Color: + for (buf = (char *)str; buf && *buf;) + { + if ((name = strchr (buf, ';')) == NULL) + break; + + *name++ = '\0'; + color = atoi (buf); + + if (color < 0 || color >= TOTAL_COLORS) + break; + + if ((buf = strchr (name, ';')) != NULL) + *buf++ = '\0'; + + if (name[0] == '?' && !name[1]) + { + unsigned short r, g, b; + pix_colors_focused[color + minCOLOR].get (display, r, g, b); + tt_printf ("\033]%d;%d;rgb:%04x/%04x/%04x%c", XTerm_Color, color, r, g, b, resp); + } + else + set_window_color (color + minCOLOR, name); + } + break; + case XTerm_Color00: + process_color_seq (XTerm_Color00, Color_fg, str, resp); + break; + case XTerm_Color01: + process_color_seq (XTerm_Color00, Color_bg, str, resp); + break; #ifndef NO_CURSORCOLOR - case XTerm_Color_cursor: - rxvt_set_window_color(aR_ Color_cursor, str); - break; -#endif - case XTerm_Color_pointer: - rxvt_set_window_color(aR_ Color_pointer, str); - break; + case XTerm_Color_cursor: + process_color_seq (XTerm_Color_cursor, Color_cursor, str, resp); + break; +#endif + case XTerm_Color_pointer_fg: + process_color_seq (XTerm_Color_pointer_fg, Color_pointer_fg, str, resp); + break; + case XTerm_Color_pointer_bg: + process_color_seq (XTerm_Color_pointer_bg, Color_pointer_bg, str, resp); + break; #ifndef NO_BOLD_UNDERLINE_REVERSE - case XTerm_Color_BD: - rxvt_set_window_color(aR_ Color_BD, str); - break; - case XTerm_Color_UL: - rxvt_set_window_color(aR_ Color_UL, str); - break; - case XTerm_Color_RV: - rxvt_set_window_color(aR_ Color_RV, str); - break; + case XTerm_Color_BD: + process_color_seq (XTerm_Color_BD, Color_BD, str, resp); + break; + case XTerm_Color_UL: + process_color_seq (XTerm_Color_UL, Color_UL, str, resp); + break; + case XTerm_Color_RV: + process_color_seq (XTerm_Color_RV, Color_RV, str, resp); + break; + case URxvt_Color_IT: + process_color_seq (URxvt_Color_IT, Color_IT, str, resp); + break; +#endif +#if TRANSPARENT && TINTING + case URxvt_Color_tint: + process_color_seq (URxvt_Color_tint, Color_tint, str, resp); + check_our_parents (); + if (am_transparent) + want_full_refresh = want_refresh = 1; + break; #endif - case XTerm_Menu: - /* - * rxvt_menubar_dispatch() violates the constness of the string, - * so DON'T do it here - */ - break; - case XTerm_Pixmap: - if (*str != ';') { + case XTerm_Pixmap: + if (*str != ';') + { #if XPM_BACKGROUND - rxvt_scale_pixmap(aR_ ""); /* reset to default scaling */ - rxvt_set_bgPixmap(aR_ str); /* change pixmap */ + scale_pixmap (""); /* reset to default scaling */ + set_bgPixmap (str); /* change pixmap */ #endif - rxvt_scr_touch(aR_ True); - } - while ((str = STRCHR(str, ';')) != NULL) { - str++; + scr_touch (true); + } + while ((str = strchr (str, ';')) != NULL) + { + str++; #if XPM_BACKGROUND - changed += rxvt_scale_pixmap(aR_ str); + changed += scale_pixmap (str); #endif - } - if (changed) { + } + + if (changed) + { #ifdef XPM_BACKGROUND - rxvt_resize_pixmap(aR); + resize_pixmap (); +#endif + scr_touch (true); + } + break; + + case XTerm_restoreFG: + set_window_color (Color_fg, str); + break; + case XTerm_restoreBG: + set_window_color (Color_bg, str); + break; + + case XTerm_logfile: + // TODO, when secure mode? + break; + +#ifdef MENUBAR + case URxvt_Menu: + if (OPTION (Opt_insecure)) + menubar_dispatch (const_cast(str)); // casting away constness is checked + break; #endif - rxvt_scr_touch(aR_ True); - } - break; - - case XTerm_restoreFG: - rxvt_set_window_color(aR_ Color_fg, str); - break; - case XTerm_restoreBG: - rxvt_set_window_color(aR_ Color_bg, str); - break; - case XTerm_logfile: - break; - case XTerm_font: - rxvt_change_font(aR_ 0, str); - break; #if 0 - case XTerm_dumpscreen: /* no error notices */ - { - int fd; - if ((fd = open(str, O_RDWR | O_CREAT | O_EXCL, 0600)) >= 0) { - rxvt_scr_dump(aR_ fd); - close(fd); - } - } - break; + case XTerm_dumpscreen: /* no error notices */ + { + int fd; + if ((fd = open (str, O_RDWR | O_CREAT | O_EXCL, 0600)) >= 0) + { + scr_dump (fd); + close (fd); + } + } + break; +#endif + case XTerm_font: + op = URxvt_font; + case URxvt_font: +#if ENABLE_STYLES + case URxvt_boldFont: + case URxvt_italicFont: + case URxvt_boldItalicFont: +#endif + if (query) + tt_printf ("\33]%d;%-.250s%c", saveop, + OPTION (Opt_insecure) && fontset[op - URxvt_font]->fontdesc + ? fontset[op - URxvt_font]->fontdesc : "", + resp); + else + { + const char *&res = rs[Rs_font + (op - URxvt_font)]; + + res = strdup (str); + allocated.push_back ((void *)res); + set_fonts (); + } + break; + +#if ENABLE_FRILLS + case URxvt_locale: + if (query) + tt_printf ("\33]%d;%-.250s%c", URxvt_locale, OPTION (Opt_insecure) ? locale : "", resp); + else + { + set_locale (str); + pty.set_utf8_mode (enc_utf8); + init_xlocale (); + } + break; + + case URxvt_view_up: + case URxvt_view_down: + { + int lines = atoi (str); + + if (lines) + scr_page (op == URxvt_view_up ? UP : DN, lines); + else + scr_erase_savelines (); + } + + break; +#endif + +#if ENABLE_PERL + case URxvt_perl: + if (HOOK_INVOKE ((this, HOOK_OSC_SEQ, DT_STRING, str, DT_END))) + ; // no responses yet + break; #endif } } @@ -3021,510 +4042,473 @@ * 't' = toggle * so no need for fancy checking */ -/* INTPROTO */ int -rxvt_privcases(pR_ int mode, unsigned long bit) +rxvt_term::privcases (int mode, unsigned long bit) { - int state; + int state; - if (mode == 's') { - R->SavedModes |= (R->PrivateModes & bit); - return -1; - } else { - if (mode == 'r') - state = (R->SavedModes & bit) ? 1 : 0; /* no overlapping */ - else - state = (mode == 't') ? !(R->PrivateModes & bit) : mode; - PrivMode(state, bit); + if (mode == 's') + { + SavedModes |= (priv_modes & bit); + return -1; + } + else + { + if (mode == 'r') + state = (SavedModes & bit) ? 1 : 0; /* no overlapping */ + else + state = (mode == 't') ? ! (priv_modes & bit) : mode; + PrivMode (state, bit); } - return state; + + return state; } /* we're not using priv _yet_ */ -/* INTPROTO */ void -rxvt_process_terminal_mode(pR_ int mode, int priv __attribute__((unused)), unsigned int nargs, const int *arg) +rxvt_term::process_terminal_mode (int mode, int priv __attribute__ ((unused)), unsigned int nargs, const int *arg) { - unsigned int i, j; - int state; - static const struct { - const int argval; - const unsigned long bit; - } argtopriv[] = { - { 1, PrivMode_aplCUR }, - { 2, PrivMode_vt52 }, - { 3, PrivMode_132 }, - { 4, PrivMode_smoothScroll }, - { 5, PrivMode_rVideo }, - { 6, PrivMode_relOrigin }, - { 7, PrivMode_Autowrap }, - { 9, PrivMode_MouseX10 }, + unsigned int i, j; + int state; + + static const struct + { + const int argval; + const unsigned long bit; + } + + argtopriv[] = { + { 1, PrivMode_aplCUR }, + { 2, PrivMode_vt52 }, + { 3, PrivMode_132 }, + { 4, PrivMode_smoothScroll }, + { 5, PrivMode_rVideo }, + { 6, PrivMode_relOrigin }, + { 7, PrivMode_Autowrap }, + // 8, bi-directional support mode + { 9, PrivMode_MouseX10 }, #ifdef menuBar_esc - { menuBar_esc, PrivMode_menuBar }, + { menuBar_esc, PrivMode_menuBar }, #endif + // 18, 19 printing-related + { 25, PrivMode_VisibleCursor }, #ifdef scrollBar_esc - { scrollBar_esc, PrivMode_scrollBar }, + { scrollBar_esc, PrivMode_scrollBar }, #endif - { 25, PrivMode_VisibleCursor }, - { 35, PrivMode_ShiftKeys }, - { 40, PrivMode_132OK }, - { 47, PrivMode_Screen }, - { 66, PrivMode_aplKP }, + { 35, PrivMode_ShiftKeys }, // rxvt extension + { 40, PrivMode_132OK }, + // 41 xterm more fixes NYI + // 45 margin bell NYI + // 46 start logging + { 47, PrivMode_Screen }, + { 66, PrivMode_aplKP }, #ifndef NO_BACKSPACE_KEY - { 67, PrivMode_BackSpace }, + { 67, PrivMode_BackSpace }, #endif - { 1000, PrivMode_MouseX11 }, - { 1010, PrivMode_TtyOutputInh }, - { 1011, PrivMode_Keypress }, - { 1047, PrivMode_Screen }, - }; - - if (nargs == 0) - return; - -/* make lo/hi boolean */ - if (mode == 'l') - mode = 0; /* reset */ - else if (mode == 'h') - mode = 1; /* set */ - - for (i = 0; i < nargs; i++) { - state = -1; - - /* basic handling */ - for (j = 0; j < (sizeof(argtopriv)/sizeof(argtopriv[0])); j++) - if (argtopriv[j].argval == arg[i]) { - state = rxvt_privcases(aR_ mode, argtopriv[j].bit); - break; - } - - /* extra handling for values with state unkept */ - if (state == -1) - switch (arg[i]) { - case 1048: /* alternative cursor save */ - if (mode == 0) - rxvt_scr_cursor(aR_ RESTORE); - else if (mode == 1) - rxvt_scr_cursor(aR_ SAVE); - /* FALLTHROUGH */ - default: - continue; /* for(;i;) */ - } - - /* extra handling for values with valid 0 or 1 state */ - switch (arg[i]) { - /* case 1: - application cursor keys */ - case 2: /* VT52 mode */ - /* oddball mode. should be set regardless of set/reset - * parameter. Return from VT52 mode with an ESC < from - * within VT52 mode - */ - PrivMode(1, PrivMode_vt52); - break; - case 3: /* 80/132 */ - if (R->PrivateModes & PrivMode_132OK) - rxvt_set_widthheight(aR_ - (unsigned int)((state ? 132 : 80) * R->TermWin.fwidth), - (unsigned int)R->TermWin.height); - break; - case 4: /* smooth scrolling */ - if (state) - R->Options &= ~Opt_jumpScroll; - else - R->Options |= Opt_jumpScroll; - break; - case 5: /* reverse video */ - rxvt_scr_rvideo_mode(aR_ state); - break; - case 6: /* relative/absolute origins */ - rxvt_scr_relative_origin(aR_ state); - break; - case 7: /* autowrap */ - rxvt_scr_autowrap(aR_ state); - break; - /* case 8: - auto repeat, can't do on a per window basis */ - case 9: /* X10 mouse reporting */ - if (state) /* orthogonal */ - R->PrivateModes &= ~(PrivMode_MouseX11); - break; + { 1000, PrivMode_MouseX11 }, + // 1001 Use Hilite Mouse Tracking. NYI, TODO + // 1002 Use Cell Motion Mouse Tracking. NYI, TODO + // 1003 Use All Motion Mouse Tracking. NYI, TODO + { 1010, PrivMode_TtyOutputInh }, // rxvt extension + { 1011, PrivMode_Keypress }, // rxvt extension + // 1035 enable modifiers for alt, numlock NYI + // 1036 send ESC for meta keys NYI + // 1037 send DEL for keypad delete NYI + { 1047, PrivMode_Screen }, + // 1048 save and restore cursor + { 1049, PrivMode_Screen }, /* xterm extension, clear screen on ti rather than te */ + // 1051, 1052, 1060, 1061 keyboard emulation NYI + }; + + if (nargs == 0) + return; + + /* make lo/hi boolean */ + if (mode == 'l') + mode = 0; /* reset */ + else if (mode == 'h') + mode = 1; /* set */ + + for (i = 0; i < nargs; i++) + { + state = -1; + + /* basic handling */ + for (j = 0; j < (sizeof (argtopriv)/sizeof (argtopriv[0])); j++) + if (argtopriv[j].argval == arg[i]) + { + state = privcases (mode, argtopriv[j].bit); + break; + } + + /* extra handling for values with state unkept */ + switch (arg[i]) + { +#if ENABLE_STYLES + case 1021: + if (mode) + SET_OPTION (Opt_intensityStyles); + else + CLR_OPTION (Opt_intensityStyles); + + scr_touch (true); + break; +#endif + case 1048: /* alternative cursor save */ + case 1049: + if (OPTION (Opt_secondaryScreen)) + if (mode == 0) + scr_cursor (RESTORE); + else if (mode == 1) + scr_cursor (SAVE); + break; + } + + if (state >= 0) + /* extra handling for values with valid 0 or 1 state */ + switch (arg[i]) + { + /* case 1: - application cursor keys */ + case 2: /* VT52 mode */ + /* oddball mode. should be set regardless of set/reset + * parameter. Return from VT52 mode with an ESC < from + * within VT52 mode + */ + PrivMode (1, PrivMode_vt52); + break; + case 3: /* 80/132 */ + if (priv_modes & PrivMode_132OK) + set_widthheight (((state ? 132 : 80) * fwidth), height); + break; + case 4: /* smooth scrolling */ + if (!state) + SET_OPTION (Opt_jumpScroll); + else + CLR_OPTION (Opt_jumpScroll); + break; + case 5: /* reverse video */ + scr_rvideo_mode (state); + break; + case 6: /* relative/absolute origins */ + scr_relative_origin (state); + break; + case 7: /* autowrap */ + scr_autowrap (state); + break; + /* case 8: - auto repeat, can't do on a per window basis */ + case 9: /* X10 mouse reporting */ + if (state) /* orthogonal */ + priv_modes &= ~PrivMode_MouseX11; + break; #ifdef menuBar_esc - case menuBar_esc: + case menuBar_esc: #ifdef MENUBAR - rxvt_map_menuBar(aR_ state); + map_menuBar (state); #endif - break; + break; #endif #ifdef scrollBar_esc - case scrollBar_esc: - if (rxvt_scrollbar_mapping(aR_ state)) { - rxvt_resize_all_windows(aR_ 0, 0, 0); - rxvt_scr_touch(aR_ True); - } - break; -#endif - case 25: /* visible/invisible cursor */ - rxvt_scr_cursor_visible(aR_ state); - break; - /* case 35: - shift keys */ - /* case 40: - 80 <--> 132 mode */ - case 47: /* secondary screen */ - rxvt_scr_change_screen(aR_ state); - break; - /* case 66: - application key pad */ - /* case 67: - backspace key */ - case 1000: /* X11 mouse reporting */ - if (state) /* orthogonal */ - R->PrivateModes &= ~(PrivMode_MouseX10); - break; + case scrollBar_esc: + if (scrollbar_mapping (state)) + { + resize_all_windows (0, 0, 0); + scr_touch (true); + } + break; +#endif + case 25: /* visible/invisible cursor */ + scr_cursor_visible (state); + break; + /* case 35: - shift keys */ + /* case 40: - 80 <--> 132 mode */ + case 47: /* secondary screen */ + scr_change_screen (state); + break; + /* case 66: - application key pad */ + /* case 67: - backspace key */ + case 1000: /* X11 mouse reporting */ + if (state) /* orthogonal */ + priv_modes &= ~PrivMode_MouseX10; + break; #if 0 - case 1001: - break; /* X11 mouse highlighting */ + case 1001: + break; /* X11 mouse highlighting */ #endif - case 1010: /* scroll to bottom on TTY output inhibit */ - if (state) - R->Options &= ~Opt_scrollTtyOutput; - else - R->Options |= Opt_scrollTtyOutput; - break; - case 1011: /* scroll to bottom on key press */ - if (state) - R->Options |= Opt_scrollTtyKeypress; - else - R->Options &= ~Opt_scrollTtyKeypress; - break; - case 1047: /* secondary screen w/ clearing */ - if (R->current_screen != PRIMARY) - rxvt_scr_erase_screen(aR_ 2); - rxvt_scr_change_screen(aR_ state); - /* FALLTHROUGH */ - default: - break; - } + case 1010: /* scroll to bottom on TTY output inhibit */ + if (!state) + SET_OPTION (Opt_scrollTtyOutput); + else + CLR_OPTION (Opt_scrollTtyOutput); + break; + case 1011: /* scroll to bottom on key press */ + if (state) + SET_OPTION (Opt_scrollTtyKeypress); + else + CLR_OPTION (Opt_scrollTtyKeypress); + break; + case 1047: /* secondary screen w/ clearing last */ + if (OPTION (Opt_secondaryScreen)) + if (current_screen != PRIMARY) + scr_erase_screen (2); + scr_change_screen (state); + break; + case 1049: /* secondary screen w/ clearing first */ + scr_change_screen (state); + if (OPTION (Opt_secondaryScreen)) + if (current_screen != PRIMARY) + scr_erase_screen (2); + break; + default: + break; + } } } /*}}} */ /*{{{ process sgr sequences */ -/* INTPROTO */ void -rxvt_process_sgr_mode(pR_ unsigned int nargs, const int *arg) +rxvt_term::process_sgr_mode (unsigned int nargs, const int *arg) { - unsigned int i; - short rendset; - int rendstyle; - - if (nargs == 0) { - rxvt_scr_rendition(aR_ 0, ~RS_None); - return; - } - for (i = 0; i < nargs; i++) { - rendset = -1; - switch (arg[i]) { - case 0: - rendset = 0, rendstyle = ~RS_None; - break; - case 1: - rendset = 1, rendstyle = RS_Bold; - break; - case 4: - rendset = 1, rendstyle = RS_Uline; - break; - case 5: - rendset = 1, rendstyle = RS_Blink; - break; - case 7: - rendset = 1, rendstyle = RS_RVid; - break; - case 22: - rendset = 0, rendstyle = RS_Bold; - break; - case 24: - rendset = 0, rendstyle = RS_Uline; - break; - case 25: - rendset = 0, rendstyle = RS_Blink; - break; - case 27: - rendset = 0, rendstyle = RS_RVid; - break; - } - if (rendset != -1) { - rxvt_scr_rendition(aR_ rendset, rendstyle); - continue; /* for(;i;) */ - } - - switch (arg[i]) { - case 30: - case 31: /* set fg color */ - case 32: - case 33: - case 34: - case 35: - case 36: - case 37: - rxvt_scr_color(aR_ (unsigned int)(minCOLOR + (arg[i] - 30)), - Color_fg); - break; -#ifdef TTY_256COLOR - case 38: - if (nargs > i + 2 && arg[i + 1] == 5) { - rxvt_scr_color(aR_ (unsigned int)(minCOLOR + arg[i + 2]), - Color_fg); - i += 2; - } - break; -#endif - case 39: /* default fg */ - rxvt_scr_color(aR_ Color_fg, Color_fg); - break; - - case 40: - case 41: /* set bg color */ - case 42: - case 43: - case 44: - case 45: - case 46: - case 47: - rxvt_scr_color(aR_ (unsigned int)(minCOLOR + (arg[i] - 40)), - Color_bg); - break; -#ifdef TTY_256COLOR - case 48: - if (nargs > i + 2 && arg[i + 1] == 5) { - rxvt_scr_color(aR_ (unsigned int)(minCOLOR + arg[i + 2]), - Color_bg); - i += 2; - } - break; -#endif - case 49: /* default bg */ - rxvt_scr_color(aR_ Color_bg, Color_bg); - break; - -#ifndef NO_BRIGHTCOLOR - case 90: - case 91: /* set bright fg color */ - case 92: - case 93: - case 94: - case 95: - case 96: - case 97: - rxvt_scr_color(aR_ (unsigned int)(minBrightCOLOR + (arg[i] - 90)), - Color_fg); - break; - case 100: - case 101: /* set bright bg color */ - case 102: - case 103: - case 104: - case 105: - case 106: - case 107: - rxvt_scr_color(aR_ (unsigned int)(minBrightCOLOR + (arg[i] - 100)), - Color_bg); - break; -#endif - } + unsigned int i; + short rendset; + int rendstyle; + + if (nargs == 0) + { + scr_rendition (0, ~RS_None); + return; } -} -/*}}} */ -/*{{{ process Rob Nation's own graphics mode sequences */ -/* INTPROTO */ -void -rxvt_process_graphics(pR) -{ - unsigned char ch, cmd = rxvt_cmd_getc(aR); + for (i = 0; i < nargs; i++) + { + rendset = -1; + switch (arg[i]) + { + case 0: + rendset = 0, rendstyle = ~RS_None; + break; + case 1: + rendset = 1, rendstyle = RS_Bold; + break; + //case 2: // low intensity + case 3: + rendset = 1, rendstyle = RS_Italic; + break; + case 4: + rendset = 1, rendstyle = RS_Uline; + break; + case 5: // slowly blinking + case 6: // rapidly blinking + rendset = 1, rendstyle = RS_Blink; + break; + //case 6: // scoansi light background + case 7: + rendset = 1, rendstyle = RS_RVid; + break; + case 8: + // invisible. NYI + break; + //case 9: // crossed out + //case 10: // scoansi acs off, primary font + //case 11: // scoansi acs on, first alt font + //case 12: // scoansi acs on, |0x80, second alt font + //... + //case 19: // ninth alt font + //case 20: // gothic + case 21: // disable bold, faint, sometimes doubly underlined (iso 8613) + rendset = 0, rendstyle = RS_Bold; + break; + case 22: // normal intensity + rendset = 0, rendstyle = RS_Bold; + break; + case 23: // disable italic + rendset = 0, rendstyle = RS_Italic; + break; + case 24: + rendset = 0, rendstyle = RS_Uline; + break; + case 25: + rendset = 0, rendstyle = RS_Blink; + break; + case 26: // variable spacing (iso 8613) + rendset = 0, rendstyle = RS_Blink; + break; + case 27: + rendset = 0, rendstyle = RS_RVid; + break; + //case 28: // visible. NYI + //case 29: // not crossed-out + } -#ifndef RXVT_GRAPHICS - if (cmd == 'Q') { /* query graphics */ - rxvt_tt_printf(aR_ "\033G0\n"); /* no graphics */ - return; - } -/* swallow other graphics sequences until terminating ':' */ - do - ch = rxvt_cmd_getc(aR); - while (ch != ':'); -#else - unsigned int nargs; - int args[NGRX_PTS]; - unsigned char *text = NULL; + if (rendset != -1) + { + scr_rendition (rendset, rendstyle); + continue; /* for (;i;) */ + } - if (cmd == 'Q') { /* query graphics */ - rxvt_tt_printf(aR_ "\033G1\n"); /* yes, graphics (color) */ - return; - } - for (nargs = 0; nargs < (sizeof(args) / sizeof(args[0])) - 1;) { - int neg; + switch (arg[i]) + { + case 30: + case 31: /* set fg color */ + case 32: + case 33: + case 34: + case 35: + case 36: + case 37: + scr_color ((unsigned int) (minCOLOR + (arg[i] - 30)), Color_fg); + break; + case 38: // set fg color, ISO 8613-6 + if (nargs > i + 2 && arg[i + 1] == 5) + { + scr_color ((unsigned int) (minCOLOR + arg[i + 2]), Color_fg); + i += 2; + } + break; + case 39: /* default fg */ + scr_color (Color_fg, Color_fg); + break; - ch = rxvt_cmd_getc(aR); - neg = (ch == '-'); - if (neg || ch == '+') - ch = rxvt_cmd_getc(aR); + case 40: + case 41: /* set bg color */ + case 42: + case 43: + case 44: + case 45: + case 46: + case 47: + scr_color ((unsigned int) (minCOLOR + (arg[i] - 40)), Color_bg); + break; + case 48: // set bg color, ISO 8613-6 + if (nargs > i + 2 && arg[i + 1] == 5) + { + scr_color ((unsigned int) (minCOLOR + arg[i + 2]), Color_bg); + i += 2; + } + break; + case 49: /* default bg */ + scr_color (Color_bg, Color_bg); + break; - for (args[nargs] = 0; isdigit(ch); ch = rxvt_cmd_getc(aR)) - args[nargs] = args[nargs] * 10 + (ch - '0'); - if (neg) - args[nargs] = -args[nargs]; + //case 50: // not variable spacing - nargs++; - args[nargs] = 0; - if (ch != ';') - break; +#if ENABLE_FRILLS + case 90: + case 91: /* set bright fg color */ + case 92: + case 93: + case 94: + case 95: + case 96: + case 97: + scr_color ((unsigned int) (minBrightCOLOR + (arg[i] - 90)), Color_fg); + break; + case 100: + case 101: /* set bright bg color */ + case 102: + case 103: + case 104: + case 105: + case 106: + case 107: + scr_color ((unsigned int) (minBrightCOLOR + (arg[i] - 100)), Color_bg); + break; +#endif + } } +} +/*}}} */ - if ((cmd == 'T') && (nargs >= 5)) { - int i, len = args[4]; - - text = rxvt_malloc((len + 1) * sizeof(char)); +/*{{{ (do not) process Rob Nation's own graphics mode sequences */ +void +rxvt_term::process_graphics () +{ + unicode_t ch, cmd = cmd_getc (); - if (text != NULL) { - for (i = 0; i < len; i++) - text[i] = rxvt_cmd_getc(aR); - text[len] = '\0'; - } + if (cmd == 'Q') + { /* query graphics */ + tt_printf ("\033G0\012"); /* no graphics */ + return; } - rxvt_Gr_do_graphics(aR_ cmd, nargs, args, text); -#endif + /* swallow other graphics sequences until terminating ':' */ + do + ch = cmd_getc (); + while (ch != ':'); } /*}}} */ /* ------------------------------------------------------------------------- */ /* - * Send printf() formatted output to the command. + * Send printf () formatted output to the command. * Only use for small amounts of data. */ -/* EXTPROTO */ void -rxvt_tt_printf(pR_ const char *fmt,...) +rxvt_term::tt_printf (const char *fmt,...) { - va_list arg_ptr; - unsigned char buf[256]; + va_list arg_ptr; + char buf[256]; - va_start(arg_ptr, fmt); - vsprintf((char *)buf, fmt, arg_ptr); - va_end(arg_ptr); - rxvt_tt_write(aR_ buf, (unsigned int)STRLEN(buf)); + va_start (arg_ptr, fmt); + vsnprintf ((char *)buf, 256, fmt, arg_ptr); + va_end (arg_ptr); + tt_write (buf, strlen (buf)); } /* ---------------------------------------------------------------------- */ -/* Addresses pasting large amounts of data and rxvt hang - * code pinched from xterm (v_write()) and applied originally to - * rxvt-2.18 - Hops - * Write data to the pty as typed by the user, pasted with the mouse, +/* Write data to the pty as typed by the user, pasted with the mouse, * or generated by us in response to a query ESC sequence. */ -/* EXTPROTO */ +const unsigned int MAX_PTY_WRITE = 255; // minimum MAX_INPUT + void -rxvt_tt_write(pR_ const unsigned char *d, unsigned int len) +rxvt_term::tt_write (const char *data, unsigned int len) { -#define MAX_PTY_WRITE 256 /* POSIX minimum MAX_INPUT */ - int riten; - unsigned int p; - unsigned char *v_buffer, /* start of physical buffer */ - *v_bufstr, /* start of current buffer pending */ - *v_bufptr, /* end of current buffer pending */ - *v_bufend; /* end of physical buffer */ - - if (R->v_bufstr == NULL && len > 0) { - p = (len / MAX_PTY_WRITE + 1) * MAX_PTY_WRITE; - v_buffer = v_bufstr = v_bufptr = (unsigned char *)rxvt_malloc(p); - v_bufend = v_buffer + p; - } else { - v_buffer = R->v_buffer; - v_bufstr = R->v_bufstr; - v_bufptr = R->v_bufptr; - v_bufend = R->v_bufend; - } - - /* - * Append to the block we already have. Always doing this simplifies the - * code, and isn't too bad, either. If this is a short block, it isn't - * too expensive, and if this is a long block, we won't be able to write - * it all anyway. - */ - if (len > 0) { - if (v_bufend < v_bufptr + len) { /* run out of room */ - if (v_bufstr != v_buffer) { - /* there is unused space, move everything down */ - MEMMOVE(v_buffer, v_bufstr, - (unsigned int)(v_bufptr - v_bufstr)); - v_bufptr -= v_bufstr - v_buffer; - v_bufstr = v_buffer; - } - if (v_bufend < v_bufptr + len) { - /* still won't fit: get more space */ - /* use most basic realloc because an error is not fatal. */ - unsigned int size = v_bufptr - v_buffer; - unsigned int reallocto; - - reallocto = ((size + len) / MAX_PTY_WRITE + 1) * MAX_PTY_WRITE; - v_buffer = (unsigned char *)realloc(v_buffer, reallocto); - /* save across realloc */ - if (v_buffer) { - v_bufstr = v_buffer; - v_bufptr = v_buffer + size; - v_bufend = v_buffer + reallocto; - } else { /* no memory: ignore entire write request */ - rxvt_print_error("data loss: cannot allocate buffer space"); - v_buffer = v_bufstr; /* restore clobbered pointer */ - } - } - } - if (v_bufend >= v_bufptr + len) { /* new stuff will fit */ - MEMCPY(v_bufptr, d, len); - v_bufptr += len; - } - } - - /* - * Write out as much of the buffer as we can. - * Be careful not to overflow the pty's input silo. - * We are conservative here and only write a small amount at a time. - * - * If we can't push all the data into the pty yet, we expect write - * to return a non-negative number less than the length requested - * (if some data written) or -1 and set errno to EAGAIN, - * EWOULDBLOCK, or EINTR (if no data written). - * - * (Not all systems do this, sigh, so the code is actually - * a little more forgiving.) - */ - if ((p = v_bufptr - v_bufstr) > 0) { - riten = write(R->cmd_fd, v_bufstr, min(p, MAX_PTY_WRITE)); - if (riten < 0) - riten = 0; - v_bufstr += riten; - if (v_bufstr >= v_bufptr) /* we wrote it all */ - v_bufstr = v_bufptr = v_buffer; - } - /* - * If we have lots of unused memory allocated, return it - */ - if (v_bufend - v_bufptr > MAX_PTY_WRITE * 8) { /* arbitrary hysteresis */ - /* save pointers across realloc */ - unsigned int start = v_bufstr - v_buffer; - unsigned int size = v_bufptr - v_buffer; - unsigned int reallocto; - - reallocto = (size / MAX_PTY_WRITE + 1) * MAX_PTY_WRITE; - v_buffer = (unsigned char *)realloc(v_buffer, reallocto); - if (v_buffer) { - v_bufstr = v_buffer + start; - v_bufptr = v_buffer + size; - v_bufend = v_buffer + reallocto; - } else { - /* should we print a warning if couldn't return memory? */ - v_buffer = v_bufstr - start; /* restore clobbered pointer */ - } - } - R->v_buffer = v_buffer; - R->v_bufstr = v_bufstr; - R->v_bufptr = v_bufptr; - R->v_bufend = v_bufend; + if (pty.pty < 0) + return; + + if (v_buflen == 0) + { + ssize_t written = write (pty.pty, data, min (len, MAX_PTY_WRITE)); + + if ((unsigned int)written == len) + return; + + data += written; + len -= written; + } + + v_buffer = (char *)realloc (v_buffer, v_buflen + len); + + memcpy (v_buffer + v_buflen, data, len); + v_buflen += len; + + pty_ev.set (EVENT_READ | EVENT_WRITE); } + +void rxvt_term::pty_write () +{ + int written = write (pty.pty, v_buffer, min (v_buflen, MAX_PTY_WRITE)); + + if (written > 0) + { + v_buflen -= written; + + if (v_buflen == 0) + { + free (v_buffer); + v_buffer = 0; + v_buflen = 0; + + pty_ev.set (EVENT_READ); + return; + } + + memmove (v_buffer, v_buffer + written, v_buflen); + } + else if (written != -1 || (errno != EAGAIN && errno != EINTR)) + pty_ev.set (EVENT_READ); +} + /*----------------------- end-of-file (C source) -----------------------*/