ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/rxvt-unicode/src/screen.C
Revision: 1.472
Committed: Mon Aug 8 10:33:14 2022 UTC (21 months ago) by root
Content type: text/plain
Branch: MAIN
CVS Tags: HEAD
Changes since 1.471: +0 -1 lines
Log Message:
*** empty log message ***

File Contents

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