… | |
… | |
867 | #endif |
867 | #endif |
868 | /* nil */ ; |
868 | /* nil */ ; |
869 | } |
869 | } |
870 | } |
870 | } |
871 | |
871 | |
872 | if (HOOK_INVOKE ((this, HOOK_KEY_PRESS, DT_XEVENT, &ev, DT_STRING_LEN, kbuf, len, DT_END))) |
872 | if (HOOK_INVOKE ((this, HOOK_KEY_PRESS, DT_XEVENT, &ev, DT_STR_LEN, kbuf, len, DT_END))) |
873 | return; |
873 | return; |
874 | |
874 | |
875 | if (len <= 0) |
875 | if (len <= 0) |
876 | return; /* not mapped */ |
876 | return; /* not mapped */ |
877 | |
877 | |
… | |
… | |
2724 | |
2724 | |
2725 | bool |
2725 | bool |
2726 | rxvt_term::cmd_parse () |
2726 | rxvt_term::cmd_parse () |
2727 | { |
2727 | { |
2728 | bool flag = false; |
2728 | bool flag = false; |
2729 | unicode_t ch = NOCHAR; |
2729 | wchar_t ch = NOCHAR; |
2730 | char *seq_begin; // remember start of esc-sequence here |
2730 | char *seq_begin; // remember start of esc-sequence here |
2731 | |
2731 | |
2732 | for (;;) |
2732 | for (;;) |
2733 | { |
2733 | { |
2734 | if (ch == NOCHAR) |
2734 | if (ch == NOCHAR) |
… | |
… | |
2755 | if (seen_resize && cmd_pid) |
2755 | if (seen_resize && cmd_pid) |
2756 | kill (-cmd_pid, SIGWINCH); |
2756 | kill (-cmd_pid, SIGWINCH); |
2757 | } |
2757 | } |
2758 | |
2758 | |
2759 | /* Read a text string from the input buffer */ |
2759 | /* Read a text string from the input buffer */ |
2760 | unicode_t buf[UBUFSIZ]; |
2760 | wchar_t buf[UBUFSIZ]; |
2761 | bool refreshnow = false; |
2761 | bool refreshnow = false; |
2762 | int nlines = 0; |
2762 | int nlines = 0; |
2763 | unicode_t *str = buf; |
2763 | wchar_t *str = buf; |
2764 | unicode_t *eol = str + min (ncol, UBUFSIZ); |
2764 | wchar_t *eol = str + min (ncol, UBUFSIZ); |
2765 | |
2765 | |
2766 | for (;;) |
2766 | for (;;) |
2767 | { |
2767 | { |
2768 | if (ch == NOCHAR || (IS_CONTROL (ch) && ch != C0_LF && ch != C0_CR && ch != C0_HT)) |
2768 | if (ch == NOCHAR || (IS_CONTROL (ch) && ch != C0_LF && ch != C0_CR && ch != C0_HT)) |
2769 | break; |
2769 | break; |
… | |
… | |
2787 | } |
2787 | } |
2788 | |
2788 | |
2789 | // scr_add_lines only works for nlines <= nrow - 1. |
2789 | // scr_add_lines only works for nlines <= nrow - 1. |
2790 | if (nlines >= nrow - 1) |
2790 | if (nlines >= nrow - 1) |
2791 | { |
2791 | { |
2792 | if (!HOOK_INVOKE ((this, HOOK_ADD_LINES, DT_USTRING_LEN, buf, str - buf, DT_END))) |
2792 | if (!HOOK_INVOKE ((this, HOOK_ADD_LINES, DT_WCS_LEN, buf, str - buf, DT_END))) |
2793 | scr_add_lines (buf, nlines, str - buf); |
2793 | scr_add_lines (buf, str - buf, nlines); |
2794 | |
2794 | |
2795 | nlines = 0; |
2795 | nlines = 0; |
2796 | str = buf; |
2796 | str = buf; |
2797 | eol = str + min (ncol, UBUFSIZ); |
2797 | eol = str + min (ncol, UBUFSIZ); |
2798 | } |
2798 | } |
… | |
… | |
2812 | |
2812 | |
2813 | seq_begin = cmdbuf_ptr; |
2813 | seq_begin = cmdbuf_ptr; |
2814 | ch = next_char (); |
2814 | ch = next_char (); |
2815 | } |
2815 | } |
2816 | |
2816 | |
2817 | if (!HOOK_INVOKE ((this, HOOK_ADD_LINES, DT_USTRING_LEN, buf, str - buf, DT_END))) |
2817 | if (!HOOK_INVOKE ((this, HOOK_ADD_LINES, DT_WCS_LEN, buf, str - buf, DT_END))) |
2818 | scr_add_lines (buf, nlines, str - buf); |
2818 | scr_add_lines (buf, str - buf, nlines); |
2819 | |
2819 | |
2820 | /* |
2820 | /* |
2821 | * If there have been a lot of new lines, then update the screen |
2821 | * If there have been a lot of new lines, then update the screen |
2822 | * What the heck I'll cheat and only refresh less than every page-full. |
2822 | * What the heck I'll cheat and only refresh less than every page-full. |
2823 | * the number of pages between refreshes is refresh_limit, which |
2823 | * the number of pages between refreshes is refresh_limit, which |
… | |
… | |
2854 | } |
2854 | } |
2855 | |
2855 | |
2856 | return flag; |
2856 | return flag; |
2857 | } |
2857 | } |
2858 | |
2858 | |
|
|
2859 | // read the next character |
|
|
2860 | wchar_t |
|
|
2861 | rxvt_term::next_char () |
|
|
2862 | { |
|
|
2863 | while (cmdbuf_ptr < cmdbuf_endp) |
|
|
2864 | { |
|
|
2865 | // assume 7-bit to be ascii ALWAYS |
|
|
2866 | if ((unsigned char)*cmdbuf_ptr <= 0x7f && *cmdbuf_ptr != 0x1b) |
|
|
2867 | return *cmdbuf_ptr++; |
|
|
2868 | |
|
|
2869 | wchar_t wc; |
|
|
2870 | size_t len = mbrtowc (&wc, cmdbuf_ptr, cmdbuf_endp - cmdbuf_ptr, mbstate); |
|
|
2871 | |
|
|
2872 | if (len == (size_t)-2) |
|
|
2873 | { |
|
|
2874 | // the mbstate stores incomplete sequences. didn't know this :/ |
|
|
2875 | cmdbuf_ptr = cmdbuf_endp; |
|
|
2876 | break; |
|
|
2877 | } |
|
|
2878 | |
|
|
2879 | if (len == (size_t)-1) |
|
|
2880 | return (unsigned char)*cmdbuf_ptr++; // the _occasional_ latin1 character is allowed to slip through |
|
|
2881 | |
|
|
2882 | // assume wchar == unicode |
|
|
2883 | cmdbuf_ptr += len; |
|
|
2884 | return wc & UNICODE_MASK; |
|
|
2885 | } |
|
|
2886 | |
|
|
2887 | return NOCHAR; |
|
|
2888 | } |
|
|
2889 | |
2859 | // read the next octet |
2890 | // read the next octet |
2860 | unicode_t |
2891 | uint32_t |
2861 | rxvt_term::next_octet () |
2892 | rxvt_term::next_octet () |
2862 | { |
2893 | { |
2863 | return cmdbuf_ptr < cmdbuf_endp |
2894 | return cmdbuf_ptr < cmdbuf_endp |
2864 | ? *cmdbuf_ptr++ |
2895 | ? *cmdbuf_ptr++ |
2865 | : NOCHAR; |
2896 | : NOCHAR; |
2866 | } |
|
|
2867 | |
|
|
2868 | // read the next character |
|
|
2869 | unicode_t |
|
|
2870 | rxvt_term::next_char () |
|
|
2871 | { |
|
|
2872 | while (cmdbuf_ptr < cmdbuf_endp) |
|
|
2873 | { |
|
|
2874 | // assume 7-bit to be ascii ALWAYS |
|
|
2875 | if ((unsigned char)*cmdbuf_ptr <= 0x7f && *cmdbuf_ptr != 0x1b) |
|
|
2876 | return *cmdbuf_ptr++; |
|
|
2877 | |
|
|
2878 | wchar_t wc; |
|
|
2879 | size_t len = mbrtowc (&wc, cmdbuf_ptr, cmdbuf_endp - cmdbuf_ptr, mbstate); |
|
|
2880 | |
|
|
2881 | if (len == (size_t)-2) |
|
|
2882 | { |
|
|
2883 | // the mbstate stores incomplete sequences. didn't know this :/ |
|
|
2884 | cmdbuf_ptr = cmdbuf_endp; |
|
|
2885 | break; |
|
|
2886 | } |
|
|
2887 | |
|
|
2888 | if (len == (size_t)-1) |
|
|
2889 | return *cmdbuf_ptr++; // the _occasional_ latin1 character is allowed to slip through |
|
|
2890 | |
|
|
2891 | // assume wchar == unicode |
|
|
2892 | cmdbuf_ptr += len; |
|
|
2893 | return wc & UNICODE_MASK; |
|
|
2894 | } |
|
|
2895 | |
|
|
2896 | return NOCHAR; |
|
|
2897 | } |
2897 | } |
2898 | |
2898 | |
2899 | /* rxvt_cmd_getc () - Return next input character */ |
2899 | /* rxvt_cmd_getc () - Return next input character */ |
2900 | /* |
2900 | /* |
2901 | * Return the next input character after first passing any keyboard input |
2901 | * Return the next input character after first passing any keyboard input |
2902 | * to the command. |
2902 | * to the command. |
2903 | */ |
2903 | */ |
2904 | unicode_t |
2904 | wchar_t |
2905 | rxvt_term::cmd_getc () |
2905 | rxvt_term::cmd_getc () |
2906 | { |
2906 | { |
2907 | unicode_t c = next_char (); |
2907 | wchar_t c = next_char (); |
2908 | |
2908 | |
2909 | if (c == NOCHAR) |
2909 | if (c == NOCHAR) |
2910 | throw out_of_input; |
2910 | throw out_of_input; |
2911 | |
2911 | |
2912 | return c; |
2912 | return c; |
2913 | } |
2913 | } |
2914 | |
2914 | |
2915 | unicode_t |
2915 | uint32_t |
2916 | rxvt_term::cmd_get8 () |
2916 | rxvt_term::cmd_get8 () |
2917 | { |
2917 | { |
2918 | unicode_t c = next_octet (); |
2918 | uint32_t c = next_octet (); |
2919 | |
2919 | |
2920 | if (c == NOCHAR) |
2920 | if (c == NOCHAR) |
2921 | throw out_of_input; |
2921 | throw out_of_input; |
2922 | |
2922 | |
2923 | return c; |
2923 | return c; |
… | |
… | |
3190 | break; |
3190 | break; |
3191 | |
3191 | |
3192 | /* 8.3.87: NEXT LINE */ |
3192 | /* 8.3.87: NEXT LINE */ |
3193 | case C1_NEL: /* ESC E */ |
3193 | case C1_NEL: /* ESC E */ |
3194 | { |
3194 | { |
3195 | unicode_t nlcr[] = { C0_LF, C0_CR }; |
3195 | wchar_t nlcr[] = { C0_LF, C0_CR }; |
3196 | scr_add_lines (nlcr, 1, 2); |
3196 | scr_add_lines (nlcr, sizeof (nlcr) / sizeof (nlcr [0]), 1); |
3197 | } |
3197 | } |
3198 | break; |
3198 | break; |
3199 | |
3199 | |
3200 | /* kidnapped escape sequence: Should be 8.3.48 */ |
3200 | /* kidnapped escape sequence: Should be 8.3.48 */ |
3201 | case C1_ESA: /* ESC G */ |
3201 | case C1_ESA: /* ESC G */ |
… | |
… | |
4029 | break; |
4029 | break; |
4030 | #endif |
4030 | #endif |
4031 | |
4031 | |
4032 | #if ENABLE_PERL |
4032 | #if ENABLE_PERL |
4033 | case URxvt_perl: |
4033 | case URxvt_perl: |
4034 | if (HOOK_INVOKE ((this, HOOK_OSC_SEQ, DT_STRING, str, DT_END))) |
4034 | if (HOOK_INVOKE ((this, HOOK_OSC_SEQ, DT_STR, str, DT_END))) |
4035 | ; // no responses yet |
4035 | ; // no responses yet |
4036 | break; |
4036 | break; |
4037 | #endif |
4037 | #endif |
4038 | } |
4038 | } |
4039 | } |
4039 | } |