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.229 by root, Tue Jan 3 17:34:44 2006 UTC vs.
Revision 1.236 by root, Thu Jan 5 01:04:10 2006 UTC

50#include "rxvtperl.h" 50#include "rxvtperl.h"
51#include "version.h" 51#include "version.h"
52#include "command.h" 52#include "command.h"
53 53
54#if HAVE_SCHED_YIELD 54#if HAVE_SCHED_YIELD
55#undef HAVE_SCHED_YIELD // disabled for the time being
55# include <sched.h> 56//# include <sched.h>
56#endif 57#endif
57 58
58#ifdef KEYSYM_RESOURCE 59#ifdef KEYSYM_RESOURCE
59# include "keyboard.h" 60# include "keyboard.h"
60#endif 61#endif
267 mb[0] = ch[0]; 268 mb[0] = ch[0];
268 len = 1; 269 len = 1;
269 } 270 }
270 271
271 if (len > 0) 272 if (len > 0)
272 tt_write ((unsigned char *)mb, len); 273 tt_write (mb, len);
273 else 274 else
274 scr_bell (); 275 scr_bell ();
275 } 276 }
276 277
277 iso14755buf = 0; 278 iso14755buf = 0;
305 KeySym keysym; 306 KeySym keysym;
306#ifdef DEBUG_CMD 307#ifdef DEBUG_CMD
307 static int debug_key = 1; /* accessible by a debugger only */ 308 static int debug_key = 1; /* accessible by a debugger only */
308#endif 309#endif
309 int valid_keysym; 310 int valid_keysym;
310 unsigned char kbuf[KBUFSZ]; 311 char kbuf[KBUFSZ];
311 312
312 /* 313 /*
313 * 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
314 * escape sequence to toggle the Keypad. 315 * escape sequence to toggle the Keypad.
315 * 316 *
333 Status status_return; 334 Status status_return;
334 335
335#if 0 336#if 0
336#ifdef X_HAVE_UTF8_STRING 337#ifdef X_HAVE_UTF8_STRING
337 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
338 len = Xutf8LookupString (Input_Context, &ev, (char *)kbuf, 339 len = Xutf8LookupString (Input_Context, &ev, kbuf,
339 KBUFSZ, &keysym, &status_return); 340 KBUFSZ, &keysym, &status_return);
340 else 341 else
341#endif 342#endif
342#endif 343#endif
343 { 344 {
380 || status_return == XLookupBoth; 381 || status_return == XLookupBoth;
381 } 382 }
382 else 383 else
383#endif 384#endif
384 { 385 {
385 len = XLookupString (&ev, (char *)kbuf, KBUFSZ, &keysym, &compose); 386 len = XLookupString (&ev, kbuf, KBUFSZ, &keysym, &compose);
386 valid_keysym = keysym != NoSymbol; 387 valid_keysym = keysym != NoSymbol;
387 } 388 }
388 389
389 if (valid_keysym) 390 if (valid_keysym)
390 { 391 {
854 { 855 {
855#ifdef META8_OPTION 856#ifdef META8_OPTION
856 /* set 8-bit on */ 857 /* set 8-bit on */
857 if (meta && (meta_char == 0x80)) 858 if (meta && (meta_char == 0x80))
858 { 859 {
859 unsigned char *ch; 860 char *ch;
860 861
861 for (ch = kbuf; ch < kbuf + len; ch++) 862 for (ch = kbuf; ch < kbuf + len; ch++)
862 *ch |= 0x80; 863 *ch |= 0x80;
863 864
864 meta = 0; 865 meta = 0;
897#ifdef META8_OPTION 898#ifdef META8_OPTION
898 && meta_char == C0_ESC 899 && meta_char == C0_ESC
899#endif 900#endif
900 ) 901 )
901 { 902 {
902 const unsigned char ch = C0_ESC; 903 const char ch = C0_ESC;
903 tt_write (&ch, 1); 904 tt_write (&ch, 1);
904 } 905 }
905 906
906#if defined(DEBUG_CMD) 907#if defined(DEBUG_CMD)
907 /* Display keyboard buffer contents */ 908 /* Display keyboard buffer contents */
919 920
920#if MENUBAR_MAX || defined (KEYSYM_RESOURCE) 921#if MENUBAR_MAX || defined (KEYSYM_RESOURCE)
921/*{{{ rxvt_cmd_write (), rxvt_cmd_getc () */ 922/*{{{ rxvt_cmd_write (), rxvt_cmd_getc () */
922/* attempt to `write' count to the input buffer */ 923/* attempt to `write' count to the input buffer */
923unsigned int 924unsigned int
924rxvt_term::cmd_write (const unsigned char *str, unsigned int count) 925rxvt_term::cmd_write (const char *str, unsigned int count)
925{ 926{
926 unsigned int n, s; 927 unsigned int n, s;
927 928
928 n = cmdbuf_ptr - cmdbuf_base; 929 n = cmdbuf_ptr - cmdbuf_base;
929 s = cmdbuf_base + CBUFSIZ - 1 - cmdbuf_endp; 930 s = cmdbuf_base + CBUFSIZ - 1 - cmdbuf_endp;
1095{ 1096{
1096 ssize_t n = cmdbuf_endp - cmdbuf_ptr; 1097 ssize_t n = cmdbuf_endp - cmdbuf_ptr;
1097 1098
1098 if (CBUFSIZ == n) 1099 if (CBUFSIZ == n)
1099 { 1100 {
1100 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");
1101 n = 0; 1102 n = 0;
1102 } 1103 }
1103 1104
1104 memmove (cmdbuf_base, cmdbuf_ptr, n); 1105 memmove (cmdbuf_base, cmdbuf_ptr, n);
1105 cmdbuf_ptr = cmdbuf_base; 1106 cmdbuf_ptr = cmdbuf_base;
2670bool 2671bool
2671rxvt_term::cmd_parse () 2672rxvt_term::cmd_parse ()
2672{ 2673{
2673 bool flag = false; 2674 bool flag = false;
2674 unicode_t ch = NOCHAR; 2675 unicode_t ch = NOCHAR;
2675 unsigned char *seq_begin; // remember start of esc-sequence here 2676 char *seq_begin; // remember start of esc-sequence here
2676 2677
2677 for (;;) 2678 for (;;)
2678 { 2679 {
2679 if (ch == NOCHAR) 2680 if (ch == NOCHAR)
2680 { 2681 {
2732 } 2733 }
2733 2734
2734 // scr_add_lines only works for nlines <= nrow - 1. 2735 // scr_add_lines only works for nlines <= nrow - 1.
2735 if (nlines >= nrow - 1) 2736 if (nlines >= nrow - 1)
2736 { 2737 {
2738 if (!PERL_INVOKE ((this, HOOK_ADD_LINES, DT_USTRING_LEN, buf, str - buf, DT_END)))
2737 scr_add_lines (buf, nlines, str - buf); 2739 scr_add_lines (buf, nlines, str - buf);
2740
2738 nlines = 0; 2741 nlines = 0;
2739 str = buf; 2742 str = buf;
2740 eol = str + min (ncol, UBUFSIZ); 2743 eol = str + min (ncol, UBUFSIZ);
2741 } 2744 }
2742 2745
2755 2758
2756 seq_begin = cmdbuf_ptr; 2759 seq_begin = cmdbuf_ptr;
2757 ch = next_char (); 2760 ch = next_char ();
2758 } 2761 }
2759 2762
2763 if (!PERL_INVOKE ((this, HOOK_ADD_LINES, DT_USTRING_LEN, buf, str - buf, DT_END)))
2760 scr_add_lines (buf, nlines, str - buf); 2764 scr_add_lines (buf, nlines, str - buf);
2761 2765
2762 /* 2766 /*
2763 * 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
2764 * 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.
2765 * the number of pages between refreshes is refresh_limit, which 2769 * the number of pages between refreshes is refresh_limit, which
2812rxvt_term::next_char () 2816rxvt_term::next_char ()
2813{ 2817{
2814 while (cmdbuf_ptr < cmdbuf_endp) 2818 while (cmdbuf_ptr < cmdbuf_endp)
2815 { 2819 {
2816 // assume 7-bit to be ascii ALWAYS 2820 // assume 7-bit to be ascii ALWAYS
2817 if (*cmdbuf_ptr <= 0x7f && *cmdbuf_ptr != 0x1b) 2821 if ((unsigned char)*cmdbuf_ptr <= 0x7f && *cmdbuf_ptr != 0x1b)
2818 return *cmdbuf_ptr++; 2822 return *cmdbuf_ptr++;
2819 2823
2820 wchar_t wc; 2824 wchar_t wc;
2821 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);
2822 2826
2823 if (len == (size_t)-2) 2827 if (len == (size_t)-2)
2824 { 2828 {
2825 // the mbstate stores incomplete sequences. didn't know this :/ 2829 // the mbstate stores incomplete sequences. didn't know this :/
2826 cmdbuf_ptr = cmdbuf_endp; 2830 cmdbuf_ptr = cmdbuf_endp;
2965 case C0_ESC: 2969 case C0_ESC:
2966 process_escape_seq (); 2970 process_escape_seq ();
2967 break; 2971 break;
2968 case C0_ENQ: /* terminal Status */ 2972 case C0_ENQ: /* terminal Status */
2969 if (rs[Rs_answerbackstring]) 2973 if (rs[Rs_answerbackstring])
2970 tt_write ((const unsigned char *)rs[Rs_answerbackstring], 2974 tt_write (rs [Rs_answerbackstring], strlen (rs [Rs_answerbackstring]));
2971 (unsigned int)strlen (rs[Rs_answerbackstring]));
2972 else 2975 else
2973 tt_write ((unsigned char *)VT100_ANS, 2976 tt_write (VT100_ANS, strlen (VT100_ANS));
2974 (unsigned int)strlen (VT100_ANS));
2975 break; 2977 break;
2976 case C0_BEL: /* bell */ 2978 case C0_BEL: /* bell */
2977 scr_bell (); 2979 scr_bell ();
2978 break; 2980 break;
2979 case C0_BS: /* backspace */ 2981 case C0_BS: /* backspace */
3167 process_dcs_seq (); 3169 process_dcs_seq ();
3168 break; 3170 break;
3169 3171
3170 /* 8.3.110: SINGLE CHARACTER INTRODUCER */ 3172 /* 8.3.110: SINGLE CHARACTER INTRODUCER */
3171 case C1_SCI: /* ESC Z */ 3173 case C1_SCI: /* ESC Z */
3172 tt_write ((const unsigned char *)ESCZ_ANSWER, 3174 tt_write (ESCZ_ANSWER, sizeof (ESCZ_ANSWER) - 1);
3173 (unsigned int) (sizeof (ESCZ_ANSWER) - 1));
3174 break; /* steal obsolete ESC [ c */ 3175 break; /* steal obsolete ESC [ c */
3175 3176
3176 /* 8.3.16: CONTROL SEQUENCE INTRODUCER */ 3177 /* 8.3.16: CONTROL SEQUENCE INTRODUCER */
3177 case C1_CSI: /* ESC [ */ 3178 case C1_CSI: /* ESC [ */
3178 process_csi_seq (); 3179 process_csi_seq ();
3422 case CSI_SU: /* 8.3.148: (1) SCROLL UP */ 3423 case CSI_SU: /* 8.3.148: (1) SCROLL UP */
3423 scr_scroll_text (screen.tscroll, screen.bscroll, arg[0]); 3424 scr_scroll_text (screen.tscroll, screen.bscroll, arg[0]);
3424 break; 3425 break;
3425 3426
3426 case CSI_DA: /* 8.3.24: (0) DEVICE ATTRIBUTES */ 3427 case CSI_DA: /* 8.3.24: (0) DEVICE ATTRIBUTES */
3427 tt_write ((const unsigned char *)VT100_ANS, 3428 tt_write (VT100_ANS, sizeof (VT100_ANS) - 1);
3428 (unsigned int) (sizeof (VT100_ANS) - 1));
3429 break; 3429 break;
3430 3430
3431 case CSI_SGR: /* 8.3.118: (0) SELECT GRAPHIC RENDITION */ 3431 case CSI_SGR: /* 8.3.118: (0) SELECT GRAPHIC RENDITION */
3432 process_sgr_mode (nargs, arg); 3432 process_sgr_mode (nargs, arg);
3433 break; 3433 break;
3635/*----------------------------------------------------------------------*/ 3635/*----------------------------------------------------------------------*/
3636/* 3636/*
3637 * get input up until STRING TERMINATOR (or BEL) 3637 * get input up until STRING TERMINATOR (or BEL)
3638 * ends_how is terminator used. returned input must be free()'d 3638 * ends_how is terminator used. returned input must be free()'d
3639 */ 3639 */
3640unsigned char * 3640char *
3641rxvt_term::get_to_st (unicode_t &ends_how) 3641rxvt_term::get_to_st (unicode_t &ends_how)
3642{ 3642{
3643 unicode_t ch; 3643 unicode_t ch;
3644 bool seen_esc = false; 3644 bool seen_esc = false;
3645 unsigned int n = 0; 3645 unsigned int n = 0;
3678 3678
3679 string[n++] = '\0'; 3679 string[n++] = '\0';
3680 3680
3681 ends_how = (ch == 0x5c ? C0_ESC : ch); 3681 ends_how = (ch == 0x5c ? C0_ESC : ch);
3682 3682
3683 return (unsigned char *)rxvt_wcstombs (string); 3683 return rxvt_wcstombs (string);
3684} 3684}
3685 3685
3686/*----------------------------------------------------------------------*/ 3686/*----------------------------------------------------------------------*/
3687/* 3687/*
3688 * 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)'
3689 */ 3689 */
3690void 3690void
3691rxvt_term::process_dcs_seq () 3691rxvt_term::process_dcs_seq ()
3692{ 3692{
3693 unsigned char *s; 3693 char *s;
3694 unicode_t eh; 3694 unicode_t eh;
3695 3695
3696 /* 3696 /*
3697 * Not handled yet 3697 * Not handled yet
3698 */ 3698 */
3717 for (arg = 0; isdigit (ch); ch = cmd_getc ()) 3717 for (arg = 0; isdigit (ch); ch = cmd_getc ())
3718 arg = arg * 10 + (ch - '0'); 3718 arg = arg * 10 + (ch - '0');
3719 3719
3720 if (ch == ';') 3720 if (ch == ';')
3721 { 3721 {
3722 unsigned char *s = get_to_st (eh); 3722 char *s = get_to_st (eh);
3723 3723
3724 if (s) 3724 if (s)
3725 { 3725 {
3726 process_xterm_seq (arg, (char *)s, eh); 3726 process_xterm_seq (arg, s, eh);
3727 free (s); 3727 free (s);
3728 } 3728 }
3729 } 3729 }
3730} 3730}
3731 3731
3732void 3732void
3733rxvt_term::process_color_seq (int report, int color, const char *str, unsigned char resp) 3733rxvt_term::process_color_seq (int report, int color, const char *str, char resp)
3734{ 3734{
3735 if (str[0] == '?' && !str[1]) 3735 if (str[0] == '?' && !str[1])
3736 { 3736 {
3737 unsigned short r, g, b; 3737 unsigned short r, g, b;
3738 pix_colors_focused[color].get (display, r, g, b); 3738 pix_colors_focused[color].get (display, r, g, b);
3744 3744
3745/* 3745/*
3746 * XTerm escape sequences: ESC ] Ps;Pt (ST|BEL) 3746 * XTerm escape sequences: ESC ] Ps;Pt (ST|BEL)
3747 */ 3747 */
3748void 3748void
3749rxvt_term::process_xterm_seq (int op, const char *str, unsigned char resp) 3749rxvt_term::process_xterm_seq (int op, const char *str, char resp)
3750{ 3750{
3751 int changed = 0; 3751 int changed = 0;
3752 int color; 3752 int color;
3753 char *buf, *name; 3753 char *buf, *name;
3754 bool query = str[0] == '?' && !str[1]; 3754 bool query = str[0] == '?' && !str[1];
3961 } 3961 }
3962 break; 3962 break;
3963 3963
3964 case URxvt_view_up: 3964 case URxvt_view_up:
3965 case URxvt_view_down: 3965 case URxvt_view_down:
3966 {
3966 int lines = atoi (str); 3967 int lines = atoi (str);
3967 3968
3968 if (lines) 3969 if (lines)
3969 scr_page (op == URxvt_view_up ? UP : DN, lines); 3970 scr_page (op == URxvt_view_up ? UP : DN, lines);
3970 else 3971 else
3971 {
3972 scr_erase_savelines (); 3972 scr_erase_savelines ();
3973 } 3973 }
3974 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
3975 break; 3982 break;
3976#endif 3983#endif
3977 } 3984 }
3978} 3985}
3979/*----------------------------------------------------------------------*/ 3986/*----------------------------------------------------------------------*/
4336 scr_color (Color_bg, Color_bg); 4343 scr_color (Color_bg, Color_bg);
4337 break; 4344 break;
4338 4345
4339 //case 50: // not variable spacing 4346 //case 50: // not variable spacing
4340 4347
4341#ifndef NO_BRIGHTCOLOR 4348#if ENABLE_FRILLS
4342 case 90: 4349 case 90:
4343 case 91: /* set bright fg color */ 4350 case 91: /* set bright fg color */
4344 case 92: 4351 case 92:
4345 case 93: 4352 case 93:
4346 case 94: 4353 case 94:
4391 */ 4398 */
4392void 4399void
4393rxvt_term::tt_printf (const char *fmt,...) 4400rxvt_term::tt_printf (const char *fmt,...)
4394{ 4401{
4395 va_list arg_ptr; 4402 va_list arg_ptr;
4396 unsigned char buf[256]; 4403 char buf[256];
4397 4404
4398 va_start (arg_ptr, fmt); 4405 va_start (arg_ptr, fmt);
4399 vsnprintf ((char *)buf, 256, fmt, arg_ptr); 4406 vsnprintf ((char *)buf, 256, fmt, arg_ptr);
4400 va_end (arg_ptr); 4407 va_end (arg_ptr);
4401 tt_write (buf, strlen (buf)); 4408 tt_write (buf, strlen (buf));
4406 * or generated by us in response to a query ESC sequence. 4413 * or generated by us in response to a query ESC sequence.
4407 */ 4414 */
4408const unsigned int MAX_PTY_WRITE = 255; // minimum MAX_INPUT 4415const unsigned int MAX_PTY_WRITE = 255; // minimum MAX_INPUT
4409 4416
4410void 4417void
4411rxvt_term::tt_write (const unsigned char *data, unsigned int len) 4418rxvt_term::tt_write (const char *data, unsigned int len)
4412{ 4419{
4413 if (v_buflen == 0) 4420 if (v_buflen == 0)
4414 { 4421 {
4415 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));
4416 4423
4419 4426
4420 data += written; 4427 data += written;
4421 len -= written; 4428 len -= written;
4422 } 4429 }
4423 4430
4424 v_buffer = (unsigned char *)realloc (v_buffer, v_buflen + len); 4431 v_buffer = (char *)realloc (v_buffer, v_buflen + len);
4425 4432
4426 memcpy (v_buffer + v_buflen, data, len); 4433 memcpy (v_buffer + v_buflen, data, len);
4427 v_buflen += len; 4434 v_buflen += len;
4428 4435
4429 pty_ev.set (EVENT_READ | EVENT_WRITE); 4436 pty_ev.set (EVENT_READ | EVENT_WRITE);

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines