vim: src/screen.c annotate

author	Christian Brabandt <cb@256bit.org>
date	Mon, 26 Jun 2023 09:54:34 +0200
parents	aa64fdad1f60
children	695b50472e85

rev	line source
32669 448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	1 /* vi:set ts=8 sts=4 sw=4 noet:
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	2 *
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	3 * VIM - Vi IMproved by Bram Moolenaar
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	4 *
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	5 * Do ":help uganda" in Vim to read copying and usage conditions.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	6 * Do ":help credits" in Vim to see a list of people who contributed.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	7 * See README.txt for an overview of the Vim source code.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	8 */
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	9
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	10 /*
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	11 * screen.c: Lower level code for displaying on the screen.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	12 *
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	13 * Output to the screen (console, terminal emulator or GUI window) is minimized
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	14 * by remembering what is already on the screen, and only updating the parts
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	15 * that changed.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	16 *
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	17 * ScreenLines[off] Contains a copy of the whole screen, as it is currently
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	18 * displayed (excluding text written by external commands).
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	19 * ScreenAttrs[off] Contains the associated attributes.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	20 * ScreenCols[off] Contains the byte offset in the line. -1 means not
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	21 * available (below last line), MAXCOL means after the end
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	22 * of the line.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	23 *
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	24 * LineOffset[row] Contains the offset into ScreenLines*[], ScreenAttrs[]
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	25 * and ScreenCols[] for each line.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	26 * LineWraps[row] Flag for each line whether it wraps to the next line.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	27 *
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	28 * For double-byte characters, two consecutive bytes in ScreenLines[] can form
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	29 * one character which occupies two display cells.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	30 * For UTF-8 a multi-byte character is converted to Unicode and stored in
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	31 * ScreenLinesUC[]. ScreenLines[] contains the first byte only. For an ASCII
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	32 * character without composing chars ScreenLinesUC[] will be 0 and
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	33 * ScreenLinesC[][] is not used. When the character occupies two display
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	34 * cells the next byte in ScreenLines[] is 0.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	35 * ScreenLinesC[][] contain up to 'maxcombine' composing characters
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	36 * (drawn on top of the first character). There is 0 after the last one used.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	37 * ScreenLines2[] is only used for euc-jp to store the second byte if the
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	38 * first byte is 0x8e (single-width character).
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	39 *
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	40 * The screen_*() functions write to the screen and handle updating
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	41 * ScreenLines[].
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	42 */
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	43
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	44 #include "vim.h"
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	45
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	46 /*
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	47 * The attributes that are actually active for writing to the screen.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	48 */
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	49 static int screen_attr = 0;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	50
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	51 static void screen_char_2(unsigned off, int row, int col);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	52 static int screenclear2(int doclear);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	53 static void lineclear(unsigned off, int width, int attr);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	54 static void lineinvalid(unsigned off, int width);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	55 static int win_do_lines(win_T *wp, int row, int line_count, int mayclear, int del, int clear_attr);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	56 static void win_rest_invalid(win_T *wp);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	57 static void msg_pos_mode(void);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	58 static void recording_mode(int attr);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	59
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	60 // Ugly global: overrule attribute used by screen_char()
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	61 static int screen_char_attr = 0;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	62
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	63 #if defined(FEAT_CONCEAL) \|\| defined(PROTO)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	64 /*
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	65 * Return TRUE if the cursor line in window "wp" may be concealed, according
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	66 * to the 'concealcursor' option.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	67 */
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	68 int
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	69 conceal_cursor_line(win_T *wp)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	70 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	71 int c;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	72
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	73 if (*wp->w_p_cocu == NUL)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	74 return FALSE;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	75 if (get_real_state() & MODE_VISUAL)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	76 c = 'v';
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	77 else if (State & MODE_INSERT)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	78 c = 'i';
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	79 else if (State & MODE_NORMAL)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	80 c = 'n';
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	81 else if (State & MODE_CMDLINE)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	82 c = 'c';
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	83 else
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	84 return FALSE;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	85 return vim_strchr(wp->w_p_cocu, c) != NULL;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	86 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	87
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	88 /*
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	89 * Check if the cursor line needs to be redrawn because of 'concealcursor'.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	90 * To be called after changing the state, "was_concealed" is the value of
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	91 * "conceal_cursor_line()" before the change.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	92 * "
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	93 */
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	94 void
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	95 conceal_check_cursor_line(int was_concealed)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	96 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	97 if (curwin->w_p_cole <= 0 \|\| conceal_cursor_line(curwin) == was_concealed)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	98 return;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	99
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	100 int wcol = curwin->w_wcol;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	101
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	102 need_cursor_line_redraw = TRUE;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	103 // Need to recompute cursor column, e.g., when starting Visual mode
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	104 // without concealing.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	105 curs_columns(TRUE);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	106
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	107 // When concealing now w_wcol will be computed wrong, keep the previous
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	108 // value, it will be updated in win_line().
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	109 if (!was_concealed)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	110 curwin->w_wcol = wcol;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	111 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	112 #endif
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	113
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	114 /*
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	115 * Get 'wincolor' attribute for window "wp". If not set and "wp" is a popup
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	116 * window then get the "Pmenu" highlight attribute.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	117 */
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	118 int
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	119 get_wcr_attr(win_T *wp)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	120 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	121 int wcr_attr = 0;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	122
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	123 if (*wp->w_p_wcr != NUL)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	124 wcr_attr = syn_name2attr(wp->w_p_wcr);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	125 #ifdef FEAT_PROP_POPUP
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	126 else if (WIN_IS_POPUP(wp))
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	127 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	128 if (wp->w_popup_flags & POPF_INFO)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	129 wcr_attr = HL_ATTR(HLF_PSI); // PmenuSel
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	130 else
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	131 wcr_attr = HL_ATTR(HLF_PNI); // Pmenu
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	132 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	133 #endif
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	134 return wcr_attr;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	135 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	136
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	137 /*
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	138 * Call screen_fill() with the columns adjusted for 'rightleft' if needed.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	139 * Return the new offset.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	140 */
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	141 static int
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	142 screen_fill_end(
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	143 win_T *wp,
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	144 int c1,
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	145 int c2,
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	146 int off,
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	147 int width,
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	148 int row,
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	149 int endrow,
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	150 int attr)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	151 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	152 int nn = off + width;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	153
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	154 if (nn > wp->w_width)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	155 nn = wp->w_width;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	156 #ifdef FEAT_RIGHTLEFT
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	157 if (wp->w_p_rl)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	158 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	159 screen_fill(W_WINROW(wp) + row, W_WINROW(wp) + endrow,
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	160 W_ENDCOL(wp) - nn, (int)W_ENDCOL(wp) - off,
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	161 c1, c2, attr);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	162 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	163 else
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	164 #endif
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	165 screen_fill(W_WINROW(wp) + row, W_WINROW(wp) + endrow,
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	166 wp->w_wincol + off, (int)wp->w_wincol + nn,
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	167 c1, c2, attr);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	168 return nn;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	169 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	170
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	171 /*
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	172 * Clear lines near the end the window and mark the unused lines with "c1".
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	173 * use "c2" as the filler character.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	174 * When "draw_margin" is TRUE then draw the sign, fold and number columns.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	175 */
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	176 void
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	177 win_draw_end(
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	178 win_T *wp,
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	179 int c1,
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	180 int c2,
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	181 int draw_margin,
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	182 int row,
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	183 int endrow,
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	184 hlf_T hl)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	185 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	186 int n = 0;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	187 int attr = HL_ATTR(hl);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	188 int wcr_attr = get_wcr_attr(wp);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	189
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	190 attr = hl_combine_attr(wcr_attr, attr);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	191
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	192 if (draw_margin)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	193 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	194 #ifdef FEAT_FOLDING
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	195 int fdc = compute_foldcolumn(wp, 0);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	196
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	197 if (fdc > 0)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	198 // draw the fold column
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	199 n = screen_fill_end(wp, ' ', ' ', n, fdc,
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	200 row, endrow, hl_combine_attr(wcr_attr, HL_ATTR(HLF_FC)));
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	201 #endif
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	202 #ifdef FEAT_SIGNS
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	203 if (signcolumn_on(wp))
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	204 // draw the sign column
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	205 n = screen_fill_end(wp, ' ', ' ', n, 2,
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	206 row, endrow, hl_combine_attr(wcr_attr, HL_ATTR(HLF_SC)));
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	207 #endif
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	208 if ((wp->w_p_nu \|\| wp->w_p_rnu)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	209 && vim_strchr(p_cpo, CPO_NUMCOL) == NULL)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	210 // draw the number column
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	211 n = screen_fill_end(wp, ' ', ' ', n, number_width(wp) + 1,
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	212 row, endrow, hl_combine_attr(wcr_attr, HL_ATTR(HLF_N)));
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	213 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	214
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	215 #ifdef FEAT_RIGHTLEFT
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	216 if (wp->w_p_rl)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	217 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	218 screen_fill(W_WINROW(wp) + row, W_WINROW(wp) + endrow,
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	219 wp->w_wincol, W_ENDCOL(wp) - 1 - n,
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	220 c2, c2, attr);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	221 screen_fill(W_WINROW(wp) + row, W_WINROW(wp) + endrow,
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	222 W_ENDCOL(wp) - 1 - n, W_ENDCOL(wp) - n,
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	223 c1, c2, attr);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	224 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	225 else
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	226 #endif
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	227 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	228 screen_fill(W_WINROW(wp) + row, W_WINROW(wp) + endrow,
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	229 wp->w_wincol + n, (int)W_ENDCOL(wp),
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	230 c1, c2, attr);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	231 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	232
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	233 set_empty_rows(wp, row);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	234 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	235
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	236 #if defined(FEAT_FOLDING) \|\| defined(PROTO)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	237 /*
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	238 * Compute the width of the foldcolumn. Based on 'foldcolumn' and how much
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	239 * space is available for window "wp", minus "col".
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	240 */
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	241 int
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	242 compute_foldcolumn(win_T *wp, int col)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	243 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	244 int fdc = wp->w_p_fdc;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	245 int wmw = wp == curwin && p_wmw == 0 ? 1 : p_wmw;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	246 int wwidth = wp->w_width;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	247
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	248 if (fdc > wwidth - (col + wmw))
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	249 fdc = wwidth - (col + wmw);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	250 return fdc;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	251 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	252
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	253 /*
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	254 * Fill the foldcolumn at "p" for window "wp".
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	255 * Only to be called when 'foldcolumn' > 0.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	256 * Returns the number of bytes stored in 'p'. When non-multibyte characters are
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	257 * used for the fold column markers, this is equal to 'fdc' setting. Otherwise,
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	258 * this will be greater than 'fdc'.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	259 */
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	260 size_t
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	261 fill_foldcolumn(
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	262 char_u *p,
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	263 win_T *wp,
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	264 int closed, // TRUE of FALSE
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	265 linenr_T lnum) // current line number
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	266 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	267 int i = 0;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	268 int level;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	269 int first_level;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	270 int empty;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	271 int fdc = compute_foldcolumn(wp, 0);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	272 size_t byte_counter = 0;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	273 int symbol = 0;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	274 int len = 0;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	275
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	276 // Init to all spaces.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	277 vim_memset(p, ' ', MAX_MCO * fdc + 1);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	278
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	279 level = win_foldinfo.fi_level;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	280 empty = (fdc == 1) ? 0 : 1;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	281
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	282 // If the column is too narrow, we start at the lowest level that
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	283 // fits and use numbers to indicate the depth.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	284 first_level = level - fdc - closed + 1 + empty;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	285 if (first_level < 1)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	286 first_level = 1;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	287
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	288 for (i = 0; i < MIN(fdc, level); i++)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	289 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	290 if (win_foldinfo.fi_lnum == lnum
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	291 && first_level + i >= win_foldinfo.fi_low_level)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	292 symbol = wp->w_fill_chars.foldopen;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	293 else if (first_level == 1)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	294 symbol = wp->w_fill_chars.foldsep;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	295 else if (first_level + i <= 9)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	296 symbol = '0' + first_level + i;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	297 else
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	298 symbol = '>';
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	299
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	300 len = utf_char2bytes(symbol, &p[byte_counter]);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	301 byte_counter += len;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	302 if (first_level + i >= level)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	303 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	304 i++;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	305 break;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	306 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	307 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	308
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	309 if (closed)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	310 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	311 if (symbol != 0)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	312 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	313 // rollback length and the character
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	314 byte_counter -= len;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	315 if (len > 1)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	316 // for a multibyte character, erase all the bytes
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	317 vim_memset(p + byte_counter, ' ', len);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	318 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	319 symbol = wp->w_fill_chars.foldclosed;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	320 len = utf_char2bytes(symbol, &p[byte_counter]);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	321 byte_counter += len;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	322 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	323
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	324 return MAX(byte_counter + (fdc - i), (size_t)fdc);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	325 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	326 #endif // FEAT_FOLDING
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	327
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	328 /*
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	329 * Return if the composing characters at "off_from" and "off_to" differ.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	330 * Only to be used when ScreenLinesUC[off_from] != 0.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	331 */
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	332 static int
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	333 comp_char_differs(int off_from, int off_to)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	334 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	335 int i;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	336
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	337 for (i = 0; i < Screen_mco; ++i)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	338 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	339 if (ScreenLinesC[i][off_from] != ScreenLinesC[i][off_to])
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	340 return TRUE;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	341 if (ScreenLinesC[i][off_from] == 0)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	342 break;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	343 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	344 return FALSE;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	345 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	346
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	347 /*
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	348 * Check whether the given character needs redrawing:
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	349 * - the (first byte of the) character is different
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	350 * - the attributes are different
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	351 * - the character is multi-byte and the next byte is different
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	352 * - the character is two cells wide and the second cell differs.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	353 */
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	354 static int
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	355 char_needs_redraw(int off_from, int off_to, int cols)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	356 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	357 if (cols > 0
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	358 && ((ScreenLines[off_from] != ScreenLines[off_to]
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	359 \|\| ScreenAttrs[off_from] != ScreenAttrs[off_to])
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	360 \|\| (enc_dbcs != 0
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	361 && MB_BYTE2LEN(ScreenLines[off_from]) > 1
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	362 && (enc_dbcs == DBCS_JPNU && ScreenLines[off_from] == 0x8e
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	363 ? ScreenLines2[off_from] != ScreenLines2[off_to]
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	364 : (cols > 1 && ScreenLines[off_from + 1]
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	365 != ScreenLines[off_to + 1])))
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	366 \|\| (enc_utf8
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	367 && (ScreenLinesUC[off_from] != ScreenLinesUC[off_to]
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	368 \|\| (ScreenLinesUC[off_from] != 0
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	369 && comp_char_differs(off_from, off_to))
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	370 \|\| ((*mb_off2cells)(off_from, off_from + cols) > 1
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	371 && ScreenLines[off_from + 1]
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	372 != ScreenLines[off_to + 1])))))
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	373 return TRUE;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	374 return FALSE;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	375 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	376
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	377 #if defined(FEAT_TERMINAL) \|\| defined(PROTO)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	378 /*
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	379 * Return the index in ScreenLines[] for the current screen line.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	380 */
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	381 int
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	382 screen_get_current_line_off(void)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	383 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	384 return (int)(current_ScreenLine - ScreenLines);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	385 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	386 #endif
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	387
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	388 #ifdef FEAT_PROP_POPUP
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	389 /*
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	390 * Return TRUE if this position has a higher level popup or this cell is
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	391 * transparent in the current popup.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	392 */
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	393 static int
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	394 blocked_by_popup(int row, int col)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	395 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	396 int off;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	397
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	398 if (!popup_visible)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	399 return FALSE;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	400 off = row * screen_Columns + col;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	401 return popup_mask[off] > screen_zindex \|\| popup_transparent[off];
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	402 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	403 #endif
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	404
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	405 /*
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	406 * Reset the highlighting. Used before clearing the screen.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	407 */
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	408 void
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	409 reset_screen_attr(void)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	410 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	411 #ifdef FEAT_GUI
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	412 if (gui.in_use)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	413 // Use a code that will reset gui.highlight_mask in
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	414 // gui_stop_highlight().
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	415 screen_attr = HL_ALL + 1;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	416 else
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	417 #endif
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	418 // Use attributes that is very unlikely to appear in text.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	419 screen_attr = HL_BOLD \| HL_UNDERLINE \| HL_INVERSE \| HL_STRIKETHROUGH;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	420 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	421
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	422 /*
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	423 * Return TRUE if the character at "row" / "col" is under the popup menu and it
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	424 * will be redrawn soon or it is under another popup.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	425 */
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	426 static int
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	427 skip_for_popup(int row, int col)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	428 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	429 // Popup windows with zindex higher than POPUPMENU_ZINDEX go on top.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	430 if (pum_under_menu(row, col, TRUE)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	431 #ifdef FEAT_PROP_POPUP
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	432 && screen_zindex <= POPUPMENU_ZINDEX
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	433 #endif
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	434 )
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	435 return TRUE;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	436 #ifdef FEAT_PROP_POPUP
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	437 if (blocked_by_popup(row, col))
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	438 return TRUE;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	439 #endif
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	440 return FALSE;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	441 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	442
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	443 /*
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	444 * Move one "cooked" screen line to the screen, but only the characters that
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	445 * have actually changed. Handle insert/delete character.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	446 * "coloff" gives the first column on the screen for this line.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	447 * "endcol" gives the columns where valid characters are.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	448 * "clear_width" is the width of the window. It's > 0 if the rest of the line
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	449 * needs to be cleared, negative otherwise.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	450 * "flags" can have bits:
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	451 * SLF_POPUP popup window
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	452 * SLF_RIGHTLEFT rightleft window:
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	453 * When TRUE and "clear_width" > 0, clear columns 0 to "endcol"
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	454 * When FALSE and "clear_width" > 0, clear columns "endcol" to "clear_width"
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	455 */
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	456 void
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	457 screen_line(
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	458 win_T *wp,
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	459 int row,
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	460 int coloff,
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	461 int endcol,
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	462 int clear_width,
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	463 int flags UNUSED)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	464 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	465 unsigned off_from;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	466 unsigned off_to;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	467 unsigned max_off_from;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	468 unsigned max_off_to;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	469 int col = 0;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	470 int hl;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	471 int force = FALSE; // force update rest of the line
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	472 int redraw_this // bool: does character need redraw?
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	473 #ifdef FEAT_GUI
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	474 = TRUE // For GUI when while-loop empty
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	475 #endif
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	476 ;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	477 int redraw_next; // redraw_this for next character
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	478 #ifdef FEAT_GUI_MSWIN
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	479 int changed_this; // TRUE if character changed
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	480 int changed_next; // TRUE if next character changed
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	481 #endif
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	482 int clear_next = FALSE;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	483 int char_cells; // 1: normal char
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	484 // 2: occupies two display cells
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	485
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	486 // Check for illegal row and col, just in case.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	487 if (row >= Rows)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	488 row = Rows - 1;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	489 if (endcol > Columns)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	490 endcol = Columns;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	491
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	492 # ifdef FEAT_CLIPBOARD
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	493 clip_may_clear_selection(row, row);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	494 # endif
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	495
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	496 off_from = (unsigned)(current_ScreenLine - ScreenLines);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	497 off_to = LineOffset[row] + coloff;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	498 max_off_from = off_from + screen_Columns;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	499 max_off_to = LineOffset[row] + screen_Columns;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32533 diff changeset	500

32669

448aef880252 normalize line endings