… | |
… | |
43 | * along with this program; if not, write to the Free Software |
43 | * along with this program; if not, write to the Free Software |
44 | * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. |
44 | * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. |
45 | *----------------------------------------------------------------------*/ |
45 | *----------------------------------------------------------------------*/ |
46 | |
46 | |
47 | /*{{{ includes: */ |
47 | /*{{{ includes: */ |
48 | #include "../config.h" /* NECESSARY */ |
48 | #include "../config.h" |
49 | #include "rxvt.h" /* NECESSARY */ |
49 | #include "rxvt.h" |
|
|
50 | #include "rxvtperl.h" |
50 | #include "version.h" |
51 | #include "version.h" |
51 | #include "command.h" |
52 | #include "command.h" |
52 | |
53 | |
53 | #if HAVE_SCHED_YIELD |
54 | #if HAVE_SCHED_YIELD |
|
|
55 | #undef HAVE_SCHED_YIELD // disabled for the time being |
54 | # include <sched.h> |
56 | //# include <sched.h> |
55 | #endif |
57 | #endif |
56 | |
58 | |
57 | #ifdef KEYSYM_RESOURCE |
59 | #ifdef KEYSYM_RESOURCE |
58 | # include "keyboard.h" |
60 | # include "keyboard.h" |
59 | #endif |
61 | #endif |
… | |
… | |
266 | mb[0] = ch[0]; |
268 | mb[0] = ch[0]; |
267 | len = 1; |
269 | len = 1; |
268 | } |
270 | } |
269 | |
271 | |
270 | if (len > 0) |
272 | if (len > 0) |
271 | tt_write ((unsigned char *)mb, len); |
273 | tt_write (mb, len); |
272 | else |
274 | else |
273 | scr_bell (); |
275 | scr_bell (); |
274 | } |
276 | } |
275 | |
277 | |
276 | iso14755buf = 0; |
278 | iso14755buf = 0; |
… | |
… | |
304 | KeySym keysym; |
306 | KeySym keysym; |
305 | #ifdef DEBUG_CMD |
307 | #ifdef DEBUG_CMD |
306 | static int debug_key = 1; /* accessible by a debugger only */ |
308 | static int debug_key = 1; /* accessible by a debugger only */ |
307 | #endif |
309 | #endif |
308 | int valid_keysym; |
310 | int valid_keysym; |
309 | unsigned char kbuf[KBUFSZ]; |
311 | char kbuf[KBUFSZ]; |
310 | |
312 | |
311 | /* |
313 | /* |
312 | * use Num_Lock to toggle Keypad on/off. If Num_Lock is off, allow an |
314 | * use Num_Lock to toggle Keypad on/off. If Num_Lock is off, allow an |
313 | * escape sequence to toggle the Keypad. |
315 | * escape sequence to toggle the Keypad. |
314 | * |
316 | * |
… | |
… | |
332 | Status status_return; |
334 | Status status_return; |
333 | |
335 | |
334 | #if 0 |
336 | #if 0 |
335 | #ifdef X_HAVE_UTF8_STRING |
337 | #ifdef X_HAVE_UTF8_STRING |
336 | if (enc_utf8 && 0) // currently disabled, doesn't seem to work, nor is useful |
338 | if (enc_utf8 && 0) // currently disabled, doesn't seem to work, nor is useful |
337 | len = Xutf8LookupString (Input_Context, &ev, (char *)kbuf, |
339 | len = Xutf8LookupString (Input_Context, &ev, kbuf, |
338 | KBUFSZ, &keysym, &status_return); |
340 | KBUFSZ, &keysym, &status_return); |
339 | else |
341 | else |
340 | #endif |
342 | #endif |
341 | #endif |
343 | #endif |
342 | { |
344 | { |
… | |
… | |
379 | || status_return == XLookupBoth; |
381 | || status_return == XLookupBoth; |
380 | } |
382 | } |
381 | else |
383 | else |
382 | #endif |
384 | #endif |
383 | { |
385 | { |
384 | len = XLookupString (&ev, (char *)kbuf, KBUFSZ, &keysym, &compose); |
386 | len = XLookupString (&ev, kbuf, KBUFSZ, &keysym, &compose); |
385 | valid_keysym = keysym != NoSymbol; |
387 | valid_keysym = keysym != NoSymbol; |
386 | } |
388 | } |
387 | |
389 | |
388 | if (valid_keysym) |
390 | if (valid_keysym) |
389 | { |
391 | { |
… | |
… | |
853 | { |
855 | { |
854 | #ifdef META8_OPTION |
856 | #ifdef META8_OPTION |
855 | /* set 8-bit on */ |
857 | /* set 8-bit on */ |
856 | if (meta && (meta_char == 0x80)) |
858 | if (meta && (meta_char == 0x80)) |
857 | { |
859 | { |
858 | unsigned char *ch; |
860 | char *ch; |
859 | |
861 | |
860 | for (ch = kbuf; ch < kbuf + len; ch++) |
862 | for (ch = kbuf; ch < kbuf + len; ch++) |
861 | *ch |= 0x80; |
863 | *ch |= 0x80; |
862 | |
864 | |
863 | meta = 0; |
865 | meta = 0; |
… | |
… | |
896 | #ifdef META8_OPTION |
898 | #ifdef META8_OPTION |
897 | && meta_char == C0_ESC |
899 | && meta_char == C0_ESC |
898 | #endif |
900 | #endif |
899 | ) |
901 | ) |
900 | { |
902 | { |
901 | const unsigned char ch = C0_ESC; |
903 | const char ch = C0_ESC; |
902 | tt_write (&ch, 1); |
904 | tt_write (&ch, 1); |
903 | } |
905 | } |
904 | |
906 | |
905 | #if defined(DEBUG_CMD) |
907 | #if defined(DEBUG_CMD) |
906 | /* Display keyboard buffer contents */ |
908 | /* Display keyboard buffer contents */ |
… | |
… | |
918 | |
920 | |
919 | #if MENUBAR_MAX || defined (KEYSYM_RESOURCE) |
921 | #if MENUBAR_MAX || defined (KEYSYM_RESOURCE) |
920 | /*{{{ rxvt_cmd_write (), rxvt_cmd_getc () */ |
922 | /*{{{ rxvt_cmd_write (), rxvt_cmd_getc () */ |
921 | /* attempt to `write' count to the input buffer */ |
923 | /* attempt to `write' count to the input buffer */ |
922 | unsigned int |
924 | unsigned int |
923 | rxvt_term::cmd_write (const unsigned char *str, unsigned int count) |
925 | rxvt_term::cmd_write (const char *str, unsigned int count) |
924 | { |
926 | { |
925 | unsigned int n, s; |
927 | unsigned int n, s; |
926 | |
928 | |
927 | n = cmdbuf_ptr - cmdbuf_base; |
929 | n = cmdbuf_ptr - cmdbuf_base; |
928 | s = cmdbuf_base + CBUFSIZ - 1 - cmdbuf_endp; |
930 | s = cmdbuf_base + CBUFSIZ - 1 - cmdbuf_endp; |
… | |
… | |
984 | SET_LOCALE (locale); |
986 | SET_LOCALE (locale); |
985 | |
987 | |
986 | display->flush (); |
988 | display->flush (); |
987 | |
989 | |
988 | if (want_refresh && !flush_ev.active) |
990 | if (want_refresh && !flush_ev.active) |
989 | flush_ev.start (NOW + 0.01); |
991 | flush_ev.start (NOW + 1. / 60.); // refresh at max. 60 hz normally |
990 | } |
992 | } |
991 | |
993 | |
992 | void |
994 | void |
993 | rxvt_term::flush_cb (time_watcher &w) |
995 | rxvt_term::flush_cb (time_watcher &w) |
994 | { |
996 | { |
… | |
… | |
1069 | w.start (w.at + SCROLLBAR_CONTINUOUS_DELAY); |
1071 | w.start (w.at + SCROLLBAR_CONTINUOUS_DELAY); |
1070 | } |
1072 | } |
1071 | } |
1073 | } |
1072 | #endif |
1074 | #endif |
1073 | |
1075 | |
|
|
1076 | #if HAVE_SCHED_YIELD |
|
|
1077 | static struct event_handler |
|
|
1078 | { |
|
|
1079 | check_watcher cw_yield; |
|
|
1080 | |
|
|
1081 | void yield (check_watcher &w) |
|
|
1082 | { |
|
|
1083 | sched_yield (); |
|
|
1084 | w.stop (); |
|
|
1085 | } |
|
|
1086 | |
|
|
1087 | event_handler () |
|
|
1088 | : cw_yield (this, &event_handler::yield) |
|
|
1089 | { |
|
|
1090 | } |
|
|
1091 | } event_handler; |
|
|
1092 | #endif |
|
|
1093 | |
1074 | bool |
1094 | bool |
1075 | rxvt_term::pty_fill () |
1095 | rxvt_term::pty_fill () |
1076 | { |
1096 | { |
1077 | ssize_t n = cmdbuf_endp - cmdbuf_ptr; |
1097 | ssize_t n = cmdbuf_endp - cmdbuf_ptr; |
1078 | |
1098 | |
1079 | if (CBUFSIZ == n) |
1099 | if (CBUFSIZ == n) |
1080 | { |
1100 | { |
1081 | rxvt_warn ("pty_fill on full buffer, draining input, continuing.\n"); |
1101 | rxvt_warn ("PLEASE REPORT: pty_fill on full buffer, draining input, continuing.\n"); |
1082 | n = 0; |
1102 | n = 0; |
1083 | } |
1103 | } |
1084 | |
1104 | |
1085 | memmove (cmdbuf_base, cmdbuf_ptr, n); |
1105 | memmove (cmdbuf_base, cmdbuf_ptr, n); |
1086 | cmdbuf_ptr = cmdbuf_base; |
1106 | cmdbuf_ptr = cmdbuf_base; |
… | |
… | |
1094 | return true; |
1114 | return true; |
1095 | } |
1115 | } |
1096 | else if (r < 0 && (errno == EAGAIN || errno == EINTR)) |
1116 | else if (r < 0 && (errno == EAGAIN || errno == EINTR)) |
1097 | { |
1117 | { |
1098 | #if HAVE_SCHED_YIELD |
1118 | #if HAVE_SCHED_YIELD |
1099 | sched_yield (); |
1119 | if (display->is_local) |
|
|
1120 | event_handler.cw_yield.start (); |
1100 | #endif |
1121 | #endif |
1101 | } |
1122 | } |
1102 | else |
1123 | else |
1103 | { |
1124 | { |
1104 | pty_ev.stop (); |
1125 | pty_ev.stop (); |
… | |
… | |
1680 | { |
1701 | { |
1681 | if (!focus) |
1702 | if (!focus) |
1682 | { |
1703 | { |
1683 | focus = 1; |
1704 | focus = 1; |
1684 | want_refresh = 1; |
1705 | want_refresh = 1; |
|
|
1706 | |
|
|
1707 | PERL_INVOKE ((this, HOOK_FOCUS_OUT, DT_END)); |
|
|
1708 | |
1685 | #if USE_XIM |
1709 | #if USE_XIM |
1686 | if (Input_Context != NULL) |
1710 | if (Input_Context != NULL) |
1687 | { |
1711 | { |
1688 | IMSetStatusPosition (); |
1712 | IMSetStatusPosition (); |
1689 | XSetICFocus (Input_Context); |
1713 | XSetICFocus (Input_Context); |
… | |
… | |
1709 | if (focus) |
1733 | if (focus) |
1710 | { |
1734 | { |
1711 | focus = 0; |
1735 | focus = 0; |
1712 | want_refresh = 1; |
1736 | want_refresh = 1; |
1713 | |
1737 | |
|
|
1738 | PERL_INVOKE ((this, HOOK_FOCUS_OUT, DT_END)); |
|
|
1739 | |
1714 | #if ENABLE_FRILLS || ISO_14755 |
1740 | #if ENABLE_FRILLS || ISO_14755 |
|
|
1741 | if (iso14755buf) |
|
|
1742 | { |
1715 | iso14755buf = 0; |
1743 | iso14755buf = 0; |
1716 | #endif |
|
|
1717 | #if ENABLE_OVERLAY |
1744 | # if ENABLE_OVERLAY |
1718 | scr_overlay_off (); |
1745 | scr_overlay_off (); |
|
|
1746 | # endif |
|
|
1747 | } |
1719 | #endif |
1748 | #endif |
1720 | #if USE_XIM |
1749 | #if USE_XIM |
1721 | if (Input_Context != NULL) |
1750 | if (Input_Context != NULL) |
1722 | XUnsetICFocus (Input_Context); |
1751 | XUnsetICFocus (Input_Context); |
1723 | #endif |
1752 | #endif |
… | |
… | |
1767 | rxvt_term::button_press (XButtonEvent &ev) |
1796 | rxvt_term::button_press (XButtonEvent &ev) |
1768 | { |
1797 | { |
1769 | int reportmode = 0, clickintime; |
1798 | int reportmode = 0, clickintime; |
1770 | |
1799 | |
1771 | bypass_keystate = ev.state & (ModMetaMask | ShiftMask); |
1800 | bypass_keystate = ev.state & (ModMetaMask | ShiftMask); |
|
|
1801 | |
1772 | if (!bypass_keystate) |
1802 | if (!bypass_keystate) |
1773 | reportmode = !! (priv_modes & PrivMode_mouse_report); |
1803 | reportmode = !! (priv_modes & PrivMode_mouse_report); |
1774 | |
1804 | |
1775 | /* |
1805 | /* |
1776 | * VT window processing of button press |
1806 | * VT window processing of button press |
… | |
… | |
1825 | else |
1855 | else |
1826 | { |
1856 | { |
1827 | if (ev.button != MEvent.button) |
1857 | if (ev.button != MEvent.button) |
1828 | MEvent.clicks = 0; |
1858 | MEvent.clicks = 0; |
1829 | |
1859 | |
|
|
1860 | if (!PERL_INVOKE ((this, HOOK_MOUSE_CLICK, DT_XEVENT, &ev, DT_END))) |
1830 | switch (ev.button) |
1861 | switch (ev.button) |
1831 | { |
1862 | { |
1832 | case Button1: |
1863 | case Button1: |
1833 | /* allow meta + click to select rectangular areas */ |
1864 | /* allow meta + click to select rectangular areas */ |
1834 | /* should be done in screen.C */ |
1865 | /* should be done in screen.C */ |
1835 | #if ENABLE_FRILLS |
1866 | #if ENABLE_FRILLS |
1836 | selection.rect = !!(ev.state & ModMetaMask); |
1867 | selection.rect = !!(ev.state & ModMetaMask); |
1837 | #else |
1868 | #else |
1838 | selection.rect = false; |
1869 | selection.rect = false; |
1839 | #endif |
1870 | #endif |
1840 | |
1871 | |
1841 | /* allow shift+left click to extend selection */ |
1872 | /* allow shift+left click to extend selection */ |
1842 | if (ev.state & ShiftMask && ! (priv_modes & PrivMode_mouse_report)) |
1873 | if (ev.state & ShiftMask && ! (priv_modes & PrivMode_mouse_report)) |
1843 | { |
1874 | { |
1844 | if (MEvent.button == Button1 && clickintime) |
1875 | if (MEvent.button == Button1 && clickintime) |
1845 | selection_rotate (ev.x, ev.y); |
1876 | selection_rotate (ev.x, ev.y); |
1846 | else |
1877 | else |
1847 | selection_extend (ev.x, ev.y, 1); |
1878 | selection_extend (ev.x, ev.y, 1); |
1848 | } |
1879 | } |
1849 | else |
1880 | else |
1850 | { |
1881 | { |
1851 | if (MEvent.button == Button1 && clickintime) |
1882 | if (MEvent.button == Button1 && clickintime) |
1852 | MEvent.clicks++; |
1883 | MEvent.clicks++; |
1853 | else |
1884 | else |
1854 | MEvent.clicks = 1; |
1885 | MEvent.clicks = 1; |
1855 | |
1886 | |
1856 | selection_click (MEvent.clicks, ev.x, ev.y); |
1887 | selection_click (MEvent.clicks, ev.x, ev.y); |
1857 | } |
1888 | } |
1858 | |
1889 | |
1859 | MEvent.button = Button1; |
1890 | MEvent.button = Button1; |
1860 | break; |
1891 | break; |
1861 | |
1892 | |
1862 | case Button3: |
1893 | case Button3: |
1863 | if (MEvent.button == Button3 && clickintime) |
1894 | if (MEvent.button == Button3 && clickintime) |
1864 | selection_rotate (ev.x, ev.y); |
1895 | selection_rotate (ev.x, ev.y); |
1865 | else |
1896 | else |
1866 | selection_extend (ev.x, ev.y, 1); |
1897 | selection_extend (ev.x, ev.y, 1); |
1867 | |
1898 | |
1868 | MEvent.button = Button3; |
1899 | MEvent.button = Button3; |
1869 | break; |
1900 | break; |
1870 | } |
1901 | } |
1871 | } |
1902 | } |
1872 | |
1903 | |
1873 | MEvent.time = ev.time; |
1904 | MEvent.time = ev.time; |
1874 | return; |
1905 | return; |
1875 | } |
1906 | } |
1876 | |
1907 | |
… | |
… | |
2640 | bool |
2671 | bool |
2641 | rxvt_term::cmd_parse () |
2672 | rxvt_term::cmd_parse () |
2642 | { |
2673 | { |
2643 | bool flag = false; |
2674 | bool flag = false; |
2644 | unicode_t ch = NOCHAR; |
2675 | unicode_t ch = NOCHAR; |
2645 | unsigned char *seq_begin; // remember start of esc-sequence here |
2676 | char *seq_begin; // remember start of esc-sequence here |
2646 | |
2677 | |
2647 | for (;;) |
2678 | for (;;) |
2648 | { |
2679 | { |
2649 | if (ch == NOCHAR) |
2680 | if (ch == NOCHAR) |
2650 | { |
2681 | { |
… | |
… | |
2694 | |
2725 | |
2695 | if (!OPTION (Opt_jumpScroll) |
2726 | if (!OPTION (Opt_jumpScroll) |
2696 | || (refresh_count >= refresh_limit * (nrow - 1))) |
2727 | || (refresh_count >= refresh_limit * (nrow - 1))) |
2697 | { |
2728 | { |
2698 | refreshnow = true; |
2729 | refreshnow = true; |
|
|
2730 | refresh_count = 0; |
2699 | ch = NOCHAR; |
2731 | ch = NOCHAR; |
2700 | break; |
2732 | break; |
2701 | } |
2733 | } |
2702 | |
2734 | |
2703 | // scr_add_lines only works for nlines <= nrow - 1. |
2735 | // scr_add_lines only works for nlines <= nrow - 1. |
2704 | if (nlines >= nrow - 1) |
2736 | if (nlines >= nrow - 1) |
2705 | { |
2737 | { |
|
|
2738 | if (!PERL_INVOKE ((this, HOOK_ADD_LINES, DT_USTRING_LEN, buf, str - buf, DT_END))) |
2706 | scr_add_lines (buf, nlines, str - buf); |
2739 | scr_add_lines (buf, nlines, str - buf); |
|
|
2740 | |
2707 | nlines = 0; |
2741 | nlines = 0; |
2708 | str = buf; |
2742 | str = buf; |
2709 | eol = str + min (ncol, UBUFSIZ); |
2743 | eol = str + min (ncol, UBUFSIZ); |
2710 | } |
2744 | } |
2711 | |
2745 | |
… | |
… | |
2724 | |
2758 | |
2725 | seq_begin = cmdbuf_ptr; |
2759 | seq_begin = cmdbuf_ptr; |
2726 | ch = next_char (); |
2760 | ch = next_char (); |
2727 | } |
2761 | } |
2728 | |
2762 | |
|
|
2763 | if (!PERL_INVOKE ((this, HOOK_ADD_LINES, DT_USTRING_LEN, buf, str - buf, DT_END))) |
2729 | scr_add_lines (buf, nlines, str - buf); |
2764 | scr_add_lines (buf, nlines, str - buf); |
2730 | |
2765 | |
2731 | /* |
2766 | /* |
2732 | * If there have been a lot of new lines, then update the screen |
2767 | * If there have been a lot of new lines, then update the screen |
2733 | * What the heck I'll cheat and only refresh less than every page-full. |
2768 | * What the heck I'll cheat and only refresh less than every page-full. |
2734 | * the number of pages between refreshes is refresh_limit, which |
2769 | * the number of pages between refreshes is refresh_limit, which |
… | |
… | |
2740 | refresh_limit++; |
2775 | refresh_limit++; |
2741 | else |
2776 | else |
2742 | { |
2777 | { |
2743 | flag = true; |
2778 | flag = true; |
2744 | scr_refresh (refresh_type); |
2779 | scr_refresh (refresh_type); |
|
|
2780 | flush_ev.stop (); |
2745 | } |
2781 | } |
2746 | } |
2782 | } |
2747 | |
2783 | |
2748 | } |
2784 | } |
2749 | else |
2785 | else |
… | |
… | |
2780 | rxvt_term::next_char () |
2816 | rxvt_term::next_char () |
2781 | { |
2817 | { |
2782 | while (cmdbuf_ptr < cmdbuf_endp) |
2818 | while (cmdbuf_ptr < cmdbuf_endp) |
2783 | { |
2819 | { |
2784 | // assume 7-bit to be ascii ALWAYS |
2820 | // assume 7-bit to be ascii ALWAYS |
2785 | if (*cmdbuf_ptr <= 0x7f && *cmdbuf_ptr != 0x1b) |
2821 | if ((unsigned char)*cmdbuf_ptr <= 0x7f && *cmdbuf_ptr != 0x1b) |
2786 | return *cmdbuf_ptr++; |
2822 | return *cmdbuf_ptr++; |
2787 | |
2823 | |
2788 | wchar_t wc; |
2824 | wchar_t wc; |
2789 | size_t len = mbrtowc (&wc, (char *)cmdbuf_ptr, cmdbuf_endp - cmdbuf_ptr, mbstate); |
2825 | size_t len = mbrtowc (&wc, cmdbuf_ptr, cmdbuf_endp - cmdbuf_ptr, mbstate); |
2790 | |
2826 | |
2791 | if (len == (size_t)-2) |
2827 | if (len == (size_t)-2) |
2792 | { |
2828 | { |
2793 | // the mbstate stores incomplete sequences. didn't know this :/ |
2829 | // the mbstate stores incomplete sequences. didn't know this :/ |
2794 | cmdbuf_ptr = cmdbuf_endp; |
2830 | cmdbuf_ptr = cmdbuf_endp; |
… | |
… | |
2933 | case C0_ESC: |
2969 | case C0_ESC: |
2934 | process_escape_seq (); |
2970 | process_escape_seq (); |
2935 | break; |
2971 | break; |
2936 | case C0_ENQ: /* terminal Status */ |
2972 | case C0_ENQ: /* terminal Status */ |
2937 | if (rs[Rs_answerbackstring]) |
2973 | if (rs[Rs_answerbackstring]) |
2938 | tt_write ((const unsigned char *)rs[Rs_answerbackstring], |
2974 | tt_write (rs [Rs_answerbackstring], strlen (rs [Rs_answerbackstring])); |
2939 | (unsigned int)strlen (rs[Rs_answerbackstring])); |
|
|
2940 | else |
2975 | else |
2941 | tt_write ((unsigned char *)VT100_ANS, |
2976 | tt_write (VT100_ANS, strlen (VT100_ANS)); |
2942 | (unsigned int)strlen (VT100_ANS)); |
|
|
2943 | break; |
2977 | break; |
2944 | case C0_BEL: /* bell */ |
2978 | case C0_BEL: /* bell */ |
2945 | scr_bell (); |
2979 | scr_bell (); |
2946 | break; |
2980 | break; |
2947 | case C0_BS: /* backspace */ |
2981 | case C0_BS: /* backspace */ |
… | |
… | |
3135 | process_dcs_seq (); |
3169 | process_dcs_seq (); |
3136 | break; |
3170 | break; |
3137 | |
3171 | |
3138 | /* 8.3.110: SINGLE CHARACTER INTRODUCER */ |
3172 | /* 8.3.110: SINGLE CHARACTER INTRODUCER */ |
3139 | case C1_SCI: /* ESC Z */ |
3173 | case C1_SCI: /* ESC Z */ |
3140 | tt_write ((const unsigned char *)ESCZ_ANSWER, |
3174 | tt_write (ESCZ_ANSWER, sizeof (ESCZ_ANSWER) - 1); |
3141 | (unsigned int) (sizeof (ESCZ_ANSWER) - 1)); |
|
|
3142 | break; /* steal obsolete ESC [ c */ |
3175 | break; /* steal obsolete ESC [ c */ |
3143 | |
3176 | |
3144 | /* 8.3.16: CONTROL SEQUENCE INTRODUCER */ |
3177 | /* 8.3.16: CONTROL SEQUENCE INTRODUCER */ |
3145 | case C1_CSI: /* ESC [ */ |
3178 | case C1_CSI: /* ESC [ */ |
3146 | process_csi_seq (); |
3179 | process_csi_seq (); |
… | |
… | |
3390 | case CSI_SU: /* 8.3.148: (1) SCROLL UP */ |
3423 | case CSI_SU: /* 8.3.148: (1) SCROLL UP */ |
3391 | scr_scroll_text (screen.tscroll, screen.bscroll, arg[0]); |
3424 | scr_scroll_text (screen.tscroll, screen.bscroll, arg[0]); |
3392 | break; |
3425 | break; |
3393 | |
3426 | |
3394 | case CSI_DA: /* 8.3.24: (0) DEVICE ATTRIBUTES */ |
3427 | case CSI_DA: /* 8.3.24: (0) DEVICE ATTRIBUTES */ |
3395 | tt_write ((const unsigned char *)VT100_ANS, |
3428 | tt_write (VT100_ANS, sizeof (VT100_ANS) - 1); |
3396 | (unsigned int) (sizeof (VT100_ANS) - 1)); |
|
|
3397 | break; |
3429 | break; |
3398 | |
3430 | |
3399 | case CSI_SGR: /* 8.3.118: (0) SELECT GRAPHIC RENDITION */ |
3431 | case CSI_SGR: /* 8.3.118: (0) SELECT GRAPHIC RENDITION */ |
3400 | process_sgr_mode (nargs, arg); |
3432 | process_sgr_mode (nargs, arg); |
3401 | break; |
3433 | break; |
… | |
… | |
3603 | /*----------------------------------------------------------------------*/ |
3635 | /*----------------------------------------------------------------------*/ |
3604 | /* |
3636 | /* |
3605 | * get input up until STRING TERMINATOR (or BEL) |
3637 | * get input up until STRING TERMINATOR (or BEL) |
3606 | * ends_how is terminator used. returned input must be free()'d |
3638 | * ends_how is terminator used. returned input must be free()'d |
3607 | */ |
3639 | */ |
3608 | unsigned char * |
3640 | char * |
3609 | rxvt_term::get_to_st (unicode_t &ends_how) |
3641 | rxvt_term::get_to_st (unicode_t &ends_how) |
3610 | { |
3642 | { |
3611 | unicode_t ch; |
3643 | unicode_t ch; |
3612 | bool seen_esc = false; |
3644 | bool seen_esc = false; |
3613 | unsigned int n = 0; |
3645 | unsigned int n = 0; |
… | |
… | |
3646 | |
3678 | |
3647 | string[n++] = '\0'; |
3679 | string[n++] = '\0'; |
3648 | |
3680 | |
3649 | ends_how = (ch == 0x5c ? C0_ESC : ch); |
3681 | ends_how = (ch == 0x5c ? C0_ESC : ch); |
3650 | |
3682 | |
3651 | return (unsigned char *)rxvt_wcstombs (string); |
3683 | return rxvt_wcstombs (string); |
3652 | } |
3684 | } |
3653 | |
3685 | |
3654 | /*----------------------------------------------------------------------*/ |
3686 | /*----------------------------------------------------------------------*/ |
3655 | /* |
3687 | /* |
3656 | * process DEVICE CONTROL STRING `ESC P ... (ST|BEL)' or `0x90 ... (ST|BEL)' |
3688 | * process DEVICE CONTROL STRING `ESC P ... (ST|BEL)' or `0x90 ... (ST|BEL)' |
3657 | */ |
3689 | */ |
3658 | void |
3690 | void |
3659 | rxvt_term::process_dcs_seq () |
3691 | rxvt_term::process_dcs_seq () |
3660 | { |
3692 | { |
3661 | unsigned char *s; |
3693 | char *s; |
3662 | unicode_t eh; |
3694 | unicode_t eh; |
3663 | |
3695 | |
3664 | /* |
3696 | /* |
3665 | * Not handled yet |
3697 | * Not handled yet |
3666 | */ |
3698 | */ |
… | |
… | |
3685 | for (arg = 0; isdigit (ch); ch = cmd_getc ()) |
3717 | for (arg = 0; isdigit (ch); ch = cmd_getc ()) |
3686 | arg = arg * 10 + (ch - '0'); |
3718 | arg = arg * 10 + (ch - '0'); |
3687 | |
3719 | |
3688 | if (ch == ';') |
3720 | if (ch == ';') |
3689 | { |
3721 | { |
3690 | unsigned char *s = get_to_st (eh); |
3722 | char *s = get_to_st (eh); |
3691 | |
3723 | |
3692 | if (s) |
3724 | if (s) |
3693 | { |
3725 | { |
3694 | process_xterm_seq (arg, (char *)s, eh); |
3726 | process_xterm_seq (arg, s, eh); |
3695 | free (s); |
3727 | free (s); |
3696 | } |
3728 | } |
3697 | } |
3729 | } |
3698 | } |
3730 | } |
3699 | |
3731 | |
3700 | void |
3732 | void |
3701 | rxvt_term::process_color_seq (int report, int color, const char *str, unsigned char resp) |
3733 | rxvt_term::process_color_seq (int report, int color, const char *str, char resp) |
3702 | { |
3734 | { |
3703 | if (str[0] == '?' && !str[1]) |
3735 | if (str[0] == '?' && !str[1]) |
3704 | { |
3736 | { |
3705 | unsigned short r, g, b; |
3737 | unsigned short r, g, b; |
3706 | pix_colors_focused[color].get (display, r, g, b); |
3738 | pix_colors_focused[color].get (display, r, g, b); |
… | |
… | |
3712 | |
3744 | |
3713 | /* |
3745 | /* |
3714 | * XTerm escape sequences: ESC ] Ps;Pt (ST|BEL) |
3746 | * XTerm escape sequences: ESC ] Ps;Pt (ST|BEL) |
3715 | */ |
3747 | */ |
3716 | void |
3748 | void |
3717 | rxvt_term::process_xterm_seq (int op, const char *str, unsigned char resp) |
3749 | rxvt_term::process_xterm_seq (int op, const char *str, char resp) |
3718 | { |
3750 | { |
3719 | int changed = 0; |
3751 | int changed = 0; |
3720 | int color; |
3752 | int color; |
3721 | char *buf, *name; |
3753 | char *buf, *name; |
3722 | bool query = str[0] == '?' && !str[1]; |
3754 | bool query = str[0] == '?' && !str[1]; |
… | |
… | |
3929 | } |
3961 | } |
3930 | break; |
3962 | break; |
3931 | |
3963 | |
3932 | case URxvt_view_up: |
3964 | case URxvt_view_up: |
3933 | case URxvt_view_down: |
3965 | case URxvt_view_down: |
|
|
3966 | { |
3934 | int lines = atoi (str); |
3967 | int lines = atoi (str); |
3935 | |
3968 | |
3936 | if (lines) |
3969 | if (lines) |
3937 | scr_page (op == URxvt_view_up ? UP : DN, lines); |
3970 | scr_page (op == URxvt_view_up ? UP : DN, lines); |
3938 | else |
3971 | else |
3939 | { |
|
|
3940 | scr_erase_savelines (); |
3972 | scr_erase_savelines (); |
3941 | } |
3973 | } |
3942 | |
3974 | |
|
|
3975 | break; |
|
|
3976 | #endif |
|
|
3977 | |
|
|
3978 | #if ENABLE_PERL |
|
|
3979 | case URxvt_perl: |
|
|
3980 | if (PERL_INVOKE ((this, HOOK_OSC_SEQ, DT_STRING, str, DT_END))) |
|
|
3981 | ; // no responses yet |
3943 | break; |
3982 | break; |
3944 | #endif |
3983 | #endif |
3945 | } |
3984 | } |
3946 | } |
3985 | } |
3947 | /*----------------------------------------------------------------------*/ |
3986 | /*----------------------------------------------------------------------*/ |
… | |
… | |
4304 | scr_color (Color_bg, Color_bg); |
4343 | scr_color (Color_bg, Color_bg); |
4305 | break; |
4344 | break; |
4306 | |
4345 | |
4307 | //case 50: // not variable spacing |
4346 | //case 50: // not variable spacing |
4308 | |
4347 | |
4309 | #ifndef NO_BRIGHTCOLOR |
4348 | #if ENABLE_FRILLS |
4310 | case 90: |
4349 | case 90: |
4311 | case 91: /* set bright fg color */ |
4350 | case 91: /* set bright fg color */ |
4312 | case 92: |
4351 | case 92: |
4313 | case 93: |
4352 | case 93: |
4314 | case 94: |
4353 | case 94: |
… | |
… | |
4359 | */ |
4398 | */ |
4360 | void |
4399 | void |
4361 | rxvt_term::tt_printf (const char *fmt,...) |
4400 | rxvt_term::tt_printf (const char *fmt,...) |
4362 | { |
4401 | { |
4363 | va_list arg_ptr; |
4402 | va_list arg_ptr; |
4364 | unsigned char buf[256]; |
4403 | char buf[256]; |
4365 | |
4404 | |
4366 | va_start (arg_ptr, fmt); |
4405 | va_start (arg_ptr, fmt); |
4367 | vsnprintf ((char *)buf, 256, fmt, arg_ptr); |
4406 | vsnprintf ((char *)buf, 256, fmt, arg_ptr); |
4368 | va_end (arg_ptr); |
4407 | va_end (arg_ptr); |
4369 | tt_write (buf, strlen (buf)); |
4408 | tt_write (buf, strlen (buf)); |
… | |
… | |
4374 | * or generated by us in response to a query ESC sequence. |
4413 | * or generated by us in response to a query ESC sequence. |
4375 | */ |
4414 | */ |
4376 | const unsigned int MAX_PTY_WRITE = 255; // minimum MAX_INPUT |
4415 | const unsigned int MAX_PTY_WRITE = 255; // minimum MAX_INPUT |
4377 | |
4416 | |
4378 | void |
4417 | void |
4379 | rxvt_term::tt_write (const unsigned char *data, unsigned int len) |
4418 | rxvt_term::tt_write (const char *data, unsigned int len) |
4380 | { |
4419 | { |
4381 | if (v_buflen == 0) |
4420 | if (v_buflen == 0) |
4382 | { |
4421 | { |
4383 | ssize_t written = write (pty.pty, data, min (len, MAX_PTY_WRITE)); |
4422 | ssize_t written = write (pty.pty, data, min (len, MAX_PTY_WRITE)); |
4384 | |
4423 | |
… | |
… | |
4387 | |
4426 | |
4388 | data += written; |
4427 | data += written; |
4389 | len -= written; |
4428 | len -= written; |
4390 | } |
4429 | } |
4391 | |
4430 | |
4392 | v_buffer = (unsigned char *)realloc (v_buffer, v_buflen + len); |
4431 | v_buffer = (char *)realloc (v_buffer, v_buflen + len); |
4393 | |
4432 | |
4394 | memcpy (v_buffer + v_buflen, data, len); |
4433 | memcpy (v_buffer + v_buflen, data, len); |
4395 | v_buflen += len; |
4434 | v_buflen += len; |
4396 | |
4435 | |
4397 | pty_ev.set (EVENT_READ | EVENT_WRITE); |
4436 | pty_ev.set (EVENT_READ | EVENT_WRITE); |