1 /*--------------------------------*-C-*---------------------------------*
3 *----------------------------------------------------------------------*
5 * All portions of code are copyright by their respective author/s.
6 * Copyright (c) 1992 John Bovey, University of Kent at Canterbury <jdb@ukc.ac.uk>
8 * Copyright (c) 1994 Robert Nation <nation@rocket.sanders.lockheed.com>
9 * - extensive modifications
10 * Copyright (c) 1995 Garrett D'Amore <garrett@netcom.com>
12 * Copyright (c) 1995 Steven Hirsch <hirsch@emba.uvm.edu>
13 * - X11 mouse report mode and support for
14 * DEC "private mode" save/restore functions.
15 * Copyright (c) 1995 Jakub Jelinek <jj@gnu.ai.mit.edu>
16 * - key-related changes to handle Shift+function
18 * Copyright (c) 1997 MJ Olesen <olesen@me.queensu.ca>
19 * - extensive modifications
20 * Copyright (c) 1997 Raul Garcia Garcia <rgg@tid.es>
21 * - modification and cleanups for Solaris 2.x
23 * Copyright (c) 1997,1998 Oezguer Kesim <kesim@math.fu-berlin.de>
24 * Copyright (c) 1998-2001 Geoff Wing <gcw@pobox.com>
25 * - extensive modifications
26 * Copyright (c) 1998 Alfredo K. Kojima <kojima@windowmaker.org>
27 * Copyright (c) 2001 Marius Gedminas
28 * - Ctrl/Mod4+Tab works like Meta+Tab (options)
29 * Copyright (c) 2003 Rob McMullen <robm@flipturn.org>
30 * Copyright (c) 2003-2004 Marc Lehmann <pcg@goof.com>
32 * This program is free software; you can redistribute it and/or modify
33 * it under the terms of the GNU General Public License as published by
34 * the Free Software Foundation; either version 2 of the License, or
35 * (at your option) any later version.
37 * This program is distributed in the hope that it will be useful,
38 * but WITHOUT ANY WARRANTY; without even the implied warranty of
39 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
40 * GNU General Public License for more details.
42 * You should have received a copy of the GNU General Public License
43 * along with this program; if not, write to the Free Software
44 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
45 *----------------------------------------------------------------------*/
48 #include "../config.h" /* NECESSARY */
49 #include "rxvt.h" /* NECESSARY */
55 /*----------------------------------------------------------------------*/
57 /*{{{ Convert the keypress event into a string */
59 rxvt_term::lookup_key (XKeyEvent &ev)
61 int ctrl, meta, shft, len;
65 static int debug_key = 1; /* accessible by a debugger only */
68 unsigned char kbuf[KBUFSZ];
71 * use Num_Lock to toggle Keypad on/off. If Num_Lock is off, allow an
72 * escape sequence to toggle the Keypad.
74 * Always permit `shift' to override the current setting
76 shft = (ev.state & ShiftMask);
77 ctrl = (ev.state & ControlMask);
78 meta = (ev.state & ModMetaMask);
80 if (numlock_state || (ev.state & ModNumLockMask))
82 numlock_state = (ev.state & ModNumLockMask);
83 PrivMode ((!numlock_state), PrivMode_aplKP);
93 #ifdef X_HAVE_UTF8_STRING
94 if (enc_utf8 && 0) // currently disabled, doesn't seem to work, nor is useful
95 len = Xutf8LookupString (Input_Context, &ev, (char *)kbuf,
96 KBUFSZ, &keysym, &status_return);
100 wchar_t wkbuf[KBUFSZ + 1];
102 // the XOpenIM manpage lies about hardcoding the locale
103 // at the point of XOpenIM, so temporarily switch locales
105 SET_LOCALE (rs[Rs_imLocale]);
106 // assume wchar_t == unicode or better
107 len = XwcLookupString (Input_Context, &ev, wkbuf,
108 KBUFSZ, &keysym, &status_return);
112 if (status_return == XLookupChars
113 || status_return == XLookupBoth)
115 /* make sure the user can type ctrl-@, i.e. NUL */
116 if (len == 1 && *wkbuf == 0)
124 len = wcstombs ((char *)kbuf, wkbuf, KBUFSZ);
133 valid_keysym = status_return == XLookupKeySym
134 || status_return == XLookupBoth;
139 len = XLookupString (&ev, (char *)kbuf, KBUFSZ, &keysym, &compose);
140 valid_keysym = keysym != NoSymbol;
145 /* for some backwards compatibility */
146 #if defined(HOTKEY_CTRL) || defined(HOTKEY_META)
153 if (keysym == ks_bigfont)
155 change_font (FONT_UP);
158 else if (keysym == ks_smallfont)
160 change_font (FONT_DN);
166 if (TermWin.saveLines)
168 #ifdef UNSHIFTED_SCROLLKEYS
177 #ifdef PAGING_CONTEXT_LINES
178 lnsppg = TermWin.nrow - PAGING_CONTEXT_LINES;
180 lnsppg = TermWin.nrow * 4 / 5;
182 if (keysym == XK_Prior)
184 scr_page (UP, lnsppg);
187 else if (keysym == XK_Next)
189 scr_page (DN, lnsppg);
193 #ifdef SCROLL_ON_UPDOWN_KEYS
201 else if (keysym == XK_Down)
208 #ifdef SCROLL_ON_HOMEEND_KEYS
211 if (keysym == XK_Home)
216 else if (keysym == XK_End)
227 /* Shift + F1 - F10 generates F11 - F20 */
228 if (keysym >= XK_F1 && keysym <= XK_F10)
230 keysym += (XK_F11 - XK_F1);
231 shft = 0; /* turn off Shift */
233 else if (!ctrl && !meta && (PrivateModes & PrivMode_ShiftKeys))
237 /* normal XTerm key bindings */
238 case XK_Insert: /* Shift+Insert = paste mouse selection */
239 selection_request (ev.time, 0, 0);
242 case XK_KP_Add: /* Shift+KP_Add = bigger font */
243 change_font (FONT_UP);
245 case XK_KP_Subtract: /* Shift+KP_Subtract = smaller font */
246 change_font (FONT_DN);
252 if (keysym == XK_Print)
254 scr_printscreen (ctrl | shft);
259 if (keysym >= 0xFF00 && keysym <= 0xFFFF)
261 #ifdef KEYSYM_RESOURCE
262 if (! (shft | ctrl) && Keysym_map[keysym & 0xFF] != NULL)
265 const unsigned char *kbuf0;
266 const unsigned char ch = C0_ESC;
268 kbuf0 = (Keysym_map[keysym & 0xFF]);
269 l = (unsigned int)*kbuf0++;
274 if (meta_char == C0_ESC)
286 #ifndef NO_BACKSPACE_KEY
288 if (PrivateModes & PrivMode_HaveBackSpace)
290 kbuf[0] = (!! (PrivateModes & PrivMode_BackSpace)
291 ^ !!ctrl) ? '\b' : '\177';
295 STRCPY (kbuf, key_backspace);
296 # ifdef MULTICHAR_SET
297 if ((Options & Opt_mc_hack) && screen.cur.col > 0)
301 newlen = STRLEN (kbuf);
302 col = screen.cur.col - 1;
303 row = screen.cur.row + TermWin.saveLines;
304 if (IS_MULTI2 (screen.rend[row][col]))
305 MEMMOVE (kbuf + newlen, kbuf, newlen + 1);
310 #ifndef NO_DELETE_KEY
312 STRCPY (kbuf, key_delete);
313 # ifdef MULTICHAR_SET
314 if (Options & Opt_mc_hack)
318 newlen = STRLEN (kbuf);
319 col = screen.cur.col;
320 row = screen.cur.row + TermWin.saveLines;
321 if (IS_MULTI1 (screen.rend[row][col]))
322 MEMMOVE (kbuf + newlen, kbuf, newlen + 1);
329 STRCPY (kbuf, "\033[Z");
332 #ifdef CTRL_TAB_MAKES_META
336 #ifdef MOD4_TAB_MAKES_META
337 if (ev.state & Mod4Mask)
345 case XK_KP_Up: /* \033Ox or standard */
346 case XK_KP_Down: /* \033Or or standard */
347 case XK_KP_Right: /* \033Ov or standard */
348 case XK_KP_Left: /* \033Ot or standard */
349 if ((PrivateModes & PrivMode_aplKP) ? !shft : shft)
351 STRCPY (kbuf, "\033OZ");
352 kbuf[2] = "txvr"[keysym - XK_KP_Left];
356 /* translate to std. cursor key */
357 keysym = XK_Left + (keysym - XK_KP_Left);
360 case XK_Up: /* "\033[A" */
361 case XK_Down: /* "\033[B" */
362 case XK_Right: /* "\033[C" */
363 case XK_Left: /* "\033[D" */
364 STRCPY (kbuf, "\033[Z");
365 kbuf[2] = "DACB"[keysym - XK_Left];
368 kbuf[2] = "dacb"[keysym - XK_Left];
372 kbuf[2] = "dacb"[keysym - XK_Left];
374 else if (PrivateModes & PrivMode_aplCUR)
378 if (Options & Opt_mc_hack)
382 col = screen.cur.col;
383 row = screen.cur.row + TermWin.saveLines;
385 if (keysym == XK_Right
386 && IS_MULTI1 (screen.rend[row][col]))
388 else if (keysym == XK_Left)
392 if (IS_MULTI2 (screen.rend[row][col - 1]))
395 else if (screen.cur.row > 0)
397 col = screen.tlen[--row];
399 col = TermWin.ncol - 1;
403 && IS_MULTI2 (screen.rend[row][col]))
408 MEMMOVE (kbuf + 3, kbuf, 3 + 1);
413 #ifndef UNSHIFTED_SCROLLKEYS
416 /* allow shift to override */
417 if ((PrivateModes & PrivMode_aplKP) ? !shft : shft)
419 STRCPY (kbuf, "\033Oy");
425 STRCPY (kbuf, "\033[5~");
429 /* allow shift to override */
430 if ((PrivateModes & PrivMode_aplKP) ? !shft : shft)
432 STRCPY (kbuf, "\033Os");
438 STRCPY (kbuf, "\033[6~");
442 /* allow shift to override */
443 if ((PrivateModes & PrivMode_aplKP) ? !shft : shft)
445 STRCPY (kbuf, "\033OM");
456 STRCPY (kbuf, "\033Ou");
460 STRCPY (kbuf, "\033Op");
464 STRCPY (kbuf, "\033On");
467 case XK_KP_F1: /* "\033OP" */
468 case XK_KP_F2: /* "\033OQ" */
469 case XK_KP_F3: /* "\033OR" */
470 case XK_KP_F4: /* "\033OS" */
471 STRCPY (kbuf, "\033OP");
472 kbuf[2] += (keysym - XK_KP_F1);
475 case XK_KP_Multiply: /* "\033Oj" : "*" */
476 case XK_KP_Add: /* "\033Ok" : "+" */
477 case XK_KP_Separator: /* "\033Ol" : "," */
478 case XK_KP_Subtract: /* "\033Om" : "-" */
479 case XK_KP_Decimal: /* "\033On" : "." */
480 case XK_KP_Divide: /* "\033Oo" : "/" */
481 case XK_KP_0: /* "\033Op" : "0" */
482 case XK_KP_1: /* "\033Oq" : "1" */
483 case XK_KP_2: /* "\033Or" : "2" */
484 case XK_KP_3: /* "\033Os" : "3" */
485 case XK_KP_4: /* "\033Ot" : "4" */
486 case XK_KP_5: /* "\033Ou" : "5" */
487 case XK_KP_6: /* "\033Ov" : "6" */
488 case XK_KP_7: /* "\033Ow" : "7" */
489 case XK_KP_8: /* "\033Ox" : "8" */
490 case XK_KP_9: /* "\033Oy" : "9" */
491 /* allow shift to override */
492 if ((PrivateModes & PrivMode_aplKP) ? !shft : shft)
494 STRCPY (kbuf, "\033Oj");
495 kbuf[2] += (keysym - XK_KP_Multiply);
499 kbuf[0] = ('*' + (keysym - XK_KP_Multiply));
505 STRCPY (kbuf, "\033[1~");
508 STRCPY (kbuf, "\033[2~");
510 #ifdef DXK_Remove /* support for DEC remove like key */
515 STRCPY (kbuf, "\033[3~");
518 STRCPY (kbuf, "\033[4~");
522 /* allow shift to override */
523 if ((PrivateModes & PrivMode_aplKP) ? !shft : shft)
525 STRCPY (kbuf, "\033Oq");
531 STRCPY (kbuf, KS_END);
535 /* allow shift to override */
536 if ((PrivateModes & PrivMode_aplKP) ? !shft : shft)
538 STRCPY (kbuf, "\033Ow");
544 STRCPY (kbuf, KS_HOME);
547 #define FKEY(n, fkey) \
548 sprintf ((char *)kbuf,"\033[%2d~", (int) ((n) + (keysym - fkey)))
550 case XK_F1: /* "\033[11~" */
551 case XK_F2: /* "\033[12~" */
552 case XK_F3: /* "\033[13~" */
553 case XK_F4: /* "\033[14~" */
554 case XK_F5: /* "\033[15~" */
557 case XK_F6: /* "\033[17~" */
558 case XK_F7: /* "\033[18~" */
559 case XK_F8: /* "\033[19~" */
560 case XK_F9: /* "\033[20~" */
561 case XK_F10: /* "\033[21~" */
564 case XK_F11: /* "\033[23~" */
565 case XK_F12: /* "\033[24~" */
566 case XK_F13: /* "\033[25~" */
567 case XK_F14: /* "\033[26~" */
570 case XK_F15: /* "\033[28~" */
571 case XK_F16: /* "\033[29~" */
574 case XK_Help: /* "\033[28~" */
577 case XK_Menu: /* "\033[29~" */
580 case XK_F17: /* "\033[31~" */
581 case XK_F18: /* "\033[32~" */
582 case XK_F19: /* "\033[33~" */
583 case XK_F20: /* "\033[34~" */
584 case XK_F21: /* "\033[35~" */
585 case XK_F22: /* "\033[36~" */
586 case XK_F23: /* "\033[37~" */
587 case XK_F24: /* "\033[38~" */
588 case XK_F25: /* "\033[39~" */
589 case XK_F26: /* "\033[40~" */
590 case XK_F27: /* "\033[41~" */
591 case XK_F28: /* "\033[42~" */
592 case XK_F29: /* "\033[43~" */
593 case XK_F30: /* "\033[44~" */
594 case XK_F31: /* "\033[45~" */
595 case XK_F32: /* "\033[46~" */
596 case XK_F33: /* "\033[47~" */
597 case XK_F34: /* "\033[48~" */
598 case XK_F35: /* "\033[49~" */
610 * Pass meta for all function keys, if 'meta' option set
613 if (meta && (meta_char == 0x80) && len > 0)
614 kbuf[len - 1] |= 0x80;
618 else if (ctrl && keysym == XK_minus)
621 kbuf[0] = '\037'; /* Ctrl-Minus generates ^_ (31) */
627 if (meta && (meta_char == 0x80))
631 for (ch = kbuf; ch < kbuf + len; ch++)
641 return; /* not mapped */
643 if (Options & Opt_scrollTtyKeypress)
644 if (TermWin.view_start)
646 TermWin.view_start = 0;
651 * these modifications only affect the static keybuffer
652 * pass Shift/Control indicators for function keys ending with `~'
656 * Shift+Prior = "ESC[5$"
657 * Ctrl+Prior = "ESC[5^"
658 * Ctrl+Shift+Prior = "ESC[5@"
659 * Meta adds an Escape prefix (with META8_OPTION, if meta == <escape>).
661 if (kbuf[0] == C0_ESC && kbuf[1] == '[' && kbuf[len - 1] == '~')
662 kbuf[len - 1] = (shft ? (ctrl ? '@' : '$') : (ctrl ? '^' : '~'));
667 && meta_char == C0_ESC
671 const unsigned char ch = C0_ESC;
675 #if defined(DEBUG_CMD)
676 /* Display keyboard buffer contents */
680 fprintf (stderr, "key 0x%04X [%d]: `", (unsigned int)keysym, len);
681 for (i = 0, p = kbuf; i < len; i++, p++)
682 fprintf (stderr, (*p >= ' ' && *p < '\177' ? "%c" : "\\%03o"), *p);
683 fprintf (stderr, "'\n");
684 #endif /* DEBUG_CMD */
685 tt_write (kbuf, (unsigned int)len);
690 /*{{{ rxvt_cmd_write (), rxvt_cmd_getc () */
691 /* attempt to `write' count to the input buffer */
693 rxvt_term::cmd_write (const unsigned char *str, unsigned int count)
697 n = cmdbuf_ptr - cmdbuf_base;
698 s = cmdbuf_base + BUFSIZ - 1 - cmdbuf_endp;
699 if (n > 0 && s < count)
701 MEMMOVE (cmdbuf_base, cmdbuf_ptr,
702 (unsigned int) (cmdbuf_endp - cmdbuf_ptr));
703 cmdbuf_ptr = cmdbuf_base;
709 rxvt_print_error ("data loss: cmd_write too large");
713 *cmdbuf_endp++ = *str++;
716 #endif /* MENUBAR_MAX */
722 if (want_full_refresh)
724 want_full_refresh = 0;
733 scr_refresh (refresh_type);
745 rxvt_term::check_cb (check_watcher &w)
755 rxvt_term::cursor_blink_cb (time_watcher &w)
757 hidden_cursor = !hidden_cursor;
760 w.start (w.at + BLINK_INTERVAL);
766 rxvt_term::text_blink_cb (time_watcher &w)
768 if (scr_refresh_rend (RS_Blink, RS_Blink))
770 hidden_text = !hidden_text;
772 w.start (w.at + TEXT_BLINK_INTERVAL);
778 rxvt_term::pty_fill ()
780 ssize_t n = cmdbuf_endp - cmdbuf_ptr;
782 memmove (cmdbuf_base, cmdbuf_ptr, n);
783 cmdbuf_ptr = cmdbuf_base;
784 cmdbuf_endp = cmdbuf_ptr + n;
786 n = read (cmd_fd, cmdbuf_endp, BUFSIZ - n);
793 else if (n < 0 && errno != EAGAIN)
800 rxvt_term::pty_cb (io_watcher &w, short revents)
805 if (revents & EVENT_WRITE)
807 else if (revents & EVENT_READ)
811 // loop, but don't allow a single term to monopolize us
812 // the number of loops is fully arbitrary, and thus wrong
813 while (flag && pty_fill ())
818 /* once we know the shell is running, send the screen size. Again! */
822 uint32_t ch = NOCHAR;
829 if (ch == NOCHAR) // TODO: improve
832 if (ch >= ' ' || ch == '\t' || ch == '\n' || ch == '\r')
834 /* Read a text string from the input buffer */
835 uint32_t buf[BUFSIZ];
836 bool refreshnow = false;
846 if (ch == NOCHAR || (ch < ' ' && ch != '\t' && ch != '\n' && ch != '\r'))
857 if (! (Options & Opt_jumpScroll)
858 || (refresh_count >= (refresh_limit * (TermWin.nrow - 1))))
866 // scr_add_lines only works for nlines < TermWin.nrow - 1.
867 if (nlines >= TermWin.nrow - 1)
869 scr_add_lines (buf, nlines, str - buf);
875 if (str >= buf + BUFSIZ)
883 scr_add_lines (buf, nlines, str - buf);
886 * If there have been a lot of new lines, then update the screen
887 * What the heck I'll cheat and only refresh less than every page-full.
888 * the number of pages between refreshes is refresh_limit, which
889 * is incremented here because we must be doing flat-out scrolling.
891 * refreshing should be correct for small scrolls, because of the
896 if ((Options & Opt_jumpScroll) && refresh_limit < REFRESH_PERIOD)
899 scr_refresh (refresh_type);
908 process_nonprinting (ch);
910 case C0_ESC: /* escape char */
911 process_escape_seq ();
913 /*case 0x9b: */ /* CSI */
914 /* process_csi_seq (); */
924 // read the next character, currently handles UTF-8
925 // will probably handle all sorts of other stuff in the future
927 rxvt_term::next_char ()
929 while (cmdbuf_ptr < cmdbuf_endp)
931 if (*cmdbuf_ptr < 0x80) // assume < 0x80 to be ascii ALWAYS (all shift-states etc.) uh-oh
932 return *cmdbuf_ptr++;
935 size_t len = mbrtowc (&wc, (char *)cmdbuf_ptr, cmdbuf_endp - cmdbuf_ptr, mbstate);
937 if (len == (size_t)-2)
940 if (len == (size_t)-1)
941 return *cmdbuf_ptr++; // the _occasional_ latin1 character is allowed to slip through
943 // assume wchar == unicode
951 /* rxvt_cmd_getc () - Return next input character */
953 * Return the next input character after first passing any keyboard input
957 rxvt_term::cmd_getc ()
961 uint32_t c = next_char ();
965 // incomplete sequences should occur rarely, still, a better solution
966 // would be preferred. either setjmp/longjmp or better design.
967 fcntl (cmd_fd, F_SETFL, 0);
969 fcntl (cmd_fd, F_SETFL, O_NONBLOCK);
975 rxvt_term::pointer_unblank ()
977 XDefineCursor (display->display, TermWin.vt, TermWin_cursor);
982 if (Options & Opt_pointerBlank)
983 pointer_ev.start (NOW + pointerBlankDelay);
987 rxvt_term::pointer_blank ()
989 if (! (Options & Opt_pointerBlank))
992 XDefineCursor (display->display, TermWin.vt, blank_cursor);
993 XFlush (display->display);
999 rxvt_term::pointer_cb (time_watcher &w)
1002 SET_LOCALE (locale);
1009 rxvt_term::mouse_report (const XButtonEvent &ev)
1011 int button_number, key_state = 0;
1016 pixel_position (&x, &y);
1018 if (MEvent.button == AnyButton)
1024 button_number = MEvent.button - Button1;
1025 /* add 0x3D for wheel events, like xterm does */
1026 if (button_number >= 3)
1027 button_number += (64 - 3);
1030 if (PrivateModes & PrivMode_MouseX10)
1033 * do not report ButtonRelease
1034 * no state info allowed
1037 if (button_number == 3)
1042 /* XTerm mouse reporting needs these values:
1046 * plus will add in our own Double-Click reporting
1049 key_state = ((MEvent.state & ShiftMask) ? 4 : 0)
1050 + ((MEvent.state & ModMetaMask) ? 8 : 0)
1051 + ((MEvent.state & ControlMask) ? 16 : 0);
1052 #ifdef MOUSE_REPORT_DOUBLECLICK
1053 key_state += ((MEvent.clicks > 1) ? 32 : 0);
1058 #ifdef DEBUG_MOUSEREPORT
1059 fprintf (stderr, "Mouse [");
1061 fputc ('C', stderr);
1063 fputc ('S', stderr);
1065 fputc ('A', stderr);
1067 fputc ('2', stderr);
1068 fprintf (stderr, "]: <%d>, %d/%d\n",
1073 tt_printf ("\033[M%c%c%c",
1074 (32 + button_number + key_state),
1082 rxvt_W11_process_x_event (XEvent *ev)
1084 rxvt_t *r = rxvt_get_r ();
1090 /*{{{ process an X event */
1092 rxvt_term::x_cb (XEvent &ev)
1095 SET_LOCALE (locale);
1097 #if defined(CURSOR_BLINK)
1098 if ((Options & Opt_cursorBlink) && ev.type == KeyPress)
1106 cursor_blink_ev.start (NOW + BLINK_INTERVAL);
1110 #if defined(POINTER_BLANK)
1111 if ((Options & Opt_pointerBlank) && pointerBlankDelay > 0)
1113 if (ev.type == MotionNotify
1114 || ev.type == ButtonPress
1115 || ev.type == ButtonRelease)
1119 if (ev.type == KeyPress && hidden_pointer == 0)
1125 if (XFilterEvent (&ev, None))
1129 Window unused_root, unused_child;
1130 int unused_root_x, unused_root_y;
1131 unsigned int unused_mask;
1134 const char *const eventnames[] =
1135 { /* mason - this matches my system */
1177 (void)gettimeofday (&tp, NULL);
1178 ltt = localtime (& (tp.tv_sec));
1179 D_X ((stderr, "Event: %-16s %-7s %08lx (%4d-%02d-%02d %02d:%02d:%02d.%.6ld) %s %lu", eventnames[ev.type], (ev.xany.window == TermWin.parent[0] ? "parent" : (ev.xany.window == TermWin.vt ? "vt" : (ev.xany.window == scrollBar.win ? "scroll" : (ev.xany.window == menuBar.win ? "menubar" : "UNKNOWN")))), (ev.xany.window == TermWin.parent[0] ? TermWin.parent[0] : (ev.xany.window == TermWin.vt ? TermWin.vt : (ev.xany.window == scrollBar.win ? scrollBar.win : (ev.xany.window == menuBar.win ? 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));
1185 lookup_key (ev.xkey);
1188 #if defined(MOUSE_WHEEL) && defined(MOUSE_SLIP_WHEELING)
1191 if (! (ev.xkey.state & ControlMask))
1192 mouse_slip_wheel_speed = 0;
1197 ks = XKeycodeToKeysym (display->display, ev.xkey.keycode, 0);
1198 if (ks == XK_Control_L || ks == XK_Control_R)
1199 mouse_slip_wheel_speed = 0;
1206 button_press (ev.xbutton);
1210 button_release (ev.xbutton);
1214 if (ev.xclient.format == 32
1215 && (Atom)ev.xclient.data.l[0] == xa[XA_WMDELETEWINDOW])
1218 /* OffiX Dnd (drag 'n' drop) protocol */
1219 else if (ev.xclient.message_type == xa[XA_DNDPROTOCOL]
1220 && (ev.xclient.data.l[0] == DndFile
1221 || ev.xclient.data.l[0] == DndDir
1222 || ev.xclient.data.l[0] == DndLink))
1227 unsigned char *data;
1228 unsigned long Size, RemainingBytes;
1230 XGetWindowProperty (display->display, display->root,
1231 xa[XA_DNDSELECTION],
1233 False, AnyPropertyType,
1234 &ActualType, &ActualFormat,
1235 &Size, &RemainingBytes,
1237 XChangeProperty (display->display, display->root,
1238 XA_CUT_BUFFER0, XA_STRING,
1240 data, STRLEN (data));
1241 selection_paste (display->root, XA_CUT_BUFFER0, True);
1242 XSetInputFocus (display->display, display->root, RevertToNone, CurrentTime);
1244 #endif /* OFFIX_DND */
1248 XRefreshKeyboardMapping (& (ev.xmapping));
1252 * XXX: this is not the _current_ arrangement
1253 * Here's my conclusion:
1254 * If the window is completely unobscured, use bitblt's
1255 * to scroll. Even then, they're only used when doing partial
1256 * screen scrolling. When partially obscured, we have to fill
1257 * in the GraphicsExpose parts, which means that after each refresh,
1258 * we need to wait for the graphics expose or Noexpose events,
1259 * which ought to make things real slow!
1261 case VisibilityNotify:
1262 switch (ev.xvisibility.state)
1264 case VisibilityUnobscured:
1265 refresh_type = FAST_REFRESH;
1267 case VisibilityPartiallyObscured:
1268 refresh_type = SLOW_REFRESH;
1271 refresh_type = NO_REFRESH;
1282 if (Input_Context != NULL)
1283 XSetICFocus (Input_Context);
1286 if (Options & Opt_cursorBlink)
1287 cursor_blink_ev.start (NOW + BLINK_INTERVAL);
1299 if (Input_Context != NULL)
1300 XUnsetICFocus (Input_Context);
1303 if (Options & Opt_cursorBlink)
1304 cursor_blink_ev.stop ();
1311 case ConfigureNotify:
1312 if (ev.xconfigure.window == TermWin.parent[0])
1317 { /* Wrap lots of configures into one */
1318 width = ev.xconfigure.width;
1319 height = ev.xconfigure.height;
1320 D_SIZE ((stderr, "Size: ConfigureNotify: %4d x %4d", width, height));
1322 while (XCheckTypedWindowEvent (display->display, ev.xconfigure.window, ConfigureNotify, &ev));
1324 if (szHint.width != width || szHint.height != height)
1326 D_SIZE ((stderr, "Size: Resizing from: %4d x %4d", szHint.width, szHint.height));
1327 resize_all_windows (width, height, 1);
1332 D_SIZE ((stderr, "Size: Not resizing"));
1335 #ifdef TRANSPARENT /* XXX: maybe not needed - leave in for now */
1336 if (Options & Opt_transparent)
1338 check_our_parents ();
1340 want_full_refresh = 1;
1347 case SelectionClear:
1348 display->set_selection_owner (0);
1351 case SelectionNotify:
1352 if (selection_wait == Sel_normal)
1353 selection_paste (ev.xselection.requestor,
1354 ev.xselection.property, True);
1357 case SelectionRequest:
1358 selection_send (ev.xselectionrequest);
1364 text_blink_ev.stop ();
1371 text_blink_ev.start (NOW + TEXT_BLINK_INTERVAL);
1376 case ReparentNotify:
1379 #endif /* TRANSPARENT */
1381 case GraphicsExpose:
1383 if (ev.xany.window == TermWin.vt)
1385 #ifdef NO_SLOW_LINK_SUPPORT
1386 scr_expose (ev.xexpose.x, ev.xexpose.y,
1387 ev.xexpose.width, ev.xexpose.height, False);
1389 // don't understand this, so commented it out
1390 scr_expose (ev.xexpose.x, ev.xexpose.y,
1391 ev.xexpose.width, ev.xexpose.height, False);
1392 //scr_expose (ev.xexpose.x, 0,
1393 // ev.xexpose.width, TermWin.height, False);
1399 XEvent unused_event;
1401 while (XCheckTypedWindowEvent (display->display, ev.xany.window,
1404 while (XCheckTypedWindowEvent (display->display, ev.xany.window,
1407 if (isScrollbarWindow (ev.xany.window))
1409 scrollBar.setIdle ();
1413 if (menubar_visible () && isMenuBarWindow (ev.xany.window))
1420 #ifdef POINTER_BLANK
1425 if (isMenuBarWindow (ev.xany.window))
1427 menubar_control (& (ev.xbutton));
1431 if ((PrivateModes & PrivMode_mouse_report) && ! (bypass_keystate))
1434 if (ev.xany.window == TermWin.vt)
1436 if ((ev.xbutton.state & (Button1Mask | Button3Mask)))
1438 while (XCheckTypedWindowEvent (display->display, TermWin.vt, MotionNotify, &ev))
1441 XQueryPointer (display->display, TermWin.vt,
1442 &unused_root, &unused_child,
1443 &unused_root_x, &unused_root_y,
1444 & (ev.xbutton.x), & (ev.xbutton.y),
1446 #ifdef MOUSE_THRESHOLD
1447 /* deal with a `jumpy' mouse */
1448 if ((ev.xmotion.time - MEvent.time) > MOUSE_THRESHOLD)
1451 selection_extend ((ev.xbutton.x), (ev.xbutton.y),
1452 (ev.xbutton.state & Button3Mask) ? 2 : 0);
1453 #ifdef SELECTION_SCROLLING
1454 if (ev.xbutton.y < TermWin.int_bwidth
1455 || Pixel2Row (ev.xbutton.y) > (TermWin.nrow-1))
1459 pending_scroll_selection=1;
1461 /* don't clobber the current delay if we are
1462 * already in the middle of scrolling.
1464 if (scroll_selection_delay<=0)
1465 scroll_selection_delay=SCROLLBAR_CONTINUOUS_DELAY;
1467 /* save the event params so we can highlight
1468 * the selection in the pending-scroll loop
1470 selection_save_x=ev.xbutton.x;
1471 selection_save_y=ev.xbutton.y;
1472 selection_save_state=
1473 (ev.xbutton.state & Button3Mask) ? 2 : 0;
1475 /* calc number of lines to scroll */
1476 if (ev.xbutton.y<TermWin.int_bwidth)
1478 scroll_selection_dir = UP;
1479 dist = TermWin.int_bwidth - ev.xbutton.y;
1483 scroll_selection_dir = DN;
1484 dist = ev.xbutton.y -
1485 (TermWin.int_bwidth + TermWin.height);
1487 scroll_selection_lines= (Pixel2Height (dist)/
1488 SELECTION_SCROLL_LINE_SPEEDUP)+1;
1489 MIN_IT (scroll_selection_lines,
1490 SELECTION_SCROLL_MAX_LINES);
1494 /* we are within the text window, so we
1495 * shouldn't be scrolling
1497 pending_scroll_selection = 0;
1500 #ifdef MOUSE_THRESHOLD
1507 else if (isScrollbarWindow (ev.xany.window) && scrollbar_isMotion ())
1509 while (XCheckTypedWindowEvent (display->display, scrollBar.win,
1510 MotionNotify, &ev)) ;
1511 XQueryPointer (display->display, scrollBar.win,
1512 &unused_root, &unused_child,
1513 &unused_root_x, &unused_root_y,
1514 & (ev.xbutton.x), & (ev.xbutton.y),
1516 scr_move_to (scrollbar_position (ev.xbutton.y) - csrO,
1518 scr_refresh (refresh_type);
1527 rxvt_term::rootwin_cb (XEvent &ev)
1530 SET_LOCALE (locale);
1534 case PropertyNotify:
1535 if (ev.xproperty.atom == xa[XA_VT_SELECTION])
1537 if (ev.xproperty.state == PropertyNewValue)
1538 selection_property (ev.xproperty.window, ev.xproperty.atom);
1545 * if user used some Esetroot compatible prog to set the root bg,
1546 * use the property to determine the pixmap. We use it later on.
1548 if (xa[XA_XROOTPMAPID] == 0)
1549 xa[XA_XROOTPMAPID] = XInternAtom (display->display, "_XROOTPMAP_ID", False);
1551 if (ev.xproperty.atom != xa[XA_XROOTPMAPID])
1556 case ReparentNotify:
1557 if ((Options & Opt_transparent) && check_our_parents ())
1559 want_full_refresh = 1;
1566 rxvt_term::button_press (const XButtonEvent &ev)
1568 int reportmode = 0, clickintime;
1570 bypass_keystate = ev.state & (ModMetaMask | ShiftMask);
1571 if (!bypass_keystate)
1572 reportmode = !! (PrivateModes & PrivMode_mouse_report);
1574 * VT window processing of button press
1576 if (ev.window == TermWin.vt)
1578 clickintime = ev.time - MEvent.time < MULTICLICK_TIME;
1581 /* mouse report from vt window */
1582 /* save the xbutton state (for ButtonRelease) */
1583 MEvent.state = ev.state;
1584 #ifdef MOUSE_REPORT_DOUBLECLICK
1585 if (ev.button == MEvent.button && clickintime)
1587 /* same button, within alloted time */
1589 if (MEvent.clicks > 1)
1591 /* only report double clicks */
1595 /* don't report the release */
1597 MEvent.button = AnyButton;
1602 /* different button, or time expired */
1604 MEvent.button = ev.button;
1608 MEvent.button = ev.button;
1610 #endif /* MOUSE_REPORT_DOUBLECLICK */
1615 if (ev.button != MEvent.button)
1620 /* allow shift+left click to extend selection */
1621 if (ev.state & ShiftMask && ! (PrivateModes & PrivMode_mouse_report))
1623 if (MEvent.button == Button1 && clickintime)
1624 selection_rotate (ev.x, ev.y);
1626 selection_extend (ev.x, ev.y, 1);
1630 if (MEvent.button == Button1 && clickintime)
1635 selection_click (MEvent.clicks, ev.x, ev.y);
1638 MEvent.button = Button1;
1642 if (MEvent.button == Button3 && clickintime)
1643 selection_rotate (ev.x, ev.y);
1645 selection_extend (ev.x, ev.y, 1);
1646 MEvent.button = Button3;
1650 MEvent.time = ev.time;
1655 * Scrollbar window processing of button press
1657 if (isScrollbarWindow (ev.window))
1659 scrollBar.setIdle ();
1661 * Rxvt-style scrollbar:
1662 * move up if mouse is above slider
1663 * move dn if mouse is below slider
1665 * XTerm-style scrollbar:
1666 * Move display proportional to pointer location
1667 * pointer near top -> scroll one line
1668 * pointer near bot -> scroll full page
1670 #ifndef NO_SCROLLBAR_REPORT
1674 * Mouse report disabled scrollbar:
1675 * arrow buttons - send up/down
1676 * click on scrollbar - send pageup/down
1678 if ((scrollBar.style == R_SB_NEXT
1679 && scrollbarnext_upButton (ev.y))
1680 || (scrollBar.style == R_SB_RXVT
1681 && scrollbarrxvt_upButton (ev.y)))
1682 tt_printf ("\033[A");
1683 else if ((scrollBar.style == R_SB_NEXT
1684 && scrollbarnext_dnButton (ev.y))
1685 || (scrollBar.style == R_SB_RXVT
1686 && scrollbarrxvt_dnButton (ev.y)))
1687 tt_printf ("\033[B");
1695 tt_printf ("\033[6~");
1698 tt_printf ("\033[5~");
1703 #endif /* NO_SCROLLBAR_REPORT */
1708 if (scrollBar.style == R_SB_NEXT)
1710 if (scrollbarnext_upButton (ev.y))
1711 upordown = -1; /* up */
1712 else if (scrollbarnext_dnButton (ev.y))
1713 upordown = 1; /* down */
1715 else if (scrollBar.style == R_SB_RXVT)
1717 if (scrollbarrxvt_upButton (ev.y))
1718 upordown = -1; /* up */
1719 else if (scrollbarrxvt_dnButton (ev.y))
1720 upordown = 1; /* down */
1724 #ifndef NO_SCROLLBAR_BUTTON_CONTINUAL_SCROLLING
1725 scroll_arrow_delay = SCROLLBAR_INITIAL_DELAY;
1727 if (scr_page (upordown < 0 ? UP : DN, 1))
1739 switch (scrollbar_align)
1741 case R_SB_ALIGN_TOP:
1744 case R_SB_ALIGN_CENTRE:
1745 csrO = (scrollBar.bot - scrollBar.top) / 2;
1747 case R_SB_ALIGN_BOTTOM:
1748 csrO = scrollBar.bot - scrollBar.top;
1751 if (scrollBar.style == R_SB_XTERM
1752 || scrollbar_above_slider (ev.y)
1753 || scrollbar_below_slider (ev.y))
1754 scr_move_to ( scrollbar_position (ev.y) - csrO,
1756 scrollBar.setMotion ();
1760 if (scrollbar_align == R_SB_ALIGN_CENTRE)
1761 csrO = ev.y - scrollBar.top;
1765 if (scrollBar.style != R_SB_XTERM)
1767 if (scrollbar_above_slider (ev.y))
1768 # ifdef RXVT_SCROLL_FULL
1769 scr_page (UP, TermWin.nrow - 1);
1771 scr_page (UP, TermWin.nrow / 4);
1773 else if (scrollbar_below_slider (ev.y))
1774 # ifdef RXVT_SCROLL_FULL
1775 scr_page (DN, TermWin.nrow - 1);
1777 scr_page (DN, TermWin.nrow / 4);
1780 scrollBar.setMotion ();
1784 scr_page ((ev.button == Button1 ? DN : UP),
1786 * scrollbar_position (ev.y)
1787 / scrollbar_size ()));
1796 * Menubar window processing of button press
1798 if (isMenuBarWindow (ev.window))
1799 menubar_control (ev);
1804 rxvt_term::button_release (const XButtonEvent &ev)
1808 csrO = 0; /* reset csr Offset */
1809 if (!bypass_keystate)
1810 reportmode = !! (PrivateModes & PrivMode_mouse_report);
1812 if (scrollbar_isUpDn ())
1814 scrollBar.setIdle ();
1816 #ifndef NO_SCROLLBAR_BUTTON_CONTINUAL_SCROLLING
1817 refresh_type &= ~SMOOTH_REFRESH;
1821 #ifdef SELECTION_SCROLLING
1822 pending_scroll_selection=0;
1824 if (ev.window == TermWin.vt)
1828 /* mouse report from vt window */
1829 /* don't report release of wheel "buttons" */
1832 #ifdef MOUSE_REPORT_DOUBLECLICK
1833 /* only report the release of 'slow' single clicks */
1834 if (MEvent.button != AnyButton
1835 && (ev.button != MEvent.button
1836 || (ev.time - MEvent.time
1837 > MULTICLICK_TIME / 2)))
1840 MEvent.button = AnyButton;
1843 #else /* MOUSE_REPORT_DOUBLECLICK */
1844 MEvent.button = AnyButton;
1846 #endif /* MOUSE_REPORT_DOUBLECLICK */
1850 * dumb hack to compensate for the failure of click-and-drag
1851 * when overriding mouse reporting
1853 if (PrivateModes & PrivMode_mouse_report
1855 && ev.button == Button1 && MEvent.clicks <= 1)
1856 selection_extend (ev.x, ev.y, 0);
1862 selection_make (ev.time);
1865 selection_request (ev.time, ev.x, ev.y);
1874 v = (ev.button == Button4) ? UP : DN;
1875 if (ev.state & ShiftMask)
1877 else if ((Options & Opt_mouseWheelScrollPage))
1878 i = TermWin.nrow - 1;
1881 # ifdef MOUSE_SLIP_WHEELING
1882 if (ev.state & ControlMask)
1884 mouse_slip_wheel_speed += (v ? -1 : 1);
1885 mouse_slip_wheel_delay = SCROLLBAR_CONTINUOUS_DELAY;
1888 # ifdef JUMP_MOUSE_WHEEL
1890 scr_refresh (SMOOTH_REFRESH);
1896 scr_refresh (SMOOTH_REFRESH);
1908 else if (isMenuBarWindow (ev.window))
1909 menubar_control (ev);
1916 * Check our parents are still who we think they are.
1917 * Do transparency updates if required
1920 rxvt_term::check_our_parents ()
1922 int i, pchanged, aformat, have_pixmap, rootdepth;
1923 unsigned long nitems, bytes_after;
1925 unsigned char *prop = NULL;
1926 Window root, oldp, *list;
1927 Pixmap rootpixmap = None;
1928 XWindowAttributes wattr, wrootattr;
1932 if (! (Options & Opt_transparent))
1933 return pchanged; /* Don't try any more */
1935 XGetWindowAttributes (display->display, display->root, &wrootattr);
1936 rootdepth = wrootattr.depth;
1938 XGetWindowAttributes (display->display, TermWin.parent[0], &wattr);
1939 if (rootdepth != wattr.depth)
1944 XSetWindowBackground (display->display, TermWin.vt,
1945 PixColors[Color_bg]);
1946 am_transparent = am_pixmap_trans = 0;
1948 return pchanged; /* Don't try any more */
1951 /* Get all X ops out of the queue so that our information is up-to-date. */
1952 XSync (display->display, False);
1955 * Make the frame window set by the window manager have
1956 * the root background. Some window managers put multiple nested frame
1957 * windows for each client, so we have to take care about that.
1959 i = (xa[XA_XROOTPMAPID] != 0
1960 && (XGetWindowProperty (display->display, display->root, xa[XA_XROOTPMAPID],
1961 0L, 1L, False, XA_PIXMAP, &atype, &aformat,
1962 &nitems, &bytes_after, &prop) == Success));
1963 if (!i || prop == NULL)
1968 rootpixmap = * ((Pixmap *)prop);
1974 * Copy display->root pixmap transparency
1977 unsigned int nw, nh;
1983 XTranslateCoordinates (display->display, TermWin.parent[0], display->root,
1984 0, 0, &sx, &sy, &cr);
1985 nw = (unsigned int)szHint.width;
1986 nh = (unsigned int)szHint.height;
2000 MIN_IT (nw, (unsigned int) (wrootattr.width - sx));
2001 MIN_IT (nh, (unsigned int) (wrootattr.height - sy));
2003 image = XGetImage (display->display, rootpixmap, sx, sy, nw, nh, AllPlanes,
2005 /* XXX: handle BadMatch - usually because we're outside the pixmap */
2006 /* XXX: may need a delay here? */
2010 if (am_transparent && am_pixmap_trans)
2013 if (TermWin.pixmap != None)
2015 XFreePixmap (display->display, TermWin.pixmap);
2016 TermWin.pixmap = None;
2019 am_pixmap_trans = 0;
2023 if (TermWin.pixmap != None)
2024 XFreePixmap (display->display, TermWin.pixmap);
2025 TermWin.pixmap = XCreatePixmap (display->display, TermWin.vt,
2026 (unsigned int)szHint.width,
2027 (unsigned int)szHint.height,
2028 (unsigned int)image->depth);
2029 gc = XCreateGC (display->display, TermWin.vt, 0UL, &gcvalue);
2030 XPutImage (display->display, TermWin.pixmap, gc, image, 0, 0,
2031 nx, ny, (unsigned int)image->width,
2032 (unsigned int)image->height);
2033 XFreeGC (display->display, gc);
2034 XDestroyImage (image);
2035 XSetWindowBackgroundPixmap (display->display, TermWin.vt,
2037 if (!am_transparent || !am_pixmap_trans)
2039 am_transparent = am_pixmap_trans = 1;
2042 if (!am_pixmap_trans)
2046 * InheritPixmap transparency
2048 D_X ((stderr, "InheritPixmap Seeking to %08lx", display->root));
2049 for (i = 1; i < (int) (sizeof (TermWin.parent) / sizeof (Window));
2052 oldp = TermWin.parent[i];
2053 XQueryTree (display->display, TermWin.parent[i - 1], &root,
2054 &TermWin.parent[i], &list, &n);
2056 D_X ((stderr, "InheritPixmap Parent[%d] = %08lx", i, TermWin.parent[i]));
2057 if (TermWin.parent[i] == display->root)
2063 if (oldp != TermWin.parent[i])
2069 for (; n < (unsigned int)i; n++)
2071 XGetWindowAttributes (display->display, TermWin.parent[n], &wattr);
2072 D_X ((stderr, "InheritPixmap Checking Parent[%d]: %s", n, (wattr.depth == rootdepth && wattr.class != InputOnly) ? "OK" : "FAIL"));
2073 if (wattr.depth != rootdepth || wattr.c_class == InputOnly)
2075 n = (int) (sizeof (TermWin.parent) / sizeof (Window)) + 1;
2080 if (n > (int) (sizeof (TermWin.parent)
2081 / sizeof (TermWin.parent[0])))
2083 D_X ((stderr, "InheritPixmap Turning off"));
2084 XSetWindowBackground (display->display, TermWin.parent[0],
2085 PixColors[Color_fg]);
2086 XSetWindowBackground (display->display, TermWin.vt,
2087 PixColors[Color_bg]);
2089 /* XXX: also turn off Opt_transparent? */
2093 /* wait (an arbitrary period) for the WM to do its thing
2094 * needed for fvwm2.2.2 (and before?) */
2095 # ifdef HAVE_NANOSLEEP
2096 struct timespec rqt;
2100 nanosleep (&rqt, NULL);
2104 D_X ((stderr, "InheritPixmap Turning on (%d parents)", i - 1));
2105 for (n = 0; n < (unsigned int)i; n++)
2106 XSetWindowBackgroundPixmap (display->display, TermWin.parent[n],
2108 XSetWindowBackgroundPixmap (display->display, TermWin.vt,
2112 for (; i < (int) (sizeof (TermWin.parent) / sizeof (Window)); i++)
2113 TermWin.parent[i] = None;
2122 /*----------------------------------------------------------------------*/
2125 rxvt_term::popen_printer ()
2127 FILE *stream = popen (rs[Rs_print_pipe], "w");
2130 rxvt_print_error ("can't open printer pipe");
2135 rxvt_term::pclose_printer (FILE *stream)
2138 /* pclose () reported not to work on SunOS 4.1.3 */
2139 # if defined (__sun__) /* TODO: RESOLVE THIS */
2140 /* pclose works provided SIGCHLD handler uses waitpid */
2141 return pclose (stream); /* return fclose (stream); */
2143 return pclose (stream);
2148 * simulate attached vt100 printer
2151 rxvt_term::process_print_pipe ()
2156 if ((fd = popen_printer ()) == NULL)
2160 * Send all input to the printer until either ESC[4i or ESC[?4i
2163 for (done = 0; !done;)
2165 unsigned char buf[8];
2167 unsigned int i, len;
2169 if ((ch = cmd_getc ()) != C0_ESC)
2171 if (putc (ch, fd) == EOF)
2172 break; /* done = 1 */
2179 if ((buf[len++] = cmd_getc ()) == '[')
2181 if ((ch = cmd_getc ()) == '?')
2186 if ((buf[len++] = ch) == '4')
2188 if ((buf[len++] = cmd_getc ()) == 'i')
2189 break; /* done = 1 */
2192 for (i = 0; i < len; i++)
2193 if (putc (buf[i], fd) == EOF)
2200 pclose_printer (fd);
2202 #endif /* PRINTPIPE */
2208 C1_41 , C1_BPH, C1_NBH, C1_44 , C1_NEL, C1_SSA, C1_ESA,
2209 C1_HTS, C1_HTJ, C1_VTS, C1_PLD, C1_PLU, C1_RI , C1_SS2, C1_SS3,
2210 C1_DCS, C1_PU1, C1_PU2, C1_STS, C1_CCH, C1_MW , C1_SPA, C1_EPA,
2211 C1_SOS, C1_59 , C1_SCI, C1_CSI, CS_ST , C1_OSC, C1_PM , C1_APC
2215 /*{{{ process non-printing single characters */
2217 rxvt_term::process_nonprinting (unsigned char ch)
2221 case C0_ENQ: /* terminal Status */
2222 if (rs[Rs_answerbackstring])
2224 (const unsigned char *)rs[Rs_answerbackstring],
2225 (unsigned int)STRLEN (rs[Rs_answerbackstring]));
2227 tt_write ((unsigned char *)VT100_ANS,
2228 (unsigned int)STRLEN (VT100_ANS));
2230 case C0_BEL: /* bell */
2233 case C0_BS: /* backspace */
2236 case C0_HT: /* tab */
2239 case C0_CR: /* carriage return */
2240 scr_gotorc (0, 0, R_RELATIVE);
2242 case C0_VT: /* vertical tab, form feed */
2244 case C0_LF: /* line feed */
2247 case C0_SO: /* shift out - acs */
2248 scr_charset_choose (1);
2250 case C0_SI: /* shift in - acs */
2251 scr_charset_choose (0);
2258 /*{{{ process VT52 escape sequences */
2260 rxvt_term::process_escape_vt52 (unsigned char ch)
2266 case 'A': /* cursor up */
2267 scr_gotorc (-1, 0, R_RELATIVE | C_RELATIVE);
2269 case 'B': /* cursor down */
2270 scr_gotorc (1, 0, R_RELATIVE | C_RELATIVE);
2272 case 'C': /* cursor right */
2273 scr_gotorc (0, 1, R_RELATIVE | C_RELATIVE);
2275 case 'D': /* cursor left */
2276 scr_gotorc (0, -1, R_RELATIVE | C_RELATIVE);
2278 case 'H': /* cursor home */
2279 scr_gotorc (0, 0, 0);
2281 case 'I': /* cursor up and scroll down if needed */
2284 case 'J': /* erase to end of screen */
2285 scr_erase_screen (0);
2287 case 'K': /* erase to end of line */
2290 case 'Y': /* move to specified row and col */
2291 /* full command is 'ESC Y row col' where row and col
2292 * are encoded by adding 32 and sending the ascii
2293 * character. eg. SPACE = 0, '+' = 13, '0' = 18,
2295 row = cmd_getc () - ' ';
2296 col = cmd_getc () - ' ';
2297 scr_gotorc (row, col, 0);
2299 case 'Z': /* identify the terminal type */
2300 tt_printf ("\033/Z"); /* I am a VT100 emulating a VT52 */
2302 case '<': /* turn off VT52 mode */
2303 PrivMode (0, PrivMode_vt52);
2305 case 'F': /* use special graphics character set */
2306 case 'G': /* use regular character set */
2309 case '=': /* use alternate keypad mode */
2310 case '>': /* use regular keypad mode */
2318 /*{{{ process escape sequences */
2320 rxvt_term::process_escape_seq ()
2322 unsigned char ch = cmd_getc ();
2324 if (PrivateModes & PrivMode_vt52)
2326 process_escape_vt52 (ch);
2332 /* case 1: do_tek_mode (); break; */
2334 if (cmd_getc () == '8')
2338 scr_charset_set (0, (unsigned int)cmd_getc ());
2341 scr_charset_set (1, (unsigned int)cmd_getc ());
2344 scr_charset_set (2, (unsigned int)cmd_getc ());
2347 scr_charset_set (3, (unsigned int)cmd_getc ());
2349 #ifdef MULTICHAR_SET
2351 scr_charset_set (-2, (unsigned int)cmd_getc ());
2363 scr_cursor (RESTORE);
2367 scr_forwardindex ();
2372 PrivMode ((ch == '='), PrivMode_aplKP);
2382 /* 8.3.87: NEXT LINE */
2383 case C1_NEL: /* ESC E */
2385 uint32_t nlcr[] = { '\n', '\r' };
2386 scr_add_lines (nlcr, 1, 2);
2390 /* kidnapped escape sequence: Should be 8.3.48 */
2391 case C1_ESA: /* ESC G */
2392 process_graphics ();
2395 /* 8.3.63: CHARACTER TABULATION SET */
2396 case C1_HTS: /* ESC H */
2400 /* 8.3.105: REVERSE LINE FEED */
2401 case C1_RI: /* ESC M */
2405 /* 8.3.142: SINGLE-SHIFT TWO */
2406 /*case C1_SS2: scr_single_shift (2); break; */
2408 /* 8.3.143: SINGLE-SHIFT THREE */
2409 /*case C1_SS3: scr_single_shift (3); break; */
2411 /* 8.3.27: DEVICE CONTROL STRING */
2412 case C1_DCS: /* ESC P */
2416 /* 8.3.110: SINGLE CHARACTER INTRODUCER */
2417 case C1_SCI: /* ESC Z */
2418 tt_write ((const unsigned char *)ESCZ_ANSWER,
2419 (unsigned int) (sizeof (ESCZ_ANSWER) - 1));
2420 break; /* steal obsolete ESC [ c */
2422 /* 8.3.16: CONTROL SEQUENCE INTRODUCER */
2423 case C1_CSI: /* ESC [ */
2427 /* 8.3.90: OPERATING SYSTEM COMMAND */
2428 case C1_OSC: /* ESC ] */
2432 /* 8.3.106: RESET TO INITIAL STATE */
2438 /* 8.3.79: LOCKING-SHIFT TWO (see ISO2022) */
2440 scr_charset_choose (2);
2443 /* 8.3.81: LOCKING-SHIFT THREE (see ISO2022) */
2445 scr_charset_choose (3);
2451 /*{{{ process CONTROL SEQUENCE INTRODUCER (CSI) sequences `ESC[' */
2455 CSI_CUU, CSI_CUD, CSI_CUF, CSI_CUB, CSI_CNL, CSI_CPL, CSI_CHA,
2456 CSI_CUP, CSI_CHT, CSI_ED , CSI_EL , CSI_IL , CSI_DL , CSI_EF , CSI_EA ,
2457 CSI_DCH, CSI_SEE, CSI_CPR, CSI_SU , CSI_SD , CSI_NP , CSI_PP , CSI_CTC,
2458 CSI_ECH, CSI_CVT, CSI_CBT, CSI_SRS, CSI_PTX, CSI_SDS, CSI_SIMD, CSI_5F,
2459 CSI_HPA, CSI_HPR, CSI_REP, CSI_DA , CSI_VPA, CSI_VPR, CSI_HVP, CSI_TBC,
2460 CSI_SM , CSI_MC , CSI_HPB, CSI_VPB, CSI_RM , CSI_SGR, CSI_DSR, CSI_DAQ,
2461 CSI_70 , CSI_71 , CSI_72 , CSI_73 , CSI_74 , CSI_75 , CSI_76 , CSI_77 ,
2462 CSI_78 , CSI_79 , CSI_7A , CSI_7B , CSI_7C , CSI_7D , CSI_7E , CSI_7F
2465 #define make_byte(b7,b6,b5,b4,b3,b2,b1,b0) \
2466 (((b7) << 7) | ((b6) << 6) | ((b5) << 5) | ((b4) << 4) \
2467 | ((b3) << 3) | ((b2) << 2) | ((b1) << 1) | (b0))
2468 #define get_byte_array_bit(array, bit) \
2469 (!! ((array)[ (bit) / 8] & (128 >> ((bit) & 7))))
2471 const unsigned char csi_defaults[] =
2473 make_byte (1,1,1,1,1,1,1,1), /* @, A, B, C, D, E, F, G, */
2474 make_byte (1,1,0,0,1,1,0,0), /* H, I, J, K, L, M, N, O, */
2475 make_byte (1,0,1,1,1,1,1,0), /* P, Q, R, S, T, U, V, W, */
2476 make_byte (1,1,1,0,0,0,1,0), /* X, Y, Z, [, \, ], ^, _, */
2477 make_byte (1,1,1,0,1,1,1,0), /* `, a, b, c, d, e, f, g, */
2478 make_byte (0,0,1,1,0,0,0,0), /* h, i, j, k, l, m, n, o, */
2479 make_byte (0,0,0,0,0,0,0,0), /* p, q, r, s, t, u, v, w, */
2480 make_byte (0,0,0,0,0,0,0,0) /* x, y, z, {, |, }, ~, */
2485 rxvt_term::process_csi_seq ()
2487 unsigned char ch, priv, i;
2488 unsigned int nargs, p;
2492 for (nargs = ESC_ARGS; nargs > 0;)
2497 if (ch >= '<' && ch <= '?')
2498 { /* '<' '=' '>' '?' */
2502 /* read any numerical arguments */
2503 for (n = -1; ch < CSI_ICH; )
2510 n = n * 10 + ch - '0';
2514 if (nargs < ESC_ARGS)
2518 else if (ch == '\b')
2522 else if (ch == C0_ESC)
2524 process_escape_seq ();
2529 process_nonprinting (ch);
2537 if (nargs < ESC_ARGS)
2541 ndef = get_byte_array_bit (csi_defaults, i);
2542 for (p = 0; p < nargs; p++)
2547 fprintf (stderr, "CSI ");
2548 for (p = 0; p < nargs; p++)
2549 fprintf (stderr, "%d%s", arg[p], p < nargs - 1 ? ";" : "");
2550 fprintf (stderr, "%c\n", ch);
2554 * private mode handling
2561 if (ch == CSI_DA) /* secondary device attributes */
2562 tt_printf ("\033[>%d;%-.8s;0c", 'R', VSTRING);
2565 if (ch == 'h' || ch == 'l' || ch == 'r' || ch == 's' || ch == 't')
2566 process_terminal_mode (ch, priv, nargs, arg);
2575 * ISO/IEC 6429:1992 (E) CSI sequences (defaults in parentheses)
2578 case CSI_MC: /* 8.3.83: (0) MEDIA COPY */
2581 case 0: /* initiate transfer to primary aux device */
2582 scr_printscreen (0);
2584 case 5: /* start relay to primary aux device */
2585 process_print_pipe ();
2591 case CSI_CUU: /* 8.3.22: (1) CURSOR UP */
2592 case CSI_VPR: /* 8.3.161: (1) LINE POSITION FORWARD */
2595 case CSI_CUD: /* 8.3.19: (1) CURSOR DOWN */
2596 case CSI_VPB: /* 8.3.160: (1) LINE POSITION BACKWARD */
2597 scr_gotorc (arg[0], 0, RELATIVE);
2600 case CSI_CUB: /* 8.3.18: (1) CURSOR LEFT */
2601 case CSI_HPB: /* 8.3.59: (1) CHARACTER POSITION BACKWARD */
2604 #else /* emulate common DEC VTs */
2605 arg[0] = arg[0] ? -arg[0] : -1;
2608 case CSI_CUF: /* 8.3.20: (1) CURSOR RIGHT */
2609 case CSI_HPR: /* 8.3.60: (1) CHARACTER POSITION FORWARD */
2611 scr_gotorc (0, arg[0], RELATIVE);
2612 #else /* emulate common DEC VTs */
2613 scr_gotorc (0, arg[0] ? arg[0] : 1, RELATIVE);
2617 case CSI_CPL: /* 8.3.13: (1) CURSOR PRECEDING LINE */
2620 case CSI_CNL: /* 8.3.12: (1) CURSOR NEXT LINE */
2621 scr_gotorc (arg[0], 0, R_RELATIVE);
2624 case CSI_CHA: /* 8.3.9: (1) CURSOR CHARACTER ABSOLUTE */
2625 case CSI_HPA: /* 8.3.58: (1) CURSOR POSITION ABSOLUTE */
2626 scr_gotorc (0, arg[0] - 1, R_RELATIVE);
2629 case CSI_VPA: /* 8.3.159: (1) LINE POSITION ABSOLUTE */
2630 scr_gotorc (arg[0] - 1, 0, C_RELATIVE);
2633 case CSI_CUP: /* 8.3.21: (1,1) CURSOR POSITION */
2634 case CSI_HVP: /* 8.3.64: (1,1) CHARACTER AND LINE POSITION */
2635 scr_gotorc (arg[0] - 1, nargs < 2 ? 0 : (arg[1] - 1), 0);
2638 case CSI_CBT: /* 8.3.7: (1) CURSOR BACKWARD TABULATION */
2641 case CSI_CHT: /* 8.3.10: (1) CURSOR FORWARD TABULATION */
2645 case CSI_ED: /* 8.3.40: (0) ERASE IN PAGE */
2646 scr_erase_screen (arg[0]);
2649 case CSI_EL: /* 8.3.42: (0) ERASE IN LINE */
2650 scr_erase_line (arg[0]);
2653 case CSI_ICH: /* 8.3.65: (1) INSERT CHARACTER */
2654 scr_insdel_chars (arg[0], INSERT);
2657 case CSI_IL: /* 8.3.68: (1) INSERT LINE */
2658 scr_insdel_lines (arg[0], INSERT);
2661 case CSI_DL: /* 8.3.33: (1) DELETE LINE */
2662 scr_insdel_lines (arg[0], DELETE);
2665 case CSI_ECH: /* 8.3.39: (1) ERASE CHARACTER */
2666 scr_insdel_chars (arg[0], ERASE);
2669 case CSI_DCH: /* 8.3.26: (1) DELETE CHARACTER */
2670 scr_insdel_chars (arg[0], DELETE);
2673 case CSI_SD: /* 8.3.114: (1) SCROLL DOWN */
2676 case CSI_SU: /* 8.3.148: (1) SCROLL UP */
2677 scr_scroll_text (screen.tscroll, screen.bscroll, arg[0], 0);
2680 case CSI_DA: /* 8.3.24: (0) DEVICE ATTRIBUTES */
2681 tt_write ((const unsigned char *)VT100_ANS,
2682 (unsigned int) (sizeof (VT100_ANS) - 1));
2685 case CSI_SGR: /* 8.3.118: (0) SELECT GRAPHIC RENDITION */
2686 process_sgr_mode (nargs, arg);
2689 case CSI_DSR: /* 8.3.36: (0) DEVICE STATUS REPORT */
2692 case 5: /* DSR requested */
2693 tt_printf ("\033[0n");
2695 case 6: /* CPR requested */
2696 scr_report_position ();
2698 #if defined (ENABLE_DISPLAY_ANSWER)
2699 case 7: /* unofficial extension */
2700 tt_printf ("%-.250s\n", rs[Rs_display_name]);
2703 case 8: /* unofficial extension */
2704 xterm_seq (XTerm_title, APL_NAME "-" VERSION, CHAR_ST);
2709 case CSI_TBC: /* 8.3.155: (0) TABULATION CLEAR */
2712 case 0: /* char tab stop cleared at active position */
2715 /* case 1: */ /* line tab stop cleared in active line */
2716 /* case 2: */ /* char tab stops cleared in active line */
2717 case 3: /* all char tab stops are cleared */
2718 /* case 4: */ /* all line tab stops are cleared */
2719 case 5: /* all tab stops are cleared */
2725 case CSI_CTC: /* 8.3.17: (0) CURSOR TABULATION CONTROL */
2728 case 0: /* char tab stop set at active position */
2730 break; /* = ESC H */
2731 /* case 1: */ /* line tab stop set at active line */
2732 case 2: /* char tab stop cleared at active position */
2734 break; /* = ESC [ 0 g */
2735 /* case 3: */ /* line tab stop cleared at active line */
2736 /* case 4: */ /* char tab stops cleared at active line */
2737 case 5: /* all char tab stops are cleared */
2739 break; /* = ESC [ 3 g */
2740 /* case 6: */ /* all line tab stops are cleared */
2744 case CSI_RM: /* 8.3.107: RESET MODE */
2746 scr_insert_mode (0);
2749 case CSI_SM: /* 8.3.126: SET MODE */
2751 scr_insert_mode (1);
2755 * PRIVATE USE beyond this point. All CSI_7? sequences here
2757 case CSI_72: /* DECSTBM: set top and bottom margins */
2759 scr_scroll_region (arg[0] - 1, MAX_ROWS - 1);
2760 else if (nargs == 0 || arg[0] >= arg[1])
2761 scr_scroll_region (0, MAX_ROWS - 1);
2763 scr_scroll_region (arg[0] - 1, arg[1] - 1);
2770 scr_cursor (RESTORE);
2775 process_window_ops (arg, nargs);
2779 case CSI_78: /* DECREQTPARM */
2780 if (arg[0] == 0 || arg[0] == 1)
2781 tt_printf ("\033[%d;1;1;128;128;1;0x", arg[0] + 2);
2793 rxvt_term::process_window_ops (const int *args, unsigned int nargs)
2799 XWindowAttributes wattr;
2809 case 1: /* deiconify window */
2810 XMapWindow (display->display, TermWin.parent[0]);
2812 case 2: /* iconify window */
2813 XIconifyWindow (display->display, TermWin.parent[0],
2814 DefaultScreen (display->display));
2816 case 3: /* set position (pixels) */
2817 XMoveWindow (display->display, TermWin.parent[0], args[1], args[2]);
2819 case 4: /* set size (pixels) */
2820 set_widthheight ((unsigned int)args[2], (unsigned int)args[1]);
2822 case 5: /* raise window */
2823 XRaiseWindow (display->display, TermWin.parent[0]);
2825 case 6: /* lower window */
2826 XLowerWindow (display->display, TermWin.parent[0]);
2828 case 7: /* refresh window */
2831 case 8: /* set size (chars) */
2832 set_widthheight ((unsigned int) (args[2] * TermWin.fwidth),
2833 (unsigned int) (args[1] * TermWin.fheight));
2836 if (args[0] >= 24) /* set height (chars) */
2837 set_widthheight ((unsigned int)TermWin.width,
2838 (unsigned int) (args[1] * TermWin.fheight));
2841 * reports - some output format copied from XTerm
2843 case 11: /* report window state */
2844 XGetWindowAttributes (display->display, TermWin.parent[0], &wattr);
2845 tt_printf ("\033[%dt", wattr.map_state == IsViewable ? 1 : 2);
2847 case 13: /* report window position */
2848 XGetWindowAttributes (display->display, TermWin.parent[0], &wattr);
2849 XTranslateCoordinates (display->display, TermWin.parent[0], wattr.root,
2850 -wattr.border_width, -wattr.border_width,
2852 tt_printf ("\033[3;%d;%dt", x, y);
2854 case 14: /* report window size (pixels) */
2855 XGetWindowAttributes (display->display, TermWin.parent[0], &wattr);
2856 tt_printf ("\033[4;%d;%dt", wattr.height, wattr.width);
2858 case 18: /* report window size (chars) */
2859 tt_printf ("\033[8;%d;%dt", TermWin.nrow, TermWin.ncol);
2861 #if 0 /* XXX: currently disabled due to security concerns */
2862 case 20: /* report icon label */
2863 XGetIconName (display->display, TermWin.parent[0], &s);
2864 tt_printf ("\033]L%-.200s\234", s ? s : ""); /* 8bit ST */
2866 case 21: /* report window title */
2867 XFetchName (display->display, TermWin.parent[0], &s);
2868 tt_printf ("\033]l%-.200s\234", s ? s : ""); /* 8bit ST */
2876 /*----------------------------------------------------------------------*/
2878 * get input up until STRING TERMINATOR (or BEL)
2879 * ends_how is terminator used. returned input must be free ()d
2882 rxvt_term::get_to_st (unsigned char *ends_how)
2884 int seen_esc = 0; /* seen escape? */
2887 unsigned char ch, string[STRING_MAX];
2889 for (; (ch = cmd_getc ());)
2893 || (ch == 0x5c && seen_esc)) /* 7bit ST */
2900 else if (ch == '\t')
2901 ch = ' '; /* translate '\t' to space */
2902 else if (ch < 0x08 || (ch > 0x0d && ch < 0x20))
2903 return NULL; /* other control character - exit */
2904 if (n < sizeof (string) - 1)
2909 if ((s = (unsigned char *)rxvt_malloc (n)) == NULL)
2911 *ends_how = (ch == 0x5c ? C0_ESC : ch);
2912 STRNCPY (s, string, n);
2916 /*----------------------------------------------------------------------*/
2918 * process DEVICE CONTROL STRING `ESC P ... (ST|BEL)' or `0x90 ... (ST|BEL)'
2921 rxvt_term::process_dcs_seq ()
2923 unsigned char eh, *s;
2927 s = get_to_st (&eh);
2933 /*----------------------------------------------------------------------*/
2935 * process OPERATING SYSTEM COMMAND sequence `ESC ] Ps ; Pt (ST|BEL)'
2938 rxvt_term::process_osc_seq ()
2940 unsigned char ch, eh, *s;
2944 for (arg = 0; isdigit (ch); ch = cmd_getc ())
2945 arg = arg * 10 + (ch - '0');
2949 s = get_to_st (&eh);
2953 * rxvt_menubar_dispatch () violates the constness of the string,
2956 if (arg == XTerm_Menu)
2957 #if 0 /* XXX: currently disabled due to security concerns */
2958 menubar_dispatch ((char *)s);
2963 xterm_seq (arg, (char *)s, eh);
2969 * XTerm escape sequences: ESC ] Ps;Pt (ST|BEL)
2970 * 0 = change iconName/title
2971 * 1 = change iconName
2974 * 12 = change text color
2975 * 13 = change mouse foreground color
2976 * 17 = change highlight character colour
2977 * 18 = change bold character color
2978 * 19 = change underlined character color
2979 * 46 = change logfile (not implemented)
2983 * 9 = change locale (NYI)
2984 * 10 = menu (may change in future)
2986 * 39 = change default fg color
2987 * 49 = change default bg color
2988 * 55 = dump scrollback buffer and all of screen
2991 rxvt_term::xterm_seq (int op, const char *str, unsigned char resp __attribute__ ((unused)))
2997 assert (str != NULL);
3003 case XTerm_iconName:
3010 for (buf = (char *)str; buf && *buf;)
3012 if ((name = STRCHR (buf, ';')) == NULL)
3016 if (color < 0 || color >= TOTAL_COLORS)
3018 if ((buf = STRCHR (name, ';')) != NULL)
3020 set_window_color (color + minCOLOR, name);
3023 #ifndef NO_CURSORCOLOR
3024 case XTerm_Color_cursor:
3025 set_window_color (Color_cursor, str);
3028 case XTerm_Color_pointer:
3029 set_window_color (Color_pointer, str);
3031 #ifndef NO_BOLD_UNDERLINE_REVERSE
3032 case XTerm_Color_BD:
3033 set_window_color (Color_BD, str);
3035 case XTerm_Color_UL:
3036 set_window_color (Color_UL, str);
3038 case XTerm_Color_RV:
3039 set_window_color (Color_RV, str);
3045 * rxvt_menubar_dispatch () violates the constness of the string,
3046 * so DON'T do it here
3053 scale_pixmap (""); /* reset to default scaling */
3054 set_bgPixmap (str); /* change pixmap */
3058 while ((str = STRCHR (str, ';')) != NULL)
3062 changed += scale_pixmap (str);
3068 #ifdef XPM_BACKGROUND
3075 case XTerm_restoreFG:
3076 set_window_color (Color_fg, str);
3078 case XTerm_restoreBG:
3079 set_window_color (Color_bg, str);
3087 if (str[0] == '?' && !str[1])
3088 tt_printf ("%-.250s\n", locale);
3096 case XTerm_dumpscreen: /* no error notices */
3099 if ((fd = open (str, O_RDWR | O_CREAT | O_EXCL, 0600)) >= 0)
3110 /*----------------------------------------------------------------------*/
3112 /*{{{ process DEC private mode sequences `ESC [ ? Ps mode' */
3114 * mode can only have the following values:
3120 * so no need for fancy checking
3123 rxvt_term::privcases (int mode, unsigned long bit)
3129 SavedModes |= (PrivateModes & bit);
3135 state = (SavedModes & bit) ? 1 : 0; /* no overlapping */
3137 state = (mode == 't') ? ! (PrivateModes & bit) : mode;
3138 PrivMode (state, bit);
3143 /* we're not using priv _yet_ */
3145 rxvt_term::process_terminal_mode (int mode, int priv __attribute__ ((unused)), unsigned int nargs, const int *arg)
3152 const unsigned long bit;
3155 { 1, PrivMode_aplCUR },
3156 { 2, PrivMode_vt52 },
3157 { 3, PrivMode_132 },
3158 { 4, PrivMode_smoothScroll },
3159 { 5, PrivMode_rVideo },
3160 { 6, PrivMode_relOrigin },
3161 { 7, PrivMode_Autowrap },
3162 { 9, PrivMode_MouseX10 },
3164 { menuBar_esc, PrivMode_menuBar },
3166 #ifdef scrollBar_esc
3167 { scrollBar_esc, PrivMode_scrollBar },
3169 { 25, PrivMode_VisibleCursor },
3170 { 35, PrivMode_ShiftKeys },
3171 { 40, PrivMode_132OK },
3172 { 47, PrivMode_Screen },
3173 { 66, PrivMode_aplKP },
3174 #ifndef NO_BACKSPACE_KEY
3175 { 67, PrivMode_BackSpace },
3177 { 1000, PrivMode_MouseX11 },
3178 { 1010, PrivMode_TtyOutputInh },
3179 { 1011, PrivMode_Keypress },
3180 { 1047, PrivMode_Screen },
3181 { 1049, PrivMode_Screen }, /* xterm extension, not fully implemented */
3187 /* make lo/hi boolean */
3189 mode = 0; /* reset */
3190 else if (mode == 'h')
3193 for (i = 0; i < nargs; i++)
3197 /* basic handling */
3198 for (j = 0; j < (sizeof (argtopriv)/sizeof (argtopriv[0])); j++)
3199 if (argtopriv[j].argval == arg[i])
3201 state = privcases (mode, argtopriv[j].bit);
3205 /* extra handling for values with state unkept */
3209 case 1048: /* alternative cursor save */
3211 scr_cursor (RESTORE);
3216 continue; /* for (;i;) */
3219 /* extra handling for values with valid 0 or 1 state */
3222 /* case 1: - application cursor keys */
3223 case 2: /* VT52 mode */
3224 /* oddball mode. should be set regardless of set/reset
3225 * parameter. Return from VT52 mode with an ESC < from
3228 PrivMode (1, PrivMode_vt52);
3230 case 3: /* 80/132 */
3231 if (PrivateModes & PrivMode_132OK)
3232 set_widthheight ( (unsigned int) ((state ? 132 : 80) * TermWin.fwidth),
3233 (unsigned int)TermWin.height);
3235 case 4: /* smooth scrolling */
3237 Options &= ~Opt_jumpScroll;
3239 Options |= Opt_jumpScroll;
3241 case 5: /* reverse video */
3242 scr_rvideo_mode (state);
3244 case 6: /* relative/absolute origins */
3245 scr_relative_origin (state);
3247 case 7: /* autowrap */
3248 scr_autowrap (state);
3250 /* case 8: - auto repeat, can't do on a per window basis */
3251 case 9: /* X10 mouse reporting */
3252 if (state) /* orthogonal */
3253 PrivateModes &= ~ (PrivMode_MouseX11);
3258 map_menuBar (state);
3262 #ifdef scrollBar_esc
3264 if (scrollbar_mapping (state))
3266 resize_all_windows (0, 0, 0);
3271 case 25: /* visible/invisible cursor */
3272 scr_cursor_visible (state);
3274 /* case 35: - shift keys */
3275 /* case 40: - 80 <--> 132 mode */
3276 case 47: /* secondary screen */
3277 scr_change_screen (state);
3279 /* case 66: - application key pad */
3280 /* case 67: - backspace key */
3281 case 1000: /* X11 mouse reporting */
3282 if (state) /* orthogonal */
3283 PrivateModes &= ~ (PrivMode_MouseX10);
3287 break; /* X11 mouse highlighting */
3289 case 1010: /* scroll to bottom on TTY output inhibit */
3291 Options &= ~Opt_scrollTtyOutput;
3293 Options |= Opt_scrollTtyOutput;
3295 case 1011: /* scroll to bottom on key press */
3297 Options |= Opt_scrollTtyKeypress;
3299 Options &= ~Opt_scrollTtyKeypress;
3301 case 1047: /* secondary screen w/ clearing */
3302 case 1049: /* better secondary screen w/ clearing, but not fully implemented */
3303 if (current_screen != PRIMARY)
3304 scr_erase_screen (2);
3305 scr_change_screen (state);
3314 /*{{{ process sgr sequences */
3316 rxvt_term::process_sgr_mode (unsigned int nargs, const int *arg)
3324 scr_rendition (0, ~RS_None);
3327 for (i = 0; i < nargs; i++)
3333 rendset = 0, rendstyle = ~RS_None;
3336 rendset = 1, rendstyle = RS_Bold;
3339 rendset = 1, rendstyle = RS_Uline;
3342 rendset = 1, rendstyle = RS_Blink;
3345 rendset = 1, rendstyle = RS_RVid;
3348 rendset = 0, rendstyle = RS_Bold;
3351 rendset = 0, rendstyle = RS_Uline;
3354 rendset = 0, rendstyle = RS_Blink;
3357 rendset = 0, rendstyle = RS_RVid;
3362 scr_rendition (rendset, rendstyle);
3363 continue; /* for (;i;) */
3369 case 31: /* set fg color */
3376 scr_color ((unsigned int) (minCOLOR + (arg[i] - 30)),
3381 if (nargs > i + 2 && arg[i + 1] == 5)
3383 scr_color ((unsigned int) (minCOLOR + arg[i + 2]),
3389 case 39: /* default fg */
3390 scr_color (Color_fg, Color_fg);
3394 case 41: /* set bg color */
3401 scr_color ((unsigned int) (minCOLOR + (arg[i] - 40)),
3406 if (nargs > i + 2 && arg[i + 1] == 5)
3408 scr_color ((unsigned int) (minCOLOR + arg[i + 2]),
3414 case 49: /* default bg */
3415 scr_color (Color_bg, Color_bg);
3418 #ifndef NO_BRIGHTCOLOR
3420 case 91: /* set bright fg color */
3427 scr_color ((unsigned int) (minBrightCOLOR + (arg[i] - 90)),
3431 case 101: /* set bright bg color */
3438 scr_color ((unsigned int) (minBrightCOLOR + (arg[i] - 100)),
3448 /*{{{ process Rob Nation's own graphics mode sequences */
3450 rxvt_term::process_graphics ()
3452 unsigned char ch, cmd = cmd_getc ();
3455 { /* query graphics */
3456 tt_printf ("\033G0\n"); /* no graphics */
3459 /* swallow other graphics sequences until terminating ':' */
3466 /* ------------------------------------------------------------------------- */
3469 * Send printf () formatted output to the command.
3470 * Only use for small amounts of data.
3473 rxvt_term::tt_printf (const char *fmt,...)
3476 unsigned char buf[256];
3478 va_start (arg_ptr, fmt);
3479 vsnprintf ((char *)buf, 256, fmt, arg_ptr);
3481 tt_write (buf, STRLEN (buf));
3484 /* ---------------------------------------------------------------------- */
3485 /* Write data to the pty as typed by the user, pasted with the mouse,
3486 * or generated by us in response to a query ESC sequence.
3489 rxvt_term::tt_write (const unsigned char *data, unsigned int len)
3491 enum { MAX_PTY_WRITE = 255 }; // minimum MAX_INPUT
3497 ssize_t written = write (cmd_fd, data, min (MAX_PTY_WRITE, len));
3499 if ((unsigned int)written == len)
3507 v_buffer = (unsigned char *)realloc (v_buffer, v_buflen + len);
3509 memcpy (v_buffer + v_buflen, data, len);
3515 int written = write (cmd_fd, v_buffer, min (MAX_PTY_WRITE, v_buflen));
3519 v_buflen -= written;
3527 pty_ev.set (EVENT_READ);
3531 memmove (v_buffer, v_buffer + written, v_buflen);
3533 else if (written != -1 || (errno != EAGAIN && errno != EINTR))
3534 // original code just ignores this...
3538 pty_ev.set (EVENT_READ | EVENT_WRITE);
3544 /*----------------------- end-of-file (C source) -----------------------*/