1 /*--------------------------------*-C-*---------------------------------*
3 *----------------------------------------------------------------------*
4 * $Id: command.C,v 1.4 2003-11-25 15:25:16 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 */
53 /*----------------------------------------------------------------------*/
55 /*{{{ Convert the keypress event into a string */
58 rxvt_lookup_key(pR_ XKeyEvent *ev)
60 int ctrl, meta, shft, len;
64 static int debug_key = 1; /* accessible by a debugger only */
69 unsigned char *kbuf = R->kbuf;
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);
80 if (R->numlock_state || (ev->state & R->ModNumLockMask)) {
81 R->numlock_state = (ev->state & R->ModNumLockMask);
82 PrivMode((!R->numlock_state), PrivMode_aplKP);
85 if (R->Input_Context != NULL) {
89 #ifdef X_HAVE_UTF8_STRING
90 len = Xutf8LookupString(R->Input_Context, ev, (char *)kbuf,
91 KBUFSZ, &keysym, &status_return);
93 len = XmbLookupString(R->Input_Context, ev, (char *)kbuf,
94 KBUFSZ, &keysym, &status_return);
96 valid_keysym = ((status_return == XLookupKeySym)
97 || (status_return == XLookupBoth));
99 len = XLookupString(ev, (char *)kbuf, KBUFSZ, &keysym,
104 len = XLookupString(ev, (char *)kbuf, KBUFSZ, &keysym,
107 * map unmapped Latin[2-4]/Katakana/Arabic/Cyrillic/Greek entries -> Latin1
108 * good for installations with correct fonts, but without XLOCALE
111 if ((keysym >= 0x0100) && (keysym < 0x0800)) {
112 kbuf[0] = (keysym & 0xFF);
124 /* for some backwards compatibility */
125 #if defined(HOTKEY_CTRL) || defined(HOTKEY_META)
131 if (keysym == R->ks_bigfont) {
132 rxvt_change_font(aR_ 0, FONT_UP);
134 } else if (keysym == R->ks_smallfont) {
135 rxvt_change_font(aR_ 0, FONT_DN);
141 if (R->TermWin.saveLines) {
142 #ifdef UNSHIFTED_SCROLLKEYS
143 if (!ctrl && !meta) {
149 #ifdef PAGING_CONTEXT_LINES
150 lnsppg = R->TermWin.nrow - PAGING_CONTEXT_LINES;
152 lnsppg = R->TermWin.nrow * 4 / 5;
154 if (keysym == XK_Prior) {
155 rxvt_scr_page(aR_ UP, lnsppg);
157 } else if (keysym == XK_Next) {
158 rxvt_scr_page(aR_ DN, lnsppg);
162 #ifdef SCROLL_ON_UPDOWN_KEYS
164 if (keysym == XK_Up) {
165 rxvt_scr_page(aR_ UP, 1);
167 } else if (keysym == XK_Down) {
168 rxvt_scr_page(aR_ DN, 1);
173 #ifdef SCROLL_ON_HOMEEND_KEYS
175 if (keysym == XK_Home) {
176 rxvt_scr_move_to(aR_ 0, 1);
178 } else if (keysym == XK_End) {
179 rxvt_scr_move_to(aR_ 1, 0);
187 /* Shift + F1 - F10 generates F11 - F20 */
188 if (keysym >= XK_F1 && keysym <= XK_F10) {
189 keysym += (XK_F11 - XK_F1);
190 shft = 0; /* turn off Shift */
191 } else if (!ctrl && !meta && (R->PrivateModes & PrivMode_ShiftKeys)) {
193 /* normal XTerm key bindings */
194 case XK_Insert: /* Shift+Insert = paste mouse selection */
195 rxvt_selection_request(aR_ ev->time, 0, 0);
198 case XK_KP_Add: /* Shift+KP_Add = bigger font */
199 rxvt_change_font(aR_ 0, FONT_UP);
201 case XK_KP_Subtract: /* Shift+KP_Subtract = smaller font */
202 rxvt_change_font(aR_ 0, FONT_DN);
208 if (keysym == XK_Print) {
209 rxvt_scr_printscreen(aR_ ctrl | shft);
214 if (keysym == R->ks_greekmodeswith) {
215 R->greek_mode = !R->greek_mode;
217 rxvt_xterm_seq(aR_ XTerm_title,
218 (greek_getmode() == GREEK_ELOT928
219 ? "[Greek: iso]" : "[Greek: ibm]"), CHAR_ST);
222 rxvt_xterm_seq(aR_ XTerm_title, APL_NAME "-" VERSION, CHAR_ST);
227 if (keysym >= 0xFF00 && keysym <= 0xFFFF) {
228 #ifdef KEYSYM_RESOURCE
229 if (!(shft | ctrl) && R->Keysym_map[keysym & 0xFF] != NULL) {
231 const unsigned char *kbuf0;
232 const unsigned char ch = C0_ESC;
234 kbuf0 = (R->Keysym_map[keysym & 0xFF]);
235 l = (unsigned int)*kbuf0++;
240 if (R->meta_char == C0_ESC)
242 rxvt_tt_write(aR_ &ch, 1);
243 rxvt_tt_write(aR_ kbuf0, l);
250 #ifndef NO_BACKSPACE_KEY
252 if (R->PrivateModes & PrivMode_HaveBackSpace) {
253 kbuf[0] = (!!(R->PrivateModes & PrivMode_BackSpace)
254 ^ !!ctrl) ? '\b' : '\177';
257 STRCPY(kbuf, R->key_backspace);
258 # ifdef MULTICHAR_SET
259 if ((R->Options & Opt_mc_hack) && R->screen.cur.col > 0) {
262 newlen = STRLEN(kbuf);
263 col = R->screen.cur.col - 1;
264 row = R->screen.cur.row + R->TermWin.saveLines;
265 if (IS_MULTI2(R->screen.rend[row][col]))
266 MEMMOVE(kbuf + newlen, kbuf, newlen + 1);
271 #ifndef NO_DELETE_KEY
273 STRCPY(kbuf, R->key_delete);
274 # ifdef MULTICHAR_SET
275 if (R->Options & Opt_mc_hack) {
278 newlen = STRLEN(kbuf);
279 col = R->screen.cur.col;
280 row = R->screen.cur.row + R->TermWin.saveLines;
281 if (IS_MULTI1(R->screen.rend[row][col]))
282 MEMMOVE(kbuf + newlen, kbuf, newlen + 1);
289 STRCPY(kbuf, "\033[Z");
291 #ifdef CTRL_TAB_MAKES_META
295 #ifdef MOD4_TAB_MAKES_META
296 if (ev->state & Mod4Mask)
305 case XK_KP_Up: /* \033Ox or standard */
306 case XK_KP_Down: /* \033Or or standard */
307 case XK_KP_Right: /* \033Ov or standard */
308 case XK_KP_Left: /* \033Ot or standard */
309 if ((R->PrivateModes & PrivMode_aplKP) ? !shft : shft) {
310 STRCPY(kbuf, "\033OZ");
311 kbuf[2] = ("txvr"[keysym - XK_KP_Left]);
314 /* translate to std. cursor key */
315 keysym = XK_Left + (keysym - XK_KP_Left);
318 case XK_Up: /* "\033[A" */
319 case XK_Down: /* "\033[B" */
320 case XK_Right: /* "\033[C" */
321 case XK_Left: /* "\033[D" */
322 STRCPY(kbuf, "\033[Z");
323 kbuf[2] = ("DACB"[keysym - XK_Left]);
326 kbuf[2] = ("dacb"[keysym - XK_Left]);
329 kbuf[2] = ("dacb"[keysym - XK_Left]);
330 } else if (R->PrivateModes & PrivMode_aplCUR)
334 if (R->Options & Opt_mc_hack) {
337 col = R->screen.cur.col;
338 row = R->screen.cur.row + R->TermWin.saveLines;
340 if (keysym == XK_Right
341 && IS_MULTI1(R->screen.rend[row][col]))
343 else if (keysym == XK_Left) {
345 if (IS_MULTI2(R->screen.rend[row][col - 1]))
347 } else if (R->screen.cur.row > 0) {
348 col = R->screen.tlen[--row];
350 col = R->TermWin.ncol - 1;
354 && IS_MULTI2(R->screen.rend[row][col]))
359 MEMMOVE(kbuf + 3, kbuf, 3 + 1);
364 #ifndef UNSHIFTED_SCROLLKEYS
367 /* allow shift to override */
368 if ((R->PrivateModes & PrivMode_aplKP) ? !shft : shft) {
369 STRCPY(kbuf, "\033Oy");
375 STRCPY(kbuf, "\033[5~");
379 /* allow shift to override */
380 if ((R->PrivateModes & PrivMode_aplKP) ? !shft : shft) {
381 STRCPY(kbuf, "\033Os");
387 STRCPY(kbuf, "\033[6~");
391 /* allow shift to override */
392 if ((R->PrivateModes & PrivMode_aplKP) ? !shft : shft) {
393 STRCPY(kbuf, "\033OM");
402 STRCPY(kbuf, "\033Ou");
406 STRCPY(kbuf, "\033Op");
410 STRCPY(kbuf, "\033On");
413 case XK_KP_F1: /* "\033OP" */
414 case XK_KP_F2: /* "\033OQ" */
415 case XK_KP_F3: /* "\033OR" */
416 case XK_KP_F4: /* "\033OS" */
417 STRCPY(kbuf, "\033OP");
418 kbuf[2] += (keysym - XK_KP_F1);
421 case XK_KP_Multiply: /* "\033Oj" : "*" */
422 case XK_KP_Add: /* "\033Ok" : "+" */
423 case XK_KP_Separator: /* "\033Ol" : "," */
424 case XK_KP_Subtract: /* "\033Om" : "-" */
425 case XK_KP_Decimal: /* "\033On" : "." */
426 case XK_KP_Divide: /* "\033Oo" : "/" */
427 case XK_KP_0: /* "\033Op" : "0" */
428 case XK_KP_1: /* "\033Oq" : "1" */
429 case XK_KP_2: /* "\033Or" : "2" */
430 case XK_KP_3: /* "\033Os" : "3" */
431 case XK_KP_4: /* "\033Ot" : "4" */
432 case XK_KP_5: /* "\033Ou" : "5" */
433 case XK_KP_6: /* "\033Ov" : "6" */
434 case XK_KP_7: /* "\033Ow" : "7" */
435 case XK_KP_8: /* "\033Ox" : "8" */
436 case XK_KP_9: /* "\033Oy" : "9" */
437 /* allow shift to override */
438 if ((R->PrivateModes & PrivMode_aplKP) ? !shft : shft) {
439 STRCPY(kbuf, "\033Oj");
440 kbuf[2] += (keysym - XK_KP_Multiply);
442 kbuf[0] = ('*' + (keysym - XK_KP_Multiply));
448 STRCPY(kbuf, "\033[1~");
451 STRCPY(kbuf, "\033[2~");
453 #ifdef DXK_Remove /* support for DEC remove like key */
458 STRCPY(kbuf, "\033[3~");
461 STRCPY(kbuf, "\033[4~");
465 /* allow shift to override */
466 if ((R->PrivateModes & PrivMode_aplKP) ? !shft : shft) {
467 STRCPY(kbuf, "\033Oq");
473 STRCPY(kbuf, KS_END);
477 /* allow shift to override */
478 if ((R->PrivateModes & PrivMode_aplKP) ? !shft : shft) {
479 STRCPY(kbuf, "\033Ow");
485 STRCPY(kbuf, KS_HOME);
488 #define FKEY(n, fkey) \
489 sprintf((char *)kbuf,"\033[%2d~", (int)((n) + (keysym - fkey)))
491 case XK_F1: /* "\033[11~" */
492 case XK_F2: /* "\033[12~" */
493 case XK_F3: /* "\033[13~" */
494 case XK_F4: /* "\033[14~" */
495 case XK_F5: /* "\033[15~" */
498 case XK_F6: /* "\033[17~" */
499 case XK_F7: /* "\033[18~" */
500 case XK_F8: /* "\033[19~" */
501 case XK_F9: /* "\033[20~" */
502 case XK_F10: /* "\033[21~" */
505 case XK_F11: /* "\033[23~" */
506 case XK_F12: /* "\033[24~" */
507 case XK_F13: /* "\033[25~" */
508 case XK_F14: /* "\033[26~" */
511 case XK_F15: /* "\033[28~" */
512 case XK_F16: /* "\033[29~" */
515 case XK_Help: /* "\033[28~" */
518 case XK_Menu: /* "\033[29~" */
521 case XK_F17: /* "\033[31~" */
522 case XK_F18: /* "\033[32~" */
523 case XK_F19: /* "\033[33~" */
524 case XK_F20: /* "\033[34~" */
525 case XK_F21: /* "\033[35~" */
526 case XK_F22: /* "\033[36~" */
527 case XK_F23: /* "\033[37~" */
528 case XK_F24: /* "\033[38~" */
529 case XK_F25: /* "\033[39~" */
530 case XK_F26: /* "\033[40~" */
531 case XK_F27: /* "\033[41~" */
532 case XK_F28: /* "\033[42~" */
533 case XK_F29: /* "\033[43~" */
534 case XK_F30: /* "\033[44~" */
535 case XK_F31: /* "\033[45~" */
536 case XK_F32: /* "\033[46~" */
537 case XK_F33: /* "\033[47~" */
538 case XK_F34: /* "\033[48~" */
539 case XK_F35: /* "\033[49~" */
551 * Pass meta for all function keys, if 'meta' option set
554 if (meta && (R->meta_char == 0x80) && len > 0)
555 kbuf[len - 1] |= 0x80;
557 } else if (ctrl && keysym == XK_minus) {
559 kbuf[0] = '\037'; /* Ctrl-Minus generates ^_ (31) */
563 if (meta && (R->meta_char == 0x80)) {
566 for (ch = kbuf; ch < kbuf + len; ch++)
573 len = greek_xlat(kbuf, len);
580 return; /* not mapped */
582 if (R->Options & Opt_scrollTtyKeypress)
583 if (R->TermWin.view_start) {
584 R->TermWin.view_start = 0;
589 * these modifications only affect the static keybuffer
590 * pass Shift/Control indicators for function keys ending with `~'
594 * Shift+Prior = "ESC[5$"
595 * Ctrl+Prior = "ESC[5^"
596 * Ctrl+Shift+Prior = "ESC[5@"
597 * Meta adds an Escape prefix (with META8_OPTION, if meta == <escape>).
599 if (kbuf[0] == C0_ESC && kbuf[1] == '[' && kbuf[len - 1] == '~')
600 kbuf[len - 1] = (shft ? (ctrl ? '@' : '$') : (ctrl ? '^' : '~'));
605 && (R->meta_char == C0_ESC)
608 const unsigned char ch = C0_ESC;
610 rxvt_tt_write(aR_ &ch, 1);
613 if (debug_key) { /* Display keyboard buffer contents */
617 fprintf(stderr, "key 0x%04X [%d]: `", (unsigned int)keysym, len);
618 for (i = 0, p = kbuf; i < len; i++, p++)
619 fprintf(stderr, (*p >= ' ' && *p < '\177' ? "%c" : "\\%03o"), *p);
620 fprintf(stderr, "'\n");
622 #endif /* DEBUG_CMD */
623 rxvt_tt_write(aR_ kbuf, (unsigned int)len);
628 /*{{{ rxvt_cmd_write(), rxvt_cmd_getc() */
629 /* attempt to `write' count to the input buffer */
632 rxvt_cmd_write(pR_ const unsigned char *str, unsigned int count)
635 unsigned char *cmdbuf_base = R->cmdbuf_base,
636 *cmdbuf_endp = R->cmdbuf_endp,
637 *cmdbuf_ptr = R->cmdbuf_ptr;
639 n = cmdbuf_ptr - cmdbuf_base;
640 s = cmdbuf_base + BUFSIZ - 1 - cmdbuf_endp;
641 if (n > 0 && s < count) {
642 MEMMOVE(cmdbuf_base, cmdbuf_ptr,
643 (unsigned int)(cmdbuf_endp - cmdbuf_ptr));
644 cmdbuf_ptr = cmdbuf_base;
649 rxvt_print_error("data loss: cmd_write too large");
653 *cmdbuf_endp++ = *str++;
654 R->cmdbuf_ptr = cmdbuf_ptr;
655 R->cmdbuf_endp = cmdbuf_endp;
658 #endif /* MENUBAR_MAX */
661 rxvt_term::process_x_events ()
667 XNextEvent (Xdisplay, &xev);
668 #if defined(CURSOR_BLINK)
669 if ((Options & Opt_cursorBlink)
670 && xev.type == KeyPress) {
675 want_keypress_time = 1;
679 #if defined(POINTER_BLANK)
680 if ((Options & Opt_pointerBlank)
681 && (pointerBlankDelay > 0)) {
682 if (xev.type == MotionNotify
683 || xev.type == ButtonPress
684 || xev.type == ButtonRelease) {
686 rxvt_pointer_unblank(aR);
687 want_motion_time = 1;
689 if (xev.type == KeyPress && hidden_pointer == 0)
690 rxvt_pointer_blank (this);
695 if (!XFilterEvent (&xev, xev.xany.window))
697 rxvt_process_x_event (this, &xev);
699 while (XPending (Xdisplay));
703 rxvt_term::x_cb (io_watcher &w, short revents)
710 // read the next character, currently handles UTF-8
711 // will probably handle all sorts of other stuff in the future
713 rxvt_term::next_char ()
715 struct mbstate &s = mbstate;
717 while (cmdbuf_ptr < cmdbuf_endp)
719 uint8_t ch = *cmdbuf_ptr;
723 if ((ch & 0xc0) == 0x80)
728 s.reg = (s.reg << 6) | (ch & 0x7f);
730 if (--s.cnt == 0 && s.reg >= 128) /* if !inrange then corruption or Racking */
738 return s.orig; /* the _occasional_ non-utf-8 character may slip through... */
742 if ((ch & 0xc0) == 0xc0)
747 s.orig = ch; /* for broken encodings */
749 if ((ch & 0xe0) == 0xc0) { s.reg &= 0x1f; s.cnt = 1; }
750 if ((ch & 0xf0) == 0xe0) { s.reg &= 0x0f; s.cnt = 2; }
751 if ((ch & 0xf8) == 0xf0) { s.reg &= 0x07; s.cnt = 3; }
752 if ((ch & 0xfc) == 0xf8) { s.reg &= 0x03; s.cnt = 4; }
753 if ((ch & 0xfe) == 0xfc) { s.reg &= 0x01; s.cnt = 5; }
757 cmdbuf_ptr++; /* _occasional_ non-utf8 may slip through... */
766 rxvt_term::pty_fill (size_t count)
768 ssize_t n = cmdbuf_endp - cmdbuf_ptr;
770 memmove (cmdbuf_base, cmdbuf_ptr, n);
771 cmdbuf_ptr = cmdbuf_base;
772 cmdbuf_endp = cmdbuf_ptr + n;
774 n = read (cmd_fd, cmdbuf_endp, count);
781 else if (n < 0 && errno == EAGAIN)
785 exit(EXIT_FAILURE); /* bad order of events? */
789 rxvt_term::pty_cb (io_watcher &w, short revents)
791 while (pty_fill (BUFSIZ - (cmdbuf_endp - cmdbuf_ptr)))
793 /* once we know the shell is running, send the screen size. Again! */
794 //ch = rxvt_cmd_getc(aR); /* wait for something */
795 //rxvt_tt_winsize(cmd_fd, TermWin.ncol, TermWin.nrow, cmd_pid);
797 uint32_t ch = NOCHAR;
804 if (ch == NOCHAR) // TODO: improve
807 if (ch >= ' ' || ch == '\t' || ch == '\n' || ch == '\r')
809 /* Read a text string from the input buffer */
810 uint32_t buf[BUFSIZ];
811 bool refreshnow = false;
821 if (ch == NOCHAR || (ch < ' ' && ch != '\t' && ch != '\n' && ch != '\r'))
832 if (!(Options & Opt_jumpScroll)
833 || (refresh_count >= (refresh_limit * (TermWin.nrow - 1))))
841 if (str >= buf + BUFSIZ)
849 rxvt_scr_add_lines (this, buf, nlines, str - buf);
852 * If there have been a lot of new lines, then update the screen
853 * What the heck I'll cheat and only refresh less than every page-full.
854 * the number of pages between refreshes is refresh_limit, which
855 * is incremented here because we must be doing flat-out scrolling.
857 * refreshing should be correct for small scrolls, because of the
862 if ((Options & Opt_jumpScroll) && refresh_limit < REFRESH_PERIOD)
865 rxvt_scr_refresh (this, refresh_type);
874 rxvt_process_nonprinting (this, ch);
876 case C0_ESC: /* escape char */
877 rxvt_process_escape_seq (this);
879 /*case 0x9b: */ /* CSI */
880 /* rxvt_process_csi_seq (this); */
895 if (want_full_refresh)
897 want_full_refresh = 0;
898 rxvt_scr_clear (this);
899 rxvt_scr_touch (this, False);
906 rxvt_scr_refresh (this, refresh_type);
907 rxvt_scrollbar_show (this, 1);
909 rxvt_IMSendSpot (this);
916 /* rxvt_cmd_getc() - Return next input character */
918 * Return the next input character after first passing any keyboard input
927 uint32_t c = R->next_char ();
931 // incomplete sequences should occur rarely, still, a better solution
932 // would be preferred. either setjmp/longjmp or better design.
933 fcntl (R->cmd_fd, F_SETFL, 0);
935 fcntl (R->cmd_fd, F_SETFL, O_NONBLOCK);
938 #define TIMEOUT_USEC 5000
940 int quick_timeout, select_res;
941 int want_motion_time, want_keypress_time;
942 struct timeval value;
943 #if defined(POINTER_BLANK) || defined(CURSOR_BLINK)
948 /* loop until we can return something */
950 if (R->v_bufstr < R->v_bufptr) /* output any pending chars */
951 rxvt_tt_write(aR_ NULL, 0);
953 #if defined(POINTER_BLANK) || defined(CURSOR_BLINK)
954 tp.tv_sec = 0; /* presume == 0 implies time not yet retrieved */
956 #if defined(CURSOR_BLINK)
957 want_keypress_time = 0;
959 #if defined(POINTER_BLANK)
960 want_motion_time = 0;
963 if (XPending (R->Xdisplay))
965 R->process_x_events ();
967 /* in case button actions pushed chars to cmdbuf */
968 if (R->cmdbuf_ptr < R->cmdbuf_endp)
969 return *R->cmdbuf_ptr++;
972 #if defined(CURSOR_BLINK)
973 if (want_keypress_time) {
974 (void)gettimeofday(&tp, NULL);
975 R->lastcursorchange.tv_sec = tp.tv_sec;
976 R->lastcursorchange.tv_usec = tp.tv_usec;
979 #if defined(POINTER_BLANK)
980 if (want_motion_time) {
982 (void)gettimeofday(&tp, NULL);
983 R->lastmotion.tv_sec = tp.tv_sec;
984 R->lastmotion.tv_usec = tp.tv_usec;
989 * the command input buffer is empty and we have no pending X events
993 #if defined(MOUSE_WHEEL) && defined(MOUSE_SLIP_WHEELING)
994 if (R->mouse_slip_wheel_speed) {
996 if (!R->mouse_slip_wheel_delay--
997 && rxvt_scr_page(aR_ R->mouse_slip_wheel_speed > 0 ? UP : DN,
998 abs(R->mouse_slip_wheel_speed))) {
999 R->mouse_slip_wheel_delay = SCROLLBAR_CONTINUOUS_DELAY;
1000 R->refresh_type |= SMOOTH_REFRESH;
1001 R->want_refresh = 1;
1004 #endif /* MOUSE_WHEEL && MOUSE_SLIP_WHEELING */
1005 #ifdef SELECTION_SCROLLING
1006 if (R->pending_scroll_selection) {
1008 if (!R->scroll_selection_delay--
1009 && rxvt_scr_page(aR_ R->scroll_selection_dir,
1010 R->scroll_selection_lines)) {
1011 rxvt_selection_extend(aR_ R->selection_save_x,
1012 R->selection_save_y, R->selection_save_state);
1013 R->scroll_selection_delay = SCROLLBAR_CONTINUOUS_DELAY;
1014 R->refresh_type |= SMOOTH_REFRESH;
1015 R->want_refresh = 1;
1019 #ifndef NO_SCROLLBAR_BUTTON_CONTINUAL_SCROLLING
1020 if (scrollbar_isUp() || scrollbar_isDn()) {
1022 if (!R->scroll_arrow_delay--
1023 && rxvt_scr_page(aR_ scrollbar_isUp() ? UP : DN, 1)) {
1024 R->scroll_arrow_delay = SCROLLBAR_CONTINUOUS_DELAY;
1025 R->refresh_type |= SMOOTH_REFRESH;
1026 R->want_refresh = 1;
1029 #endif /* NO_SCROLLBAR_BUTTON_CONTINUAL_SCROLLING */
1032 FD_SET(R->cmd_fd, &readfds);
1033 FD_SET(R->Xfd, &readfds);
1034 value.tv_usec = TIMEOUT_USEC;
1037 if (!R->TermWin.mapped)
1040 quick_timeout |= R->want_refresh;
1042 quick_timeout |= R->want_full_refresh;
1046 #if defined(POINTER_BLANK) || defined(CURSOR_BLINK)
1048 int set_quick_timeout = 0;
1049 long csdiff, psdiff;
1051 #define BLINK_TIME 500000L
1052 csdiff = psdiff = 60000000L; /* or, say, LONG_MAX */
1053 # if defined(CURSOR_BLINK)
1054 if (R->Options & Opt_cursorBlink) {
1055 if (!tp.tv_sec) /* didn't get it before so get it now */
1056 (void)gettimeofday(&tp, NULL);
1058 csdiff = (tp.tv_sec - R->lastcursorchange.tv_sec) * 1000000L
1059 + tp.tv_usec - R->lastcursorchange.tv_usec;
1060 if (csdiff > BLINK_TIME) { /* XXX: settable blink times */
1061 R->lastcursorchange.tv_sec = tp.tv_sec;
1062 R->lastcursorchange.tv_usec = tp.tv_usec;
1063 R->hidden_cursor = !R->hidden_cursor;
1066 csdiff = BLINK_TIME - csdiff;
1067 set_quick_timeout = 1;
1070 # if defined(POINTER_BLANK)
1072 * If we haven't moved the pointer for a while
1074 if ((R->Options & Opt_pointerBlank)
1075 && (R->pointerBlankDelay > 0)
1076 && (R->hidden_pointer == 0)) {
1079 if (!tp.tv_sec) /* didn't get it before so get it now */
1080 (void)gettimeofday(&tp, NULL);
1081 psdiff = (tp.tv_sec - R->lastmotion.tv_sec) * 1000000L
1082 + tp.tv_usec - R->lastmotion.tv_usec;
1083 pdelay = R->pointerBlankDelay * 1000000L;
1084 if (psdiff >= pdelay)
1085 rxvt_pointer_blank(aR);
1087 set_quick_timeout = 1;
1088 psdiff = pdelay - psdiff;
1092 if (!quick_timeout && set_quick_timeout) {
1093 MIN_IT(csdiff, psdiff);
1094 value.tv_sec = csdiff / 1000000L;
1095 value.tv_usec = csdiff % 1000000L;
1101 if ((select_res = select(R->num_fds, &readfds, NULL, NULL,
1102 (quick_timeout ? &value : NULL))) == 0) {
1103 /* select statement timed out - we're not hard and fast scrolling */
1104 R->refresh_limit = 1;
1106 #if defined(CURSOR_BLINK)
1107 if (R->Options & Opt_cursorBlink)
1108 R->want_refresh = 1;
1115 rxvt_pointer_unblank(pR)
1117 XDefineCursor(R->Xdisplay, R->TermWin.vt, R->TermWin_cursor);
1118 rxvt_recolour_cursor(aR);
1119 #ifdef POINTER_BLANK
1120 R->hidden_pointer = 0;
1121 if (R->pointerBlankDelay > 0) {
1124 (void)gettimeofday(&tp, NULL);
1125 R->lastmotion.tv_sec = tp.tv_sec;
1126 R->lastmotion.tv_usec = tp.tv_usec;
1131 #ifdef POINTER_BLANK
1134 rxvt_pointer_blank(pR)
1136 XDefineCursor(R->Xdisplay, R->TermWin.vt, R->pointer_blank);
1137 XFlush(R->Xdisplay);
1138 R->hidden_pointer = 1;
1144 rxvt_mouse_report(pR_ const XButtonEvent *ev)
1146 int button_number, key_state = 0;
1151 rxvt_pixel_position(aR_ &x, &y);
1153 if (R->MEvent.button == AnyButton) {
1156 button_number = R->MEvent.button - Button1;
1157 /* add 0x3D for wheel events, like xterm does */
1158 if (button_number >= 3)
1159 button_number += (64 - 3);
1162 if (R->PrivateModes & PrivMode_MouseX10) {
1164 * do not report ButtonRelease
1165 * no state info allowed
1168 if (button_number == 3)
1171 /* XTerm mouse reporting needs these values:
1175 * plus will add in our own Double-Click reporting
1178 key_state = ((R->MEvent.state & ShiftMask) ? 4 : 0)
1179 + ((R->MEvent.state & R->ModMetaMask) ? 8 : 0)
1180 + ((R->MEvent.state & ControlMask) ? 16 : 0);
1181 #ifdef MOUSE_REPORT_DOUBLECLICK
1182 key_state += ((R->MEvent.clicks > 1) ? 32 : 0);
1186 #ifdef DEBUG_MOUSEREPORT
1187 fprintf(stderr, "Mouse [");
1196 fprintf(stderr, "]: <%d>, %d/%d\n",
1201 rxvt_tt_printf(aR_ "\033[M%c%c%c",
1202 (32 + button_number + key_state),
1211 rxvt_W11_process_x_event(XEvent *ev)
1213 rxvt_t *r = rxvt_get_r();
1215 rxvt_process_x_event(aR_ ev);
1219 /*{{{ process an X event */
1222 rxvt_process_x_event(pR_ XEvent *ev)
1224 int i, want_timeout;
1225 Window unused_root, unused_child;
1226 int unused_root_x, unused_root_y;
1227 unsigned int unused_mask;
1231 const char *const eventnames[] =
1232 { /* mason - this matches my system */
1273 * check if we need to get the time for any timeouts
1276 for (i = NUM_TIMEOUTS; i--; )
1277 if (R->timeout[i].tv_sec) {
1285 (void)gettimeofday(&tp, NULL);
1288 ltt = localtime(&(tp.tv_sec));
1289 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));
1292 /* X event timeouts */
1294 for (i = NUM_TIMEOUTS; i--; ) {
1295 if (R->timeout[i].tv_sec == 0)
1297 if ((tp.tv_sec < R->timeout[i].tv_sec)
1298 || (tp.tv_sec == R->timeout[i].tv_sec
1299 && tp.tv_usec < R->timeout[i].tv_usec))
1301 R->timeout[i].tv_sec = 0;
1304 rxvt_print_error("data loss: timeout on INCR selection paste");
1305 R->selection_wait = Sel_none;
1314 rxvt_lookup_key(aR_ (XKeyEvent *)ev);
1317 #if defined(MOUSE_WHEEL) && defined(MOUSE_SLIP_WHEELING)
1320 if (!(ev->xkey.state & ControlMask))
1321 R->mouse_slip_wheel_speed = 0;
1325 ks = XKeycodeToKeysym(R->Xdisplay, ev->xkey.keycode, 0);
1326 if (ks == XK_Control_L || ks == XK_Control_R)
1327 R->mouse_slip_wheel_speed = 0;
1334 rxvt_button_press(aR_ (XButtonEvent *)ev);
1338 rxvt_button_release(aR_ (XButtonEvent *)ev);
1342 if (ev->xclient.format == 32
1343 && (Atom)ev->xclient.data.l[0] == R->xa[XA_WMDELETEWINDOW])
1346 /* OffiX Dnd (drag 'n' drop) protocol */
1347 if (ev->xclient.message_type == R->xa[XA_DNDPROTOCOL]
1348 && (ev->xclient.data.l[0] == DndFile
1349 || ev->xclient.data.l[0] == DndDir
1350 || ev->xclient.data.l[0] == DndLink)) {
1354 unsigned char *data;
1355 unsigned long Size, RemainingBytes;
1357 XGetWindowProperty(R->Xdisplay, Xroot,
1358 R->xa[XA_DNDSELECTION],
1360 False, AnyPropertyType,
1361 &ActualType, &ActualFormat,
1362 &Size, &RemainingBytes,
1364 XChangeProperty(R->Xdisplay, Xroot,
1365 XA_CUT_BUFFER0, XA_STRING,
1367 data, STRLEN(data));
1368 rxvt_selection_paste(aR_ Xroot, XA_CUT_BUFFER0, True);
1369 XSetInputFocus(R->Xdisplay, Xroot, RevertToNone, CurrentTime);
1371 #endif /* OFFIX_DND */
1375 XRefreshKeyboardMapping(&(ev->xmapping));
1379 * XXX: this is not the _current_ arrangement
1380 * Here's my conclusion:
1381 * If the window is completely unobscured, use bitblt's
1382 * to scroll. Even then, they're only used when doing partial
1383 * screen scrolling. When partially obscured, we have to fill
1384 * in the GraphicsExpose parts, which means that after each refresh,
1385 * we need to wait for the graphics expose or Noexpose events,
1386 * which ought to make things real slow!
1388 case VisibilityNotify:
1389 switch (ev->xvisibility.state) {
1390 case VisibilityUnobscured:
1391 R->refresh_type = FAST_REFRESH;
1393 case VisibilityPartiallyObscured:
1394 R->refresh_type = SLOW_REFRESH;
1397 R->refresh_type = NO_REFRESH;
1403 if (!R->TermWin.focus) {
1404 R->TermWin.focus = 1;
1405 R->want_refresh = 1;
1407 if (R->Input_Context != NULL)
1408 XSetICFocus(R->Input_Context);
1414 if (R->TermWin.focus) {
1415 R->TermWin.focus = 0;
1416 R->want_refresh = 1;
1418 if (R->Input_Context != NULL)
1419 XUnsetICFocus(R->Input_Context);
1424 case ConfigureNotify:
1425 if (ev->xconfigure.window == R->TermWin.parent[0]) {
1428 do { /* Wrap lots of configures into one */
1429 width = ev->xconfigure.width;
1430 height = ev->xconfigure.height;
1431 D_SIZE((stderr, "Size: ConfigureNotify: %4d x %4d", width, height));
1432 } while (XCheckTypedWindowEvent(R->Xdisplay, ev->xconfigure.window,
1433 ConfigureNotify, ev));
1434 if (R->szHint.width != width || R->szHint.height != height) {
1435 D_SIZE((stderr, "Size: Resizing from: %4d x %4d", R->szHint.width, R->szHint.height));
1436 rxvt_resize_all_windows(aR_ (unsigned int)width,
1437 (unsigned int)height, 1);
1441 D_SIZE((stderr, "Size: Not resizing"));
1444 #ifdef TRANSPARENT /* XXX: maybe not needed - leave in for now */
1445 if (R->Options & Opt_transparent) {
1446 rxvt_check_our_parents(aR);
1447 if (R->am_transparent)
1448 R->want_full_refresh = 1;
1454 case SelectionClear:
1455 rxvt_selection_clear(aR);
1458 case SelectionNotify:
1459 if (R->selection_wait == Sel_normal)
1460 rxvt_selection_paste(aR_ ev->xselection.requestor,
1461 ev->xselection.property, True);
1464 case SelectionRequest:
1465 rxvt_selection_send(aR_ &(ev->xselectionrequest));
1469 R->TermWin.mapped = 0;
1473 R->TermWin.mapped = 1;
1476 case PropertyNotify:
1477 if (ev->xproperty.atom == R->xa[XA_VT_SELECTION]) {
1478 if (ev->xproperty.state == PropertyNewValue)
1479 rxvt_selection_property(aR_ ev->xproperty.window,
1480 ev->xproperty.atom);
1485 * if user used some Esetroot compatible prog to set the root bg,
1486 * use the property to determine the pixmap. We use it later on.
1488 if (R->xa[XA_XROOTPMAPID] == 0)
1489 R->xa[XA_XROOTPMAPID] = XInternAtom(R->Xdisplay,
1490 "_XROOTPMAP_ID", False);
1491 if (ev->xproperty.atom != R->xa[XA_XROOTPMAPID])
1494 case ReparentNotify:
1495 if ((R->Options & Opt_transparent) && rxvt_check_our_parents(aR)) {
1496 if (R->am_transparent)
1497 R->want_full_refresh = 1;
1499 #endif /* TRANSPARENT */
1502 case GraphicsExpose:
1504 if (ev->xany.window == R->TermWin.vt) {
1505 #ifdef NO_SLOW_LINK_SUPPORT
1506 rxvt_scr_expose(aR_ ev->xexpose.x, ev->xexpose.y,
1507 ev->xexpose.width, ev->xexpose.height, False);
1509 // don't understand this, so commented it out
1510 rxvt_scr_expose(aR_ ev->xexpose.x, ev->xexpose.y,
1511 ev->xexpose.width, ev->xexpose.height, False);
1512 //rxvt_scr_expose(aR_ ev->xexpose.x, 0,
1513 // ev->xexpose.width, R->TermWin.height, False);
1515 R->want_refresh = 1;
1517 XEvent unused_xevent;
1519 while (XCheckTypedWindowEvent(R->Xdisplay, ev->xany.window,
1522 while (XCheckTypedWindowEvent(R->Xdisplay, ev->xany.window,
1525 if (isScrollbarWindow(ev->xany.window)) {
1526 scrollbar_setIdle();
1527 rxvt_scrollbar_show(aR_ 0);
1530 if (menubar_visible(aR) && isMenuBarWindow(ev->xany.window))
1531 rxvt_menubar_expose(aR);
1533 #ifdef RXVT_GRAPHICS
1534 rxvt_Gr_expose(aR_ ev->xany.window);
1540 #ifdef POINTER_BLANK
1541 if (R->hidden_pointer)
1542 rxvt_pointer_unblank(aR);
1545 if (isMenuBarWindow(ev->xany.window)) {
1546 rxvt_menubar_control(aR_ &(ev->xbutton));
1550 if ((R->PrivateModes & PrivMode_mouse_report) && !(R->bypass_keystate))
1553 if (ev->xany.window == R->TermWin.vt) {
1554 if ((ev->xbutton.state & (Button1Mask | Button3Mask))) {
1555 while (XCheckTypedWindowEvent(R->Xdisplay, R->TermWin.vt,
1556 MotionNotify, ev)) ;
1557 XQueryPointer(R->Xdisplay, R->TermWin.vt,
1558 &unused_root, &unused_child,
1559 &unused_root_x, &unused_root_y,
1560 &(ev->xbutton.x), &(ev->xbutton.y),
1562 #ifdef MOUSE_THRESHOLD
1563 /* deal with a `jumpy' mouse */
1564 if ((ev->xmotion.time - R->MEvent.time) > MOUSE_THRESHOLD) {
1566 rxvt_selection_extend(aR_ (ev->xbutton.x), (ev->xbutton.y),
1567 (ev->xbutton.state & Button3Mask) ? 2 : 0);
1568 #ifdef SELECTION_SCROLLING
1569 if (ev->xbutton.y<R->TermWin.int_bwidth ||
1570 Pixel2Row(ev->xbutton.y)>(R->TermWin.nrow-1)) {
1573 R->pending_scroll_selection=1;
1575 /* don't clobber the current delay if we are
1576 * already in the middle of scrolling.
1578 if (R->scroll_selection_delay<=0)
1579 R->scroll_selection_delay=SCROLLBAR_CONTINUOUS_DELAY;
1581 /* save the event params so we can highlight
1582 * the selection in the pending-scroll loop
1584 R->selection_save_x=ev->xbutton.x;
1585 R->selection_save_y=ev->xbutton.y;
1586 R->selection_save_state=
1587 (ev->xbutton.state & Button3Mask) ? 2 : 0;
1589 /* calc number of lines to scroll */
1590 if (ev->xbutton.y<R->TermWin.int_bwidth) {
1591 R->scroll_selection_dir = UP;
1592 dist = R->TermWin.int_bwidth - ev->xbutton.y;
1595 R->scroll_selection_dir = DN;
1596 dist = ev->xbutton.y -
1597 (R->TermWin.int_bwidth + R->TermWin.height);
1599 R->scroll_selection_lines=(Pixel2Height(dist)/
1600 SELECTION_SCROLL_LINE_SPEEDUP)+1;
1601 MIN_IT(R->scroll_selection_lines,
1602 SELECTION_SCROLL_MAX_LINES);
1605 /* we are within the text window, so we
1606 * shouldn't be scrolling
1608 R->pending_scroll_selection = 0;
1611 #ifdef MOUSE_THRESHOLD
1615 } else if (isScrollbarWindow(ev->xany.window) && scrollbar_isMotion()) {
1616 while (XCheckTypedWindowEvent(R->Xdisplay, R->scrollBar.win,
1617 MotionNotify, ev)) ;
1618 XQueryPointer(R->Xdisplay, R->scrollBar.win,
1619 &unused_root, &unused_child,
1620 &unused_root_x, &unused_root_y,
1621 &(ev->xbutton.x), &(ev->xbutton.y),
1623 rxvt_scr_move_to(aR_ scrollbar_position(ev->xbutton.y) - R->csrO,
1625 rxvt_scr_refresh(aR_ R->refresh_type);
1626 R->refresh_limit = 0;
1627 rxvt_scrollbar_show(aR_ 1);
1635 rxvt_button_press(pR_ XButtonEvent *ev)
1637 int reportmode = 0, clickintime;
1639 R->bypass_keystate = ev->state & (R->ModMetaMask | ShiftMask);
1640 if (!R->bypass_keystate)
1641 reportmode = !!(R->PrivateModes & PrivMode_mouse_report);
1643 * VT window processing of button press
1645 if (ev->window == R->TermWin.vt)
1648 if (ev->subwindow != None)
1649 rxvt_Gr_ButtonPress(ev->x, ev->y);
1653 clickintime = ev->time - R->MEvent.time < MULTICLICK_TIME;
1656 /* mouse report from vt window */
1657 /* save the xbutton state (for ButtonRelease) */
1658 R->MEvent.state = ev->state;
1659 #ifdef MOUSE_REPORT_DOUBLECLICK
1660 if (ev->button == R->MEvent.button && clickintime)
1662 /* same button, within alloted time */
1664 if (R->MEvent.clicks > 1)
1666 /* only report double clicks */
1667 R->MEvent.clicks = 2;
1668 rxvt_mouse_report(aR_ ev);
1670 /* don't report the release */
1671 R->MEvent.clicks = 0;
1672 R->MEvent.button = AnyButton;
1677 /* different button, or time expired */
1678 R->MEvent.clicks = 1;
1679 R->MEvent.button = ev->button;
1680 rxvt_mouse_report(aR_ ev);
1683 R->MEvent.button = ev->button;
1684 rxvt_mouse_report(aR_ ev);
1685 #endif /* MOUSE_REPORT_DOUBLECLICK */
1689 if (ev->button != R->MEvent.button)
1690 R->MEvent.clicks = 0;
1694 if (R->MEvent.button == Button1 && clickintime)
1697 R->MEvent.clicks = 1;
1698 rxvt_selection_click(aR_ R->MEvent.clicks, ev->x, ev->y);
1699 R->MEvent.button = Button1;
1703 if (R->MEvent.button == Button3 && clickintime)
1704 rxvt_selection_rotate(aR_ ev->x, ev->y);
1706 rxvt_selection_extend(aR_ ev->x, ev->y, 1);
1707 R->MEvent.button = Button3;
1711 R->MEvent.time = ev->time;
1717 * Scrollbar window processing of button press
1719 if (isScrollbarWindow(ev->window))
1721 scrollbar_setIdle();
1723 * Rxvt-style scrollbar:
1724 * move up if mouse is above slider
1725 * move dn if mouse is below slider
1727 * XTerm-style scrollbar:
1728 * Move display proportional to pointer location
1729 * pointer near top -> scroll one line
1730 * pointer near bot -> scroll full page
1732 #ifndef NO_SCROLLBAR_REPORT
1735 * Mouse report disabled scrollbar:
1736 * arrow buttons - send up/down
1737 * click on scrollbar - send pageup/down
1739 if ((R->scrollBar.style == R_SB_NEXT
1740 && scrollbarnext_upButton(ev->y))
1741 || (R->scrollBar.style == R_SB_RXVT
1742 && scrollbarrxvt_upButton(ev->y)))
1743 rxvt_tt_printf(aR_ "\033[A");
1744 else if ((R->scrollBar.style == R_SB_NEXT
1745 && scrollbarnext_dnButton(ev->y))
1746 || (R->scrollBar.style == R_SB_RXVT
1747 && scrollbarrxvt_dnButton(ev->y)))
1748 rxvt_tt_printf(aR_ "\033[B");
1750 switch (ev->button) {
1752 rxvt_tt_printf(aR_ "\014");
1755 rxvt_tt_printf(aR_ "\033[6~");
1758 rxvt_tt_printf(aR_ "\033[5~");
1763 #endif /* NO_SCROLLBAR_REPORT */
1767 if (R->scrollBar.style == R_SB_NEXT) {
1768 if (scrollbarnext_upButton(ev->y))
1769 upordown = -1; /* up */
1770 else if (scrollbarnext_dnButton(ev->y))
1771 upordown = 1; /* down */
1772 } else if (R->scrollBar.style == R_SB_RXVT) {
1773 if (scrollbarrxvt_upButton(ev->y))
1774 upordown = -1; /* up */
1775 else if (scrollbarrxvt_dnButton(ev->y))
1776 upordown = 1; /* down */
1779 #ifndef NO_SCROLLBAR_BUTTON_CONTINUAL_SCROLLING
1780 R->scroll_arrow_delay = SCROLLBAR_INITIAL_DELAY;
1782 if (rxvt_scr_page(aR_ upordown < 0 ? UP : DN, 1)) {
1789 switch (ev->button) {
1791 switch (R->scrollbar_align) {
1792 case R_SB_ALIGN_TOP:
1795 case R_SB_ALIGN_CENTRE:
1796 R->csrO = (R->scrollBar.bot - R->scrollBar.top) / 2;
1798 case R_SB_ALIGN_BOTTOM:
1799 R->csrO = R->scrollBar.bot - R->scrollBar.top;
1802 if (R->scrollBar.style == R_SB_XTERM
1803 || scrollbar_above_slider(ev->y)
1804 || scrollbar_below_slider(ev->y))
1805 rxvt_scr_move_to(aR_
1806 scrollbar_position(ev->y) - R->csrO,
1808 scrollbar_setMotion();
1812 if (R->scrollbar_align == R_SB_ALIGN_CENTRE)
1813 R->csrO = ev->y - R->scrollBar.top;
1817 if (R->scrollBar.style != R_SB_XTERM) {
1818 if (scrollbar_above_slider(ev->y))
1819 # ifdef RXVT_SCROLL_FULL
1820 rxvt_scr_page(aR_ UP, R->TermWin.nrow - 1);
1822 rxvt_scr_page(aR_ UP, R->TermWin.nrow / 4);
1824 else if (scrollbar_below_slider(ev->y))
1825 # ifdef RXVT_SCROLL_FULL
1826 rxvt_scr_page(aR_ DN, R->TermWin.nrow - 1);
1828 rxvt_scr_page(aR_ DN, R->TermWin.nrow / 4);
1831 scrollbar_setMotion();
1833 rxvt_scr_page(aR_ (ev->button == Button1 ? DN : UP),
1835 * scrollbar_position(ev->y)
1836 / scrollbar_size()));
1845 * Menubar window processing of button press
1847 if (isMenuBarWindow(ev->window))
1848 rxvt_menubar_control(aR_ ev);
1854 rxvt_button_release(pR_ XButtonEvent *ev)
1858 R->csrO = 0; /* reset csr Offset */
1859 if (!R->bypass_keystate)
1860 reportmode = !!(R->PrivateModes & PrivMode_mouse_report);
1862 if (scrollbar_isUpDn()) {
1863 scrollbar_setIdle();
1864 rxvt_scrollbar_show(aR_ 0);
1865 #ifndef NO_SCROLLBAR_BUTTON_CONTINUAL_SCROLLING
1866 R->refresh_type &= ~SMOOTH_REFRESH;
1869 #ifdef SELECTION_SCROLLING
1870 R->pending_scroll_selection=0;
1872 if (ev->window == R->TermWin.vt)
1874 #ifdef RXVT_GRAPHICS
1875 if (ev->subwindow != None)
1876 rxvt_Gr_ButtonRelease(ev->x, ev->y);
1882 /* mouse report from vt window */
1883 /* don't report release of wheel "buttons" */
1884 if (ev->button >= 4)
1886 #ifdef MOUSE_REPORT_DOUBLECLICK
1887 /* only report the release of 'slow' single clicks */
1888 if (R->MEvent.button != AnyButton
1889 && (ev->button != R->MEvent.button
1890 || (ev->time - R->MEvent.time
1891 > MULTICLICK_TIME / 2)))
1893 R->MEvent.clicks = 0;
1894 R->MEvent.button = AnyButton;
1895 rxvt_mouse_report(aR_ ev);
1897 #else /* MOUSE_REPORT_DOUBLECLICK */
1898 R->MEvent.button = AnyButton;
1899 rxvt_mouse_report(aR_ ev);
1900 #endif /* MOUSE_REPORT_DOUBLECLICK */
1904 * dumb hack to compensate for the failure of click-and-drag
1905 * when overriding mouse reporting
1907 if (R->PrivateModes & PrivMode_mouse_report
1908 && R->bypass_keystate
1909 && ev->button == Button1 && R->MEvent.clicks <= 1)
1910 rxvt_selection_extend(aR_ ev->x, ev->y, 0);
1912 switch (ev->button) {
1915 rxvt_selection_make(aR_ ev->time);
1918 rxvt_selection_request(aR_ ev->time, ev->x, ev->y);
1926 v = (ev->button == Button4) ? UP : DN;
1927 if (ev->state & ShiftMask)
1929 else if ((R->Options & Opt_mouseWheelScrollPage))
1930 i = R->TermWin.nrow - 1;
1933 # ifdef MOUSE_SLIP_WHEELING
1934 if (ev->state & ControlMask)
1936 R->mouse_slip_wheel_speed += (v ? -1 : 1);
1937 R->mouse_slip_wheel_delay = SCROLLBAR_CONTINUOUS_DELAY;
1940 # ifdef JUMP_MOUSE_WHEEL
1941 rxvt_scr_page(aR_ v, i);
1942 rxvt_scr_refresh(aR_ SMOOTH_REFRESH);
1943 rxvt_scrollbar_show(aR_ 1);
1947 rxvt_scr_page(aR_ v, 1);
1948 rxvt_scr_refresh(aR_ SMOOTH_REFRESH);
1949 rxvt_scrollbar_show(aR_ 1);
1959 else if (isMenuBarWindow(ev->window))
1960 rxvt_menubar_control(aR_ ev);
1967 * Check our parents are still who we think they are.
1968 * Do transparency updates if required
1972 rxvt_check_our_parents(pR)
1974 int i, pchanged, aformat, have_pixmap, rootdepth;
1975 unsigned long nitems, bytes_after;
1977 unsigned char *prop = NULL;
1978 Window root, oldp, *list;
1979 Pixmap rootpixmap = None;
1980 XWindowAttributes wattr, wrootattr;
1984 if (!(R->Options & Opt_transparent))
1985 return pchanged; /* Don't try any more */
1987 XGetWindowAttributes(R->Xdisplay, Xroot, &wrootattr);
1988 rootdepth = wrootattr.depth;
1990 XGetWindowAttributes(R->Xdisplay, R->TermWin.parent[0], &wattr);
1991 if (rootdepth != wattr.depth) {
1992 if (R->am_transparent) {
1994 XSetWindowBackground(R->Xdisplay, R->TermWin.vt,
1995 R->PixColors[Color_bg]);
1996 R->am_transparent = R->am_pixmap_trans = 0;
1998 return pchanged; /* Don't try any more */
2001 /* Get all X ops out of the queue so that our information is up-to-date. */
2002 XSync(R->Xdisplay, False);
2005 * Make the frame window set by the window manager have
2006 * the root background. Some window managers put multiple nested frame
2007 * windows for each client, so we have to take care about that.
2009 i = (R->xa[XA_XROOTPMAPID] != 0
2010 && (XGetWindowProperty(R->Xdisplay, Xroot, R->xa[XA_XROOTPMAPID],
2011 0L, 1L, False, XA_PIXMAP, &atype, &aformat,
2012 &nitems, &bytes_after, &prop) == Success));
2013 if (!i || prop == NULL)
2017 rootpixmap = *((Pixmap *)prop);
2022 * Copy Xroot pixmap transparency
2025 unsigned int nw, nh;
2031 XTranslateCoordinates(R->Xdisplay, R->TermWin.parent[0], Xroot,
2032 0, 0, &sx, &sy, &cr);
2033 nw = (unsigned int)R->szHint.width;
2034 nh = (unsigned int)R->szHint.height;
2046 MIN_IT(nw, (unsigned int)(wrootattr.width - sx));
2047 MIN_IT(nh, (unsigned int)(wrootattr.height - sy));
2048 R->allowedxerror = -1;
2049 image = XGetImage(R->Xdisplay, rootpixmap, sx, sy, nw, nh, AllPlanes,
2051 /* XXX: handle BadMatch - usually because we're outside the pixmap */
2052 /* XXX: may need a delay here? */
2053 R->allowedxerror = 0;
2054 if (image == NULL) {
2055 if (R->am_transparent && R->am_pixmap_trans) {
2057 if (R->TermWin.pixmap != None) {
2058 XFreePixmap(R->Xdisplay, R->TermWin.pixmap);
2059 R->TermWin.pixmap = None;
2062 R->am_pixmap_trans = 0;
2064 if (R->TermWin.pixmap != None)
2065 XFreePixmap(R->Xdisplay, R->TermWin.pixmap);
2066 R->TermWin.pixmap = XCreatePixmap(R->Xdisplay, R->TermWin.vt,
2067 (unsigned int)R->szHint.width,
2068 (unsigned int)R->szHint.height,
2069 (unsigned int)image->depth);
2070 gc = XCreateGC(R->Xdisplay, R->TermWin.vt, 0UL, &gcvalue);
2071 XPutImage(R->Xdisplay, R->TermWin.pixmap, gc, image, 0, 0,
2072 nx, ny, (unsigned int)image->width,
2073 (unsigned int)image->height);
2074 XFreeGC(R->Xdisplay, gc);
2075 XDestroyImage(image);
2076 XSetWindowBackgroundPixmap(R->Xdisplay, R->TermWin.vt,
2078 if (!R->am_transparent || !R->am_pixmap_trans)
2080 R->am_transparent = R->am_pixmap_trans = 1;
2083 if (!R->am_pixmap_trans) {
2086 * InheritPixmap transparency
2088 D_X((stderr, "InheritPixmap Seeking to %08lx", Xroot));
2089 for (i = 1; i < (int)(sizeof(R->TermWin.parent) / sizeof(Window));
2091 oldp = R->TermWin.parent[i];
2092 XQueryTree(R->Xdisplay, R->TermWin.parent[i - 1], &root,
2093 &R->TermWin.parent[i], &list, &n);
2095 D_X((stderr, "InheritPixmap Parent[%d] = %08lx", i, R->TermWin.parent[i]));
2096 if (R->TermWin.parent[i] == Xroot) {
2101 if (oldp != R->TermWin.parent[i])
2106 for (; n < (unsigned int)i; n++) {
2107 XGetWindowAttributes(R->Xdisplay, R->TermWin.parent[n], &wattr);
2108 D_X((stderr, "InheritPixmap Checking Parent[%d]: %s", n, (wattr.depth == rootdepth && wattr.class != InputOnly) ? "OK" : "FAIL"));
2109 if (wattr.depth != rootdepth || wattr.class == InputOnly) {
2110 n = (int)(sizeof(R->TermWin.parent) / sizeof(Window)) + 1;
2115 if (n > (int)(sizeof(R->TermWin.parent)
2116 / sizeof(R->TermWin.parent[0]))) {
2117 D_X((stderr, "InheritPixmap Turning off"));
2118 XSetWindowBackground(R->Xdisplay, R->TermWin.parent[0],
2119 R->PixColors[Color_fg]);
2120 XSetWindowBackground(R->Xdisplay, R->TermWin.vt,
2121 R->PixColors[Color_bg]);
2122 R->am_transparent = 0;
2123 /* XXX: also turn off Opt_transparent? */
2125 /* wait (an arbitrary period) for the WM to do its thing
2126 * needed for fvwm2.2.2 (and before?) */
2127 # ifdef HAVE_NANOSLEEP
2128 struct timespec rqt;
2132 nanosleep(&rqt, NULL);
2136 D_X((stderr, "InheritPixmap Turning on (%d parents)", i - 1));
2137 for (n = 0; n < (unsigned int)i; n++)
2138 XSetWindowBackgroundPixmap(R->Xdisplay, R->TermWin.parent[n],
2140 XSetWindowBackgroundPixmap(R->Xdisplay, R->TermWin.vt,
2142 R->am_transparent = 1;
2144 for (; i < (int)(sizeof(R->TermWin.parent) / sizeof(Window)); i++)
2145 R->TermWin.parent[i] = None;
2154 /*----------------------------------------------------------------------*/
2158 rxvt_popen_printer(pR)
2160 FILE *stream = popen(R->rs[Rs_print_pipe], "w");
2163 rxvt_print_error("can't open printer pipe");
2169 rxvt_pclose_printer(FILE *stream)
2172 /* pclose() reported not to work on SunOS 4.1.3 */
2173 # if defined (__sun__) /* TODO: RESOLVE THIS */
2174 /* pclose works provided SIGCHLD handler uses waitpid */
2175 return pclose(stream); /* return fclose (stream); */
2177 return pclose(stream);
2182 * simulate attached vt100 printer
2186 rxvt_process_print_pipe(pR)
2191 if ((fd = rxvt_popen_printer(aR)) == NULL)
2195 * Send all input to the printer until either ESC[4i or ESC[?4i
2198 for (done = 0; !done;) {
2199 unsigned char buf[8];
2201 unsigned int i, len;
2203 if ((ch = rxvt_cmd_getc(aR)) != C0_ESC) {
2204 if (putc(ch, fd) == EOF)
2205 break; /* done = 1 */
2210 if ((buf[len++] = rxvt_cmd_getc(aR)) == '[') {
2211 if ((ch = rxvt_cmd_getc(aR)) == '?') {
2213 ch = rxvt_cmd_getc(aR);
2215 if ((buf[len++] = ch) == '4') {
2216 if ((buf[len++] = rxvt_cmd_getc(aR)) == 'i')
2217 break; /* done = 1 */
2220 for (i = 0; i < len; i++)
2221 if (putc(buf[i], fd) == EOF) {
2227 rxvt_pclose_printer(fd);
2229 #endif /* PRINTPIPE */
2235 C1_41 , C1_BPH, C1_NBH, C1_44 , C1_NEL, C1_SSA, C1_ESA,
2236 C1_HTS, C1_HTJ, C1_VTS, C1_PLD, C1_PLU, C1_RI , C1_SS2, C1_SS3,
2237 C1_DCS, C1_PU1, C1_PU2, C1_STS, C1_CCH, C1_MW , C1_SPA, C1_EPA,
2238 C1_SOS, C1_59 , C1_SCI, C1_CSI, CS_ST , C1_OSC, C1_PM , C1_APC
2242 /*{{{ process non-printing single characters */
2245 rxvt_process_nonprinting(pR_ unsigned char ch)
2248 case C0_ENQ: /* terminal Status */
2249 if (R->rs[Rs_answerbackstring])
2251 (const unsigned char *)R->rs[Rs_answerbackstring],
2252 (unsigned int)STRLEN(R->rs[Rs_answerbackstring]));
2254 rxvt_tt_write(aR_ (unsigned char *)VT100_ANS,
2255 (unsigned int)STRLEN(VT100_ANS));
2257 case C0_BEL: /* bell */
2260 case C0_BS: /* backspace */
2261 rxvt_scr_backspace(aR);
2263 case C0_HT: /* tab */
2264 rxvt_scr_tab(aR_ 1);
2266 case C0_CR: /* carriage return */
2267 rxvt_scr_gotorc(aR_ 0, 0, R_RELATIVE);
2269 case C0_VT: /* vertical tab, form feed */
2271 case C0_LF: /* line feed */
2272 rxvt_scr_index(aR_ UP);
2274 case C0_SO: /* shift out - acs */
2275 rxvt_scr_charset_choose(aR_ 1);
2277 case C0_SI: /* shift in - acs */
2278 rxvt_scr_charset_choose(aR_ 0);
2285 /*{{{ process VT52 escape sequences */
2288 rxvt_process_escape_vt52(pR_ unsigned char ch)
2293 case 'A': /* cursor up */
2294 rxvt_scr_gotorc(aR_ -1, 0, R_RELATIVE | C_RELATIVE);
2296 case 'B': /* cursor down */
2297 rxvt_scr_gotorc(aR_ 1, 0, R_RELATIVE | C_RELATIVE);
2299 case 'C': /* cursor right */
2300 rxvt_scr_gotorc(aR_ 0, 1, R_RELATIVE | C_RELATIVE);
2302 case 'D': /* cursor left */
2303 rxvt_scr_gotorc(aR_ 0, -1, R_RELATIVE | C_RELATIVE);
2305 case 'H': /* cursor home */
2306 rxvt_scr_gotorc(aR_ 0, 0, 0);
2308 case 'I': /* cursor up and scroll down if needed */
2309 rxvt_scr_index(aR_ DN);
2311 case 'J': /* erase to end of screen */
2312 rxvt_scr_erase_screen(aR_ 0);
2314 case 'K': /* erase to end of line */
2315 rxvt_scr_erase_line(aR_ 0);
2317 case 'Y': /* move to specified row and col */
2318 /* full command is 'ESC Y row col' where row and col
2319 * are encoded by adding 32 and sending the ascii
2320 * character. eg. SPACE = 0, '+' = 13, '0' = 18,
2322 row = rxvt_cmd_getc(aR) - ' ';
2323 col = rxvt_cmd_getc(aR) - ' ';
2324 rxvt_scr_gotorc(aR_ row, col, 0);
2326 case 'Z': /* identify the terminal type */
2327 rxvt_tt_printf(aR_ "\033/Z"); /* I am a VT100 emulating a VT52 */
2329 case '<': /* turn off VT52 mode */
2330 PrivMode(0, PrivMode_vt52);
2332 case 'F': /* use special graphics character set */
2333 case 'G': /* use regular character set */
2336 case '=': /* use alternate keypad mode */
2337 case '>': /* use regular keypad mode */
2345 /*{{{ process escape sequences */
2348 rxvt_process_escape_seq(pR)
2350 unsigned char ch = rxvt_cmd_getc(aR);
2352 if (R->PrivateModes & PrivMode_vt52) {
2353 rxvt_process_escape_vt52(aR_ ch);
2358 /* case 1: do_tek_mode (); break; */
2360 if (rxvt_cmd_getc(aR) == '8')
2364 rxvt_scr_charset_set(aR_ 0, (unsigned int)rxvt_cmd_getc(aR));
2367 rxvt_scr_charset_set(aR_ 1, (unsigned int)rxvt_cmd_getc(aR));
2370 rxvt_scr_charset_set(aR_ 2, (unsigned int)rxvt_cmd_getc(aR));
2373 rxvt_scr_charset_set(aR_ 3, (unsigned int)rxvt_cmd_getc(aR));
2375 #ifdef MULTICHAR_SET
2377 rxvt_scr_charset_set(aR_ -2, (unsigned int)rxvt_cmd_getc(aR));
2382 rxvt_scr_backindex(aR);
2386 rxvt_scr_cursor(aR_ SAVE);
2389 rxvt_scr_cursor(aR_ RESTORE);
2393 rxvt_scr_forwardindex(aR);
2398 PrivMode((ch == '='), PrivMode_aplKP);
2405 rxvt_scr_index(aR_ UP);
2408 /* 8.3.87: NEXT LINE */
2409 case C1_NEL: /* ESC E */
2411 uint32_t nlcr[] = { '\n', '\r' };
2412 rxvt_scr_add_lines(aR_ nlcr, 1, 2);
2416 /* kidnapped escape sequence: Should be 8.3.48 */
2417 case C1_ESA: /* ESC G */
2418 rxvt_process_graphics(aR);
2421 /* 8.3.63: CHARACTER TABULATION SET */
2422 case C1_HTS: /* ESC H */
2423 rxvt_scr_set_tab(aR_ 1);
2426 /* 8.3.105: REVERSE LINE FEED */
2427 case C1_RI: /* ESC M */
2428 rxvt_scr_index(aR_ DN);
2431 /* 8.3.142: SINGLE-SHIFT TWO */
2432 /*case C1_SS2: scr_single_shift (2); break; */
2434 /* 8.3.143: SINGLE-SHIFT THREE */
2435 /*case C1_SS3: scr_single_shift (3); break; */
2437 /* 8.3.27: DEVICE CONTROL STRING */
2438 case C1_DCS: /* ESC P */
2439 rxvt_process_dcs_seq(aR);
2442 /* 8.3.110: SINGLE CHARACTER INTRODUCER */
2443 case C1_SCI: /* ESC Z */
2444 rxvt_tt_write(aR_ (const unsigned char *)ESCZ_ANSWER,
2445 (unsigned int)(sizeof(ESCZ_ANSWER) - 1));
2446 break; /* steal obsolete ESC [ c */
2448 /* 8.3.16: CONTROL SEQUENCE INTRODUCER */
2449 case C1_CSI: /* ESC [ */
2450 rxvt_process_csi_seq(aR);
2453 /* 8.3.90: OPERATING SYSTEM COMMAND */
2454 case C1_OSC: /* ESC ] */
2455 rxvt_process_osc_seq(aR);
2458 /* 8.3.106: RESET TO INITIAL STATE */
2460 rxvt_scr_poweron(aR);
2461 rxvt_scrollbar_show(aR_ 1);
2464 /* 8.3.79: LOCKING-SHIFT TWO (see ISO2022) */
2466 rxvt_scr_charset_choose(aR_ 2);
2469 /* 8.3.81: LOCKING-SHIFT THREE (see ISO2022) */
2471 rxvt_scr_charset_choose(aR_ 3);
2477 /*{{{ process CONTROL SEQUENCE INTRODUCER (CSI) sequences `ESC[' */
2481 CSI_CUU, CSI_CUD, CSI_CUF, CSI_CUB, CSI_CNL, CSI_CPL, CSI_CHA,
2482 CSI_CUP, CSI_CHT, CSI_ED , CSI_EL , CSI_IL , CSI_DL , CSI_EF , CSI_EA ,
2483 CSI_DCH, CSI_SEE, CSI_CPR, CSI_SU , CSI_SD , CSI_NP , CSI_PP , CSI_CTC,
2484 CSI_ECH, CSI_CVT, CSI_CBT, CSI_SRS, CSI_PTX, CSI_SDS, CSI_SIMD, CSI_5F,
2485 CSI_HPA, CSI_HPR, CSI_REP, CSI_DA , CSI_VPA, CSI_VPR, CSI_HVP, CSI_TBC,
2486 CSI_SM , CSI_MC , CSI_HPB, CSI_VPB, CSI_RM , CSI_SGR, CSI_DSR, CSI_DAQ,
2487 CSI_70 , CSI_71 , CSI_72 , CSI_73 , CSI_74 , CSI_75 , CSI_76 , CSI_77 ,
2488 CSI_78 , CSI_79 , CSI_7A , CSI_7B , CSI_7C , CSI_7D , CSI_7E , CSI_7F
2491 #define make_byte(b7,b6,b5,b4,b3,b2,b1,b0) \
2492 (((b7) << 7) | ((b6) << 6) | ((b5) << 5) | ((b4) << 4) \
2493 | ((b3) << 3) | ((b2) << 2) | ((b1) << 1) | (b0))
2494 #define get_byte_array_bit(array, bit) \
2495 (!!((array)[(bit) / 8] & (128 >> ((bit) & 7))))
2497 const unsigned char csi_defaults[] = {
2498 make_byte(1,1,1,1,1,1,1,1), /* @, A, B, C, D, E, F, G, */
2499 make_byte(1,1,0,0,1,1,0,0), /* H, I, J, K, L, M, N, O, */
2500 make_byte(1,0,1,1,1,1,1,0), /* P, Q, R, S, T, U, V, W, */
2501 make_byte(1,1,1,0,0,0,1,0), /* X, Y, Z, [, \, ], ^, _, */
2502 make_byte(1,1,1,0,1,1,1,0), /* `, a, b, c, d, e, f, g, */
2503 make_byte(0,0,1,1,0,0,0,0), /* h, i, j, k, l, m, n, o, */
2504 make_byte(0,0,0,0,0,0,0,0), /* p, q, r, s, t, u, v, w, */
2505 make_byte(0,0,0,0,0,0,0,0) /* x, y, z, {, |, }, ~, */
2511 rxvt_process_csi_seq(pR)
2513 unsigned char ch, priv, i;
2514 unsigned int nargs, p;
2518 for (nargs = ESC_ARGS; nargs > 0;)
2522 ch = rxvt_cmd_getc(aR);
2523 if (ch >= '<' && ch <= '?') { /* '<' '=' '>' '?' */
2525 ch = rxvt_cmd_getc(aR);
2527 /* read any numerical arguments */
2528 for (n = -1; ch < CSI_ICH; ) {
2533 n = n * 10 + ch - '0';
2534 } else if (ch == ';') {
2535 if (nargs < ESC_ARGS)
2538 } else if (ch == '\b') {
2539 rxvt_scr_backspace(aR);
2540 } else if (ch == C0_ESC) {
2541 rxvt_process_escape_seq(aR);
2543 } else if (ch < ' ') {
2544 rxvt_process_nonprinting(aR_ ch);
2546 ch = rxvt_cmd_getc(aR);
2552 if (nargs < ESC_ARGS)
2556 ndef = get_byte_array_bit(csi_defaults, i);
2557 for (p = 0; p < nargs; p++)
2562 fprintf(stderr, "CSI ");
2563 for (p = 0; p < nargs; p++)
2564 fprintf(stderr, "%d%s", arg[p], p < nargs - 1 ? ";" : "");
2565 fprintf(stderr, "%c\n", ch);
2569 * private mode handling
2574 if (ch == CSI_DA) /* secondary device attributes */
2575 rxvt_tt_printf(aR_ "\033[>%d;%-.8s;0c", 'R', VSTRING);
2578 if (ch == 'h' || ch == 'l' || ch == 'r' || ch == 's' || ch == 't')
2579 rxvt_process_terminal_mode(aR_ ch, priv, nargs, arg);
2587 * ISO/IEC 6429:1992(E) CSI sequences (defaults in parentheses)
2590 case CSI_MC: /* 8.3.83: (0) MEDIA COPY */
2592 case 0: /* initiate transfer to primary aux device */
2593 rxvt_scr_printscreen(aR_ 0);
2595 case 5: /* start relay to primary aux device */
2596 rxvt_process_print_pipe(aR);
2602 case CSI_CUU: /* 8.3.22: (1) CURSOR UP */
2603 case CSI_VPR: /* 8.3.161: (1) LINE POSITION FORWARD */
2606 case CSI_CUD: /* 8.3.19: (1) CURSOR DOWN */
2607 case CSI_VPB: /* 8.3.160: (1) LINE POSITION BACKWARD */
2608 rxvt_scr_gotorc(aR_ arg[0], 0, RELATIVE);
2611 case CSI_CUB: /* 8.3.18: (1) CURSOR LEFT */
2612 case CSI_HPB: /* 8.3.59: (1) CHARACTER POSITION BACKWARD */
2615 #else /* emulate common DEC VTs */
2616 arg[0] = arg[0] ? -arg[0] : -1;
2619 case CSI_CUF: /* 8.3.20: (1) CURSOR RIGHT */
2620 case CSI_HPR: /* 8.3.60: (1) CHARACTER POSITION FORWARD */
2622 rxvt_scr_gotorc(aR_ 0, arg[0], RELATIVE);
2623 #else /* emulate common DEC VTs */
2624 rxvt_scr_gotorc(aR_ 0, arg[0] ? arg[0] : 1, RELATIVE);
2628 case CSI_CPL: /* 8.3.13: (1) CURSOR PRECEDING LINE */
2631 case CSI_CNL: /* 8.3.12: (1) CURSOR NEXT LINE */
2632 rxvt_scr_gotorc(aR_ arg[0], 0, R_RELATIVE);
2635 case CSI_CHA: /* 8.3.9: (1) CURSOR CHARACTER ABSOLUTE */
2636 case CSI_HPA: /* 8.3.58: (1) CURSOR POSITION ABSOLUTE */
2637 rxvt_scr_gotorc(aR_ 0, arg[0] - 1, R_RELATIVE);
2640 case CSI_VPA: /* 8.3.159: (1) LINE POSITION ABSOLUTE */
2641 rxvt_scr_gotorc(aR_ arg[0] - 1, 0, C_RELATIVE);
2644 case CSI_CUP: /* 8.3.21: (1,1) CURSOR POSITION */
2645 case CSI_HVP: /* 8.3.64: (1,1) CHARACTER AND LINE POSITION */
2646 rxvt_scr_gotorc(aR_ arg[0] - 1, nargs < 2 ? 0 : (arg[1] - 1), 0);
2649 case CSI_CBT: /* 8.3.7: (1) CURSOR BACKWARD TABULATION */
2652 case CSI_CHT: /* 8.3.10: (1) CURSOR FORWARD TABULATION */
2653 rxvt_scr_tab(aR_ arg[0]);
2656 case CSI_ED: /* 8.3.40: (0) ERASE IN PAGE */
2657 rxvt_scr_erase_screen(aR_ arg[0]);
2660 case CSI_EL: /* 8.3.42: (0) ERASE IN LINE */
2661 rxvt_scr_erase_line(aR_ arg[0]);
2664 case CSI_ICH: /* 8.3.65: (1) INSERT CHARACTER */
2665 rxvt_scr_insdel_chars(aR_ arg[0], INSERT);
2668 case CSI_IL: /* 8.3.68: (1) INSERT LINE */
2669 rxvt_scr_insdel_lines(aR_ arg[0], INSERT);
2672 case CSI_DL: /* 8.3.33: (1) DELETE LINE */
2673 rxvt_scr_insdel_lines(aR_ arg[0], DELETE);
2676 case CSI_ECH: /* 8.3.39: (1) ERASE CHARACTER */
2677 rxvt_scr_insdel_chars(aR_ arg[0], ERASE);
2680 case CSI_DCH: /* 8.3.26: (1) DELETE CHARACTER */
2681 rxvt_scr_insdel_chars(aR_ arg[0], DELETE);
2684 case CSI_SD: /* 8.3.114: (1) SCROLL DOWN */
2687 case CSI_SU: /* 8.3.148: (1) SCROLL UP */
2688 rxvt_scroll_text(aR_ R->screen.tscroll, R->screen.bscroll, arg[0], 0);
2691 case CSI_DA: /* 8.3.24: (0) DEVICE ATTRIBUTES */
2692 rxvt_tt_write(aR_ (const unsigned char *)VT100_ANS,
2693 (unsigned int)(sizeof(VT100_ANS) - 1));
2696 case CSI_SGR: /* 8.3.118: (0) SELECT GRAPHIC RENDITION */
2697 rxvt_process_sgr_mode(aR_ nargs, arg);
2700 case CSI_DSR: /* 8.3.36: (0) DEVICE STATUS REPORT */
2702 case 5: /* DSR requested */
2703 rxvt_tt_printf(aR_ "\033[0n");
2705 case 6: /* CPR requested */
2706 rxvt_scr_report_position(aR);
2708 #if defined (ENABLE_DISPLAY_ANSWER)
2709 case 7: /* unofficial extension */
2710 rxvt_tt_printf(aR_ "%-.250s\n", R->rs[Rs_display_name]);
2713 case 8: /* unofficial extension */
2714 rxvt_xterm_seq(aR_ XTerm_title, APL_NAME "-" VERSION, CHAR_ST);
2719 case CSI_TBC: /* 8.3.155: (0) TABULATION CLEAR */
2721 case 0: /* char tab stop cleared at active position */
2722 rxvt_scr_set_tab(aR_ 0);
2724 /* case 1: */ /* line tab stop cleared in active line */
2725 /* case 2: */ /* char tab stops cleared in active line */
2726 case 3: /* all char tab stops are cleared */
2727 /* case 4: */ /* all line tab stops are cleared */
2728 case 5: /* all tab stops are cleared */
2729 rxvt_scr_set_tab(aR_ -1);
2734 case CSI_CTC: /* 8.3.17: (0) CURSOR TABULATION CONTROL */
2736 case 0: /* char tab stop set at active position */
2737 rxvt_scr_set_tab(aR_ 1);
2738 break; /* = ESC H */
2739 /* case 1: */ /* line tab stop set at active line */
2740 case 2: /* char tab stop cleared at active position */
2741 rxvt_scr_set_tab(aR_ 0);
2742 break; /* = ESC [ 0 g */
2743 /* case 3: */ /* line tab stop cleared at active line */
2744 /* case 4: */ /* char tab stops cleared at active line */
2745 case 5: /* all char tab stops are cleared */
2746 rxvt_scr_set_tab(aR_ -1);
2747 break; /* = ESC [ 3 g */
2748 /* case 6: */ /* all line tab stops are cleared */
2752 case CSI_RM: /* 8.3.107: RESET MODE */
2754 rxvt_scr_insert_mode(aR_ 0);
2757 case CSI_SM: /* 8.3.126: SET MODE */
2759 rxvt_scr_insert_mode(aR_ 1);
2763 * PRIVATE USE beyond this point. All CSI_7? sequences here
2765 case CSI_72: /* DECSTBM: set top and bottom margins */
2767 rxvt_scr_scroll_region(aR_ arg[0] - 1, MAX_ROWS - 1);
2768 else if (nargs == 0 || arg[0] >= arg[1])
2769 rxvt_scr_scroll_region(aR_ 0, MAX_ROWS - 1);
2771 rxvt_scr_scroll_region(aR_ arg[0] - 1, arg[1] - 1);
2775 rxvt_scr_cursor(aR_ SAVE);
2778 rxvt_scr_cursor(aR_ RESTORE);
2783 rxvt_process_window_ops(aR_ arg, nargs);
2787 case CSI_78: /* DECREQTPARM */
2788 if (arg[0] == 0 || arg[0] == 1)
2789 rxvt_tt_printf(aR_ "\033[%d;1;1;112;112;1;0x", arg[0] + 2);
2802 rxvt_process_window_ops(pR_ const int *args, unsigned int nargs)
2808 XWindowAttributes wattr;
2817 case 1: /* deiconify window */
2818 XMapWindow(R->Xdisplay, R->TermWin.parent[0]);
2820 case 2: /* iconify window */
2821 XIconifyWindow(R->Xdisplay, R->TermWin.parent[0],
2822 DefaultScreen(R->Xdisplay));
2824 case 3: /* set position (pixels) */
2825 XMoveWindow(R->Xdisplay, R->TermWin.parent[0], args[1], args[2]);
2827 case 4: /* set size (pixels) */
2828 rxvt_set_widthheight(aR_ (unsigned int)args[2], (unsigned int)args[1]);
2830 case 5: /* raise window */
2831 XRaiseWindow(R->Xdisplay, R->TermWin.parent[0]);
2833 case 6: /* lower window */
2834 XLowerWindow(R->Xdisplay, R->TermWin.parent[0]);
2836 case 7: /* refresh window */
2837 rxvt_scr_touch(aR_ True);
2839 case 8: /* set size (chars) */
2840 rxvt_set_widthheight(aR_ (unsigned int)(args[2] * R->TermWin.fwidth),
2841 (unsigned int)(args[1] * R->TermWin.fheight));
2844 if (args[0] >= 24) /* set height (chars) */
2845 rxvt_set_widthheight(aR_ (unsigned int)R->TermWin.width,
2846 (unsigned int)(args[1] * R->TermWin.fheight));
2849 * reports - some output format copied from XTerm
2851 case 11: /* report window state */
2852 XGetWindowAttributes(R->Xdisplay, R->TermWin.parent[0], &wattr);
2853 rxvt_tt_printf(aR_ "\033[%dt", wattr.map_state == IsViewable ? 1 : 2);
2855 case 13: /* report window position */
2856 XGetWindowAttributes(R->Xdisplay, R->TermWin.parent[0], &wattr);
2857 XTranslateCoordinates(R->Xdisplay, R->TermWin.parent[0], wattr.root,
2858 -wattr.border_width, -wattr.border_width,
2860 rxvt_tt_printf(aR_ "\033[3;%d;%dt", x, y);
2862 case 14: /* report window size (pixels) */
2863 XGetWindowAttributes(R->Xdisplay, R->TermWin.parent[0], &wattr);
2864 rxvt_tt_printf(aR_ "\033[4;%d;%dt", wattr.height, wattr.width);
2866 case 18: /* report window size (chars) */
2867 rxvt_tt_printf(aR_ "\033[8;%d;%dt", R->TermWin.nrow, R->TermWin.ncol);
2869 #if 0 /* XXX: currently disabled due to security concerns */
2870 case 20: /* report icon label */
2871 XGetIconName(R->Xdisplay, R->TermWin.parent[0], &s);
2872 rxvt_tt_printf(aR_ "\033]L%-.200s\234", s ? s : ""); /* 8bit ST */
2874 case 21: /* report window title */
2875 XFetchName(R->Xdisplay, R->TermWin.parent[0], &s);
2876 rxvt_tt_printf(aR_ "\033]l%-.200s\234", s ? s : ""); /* 8bit ST */
2883 /*----------------------------------------------------------------------*/
2885 * get input up until STRING TERMINATOR (or BEL)
2886 * ends_how is terminator used. returned input must be free()d
2890 rxvt_get_to_st(pR_ unsigned char *ends_how)
2892 int seen_esc = 0; /* seen escape? */
2895 unsigned char ch, string[STRING_MAX];
2897 for (; (ch = rxvt_cmd_getc(aR));) {
2900 || (ch == 0x5c && seen_esc)) /* 7bit ST */
2905 } else if (ch == '\t')
2906 ch = ' '; /* translate '\t' to space */
2907 else if (ch < 0x08 || (ch > 0x0d && ch < 0x20))
2908 return NULL; /* other control character - exit */
2909 if (n < sizeof(string) - 1)
2914 if ((s = (unsigned char *)rxvt_malloc(n)) == NULL)
2916 *ends_how = (ch == 0x5c ? C0_ESC : ch);
2917 STRNCPY(s, string, n);
2921 /*----------------------------------------------------------------------*/
2923 * process DEVICE CONTROL STRING `ESC P ... (ST|BEL)' or `0x90 ... (ST|BEL)'
2927 rxvt_process_dcs_seq(pR)
2929 unsigned char eh, *s;
2933 s = rxvt_get_to_st(aR_ &eh);
2939 /*----------------------------------------------------------------------*/
2941 * process OPERATING SYSTEM COMMAND sequence `ESC ] Ps ; Pt (ST|BEL)'
2945 rxvt_process_osc_seq(pR)
2947 unsigned char ch, eh, *s;
2950 ch = rxvt_cmd_getc(aR);
2951 for (arg = 0; isdigit(ch); ch = rxvt_cmd_getc(aR))
2952 arg = arg * 10 + (ch - '0');
2955 s = rxvt_get_to_st(aR_ &eh);
2958 * rxvt_menubar_dispatch() violates the constness of the string,
2961 if (arg == XTerm_Menu)
2962 #if 0 /* XXX: currently disabled due to security concerns */
2963 rxvt_menubar_dispatch(aR_ (char *)s);
2968 rxvt_xterm_seq(aR_ arg, (char *)s, eh);
2974 * XTerm escape sequences: ESC ] Ps;Pt (ST|BEL)
2975 * 0 = change iconName/title
2976 * 1 = change iconName
2979 * 12 = change text color
2980 * 13 = change mouse foreground color
2981 * 17 = change highlight character colour
2982 * 18 = change bold character color
2983 * 19 = change underlined character color
2984 * 46 = change logfile (not implemented)
2988 * 10 = menu (may change in future)
2990 * 39 = change default fg color
2991 * 49 = change default bg color
2992 * 55 = dump scrollback buffer and all of screen
2996 rxvt_xterm_seq(pR_ int op, const char *str, unsigned char resp __attribute__((unused)))
3002 assert(str != NULL);
3005 rxvt_set_title(aR_ str);
3007 case XTerm_iconName:
3008 rxvt_set_iconName(aR_ str);
3011 rxvt_set_title(aR_ str);
3014 for (buf = (char *)str; buf && *buf;) {
3015 if ((name = STRCHR(buf, ';')) == NULL)
3019 if (color < 0 || color >= TOTAL_COLORS)
3021 if ((buf = STRCHR(name, ';')) != NULL)
3023 rxvt_set_window_color(aR_ color + minCOLOR, name);
3026 #ifndef NO_CURSORCOLOR
3027 case XTerm_Color_cursor:
3028 rxvt_set_window_color(aR_ Color_cursor, str);
3031 case XTerm_Color_pointer:
3032 rxvt_set_window_color(aR_ Color_pointer, str);
3034 #ifndef NO_BOLD_UNDERLINE_REVERSE
3035 case XTerm_Color_BD:
3036 rxvt_set_window_color(aR_ Color_BD, str);
3038 case XTerm_Color_UL:
3039 rxvt_set_window_color(aR_ Color_UL, str);
3041 case XTerm_Color_RV:
3042 rxvt_set_window_color(aR_ Color_RV, str);
3048 * rxvt_menubar_dispatch() violates the constness of the string,
3049 * so DON'T do it here
3055 rxvt_scale_pixmap(aR_ ""); /* reset to default scaling */
3056 rxvt_set_bgPixmap(aR_ str); /* change pixmap */
3058 rxvt_scr_touch(aR_ True);
3060 while ((str = STRCHR(str, ';')) != NULL) {
3063 changed += rxvt_scale_pixmap(aR_ str);
3067 #ifdef XPM_BACKGROUND
3068 rxvt_resize_pixmap(aR);
3070 rxvt_scr_touch(aR_ True);
3074 case XTerm_restoreFG:
3075 rxvt_set_window_color(aR_ Color_fg, str);
3077 case XTerm_restoreBG:
3078 rxvt_set_window_color(aR_ Color_bg, str);
3083 rxvt_change_font(aR_ 0, str);
3086 case XTerm_dumpscreen: /* no error notices */
3089 if ((fd = open(str, O_RDWR | O_CREAT | O_EXCL, 0600)) >= 0) {
3090 rxvt_scr_dump(aR_ fd);
3098 /*----------------------------------------------------------------------*/
3100 /*{{{ process DEC private mode sequences `ESC [ ? Ps mode' */
3102 * mode can only have the following values:
3108 * so no need for fancy checking
3112 rxvt_privcases(pR_ int mode, unsigned long bit)
3117 R->SavedModes |= (R->PrivateModes & bit);
3121 state = (R->SavedModes & bit) ? 1 : 0; /* no overlapping */
3123 state = (mode == 't') ? !(R->PrivateModes & bit) : mode;
3124 PrivMode(state, bit);
3129 /* we're not using priv _yet_ */
3132 rxvt_process_terminal_mode(pR_ int mode, int priv __attribute__((unused)), unsigned int nargs, const int *arg)
3136 static const struct {
3138 const unsigned long bit;
3140 { 1, PrivMode_aplCUR },
3141 { 2, PrivMode_vt52 },
3142 { 3, PrivMode_132 },
3143 { 4, PrivMode_smoothScroll },
3144 { 5, PrivMode_rVideo },
3145 { 6, PrivMode_relOrigin },
3146 { 7, PrivMode_Autowrap },
3147 { 9, PrivMode_MouseX10 },
3149 { menuBar_esc, PrivMode_menuBar },
3151 #ifdef scrollBar_esc
3152 { scrollBar_esc, PrivMode_scrollBar },
3154 { 25, PrivMode_VisibleCursor },
3155 { 35, PrivMode_ShiftKeys },
3156 { 40, PrivMode_132OK },
3157 { 47, PrivMode_Screen },
3158 { 66, PrivMode_aplKP },
3159 #ifndef NO_BACKSPACE_KEY
3160 { 67, PrivMode_BackSpace },
3162 { 1000, PrivMode_MouseX11 },
3163 { 1010, PrivMode_TtyOutputInh },
3164 { 1011, PrivMode_Keypress },
3165 { 1047, PrivMode_Screen },
3171 /* make lo/hi boolean */
3173 mode = 0; /* reset */
3174 else if (mode == 'h')
3177 for (i = 0; i < nargs; i++) {
3180 /* basic handling */
3181 for (j = 0; j < (sizeof(argtopriv)/sizeof(argtopriv[0])); j++)
3182 if (argtopriv[j].argval == arg[i]) {
3183 state = rxvt_privcases(aR_ mode, argtopriv[j].bit);
3187 /* extra handling for values with state unkept */
3190 case 1048: /* alternative cursor save */
3192 rxvt_scr_cursor(aR_ RESTORE);
3194 rxvt_scr_cursor(aR_ SAVE);
3197 continue; /* for(;i;) */
3200 /* extra handling for values with valid 0 or 1 state */
3202 /* case 1: - application cursor keys */
3203 case 2: /* VT52 mode */
3204 /* oddball mode. should be set regardless of set/reset
3205 * parameter. Return from VT52 mode with an ESC < from
3208 PrivMode(1, PrivMode_vt52);
3210 case 3: /* 80/132 */
3211 if (R->PrivateModes & PrivMode_132OK)
3212 rxvt_set_widthheight(aR_
3213 (unsigned int)((state ? 132 : 80) * R->TermWin.fwidth),
3214 (unsigned int)R->TermWin.height);
3216 case 4: /* smooth scrolling */
3218 R->Options &= ~Opt_jumpScroll;
3220 R->Options |= Opt_jumpScroll;
3222 case 5: /* reverse video */
3223 rxvt_scr_rvideo_mode(aR_ state);
3225 case 6: /* relative/absolute origins */
3226 rxvt_scr_relative_origin(aR_ state);
3228 case 7: /* autowrap */
3229 rxvt_scr_autowrap(aR_ state);
3231 /* case 8: - auto repeat, can't do on a per window basis */
3232 case 9: /* X10 mouse reporting */
3233 if (state) /* orthogonal */
3234 R->PrivateModes &= ~(PrivMode_MouseX11);
3239 rxvt_map_menuBar(aR_ state);
3243 #ifdef scrollBar_esc
3245 if (rxvt_scrollbar_mapping(aR_ state)) {
3246 rxvt_resize_all_windows(aR_ 0, 0, 0);
3247 rxvt_scr_touch(aR_ True);
3251 case 25: /* visible/invisible cursor */
3252 rxvt_scr_cursor_visible(aR_ state);
3254 /* case 35: - shift keys */
3255 /* case 40: - 80 <--> 132 mode */
3256 case 47: /* secondary screen */
3257 rxvt_scr_change_screen(aR_ state);
3259 /* case 66: - application key pad */
3260 /* case 67: - backspace key */
3261 case 1000: /* X11 mouse reporting */
3262 if (state) /* orthogonal */
3263 R->PrivateModes &= ~(PrivMode_MouseX10);
3267 break; /* X11 mouse highlighting */
3269 case 1010: /* scroll to bottom on TTY output inhibit */
3271 R->Options &= ~Opt_scrollTtyOutput;
3273 R->Options |= Opt_scrollTtyOutput;
3275 case 1011: /* scroll to bottom on key press */
3277 R->Options |= Opt_scrollTtyKeypress;
3279 R->Options &= ~Opt_scrollTtyKeypress;
3281 case 1047: /* secondary screen w/ clearing */
3282 if (R->current_screen != PRIMARY)
3283 rxvt_scr_erase_screen(aR_ 2);
3284 rxvt_scr_change_screen(aR_ state);
3293 /*{{{ process sgr sequences */
3296 rxvt_process_sgr_mode(pR_ unsigned int nargs, const int *arg)
3303 rxvt_scr_rendition(aR_ 0, ~RS_None);
3306 for (i = 0; i < nargs; i++) {
3310 rendset = 0, rendstyle = ~RS_None;
3313 rendset = 1, rendstyle = RS_Bold;
3316 rendset = 1, rendstyle = RS_Uline;
3319 rendset = 1, rendstyle = RS_Blink;
3322 rendset = 1, rendstyle = RS_RVid;
3325 rendset = 0, rendstyle = RS_Bold;
3328 rendset = 0, rendstyle = RS_Uline;
3331 rendset = 0, rendstyle = RS_Blink;
3334 rendset = 0, rendstyle = RS_RVid;
3337 if (rendset != -1) {
3338 rxvt_scr_rendition(aR_ rendset, rendstyle);
3339 continue; /* for(;i;) */
3344 case 31: /* set fg color */
3351 rxvt_scr_color(aR_ (unsigned int)(minCOLOR + (arg[i] - 30)),
3356 if (nargs > i + 2 && arg[i + 1] == 5) {
3357 rxvt_scr_color(aR_ (unsigned int)(minCOLOR + arg[i + 2]),
3363 case 39: /* default fg */
3364 rxvt_scr_color(aR_ Color_fg, Color_fg);
3368 case 41: /* set bg color */
3375 rxvt_scr_color(aR_ (unsigned int)(minCOLOR + (arg[i] - 40)),
3380 if (nargs > i + 2 && arg[i + 1] == 5) {
3381 rxvt_scr_color(aR_ (unsigned int)(minCOLOR + arg[i + 2]),
3387 case 49: /* default bg */
3388 rxvt_scr_color(aR_ Color_bg, Color_bg);
3391 #ifndef NO_BRIGHTCOLOR
3393 case 91: /* set bright fg color */
3400 rxvt_scr_color(aR_ (unsigned int)(minBrightCOLOR + (arg[i] - 90)),
3404 case 101: /* set bright bg color */
3411 rxvt_scr_color(aR_ (unsigned int)(minBrightCOLOR + (arg[i] - 100)),
3420 /*{{{ process Rob Nation's own graphics mode sequences */
3423 rxvt_process_graphics(pR)
3425 unsigned char ch, cmd = rxvt_cmd_getc(aR);
3427 #ifndef RXVT_GRAPHICS
3428 if (cmd == 'Q') { /* query graphics */
3429 rxvt_tt_printf(aR_ "\033G0\n"); /* no graphics */
3432 /* swallow other graphics sequences until terminating ':' */
3434 ch = rxvt_cmd_getc(aR);
3439 unsigned char *text = NULL;
3441 if (cmd == 'Q') { /* query graphics */
3442 rxvt_tt_printf(aR_ "\033G1\n"); /* yes, graphics (color) */
3445 for (nargs = 0; nargs < (sizeof(args) / sizeof(args[0])) - 1;) {
3448 ch = rxvt_cmd_getc(aR);
3450 if (neg || ch == '+')
3451 ch = rxvt_cmd_getc(aR);
3453 for (args[nargs] = 0; isdigit(ch); ch = rxvt_cmd_getc(aR))
3454 args[nargs] = args[nargs] * 10 + (ch - '0');
3456 args[nargs] = -args[nargs];
3464 if ((cmd == 'T') && (nargs >= 5)) {
3465 int i, len = args[4];
3467 text = rxvt_malloc((len + 1) * sizeof(char));
3470 for (i = 0; i < len; i++)
3471 text[i] = rxvt_cmd_getc(aR);
3475 rxvt_Gr_do_graphics(aR_ cmd, nargs, args, text);
3480 /* ------------------------------------------------------------------------- */
3483 * Send printf() formatted output to the command.
3484 * Only use for small amounts of data.
3488 rxvt_tt_printf(pR_ const char *fmt,...)
3491 unsigned char buf[256];
3493 va_start(arg_ptr, fmt);
3494 vsprintf((char *)buf, fmt, arg_ptr);
3496 rxvt_tt_write(aR_ buf, (unsigned int)STRLEN(buf));
3499 /* ---------------------------------------------------------------------- */
3500 /* Addresses pasting large amounts of data and rxvt hang
3501 * code pinched from xterm (v_write()) and applied originally to
3503 * Write data to the pty as typed by the user, pasted with the mouse,
3504 * or generated by us in response to a query ESC sequence.
3508 rxvt_tt_write(pR_ const unsigned char *d, unsigned int len)
3510 #define MAX_PTY_WRITE 256 /* POSIX minimum MAX_INPUT */
3513 unsigned char *v_buffer, /* start of physical buffer */
3514 *v_bufstr, /* start of current buffer pending */
3515 *v_bufptr, /* end of current buffer pending */
3516 *v_bufend; /* end of physical buffer */
3518 if (R->v_bufstr == NULL && len > 0) {
3519 p = (len / MAX_PTY_WRITE + 1) * MAX_PTY_WRITE;
3520 v_buffer = v_bufstr = v_bufptr = (unsigned char *)rxvt_malloc(p);
3521 v_bufend = v_buffer + p;
3523 v_buffer = R->v_buffer;
3524 v_bufstr = R->v_bufstr;
3525 v_bufptr = R->v_bufptr;
3526 v_bufend = R->v_bufend;
3530 * Append to the block we already have. Always doing this simplifies the
3531 * code, and isn't too bad, either. If this is a short block, it isn't
3532 * too expensive, and if this is a long block, we won't be able to write
3536 if (v_bufend < v_bufptr + len) { /* run out of room */
3537 if (v_bufstr != v_buffer) {
3538 /* there is unused space, move everything down */
3539 MEMMOVE(v_buffer, v_bufstr,
3540 (unsigned int)(v_bufptr - v_bufstr));
3541 v_bufptr -= v_bufstr - v_buffer;
3542 v_bufstr = v_buffer;
3544 if (v_bufend < v_bufptr + len) {
3545 /* still won't fit: get more space */
3546 /* use most basic realloc because an error is not fatal. */
3547 unsigned int size = v_bufptr - v_buffer;
3548 unsigned int reallocto;
3550 reallocto = ((size + len) / MAX_PTY_WRITE + 1) * MAX_PTY_WRITE;
3551 v_buffer = (unsigned char *)realloc(v_buffer, reallocto);
3552 /* save across realloc */
3554 v_bufstr = v_buffer;
3555 v_bufptr = v_buffer + size;
3556 v_bufend = v_buffer + reallocto;
3557 } else { /* no memory: ignore entire write request */
3558 rxvt_print_error("data loss: cannot allocate buffer space");
3559 v_buffer = v_bufstr; /* restore clobbered pointer */
3563 if (v_bufend >= v_bufptr + len) { /* new stuff will fit */
3564 MEMCPY(v_bufptr, d, len);
3570 * Write out as much of the buffer as we can.
3571 * Be careful not to overflow the pty's input silo.
3572 * We are conservative here and only write a small amount at a time.
3574 * If we can't push all the data into the pty yet, we expect write
3575 * to return a non-negative number less than the length requested
3576 * (if some data written) or -1 and set errno to EAGAIN,
3577 * EWOULDBLOCK, or EINTR (if no data written).
3579 * (Not all systems do this, sigh, so the code is actually
3580 * a little more forgiving.)
3582 if ((p = v_bufptr - v_bufstr) > 0) {
3583 riten = write(R->cmd_fd, v_bufstr, min(p, MAX_PTY_WRITE));
3587 if (v_bufstr >= v_bufptr) /* we wrote it all */
3588 v_bufstr = v_bufptr = v_buffer;
3591 * If we have lots of unused memory allocated, return it
3593 if (v_bufend - v_bufptr > MAX_PTY_WRITE * 8) { /* arbitrary hysteresis */
3594 /* save pointers across realloc */
3595 unsigned int start = v_bufstr - v_buffer;
3596 unsigned int size = v_bufptr - v_buffer;
3597 unsigned int reallocto;
3599 reallocto = (size / MAX_PTY_WRITE + 1) * MAX_PTY_WRITE;
3600 v_buffer = (unsigned char *)realloc(v_buffer, reallocto);
3602 v_bufstr = v_buffer + start;
3603 v_bufptr = v_buffer + size;
3604 v_bufend = v_buffer + reallocto;
3606 /* should we print a warning if couldn't return memory? */
3607 v_buffer = v_bufstr - start; /* restore clobbered pointer */
3610 R->v_buffer = v_buffer;
3611 R->v_bufstr = v_bufstr;
3612 R->v_bufptr = v_bufptr;
3613 R->v_bufend = v_bufend;
3615 /*----------------------- end-of-file (C source) -----------------------*/