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

Comparing rxvt-unicode/src/screen.C (file contents):
Revision 1.186 by root, Wed Dec 21 19:50:17 2005 UTC vs.
Revision 1.208 by root, Wed Jan 4 05:24:55 2006 UTC

  * This file handles _all_ screen updates and selections
  */
 #include "../config.h"          /* NECESSARY */
 #include "rxvt.h"               /* NECESSARY */
+#include "rxvtperl.h"           /* NECESSARY */
 #include <X11/Xmd.h>            /* get the typedef for CARD32 */
 #include <inttypes.h>
 /* ------------------------------------------------------------------------- *
  *             GENERAL SCREEN AND SELECTION UPDATE ROUTINES                  *
  * ------------------------------------------------------------------------- */
 #define ZERO_SCROLLBACK()                                              \
-    if (options & Opt_scrollTtyOutput)                                 \
+    if (OPTION (Opt_scrollTtyOutput))                                  \
         view_start = 0
 #define CLEAR_SELECTION()                                              \
     selection.beg.row = selection.beg.col                              \
         = selection.end.row = selection.end.col = 0
 #define CLEAR_ALL_SELECTION()                                          \
     {
       /*
        * add or delete rows as appropriate
        */
-     printf ("resize %d:%d => %d:%d\n", prev_nrow, prev_ncol, nrow, ncol);//D
       rxvt_salloc *old_ta = talloc; talloc = new rxvt_salloc (ncol * sizeof (text_t));
       rxvt_salloc *old_ra = ralloc; ralloc = new rxvt_salloc (ncol * sizeof (rend_t));
 #if 0
       if (nrow < prev_nrow)
               lfree (drawn_buf[row]);
             }
         }
 #endif
-      drawn_buf = (line_t *) rxvt_realloc (drawn_buf, nrow * sizeof (line_t));
+      drawn_buf = (line_t *)rxvt_realloc (drawn_buf, nrow * sizeof (line_t));
-      temp_buf  = (line_t *) rxvt_realloc (temp_buf , nrow * sizeof (line_t));
+      temp_buf  = (line_t *)rxvt_realloc (temp_buf , nrow * sizeof (line_t));
-      swap_buf  = (line_t *) rxvt_realloc (swap_buf , nrow * sizeof (line_t));
+      swap_buf  = (line_t *)rxvt_realloc (swap_buf , nrow * sizeof (line_t));
       for (int row = min (nrow, prev_nrow); row--; )
         {
           lresize (drawn_buf[row]);
           lresize (swap_buf [row]);
           drawn_buf[row].clear (); scr_blank_screen_mem (drawn_buf[row], DEFAULT_RSTYLE);
         }
       line_t *old_buf = row_buf; row_buf = (line_t *)rxvt_calloc (total_rows, sizeof (line_t));
-      // re-wrap lines, this is rather ugly, possibly because I am too dumb
-      // to come up with a lean and mean algorithm.
-      int p    = MOD (term_start + nrow  , prev_total_rows);  // previous row
+      int p    = MOD (term_start + prev_nrow, prev_total_rows);  // previous row
-      int pend = MOD (term_start - nsaved, prev_total_rows);
+      int pend = MOD (term_start - nsaved   , prev_total_rows);
       int q    = total_rows; // rewrapped row
-      while (p != pend && q > 0)
+      if (nsaved)
+        {
+          // re-wrap lines, this is rather ugly, possibly because I am too dumb
+          // to come up with a lean and mean algorithm.
+          row_col_t ocur = screen.cur;
+          ocur.row = MOD (term_start + ocur.row, prev_total_rows);
-        {
+          do
-          p = MOD (p - 1, prev_total_rows);
-          assert (old_buf [MOD (p, prev_total_rows)].t);
-          assert (!old_buf [MOD (p, prev_total_rows)].is_longer ());
-          int llen = old_buf [MOD (p, prev_total_rows)].l;
-          while (p != pend && old_buf [MOD (p - 1, prev_total_rows)].is_longer ())
             {
               p = MOD (p - 1, prev_total_rows);
+#ifdef DEBUG_STRICT
+              assert (old_buf [MOD (p, prev_total_rows)].t);
+#endif
-              llen += prev_ncol;
-            }
-          int qlines = llen / ncol + 1;
-          int lofs = 0;
+              int plines = 1;
+              int llen = old_buf [MOD (p, prev_total_rows)].l;
-          q -= qlines;
+              while (p != pend && old_buf [MOD (p - 1, prev_total_rows)].is_longer ())
-          int qrow = q;
-          for (; qlines--; qrow++)
-            {
-              if (qrow >= 0)
                 {
+                  p = MOD (p - 1, prev_total_rows);
+                  plines++;
+                  llen += prev_ncol;
+                }
+              int qlines = max (0, (llen - 1) / ncol) + 1;
+              // drop partial lines completely
+              if (q < qlines)
+                break;
+              q -= qlines;
+              int lofs = 0;
+              line_t *qline;
+              // re-assemble the full line by destination lines
+              for (int qrow = q; qlines--; qrow++)
+                {
-                  line_t &qline = row_buf [qrow];
+                  qline = row_buf + qrow;
-                  lalloc (qline);
+                  lalloc (*qline);
-                  qline.set_is_longer ();
+                  qline->set_is_longer ();
                   int qcol = 0;
-                  for (;;)
+                  // fill a single destination line
+                  while (lofs < llen && qcol < ncol)
                     {
-                      int prow = lofs / prev_ncol + p;
+                      int prow = lofs / prev_ncol;
                       int pcol = lofs % prev_ncol;
+                      prow = MOD (p + prow, prev_total_rows);
+                      // we only adjust the cursor _row_ and put it into
+                      // the topmost line of "long line" it was in, as
+                      // this seems to upset applications/shells/readline
+                      // least.
+                      if (prow == ocur.row)
+                        screen.cur.row = q - (total_rows - nrow);
-                      line_t &pline = old_buf [p];
+                      line_t &pline = old_buf [prow];
                       int len = min (min (prev_ncol - pcol, ncol - qcol), llen - lofs);
-                      printf ("q %d lofs %d>%d len %d pq %d:%d p %d:%d q :%d\n", q, llen, lofs, len, prev_ncol, ncol, prow, pcol, qcol);
-                      if (len <= 0)
-                        {
-                          qline.l = qcol;
-                          scr_blank_line (qline, qcol, ncol - qcol, DEFAULT_RSTYLE);
-                          break;
-                        }
-                      assert (lofs < 1000);
+                      assert (len);
+                      assert (pline.t);
-                      memcpy (qline.t + qcol, pline.t + pcol, len * sizeof (text_t));
+                      memcpy (qline->t + qcol, pline.t + pcol, len * sizeof (text_t));
-                      memcpy (qline.r + qcol, pline.r + pcol, len * sizeof (rend_t));
+                      memcpy (qline->r + qcol, pline.r + pcol, len * sizeof (rend_t));
                       lofs += len;
                       qcol += len;
-                      if (qcol == ncol)
-                        break;
                     }
                 }
+              qline->l = llen ? MOD (llen - 1, ncol) + 1 : 0;
+#ifdef DEBUG_STRICT //TODO//FIXME//TEMPORARY
+              if (qline->l < 0)
-              else
+                {
-                lofs += ncol;
+                  fprintf (stderr, "ERROR, PLEASE REPORT to rxvt-unicode@plan9.de: qline->l %d = llen %d < ncol %d ? %d : MOD %d\n", qline->l,llen,ncol,llen,MOD (llen - 1, ncol) + 1);//D
+                  qline->l = 0;
+                }
+#endif
+              scr_blank_line (*qline, qline->l, ncol - qline->l, DEFAULT_RSTYLE);
             }
+          while (p != pend && q > 0);
+          term_start = total_rows - nrow;
+          nsaved = term_start - q;
+          // make sure all terminal lines exist
+          while (nsaved < 0)
+            scr_blank_screen_mem (ROW (-++nsaved), DEFAULT_RSTYLE);
+        }
+      else
-        }
+        {
+          // if no scrollback exists (yet), wing, instead of wrap
+          for (int row = min (nrow, prev_nrow); row--; )
+            {
+              line_t &pline = old_buf [MOD (term_start + row, prev_total_rows)];
+              line_t &qline = row_buf [row];
+              qline = pline;
+              lresize (qline);
+            }
+          for (int row = prev_nrow; row < nrow; row++)
+            {
+              row_buf [row].clear (); scr_blank_screen_mem (row_buf [row], DEFAULT_RSTYLE);
+            }
+          term_start = 0;
+        }
+#ifdef DEBUG_STRICT //TODO: remove
+      for (int i = -nsaved; i < nrow; i++)
+        assert (ROW (i).t);
+#endif
       free (old_buf);
       delete old_ta;
       delete old_ra;
-      min_it (screen.cur.row, nrow - 1);
+      clamp_it (screen.cur.row, 0, nrow - 1);
-      min_it (screen.cur.col, ncol - 1);
+      clamp_it (screen.cur.col, 0, ncol - 1);
       if (tabs)
         free (tabs);
     }
   for (int col = ncol; col--; )
     tabs [col] = col % TABSIZE == 0;
   tt_winch ();
+  PERL_INVOKE ((this, HOOK_RESET, DT_END));
 }
 /* ------------------------------------------------------------------------- */
 /*
  * Free everything.  That way malloc debugging can find leakage.
   free (row_buf);
   free (swap_buf);
   free (drawn_buf);
   free (temp_buf);
   free (tabs);
+  row_buf = 0; // signal that we freed all the arrays
 }
 /* ------------------------------------------------------------------------- */
 /*
  * Hard reset
   min_it (s->cur.row, nrow - 1);
   min_it (s->cur.col, ncol - 1);
 #ifdef DEBUG_STRICT
   assert (s->cur.row >= 0);
   assert (s->cur.col >= 0);
-#else                           /* drive with your eyes closed */
-  max_it (s->cur.row, 0);
-  max_it (s->cur.col, 0);
 #endif
 }
 /* ------------------------------------------------------------------------- */
 /*
   screen.cur.row = clamp (screen.cur.row, 0, prev_nrow - 1);
   screen.cur.col = clamp (screen.cur.col, 0, prev_ncol - 1);
 #if NSCREENS
-  if (options & Opt_secondaryScreen)
+  if (OPTION (Opt_secondaryScreen))
     {
       num_scr = 0;
-      for (int i = nrow; i--; )
+      for (int i = prev_nrow; i--; )
         ::swap (ROW(i), swap_buf [i]);
       ::swap (screen.charset, swap.charset);
       ::swap (screen.flags, swap.flags);
       screen.flags |= Screen_VisibleCursor;
       swap.flags |= Screen_VisibleCursor;
     }
   else
 #endif
-    if (options & Opt_secondaryScroll)
+    if (OPTION (Opt_secondaryScroll))
       scr_scroll_text (0, prev_nrow - 1, prev_nrow);
   return scrn;
 }
   num_scr += count;
   if (count > 0
       && row1 == 0
       && row2 == nrow - 1
-      && (current_screen == PRIMARY || options & Opt_secondaryScroll))
+      && (current_screen == PRIMARY || OPTION (Opt_secondaryScroll)))
     {
       nsaved = min (nsaved + count, saveLines);
+      PERL_INVOKE ((this, HOOK_SCROLL_BACK, DT_INT, count, DT_INT, nsaved, DT_END));
       term_start = (term_start + count) % total_rows;
       if (selection.op && current_screen == selection.screen)
         {
           selection.beg.row  -= count;
           selection.end.row  -= count;
           selection.mark.row -= count;
-          selection_check (0);
+          if (selection.beg.row < -nsaved
+              || selection.end.row < -nsaved
+              || selection.mark.row < -nsaved)
+            {
+              CLEAR_ALL_SELECTION ();
+              selection.op = SELECTION_CLEAR;
+            }
         }
       for (int i = count; i--; )
+        {
+          ROW(row2 - i).l = 0;
-        scr_blank_screen_mem (ROW(row2 - i), rstyle);
+          scr_blank_screen_mem (ROW(row2 - i), rstyle);
+        }
-      if ((options & Opt_scrollWithBuffer)
+      if (OPTION (Opt_scrollWithBuffer)
           && view_start != 0
           && view_start != saveLines)
         scr_page (UP, count);
     }
   else
     {
       if (selection.op && current_screen == selection.screen)
         {
-          int i = selection.beg.row;
+          if ((selection.beg.row < row1 && selection.end.row > row1)
-          int j = selection.end.row;
+              || (selection.beg.row < row2 && selection.end.row > row2)
-          if ((i < row1 && j > row1)
-              || (i < row2 && j > row2)
-              || (i - count < row1 && i >= row1)
+              || (selection.beg.row - count < row1 && selection.beg.row >= row1)
-              || (i - count > row2 && i <= row2)
+              || (selection.beg.row - count > row2 && selection.beg.row <= row2)
-              || (j - count < row1 && j >= row1)
+              || (selection.end.row - count < row1 && selection.end.row >= row1)
-              || (j - count > row2 && j <= row2))
+              || (selection.end.row - count > row2 && selection.end.row <= row2))
             {
               CLEAR_ALL_SELECTION ();
-              selection.op = SELECTION_CLEAR;  /* XXX: too aggressive? */
+              selection.op = SELECTION_CLEAR;
             }
-          else if (j >= row1 && j <= row2)
+          else if (selection.end.row >= row1 && selection.end.row <= row2)
             {
               /* move selected region too */
               selection.beg.row  -= count;
               selection.end.row  -= count;
               selection.mark.row -= count;
   if (len <= 0)               /* sanity */
     return;
   unsigned char checksel;
   unicode_t c;
-  int row, last_col;
+  int last_col;
   const unicode_t *strend = str + len;
   want_refresh = 1;
   ZERO_SCROLLBACK ();
   last_col = ncol;
 #ifdef DEBUG_STRICT
   assert (screen.cur.col < last_col);
   assert (screen.cur.row < nrow
           && screen.cur.row >= -nsaved);
-#else                           /* drive with your eyes closed */
-  min_it (screen.cur.col, last_col - 1);
-  clamp_it (screen.cur.row, -nsaved, nrow - 1);
 #endif
-  row = screen.cur.row;
+  int row = screen.cur.row;
   checksel = selection.op && current_screen == selection.screen ? 1 : 0;
   line_t *line = &ROW(row);
     {
       c = *str++;
       if (c < 0x20)
         if (c == C0_LF)
           {
             if (!line->is_longer ())      /* XXX: think about this */
               max_it (line->l, screen.cur.col);
             screen.flags &= ~Screen_WrapNext;
   if (!line->is_longer ())      /* XXX: think about this */
     max_it (line->l, screen.cur.col);
 #ifdef DEBUG_STRICT
   assert (screen.cur.row >= 0);
-#else                           /* drive with your eyes closed */
-  max_it (screen.cur.row, 0);
 #endif
 }
 /* ------------------------------------------------------------------------- */
 /*
   if (count == 0)
     return;
   else if (count > 0)
     {
-      int row = screen.cur.row;
-      line_t &l = ROW(row);
+      line_t &l = ROW(screen.cur.row);
       rend_t base_rend = l.r[i];
       ht &= l.t[i] == ' ';
       for (; ++i < ncol; )
         if (tabs[i])
       if (count)
         x = ncol - 1;
       // store horizontal tab commands as characters inside the text
       // buffer so they can be selected and pasted.
-      if (ht && options & Opt_pastableTabs)
+      if (ht && OPTION (Opt_pastableTabs))
         {
           base_rend = SET_FONT (base_rend, 0);
           if (!l.is_longer ())      /* XXX: think about this */
             max_it (l.l, x);
  */
 #if ENABLE_FRILLS
 void
 rxvt_term::scr_forwardindex ()
 {
-  int row;
   if (screen.cur.col < ncol - 1)
     scr_gotorc (0, 1, R_RELATIVE | C_RELATIVE);
   else
     {
-      row = screen.cur.row;
-      if (ROW(row).is_longer ()) //TODO//FIXME//LEN
+      if (ROW(screen.cur.row).is_longer ()) //TODO//FIXME//LEN
-        ROW(row).l = ncol;
+        ROW(screen.cur.row).l = ncol;
       scr_gotorc (0, 0, R_RELATIVE);
       scr_insdel_chars (1, DELETE);
       scr_gotorc (0, ncol - 1, R_RELATIVE);
     }
  * XTERM_SEQ: Clear whole line   : ESC [ 2 K
  */
 void
 rxvt_term::scr_erase_line (int mode)
 {
-  unsigned int row, col, num;
+  unsigned int col, num;
   want_refresh = 1;
   ZERO_SCROLLBACK ();
   selection_check (1);
-  row = screen.cur.row;
+  line_t &line = ROW(screen.cur.row);
   switch (mode)
     {
       case 0:                     /* erase to end of line */
         col = screen.cur.col;
         num = ncol - col;
-        min_it (ROW(row).l, col);
+        min_it (line.l, col);
         if (ROWCOL_IN_ROW_AT_OR_AFTER (selection.beg, screen.cur)
             || ROWCOL_IN_ROW_AT_OR_AFTER (selection.end, screen.cur))
           CLEAR_SELECTION ();
         break;
       case 1:                     /* erase to beginning of line */
           CLEAR_SELECTION ();
         break;
       case 2:                     /* erase whole line */
         col = 0;
         num = ncol;
-        ROW(row).l = 0;
+        line.l = 0;
         if (selection.beg.row <= screen.cur.row
             && selection.end.row >= screen.cur.row)
           CLEAR_SELECTION ();
         break;
       default:
         return;
     }
-  scr_blank_line (ROW(row), col, num, rstyle);
+  scr_blank_line (line, col, num, rstyle);
 }
 /* ------------------------------------------------------------------------- */
 /*
  * Erase part of whole of the screen
       CLEAR_ROWS (row, num);
     }
   else
     {
       ren = rstyle & (RS_fgMask | RS_bgMask);
-      gcvalue.foreground = pix_colors[GET_BGCOLOR (rstyle)];
+      gcvalue.foreground = pix_colors[bgcolor_of (rstyle)];
       XChangeGC (display->display, gc, GCForeground, &gcvalue);
       ERASE_ROWS (row, num);
       gcvalue.foreground = pix_colors[Color_fg];
       XChangeGC (display->display, gc, GCForeground, &gcvalue);
     }
   for (; num--; row++)
     {
+      ROW (row).l = 0;
       scr_blank_screen_mem (ROW (row), rstyle);
-      ROW (row).l = 0;
       scr_blank_line (drawn_buf [row], 0, ncol, ren);
     }
 }
 #if ENABLE_FRILLS
       ::swap (pix_colors[Color_fg], pix_colors[Color_bg]);
 #if XPM_BACKGROUND
       if (bgPixmap.pixmap == None)
 #endif
 #if TRANSPARENT
-        if (! (options & Opt_transparent) || am_transparent == 0)
+        if (! OPTION (Opt_transparent) || am_transparent == 0)
 #endif
           XSetWindowBackground (display->display, vt,
                                pix_colors[Color_bg]);
       gcvalue.foreground = pix_colors[Color_fg];
       y = 0;
       eheight = height;
     }
 #endif
-#ifdef DEBUG_STRICT
-#if 0
-  // that's not debugging //TODO //FIXME
-  clamp_it (x, 0, width);
-  clamp_it (y, 0, height);
-#endif
-#endif
   /* round down */
   rc[PART_BEG].col = Pixel2Col (x);
   rc[PART_BEG].row = Pixel2Row (y);
   /* round up */
   rc[PART_END].col = Pixel2Width (x + ewidth  + fwidth  - 1);
 }
 int
 rxvt_term::scr_changeview (unsigned int oldviewstart)
 {
+  PERL_INVOKE ((this, HOOK_VIEW_CHANGE, DT_INT, view_start, DT_END));
   if (view_start != oldviewstart)
     {
       want_refresh = 1;
       num_scr -= (view_start - oldviewstart);
     }
 {
 #ifndef NO_BELL
 # ifndef NO_MAPALERT
 #  ifdef MAPALERT_OPTION
-  if (options & Opt_mapAlert)
+  if (OPTION (Opt_mapAlert))
 #  endif
     XMapWindow (display->display, parent[0]);
 # endif
-  if (options & Opt_visualBell)
+  if (OPTION (Opt_visualBell))
     {
       scr_rvideo_mode (!rvideo); /* refresh also done */
       rxvt_usleep (VISUAL_BELL_DURATION);
       scr_rvideo_mode (!rvideo); /* refresh also done */
     }
 #if XPM_BACKGROUND
   must_clear |= bgPixmap.pixmap != None;
 #endif
 #if TRANSPARENT
-  must_clear |= (options & Opt_transparent) && am_transparent;
+  must_clear |= OPTION (Opt_transparent) && am_transparent;
 #endif
   ocrow = oldcursor.row; /* is there an old outline cursor on screen? */
   /*
    * B: reverse any characters which are selected
         crp = &ROW(screen.cur.row).r[col];
         if (showcursor && focus)
           {
-            if (options & Opt_cursorUnderline)
+            if (OPTION (Opt_cursorUnderline))
               *crp ^= RS_Uline;
             else
               {
                 *crp ^= RS_RVid;
                 cc1 = *crp & (RS_fgMask | RS_bgMask);
                 if (ISSET_PIXCOLOR (Color_cursor))
                   ccol1 = Color_cursor;
                 else
 #ifdef CURSOR_COLOR_IS_RENDITION_COLOR
-                  ccol1 = GET_FGCOLOR (rstyle);
+                  ccol1 = fgcolor_of (rstyle);
 #else
                   ccol1 = Color_fg;
 #endif
                 if (ISSET_PIXCOLOR (Color_cursor2))
                   ccol2 = Color_cursor2;
                 else
 #ifdef CURSOR_COLOR_IS_RENDITION_COLOR
-                  ccol2 = GET_BGCOLOR (rstyle);
+                  ccol2 = bgcolor_of (rstyle);
 #else
                   ccol2 = Color_bg;
 #endif
                 *crp = SET_FGCOLOR (*crp, ccol1);
                 *crp = SET_BGCOLOR (*crp, ccol2);
             oldcursor.col = screen.cur.col;
           }
       }
   }
+  PERL_INVOKE ((this, HOOK_REFRESH_BEGIN, DT_END));
 #if ENABLE_OVERLAY
   scr_swap_overlay ();
 #endif
 #ifndef NO_SLOW_LINK_SUPPORT
               if (wlen < len)
                 ::swap (wlen, len);
               XCopyArea (display->display, vt, vt,
                          gc, 0, Row2Pixel (len + i),
-                         (unsigned int)TermWin_TotalWidth (),
+                         (unsigned int)this->width,
                          (unsigned int)Height2Pixel (wlen - len + 1),
                          0, Row2Pixel (len));
               len = -1;
             }
         }
             count++, i--;
           /*
            * Determine the attributes for the string
            */
-          int fore = GET_FGCOLOR (rend); // desired foreground
+          int fore = fgcolor_of (rend); // desired foreground
-          int back = GET_BGCOLOR (rend); // desired background
+          int back = bgcolor_of (rend); // desired background
-          // only do special processing if any attributes are set, which is rare
+          // only do special processing if any attributes are set, which is unlikely
           if (rend & (RS_Bold | RS_Italic | RS_Uline | RS_RVid | RS_Blink | RS_Careful))
             {
 #if ENABLE_STYLES
               // force redraw after "careful" characters to avoid pixel droppings
               if (srp[col] & RS_Careful && col < ncol - 1 && 0)
     }                         /* for (row....) */
 #if ENABLE_OVERLAY
   scr_swap_overlay ();
 #endif
+  PERL_INVOKE ((this, HOOK_REFRESH_END, DT_END));
   /*
    * G: cleanup cursor and display outline cursor if necessary
    */
   if (showcursor)
     {
       if (focus)
         {
-          if (options & Opt_cursorUnderline)
+          if (OPTION (Opt_cursorUnderline))
             *crp ^= RS_Uline;
           else
             {
               *crp ^= RS_RVid;
 #ifndef NO_CURSORCOLOR
 #if ENABLE_FRILLS
       if (selection.rect)
         {
           for (row = max (selection.beg.row, -view_start); row <= min (selection.end.row, view_end); row++)
+            {
+              text_t *stp = ROW(row).t;
+              rend_t *srp = ROW(row).r;
-            for (rend_t *srp = ROW(row).r, col = selection.beg.col; col < selection.end.col; col++)
+              for (col = selection.beg.col; col < selection.end.col; col++)
-              srp[col] ^= RS_RVid;
+                srp[col] ^= RS_RVid;
+              while (col-- > selection.beg.col && (stp[col] == NOCHAR || unicode::is_space (stp[col])))
+                srp[col] ^= RS_RVid | RS_Uline;
+              if (++col < selection.end.col)
+                srp[col] ^= RS_RVid | RS_Uline;
+            }
         }
       else
 #endif
         {
           if (selection.beg.row >= -view_start)
               row = selection.beg.row;
             }
           else
             {
               col = 0;
-              row = view_start;
+              row = -view_start;
             }
           for (; row < min (selection.end.row, view_end); row++, col = 0)
             for (rend_t *srp = ROW(row).r; col < ncol; col++)
               srp[col] ^= RS_RVid;
 /* ------------------------------------------------------------------------- */
 /*
  * Paste a selection direct to the command fd
  */
 void
-rxvt_term::paste (unsigned char *data, unsigned int len)
+rxvt_term::paste (char *data, unsigned int len)
 {
   /* convert normal newline chars into common keyboard Return key sequence */
   for (unsigned int i = 0; i < len; i++)
     if (data[i] == C0_LF)
       data[i] = C0_CR;
     {
       wchar_t *w = rxvt_utf8towcs ((const char *)ct.value, ct.nitems);
       char *s = rxvt_wcstombs (w);
       free (w);
       // TODO: strlen == only the first element will be converted. well...
-      paste ((unsigned char *)s, strlen (s));
+      paste (s, strlen (s));
       free (s);
     }
   else
 #endif
   if (XmbTextPropertyToTextList (display->display, &ct, &cl, &cr) >= 0
       && cl)
     {
       for (int i = 0; i < cr; i++)
-        paste ((unsigned char *)cl[i], strlen (cl[i]));
+        paste (cl[i], strlen (cl[i]));
       XFreeStringList (cl);
     }
   else
-    paste (ct.value, ct.nitems); // paste raw
+    paste ((char *)ct.value, ct.nitems); // paste raw
 bailout:
   XFree (ct.value);
   if (selection_wait == Sel_normal)
     return;                 /* outside window */
   if (selection.text)
     { /* internal selection */
       char *str = rxvt_wcstombs (selection.text, selection.len);
-      paste ((unsigned char *)str, strlen (str));
+      paste (str, strlen (str));
       free (str);
       return;
     }
   else
     {
   selection.op = SELECTION_DONE;
   if (selection.clicks == 4)
     return;                 /* nothing selected, go away */
+  if (PERL_INVOKE ((this, HOOK_SEL_MAKE, DT_LONG, (long)tm, DT_END)))
+    return;
   i = (selection.end.row - selection.beg.row + 1) * (ncol + 1);
   new_selection_text = (wchar_t *)rxvt_malloc ((i + 4) * sizeof (wchar_t));
   int ofs = 0;
   int extra = 0;
 #endif
         end_col = ROW(row).is_longer () ? ncol : ROW(row).l; //TODO//FIXME//LEN
       col = max (col, 0);
-      if (row == selection.end.row || selection.rect)
+      if (row == selection.end.row
+#if ENABLE_FRILLS
+          || selection.rect
+#endif
+          )
-        end_col = min (end_col, selection.end.col);
+        min_it (end_col, selection.end.col);
       t = ROW(row).t + col;
       for (; col < end_col; col++)
         {
           if (*t == NOCHAR)
 #endif
           else
             new_selection_text[ofs++] = *t++;
         }
+#if ENABLE_FRILLS
+      if (selection.rect)
+        {
+          while (ofs
+                 && new_selection_text[ofs - 1] != C0_LF
+                 && unicode::is_space (new_selection_text[ofs - 1]))
+            --ofs;
+          new_selection_text[ofs++] = C0_LF;
+        }
+      else
+#endif
-      if (!ROW(row).is_longer () && row != selection.end.row)
+        if (!ROW(row).is_longer () && row != selection.end.row)
-        new_selection_text[ofs++] = C0_LF;
+          new_selection_text[ofs++] = C0_LF;
     }
   if (end_col != selection.end.col)
     new_selection_text[ofs++] = C0_LF;
   // we usually allocate much more than necessary, so realloc it smaller again
   selection.len = ofs;
   selection.text = (wchar_t *)rxvt_realloc (new_selection_text, (ofs + 1) * sizeof (wchar_t));
+  if (PERL_INVOKE ((this, HOOK_SEL_GRAB, DT_LONG, (long)tm, DT_END)))
+    return;
+  selection_grab (tm);
+}
+bool
+rxvt_term::selection_grab (Time tm)
+{
+  selection_time = tm;
   XSetSelectionOwner (display->display, XA_PRIMARY, vt, tm);
   if (XGetSelectionOwner (display->display, XA_PRIMARY) == vt)
+    {
-    display->set_selection_owner (this);
+      display->set_selection_owner (this);
+      return true;
+    }
   else
-    rxvt_warn ("can't get primary selection, ignoring.\n");
+    return false;
 #if 0
   XTextProperty ct;
   if (XwcTextListToTextProperty (display->display, &selection.text, 1, XStringStyle, &ct) >= 0)
     {
       set_string_property (XA_CUT_BUFFER0, ct.value, ct.nitems);
       XFree (ct.value);
     }
 #endif
-  selection_time = tm;
 }
 /* ------------------------------------------------------------------------- */
 /*
  * Mark or select text based upon number of clicks: 1, 2, or 3
             }
         }
       break;
     }
-Old_Word_Selection_You_Die:
   if (dirn == DN)
     col++;                  /* put us on one past the end */
   /* Poke the values back in */
   ret->row = row;
   else if (selection.clicks == 2)
     {
       if (ROWCOL_IS_AFTER (selection.end, selection.beg))
         selection.end.col--;
+      if (!PERL_INVOKE ((this, HOOK_SEL_EXTEND, DT_END)))
+        {
-      selection_delimit_word (UP, &selection.beg, &selection.beg);
+          selection_delimit_word (UP, &selection.beg, &selection.beg);
-      selection_delimit_word (DN, &selection.end, &selection.end);
+          selection_delimit_word (DN, &selection.end, &selection.end);
+        }
     }
   else if (selection.clicks == 3)
     {
 #if ENABLE_FRILLS
-      if (options & Opt_tripleclickwords)
+      if (OPTION (Opt_tripleclickwords))
         {
           selection_delimit_word (UP, &selection.beg, &selection.beg);
           for (int end_row = selection.mark.row; end_row < nrow; end_row++)
             {
     {
       stp = ROW(end_row).t;
       while (--end_col >= 0)
         {
-          if (stp[end_col] != ' '
+          if (stp[end_col] != NOCHAR
-              && stp[end_col] != '\t'
+              && !unicode::is_space (stp[end_col]))
-              && stp[end_col] != NOCHAR)
             break;
         }
       if (end_col >= 0
           || !ROW(end_row - 1).is_longer ())
 #if ENABLE_OVERLAY
 void
 rxvt_term::scr_overlay_new (int x, int y, int w, int h)
 {
-  if (nrow < 3 || ncol < 3)
+  if (nrow < 1 || ncol < 1)
     return;
   want_refresh = 1;
   scr_overlay_off ();
   for (int y = ov_h; y--; )
     {
       text_t *t1 = ov_text[y];
       rend_t *r1 = ov_rend[y];
-      text_t *t2 = ROW(y - view_start).t + ov_x;
+      text_t *t2 = ROW(y + ov_y - view_start).t + ov_x;
-      rend_t *r2 = ROW(y - view_start).r + ov_x;
+      rend_t *r2 = ROW(y + ov_y - view_start).r + ov_x;
       for (int x = ov_w; x--; )
         {
           text_t t = *t1; *t1++ = *t2; *t2++ = t;
           rend_t r = *r1; *r1++ = *r2; *r2++ = SET_FONT (r, FONTSET (r)->find_font (t));

Diff Legend

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

Comparing rxvt-unicode/src/screen.C (file contents): Revision 1.186 by root, Wed Dec 21 19:50:17 2005 UTC vs. Revision 1.208 by root, Wed Jan 4 05:24:55 2006 UTC

Diff Legend

Comparing rxvt-unicode/src/screen.C (file contents):
Revision 1.186 by root, Wed Dec 21 19:50:17 2005 UTC vs.
Revision 1.208 by root, Wed Jan 4 05:24:55 2006 UTC