ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/rxvt-unicode/src/screen.C
Revision: 1.189
Committed: Thu Dec 22 15:28:15 2005 UTC (18 years, 5 months ago) by root
Content type: text/plain
Branch: MAIN
Changes since 1.188: +77 -50 lines
Log Message:
*** empty log message ***

File Contents

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