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.6 by pcg, Tue Nov 25 17:11:33 2003 UTC vs.
Revision 1.17 by pcg, Thu Dec 18 00:29:29 2003 UTC

1/*--------------------------------*-C-*---------------------------------* 1/*--------------------------------*-C-*---------------------------------*
2 * File: command.c 2 * File: command.c
3 *----------------------------------------------------------------------* 3 *----------------------------------------------------------------------*
4 * $Id: command.C,v 1.6 2003/11/25 17:11:33 pcg Exp $ 4 * $Id: command.C,v 1.17 2003/12/18 00:29:29 pcg Exp $
5 * 5 *
6 * All portions of code are copyright by their respective author/s. 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> 7 * Copyright (c) 1992 John Bovey, University of Kent at Canterbury <jdb@ukc.ac.uk>
8 * - original version 8 * - original version
9 * Copyright (c) 1994 Robert Nation <nation@rocket.sanders.lockheed.com> 9 * Copyright (c) 1994 Robert Nation <nation@rocket.sanders.lockheed.com>
61 unsigned int newlen; 61 unsigned int newlen;
62 KeySym keysym; 62 KeySym keysym;
63#ifdef DEBUG_CMD 63#ifdef DEBUG_CMD
64 static int debug_key = 1; /* accessible by a debugger only */ 64 static int debug_key = 1; /* accessible by a debugger only */
65#endif 65#endif
66#ifdef USE_XIM
67 int valid_keysym; 66 int valid_keysym;
68#endif
69 unsigned char *kbuf = R->kbuf; 67 unsigned char *kbuf = R->kbuf;
70 68
71/* 69/*
72 * use Num_Lock to toggle Keypad on/off. If Num_Lock is off, allow an 70 * use Num_Lock to toggle Keypad on/off. If Num_Lock is off, allow an
73 * escape sequence to toggle the Keypad. 71 * escape sequence to toggle the Keypad.
75 * Always permit `shift' to override the current setting 73 * Always permit `shift' to override the current setting
76 */ 74 */
77 shft = (ev->state & ShiftMask); 75 shft = (ev->state & ShiftMask);
78 ctrl = (ev->state & ControlMask); 76 ctrl = (ev->state & ControlMask);
79 meta = (ev->state & R->ModMetaMask); 77 meta = (ev->state & R->ModMetaMask);
78
80 if (R->numlock_state || (ev->state & R->ModNumLockMask)) { 79 if (R->numlock_state || (ev->state & R->ModNumLockMask))
80 {
81 R->numlock_state = (ev->state & R->ModNumLockMask); 81 R->numlock_state = (ev->state & R->ModNumLockMask);
82 PrivMode((!R->numlock_state), PrivMode_aplKP); 82 PrivMode((!R->numlock_state), PrivMode_aplKP);
83 } 83 }
84
85 kbuf[0] = 0;
86
84#ifdef USE_XIM 87#ifdef USE_XIM
85 if (R->Input_Context != NULL) { 88 if (R->Input_Context)
89 {
86 Status status_return; 90 Status status_return;
87 91
88 kbuf[0] = '\0';
89#ifdef X_HAVE_UTF8_STRING 92#ifdef X_HAVE_UTF8_STRING
90 len = Xutf8LookupString(R->Input_Context, ev, (char *)kbuf, 93 len = Xutf8LookupString (R->Input_Context, ev, (char *)kbuf,
91 KBUFSZ, &keysym, &status_return); 94 KBUFSZ, &keysym, &status_return);
92#else 95#else
96 wchar_t wkbuf[KBUFSZ + 1];
97
98 // assume wchar_t == unicode or better
93 len = XmbLookupString(R->Input_Context, ev, (char *)kbuf, 99 len = XwcLookupString (R->Input_Context, ev, wkbuf,
94 KBUFSZ, &keysym, &status_return); 100 KBUFSZ, &keysym, &status_return);
101
102 if (status_return == XLookupChars
103 || status_return == XLookupBoth)
104 {
105 wkbuf[len] = 0;
106 len = wcstombs ((char *)kbuf, wkbuf, KBUFSZ);
107 }
108 else
109 len = 0;
95#endif 110#endif
96 valid_keysym = ((status_return == XLookupKeySym) 111 valid_keysym = status_return == XLookupKeySym
97 || (status_return == XLookupBoth)); 112 || status_return == XLookupBoth;
113 }
98 } else { 114 else
115#endif
116 {
99 len = XLookupString(ev, (char *)kbuf, KBUFSZ, &keysym, 117 len = XLookupString (ev, (char *)kbuf, KBUFSZ, &keysym, &R->compose);
100 &R->compose);
101 valid_keysym = 1; 118 valid_keysym = !len;
102 } 119 }
103#else /* USE_XIM */
104 len = XLookupString(ev, (char *)kbuf, KBUFSZ, &keysym,
105 &R->compose);
106/*
107 * map unmapped Latin[2-4]/Katakana/Arabic/Cyrillic/Greek entries -> Latin1
108 * good for installations with correct fonts, but without XLOCALE
109 */
110 if (!len) {
111 if ((keysym >= 0x0100) && (keysym < 0x0800)) {
112 kbuf[0] = (keysym & 0xFF);
113 kbuf[1] = '\0';
114 len = 1;
115 } else
116 kbuf[0] = '\0';
117 }
118#endif /* USE_XIM */
119 120
120#ifdef USE_XIM
121 if (valid_keysym) 121 if (valid_keysym)
122#endif
123 { 122 {
124/* for some backwards compatibility */ 123/* for some backwards compatibility */
125#if defined(HOTKEY_CTRL) || defined(HOTKEY_META) 124#if defined(HOTKEY_CTRL) || defined(HOTKEY_META)
126# ifdef HOTKEY_CTRL 125# ifdef HOTKEY_CTRL
127 if (ctrl) { 126 if (ctrl)
128# else 127# else
129 if (meta) { 128 if (meta)
130# endif 129# endif
130 {
131 if (keysym == R->ks_bigfont) { 131 if (keysym == R->ks_bigfont)
132 {
132 rxvt_change_font(aR_ 0, FONT_UP); 133 rxvt_change_font(aR_ 0, FONT_UP);
133 return; 134 return;
135 }
134 } else if (keysym == R->ks_smallfont) { 136 else if (keysym == R->ks_smallfont)
137 {
135 rxvt_change_font(aR_ 0, FONT_DN); 138 rxvt_change_font(aR_ 0, FONT_DN);
136 return; 139 return;
137 } 140 }
138 } 141 }
139#endif 142#endif
140 143
141 if (R->TermWin.saveLines) { 144 if (R->TermWin.saveLines) {
142#ifdef UNSHIFTED_SCROLLKEYS 145#ifdef UNSHIFTED_SCROLLKEYS
143 if (!ctrl && !meta) { 146 if (!ctrl && !meta) {
237 /* escape prefix */ 240 /* escape prefix */
238 if (meta) 241 if (meta)
239# ifdef META8_OPTION 242# ifdef META8_OPTION
240 if (R->meta_char == C0_ESC) 243 if (R->meta_char == C0_ESC)
241# endif 244# endif
242 rxvt_tt_write(aR_ &ch, 1); 245 R->tt_write (&ch, 1);
243 rxvt_tt_write(aR_ kbuf0, l); 246 R->tt_write (kbuf0, l);
244 return; 247 return;
245 } else 248 } else
246#endif 249#endif
247 { 250 {
248 newlen = 1; 251 newlen = 1;
572 if (R->greek_mode) 575 if (R->greek_mode)
573 len = greek_xlat(kbuf, len); 576 len = greek_xlat(kbuf, len);
574#endif 577#endif
575 /* nil */ ; 578 /* nil */ ;
576 } 579 }
577 } 580 }
578 581
579 if (len <= 0) 582 if (len <= 0)
580 return; /* not mapped */ 583 return; /* not mapped */
581 584
582 if (R->Options & Opt_scrollTtyKeypress) 585 if (R->Options & Opt_scrollTtyKeypress)
605 && (R->meta_char == C0_ESC) 608 && (R->meta_char == C0_ESC)
606#endif 609#endif
607 ) { 610 ) {
608 const unsigned char ch = C0_ESC; 611 const unsigned char ch = C0_ESC;
609 612
610 rxvt_tt_write(aR_ &ch, 1); 613 R->tt_write(&ch, 1);
611 } 614 }
612#ifdef DEBUG_CMD 615#ifdef DEBUG_CMD
613 if (debug_key) { /* Display keyboard buffer contents */ 616 if (debug_key) { /* Display keyboard buffer contents */
614 char *p; 617 char *p;
615 int i; 618 int i;
618 for (i = 0, p = kbuf; i < len; i++, p++) 621 for (i = 0, p = kbuf; i < len; i++, p++)
619 fprintf(stderr, (*p >= ' ' && *p < '\177' ? "%c" : "\\%03o"), *p); 622 fprintf(stderr, (*p >= ' ' && *p < '\177' ? "%c" : "\\%03o"), *p);
620 fprintf(stderr, "'\n"); 623 fprintf(stderr, "'\n");
621 } 624 }
622#endif /* DEBUG_CMD */ 625#endif /* DEBUG_CMD */
623 rxvt_tt_write(aR_ kbuf, (unsigned int)len); 626 R->tt_write(kbuf, (unsigned int)len);
624} 627}
625/*}}} */ 628/*}}} */
626 629
627#if (MENUBAR_MAX) 630#if (MENUBAR_MAX)
628/*{{{ rxvt_cmd_write(), rxvt_cmd_getc() */ 631/*{{{ rxvt_cmd_write(), rxvt_cmd_getc() */
654 R->cmdbuf_ptr = cmdbuf_ptr; 657 R->cmdbuf_ptr = cmdbuf_ptr;
655 R->cmdbuf_endp = cmdbuf_endp; 658 R->cmdbuf_endp = cmdbuf_endp;
656 return 0; 659 return 0;
657} 660}
658#endif /* MENUBAR_MAX */ 661#endif /* MENUBAR_MAX */
662
663void
664rxvt_term::flush ()
665{
666#ifdef TRANSPARENT
667 if (want_full_refresh)
668 {
669 want_full_refresh = 0;
670 rxvt_scr_clear (this);
671 rxvt_scr_touch (this, False);
672 want_refresh = 1;
673 }
674#endif
675
676 if (want_refresh)
677 {
678 rxvt_scr_refresh (this, refresh_type);
679 rxvt_scrollbar_show (this, 1);
680#ifdef USE_XIM
681 rxvt_IMSendSpot (this);
682#endif
683 }
684
685 XFlush (Xdisplay);
686#if 0
687 if (XPending (Xdisplay)) process_x_events ();
688 if (XPending (Xdisplay)) process_x_events ();
689#endif
690}
691
692void
693rxvt_term::check_cb (check_watcher &w)
694{
695 SET_R (this);
696
697 flush ();
698}
659 699
660void 700void
661rxvt_term::process_x_events () 701rxvt_term::process_x_events ()
662{ 702{
663 do 703 do
704} 744}
705 745
706void 746void
707rxvt_term::blink_cb (time_watcher &w) 747rxvt_term::blink_cb (time_watcher &w)
708{ 748{
749 SET_R (this);
750
709 w.at += BLINK_INTERVAL; 751 w.at += BLINK_INTERVAL;
710 hidden_cursor = !hidden_cursor; 752 hidden_cursor = !hidden_cursor;
711 want_refresh = 1; 753 want_refresh = 1;
712 flush();
713} 754}
714 755
715void 756void
716rxvt_term::x_cb (io_watcher &w, short revents) 757rxvt_term::x_cb (io_watcher &w, short revents)
717{ 758{
759 SET_R (this);
760
718 process_x_events (); 761 process_x_events ();
762}
719 763
720 flush (); 764bool
765rxvt_term::pty_fill ()
766{
767 ssize_t n = cmdbuf_endp - cmdbuf_ptr;
768
769 memmove (cmdbuf_base, cmdbuf_ptr, n);
770 cmdbuf_ptr = cmdbuf_base;
771 cmdbuf_endp = cmdbuf_ptr + n;
772
773 n = read (cmd_fd, cmdbuf_endp, BUFSIZ - n);
774
775 if (n > 0)
776 {
777 cmdbuf_endp += n;
778 return true;
779 }
780 else if (n < 0 && errno != EAGAIN)
781 destroy ();
782
783 return false;
784}
785
786void
787rxvt_term::pty_cb (io_watcher &w, short revents)
788{
789 SET_R (this);
790
791 if (revents & EVENT_WRITE)
792 tt_write (0, 0);
793 else if (revents & EVENT_READ)
794 {
795 bool flag = true;
796
797 // loop, but don't allow a single term to monopolize us
798 // the number of loops is fully arbitrary, and thus wrong
799 while (flag && pty_fill ())
800 {
801 if (!seen_input)
802 {
803 seen_input = 1;
804 /* once we know the shell is running, send the screen size. Again! */
805 tt_winch ();
806 }
807
808 uint32_t ch = NOCHAR;
809
810 for (;;)
811 {
812 if (ch == NOCHAR)
813 ch = next_char ();
814
815 if (ch == NOCHAR) // TODO: improve
816 break;
817
818 if (ch >= ' ' || ch == '\t' || ch == '\n' || ch == '\r')
819 {
820 /* Read a text string from the input buffer */
821 uint32_t buf[BUFSIZ];
822 bool refreshnow = false;
823 int nlines = 0;
824 uint32_t *str = buf;
825
826 *str++ = ch;
827
828 for (;;)
829 {
830 ch = next_char ();
831
832 if (ch == NOCHAR || (ch < ' ' && ch != '\t' && ch != '\n' && ch != '\r'))
833 break;
834 else
835 {
836 *str++ = ch;
837
838 if (ch == '\n')
839 {
840 nlines++;
841 refresh_count++;
842
843 if (!(Options & Opt_jumpScroll)
844 || (refresh_count >= (refresh_limit * (TermWin.nrow - 1))))
845 {
846 refreshnow = true;
847 flag = false;
848 ch = NOCHAR;
849 break;
850 }
851 }
852
853 if (str >= buf + BUFSIZ)
854 {
855 ch = NOCHAR;
856 break;
857 }
858 }
859 }
860
861 rxvt_scr_add_lines (this, buf, nlines, str - buf);
862
863 /*
864 * If there have been a lot of new lines, then update the screen
865 * What the heck I'll cheat and only refresh less than every page-full.
866 * the number of pages between refreshes is refresh_limit, which
867 * is incremented here because we must be doing flat-out scrolling.
868 *
869 * refreshing should be correct for small scrolls, because of the
870 * time-out
871 */
872 if (refreshnow)
873 {
874 if ((Options & Opt_jumpScroll) && refresh_limit < REFRESH_PERIOD)
875 refresh_limit++;
876
877 rxvt_scr_refresh (this, refresh_type);
878 }
879
880 }
881 else
882 {
883 switch (ch)
884 {
885 default:
886 rxvt_process_nonprinting (this, ch);
887 break;
888 case C0_ESC: /* escape char */
889 rxvt_process_escape_seq (this);
890 break;
891 /*case 0x9b: */ /* CSI */
892 /* rxvt_process_csi_seq (this); */
893 }
894
895 ch = NOCHAR;
896 }
897 }
898 }
899 }
721} 900}
722 901
723// read the next character, currently handles UTF-8 902// read the next character, currently handles UTF-8
724// will probably handle all sorts of other stuff in the future 903// will probably handle all sorts of other stuff in the future
725uint32_t 904uint32_t
773 } 952 }
774 953
775 return NOCHAR; 954 return NOCHAR;
776} 955}
777 956
778bool
779rxvt_term::pty_fill (size_t count)
780{
781 ssize_t n = cmdbuf_endp - cmdbuf_ptr;
782
783 memmove (cmdbuf_base, cmdbuf_ptr, n);
784 cmdbuf_ptr = cmdbuf_base;
785 cmdbuf_endp = cmdbuf_ptr + n;
786
787 n = read (cmd_fd, cmdbuf_endp, count);
788
789 if (n > 0)
790 {
791 cmdbuf_endp += n;
792 return true;
793 }
794 else if (n < 0 && errno == EAGAIN)
795 return false;
796
797 rxvt_clean_exit();
798 exit(EXIT_FAILURE); /* bad order of events? */
799}
800
801void
802rxvt_term::pty_cb (io_watcher &w, short revents)
803{
804 while (pty_fill (BUFSIZ - (cmdbuf_endp - cmdbuf_ptr)))
805 {
806 /* once we know the shell is running, send the screen size. Again! */
807 //ch = rxvt_cmd_getc(aR); /* wait for something */
808 //rxvt_tt_winsize(cmd_fd, TermWin.ncol, TermWin.nrow, cmd_pid);
809
810 uint32_t ch = NOCHAR;
811
812 for (;;)
813 {
814 if (ch == NOCHAR)
815 ch = next_char ();
816
817 if (ch == NOCHAR) // TODO: improve
818 break;
819
820 if (ch >= ' ' || ch == '\t' || ch == '\n' || ch == '\r')
821 {
822 /* Read a text string from the input buffer */
823 uint32_t buf[BUFSIZ];
824 bool refreshnow = false;
825 int nlines = 0;
826 uint32_t *str = buf;
827
828 *str++ = ch;
829
830 for (;;)
831 {
832 ch = next_char ();
833
834 if (ch == NOCHAR || (ch < ' ' && ch != '\t' && ch != '\n' && ch != '\r'))
835 break;
836 else
837 {
838 *str++ = ch;
839
840 if (ch == '\n')
841 {
842 nlines++;
843 refresh_count++;
844
845 if (!(Options & Opt_jumpScroll)
846 || (refresh_count >= (refresh_limit * (TermWin.nrow - 1))))
847 {
848 refreshnow = true;
849 ch = NOCHAR;
850 break;
851 }
852 }
853
854 if (str >= buf + BUFSIZ)
855 {
856 ch = NOCHAR;
857 break;
858 }
859 }
860 }
861
862 rxvt_scr_add_lines (this, buf, nlines, str - buf);
863
864 /*
865 * If there have been a lot of new lines, then update the screen
866 * What the heck I'll cheat and only refresh less than every page-full.
867 * the number of pages between refreshes is refresh_limit, which
868 * is incremented here because we must be doing flat-out scrolling.
869 *
870 * refreshing should be correct for small scrolls, because of the
871 * time-out
872 */
873 if (refreshnow)
874 {
875 if ((Options & Opt_jumpScroll) && refresh_limit < REFRESH_PERIOD)
876 refresh_limit++;
877
878 rxvt_scr_refresh (this, refresh_type);
879 }
880
881 }
882 else
883 {
884 switch (ch)
885 {
886 default:
887 rxvt_process_nonprinting (this, ch);
888 break;
889 case C0_ESC: /* escape char */
890 rxvt_process_escape_seq (this);
891 break;
892 /*case 0x9b: */ /* CSI */
893 /* rxvt_process_csi_seq (this); */
894 }
895
896 ch = NOCHAR;
897 }
898 }
899 }
900
901 flush ();
902}
903
904void
905rxvt_term::flush ()
906{
907#ifdef TRANSPARENT
908 if (want_full_refresh)
909 {
910 want_full_refresh = 0;
911 rxvt_scr_clear (this);
912 rxvt_scr_touch (this, False);
913 want_refresh = 1;
914 }
915#endif
916
917 if (want_refresh)
918 {
919 rxvt_scr_refresh (this, refresh_type);
920 rxvt_scrollbar_show (this, 1);
921#ifdef USE_XIM
922 rxvt_IMSendSpot (this);
923#endif
924 }
925
926 XFlush (Xdisplay);
927}
928
929/* rxvt_cmd_getc() - Return next input character */ 957/* rxvt_cmd_getc() - Return next input character */
930/* 958/*
931 * Return the next input character after first passing any keyboard input 959 * Return the next input character after first passing any keyboard input
932 * to the command. 960 * to the command.
933 */ 961 */
942 return c; 970 return c;
943 971
944 // incomplete sequences should occur rarely, still, a better solution 972 // incomplete sequences should occur rarely, still, a better solution
945 // would be preferred. either setjmp/longjmp or better design. 973 // would be preferred. either setjmp/longjmp or better design.
946 fcntl (R->cmd_fd, F_SETFL, 0); 974 fcntl (R->cmd_fd, F_SETFL, 0);
947 R->pty_fill (1); 975 R->pty_fill ();
948 fcntl (R->cmd_fd, F_SETFL, O_NONBLOCK); 976 fcntl (R->cmd_fd, F_SETFL, O_NONBLOCK);
949 } 977 }
950 978
951#if 0 979#if 0
952#define TIMEOUT_USEC 5000 980#define TIMEOUT_USEC 5000
960 988
961 for (;;) { 989 for (;;) {
962 /* loop until we can return something */ 990 /* loop until we can return something */
963 991
964 if (R->v_bufstr < R->v_bufptr) /* output any pending chars */ 992 if (R->v_bufstr < R->v_bufptr) /* output any pending chars */
965 rxvt_tt_write(aR_ NULL, 0); 993 R->tt_write(NULL, 0);
966 994
967#if defined(MOUSE_WHEEL) && defined(MOUSE_SLIP_WHEELING) 995#if defined(MOUSE_WHEEL) && defined(MOUSE_SLIP_WHEELING)
968 if (R->mouse_slip_wheel_speed) { 996 if (R->mouse_slip_wheel_speed) {
969 quick_timeout = 1; 997 quick_timeout = 1;
970 if (!R->mouse_slip_wheel_delay-- 998 if (!R->mouse_slip_wheel_delay--
1006 quick_timeout |= R->want_full_refresh; 1034 quick_timeout |= R->want_full_refresh;
1007#endif 1035#endif
1008#endif 1036#endif
1009} 1037}
1010 1038
1039void
1040rxvt_term::pointer_unblank ()
1041{
1042 XDefineCursor (Xdisplay, TermWin.vt, TermWin_cursor);
1043 rxvt_recolour_cursor (this);
1044
1045#ifdef POINTER_BLANK
1046 hidden_pointer = 0;
1047
1048 if (Options & Opt_pointerBlank)
1049 pointer_ev.start (NOW + pointerBlankDelay);
1050#endif
1051}
1052
1011#ifdef POINTER_BLANK 1053#ifdef POINTER_BLANK
1012void 1054void
1013rxvt_term::pointer_unblank () 1055rxvt_term::pointer_blank ()
1014{ 1056{
1057 pointer_ev.stop ();
1058
1015 if (!(Options & Opt_pointerBlank)) 1059 if (!(Options & Opt_pointerBlank))
1016 return; 1060 return;
1017 1061
1018 XDefineCursor (Xdisplay, TermWin.vt, TermWin_cursor);
1019 rxvt_recolour_cursor (this);
1020 hidden_pointer = 0;
1021
1022 pointer_ev.start (NOW + pointerBlankDelay);
1023}
1024
1025void
1026rxvt_term::pointer_blank ()
1027{
1028 pointer_ev.stop ();
1029
1030 if (!(Options & Opt_pointerBlank))
1031 return;
1032
1033 XDefineCursor (Xdisplay, TermWin.vt, blank_cursor); 1062 XDefineCursor (Xdisplay, TermWin.vt, blank_cursor);
1034 XFlush (Xdisplay); 1063 XFlush (Xdisplay);
1035 1064
1036 hidden_pointer = 1; 1065 hidden_pointer = 1;
1037} 1066}
1038 1067
1039void 1068void
1040rxvt_term::pointer_cb (time_watcher &w) 1069rxvt_term::pointer_cb (time_watcher &w)
1041{ 1070{
1071 SET_R (this);
1072
1042 pointer_blank (); 1073 pointer_blank ();
1043} 1074}
1044#endif 1075#endif
1045 1076
1046/* INTPROTO */ 1077/* INTPROTO */
1100 fprintf(stderr, "]: <%d>, %d/%d\n", 1131 fprintf(stderr, "]: <%d>, %d/%d\n",
1101 button_number, 1132 button_number,
1102 x + 1, 1133 x + 1,
1103 y + 1); 1134 y + 1);
1104#else 1135#else
1105 rxvt_tt_printf(aR_ "\033[M%c%c%c", 1136 R->tt_printf("\033[M%c%c%c",
1106 (32 + button_number + key_state), 1137 (32 + button_number + key_state),
1107 (32 + x + 1), 1138 (32 + x + 1),
1108 (32 + y + 1)); 1139 (32 + y + 1));
1109#endif 1140#endif
1110} 1141}
1127{ 1158{
1128 int i, want_timeout; 1159 int i, want_timeout;
1129 Window unused_root, unused_child; 1160 Window unused_root, unused_child;
1130 int unused_root_x, unused_root_y; 1161 int unused_root_x, unused_root_y;
1131 unsigned int unused_mask; 1162 unsigned int unused_mask;
1132 struct timeval tp;
1133 1163
1134#ifdef DEBUG_X 1164#ifdef DEBUG_X
1135 const char *const eventnames[] = 1165 const char *const eventnames[] =
1136 { /* mason - this matches my system */ 1166 { /* mason - this matches my system */
1137 "", 1167 "",
1168 "SelectionNotify", 1198 "SelectionNotify",
1169 "ColormapNotify", 1199 "ColormapNotify",
1170 "ClientMessage", 1200 "ClientMessage",
1171 "MappingNotify" 1201 "MappingNotify"
1172 }; 1202 };
1203#endif
1204
1205#ifdef DEBUG_X
1206 struct timeval tp;
1173 struct tm *ltt; 1207 struct tm *ltt;
1174#endif
1175
1176 /*
1177 * check if we need to get the time for any timeouts
1178 */
1179
1180 for (i = NUM_TIMEOUTS; i--; )
1181 if (R->timeout[i].tv_sec) {
1182 want_timeout = 1;
1183 break;
1184 }
1185
1186#ifndef DEBUG_X
1187 if (want_timeout)
1188#endif
1189 (void)gettimeofday(&tp, NULL); 1208 (void)gettimeofday(&tp, NULL);
1190
1191#ifdef DEBUG_X
1192 ltt = localtime(&(tp.tv_sec)); 1209 ltt = localtime(&(tp.tv_sec));
1193 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)); 1210 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));
1194#endif 1211#endif
1195
1196 /* X event timeouts */
1197 if (want_timeout)
1198 for (i = NUM_TIMEOUTS; i--; ) {
1199 if (R->timeout[i].tv_sec == 0)
1200 continue;
1201 if ((tp.tv_sec < R->timeout[i].tv_sec)
1202 || (tp.tv_sec == R->timeout[i].tv_sec
1203 && tp.tv_usec < R->timeout[i].tv_usec))
1204 continue;
1205 R->timeout[i].tv_sec = 0;
1206 switch(i) {
1207 case TIMEOUT_INCR:
1208 rxvt_print_error("data loss: timeout on INCR selection paste");
1209 R->selection_wait = Sel_none;
1210 break;
1211 default:
1212 break;
1213 }
1214 }
1215 1212
1216 switch (ev->type) { 1213 switch (ev->type) {
1217 case KeyPress: 1214 case KeyPress:
1218 rxvt_lookup_key(aR_ (XKeyEvent *)ev); 1215 rxvt_lookup_key(aR_ (XKeyEvent *)ev);
1219 break; 1216 break;
1243 break; 1240 break;
1244 1241
1245 case ClientMessage: 1242 case ClientMessage:
1246 if (ev->xclient.format == 32 1243 if (ev->xclient.format == 32
1247 && (Atom)ev->xclient.data.l[0] == R->xa[XA_WMDELETEWINDOW]) 1244 && (Atom)ev->xclient.data.l[0] == R->xa[XA_WMDELETEWINDOW])
1248 exit(EXIT_SUCCESS); 1245 R->destroy ();
1249#ifdef OFFIX_DND 1246#ifdef OFFIX_DND
1250 /* OffiX Dnd (drag 'n' drop) protocol */ 1247 /* OffiX Dnd (drag 'n' drop) protocol */
1251 if (ev->xclient.message_type == R->xa[XA_DNDPROTOCOL] 1248 else if (ev->xclient.message_type == R->xa[XA_DNDPROTOCOL]
1252 && (ev->xclient.data.l[0] == DndFile 1249 && (ev->xclient.data.l[0] == DndFile
1253 || ev->xclient.data.l[0] == DndDir 1250 || ev->xclient.data.l[0] == DndDir
1254 || ev->xclient.data.l[0] == DndLink)) { 1251 || ev->xclient.data.l[0] == DndLink)) {
1255 /* Get Dnd data */ 1252 /* Get Dnd data */
1256 Atom ActualType; 1253 Atom ActualType;
1288 * in the GraphicsExpose parts, which means that after each refresh, 1285 * in the GraphicsExpose parts, which means that after each refresh,
1289 * we need to wait for the graphics expose or Noexpose events, 1286 * we need to wait for the graphics expose or Noexpose events,
1290 * which ought to make things real slow! 1287 * which ought to make things real slow!
1291 */ 1288 */
1292 case VisibilityNotify: 1289 case VisibilityNotify:
1293 switch (ev->xvisibility.state) { 1290 switch (ev->xvisibility.state)
1291 {
1294 case VisibilityUnobscured: 1292 case VisibilityUnobscured:
1295 R->refresh_type = FAST_REFRESH; 1293 R->refresh_type = FAST_REFRESH;
1296 break; 1294 break;
1297 case VisibilityPartiallyObscured: 1295 case VisibilityPartiallyObscured:
1298 R->refresh_type = SLOW_REFRESH; 1296 R->refresh_type = SLOW_REFRESH;
1299 break; 1297 break;
1300 default: 1298 default:
1301 R->refresh_type = NO_REFRESH; 1299 R->refresh_type = NO_REFRESH;
1302 break; 1300 break;
1303 } 1301 }
1304 break; 1302 break;
1305 1303
1306 case FocusIn: 1304 case FocusIn:
1307 if (!R->TermWin.focus) { 1305 if (!R->TermWin.focus) {
1308 R->TermWin.focus = 1; 1306 R->TermWin.focus = 1;
1651 */ 1649 */
1652 if ((R->scrollBar.style == R_SB_NEXT 1650 if ((R->scrollBar.style == R_SB_NEXT
1653 && scrollbarnext_upButton(ev->y)) 1651 && scrollbarnext_upButton(ev->y))
1654 || (R->scrollBar.style == R_SB_RXVT 1652 || (R->scrollBar.style == R_SB_RXVT
1655 && scrollbarrxvt_upButton(ev->y))) 1653 && scrollbarrxvt_upButton(ev->y)))
1656 rxvt_tt_printf(aR_ "\033[A"); 1654 R->tt_printf("\033[A");
1657 else if ((R->scrollBar.style == R_SB_NEXT 1655 else if ((R->scrollBar.style == R_SB_NEXT
1658 && scrollbarnext_dnButton(ev->y)) 1656 && scrollbarnext_dnButton(ev->y))
1659 || (R->scrollBar.style == R_SB_RXVT 1657 || (R->scrollBar.style == R_SB_RXVT
1660 && scrollbarrxvt_dnButton(ev->y))) 1658 && scrollbarrxvt_dnButton(ev->y)))
1661 rxvt_tt_printf(aR_ "\033[B"); 1659 R->tt_printf("\033[B");
1662 else 1660 else
1663 switch (ev->button) { 1661 switch (ev->button) {
1664 case Button2: 1662 case Button2:
1665 rxvt_tt_printf(aR_ "\014"); 1663 R->tt_printf("\014");
1666 break; 1664 break;
1667 case Button1: 1665 case Button1:
1668 rxvt_tt_printf(aR_ "\033[6~"); 1666 R->tt_printf("\033[6~");
1669 break; 1667 break;
1670 case Button3: 1668 case Button3:
1671 rxvt_tt_printf(aR_ "\033[5~"); 1669 R->tt_printf("\033[5~");
1672 break; 1670 break;
1673 } 1671 }
1674 } 1672 }
1675 else 1673 else
1676#endif /* NO_SCROLLBAR_REPORT */ 1674#endif /* NO_SCROLLBAR_REPORT */
2077 return stream; 2075 return stream;
2078} 2076}
2079 2077
2080/* EXTPROTO */ 2078/* EXTPROTO */
2081int 2079int
2082rxvt_pclose_printer(FILE *stream) 2080rxvt_pclose_printer (FILE *stream)
2083{ 2081{
2084 fflush(stream); 2082 fflush (stream);
2085/* pclose() reported not to work on SunOS 4.1.3 */ 2083/* pclose() reported not to work on SunOS 4.1.3 */
2086# if defined (__sun__) /* TODO: RESOLVE THIS */ 2084# if defined (__sun__) /* TODO: RESOLVE THIS */
2087/* pclose works provided SIGCHLD handler uses waitpid */ 2085/* pclose works provided SIGCHLD handler uses waitpid */
2088 return pclose(stream); /* return fclose (stream); */ 2086 return pclose (stream); /* return fclose (stream); */
2089# else 2087# else
2090 return pclose(stream); 2088 return pclose (stream);
2091# endif 2089# endif
2092} 2090}
2093 2091
2094/* 2092/*
2095 * simulate attached vt100 printer 2093 * simulate attached vt100 printer
2158rxvt_process_nonprinting(pR_ unsigned char ch) 2156rxvt_process_nonprinting(pR_ unsigned char ch)
2159{ 2157{
2160 switch (ch) { 2158 switch (ch) {
2161 case C0_ENQ: /* terminal Status */ 2159 case C0_ENQ: /* terminal Status */
2162 if (R->rs[Rs_answerbackstring]) 2160 if (R->rs[Rs_answerbackstring])
2163 rxvt_tt_write(aR_ 2161 R->tt_write(
2164 (const unsigned char *)R->rs[Rs_answerbackstring], 2162 (const unsigned char *)R->rs[Rs_answerbackstring],
2165 (unsigned int)STRLEN(R->rs[Rs_answerbackstring])); 2163 (unsigned int)STRLEN(R->rs[Rs_answerbackstring]));
2166 else 2164 else
2167 rxvt_tt_write(aR_ (unsigned char *)VT100_ANS, 2165 R->tt_write((unsigned char *)VT100_ANS,
2168 (unsigned int)STRLEN(VT100_ANS)); 2166 (unsigned int)STRLEN(VT100_ANS));
2169 break; 2167 break;
2170 case C0_BEL: /* bell */ 2168 case C0_BEL: /* bell */
2171 rxvt_scr_bell(aR); 2169 rxvt_scr_bell(aR);
2172 break; 2170 break;
2235 row = rxvt_cmd_getc(aR) - ' '; 2233 row = rxvt_cmd_getc(aR) - ' ';
2236 col = rxvt_cmd_getc(aR) - ' '; 2234 col = rxvt_cmd_getc(aR) - ' ';
2237 rxvt_scr_gotorc(aR_ row, col, 0); 2235 rxvt_scr_gotorc(aR_ row, col, 0);
2238 break; 2236 break;
2239 case 'Z': /* identify the terminal type */ 2237 case 'Z': /* identify the terminal type */
2240 rxvt_tt_printf(aR_ "\033/Z"); /* I am a VT100 emulating a VT52 */ 2238 R->tt_printf("\033/Z"); /* I am a VT100 emulating a VT52 */
2241 break; 2239 break;
2242 case '<': /* turn off VT52 mode */ 2240 case '<': /* turn off VT52 mode */
2243 PrivMode(0, PrivMode_vt52); 2241 PrivMode(0, PrivMode_vt52);
2244 break; 2242 break;
2245 case 'F': /* use special graphics character set */ 2243 case 'F': /* use special graphics character set */
2352 rxvt_process_dcs_seq(aR); 2350 rxvt_process_dcs_seq(aR);
2353 break; 2351 break;
2354 2352
2355 /* 8.3.110: SINGLE CHARACTER INTRODUCER */ 2353 /* 8.3.110: SINGLE CHARACTER INTRODUCER */
2356 case C1_SCI: /* ESC Z */ 2354 case C1_SCI: /* ESC Z */
2357 rxvt_tt_write(aR_ (const unsigned char *)ESCZ_ANSWER, 2355 R->tt_write((const unsigned char *)ESCZ_ANSWER,
2358 (unsigned int)(sizeof(ESCZ_ANSWER) - 1)); 2356 (unsigned int)(sizeof(ESCZ_ANSWER) - 1));
2359 break; /* steal obsolete ESC [ c */ 2357 break; /* steal obsolete ESC [ c */
2360 2358
2361 /* 8.3.16: CONTROL SEQUENCE INTRODUCER */ 2359 /* 8.3.16: CONTROL SEQUENCE INTRODUCER */
2362 case C1_CSI: /* ESC [ */ 2360 case C1_CSI: /* ESC [ */
2483 */ 2481 */
2484 if (priv) { 2482 if (priv) {
2485 switch (priv) { 2483 switch (priv) {
2486 case '>': 2484 case '>':
2487 if (ch == CSI_DA) /* secondary device attributes */ 2485 if (ch == CSI_DA) /* secondary device attributes */
2488 rxvt_tt_printf(aR_ "\033[>%d;%-.8s;0c", 'R', VSTRING); 2486 R->tt_printf("\033[>%d;%-.8s;0c", 'R', VSTRING);
2489 break; 2487 break;
2490 case '?': 2488 case '?':
2491 if (ch == 'h' || ch == 'l' || ch == 'r' || ch == 's' || ch == 't') 2489 if (ch == 'h' || ch == 'l' || ch == 'r' || ch == 's' || ch == 't')
2492 rxvt_process_terminal_mode(aR_ ch, priv, nargs, arg); 2490 rxvt_process_terminal_mode(aR_ ch, priv, nargs, arg);
2493 break; 2491 break;
2596 2594
2597 case CSI_SD: /* 8.3.114: (1) SCROLL DOWN */ 2595 case CSI_SD: /* 8.3.114: (1) SCROLL DOWN */
2598 arg[0] = -arg[0]; 2596 arg[0] = -arg[0];
2599 /* FALLTHROUGH */ 2597 /* FALLTHROUGH */
2600 case CSI_SU: /* 8.3.148: (1) SCROLL UP */ 2598 case CSI_SU: /* 8.3.148: (1) SCROLL UP */
2601 rxvt_scroll_text(aR_ R->screen.tscroll, R->screen.bscroll, arg[0], 0); 2599 R->scr_scroll_text (R->screen.tscroll, R->screen.bscroll, arg[0], 0);
2602 break; 2600 break;
2603 2601
2604 case CSI_DA: /* 8.3.24: (0) DEVICE ATTRIBUTES */ 2602 case CSI_DA: /* 8.3.24: (0) DEVICE ATTRIBUTES */
2605 rxvt_tt_write(aR_ (const unsigned char *)VT100_ANS, 2603 R->tt_write((const unsigned char *)VT100_ANS,
2606 (unsigned int)(sizeof(VT100_ANS) - 1)); 2604 (unsigned int)(sizeof(VT100_ANS) - 1));
2607 break; 2605 break;
2608 2606
2609 case CSI_SGR: /* 8.3.118: (0) SELECT GRAPHIC RENDITION */ 2607 case CSI_SGR: /* 8.3.118: (0) SELECT GRAPHIC RENDITION */
2610 rxvt_process_sgr_mode(aR_ nargs, arg); 2608 rxvt_process_sgr_mode(aR_ nargs, arg);
2611 break; 2609 break;
2612 2610
2613 case CSI_DSR: /* 8.3.36: (0) DEVICE STATUS REPORT */ 2611 case CSI_DSR: /* 8.3.36: (0) DEVICE STATUS REPORT */
2614 switch (arg[0]) { 2612 switch (arg[0]) {
2615 case 5: /* DSR requested */ 2613 case 5: /* DSR requested */
2616 rxvt_tt_printf(aR_ "\033[0n"); 2614 R->tt_printf("\033[0n");
2617 break; 2615 break;
2618 case 6: /* CPR requested */ 2616 case 6: /* CPR requested */
2619 rxvt_scr_report_position(aR); 2617 rxvt_scr_report_position(aR);
2620 break; 2618 break;
2621#if defined (ENABLE_DISPLAY_ANSWER) 2619#if defined (ENABLE_DISPLAY_ANSWER)
2622 case 7: /* unofficial extension */ 2620 case 7: /* unofficial extension */
2623 rxvt_tt_printf(aR_ "%-.250s\n", R->rs[Rs_display_name]); 2621 R->tt_printf("%-.250s\n", R->rs[Rs_display_name]);
2624 break; 2622 break;
2625#endif 2623#endif
2626 case 8: /* unofficial extension */ 2624 case 8: /* unofficial extension */
2627 rxvt_xterm_seq(aR_ XTerm_title, APL_NAME "-" VERSION, CHAR_ST); 2625 rxvt_xterm_seq(aR_ XTerm_title, APL_NAME "-" VERSION, CHAR_ST);
2628 break; 2626 break;
2697 break; 2695 break;
2698#endif 2696#endif
2699 2697
2700 case CSI_78: /* DECREQTPARM */ 2698 case CSI_78: /* DECREQTPARM */
2701 if (arg[0] == 0 || arg[0] == 1) 2699 if (arg[0] == 0 || arg[0] == 1)
2702 rxvt_tt_printf(aR_ "\033[%d;1;1;112;112;1;0x", arg[0] + 2); 2700 R->tt_printf("\033[%d;1;1;112;112;1;0x", arg[0] + 2);
2703 /* FALLTHROUGH */ 2701 /* FALLTHROUGH */
2704 2702
2705 default: 2703 default:
2706 break; 2704 break;
2707 } 2705 }
2761 /* 2759 /*
2762 * reports - some output format copied from XTerm 2760 * reports - some output format copied from XTerm
2763 */ 2761 */
2764 case 11: /* report window state */ 2762 case 11: /* report window state */
2765 XGetWindowAttributes(R->Xdisplay, R->TermWin.parent[0], &wattr); 2763 XGetWindowAttributes(R->Xdisplay, R->TermWin.parent[0], &wattr);
2766 rxvt_tt_printf(aR_ "\033[%dt", wattr.map_state == IsViewable ? 1 : 2); 2764 R->tt_printf("\033[%dt", wattr.map_state == IsViewable ? 1 : 2);
2767 break; 2765 break;
2768 case 13: /* report window position */ 2766 case 13: /* report window position */
2769 XGetWindowAttributes(R->Xdisplay, R->TermWin.parent[0], &wattr); 2767 XGetWindowAttributes(R->Xdisplay, R->TermWin.parent[0], &wattr);
2770 XTranslateCoordinates(R->Xdisplay, R->TermWin.parent[0], wattr.root, 2768 XTranslateCoordinates(R->Xdisplay, R->TermWin.parent[0], wattr.root,
2771 -wattr.border_width, -wattr.border_width, 2769 -wattr.border_width, -wattr.border_width,
2772 &x, &y, &wdummy); 2770 &x, &y, &wdummy);
2773 rxvt_tt_printf(aR_ "\033[3;%d;%dt", x, y); 2771 R->tt_printf("\033[3;%d;%dt", x, y);
2774 break; 2772 break;
2775 case 14: /* report window size (pixels) */ 2773 case 14: /* report window size (pixels) */
2776 XGetWindowAttributes(R->Xdisplay, R->TermWin.parent[0], &wattr); 2774 XGetWindowAttributes(R->Xdisplay, R->TermWin.parent[0], &wattr);
2777 rxvt_tt_printf(aR_ "\033[4;%d;%dt", wattr.height, wattr.width); 2775 R->tt_printf("\033[4;%d;%dt", wattr.height, wattr.width);
2778 break; 2776 break;
2779 case 18: /* report window size (chars) */ 2777 case 18: /* report window size (chars) */
2780 rxvt_tt_printf(aR_ "\033[8;%d;%dt", R->TermWin.nrow, R->TermWin.ncol); 2778 R->tt_printf("\033[8;%d;%dt", R->TermWin.nrow, R->TermWin.ncol);
2781 break; 2779 break;
2782#if 0 /* XXX: currently disabled due to security concerns */ 2780#if 0 /* XXX: currently disabled due to security concerns */
2783 case 20: /* report icon label */ 2781 case 20: /* report icon label */
2784 XGetIconName(R->Xdisplay, R->TermWin.parent[0], &s); 2782 XGetIconName(R->Xdisplay, R->TermWin.parent[0], &s);
2785 rxvt_tt_printf(aR_ "\033]L%-.200s\234", s ? s : ""); /* 8bit ST */ 2783 R->tt_printf("\033]L%-.200s\234", s ? s : ""); /* 8bit ST */
2786 break; 2784 break;
2787 case 21: /* report window title */ 2785 case 21: /* report window title */
2788 XFetchName(R->Xdisplay, R->TermWin.parent[0], &s); 2786 XFetchName(R->Xdisplay, R->TermWin.parent[0], &s);
2789 rxvt_tt_printf(aR_ "\033]l%-.200s\234", s ? s : ""); /* 8bit ST */ 2787 R->tt_printf("\033]l%-.200s\234", s ? s : ""); /* 8bit ST */
2790 break; 2788 break;
2791#endif 2789#endif
2792 } 2790 }
2793} 2791}
2794#endif 2792#endif
3337{ 3335{
3338 unsigned char ch, cmd = rxvt_cmd_getc(aR); 3336 unsigned char ch, cmd = rxvt_cmd_getc(aR);
3339 3337
3340#ifndef RXVT_GRAPHICS 3338#ifndef RXVT_GRAPHICS
3341 if (cmd == 'Q') { /* query graphics */ 3339 if (cmd == 'Q') { /* query graphics */
3342 rxvt_tt_printf(aR_ "\033G0\n"); /* no graphics */ 3340 R->tt_printf("\033G0\n"); /* no graphics */
3343 return; 3341 return;
3344 } 3342 }
3345/* swallow other graphics sequences until terminating ':' */ 3343/* swallow other graphics sequences until terminating ':' */
3346 do 3344 do
3347 ch = rxvt_cmd_getc(aR); 3345 ch = rxvt_cmd_getc(aR);
3350 unsigned int nargs; 3348 unsigned int nargs;
3351 int args[NGRX_PTS]; 3349 int args[NGRX_PTS];
3352 unsigned char *text = NULL; 3350 unsigned char *text = NULL;
3353 3351
3354 if (cmd == 'Q') { /* query graphics */ 3352 if (cmd == 'Q') { /* query graphics */
3355 rxvt_tt_printf(aR_ "\033G1\n"); /* yes, graphics (color) */ 3353 R->tt_printf("\033G1\n"); /* yes, graphics (color) */
3356 return; 3354 return;
3357 } 3355 }
3358 for (nargs = 0; nargs < (sizeof(args) / sizeof(args[0])) - 1;) { 3356 for (nargs = 0; nargs < (sizeof(args) / sizeof(args[0])) - 1;) {
3359 int neg; 3357 int neg;
3360 3358
3394 3392
3395/* 3393/*
3396 * Send printf() formatted output to the command. 3394 * Send printf() formatted output to the command.
3397 * Only use for small amounts of data. 3395 * Only use for small amounts of data.
3398 */ 3396 */
3399/* EXTPROTO */
3400void 3397void
3401rxvt_tt_printf(pR_ const char *fmt,...) 3398rxvt_term::tt_printf (const char *fmt,...)
3402{ 3399{
3403 va_list arg_ptr; 3400 va_list arg_ptr;
3404 unsigned char buf[256]; 3401 unsigned char buf[256];
3405 3402
3406 va_start(arg_ptr, fmt); 3403 va_start (arg_ptr, fmt);
3407 vsprintf((char *)buf, fmt, arg_ptr); 3404 vsnprintf ((char *)buf, 256, fmt, arg_ptr);
3408 va_end(arg_ptr); 3405 va_end (arg_ptr);
3409 rxvt_tt_write(aR_ buf, (unsigned int)STRLEN(buf)); 3406 tt_write (buf, STRLEN (buf));
3410} 3407}
3411 3408
3412/* ---------------------------------------------------------------------- */ 3409/* ---------------------------------------------------------------------- */
3413/* Addresses pasting large amounts of data and rxvt hang
3414 * code pinched from xterm (v_write()) and applied originally to
3415 * rxvt-2.18 - Hops
3416 * Write data to the pty as typed by the user, pasted with the mouse, 3410/* Write data to the pty as typed by the user, pasted with the mouse,
3417 * or generated by us in response to a query ESC sequence. 3411 * or generated by us in response to a query ESC sequence.
3418 */ 3412 */
3419/* EXTPROTO */
3420void 3413void
3421rxvt_tt_write(pR_ const unsigned char *d, unsigned int len) 3414rxvt_term::tt_write (const unsigned char *data, unsigned int len)
3422{ 3415{
3423#define MAX_PTY_WRITE 256 /* POSIX minimum MAX_INPUT */ 3416 enum { MAX_PTY_WRITE = 255 }; // minimum MAX_INPUT
3424 int riten;
3425 unsigned int p;
3426 unsigned char *v_buffer, /* start of physical buffer */
3427 *v_bufstr, /* start of current buffer pending */
3428 *v_bufptr, /* end of current buffer pending */
3429 *v_bufend; /* end of physical buffer */
3430 3417
3431 if (R->v_bufstr == NULL && len > 0) { 3418 if (len)
3432 p = (len / MAX_PTY_WRITE + 1) * MAX_PTY_WRITE;
3433 v_buffer = v_bufstr = v_bufptr = (unsigned char *)rxvt_malloc(p);
3434 v_bufend = v_buffer + p;
3435 } else {
3436 v_buffer = R->v_buffer;
3437 v_bufstr = R->v_bufstr;
3438 v_bufptr = R->v_bufptr;
3439 v_bufend = R->v_bufend;
3440 } 3419 {
3420 if (v_buflen == 0)
3421 {
3422 int written = write (cmd_fd, data, min (MAX_PTY_WRITE, len));
3423 if (written == len)
3424 return;
3441 3425
3442 /* 3426 data += written;
3443 * Append to the block we already have. Always doing this simplifies the 3427 len -= written;
3444 * code, and isn't too bad, either. If this is a short block, it isn't 3428 }
3445 * too expensive, and if this is a long block, we won't be able to write 3429
3446 * it all anyway. 3430
3447 */ 3431 v_buffer = (unsigned char *)realloc (v_buffer, v_buflen + len);
3448 if (len > 0) { 3432
3449 if (v_bufend < v_bufptr + len) { /* run out of room */ 3433 memcpy (v_buffer + v_buflen, data, len);
3450 if (v_bufstr != v_buffer) { 3434 v_buflen += len;
3451 /* there is unused space, move everything down */
3452 MEMMOVE(v_buffer, v_bufstr,
3453 (unsigned int)(v_bufptr - v_bufstr));
3454 v_bufptr -= v_bufstr - v_buffer;
3455 v_bufstr = v_buffer;
3456 } 3435 }
3457 if (v_bufend < v_bufptr + len) {
3458 /* still won't fit: get more space */
3459 /* use most basic realloc because an error is not fatal. */
3460 unsigned int size = v_bufptr - v_buffer;
3461 unsigned int reallocto;
3462 3436
3463 reallocto = ((size + len) / MAX_PTY_WRITE + 1) * MAX_PTY_WRITE; 3437 for (;;)
3464 v_buffer = (unsigned char *)realloc(v_buffer, reallocto); 3438 {
3465 /* save across realloc */ 3439 int written = write (cmd_fd, v_buffer, min (MAX_PTY_WRITE, v_buflen));
3466 if (v_buffer) { 3440
3467 v_bufstr = v_buffer; 3441 if (written > 0)
3468 v_bufptr = v_buffer + size; 3442 {
3469 v_bufend = v_buffer + reallocto; 3443 v_buflen -= written;
3470 } else { /* no memory: ignore entire write request */ 3444
3471 rxvt_print_error("data loss: cannot allocate buffer space"); 3445 if (v_buflen == 0)
3472 v_buffer = v_bufstr; /* restore clobbered pointer */ 3446 {
3473 } 3447 free (v_buffer);
3448 v_buffer = 0;
3449 v_buflen = 0;
3450
3451 pty_ev.set (EVENT_READ);
3452 return;
3453 }
3454
3455 memmove (v_buffer, v_buffer + written, v_buflen);
3456 }
3457 else if (written != -1 || (errno != EAGAIN && errno != EINTR))
3458 // original code just ignores this...
3459 destroy ();
3460 else
3461 {
3462 pty_ev.set (EVENT_READ | EVENT_WRITE);
3463 return;
3464 }
3474 } 3465 }
3475 }
3476 if (v_bufend >= v_bufptr + len) { /* new stuff will fit */
3477 MEMCPY(v_bufptr, d, len);
3478 v_bufptr += len;
3479 }
3480 }
3481
3482 /*
3483 * Write out as much of the buffer as we can.
3484 * Be careful not to overflow the pty's input silo.
3485 * We are conservative here and only write a small amount at a time.
3486 *
3487 * If we can't push all the data into the pty yet, we expect write
3488 * to return a non-negative number less than the length requested
3489 * (if some data written) or -1 and set errno to EAGAIN,
3490 * EWOULDBLOCK, or EINTR (if no data written).
3491 *
3492 * (Not all systems do this, sigh, so the code is actually
3493 * a little more forgiving.)
3494 */
3495 if ((p = v_bufptr - v_bufstr) > 0) {
3496 riten = write(R->cmd_fd, v_bufstr, min(p, MAX_PTY_WRITE));
3497 if (riten < 0)
3498 riten = 0;
3499 v_bufstr += riten;
3500 if (v_bufstr >= v_bufptr) /* we wrote it all */
3501 v_bufstr = v_bufptr = v_buffer;
3502 }
3503 /*
3504 * If we have lots of unused memory allocated, return it
3505 */
3506 if (v_bufend - v_bufptr > MAX_PTY_WRITE * 8) { /* arbitrary hysteresis */
3507 /* save pointers across realloc */
3508 unsigned int start = v_bufstr - v_buffer;
3509 unsigned int size = v_bufptr - v_buffer;
3510 unsigned int reallocto;
3511
3512 reallocto = (size / MAX_PTY_WRITE + 1) * MAX_PTY_WRITE;
3513 v_buffer = (unsigned char *)realloc(v_buffer, reallocto);
3514 if (v_buffer) {
3515 v_bufstr = v_buffer + start;
3516 v_bufptr = v_buffer + size;
3517 v_bufend = v_buffer + reallocto;
3518 } else {
3519 /* should we print a warning if couldn't return memory? */
3520 v_buffer = v_bufstr - start; /* restore clobbered pointer */
3521 }
3522 }
3523 R->v_buffer = v_buffer;
3524 R->v_bufstr = v_bufstr;
3525 R->v_bufptr = v_bufptr;
3526 R->v_bufend = v_bufend;
3527} 3466}
3467
3528/*----------------------- end-of-file (C source) -----------------------*/ 3468/*----------------------- end-of-file (C source) -----------------------*/
3529 3469

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines