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.1 by pcg, Mon Nov 24 17:28:08 2003 UTC vs.
Revision 1.208 by root, Wed Jan 4 05:24:55 2006 UTC

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

Diff Legend

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