1 /*--------------------------------*-C-*---------------------------------*
3 *----------------------------------------------------------------------*
4 * $Id: command.C,v 1.33 2004-01-30 18:12:17 pcg Exp $
6 * All portions of code are copyright by their respective author/s.
7 * Copyright (c) 1992 John Bovey, University of Kent at Canterbury <jdb@ukc.ac.uk>
9 * Copyright (c) 1994 Robert Nation <nation@rocket.sanders.lockheed.com>
10 * - extensive modifications
11 * Copyright (c) 1995 Garrett D'Amore <garrett@netcom.com>
13 * Copyright (c) 1995 Steven Hirsch <hirsch@emba.uvm.edu>
14 * - X11 mouse report mode and support for
15 * DEC "private mode" save/restore functions.
16 * Copyright (c) 1995 Jakub Jelinek <jj@gnu.ai.mit.edu>
17 * - key-related changes to handle Shift+function
19 * Copyright (c) 1997 MJ Olesen <olesen@me.queensu.ca>
20 * - extensive modifications
21 * Copyright (c) 1997 Raul Garcia Garcia <rgg@tid.es>
22 * - modification and cleanups for Solaris 2.x
24 * Copyright (c) 1997,1998 Oezguer Kesim <kesim@math.fu-berlin.de>
25 * Copyright (c) 1998-2001 Geoff Wing <gcw@pobox.com>
26 * - extensive modifications
27 * Copyright (c) 1998 Alfredo K. Kojima <kojima@windowmaker.org>
28 * Copyright (c) 2001 Marius Gedminas
29 * - Ctrl/Mod4+Tab works like Meta+Tab (options)
30 * Copyright (c) 2003 Rob McMullen <robm@flipturn.org>
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 */
60 rxvt_lookup_key(pR_ XKeyEvent *ev)
62 int ctrl, meta, shft, len;
66 static int debug_key = 1; /* accessible by a debugger only */
69 unsigned char kbuf[KBUFSZ];
72 * use Num_Lock to toggle Keypad on/off. If Num_Lock is off, allow an
73 * escape sequence to toggle the Keypad.
75 * Always permit `shift' to override the current setting
77 shft = (ev->state & ShiftMask);
78 ctrl = (ev->state & ControlMask);
79 meta = (ev->state & R->ModMetaMask);
81 if (R->numlock_state || (ev->state & R->ModNumLockMask))
83 R->numlock_state = (ev->state & R->ModNumLockMask);
84 PrivMode((!R->numlock_state), PrivMode_aplKP);
94 #ifdef X_HAVE_UTF8_STRING
96 len = Xutf8LookupString (R->Input_Context, ev, (char *)kbuf,
97 KBUFSZ, &keysym, &status_return);
101 wchar_t wkbuf[KBUFSZ + 1];
103 // the XOpenIM manpage lies about hardcoding the locale
104 // at the point of XOpenIM, so temporarily switch locales
105 if (R->rs[Rs_imLocale])
106 SET_LOCALE (R->rs[Rs_imLocale]);
107 // assume wchar_t == unicode or better
108 len = XwcLookupString (R->Input_Context, ev, wkbuf,
109 KBUFSZ, &keysym, &status_return);
110 if (R->rs[Rs_imLocale])
111 SET_LOCALE (R->locale);
113 if (status_return == XLookupChars
114 || status_return == XLookupBoth)
117 len = wcstombs ((char *)kbuf, wkbuf, KBUFSZ);
125 valid_keysym = status_return == XLookupKeySym
126 || status_return == XLookupBoth;
131 len = XLookupString (ev, (char *)kbuf, KBUFSZ, &keysym, &R->compose);
137 /* for some backwards compatibility */
138 #if defined(HOTKEY_CTRL) || defined(HOTKEY_META)
145 if (keysym == R->ks_bigfont)
147 rxvt_change_font(aR_ 0, FONT_UP);
150 else if (keysym == R->ks_smallfont)
152 rxvt_change_font(aR_ 0, FONT_DN);
158 if (R->TermWin.saveLines) {
159 #ifdef UNSHIFTED_SCROLLKEYS
160 if (!ctrl && !meta) {
166 #ifdef PAGING_CONTEXT_LINES
167 lnsppg = R->TermWin.nrow - PAGING_CONTEXT_LINES;
169 lnsppg = R->TermWin.nrow * 4 / 5;
171 if (keysym == XK_Prior) {
172 rxvt_scr_page(aR_ UP, lnsppg);
174 } else if (keysym == XK_Next) {
175 rxvt_scr_page(aR_ DN, lnsppg);
179 #ifdef SCROLL_ON_UPDOWN_KEYS
181 if (keysym == XK_Up) {
182 rxvt_scr_page(aR_ UP, 1);
184 } else if (keysym == XK_Down) {
185 rxvt_scr_page(aR_ DN, 1);
190 #ifdef SCROLL_ON_HOMEEND_KEYS
192 if (keysym == XK_Home) {
193 rxvt_scr_move_to(aR_ 0, 1);
195 } else if (keysym == XK_End) {
196 rxvt_scr_move_to(aR_ 1, 0);
204 /* Shift + F1 - F10 generates F11 - F20 */
205 if (keysym >= XK_F1 && keysym <= XK_F10) {
206 keysym += (XK_F11 - XK_F1);
207 shft = 0; /* turn off Shift */
208 } else if (!ctrl && !meta && (R->PrivateModes & PrivMode_ShiftKeys)) {
210 /* normal XTerm key bindings */
211 case XK_Insert: /* Shift+Insert = paste mouse selection */
212 rxvt_selection_request(aR_ ev->time, 0, 0);
215 case XK_KP_Add: /* Shift+KP_Add = bigger font */
216 rxvt_change_font(aR_ 0, FONT_UP);
218 case XK_KP_Subtract: /* Shift+KP_Subtract = smaller font */
219 rxvt_change_font(aR_ 0, FONT_DN);
225 if (keysym == XK_Print) {
226 rxvt_scr_printscreen(aR_ ctrl | shft);
231 if (keysym == R->ks_greekmodeswith) {
232 R->greek_mode = !R->greek_mode;
234 rxvt_xterm_seq(aR_ XTerm_title,
235 (greek_getmode() == GREEK_ELOT928
236 ? "[Greek: iso]" : "[Greek: ibm]"), CHAR_ST);
239 rxvt_xterm_seq(aR_ XTerm_title, APL_NAME "-" VERSION, CHAR_ST);
244 if (keysym >= 0xFF00 && keysym <= 0xFFFF) {
245 #ifdef KEYSYM_RESOURCE
246 if (!(shft | ctrl) && R->Keysym_map[keysym & 0xFF] != NULL) {
248 const unsigned char *kbuf0;
249 const unsigned char ch = C0_ESC;
251 kbuf0 = (R->Keysym_map[keysym & 0xFF]);
252 l = (unsigned int)*kbuf0++;
257 if (R->meta_char == C0_ESC)
259 R->tt_write (&ch, 1);
260 R->tt_write (kbuf0, l);
267 #ifndef NO_BACKSPACE_KEY
269 if (R->PrivateModes & PrivMode_HaveBackSpace) {
270 kbuf[0] = (!!(R->PrivateModes & PrivMode_BackSpace)
271 ^ !!ctrl) ? '\b' : '\177';
274 STRCPY(kbuf, R->key_backspace);
275 # ifdef MULTICHAR_SET
276 if ((R->Options & Opt_mc_hack) && R->screen.cur.col > 0) {
279 newlen = STRLEN(kbuf);
280 col = R->screen.cur.col - 1;
281 row = R->screen.cur.row + R->TermWin.saveLines;
282 if (IS_MULTI2(R->screen.rend[row][col]))
283 MEMMOVE(kbuf + newlen, kbuf, newlen + 1);
288 #ifndef NO_DELETE_KEY
290 STRCPY(kbuf, R->key_delete);
291 # ifdef MULTICHAR_SET
292 if (R->Options & Opt_mc_hack) {
295 newlen = STRLEN(kbuf);
296 col = R->screen.cur.col;
297 row = R->screen.cur.row + R->TermWin.saveLines;
298 if (IS_MULTI1(R->screen.rend[row][col]))
299 MEMMOVE(kbuf + newlen, kbuf, newlen + 1);
306 STRCPY(kbuf, "\033[Z");
308 #ifdef CTRL_TAB_MAKES_META
312 #ifdef MOD4_TAB_MAKES_META
313 if (ev->state & Mod4Mask)
322 case XK_KP_Up: /* \033Ox or standard */
323 case XK_KP_Down: /* \033Or or standard */
324 case XK_KP_Right: /* \033Ov or standard */
325 case XK_KP_Left: /* \033Ot or standard */
326 if ((R->PrivateModes & PrivMode_aplKP) ? !shft : shft) {
327 STRCPY(kbuf, "\033OZ");
328 kbuf[2] = ("txvr"[keysym - XK_KP_Left]);
331 /* translate to std. cursor key */
332 keysym = XK_Left + (keysym - XK_KP_Left);
335 case XK_Up: /* "\033[A" */
336 case XK_Down: /* "\033[B" */
337 case XK_Right: /* "\033[C" */
338 case XK_Left: /* "\033[D" */
339 STRCPY(kbuf, "\033[Z");
340 kbuf[2] = ("DACB"[keysym - XK_Left]);
343 kbuf[2] = ("dacb"[keysym - XK_Left]);
346 kbuf[2] = ("dacb"[keysym - XK_Left]);
347 } else if (R->PrivateModes & PrivMode_aplCUR)
351 if (R->Options & Opt_mc_hack) {
354 col = R->screen.cur.col;
355 row = R->screen.cur.row + R->TermWin.saveLines;
357 if (keysym == XK_Right
358 && IS_MULTI1(R->screen.rend[row][col]))
360 else if (keysym == XK_Left) {
362 if (IS_MULTI2(R->screen.rend[row][col - 1]))
364 } else if (R->screen.cur.row > 0) {
365 col = R->screen.tlen[--row];
367 col = R->TermWin.ncol - 1;
371 && IS_MULTI2(R->screen.rend[row][col]))
376 MEMMOVE(kbuf + 3, kbuf, 3 + 1);
381 #ifndef UNSHIFTED_SCROLLKEYS
384 /* allow shift to override */
385 if ((R->PrivateModes & PrivMode_aplKP) ? !shft : shft) {
386 STRCPY(kbuf, "\033Oy");
392 STRCPY(kbuf, "\033[5~");
396 /* allow shift to override */
397 if ((R->PrivateModes & PrivMode_aplKP) ? !shft : shft) {
398 STRCPY(kbuf, "\033Os");
404 STRCPY(kbuf, "\033[6~");
408 /* allow shift to override */
409 if ((R->PrivateModes & PrivMode_aplKP) ? !shft : shft) {
410 STRCPY(kbuf, "\033OM");
419 STRCPY(kbuf, "\033Ou");
423 STRCPY(kbuf, "\033Op");
427 STRCPY(kbuf, "\033On");
430 case XK_KP_F1: /* "\033OP" */
431 case XK_KP_F2: /* "\033OQ" */
432 case XK_KP_F3: /* "\033OR" */
433 case XK_KP_F4: /* "\033OS" */
434 STRCPY(kbuf, "\033OP");
435 kbuf[2] += (keysym - XK_KP_F1);
438 case XK_KP_Multiply: /* "\033Oj" : "*" */
439 case XK_KP_Add: /* "\033Ok" : "+" */
440 case XK_KP_Separator: /* "\033Ol" : "," */
441 case XK_KP_Subtract: /* "\033Om" : "-" */
442 case XK_KP_Decimal: /* "\033On" : "." */
443 case XK_KP_Divide: /* "\033Oo" : "/" */
444 case XK_KP_0: /* "\033Op" : "0" */
445 case XK_KP_1: /* "\033Oq" : "1" */
446 case XK_KP_2: /* "\033Or" : "2" */
447 case XK_KP_3: /* "\033Os" : "3" */
448 case XK_KP_4: /* "\033Ot" : "4" */
449 case XK_KP_5: /* "\033Ou" : "5" */
450 case XK_KP_6: /* "\033Ov" : "6" */
451 case XK_KP_7: /* "\033Ow" : "7" */
452 case XK_KP_8: /* "\033Ox" : "8" */
453 case XK_KP_9: /* "\033Oy" : "9" */
454 /* allow shift to override */
455 if ((R->PrivateModes & PrivMode_aplKP) ? !shft : shft) {
456 STRCPY(kbuf, "\033Oj");
457 kbuf[2] += (keysym - XK_KP_Multiply);
459 kbuf[0] = ('*' + (keysym - XK_KP_Multiply));
465 STRCPY(kbuf, "\033[1~");
468 STRCPY(kbuf, "\033[2~");
470 #ifdef DXK_Remove /* support for DEC remove like key */
475 STRCPY(kbuf, "\033[3~");
478 STRCPY(kbuf, "\033[4~");
482 /* allow shift to override */
483 if ((R->PrivateModes & PrivMode_aplKP) ? !shft : shft) {
484 STRCPY(kbuf, "\033Oq");
490 STRCPY(kbuf, KS_END);
494 /* allow shift to override */
495 if ((R->PrivateModes & PrivMode_aplKP) ? !shft : shft) {
496 STRCPY(kbuf, "\033Ow");
502 STRCPY(kbuf, KS_HOME);
505 #define FKEY(n, fkey) \
506 sprintf((char *)kbuf,"\033[%2d~", (int)((n) + (keysym - fkey)))
508 case XK_F1: /* "\033[11~" */
509 case XK_F2: /* "\033[12~" */
510 case XK_F3: /* "\033[13~" */
511 case XK_F4: /* "\033[14~" */
512 case XK_F5: /* "\033[15~" */
515 case XK_F6: /* "\033[17~" */
516 case XK_F7: /* "\033[18~" */
517 case XK_F8: /* "\033[19~" */
518 case XK_F9: /* "\033[20~" */
519 case XK_F10: /* "\033[21~" */
522 case XK_F11: /* "\033[23~" */
523 case XK_F12: /* "\033[24~" */
524 case XK_F13: /* "\033[25~" */
525 case XK_F14: /* "\033[26~" */
528 case XK_F15: /* "\033[28~" */
529 case XK_F16: /* "\033[29~" */
532 case XK_Help: /* "\033[28~" */
535 case XK_Menu: /* "\033[29~" */
538 case XK_F17: /* "\033[31~" */
539 case XK_F18: /* "\033[32~" */
540 case XK_F19: /* "\033[33~" */
541 case XK_F20: /* "\033[34~" */
542 case XK_F21: /* "\033[35~" */
543 case XK_F22: /* "\033[36~" */
544 case XK_F23: /* "\033[37~" */
545 case XK_F24: /* "\033[38~" */
546 case XK_F25: /* "\033[39~" */
547 case XK_F26: /* "\033[40~" */
548 case XK_F27: /* "\033[41~" */
549 case XK_F28: /* "\033[42~" */
550 case XK_F29: /* "\033[43~" */
551 case XK_F30: /* "\033[44~" */
552 case XK_F31: /* "\033[45~" */
553 case XK_F32: /* "\033[46~" */
554 case XK_F33: /* "\033[47~" */
555 case XK_F34: /* "\033[48~" */
556 case XK_F35: /* "\033[49~" */
568 * Pass meta for all function keys, if 'meta' option set
571 if (meta && (R->meta_char == 0x80) && len > 0)
572 kbuf[len - 1] |= 0x80;
574 } else if (ctrl && keysym == XK_minus) {
576 kbuf[0] = '\037'; /* Ctrl-Minus generates ^_ (31) */
580 if (meta && (R->meta_char == 0x80)) {
583 for (ch = kbuf; ch < kbuf + len; ch++)
590 len = greek_xlat(kbuf, len);
597 return; /* not mapped */
599 if (R->Options & Opt_scrollTtyKeypress)
600 if (R->TermWin.view_start) {
601 R->TermWin.view_start = 0;
606 * these modifications only affect the static keybuffer
607 * pass Shift/Control indicators for function keys ending with `~'
611 * Shift+Prior = "ESC[5$"
612 * Ctrl+Prior = "ESC[5^"
613 * Ctrl+Shift+Prior = "ESC[5@"
614 * Meta adds an Escape prefix (with META8_OPTION, if meta == <escape>).
616 if (kbuf[0] == C0_ESC && kbuf[1] == '[' && kbuf[len - 1] == '~')
617 kbuf[len - 1] = (shft ? (ctrl ? '@' : '$') : (ctrl ? '^' : '~'));
622 && (R->meta_char == C0_ESC)
625 const unsigned char ch = C0_ESC;
630 if (debug_key) { /* Display keyboard buffer contents */
634 fprintf(stderr, "key 0x%04X [%d]: `", (unsigned int)keysym, len);
635 for (i = 0, p = kbuf; i < len; i++, p++)
636 fprintf(stderr, (*p >= ' ' && *p < '\177' ? "%c" : "\\%03o"), *p);
637 fprintf(stderr, "'\n");
639 #endif /* DEBUG_CMD */
640 R->tt_write (kbuf, (unsigned int)len);
645 /*{{{ rxvt_cmd_write(), rxvt_cmd_getc() */
646 /* attempt to `write' count to the input buffer */
649 rxvt_cmd_write(pR_ const unsigned char *str, unsigned int count)
652 unsigned char *cmdbuf_base = R->cmdbuf_base,
653 *cmdbuf_endp = R->cmdbuf_endp,
654 *cmdbuf_ptr = R->cmdbuf_ptr;
656 n = cmdbuf_ptr - cmdbuf_base;
657 s = cmdbuf_base + BUFSIZ - 1 - cmdbuf_endp;
658 if (n > 0 && s < count) {
659 MEMMOVE(cmdbuf_base, cmdbuf_ptr,
660 (unsigned int)(cmdbuf_endp - cmdbuf_ptr));
661 cmdbuf_ptr = cmdbuf_base;
666 rxvt_print_error("data loss: cmd_write too large");
670 *cmdbuf_endp++ = *str++;
671 R->cmdbuf_ptr = cmdbuf_ptr;
672 R->cmdbuf_endp = cmdbuf_endp;
675 #endif /* MENUBAR_MAX */
681 if (want_full_refresh)
683 want_full_refresh = 0;
692 scr_refresh (refresh_type);
693 rxvt_scrollbar_show (this, 1);
695 rxvt_IMSendSpot (this);
703 rxvt_term::check_cb (check_watcher &w)
712 rxvt_term::process_x_events ()
718 XNextEvent (Xdisplay, &xev);
720 #if defined(CURSOR_BLINK)
721 if ((Options & Opt_cursorBlink) && xev.type == KeyPress)
729 cursor_blink_ev.start (NOW + BLINK_INTERVAL);
733 #if defined(POINTER_BLANK)
734 if ((Options & Opt_pointerBlank) && pointerBlankDelay > 0)
736 if (xev.type == MotionNotify
737 || xev.type == ButtonPress
738 || xev.type == ButtonRelease)
742 if (xev.type == KeyPress && hidden_pointer == 0)
748 if (!XFilterEvent (&xev, xev.xany.window))
750 rxvt_process_x_event (this, &xev);
752 while (XPending (Xdisplay));
757 rxvt_term::cursor_blink_cb (time_watcher &w)
759 hidden_cursor = !hidden_cursor;
762 w.start (w.at + BLINK_INTERVAL);
768 rxvt_term::text_blink_cb (time_watcher &w)
770 if (scr_refresh_rend (RS_Blink, RS_Blink))
772 hidden_text = !hidden_text;
774 w.start (w.at + TEXT_BLINK_INTERVAL);
780 rxvt_term::x_cb (io_watcher &w, short revents)
789 rxvt_term::pty_fill ()
791 ssize_t n = cmdbuf_endp - cmdbuf_ptr;
793 memmove (cmdbuf_base, cmdbuf_ptr, n);
794 cmdbuf_ptr = cmdbuf_base;
795 cmdbuf_endp = cmdbuf_ptr + n;
797 n = read (cmd_fd, cmdbuf_endp, BUFSIZ - n);
804 else if (n < 0 && errno != EAGAIN)
811 rxvt_term::pty_cb (io_watcher &w, short revents)
816 if (revents & EVENT_WRITE)
818 else if (revents & EVENT_READ)
822 // loop, but don't allow a single term to monopolize us
823 // the number of loops is fully arbitrary, and thus wrong
824 while (flag && pty_fill ())
829 /* once we know the shell is running, send the screen size. Again! */
833 uint32_t ch = NOCHAR;
840 if (ch == NOCHAR) // TODO: improve
843 if (ch >= ' ' || ch == '\t' || ch == '\n' || ch == '\r')
845 /* Read a text string from the input buffer */
846 uint32_t buf[BUFSIZ];
847 bool refreshnow = false;
857 if (ch == NOCHAR || (ch < ' ' && ch != '\t' && ch != '\n' && ch != '\r'))
868 if (!(Options & Opt_jumpScroll)
869 || (refresh_count >= (refresh_limit * (TermWin.nrow - 1))))
878 if (str >= buf + BUFSIZ)
886 rxvt_scr_add_lines (this, buf, nlines, str - buf);
889 * If there have been a lot of new lines, then update the screen
890 * What the heck I'll cheat and only refresh less than every page-full.
891 * the number of pages between refreshes is refresh_limit, which
892 * is incremented here because we must be doing flat-out scrolling.
894 * refreshing should be correct for small scrolls, because of the
899 if ((Options & Opt_jumpScroll) && refresh_limit < REFRESH_PERIOD)
902 scr_refresh (refresh_type);
911 rxvt_process_nonprinting (this, ch);
913 case C0_ESC: /* escape char */
914 rxvt_process_escape_seq (this);
916 /*case 0x9b: */ /* CSI */
917 /* rxvt_process_csi_seq (this); */
927 // read the next character, currently handles UTF-8
928 // will probably handle all sorts of other stuff in the future
930 rxvt_term::next_char ()
932 while (cmdbuf_ptr < cmdbuf_endp)
934 if (*cmdbuf_ptr < 0x80) // assume < 0x80 to be ascii ALWAYS (all shift-states etc.) uh-oh
935 return *cmdbuf_ptr++;
938 int len = mbrtowc (&wc, (char *)cmdbuf_ptr, cmdbuf_endp - cmdbuf_ptr, &mbstate.mbs);
940 if (len == (size_t)-2)
943 if (len == (size_t)-1)
944 return *cmdbuf_ptr++; // the _occasional_ latin1 character is allowed to slip through
946 // assume wchar == unicode
954 /* rxvt_cmd_getc() - Return next input character */
956 * Return the next input character after first passing any keyboard input
965 uint32_t c = R->next_char ();
969 // incomplete sequences should occur rarely, still, a better solution
970 // would be preferred. either setjmp/longjmp or better design.
971 fcntl (R->cmd_fd, F_SETFL, 0);
973 fcntl (R->cmd_fd, F_SETFL, O_NONBLOCK);
977 #define TIMEOUT_USEC 5000
979 int quick_timeout, select_res;
980 int want_motion_time, want_keypress_time;
981 struct timeval value;
982 #if defined(POINTER_BLANK) || defined(CURSOR_BLINK)
987 /* loop until we can return something */
989 if (R->v_bufstr < R->v_bufptr) /* output any pending chars */
990 R->tt_write(NULL, 0);
992 #if defined(MOUSE_WHEEL) && defined(MOUSE_SLIP_WHEELING)
993 if (R->mouse_slip_wheel_speed) {
995 if (!R->mouse_slip_wheel_delay--
996 && rxvt_scr_page(aR_ R->mouse_slip_wheel_speed > 0 ? UP : DN,
997 abs(R->mouse_slip_wheel_speed))) {
998 R->mouse_slip_wheel_delay = SCROLLBAR_CONTINUOUS_DELAY;
999 R->refresh_type |= SMOOTH_REFRESH;
1000 R->want_refresh = 1;
1003 #endif /* MOUSE_WHEEL && MOUSE_SLIP_WHEELING */
1004 #ifdef SELECTION_SCROLLING
1005 if (R->pending_scroll_selection) {
1007 if (!R->scroll_selection_delay--
1008 && rxvt_scr_page(aR_ R->scroll_selection_dir,
1009 R->scroll_selection_lines)) {
1010 R->selection_extend (R->selection_save_x,
1011 R->selection_save_y, R->selection_save_state);
1012 R->scroll_selection_delay = SCROLLBAR_CONTINUOUS_DELAY;
1013 R->refresh_type |= SMOOTH_REFRESH;
1014 R->want_refresh = 1;
1018 #ifndef NO_SCROLLBAR_BUTTON_CONTINUAL_SCROLLING
1019 if (scrollbar_isUp() || scrollbar_isDn()) {
1021 if (!R->scroll_arrow_delay--
1022 && rxvt_scr_page(aR_ scrollbar_isUp() ? UP : DN, 1)) {
1023 R->scroll_arrow_delay = SCROLLBAR_CONTINUOUS_DELAY;
1024 R->refresh_type |= SMOOTH_REFRESH;
1025 R->want_refresh = 1;
1028 #endif /* NO_SCROLLBAR_BUTTON_CONTINUAL_SCROLLING */
1031 quick_timeout |= R->want_full_refresh;
1036 #ifdef POINTER_BLANK
1038 rxvt_term::pointer_unblank ()
1040 XDefineCursor (Xdisplay, TermWin.vt, TermWin_cursor);
1045 if (Options & Opt_pointerBlank)
1046 pointer_ev.start (NOW + pointerBlankDelay);
1050 rxvt_term::pointer_blank ()
1052 if (!(Options & Opt_pointerBlank))
1055 XDefineCursor (Xdisplay, TermWin.vt, blank_cursor);
1062 rxvt_term::pointer_cb (time_watcher &w)
1065 SET_LOCALE (locale);
1073 rxvt_mouse_report(pR_ const XButtonEvent *ev)
1075 int button_number, key_state = 0;
1080 R->pixel_position (&x, &y);
1082 if (R->MEvent.button == AnyButton) {
1085 button_number = R->MEvent.button - Button1;
1086 /* add 0x3D for wheel events, like xterm does */
1087 if (button_number >= 3)
1088 button_number += (64 - 3);
1091 if (R->PrivateModes & PrivMode_MouseX10) {
1093 * do not report ButtonRelease
1094 * no state info allowed
1097 if (button_number == 3)
1100 /* XTerm mouse reporting needs these values:
1104 * plus will add in our own Double-Click reporting
1107 key_state = ((R->MEvent.state & ShiftMask) ? 4 : 0)
1108 + ((R->MEvent.state & R->ModMetaMask) ? 8 : 0)
1109 + ((R->MEvent.state & ControlMask) ? 16 : 0);
1110 #ifdef MOUSE_REPORT_DOUBLECLICK
1111 key_state += ((R->MEvent.clicks > 1) ? 32 : 0);
1115 #ifdef DEBUG_MOUSEREPORT
1116 fprintf(stderr, "Mouse [");
1125 fprintf(stderr, "]: <%d>, %d/%d\n",
1130 R->tt_printf("\033[M%c%c%c",
1131 (32 + button_number + key_state),
1140 rxvt_W11_process_x_event(XEvent *ev)
1142 rxvt_t *r = rxvt_get_r();
1144 rxvt_process_x_event(aR_ ev);
1148 /*{{{ process an X event */
1151 rxvt_process_x_event(pR_ XEvent *ev)
1153 int i, want_timeout;
1154 Window unused_root, unused_child;
1155 int unused_root_x, unused_root_y;
1156 unsigned int unused_mask;
1159 const char *const eventnames[] =
1160 { /* mason - this matches my system */
1202 (void)gettimeofday(&tp, NULL);
1203 ltt = localtime(&(tp.tv_sec));
1204 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));
1209 rxvt_lookup_key(aR_ (XKeyEvent *)ev);
1212 #if defined(MOUSE_WHEEL) && defined(MOUSE_SLIP_WHEELING)
1215 if (!(ev->xkey.state & ControlMask))
1216 R->mouse_slip_wheel_speed = 0;
1220 ks = XKeycodeToKeysym(R->Xdisplay, ev->xkey.keycode, 0);
1221 if (ks == XK_Control_L || ks == XK_Control_R)
1222 R->mouse_slip_wheel_speed = 0;
1229 rxvt_button_press(aR_ (XButtonEvent *)ev);
1233 rxvt_button_release(aR_ (XButtonEvent *)ev);
1237 if (ev->xclient.format == 32
1238 && (Atom)ev->xclient.data.l[0] == R->xa[XA_WMDELETEWINDOW])
1241 /* OffiX Dnd (drag 'n' drop) protocol */
1242 else if (ev->xclient.message_type == R->xa[XA_DNDPROTOCOL]
1243 && (ev->xclient.data.l[0] == DndFile
1244 || ev->xclient.data.l[0] == DndDir
1245 || ev->xclient.data.l[0] == DndLink)) {
1249 unsigned char *data;
1250 unsigned long Size, RemainingBytes;
1252 XGetWindowProperty(R->Xdisplay, Xroot,
1253 R->xa[XA_DNDSELECTION],
1255 False, AnyPropertyType,
1256 &ActualType, &ActualFormat,
1257 &Size, &RemainingBytes,
1259 XChangeProperty(R->Xdisplay, Xroot,
1260 XA_CUT_BUFFER0, XA_STRING,
1262 data, STRLEN(data));
1263 rxvt_selection_paste(aR_ Xroot, XA_CUT_BUFFER0, True);
1264 XSetInputFocus(R->Xdisplay, Xroot, RevertToNone, CurrentTime);
1266 #endif /* OFFIX_DND */
1270 XRefreshKeyboardMapping(&(ev->xmapping));
1274 * XXX: this is not the _current_ arrangement
1275 * Here's my conclusion:
1276 * If the window is completely unobscured, use bitblt's
1277 * to scroll. Even then, they're only used when doing partial
1278 * screen scrolling. When partially obscured, we have to fill
1279 * in the GraphicsExpose parts, which means that after each refresh,
1280 * we need to wait for the graphics expose or Noexpose events,
1281 * which ought to make things real slow!
1283 case VisibilityNotify:
1284 switch (ev->xvisibility.state)
1286 case VisibilityUnobscured:
1287 R->refresh_type = FAST_REFRESH;
1289 case VisibilityPartiallyObscured:
1290 R->refresh_type = SLOW_REFRESH;
1293 R->refresh_type = NO_REFRESH;
1299 if (!R->TermWin.focus) {
1300 R->TermWin.focus = 1;
1301 R->want_refresh = 1;
1303 if (R->Input_Context != NULL)
1304 XSetICFocus(R->Input_Context);
1307 if (R->Options & Opt_cursorBlink)
1308 R->cursor_blink_ev.start (NOW + BLINK_INTERVAL);
1314 if (R->TermWin.focus) {
1315 R->TermWin.focus = 0;
1316 R->want_refresh = 1;
1318 if (R->Input_Context != NULL)
1319 XUnsetICFocus(R->Input_Context);
1322 if (R->Options & Opt_cursorBlink)
1323 R->cursor_blink_ev.stop ();
1324 R->hidden_cursor = 0;
1329 case ConfigureNotify:
1330 if (ev->xconfigure.window == R->TermWin.parent[0]) {
1333 do { /* Wrap lots of configures into one */
1334 width = ev->xconfigure.width;
1335 height = ev->xconfigure.height;
1336 D_SIZE((stderr, "Size: ConfigureNotify: %4d x %4d", width, height));
1337 } while (XCheckTypedWindowEvent(R->Xdisplay, ev->xconfigure.window,
1338 ConfigureNotify, ev));
1339 if (R->szHint.width != width || R->szHint.height != height) {
1340 D_SIZE((stderr, "Size: Resizing from: %4d x %4d", R->szHint.width, R->szHint.height));
1341 R->resize_all_windows (width, height, 1);
1345 D_SIZE((stderr, "Size: Not resizing"));
1348 #ifdef TRANSPARENT /* XXX: maybe not needed - leave in for now */
1349 if (R->Options & Opt_transparent) {
1350 rxvt_check_our_parents(aR);
1351 if (R->am_transparent)
1352 R->want_full_refresh = 1;
1358 case SelectionClear:
1359 rxvt_selection_clear(aR);
1362 case SelectionNotify:
1363 if (R->selection_wait == Sel_normal)
1364 rxvt_selection_paste(aR_ ev->xselection.requestor,
1365 ev->xselection.property, True);
1368 case SelectionRequest:
1369 rxvt_selection_send(aR_ &(ev->xselectionrequest));
1373 R->TermWin.mapped = 0;
1375 R->text_blink_ev.stop ();
1380 R->TermWin.mapped = 1;
1382 R->text_blink_ev.start (NOW + TEXT_BLINK_INTERVAL);
1386 case PropertyNotify:
1387 if (ev->xproperty.atom == R->xa[XA_VT_SELECTION]) {
1388 if (ev->xproperty.state == PropertyNewValue)
1389 rxvt_selection_property(aR_ ev->xproperty.window,
1390 ev->xproperty.atom);
1395 * if user used some Esetroot compatible prog to set the root bg,
1396 * use the property to determine the pixmap. We use it later on.
1398 if (R->xa[XA_XROOTPMAPID] == 0)
1399 R->xa[XA_XROOTPMAPID] = XInternAtom(R->Xdisplay,
1400 "_XROOTPMAP_ID", False);
1401 if (ev->xproperty.atom != R->xa[XA_XROOTPMAPID])
1404 case ReparentNotify:
1405 if ((R->Options & Opt_transparent) && rxvt_check_our_parents(aR)) {
1406 if (R->am_transparent)
1407 R->want_full_refresh = 1;
1409 #endif /* TRANSPARENT */
1412 case GraphicsExpose:
1414 if (ev->xany.window == R->TermWin.vt) {
1415 #ifdef NO_SLOW_LINK_SUPPORT
1416 R->scr_expose (ev->xexpose.x, ev->xexpose.y,
1417 ev->xexpose.width, ev->xexpose.height, False);
1419 // don't understand this, so commented it out
1420 R->scr_expose (ev->xexpose.x, ev->xexpose.y,
1421 ev->xexpose.width, ev->xexpose.height, False);
1422 //rxvt_scr_expose(aR_ ev->xexpose.x, 0,
1423 // ev->xexpose.width, R->TermWin.height, False);
1425 R->want_refresh = 1;
1427 XEvent unused_xevent;
1429 while (XCheckTypedWindowEvent(R->Xdisplay, ev->xany.window,
1432 while (XCheckTypedWindowEvent(R->Xdisplay, ev->xany.window,
1435 if (isScrollbarWindow(ev->xany.window)) {
1436 R->scrollBar.setIdle();
1437 rxvt_scrollbar_show(aR_ 0);
1440 if (menubar_visible(aR) && isMenuBarWindow(ev->xany.window))
1441 rxvt_menubar_expose(aR);
1443 #ifdef RXVT_GRAPHICS
1444 rxvt_Gr_expose(aR_ ev->xany.window);
1450 #ifdef POINTER_BLANK
1451 if (R->hidden_pointer)
1452 R->pointer_unblank ();
1455 if (isMenuBarWindow(ev->xany.window)) {
1456 rxvt_menubar_control(aR_ &(ev->xbutton));
1460 if ((R->PrivateModes & PrivMode_mouse_report) && !(R->bypass_keystate))
1463 if (ev->xany.window == R->TermWin.vt) {
1464 if ((ev->xbutton.state & (Button1Mask | Button3Mask))) {
1465 while (XCheckTypedWindowEvent(R->Xdisplay, R->TermWin.vt,
1466 MotionNotify, ev)) ;
1467 XQueryPointer(R->Xdisplay, R->TermWin.vt,
1468 &unused_root, &unused_child,
1469 &unused_root_x, &unused_root_y,
1470 &(ev->xbutton.x), &(ev->xbutton.y),
1472 #ifdef MOUSE_THRESHOLD
1473 /* deal with a `jumpy' mouse */
1474 if ((ev->xmotion.time - R->MEvent.time) > MOUSE_THRESHOLD) {
1476 R->selection_extend ((ev->xbutton.x), (ev->xbutton.y),
1477 (ev->xbutton.state & Button3Mask) ? 2 : 0);
1478 #ifdef SELECTION_SCROLLING
1479 if (ev->xbutton.y < R->TermWin.int_bwidth
1480 || Pixel2Row(ev->xbutton.y) > (R->TermWin.nrow-1)) {
1483 R->pending_scroll_selection=1;
1485 /* don't clobber the current delay if we are
1486 * already in the middle of scrolling.
1488 if (R->scroll_selection_delay<=0)
1489 R->scroll_selection_delay=SCROLLBAR_CONTINUOUS_DELAY;
1491 /* save the event params so we can highlight
1492 * the selection in the pending-scroll loop
1494 R->selection_save_x=ev->xbutton.x;
1495 R->selection_save_y=ev->xbutton.y;
1496 R->selection_save_state=
1497 (ev->xbutton.state & Button3Mask) ? 2 : 0;
1499 /* calc number of lines to scroll */
1500 if (ev->xbutton.y<R->TermWin.int_bwidth) {
1501 R->scroll_selection_dir = UP;
1502 dist = R->TermWin.int_bwidth - ev->xbutton.y;
1505 R->scroll_selection_dir = DN;
1506 dist = ev->xbutton.y -
1507 (R->TermWin.int_bwidth + R->TermWin.height);
1509 R->scroll_selection_lines=(Pixel2Height(dist)/
1510 SELECTION_SCROLL_LINE_SPEEDUP)+1;
1511 MIN_IT(R->scroll_selection_lines,
1512 SELECTION_SCROLL_MAX_LINES);
1515 /* we are within the text window, so we
1516 * shouldn't be scrolling
1518 R->pending_scroll_selection = 0;
1521 #ifdef MOUSE_THRESHOLD
1525 } else if (isScrollbarWindow(ev->xany.window) && scrollbar_isMotion()) {
1526 while (XCheckTypedWindowEvent(R->Xdisplay, R->scrollBar.win,
1527 MotionNotify, ev)) ;
1528 XQueryPointer(R->Xdisplay, R->scrollBar.win,
1529 &unused_root, &unused_child,
1530 &unused_root_x, &unused_root_y,
1531 &(ev->xbutton.x), &(ev->xbutton.y),
1533 rxvt_scr_move_to(aR_ scrollbar_position(ev->xbutton.y) - R->csrO,
1535 R->scr_refresh (R->refresh_type);
1536 R->refresh_limit = 0;
1537 rxvt_scrollbar_show(aR_ 1);
1545 rxvt_button_press(pR_ XButtonEvent *ev)
1547 int reportmode = 0, clickintime;
1549 R->bypass_keystate = ev->state & (R->ModMetaMask | ShiftMask);
1550 if (!R->bypass_keystate)
1551 reportmode = !!(R->PrivateModes & PrivMode_mouse_report);
1553 * VT window processing of button press
1555 if (ev->window == R->TermWin.vt)
1558 if (ev->subwindow != None)
1559 rxvt_Gr_ButtonPress (ev->x, ev->y);
1563 clickintime = ev->time - R->MEvent.time < MULTICLICK_TIME;
1566 /* mouse report from vt window */
1567 /* save the xbutton state (for ButtonRelease) */
1568 R->MEvent.state = ev->state;
1569 #ifdef MOUSE_REPORT_DOUBLECLICK
1570 if (ev->button == R->MEvent.button && clickintime)
1572 /* same button, within alloted time */
1574 if (R->MEvent.clicks > 1)
1576 /* only report double clicks */
1577 R->MEvent.clicks = 2;
1578 rxvt_mouse_report(aR_ ev);
1580 /* don't report the release */
1581 R->MEvent.clicks = 0;
1582 R->MEvent.button = AnyButton;
1587 /* different button, or time expired */
1588 R->MEvent.clicks = 1;
1589 R->MEvent.button = ev->button;
1590 rxvt_mouse_report(aR_ ev);
1593 R->MEvent.button = ev->button;
1594 rxvt_mouse_report(aR_ ev);
1595 #endif /* MOUSE_REPORT_DOUBLECLICK */
1599 if (ev->button != R->MEvent.button)
1600 R->MEvent.clicks = 0;
1604 /* allow shift+left click to extend selection */
1605 if (ev->state & ShiftMask && !(R->PrivateModes & PrivMode_mouse_report))
1607 if (R->MEvent.button == Button1 && clickintime)
1608 R->selection_rotate (ev->x, ev->y);
1610 R->selection_extend (ev->x, ev->y, 1);
1614 if (R->MEvent.button == Button1 && clickintime)
1617 R->MEvent.clicks = 1;
1619 R->selection_click (R->MEvent.clicks, ev->x, ev->y);
1622 R->MEvent.button = Button1;
1626 if (R->MEvent.button == Button3 && clickintime)
1627 R->selection_rotate (ev->x, ev->y);
1629 R->selection_extend (ev->x, ev->y, 1);
1630 R->MEvent.button = Button3;
1634 R->MEvent.time = ev->time;
1640 * Scrollbar window processing of button press
1642 if (isScrollbarWindow(ev->window))
1644 R->scrollBar.setIdle ();
1646 * Rxvt-style scrollbar:
1647 * move up if mouse is above slider
1648 * move dn if mouse is below slider
1650 * XTerm-style scrollbar:
1651 * Move display proportional to pointer location
1652 * pointer near top -> scroll one line
1653 * pointer near bot -> scroll full page
1655 #ifndef NO_SCROLLBAR_REPORT
1658 * Mouse report disabled scrollbar:
1659 * arrow buttons - send up/down
1660 * click on scrollbar - send pageup/down
1662 if ((R->scrollBar.style == R_SB_NEXT
1663 && scrollbarnext_upButton(ev->y))
1664 || (R->scrollBar.style == R_SB_RXVT
1665 && scrollbarrxvt_upButton(ev->y)))
1666 R->tt_printf("\033[A");
1667 else if ((R->scrollBar.style == R_SB_NEXT
1668 && scrollbarnext_dnButton(ev->y))
1669 || (R->scrollBar.style == R_SB_RXVT
1670 && scrollbarrxvt_dnButton(ev->y)))
1671 R->tt_printf("\033[B");
1673 switch (ev->button) {
1675 R->tt_printf("\014");
1678 R->tt_printf("\033[6~");
1681 R->tt_printf("\033[5~");
1686 #endif /* NO_SCROLLBAR_REPORT */
1690 if (R->scrollBar.style == R_SB_NEXT) {
1691 if (scrollbarnext_upButton(ev->y))
1692 upordown = -1; /* up */
1693 else if (scrollbarnext_dnButton(ev->y))
1694 upordown = 1; /* down */
1695 } else if (R->scrollBar.style == R_SB_RXVT) {
1696 if (scrollbarrxvt_upButton(ev->y))
1697 upordown = -1; /* up */
1698 else if (scrollbarrxvt_dnButton(ev->y))
1699 upordown = 1; /* down */
1702 #ifndef NO_SCROLLBAR_BUTTON_CONTINUAL_SCROLLING
1703 R->scroll_arrow_delay = SCROLLBAR_INITIAL_DELAY;
1705 if (rxvt_scr_page(aR_ upordown < 0 ? UP : DN, 1)) {
1707 R->scrollBar.setUp ();
1709 R->scrollBar.setDn ();
1712 switch (ev->button) {
1714 switch (R->scrollbar_align) {
1715 case R_SB_ALIGN_TOP:
1718 case R_SB_ALIGN_CENTRE:
1719 R->csrO = (R->scrollBar.bot - R->scrollBar.top) / 2;
1721 case R_SB_ALIGN_BOTTOM:
1722 R->csrO = R->scrollBar.bot - R->scrollBar.top;
1725 if (R->scrollBar.style == R_SB_XTERM
1726 || scrollbar_above_slider(ev->y)
1727 || scrollbar_below_slider(ev->y))
1728 rxvt_scr_move_to(aR_
1729 scrollbar_position(ev->y) - R->csrO,
1731 R->scrollBar.setMotion ();
1735 if (R->scrollbar_align == R_SB_ALIGN_CENTRE)
1736 R->csrO = ev->y - R->scrollBar.top;
1740 if (R->scrollBar.style != R_SB_XTERM) {
1741 if (scrollbar_above_slider(ev->y))
1742 # ifdef RXVT_SCROLL_FULL
1743 rxvt_scr_page(aR_ UP, R->TermWin.nrow - 1);
1745 rxvt_scr_page(aR_ UP, R->TermWin.nrow / 4);
1747 else if (scrollbar_below_slider(ev->y))
1748 # ifdef RXVT_SCROLL_FULL
1749 rxvt_scr_page(aR_ DN, R->TermWin.nrow - 1);
1751 rxvt_scr_page(aR_ DN, R->TermWin.nrow / 4);
1754 R->scrollBar.setMotion ();
1756 rxvt_scr_page(aR_ (ev->button == Button1 ? DN : UP),
1758 * scrollbar_position(ev->y)
1759 / scrollbar_size()));
1768 * Menubar window processing of button press
1770 if (isMenuBarWindow(ev->window))
1771 rxvt_menubar_control(aR_ ev);
1777 rxvt_button_release(pR_ XButtonEvent *ev)
1781 R->csrO = 0; /* reset csr Offset */
1782 if (!R->bypass_keystate)
1783 reportmode = !!(R->PrivateModes & PrivMode_mouse_report);
1785 if (scrollbar_isUpDn()) {
1786 R->scrollBar.setIdle ();
1787 rxvt_scrollbar_show(aR_ 0);
1788 #ifndef NO_SCROLLBAR_BUTTON_CONTINUAL_SCROLLING
1789 R->refresh_type &= ~SMOOTH_REFRESH;
1792 #ifdef SELECTION_SCROLLING
1793 R->pending_scroll_selection=0;
1795 if (ev->window == R->TermWin.vt)
1797 #ifdef RXVT_GRAPHICS
1798 if (ev->subwindow != None)
1799 rxvt_Gr_ButtonRelease(ev->x, ev->y);
1805 /* mouse report from vt window */
1806 /* don't report release of wheel "buttons" */
1807 if (ev->button >= 4)
1809 #ifdef MOUSE_REPORT_DOUBLECLICK
1810 /* only report the release of 'slow' single clicks */
1811 if (R->MEvent.button != AnyButton
1812 && (ev->button != R->MEvent.button
1813 || (ev->time - R->MEvent.time
1814 > MULTICLICK_TIME / 2)))
1816 R->MEvent.clicks = 0;
1817 R->MEvent.button = AnyButton;
1818 rxvt_mouse_report(aR_ ev);
1820 #else /* MOUSE_REPORT_DOUBLECLICK */
1821 R->MEvent.button = AnyButton;
1822 rxvt_mouse_report(aR_ ev);
1823 #endif /* MOUSE_REPORT_DOUBLECLICK */
1827 * dumb hack to compensate for the failure of click-and-drag
1828 * when overriding mouse reporting
1830 if (R->PrivateModes & PrivMode_mouse_report
1831 && R->bypass_keystate
1832 && ev->button == Button1 && R->MEvent.clicks <= 1)
1833 R->selection_extend (ev->x, ev->y, 0);
1835 switch (ev->button) {
1838 rxvt_selection_make(aR_ ev->time);
1841 rxvt_selection_request(aR_ ev->time, ev->x, ev->y);
1850 v = (ev->button == Button4) ? UP : DN;
1851 if (ev->state & ShiftMask)
1853 else if ((R->Options & Opt_mouseWheelScrollPage))
1854 i = R->TermWin.nrow - 1;
1857 # ifdef MOUSE_SLIP_WHEELING
1858 if (ev->state & ControlMask)
1860 R->mouse_slip_wheel_speed += (v ? -1 : 1);
1861 R->mouse_slip_wheel_delay = SCROLLBAR_CONTINUOUS_DELAY;
1864 # ifdef JUMP_MOUSE_WHEEL
1865 rxvt_scr_page(aR_ v, i);
1866 R->scr_refresh (SMOOTH_REFRESH);
1867 rxvt_scrollbar_show(aR_ 1);
1871 rxvt_scr_page(aR_ v, 1);
1872 R->scr_refresh (SMOOTH_REFRESH);
1873 rxvt_scrollbar_show(aR_ 1);
1883 else if (isMenuBarWindow(ev->window))
1884 rxvt_menubar_control(aR_ ev);
1891 * Check our parents are still who we think they are.
1892 * Do transparency updates if required
1896 rxvt_check_our_parents(pR)
1898 int i, pchanged, aformat, have_pixmap, rootdepth;
1899 unsigned long nitems, bytes_after;
1901 unsigned char *prop = NULL;
1902 Window root, oldp, *list;
1903 Pixmap rootpixmap = None;
1904 XWindowAttributes wattr, wrootattr;
1908 if (!(R->Options & Opt_transparent))
1909 return pchanged; /* Don't try any more */
1911 XGetWindowAttributes(R->Xdisplay, Xroot, &wrootattr);
1912 rootdepth = wrootattr.depth;
1914 XGetWindowAttributes(R->Xdisplay, R->TermWin.parent[0], &wattr);
1915 if (rootdepth != wattr.depth) {
1916 if (R->am_transparent) {
1918 XSetWindowBackground(R->Xdisplay, R->TermWin.vt,
1919 R->PixColors[Color_bg]);
1920 R->am_transparent = R->am_pixmap_trans = 0;
1922 return pchanged; /* Don't try any more */
1925 /* Get all X ops out of the queue so that our information is up-to-date. */
1926 XSync(R->Xdisplay, False);
1929 * Make the frame window set by the window manager have
1930 * the root background. Some window managers put multiple nested frame
1931 * windows for each client, so we have to take care about that.
1933 i = (R->xa[XA_XROOTPMAPID] != 0
1934 && (XGetWindowProperty(R->Xdisplay, Xroot, R->xa[XA_XROOTPMAPID],
1935 0L, 1L, False, XA_PIXMAP, &atype, &aformat,
1936 &nitems, &bytes_after, &prop) == Success));
1937 if (!i || prop == NULL)
1941 rootpixmap = *((Pixmap *)prop);
1946 * Copy Xroot pixmap transparency
1949 unsigned int nw, nh;
1955 XTranslateCoordinates(R->Xdisplay, R->TermWin.parent[0], Xroot,
1956 0, 0, &sx, &sy, &cr);
1957 nw = (unsigned int)R->szHint.width;
1958 nh = (unsigned int)R->szHint.height;
1970 MIN_IT(nw, (unsigned int)(wrootattr.width - sx));
1971 MIN_IT(nh, (unsigned int)(wrootattr.height - sy));
1972 R->allowedxerror = -1;
1973 image = XGetImage(R->Xdisplay, rootpixmap, sx, sy, nw, nh, AllPlanes,
1975 /* XXX: handle BadMatch - usually because we're outside the pixmap */
1976 /* XXX: may need a delay here? */
1977 R->allowedxerror = 0;
1978 if (image == NULL) {
1979 if (R->am_transparent && R->am_pixmap_trans) {
1981 if (R->TermWin.pixmap != None) {
1982 XFreePixmap(R->Xdisplay, R->TermWin.pixmap);
1983 R->TermWin.pixmap = None;
1986 R->am_pixmap_trans = 0;
1988 if (R->TermWin.pixmap != None)
1989 XFreePixmap(R->Xdisplay, R->TermWin.pixmap);
1990 R->TermWin.pixmap = XCreatePixmap(R->Xdisplay, R->TermWin.vt,
1991 (unsigned int)R->szHint.width,
1992 (unsigned int)R->szHint.height,
1993 (unsigned int)image->depth);
1994 gc = XCreateGC(R->Xdisplay, R->TermWin.vt, 0UL, &gcvalue);
1995 XPutImage(R->Xdisplay, R->TermWin.pixmap, gc, image, 0, 0,
1996 nx, ny, (unsigned int)image->width,
1997 (unsigned int)image->height);
1998 XFreeGC(R->Xdisplay, gc);
1999 XDestroyImage(image);
2000 XSetWindowBackgroundPixmap(R->Xdisplay, R->TermWin.vt,
2002 if (!R->am_transparent || !R->am_pixmap_trans)
2004 R->am_transparent = R->am_pixmap_trans = 1;
2007 if (!R->am_pixmap_trans) {
2010 * InheritPixmap transparency
2012 D_X((stderr, "InheritPixmap Seeking to %08lx", Xroot));
2013 for (i = 1; i < (int)(sizeof(R->TermWin.parent) / sizeof(Window));
2015 oldp = R->TermWin.parent[i];
2016 XQueryTree(R->Xdisplay, R->TermWin.parent[i - 1], &root,
2017 &R->TermWin.parent[i], &list, &n);
2019 D_X((stderr, "InheritPixmap Parent[%d] = %08lx", i, R->TermWin.parent[i]));
2020 if (R->TermWin.parent[i] == Xroot) {
2025 if (oldp != R->TermWin.parent[i])
2030 for (; n < (unsigned int)i; n++) {
2031 XGetWindowAttributes(R->Xdisplay, R->TermWin.parent[n], &wattr);
2032 D_X((stderr, "InheritPixmap Checking Parent[%d]: %s", n, (wattr.depth == rootdepth && wattr.class != InputOnly) ? "OK" : "FAIL"));
2033 if (wattr.depth != rootdepth || wattr.c_class == InputOnly) {
2034 n = (int)(sizeof(R->TermWin.parent) / sizeof(Window)) + 1;
2039 if (n > (int)(sizeof(R->TermWin.parent)
2040 / sizeof(R->TermWin.parent[0]))) {
2041 D_X((stderr, "InheritPixmap Turning off"));
2042 XSetWindowBackground(R->Xdisplay, R->TermWin.parent[0],
2043 R->PixColors[Color_fg]);
2044 XSetWindowBackground(R->Xdisplay, R->TermWin.vt,
2045 R->PixColors[Color_bg]);
2046 R->am_transparent = 0;
2047 /* XXX: also turn off Opt_transparent? */
2049 /* wait (an arbitrary period) for the WM to do its thing
2050 * needed for fvwm2.2.2 (and before?) */
2051 # ifdef HAVE_NANOSLEEP
2052 struct timespec rqt;
2056 nanosleep(&rqt, NULL);
2060 D_X((stderr, "InheritPixmap Turning on (%d parents)", i - 1));
2061 for (n = 0; n < (unsigned int)i; n++)
2062 XSetWindowBackgroundPixmap(R->Xdisplay, R->TermWin.parent[n],
2064 XSetWindowBackgroundPixmap(R->Xdisplay, R->TermWin.vt,
2066 R->am_transparent = 1;
2068 for (; i < (int)(sizeof(R->TermWin.parent) / sizeof(Window)); i++)
2069 R->TermWin.parent[i] = None;
2078 /*----------------------------------------------------------------------*/
2082 rxvt_popen_printer(pR)
2084 FILE *stream = popen(R->rs[Rs_print_pipe], "w");
2087 rxvt_print_error("can't open printer pipe");
2093 rxvt_pclose_printer (FILE *stream)
2096 /* pclose() reported not to work on SunOS 4.1.3 */
2097 # if defined (__sun__) /* TODO: RESOLVE THIS */
2098 /* pclose works provided SIGCHLD handler uses waitpid */
2099 return pclose (stream); /* return fclose (stream); */
2101 return pclose (stream);
2106 * simulate attached vt100 printer
2110 rxvt_process_print_pipe(pR)
2115 if ((fd = rxvt_popen_printer(aR)) == NULL)
2119 * Send all input to the printer until either ESC[4i or ESC[?4i
2122 for (done = 0; !done;) {
2123 unsigned char buf[8];
2125 unsigned int i, len;
2127 if ((ch = rxvt_cmd_getc(aR)) != C0_ESC) {
2128 if (putc(ch, fd) == EOF)
2129 break; /* done = 1 */
2134 if ((buf[len++] = rxvt_cmd_getc(aR)) == '[') {
2135 if ((ch = rxvt_cmd_getc(aR)) == '?') {
2137 ch = rxvt_cmd_getc(aR);
2139 if ((buf[len++] = ch) == '4') {
2140 if ((buf[len++] = rxvt_cmd_getc(aR)) == 'i')
2141 break; /* done = 1 */
2144 for (i = 0; i < len; i++)
2145 if (putc(buf[i], fd) == EOF) {
2151 rxvt_pclose_printer(fd);
2153 #endif /* PRINTPIPE */
2159 C1_41 , C1_BPH, C1_NBH, C1_44 , C1_NEL, C1_SSA, C1_ESA,
2160 C1_HTS, C1_HTJ, C1_VTS, C1_PLD, C1_PLU, C1_RI , C1_SS2, C1_SS3,
2161 C1_DCS, C1_PU1, C1_PU2, C1_STS, C1_CCH, C1_MW , C1_SPA, C1_EPA,
2162 C1_SOS, C1_59 , C1_SCI, C1_CSI, CS_ST , C1_OSC, C1_PM , C1_APC
2166 /*{{{ process non-printing single characters */
2169 rxvt_process_nonprinting(pR_ unsigned char ch)
2172 case C0_ENQ: /* terminal Status */
2173 if (R->rs[Rs_answerbackstring])
2175 (const unsigned char *)R->rs[Rs_answerbackstring],
2176 (unsigned int)STRLEN(R->rs[Rs_answerbackstring]));
2178 R->tt_write((unsigned char *)VT100_ANS,
2179 (unsigned int)STRLEN(VT100_ANS));
2181 case C0_BEL: /* bell */
2184 case C0_BS: /* backspace */
2185 rxvt_scr_backspace(aR);
2187 case C0_HT: /* tab */
2188 rxvt_scr_tab(aR_ 1);
2190 case C0_CR: /* carriage return */
2191 rxvt_scr_gotorc(aR_ 0, 0, R_RELATIVE);
2193 case C0_VT: /* vertical tab, form feed */
2195 case C0_LF: /* line feed */
2196 rxvt_scr_index(aR_ UP);
2198 case C0_SO: /* shift out - acs */
2199 rxvt_scr_charset_choose(aR_ 1);
2201 case C0_SI: /* shift in - acs */
2202 rxvt_scr_charset_choose(aR_ 0);
2209 /*{{{ process VT52 escape sequences */
2212 rxvt_process_escape_vt52(pR_ unsigned char ch)
2217 case 'A': /* cursor up */
2218 rxvt_scr_gotorc(aR_ -1, 0, R_RELATIVE | C_RELATIVE);
2220 case 'B': /* cursor down */
2221 rxvt_scr_gotorc(aR_ 1, 0, R_RELATIVE | C_RELATIVE);
2223 case 'C': /* cursor right */
2224 rxvt_scr_gotorc(aR_ 0, 1, R_RELATIVE | C_RELATIVE);
2226 case 'D': /* cursor left */
2227 rxvt_scr_gotorc(aR_ 0, -1, R_RELATIVE | C_RELATIVE);
2229 case 'H': /* cursor home */
2230 rxvt_scr_gotorc(aR_ 0, 0, 0);
2232 case 'I': /* cursor up and scroll down if needed */
2233 rxvt_scr_index(aR_ DN);
2235 case 'J': /* erase to end of screen */
2236 R->scr_erase_screen (0);
2238 case 'K': /* erase to end of line */
2239 rxvt_scr_erase_line(aR_ 0);
2241 case 'Y': /* move to specified row and col */
2242 /* full command is 'ESC Y row col' where row and col
2243 * are encoded by adding 32 and sending the ascii
2244 * character. eg. SPACE = 0, '+' = 13, '0' = 18,
2246 row = rxvt_cmd_getc(aR) - ' ';
2247 col = rxvt_cmd_getc(aR) - ' ';
2248 rxvt_scr_gotorc(aR_ row, col, 0);
2250 case 'Z': /* identify the terminal type */
2251 R->tt_printf("\033/Z"); /* I am a VT100 emulating a VT52 */
2253 case '<': /* turn off VT52 mode */
2254 PrivMode(0, PrivMode_vt52);
2256 case 'F': /* use special graphics character set */
2257 case 'G': /* use regular character set */
2260 case '=': /* use alternate keypad mode */
2261 case '>': /* use regular keypad mode */
2269 /*{{{ process escape sequences */
2272 rxvt_process_escape_seq(pR)
2274 unsigned char ch = rxvt_cmd_getc(aR);
2276 if (R->PrivateModes & PrivMode_vt52) {
2277 rxvt_process_escape_vt52(aR_ ch);
2282 /* case 1: do_tek_mode (); break; */
2284 if (rxvt_cmd_getc(aR) == '8')
2288 rxvt_scr_charset_set(aR_ 0, (unsigned int)rxvt_cmd_getc(aR));
2291 rxvt_scr_charset_set(aR_ 1, (unsigned int)rxvt_cmd_getc(aR));
2294 rxvt_scr_charset_set(aR_ 2, (unsigned int)rxvt_cmd_getc(aR));
2297 rxvt_scr_charset_set(aR_ 3, (unsigned int)rxvt_cmd_getc(aR));
2299 #ifdef MULTICHAR_SET
2301 rxvt_scr_charset_set(aR_ -2, (unsigned int)rxvt_cmd_getc(aR));
2306 rxvt_scr_backindex(aR);
2310 rxvt_scr_cursor(aR_ SAVE);
2313 rxvt_scr_cursor(aR_ RESTORE);
2317 rxvt_scr_forwardindex(aR);
2322 PrivMode((ch == '='), PrivMode_aplKP);
2329 rxvt_scr_index(aR_ UP);
2332 /* 8.3.87: NEXT LINE */
2333 case C1_NEL: /* ESC E */
2335 uint32_t nlcr[] = { '\n', '\r' };
2336 rxvt_scr_add_lines(aR_ nlcr, 1, 2);
2340 /* kidnapped escape sequence: Should be 8.3.48 */
2341 case C1_ESA: /* ESC G */
2342 rxvt_process_graphics(aR);
2345 /* 8.3.63: CHARACTER TABULATION SET */
2346 case C1_HTS: /* ESC H */
2347 rxvt_scr_set_tab(aR_ 1);
2350 /* 8.3.105: REVERSE LINE FEED */
2351 case C1_RI: /* ESC M */
2352 rxvt_scr_index(aR_ DN);
2355 /* 8.3.142: SINGLE-SHIFT TWO */
2356 /*case C1_SS2: scr_single_shift (2); break; */
2358 /* 8.3.143: SINGLE-SHIFT THREE */
2359 /*case C1_SS3: scr_single_shift (3); break; */
2361 /* 8.3.27: DEVICE CONTROL STRING */
2362 case C1_DCS: /* ESC P */
2363 rxvt_process_dcs_seq(aR);
2366 /* 8.3.110: SINGLE CHARACTER INTRODUCER */
2367 case C1_SCI: /* ESC Z */
2368 R->tt_write((const unsigned char *)ESCZ_ANSWER,
2369 (unsigned int)(sizeof(ESCZ_ANSWER) - 1));
2370 break; /* steal obsolete ESC [ c */
2372 /* 8.3.16: CONTROL SEQUENCE INTRODUCER */
2373 case C1_CSI: /* ESC [ */
2374 rxvt_process_csi_seq(aR);
2377 /* 8.3.90: OPERATING SYSTEM COMMAND */
2378 case C1_OSC: /* ESC ] */
2379 rxvt_process_osc_seq(aR);
2382 /* 8.3.106: RESET TO INITIAL STATE */
2384 rxvt_scr_poweron(aR);
2385 rxvt_scrollbar_show(aR_ 1);
2388 /* 8.3.79: LOCKING-SHIFT TWO (see ISO2022) */
2390 rxvt_scr_charset_choose(aR_ 2);
2393 /* 8.3.81: LOCKING-SHIFT THREE (see ISO2022) */
2395 rxvt_scr_charset_choose(aR_ 3);
2401 /*{{{ process CONTROL SEQUENCE INTRODUCER (CSI) sequences `ESC[' */
2405 CSI_CUU, CSI_CUD, CSI_CUF, CSI_CUB, CSI_CNL, CSI_CPL, CSI_CHA,
2406 CSI_CUP, CSI_CHT, CSI_ED , CSI_EL , CSI_IL , CSI_DL , CSI_EF , CSI_EA ,
2407 CSI_DCH, CSI_SEE, CSI_CPR, CSI_SU , CSI_SD , CSI_NP , CSI_PP , CSI_CTC,
2408 CSI_ECH, CSI_CVT, CSI_CBT, CSI_SRS, CSI_PTX, CSI_SDS, CSI_SIMD, CSI_5F,
2409 CSI_HPA, CSI_HPR, CSI_REP, CSI_DA , CSI_VPA, CSI_VPR, CSI_HVP, CSI_TBC,
2410 CSI_SM , CSI_MC , CSI_HPB, CSI_VPB, CSI_RM , CSI_SGR, CSI_DSR, CSI_DAQ,
2411 CSI_70 , CSI_71 , CSI_72 , CSI_73 , CSI_74 , CSI_75 , CSI_76 , CSI_77 ,
2412 CSI_78 , CSI_79 , CSI_7A , CSI_7B , CSI_7C , CSI_7D , CSI_7E , CSI_7F
2415 #define make_byte(b7,b6,b5,b4,b3,b2,b1,b0) \
2416 (((b7) << 7) | ((b6) << 6) | ((b5) << 5) | ((b4) << 4) \
2417 | ((b3) << 3) | ((b2) << 2) | ((b1) << 1) | (b0))
2418 #define get_byte_array_bit(array, bit) \
2419 (!!((array)[(bit) / 8] & (128 >> ((bit) & 7))))
2421 const unsigned char csi_defaults[] = {
2422 make_byte(1,1,1,1,1,1,1,1), /* @, A, B, C, D, E, F, G, */
2423 make_byte(1,1,0,0,1,1,0,0), /* H, I, J, K, L, M, N, O, */
2424 make_byte(1,0,1,1,1,1,1,0), /* P, Q, R, S, T, U, V, W, */
2425 make_byte(1,1,1,0,0,0,1,0), /* X, Y, Z, [, \, ], ^, _, */
2426 make_byte(1,1,1,0,1,1,1,0), /* `, a, b, c, d, e, f, g, */
2427 make_byte(0,0,1,1,0,0,0,0), /* h, i, j, k, l, m, n, o, */
2428 make_byte(0,0,0,0,0,0,0,0), /* p, q, r, s, t, u, v, w, */
2429 make_byte(0,0,0,0,0,0,0,0) /* x, y, z, {, |, }, ~, */
2435 rxvt_process_csi_seq(pR)
2437 unsigned char ch, priv, i;
2438 unsigned int nargs, p;
2442 for (nargs = ESC_ARGS; nargs > 0;)
2446 ch = rxvt_cmd_getc(aR);
2447 if (ch >= '<' && ch <= '?') { /* '<' '=' '>' '?' */
2449 ch = rxvt_cmd_getc(aR);
2451 /* read any numerical arguments */
2452 for (n = -1; ch < CSI_ICH; ) {
2457 n = n * 10 + ch - '0';
2458 } else if (ch == ';') {
2459 if (nargs < ESC_ARGS)
2462 } else if (ch == '\b') {
2463 rxvt_scr_backspace(aR);
2464 } else if (ch == C0_ESC) {
2465 rxvt_process_escape_seq(aR);
2467 } else if (ch < ' ') {
2468 rxvt_process_nonprinting(aR_ ch);
2470 ch = rxvt_cmd_getc(aR);
2476 if (nargs < ESC_ARGS)
2480 ndef = get_byte_array_bit(csi_defaults, i);
2481 for (p = 0; p < nargs; p++)
2486 fprintf(stderr, "CSI ");
2487 for (p = 0; p < nargs; p++)
2488 fprintf(stderr, "%d%s", arg[p], p < nargs - 1 ? ";" : "");
2489 fprintf(stderr, "%c\n", ch);
2493 * private mode handling
2498 if (ch == CSI_DA) /* secondary device attributes */
2499 R->tt_printf("\033[>%d;%-.8s;0c", 'R', VSTRING);
2502 if (ch == 'h' || ch == 'l' || ch == 'r' || ch == 's' || ch == 't')
2503 rxvt_process_terminal_mode(aR_ ch, priv, nargs, arg);
2511 * ISO/IEC 6429:1992(E) CSI sequences (defaults in parentheses)
2514 case CSI_MC: /* 8.3.83: (0) MEDIA COPY */
2516 case 0: /* initiate transfer to primary aux device */
2517 rxvt_scr_printscreen(aR_ 0);
2519 case 5: /* start relay to primary aux device */
2520 rxvt_process_print_pipe(aR);
2526 case CSI_CUU: /* 8.3.22: (1) CURSOR UP */
2527 case CSI_VPR: /* 8.3.161: (1) LINE POSITION FORWARD */
2530 case CSI_CUD: /* 8.3.19: (1) CURSOR DOWN */
2531 case CSI_VPB: /* 8.3.160: (1) LINE POSITION BACKWARD */
2532 rxvt_scr_gotorc(aR_ arg[0], 0, RELATIVE);
2535 case CSI_CUB: /* 8.3.18: (1) CURSOR LEFT */
2536 case CSI_HPB: /* 8.3.59: (1) CHARACTER POSITION BACKWARD */
2539 #else /* emulate common DEC VTs */
2540 arg[0] = arg[0] ? -arg[0] : -1;
2543 case CSI_CUF: /* 8.3.20: (1) CURSOR RIGHT */
2544 case CSI_HPR: /* 8.3.60: (1) CHARACTER POSITION FORWARD */
2546 rxvt_scr_gotorc(aR_ 0, arg[0], RELATIVE);
2547 #else /* emulate common DEC VTs */
2548 rxvt_scr_gotorc(aR_ 0, arg[0] ? arg[0] : 1, RELATIVE);
2552 case CSI_CPL: /* 8.3.13: (1) CURSOR PRECEDING LINE */
2555 case CSI_CNL: /* 8.3.12: (1) CURSOR NEXT LINE */
2556 rxvt_scr_gotorc(aR_ arg[0], 0, R_RELATIVE);
2559 case CSI_CHA: /* 8.3.9: (1) CURSOR CHARACTER ABSOLUTE */
2560 case CSI_HPA: /* 8.3.58: (1) CURSOR POSITION ABSOLUTE */
2561 rxvt_scr_gotorc(aR_ 0, arg[0] - 1, R_RELATIVE);
2564 case CSI_VPA: /* 8.3.159: (1) LINE POSITION ABSOLUTE */
2565 rxvt_scr_gotorc(aR_ arg[0] - 1, 0, C_RELATIVE);
2568 case CSI_CUP: /* 8.3.21: (1,1) CURSOR POSITION */
2569 case CSI_HVP: /* 8.3.64: (1,1) CHARACTER AND LINE POSITION */
2570 rxvt_scr_gotorc(aR_ arg[0] - 1, nargs < 2 ? 0 : (arg[1] - 1), 0);
2573 case CSI_CBT: /* 8.3.7: (1) CURSOR BACKWARD TABULATION */
2576 case CSI_CHT: /* 8.3.10: (1) CURSOR FORWARD TABULATION */
2577 rxvt_scr_tab(aR_ arg[0]);
2580 case CSI_ED: /* 8.3.40: (0) ERASE IN PAGE */
2581 R->scr_erase_screen (arg[0]);
2584 case CSI_EL: /* 8.3.42: (0) ERASE IN LINE */
2585 rxvt_scr_erase_line(aR_ arg[0]);
2588 case CSI_ICH: /* 8.3.65: (1) INSERT CHARACTER */
2589 rxvt_scr_insdel_chars(aR_ arg[0], INSERT);
2592 case CSI_IL: /* 8.3.68: (1) INSERT LINE */
2593 rxvt_scr_insdel_lines(aR_ arg[0], INSERT);
2596 case CSI_DL: /* 8.3.33: (1) DELETE LINE */
2597 rxvt_scr_insdel_lines(aR_ arg[0], DELETE);
2600 case CSI_ECH: /* 8.3.39: (1) ERASE CHARACTER */
2601 rxvt_scr_insdel_chars(aR_ arg[0], ERASE);
2604 case CSI_DCH: /* 8.3.26: (1) DELETE CHARACTER */
2605 rxvt_scr_insdel_chars(aR_ arg[0], DELETE);
2608 case CSI_SD: /* 8.3.114: (1) SCROLL DOWN */
2611 case CSI_SU: /* 8.3.148: (1) SCROLL UP */
2612 R->scr_scroll_text (R->screen.tscroll, R->screen.bscroll, arg[0], 0);
2615 case CSI_DA: /* 8.3.24: (0) DEVICE ATTRIBUTES */
2616 R->tt_write((const unsigned char *)VT100_ANS,
2617 (unsigned int)(sizeof(VT100_ANS) - 1));
2620 case CSI_SGR: /* 8.3.118: (0) SELECT GRAPHIC RENDITION */
2621 rxvt_process_sgr_mode(aR_ nargs, arg);
2624 case CSI_DSR: /* 8.3.36: (0) DEVICE STATUS REPORT */
2626 case 5: /* DSR requested */
2627 R->tt_printf("\033[0n");
2629 case 6: /* CPR requested */
2630 rxvt_scr_report_position(aR);
2632 #if defined (ENABLE_DISPLAY_ANSWER)
2633 case 7: /* unofficial extension */
2634 R->tt_printf("%-.250s\n", R->rs[Rs_display_name]);
2637 case 8: /* unofficial extension */
2638 rxvt_xterm_seq(aR_ XTerm_title, APL_NAME "-" VERSION, CHAR_ST);
2643 case CSI_TBC: /* 8.3.155: (0) TABULATION CLEAR */
2645 case 0: /* char tab stop cleared at active position */
2646 rxvt_scr_set_tab(aR_ 0);
2648 /* case 1: */ /* line tab stop cleared in active line */
2649 /* case 2: */ /* char tab stops cleared in active line */
2650 case 3: /* all char tab stops are cleared */
2651 /* case 4: */ /* all line tab stops are cleared */
2652 case 5: /* all tab stops are cleared */
2653 rxvt_scr_set_tab(aR_ -1);
2658 case CSI_CTC: /* 8.3.17: (0) CURSOR TABULATION CONTROL */
2660 case 0: /* char tab stop set at active position */
2661 rxvt_scr_set_tab(aR_ 1);
2662 break; /* = ESC H */
2663 /* case 1: */ /* line tab stop set at active line */
2664 case 2: /* char tab stop cleared at active position */
2665 rxvt_scr_set_tab(aR_ 0);
2666 break; /* = ESC [ 0 g */
2667 /* case 3: */ /* line tab stop cleared at active line */
2668 /* case 4: */ /* char tab stops cleared at active line */
2669 case 5: /* all char tab stops are cleared */
2670 rxvt_scr_set_tab(aR_ -1);
2671 break; /* = ESC [ 3 g */
2672 /* case 6: */ /* all line tab stops are cleared */
2676 case CSI_RM: /* 8.3.107: RESET MODE */
2678 rxvt_scr_insert_mode(aR_ 0);
2681 case CSI_SM: /* 8.3.126: SET MODE */
2683 rxvt_scr_insert_mode(aR_ 1);
2687 * PRIVATE USE beyond this point. All CSI_7? sequences here
2689 case CSI_72: /* DECSTBM: set top and bottom margins */
2691 rxvt_scr_scroll_region(aR_ arg[0] - 1, MAX_ROWS - 1);
2692 else if (nargs == 0 || arg[0] >= arg[1])
2693 rxvt_scr_scroll_region(aR_ 0, MAX_ROWS - 1);
2695 rxvt_scr_scroll_region(aR_ arg[0] - 1, arg[1] - 1);
2699 rxvt_scr_cursor(aR_ SAVE);
2702 rxvt_scr_cursor(aR_ RESTORE);
2707 rxvt_process_window_ops(aR_ arg, nargs);
2711 case CSI_78: /* DECREQTPARM */
2712 if (arg[0] == 0 || arg[0] == 1)
2713 R->tt_printf("\033[%d;1;1;128;128;1;0x", arg[0] + 2);
2726 rxvt_process_window_ops(pR_ const int *args, unsigned int nargs)
2732 XWindowAttributes wattr;
2741 case 1: /* deiconify window */
2742 XMapWindow(R->Xdisplay, R->TermWin.parent[0]);
2744 case 2: /* iconify window */
2745 XIconifyWindow(R->Xdisplay, R->TermWin.parent[0],
2746 DefaultScreen(R->Xdisplay));
2748 case 3: /* set position (pixels) */
2749 XMoveWindow(R->Xdisplay, R->TermWin.parent[0], args[1], args[2]);
2751 case 4: /* set size (pixels) */
2752 rxvt_set_widthheight(aR_ (unsigned int)args[2], (unsigned int)args[1]);
2754 case 5: /* raise window */
2755 XRaiseWindow(R->Xdisplay, R->TermWin.parent[0]);
2757 case 6: /* lower window */
2758 XLowerWindow(R->Xdisplay, R->TermWin.parent[0]);
2760 case 7: /* refresh window */
2761 R->scr_touch (true);
2763 case 8: /* set size (chars) */
2764 rxvt_set_widthheight(aR_ (unsigned int)(args[2] * R->TermWin.fwidth),
2765 (unsigned int)(args[1] * R->TermWin.fheight));
2768 if (args[0] >= 24) /* set height (chars) */
2769 rxvt_set_widthheight(aR_ (unsigned int)R->TermWin.width,
2770 (unsigned int)(args[1] * R->TermWin.fheight));
2773 * reports - some output format copied from XTerm
2775 case 11: /* report window state */
2776 XGetWindowAttributes(R->Xdisplay, R->TermWin.parent[0], &wattr);
2777 R->tt_printf("\033[%dt", wattr.map_state == IsViewable ? 1 : 2);
2779 case 13: /* report window position */
2780 XGetWindowAttributes(R->Xdisplay, R->TermWin.parent[0], &wattr);
2781 XTranslateCoordinates(R->Xdisplay, R->TermWin.parent[0], wattr.root,
2782 -wattr.border_width, -wattr.border_width,
2784 R->tt_printf("\033[3;%d;%dt", x, y);
2786 case 14: /* report window size (pixels) */
2787 XGetWindowAttributes(R->Xdisplay, R->TermWin.parent[0], &wattr);
2788 R->tt_printf("\033[4;%d;%dt", wattr.height, wattr.width);
2790 case 18: /* report window size (chars) */
2791 R->tt_printf("\033[8;%d;%dt", R->TermWin.nrow, R->TermWin.ncol);
2793 #if 0 /* XXX: currently disabled due to security concerns */
2794 case 20: /* report icon label */
2795 XGetIconName(R->Xdisplay, R->TermWin.parent[0], &s);
2796 R->tt_printf("\033]L%-.200s\234", s ? s : ""); /* 8bit ST */
2798 case 21: /* report window title */
2799 XFetchName(R->Xdisplay, R->TermWin.parent[0], &s);
2800 R->tt_printf("\033]l%-.200s\234", s ? s : ""); /* 8bit ST */
2807 /*----------------------------------------------------------------------*/
2809 * get input up until STRING TERMINATOR (or BEL)
2810 * ends_how is terminator used. returned input must be free()d
2814 rxvt_get_to_st(pR_ unsigned char *ends_how)
2816 int seen_esc = 0; /* seen escape? */
2819 unsigned char ch, string[STRING_MAX];
2821 for (; (ch = rxvt_cmd_getc(aR));) {
2824 || (ch == 0x5c && seen_esc)) /* 7bit ST */
2829 } else if (ch == '\t')
2830 ch = ' '; /* translate '\t' to space */
2831 else if (ch < 0x08 || (ch > 0x0d && ch < 0x20))
2832 return NULL; /* other control character - exit */
2833 if (n < sizeof(string) - 1)
2838 if ((s = (unsigned char *)rxvt_malloc(n)) == NULL)
2840 *ends_how = (ch == 0x5c ? C0_ESC : ch);
2841 STRNCPY(s, string, n);
2845 /*----------------------------------------------------------------------*/
2847 * process DEVICE CONTROL STRING `ESC P ... (ST|BEL)' or `0x90 ... (ST|BEL)'
2851 rxvt_process_dcs_seq(pR)
2853 unsigned char eh, *s;
2857 s = rxvt_get_to_st(aR_ &eh);
2863 /*----------------------------------------------------------------------*/
2865 * process OPERATING SYSTEM COMMAND sequence `ESC ] Ps ; Pt (ST|BEL)'
2869 rxvt_process_osc_seq(pR)
2871 unsigned char ch, eh, *s;
2874 ch = rxvt_cmd_getc(aR);
2875 for (arg = 0; isdigit(ch); ch = rxvt_cmd_getc(aR))
2876 arg = arg * 10 + (ch - '0');
2879 s = rxvt_get_to_st(aR_ &eh);
2882 * rxvt_menubar_dispatch() violates the constness of the string,
2885 if (arg == XTerm_Menu)
2886 #if 0 /* XXX: currently disabled due to security concerns */
2887 rxvt_menubar_dispatch(aR_ (char *)s);
2892 rxvt_xterm_seq(aR_ arg, (char *)s, eh);
2898 * XTerm escape sequences: ESC ] Ps;Pt (ST|BEL)
2899 * 0 = change iconName/title
2900 * 1 = change iconName
2903 * 12 = change text color
2904 * 13 = change mouse foreground color
2905 * 17 = change highlight character colour
2906 * 18 = change bold character color
2907 * 19 = change underlined character color
2908 * 46 = change logfile (not implemented)
2912 * 10 = menu (may change in future)
2914 * 39 = change default fg color
2915 * 49 = change default bg color
2916 * 55 = dump scrollback buffer and all of screen
2920 rxvt_xterm_seq(pR_ int op, const char *str, unsigned char resp __attribute__((unused)))
2926 assert(str != NULL);
2929 rxvt_set_title(aR_ str);
2931 case XTerm_iconName:
2932 rxvt_set_iconName(aR_ str);
2935 rxvt_set_title(aR_ str);
2938 for (buf = (char *)str; buf && *buf;) {
2939 if ((name = STRCHR(buf, ';')) == NULL)
2943 if (color < 0 || color >= TOTAL_COLORS)
2945 if ((buf = STRCHR(name, ';')) != NULL)
2947 rxvt_set_window_color(aR_ color + minCOLOR, name);
2950 #ifndef NO_CURSORCOLOR
2951 case XTerm_Color_cursor:
2952 rxvt_set_window_color(aR_ Color_cursor, str);
2955 case XTerm_Color_pointer:
2956 rxvt_set_window_color(aR_ Color_pointer, str);
2958 #ifndef NO_BOLD_UNDERLINE_REVERSE
2959 case XTerm_Color_BD:
2960 rxvt_set_window_color(aR_ Color_BD, str);
2962 case XTerm_Color_UL:
2963 rxvt_set_window_color(aR_ Color_UL, str);
2965 case XTerm_Color_RV:
2966 rxvt_set_window_color(aR_ Color_RV, str);
2972 * rxvt_menubar_dispatch() violates the constness of the string,
2973 * so DON'T do it here
2979 rxvt_scale_pixmap(aR_ ""); /* reset to default scaling */
2980 rxvt_set_bgPixmap(aR_ str); /* change pixmap */
2982 R->scr_touch (true);
2984 while ((str = STRCHR(str, ';')) != NULL) {
2987 changed += rxvt_scale_pixmap(aR_ str);
2991 #ifdef XPM_BACKGROUND
2992 rxvt_resize_pixmap(aR);
2994 R->scr_touch (true);
2998 case XTerm_restoreFG:
2999 rxvt_set_window_color(aR_ Color_fg, str);
3001 case XTerm_restoreBG:
3002 rxvt_set_window_color(aR_ Color_bg, str);
3007 rxvt_change_font(aR_ 0, str);
3010 case XTerm_dumpscreen: /* no error notices */
3013 if ((fd = open(str, O_RDWR | O_CREAT | O_EXCL, 0600)) >= 0) {
3014 rxvt_scr_dump(aR_ fd);
3022 /*----------------------------------------------------------------------*/
3024 /*{{{ process DEC private mode sequences `ESC [ ? Ps mode' */
3026 * mode can only have the following values:
3032 * so no need for fancy checking
3036 rxvt_privcases(pR_ int mode, unsigned long bit)
3041 R->SavedModes |= (R->PrivateModes & bit);
3045 state = (R->SavedModes & bit) ? 1 : 0; /* no overlapping */
3047 state = (mode == 't') ? !(R->PrivateModes & bit) : mode;
3048 PrivMode(state, bit);
3053 /* we're not using priv _yet_ */
3056 rxvt_process_terminal_mode(pR_ int mode, int priv __attribute__((unused)), unsigned int nargs, const int *arg)
3060 static const struct {
3062 const unsigned long bit;
3064 { 1, PrivMode_aplCUR },
3065 { 2, PrivMode_vt52 },
3066 { 3, PrivMode_132 },
3067 { 4, PrivMode_smoothScroll },
3068 { 5, PrivMode_rVideo },
3069 { 6, PrivMode_relOrigin },
3070 { 7, PrivMode_Autowrap },
3071 { 9, PrivMode_MouseX10 },
3073 { menuBar_esc, PrivMode_menuBar },
3075 #ifdef scrollBar_esc
3076 { scrollBar_esc, PrivMode_scrollBar },
3078 { 25, PrivMode_VisibleCursor },
3079 { 35, PrivMode_ShiftKeys },
3080 { 40, PrivMode_132OK },
3081 { 47, PrivMode_Screen },
3082 { 66, PrivMode_aplKP },
3083 #ifndef NO_BACKSPACE_KEY
3084 { 67, PrivMode_BackSpace },
3086 { 1000, PrivMode_MouseX11 },
3087 { 1010, PrivMode_TtyOutputInh },
3088 { 1011, PrivMode_Keypress },
3089 { 1047, PrivMode_Screen },
3090 { 1049, PrivMode_Screen }, /* xterm extension, not fully implemented */
3096 /* make lo/hi boolean */
3098 mode = 0; /* reset */
3099 else if (mode == 'h')
3102 for (i = 0; i < nargs; i++) {
3105 /* basic handling */
3106 for (j = 0; j < (sizeof(argtopriv)/sizeof(argtopriv[0])); j++)
3107 if (argtopriv[j].argval == arg[i]) {
3108 state = rxvt_privcases(aR_ mode, argtopriv[j].bit);
3112 /* extra handling for values with state unkept */
3115 case 1048: /* alternative cursor save */
3117 rxvt_scr_cursor(aR_ RESTORE);
3119 rxvt_scr_cursor(aR_ SAVE);
3122 continue; /* for(;i;) */
3125 /* extra handling for values with valid 0 or 1 state */
3127 /* case 1: - application cursor keys */
3128 case 2: /* VT52 mode */
3129 /* oddball mode. should be set regardless of set/reset
3130 * parameter. Return from VT52 mode with an ESC < from
3133 PrivMode(1, PrivMode_vt52);
3135 case 3: /* 80/132 */
3136 if (R->PrivateModes & PrivMode_132OK)
3137 rxvt_set_widthheight(aR_
3138 (unsigned int)((state ? 132 : 80) * R->TermWin.fwidth),
3139 (unsigned int)R->TermWin.height);
3141 case 4: /* smooth scrolling */
3143 R->Options &= ~Opt_jumpScroll;
3145 R->Options |= Opt_jumpScroll;
3147 case 5: /* reverse video */
3148 rxvt_scr_rvideo_mode(aR_ state);
3150 case 6: /* relative/absolute origins */
3151 rxvt_scr_relative_origin(aR_ state);
3153 case 7: /* autowrap */
3154 rxvt_scr_autowrap(aR_ state);
3156 /* case 8: - auto repeat, can't do on a per window basis */
3157 case 9: /* X10 mouse reporting */
3158 if (state) /* orthogonal */
3159 R->PrivateModes &= ~(PrivMode_MouseX11);
3164 rxvt_map_menuBar(aR_ state);
3168 #ifdef scrollBar_esc
3170 if (rxvt_scrollbar_mapping(aR_ state)) {
3171 R->resize_all_windows (0, 0, 0);
3172 R->scr_touch (true);
3176 case 25: /* visible/invisible cursor */
3177 rxvt_scr_cursor_visible(aR_ state);
3179 /* case 35: - shift keys */
3180 /* case 40: - 80 <--> 132 mode */
3181 case 47: /* secondary screen */
3182 rxvt_scr_change_screen(aR_ state);
3184 /* case 66: - application key pad */
3185 /* case 67: - backspace key */
3186 case 1000: /* X11 mouse reporting */
3187 if (state) /* orthogonal */
3188 R->PrivateModes &= ~(PrivMode_MouseX10);
3192 break; /* X11 mouse highlighting */
3194 case 1010: /* scroll to bottom on TTY output inhibit */
3196 R->Options &= ~Opt_scrollTtyOutput;
3198 R->Options |= Opt_scrollTtyOutput;
3200 case 1011: /* scroll to bottom on key press */
3202 R->Options |= Opt_scrollTtyKeypress;
3204 R->Options &= ~Opt_scrollTtyKeypress;
3206 case 1047: /* secondary screen w/ clearing */
3207 case 1049: /* better secondary screen w/ clearing, but not fully implemented */
3208 if (R->current_screen != PRIMARY)
3209 R->scr_erase_screen (2);
3210 rxvt_scr_change_screen(aR_ state);
3219 /*{{{ process sgr sequences */
3222 rxvt_process_sgr_mode(pR_ unsigned int nargs, const int *arg)
3229 rxvt_scr_rendition(aR_ 0, ~RS_None);
3232 for (i = 0; i < nargs; i++) {
3236 rendset = 0, rendstyle = ~RS_None;
3239 rendset = 1, rendstyle = RS_Bold;
3242 rendset = 1, rendstyle = RS_Uline;
3245 rendset = 1, rendstyle = RS_Blink;
3248 rendset = 1, rendstyle = RS_RVid;
3251 rendset = 0, rendstyle = RS_Bold;
3254 rendset = 0, rendstyle = RS_Uline;
3257 rendset = 0, rendstyle = RS_Blink;
3260 rendset = 0, rendstyle = RS_RVid;
3263 if (rendset != -1) {
3264 rxvt_scr_rendition(aR_ rendset, rendstyle);
3265 continue; /* for(;i;) */
3270 case 31: /* set fg color */
3277 rxvt_scr_color(aR_ (unsigned int)(minCOLOR + (arg[i] - 30)),
3282 if (nargs > i + 2 && arg[i + 1] == 5) {
3283 rxvt_scr_color(aR_ (unsigned int)(minCOLOR + arg[i + 2]),
3289 case 39: /* default fg */
3290 rxvt_scr_color(aR_ Color_fg, Color_fg);
3294 case 41: /* set bg color */
3301 rxvt_scr_color(aR_ (unsigned int)(minCOLOR + (arg[i] - 40)),
3306 if (nargs > i + 2 && arg[i + 1] == 5) {
3307 rxvt_scr_color(aR_ (unsigned int)(minCOLOR + arg[i + 2]),
3313 case 49: /* default bg */
3314 rxvt_scr_color(aR_ Color_bg, Color_bg);
3317 #ifndef NO_BRIGHTCOLOR
3319 case 91: /* set bright fg color */
3326 rxvt_scr_color(aR_ (unsigned int)(minBrightCOLOR + (arg[i] - 90)),
3330 case 101: /* set bright bg color */
3337 rxvt_scr_color(aR_ (unsigned int)(minBrightCOLOR + (arg[i] - 100)),
3346 /*{{{ process Rob Nation's own graphics mode sequences */
3349 rxvt_process_graphics(pR)
3351 unsigned char ch, cmd = rxvt_cmd_getc(aR);
3353 #ifndef RXVT_GRAPHICS
3354 if (cmd == 'Q') { /* query graphics */
3355 R->tt_printf("\033G0\n"); /* no graphics */
3358 /* swallow other graphics sequences until terminating ':' */
3360 ch = rxvt_cmd_getc(aR);
3365 unsigned char *text = NULL;
3367 if (cmd == 'Q') { /* query graphics */
3368 R->tt_printf("\033G1\n"); /* yes, graphics (color) */
3371 for (nargs = 0; nargs < (sizeof(args) / sizeof(args[0])) - 1;) {
3374 ch = rxvt_cmd_getc(aR);
3376 if (neg || ch == '+')
3377 ch = rxvt_cmd_getc(aR);
3379 for (args[nargs] = 0; isdigit(ch); ch = rxvt_cmd_getc(aR))
3380 args[nargs] = args[nargs] * 10 + (ch - '0');
3382 args[nargs] = -args[nargs];
3390 if ((cmd == 'T') && (nargs >= 5)) {
3391 int i, len = args[4];
3393 text = (unsigned char *)rxvt_malloc((len + 1) * sizeof(char));
3396 for (i = 0; i < len; i++)
3397 text[i] = rxvt_cmd_getc(aR);
3401 rxvt_Gr_do_graphics(aR_ cmd, nargs, args, text);
3406 /* ------------------------------------------------------------------------- */
3409 * Send printf() formatted output to the command.
3410 * Only use for small amounts of data.
3413 rxvt_term::tt_printf (const char *fmt,...)
3416 unsigned char buf[256];
3418 va_start (arg_ptr, fmt);
3419 vsnprintf ((char *)buf, 256, fmt, arg_ptr);
3421 tt_write (buf, STRLEN (buf));
3424 /* ---------------------------------------------------------------------- */
3425 /* Write data to the pty as typed by the user, pasted with the mouse,
3426 * or generated by us in response to a query ESC sequence.
3429 rxvt_term::tt_write (const unsigned char *data, unsigned int len)
3431 enum { MAX_PTY_WRITE = 255 }; // minimum MAX_INPUT
3437 int written = write (cmd_fd, data, min (MAX_PTY_WRITE, len));
3446 v_buffer = (unsigned char *)realloc (v_buffer, v_buflen + len);
3448 memcpy (v_buffer + v_buflen, data, len);
3454 int written = write (cmd_fd, v_buffer, min (MAX_PTY_WRITE, v_buflen));
3458 v_buflen -= written;
3466 pty_ev.set (EVENT_READ);
3470 memmove (v_buffer, v_buffer + written, v_buflen);
3472 else if (written != -1 || (errno != EAGAIN && errno != EINTR))
3473 // original code just ignores this...
3477 pty_ev.set (EVENT_READ | EVENT_WRITE);
3483 /*----------------------- end-of-file (C source) -----------------------*/