vim: src/move.c annotate

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

rev	line source
32669 448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	1 /* vi:set ts=8 sts=4 sw=4 noet:
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	2 *
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	3 * VIM - Vi IMproved by Bram Moolenaar
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	4 *
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	5 * Do ":help uganda" in Vim to read copying and usage conditions.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 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: 32665 diff changeset	7 * See README.txt for an overview of the Vim source code.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	8 */
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	9 /*
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	10 * move.c: Functions for moving the cursor and scrolling text.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	11 *
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	12 * There are two ways to move the cursor:
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	13 * 1. Move the cursor directly, the text is scrolled to keep the cursor in the
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	14 * window.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	15 * 2. Scroll the text, the cursor is moved into the text visible in the
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	16 * window.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	17 * The 'scrolloff' option makes this a bit complicated.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	18 */
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	19
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	20 #include "vim.h"
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	21
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	22 static int scrolljump_value(void);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	23 static int check_top_offset(void);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	24 static void curs_rows(win_T *wp);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	25
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	26 typedef struct
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	27 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	28 linenr_T lnum; // line number
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	29 #ifdef FEAT_DIFF
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	30 int fill; // filler lines
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	31 #endif
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	32 int height; // height of added line
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	33 } lineoff_T;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	34
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	35 static void topline_back(lineoff_T *lp);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	36 static void botline_forw(lineoff_T *lp);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	37
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	38 /*
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	39 * Reduce "n" for the screen lines skipped with "wp->w_skipcol".
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	40 */
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	41 int
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	42 adjust_plines_for_skipcol(win_T *wp, int n)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	43 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	44 if (wp->w_skipcol == 0)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	45 return n;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	46
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	47 int off = 0;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	48 int width = wp->w_width - win_col_off(wp);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	49 if (wp->w_skipcol >= width)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	50 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	51 ++off;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	52 int skip = wp->w_skipcol - width;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	53 width += win_col_off2(wp);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	54 while (skip >= width)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	55 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	56 ++off;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	57 skip -= width;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	58 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	59 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	60 wp->w_valid &= ~VALID_WROW;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	61 return n - off;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	62 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	63
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	64 /*
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	65 * Return how many lines "lnum" will take on the screen, taking into account
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	66 * whether it is the first line, whether w_skipcol is non-zero and limiting to
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	67 * the window height.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	68 */
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	69 static int
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	70 plines_correct_topline(win_T *wp, linenr_T lnum)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	71 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	72 int n;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	73 #ifdef FEAT_DIFF
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	74 if (lnum == wp->w_topline)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	75 n = plines_win_nofill(wp, lnum, FALSE) + wp->w_topfill;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	76 else
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	77 #endif
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	78 n = plines_win(wp, lnum, FALSE);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	79 if (lnum == wp->w_topline)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	80 n = adjust_plines_for_skipcol(wp, n);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	81 if (n > wp->w_height)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	82 n = wp->w_height;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	83 return n;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	84 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	85
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	86 /*
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	87 * Compute wp->w_botline for the current wp->w_topline. Can be called after
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	88 * wp->w_topline changed.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	89 */
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	90 static void
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	91 comp_botline(win_T *wp)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	92 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	93 int n;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	94 linenr_T lnum;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	95 int done;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	96 #ifdef FEAT_FOLDING
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	97 linenr_T last;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	98 int folded;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	99 #endif
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	100
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	101 /*
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	102 * If w_cline_row is valid, start there.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	103 * Otherwise have to start at w_topline.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	104 */
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	105 check_cursor_moved(wp);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	106 if (wp->w_valid & VALID_CROW)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	107 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	108 lnum = wp->w_cursor.lnum;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	109 done = wp->w_cline_row;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	110 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	111 else
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	112 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	113 lnum = wp->w_topline;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	114 done = 0;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	115 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	116
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	117 for ( ; lnum <= wp->w_buffer->b_ml.ml_line_count; ++lnum)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	118 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	119 #ifdef FEAT_FOLDING
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	120 last = lnum;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	121 folded = FALSE;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	122 if (hasFoldingWin(wp, lnum, NULL, &last, TRUE, NULL))
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	123 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	124 n = 1;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	125 folded = TRUE;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	126 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	127 else
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	128 #endif
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	129 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	130 n = plines_correct_topline(wp, lnum);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	131 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	132 if (
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	133 #ifdef FEAT_FOLDING
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	134 lnum <= wp->w_cursor.lnum && last >= wp->w_cursor.lnum
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	135 #else
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	136 lnum == wp->w_cursor.lnum
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	137 #endif
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	138 )
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	139 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	140 wp->w_cline_row = done;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	141 wp->w_cline_height = n;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	142 #ifdef FEAT_FOLDING
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	143 wp->w_cline_folded = folded;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	144 #endif
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	145 redraw_for_cursorline(wp);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	146 wp->w_valid \|= (VALID_CROW\|VALID_CHEIGHT);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	147 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	148 if (done + n > wp->w_height)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	149 break;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	150 done += n;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	151 #ifdef FEAT_FOLDING
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	152 lnum = last;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	153 #endif
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	154 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	155
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	156 // wp->w_botline is the line that is just below the window
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	157 wp->w_botline = lnum;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	158 wp->w_valid \|= VALID_BOTLINE\|VALID_BOTLINE_AP;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	159
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	160 set_empty_rows(wp, done);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	161 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	162
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	163 /*
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	164 * Redraw when w_cline_row changes and 'relativenumber' or 'cursorline' is
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	165 * set.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	166 */
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	167 void
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	168 redraw_for_cursorline(win_T *wp)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	169 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	170 if ((wp->w_p_rnu
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	171 #ifdef FEAT_SYN_HL
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	172 \|\| wp->w_p_cul
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	173 #endif
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	174 )
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	175 && (wp->w_valid & VALID_CROW) == 0
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	176 && !pum_visible())
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	177 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	178 // win_line() will redraw the number column and cursorline only.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	179 redraw_win_later(wp, UPD_VALID);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	180 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	181 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	182
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	183 #ifdef FEAT_SYN_HL
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	184 /*
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	185 * Redraw when w_virtcol changes and 'cursorcolumn' is set or 'cursorlineopt'
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	186 * contains "screenline".
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	187 */
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	188 static void
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	189 redraw_for_cursorcolumn(win_T *wp)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	190 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	191 if ((wp->w_valid & VALID_VIRTCOL) == 0 && !pum_visible())
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	192 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	193 // When 'cursorcolumn' is set need to redraw with UPD_SOME_VALID.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	194 if (wp->w_p_cuc)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	195 redraw_win_later(wp, UPD_SOME_VALID);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	196 // When 'cursorlineopt' contains "screenline" need to redraw with
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	197 // UPD_VALID.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	198 else if (wp->w_p_cul && (wp->w_p_culopt_flags & CULOPT_SCRLINE))
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	199 redraw_win_later(wp, UPD_VALID);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	200 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	201 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	202 #endif
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	203
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	204 /*
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	205 * Calculates how much the 'listchars' "precedes" or 'smoothscroll' "<<<"
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	206 * marker overlaps with buffer text for window "wp".
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	207 * Parameter "extra2" should be the padding on the 2nd line, not the first
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	208 * line.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	209 * Returns the number of columns of overlap with buffer text, excluding the
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	210 * extra padding on the ledge.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	211 */
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	212 int
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	213 sms_marker_overlap(win_T *wp, int extra2)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	214 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	215 #if defined(FEAT_LINEBREAK)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	216 // There is no marker overlap when in showbreak mode, thus no need to
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	217 // account for it. See wlv_screen_line().
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	218 if (*get_showbreak_value(wp) != NUL)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	219 return 0;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	220 #endif
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	221 // Overlap when 'list' and 'listchars' "precedes" are set is 1.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	222 if (wp->w_p_list && wp->w_lcs_chars.prec)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	223 return 1;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	224
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	225 return extra2 > 3 ? 0 : 3 - extra2;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	226 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	227
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	228 /*
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	229 * Calculates the skipcol offset for window "wp" given how many
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	230 * physical lines we want to scroll down.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	231 */
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	232 static int
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	233 skipcol_from_plines(win_T *wp, int plines_off)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	234 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	235 int width1 = wp->w_width - win_col_off(wp);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	236
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	237 int skipcol = 0;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	238 if (plines_off > 0)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	239 skipcol += width1;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	240 if (plines_off > 1)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	241 skipcol += (width1 + win_col_off2(wp)) * (plines_off - 1);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	242 return skipcol;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	243 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	244
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	245 /*
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	246 * Set curwin->w_skipcol to zero and redraw later if needed.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	247 */
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	248 static void
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	249 reset_skipcol(void)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	250 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	251 if (curwin->w_skipcol == 0)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	252 return;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	253
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	254 curwin->w_skipcol = 0;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	255
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	256 // Should use the least expensive way that displays all that changed.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	257 // UPD_NOT_VALID is too expensive, UPD_REDRAW_TOP does not redraw
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	258 // enough when the top line gets another screen line.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	259 redraw_later(UPD_SOME_VALID);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	260 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	261
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	262 /*
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	263 * Update curwin->w_topline and redraw if necessary.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	264 * Used to update the screen before printing a message.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	265 */
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	266 void
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	267 update_topline_redraw(void)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	268 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	269 update_topline();
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	270 if (must_redraw)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	271 update_screen(0);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	272 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	273
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	274 /*
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	275 * Update curwin->w_topline to move the cursor onto the screen.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	276 */
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	277 void
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	278 update_topline(void)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	279 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	280 long line_count;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	281 int halfheight;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	282 int n;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	283 #ifdef FEAT_FOLDING
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	284 linenr_T lnum;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	285 #endif
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	286 int check_topline = FALSE;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	287 int check_botline = FALSE;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	288 long *so_ptr = curwin->w_p_so >= 0 ? &curwin->w_p_so : &p_so;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	289 int save_so = *so_ptr;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	290
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	291 // Cursor is updated instead when this is TRUE for 'splitkeep'.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	292 if (skip_update_topline)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	293 return;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	294
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	295 // If there is no valid screen and when the window height is zero just use
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	296 // the cursor line.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	297 if (!screen_valid(TRUE) \|\| curwin->w_height == 0)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	298 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	299 check_cursor_lnum();
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	300 curwin->w_topline = curwin->w_cursor.lnum;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	301 curwin->w_botline = curwin->w_topline;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	302 curwin->w_scbind_pos = 1;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	303 return;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	304 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	305
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	306 check_cursor_moved(curwin);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	307 if (curwin->w_valid & VALID_TOPLINE)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	308 return;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	309
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	310 // When dragging with the mouse, don't scroll that quickly
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	311 if (mouse_dragging > 0)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	312 *so_ptr = mouse_dragging - 1;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	313
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	314 linenr_T old_topline = curwin->w_topline;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	315 #ifdef FEAT_DIFF
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	316 int old_topfill = curwin->w_topfill;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	317 #endif
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	318
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	319 /*
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	320 * If the buffer is empty, always set topline to 1.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	321 */
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	322 if (BUFEMPTY()) // special case - file is empty
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	323 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	324 if (curwin->w_topline != 1)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	325 redraw_later(UPD_NOT_VALID);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	326 curwin->w_topline = 1;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	327 curwin->w_botline = 2;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	328 curwin->w_valid \|= VALID_BOTLINE\|VALID_BOTLINE_AP;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	329 curwin->w_scbind_pos = 1;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	330 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	331
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	332 /*
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	333 * If the cursor is above or near the top of the window, scroll the window
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	334 * to show the line the cursor is in, with 'scrolloff' context.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	335 */
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	336 else
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	337 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	338 if (curwin->w_topline > 1 \|\| curwin->w_skipcol > 0)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	339 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	340 // If the cursor is above topline, scrolling is always needed.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	341 // If the cursor is far below topline and there is no folding,
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	342 // scrolling down is never needed.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	343 if (curwin->w_cursor.lnum < curwin->w_topline)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	344 check_topline = TRUE;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	345 else if (check_top_offset())
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	346 check_topline = TRUE;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	347 else if (curwin->w_skipcol > 0
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	348 && curwin->w_cursor.lnum == curwin->w_topline)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	349 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	350 colnr_T vcol;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	351
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	352 // Check that the cursor position is visible. Add columns for
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	353 // the marker displayed in the top-left if needed.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	354 getvvcol(curwin, &curwin->w_cursor, &vcol, NULL, NULL);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	355 int overlap = sms_marker_overlap(curwin, curwin_col_off()
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	356 - curwin_col_off2());
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	357 if (curwin->w_skipcol + overlap > vcol)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	358 check_topline = TRUE;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	359 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	360 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	361 #ifdef FEAT_DIFF
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	362 // Check if there are more filler lines than allowed.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	363 if (!check_topline && curwin->w_topfill > diff_check_fill(curwin,
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	364 curwin->w_topline))
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	365 check_topline = TRUE;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	366 #endif
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	367
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	368 if (check_topline)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	369 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	370 halfheight = curwin->w_height / 2 - 1;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	371 if (halfheight < 2)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	372 halfheight = 2;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	373
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	374 #ifdef FEAT_FOLDING
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	375 if (hasAnyFolding(curwin))
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	376 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	377 // Count the number of logical lines between the cursor and
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	378 // topline + scrolloff (approximation of how much will be
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	379 // scrolled).
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	380 n = 0;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	381 for (lnum = curwin->w_cursor.lnum;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	382 lnum < curwin->w_topline + *so_ptr; ++lnum)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	383 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	384 ++n;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	385 // stop at end of file or when we know we are far off
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	386 if (lnum >= curbuf->b_ml.ml_line_count \|\| n >= halfheight)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	387 break;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	388 (void)hasFolding(lnum, NULL, &lnum);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	389 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	390 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	391 else
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	392 #endif
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	393 n = curwin->w_topline + *so_ptr - curwin->w_cursor.lnum;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	394
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	395 // If we weren't very close to begin with, we scroll to put the
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	396 // cursor in the middle of the window. Otherwise put the cursor
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	397 // near the top of the window.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	398 if (n >= halfheight)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	399 scroll_cursor_halfway(FALSE, FALSE);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	400 else
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	401 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	402 scroll_cursor_top(scrolljump_value(), FALSE);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	403 check_botline = TRUE;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	404 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	405 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	406
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	407 else
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	408 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	409 #ifdef FEAT_FOLDING
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	410 // Make sure topline is the first line of a fold.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	411 (void)hasFolding(curwin->w_topline, &curwin->w_topline, NULL);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	412 #endif
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	413 check_botline = TRUE;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	414 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	415 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	416
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	417 /*
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	418 * If the cursor is below the bottom of the window, scroll the window
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	419 * to put the cursor on the window.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	420 * When w_botline is invalid, recompute it first, to avoid a redraw later.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	421 * If w_botline was approximated, we might need a redraw later in a few
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	422 * cases, but we don't want to spend (a lot of) time recomputing w_botline
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	423 * for every small change.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	424 */
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	425 if (check_botline)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	426 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	427 if (!(curwin->w_valid & VALID_BOTLINE_AP))
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	428 validate_botline();
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	429
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	430 if (curwin->w_botline <= curbuf->b_ml.ml_line_count)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	431 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	432 if (curwin->w_cursor.lnum < curwin->w_botline)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	433 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	434 if (((long)curwin->w_cursor.lnum
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	435 >= (long)curwin->w_botline - *so_ptr
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	436 #ifdef FEAT_FOLDING
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	437 \|\| hasAnyFolding(curwin)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	438 #endif
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	439 ))
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	440 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	441 lineoff_T loff;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	442
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	443 // Cursor is (a few lines) above botline, check if there are
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	444 // 'scrolloff' window lines below the cursor. If not, need to
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	445 // scroll.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	446 n = curwin->w_empty_rows;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	447 loff.lnum = curwin->w_cursor.lnum;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	448 #ifdef FEAT_FOLDING
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	449 // In a fold go to its last line.
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	450 (void)hasFolding(loff.lnum, NULL, &loff.lnum);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	451 #endif
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	452 #ifdef FEAT_DIFF
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	453 loff.fill = 0;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	454 n += curwin->w_filler_rows;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	455 #endif
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	456 loff.height = 0;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	457 while (loff.lnum < curwin->w_botline
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	458 #ifdef FEAT_DIFF
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	459 && (loff.lnum + 1 < curwin->w_botline \|\| loff.fill == 0)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	460 #endif
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	461 )
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	462 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	463 n += loff.height;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	464 if (n >= *so_ptr)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	465 break;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	466 botline_forw(&loff);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	467 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	468 if (n >= *so_ptr)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	469 // sufficient context, no need to scroll
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	470 check_botline = FALSE;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	471 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	472 else
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	473 // sufficient context, no need to scroll
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	474 check_botline = FALSE;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	475 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	476 if (check_botline)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	477 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	478 #ifdef FEAT_FOLDING
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	479 if (hasAnyFolding(curwin))
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	480 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	481 // Count the number of logical lines between the cursor and
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	482 // botline - scrolloff (approximation of how much will be
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	483 // scrolled).
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	484 line_count = 0;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	485 for (lnum = curwin->w_cursor.lnum;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	486 lnum >= curwin->w_botline - *so_ptr; --lnum)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	487 {
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	488 ++line_count;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	489 // stop at end of file or when we know we are far off
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	490 if (lnum <= 0 \|\| line_count > curwin->w_height + 1)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	491 break;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	492 (void)hasFolding(lnum, &lnum, NULL);
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	493 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	494 }
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	495 else
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	496 #endif
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	497 line_count = curwin->w_cursor.lnum - curwin->w_botline
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	498 + 1 + *so_ptr;
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	499 if (line_count <= curwin->w_height + 1)
448aef880252 normalize line endings Christian Brabandt <cb@256bit.org> parents: 32665 diff changeset	500 scroll_cursor_bot(scrolljump_value(), FALSE);

32669

448aef880252 normalize line endings