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.7 by pcg, Tue Dec 16 23:04:13 2003 UTC vs.
Revision 1.209 by root, Thu Jan 5 01:04:10 2006 UTC

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

Diff Legend

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