src/screen.C

   1 /*--------------------------------*-C-*--------------------------------------*
   2  * File:        screen.C
   3  *---------------------------------------------------------------------------*
   4  *
   5  * Copyright (c) 1997-2001 Geoff Wing <gcw@pobox.com>
   6  * Copyright (c) 2003-2004 Marc Lehmann <pcg@goof.com>
   7  *
   8  * This program is free software; you can redistribute it and/or modify
   9  * it under the terms of the GNU General Public License as published by
  10  * the Free Software Foundation; either version 2 of the License, or
  11  * (at your option) any later version.
  12  *
  13  * This program is distributed in the hope that it will be useful,
  14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16  * GNU General Public License for more details.
  17  *
  18  * You should have received a copy of the GNU General Public License
  19  * along with this program; if not, write to the Free Software
  20  * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  21  *--------------------------------------------------------------------------*/
  22
  23 /*
  24  * This file handles _all_ screen updates and selections
  25  */
  26
  27 #include "../config.h"          /* NECESSARY */
  28 #include "rxvt.h"               /* NECESSARY */
  29
  30 #include <X11/Xmd.h>            /* get the typedef for CARD32 */
  31
  32 #include <inttypes.h>
  33 #include <wchar.h>
  34
  35 #include "salloc.C" // HACK, should be a seperate compile!
  36
  37 inline void fill_text (text_t *start, text_t value, int len)
  38 {
  39   while (len--)
  40     *start++ = value;
  41 }
  42
  43 /* ------------------------------------------------------------------------- */
  44 #define PROP_SIZE               256*1024
  45 #define PASTE_SIZE              32768
  46 #define TABSIZE                 8       /* default tab size */
  47
  48 /* ------------------------------------------------------------------------- *
  49  *             GENERAL SCREEN AND SELECTION UPDATE ROUTINES                  *
  50  * ------------------------------------------------------------------------- */
  51 #define ZERO_SCROLLBACK()                                              \
  52     if (options & Opt_scrollTtyOutput)                                 \
  53         TermWin.view_start = 0
  54 #define CLEAR_SELECTION()                                              \
  55     selection.beg.row = selection.beg.col                              \
  56         = selection.end.row = selection.end.col = 0
  57 #define CLEAR_ALL_SELECTION()                                          \
  58     selection.beg.row = selection.beg.col                              \
  59         = selection.mark.row = selection.mark.col                      \
  60         = selection.end.row = selection.end.col = 0
  61
  62 #define ROW_AND_COL_IS_AFTER(A, B, C, D)                               \
  63     (((A) > (C)) || (((A) == (C)) && ((B) > (D))))
  64 #define ROW_AND_COL_IS_BEFORE(A, B, C, D)                              \
  65     (((A) < (C)) || (((A) == (C)) && ((B) < (D))))
  66 #define ROW_AND_COL_IN_ROW_AFTER(A, B, C, D)                           \
  67     (((A) == (C)) && ((B) > (D)))
  68 #define ROW_AND_COL_IN_ROW_AT_OR_AFTER(A, B, C, D)                     \
  69     (((A) == (C)) && ((B) >= (D)))
  70 #define ROW_AND_COL_IN_ROW_BEFORE(A, B, C, D)                          \
  71     (((A) == (C)) && ((B) < (D)))
  72 #define ROW_AND_COL_IN_ROW_AT_OR_BEFORE(A, B, C, D)                    \
  73     (((A) == (C)) && ((B) <= (D)))
  74
  75 /* these must be row_col_t */
  76 #define ROWCOL_IS_AFTER(X, Y)                                          \
  77     ROW_AND_COL_IS_AFTER ((X).row, (X).col, (Y).row, (Y).col)
  78 #define ROWCOL_IS_BEFORE(X, Y)                                         \
  79     ROW_AND_COL_IS_BEFORE ((X).row, (X).col, (Y).row, (Y).col)
  80 #define ROWCOL_IN_ROW_AFTER(X, Y)                                      \
  81     ROW_AND_COL_IN_ROW_AFTER ((X).row, (X).col, (Y).row, (Y).col)
  82 #define ROWCOL_IN_ROW_BEFORE(X, Y)                                     \
  83     ROW_AND_COL_IN_ROW_BEFORE ((X).row, (X).col, (Y).row, (Y).col)
  84 #define ROWCOL_IN_ROW_AT_OR_AFTER(X, Y)                                \
  85     ROW_AND_COL_IN_ROW_AT_OR_AFTER ((X).row, (X).col, (Y).row, (Y).col)
  86 #define ROWCOL_IN_ROW_AT_OR_BEFORE(X, Y)                               \
  87     ROW_AND_COL_IN_ROW_AT_OR_BEFORE ((X).row, (X).col, (Y).row, (Y).col)
  88
  89 /*
  90  * CLEAR_ROWS : clear <num> rows starting from row <row>
  91  * CLEAR_CHARS: clear <num> chars starting from pixel position <x,y>
  92  * ERASE_ROWS : set <num> rows starting from row <row> to the foreground colour
  93  */
  94 #define drawBuffer      TermWin.vt
  95
  96 #define CLEAR_ROWS(row, num)                                           \
  97     if (TermWin.mapped)                                                \
  98         XClearArea (display->display, drawBuffer, 0,                   \
  99                     Row2Pixel (row), (unsigned int)TermWin.width,      \
 100                     (unsigned int)Height2Pixel (num), False)
 101
 102 #define CLEAR_CHARS(x, y, num)                                         \
 103     if (TermWin.mapped)                                                \
 104         XClearArea (display->display, drawBuffer, x, y,                \
 105                     (unsigned int)Width2Pixel (num),                   \
 106                     (unsigned int)Height2Pixel (1), False)
 107
 108 #define ERASE_ROWS(row, num)                                           \
 109     XFillRectangle (display->display, drawBuffer, TermWin.gc,          \
 110                     0, Row2Pixel (row),                                \
 111                     (unsigned int)TermWin.width,                       \
 112                     (unsigned int)Height2Pixel (num))
 113
 114 /* ------------------------------------------------------------------------- *
 115  *                        SCREEN `COMMON' ROUTINES                           *
 116  * ------------------------------------------------------------------------- */
 117
 118 /* Fill part/all of a line with blanks. */
 119 void
 120 rxvt_term::scr_blank_line (text_t *et, rend_t *er, unsigned int width, rend_t efs)
 121 {
 122   efs &= ~RS_baseattrMask;
 123   efs = SET_FONT (efs, FONTSET (efs)->find_font (' '));
 124
 125   while (width--)
 126     {
 127       *et++ = ' ';
 128       *er++ = efs;
 129     }
 130 }
 131
 132 /* ------------------------------------------------------------------------- */
 133 /* Fill a full line with blanks - make sure it is allocated first */
 134 void
 135 rxvt_term::scr_blank_screen_mem (text_t **tp, rend_t **rp, unsigned int row, rend_t efs)
 136 {
 137 #ifdef DEBUG_STRICT
 138   assert ((tp[row] && rp[row]) || (tp[row] == NULL && rp[row] == NULL));
 139 #endif
 140   if (tp[row] == NULL)
 141     {
 142       tp[row] = (text_t *)talloc->alloc ();
 143       rp[row] = (rend_t *)ralloc->alloc ();
 144     }
 145
 146   scr_blank_line (tp[row], rp[row], TermWin.ncol, efs);
 147 }
 148
 149 /* ------------------------------------------------------------------------- *
 150  *                          SCREEN INITIALISATION                            *
 151  * ------------------------------------------------------------------------- */
 152 void
 153 rxvt_term::scr_reset ()
 154 {
 155   unsigned int ncol, nrow, total_rows, prev_total_rows;
 156   unsigned int p, q;
 157   int k;
 158   rend_t setrstyle;
 159
 160 #if ENABLE_OVERLAY
 161   scr_overlay_off ();
 162 #endif
 163
 164   TermWin.view_start = 0;
 165   num_scr = 0;
 166
 167   if (TermWin.ncol == 0)
 168     TermWin.ncol = 80;
 169
 170   if (TermWin.nrow == 0)
 171     TermWin.nrow = 24;
 172
 173   ncol = TermWin.ncol;
 174   nrow = TermWin.nrow;
 175
 176   if (ncol == prev_ncol && nrow == prev_nrow)
 177     return;
 178
 179   // we need at least two lines for wrapping to work correctly
 180   if (nrow + TermWin.saveLines < 2)
 181     {
 182       TermWin.saveLines++;
 183       prev_nrow--;
 184       TermWin.nscrolled++;
 185     }
 186
 187   want_refresh = 1;
 188
 189   prev_total_rows = prev_nrow + TermWin.saveLines;
 190   total_rows = nrow + TermWin.saveLines;
 191
 192   screen.tscroll = 0;
 193   screen.bscroll = nrow - 1;
 194
 195   if (!talloc)
 196     {
 197       talloc = new rxvt_salloc (ncol * sizeof (text_t));
 198       ralloc = new rxvt_salloc (ncol * sizeof (rend_t));
 199     }
 200
 201   if (!screen.text)
 202     {
 203       /*
 204        * first time called so just malloc everything: don't rely on realloc
 205        * Note: this is still needed so that all the scrollback lines are NULL
 206        */
 207       screen.text = (text_t **)rxvt_calloc (total_rows, sizeof (text_t *));
 208       buf_text = (text_t **)rxvt_calloc (total_rows, sizeof (text_t *));
 209       drawn_text = (text_t **)rxvt_calloc (nrow, sizeof (text_t *));
 210       swap.text = (text_t **)rxvt_calloc (nrow, sizeof (text_t *));
 211
 212       screen.tlen = (int16_t *)rxvt_calloc (total_rows, sizeof (int16_t));
 213       swap.tlen = (int16_t *)rxvt_calloc (nrow, sizeof (int16_t));
 214
 215       screen.rend = (rend_t **)rxvt_calloc (total_rows, sizeof (rend_t *));
 216       buf_rend = (rend_t **)rxvt_calloc (total_rows, sizeof (rend_t *));
 217       drawn_rend = (rend_t **)rxvt_calloc (nrow, sizeof (rend_t *));
 218       swap.rend = (rend_t **)rxvt_calloc (nrow, sizeof (rend_t *));
 219
 220       for (p = 0; p < nrow; p++)
 221         {
 222           q = p + TermWin.saveLines;
 223           scr_blank_screen_mem (screen.text, screen.rend, q, DEFAULT_RSTYLE);
 224           scr_blank_screen_mem (swap.text, swap.rend, p, DEFAULT_RSTYLE);
 225           screen.tlen[q] = swap.tlen[p] = 0;
 226           scr_blank_screen_mem (drawn_text, drawn_rend, p, DEFAULT_RSTYLE);
 227         }
 228
 229       memset (charsets, 'B', sizeof (charsets));
 230       TermWin.nscrolled = 0;       /* no saved lines */
 231       rstyle = DEFAULT_RSTYLE;
 232       screen.flags = Screen_DefaultFlags;
 233       screen.cur.row = screen.cur.col = 0;
 234       screen.charset = 0;
 235       current_screen = PRIMARY;
 236       scr_cursor (SAVE);
 237
 238 #if NSCREENS
 239       swap.flags = Screen_DefaultFlags;
 240       swap.cur.row = swap.cur.col = 0;
 241       swap.charset = 0;
 242       current_screen = SECONDARY;
 243       scr_cursor (SAVE);
 244       current_screen = PRIMARY;
 245 #endif
 246
 247       selection.text = NULL;
 248       selection.len = 0;
 249       selection.op = SELECTION_CLEAR;
 250       selection.screen = PRIMARY;
 251       selection.clicks = 0;
 252       CLEAR_ALL_SELECTION ();
 253       rvideo = 0;
 254     }
 255   else
 256     {
 257       /*
 258        * add or delete rows as appropriate
 259        */
 260       setrstyle = DEFAULT_RSTYLE;
 261
 262       if (nrow < prev_nrow)
 263         {
 264           /* delete rows */
 265           k = min (TermWin.nscrolled, prev_nrow - nrow);
 266           scr_scroll_text (0, (int)prev_nrow - 1, k, 1);
 267
 268           for (p = nrow; p < prev_nrow; p++)
 269             {
 270               q = p + TermWin.saveLines;
 271
 272               if (screen.text[q])
 273                 {
 274 #ifdef DEBUG_STRICT
 275                   assert (screen.rend[q]);
 276 #endif
 277                   talloc->free (screen.text[q]);
 278                   ralloc->free (screen.rend[q]);
 279                 }
 280
 281               if (swap.text[p])
 282                 {
 283 #ifdef DEBUG_STRICT
 284                   assert (swap.rend[p]);
 285 #endif
 286                   talloc->free (swap.text[p]);
 287                   ralloc->free (swap.rend[p]);
 288                 }
 289
 290 #ifdef DEBUG_STRICT
 291               assert (drawn_text[p] && drawn_rend[p]);
 292 #endif
 293               talloc->free (drawn_text[p]);
 294               ralloc->free (drawn_rend[p]);
 295             }
 296
 297           /* we have fewer rows so fix up cursor position */
 298           MIN_IT (screen.cur.row, (int32_t)nrow - 1);
 299           MIN_IT (swap.cur.row, (int32_t)nrow - 1);
 300
 301           scr_reset_realloc (); /* realloc _last_ */
 302         }
 303       else if (nrow > prev_nrow)
 304         {
 305           /* add rows */
 306           scr_reset_realloc (); /* realloc _first_ */
 307
 308           TermWin.ncol = prev_ncol; // save b/c scr_blank_screen_mem uses this
 309
 310           k = min (TermWin.nscrolled, nrow - prev_nrow);
 311
 312           for (p = prev_total_rows; p < total_rows; p++)
 313             {
 314               screen.tlen[p] = 0;
 315               screen.text[p] = NULL;
 316               screen.rend[p] = NULL;
 317             }
 318
 319           for (p = prev_total_rows; p < total_rows - k; p++)
 320             scr_blank_screen_mem (screen.text, screen.rend, p, setrstyle);
 321
 322           for (p = prev_nrow; p < nrow; p++)
 323             {
 324               swap.tlen[p] = 0;
 325               swap.text[p] = NULL;
 326               swap.rend[p] = NULL;
 327               drawn_text[p] = NULL;
 328               drawn_rend[p] = NULL;
 329               scr_blank_screen_mem (swap.text,  swap.rend,  p, setrstyle);
 330               scr_blank_screen_mem (drawn_text, drawn_rend, p, setrstyle);
 331             }
 332
 333           if (k > 0)
 334             {
 335               scr_scroll_text (0, (int)nrow - 1, -k, 1);
 336               screen.cur.row += k;
 337               screen.s_cur.row += k;
 338               TermWin.nscrolled -= k;
 339             }
 340 #ifdef DEBUG_STRICT
 341           assert (screen.cur.row < TermWin.nrow);
 342           assert (swap.cur.row < TermWin.nrow);
 343 #else                           /* drive with your eyes closed */
 344
 345           MIN_IT (screen.cur.row, nrow - 1);
 346           MIN_IT (swap.cur.row, nrow - 1);
 347 #endif
 348           TermWin.ncol =  ncol; // save b/c scr_blank_screen_mem uses this
 349         }
 350
 351       /* resize columns */
 352       if (ncol != prev_ncol)
 353         {
 354           rxvt_salloc *ta = new rxvt_salloc (ncol * sizeof (text_t));
 355           rxvt_salloc *ra = new rxvt_salloc (ncol * sizeof (rend_t));
 356
 357           for (p = 0; p < total_rows; p++)
 358             {
 359               if (screen.text[p])
 360                 {
 361                   screen.text[p] = (text_t *)ta->alloc (screen.text[p], prev_ncol * sizeof (text_t));
 362                   screen.rend[p] = (rend_t *)ra->alloc (screen.rend[p], prev_ncol * sizeof (rend_t));
 363
 364                   MIN_IT (screen.tlen[p], (int16_t)ncol);
 365
 366                   if (ncol > prev_ncol)
 367                     scr_blank_line (&screen.text[p][prev_ncol],
 368                                     &screen.rend[p][prev_ncol],
 369                                     ncol - prev_ncol, setrstyle);
 370                 }
 371             }
 372
 373           for (p = 0; p < nrow; p++)
 374             {
 375               drawn_text[p] = (text_t *)ta->alloc (drawn_text[p], prev_ncol * sizeof (text_t));
 376               drawn_rend[p] = (rend_t *)ra->alloc (drawn_rend[p], prev_ncol * sizeof (rend_t));
 377
 378               if (ncol > prev_ncol)
 379                 scr_blank_line (&drawn_text[p][prev_ncol],
 380                                 &drawn_rend[p][prev_ncol],
 381                                 ncol - prev_ncol, setrstyle);
 382
 383               if (swap.text[p])
 384                 {
 385                   swap.text[p] = (text_t *)ta->alloc (swap.text[p], prev_ncol * sizeof (text_t));
 386                   swap.rend[p] = (rend_t *)ra->alloc (swap.rend[p], prev_ncol * sizeof (rend_t));
 387
 388                   MIN_IT (swap.tlen[p], (int16_t)ncol);
 389
 390                   if (ncol > prev_ncol)
 391                     scr_blank_line (&swap.text[p][prev_ncol],
 392                                     &swap.rend[p][prev_ncol],
 393                                     ncol - prev_ncol, setrstyle);
 394                 }
 395
 396             }
 397
 398           MIN_IT (screen.cur.col, (int16_t)ncol - 1);
 399           MIN_IT (swap.cur.col, (int16_t)ncol - 1);
 400
 401           delete talloc; talloc = ta;
 402           delete ralloc; ralloc = ra;
 403         }
 404
 405       if (tabs)
 406         free (tabs);
 407     }
 408
 409   prev_nrow = nrow;
 410   prev_ncol = ncol;
 411
 412   tabs = (char *)rxvt_malloc (ncol * sizeof (char));
 413
 414   for (p = 0; p < ncol; p++)
 415     tabs[p] = (p % TABSIZE == 0) ? 1 : 0;
 416
 417   tt_winch ();
 418 }
 419
 420 void
 421 rxvt_term::scr_reset_realloc ()
 422 {
 423   unsigned int total_rows, nrow;
 424
 425   nrow = TermWin.nrow;
 426   total_rows = nrow + TermWin.saveLines;
 427   /* *INDENT-OFF* */
 428   screen.text = (text_t **)rxvt_realloc (screen.text, total_rows * sizeof (text_t *));
 429   buf_text    = (text_t **)rxvt_realloc (buf_text   , total_rows * sizeof (text_t *));
 430   drawn_text  = (text_t **)rxvt_realloc (drawn_text , nrow       * sizeof (text_t *));
 431   swap.text   = (text_t **)rxvt_realloc (swap.text  , nrow       * sizeof (text_t *));
 432
 433   screen.tlen = (int16_t *)rxvt_realloc (screen.tlen, total_rows * sizeof (int16_t));
 434   swap.tlen   = (int16_t *)rxvt_realloc (swap.tlen  , total_rows * sizeof (int16_t));
 435
 436   screen.rend = (rend_t **)rxvt_realloc (screen.rend, total_rows * sizeof (rend_t *));
 437   buf_rend    = (rend_t **)rxvt_realloc (buf_rend   , total_rows * sizeof (rend_t *));
 438   drawn_rend  = (rend_t **)rxvt_realloc (drawn_rend , nrow       * sizeof (rend_t *));
 439   swap.rend   = (rend_t **)rxvt_realloc (swap.rend  , nrow       * sizeof (rend_t *));
 440   /* *INDENT-ON* */
 441 }
 442
 443 /* ------------------------------------------------------------------------- */
 444 /*
 445  * Free everything.  That way malloc debugging can find leakage.
 446  */
 447 void
 448 rxvt_term::scr_release ()
 449 {
 450   unsigned int total_rows;
 451   int i;
 452
 453   total_rows = TermWin.nrow + TermWin.saveLines;
 454
 455   delete talloc; talloc = 0;
 456   delete ralloc; ralloc = 0;
 457
 458   free (screen.text);
 459   free (screen.tlen);
 460   free (screen.rend);
 461   free (drawn_text);
 462   free (drawn_rend);
 463   free (swap.text);
 464   free (swap.tlen);
 465   free (swap.rend);
 466   free (buf_text);
 467   free (buf_rend);
 468   free (tabs);
 469
 470   /* NULL these so if anything tries to use them, we'll know about it */
 471   screen.text = drawn_text = swap.text = NULL;
 472   screen.rend = drawn_rend = swap.rend = NULL;
 473   screen.tlen = swap.tlen = NULL;
 474   buf_text = NULL;
 475   buf_rend = NULL;
 476   tabs = NULL;
 477 }
 478
 479 /* ------------------------------------------------------------------------- */
 480 /*
 481  * Hard reset
 482  */
 483 void
 484 rxvt_term::scr_poweron ()
 485 {
 486   scr_release ();
 487   prev_nrow = prev_ncol = 0;
 488   scr_reset ();
 489
 490   scr_clear (true);
 491   scr_refresh (SLOW_REFRESH);
 492 }
 493
 494 /* ------------------------------------------------------------------------- *
 495  *                         PROCESS SCREEN COMMANDS                           *
 496  * ------------------------------------------------------------------------- */
 497 /*
 498  * Save and Restore cursor
 499  * XTERM_SEQ: Save cursor   : ESC 7
 500  * XTERM_SEQ: Restore cursor: ESC 8
 501  */
 502 void
 503 rxvt_term::scr_cursor (int mode)
 504 {
 505   screen_t *s;
 506
 507 #if NSCREENS && !defined(NO_SECONDARY_SCREEN_CURSOR)
 508   if (current_screen == SECONDARY)
 509     s = &swap;
 510   else
 511 #endif
 512     s = &screen;
 513
 514   switch (mode)
 515     {
 516       case SAVE:
 517         s->s_cur.row = screen.cur.row;
 518         s->s_cur.col = screen.cur.col;
 519         s->s_rstyle = rstyle;
 520         s->s_charset = screen.charset;
 521         s->s_charset_char = charsets[screen.charset];
 522         break;
 523
 524       case RESTORE:
 525         want_refresh = 1;
 526         screen.cur.row = s->s_cur.row;
 527         screen.cur.col = s->s_cur.col;
 528         screen.flags &= ~Screen_WrapNext;
 529         rstyle = s->s_rstyle;
 530         screen.charset = s->s_charset;
 531         charsets[screen.charset] = s->s_charset_char;
 532         set_font_style ();
 533         break;
 534     }
 535
 536   /* boundary check in case screen size changed between SAVE and RESTORE */
 537   MIN_IT (s->cur.row, TermWin.nrow - 1);
 538   MIN_IT (s->cur.col, TermWin.ncol - 1);
 539 #ifdef DEBUG_STRICT
 540   assert (s->cur.row >= 0);
 541   assert (s->cur.col >= 0);
 542 #else                           /* drive with your eyes closed */
 543   MAX_IT (s->cur.row, 0);
 544   MAX_IT (s->cur.col, 0);
 545 #endif
 546 }
 547
 548 /* ------------------------------------------------------------------------- */
 549 /*
 550  * Swap between primary and secondary screens
 551  * XTERM_SEQ: Primary screen  : ESC [ ? 4 7 h
 552  * XTERM_SEQ: Secondary screen: ESC [ ? 4 7 l
 553  */
 554 int
 555 rxvt_term::scr_change_screen (int scrn)
 556 {
 557   int i;
 558 #if NSCREENS
 559   int offset;
 560 #endif
 561
 562   want_refresh = 1;
 563
 564   TermWin.view_start = 0;
 565
 566   if (current_screen == scrn)
 567     return scrn;
 568
 569   selection_check (2);        /* check for boundary cross */
 570
 571   SWAP_IT (current_screen, scrn, int);
 572
 573   SWAP_IT (screen.cur.row, swap.cur.row, int16_t);
 574   SWAP_IT (screen.cur.col, swap.cur.col, int16_t);
 575 # ifdef DEBUG_STRICT
 576   assert (screen.cur.row >= 0 && screen.cur.row < prev_nrow);
 577   assert (screen.cur.col >= 0 && screen.cur.col < prev_ncol);
 578 # else                          /* drive with your eyes closed */
 579   MAX_IT (screen.cur.row, 0);
 580   MIN_IT (screen.cur.row, (int32_t)prev_nrow - 1);
 581   MAX_IT (screen.cur.col, 0);
 582   MIN_IT (screen.cur.col, (int32_t)prev_ncol - 1);
 583 # endif
 584
 585 #if NSCREENS
 586   if (options & Opt_secondaryScreen)
 587     {
 588       num_scr = 0;
 589       offset = TermWin.saveLines;
 590
 591       for (i = prev_nrow; i--;)
 592         {
 593           SWAP_IT (screen.text[i + offset], swap.text[i], text_t *);
 594           SWAP_IT (screen.tlen[i + offset], swap.tlen[i], int16_t);
 595           SWAP_IT (screen.rend[i + offset], swap.rend[i], rend_t *);
 596         }
 597
 598       SWAP_IT (screen.charset, swap.charset, int16_t);
 599       SWAP_IT (screen.flags, swap.flags, int);
 600       screen.flags |= Screen_VisibleCursor;
 601       swap.flags |= Screen_VisibleCursor;
 602     }
 603   else
 604 #endif
 605     if (options & Opt_secondaryScroll)
 606       scr_scroll_text (0, prev_nrow - 1, prev_nrow, 0);
 607
 608   return scrn;
 609 }
 610
 611 // clear WrapNext indicator, solidifying position on next line
 612 void
 613 rxvt_term::scr_do_wrap ()
 614 {
 615   if (!(screen.flags & Screen_WrapNext))
 616     return;
 617
 618   screen.flags &= ~Screen_WrapNext;
 619
 620   screen.cur.col = 0;
 621
 622   if (screen.cur.row == screen.bscroll)
 623     scr_scroll_text (screen.tscroll, screen.bscroll, 1, 0);
 624   else if (screen.cur.row < TermWin.nrow - 1)
 625     screen.cur.row++;
 626 }
 627
 628 /* ------------------------------------------------------------------------- */
 629 /*
 630  * Change the colour for following text
 631  */
 632 void
 633 rxvt_term::scr_color (unsigned int color, int fgbg)
 634 {
 635   if (color > maxTermCOLOR)
 636     color = fgbg;
 637
 638   if (fgbg == Color_fg)
 639     rstyle = SET_FGCOLOR (rstyle, color);
 640   else
 641     rstyle = SET_BGCOLOR (rstyle, color);
 642 }
 643
 644 /* ------------------------------------------------------------------------- */
 645 /*
 646  * Change the rendition style for following text
 647  */
 648 void
 649 rxvt_term::scr_rendition (int set, int style)
 650   {
 651     if (set)
 652       rstyle |= style;
 653     else if (style == ~RS_None)
 654       rstyle = DEFAULT_RSTYLE;
 655     else
 656       rstyle &= ~style;
 657   }
 658
 659 /* ------------------------------------------------------------------------- */
 660 /*
 661  * Scroll text between <row1> and <row2> inclusive, by <count> lines
 662  * count positive ==> scroll up
 663  * count negative ==> scroll down
 664  * spec == 0 for normal routines
 665  */
 666 int
 667 rxvt_term::scr_scroll_text (int row1, int row2, int count, int spec)
 668 {
 669   int i, j;
 670   long nscrolled;
 671
 672   if (count == 0 || (row1 > row2))
 673     return 0;
 674
 675   want_refresh = 1;
 676
 677   if (row1 == 0 && count > 0
 678       && (current_screen == PRIMARY || options & Opt_secondaryScroll))
 679     {
 680       nscrolled = (long)TermWin.nscrolled + (long)count;
 681
 682       if (nscrolled > (long)TermWin.saveLines)
 683         TermWin.nscrolled = TermWin.saveLines;
 684       else
 685         TermWin.nscrolled = (unsigned int)nscrolled;
 686
 687       if ((options & Opt_scrollWithBuffer)
 688           && TermWin.view_start != 0
 689           && TermWin.view_start != TermWin.saveLines)
 690         scr_page (UP, count);
 691     }
 692   else if (!spec)
 693     row1 += TermWin.saveLines;
 694
 695   row2 += TermWin.saveLines;
 696
 697   if (selection.op && current_screen == selection.screen)
 698     {
 699       i = selection.beg.row + TermWin.saveLines;
 700       j = selection.end.row + TermWin.saveLines;
 701       if ((i < row1 && j > row1)
 702           || (i < row2 && j > row2)
 703           || (i - count < row1 && i >= row1)
 704           || (i - count > row2 && i <= row2)
 705           || (j - count < row1 && j >= row1)
 706           || (j - count > row2 && j <= row2))
 707         {
 708           CLEAR_ALL_SELECTION ();
 709           selection.op = SELECTION_CLEAR;  /* XXX: too aggressive? */
 710         }
 711       else if (j >= row1 && j <= row2)
 712         {
 713           /* move selected region too */
 714           selection.beg.row -= count;
 715           selection.end.row -= count;
 716           selection.mark.row -= count;
 717         }
 718     }
 719
 720   selection_check (0);        /* _after_ TermWin.nscrolled update */
 721
 722   num_scr += count;
 723   j = count;
 724
 725   if (count < 0)
 726     count = -count;
 727
 728   i = row2 - row1 + 1;
 729   MIN_IT (count, i);
 730
 731   if (j > 0)
 732     {
 733       /* A: scroll up */
 734
 735       /* A1: Copy lines that will get clobbered by the rotation */
 736       memcpy (buf_text, screen.text + row1, count * sizeof (text_t *));
 737       memcpy (buf_rend, screen.rend + row1, count * sizeof (rend_t *));
 738
 739       /* A2: Rotate lines */
 740       i = row2 - row1 - count + 1;
 741       memmove (screen.tlen + row1, screen.tlen + row1 + count, i * sizeof (int16_t));
 742       memmove (screen.text + row1, screen.text + row1 + count, i * sizeof (text_t *));
 743       memmove (screen.rend + row1, screen.rend + row1 + count, i * sizeof (rend_t *));
 744
 745       j = row2 - count + 1, i = count;
 746     }
 747   else /* if (j < 0) */
 748     {
 749       /* B: scroll down */
 750
 751       /* B1: Copy lines that will get clobbered by the rotation */
 752       for (i = 0, j = row2; i < count; i++, j--)
 753         {
 754           buf_text[i] = screen.text[j];
 755           buf_rend[i] = screen.rend[j];
 756         }
 757
 758       /* B2: Rotate lines */
 759       for (j = row2, i = j - count; i >= row1; i--, j--)
 760         {
 761           screen.tlen[j] = screen.tlen[i];
 762           screen.text[j] = screen.text[i];
 763           screen.rend[j] = screen.rend[i];
 764         }
 765
 766       j = row1, i = count;
 767       count = -count;
 768     }
 769
 770   /* C: Resurrect lines */
 771   memset (screen.tlen + j, 0, i * sizeof (int16_t));
 772   memcpy (screen.text + j, buf_text, i * sizeof (text_t *));
 773   memcpy (screen.rend + j, buf_rend, i * sizeof (text_t *));
 774   if (!spec) /* line length may not equal TermWin.ncol */
 775     for (; i--; j++)
 776       scr_blank_screen_mem (screen.text, screen.rend, (unsigned int)j, rstyle);
 777
 778   return count;
 779 }
 780
 781 /* ------------------------------------------------------------------------- */
 782 /*
 783  * Add text given in <str> of length <len> to screen struct
 784  */
 785 void
 786 rxvt_term::scr_add_lines (const unicode_t *str, int nlines, int len)
 787 {
 788   unsigned char checksel;
 789   unicode_t c;
 790   int i, row, last_col;
 791   text_t *stp;
 792   rend_t *srp;
 793
 794   if (len <= 0)               /* sanity */
 795     return;
 796
 797   want_refresh = 1;
 798   ZERO_SCROLLBACK ();
 799   last_col = TermWin.ncol;
 800
 801   if (nlines > 0)
 802     {
 803       nlines += screen.cur.row - screen.bscroll;
 804       if ((nlines > 0)
 805           && (screen.tscroll == 0)
 806           && (screen.bscroll == (TermWin.nrow - 1)))
 807         {
 808           /* _at least_ this many lines need to be scrolled */
 809           scr_scroll_text (screen.tscroll, screen.bscroll, nlines, 0);
 810           screen.cur.row -= nlines;
 811         }
 812     }
 813
 814 #ifdef DEBUG_STRICT
 815   assert (screen.cur.col < last_col);
 816   assert ((screen.cur.row < TermWin.nrow)
 817           && (screen.cur.row >= - (int32_t)TermWin.nscrolled));
 818 #else                           /* drive with your eyes closed */
 819   MIN_IT (screen.cur.col, last_col - 1);
 820   MIN_IT (screen.cur.row, (int32_t)TermWin.nrow - 1);
 821   MAX_IT (screen.cur.row, - (int32_t)TermWin.nscrolled);
 822 #endif
 823   row = screen.cur.row + TermWin.saveLines;
 824
 825   checksel = selection.op && current_screen == selection.screen ? 1 : 0;
 826
 827   stp = screen.text[row];
 828   srp = screen.rend[row];
 829
 830   while (len--)
 831     {
 832       c = *str++;
 833
 834       if (c < 0x20)
 835         switch (c)
 836           {
 837             case C0_HT:
 838               scr_tab (1, true);
 839               continue;
 840
 841             case C0_LF:
 842               if (screen.tlen[row] != -1)      /* XXX: think about this */
 843                 MAX_IT (screen.tlen[row], screen.cur.col);
 844
 845               screen.flags &= ~Screen_WrapNext;
 846
 847               if (screen.cur.row == screen.bscroll)
 848                 scr_scroll_text (screen.tscroll, screen.bscroll, 1, 0);
 849               else if (screen.cur.row < (TermWin.nrow - 1))
 850                 row = (++screen.cur.row) + TermWin.saveLines;
 851
 852               stp = screen.text[row];  /* _must_ refresh */
 853               srp = screen.rend[row];  /* _must_ refresh */
 854               continue;
 855
 856             case C0_CR:
 857               if (screen.tlen[row] != -1)      /* XXX: think about this */
 858                 MAX_IT (screen.tlen[row], screen.cur.col);
 859
 860               screen.flags &= ~Screen_WrapNext;
 861               screen.cur.col = 0;
 862               continue;
 863           }
 864
 865       if (checksel            /* see if we're writing within selection */
 866           && !ROWCOL_IS_BEFORE (screen.cur, selection.beg)
 867           && ROWCOL_IS_BEFORE (screen.cur, selection.end))
 868         {
 869           checksel = 0;
 870           /*
 871            * If we wrote anywhere in the selected area, kill the selection
 872            * XXX: should we kill the mark too?  Possibly, but maybe that
 873            *      should be a similar check.
 874            */
 875           CLEAR_SELECTION ();
 876         }
 877
 878       if (screen.flags & Screen_WrapNext)
 879         {
 880           screen.tlen[row] = -1;
 881
 882           scr_do_wrap (); row = screen.cur.row + TermWin.saveLines;
 883
 884           stp = screen.text[row];  /* _must_ refresh */
 885           srp = screen.rend[row];  /* _must_ refresh */
 886         }
 887
 888       // rely on wcwidth to tell us the character width, at least for non-latin1
 889       // do wcwidth before further replacements, as wcwidth says that line-drawing
 890       // characters have width -1 (DOH!) on GNU/Linux sometimes.
 891       int width = c < 0x100 ? 1 : wcwidth (c);
 892
 893       if (charsets[screen.charset] == '0') // DEC SPECIAL
 894         {
 895           // vt100 special graphics and line drawing
 896           // 5f-7e standard vt100
 897           // 40-5e rxvt extension for extra curses acs chars
 898           static uint16_t vt100_0[63] = { // 40 .. 7e
 899             0x0000, 0x2191, 0x2193, 0x2192, 0x2190, 0x2588, 0x259a, 0x2603, // 40-47 hi mr. snowman!
 900             0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, // 48-4f
 901             0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, // 50-57
 902             0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0000, 0x0020, // 58-5f
 903             0x25c6, 0x2592, 0x2409, 0x240c, 0x240d, 0x240a, 0x00b0, 0x00b1, // 60-67
 904             0x2424, 0x240b, 0x2518, 0x2510, 0x250c, 0x2514, 0x253c, 0x23ba, // 68-6f
 905             0x23bb, 0x2500, 0x23bc, 0x23bd, 0x251c, 0x2524, 0x2534, 0x252c, // 70-77
 906             0x2502, 0x2264, 0x2265, 0x03c0, 0x2260, 0x00a3, 0x00b7,         // 78-7e
 907           };
 908
 909           if (c >= 0x40 && c <= 0x7e && vt100_0[c - 0x40])
 910             {
 911               c = vt100_0[c - 0x40];
 912               width = 1;
 913             }
 914         }
 915
 916       if (screen.flags & Screen_Insert)
 917         scr_insdel_chars (width, INSERT);
 918
 919       if (width != 0)
 920         {
 921           // some utf-8 decoders decode surrogate characters.
 922           if (0xd800 <= c && c <= 0xdfff)
 923             c = 0xfffd;
 924
 925 #if !UNICODE_3
 926           // trim characters we can't store directly :(
 927           if (c >= 0x10000)
 928 # if ENABLE_COMBINING
 929             c = rxvt_composite.compose (c); // map to lower 16 bits
 930 # else
 931             c = 0xfffd;
 932 # endif
 933 #endif
 934
 935           // nuke the character at this position, if required
 936           if (stp[screen.cur.col] == NOCHAR
 937               || (screen.cur.col < TermWin.ncol - 1
 938                   && stp[screen.cur.col + 1] == NOCHAR))
 939             {
 940               int col = screen.cur.col;
 941
 942               // find begin
 943               while (col > 0 && stp[col] == NOCHAR)
 944                 col--;
 945
 946               rend_t rend = SET_FONT (srp[col], FONTSET (srp[col])->find_font (' '));
 947
 948               // found begin, nuke
 949               do {
 950                 stp[col] = ' ';
 951                 srp[col] = rend;
 952                 col++;
 953               } while (col < TermWin.ncol && stp[col] == NOCHAR);
 954             }
 955
 956           rend_t rend = SET_FONT (rstyle, FONTSET (rstyle)->find_font (c));
 957
 958           do
 959             {
 960               stp[screen.cur.col] = c;
 961               srp[screen.cur.col] = rend;
 962
 963               if (screen.cur.col < last_col - 1)
 964                 screen.cur.col++;
 965               else
 966                 {
 967                   screen.tlen[row] = last_col;
 968                   if (screen.flags & Screen_Autowrap)
 969                     screen.flags |= Screen_WrapNext;
 970                   break;
 971                 }
 972
 973               c = NOCHAR;
 974             }
 975           while (--width > 0);
 976
 977           // pad with spaces when overwriting wide character with smaller one
 978           if (!width)
 979             for (int c = screen.cur.col; c < last_col && stp[c] == NOCHAR; c++)
 980               {
 981                 stp[c] = ' ';
 982                 srp[c] = rend;
 983               }
 984         }
 985       else if (width == 0)
 986         {
 987 #if ENABLE_COMBINING
 988           // handle combining characters
 989           // we just tag the accent on the previous on-screen character.
 990           // this is arguably not correct, but also arguably not wrong.
 991           // we don't handle double-width characters nicely yet.
 992
 993           text_t *tp;
 994           rend_t *rp;
 995
 996           if (screen.cur.col > 0)
 997             {
 998               tp = stp + screen.cur.col - 1;
 999               rp = srp + screen.cur.col - 1;
1000
1001               while (*tp == NOCHAR && tp > stp)
1002                 tp--, rp--;
1003             }
1004           else if (screen.cur.row > 0
1005                    && screen.tlen [screen.cur.row - 1 + TermWin.saveLines] == -1)
1006             {
1007               int line = screen.cur.row - 1 + TermWin.saveLines;
1008
1009               tp = screen.text[line] + last_col - 1;
1010               rp = screen.rend[line] + last_col - 1;
1011
1012               while (*tp == NOCHAR && tp > screen.text[line])
1013                 tp--, rp--;
1014             }
1015           else
1016             continue;
1017
1018           // first try to find a precomposed character
1019           unicode_t n = rxvt_compose (*tp, c);
1020           if (n == NOCHAR)
1021             n = rxvt_composite.compose (*tp, c);
1022
1023           *tp = n;
1024           *rp = SET_FONT (*rp, FONTSET (*rp)->find_font (*tp));
1025 #endif
1026         }
1027     }
1028
1029   if (screen.tlen[row] != -1)      /* XXX: think about this */
1030     MAX_IT (screen.tlen[row], screen.cur.col);
1031
1032 #ifdef DEBUG_STRICT
1033   assert (screen.cur.row >= 0);
1034 #else                           /* drive with your eyes closed */
1035   MAX_IT (screen.cur.row, 0);
1036 #endif
1037 }
1038
1039 /* ------------------------------------------------------------------------- */
1040 /*
1041  * Process Backspace.  Move back the cursor back a position, wrap if have to
1042  * XTERM_SEQ: CTRL-H
1043  */
1044 void
1045 rxvt_term::scr_backspace ()
1046 {
1047   want_refresh = 1;
1048
1049   if (screen.cur.col == 0)
1050     {
1051       if (screen.cur.row > 0)
1052         {
1053 #ifdef TERMCAP_HAS_BW
1054           screen.cur.col = TermWin.ncol - 1;
1055           screen.cur.row--;
1056           return;
1057 #endif
1058         }
1059     }
1060   else if (!(screen.flags & Screen_WrapNext))
1061     scr_gotorc (0, -1, RELATIVE);
1062
1063   screen.flags &= ~Screen_WrapNext;
1064 }
1065
1066 /* ------------------------------------------------------------------------- */
1067 /*
1068  * Process Horizontal Tab
1069  * count: +ve = forward; -ve = backwards
1070  * XTERM_SEQ: CTRL-I
1071  */
1072 void
1073 rxvt_term::scr_tab (int count, bool ht)
1074 {
1075   int i, x;
1076
1077   want_refresh = 1;
1078   i = x = screen.cur.col;
1079
1080   if (count == 0)
1081     return;
1082   else if (count > 0)
1083     {
1084       int row = TermWin.saveLines + screen.cur.row;
1085       text_t *tp = screen.text[row];
1086       rend_t *rp = screen.rend[row];
1087       rend_t base_rend = rp[i];
1088       ht &= tp[i] == ' ';
1089
1090       for (; ++i < TermWin.ncol; )
1091         if (tabs[i])
1092           {
1093             x = i;
1094             if (!--count)
1095               break;
1096           }
1097         else
1098           ht &= tp[i] == ' '
1099                 && RS_SAME (rp[i], base_rend);
1100
1101       if (count)
1102         x = TermWin.ncol - 1;
1103
1104       // store horizontal tab commands as characters inside the text
1105       // buffer so they can be selected and pasted.
1106       if (ht && options & Opt_pastableTabs)
1107         {
1108           base_rend = SET_FONT (base_rend, 0);
1109
1110           if (screen.tlen[row] != -1)      /* XXX: think about this */
1111             MAX_IT (screen.tlen[row], x);
1112
1113           i = screen.cur.col;
1114
1115           tp[i] = '\t';
1116           rp[i] = base_rend;
1117
1118           while (++i < x)
1119             {
1120               tp[i] = NOCHAR;
1121               rp[i] = base_rend;
1122             }
1123         }
1124     }
1125   else /* if (count < 0) */
1126     {
1127       for (; --i >= 0; )
1128         if (tabs[i])
1129           {
1130             x = i;
1131             if (!++count)
1132               break;
1133           }
1134
1135       if (count)
1136         x = 0;
1137     }
1138
1139   if (x != screen.cur.col)
1140     scr_gotorc (0, x, R_RELATIVE);
1141 }
1142
1143 /* ------------------------------------------------------------------------- */
1144 /*
1145  * Process DEC Back Index
1146  * XTERM_SEQ: ESC 6
1147  * Move cursor left in row.  If we're at the left boundary, shift everything
1148  * in that row right.  Clear left column.
1149  */
1150 #if ENABLE_FRILLS
1151 void
1152 rxvt_term::scr_backindex ()
1153 {
1154   if (screen.cur.col > 0)
1155     scr_gotorc (0, -1, R_RELATIVE | C_RELATIVE);
1156   else
1157     {
1158       if (screen.tlen[screen.cur.row + TermWin.saveLines] == 0)
1159         return;             /* um, yeah? */
1160
1161       scr_insdel_chars (1, INSERT);
1162     }
1163 }
1164 #endif
1165 /* ------------------------------------------------------------------------- */
1166 /*
1167  * Process DEC Forward Index
1168  * XTERM_SEQ: ESC 9
1169  * Move cursor right in row.  If we're at the right boundary, shift everything
1170  * in that row left.  Clear right column.
1171  */
1172 #if ENABLE_FRILLS
1173 void
1174 rxvt_term::scr_forwardindex ()
1175 {
1176   int             row;
1177
1178   if (screen.cur.col < TermWin.ncol - 1)
1179     scr_gotorc (0, 1, R_RELATIVE | C_RELATIVE);
1180   else
1181     {
1182       row = screen.cur.row + TermWin.saveLines;
1183
1184       if (screen.tlen[row] == 0)
1185         return;             /* um, yeah? */
1186       else if (screen.tlen[row] == -1)
1187         screen.tlen[row] = TermWin.ncol;
1188
1189       scr_gotorc (0, 0, R_RELATIVE);
1190       scr_insdel_chars (1, DELETE);
1191       scr_gotorc (0, TermWin.ncol - 1, R_RELATIVE);
1192     }
1193 }
1194 #endif
1195
1196 /* ------------------------------------------------------------------------- */
1197 /*
1198  * Goto Row/Column
1199  */
1200 void
1201 rxvt_term::scr_gotorc (int row, int col, int relative)
1202 {
1203   want_refresh = 1;
1204   ZERO_SCROLLBACK ();
1205
1206   screen.cur.col = relative & C_RELATIVE ? screen.cur.col + col : col;
1207   MAX_IT (screen.cur.col, 0);
1208   MIN_IT (screen.cur.col, (int32_t)TermWin.ncol - 1);
1209
1210   screen.flags &= ~Screen_WrapNext;
1211
1212   if (relative & R_RELATIVE)
1213     {
1214       if (row > 0)
1215         {
1216           if (screen.cur.row <= screen.bscroll
1217               && (screen.cur.row + row) > screen.bscroll)
1218             screen.cur.row = screen.bscroll;
1219           else
1220             screen.cur.row += row;
1221         }
1222       else if (row < 0)
1223         {
1224           if (screen.cur.row >= screen.tscroll
1225               && (screen.cur.row + row) < screen.tscroll)
1226             screen.cur.row = screen.tscroll;
1227           else
1228             screen.cur.row += row;
1229         }
1230     }
1231   else
1232     {
1233       if (screen.flags & Screen_Relative)
1234         {        /* relative origin mode */
1235           screen.cur.row = row + screen.tscroll;
1236           MIN_IT (screen.cur.row, screen.bscroll);
1237         }
1238       else
1239         screen.cur.row = row;
1240     }
1241
1242   MAX_IT (screen.cur.row, 0);
1243   MIN_IT (screen.cur.row, (int32_t)TermWin.nrow - 1);
1244 }
1245
1246 /* ------------------------------------------------------------------------- */
1247 /*
1248  * direction should be UP or DN
1249  */
1250 void
1251 rxvt_term::scr_index (enum page_dirn direction)
1252 {
1253   int dirn;
1254
1255   want_refresh = 1;
1256   ZERO_SCROLLBACK ();
1257
1258   dirn = ((direction == UP) ? 1 : -1);
1259
1260   screen.flags &= ~Screen_WrapNext;
1261
1262   if ((screen.cur.row == screen.bscroll && direction == UP)
1263       || (screen.cur.row == screen.tscroll && direction == DN))
1264     scr_scroll_text (screen.tscroll, screen.bscroll, dirn, 0);
1265   else
1266     screen.cur.row += dirn;
1267
1268   MAX_IT (screen.cur.row, 0);
1269   MIN_IT (screen.cur.row, (int32_t)TermWin.nrow - 1);
1270   selection_check (0);
1271 }
1272
1273 /* ------------------------------------------------------------------------- */
1274 /*
1275  * Erase part or whole of a line
1276  * XTERM_SEQ: Clear line to right: ESC [ 0 K
1277  * XTERM_SEQ: Clear line to left : ESC [ 1 K
1278  * XTERM_SEQ: Clear whole line   : ESC [ 2 K
1279  */
1280 void
1281 rxvt_term::scr_erase_line (int mode)
1282 {
1283   unsigned int row, col, num;
1284
1285   want_refresh = 1;
1286   ZERO_SCROLLBACK ();
1287
1288   selection_check (1);
1289
1290   row = TermWin.saveLines + screen.cur.row;
1291   switch (mode)
1292     {
1293       case 0:                     /* erase to end of line */
1294         col = screen.cur.col;
1295         num = TermWin.ncol - col;
1296         MIN_IT (screen.tlen[row], (int16_t)col);
1297         if (ROWCOL_IN_ROW_AT_OR_AFTER (selection.beg, screen.cur)
1298             || ROWCOL_IN_ROW_AT_OR_AFTER (selection.end, screen.cur))
1299           CLEAR_SELECTION ();
1300         break;
1301       case 1:                     /* erase to beginning of line */
1302         col = 0;
1303         num = screen.cur.col + 1;
1304         if (ROWCOL_IN_ROW_AT_OR_BEFORE (selection.beg, screen.cur)
1305             || ROWCOL_IN_ROW_AT_OR_BEFORE (selection.end, screen.cur))
1306           CLEAR_SELECTION ();
1307         break;
1308       case 2:                     /* erase whole line */
1309         col = 0;
1310         num = TermWin.ncol;
1311         screen.tlen[row] = 0;
1312         if (selection.beg.row <= screen.cur.row
1313             && selection.end.row >= screen.cur.row)
1314           CLEAR_SELECTION ();
1315         break;
1316       default:
1317         return;
1318     }
1319
1320   if (screen.text[row])
1321     scr_blank_line (&screen.text[row][col], &screen.rend[row][col], num, rstyle);
1322   else
1323     scr_blank_screen_mem (screen.text, screen.rend, row, rstyle);
1324 }
1325
1326 /* ------------------------------------------------------------------------- */
1327 /*
1328  * Erase part of whole of the screen
1329  * XTERM_SEQ: Clear screen after cursor : ESC [ 0 J
1330  * XTERM_SEQ: Clear screen before cursor: ESC [ 1 J
1331  * XTERM_SEQ: Clear whole screen        : ESC [ 2 J
1332  */
1333 void
1334 rxvt_term::scr_erase_screen (int mode)
1335 {
1336   int num;
1337   int32_t row, row_offset;
1338   rend_t ren;
1339   XGCValues gcvalue;
1340
1341   want_refresh = 1;
1342   ZERO_SCROLLBACK ();
1343
1344   row_offset = (int32_t)TermWin.saveLines;
1345
1346   switch (mode)
1347     {
1348       case 0:                     /* erase to end of screen */
1349         selection_check (1);
1350         scr_erase_line (0);
1351         row = screen.cur.row + 1;    /* possible OOB */
1352         num = TermWin.nrow - row;
1353         break;
1354       case 1:                     /* erase to beginning of screen */
1355         selection_check (3);
1356         scr_erase_line (1);
1357         row = 0;
1358         num = screen.cur.row;
1359         break;
1360       case 2:                     /* erase whole screen */
1361         selection_check (3);
1362         row = 0;
1363         num = TermWin.nrow;
1364         break;
1365       default:
1366         return;
1367     }
1368
1369   if (selection.op && current_screen == selection.screen
1370       && ((selection.beg.row >= row && selection.beg.row <= row + num)
1371           || (selection.end.row >= row
1372               && selection.end.row <= row + num)))
1373     CLEAR_SELECTION ();
1374
1375   if (row >= TermWin.nrow) /* Out Of Bounds */
1376     return;
1377
1378   MIN_IT (num, (TermWin.nrow - row));
1379
1380   if (rstyle & (RS_RVid | RS_Uline))
1381     ren = (rend_t) ~RS_None;
1382   else if (GET_BASEBG (rstyle) == Color_bg)
1383     {
1384       ren = DEFAULT_RSTYLE;
1385       CLEAR_ROWS (row, num);
1386     }
1387   else
1388     {
1389       ren = rstyle & (RS_fgMask | RS_bgMask);
1390       gcvalue.foreground = pix_colors[GET_BGCOLOR (rstyle)];
1391       XChangeGC (display->display, TermWin.gc, GCForeground, &gcvalue);
1392       ERASE_ROWS (row, num);
1393       gcvalue.foreground = pix_colors[Color_fg];
1394       XChangeGC (display->display, TermWin.gc, GCForeground, &gcvalue);
1395     }
1396
1397   for (; num--; row++)
1398     {
1399       scr_blank_screen_mem (screen.text, screen.rend, (unsigned int) (row + row_offset), rstyle);
1400       screen.tlen[row + row_offset] = 0;
1401       scr_blank_line (drawn_text[row], drawn_rend[row], (unsigned int)TermWin.ncol, ren);
1402     }
1403 }
1404
1405 /* ------------------------------------------------------------------------- */
1406 /*
1407  * Fill the screen with `E's
1408  * XTERM_SEQ: Screen Alignment Test: ESC # 8
1409  */
1410 void
1411 rxvt_term::scr_E ()
1412 {
1413   int             i, j, k;
1414   rend_t         *r1, fs;
1415
1416   want_refresh = 1;
1417   ZERO_SCROLLBACK ();
1418
1419   num_scr_allow = 0;
1420   selection_check (3);
1421
1422   fs = SET_FONT (rstyle, FONTSET (rstyle)->find_font ('E'));
1423   for (k = TermWin.saveLines, i = TermWin.nrow; i--; k++)
1424     {
1425       screen.tlen[k] = TermWin.ncol;    /* make the `E's selectable */
1426       fill_text (screen.text[k], 'E', TermWin.ncol);
1427       for (r1 = screen.rend[k], j = TermWin.ncol; j--; )
1428         *r1++ = fs;
1429     }
1430 }
1431
1432 /* ------------------------------------------------------------------------- */
1433 /*
1434  * Insert/Delete <count> lines
1435  */
1436 void
1437 rxvt_term::scr_insdel_lines (int count, int insdel)
1438 {
1439   int end;
1440
1441   ZERO_SCROLLBACK ();
1442
1443   selection_check (1);
1444
1445   if (screen.cur.row > screen.bscroll)
1446     return;
1447
1448   end = screen.bscroll - screen.cur.row + 1;
1449   if (count > end)
1450     {
1451       if (insdel == DELETE)
1452         return;
1453       else if (insdel == INSERT)
1454         count = end;
1455     }
1456
1457   scr_do_wrap ();
1458
1459   scr_scroll_text (screen.cur.row, screen.bscroll, insdel * count, 0);
1460 }
1461
1462 /* ------------------------------------------------------------------------- */
1463 /*
1464  * Insert/Delete <count> characters from the current position
1465  */
1466 void
1467 rxvt_term::scr_insdel_chars (int count, int insdel)
1468 {
1469   int col, row;
1470   rend_t tr;
1471   text_t *stp;
1472   rend_t *srp;
1473   int16_t *slp;
1474
1475   want_refresh = 1;
1476   ZERO_SCROLLBACK ();
1477
1478   if (count <= 0)
1479     return;
1480
1481   scr_do_wrap ();
1482
1483   selection_check (1);
1484   MIN_IT (count, (TermWin.ncol - screen.cur.col));
1485
1486   row = screen.cur.row + TermWin.saveLines;
1487
1488   stp = screen.text[row];
1489   srp = screen.rend[row];
1490   slp = &screen.tlen[row];
1491
1492   switch (insdel)
1493     {
1494       case INSERT:
1495         for (col = TermWin.ncol - 1; (col - count) >= screen.cur.col; col--)
1496           {
1497             stp[col] = stp[col - count];
1498             srp[col] = srp[col - count];
1499           }
1500
1501         if (*slp != -1)
1502           {
1503             *slp += count;
1504             MIN_IT (*slp, TermWin.ncol);
1505           }
1506
1507         if (selection.op && current_screen == selection.screen
1508             && ROWCOL_IN_ROW_AT_OR_AFTER (selection.beg, screen.cur))
1509           {
1510             if (selection.end.row != screen.cur.row
1511                 || (selection.end.col + count >= TermWin.ncol))
1512               CLEAR_SELECTION ();
1513             else
1514               {              /* shift selection */
1515                 selection.beg.col  += count;
1516                 selection.mark.col += count; /* XXX: yes? */
1517                 selection.end.col  += count;
1518               }
1519           }
1520
1521         scr_blank_line (&stp[screen.cur.col], &srp[screen.cur.col],
1522                         (unsigned int)count, rstyle);
1523         break;
1524
1525       case ERASE:
1526         screen.cur.col += count;     /* don't worry if > TermWin.ncol */
1527         selection_check (1);
1528         screen.cur.col -= count;
1529         scr_blank_line (&stp[screen.cur.col], &srp[screen.cur.col],
1530                         (unsigned int)count, rstyle);
1531         break;
1532
1533       case DELETE:
1534         tr = srp[TermWin.ncol - 1] & (RS_fgMask | RS_bgMask | RS_baseattrMask);
1535
1536         for (col = screen.cur.col; (col + count) < TermWin.ncol; col++)
1537           {
1538             stp[col] = stp[col + count];
1539             srp[col] = srp[col + count];
1540           }
1541
1542         scr_blank_line (&stp[TermWin.ncol - count], &srp[TermWin.ncol - count],
1543                         (unsigned int)count, tr);
1544
1545         if (*slp == -1) /* break line continuation */
1546           *slp = TermWin.ncol;
1547
1548         *slp -= count;
1549         MAX_IT (*slp, 0);
1550
1551         if (selection.op && current_screen == selection.screen
1552             && ROWCOL_IN_ROW_AT_OR_AFTER (selection.beg, screen.cur))
1553           {
1554             if (selection.end.row != screen.cur.row
1555                 || (screen.cur.col >= selection.beg.col - count)
1556                 || selection.end.col >= TermWin.ncol)
1557               CLEAR_SELECTION ();
1558             else
1559               {
1560                 /* shift selection */
1561                 selection.beg.col  -= count;
1562                 selection.mark.col -= count; /* XXX: yes? */
1563                 selection.end.col  -= count;
1564               }
1565           }
1566
1567         break;
1568     }
1569 }
1570
1571 /* ------------------------------------------------------------------------- */
1572 /*
1573  * Set the scrolling region
1574  * XTERM_SEQ: Set region <top> - <bot> inclusive: ESC [ <top> ; <bot> r
1575  */
1576 void
1577 rxvt_term::scr_scroll_region (int top, int bot)
1578 {
1579   MAX_IT (top, 0);
1580   MIN_IT (bot, (int)TermWin.nrow - 1);
1581
1582   if (top > bot)
1583     return;
1584
1585   screen.tscroll = top;
1586   screen.bscroll = bot;
1587   scr_gotorc (0, 0, 0);
1588 }
1589
1590 /* ------------------------------------------------------------------------- */
1591 /*
1592  * Make the cursor visible/invisible
1593  * XTERM_SEQ: Make cursor visible  : ESC [ ? 25 h
1594  * XTERM_SEQ: Make cursor invisible: ESC [ ? 25 l
1595  */
1596 void
1597 rxvt_term::scr_cursor_visible (int mode)
1598 {
1599   want_refresh = 1;
1600
1601   if (mode)
1602     screen.flags |= Screen_VisibleCursor;
1603   else
1604     screen.flags &= ~Screen_VisibleCursor;
1605 }
1606
1607 /* ------------------------------------------------------------------------- */
1608 /*
1609  * Set/unset automatic wrapping
1610  * XTERM_SEQ: Set Wraparound  : ESC [ ? 7 h
1611  * XTERM_SEQ: Unset Wraparound: ESC [ ? 7 l
1612  */
1613 void
1614 rxvt_term::scr_autowrap (int mode)
1615 {
1616   if (mode)
1617     screen.flags |= Screen_Autowrap;
1618   else
1619     screen.flags &= ~(Screen_Autowrap | Screen_WrapNext);
1620 }
1621
1622 /* ------------------------------------------------------------------------- */
1623 /*
1624  * Set/unset margin origin mode
1625  * Absolute mode: line numbers are counted relative to top margin of screen
1626  *      and the cursor can be moved outside the scrolling region.
1627  * Relative mode: line numbers are relative to top margin of scrolling region
1628  *      and the cursor cannot be moved outside.
1629  * XTERM_SEQ: Set Absolute: ESC [ ? 6 h
1630  * XTERM_SEQ: Set Relative: ESC [ ? 6 l
1631  */
1632 void
1633 rxvt_term::scr_relative_origin (int mode)
1634 {
1635   if (mode)
1636     screen.flags |= Screen_Relative;
1637   else
1638     screen.flags &= ~Screen_Relative;
1639
1640   scr_gotorc (0, 0, 0);
1641 }
1642
1643 /* ------------------------------------------------------------------------- */
1644 /*
1645  * Set insert/replace mode
1646  * XTERM_SEQ: Set Insert mode : ESC [ ? 4 h
1647  * XTERM_SEQ: Set Replace mode: ESC [ ? 4 l
1648  */
1649 void
1650 rxvt_term::scr_insert_mode (int mode)
1651 {
1652   if (mode)
1653     screen.flags |= Screen_Insert;
1654   else
1655     screen.flags &= ~Screen_Insert;
1656 }
1657
1658 /* ------------------------------------------------------------------------- */
1659 /*
1660  * Set/Unset tabs
1661  * XTERM_SEQ: Set tab at current column  : ESC H
1662  * XTERM_SEQ: Clear tab at current column: ESC [ 0 g
1663  * XTERM_SEQ: Clear all tabs             : ESC [ 3 g
1664  */
1665 void
1666 rxvt_term::scr_set_tab (int mode)
1667 {
1668   if (mode < 0)
1669     memset (tabs, 0, TermWin.ncol * sizeof (char));
1670   else if (screen.cur.col < TermWin.ncol)
1671     tabs[screen.cur.col] = (mode ? 1 : 0);
1672 }
1673
1674 /* ------------------------------------------------------------------------- */
1675 /*
1676  * Set reverse/normal video
1677  * XTERM_SEQ: Reverse video: ESC [ ? 5 h
1678  * XTERM_SEQ: Normal video : ESC [ ? 5 l
1679  */
1680 void
1681 rxvt_term::scr_rvideo_mode (int mode)
1682 {
1683   XGCValues gcvalue;
1684
1685   if (rvideo != mode)
1686     {
1687       rvideo = mode;
1688       SWAP_IT (pix_colors[Color_fg], pix_colors[Color_bg], rxvt_color);
1689 #if XPM_BACKGROUND
1690       if (bgPixmap.pixmap == None)
1691 #endif
1692 #if TRANSPARENT
1693         if (! (options & Opt_transparent) || am_transparent == 0)
1694 #endif
1695           XSetWindowBackground (display->display, TermWin.vt,
1696                                pix_colors[Color_bg]);
1697
1698       gcvalue.foreground = pix_colors[Color_fg];
1699       gcvalue.background = pix_colors[Color_bg];
1700       XChangeGC (display->display, TermWin.gc, GCBackground | GCForeground,
1701                 &gcvalue);
1702       scr_clear ();
1703       scr_touch (true);
1704     }
1705 }
1706
1707 /* ------------------------------------------------------------------------- */
1708 /*
1709  * Report current cursor position
1710  * XTERM_SEQ: Report position: ESC [ 6 n
1711  */
1712 void
1713 rxvt_term::scr_report_position ()
1714 {
1715   tt_printf ("\033[%d;%dR", screen.cur.row + 1, screen.cur.col + 1);
1716 }
1717 \f
1718 /* ------------------------------------------------------------------------- *
1719  *                                  FONTS                                    *
1720  * ------------------------------------------------------------------------- */
1721
1722 /*
1723  * Set font style
1724  */
1725 void
1726 rxvt_term::set_font_style ()
1727 {
1728   switch (charsets[screen.charset])
1729     {
1730       case '0':                   /* DEC Special Character & Line Drawing Set */
1731         break;
1732       case 'A':                   /* United Kingdom (UK) */
1733         break;
1734       case 'B':                   /* United States (USASCII) */
1735         break;
1736       case '<':                   /* Multinational character set */
1737         break;
1738       case '5':                   /* Finnish character set */
1739         break;
1740       case 'C':                   /* Finnish character set */
1741         break;
1742       case 'K':                   /* German character set */
1743         break;
1744     }
1745 }
1746
1747 /* ------------------------------------------------------------------------- */
1748 /*
1749  * Choose a font
1750  * XTERM_SEQ: Invoke G0 character set: CTRL-O
1751  * XTERM_SEQ: Invoke G1 character set: CTRL-N
1752  * XTERM_SEQ: Invoke G2 character set: ESC N
1753  * XTERM_SEQ: Invoke G3 character set: ESC O
1754  */
1755 void
1756 rxvt_term::scr_charset_choose (int set)
1757 {
1758   screen.charset = set;
1759   set_font_style ();
1760 }
1761
1762 /* ------------------------------------------------------------------------- */
1763 /*
1764  * Set a font
1765  * XTERM_SEQ: Set G0 character set: ESC ( <C>
1766  * XTERM_SEQ: Set G1 character set: ESC ) <C>
1767  * XTERM_SEQ: Set G2 character set: ESC * <C>
1768  * XTERM_SEQ: Set G3 character set: ESC + <C>
1769  * See set_font_style for possible values for <C>
1770  */
1771 void
1772 rxvt_term::scr_charset_set (int set, unsigned int ch)
1773 {
1774   charsets[set] = (unsigned char)ch;
1775   set_font_style ();
1776 }
1777
1778 \f
1779 /* ------------------------------------------------------------------------- *
1780  *                        MAJOR SCREEN MANIPULATION                          *
1781  * ------------------------------------------------------------------------- */
1782
1783 /*
1784  * refresh matching text.
1785  */
1786 bool
1787 rxvt_term::scr_refresh_rend (rend_t mask, rend_t value)
1788 {
1789   bool found = false;
1790
1791   for (int i = 0; i < TermWin.nrow; i++)
1792     {
1793       int col = 0;
1794       rend_t *drp = drawn_rend [i];
1795
1796       for (; col < TermWin.ncol; col++, drp++)
1797         if ((*drp & mask) == value)
1798           {
1799             found = true;
1800             *drp = ~value;
1801           }
1802     }
1803
1804   return found;
1805 }
1806
1807 /*
1808  * Refresh an area
1809  */
1810 enum {
1811   PART_BEG = 0,
1812   PART_END,
1813   RC_COUNT
1814 };
1815
1816 void
1817 rxvt_term::scr_expose (int x, int y, int width, int height, bool refresh)
1818 {
1819   int i;
1820   row_col_t rc[RC_COUNT];
1821
1822   if (drawn_text == NULL)  /* sanity check */
1823     return;
1824
1825 #ifndef NO_SLOW_LINK_SUPPORT
1826   if (refresh_type == FAST_REFRESH && !display->is_local)
1827     {
1828       y = 0;
1829       height = TermWin.height;
1830     }
1831 #endif
1832
1833 #ifdef DEBUG_STRICT
1834   x = max (x, 0);
1835   x = min (x, (int)TermWin.width);
1836   y = max (y, 0);
1837   y = min (y, (int)TermWin.height);
1838 #endif
1839
1840   /* round down */
1841   rc[PART_BEG].col = Pixel2Col (x);
1842   rc[PART_BEG].row = Pixel2Row (y);
1843   /* round up */
1844   rc[PART_END].col = Pixel2Width (x + width + TermWin.fwidth - 1);
1845   rc[PART_END].row = Pixel2Row (y + height + TermWin.fheight - 1);
1846
1847   /* sanity checks */
1848   for (i = PART_BEG; i < RC_COUNT; i++)
1849     {
1850       MIN_IT (rc[i].col, TermWin.ncol - 1);
1851       MIN_IT (rc[i].row, TermWin.nrow - 1);
1852     }
1853
1854   for (i = rc[PART_BEG].row; i <= rc[PART_END].row; i++)
1855     fill_text (&drawn_text[i][rc[PART_BEG].col], 0, rc[PART_END].col - rc[PART_BEG].col + 1);
1856
1857   if (refresh)
1858     scr_refresh (SLOW_REFRESH);
1859 }
1860
1861 /* ------------------------------------------------------------------------- */
1862 /*
1863  * Refresh the entire screen
1864  */
1865 void
1866 rxvt_term::scr_touch (bool refresh)
1867 {
1868   scr_expose (0, 0, TermWin.width, TermWin.height, refresh);
1869 }
1870
1871 /* ------------------------------------------------------------------------- */
1872 /*
1873  * Move the display so that the line represented by scrollbar value Y is at
1874  * the top of the screen
1875  */
1876 int
1877 rxvt_term::scr_move_to (int y, int len)
1878 {
1879   long p = 0;
1880   unsigned int oldviewstart;
1881
1882   oldviewstart = TermWin.view_start;
1883
1884   if (y < len)
1885     {
1886       p = (TermWin.nrow + TermWin.nscrolled) * (len - y) / len;
1887       p -= (long) (TermWin.nrow - 1);
1888       p = max (p, 0);
1889     }
1890
1891   TermWin.view_start = (unsigned int)min (p, TermWin.nscrolled);
1892
1893   return scr_changeview (oldviewstart);
1894 }
1895
1896 /* ------------------------------------------------------------------------- */
1897 /*
1898  * Page the screen up/down nlines
1899  * direction should be UP or DN
1900  */
1901 int
1902 rxvt_term::scr_page (enum page_dirn direction, int nlines)
1903 {
1904   int n;
1905   unsigned int oldviewstart;
1906
1907 #ifdef DEBUG_STRICT
1908   assert ((nlines >= 0) && (nlines <= TermWin.nrow));
1909 #endif
1910   oldviewstart = TermWin.view_start;
1911   if (direction == UP)
1912     {
1913       n = TermWin.view_start + nlines;
1914       TermWin.view_start = min (n, TermWin.nscrolled);
1915     }
1916   else
1917     {
1918       n = TermWin.view_start - nlines;
1919       TermWin.view_start = max (n, 0);
1920     }
1921   return scr_changeview (oldviewstart);
1922 }
1923
1924 int
1925 rxvt_term::scr_changeview (unsigned int oldviewstart)
1926 {
1927   if (TermWin.view_start != oldviewstart)
1928     {
1929       want_refresh = 1;
1930       num_scr -= (TermWin.view_start - oldviewstart);
1931     }
1932
1933   return (int) (TermWin.view_start - oldviewstart);
1934 }
1935
1936 /* ------------------------------------------------------------------------- */
1937 void
1938 rxvt_term::scr_bell ()
1939 {
1940 #ifndef NO_BELL
1941 # ifndef NO_MAPALERT
1942 #  ifdef MAPALERT_OPTION
1943   if (options & Opt_mapAlert)
1944 #  endif
1945     XMapWindow (display->display, TermWin.parent[0]);
1946 # endif
1947   if (options & Opt_visualBell)
1948     {
1949       scr_rvideo_mode (!rvideo); /* refresh also done */
1950       scr_rvideo_mode (!rvideo); /* refresh also done */
1951     }
1952   else
1953     XBell (display->display, 0);
1954 #endif
1955 }
1956
1957 /* ------------------------------------------------------------------------- */
1958 /* ARGSUSED */
1959 void
1960 rxvt_term::scr_printscreen (int fullhist)
1961 {
1962 #ifdef PRINTPIPE
1963   int i, r1, nrows, row_offset;
1964   FILE *fd;
1965
1966   if ((fd = popen_printer ()) == NULL)
1967     return;
1968
1969   nrows = TermWin.nrow;
1970   row_offset = TermWin.saveLines;
1971
1972   if (!fullhist)
1973     row_offset -= TermWin.view_start;
1974   else
1975     {
1976       nrows += TermWin.nscrolled;
1977       row_offset -= TermWin.nscrolled;
1978     }
1979
1980   wctomb (0, 0);
1981
1982   for (r1 = 0; r1 < nrows; r1++)
1983     {
1984       text_t *tp = screen.text[r1 + row_offset];
1985       int len = screen.tlen[r1 + row_offset];
1986
1987       for (i = len >= 0 ? len : TermWin.ncol - 1; i--; )
1988         {
1989           char mb[MB_LEN_MAX];
1990           text_t t = *tp++;
1991           if (t == NOCHAR)
1992             continue;
1993
1994           len = wctomb (mb, t);
1995
1996           if (len <= 0)
1997             {
1998               mb[0] = ' ';
1999               len = 1;
2000             }
2001
2002           fwrite (mb, 1, len, fd);
2003         }
2004
2005       fputc ('\n', fd);
2006     }
2007
2008   pclose_printer (fd);
2009 #endif
2010 }
2011
2012 /* ------------------------------------------------------------------------- */
2013 /*
2014  * Refresh the screen
2015  * drawn_text/drawn_rend contain the screen information before the update.
2016  * screen.text/screen.rend contain what the screen will change to.
2017  */
2018
2019 #define FONT_WIDTH(X, Y)                                                \
2020     (X)->per_char[ (Y) - (X)->min_char_or_byte2].width
2021 #define FONT_RBEAR(X, Y)                                                \
2022     (X)->per_char[ (Y) - (X)->min_char_or_byte2].rbearing
2023 #define FONT_LBEAR(X, Y)                                                \
2024     (X)->per_char[ (Y) - (X)->min_char_or_byte2].lbearing
2025 #define IS_FONT_CHAR(X, Y)                                              \
2026     ((Y) >= (X)->min_char_or_byte2 && (Y) <= (X)->max_char_or_byte2)
2027
2028 void
2029 rxvt_term::scr_refresh (unsigned char refresh_type)
2030 {
2031   unsigned char must_clear, /* use draw_string not draw_image_string     */
2032                 showcursor; /* show the cursor                           */
2033   int16_t col, row,   /* column/row we're processing               */
2034           ocrow;      /* old cursor row                            */
2035   int i,              /* tmp                                       */
2036   row_offset;         /* basic offset in screen structure          */
2037 #ifndef NO_CURSORCOLOR
2038   rend_t cc1;         /* store colours at cursor position (s)      */
2039 #endif
2040   rend_t *crp;        // cursor rendition pointer
2041
2042   want_refresh = 0;        /* screen is current */
2043
2044   if (refresh_type == NO_REFRESH || !TermWin.mapped)
2045     return;
2046
2047   /*
2048    * A: set up vars
2049    */
2050   must_clear = 0;
2051   refresh_count = 0;
2052
2053   row_offset = TermWin.saveLines - TermWin.view_start;
2054
2055 #if XPM_BACKGROUND
2056   must_clear |= (bgPixmap.pixmap != None);
2057 #endif
2058 #if TRANSPARENT
2059   must_clear |= ((options & Opt_transparent) && am_transparent);
2060 #endif
2061   ocrow = oldcursor.row; /* is there an old outline cursor on screen? */
2062
2063   /*
2064    * B: reverse any characters which are selected
2065    */
2066   scr_reverse_selection ();
2067
2068   /*
2069    * C: set the cursor character (s)
2070    */
2071   {
2072     unsigned char setoldcursor;
2073     rend_t ccol1,  /* Cursor colour       */
2074            ccol2;  /* Cursor colour2      */
2075
2076     showcursor = (screen.flags & Screen_VisibleCursor);
2077 #ifdef CURSOR_BLINK
2078     if (hidden_cursor)
2079       showcursor = 0;
2080 #endif
2081
2082     if (showcursor)
2083       {
2084         int col = screen.cur.col;
2085
2086         while (col && screen.text[screen.cur.row + TermWin.saveLines][col] == NOCHAR)
2087           col--;
2088
2089         crp = &screen.rend[screen.cur.row + TermWin.saveLines][col];
2090
2091         if (showcursor && TermWin.focus)
2092           {
2093             *crp ^= RS_RVid;
2094 #ifndef NO_CURSORCOLOR
2095             cc1 = *crp & (RS_fgMask | RS_bgMask);
2096             if (ISSET_PIXCOLOR (Color_cursor))
2097               ccol1 = Color_cursor;
2098             else
2099 #ifdef CURSOR_COLOR_IS_RENDITION_COLOR
2100               ccol1 = GET_FGCOLOR (rstyle);
2101 #else
2102               ccol1 = Color_fg;
2103 #endif
2104             if (ISSET_PIXCOLOR (Color_cursor2))
2105               ccol2 = Color_cursor2;
2106             else
2107 #ifdef CURSOR_COLOR_IS_RENDITION_COLOR
2108               ccol2 = GET_BGCOLOR (rstyle);
2109 #else
2110               ccol2 = Color_bg;
2111 #endif
2112             *crp = SET_FGCOLOR (*crp, ccol1);
2113             *crp = SET_BGCOLOR (*crp, ccol2);
2114 #endif
2115           }
2116       }
2117
2118     /* make sure no outline cursor is left around */
2119     setoldcursor = 0;
2120     if (ocrow != -1)
2121       {
2122         if (screen.cur.row + TermWin.view_start != ocrow
2123             || screen.cur.col != oldcursor.col)
2124           {
2125             if (ocrow < TermWin.nrow
2126                 && oldcursor.col < TermWin.ncol)
2127               drawn_rend[ocrow][oldcursor.col] ^= (RS_RVid | RS_Uline);
2128
2129             if (TermWin.focus || !showcursor)
2130               oldcursor.row = -1;
2131             else
2132               setoldcursor = 1;
2133           }
2134       }
2135     else if (!TermWin.focus)
2136       setoldcursor = 1;
2137
2138     if (setoldcursor)
2139       {
2140         if (screen.cur.row + TermWin.view_start >= TermWin.nrow)
2141           oldcursor.row = -1;
2142         else
2143           {
2144             oldcursor.row = screen.cur.row + TermWin.view_start;
2145             oldcursor.col = screen.cur.col;
2146           }
2147       }
2148   }
2149
2150 #if ENABLE_OVERLAY
2151   scr_swap_overlay ();
2152 #endif
2153
2154   rend_t *drp, *srp;  /* drawn-rend-pointer, screen-rend-pointer   */
2155   text_t *dtp, *stp;  /* drawn-text-pointer, screen-text-pointer   */
2156
2157 #ifndef NO_SLOW_LINK_SUPPORT
2158   /*
2159    * D: CopyArea pass - very useful for slower links
2160    *    This has been deliberately kept simple.
2161    */
2162   i = num_scr;
2163   if (!display->is_local
2164       && refresh_type == FAST_REFRESH && num_scr_allow && i
2165       && abs (i) < TermWin.nrow && !must_clear)
2166     {
2167       int16_t nits;
2168       int j;
2169       int len, wlen;
2170
2171       j = TermWin.nrow;
2172       wlen = len = -1;
2173       row = i > 0 ? 0 : j - 1;
2174       for (; j-- >= 0; row += (i > 0 ? 1 : -1))
2175         {
2176           if (row + i >= 0 && row + i < TermWin.nrow && row + i != ocrow)
2177             {
2178               text_t *stp  = screen.text[row + row_offset];
2179               rend_t *srp  = screen.rend[row + row_offset];
2180               text_t *dtp  = drawn_text[row];
2181               text_t *dtp2 = drawn_text[row + i];
2182               rend_t *drp  = drawn_rend[row];
2183               rend_t *drp2 = drawn_rend[row + i];
2184
2185               for (nits = 0, col = TermWin.ncol; col--; )
2186                 if (stp[col] != dtp2[col] || srp[col] != drp2[col])
2187                   nits--;
2188                 else if (stp[col] != dtp[col] || srp[col] != drp[col])
2189                   nits++;
2190
2191               if (nits > 8) /* XXX: arbitrary choice */
2192                 {
2193                   for (col = TermWin.ncol; col--; )
2194                     {
2195                       *dtp++ = *dtp2++;
2196                       *drp++ = *drp2++;
2197                     }
2198
2199                   if (len == -1)
2200                     len = row;
2201
2202                   wlen = row;
2203                   continue;
2204                 }
2205             }
2206
2207           if (len != -1)
2208             {
2209               /* also comes here at end if needed because of >= above */
2210               if (wlen < len)
2211                 SWAP_IT (wlen, len, int);
2212
2213               XCopyArea (display->display, TermWin.vt, TermWin.vt,
2214                          TermWin.gc, 0, Row2Pixel (len + i),
2215                          (unsigned int)TermWin_TotalWidth (),
2216                          (unsigned int)Height2Pixel (wlen - len + 1),
2217                          0, Row2Pixel (len));
2218               len = -1;
2219             }
2220         }
2221     }
2222 #endif
2223
2224   /*
2225    * E: main pass across every character
2226    */
2227   for (row = 0; row < TermWin.nrow; row++)
2228     {
2229       text_t *stp = screen.text[row + row_offset];
2230       rend_t *srp = screen.rend[row + row_offset];
2231       text_t *dtp = drawn_text[row];
2232       rend_t *drp = drawn_rend[row];
2233
2234       /*
2235        * E2: OK, now the real pass
2236        */
2237       int ypixel = (int)Row2Pixel (row);
2238
2239       for (col = 0; col < TermWin.ncol; col++)
2240         {
2241           /* compare new text with old - if exactly the same then continue */
2242           if (stp[col] == dtp[col]    /* Must match characters to skip. */
2243               && (RS_SAME (srp[col], drp[col])    /* Either rendition the same or   */
2244                   || (stp[col] == ' ' /* space w/ no background change  */
2245                       && GET_BGATTR (srp[col]) == GET_BGATTR (drp[col]))))
2246             continue;
2247
2248           // redraw one or more characters
2249
2250           // seek to the beginning of wide characters
2251           while (stp[col] == NOCHAR && col > 0)
2252             --col;
2253
2254           rend_t rend = srp[col];     /* screen rendition (target rendtion) */
2255           text_t *text = stp + col;
2256           int count = 1;
2257
2258           dtp[col] = stp[col];
2259           drp[col] = rend;
2260
2261           int xpixel = Col2Pixel (col);
2262
2263           for (i = 0; ++col < TermWin.ncol; )
2264             {
2265               if (stp[col] == NOCHAR)
2266                 {
2267                   dtp[col] = stp[col];
2268                   drp[col] = rend;
2269                   count++;
2270                   i++;
2271
2272                   continue;
2273                 }
2274
2275               if (!RS_SAME (rend, srp[col]))
2276                 break;
2277
2278               count++;
2279
2280               if (stp[col] != dtp[col]
2281                   || !RS_SAME (srp[col], drp[col]))
2282                 {
2283                   if (must_clear && (i++ > count / 2))
2284                     break;
2285
2286                   dtp[col] = stp[col];
2287                   drp[col] = rend;
2288                   i = 0;
2289                 }
2290               else if (must_clear || (stp[col] != ' ' && ++i >= 16))
2291                 break;
2292             }
2293
2294           col--;      /* went one too far.  move back */
2295           count -= i; /* dump any matching trailing chars */
2296
2297           // sometimes we optimize away the trailing NOCHAR's, add them back
2298           while (i && text[count] == NOCHAR)
2299             count++, i--;
2300
2301 #if ENABLE_STYLES
2302           // force redraw after "careful" characters to avoid pixel droppings
2303           if (srp[col] & RS_Careful && col < TermWin.ncol - 1 && 0)
2304             drp[col + 1] = ~srp[col + 1];
2305
2306           // include previous careful character(s) if possible, looks nicer (best effort...)
2307           while (text > stp
2308               && srp[text - stp - 1] & RS_Careful
2309               && RS_SAME (rend, srp[text - stp - 1]))
2310             text--, count++, xpixel -= TermWin.fwidth;
2311 #endif
2312
2313           /*
2314            * Determine the attributes for the string
2315            */
2316           int fore = GET_FGCOLOR (rend); // desired foreground
2317           int back = GET_BGCOLOR (rend); // desired background
2318
2319           // only do special processing if ana attributes are set, which is rare
2320           if (rend & (RS_Bold | RS_Italic | RS_Uline | RS_RVid | RS_Blink))
2321             {
2322               bool invert = rend & RS_RVid;
2323
2324 #ifndef NO_BOLD_UNDERLINE_REVERSE
2325               if (rend & RS_Bold
2326                   && fore == Color_fg)
2327                 {
2328                   if (ISSET_PIXCOLOR (Color_BD))
2329                     fore = Color_BD;
2330 # if !ENABLE_STYLES
2331                   else
2332                     invert = !invert;
2333 # endif
2334                 }
2335
2336               if (rend & RS_Italic
2337                   && fore == Color_fg)
2338                 {
2339                   if (ISSET_PIXCOLOR (Color_IT))
2340                     fore = Color_IT;
2341 # if !ENABLE_STYLES
2342                   else
2343                     invert = !invert;
2344 # endif
2345                 }
2346
2347               if (rend & RS_Uline && ISSET_PIXCOLOR (Color_UL))
2348                 fore = Color_UL;
2349 #endif
2350
2351               if (invert)
2352                 {
2353                   SWAP_IT (fore, back, int);
2354
2355 #ifndef NO_BOLD_UNDERLINE_REVERSE
2356                   if (ISSET_PIXCOLOR (Color_RV))
2357                     back = Color_RV;
2358 #endif
2359                 }
2360
2361 #ifdef TEXT_BLINK
2362               if (rend & RS_Blink && (back == Color_bg || fore == Color_bg))
2363                 {
2364                   if (!text_blink_ev.active)
2365                     {
2366                       text_blink_ev.start (NOW + TEXT_BLINK_INTERVAL);
2367                       hidden_text = 0;
2368                     }
2369                   else if (hidden_text)
2370                     fore = back;
2371                 }
2372 #endif
2373             }
2374
2375           /*
2376            * Actually do the drawing of the string here
2377            */
2378           rxvt_font *font = (*TermWin.fontset[GET_STYLE (rend)])[GET_FONT (rend)];
2379
2380           if (back == fore)
2381             font->clear_rect (*TermWin.drawable, xpixel, ypixel,
2382                               TermWin.fwidth * count, TermWin.fheight,
2383                               back);
2384           else if (back == Color_bg)
2385             {
2386               if (must_clear)
2387                 {
2388                   CLEAR_CHARS (xpixel, ypixel, count);
2389
2390                   for (i = 0; i < count; i++) /* don't draw empty strings */
2391                     if (text[i] != ' ')
2392                       {
2393                         font->draw (*TermWin.drawable, xpixel, ypixel, text, count, fore, -1);
2394                         break;
2395                       }
2396                 }
2397               else
2398                 font->draw (*TermWin.drawable, xpixel, ypixel, text, count, fore, Color_bg);
2399             }
2400           else
2401             font->draw (*TermWin.drawable, xpixel, ypixel, text, count, fore, back);
2402
2403           if (rend & RS_Uline && font->descent > 1 && fore != back)
2404             {
2405               XSetForeground (display->display, TermWin.gc, pix_colors[fore]);
2406               XDrawLine (display->display, drawBuffer, TermWin.gc,
2407                          xpixel, ypixel + font->ascent + 1,
2408                          xpixel + Width2Pixel (count) - 1, ypixel + font->ascent + 1);
2409             }
2410         }                     /* for (col....) */
2411     }                         /* for (row....) */
2412
2413 #if ENABLE_OVERLAY
2414   scr_swap_overlay ();
2415 #endif
2416
2417   /*
2418    * G: cleanup cursor and display outline cursor if necessary
2419    */
2420   if (showcursor)
2421     {
2422       if (TermWin.focus)
2423         {
2424           *crp ^= RS_RVid;
2425 #ifndef NO_CURSORCOLOR
2426           *crp = (*crp & ~ (RS_fgMask | RS_bgMask)) | cc1;
2427 #endif
2428         }
2429       else if (oldcursor.row >= 0)
2430         {
2431 #ifndef NO_CURSORCOLOR
2432           if (ISSET_PIXCOLOR (Color_cursor))
2433             XSetForeground (display->display, TermWin.gc, pix_colors[Color_cursor]);
2434 #endif
2435           int cursorwidth = 1;
2436           while (oldcursor.col + cursorwidth < TermWin.ncol
2437                  && drawn_text[oldcursor.row][oldcursor.col + cursorwidth] == NOCHAR)
2438             cursorwidth++;
2439
2440           XDrawRectangle (display->display, drawBuffer, TermWin.gc,
2441                           Col2Pixel (oldcursor.col),
2442                           Row2Pixel (oldcursor.row),
2443                           (unsigned int) (Width2Pixel (cursorwidth) - 1),
2444                           (unsigned int) (Height2Pixel (1) - TermWin.lineSpace - 1));
2445         }
2446     }
2447
2448   /*
2449    * H: cleanup selection
2450    */
2451   scr_reverse_selection ();
2452
2453   if (refresh_type & SMOOTH_REFRESH)
2454     XFlush (display->display);
2455
2456   num_scr = 0;
2457   num_scr_allow = 1;
2458 }
2459
2460 void
2461 rxvt_term::scr_remap_chars (text_t *tp, rend_t *rp)
2462 {
2463   if (!rp || !tp)
2464     return;
2465
2466   for (int i = TermWin.ncol; i; i--, rp++, tp++)
2467     *rp = SET_FONT (*rp, FONTSET (*rp)->find_font (*tp));
2468 }
2469
2470 void
2471 rxvt_term::scr_remap_chars ()
2472 {
2473   for (int i = TermWin.nrow + TermWin.saveLines; i--; )
2474     scr_remap_chars (screen.text[i], screen.rend[i]);
2475
2476   for (int i = TermWin.nrow; i--; )
2477     {
2478       scr_remap_chars (drawn_text[i], drawn_rend[i]);
2479       scr_remap_chars (swap.text[i], swap.rend[i]);
2480     }
2481 }
2482
2483 void
2484 rxvt_term::scr_recolour ()
2485 {
2486   if (1
2487 #if TRANSPARENT
2488       && !am_transparent
2489 #endif
2490 #if XPM_BACKGROUND
2491       && !bgPixmap.pixmap
2492 #endif
2493       )
2494     {
2495       XSetWindowBackground (display->display, TermWin.parent[0], pix_colors[Color_border]);
2496       XClearWindow (display->display, TermWin.parent[0]);
2497       XSetWindowBackground (display->display, TermWin.vt, pix_colors[Color_bg]);
2498 #if HAVE_SCROLLBARS
2499       if (scrollBar.win)
2500         {
2501           XSetWindowBackground (display->display, scrollBar.win, pix_colors[Color_border]);
2502           scrollBar.setIdle ();
2503           scrollbar_show (0);
2504         }
2505 #endif
2506     }
2507
2508   scr_clear ();
2509   scr_touch (true);
2510   want_refresh = 1;
2511 }
2512
2513 /* ------------------------------------------------------------------------- */
2514 void
2515 rxvt_term::scr_clear (bool really)
2516 {
2517   if (!TermWin.mapped)
2518     return;
2519
2520   num_scr_allow = 0;
2521   want_refresh = 1;
2522
2523 #if TRANSPARENT
2524   if ((options & Opt_transparent) && (am_pixmap_trans == 0))
2525     {
2526       int i;
2527
2528       if (!(options & Opt_transparent_all))
2529         i = 0;
2530       else
2531         i = (int) (sizeof (TermWin.parent) / sizeof (Window));
2532
2533       while (i--)
2534         if (TermWin.parent[i] != None)
2535           XClearWindow (display->display, TermWin.parent[i]);
2536     }
2537 #endif
2538
2539   if (really)
2540     XClearWindow (display->display, TermWin.vt);
2541 }
2542
2543 /* ------------------------------------------------------------------------- */
2544 void
2545 rxvt_term::scr_reverse_selection ()
2546 {
2547   if (selection.op && current_screen == selection.screen)
2548     {
2549       int end_row = TermWin.saveLines - TermWin.view_start;
2550       int i = selection.beg.row + TermWin.saveLines;
2551       int col, row = selection.end.row + TermWin.saveLines;
2552       rend_t *srp;
2553
2554 #if ENABLE_FRILLS
2555       if (selection.rect)
2556         {
2557           end_row += TermWin.nrow;
2558
2559           for (; i <= row && i <= end_row; i++)
2560             for (srp = screen.rend[i], col = selection.beg.col; col < selection.end.col; col++)
2561               srp[col] ^= RS_RVid;
2562         }
2563       else
2564 #endif
2565         {
2566           if (i >= end_row)
2567             col = selection.beg.col;
2568           else
2569             {
2570               col = 0;
2571               i = end_row;
2572             }
2573
2574           end_row += TermWin.nrow;
2575
2576           for (; i < row && i < end_row; i++, col = 0)
2577             for (srp = screen.rend[i]; col < TermWin.ncol; col++)
2578               srp[col] ^= RS_RVid;
2579
2580           if (i == row && i < end_row)
2581             for (srp = screen.rend[i]; col < selection.end.col; col++)
2582               srp[col] ^= RS_RVid;
2583         }
2584     }
2585 }
2586
2587 /* ------------------------------------------------------------------------- */
2588 /*
2589  * Dump the whole scrollback and screen to the passed filedescriptor.  The
2590  * invoking routine must close the fd.
2591  */
2592 #if 0
2593 void
2594 rxvt_term::scr_dump (int fd)
2595 {
2596   int             row, wrote;
2597   unsigned int    width, towrite;
2598   char            r1[] = "\n";
2599
2600   for (row = TermWin.saveLines - TermWin.nscrolled;
2601        row < TermWin.saveLines + TermWin.nrow - 1; row++)
2602     {
2603       width = screen.tlen[row] >= 0 ? screen.tlen[row]
2604               : TermWin.ncol;
2605       for (towrite = width; towrite; towrite -= wrote)
2606         {
2607           wrote = write (fd, & (screen.text[row][width - towrite]),
2608                         towrite);
2609           if (wrote < 0)
2610             return;         /* XXX: death, no report */
2611         }
2612       if (screen.tlen[row] >= 0)
2613         if (write (fd, r1, 1) <= 0)
2614           return; /* XXX: death, no report */
2615     }
2616 }
2617 #endif
2618 \f
2619 /* ------------------------------------------------------------------------- *
2620  *                           CHARACTER SELECTION                             *
2621  * ------------------------------------------------------------------------- */
2622
2623 /*
2624  * -TermWin.nscrolled <= (selection row) <= TermWin.nrow - 1
2625  */
2626 void
2627 rxvt_term::selection_check (int check_more)
2628 {
2629   row_col_t pos;
2630
2631   if (!selection.op)
2632     return;
2633
2634   pos.row = pos.col = 0;
2635   if ((selection.beg.row < - (int32_t)TermWin.nscrolled)
2636       || (selection.beg.row >= TermWin.nrow)
2637       || (selection.mark.row < - (int32_t)TermWin.nscrolled)
2638       || (selection.mark.row >= TermWin.nrow)
2639       || (selection.end.row < - (int32_t)TermWin.nscrolled)
2640       || (selection.end.row >= TermWin.nrow)
2641       || (check_more == 1
2642           && current_screen == selection.screen
2643           && !ROWCOL_IS_BEFORE (screen.cur, selection.beg)
2644           && ROWCOL_IS_BEFORE (screen.cur, selection.end))
2645       || (check_more == 2
2646           && ROWCOL_IS_BEFORE (selection.beg, pos)
2647           && ROWCOL_IS_AFTER (selection.end, pos))
2648       || (check_more == 3
2649           && ROWCOL_IS_AFTER (selection.end, pos))
2650       || (check_more == 4     /* screen width change */
2651           && (selection.beg.row != selection.end.row
2652               || selection.end.col > TermWin.ncol)))
2653     CLEAR_SELECTION ();
2654 }
2655
2656 /* ------------------------------------------------------------------------- */
2657 /*
2658  * Paste a selection direct to the command fd
2659  */
2660 void
2661 rxvt_term::paste (const unsigned char *data, unsigned int len)
2662 {
2663   unsigned int i, j, n;
2664   unsigned char *ds = (unsigned char *)rxvt_malloc (PASTE_SIZE);
2665
2666   /* convert normal newline chars into common keyboard Return key sequence */
2667   for (i = 0; i < len; i += PASTE_SIZE)
2668     {
2669       n = min (len - i, PASTE_SIZE);
2670       memcpy (ds, data + i, n);
2671
2672       for (j = 0; j < n; j++)
2673         if (ds[j] == C0_LF)
2674           ds[j] = C0_CR;
2675
2676       tt_write (ds, (int)n);
2677     }
2678
2679   free (ds);
2680 }
2681
2682 /* ------------------------------------------------------------------------- */
2683 /*
2684  * Respond to a notification that a primary selection has been sent
2685  * EXT: SelectionNotify
2686  */
2687 void
2688 rxvt_term::selection_paste (Window win, Atom prop, bool delete_prop)
2689 {
2690   if (prop == None)         /* check for failed XConvertSelection */
2691     {
2692       if ((selection_type & Sel_CompoundText))
2693         {
2694           int selnum = selection_type & Sel_whereMask;
2695
2696           selection_type = 0;
2697           if (selnum != Sel_direct)
2698             selection_request_other (XA_STRING, selnum);
2699         }
2700
2701       if ((selection_type & Sel_UTF8String))
2702         {
2703           int selnum = selection_type & Sel_whereMask;
2704
2705           selection_type = Sel_CompoundText;
2706           if (selnum != Sel_direct)
2707             selection_request_other (xa[XA_COMPOUND_TEXT], selnum);
2708           else
2709             selection_type = 0;
2710         }
2711
2712       return;
2713     }
2714
2715   unsigned long bytes_after;
2716   XTextProperty ct;
2717
2718   if (XGetWindowProperty (display->display, win, prop,
2719                           0, (long)(PROP_SIZE / 4),
2720                           delete_prop, AnyPropertyType,
2721                           &ct.encoding, &ct.format,
2722                           &ct.nitems, &bytes_after,
2723                           &ct.value) != Success)
2724     {
2725       ct.value = 0;
2726       goto bailout;
2727     }
2728
2729   if (ct.encoding == None)
2730     goto bailout;
2731
2732   if (bytes_after)
2733     {
2734       // fetch and append remaining data
2735       XTextProperty ct2;
2736       unsigned long bytes_after2;
2737
2738       if (XGetWindowProperty (display->display, win, prop,
2739                               ct.nitems / 4, (long) (bytes_after + 3) / 4,
2740                               delete_prop, AnyPropertyType,
2741                               &ct2.encoding, &ct2.format,
2742                               &ct2.nitems, &bytes_after2,
2743                               &ct2.value) != Success)
2744         goto bailout;
2745
2746       // realloc should be compatible to XFree, here, and elsewhere, too
2747       ct.value = (unsigned char *)realloc (ct.value, ct.nitems + bytes_after);
2748       memcpy (ct.value + ct.nitems, ct2.value, ct2.nitems);
2749       ct.nitems += ct2.nitems;
2750
2751       XFree (ct2.value);
2752     }
2753   else if (delete_prop)
2754     XDeleteProperty (display->display, win, prop);
2755
2756   if (ct.value == 0)
2757     goto bailout;
2758
2759   if (ct.encoding == xa[XA_INCR])
2760     {
2761       // INCR selection, start handshake
2762       if (!delete_prop)
2763         XDeleteProperty (display->display, win, prop);
2764
2765       selection_wait = Sel_incr;
2766       incr_buf_fill = 0;
2767       incr_ev.start (NOW + 10);
2768
2769       goto bailout;
2770     }
2771
2772   if (ct.nitems == 0)
2773     {
2774       if (selection_wait == Sel_incr)
2775         {
2776           XFree (ct.value);
2777
2778           // finally complete, now paste the whole thing
2779           selection_wait = Sel_normal;
2780           ct.value = (unsigned char *)incr_buf;
2781           ct.nitems = incr_buf_fill;
2782           incr_buf = 0;
2783           incr_buf_size = 0;
2784           incr_ev.stop ();
2785         }
2786       else
2787         {
2788           if (selection_wait == Sel_normal
2789               && (win != display->root || prop != XA_CUT_BUFFER0)) // avoid recursion
2790             {
2791               /*
2792                * pass through again trying CUT_BUFFER0 if we've come from
2793                * XConvertSelection () but nothing was presented
2794                */
2795               selection_paste (display->root, XA_CUT_BUFFER0, False);
2796             }
2797
2798           goto bailout;
2799         }
2800     }
2801   else if (selection_wait == Sel_incr)
2802     {
2803       incr_ev.start (NOW + 10);
2804
2805       while (incr_buf_fill + ct.nitems > incr_buf_size)
2806         {
2807           incr_buf_size = incr_buf_size ? incr_buf_size * 2 : 128*1024;
2808           incr_buf = (char *)realloc (incr_buf, incr_buf_size);
2809         }
2810
2811       memcpy (incr_buf + incr_buf_fill, ct.value, ct.nitems);
2812       incr_buf_fill += ct.nitems;
2813
2814       goto bailout;
2815     }
2816
2817   char **cl;
2818   int cr;
2819
2820 #if ENABLE_FRILLS
2821   // xlib is horribly broken with respect to UTF8_STRING, and nobody cares to fix it
2822   // so recode it manually
2823   if (ct.encoding == xa[XA_UTF8_STRING])
2824     {
2825       wchar_t *w = rxvt_utf8towcs ((const char *)ct.value, ct.nitems);
2826       char *s = rxvt_wcstombs (w);
2827       free (w);
2828       // TODO: strlen == only the first element will be converted. well...
2829       paste ((unsigned char *)s, strlen (s));
2830       free (s);
2831     }
2832   else
2833 #endif
2834   if (XmbTextPropertyToTextList (display->display, &ct, &cl, &cr) >= 0
2835       && cl)
2836     {
2837       for (int i = 0; i < cr; i++)
2838         paste ((unsigned char *)cl[i], strlen (cl[i]));
2839
2840       XFreeStringList (cl);
2841     }
2842   else
2843     paste (ct.value, ct.nitems); // paste raw
2844
2845 bailout:
2846   XFree (ct.value);
2847
2848   if (selection_wait == Sel_normal)
2849     selection_wait = Sel_none;
2850 }
2851
2852 void
2853 rxvt_term::incr_cb (time_watcher &w)
2854 {
2855   selection_wait = Sel_none;
2856
2857   incr_buf_size = 0;
2858   free (incr_buf);
2859
2860   rxvt_warn ("data loss: timeout on INCR selection paste, ignoring.\n");
2861 }
2862
2863 void
2864 rxvt_term::selection_property (Window win, Atom prop)
2865 {
2866   if (prop == None || selection_wait != Sel_incr)
2867     return;
2868
2869   selection_paste (win, prop, true);
2870 }
2871
2872 /* ------------------------------------------------------------------------- */
2873 /*
2874  * Request the current selection:
2875  * Order: > internal selection if available
2876  *        > PRIMARY, SECONDARY, CLIPBOARD if ownership is claimed (+)
2877  *        > CUT_BUFFER0
2878  * (+) if ownership is claimed but property is empty, rxvt_selection_paste ()
2879  *     will auto fallback to CUT_BUFFER0
2880  * EXT: button 2 release
2881  */
2882 void
2883 rxvt_term::selection_request (Time tm, int x, int y)
2884 {
2885   if (x < 0 || x >= TermWin.width || y < 0 || y >= TermWin.height)
2886     return;                 /* outside window */
2887
2888   if (selection.text)
2889     { /* internal selection */
2890       char *str = rxvt_wcstombs (selection.text, selection.len);
2891       paste ((unsigned char *)str, strlen (str));
2892       free (str);
2893       return;
2894     }
2895   else
2896     {
2897       int i;
2898
2899       selection_request_time = tm;
2900       selection_wait = Sel_normal;
2901
2902       for (i = Sel_Primary; i <= Sel_Clipboard; i++)
2903         {
2904 #if X_HAVE_UTF8_STRING
2905           selection_type = Sel_UTF8String;
2906           if (selection_request_other (xa[XA_UTF8_STRING], i))
2907             return;
2908 #else
2909           selection_type = Sel_CompoundText;
2910           if (selection_request_other (xa[XA_COMPOUND_TEXT], i))
2911             return;
2912 #endif
2913         }
2914     }
2915
2916   selection_wait = Sel_none;       /* don't loop in selection_paste () */
2917   selection_paste (display->root, XA_CUT_BUFFER0, false);
2918 }
2919
2920 int
2921 rxvt_term::selection_request_other (Atom target, int selnum)
2922 {
2923   Atom sel;
2924 #ifdef DEBUG_SELECT
2925   char *debug_xa_names[] = { "PRIMARY", "SECONDARY", "CLIPBOARD" };
2926 #endif
2927
2928   selection_type |= selnum;
2929
2930   if (selnum == Sel_Primary)
2931     sel = XA_PRIMARY;
2932   else if (selnum == Sel_Secondary)
2933     sel = XA_SECONDARY;
2934   else
2935     sel = xa[XA_CLIPBOARD];
2936
2937   if (XGetSelectionOwner (display->display, sel) != None)
2938     {
2939       XConvertSelection (display->display, sel, target, xa[XA_VT_SELECTION],
2940                          TermWin.vt, selection_request_time);
2941       return 1;
2942     }
2943
2944   return 0;
2945 }
2946
2947 /* ------------------------------------------------------------------------- */
2948 /*
2949  * Clear all selected text
2950  * EXT: SelectionClear
2951  */
2952 void
2953 rxvt_term::selection_clear ()
2954 {
2955   want_refresh = 1;
2956   free (selection.text);
2957   selection.text = NULL;
2958   selection.len = 0;
2959   CLEAR_SELECTION ();
2960
2961   if (display->selection_owner == this)
2962     display->selection_owner = 0;
2963 }
2964
2965 /* ------------------------------------------------------------------------- */
2966 /*
2967  * Copy a selection into the cut buffer
2968  * EXT: button 1 or 3 release
2969  */
2970 void
2971 rxvt_term::selection_make (Time tm)
2972 {
2973   int i, col, end_col, row, end_row;
2974   wchar_t *new_selection_text;
2975   text_t *t;
2976
2977   switch (selection.op)
2978     {
2979       case SELECTION_CONT:
2980         break;
2981       case SELECTION_INIT:
2982         CLEAR_SELECTION ();
2983         /* FALLTHROUGH */
2984       case SELECTION_BEGIN:
2985         selection.op = SELECTION_DONE;
2986         /* FALLTHROUGH */
2987       default:
2988         return;
2989     }
2990
2991   selection.op = SELECTION_DONE;
2992
2993   if (selection.clicks == 4)
2994     return;                 /* nothing selected, go away */
2995
2996   i = (selection.end.row - selection.beg.row + 1) * (TermWin.ncol + 1);
2997   new_selection_text = (wchar_t *)rxvt_malloc ((i + 4) * sizeof (wchar_t));
2998
2999   col = selection.beg.col;
3000   row = selection.beg.row + TermWin.saveLines;
3001   end_row = selection.end.row + TermWin.saveLines;
3002   int ofs = 0;
3003   int extra = 0;
3004
3005   for (; row <= end_row; row++, col = 0)
3006     {
3007       end_col = screen.tlen[row];
3008
3009 #if ENABLE_FRILLS
3010       if (selection.rect)
3011         {
3012           col = selection.beg.col;
3013           end_col = TermWin.ncol + 1;
3014         }
3015 #endif
3016
3017       MAX_IT (col, 0);
3018
3019       if (end_col == -1)
3020         end_col = TermWin.ncol;
3021
3022       if (row == end_row || selection.rect)
3023         MIN_IT (end_col, selection.end.col);
3024
3025       t = &screen.text[row][col];
3026       for (; col < end_col; col++)
3027         {
3028           if (*t == NOCHAR)
3029             t++;
3030 #if ENABLE_COMBINING
3031           else if (IS_COMPOSE (*t))
3032             {
3033               int len = rxvt_composite.expand (*t, 0);
3034
3035               extra -= (len - 1);
3036
3037               if (extra < 0)
3038                 {
3039                   extra += i;
3040                   i += i;
3041                   new_selection_text = (wchar_t *)rxvt_realloc (new_selection_text, (i + 4) * sizeof (wchar_t));
3042                 }
3043
3044               ofs += rxvt_composite.expand (*t++, new_selection_text + ofs);
3045             }
3046 #endif
3047           else
3048             new_selection_text[ofs++] = *t++;
3049         }
3050
3051       if (screen.tlen[row] != -1 && row != end_row)
3052         new_selection_text[ofs++] = C0_LF;
3053     }
3054
3055   if (end_col != selection.end.col)
3056     new_selection_text[ofs++] = C0_LF;
3057
3058   new_selection_text[ofs] = 0;
3059
3060   if (ofs == 0)
3061     {
3062       free (new_selection_text);
3063       return;
3064     }
3065
3066   free (selection.text);
3067
3068   // we usually allocate much more than necessary, so realloc it smaller again
3069   selection.len = ofs;
3070   selection.text = (wchar_t *)rxvt_realloc (new_selection_text, (ofs + 1) * sizeof (wchar_t));
3071
3072   XSetSelectionOwner (display->display, XA_PRIMARY, TermWin.vt, tm);
3073   if (XGetSelectionOwner (display->display, XA_PRIMARY) == TermWin.vt)
3074     display->set_selection_owner (this);
3075   else
3076     rxvt_warn ("can't get primary selection, ignoring.\n");
3077
3078 #if 0
3079   XTextProperty ct;
3080
3081   if (XwcTextListToTextProperty (display->display, &selection.text, 1, XStringStyle, &ct) >= 0)
3082     {
3083       set_string_property (XA_CUT_BUFFER0, ct.value, ct.nitems);
3084       XFree (ct.value);
3085     }
3086 #endif
3087
3088   selection_time = tm;
3089 }
3090
3091 /* ------------------------------------------------------------------------- */
3092 /*
3093  * Mark or select text based upon number of clicks: 1, 2, or 3
3094  * EXT: button 1 press
3095  */
3096 void
3097 rxvt_term::selection_click (int clicks, int x, int y)
3098 {
3099   clicks = ((clicks - 1) % 3) + 1;
3100   selection.clicks = clicks;       /* save clicks so extend will work */
3101
3102   selection_start_colrow (Pixel2Col (x), Pixel2Row (y));
3103
3104   if (clicks == 2 || clicks == 3)
3105     selection_extend_colrow (selection.mark.col,
3106                              selection.mark.row + TermWin.view_start,
3107                              0, /* button 3     */
3108                              1, /* button press */
3109                              0);        /* click change */
3110 }
3111
3112 /* ------------------------------------------------------------------------- */
3113 /*
3114  * Mark a selection at the specified col/row
3115  */
3116 void
3117 rxvt_term::selection_start_colrow (int col, int row)
3118 {
3119   want_refresh = 1;
3120   selection.mark.col = col;
3121   selection.mark.row = row - TermWin.view_start;
3122
3123   MAX_IT (selection.mark.row, - (int32_t)TermWin.nscrolled);
3124   MIN_IT (selection.mark.row, (int32_t)TermWin.nrow - 1);
3125   MAX_IT (selection.mark.col, 0);
3126   MIN_IT (selection.mark.col, (int32_t)TermWin.ncol - 1);
3127
3128   while (selection.mark.col > 0
3129          && screen.text[selection.mark.row + TermWin.saveLines][selection.mark.col] == NOCHAR)
3130     --selection.mark.col;
3131
3132   if (selection.op)
3133     {      /* clear the old selection */
3134       selection.beg.row = selection.end.row = selection.mark.row;
3135       selection.beg.col = selection.end.col = selection.mark.col;
3136     }
3137
3138   selection.op = SELECTION_INIT;
3139   selection.screen = current_screen;
3140 }
3141
3142 /* ------------------------------------------------------------------------- */
3143 /*
3144  * Word select: select text for 2 clicks
3145  * We now only find out the boundary in one direction
3146  */
3147
3148 /* what do we want: spaces/tabs are delimiters or cutchars or non-cutchars */
3149 #define DELIMIT_TEXT(x)                 \
3150     (unicode::is_space (x) ? 2 : (x) <= 0xff && !!strchr (rs[Rs_cutchars], (x)))
3151 #define DELIMIT_REND(x)        1
3152
3153 void
3154 rxvt_term::selection_delimit_word (enum page_dirn dirn, const row_col_t *mark, row_col_t *ret)
3155 {
3156   int col, row, dirnadd, tcol, trow, w1, w2;
3157   row_col_t bound;
3158   text_t *stp;
3159   rend_t *srp;
3160
3161   if (dirn == UP)
3162     {
3163       bound.row = TermWin.saveLines - TermWin.nscrolled - 1;
3164       bound.col = 0;
3165       dirnadd = -1;
3166     }
3167   else
3168     {
3169       bound.row = TermWin.saveLines + TermWin.nrow;
3170       bound.col = TermWin.ncol - 1;
3171       dirnadd = 1;
3172     }
3173
3174   row = mark->row + TermWin.saveLines;
3175   col = mark->col;
3176   MAX_IT (col, 0);
3177   /* find the edge of a word */
3178   stp = &screen.text[row][col];
3179   w1 = DELIMIT_TEXT (*stp);
3180
3181   srp = &screen.rend[row][col];
3182   w2 = DELIMIT_REND (*srp);
3183
3184   for (;;)
3185     {
3186       for (; col != bound.col; col += dirnadd)
3187         {
3188           stp += dirnadd;
3189           srp += dirnadd;
3190
3191           if (*stp == NOCHAR)
3192             continue;
3193
3194           if (DELIMIT_TEXT (*stp) != w1)
3195             break;
3196           if (DELIMIT_REND (*srp) != w2)
3197             break;
3198         }
3199
3200       if ((col == bound.col) && (row != bound.row))
3201         {
3202           if (screen.tlen[ (row - (dirn == UP ? 1 : 0))] == -1)
3203             {
3204               trow = row + dirnadd;
3205               tcol = dirn == UP ? TermWin.ncol - 1 : 0;
3206
3207               if (screen.text[trow] == NULL)
3208                 break;
3209
3210               stp = & (screen.text[trow][tcol]);
3211               srp = & (screen.rend[trow][tcol]);
3212
3213               if (DELIMIT_TEXT (*stp) != w1 || DELIMIT_REND (*srp) != w2)
3214                 break;
3215
3216               row = trow;
3217               col = tcol;
3218               continue;
3219             }
3220         }
3221       break;
3222     }
3223
3224 Old_Word_Selection_You_Die:
3225   if (dirn == DN)
3226     col++;                  /* put us on one past the end */
3227
3228   /* Poke the values back in */
3229   ret->row = row - TermWin.saveLines;
3230   ret->col = col;
3231 }
3232
3233 /* ------------------------------------------------------------------------- */
3234 /*
3235  * Extend the selection to the specified x/y pixel location
3236  * EXT: button 3 press; button 1 or 3 drag
3237  * flag == 0 ==> button 1
3238  * flag == 1 ==> button 3 press
3239  * flag == 2 ==> button 3 motion
3240  */
3241 void
3242 rxvt_term::selection_extend (int x, int y, int flag)
3243 {
3244   int col, row;
3245
3246   col = Pixel2Col (x);
3247   row = Pixel2Row (y);
3248   MAX_IT (row, 0);
3249   MIN_IT (row, (int)TermWin.nrow - 1);
3250   MAX_IT (col, 0);
3251   MIN_IT (col, (int)TermWin.ncol);
3252
3253   /*
3254   * If we're selecting characters (single click) then we must check first
3255   * if we are at the same place as the original mark.  If we are then
3256   * select nothing.  Otherwise, if we're to the right of the mark, you have to
3257   * be _past_ a character for it to be selected.
3258   */
3259   if (((selection.clicks % 3) == 1) && !flag
3260       && (col == selection.mark.col
3261           && (row == selection.mark.row + TermWin.view_start)))
3262     {
3263       /* select nothing */
3264       selection.beg.row = selection.end.row = 0;
3265       selection.beg.col = selection.end.col = 0;
3266       selection.clicks = 4;
3267       want_refresh = 1;
3268       return;
3269     }
3270
3271   if (selection.clicks == 4)
3272     selection.clicks = 1;
3273
3274   selection_extend_colrow (col, row, !!flag,  /* ? button 3      */
3275                            flag == 1 ? 1 : 0,     /* ? button press  */
3276                            0);    /* no click change */
3277 }
3278
3279 /* ------------------------------------------------------------------------- */
3280 /*
3281  * Extend the selection to the specified col/row
3282  */
3283 void
3284 rxvt_term::selection_extend_colrow (int32_t col, int32_t row, int button3, int buttonpress, int clickchange)
3285 {
3286   int16_t ncol = TermWin.ncol;
3287   int end_col;
3288   row_col_t pos;
3289   enum {
3290     LEFT, RIGHT
3291   } closeto = RIGHT;
3292
3293   want_refresh = 1;
3294
3295   switch (selection.op)
3296     {
3297       case SELECTION_INIT:
3298         CLEAR_SELECTION ();
3299         selection.op = SELECTION_BEGIN;
3300         /* FALLTHROUGH */
3301       case SELECTION_BEGIN:
3302         if (row != selection.mark.row || col != selection.mark.col
3303             || (!button3 && buttonpress))
3304           selection.op = SELECTION_CONT;
3305         break;
3306       case SELECTION_DONE:
3307         selection.op = SELECTION_CONT;
3308         /* FALLTHROUGH */
3309       case SELECTION_CONT:
3310         break;
3311       case SELECTION_CLEAR:
3312         selection_start_colrow (col, row);
3313         /* FALLTHROUGH */
3314       default:
3315         return;
3316     }
3317
3318   if (selection.beg.col == selection.end.col
3319       && selection.beg.col != selection.mark.col
3320       && selection.beg.row == selection.end.row
3321       && selection.beg.row != selection.mark.row)
3322     {
3323       selection.beg.col = selection.end.col = selection.mark.col;
3324       selection.beg.row = selection.end.row = selection.mark.row;
3325     }
3326
3327   pos.col = col;
3328   pos.row = row;
3329
3330   pos.row -= TermWin.view_start;   /* adjust for scroll */
3331
3332   /*
3333    * This is mainly xterm style selection with a couple of differences, mainly
3334    * in the way button3 drag extension works.
3335    * We're either doing: button1 drag; button3 press; or button3 drag
3336    *  a) button1 drag : select around a midpoint/word/line - that point/word/line
3337    *     is always at the left/right edge of the selection.
3338    *  b) button3 press: extend/contract character/word/line at whichever edge of
3339    *     the selection we are closest to.
3340    *  c) button3 drag : extend/contract character/word/line - we select around
3341    *     a point/word/line which is either the start or end of the selection
3342    *     and it was decided by whichever point/word/line was `fixed' at the
3343    *     time of the most recent button3 press
3344    */
3345   if (button3 && buttonpress)
3346     { /* button3 press */
3347       /*
3348        * first determine which edge of the selection we are closest to
3349        */
3350       if (ROWCOL_IS_BEFORE (pos, selection.beg)
3351           || (!ROWCOL_IS_AFTER (pos, selection.end)
3352               && (((pos.col - selection.beg.col)
3353                    + ((pos.row - selection.beg.row) * ncol))
3354                   < ((selection.end.col - pos.col)
3355                      + ((selection.end.row - pos.row) * ncol)))))
3356         closeto = LEFT;
3357
3358       if (closeto == LEFT)
3359         {
3360           selection.beg.row = pos.row;
3361           selection.beg.col = pos.col;
3362           selection.mark.row = selection.end.row;
3363           selection.mark.col = selection.end.col - (selection.clicks == 2);
3364         }
3365       else
3366         {
3367           selection.end.row = pos.row;
3368           selection.end.col = pos.col;
3369           selection.mark.row = selection.beg.row;
3370           selection.mark.col = selection.beg.col;
3371         }
3372     }
3373   else
3374     { /* button1 drag or button3 drag */
3375       if (ROWCOL_IS_AFTER (selection.mark, pos))
3376         {
3377           if (selection.mark.row == selection.end.row
3378               && selection.mark.col == selection.end.col
3379               && clickchange
3380               && selection.clicks == 2)
3381             selection.mark.col--;
3382
3383           selection.beg.row = pos.row;
3384           selection.beg.col = pos.col;
3385           selection.end.row = selection.mark.row;
3386           selection.end.col = selection.mark.col + (selection.clicks == 2);
3387         }
3388       else
3389         {
3390           selection.beg.row = selection.mark.row;
3391           selection.beg.col = selection.mark.col;
3392           selection.end.row = pos.row;
3393           selection.end.col = pos.col;
3394         }
3395     }
3396
3397   if (selection.clicks == 1)
3398     {
3399       end_col = screen.tlen[selection.beg.row + TermWin.saveLines];
3400
3401       if (selection.beg.col > end_col
3402           && end_col != -1
3403 #if ENABLE_FRILLS
3404           && !selection.rect
3405 #endif
3406          )
3407         selection.beg.col = ncol;
3408
3409       end_col = screen.tlen[selection.end.row + TermWin.saveLines];
3410
3411       if (
3412           selection.end.col > end_col
3413           && end_col != -1
3414 #if ENABLE_FRILLS
3415           && !selection.rect
3416 #endif
3417          )
3418         selection.end.col = ncol;
3419     }
3420   else if (selection.clicks == 2)
3421     {
3422       if (ROWCOL_IS_AFTER (selection.end, selection.beg))
3423         selection.end.col--;
3424
3425       selection_delimit_word (UP, &selection.beg, &selection.beg);
3426       selection_delimit_word (DN, &selection.end, &selection.end);
3427     }
3428   else if (selection.clicks == 3)
3429     {
3430 #if ENABLE_FRILLS
3431       if ((options & Opt_tripleclickwords))
3432         {
3433           int end_row;
3434
3435           selection_delimit_word (UP, &selection.beg, &selection.beg);
3436           end_row = screen.tlen[selection.mark.row + TermWin.saveLines];
3437
3438           for (end_row = selection.mark.row; end_row < TermWin.nrow; end_row++)
3439             {
3440               end_col = screen.tlen[end_row + TermWin.saveLines];
3441
3442               if (end_col != -1)
3443                 {
3444                   selection.end.row = end_row;
3445                   selection.end.col = end_col;
3446                   selection_remove_trailing_spaces ();
3447                   break;
3448                 }
3449             }
3450         }
3451       else
3452 #endif
3453         {
3454           if (ROWCOL_IS_AFTER (selection.mark, selection.beg))
3455             selection.mark.col++;
3456
3457           selection.beg.col = 0;
3458           selection.end.col = ncol;
3459         }
3460     }
3461
3462   if (button3 && buttonpress)
3463     { /* mark may need to be changed */
3464       if (closeto == LEFT)
3465         {
3466           selection.mark.row = selection.end.row;
3467           selection.mark.col = selection.end.col - (selection.clicks == 2);
3468         }
3469       else
3470         {
3471           selection.mark.row = selection.beg.row;
3472           selection.mark.col = selection.beg.col;
3473         }
3474     }
3475
3476 #if ENABLE_FRILLS
3477   if (selection.rect && selection.beg.col > selection.end.col)
3478     SWAP_IT (selection.beg.col, selection.end.col, int);
3479 #endif
3480 }
3481
3482 #if ENABLE_FRILLS
3483 void
3484 rxvt_term::selection_remove_trailing_spaces ()
3485 {
3486   int32_t end_col, end_row;
3487   text_t *stp;
3488
3489   end_col = selection.end.col;
3490   end_row = selection.end.row;
3491
3492   for ( ; end_row >= selection.beg.row; )
3493     {
3494       stp = screen.text[end_row + TermWin.saveLines];
3495
3496       while (--end_col >= 0)
3497         {
3498           if (stp[end_col] != ' '
3499               && stp[end_col] != '\t'
3500               && stp[end_col] != NOCHAR)
3501             break;
3502         }
3503
3504       if (end_col >= 0
3505           || screen.tlen[end_row - 1 + TermWin.saveLines] != -1)
3506         {
3507           selection.end.col = end_col + 1;
3508           selection.end.row = end_row;
3509           break;
3510         }
3511
3512       end_row--;
3513       end_col = TermWin.ncol;
3514     }
3515
3516   if (selection.mark.row > selection.end.row)
3517     {
3518       selection.mark.row = selection.end.row;
3519       selection.mark.col = selection.end.col;
3520     }
3521   else if (selection.mark.row == selection.end.row
3522            && selection.mark.col > selection.end.col)
3523     selection.mark.col = selection.end.col;
3524 }
3525 #endif
3526
3527 /* ------------------------------------------------------------------------- */
3528 /*
3529  * Double click on button 3 when already selected
3530  * EXT: button 3 double click
3531  */
3532 void
3533 rxvt_term::selection_rotate (int x, int y)
3534 {
3535   selection.clicks = selection.clicks % 3 + 1;
3536   selection_extend_colrow (Pixel2Col (x), Pixel2Row (y), 1, 0, 1);
3537 }
3538
3539 /* ------------------------------------------------------------------------- */
3540 /*
3541  * Respond to a request for our current selection
3542  * EXT: SelectionRequest
3543  */
3544 void
3545 rxvt_term::selection_send (const XSelectionRequestEvent &rq)
3546 {
3547   XSelectionEvent ev;
3548
3549   ev.type = SelectionNotify;
3550   ev.property = None;
3551   ev.display = rq.display;
3552   ev.requestor = rq.requestor;
3553   ev.selection = rq.selection;
3554   ev.target = rq.target;
3555   ev.time = rq.time;
3556
3557   if (rq.target == xa[XA_TARGETS])
3558     {
3559       Atom target_list[6];
3560       Atom *target = target_list;
3561
3562       *target++ = xa[XA_TARGETS];
3563       *target++ = xa[XA_TIMESTAMP];
3564       *target++ = XA_STRING;
3565       *target++ = xa[XA_TEXT];
3566       *target++ = xa[XA_COMPOUND_TEXT];
3567 #if X_HAVE_UTF8_STRING
3568       *target++ = xa[XA_UTF8_STRING];
3569 #endif
3570
3571       XChangeProperty (display->display, rq.requestor, rq.property, XA_ATOM,
3572                        32, PropModeReplace,
3573                        (unsigned char *)target_list, target - target_list);
3574       ev.property = rq.property;
3575     }
3576 #if TODO // TODO
3577   else if (rq.target == xa[XA_MULTIPLE])
3578     {
3579       /* TODO: Handle MULTIPLE */
3580     }
3581 #endif
3582   else if (rq.target == xa[XA_TIMESTAMP] && selection.text)
3583     {
3584       XChangeProperty (display->display, rq.requestor, rq.property, rq.target,
3585                        32, PropModeReplace, (unsigned char *)&selection_time, 1);
3586       ev.property = rq.property;
3587     }
3588   else if (rq.target == XA_STRING
3589            || rq.target == xa[XA_TEXT]
3590            || rq.target == xa[XA_COMPOUND_TEXT]
3591            || rq.target == xa[XA_UTF8_STRING]
3592           )
3593     {
3594       XTextProperty ct;
3595       Atom target = rq.target;
3596       short freect = 0;
3597       int selectlen;
3598       wchar_t *cl;
3599       enum {
3600         enc_string        = XStringStyle,
3601         enc_text          = XStdICCTextStyle,
3602         enc_compound_text = XCompoundTextStyle,
3603 #ifdef X_HAVE_UTF8_STRING
3604         enc_utf8          = XUTF8StringStyle,
3605 #else
3606         enc_utf8          = -1,
3607 #endif
3608       } style;
3609
3610       if (target == XA_STRING)
3611         // we actually don't do XA_STRING, but who cares, as i18n clients
3612         // will ask for another format anyways.
3613         style = enc_string;
3614       else if (target == xa[XA_TEXT])
3615         style = enc_text;
3616       else if (target == xa[XA_COMPOUND_TEXT])
3617         style = enc_compound_text;
3618 #if ENABLE_FRILLS
3619       else if (target == xa[XA_UTF8_STRING])
3620         style = enc_utf8;
3621 #endif
3622       else
3623         {
3624           target = xa[XA_COMPOUND_TEXT];
3625           style = enc_compound_text;
3626         }
3627
3628       if (selection.text)
3629         {
3630           cl = selection.text;
3631           selectlen = selection.len;
3632         }
3633       else
3634         {
3635           cl = L"";
3636           selectlen = 0;
3637         }
3638
3639 #if ENABLE_FRILLS
3640       // xlib is horribly broken with respect to UTF8_STRING, and nobody cares to fix it
3641       // so recode it manually
3642       if (style == enc_utf8)
3643         {
3644           freect = 1;
3645           ct.encoding = target;
3646           ct.format = 8;
3647           ct.value = (unsigned char *)rxvt_wcstoutf8 (cl, selectlen);
3648           ct.nitems = strlen ((char *)ct.value);
3649         }
3650       else
3651 #endif
3652       if (XwcTextListToTextProperty (display->display, &cl, 1, (XICCEncodingStyle) style, &ct) >= 0)
3653         freect = 1;
3654       else
3655         {
3656           /* if we failed to convert then send it raw */
3657           ct.value = (unsigned char *)cl;
3658           ct.nitems = selectlen;
3659           ct.encoding = target;
3660         }
3661
3662       XChangeProperty (display->display, rq.requestor, rq.property,
3663                        ct.encoding, 8, PropModeReplace,
3664                        ct.value, (int)ct.nitems);
3665       ev.property = rq.property;
3666
3667       if (freect)
3668         XFree (ct.value);
3669     }
3670
3671   XSendEvent (display->display, rq.requestor, False, 0L, (XEvent *)&ev);
3672 }
3673 \f
3674 /* ------------------------------------------------------------------------- *
3675  *                              MOUSE ROUTINES                               *
3676  * ------------------------------------------------------------------------- */
3677
3678 /*
3679  * return col/row values corresponding to x/y pixel values
3680  */
3681 void
3682 rxvt_term::pixel_position (int *x, int *y)
3683 {
3684   *x = Pixel2Col (*x);
3685   /* MAX_IT (*x, 0); MIN_IT (*x, (int)TermWin.ncol - 1); */
3686   *y = Pixel2Row (*y);
3687   /* MAX_IT (*y, 0); MIN_IT (*y, (int)TermWin.nrow - 1); */
3688 }
3689
3690 /* ------------------------------------------------------------------------- */
3691 #ifdef USE_XIM
3692 void
3693 rxvt_term::im_set_position (XPoint &pos)
3694 {
3695   XWindowAttributes xwa;
3696
3697   XGetWindowAttributes (display->display, TermWin.vt, &xwa);
3698
3699   pos.x = xwa.x + Col2Pixel    (screen.cur.col);
3700   pos.y = xwa.y + Height2Pixel (screen.cur.row) + TermWin.fbase;
3701 }
3702 #endif
3703
3704 #if ENABLE_OVERLAY
3705 void
3706 rxvt_term::scr_overlay_new (int x, int y, int w, int h)
3707 {
3708   if (TermWin.nrow < 3 || TermWin.ncol < 3)
3709     return;
3710
3711   want_refresh = 1;
3712
3713   scr_overlay_off ();
3714
3715   if (x < 0) x = TermWin.ncol - w;
3716   if (y < 0) y = TermWin.nrow - h;
3717
3718   // make space for border
3719   w += 2; MIN_IT (w, TermWin.ncol);
3720   h += 2; MIN_IT (h, TermWin.nrow);
3721
3722   x -= 1; MAX_IT (x, 0);
3723   y -= 1; MAX_IT (y, 0);
3724
3725   MIN_IT (x, TermWin.ncol - w);
3726   MIN_IT (y, TermWin.nrow - h);
3727
3728   ov_x = x; ov_y = y;
3729   ov_w = w; ov_h = h;
3730
3731   ov_text = new text_t *[h];
3732   ov_rend = new rend_t *[h];
3733
3734   for (y = 0; y < h; y++)
3735     {
3736       text_t *tp = ov_text[y] = new text_t[w];
3737       rend_t *rp = ov_rend[y] = new rend_t[w];
3738
3739       text_t t0, t1, t2;
3740       rend_t r = OVERLAY_RSTYLE;
3741
3742       if (y == 0)
3743         t0 = 0x2554, t1 = 0x2550, t2 = 0x2557;
3744       else if (y < h - 1)
3745         t0 = 0x2551, t1 = 0x0020, t2 = 0x2551;
3746       else
3747         t0 = 0x255a, t1 = 0x2550, t2 = 0x255d;
3748
3749       *tp++ = t0;
3750       *rp++ = r;
3751
3752       for (x = w - 2; x > 0; --x)
3753         {
3754           *tp++ = t1;
3755           *rp++ = r;
3756         }
3757
3758       *tp = t2;
3759       *rp = r;
3760     }
3761 }
3762
3763 void
3764 rxvt_term::scr_overlay_off ()
3765 {
3766   if (!ov_text)
3767     return;
3768
3769   want_refresh = 1;
3770
3771   for (int y = 0; y < ov_h; y++)
3772     {
3773       delete [] ov_text[y];
3774       delete [] ov_rend[y];
3775     }
3776
3777   delete [] ov_text; ov_text = 0;
3778   delete [] ov_rend; ov_rend = 0;
3779 }
3780
3781 void
3782 rxvt_term::scr_overlay_set (int x, int y, text_t text, rend_t rend)
3783 {
3784   if (!ov_text || x >= ov_w - 2 || y >= ov_h - 2)
3785     return;
3786
3787   x++, y++;
3788
3789   ov_text[y][x] = text;
3790   ov_rend[y][x] = rend;
3791 }
3792
3793 void
3794 rxvt_term::scr_overlay_set (int x, int y, const char *s)
3795 {
3796   while (*s)
3797     scr_overlay_set (x++, y, *s++);
3798 }
3799
3800 void
3801 rxvt_term::scr_swap_overlay ()
3802 {
3803   if (!ov_text)
3804     return;
3805
3806   int row_offset = ov_y + TermWin.saveLines - TermWin.view_start;
3807
3808   // swap screen mem with overlay
3809   for (int y = ov_h; y--; )
3810     {
3811       text_t *t1 = ov_text[y];
3812       rend_t *r1 = ov_rend[y];
3813
3814       text_t *t2 = screen.text[y + row_offset] + ov_x;
3815       rend_t *r2 = screen.rend[y + row_offset] + ov_x;
3816
3817       for (int x = ov_w; x--; )
3818         {
3819           text_t t = *t1; *t1++ = *t2; *t2++ = t;
3820           rend_t r = *r1; *r1++ = *r2; *r2++ = SET_FONT (r, FONTSET (r)->find_font (t));
3821         }
3822     }
3823 }
3824
3825 #endif
3826 /* ------------------------------------------------------------------------- */