ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/rxvt-unicode/src/screen.C
Revision: 1.192
Committed: Thu Dec 22 19:25:58 2005 UTC (18 years, 5 months ago) by root
Content type: text/plain
Branch: MAIN
Changes since 1.191: +2 -3 lines
Log Message:
*** empty log message ***

File Contents

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