[ViewVC] Diff of: cvs/rxvt-unicode/src/command.C

Comparing rxvt-unicode/src/command.C (file contents):
Revision 1.225 by root, Sun Jan 1 13:35:14 2006 UTC vs.
Revision 1.235 by root, Wed Jan 4 20:43:37 2006 UTC

  * along with this program; if not, write to the Free Software
  * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  *----------------------------------------------------------------------*/
 /*{{{ includes: */
-#include "../config.h"		/* NECESSARY */
+#include "../config.h"
-#include "rxvt.h"		/* NECESSARY */
+#include "rxvt.h"
+#include "rxvtperl.h"
 #include "version.h"
 #include "command.h"
 #if HAVE_SCHED_YIELD
+#undef HAVE_SCHED_YIELD // disabled for the time being
-# include <sched.h>
+//# include <sched.h>
 #endif
 #ifdef KEYSYM_RESOURCE
 # include "keyboard.h"
 #endif
           mb[0] = ch[0];
           len = 1;
         }
       if (len > 0)
-        tt_write ((unsigned char *)mb, len);
+        tt_write (mb, len);
       else
         scr_bell ();
     }
   iso14755buf = 0;
   KeySym keysym;
 #ifdef DEBUG_CMD
   static int debug_key = 1;	/* accessible by a debugger only */
 #endif
   int valid_keysym;
-  unsigned char kbuf[KBUFSZ];
+  char kbuf[KBUFSZ];
   /*
    * use Num_Lock to toggle Keypad on/off.  If Num_Lock is off, allow an
    * escape sequence to toggle the Keypad.
    *
       Status status_return;
 #if 0
 #ifdef X_HAVE_UTF8_STRING
       if (enc_utf8 && 0) // currently disabled, doesn't seem to work, nor is useful
-        len = Xutf8LookupString (Input_Context, &ev, (char *)kbuf,
+        len = Xutf8LookupString (Input_Context, &ev, kbuf,
                                  KBUFSZ, &keysym, &status_return);
       else
 #endif
 #endif
         {
                      || status_return == XLookupBoth;
     }
   else
 #endif
     {
-      len = XLookupString (&ev, (char *)kbuf, KBUFSZ, &keysym, &compose);
+      len = XLookupString (&ev, kbuf, KBUFSZ, &keysym, &compose);
       valid_keysym = keysym != NoSymbol;
     }
   if (valid_keysym)
     {
         {
 #ifdef META8_OPTION
           /* set 8-bit on */
           if (meta && (meta_char == 0x80))
             {
-              unsigned char  *ch;
+              char *ch;
               for (ch = kbuf; ch < kbuf + len; ch++)
                 *ch |= 0x80;
               meta = 0;
 #ifdef META8_OPTION
       && meta_char == C0_ESC
 #endif
      )
     {
-      const unsigned char ch = C0_ESC;
+      const char ch = C0_ESC;
       tt_write (&ch, 1);
     }
 #if defined(DEBUG_CMD)
   /* Display keyboard buffer contents */
 #if MENUBAR_MAX || defined (KEYSYM_RESOURCE)
 /*{{{ rxvt_cmd_write (), rxvt_cmd_getc () */
 /* attempt to `write' count to the input buffer */
 unsigned int
-rxvt_term::cmd_write (const unsigned char *str, unsigned int count)
+rxvt_term::cmd_write (const char *str, unsigned int count)
 {
   unsigned int n, s;
   n = cmdbuf_ptr - cmdbuf_base;
   s = cmdbuf_base + CBUFSIZ - 1 - cmdbuf_endp;
   SET_LOCALE (locale);
   display->flush ();
   if (want_refresh && !flush_ev.active)
-    flush_ev.start (NOW + 0.01);
+    flush_ev.start (NOW + 1. / 60.); // refresh at max. 60 hz normally
 }
 void
 rxvt_term::flush_cb (time_watcher &w)
 {
       w.start (w.at + SCROLLBAR_CONTINUOUS_DELAY);
     }
 }
 #endif
+#if HAVE_SCHED_YIELD
+static struct event_handler
+{
+  check_watcher cw_yield;
+  void yield (check_watcher &w)
+  {
+    sched_yield ();
+    w.stop ();
+  }
+  event_handler ()
+  : cw_yield (this, &event_handler::yield)
+  {
+  }
+} event_handler;
+#endif
 bool
 rxvt_term::pty_fill ()
 {
   ssize_t n = cmdbuf_endp - cmdbuf_ptr;
   if (CBUFSIZ == n)
     {
-      rxvt_warn ("pty_fill on full buffer, draining input, continuing.\n");
+      rxvt_warn ("PLEASE REPORT: pty_fill on full buffer, draining input, continuing.\n");
       n = 0;
     }
   memmove (cmdbuf_base, cmdbuf_ptr, n);
   cmdbuf_ptr = cmdbuf_base;
       return true;
     }
   else if (r < 0 && (errno == EAGAIN || errno == EINTR))
     {
 #if HAVE_SCHED_YIELD
-      sched_yield ();
+      if (display->is_local)
+        event_handler.cw_yield.start ();
 #endif
     }
   else
     {
       pty_ev.stop ();
 {
   if (!focus)
     {
       focus = 1;
       want_refresh = 1;
+      PERL_INVOKE ((this, HOOK_FOCUS_OUT, DT_END));
 #if USE_XIM
       if (Input_Context != NULL)
         {
           IMSetStatusPosition ();
           XSetICFocus (Input_Context);
   if (focus)
     {
       focus = 0;
       want_refresh = 1;
+      PERL_INVOKE ((this, HOOK_FOCUS_OUT, DT_END));
 #if ENABLE_FRILLS || ISO_14755
+      if (iso14755buf)
+        {
-      iso14755buf = 0;
+          iso14755buf = 0;
-#endif
-#if ENABLE_OVERLAY
+# if ENABLE_OVERLAY
-      scr_overlay_off ();
+          scr_overlay_off ();
+# endif
+        }
 #endif
 #if USE_XIM
       if (Input_Context != NULL)
         XUnsetICFocus (Input_Context);
 #endif
 rxvt_term::button_press (XButtonEvent &ev)
 {
   int reportmode = 0, clickintime;
   bypass_keystate = ev.state & (ModMetaMask | ShiftMask);
   if (!bypass_keystate)
     reportmode = !! (priv_modes & PrivMode_mouse_report);
   /*
    * VT window processing of button press
       else
         {
           if (ev.button != MEvent.button)
             MEvent.clicks = 0;
+          if (!PERL_INVOKE ((this, HOOK_MOUSE_CLICK, DT_XEVENT, &ev, DT_END)))
-          switch (ev.button)
+            switch (ev.button)
-            {
+              {
-              case Button1:
+                case Button1:
-                /* allow meta + click to select rectangular areas */
+                  /* allow meta + click to select rectangular areas */
-                /* should be done in screen.C */
+                  /* should be done in screen.C */
 #if ENABLE_FRILLS
-                selection.rect = !!(ev.state & ModMetaMask);
+                  selection.rect = !!(ev.state & ModMetaMask);
 #else
-                selection.rect = false;
+                  selection.rect = false;
 #endif
-                /* allow shift+left click to extend selection */
+                  /* allow shift+left click to extend selection */
-                if (ev.state & ShiftMask && ! (priv_modes & PrivMode_mouse_report))
+                  if (ev.state & ShiftMask && ! (priv_modes & PrivMode_mouse_report))
-                  {
+                    {
-                    if (MEvent.button == Button1 && clickintime)
+                      if (MEvent.button == Button1 && clickintime)
-                      selection_rotate (ev.x, ev.y);
+                        selection_rotate (ev.x, ev.y);
-                    else
+                      else
-                      selection_extend (ev.x, ev.y, 1);
+                        selection_extend (ev.x, ev.y, 1);
-                  }
+                    }
-                else
+                  else
-                  {
+                    {
-                    if (MEvent.button == Button1 && clickintime)
+                      if (MEvent.button == Button1 && clickintime)
-                      MEvent.clicks++;
+                        MEvent.clicks++;
-                    else
+                      else
-                      MEvent.clicks = 1;
+                        MEvent.clicks = 1;
-                    selection_click (MEvent.clicks, ev.x, ev.y);
+                      selection_click (MEvent.clicks, ev.x, ev.y);
-                  }
+                    }
-                MEvent.button = Button1;
+                  MEvent.button = Button1;
-                break;
+                  break;
-              case Button3:
+                case Button3:
-                if (MEvent.button == Button3 && clickintime)
+                  if (MEvent.button == Button3 && clickintime)
-                  selection_rotate (ev.x, ev.y);
+                    selection_rotate (ev.x, ev.y);
-                else
+                  else
-                  selection_extend (ev.x, ev.y, 1);
+                    selection_extend (ev.x, ev.y, 1);
-                MEvent.button = Button3;
+                  MEvent.button = Button3;
-                break;
+                  break;
-            }
+              }
-        }
+          }
       MEvent.time = ev.time;
       return;
     }
 bool
 rxvt_term::cmd_parse ()
 {
   bool flag = false;
   unicode_t ch = NOCHAR;
-  unsigned char *seq_begin; // remember start of esc-sequence here
+  char *seq_begin; // remember start of esc-sequence here
   for (;;)
     {
       if (ch == NOCHAR)
         {
                   if (!OPTION (Opt_jumpScroll)
                       || (refresh_count >= refresh_limit * (nrow - 1)))
                     {
                       refreshnow = true;
+                      refresh_count = 0;
                       ch = NOCHAR;
                       break;
                     }
                   // scr_add_lines only works for nlines <= nrow - 1.
                 refresh_limit++;
               else
                 {
                   flag = true;
                   scr_refresh (refresh_type);
+                  flush_ev.stop ();
                 }
             }
         }
       else
 rxvt_term::next_char ()
 {
   while (cmdbuf_ptr < cmdbuf_endp)
     {
       // assume 7-bit to be ascii ALWAYS
-      if (*cmdbuf_ptr <= 0x7f && *cmdbuf_ptr != 0x1b)
+      if ((unsigned char)*cmdbuf_ptr <= 0x7f && *cmdbuf_ptr != 0x1b)
         return *cmdbuf_ptr++;
       wchar_t wc;
-      size_t len = mbrtowc (&wc, (char *)cmdbuf_ptr, cmdbuf_endp - cmdbuf_ptr, mbstate);
+      size_t len = mbrtowc (&wc, cmdbuf_ptr, cmdbuf_endp - cmdbuf_ptr, mbstate);
       if (len == (size_t)-2)
         {
           // the mbstate stores incomplete sequences. didn't know this :/
           cmdbuf_ptr = cmdbuf_endp;
       case C0_ESC:
         process_escape_seq ();
         break;
       case C0_ENQ:	/* terminal Status */
         if (rs[Rs_answerbackstring])
-          tt_write ((const unsigned char *)rs[Rs_answerbackstring],
+          tt_write (rs [Rs_answerbackstring], strlen (rs [Rs_answerbackstring]));
-                    (unsigned int)strlen (rs[Rs_answerbackstring]));
         else
-          tt_write ((unsigned char *)VT100_ANS,
+          tt_write (VT100_ANS, strlen (VT100_ANS));
-                    (unsigned int)strlen (VT100_ANS));
         break;
       case C0_BEL:	/* bell */
         scr_bell ();
         break;
       case C0_BS:		/* backspace */
         process_dcs_seq ();
         break;
         /* 8.3.110: SINGLE CHARACTER INTRODUCER */
       case C1_SCI:		/* ESC Z */
-        tt_write ((const unsigned char *)ESCZ_ANSWER,
+        tt_write (ESCZ_ANSWER, sizeof (ESCZ_ANSWER) - 1);
-                 (unsigned int) (sizeof (ESCZ_ANSWER) - 1));
         break;			/* steal obsolete ESC [ c */
         /* 8.3.16: CONTROL SEQUENCE INTRODUCER */
       case C1_CSI:		/* ESC [ */
         process_csi_seq ();
       case CSI_SU:		/* 8.3.148: (1) SCROLL UP */
         scr_scroll_text (screen.tscroll, screen.bscroll, arg[0]);
         break;
       case CSI_DA:		/* 8.3.24: (0) DEVICE ATTRIBUTES */
-        tt_write ((const unsigned char *)VT100_ANS,
+        tt_write (VT100_ANS, sizeof (VT100_ANS) - 1);
-                  (unsigned int) (sizeof (VT100_ANS) - 1));
         break;
       case CSI_SGR:		/* 8.3.118: (0) SELECT GRAPHIC RENDITION */
         process_sgr_mode (nargs, arg);
         break;
 /*----------------------------------------------------------------------*/
 /*
  * get input up until STRING TERMINATOR (or BEL)
  * ends_how is terminator used. returned input must be free()'d
  */
-unsigned char *
+char *
 rxvt_term::get_to_st (unicode_t &ends_how)
 {
   unicode_t ch;
   bool seen_esc = false;
   unsigned int n = 0;
   string[n++] = '\0';
   ends_how = (ch == 0x5c ? C0_ESC : ch);
-  return (unsigned char *)rxvt_wcstombs (string);
+  return rxvt_wcstombs (string);
 }
 /*----------------------------------------------------------------------*/
 /*
  * process DEVICE CONTROL STRING `ESC P ... (ST|BEL)' or `0x90 ... (ST|BEL)'
  */
 void
 rxvt_term::process_dcs_seq ()
 {
-  unsigned char *s;
+  char *s;
   unicode_t eh;
   /*
    * Not handled yet
    */
   for (arg = 0; isdigit (ch); ch = cmd_getc ())
     arg = arg * 10 + (ch - '0');
   if (ch == ';')
     {
-      unsigned char *s = get_to_st (eh);
+      char *s = get_to_st (eh);
       if (s)
         {
-          process_xterm_seq (arg, (char *)s, eh);
+          process_xterm_seq (arg, s, eh);
           free (s);
         }
     }
 }
 void
-rxvt_term::process_color_seq (int report, int color, const char *str, unsigned char resp)
+rxvt_term::process_color_seq (int report, int color, const char *str, char resp)
 {
   if (str[0] == '?' && !str[1])
     {
       unsigned short r, g, b;
       pix_colors_focused[color].get (display, r, g, b);
 /*
  * XTerm escape sequences: ESC ] Ps;Pt (ST|BEL)
  */
 void
-rxvt_term::process_xterm_seq (int op, const char *str, unsigned char resp)
+rxvt_term::process_xterm_seq (int op, const char *str, char resp)
 {
   int changed = 0;
   int color;
   char *buf, *name;
   bool query = str[0] == '?' && !str[1];
           }
         break;
       case URxvt_view_up:
       case URxvt_view_down:
+        {
-        int lines = atoi (str);
+          int lines = atoi (str);
-        if (lines)
+          if (lines)
-          scr_page (op == URxvt_view_up ? UP : DN, lines);
+            scr_page (op == URxvt_view_up ? UP : DN, lines);
-        else
+          else
-          {
             scr_erase_savelines ();
-          }
+        }
+        break;
+#endif
+#if ENABLE_PERL
+      case URxvt_perl:
+        if (PERL_INVOKE ((this, HOOK_OSC_SEQ, DT_STRING, str, DT_END)))
+          ; // no responses yet
         break;
 #endif
     }
 }
 /*----------------------------------------------------------------------*/
             scr_color (Color_bg, Color_bg);
             break;
           //case 50: // not variable spacing
-#ifndef NO_BRIGHTCOLOR
+#if ENABLE_FRILLS
           case 90:
           case 91:		/* set bright fg color */
           case 92:
           case 93:
           case 94:
  */
 void
 rxvt_term::tt_printf (const char *fmt,...)
 {
   va_list arg_ptr;
-  unsigned char buf[256];
+  char buf[256];
   va_start (arg_ptr, fmt);
   vsnprintf ((char *)buf, 256, fmt, arg_ptr);
   va_end (arg_ptr);
   tt_write (buf, strlen (buf));
  * or generated by us in response to a query ESC sequence.
  */
 const unsigned int MAX_PTY_WRITE = 255; // minimum MAX_INPUT
 void
-rxvt_term::tt_write (const unsigned char *data, unsigned int len)
+rxvt_term::tt_write (const char *data, unsigned int len)
 {
   if (v_buflen == 0)
     {
       ssize_t written = write (pty.pty, data, min (len, MAX_PTY_WRITE));
       data += written;
       len  -= written;
     }
-  v_buffer = (unsigned char *)realloc (v_buffer, v_buflen + len);
+  v_buffer = (char *)realloc (v_buffer, v_buflen + len);
   memcpy (v_buffer + v_buflen, data, len);
   v_buflen += len;
   pty_ev.set (EVENT_READ | EVENT_WRITE);

Diff Legend

-–
+Removed lines
-+
+Added lines
-<
+Changed lines
->
+Changed lines

Comparing rxvt-unicode/src/command.C (file contents): Revision 1.225 by root, Sun Jan 1 13:35:14 2006 UTC vs. Revision 1.235 by root, Wed Jan 4 20:43:37 2006 UTC

Diff Legend

Comparing rxvt-unicode/src/command.C (file contents):
Revision 1.225 by root, Sun Jan 1 13:35:14 2006 UTC vs.
Revision 1.235 by root, Wed Jan 4 20:43:37 2006 UTC