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