ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/rxvt-unicode/src/command.C
(Generate patch)

Comparing rxvt-unicode/src/command.C (file contents):
Revision 1.236 by root, Thu Jan 5 01:04:10 2006 UTC vs.
Revision 1.245 by root, Fri Jan 6 18:33:30 2006 UTC

25 * - extensive modifications 25 * - extensive modifications
26 * Copyright (c) 1998 Alfredo K. Kojima <kojima@windowmaker.org> 26 * Copyright (c) 1998 Alfredo K. Kojima <kojima@windowmaker.org>
27 * Copyright (c) 2001 Marius Gedminas 27 * Copyright (c) 2001 Marius Gedminas
28 * - Ctrl/Mod4+Tab works like Meta+Tab (options) 28 * - Ctrl/Mod4+Tab works like Meta+Tab (options)
29 * Copyright (c) 2003 Rob McMullen <robm@flipturn.org> 29 * Copyright (c) 2003 Rob McMullen <robm@flipturn.org>
30 * Copyright (c) 2003-2005 Marc Lehmann <pcg@goof.com> 30 * Copyright (c) 2003-2006 Marc Lehmann <pcg@goof.com>
31 * 31 *
32 * This program is free software; you can redistribute it and/or modify 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 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 34 * the Free Software Foundation; either version 2 of the License, or
35 * (at your option) any later version. 35 * (at your option) any later version.
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_STR_LEN, kbuf, len, DT_END)))
873 return;
874
872 if (len <= 0) 875 if (len <= 0)
873 return; /* not mapped */ 876 return; /* not mapped */
874 877
875 if (OPTION (Opt_scrollTtyKeypress)) 878 if (OPTION (Opt_scrollTtyKeypress))
876 if (view_start) 879 if (view_start)
967 } 970 }
968#endif 971#endif
969 972
970 if (want_refresh) 973 if (want_refresh)
971 { 974 {
975 if (SHOULD_INVOKE (HOOK_LINE_UPDATE))
976 {
977 int row = -view_start;
978
979 while (row > -nsaved && ROW (row - 1).is_longer ())
980 --row;
981
982 while (row < -view_start + nrow)
983 {
984 int start_row = row;
985 line_t *l;
986
987 do
988 {
989 l = &ROW (row);
990
991 if (!(l->f & LINE_FILTERED))
992 {
993 // line not filtered, mark it as filtered
994 l->f |= LINE_FILTERED;
995 while (l->is_longer ())
996 {
997 l = &ROW (++row);
998 l->f |= LINE_FILTERED;
999 }
1000
1001 // and filter it
1002 HOOK_INVOKE ((this, HOOK_LINE_UPDATE, DT_INT, start_row, DT_END));
1003
1004 break;
1005 }
1006 }
1007 while (l->is_longer ());
1008
1009 row++;
1010 }
1011
1012 }
1013
972 scr_refresh (refresh_type); 1014 scr_refresh (refresh_type);
973 scrollbar_show (1); 1015 scrollbar_show (1);
974#ifdef USE_XIM 1016#ifdef USE_XIM
975 IMSendSpot (); 1017 IMSendSpot ();
976#endif 1018#endif
1163 1205
1164#ifdef POINTER_BLANK 1206#ifdef POINTER_BLANK
1165void 1207void
1166rxvt_term::pointer_blank () 1208rxvt_term::pointer_blank ()
1167{ 1209{
1168 if (! OPTION (Opt_pointerBlank)) 1210 if (!OPTION (Opt_pointerBlank))
1169 return; 1211 return;
1170 1212
1171 XDefineCursor (display->display, vt, display->blank_cursor); 1213 XDefineCursor (display->display, vt, display->blank_cursor);
1172 XFlush (display->display); 1214 XFlush (display->display);
1173 1215
1372# endif 1414# endif
1373 else 1415 else
1374 iso14755buf = 0; 1416 iso14755buf = 0;
1375 } 1417 }
1376#endif 1418#endif
1419
1420 if (ev.xany.window == vt
1421 && HOOK_INVOKE ((this, HOOK_KEY_RELEASE, DT_XEVENT, &ev, DT_END)))
1422 break;
1377 1423
1378#if defined(MOUSE_WHEEL) && defined(MOUSE_SLIP_WHEELING) 1424#if defined(MOUSE_WHEEL) && defined(MOUSE_SLIP_WHEELING)
1379 if (!(ev.xkey.state & ControlMask)) 1425 if (!(ev.xkey.state & ControlMask))
1380 slip_wheel_ev.stop (); 1426 slip_wheel_ev.stop ();
1381 else if (ks == XK_Control_L || ks == XK_Control_R) 1427 else if (ks == XK_Control_L || ks == XK_Control_R)
1596 if ((priv_modes & PrivMode_mouse_report) && !bypass_keystate) 1642 if ((priv_modes & PrivMode_mouse_report) && !bypass_keystate)
1597 break; 1643 break;
1598 1644
1599 if (ev.xany.window == vt) 1645 if (ev.xany.window == vt)
1600 { 1646 {
1647 if (HOOK_INVOKE ((this, HOOK_MOTION_NOTIFY, DT_XEVENT, &ev, DT_END)))
1648 ; // nop
1601 if (ev.xbutton.state & (Button1Mask | Button3Mask)) 1649 else if (ev.xbutton.state & (Button1Mask | Button3Mask))
1602 { 1650 {
1603 while (XCheckTypedWindowEvent (disp, vt, MotionNotify, &ev)) 1651 while (XCheckTypedWindowEvent (disp, vt, MotionNotify, &ev))
1604 ; 1652 ;
1605 1653
1606 XQueryPointer (disp, vt, 1654 XQueryPointer (disp, vt,
1702 if (!focus) 1750 if (!focus)
1703 { 1751 {
1704 focus = 1; 1752 focus = 1;
1705 want_refresh = 1; 1753 want_refresh = 1;
1706 1754
1707 PERL_INVOKE ((this, HOOK_FOCUS_OUT, DT_END)); 1755 HOOK_INVOKE ((this, HOOK_FOCUS_OUT, DT_END));
1708 1756
1709#if USE_XIM 1757#if USE_XIM
1710 if (Input_Context != NULL) 1758 if (Input_Context != NULL)
1711 { 1759 {
1712 IMSetStatusPosition (); 1760 IMSetStatusPosition ();
1733 if (focus) 1781 if (focus)
1734 { 1782 {
1735 focus = 0; 1783 focus = 0;
1736 want_refresh = 1; 1784 want_refresh = 1;
1737 1785
1738 PERL_INVOKE ((this, HOOK_FOCUS_OUT, DT_END)); 1786 HOOK_INVOKE ((this, HOOK_FOCUS_OUT, DT_END));
1739 1787
1740#if ENABLE_FRILLS || ISO_14755 1788#if ENABLE_FRILLS || ISO_14755
1741 if (iso14755buf) 1789 if (iso14755buf)
1742 { 1790 {
1743 iso14755buf = 0; 1791 iso14755buf = 0;
1826#ifdef MOUSE_REPORT_DOUBLECLICK 1874#ifdef MOUSE_REPORT_DOUBLECLICK
1827 if (ev.button == MEvent.button && clickintime) 1875 if (ev.button == MEvent.button && clickintime)
1828 { 1876 {
1829 /* same button, within alloted time */ 1877 /* same button, within alloted time */
1830 MEvent.clicks++; 1878 MEvent.clicks++;
1879
1831 if (MEvent.clicks > 1) 1880 if (MEvent.clicks > 1)
1832 { 1881 {
1833 /* only report double clicks */ 1882 /* only report double clicks */
1834 MEvent.clicks = 2; 1883 MEvent.clicks = 2;
1835 mouse_report (ev); 1884 mouse_report (ev);
1855 else 1904 else
1856 { 1905 {
1857 if (ev.button != MEvent.button) 1906 if (ev.button != MEvent.button)
1858 MEvent.clicks = 0; 1907 MEvent.clicks = 0;
1859 1908
1860 if (!PERL_INVOKE ((this, HOOK_MOUSE_CLICK, DT_XEVENT, &ev, DT_END))) 1909 if (!HOOK_INVOKE ((this, HOOK_BUTTON_PRESS, DT_XEVENT, &ev, DT_END)))
1861 switch (ev.button) 1910 switch (ev.button)
1862 { 1911 {
1863 case Button1: 1912 case Button1:
1864 /* allow meta + click to select rectangular areas */ 1913 /* allow meta + click to select rectangular areas */
1865 /* should be done in screen.C */ 1914 /* should be done in screen.C */
2043 } 2092 }
2044 2093
2045 break; 2094 break;
2046 } 2095 }
2047 } 2096 }
2097
2048 return; 2098 return;
2049 } 2099 }
2100
2050#if MENUBAR 2101#if MENUBAR
2051 /* 2102 /*
2052 * Menubar window processing of button press 2103 * Menubar window processing of button press
2053 */ 2104 */
2054 if (isMenuBarWindow (ev.window)) 2105 if (isMenuBarWindow (ev.window))
2116 */ 2167 */
2117 if (priv_modes & PrivMode_mouse_report 2168 if (priv_modes & PrivMode_mouse_report
2118 && bypass_keystate 2169 && bypass_keystate
2119 && ev.button == Button1 && MEvent.clicks <= 1) 2170 && ev.button == Button1 && MEvent.clicks <= 1)
2120 selection_extend (ev.x, ev.y, 0); 2171 selection_extend (ev.x, ev.y, 0);
2172
2173 if (HOOK_INVOKE ((this, HOOK_BUTTON_RELEASE, DT_XEVENT, &ev, DT_END)))
2174 return;
2121 2175
2122 switch (ev.button) 2176 switch (ev.button)
2123 { 2177 {
2124 case Button1: 2178 case Button1:
2125 case Button3: 2179 case Button3:
2670 2724
2671bool 2725bool
2672rxvt_term::cmd_parse () 2726rxvt_term::cmd_parse ()
2673{ 2727{
2674 bool flag = false; 2728 bool flag = false;
2675 unicode_t ch = NOCHAR; 2729 wchar_t ch = NOCHAR;
2676 char *seq_begin; // remember start of esc-sequence here 2730 char *seq_begin; // remember start of esc-sequence here
2677 2731
2678 for (;;) 2732 for (;;)
2679 { 2733 {
2680 if (ch == NOCHAR) 2734 if (ch == NOCHAR)
2681 { 2735 {
2682 seq_begin = cmdbuf_ptr; 2736 seq_begin = cmdbuf_ptr;
2683 ch = next_char (); 2737 ch = next_char ();
2684 }
2685 2738
2686 if (ch == NOCHAR) // TODO: improve 2739 if (ch == NOCHAR)
2687 break; 2740 break;
2741 }
2688 2742
2689 if (!IS_CONTROL (ch) || ch == C0_LF || ch == C0_CR || ch == C0_HT) 2743 if (!IS_CONTROL (ch) || ch == C0_LF || ch == C0_CR || ch == C0_HT)
2690 { 2744 {
2691 if (!seen_input) 2745 if (!seen_input)
2692 { 2746 {
2701 if (seen_resize && cmd_pid) 2755 if (seen_resize && cmd_pid)
2702 kill (-cmd_pid, SIGWINCH); 2756 kill (-cmd_pid, SIGWINCH);
2703 } 2757 }
2704 2758
2705 /* Read a text string from the input buffer */ 2759 /* Read a text string from the input buffer */
2706 unicode_t buf[UBUFSIZ]; 2760 wchar_t buf[UBUFSIZ];
2707 bool refreshnow = false; 2761 bool refreshnow = false;
2708 int nlines = 0; 2762 int nlines = 0;
2709 unicode_t *str = buf; 2763 wchar_t *str = buf;
2710 unicode_t *eol = str + min (ncol, UBUFSIZ); 2764 wchar_t *eol = str + min (ncol, UBUFSIZ);
2711 2765
2712 for (;;) 2766 for (;;)
2713 { 2767 {
2714 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))
2715 break; 2769 break;
2733 } 2787 }
2734 2788
2735 // scr_add_lines only works for nlines <= nrow - 1. 2789 // scr_add_lines only works for nlines <= nrow - 1.
2736 if (nlines >= nrow - 1) 2790 if (nlines >= nrow - 1)
2737 { 2791 {
2738 if (!PERL_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)))
2739 scr_add_lines (buf, nlines, str - buf); 2793 scr_add_lines (buf, str - buf, nlines);
2740 2794
2741 nlines = 0; 2795 nlines = 0;
2742 str = buf; 2796 str = buf;
2743 eol = str + min (ncol, UBUFSIZ); 2797 eol = str + min (ncol, UBUFSIZ);
2744 } 2798 }
2758 2812
2759 seq_begin = cmdbuf_ptr; 2813 seq_begin = cmdbuf_ptr;
2760 ch = next_char (); 2814 ch = next_char ();
2761 } 2815 }
2762 2816
2763 if (!PERL_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)))
2764 scr_add_lines (buf, nlines, str - buf); 2818 scr_add_lines (buf, str - buf, nlines);
2765 2819
2766 /* 2820 /*
2767 * 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
2768 * 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.
2769 * the number of pages between refreshes is refresh_limit, which 2823 * the number of pages between refreshes is refresh_limit, which
2800 } 2854 }
2801 2855
2802 return flag; 2856 return flag;
2803} 2857}
2804 2858
2859// read the next character
2860wchar_t
2861rxvt_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
2805// read the next octet 2890// read the next octet
2806unicode_t 2891uint32_t
2807rxvt_term::next_octet () 2892rxvt_term::next_octet ()
2808{ 2893{
2809 return cmdbuf_ptr < cmdbuf_endp 2894 return cmdbuf_ptr < cmdbuf_endp
2810 ? *cmdbuf_ptr++ 2895 ? *cmdbuf_ptr++
2811 : NOCHAR; 2896 : NOCHAR;
2812}
2813
2814// read the next character
2815unicode_t
2816rxvt_term::next_char ()
2817{
2818 while (cmdbuf_ptr < cmdbuf_endp)
2819 {
2820 // assume 7-bit to be ascii ALWAYS
2821 if ((unsigned char)*cmdbuf_ptr <= 0x7f && *cmdbuf_ptr != 0x1b)
2822 return *cmdbuf_ptr++;
2823
2824 wchar_t wc;
2825 size_t len = mbrtowc (&wc, cmdbuf_ptr, cmdbuf_endp - cmdbuf_ptr, mbstate);
2826
2827 if (len == (size_t)-2)
2828 {
2829 // the mbstate stores incomplete sequences. didn't know this :/
2830 cmdbuf_ptr = cmdbuf_endp;
2831 break;
2832 }
2833
2834 if (len == (size_t)-1)
2835 return *cmdbuf_ptr++; // the _occasional_ latin1 character is allowed to slip through
2836
2837 // assume wchar == unicode
2838 cmdbuf_ptr += len;
2839 return wc & UNICODE_MASK;
2840 }
2841
2842 return NOCHAR;
2843} 2897}
2844 2898
2845/* rxvt_cmd_getc () - Return next input character */ 2899/* rxvt_cmd_getc () - Return next input character */
2846/* 2900/*
2847 * Return the next input character after first passing any keyboard input 2901 * Return the next input character after first passing any keyboard input
2848 * to the command. 2902 * to the command.
2849 */ 2903 */
2850unicode_t 2904wchar_t
2851rxvt_term::cmd_getc () 2905rxvt_term::cmd_getc ()
2852{ 2906{
2853 unicode_t c = next_char (); 2907 wchar_t c = next_char ();
2854 2908
2855 if (c == NOCHAR) 2909 if (c == NOCHAR)
2856 throw out_of_input; 2910 throw out_of_input;
2857 2911
2858 return c; 2912 return c;
2859} 2913}
2860 2914
2861unicode_t 2915uint32_t
2862rxvt_term::cmd_get8 () 2916rxvt_term::cmd_get8 ()
2863{ 2917{
2864 unicode_t c = next_octet (); 2918 uint32_t c = next_octet ();
2865 2919
2866 if (c == NOCHAR) 2920 if (c == NOCHAR)
2867 throw out_of_input; 2921 throw out_of_input;
2868 2922
2869 return c; 2923 return c;
3136 break; 3190 break;
3137 3191
3138 /* 8.3.87: NEXT LINE */ 3192 /* 8.3.87: NEXT LINE */
3139 case C1_NEL: /* ESC E */ 3193 case C1_NEL: /* ESC E */
3140 { 3194 {
3141 unicode_t nlcr[] = { C0_LF, C0_CR }; 3195 wchar_t nlcr[] = { C0_LF, C0_CR };
3142 scr_add_lines (nlcr, 1, 2); 3196 scr_add_lines (nlcr, sizeof (nlcr) / sizeof (nlcr [0]), 1);
3143 } 3197 }
3144 break; 3198 break;
3145 3199
3146 /* kidnapped escape sequence: Should be 8.3.48 */ 3200 /* kidnapped escape sequence: Should be 8.3.48 */
3147 case C1_ESA: /* ESC G */ 3201 case C1_ESA: /* ESC G */
3975 break; 4029 break;
3976#endif 4030#endif
3977 4031
3978#if ENABLE_PERL 4032#if ENABLE_PERL
3979 case URxvt_perl: 4033 case URxvt_perl:
3980 if (PERL_INVOKE ((this, HOOK_OSC_SEQ, DT_STRING, str, DT_END))) 4034 if (HOOK_INVOKE ((this, HOOK_OSC_SEQ, DT_STR, str, DT_END)))
3981 ; // no responses yet 4035 ; // no responses yet
3982 break; 4036 break;
3983#endif 4037#endif
3984 } 4038 }
3985} 4039}
4415const unsigned int MAX_PTY_WRITE = 255; // minimum MAX_INPUT 4469const unsigned int MAX_PTY_WRITE = 255; // minimum MAX_INPUT
4416 4470
4417void 4471void
4418rxvt_term::tt_write (const char *data, unsigned int len) 4472rxvt_term::tt_write (const char *data, unsigned int len)
4419{ 4473{
4474 if (pty.pty < 0)
4475 return;
4476
4420 if (v_buflen == 0) 4477 if (v_buflen == 0)
4421 { 4478 {
4422 ssize_t written = write (pty.pty, data, min (len, MAX_PTY_WRITE)); 4479 ssize_t written = write (pty.pty, data, min (len, MAX_PTY_WRITE));
4423 4480
4424 if ((unsigned int)written == len) 4481 if ((unsigned int)written == len)

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines