ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/rxvt-unicode/src/screen.C
(Generate patch)

Comparing rxvt-unicode/src/screen.C (file contents):
Revision 1.15 by pcg, Fri Jan 16 16:34:56 2004 UTC vs.
Revision 1.210 by root, Thu Jan 5 21:21:49 2006 UTC

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

Diff Legend

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