/*--------------------------------*-C-*--------------------------------------* * File: screen.c *---------------------------------------------------------------------------* * * Copyright (c) 1997-2001 Geoff Wing * * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 2 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program; if not, write to the Free Software * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. *--------------------------------------------------------------------------*/ /* * We handle _all_ screen updates and selections */ #include "../config.h" /* NECESSARY */ #define INTERN_SCREEN #include "rxvt.h" /* NECESSARY */ #include "screen.intpro" /* PROTOS for internal routines */ #include /* get the typedef for CARD32 */ #include #include #include "salloc.C" // HACK!! inline void fill_text (text_t *start, text_t value, int len) { while (len--) *start++ = value; } /* ------------------------------------------------------------------------- */ #define PROP_SIZE 16384 #define TABSIZE 8 /* default tab size */ /* ------------------------------------------------------------------------- * * GENERAL SCREEN AND SELECTION UPDATE ROUTINES * * ------------------------------------------------------------------------- */ #define ZERO_SCROLLBACK() \ if ((Options & Opt_scrollTtyOutput) == Opt_scrollTtyOutput) \ TermWin.view_start = 0 #define CLEAR_SELECTION() \ selection.beg.row = selection.beg.col \ = selection.end.row = selection.end.col = 0 #define CLEAR_ALL_SELECTION() \ selection.beg.row = selection.beg.col \ = selection.mark.row = selection.mark.col \ = selection.end.row = selection.end.col = 0 #define ROW_AND_COL_IS_AFTER(A, B, C, D) \ (((A) > (C)) || (((A) == (C)) && ((B) > (D)))) #define ROW_AND_COL_IS_BEFORE(A, B, C, D) \ (((A) < (C)) || (((A) == (C)) && ((B) < (D)))) #define ROW_AND_COL_IN_ROW_AFTER(A, B, C, D) \ (((A) == (C)) && ((B) > (D))) #define ROW_AND_COL_IN_ROW_AT_OR_AFTER(A, B, C, D) \ (((A) == (C)) && ((B) >= (D))) #define ROW_AND_COL_IN_ROW_BEFORE(A, B, C, D) \ (((A) == (C)) && ((B) < (D))) #define ROW_AND_COL_IN_ROW_AT_OR_BEFORE(A, B, C, D) \ (((A) == (C)) && ((B) <= (D))) /* these must be row_col_t */ #define ROWCOL_IS_AFTER(X, Y) \ ROW_AND_COL_IS_AFTER((X).row, (X).col, (Y).row, (Y).col) #define ROWCOL_IS_BEFORE(X, Y) \ ROW_AND_COL_IS_BEFORE((X).row, (X).col, (Y).row, (Y).col) #define ROWCOL_IN_ROW_AFTER(X, Y) \ ROW_AND_COL_IN_ROW_AFTER((X).row, (X).col, (Y).row, (Y).col) #define ROWCOL_IN_ROW_BEFORE(X, Y) \ ROW_AND_COL_IN_ROW_BEFORE((X).row, (X).col, (Y).row, (Y).col) #define ROWCOL_IN_ROW_AT_OR_AFTER(X, Y) \ ROW_AND_COL_IN_ROW_AT_OR_AFTER((X).row, (X).col, (Y).row, (Y).col) #define ROWCOL_IN_ROW_AT_OR_BEFORE(X, Y) \ ROW_AND_COL_IN_ROW_AT_OR_BEFORE((X).row, (X).col, (Y).row, (Y).col) /* * CLEAR_ROWS : clear rows starting from row * CLEAR_CHARS: clear chars starting from pixel position * ERASE_ROWS : set rows starting from row to the foreground colour */ #define drawBuffer TermWin.vt #define CLEAR_ROWS(row, num) \ if (TermWin.mapped) \ XClearArea (Xdisplay, drawBuffer, TermWin.int_bwidth, \ Row2Pixel(row), (unsigned int)TermWin.width, \ (unsigned int)Height2Pixel(num), False) #define CLEAR_CHARS(x, y, num) \ if (TermWin.mapped) \ XClearArea (Xdisplay, drawBuffer, x, y, \ (unsigned int)Width2Pixel(num), \ (unsigned int)Height2Pixel(1), False) #define ERASE_ROWS(row, num) \ XFillRectangle (Xdisplay, drawBuffer, TermWin.gc, \ TermWin.int_bwidth, Row2Pixel(row), \ (unsigned int)TermWin.width, \ (unsigned int)Height2Pixel(num)) /* ------------------------------------------------------------------------- * * SCREEN `COMMON' ROUTINES * * ------------------------------------------------------------------------- */ /* Fill part/all of a line with blanks. */ void rxvt_term::scr_blank_line (text_t *et, rend_t *er, unsigned int width, rend_t efs) { efs &= ~RS_baseattrMask; efs = SET_FONT (efs, TermWin.fontset->find_font (' ')); while (width--) { *et++ = ' '; *er++ = efs; } } /* ------------------------------------------------------------------------- */ /* Fill a full line with blanks - make sure it is allocated first */ void rxvt_term::scr_blank_screen_mem (text_t **tp, rend_t **rp, unsigned int row, rend_t efs) { #ifdef DEBUG_STRICT assert((tp[row] && rp[row]) || (tp[row] == NULL && rp[row] == NULL)); #endif if (tp[row] == NULL) { tp[row] = (text_t *)talloc->alloc (); rp[row] = (rend_t *)ralloc->alloc (); } scr_blank_line (tp[row], rp[row], TermWin.ncol, efs); } /* ------------------------------------------------------------------------- * * SCREEN INITIALISATION * * ------------------------------------------------------------------------- */ void rxvt_term::scr_reset () { unsigned int ncol, nrow, total_rows, prev_total_rows; unsigned int p, q; int k; rend_t setrstyle; D_SCREEN((stderr, "rxvt_scr_reset()")); TermWin.view_start = 0; num_scr = 0; if (TermWin.ncol == 0) TermWin.ncol = 80; if (TermWin.nrow == 0) TermWin.nrow = 24; ncol = TermWin.ncol; nrow = TermWin.nrow; if (ncol == prev_ncol && nrow == prev_nrow) return; want_refresh = 1; total_rows = nrow + TermWin.saveLines; prev_total_rows = prev_nrow + TermWin.saveLines; screen.tscroll = 0; screen.bscroll = nrow - 1; if (!talloc) { talloc = new rxvt_salloc (ncol * sizeof (text_t)); ralloc = new rxvt_salloc (ncol * sizeof (rend_t)); } if (prev_nrow == 0) { /* * first time called so just malloc everything : don't rely on realloc * Note: this is still needed so that all the scrollback lines are NULL */ screen.text = (text_t **)rxvt_calloc(total_rows, sizeof(text_t *)); buf_text = (text_t **)rxvt_calloc(total_rows, sizeof(text_t *)); drawn_text = (text_t **)rxvt_calloc(nrow, sizeof(text_t *)); swap.text = (text_t **)rxvt_calloc(nrow, sizeof(text_t *)); screen.tlen = (int16_t *)rxvt_calloc(total_rows, sizeof(int16_t)); swap.tlen = (int16_t *)rxvt_calloc(nrow, sizeof(int16_t)); screen.rend = (rend_t **)rxvt_calloc(total_rows, sizeof(rend_t *)); buf_rend = (rend_t **)rxvt_calloc(total_rows, sizeof(rend_t *)); drawn_rend = (rend_t **)rxvt_calloc(nrow, sizeof(rend_t *)); swap.rend = (rend_t **)rxvt_calloc(nrow, sizeof(rend_t *)); for (p = 0; p < nrow; p++) { q = p + TermWin.saveLines; scr_blank_screen_mem (screen.text, screen.rend, q, DEFAULT_RSTYLE); scr_blank_screen_mem (swap.text, swap.rend, p, DEFAULT_RSTYLE); screen.tlen[q] = swap.tlen[p] = 0; scr_blank_screen_mem (drawn_text, drawn_rend, p, DEFAULT_RSTYLE); } MEMSET(charsets, 'B', sizeof(charsets)); TermWin.nscrolled = 0; /* no saved lines */ rstyle = DEFAULT_RSTYLE; screen.flags = Screen_DefaultFlags; screen.cur.row = screen.cur.col = 0; screen.charset = 0; current_screen = PRIMARY; scr_cursor (SAVE); #if NSCREENS swap.flags = Screen_DefaultFlags; swap.cur.row = swap.cur.col = 0; swap.charset = 0; current_screen = SECONDARY; scr_cursor (SAVE); current_screen = PRIMARY; #endif selection.text = NULL; selection.len = 0; selection.op = SELECTION_CLEAR; selection.screen = PRIMARY; selection.clicks = 0; CLEAR_ALL_SELECTION (); rvideo = 0; } else { /* * add or delete rows as appropriate */ setrstyle = DEFAULT_RSTYLE; if (nrow < prev_nrow) { /* delete rows */ k = min (TermWin.nscrolled, prev_nrow - nrow); scr_scroll_text (0, (int)prev_nrow - 1, k, 1); for (p = nrow; p < prev_nrow; p++) { q = p + TermWin.saveLines; if (screen.text[q]) { #ifdef DEBUG_STRICT assert (screen.rend[q]); #endif talloc->free (screen.text[q]); ralloc->free (screen.rend[q]); } if (swap.text[p]) { #ifdef DEBUG_STRICT assert (swap.rend[p]); #endif talloc->free (swap.text[p]); ralloc->free (swap.rend[p]); } #ifdef DEBUG_STRICT assert (drawn_text[p] && drawn_rend[p]); #endif talloc->free (drawn_text[p]); ralloc->free (drawn_rend[p]); } /* we have fewer rows so fix up cursor position */ MIN_IT (screen.cur.row, (int32_t)nrow - 1); MIN_IT (swap.cur.row, (int32_t)nrow - 1); scr_reset_realloc (); /* realloc _last_ */ } else if (nrow > prev_nrow) { /* add rows */ scr_reset_realloc (); /* realloc _first_ */ TermWin.ncol = prev_ncol; // save b/c scr_blank_screen_mem uses this k = min (TermWin.nscrolled, nrow - prev_nrow); for (p = prev_total_rows; p < total_rows; p++) { screen.tlen[p] = 0; screen.text[p] = NULL; screen.rend[p] = NULL; } for (p = prev_total_rows; p < total_rows - k; p++) scr_blank_screen_mem (screen.text, screen.rend, p, setrstyle); for (p = prev_nrow; p < nrow; p++) { swap.tlen[p] = 0; swap.text[p] = NULL; swap.rend[p] = NULL; drawn_text[p] = NULL; drawn_rend[p] = NULL; scr_blank_screen_mem (swap.text, swap.rend, p, setrstyle); scr_blank_screen_mem (drawn_text, drawn_rend, p, setrstyle); } if (k > 0) { scr_scroll_text (0, (int)nrow - 1, -k, 1); screen.cur.row += k; screen.s_cur.row += k; TermWin.nscrolled -= k; } #ifdef DEBUG_STRICT assert(screen.cur.row < TermWin.nrow); assert(swap.cur.row < TermWin.nrow); #else /* drive with your eyes closed */ MIN_IT(screen.cur.row, nrow - 1); MIN_IT(swap.cur.row, nrow - 1); #endif TermWin.ncol = ncol; // save b/c scr_blank_screen_mem uses this } /* resize columns */ if (ncol != prev_ncol) { int common = min (prev_ncol, ncol); rxvt_salloc *ta = new rxvt_salloc (ncol * sizeof (text_t)); rxvt_salloc *ra = new rxvt_salloc (ncol * sizeof (rend_t)); for (p = 0; p < total_rows; p++) { if (screen.text[p]) { text_t *t = (text_t *)ta->alloc (); memcpy (t, screen.text[p], common * sizeof (text_t)); screen.text[p] = t; rend_t *r = (rend_t *)ra->alloc (); memcpy (r, screen.rend[p], common * sizeof (rend_t)); screen.rend[p] = r; MIN_IT(screen.tlen[p], (int16_t)ncol); if (ncol > prev_ncol) scr_blank_line (&(screen.text[p][prev_ncol]), &(screen.rend[p][prev_ncol]), ncol - prev_ncol, setrstyle); } } for (p = 0; p < nrow; p++) { text_t *t = (text_t *)ta->alloc (); memcpy (t, drawn_text[p], common * sizeof (text_t)); drawn_text[p] = t; rend_t *r = (rend_t *)ra->alloc (); memcpy (r, drawn_rend[p], common * sizeof (rend_t)); drawn_rend[p] = r; if (ncol > prev_ncol) scr_blank_line (&(drawn_text[p][prev_ncol]), &(drawn_rend[p][prev_ncol]), ncol - prev_ncol, setrstyle); if (swap.text[p]) { text_t *t = (text_t *)ta->alloc (); memcpy (t, swap.text[p], common * sizeof (text_t)); swap.text[p] = t; rend_t *r = (rend_t *)ra->alloc (); memcpy (r, swap.rend[p], common * sizeof (rend_t)); swap.rend[p] = r; MIN_IT(swap.tlen[p], (int16_t)ncol); if (ncol > prev_ncol) scr_blank_line (&(swap.text[p][prev_ncol]), &(swap.rend[p][prev_ncol]), ncol - prev_ncol, setrstyle); } } MIN_IT (screen.cur.col, (int16_t)ncol - 1); MIN_IT (swap.cur.col, (int16_t)ncol - 1); delete talloc; talloc = ta; delete ralloc; ralloc = ra; } if (tabs) free(tabs); } prev_nrow = nrow; prev_ncol = ncol; tabs = (char *)rxvt_malloc (ncol * sizeof(char)); for (p = 0; p < ncol; p++) tabs[p] = (p % TABSIZE == 0) ? 1 : 0; tt_winch (); } void rxvt_term::scr_reset_realloc() { uint16_t total_rows, nrow; nrow = TermWin.nrow; total_rows = nrow + TermWin.saveLines; /* *INDENT-OFF* */ screen.text = (text_t **)rxvt_realloc(screen.text, total_rows * sizeof(text_t *)); buf_text = (text_t **)rxvt_realloc(buf_text , total_rows * sizeof(text_t *)); drawn_text = (text_t **)rxvt_realloc(drawn_text , nrow * sizeof(text_t *)); swap.text = (text_t **)rxvt_realloc(swap.text , nrow * sizeof(text_t *)); screen.tlen = (int16_t *)rxvt_realloc(screen.tlen, total_rows * sizeof(int16_t)); swap.tlen = (int16_t *)rxvt_realloc(swap.tlen , total_rows * sizeof(int16_t)); screen.rend = (rend_t **)rxvt_realloc(screen.rend, total_rows * sizeof(rend_t *)); buf_rend = (rend_t **)rxvt_realloc(buf_rend , total_rows * sizeof(rend_t *)); drawn_rend = (rend_t **)rxvt_realloc(drawn_rend , nrow * sizeof(rend_t *)); swap.rend = (rend_t **)rxvt_realloc(swap.rend , nrow * sizeof(rend_t *)); /* *INDENT-ON* */ } /* ------------------------------------------------------------------------- */ /* * Free everything. That way malloc debugging can find leakage. */ void rxvt_term::scr_release() { uint16_t total_rows; int i; total_rows = TermWin.nrow + TermWin.saveLines; #ifdef DEBUG_STRICT for (i = 0; i < total_rows; i++) { if (screen.text[i]) /* then so is screen.rend[i] */ assert(screen.rend[i]); } #endif delete talloc; talloc = 0; delete ralloc; ralloc = 0; free (screen.text); free (screen.tlen); free (screen.rend); free (drawn_text); free (drawn_rend); free (swap.text); free (swap.tlen); free (swap.rend); free (buf_text); free (buf_rend); free (tabs); /* NULL these so if anything tries to use them, we'll know about it */ screen.text = drawn_text = swap.text = NULL; screen.rend = drawn_rend = swap.rend = NULL; screen.tlen = swap.tlen = NULL; buf_text = NULL; buf_rend = NULL; tabs = NULL; } /* ------------------------------------------------------------------------- */ /* * Hard reset */ void rxvt_term::scr_poweron () { D_SCREEN((stderr, "rxvt_scr_poweron()")); scr_release (); prev_nrow = prev_ncol = 0; scr_reset (); scr_clear (); scr_refresh (SLOW_REFRESH); #ifdef RXVT_GRAPHICS Gr_reset (); #endif } /* ------------------------------------------------------------------------- * * PROCESS SCREEN COMMANDS * * ------------------------------------------------------------------------- */ /* * Save and Restore cursor * XTERM_SEQ: Save cursor : ESC 7 * XTERM_SEQ: Restore cursor: ESC 8 */ void rxvt_term::scr_cursor (int mode) { screen_t *s; D_SCREEN((stderr, "rxvt_scr_cursor(%c)", mode)); #if NSCREENS && !defined(NO_SECONDARY_SCREEN_CURSOR) if (current_screen == SECONDARY) s = &(swap); else #endif s = &(screen); switch (mode) { case SAVE: s->s_cur.row = s->cur.row; s->s_cur.col = s->cur.col; s->s_rstyle = rstyle; s->s_charset = s->charset; s->s_charset_char = charsets[s->charset]; break; case RESTORE: want_refresh = 1; s->cur.row = s->s_cur.row; s->cur.col = s->s_cur.col; s->flags &= ~Screen_WrapNext; rstyle = s->s_rstyle; s->charset = s->s_charset; charsets[s->charset] = s->s_charset_char; set_font_style (); break; } /* boundary check in case screen size changed between SAVE and RESTORE */ MIN_IT(s->cur.row, TermWin.nrow - 1); MIN_IT(s->cur.col, TermWin.ncol - 1); #ifdef DEBUG_STRICT assert(s->cur.row >= 0); assert(s->cur.col >= 0); #else /* drive with your eyes closed */ MAX_IT(s->cur.row, 0); MAX_IT(s->cur.col, 0); #endif } /* ------------------------------------------------------------------------- */ /* * Swap between primary and secondary screens * XTERM_SEQ: Primary screen : ESC [ ? 4 7 h * XTERM_SEQ: Secondary screen: ESC [ ? 4 7 l */ int rxvt_term::scr_change_screen (int scrn) { int i; #if NSCREENS int offset; #endif want_refresh = 1; D_SCREEN((stderr, "rxvt_scr_change_screen(%d)", scrn)); TermWin.view_start = 0; if (current_screen == scrn) return current_screen; selection_check (2); /* check for boundary cross */ SWAP_IT(current_screen, scrn, int); #if NSCREENS num_scr = 0; offset = TermWin.saveLines; for (i = prev_nrow; i--;) { SWAP_IT(screen.text[i + offset], swap.text[i], text_t *); SWAP_IT(screen.tlen[i + offset], swap.tlen[i], int16_t); SWAP_IT(screen.rend[i + offset], swap.rend[i], rend_t *); } SWAP_IT(screen.cur.row, swap.cur.row, int16_t); SWAP_IT(screen.cur.col, swap.cur.col, int16_t); # ifdef DEBUG_STRICT assert((screen.cur.row >= 0) && (screen.cur.row < prev_nrow)); assert((screen.cur.col >= 0) && (screen.cur.col < prev_ncol)); # else /* drive with your eyes closed */ MAX_IT(screen.cur.row, 0); MIN_IT(screen.cur.row, (int32_t)prev_nrow - 1); MAX_IT(screen.cur.col, 0); MIN_IT(screen.cur.col, (int32_t)prev_ncol - 1); # endif SWAP_IT(screen.charset, swap.charset, int16_t); SWAP_IT(screen.flags, swap.flags, int); screen.flags |= Screen_VisibleCursor; swap.flags |= Screen_VisibleCursor; # ifdef RXVT_GRAPHICS if (Gr_Displayed ()) { Gr_scroll (0); Gr_ChangeScreen (); } # endif #else # ifdef SCROLL_ON_NO_SECONDARY # ifdef RXVT_GRAPHICS if (Gr_Displayed ()) Gr_ClearScreen (); # endif if (current_screen == PRIMARY # ifdef RXVT_GRAPHICS && !Gr_Displayed () # endif ) scr_scroll_text(0, (prev_nrow - 1), prev_nrow, 0); # endif #endif return scrn; } /* ------------------------------------------------------------------------- */ /* * Change the colour for following text */ void rxvt_term::scr_color (unsigned int color, int fgbg) { color &= RS_fgMask; if (fgbg == Color_fg) rstyle = SET_FGCOLOR(rstyle, color); else rstyle = SET_BGCOLOR(rstyle, color); } /* ------------------------------------------------------------------------- */ /* * Change the rendition style for following text */ void rxvt_term::scr_rendition (int set, int style) { if (set) rstyle |= style; else if (style == ~RS_None) rstyle = DEFAULT_RSTYLE; else rstyle &= ~style; } /* ------------------------------------------------------------------------- */ /* * Scroll text between and inclusive, by lines * count positive ==> scroll up * count negative ==> scroll down * spec == 0 for normal routines */ int rxvt_term::scr_scroll_text (int row1, int row2, int count, int spec) { int i, j; long nscrolled; if (count == 0 || (row1 > row2)) return 0; want_refresh = 1; D_SCREEN((stderr, "rxvt_scroll_text(%d,%d,%d,%d): %s", row1, row2, count, spec, (current_screen == PRIMARY) ? "Primary" : "Secondary")); if ((count > 0) && (row1 == 0) && (current_screen == PRIMARY)) { nscrolled = (long)TermWin.nscrolled + (long)count; if (nscrolled > (long)TermWin.saveLines) TermWin.nscrolled = TermWin.saveLines; else TermWin.nscrolled = (uint16_t)nscrolled; if ((Options & Opt_scrollWithBuffer) && TermWin.view_start != 0 && TermWin.view_start != TermWin.saveLines) scr_page (UP, count); } else if (!spec) row1 += TermWin.saveLines; row2 += TermWin.saveLines; if (selection.op && current_screen == selection.screen) { i = selection.beg.row + TermWin.saveLines; j = selection.end.row + TermWin.saveLines; if ((i < row1 && j > row1) || (i < row2 && j > row2) || (i - count < row1 && i >= row1) || (i - count > row2 && i <= row2) || (j - count < row1 && j >= row1) || (j - count > row2 && j <= row2)) { CLEAR_ALL_SELECTION (); selection.op = SELECTION_CLEAR; /* XXX: too aggressive? */ } else if (j >= row1 && j <= row2) { /* move selected region too */ selection.beg.row -= count; selection.end.row -= count; selection.mark.row -= count; } } selection_check (0); /* _after_ TermWin.nscrolled update */ num_scr += count; j = count; if (count < 0) count = -count; i = row2 - row1 + 1; MIN_IT(count, i); if (j > 0) { /* A: scroll up */ /* A1: Copy lines that will get clobbered by the rotation */ for (i = 0, j = row1; i < count; i++, j++) { buf_text[i] = screen.text[j]; buf_rend[i] = screen.rend[j]; } /* A2: Rotate lines */ for (j = row1, i = j + count; i <= row2; i++, j++) { screen.tlen[j] = screen.tlen[i]; screen.text[j] = screen.text[i]; screen.rend[j] = screen.rend[i]; } j = row2 - count + 1, i = count; } else /* if (j < 0) */ { /* B: scroll down */ /* B1: Copy lines that will get clobbered by the rotation */ for (i = 0, j = row2; i < count; i++, j--) { buf_text[i] = screen.text[j]; buf_rend[i] = screen.rend[j]; } /* B2: Rotate lines */ for (j = row2, i = j - count; i >= row1; i--, j--) { screen.tlen[j] = screen.tlen[i]; screen.text[j] = screen.text[i]; screen.rend[j] = screen.rend[i]; } j = row1, i = count; count = -count; } /* C: Resurrect lines */ for (; i--; j++) { screen.tlen[j] = 0; screen.text[j] = buf_text[i]; screen.rend[j] = buf_rend[i]; if (!spec) /* line length may not equal TermWin.ncol */ scr_blank_screen_mem (screen.text, screen.rend, (unsigned int)j, rstyle); } #ifdef RXVT_GRAPHICS if (Gr_Displayed ()) Gr_scroll (count); #endif return count; } /* ------------------------------------------------------------------------- */ /* * Add text given in of length to screen struct */ void rxvt_term::scr_add_lines (const uint32_t *str, int nlines, int len) { unsigned char checksel, clearsel; uint32_t c; int i, row, last_col; text_t *stp; rend_t *srp; if (len <= 0) /* sanity */ return; want_refresh = 1; last_col = TermWin.ncol; D_SCREEN((stderr, "rxvt_scr_add_lines(%d,%d)", nlines, len)); ZERO_SCROLLBACK(); if (nlines > 0) { nlines += (screen.cur.row - screen.bscroll); if ((nlines > 0) && (screen.tscroll == 0) && (screen.bscroll == (TermWin.nrow - 1))) { /* _at least_ this many lines need to be scrolled */ scr_scroll_text(screen.tscroll, screen.bscroll, nlines, 0); screen.cur.row -= nlines; } } #ifdef DEBUG_STRICT assert(screen.cur.col < last_col); assert((screen.cur.row < TermWin.nrow) && (screen.cur.row >= -(int32_t)TermWin.nscrolled)); #else /* drive with your eyes closed */ MIN_IT(screen.cur.col, last_col - 1); MIN_IT(screen.cur.row, (int32_t)TermWin.nrow - 1); MAX_IT(screen.cur.row, -(int32_t)TermWin.nscrolled); #endif row = screen.cur.row + TermWin.saveLines; checksel = (selection.op && current_screen == selection.screen) ? 1 : 0; clearsel = 0; stp = screen.text[row]; srp = screen.rend[row]; for (i = 0; i < len;) { c = str[i++]; switch (c) { case '\t': scr_tab (1); continue; case '\n': if (screen.tlen[row] != -1) /* XXX: think about this */ MAX_IT(screen.tlen[row], screen.cur.col); screen.flags &= ~Screen_WrapNext; if (screen.cur.row == screen.bscroll) scr_scroll_text (screen.tscroll, screen.bscroll, 1, 0); else if (screen.cur.row < (TermWin.nrow - 1)) row = (++screen.cur.row) + TermWin.saveLines; stp = screen.text[row]; /* _must_ refresh */ srp = screen.rend[row]; /* _must_ refresh */ continue; case '\r': if (screen.tlen[row] != -1) /* XXX: think about this */ MAX_IT(screen.tlen[row], screen.cur.col); screen.flags &= ~Screen_WrapNext; screen.cur.col = 0; continue; default: if (c == 127) continue; /* yummmm..... */ break; } if (checksel /* see if we're writing within selection */ && !ROWCOL_IS_BEFORE(screen.cur, selection.beg) && ROWCOL_IS_BEFORE(screen.cur, selection.end)) { checksel = 0; clearsel = 1; } if (screen.flags & Screen_WrapNext) { screen.tlen[row] = -1; if (screen.cur.row == screen.bscroll) scr_scroll_text(screen.tscroll, screen.bscroll, 1, 0); else if (screen.cur.row < (TermWin.nrow - 1)) row = (++screen.cur.row) + TermWin.saveLines; stp = screen.text[row]; /* _must_ refresh */ srp = screen.rend[row]; /* _must_ refresh */ screen.cur.col = 0; screen.flags &= ~Screen_WrapNext; } if (screen.flags & Screen_Insert) scr_insdel_chars (1, INSERT); if (charsets[screen.charset] == '0') // DEC SPECIAL switch (c) { case '+': c = 0x2192; break; case ',': c = 0x2190; break; case '-': c = 0x2191; break; case '.': c = 0x2193; break; case '0': c = 0x25ae; break; case '`': c = 0x25c6; break; case 'a': c = 0x2592; break; case 'f': c = 0x00b0; break; case 'g': c = 0x00b1; break; case 'h': c = 0x2592; break; case 'i': c = 0x2603; break; case 'j': c = 0x2518; break; case 'k': c = 0x2510; break; case 'l': c = 0x250c; break; case 'm': c = 0x2514; break; case 'n': c = 0x253c; break; case 'o': c = 0x23ba; break; case 'p': c = 0x23bb; break; case 'q': c = 0x2500; break; case 'r': c = 0x23bc; break; case 's': c = 0x23bd; break; case 't': c = 0x251c; break; case 'u': c = 0x2524; break; case 'v': c = 0x2534; break; case 'w': c = 0x252c; break; case 'x': c = 0x2502; break; case 'y': c = 0x2264; break; case 'z': c = 0x2265; break; case '{': c = 0x03c0; break; case '|': c = 0x2260; break; case '}': c = 0x00a3; break; case '~': c = 0x00b7; break; } rend_t rend = SET_FONT (rstyle, TermWin.fontset->find_font (c)); // rely on wcwidth to tell us the character width, at least for non-ascii int width = c <= 128 ? 1 : wcwidth (c); // width -1 characters (e.g. combining chars) are ignored currently. if (width > 0) do { stp[screen.cur.col] = c; srp[screen.cur.col] = rend; if (screen.cur.col < last_col - 1) screen.cur.col++; else { screen.tlen[row] = last_col; if (screen.flags & Screen_Autowrap) screen.flags |= Screen_WrapNext; break; } c = NOCHAR; } while (--width > 0); else (void)0; /* handle combining character etc. here. */ } if (screen.tlen[row] != -1) /* XXX: think about this */ MAX_IT(screen.tlen[row], screen.cur.col); /* * If we wrote anywhere in the selected area, kill the selection * XXX: should we kill the mark too? Possibly, but maybe that * should be a similar check. */ if (clearsel) CLEAR_SELECTION(); #ifdef DEBUG_STRICT assert(screen.cur.row >= 0); #else /* drive with your eyes closed */ MAX_IT(screen.cur.row, 0); #endif } /* ------------------------------------------------------------------------- */ /* * Process Backspace. Move back the cursor back a position, wrap if have to * XTERM_SEQ: CTRL-H */ void rxvt_term::scr_backspace () { want_refresh = 1; if (screen.cur.col == 0) { if (screen.cur.row > 0) { #ifdef TERMCAP_HAS_BW screen.cur.col = TermWin.ncol - 1; screen.cur.row--; return; #endif } } else if ((screen.flags & Screen_WrapNext) == 0) scr_gotorc (0, -1, RELATIVE); screen.flags &= ~Screen_WrapNext; } /* ------------------------------------------------------------------------- */ /* * Process Horizontal Tab * count: +ve = forward; -ve = backwards * XTERM_SEQ: CTRL-I */ void rxvt_term::scr_tab (int count) { int i, x; D_SCREEN((stderr, "rxvt_scr_tab(%d)", count)); want_refresh = 1; i = x = screen.cur.col; if (count == 0) return; else if (count > 0) { for (; ++i < TermWin.ncol; ) if (tabs[i]) { x = i; if (!--count) break; } if (count) x = TermWin.ncol - 1; } else /* if (count < 0) */ { for (; --i >= 0; ) if (tabs[i]) { x = i; if (!++count) break; } if (count) x = 0; } if (x != screen.cur.col) scr_gotorc (0, x, R_RELATIVE); } /* ------------------------------------------------------------------------- */ /* * Process DEC Back Index * XTERM_SEQ: ESC 6 * Move cursor left in row. If we're at the left boundary, shift everything * in that row right. Clear left column. */ #ifndef NO_FRILLS void rxvt_term::scr_backindex () { if (screen.cur.col > 0) scr_gotorc (0, -1, R_RELATIVE | C_RELATIVE); else { if (screen.tlen[screen.cur.row + TermWin.saveLines] == 0) return; /* um, yeah? */ scr_insdel_chars (1, INSERT); } } #endif /* ------------------------------------------------------------------------- */ /* * Process DEC Forward Index * XTERM_SEQ: ESC 9 * Move cursor right in row. If we're at the right boundary, shift everything * in that row left. Clear right column. */ #ifndef NO_FRILLS void rxvt_term::scr_forwardindex () { int row; if (screen.cur.col < TermWin.ncol - 1) scr_gotorc (0, 1, R_RELATIVE | C_RELATIVE); else { row = screen.cur.row + TermWin.saveLines; if (screen.tlen[row] == 0) return; /* um, yeah? */ else if (screen.tlen[row] == -1) screen.tlen[row] = TermWin.ncol; scr_gotorc (0, 0, R_RELATIVE); scr_insdel_chars (1, DELETE); scr_gotorc (0, TermWin.ncol - 1, R_RELATIVE); } } #endif /* ------------------------------------------------------------------------- */ /* * Goto Row/Column */ void rxvt_term::scr_gotorc (int row, int col, int relative) { want_refresh = 1; ZERO_SCROLLBACK(); #ifdef RXVT_GRAPHICS if (Gr_Displayed ()) Gr_scroll (0); #endif D_SCREEN((stderr, "rxvt_scr_gotorc(r:%s%d,c:%s%d): from (r:%d,c:%d)", (relative & R_RELATIVE ? "+" : ""), row, (relative & C_RELATIVE ? "+" : ""), col, screen.cur.row, screen.cur.col)); screen.cur.col = ((relative & C_RELATIVE) ? (screen.cur.col + col) : col); MAX_IT(screen.cur.col, 0); MIN_IT(screen.cur.col, (int32_t)TermWin.ncol - 1); screen.flags &= ~Screen_WrapNext; if (relative & R_RELATIVE) { if (row > 0) { if (screen.cur.row <= screen.bscroll && (screen.cur.row + row) > screen.bscroll) screen.cur.row = screen.bscroll; else screen.cur.row += row; } else if (row < 0) { if (screen.cur.row >= screen.tscroll && (screen.cur.row + row) < screen.tscroll) screen.cur.row = screen.tscroll; else screen.cur.row += row; } } else { if (screen.flags & Screen_Relative) { /* relative origin mode */ screen.cur.row = row + screen.tscroll; MIN_IT(screen.cur.row, screen.bscroll); } else screen.cur.row = row; } MAX_IT(screen.cur.row, 0); MIN_IT(screen.cur.row, (int32_t)TermWin.nrow - 1); } /* ------------------------------------------------------------------------- */ /* * direction should be UP or DN */ void rxvt_term::scr_index (enum page_dirn direction) { int dirn; want_refresh = 1; dirn = ((direction == UP) ? 1 : -1); D_SCREEN((stderr, "rxvt_scr_index(%d)", dirn)); ZERO_SCROLLBACK(); #ifdef RXVT_GRAPHICS if (Gr_Displayed ()) Gr_scroll (0); #endif screen.flags &= ~Screen_WrapNext; if ((screen.cur.row == screen.bscroll && direction == UP) || (screen.cur.row == screen.tscroll && direction == DN)) scr_scroll_text(screen.tscroll, screen.bscroll, dirn, 0); else screen.cur.row += dirn; MAX_IT(screen.cur.row, 0); MIN_IT(screen.cur.row, (int32_t)TermWin.nrow - 1); selection_check (0); } /* ------------------------------------------------------------------------- */ /* * Erase part or whole of a line * XTERM_SEQ: Clear line to right: ESC [ 0 K * XTERM_SEQ: Clear line to left : ESC [ 1 K * XTERM_SEQ: Clear whole line : ESC [ 2 K */ void rxvt_term::scr_erase_line (int mode) { unsigned int row, col, num; want_refresh = 1; D_SCREEN((stderr, "rxvt_scr_erase_line(%d) at screen row: %d", mode, screen.cur.row)); ZERO_SCROLLBACK (); #ifdef RXVT_GRAPHICS if (Gr_Displayed ()) Gr_scroll (0); #endif selection_check (1); screen.flags &= ~Screen_WrapNext; row = TermWin.saveLines + screen.cur.row; switch (mode) { case 0: /* erase to end of line */ col = screen.cur.col; num = TermWin.ncol - col; MIN_IT(screen.tlen[row], (int16_t)col); if (ROWCOL_IN_ROW_AT_OR_AFTER(selection.beg, screen.cur) || ROWCOL_IN_ROW_AT_OR_AFTER(selection.end, screen.cur)) CLEAR_SELECTION(); break; case 1: /* erase to beginning of line */ col = 0; num = screen.cur.col + 1; if (ROWCOL_IN_ROW_AT_OR_BEFORE(selection.beg, screen.cur) || ROWCOL_IN_ROW_AT_OR_BEFORE(selection.end, screen.cur)) CLEAR_SELECTION(); break; case 2: /* erase whole line */ col = 0; num = TermWin.ncol; screen.tlen[row] = 0; if (selection.beg.row <= screen.cur.row && selection.end.row >= screen.cur.row) CLEAR_SELECTION(); break; default: return; } if (screen.text[row]) scr_blank_line (&(screen.text[row][col]), &(screen.rend[row][col]), num, rstyle); else scr_blank_screen_mem (screen.text, screen.rend, row, rstyle); } /* ------------------------------------------------------------------------- */ /* * Erase part of whole of the screen * XTERM_SEQ: Clear screen after cursor : ESC [ 0 J * XTERM_SEQ: Clear screen before cursor: ESC [ 1 J * XTERM_SEQ: Clear whole screen : ESC [ 2 J */ void rxvt_term::scr_erase_screen (int mode) { int num; int32_t row, row_offset; rend_t ren; XGCValues gcvalue; want_refresh = 1; D_SCREEN((stderr, "rxvt_scr_erase_screen(%d) at screen row: %d", mode, screen.cur.row)); ZERO_SCROLLBACK (); row_offset = (int32_t)TermWin.saveLines; switch (mode) { case 0: /* erase to end of screen */ selection_check (1); scr_erase_line (0); row = screen.cur.row + 1; /* possible OOB */ num = TermWin.nrow - row; break; case 1: /* erase to beginning of screen */ selection_check (3); scr_erase_line (1); row = 0; num = screen.cur.row; break; case 2: /* erase whole screen */ selection_check (3); #ifdef RXVT_GRAPHICS Gr_ClearScreen (); #endif row = 0; num = TermWin.nrow; break; default: return; } refresh_type |= REFRESH_BOUNDS; if (selection.op && current_screen == selection.screen && ((selection.beg.row >= row && selection.beg.row <= row + num) || (selection.end.row >= row && selection.end.row <= row + num))) CLEAR_SELECTION (); if (row >= TermWin.nrow) /* Out Of Bounds */ return; MIN_IT(num, (TermWin.nrow - row)); if (rstyle & (RS_RVid | RS_Uline)) ren = (rend_t) ~RS_None; else if (GET_BASEBG(rstyle) == Color_bg) { ren = DEFAULT_RSTYLE; CLEAR_ROWS(row, num); } else { ren = (rstyle & (RS_fgMask | RS_bgMask)); gcvalue.foreground = PixColors[GET_BGCOLOR(rstyle)]; XChangeGC(Xdisplay, TermWin.gc, GCForeground, &gcvalue); ERASE_ROWS(row, num); gcvalue.foreground = PixColors[Color_fg]; XChangeGC(Xdisplay, TermWin.gc, GCForeground, &gcvalue); } for (; num--; row++) { scr_blank_screen_mem (screen.text, screen.rend, (unsigned int)(row + row_offset), rstyle); screen.tlen[row + row_offset] = 0; scr_blank_line (drawn_text[row], drawn_rend[row], (unsigned int)TermWin.ncol, ren); } } /* ------------------------------------------------------------------------- */ /* * Fill the screen with `E's * XTERM_SEQ: Screen Alignment Test: ESC # 8 */ void rxvt_term::scr_E () { int i, j, k; rend_t *r1, fs; want_refresh = 1; num_scr_allow = 0; ZERO_SCROLLBACK(); selection_check (3); fs = SET_FONT (rstyle, TermWin.fontset->find_font ('E')); for (k = TermWin.saveLines, i = TermWin.nrow; i--; k++) { screen.tlen[k] = TermWin.ncol; /* make the `E's selectable */ fill_text (screen.text[k], 'E', TermWin.ncol); for (r1 = screen.rend[k], j = TermWin.ncol; j--; ) *r1++ = fs; } } /* ------------------------------------------------------------------------- */ /* * Insert/Delete lines */ void rxvt_term::scr_insdel_lines (int count, int insdel) { int end; ZERO_SCROLLBACK(); #ifdef RXVT_GRAPHICS if (Gr_Displayed ()) Gr_scroll (0); #endif selection_check (1); if (screen.cur.row > screen.bscroll) return; end = screen.bscroll - screen.cur.row + 1; if (count > end) { if (insdel == DELETE) return; else if (insdel == INSERT) count = end; } screen.flags &= ~Screen_WrapNext; scr_scroll_text(screen.cur.row, screen.bscroll, insdel * count, 0); } /* ------------------------------------------------------------------------- */ /* * Insert/Delete characters from the current position */ void rxvt_term::scr_insdel_chars (int count, int insdel) { int col, row; rend_t tr; text_t *stp; rend_t *srp; int16_t *slp; want_refresh = 1; ZERO_SCROLLBACK(); #ifdef RXVT_GRAPHICS if (Gr_Displayed ()) Gr_scroll (0); #endif if (count <= 0) return; selection_check (1); MIN_IT(count, (TermWin.ncol - screen.cur.col)); row = screen.cur.row + TermWin.saveLines; screen.flags &= ~Screen_WrapNext; stp = screen.text[row]; srp = screen.rend[row]; slp = &(screen.tlen[row]); switch (insdel) { case INSERT: for (col = TermWin.ncol - 1; (col - count) >= screen.cur.col; col--) { stp[col] = stp[col - count]; srp[col] = srp[col - count]; } if (*slp != -1) { *slp += count; MIN_IT(*slp, TermWin.ncol); } if (selection.op && current_screen == selection.screen && ROWCOL_IN_ROW_AT_OR_AFTER(selection.beg, screen.cur)) { if (selection.end.row != screen.cur.row || (selection.end.col + count >= TermWin.ncol)) CLEAR_SELECTION(); else { /* shift selection */ selection.beg.col += count; selection.mark.col += count; /* XXX: yes? */ selection.end.col += count; } } scr_blank_line (&(stp[screen.cur.col]), &(srp[screen.cur.col]), (unsigned int)count, rstyle); break; case ERASE: screen.cur.col += count; /* don't worry if > TermWin.ncol */ selection_check (1); screen.cur.col -= count; scr_blank_line (&(stp[screen.cur.col]), &(srp[screen.cur.col]), (unsigned int)count, rstyle); break; case DELETE: tr = srp[TermWin.ncol - 1] & (RS_fgMask | RS_bgMask | RS_baseattrMask); for (col = screen.cur.col; (col + count) < TermWin.ncol; col++) { stp[col] = stp[col + count]; srp[col] = srp[col + count]; } scr_blank_line (&(stp[TermWin.ncol - count]), &(srp[TermWin.ncol - count]), (unsigned int)count, tr); if (*slp == -1) /* break line continuation */ *slp = TermWin.ncol; *slp -= count; MAX_IT(*slp, 0); if (selection.op && current_screen == selection.screen && ROWCOL_IN_ROW_AT_OR_AFTER(selection.beg, screen.cur)) { if (selection.end.row != screen.cur.row || (screen.cur.col >= selection.beg.col - count) || selection.end.col >= TermWin.ncol) CLEAR_SELECTION(); else { /* shift selection */ selection.beg.col -= count; selection.mark.col -= count; /* XXX: yes? */ selection.end.col -= count; } } break; } } /* ------------------------------------------------------------------------- */ /* * Set the scrolling region * XTERM_SEQ: Set region - inclusive: ESC [ ; r */ void rxvt_term::scr_scroll_region (int top, int bot) { MAX_IT(top, 0); MIN_IT(bot, (int)TermWin.nrow - 1); if (top > bot) return; screen.tscroll = top; screen.bscroll = bot; scr_gotorc (0, 0, 0); } /* ------------------------------------------------------------------------- */ /* * Make the cursor visible/invisible * XTERM_SEQ: Make cursor visible : ESC [ ? 25 h * XTERM_SEQ: Make cursor invisible: ESC [ ? 25 l */ void rxvt_term::scr_cursor_visible (int mode) { want_refresh = 1; if (mode) screen.flags |= Screen_VisibleCursor; else screen.flags &= ~Screen_VisibleCursor; } /* ------------------------------------------------------------------------- */ /* * Set/unset automatic wrapping * XTERM_SEQ: Set Wraparound : ESC [ ? 7 h * XTERM_SEQ: Unset Wraparound: ESC [ ? 7 l */ void rxvt_term::scr_autowrap (int mode) { if (mode) screen.flags |= Screen_Autowrap; else screen.flags &= ~(Screen_Autowrap | Screen_WrapNext); } /* ------------------------------------------------------------------------- */ /* * Set/unset margin origin mode * Absolute mode: line numbers are counted relative to top margin of screen * and the cursor can be moved outside the scrolling region. * Relative mode: line numbers are relative to top margin of scrolling region * and the cursor cannot be moved outside. * XTERM_SEQ: Set Absolute: ESC [ ? 6 h * XTERM_SEQ: Set Relative: ESC [ ? 6 l */ void rxvt_term::scr_relative_origin (int mode) { if (mode) screen.flags |= Screen_Relative; else screen.flags &= ~Screen_Relative; scr_gotorc (0, 0, 0); } /* ------------------------------------------------------------------------- */ /* * Set insert/replace mode * XTERM_SEQ: Set Insert mode : ESC [ ? 4 h * XTERM_SEQ: Set Replace mode: ESC [ ? 4 l */ void rxvt_term::scr_insert_mode (int mode) { if (mode) screen.flags |= Screen_Insert; else screen.flags &= ~Screen_Insert; } /* ------------------------------------------------------------------------- */ /* * Set/Unset tabs * XTERM_SEQ: Set tab at current column : ESC H * XTERM_SEQ: Clear tab at current column: ESC [ 0 g * XTERM_SEQ: Clear all tabs : ESC [ 3 g */ void rxvt_term::scr_set_tab (int mode) { if (mode < 0) MEMSET(tabs, 0, TermWin.ncol * sizeof(char)); else if (screen.cur.col < TermWin.ncol) tabs[screen.cur.col] = (mode ? 1 : 0); } /* ------------------------------------------------------------------------- */ /* * Set reverse/normal video * XTERM_SEQ: Reverse video: ESC [ ? 5 h * XTERM_SEQ: Normal video : ESC [ ? 5 l */ void rxvt_term::scr_rvideo_mode (int mode) { XGCValues gcvalue; if (rvideo != mode) { rvideo = mode; SWAP_IT(PixColors[Color_fg], PixColors[Color_bg], rxvt_color); #if defined(XPM_BACKGROUND) if (bgPixmap.pixmap == None) #endif #if defined(TRANSPARENT) if (!(Options & Opt_transparent) || am_transparent == 0) #endif XSetWindowBackground(Xdisplay, TermWin.vt, PixColors[Color_bg]); gcvalue.foreground = PixColors[Color_fg]; gcvalue.background = PixColors[Color_bg]; XChangeGC(Xdisplay, TermWin.gc, GCBackground | GCForeground, &gcvalue); scr_clear (); scr_touch (true); } } /* ------------------------------------------------------------------------- */ /* * Report current cursor position * XTERM_SEQ: Report position: ESC [ 6 n */ void rxvt_term::scr_report_position () { tt_printf("\033[%d;%dR", screen.cur.row + 1, screen.cur.col + 1); } /* ------------------------------------------------------------------------- * * FONTS * * ------------------------------------------------------------------------- */ /* * Set font style */ void rxvt_term::set_font_style () { switch (charsets[screen.charset]) { case '0': /* DEC Special Character & Line Drawing Set */ break; case 'A': /* United Kingdom (UK) */ break; case 'B': /* United States (USASCII) */ break; case '<': /* Multinational character set */ break; case '5': /* Finnish character set */ break; case 'C': /* Finnish character set */ break; case 'K': /* German character set */ break; } } /* ------------------------------------------------------------------------- */ /* * Choose a font * XTERM_SEQ: Invoke G0 character set: CTRL-O * XTERM_SEQ: Invoke G1 character set: CTRL-N * XTERM_SEQ: Invoke G2 character set: ESC N * XTERM_SEQ: Invoke G3 character set: ESC O */ void rxvt_term::scr_charset_choose (int set) { screen.charset = set; set_font_style (); } /* ------------------------------------------------------------------------- */ /* * Set a font * XTERM_SEQ: Set G0 character set: ESC ( * XTERM_SEQ: Set G1 character set: ESC ) * XTERM_SEQ: Set G2 character set: ESC * * XTERM_SEQ: Set G3 character set: ESC + * See set_font_style for possible values for */ void rxvt_term::scr_charset_set (int set, unsigned int ch) { charsets[set] = (unsigned char)ch; set_font_style (); } /* ------------------------------------------------------------------------- * * MAJOR SCREEN MANIPULATION * * ------------------------------------------------------------------------- */ /* * refresh matching text. */ bool rxvt_term::scr_refresh_rend (rend_t mask, rend_t value) { bool found = false; for (int i = 0; i < TermWin.nrow; i++) { int col = 0; rend_t *drp = drawn_rend [i]; for (; col < TermWin.ncol; col++, drp++) if ((*drp & mask) == value) { found = true; *drp = ~value; } } return found; } /* * Refresh an area */ enum { PART_BEG = 0, PART_END, RC_COUNT }; void rxvt_term::scr_expose (int x, int y, int width, int height, bool refresh) { int i; row_col_t rc[RC_COUNT]; if (drawn_text == NULL) /* sanity check */ return; #ifdef DEBUG_STRICT x = max(x, (int)TermWin.int_bwidth); x = min(x, (int)TermWin.width); y = max(y, (int)TermWin.int_bwidth); y = min(y, (int)TermWin.height); #endif /* round down */ rc[PART_BEG].col = Pixel2Col(x); rc[PART_BEG].row = Pixel2Row(y); /* round up */ rc[PART_END].col = Pixel2Width(x + width + TermWin.fwidth - 1); rc[PART_END].row = Pixel2Row(y + height + TermWin.fheight - 1); /* sanity checks */ for (i = PART_BEG; i < RC_COUNT; i++) { MIN_IT(rc[i].col, TermWin.ncol - 1); MIN_IT(rc[i].row, TermWin.nrow - 1); } D_SCREEN((stderr, "rxvt_scr_expose(x:%d, y:%d, w:%d, h:%d) area (c:%d,r:%d)-(c:%d,r:%d)", x, y, width, height, rc[PART_BEG].col, rc[PART_BEG].row, rc[PART_END].col, rc[PART_END].row)); for (i = rc[PART_BEG].row; i <= rc[PART_END].row; i++) fill_text (&(drawn_text[i][rc[PART_BEG].col]), 0, (rc[PART_END].col - rc[PART_BEG].col + 1)); if (refresh) scr_refresh (SLOW_REFRESH | REFRESH_BOUNDS); } /* ------------------------------------------------------------------------- */ /* * Refresh the entire screen */ void rxvt_term::scr_touch (bool refresh) { scr_expose (0, 0, TermWin.width, TermWin.height, refresh); } /* ------------------------------------------------------------------------- */ /* * Move the display so that the line represented by scrollbar value Y is at * the top of the screen */ int rxvt_term::scr_move_to (int y, int len) { long p = 0; uint16_t oldviewstart; oldviewstart = TermWin.view_start; if (y < len) { p = (TermWin.nrow + TermWin.nscrolled) * (len - y) / len; p -= (long)(TermWin.nrow - 1); p = max(p, 0); } TermWin.view_start = (uint16_t)min(p, TermWin.nscrolled); D_SCREEN((stderr, "rxvt_scr_move_to(%d, %d) view_start:%d", y, len, TermWin.view_start)); return scr_changeview (oldviewstart); } /* ------------------------------------------------------------------------- */ /* * Page the screen up/down nlines * direction should be UP or DN */ int rxvt_term::scr_page (enum page_dirn direction, int nlines) { int n; uint16_t oldviewstart; D_SCREEN((stderr, "rxvt_scr_page(%s, %d) view_start:%d", ((direction == UP) ? "UP" : "DN"), nlines, TermWin.view_start)); #ifdef DEBUG_STRICT assert((nlines >= 0) && (nlines <= TermWin.nrow)); #endif oldviewstart = TermWin.view_start; if (direction == UP) { n = TermWin.view_start + nlines; TermWin.view_start = min(n, TermWin.nscrolled); } else { n = TermWin.view_start - nlines; TermWin.view_start = max(n, 0); } return scr_changeview (oldviewstart); } int rxvt_term::scr_changeview (uint16_t oldviewstart) { if (TermWin.view_start != oldviewstart) { want_refresh = 1; #ifdef RXVT_GRAPHICS if (Gr_Displayed ()) Gr_scroll (0); #endif num_scr -= (TermWin.view_start - oldviewstart); } return (int)(TermWin.view_start - oldviewstart); } /* ------------------------------------------------------------------------- */ void rxvt_term::scr_bell () { #ifndef NO_BELL # ifndef NO_MAPALERT # ifdef MAPALERT_OPTION if (Options & Opt_mapAlert) # endif XMapWindow(Xdisplay, TermWin.parent[0]); # endif if (Options & Opt_visualBell) { scr_rvideo_mode (!rvideo); /* refresh also done */ scr_rvideo_mode (!rvideo); /* refresh also done */ } else XBell(Xdisplay, 0); #endif } /* ------------------------------------------------------------------------- */ /* ARGSUSED */ void rxvt_term::scr_printscreen (int fullhist) { #ifdef PRINTPIPE int i, r1, nrows, row_offset; text_t *t; FILE *fd; if ((fd = popen_printer ()) == NULL) return; nrows = TermWin.nrow; row_offset = TermWin.saveLines; if (!fullhist) row_offset -= TermWin.view_start; else { nrows += TermWin.nscrolled; row_offset -= TermWin.nscrolled; } for (r1 = 0; r1 < nrows; r1++) { t = screen.text[r1 + row_offset]; for (i = TermWin.ncol - 1; i >= 0; i--) if (!isspace(t[i])) break; fprintf(fd, "%.*s\n", (i + 1), t); } pclose_printer (fd); #endif } /* ------------------------------------------------------------------------- */ /* * Refresh the screen * drawn_text/drawn_rend contain the screen information before the update. * screen.text/screen.rend contain what the screen will change to. */ #define FONT_WIDTH(X, Y) \ (X)->per_char[(Y) - (X)->min_char_or_byte2].width #define FONT_RBEAR(X, Y) \ (X)->per_char[(Y) - (X)->min_char_or_byte2].rbearing #define FONT_LBEAR(X, Y) \ (X)->per_char[(Y) - (X)->min_char_or_byte2].lbearing #define IS_FONT_CHAR(X, Y) \ ((Y) >= (X)->min_char_or_byte2 && (Y) <= (X)->max_char_or_byte2) void rxvt_term::scr_refresh (unsigned char refresh_type) { unsigned char clearfirst, /* first character writes before cell */ clearlast, /* last character writes beyond cell */ must_clear, /* use draw_string not draw_image_string */ rvid, /* reverse video this position */ showcursor; /* show the cursor */ int16_t col, row, /* column/row we're processing */ ocrow; /* old cursor row */ int cursorwidth; int i, /* tmp */ row_offset; /* basic offset in screen structure */ #ifndef NO_CURSORCOLOR rend_t cc1; /* store colours at cursor position(s) */ #endif rend_t *drp, *srp; /* drawn-rend-pointer, screen-rend-pointer */ text_t *dtp, *stp; /* drawn-text-pointer, screen-text-pointer */ if (refresh_type == NO_REFRESH || !TermWin.mapped) return; /* * A: set up vars */ clearfirst = clearlast = must_clear = 0; refresh_count = 0; row_offset = TermWin.saveLines - TermWin.view_start; if ((refresh_type & REFRESH_BOUNDS)) { clearfirst = clearlast = 1; refresh_type &= ~REFRESH_BOUNDS; } #ifdef XPM_BACKGROUND must_clear |= (bgPixmap.pixmap != None); #endif #ifdef TRANSPARENT must_clear |= ((Options & Opt_transparent) && am_transparent); #endif ocrow = oldcursor.row; /* is there an old outline cursor on screen? */ /* * B: reverse any characters which are selected */ scr_reverse_selection (); /* * C: set the cursor character(s) */ { unsigned char setoldcursor; rend_t ccol1, /* Cursor colour */ ccol2; /* Cursor colour2 */ showcursor = (screen.flags & Screen_VisibleCursor); cursorwidth = 0; #ifdef CURSOR_BLINK if (hidden_cursor) showcursor = 0; #endif cursorwidth = 0; if (showcursor) { cursorwidth++; srp = &(screen.rend[screen.cur.row + TermWin.saveLines] [screen.cur.col]); if (showcursor && TermWin.focus) { *srp ^= RS_RVid; #ifndef NO_CURSORCOLOR cc1 = *srp & (RS_fgMask | RS_bgMask); if (ISSET_PIXCOLOR (Color_cursor)) ccol1 = Color_cursor; else #ifdef CURSOR_COLOR_IS_RENDITION_COLOR ccol1 = GET_FGCOLOR(rstyle); #else ccol1 = Color_fg; #endif if (ISSET_PIXCOLOR (Color_cursor2)) ccol2 = Color_cursor2; else #ifdef CURSOR_COLOR_IS_RENDITION_COLOR ccol2 = GET_BGCOLOR(rstyle); #else ccol2 = Color_bg; #endif *srp = SET_FGCOLOR(*srp, ccol1); *srp = SET_BGCOLOR(*srp, ccol2); #endif } } /* make sure no outline cursor is left around */ setoldcursor = 0; if (ocrow != -1) { if (screen.cur.row + TermWin.view_start != ocrow || screen.cur.col != oldcursor.col) { if (ocrow < TermWin.nrow && oldcursor.col < TermWin.ncol) { drawn_rend[ocrow][oldcursor.col] ^= (RS_RVid | RS_Uline); } if (TermWin.focus || !showcursor) oldcursor.row = -1; else setoldcursor = 1; } } else if (!TermWin.focus) setoldcursor = 1; if (setoldcursor) { if (screen.cur.row + TermWin.view_start >= TermWin.nrow) oldcursor.row = -1; else { oldcursor.row = screen.cur.row + TermWin.view_start; oldcursor.col = screen.cur.col; } } } #ifndef NO_SLOW_LINK_SUPPORT /* * D: CopyArea pass - very useful for slower links * This has been deliberately kept simple. */ i = num_scr; if (refresh_type == FAST_REFRESH && num_scr_allow && i && abs(i) < TermWin.nrow && !must_clear) { int16_t nits; int j; rend_t *drp2; text_t *dtp2; int len, wlen; j = TermWin.nrow; wlen = len = -1; row = i > 0 ? 0 : j - 1; for (; j-- >= 0; row += (i > 0 ? 1 : -1)) { if (row + i >= 0 && row + i < TermWin.nrow && row + i != ocrow) { stp = screen.text[row + row_offset]; srp = screen.rend[row + row_offset]; dtp = drawn_text[row]; dtp2 = drawn_text[row + i]; drp = drawn_rend[row]; drp2 = drawn_rend[row + i]; for (nits = 0, col = TermWin.ncol; col--; ) if (stp[col] != dtp2[col] || srp[col] != drp2[col]) nits--; else if (stp[col] != dtp[col] || srp[col] != drp[col]) nits++; if (nits > 8) /* XXX: arbitrary choice */ { for (col = TermWin.ncol; col--; ) { *dtp++ = *dtp2++; *drp++ = *drp2++; } if (len == -1) len = row; wlen = row; continue; } } if (len != -1) { /* also comes here at end if needed because of >= above */ if (wlen < len) SWAP_IT(wlen, len, int); D_SCREEN((stderr, "rxvt_scr_refresh(): XCopyArea: %d -> %d (height: %d)", len + i, len, wlen - len + 1)); XCopyArea (Xdisplay, TermWin.vt, TermWin.vt, TermWin.gc, 0, Row2Pixel (len + i), (unsigned int)TermWin_TotalWidth (), (unsigned int)Height2Pixel (wlen - len + 1), 0, Row2Pixel (len)); len = -1; } } } #endif /* * E: main pass across every character */ for (row = 0; row < TermWin.nrow; row++) { stp = screen.text[row + row_offset]; srp = screen.rend[row + row_offset]; dtp = drawn_text[row]; drp = drawn_rend[row]; /* * E2: OK, now the real pass */ int ypixel = (int)Row2Pixel(row); for (col = 0; col < TermWin.ncol; col++) { /* compare new text with old - if exactly the same then continue */ rend_t rend = srp[col]; /* screen rendition (target rendtion) */ if (stp[col] == dtp[col] /* Must match characters to skip. */ && (rend == drp[col] /* Either rendition the same or */ || (stp[col] == ' ' /* space w/ no background change */ && GET_BGATTR(rend) == GET_BGATTR(drp[col])))) continue; text_t *text = stp + col; int count = 1; /* redraw one or more characters */ dtp[col] = stp[col]; drp[col] = rend; if (*text == NOCHAR) // never start redrawing at invisible characters. */ continue; int xpixel = Col2Pixel(col); // this loop looks very messy, it can probably be optimized // and cleaned a bit by you? for (i = 0; ++col < TermWin.ncol; ) { if (stp[col] == NOCHAR) { dtp[col] = stp[col]; drp[col] = rend; count++; if (i) // only possible skip if char unchanged i++; continue; } if (rend != srp[col]) break; count++; if (stp[col] != dtp[col] || srp[col] != drp[col]) { if (must_clear && (i++ > (count / 2))) break; dtp[col] = stp[col]; drp[col] = rend; i = 0; } else if (must_clear || (stp[col] != ' ' && ++i >= 32)) break; } col--; /* went one too far. move back */ count -= i; /* dump any matching trailing chars */ /* * Determine the attributes for the string */ int fid = GET_FONT (rend); int fore = GET_FGCOLOR (rend); // desired foreground int back = GET_BGCOLOR (rend); // desired background rend = GET_ATTR (rend); rvid = !!(rend & RS_RVid); #ifdef TEXT_BLINK if (rend & RS_Blink) { if (!text_blink_ev.active) { text_blink_ev.start (NOW + TEXT_BLINK_INTERVAL); hidden_text = 0; } else if (hidden_text) fore = back; } #endif if (rvid) { SWAP_IT(fore, back, int); #ifndef NO_BOLD_UNDERLINE_REVERSE if (ISSET_PIXCOLOR (Color_RV) # ifndef NO_CURSORCOLOR && !ISSET_PIXCOLOR (Color_cursor) # endif ) back = Color_RV; #endif } #ifndef NO_BOLD_UNDERLINE_REVERSE else if (rend & RS_Bold) { if (ISSET_PIXCOLOR (Color_BD)) fore = Color_BD; else if (fore == Color_fg) fore = Color_White; } else if (rend & RS_Uline) { if (ISSET_PIXCOLOR (Color_UL)) fore = Color_UL; } #endif /* * Actually do the drawing of the string here */ rxvt_font *font = (*TermWin.fontset)[fid]; if (back == Color_bg) { if (must_clear) { CLEAR_CHARS (xpixel, ypixel, count); for (i = 0; i < count; i++) /* don't draw empty strings */ if (text[i] != ' ') { font->draw (xpixel, ypixel, text, count, fore, -1); break; } } else font->draw (xpixel, ypixel, text, count, fore, Color_bg); } else font->draw (xpixel, ypixel, text, count, fore, back); if ((rend & RS_Uline) && (font->descent > 1)) XDrawLine(Xdisplay, drawBuffer, TermWin.gc, xpixel, ypixel + font->ascent + 1, xpixel + Width2Pixel(count) - 1, ypixel + font->ascent + 1); } /* for (col....) */ } /* for (row....) */ /* * G: cleanup cursor and display outline cursor if necessary */ if (showcursor) { if (TermWin.focus) { srp = &(screen.rend[screen.cur.row + TermWin.saveLines] [screen.cur.col]); *srp ^= RS_RVid; #ifndef NO_CURSORCOLOR *srp = (*srp & ~(RS_fgMask | RS_bgMask)) | cc1; #endif } else if (oldcursor.row >= 0) { #ifndef NO_CURSORCOLOR if (ISSET_PIXCOLOR (Color_cursor)) XSetForeground (Xdisplay, TermWin.gc, PixColors[Color_cursor]); #endif XDrawRectangle(Xdisplay, drawBuffer, TermWin.gc, Col2Pixel(oldcursor.col), Row2Pixel(oldcursor.row), (unsigned int)(Width2Pixel(cursorwidth) - 1), (unsigned int)(Height2Pixel(1) - TermWin.lineSpace - 1)); } } /* * H: cleanup selection */ scr_reverse_selection (); /* * I: other general cleanup */ if (clearfirst && TermWin.int_bwidth) /* * clear the whole screen height, note that width == 0 is treated * specially by XClearArea */ XClearArea(Xdisplay, TermWin.vt, 0, 0, (unsigned int)TermWin.int_bwidth, (unsigned int)TermWin_TotalHeight(), False); if (clearlast && TermWin.int_bwidth) /* * clear the whole screen height, note that width == 0 is treated * specially by XClearArea */ XClearArea(Xdisplay, TermWin.vt, TermWin.width + TermWin.int_bwidth, 0, (unsigned int)TermWin.int_bwidth, (unsigned int)TermWin_TotalHeight(), False); if (refresh_type & SMOOTH_REFRESH) XSync(Xdisplay, False); num_scr = 0; num_scr_allow = 1; want_refresh = 0; /* screen is current */ } /* ------------------------------------------------------------------------- */ void rxvt_term::scr_clear() { if (!TermWin.mapped) return; num_scr_allow = 0; want_refresh = 1; #ifdef TRANSPARENT if ((Options & Opt_transparent) && (am_pixmap_trans == 0)) { int i; if (!(Options & Opt_transparent_all)) i = 0; else i = (int)(sizeof(TermWin.parent) / sizeof(Window)); while (i--) if (TermWin.parent[i] != None) XClearWindow(Xdisplay, TermWin.parent[i]); } #endif XClearWindow (Xdisplay, TermWin.vt); } /* ------------------------------------------------------------------------- */ void rxvt_term::scr_reverse_selection () { int i, col, row, end_row; rend_t *srp; if (selection.op && current_screen == selection.screen) { end_row = TermWin.saveLines - TermWin.view_start; i = selection.beg.row + TermWin.saveLines; row = selection.end.row + TermWin.saveLines; if (i >= end_row) col = selection.beg.col; else { col = 0; i = end_row; } end_row += TermWin.nrow; for (; i < row && i < end_row; i++, col = 0) for (srp = screen.rend[i]; col < TermWin.ncol; col++) srp[col] ^= RS_RVid; if (i == row && i < end_row) for (srp = screen.rend[i]; col < selection.end.col; col++) srp[col] ^= RS_RVid; } } /* ------------------------------------------------------------------------- */ /* * Dump the whole scrollback and screen to the passed filedescriptor. The * invoking routine must close the fd. */ #if 0 void rxvt_term::scr_dump (int fd) { int row, wrote; unsigned int width, towrite; char r1[] = "\n"; for (row = TermWin.saveLines - TermWin.nscrolled; row < TermWin.saveLines + TermWin.nrow - 1; row++) { width = screen.tlen[row] >= 0 ? screen.tlen[row] : TermWin.ncol; for (towrite = width; towrite; towrite -= wrote) { wrote = write(fd, &(screen.text[row][width - towrite]), towrite); if (wrote < 0) return; /* XXX: death, no report */ } if (screen.tlen[row] >= 0) if (write(fd, r1, 1) <= 0) return; /* XXX: death, no report */ } } #endif /* ------------------------------------------------------------------------- * * CHARACTER SELECTION * * ------------------------------------------------------------------------- */ /* * -TermWin.nscrolled <= (selection row) <= TermWin.nrow - 1 */ void rxvt_term::selection_check (int check_more) { row_col_t pos; if (!selection.op) return; pos.row = pos.col = 0; if ((selection.beg.row < -(int32_t)TermWin.nscrolled) || (selection.beg.row >= TermWin.nrow) || (selection.mark.row < -(int32_t)TermWin.nscrolled) || (selection.mark.row >= TermWin.nrow) || (selection.end.row < -(int32_t)TermWin.nscrolled) || (selection.end.row >= TermWin.nrow) || (check_more == 1 && current_screen == selection.screen && !ROWCOL_IS_BEFORE(screen.cur, selection.beg) && ROWCOL_IS_BEFORE(screen.cur, selection.end)) || (check_more == 2 && ROWCOL_IS_BEFORE(selection.beg, pos) && ROWCOL_IS_AFTER(selection.end, pos)) || (check_more == 3 && ROWCOL_IS_AFTER(selection.end, pos)) || (check_more == 4 /* screen width change */ && (selection.beg.row != selection.end.row || selection.end.col > TermWin.ncol))) CLEAR_SELECTION(); } /* ------------------------------------------------------------------------- */ /* * Paste a selection direct to the command fd */ void rxvt_term::paste (const unsigned char *data, unsigned int len) { unsigned int i, j, n; unsigned char *ds = (unsigned char *)rxvt_malloc (PROP_SIZE); #if 0 /* a paste should act like the user is typing, so check scrollTtyKeypress */ ZERO_SCROLLBACK (r); #endif /* convert normal newline chars into common keyboard Return key sequence */ for (i = 0; i < len; i += PROP_SIZE) { n = min (len - i, PROP_SIZE); MEMCPY (ds, data + i, n); for (j = 0; j < n; j++) if (ds[j] == '\n') ds[j] = '\r'; tt_write (ds, (int)n); } free(ds); } /* ------------------------------------------------------------------------- */ /* * Respond to a notification that a primary selection has been sent * EXT: SelectionNotify */ int rxvt_term::selection_paste (Window win, Atom prop, bool delete_prop) { long nread = 0; unsigned long bytes_after; XTextProperty ct; D_SELECT((stderr, "rxvt_selection_paste(%08lx, %lu, %d), wait=%2x", win, (unsigned long)prop, (int)delete_prop, selection_wait)); if (prop == None) /* check for failed XConvertSelection */ { if ((selection_type & Sel_CompoundText)) { int selnum = selection_type & Sel_whereMask; selection_type = 0; if (selnum != Sel_direct) selection_request_other (XA_STRING, selnum); } if ((selection_type & Sel_UTF8String)) { int selnum = selection_type & Sel_whereMask; selection_type = Sel_CompoundText; if (selnum != Sel_direct) selection_request_other (xa[XA_COMPOUND_TEXT], selnum); else selection_type = 0; } return 0; } for (;;) { if (XGetWindowProperty(Xdisplay, win, prop, (long)(nread / 4), (long)(PROP_SIZE / 4), delete_prop, AnyPropertyType, &ct.encoding, &ct.format, &ct.nitems, &bytes_after, &ct.value) != Success) break; if (ct.encoding == 0) { D_SELECT((stderr, "rxvt_selection_paste: property didn't exist!")); break; } if (ct.value == NULL) { D_SELECT((stderr, "rxvt_selection_paste: property shooting blanks!")); continue; } if (ct.nitems == 0) { D_SELECT((stderr, "rxvt_selection_paste: property empty - also INCR end")); if (selection_wait == Sel_normal && nread == 0) { /* * pass through again trying CUT_BUFFER0 if we've come from * XConvertSelection() but nothing was presented */ D_SELECT((stderr, "rxvt_selection_request: pasting CUT_BUFFER0")); selection_paste (Xroot, XA_CUT_BUFFER0, False); } nread = -1; /* discount any previous stuff */ break; } nread += ct.nitems; char **cl; int cr; if (XmbTextPropertyToTextList (Xdisplay, &ct, &cl, &cr) >= 0 && cl) { for (int i = 0; i < cr; i++) paste ((unsigned char *)cl[i], STRLEN (cl[i])); XFreeStringList (cl); } else paste (ct.value, ct.nitems); if (bytes_after == 0) break; XFree (ct.value); } if (ct.value) XFree (ct.value); if (selection_wait == Sel_normal) selection_wait = Sel_none; D_SELECT((stderr, "rxvt_selection_paste: bytes written: %ld", nread)); return (int)nread; } void rxvt_term::incr_cb (time_watcher &w) { selection_wait = Sel_none; rxvt_print_error ("data loss: timeout on INCR selection paste"); } /* * INCR support originally provided by Paul Sheer */ void rxvt_term::selection_property (Window win, Atom prop) { int reget_time = 0; if (prop == None) return; D_SELECT((stderr, "rxvt_selection_property(%08lx, %lu)", win, (unsigned long)prop)); if (selection_wait == Sel_normal) { int a, afmt; Atom atype; unsigned long bytes_after, nitems; unsigned char *s = NULL; a = XGetWindowProperty(Xdisplay, win, prop, 0L, 1L, False, xa[XA_INCR], &atype, &afmt, &nitems, &bytes_after, &s); if (s) XFree(s); if (a != Success) return; #ifndef __CYGWIN32__ if (atype == xa[XA_INCR]) { /* start an INCR transfer */ D_SELECT((stderr, "rxvt_selection_property: INCR: starting transfer")); XDeleteProperty(Xdisplay, win, prop); XFlush(Xdisplay); reget_time = 1; selection_wait = Sel_incr; } #endif } else if (selection_wait == Sel_incr) { reget_time = 1; if (selection_paste (win, prop, True) == -1) { D_SELECT((stderr, "rxvt_selection_property: INCR: clean end")); selection_wait = Sel_none; incr_ev.stop (); } } if (reget_time) /* received more data so reget time */ incr_ev.start (NOW + 10); } /* ------------------------------------------------------------------------- */ /* * Request the current selection: * Order: > internal selection if available * > PRIMARY, SECONDARY, CLIPBOARD if ownership is claimed (+) * > CUT_BUFFER0 * (+) if ownership is claimed but property is empty, rxvt_selection_paste() * will auto fallback to CUT_BUFFER0 * EXT: button 2 release */ void rxvt_term::selection_request (Time tm, int x, int y) { D_SELECT((stderr, "rxvt_selection_request(%lu, %d, %d)", tm, x, y)); if (x < 0 || x >= TermWin.width || y < 0 || y >= TermWin.height) return; /* outside window */ if (selection.text != NULL) { /* internal selection */ D_SELECT((stderr, "rxvt_selection_request: pasting internal")); paste (selection.text, selection.len); return; } else { int i; selection_request_time = tm; selection_wait = Sel_normal; for (i = Sel_Primary; i <= Sel_Clipboard; i++) { #if X_HAVE_UTF8_STRING selection_type = Sel_UTF8String; if (selection_request_other (xa[XA_UTF8_STRING], i)) return; #else selection_type = Sel_CompoundText; if (selection_request_other (xa[XA_COMPOUND_TEXT], i)) return; #endif } } selection_wait = Sel_none; /* don't loop in rxvt_selection_paste() */ D_SELECT((stderr, "rxvt_selection_request: pasting CUT_BUFFER0")); selection_paste (Xroot, XA_CUT_BUFFER0, False); } int rxvt_term::selection_request_other (Atom target, int selnum) { Atom sel; #ifdef DEBUG_SELECT char *debug_xa_names[] = { "PRIMARY", "SECONDARY", "CLIPBOARD" }; #endif selection_type |= selnum; if (selnum == Sel_Primary) sel = XA_PRIMARY; else if (selnum == Sel_Secondary) sel = XA_SECONDARY; else sel = xa[XA_CLIPBOARD]; if (XGetSelectionOwner(Xdisplay, sel) != None) { D_SELECT((stderr, "rxvt_selection_request_other: pasting %s", debug_xa_names[selnum])); XConvertSelection(Xdisplay, sel, target, xa[XA_VT_SELECTION], TermWin.vt, selection_request_time); return 1; } return 0; } /* ------------------------------------------------------------------------- */ /* * Clear all selected text * EXT: SelectionClear */ void rxvt_term::selection_clear () { D_SELECT((stderr, "rxvt_selection_clear()")); want_refresh = 1; if (selection.text) free(selection.text); selection.text = NULL; selection.len = 0; CLEAR_SELECTION(); } /* ------------------------------------------------------------------------- */ /* * Copy a selection into the cut buffer * EXT: button 1 or 3 release */ void rxvt_term::selection_make (Time tm) { int i, col, end_col, row, end_row; unsigned char *new_selection_text; char *str; text_t *t; #ifdef ACS_ASCII rend_t *re; #endif D_SELECT((stderr, "rxvt_selection_make(): selection.op=%d, selection.clicks=%d", selection.op, selection.clicks)); switch (selection.op) { case SELECTION_CONT: break; case SELECTION_INIT: CLEAR_SELECTION(); /* FALLTHROUGH */ case SELECTION_BEGIN: selection.op = SELECTION_DONE; /* FALLTHROUGH */ default: return; } selection.op = SELECTION_DONE; if (selection.clicks == 4) return; /* nothing selected, go away */ i = (selection.end.row - selection.beg.row + 1) * (TermWin.ncol + 1) + 1; str = (char *)rxvt_malloc(i * MB_CUR_MAX + 1); new_selection_text = (unsigned char *)str; col = selection.beg.col; MAX_IT(col, 0); row = selection.beg.row + TermWin.saveLines; end_row = selection.end.row + TermWin.saveLines; for (; row <= end_row; row++, col = 0) { t = &(screen.text[row][col]); end_col = screen.tlen[row]; if (end_col == -1) end_col = TermWin.ncol; if (row == end_row) MIN_IT (end_col, selection.end.col); for (; col < end_col; col++) if (*t == NOCHAR) t++; else { int len = wctomb (str, *t++); if (len > 0) str += len; } if (screen.tlen[row] != -1 && row != end_row) *str++ = '\n'; } #ifndef NO_OLD_SELECTION if (selection_style == OLD_SELECT) if (end_col == TermWin.ncol) *str++ = '\n'; #endif #ifndef NO_NEW_SELECTION if (selection_style != OLD_SELECT) if (end_col != selection.end.col) *str++ = '\n'; #endif *str = '\0'; i = str - (char *)new_selection_text; if (i == 0) { free (new_selection_text); return; } // due to MB_MAX_CUR, selection wastage is usually high, so realloc if (str - (char *)new_selection_text > 1024) new_selection_text = (unsigned char *)rxvt_realloc (new_selection_text, i + 1); selection.len = i; if (selection.text) free (selection.text); selection.text = new_selection_text; XSetSelectionOwner(Xdisplay, XA_PRIMARY, TermWin.vt, tm); if (XGetSelectionOwner(Xdisplay, XA_PRIMARY) != TermWin.vt) rxvt_print_error("can't get primary selection"); { XTextProperty ct; char *cl = (char *)selection.text; if (XmbTextListToTextProperty(Xdisplay, &cl, 1, XStringStyle, &ct) >= 0) { XChangeProperty(Xdisplay, Xroot, XA_CUT_BUFFER0, XA_STRING, 8, PropModeReplace, ct.value, ct.nitems); XFree (ct.value); } else XChangeProperty(Xdisplay, Xroot, XA_CUT_BUFFER0, XA_STRING, 8, PropModeReplace, selection.text, (int)selection.len); } selection_time = tm; D_SELECT((stderr, "rxvt_selection_make(): selection.len=%d", selection.len)); } /* ------------------------------------------------------------------------- */ /* * Mark or select text based upon number of clicks: 1, 2, or 3 * EXT: button 1 press */ void rxvt_term::selection_click (int clicks, int x, int y) { D_SELECT((stderr, "rxvt_selection_click(%d, %d, %d)", clicks, x, y)); clicks = ((clicks - 1) % 3) + 1; selection.clicks = clicks; /* save clicks so extend will work */ selection_start_colrow (Pixel2Col(x), Pixel2Row(y)); if (clicks == 2 || clicks == 3) selection_extend_colrow (selection.mark.col, selection.mark.row + TermWin.view_start, 0, /* button 3 */ 1, /* button press */ 0); /* click change */ } /* ------------------------------------------------------------------------- */ /* * Mark a selection at the specified col/row */ void rxvt_term::selection_start_colrow (int col, int row) { want_refresh = 1; selection.mark.col = col; selection.mark.row = row - TermWin.view_start; MAX_IT(selection.mark.row, -(int32_t)TermWin.nscrolled); MIN_IT(selection.mark.row, (int32_t)TermWin.nrow - 1); MAX_IT(selection.mark.col, 0); MIN_IT(selection.mark.col, (int32_t)TermWin.ncol - 1); if (selection.op) { /* clear the old selection */ selection.beg.row = selection.end.row = selection.mark.row; selection.beg.col = selection.end.col = selection.mark.col; } selection.op = SELECTION_INIT; selection.screen = current_screen; } /* ------------------------------------------------------------------------- */ /* * Word select: select text for 2 clicks * We now only find out the boundary in one direction */ /* what do we want: spaces/tabs are delimiters or cutchars or non-cutchars */ #define DELIMIT_TEXT(x) \ (((x) == ' ' || (x) == '\t') ? 2 : (STRCHR(rs[Rs_cutchars], (x)) != NULL)) #define DELIMIT_REND(x) 1 void rxvt_term::selection_delimit_word (enum page_dirn dirn, const row_col_t *mark, row_col_t *ret) { int col, row, dirnadd, tcol, trow, w1, w2; row_col_t bound; text_t *stp; rend_t *srp; if (dirn == UP) { bound.row = TermWin.saveLines - TermWin.nscrolled - 1; bound.col = 0; dirnadd = -1; } else { bound.row = TermWin.saveLines + TermWin.nrow; bound.col = TermWin.ncol - 1; dirnadd = 1; } row = mark->row + TermWin.saveLines; col = mark->col; MAX_IT(col, 0); /* find the edge of a word */ stp = &(screen.text[row][col]); w1 = DELIMIT_TEXT(*stp); if (selection_style != NEW_SELECT) { if (w1 == 1) { stp += dirnadd; if (DELIMIT_TEXT(*stp) == 1) goto Old_Word_Selection_You_Die; col += dirnadd; } w1 = 0; } srp = (&screen.rend[row][col]); w2 = DELIMIT_REND(*srp); for (;;) { for (; col != bound.col; col += dirnadd) { stp += dirnadd; if (DELIMIT_TEXT(*stp) != w1) break; srp += dirnadd; if (DELIMIT_REND(*srp) != w2) break; } if ((col == bound.col) && (row != bound.row)) { if (screen.tlen[(row - (dirn == UP ? 1 : 0))] == -1) { trow = row + dirnadd; tcol = dirn == UP ? TermWin.ncol - 1 : 0; if (screen.text[trow] == NULL) break; stp = &(screen.text[trow][tcol]); srp = &(screen.rend[trow][tcol]); if (DELIMIT_TEXT(*stp) != w1 || DELIMIT_REND(*srp) != w2) break; row = trow; col = tcol; continue; } } break; } Old_Word_Selection_You_Die: D_SELECT((stderr, "rxvt_selection_delimit_word(%s,...) @ (r:%3d, c:%3d) has boundary (r:%3d, c:%3d)", (dirn == UP ? "up " : "down"), mark->row, mark->col, row - TermWin.saveLines, col)); if (dirn == DN) col++; /* put us on one past the end */ /* Poke the values back in */ ret->row = row - TermWin.saveLines; ret->col = col; } /* ------------------------------------------------------------------------- */ /* * Extend the selection to the specified x/y pixel location * EXT: button 3 press; button 1 or 3 drag * flag == 0 ==> button 1 * flag == 1 ==> button 3 press * flag == 2 ==> button 3 motion */ void rxvt_term::selection_extend (int x, int y, int flag) { int col, row; col = Pixel2Col(x); row = Pixel2Row(y); MAX_IT(row, 0); MIN_IT(row, (int)TermWin.nrow - 1); MAX_IT(col, 0); MIN_IT(col, (int)TermWin.ncol); #ifndef NO_NEW_SELECTION /* * If we're selecting characters (single click) then we must check first * if we are at the same place as the original mark. If we are then * select nothing. Otherwise, if we're to the right of the mark, you have to * be _past_ a character for it to be selected. */ if (selection_style != OLD_SELECT) { if (((selection.clicks % 3) == 1) && !flag && (col == selection.mark.col && (row == selection.mark.row + TermWin.view_start))) { /* select nothing */ selection.beg.row = selection.end.row = 0; selection.beg.col = selection.end.col = 0; selection.clicks = 4; want_refresh = 1; D_SELECT((stderr, "rxvt_selection_extend() selection.clicks = 4")); return; } } #endif if (selection.clicks == 4) selection.clicks = 1; selection_extend_colrow (col, row, !!flag, /* ? button 3 */ flag == 1 ? 1 : 0, /* ? button press */ 0); /* no click change */ } /* ------------------------------------------------------------------------- */ /* * Extend the selection to the specified col/row */ void rxvt_term::selection_extend_colrow (int32_t col, int32_t row, int button3, int buttonpress, int clickchange) { int16_t ncol = TermWin.ncol; int end_col; row_col_t pos; enum { LEFT, RIGHT } closeto = RIGHT; D_SELECT((stderr, "rxvt_selection_extend_colrow(c:%d, r:%d, %d, %d) clicks:%d, op:%d", col, row, button3, buttonpress, selection.clicks, selection.op)); D_SELECT((stderr, "rxvt_selection_extend_colrow() ENT b:(r:%d,c:%d) m:(r:%d,c:%d), e:(r:%d,c:%d)", selection.beg.row, selection.beg.col, selection.mark.row, selection.mark.col, selection.end.row, selection.end.col)); want_refresh = 1; switch (selection.op) { case SELECTION_INIT: CLEAR_SELECTION(); selection.op = SELECTION_BEGIN; /* FALLTHROUGH */ case SELECTION_BEGIN: if (row != selection.mark.row || col != selection.mark.col || (!button3 && buttonpress)) selection.op = SELECTION_CONT; break; case SELECTION_DONE: selection.op = SELECTION_CONT; /* FALLTHROUGH */ case SELECTION_CONT: break; case SELECTION_CLEAR: selection_start_colrow (col, row); /* FALLTHROUGH */ default: return; } if (selection.beg.col == selection.end.col && selection.beg.col != selection.mark.col && selection.beg.row == selection.end.row && selection.beg.row != selection.mark.row) { selection.beg.col = selection.end.col = selection.mark.col; selection.beg.row = selection.end.row = selection.mark.row; D_SELECT((stderr, "rxvt_selection_extend_colrow() ENT2 b:(r:%d,c:%d) m:(r:%d,c:%d), e:(r:%d,c:%d)", selection.beg.row, selection.beg.col, selection.mark.row, selection.mark.col, selection.end.row, selection.end.col)); } pos.col = col; pos.row = row; pos.row -= TermWin.view_start; /* adjust for scroll */ #ifndef NO_OLD_SELECTION /* * This mimics some of the selection behaviour of version 2.20 and before. * There are no ``selection modes'', button3 is always character extension. * Note: button3 drag is always available, c.f. v2.20 * Selection always terminates (left or right as appropriate) at the mark. */ if (selection_style == OLD_SELECT) { if (selection.clicks == 1 || button3) { if (hate_those_clicks) { hate_those_clicks = 0; if (selection.clicks == 1) { selection.beg.row = selection.mark.row; selection.beg.col = selection.mark.col; } else { selection.mark.row = selection.beg.row; selection.mark.col = selection.beg.col; } } if (ROWCOL_IS_BEFORE(pos, selection.mark)) { selection.end.row = selection.mark.row; selection.end.col = selection.mark.col + 1; selection.beg.row = pos.row; selection.beg.col = pos.col; } else { selection.beg.row = selection.mark.row; selection.beg.col = selection.mark.col; selection.end.row = pos.row; selection.end.col = pos.col + 1; } } else if (selection.clicks == 2) { selection_delimit_word (UP, &(selection.mark), &(selection.beg)); selection_delimit_word (DN, &(selection.mark), &(selection.end)); hate_those_clicks = 1; } else if (selection.clicks == 3) { selection.beg.row = selection.end.row = selection.mark.row; selection.beg.col = 0; selection.end.col = ncol; hate_those_clicks = 1; } D_SELECT((stderr, "rxvt_selection_extend_colrow() EXIT b:(r:%d,c:%d) m:(r:%d,c:%d), e:(r:%d,c:%d)", selection.beg.row, selection.beg.col, selection.mark.row, selection.mark.col, selection.end.row, selection.end.col)); return; } #endif /* ! NO_OLD_SELECTION */ #ifndef NO_NEW_SELECTION /* selection_style must not be OLD_SELECT to get here */ /* * This is mainly xterm style selection with a couple of differences, mainly * in the way button3 drag extension works. * We're either doing: button1 drag; button3 press; or button3 drag * a) button1 drag : select around a midpoint/word/line - that point/word/line * is always at the left/right edge of the selection. * b) button3 press: extend/contract character/word/line at whichever edge of * the selection we are closest to. * c) button3 drag : extend/contract character/word/line - we select around * a point/word/line which is either the start or end of the selection * and it was decided by whichever point/word/line was `fixed' at the * time of the most recent button3 press */ if (button3 && buttonpress) { /* button3 press */ /* * first determine which edge of the selection we are closest to */ if (ROWCOL_IS_BEFORE(pos, selection.beg) || (!ROWCOL_IS_AFTER(pos, selection.end) && (((pos.col - selection.beg.col) + ((pos.row - selection.beg.row) * ncol)) < ((selection.end.col - pos.col) + ((selection.end.row - pos.row) * ncol))))) closeto = LEFT; if (closeto == LEFT) { selection.beg.row = pos.row; selection.beg.col = pos.col; selection.mark.row = selection.end.row; selection.mark.col = selection.end.col - (selection.clicks == 2); } else { selection.end.row = pos.row; selection.end.col = pos.col; selection.mark.row = selection.beg.row; selection.mark.col = selection.beg.col; } } else { /* button1 drag or button3 drag */ if (ROWCOL_IS_AFTER(selection.mark, pos)) { if ((selection.mark.row == selection.end.row) && (selection.mark.col == selection.end.col) && clickchange && selection.clicks == 2) selection.mark.col--; selection.beg.row = pos.row; selection.beg.col = pos.col; selection.end.row = selection.mark.row; selection.end.col = selection.mark.col + (selection.clicks == 2); } else { selection.beg.row = selection.mark.row; selection.beg.col = selection.mark.col; selection.end.row = pos.row; selection.end.col = pos.col; } } if (selection.clicks == 1) { end_col = screen.tlen[selection.beg.row + TermWin.saveLines]; if (end_col != -1 && selection.beg.col > end_col) { #if 1 selection.beg.col = ncol; #else if (selection.beg.row != selection.end.row) selection.beg.col = ncol; else selection.beg.col = selection.mark.col; #endif } end_col = screen.tlen[selection.end.row + TermWin.saveLines]; if (end_col != -1 && selection.end.col > end_col) selection.end.col = ncol; } else if (selection.clicks == 2) { if (ROWCOL_IS_AFTER(selection.end, selection.beg)) selection.end.col--; selection_delimit_word (UP, &(selection.beg), &(selection.beg)); selection_delimit_word (DN, &(selection.end), &(selection.end)); } else if (selection.clicks == 3) { #ifndef NO_FRILLS if ((Options & Opt_tripleclickwords)) { int end_row; selection_delimit_word (UP, &(selection.beg), &(selection.beg)); end_row = screen.tlen[selection.mark.row + TermWin.saveLines]; for (end_row = selection.mark.row; end_row < TermWin.nrow; end_row++) { end_col = screen.tlen[end_row + TermWin.saveLines]; if (end_col != -1) { selection.end.row = end_row; selection.end.col = end_col; selection_remove_trailing_spaces (); break; } } } else #endif { if (ROWCOL_IS_AFTER(selection.mark, selection.beg)) selection.mark.col++; selection.beg.col = 0; selection.end.col = ncol; } } if (button3 && buttonpress) { /* mark may need to be changed */ if (closeto == LEFT) { selection.mark.row = selection.end.row; selection.mark.col = selection.end.col - (selection.clicks == 2); } else { selection.mark.row = selection.beg.row; selection.mark.col = selection.beg.col; } } D_SELECT((stderr, "rxvt_selection_extend_colrow() EXIT b:(r:%d,c:%d) m:(r:%d,c:%d), e:(r:%d,c:%d)", selection.beg.row, selection.beg.col, selection.mark.row, selection.mark.col, selection.end.row, selection.end.col)); #endif /* ! NO_NEW_SELECTION */ } #ifndef NO_FRILLS void rxvt_term::selection_remove_trailing_spaces () { int32_t end_col, end_row; text_t *stp; end_col = selection.end.col; end_row = selection.end.row; for ( ; end_row >= selection.beg.row; ) { stp = screen.text[end_row + TermWin.saveLines]; while (--end_col >= 0) { if (stp[end_col] != ' ' && stp[end_col] != '\t') break; } if (end_col >= 0 || screen.tlen[end_row - 1 + TermWin.saveLines] != -1) { selection.end.col = end_col + 1; selection.end.row = end_row; break; } end_row--; end_col = TermWin.ncol; } if (selection.mark.row > selection.end.row) { selection.mark.row = selection.end.row; selection.mark.col = selection.end.col; } else if (selection.mark.row == selection.end.row && selection.mark.col > selection.end.col) selection.mark.col = selection.end.col; } #endif /* ------------------------------------------------------------------------- */ /* * Double click on button 3 when already selected * EXT: button 3 double click */ void rxvt_term::selection_rotate (int x, int y) { selection.clicks = selection.clicks % 3 + 1; selection_extend_colrow (Pixel2Col(x), Pixel2Row(y), 1, 0, 1); } /* ------------------------------------------------------------------------- */ /* * On some systems, the Atom typedef is 64 bits wide. We need to have a type * that is exactly 32 bits wide, because a format of 64 is not allowed by * the X11 protocol. */ typedef CARD32 Atom32; /* ------------------------------------------------------------------------- */ /* * Respond to a request for our current selection * EXT: SelectionRequest */ void rxvt_term::selection_send (const XSelectionRequestEvent *rq) { XSelectionEvent ev; XTextProperty ct; XICCEncodingStyle style; Atom target; ev.type = SelectionNotify; ev.property = None; ev.display = rq->display; ev.requestor = rq->requestor; ev.selection = rq->selection; ev.target = rq->target; ev.time = rq->time; if (rq->target == xa[XA_TARGETS]) { Atom32 target_list[5]; Atom32 *target = target_list; *target++ = (Atom32) xa[XA_TARGETS]; *target++ = (Atom32) XA_STRING; *target++ = (Atom32) xa[XA_TEXT]; *target++ = (Atom32) xa[XA_COMPOUND_TEXT]; #if X_HAVE_UTF8_STRING *target++ = (Atom32) xa[XA_UTF8_STRING]; #endif XChangeProperty(Xdisplay, rq->requestor, rq->property, XA_ATOM, (8 * sizeof(target_list[0])), PropModeReplace, (unsigned char *)target_list, target - target_list); ev.property = rq->property; } else if (rq->target == xa[XA_MULTIPLE]) { /* TODO: Handle MULTIPLE */ } else if (rq->target == xa[XA_TIMESTAMP] && selection.text) { XChangeProperty(Xdisplay, rq->requestor, rq->property, XA_INTEGER, (8 * sizeof(Time)), PropModeReplace, (unsigned char *)&selection_time, 1); ev.property = rq->property; } else if (rq->target == XA_STRING || rq->target == xa[XA_TEXT] || rq->target == xa[XA_COMPOUND_TEXT] || rq->target == xa[XA_UTF8_STRING] ) { short freect = 0; int selectlen; char *cl; target = rq->target; if (target == XA_STRING) // we actually don't do XA_STRING, but who cares, as i18n clients // will ask for another format anyways. style = XStringStyle; else if (target == xa[XA_TEXT]) style = XTextStyle; else if (target == xa[XA_COMPOUND_TEXT]) style = XCompoundTextStyle; #if X_HAVE_UTF8_STRING else if (target == xa[XA_UTF8_STRING]) style = XUTF8StringStyle; #endif else { target = xa[XA_COMPOUND_TEXT]; style = XCompoundTextStyle; } if (selection.text) { cl = (char *)selection.text; selectlen = selection.len; } else { cl = ""; selectlen = 0; } if (XmbTextListToTextProperty(Xdisplay, &cl, 1, style, &ct) >= 0) freect = 1; else { /* if we failed to convert then send it raw */ ct.value = (unsigned char *)cl; ct.nitems = selectlen; } XChangeProperty(Xdisplay, rq->requestor, rq->property, target, 8, PropModeReplace, ct.value, (int)ct.nitems); ev.property = rq->property; if (freect) XFree (ct.value); } XSendEvent(Xdisplay, rq->requestor, False, 0L, (XEvent *)&ev); } /* ------------------------------------------------------------------------- * * MOUSE ROUTINES * * ------------------------------------------------------------------------- */ /* * return col/row values corresponding to x/y pixel values */ void rxvt_term::pixel_position (int *x, int *y) { *x = Pixel2Col(*x); /* MAX_IT(*x, 0); MIN_IT(*x, (int)TermWin.ncol - 1); */ *y = Pixel2Row(*y); /* MAX_IT(*y, 0); MIN_IT(*y, (int)TermWin.nrow - 1); */ } /* ------------------------------------------------------------------------- */ #ifdef USE_XIM void rxvt_term::set_position (XPoint *pos) { XWindowAttributes xwa; XGetWindowAttributes (Xdisplay, TermWin.vt, &xwa); pos->x = Col2Pixel (screen.cur.col) + xwa.x; pos->y = Height2Pixel ((screen.cur.row + 1)) + xwa.y - TermWin.lineSpace; } #endif /* ------------------------------------------------------------------------- */ /* ------------------------------------------------------------------------- * * DEBUG ROUTINES * * ------------------------------------------------------------------------- */ #if 0 void rxvt_debug_colors(void) { int color; const char *name[] = { "fg", "bg", "black", "red", "green", "yellow", "blue", "magenta", "cyan", "white" }; fprintf(stderr, "Color ( "); if (rstyle & RS_RVid) fprintf(stderr, "rvid "); if (rstyle & RS_Bold) fprintf(stderr, "bold "); if (rstyle & RS_Blink) fprintf(stderr, "blink "); if (rstyle & RS_Uline) fprintf(stderr, "uline "); fprintf(stderr, "): "); color = GET_FGCOLOR(rstyle); #ifndef NO_BRIGHTCOLOR if (color >= minBrightCOLOR && color <= maxBrightCOLOR) { color -= (minBrightCOLOR - minCOLOR); fprintf(stderr, "bright "); } #endif fprintf(stderr, "%s on ", name[color]); color = GET_BGCOLOR(rstyle); #ifndef NO_BRIGHTCOLOR if (color >= minBrightCOLOR && color <= maxBrightCOLOR) { color -= (minBrightCOLOR - minCOLOR); fprintf(stderr, "bright "); } #endif fprintf(stderr, "%s\n", name[color]); } #endif