1 /* vi:set ts=8 sts=4 sw=4:
3 * VIM - Vi IMproved by Bram Moolenaar
5 * Do ":help uganda" in Vim to read a list of people who contributed.
6 * Do ":help credits" in Vim to see a list of people who contributed.
7 * See README.txt for an overview of the Vim source code.
12 static int path_is_url
__ARGS((char_u
*p
));
13 #if defined(FEAT_WINDOWS) || defined(PROTO)
14 static void win_init
__ARGS((win_T
*newp
, win_T
*oldp
, int flags
));
15 static void win_init_some
__ARGS((win_T
*newp
, win_T
*oldp
));
16 static void frame_comp_pos
__ARGS((frame_T
*topfrp
, int *row
, int *col
));
17 static void frame_setheight
__ARGS((frame_T
*curfrp
, int height
));
19 static void frame_setwidth
__ARGS((frame_T
*curfrp
, int width
));
21 static void win_exchange
__ARGS((long));
22 static void win_rotate
__ARGS((int, int));
23 static void win_totop
__ARGS((int size
, int flags
));
24 static void win_equal_rec
__ARGS((win_T
*next_curwin
, int current
, frame_T
*topfr
, int dir
, int col
, int row
, int width
, int height
));
25 static int last_window
__ARGS((void));
26 static int one_window
__ARGS((void));
27 static win_T
*win_free_mem
__ARGS((win_T
*win
, int *dirp
, tabpage_T
*tp
));
28 static frame_T
*win_altframe
__ARGS((win_T
*win
, tabpage_T
*tp
));
29 static tabpage_T
*alt_tabpage
__ARGS((void));
30 static win_T
*frame2win
__ARGS((frame_T
*frp
));
31 static int frame_has_win
__ARGS((frame_T
*frp
, win_T
*wp
));
32 static void frame_new_height
__ARGS((frame_T
*topfrp
, int height
, int topfirst
, int wfh
));
33 static int frame_fixed_height
__ARGS((frame_T
*frp
));
35 static int frame_fixed_width
__ARGS((frame_T
*frp
));
36 static void frame_add_statusline
__ARGS((frame_T
*frp
));
37 static void frame_new_width
__ARGS((frame_T
*topfrp
, int width
, int leftfirst
, int wfw
));
38 static void frame_add_vsep
__ARGS((frame_T
*frp
));
39 static int frame_minwidth
__ARGS((frame_T
*topfrp
, win_T
*next_curwin
));
40 static void frame_fix_width
__ARGS((win_T
*wp
));
43 static int win_alloc_firstwin
__ARGS((win_T
*oldwin
));
44 static void new_frame
__ARGS((win_T
*wp
));
45 #if defined(FEAT_WINDOWS) || defined(PROTO)
46 static tabpage_T
*alloc_tabpage
__ARGS((void));
47 static int leave_tabpage
__ARGS((buf_T
*new_curbuf
));
48 static void enter_tabpage
__ARGS((tabpage_T
*tp
, buf_T
*old_curbuf
));
49 static void frame_fix_height
__ARGS((win_T
*wp
));
50 static int frame_minheight
__ARGS((frame_T
*topfrp
, win_T
*next_curwin
));
51 static void win_enter_ext
__ARGS((win_T
*wp
, int undo_sync
, int no_curwin
));
52 static void win_free
__ARGS((win_T
*wp
, tabpage_T
*tp
));
53 static void frame_append
__ARGS((frame_T
*after
, frame_T
*frp
));
54 static void frame_insert
__ARGS((frame_T
*before
, frame_T
*frp
));
55 static void frame_remove
__ARGS((frame_T
*frp
));
57 static void win_new_width
__ARGS((win_T
*wp
, int width
));
58 static void win_goto_ver
__ARGS((int up
, long count
));
59 static void win_goto_hor
__ARGS((int left
, long count
));
61 static void frame_add_height
__ARGS((frame_T
*frp
, int n
));
62 static void last_status_rec
__ARGS((frame_T
*fr
, int statusline
));
64 static void make_snapshot_rec
__ARGS((frame_T
*fr
, frame_T
**frp
));
65 static void clear_snapshot
__ARGS((tabpage_T
*tp
, int idx
));
66 static void clear_snapshot_rec
__ARGS((frame_T
*fr
));
67 static int check_snapshot_rec
__ARGS((frame_T
*sn
, frame_T
*fr
));
68 static win_T
*restore_snapshot_rec
__ARGS((frame_T
*sn
, frame_T
*fr
));
70 #endif /* FEAT_WINDOWS */
72 static win_T
*win_alloc
__ARGS((win_T
*after
, int hidden
));
73 static void win_new_height
__ARGS((win_T
*, int));
75 #define URL_SLASH 1 /* path_is_url() has found "://" */
76 #define URL_BACKSLASH 2 /* path_is_url() has found ":\\" */
78 #define NOWIN (win_T *)-1 /* non-existing window */
81 # define ROWS_AVAIL (Rows - p_ch - tabline_height())
83 # define ROWS_AVAIL (Rows - p_ch)
86 #if defined(FEAT_WINDOWS) || defined(PROTO)
88 static char *m_onlyone
= N_("Already only one window");
91 * all CTRL-W window commands are handled here, called from normal_cmd().
94 do_window(nchar
, Prenum
, xchar
)
97 int xchar
; /* extra char from ":wincmd gx" or NUL */
101 #if defined(FEAT_SEARCHPATH) || defined(FEAT_FIND_ID)
106 int type
= FIND_DEFINE
;
117 # define CHECK_CMDWIN if (cmdwin_type != 0) { EMSG(_(e_cmdwin)); break; }
119 # define CHECK_CMDWIN
124 /* split current window in two parts, horizontally */
130 reset_VIsual_and_resel(); /* stop Visual mode */
133 /* When splitting the quickfix window open a new buffer in it,
134 * don't replicate the quickfix buffer. */
135 if (bt_quickfix(curbuf
))
139 need_mouse_correct
= TRUE
;
141 win_split((int)Prenum
, 0);
144 #ifdef FEAT_VERTSPLIT
145 /* split current window in two parts, vertically */
150 reset_VIsual_and_resel(); /* stop Visual mode */
152 # ifdef FEAT_QUICKFIX
153 /* When splitting the quickfix window open a new buffer in it,
154 * don't replicate the quickfix buffer. */
155 if (bt_quickfix(curbuf
))
159 need_mouse_correct
= TRUE
;
161 win_split((int)Prenum
, WSP_VERT
);
165 /* split current window and edit alternate file */
170 reset_VIsual_and_resel(); /* stop Visual mode */
172 STRCPY(cbuf
, "split #");
174 vim_snprintf((char *)cbuf
+ 7, sizeof(cbuf
) - 7,
176 do_cmdline_cmd(cbuf
);
179 /* open new window */
184 reset_VIsual_and_resel(); /* stop Visual mode */
191 vim_snprintf((char *)cbuf
, sizeof(cbuf
) - 5, "%ld", Prenum
);
194 #if defined(FEAT_VERTSPLIT) && defined(FEAT_QUICKFIX)
195 if (nchar
== 'v' || nchar
== Ctrl_V
)
199 do_cmdline_cmd(cbuf
);
202 /* quit current window */
206 reset_VIsual_and_resel(); /* stop Visual mode */
208 do_cmdline_cmd((char_u
*)"quit");
211 /* close current window */
215 reset_VIsual_and_resel(); /* stop Visual mode */
217 do_cmdline_cmd((char_u
*)"close");
220 #if defined(FEAT_WINDOWS) && defined(FEAT_QUICKFIX)
221 /* close preview window */
226 reset_VIsual_and_resel(); /* stop Visual mode */
228 do_cmdline_cmd((char_u
*)"pclose");
231 /* cursor to preview window */
233 for (wp
= firstwin
; wp
!= NULL
; wp
= wp
->w_next
)
237 EMSG(_("E441: There is no preview window"));
243 /* close all but current window */
248 reset_VIsual_and_resel(); /* stop Visual mode */
250 do_cmdline_cmd((char_u
*)"only");
253 /* cursor to next window with wrap around */
256 /* cursor to previous window with wrap around */
259 if (firstwin
== lastwin
&& Prenum
!= 1) /* just one window */
263 if (Prenum
) /* go to specified window */
265 for (wp
= firstwin
; --Prenum
> 0; )
267 if (wp
->w_next
== NULL
)
275 if (nchar
== 'W') /* go to previous window */
279 wp
= lastwin
; /* wrap around */
281 else /* go to next window */
285 wp
= firstwin
; /* wrap around */
292 /* cursor to window below */
297 #ifdef FEAT_VERTSPLIT
298 win_goto_ver(FALSE
, Prenum1
);
300 for (wp
= curwin
; wp
->w_next
!= NULL
&& Prenum1
-- > 0;
307 /* cursor to window above */
312 #ifdef FEAT_VERTSPLIT
313 win_goto_ver(TRUE
, Prenum1
);
315 for (wp
= curwin
; wp
->w_prev
!= NULL
&& Prenum1
-- > 0;
322 #ifdef FEAT_VERTSPLIT
323 /* cursor to left window */
329 win_goto_hor(TRUE
, Prenum1
);
332 /* cursor to right window */
337 win_goto_hor(FALSE
, Prenum1
);
341 /* move window to new tab page */
347 tabpage_T
*oldtab
= curtab
;
350 /* First create a new tab with the window, then go back to
351 * the old tab and close the window there. */
353 if (win_new_tabpage((int)Prenum
) == OK
354 && valid_tabpage(oldtab
))
357 goto_tabpage_tp(oldtab
);
359 win_close(curwin
, FALSE
);
360 if (valid_tabpage(newtab
))
361 goto_tabpage_tp(newtab
);
366 /* cursor to top-left window */
372 /* cursor to bottom-right window */
378 /* cursor to last accessed (previous) window */
387 /* exchange current and next window */
391 win_exchange(Prenum
);
394 /* rotate windows downwards */
399 reset_VIsual_and_resel(); /* stop Visual mode */
401 win_rotate(FALSE
, (int)Prenum1
); /* downwards */
404 /* rotate windows upwards */
408 reset_VIsual_and_resel(); /* stop Visual mode */
410 win_rotate(TRUE
, (int)Prenum1
); /* upwards */
413 /* move window to the very top/bottom/left/right */
416 #ifdef FEAT_VERTSPLIT
421 win_totop((int)Prenum
,
422 ((nchar
== 'H' || nchar
== 'L') ? WSP_VERT
: 0)
423 | ((nchar
== 'H' || nchar
== 'K') ? WSP_TOP
: WSP_BOT
));
426 /* make all windows the same height */
429 need_mouse_correct
= TRUE
;
431 win_equal(NULL
, FALSE
, 'b');
434 /* increase current window height */
437 need_mouse_correct
= TRUE
;
439 win_setheight(curwin
->w_height
+ (int)Prenum1
);
442 /* decrease current window height */
445 need_mouse_correct
= TRUE
;
447 win_setheight(curwin
->w_height
- (int)Prenum1
);
450 /* set current window height */
454 need_mouse_correct
= TRUE
;
456 win_setheight(Prenum
? (int)Prenum
: 9999);
459 #ifdef FEAT_VERTSPLIT
460 /* increase current window width */
463 need_mouse_correct
= TRUE
;
465 win_setwidth(curwin
->w_width
+ (int)Prenum1
);
468 /* decrease current window width */
471 need_mouse_correct
= TRUE
;
473 win_setwidth(curwin
->w_width
- (int)Prenum1
);
476 /* set current window width */
479 need_mouse_correct
= TRUE
;
481 win_setwidth(Prenum
!= 0 ? (int)Prenum
: 9999);
485 /* jump to tag and split window if tag exists (in preview window) */
486 #if defined(FEAT_QUICKFIX)
490 g_do_tagpreview
= Prenum
;
492 g_do_tagpreview
= p_pvh
;
499 reset_VIsual_and_resel(); /* stop Visual mode */
502 postponed_split
= Prenum
;
504 postponed_split
= -1;
506 /* Execute the command right here, required when
507 * "wincmd ]" was used in a function. */
508 do_nv_ident(Ctrl_RSB
, NUL
);
511 #ifdef FEAT_SEARCHPATH
512 /* edit file name under cursor in a new window */
519 ptr
= grab_file_name(Prenum1
, &lnum
);
523 need_mouse_correct
= TRUE
;
526 if (win_split(0, 0) == OK
)
528 # ifdef FEAT_SCROLLBIND
529 curwin
->w_p_scb
= FALSE
;
531 (void)do_ecmd(0, ptr
, NULL
, NULL
, ECMD_LASTL
,
533 if (nchar
== 'F' && lnum
>= 0)
535 curwin
->w_cursor
.lnum
= lnum
;
537 beginline(BL_SOL
| BL_FIX
);
546 /* Go to the first occurrence of the identifier under cursor along path in a
549 case 'i': /* Go to any match */
553 case 'd': /* Go to definition, using 'define' */
556 if ((len
= find_ident_under_cursor(&ptr
, FIND_IDENT
)) == 0)
558 find_pattern_in_path(ptr
, 0, len
, TRUE
,
559 Prenum
== 0 ? TRUE
: FALSE
, type
,
560 Prenum1
, ACTION_SPLIT
, (linenr_T
)1, (linenr_T
)MAXLNUM
);
561 curwin
->w_set_curswant
= TRUE
;
567 #if defined(FEAT_QUICKFIX)
569 * In a quickfix window a <CR> jumps to the error under the
570 * cursor in a new window.
572 if (bt_quickfix(curbuf
))
574 sprintf((char *)cbuf
, "split +%ld%s",
575 (long)curwin
->w_cursor
.lnum
,
576 (curwin
->w_llist_ref
== NULL
) ? "cc" : "ll");
577 do_cmdline_cmd(cbuf
);
583 /* CTRL-W g extended commands */
587 #ifdef USE_ON_FLY_SCROLL
588 dont_scroll
= TRUE
; /* disallow scrolling here */
591 ++allow_keys
; /* no mapping for xchar, but allow key codes */
593 xchar
= plain_vgetc();
594 LANGMAP_ADJUST(xchar
, TRUE
);
597 #ifdef FEAT_CMDL_INFO
598 (void)add_to_showcmd(xchar
);
602 #if defined(FEAT_QUICKFIX)
606 g_do_tagpreview
= Prenum
;
608 g_do_tagpreview
= p_pvh
;
614 reset_VIsual_and_resel(); /* stop Visual mode */
617 postponed_split
= Prenum
;
619 postponed_split
= -1;
621 /* Execute the command right here, required when
622 * "wincmd g}" was used in a function. */
623 do_nv_ident('g', xchar
);
626 #ifdef FEAT_SEARCHPATH
627 case 'f': /* CTRL-W gf: "gf" in a new tab page */
628 case 'F': /* CTRL-W gF: "gF" in a new tab page */
629 cmdmod
.tab
= tabpage_index(curtab
) + 1;
639 default: beep_flush();
645 * split the current window, implements CTRL-W s and :split
647 * "size" is the height or width for the new window, 0 to use half of current
651 * WSP_ROOM: require enough room for new window
652 * WSP_VERT: vertical split.
653 * WSP_TOP: open window at the top-left of the shell (help window).
654 * WSP_BOT: open window at the bottom-right of the shell (quickfix window).
655 * WSP_HELP: creating the help window, keep layout snapshot
657 * return FAIL for failure, OK otherwise
660 win_split(size
, flags
)
664 /* When the ":tab" modifier was used open a new tab page instead. */
665 if (may_open_tabpage() == OK
)
668 /* Add flags from ":vertical", ":topleft" and ":botright". */
669 flags
|= cmdmod
.split
;
670 if ((flags
& WSP_TOP
) && (flags
& WSP_BOT
))
672 EMSG(_("E442: Can't split topleft and botright at the same time"));
676 /* When creating the help window make a snapshot of the window layout.
677 * Otherwise clear the snapshot, it's now invalid. */
678 if (flags
& WSP_HELP
)
679 make_snapshot(SNAP_HELP_IDX
);
681 clear_snapshot(curtab
, SNAP_HELP_IDX
);
683 return win_split_ins(size
, flags
, NULL
, 0);
687 * When "newwin" is NULL: split the current window in two.
688 * When "newwin" is not NULL: insert this window at the far
689 * top/left/right/bottom.
690 * return FAIL for failure, OK otherwise
693 win_split_ins(size
, flags
, newwin
, dir
)
704 int do_equal
= FALSE
;
707 int oldwin_height
= 0;
709 frame_T
*frp
, *curfrp
;
714 else if (flags
& WSP_BOT
)
719 /* add a status line when p_ls == 1 and splitting the first window */
720 if (lastwin
== firstwin
&& p_ls
== 1 && oldwin
->w_status_height
== 0)
722 if (oldwin
->w_height
<= p_wmh
&& newwin
== NULL
)
727 need_status
= STATUS_HEIGHT
;
731 /* May be needed for the scrollbars that are going to change. */
736 #ifdef FEAT_VERTSPLIT
737 if (flags
& WSP_VERT
)
742 * Check if we are able to split the current window and compute its
746 if (flags
& WSP_ROOM
)
747 needed
+= p_wiw
- p_wmw
;
748 if (p_ea
|| (flags
& (WSP_BOT
| WSP_TOP
)))
750 available
= topframe
->fr_width
;
751 needed
+= frame_minwidth(topframe
, NULL
);
754 available
= oldwin
->w_width
;
755 if (available
< needed
&& newwin
== NULL
)
761 new_size
= oldwin
->w_width
/ 2;
762 if (new_size
> oldwin
->w_width
- p_wmw
- 1)
763 new_size
= oldwin
->w_width
- p_wmw
- 1;
764 if (new_size
< p_wmw
)
767 /* if it doesn't fit in the current window, need win_equal() */
768 if (oldwin
->w_width
- new_size
- 1 < p_wmw
)
771 /* We don't like to take lines for the new window from a
772 * 'winfixwidth' window. Take them from a window to the left or right
773 * instead, if possible. */
775 win_setwidth_win(oldwin
->w_width
+ new_size
, oldwin
);
777 /* Only make all windows the same width if one of them (except oldwin)
778 * is wider than one of the split windows. */
779 if (!do_equal
&& p_ea
&& size
== 0 && *p_ead
!= 'v'
780 && oldwin
->w_frame
->fr_parent
!= NULL
)
782 frp
= oldwin
->w_frame
->fr_parent
->fr_child
;
785 if (frp
->fr_win
!= oldwin
&& frp
->fr_win
!= NULL
786 && (frp
->fr_win
->w_width
> new_size
787 || frp
->fr_win
->w_width
> oldwin
->w_width
788 - new_size
- STATUS_HEIGHT
))
803 * Check if we are able to split the current window and compute its
806 needed
= p_wmh
+ STATUS_HEIGHT
+ need_status
;
807 if (flags
& WSP_ROOM
)
808 needed
+= p_wh
- p_wmh
;
809 if (p_ea
|| (flags
& (WSP_BOT
| WSP_TOP
)))
811 available
= topframe
->fr_height
;
812 needed
+= frame_minheight(topframe
, NULL
);
816 available
= oldwin
->w_height
;
819 if (available
< needed
&& newwin
== NULL
)
824 oldwin_height
= oldwin
->w_height
;
827 oldwin
->w_status_height
= STATUS_HEIGHT
;
828 oldwin_height
-= STATUS_HEIGHT
;
831 new_size
= oldwin_height
/ 2;
833 if (new_size
> oldwin_height
- p_wmh
- STATUS_HEIGHT
)
834 new_size
= oldwin_height
- p_wmh
- STATUS_HEIGHT
;
835 if (new_size
< p_wmh
)
838 /* if it doesn't fit in the current window, need win_equal() */
839 if (oldwin_height
- new_size
- STATUS_HEIGHT
< p_wmh
)
842 /* We don't like to take lines for the new window from a
843 * 'winfixheight' window. Take them from a window above or below
844 * instead, if possible. */
847 win_setheight_win(oldwin
->w_height
+ new_size
+ STATUS_HEIGHT
,
849 oldwin_height
= oldwin
->w_height
;
851 oldwin_height
-= STATUS_HEIGHT
;
854 /* Only make all windows the same height if one of them (except oldwin)
855 * is higher than one of the split windows. */
856 if (!do_equal
&& p_ea
&& size
== 0
857 #ifdef FEAT_VERTSPLIT
860 && oldwin
->w_frame
->fr_parent
!= NULL
)
862 frp
= oldwin
->w_frame
->fr_parent
->fr_child
;
865 if (frp
->fr_win
!= oldwin
&& frp
->fr_win
!= NULL
866 && (frp
->fr_win
->w_height
> new_size
867 || frp
->fr_win
->w_height
> oldwin_height
- new_size
879 * allocate new window structure and link it in the window list
881 if ((flags
& WSP_TOP
) == 0
882 && ((flags
& WSP_BOT
)
883 || (flags
& WSP_BELOW
)
884 || (!(flags
& WSP_ABOVE
)
886 #ifdef FEAT_VERTSPLIT
887 (flags
& WSP_VERT
) ? p_spr
:
891 /* new window below/right of current one */
893 wp
= win_alloc(oldwin
, FALSE
);
895 win_append(oldwin
, wp
);
900 wp
= win_alloc(oldwin
->w_prev
, FALSE
);
902 win_append(oldwin
->w_prev
, wp
);
911 if (wp
->w_frame
== NULL
)
917 /* make the contents of the new window the same as the current one */
918 win_init(wp
, curwin
, flags
);
922 * Reorganise the tree of frames to insert the new window.
924 if (flags
& (WSP_TOP
| WSP_BOT
))
926 #ifdef FEAT_VERTSPLIT
927 if ((topframe
->fr_layout
== FR_COL
&& (flags
& WSP_VERT
) == 0)
928 || (topframe
->fr_layout
== FR_ROW
&& (flags
& WSP_VERT
) != 0))
930 if (topframe
->fr_layout
== FR_COL
)
933 curfrp
= topframe
->fr_child
;
935 while (curfrp
->fr_next
!= NULL
)
936 curfrp
= curfrp
->fr_next
;
940 before
= (flags
& WSP_TOP
);
944 curfrp
= oldwin
->w_frame
;
945 if (flags
& WSP_BELOW
)
947 else if (flags
& WSP_ABOVE
)
950 #ifdef FEAT_VERTSPLIT
951 if (flags
& WSP_VERT
)
957 if (curfrp
->fr_parent
== NULL
|| curfrp
->fr_parent
->fr_layout
!= layout
)
959 /* Need to create a new frame in the tree to make a branch. */
960 frp
= (frame_T
*)alloc_clear((unsigned)sizeof(frame_T
));
962 curfrp
->fr_layout
= layout
;
963 frp
->fr_parent
= curfrp
;
966 curfrp
->fr_child
= frp
;
967 curfrp
->fr_win
= NULL
;
969 if (frp
->fr_win
!= NULL
)
970 oldwin
->w_frame
= frp
;
972 for (frp
= frp
->fr_child
; frp
!= NULL
; frp
= frp
->fr_next
)
973 frp
->fr_parent
= curfrp
;
979 frp
= newwin
->w_frame
;
980 frp
->fr_parent
= curfrp
->fr_parent
;
982 /* Insert the new frame at the right place in the frame list. */
984 frame_insert(curfrp
, frp
);
986 frame_append(curfrp
, frp
);
988 #ifdef FEAT_VERTSPLIT
989 if (flags
& WSP_VERT
)
991 wp
->w_p_scr
= curwin
->w_p_scr
;
994 win_new_height(oldwin
, oldwin
->w_height
- 1);
995 oldwin
->w_status_height
= need_status
;
997 if (flags
& (WSP_TOP
| WSP_BOT
))
999 /* set height and row of new window to full height */
1000 wp
->w_winrow
= tabline_height();
1001 win_new_height(wp
, curfrp
->fr_height
- (p_ls
> 0));
1002 wp
->w_status_height
= (p_ls
> 0);
1006 /* height and row of new window is same as current window */
1007 wp
->w_winrow
= oldwin
->w_winrow
;
1008 win_new_height(wp
, oldwin
->w_height
);
1009 wp
->w_status_height
= oldwin
->w_status_height
;
1011 frp
->fr_height
= curfrp
->fr_height
;
1013 /* "new_size" of the current window goes to the new window, use
1014 * one column for the vertical separator */
1015 win_new_width(wp
, new_size
);
1017 wp
->w_vsep_width
= 1;
1020 wp
->w_vsep_width
= oldwin
->w_vsep_width
;
1021 oldwin
->w_vsep_width
= 1;
1023 if (flags
& (WSP_TOP
| WSP_BOT
))
1025 if (flags
& WSP_BOT
)
1026 frame_add_vsep(curfrp
);
1027 /* Set width of neighbor frame */
1028 frame_new_width(curfrp
, curfrp
->fr_width
1029 - (new_size
+ ((flags
& WSP_TOP
) != 0)), flags
& WSP_TOP
,
1033 win_new_width(oldwin
, oldwin
->w_width
- (new_size
+ 1));
1034 if (before
) /* new window left of current one */
1036 wp
->w_wincol
= oldwin
->w_wincol
;
1037 oldwin
->w_wincol
+= new_size
+ 1;
1039 else /* new window right of current one */
1040 wp
->w_wincol
= oldwin
->w_wincol
+ oldwin
->w_width
+ 1;
1041 frame_fix_width(oldwin
);
1042 frame_fix_width(wp
);
1047 /* width and column of new window is same as current window */
1048 #ifdef FEAT_VERTSPLIT
1049 if (flags
& (WSP_TOP
| WSP_BOT
))
1052 win_new_width(wp
, Columns
);
1053 wp
->w_vsep_width
= 0;
1057 wp
->w_wincol
= oldwin
->w_wincol
;
1058 win_new_width(wp
, oldwin
->w_width
);
1059 wp
->w_vsep_width
= oldwin
->w_vsep_width
;
1061 frp
->fr_width
= curfrp
->fr_width
;
1064 /* "new_size" of the current window goes to the new window, use
1065 * one row for the status line */
1066 win_new_height(wp
, new_size
);
1067 if (flags
& (WSP_TOP
| WSP_BOT
))
1068 frame_new_height(curfrp
, curfrp
->fr_height
1069 - (new_size
+ STATUS_HEIGHT
), flags
& WSP_TOP
, FALSE
);
1071 win_new_height(oldwin
, oldwin_height
- (new_size
+ STATUS_HEIGHT
));
1072 if (before
) /* new window above current one */
1074 wp
->w_winrow
= oldwin
->w_winrow
;
1075 wp
->w_status_height
= STATUS_HEIGHT
;
1076 oldwin
->w_winrow
+= wp
->w_height
+ STATUS_HEIGHT
;
1078 else /* new window below current one */
1080 wp
->w_winrow
= oldwin
->w_winrow
+ oldwin
->w_height
+ STATUS_HEIGHT
;
1081 wp
->w_status_height
= oldwin
->w_status_height
;
1082 oldwin
->w_status_height
= STATUS_HEIGHT
;
1084 #ifdef FEAT_VERTSPLIT
1085 if (flags
& WSP_BOT
)
1086 frame_add_statusline(curfrp
);
1088 frame_fix_height(wp
);
1089 frame_fix_height(oldwin
);
1092 if (flags
& (WSP_TOP
| WSP_BOT
))
1093 (void)win_comp_pos();
1096 * Both windows need redrawing
1098 redraw_win_later(wp
, NOT_VALID
);
1099 wp
->w_redr_status
= TRUE
;
1100 redraw_win_later(oldwin
, NOT_VALID
);
1101 oldwin
->w_redr_status
= TRUE
;
1107 msg_clr_eos_force(); /* Old command/ruler may still be there */
1110 msg_col
= 0; /* put position back at start of line */
1114 * equalize the window sizes.
1116 if (do_equal
|| dir
!= 0)
1118 #ifdef FEAT_VERTSPLIT
1119 (flags
& WSP_VERT
) ? (dir
== 'v' ? 'b' : 'h')
1120 : dir
== 'h' ? 'b' :
1124 /* Don't change the window height/width to 'winheight' / 'winwidth' if a
1125 * size was given. */
1126 #ifdef FEAT_VERTSPLIT
1127 if (flags
& WSP_VERT
)
1134 /* When 'guioptions' includes 'L' or 'R' may have to add scrollbars. */
1136 gui_init_which_components(NULL
);
1148 * make the new window the current window
1150 win_enter(wp
, FALSE
);
1151 #ifdef FEAT_VERTSPLIT
1152 if (flags
& WSP_VERT
)
1163 * Initialize window "newp" from window "oldp".
1164 * Used when splitting a window and when creating a new tab page.
1165 * The windows will both edit the same buffer.
1166 * WSP_NEWLOC may be specified in flags to prevent the location list from
1170 win_init(newp
, oldp
, flags
)
1177 newp
->w_buffer
= oldp
->w_buffer
;
1178 oldp
->w_buffer
->b_nwindows
++;
1179 newp
->w_cursor
= oldp
->w_cursor
;
1181 newp
->w_curswant
= oldp
->w_curswant
;
1182 newp
->w_set_curswant
= oldp
->w_set_curswant
;
1183 newp
->w_topline
= oldp
->w_topline
;
1185 newp
->w_topfill
= oldp
->w_topfill
;
1187 newp
->w_leftcol
= oldp
->w_leftcol
;
1188 newp
->w_pcmark
= oldp
->w_pcmark
;
1189 newp
->w_prev_pcmark
= oldp
->w_prev_pcmark
;
1190 newp
->w_alt_fnum
= oldp
->w_alt_fnum
;
1191 newp
->w_wrow
= oldp
->w_wrow
;
1192 newp
->w_fraction
= oldp
->w_fraction
;
1193 newp
->w_prev_fraction_row
= oldp
->w_prev_fraction_row
;
1194 #ifdef FEAT_JUMPLIST
1195 copy_jumplist(oldp
, newp
);
1197 #ifdef FEAT_QUICKFIX
1198 if (flags
& WSP_NEWLOC
)
1200 /* Don't copy the location list. */
1201 newp
->w_llist
= NULL
;
1202 newp
->w_llist_ref
= NULL
;
1205 copy_loclist(oldp
, newp
);
1207 if (oldp
->w_localdir
!= NULL
)
1208 newp
->w_localdir
= vim_strsave(oldp
->w_localdir
);
1210 /* copy tagstack and folds */
1211 for (i
= 0; i
< oldp
->w_tagstacklen
; i
++)
1213 newp
->w_tagstack
[i
] = oldp
->w_tagstack
[i
];
1214 if (newp
->w_tagstack
[i
].tagname
!= NULL
)
1215 newp
->w_tagstack
[i
].tagname
=
1216 vim_strsave(newp
->w_tagstack
[i
].tagname
);
1218 newp
->w_tagstackidx
= oldp
->w_tagstackidx
;
1219 newp
->w_tagstacklen
= oldp
->w_tagstacklen
;
1220 # ifdef FEAT_FOLDING
1221 copyFoldingState(oldp
, newp
);
1224 win_init_some(newp
, oldp
);
1228 * Initialize window "newp" from window"old".
1229 * Only the essential things are copied.
1232 win_init_some(newp
, oldp
)
1236 /* Use the same argument list. */
1237 newp
->w_alist
= oldp
->w_alist
;
1238 ++newp
->w_alist
->al_refcount
;
1239 newp
->w_arg_idx
= oldp
->w_arg_idx
;
1241 /* copy options from existing window */
1242 win_copy_options(oldp
, newp
);
1245 #endif /* FEAT_WINDOWS */
1247 #if defined(FEAT_WINDOWS) || defined(PROTO)
1249 * Check if "win" is a pointer to an existing window.
1259 for (wp
= firstwin
; wp
!= NULL
; wp
= wp
->w_next
)
1266 * Return the number of windows.
1274 for (wp
= firstwin
; wp
!= NULL
; wp
= wp
->w_next
)
1280 * Make "count" windows on the screen.
1281 * Return actual number of windows on the screen.
1282 * Must be called when there is just one window, filling the whole screen
1283 * (excluding the command line).
1286 make_windows(count
, vertical
)
1288 int vertical UNUSED
; /* split windows vertically if TRUE */
1293 #ifdef FEAT_VERTSPLIT
1296 /* Each windows needs at least 'winminwidth' lines and a separator
1298 maxcount
= (curwin
->w_width
+ curwin
->w_vsep_width
1299 - (p_wiw
- p_wmw
)) / (p_wmw
+ 1);
1304 /* Each window needs at least 'winminheight' lines and a status line. */
1305 maxcount
= (curwin
->w_height
+ curwin
->w_status_height
1306 - (p_wh
- p_wmh
)) / (p_wmh
+ STATUS_HEIGHT
);
1311 if (count
> maxcount
)
1315 * add status line now, otherwise first window will be too big
1322 * Don't execute autocommands while creating the windows. Must do that
1323 * when putting the buffers in the windows.
1328 /* todo is number of windows left to create */
1329 for (todo
= count
- 1; todo
> 0; --todo
)
1330 #ifdef FEAT_VERTSPLIT
1333 if (win_split(curwin
->w_width
- (curwin
->w_width
- todo
)
1334 / (todo
+ 1) - 1, WSP_VERT
| WSP_ABOVE
) == FAIL
)
1340 if (win_split(curwin
->w_height
- (curwin
->w_height
- todo
1341 * STATUS_HEIGHT
) / (todo
+ 1)
1342 - STATUS_HEIGHT
, WSP_ABOVE
) == FAIL
)
1350 /* return actual number of windows */
1351 return (count
- todo
);
1355 * Exchange current and next window
1358 win_exchange(Prenum
)
1367 if (lastwin
== firstwin
) /* just one window */
1374 need_mouse_correct
= TRUE
;
1378 * find window to exchange with
1382 frp
= curwin
->w_frame
->fr_parent
->fr_child
;
1383 while (frp
!= NULL
&& --Prenum
> 0)
1386 else if (curwin
->w_frame
->fr_next
!= NULL
) /* Swap with next */
1387 frp
= curwin
->w_frame
->fr_next
;
1388 else /* Swap last window in row/col with previous */
1389 frp
= curwin
->w_frame
->fr_prev
;
1391 /* We can only exchange a window with another window, not with a frame
1392 * containing windows. */
1393 if (frp
== NULL
|| frp
->fr_win
== NULL
|| frp
->fr_win
== curwin
)
1398 * 1. remove curwin from the list. Remember after which window it was in wp2
1399 * 2. insert curwin before wp in the list
1401 * 3. remove wp from the list
1402 * 4. insert wp after wp2
1403 * 5. exchange the status line height and vsep width.
1405 wp2
= curwin
->w_prev
;
1406 frp2
= curwin
->w_frame
->fr_prev
;
1407 if (wp
->w_prev
!= curwin
)
1409 win_remove(curwin
, NULL
);
1410 frame_remove(curwin
->w_frame
);
1411 win_append(wp
->w_prev
, curwin
);
1412 frame_insert(frp
, curwin
->w_frame
);
1416 win_remove(wp
, NULL
);
1417 frame_remove(wp
->w_frame
);
1418 win_append(wp2
, wp
);
1420 frame_insert(wp
->w_frame
->fr_parent
->fr_child
, wp
->w_frame
);
1422 frame_append(frp2
, wp
->w_frame
);
1424 temp
= curwin
->w_status_height
;
1425 curwin
->w_status_height
= wp
->w_status_height
;
1426 wp
->w_status_height
= temp
;
1427 #ifdef FEAT_VERTSPLIT
1428 temp
= curwin
->w_vsep_width
;
1429 curwin
->w_vsep_width
= wp
->w_vsep_width
;
1430 wp
->w_vsep_width
= temp
;
1432 /* If the windows are not in the same frame, exchange the sizes to avoid
1433 * messing up the window layout. Otherwise fix the frame sizes. */
1434 if (curwin
->w_frame
->fr_parent
!= wp
->w_frame
->fr_parent
)
1436 temp
= curwin
->w_height
;
1437 curwin
->w_height
= wp
->w_height
;
1438 wp
->w_height
= temp
;
1439 temp
= curwin
->w_width
;
1440 curwin
->w_width
= wp
->w_width
;
1445 frame_fix_height(curwin
);
1446 frame_fix_height(wp
);
1447 frame_fix_width(curwin
);
1448 frame_fix_width(wp
);
1452 (void)win_comp_pos(); /* recompute window positions */
1454 win_enter(wp
, TRUE
);
1455 redraw_later(CLEAR
);
1459 * rotate windows: if upwards TRUE the second window becomes the first one
1460 * if upwards FALSE the first window becomes the second one
1463 win_rotate(upwards
, count
)
1472 if (firstwin
== lastwin
) /* nothing to do */
1479 need_mouse_correct
= TRUE
;
1482 #ifdef FEAT_VERTSPLIT
1483 /* Check if all frames in this row/col have one window. */
1484 for (frp
= curwin
->w_frame
->fr_parent
->fr_child
; frp
!= NULL
;
1486 if (frp
->fr_win
== NULL
)
1488 EMSG(_("E443: Cannot rotate when another window is split"));
1495 if (upwards
) /* first window becomes last window */
1497 /* remove first window/frame from the list */
1498 frp
= curwin
->w_frame
->fr_parent
->fr_child
;
1500 win_remove(wp1
, NULL
);
1503 /* find last frame and append removed window/frame after it */
1504 for ( ; frp
->fr_next
!= NULL
; frp
= frp
->fr_next
)
1506 win_append(frp
->fr_win
, wp1
);
1507 frame_append(frp
, wp1
->w_frame
);
1509 wp2
= frp
->fr_win
; /* previously last window */
1511 else /* last window becomes first window */
1513 /* find last window/frame in the list and remove it */
1514 for (frp
= curwin
->w_frame
; frp
->fr_next
!= NULL
;
1518 wp2
= wp1
->w_prev
; /* will become last window */
1519 win_remove(wp1
, NULL
);
1522 /* append the removed window/frame before the first in the list */
1523 win_append(frp
->fr_parent
->fr_child
->fr_win
->w_prev
, wp1
);
1524 frame_insert(frp
->fr_parent
->fr_child
, frp
);
1527 /* exchange status height and vsep width of old and new last window */
1528 n
= wp2
->w_status_height
;
1529 wp2
->w_status_height
= wp1
->w_status_height
;
1530 wp1
->w_status_height
= n
;
1531 frame_fix_height(wp1
);
1532 frame_fix_height(wp2
);
1533 #ifdef FEAT_VERTSPLIT
1534 n
= wp2
->w_vsep_width
;
1535 wp2
->w_vsep_width
= wp1
->w_vsep_width
;
1536 wp1
->w_vsep_width
= n
;
1537 frame_fix_width(wp1
);
1538 frame_fix_width(wp2
);
1541 /* recompute w_winrow and w_wincol for all windows */
1542 (void)win_comp_pos();
1545 redraw_later(CLEAR
);
1549 * Move the current window to the very top/bottom/left/right of the screen.
1552 win_totop(size
, flags
)
1557 int height
= curwin
->w_height
;
1559 if (lastwin
== firstwin
)
1565 /* Remove the window and frame from the tree of frames. */
1566 (void)winframe_remove(curwin
, &dir
, NULL
);
1567 win_remove(curwin
, NULL
);
1568 last_status(FALSE
); /* may need to remove last status line */
1569 (void)win_comp_pos(); /* recompute window positions */
1571 /* Split a window on the desired side and put the window there. */
1572 (void)win_split_ins(size
, flags
, curwin
, dir
);
1573 if (!(flags
& WSP_VERT
))
1575 win_setheight(height
);
1577 win_equal(curwin
, TRUE
, 'v');
1580 #if defined(FEAT_GUI) && defined(FEAT_VERTSPLIT)
1581 /* When 'guioptions' includes 'L' or 'R' may have to remove or add
1582 * scrollbars. Have to update them anyway. */
1583 gui_may_update_scrollbars();
1588 * Move window "win1" to below/right of "win2" and make "win1" the current
1589 * window. Only works within the same frame!
1592 win_move_after(win1
, win2
)
1597 /* check if the arguments are reasonable */
1601 /* check if there is something to do */
1602 if (win2
->w_next
!= win1
)
1604 /* may need move the status line/vertical separator of the last window
1606 if (win1
== lastwin
)
1608 height
= win1
->w_prev
->w_status_height
;
1609 win1
->w_prev
->w_status_height
= win1
->w_status_height
;
1610 win1
->w_status_height
= height
;
1611 #ifdef FEAT_VERTSPLIT
1612 if (win1
->w_prev
->w_vsep_width
== 1)
1614 /* Remove the vertical separator from the last-but-one window,
1615 * add it to the last window. Adjust the frame widths. */
1616 win1
->w_prev
->w_vsep_width
= 0;
1617 win1
->w_prev
->w_frame
->fr_width
-= 1;
1618 win1
->w_vsep_width
= 1;
1619 win1
->w_frame
->fr_width
+= 1;
1623 else if (win2
== lastwin
)
1625 height
= win1
->w_status_height
;
1626 win1
->w_status_height
= win2
->w_status_height
;
1627 win2
->w_status_height
= height
;
1628 #ifdef FEAT_VERTSPLIT
1629 if (win1
->w_vsep_width
== 1)
1631 /* Remove the vertical separator from win1, add it to the last
1632 * window, win2. Adjust the frame widths. */
1633 win2
->w_vsep_width
= 1;
1634 win2
->w_frame
->fr_width
+= 1;
1635 win1
->w_vsep_width
= 0;
1636 win1
->w_frame
->fr_width
-= 1;
1640 win_remove(win1
, NULL
);
1641 frame_remove(win1
->w_frame
);
1642 win_append(win2
, win1
);
1643 frame_append(win2
->w_frame
, win1
->w_frame
);
1645 (void)win_comp_pos(); /* recompute w_winrow for all windows */
1646 redraw_later(NOT_VALID
);
1648 win_enter(win1
, FALSE
);
1652 * Make all windows the same height.
1653 * 'next_curwin' will soon be the current window, make sure it has enough
1657 win_equal(next_curwin
, current
, dir
)
1658 win_T
*next_curwin
; /* pointer to current window to be or NULL */
1659 int current
; /* do only frame with current window */
1660 int dir
; /* 'v' for vertically, 'h' for horizontally,
1661 'b' for both, 0 for using p_ead */
1664 #ifdef FEAT_VERTSPLIT
1669 win_equal_rec(next_curwin
== NULL
? curwin
: next_curwin
, current
,
1670 topframe
, dir
, 0, tabline_height(),
1671 (int)Columns
, topframe
->fr_height
);
1675 * Set a frame to a new position and height, spreading the available room
1676 * equally over contained frames.
1677 * The window "next_curwin" (if not NULL) should at least get the size from
1678 * 'winheight' and 'winwidth' if possible.
1681 win_equal_rec(next_curwin
, current
, topfr
, dir
, col
, row
, width
, height
)
1682 win_T
*next_curwin
; /* pointer to current window to be or NULL */
1683 int current
; /* do only frame with current window */
1684 frame_T
*topfr
; /* frame to set size off */
1685 int dir
; /* 'v', 'h' or 'b', see win_equal() */
1686 int col
; /* horizontal position for frame */
1687 int row
; /* vertical position for frame */
1688 int width
; /* new width of frame */
1689 int height
; /* new height of frame */
1693 int wincount
, totwincount
= 0;
1695 int next_curwin_size
= 0;
1698 int has_next_curwin
= 0;
1701 if (topfr
->fr_layout
== FR_LEAF
)
1703 /* Set the width/height of this frame.
1704 * Redraw when size or position changes */
1705 if (topfr
->fr_height
!= height
|| topfr
->fr_win
->w_winrow
!= row
1706 #ifdef FEAT_VERTSPLIT
1707 || topfr
->fr_width
!= width
|| topfr
->fr_win
->w_wincol
!= col
1711 topfr
->fr_win
->w_winrow
= row
;
1712 frame_new_height(topfr
, height
, FALSE
, FALSE
);
1713 #ifdef FEAT_VERTSPLIT
1714 topfr
->fr_win
->w_wincol
= col
;
1715 frame_new_width(topfr
, width
, FALSE
, FALSE
);
1717 redraw_all_later(CLEAR
);
1720 #ifdef FEAT_VERTSPLIT
1721 else if (topfr
->fr_layout
== FR_ROW
)
1723 topfr
->fr_width
= width
;
1724 topfr
->fr_height
= height
;
1726 if (dir
!= 'v') /* equalize frame widths */
1728 /* Compute the maximum number of windows horizontally in this
1730 n
= frame_minwidth(topfr
, NOWIN
);
1731 /* add one for the rightmost window, it doesn't have a separator */
1732 if (col
+ width
== Columns
)
1736 totwincount
= (n
+ extra_sep
) / (p_wmw
+ 1);
1737 has_next_curwin
= frame_has_win(topfr
, next_curwin
);
1740 * Compute width for "next_curwin" window and room available for
1742 * "m" is the minimal width when counting p_wiw for "next_curwin".
1744 m
= frame_minwidth(topfr
, next_curwin
);
1748 next_curwin_size
= p_wiw
+ room
;
1753 next_curwin_size
= -1;
1754 for (fr
= topfr
->fr_child
; fr
!= NULL
; fr
= fr
->fr_next
)
1756 /* If 'winfixwidth' set keep the window width if
1758 * Watch out for this window being the next_curwin. */
1759 if (frame_fixed_width(fr
))
1761 n
= frame_minwidth(fr
, NOWIN
);
1762 new_size
= fr
->fr_width
;
1763 if (frame_has_win(fr
, next_curwin
))
1765 room
+= p_wiw
- p_wmw
;
1766 next_curwin_size
= 0;
1767 if (new_size
< p_wiw
)
1771 /* These windows don't use up room. */
1772 totwincount
-= (n
+ (fr
->fr_next
== NULL
1773 ? extra_sep
: 0)) / (p_wmw
+ 1);
1774 room
-= new_size
- n
;
1780 fr
->fr_newwidth
= new_size
;
1783 if (next_curwin_size
== -1)
1785 if (!has_next_curwin
)
1786 next_curwin_size
= 0;
1787 else if (totwincount
> 1
1788 && (room
+ (totwincount
- 2))
1789 / (totwincount
- 1) > p_wiw
)
1791 /* Can make all windows wider than 'winwidth', spread
1792 * the room equally. */
1793 next_curwin_size
= (room
+ p_wiw
1794 + (totwincount
- 1) * p_wmw
1795 + (totwincount
- 1)) / totwincount
;
1796 room
-= next_curwin_size
- p_wiw
;
1799 next_curwin_size
= p_wiw
;
1803 if (has_next_curwin
)
1804 --totwincount
; /* don't count curwin */
1807 for (fr
= topfr
->fr_child
; fr
!= NULL
; fr
= fr
->fr_next
)
1811 if (fr
->fr_next
== NULL
)
1812 /* last frame gets all that remains (avoid roundoff error) */
1814 else if (dir
== 'v')
1815 new_size
= fr
->fr_width
;
1816 else if (frame_fixed_width(fr
))
1818 new_size
= fr
->fr_newwidth
;
1819 wincount
= 0; /* doesn't count as a sizeable window */
1823 /* Compute the maximum number of windows horiz. in "fr". */
1824 n
= frame_minwidth(fr
, NOWIN
);
1825 wincount
= (n
+ (fr
->fr_next
== NULL
? extra_sep
: 0))
1827 m
= frame_minwidth(fr
, next_curwin
);
1828 if (has_next_curwin
)
1829 hnc
= frame_has_win(fr
, next_curwin
);
1832 if (hnc
) /* don't count next_curwin */
1834 if (totwincount
== 0)
1837 new_size
= (wincount
* room
+ ((unsigned)totwincount
>> 1))
1839 if (hnc
) /* add next_curwin size */
1841 next_curwin_size
-= p_wiw
- (m
- n
);
1842 new_size
+= next_curwin_size
;
1843 room
-= new_size
- next_curwin_size
;
1850 /* Skip frame that is full width when splitting or closing a
1851 * window, unless equalizing all frames. */
1852 if (!current
|| dir
!= 'v' || topfr
->fr_parent
!= NULL
1853 || (new_size
!= fr
->fr_width
)
1854 || frame_has_win(fr
, next_curwin
))
1855 win_equal_rec(next_curwin
, current
, fr
, dir
, col
, row
,
1859 totwincount
-= wincount
;
1863 else /* topfr->fr_layout == FR_COL */
1865 #ifdef FEAT_VERTSPLIT
1866 topfr
->fr_width
= width
;
1868 topfr
->fr_height
= height
;
1870 if (dir
!= 'h') /* equalize frame heights */
1872 /* Compute maximum number of windows vertically in this frame. */
1873 n
= frame_minheight(topfr
, NOWIN
);
1874 /* add one for the bottom window if it doesn't have a statusline */
1875 if (row
+ height
== cmdline_row
&& p_ls
== 0)
1879 totwincount
= (n
+ extra_sep
) / (p_wmh
+ 1);
1880 has_next_curwin
= frame_has_win(topfr
, next_curwin
);
1883 * Compute height for "next_curwin" window and room available for
1885 * "m" is the minimal height when counting p_wh for "next_curwin".
1887 m
= frame_minheight(topfr
, next_curwin
);
1891 /* The room is less then 'winheight', use all space for the
1892 * current window. */
1893 next_curwin_size
= p_wh
+ room
;
1898 next_curwin_size
= -1;
1899 for (fr
= topfr
->fr_child
; fr
!= NULL
; fr
= fr
->fr_next
)
1901 /* If 'winfixheight' set keep the window height if
1903 * Watch out for this window being the next_curwin. */
1904 if (frame_fixed_height(fr
))
1906 n
= frame_minheight(fr
, NOWIN
);
1907 new_size
= fr
->fr_height
;
1908 if (frame_has_win(fr
, next_curwin
))
1910 room
+= p_wh
- p_wmh
;
1911 next_curwin_size
= 0;
1912 if (new_size
< p_wh
)
1916 /* These windows don't use up room. */
1917 totwincount
-= (n
+ (fr
->fr_next
== NULL
1918 ? extra_sep
: 0)) / (p_wmh
+ 1);
1919 room
-= new_size
- n
;
1925 fr
->fr_newheight
= new_size
;
1928 if (next_curwin_size
== -1)
1930 if (!has_next_curwin
)
1931 next_curwin_size
= 0;
1932 else if (totwincount
> 1
1933 && (room
+ (totwincount
- 2))
1934 / (totwincount
- 1) > p_wh
)
1936 /* can make all windows higher than 'winheight',
1937 * spread the room equally. */
1938 next_curwin_size
= (room
+ p_wh
1939 + (totwincount
- 1) * p_wmh
1940 + (totwincount
- 1)) / totwincount
;
1941 room
-= next_curwin_size
- p_wh
;
1944 next_curwin_size
= p_wh
;
1948 if (has_next_curwin
)
1949 --totwincount
; /* don't count curwin */
1952 for (fr
= topfr
->fr_child
; fr
!= NULL
; fr
= fr
->fr_next
)
1956 if (fr
->fr_next
== NULL
)
1957 /* last frame gets all that remains (avoid roundoff error) */
1959 else if (dir
== 'h')
1960 new_size
= fr
->fr_height
;
1961 else if (frame_fixed_height(fr
))
1963 new_size
= fr
->fr_newheight
;
1964 wincount
= 0; /* doesn't count as a sizeable window */
1968 /* Compute the maximum number of windows vert. in "fr". */
1969 n
= frame_minheight(fr
, NOWIN
);
1970 wincount
= (n
+ (fr
->fr_next
== NULL
? extra_sep
: 0))
1972 m
= frame_minheight(fr
, next_curwin
);
1973 if (has_next_curwin
)
1974 hnc
= frame_has_win(fr
, next_curwin
);
1977 if (hnc
) /* don't count next_curwin */
1979 if (totwincount
== 0)
1982 new_size
= (wincount
* room
+ ((unsigned)totwincount
>> 1))
1984 if (hnc
) /* add next_curwin size */
1986 next_curwin_size
-= p_wh
- (m
- n
);
1987 new_size
+= next_curwin_size
;
1988 room
-= new_size
- next_curwin_size
;
1994 /* Skip frame that is full width when splitting or closing a
1995 * window, unless equalizing all frames. */
1996 if (!current
|| dir
!= 'h' || topfr
->fr_parent
!= NULL
1997 || (new_size
!= fr
->fr_height
)
1998 || frame_has_win(fr
, next_curwin
))
1999 win_equal_rec(next_curwin
, current
, fr
, dir
, col
, row
,
2003 totwincount
-= wincount
;
2009 * close all windows for buffer 'buf'
2012 close_windows(buf
, keep_curwin
)
2014 int keep_curwin
; /* don't close "curwin" */
2017 tabpage_T
*tp
, *nexttp
;
2018 int h
= tabline_height();
2020 ++RedrawingDisabled
;
2022 for (wp
= firstwin
; wp
!= NULL
&& lastwin
!= firstwin
; )
2024 if (wp
->w_buffer
== buf
&& (!keep_curwin
|| wp
!= curwin
))
2026 win_close(wp
, FALSE
);
2028 /* Start all over, autocommands may change the window layout. */
2035 /* Also check windows in other tab pages. */
2036 for (tp
= first_tabpage
; tp
!= NULL
; tp
= nexttp
)
2038 nexttp
= tp
->tp_next
;
2040 for (wp
= tp
->tp_firstwin
; wp
!= NULL
; wp
= wp
->w_next
)
2041 if (wp
->w_buffer
== buf
)
2043 win_close_othertab(wp
, FALSE
, tp
);
2045 /* Start all over, the tab page may be closed and
2046 * autocommands may change the window layout. */
2047 nexttp
= first_tabpage
;
2052 --RedrawingDisabled
;
2054 if (h
!= tabline_height())
2059 * Return TRUE if the current window is the only window that exists (ignoring
2061 * Returns FALSE if there is a window, possibly in another tab page.
2066 return (one_window() && first_tabpage
->tp_next
== NULL
);
2070 * Return TRUE if there is only one window other than "aucmd_win" in the
2078 int seen_one
= FALSE
;
2082 if (wp
!= aucmd_win
)
2091 return firstwin
== lastwin
;
2096 * Close window "win". Only works for the current tab page.
2097 * If "free_buf" is TRUE related buffer may be unloaded.
2099 * called by :quit, :close, :xit, :wq and findtag()
2102 win_close(win
, free_buf
)
2108 int other_buffer
= FALSE
;
2110 int close_curwin
= FALSE
;
2112 int help_window
= FALSE
;
2113 tabpage_T
*prev_curtab
= curtab
;
2117 EMSG(_("E444: Cannot close last window"));
2122 if (win
== aucmd_win
)
2124 EMSG(_("E813: Cannot close autocmd window"));
2127 if ((firstwin
== aucmd_win
|| lastwin
== aucmd_win
) && one_window())
2129 EMSG(_("E814: Cannot close window, only autocmd window would remain"));
2135 * When closing the last window in a tab page first go to another tab
2136 * page and then close the window and the tab page. This avoids that
2137 * curwin and curtab are not invalid while we are freeing memory, they may
2138 * be used in GUI events.
2140 if (firstwin
== lastwin
)
2142 goto_tabpage_tp(alt_tabpage());
2143 redraw_tabline
= TRUE
;
2145 /* Safety check: Autocommands may have closed the window when jumping
2146 * to the other tab page. */
2147 if (valid_tabpage(prev_curtab
) && prev_curtab
->tp_firstwin
== win
)
2149 int h
= tabline_height();
2151 win_close_othertab(win
, free_buf
, prev_curtab
);
2152 if (h
!= tabline_height())
2158 /* When closing the help window, try restoring a snapshot after closing
2159 * the window. Otherwise clear the snapshot, it's now invalid. */
2160 if (win
->w_buffer
->b_help
)
2163 clear_snapshot(curtab
, SNAP_HELP_IDX
);
2169 * Guess which window is going to be the new current window.
2170 * This may change because of the autocommands (sigh).
2172 wp
= frame2win(win_altframe(win
, NULL
));
2175 * Be careful: If autocommands delete the window, return now.
2177 if (wp
->w_buffer
!= curbuf
)
2179 other_buffer
= TRUE
;
2180 apply_autocmds(EVENT_BUFLEAVE
, NULL
, NULL
, FALSE
, curbuf
);
2181 if (!win_valid(win
) || last_window())
2184 apply_autocmds(EVENT_WINLEAVE
, NULL
, NULL
, FALSE
, curbuf
);
2185 if (!win_valid(win
) || last_window())
2188 /* autocmds may abort script processing */
2196 /* Avoid trouble with scrollbars that are going to be deleted in
2203 * Close the link to the buffer.
2205 close_buffer(win
, win
->w_buffer
, free_buf
? DOBUF_UNLOAD
: 0);
2207 /* Autocommands may have closed the window already, or closed the only
2208 * other window or moved to another tab page. */
2209 if (!win_valid(win
) || last_window() || curtab
!= prev_curtab
)
2212 /* Free the memory used for the window. */
2213 wp
= win_free_mem(win
, &dir
, NULL
);
2215 /* Make sure curwin isn't invalid. It can cause severe trouble when
2216 * printing an error message. For win_equal() curbuf needs to be valid
2221 #ifdef FEAT_QUICKFIX
2222 if (wp
->w_p_pvw
|| bt_quickfix(wp
->w_buffer
))
2225 * If the cursor goes to the preview or the quickfix window, try
2226 * finding another window to go to.
2230 if (wp
->w_next
== NULL
)
2236 if (!wp
->w_p_pvw
&& !bt_quickfix(wp
->w_buffer
))
2244 curbuf
= curwin
->w_buffer
;
2245 close_curwin
= TRUE
;
2248 #ifdef FEAT_VERTSPLIT
2249 && (*p_ead
== 'b' || *p_ead
== dir
)
2252 win_equal(curwin
, TRUE
,
2253 #ifdef FEAT_VERTSPLIT
2263 win_enter_ext(wp
, FALSE
, TRUE
);
2266 /* careful: after this wp and win may be invalid! */
2267 apply_autocmds(EVENT_BUFENTER
, NULL
, NULL
, FALSE
, curbuf
);
2272 * If last window has a status line now and we don't want one,
2273 * remove the status line.
2277 /* After closing the help window, try restoring the window layout from
2278 * before it was opened. */
2280 restore_snapshot(SNAP_HELP_IDX
, close_curwin
);
2282 #if defined(FEAT_GUI) && defined(FEAT_VERTSPLIT)
2283 /* When 'guioptions' includes 'L' or 'R' may have to remove scrollbars. */
2284 if (gui
.in_use
&& !win_hasvertsplit())
2285 gui_init_which_components(NULL
);
2288 redraw_all_later(NOT_VALID
);
2292 * Close window "win" in tab page "tp", which is not the current tab page.
2293 * This may be the last window ih that tab page and result in closing the tab,
2294 * thus "tp" may become invalid!
2295 * Caller must check if buffer is hidden and whether the tabline needs to be
2299 win_close_othertab(win
, free_buf
, tp
)
2306 tabpage_T
*ptp
= NULL
;
2308 /* Close the link to the buffer. */
2309 close_buffer(win
, win
->w_buffer
, free_buf
? DOBUF_UNLOAD
: 0);
2311 /* Careful: Autocommands may have closed the tab page or made it the
2312 * current tab page. */
2313 for (ptp
= first_tabpage
; ptp
!= NULL
&& ptp
!= tp
; ptp
= ptp
->tp_next
)
2315 if (ptp
== NULL
|| tp
== curtab
)
2318 /* Autocommands may have closed the window already. */
2319 for (wp
= tp
->tp_firstwin
; wp
!= NULL
&& wp
!= win
; wp
= wp
->w_next
)
2324 /* Free the memory used for the window. */
2325 wp
= win_free_mem(win
, &dir
, tp
);
2327 /* When closing the last window in a tab page remove the tab page. */
2330 if (tp
== first_tabpage
)
2331 first_tabpage
= tp
->tp_next
;
2334 for (ptp
= first_tabpage
; ptp
!= NULL
&& ptp
->tp_next
!= tp
;
2339 EMSG2(_(e_intern2
), "win_close_othertab()");
2342 ptp
->tp_next
= tp
->tp_next
;
2349 * Free the memory used for a window.
2350 * Returns a pointer to the window that got the freed up space.
2353 win_free_mem(win
, dirp
, tp
)
2355 int *dirp
; /* set to 'v' or 'h' for direction if 'ea' */
2356 tabpage_T
*tp
; /* tab page "win" is in, NULL for current */
2361 /* Remove the window and its frame from the tree of frames. */
2363 wp
= winframe_remove(win
, dirp
, tp
);
2367 /* When deleting the current window of another tab page select a new
2368 * current window. */
2369 if (tp
!= NULL
&& win
== tp
->tp_curwin
)
2375 #if defined(EXITFREE) || defined(PROTO)
2381 # ifdef FEAT_WINDOWS
2382 while (first_tabpage
->tp_next
!= NULL
)
2383 tabpage_close(TRUE
);
2386 # ifdef FEAT_AUTOCMD
2387 if (aucmd_win
!= NULL
)
2389 (void)win_free_mem(aucmd_win
, &dummy
, NULL
);
2394 while (firstwin
!= NULL
)
2395 (void)win_free_mem(firstwin
, &dummy
, NULL
);
2400 * Remove a window and its frame from the tree of frames.
2401 * Returns a pointer to the window that got the freed up space.
2404 winframe_remove(win
, dirp
, tp
)
2406 int *dirp UNUSED
; /* set to 'v' or 'h' for direction if 'ea' */
2407 tabpage_T
*tp
; /* tab page "win" is in, NULL for current */
2409 frame_T
*frp
, *frp2
, *frp3
;
2410 frame_T
*frp_close
= win
->w_frame
;
2414 * If there is only one window there is nothing to remove.
2416 if (tp
== NULL
? firstwin
== lastwin
: tp
->tp_firstwin
== tp
->tp_lastwin
)
2420 * Remove the window from its frame.
2422 frp2
= win_altframe(win
, tp
);
2423 wp
= frame2win(frp2
);
2425 /* Remove this frame from the list of frames. */
2426 frame_remove(frp_close
);
2428 #ifdef FEAT_VERTSPLIT
2429 if (frp_close
->fr_parent
->fr_layout
== FR_COL
)
2432 /* When 'winfixheight' is set, try to find another frame in the column
2433 * (as close to the closed frame as possible) to distribute the height
2435 if (frp2
->fr_win
!= NULL
&& frp2
->fr_win
->w_p_wfh
)
2437 frp
= frp_close
->fr_prev
;
2438 frp3
= frp_close
->fr_next
;
2439 while (frp
!= NULL
|| frp3
!= NULL
)
2443 if (frp
->fr_win
!= NULL
&& !frp
->fr_win
->w_p_wfh
)
2453 if (frp3
->fr_win
!= NULL
&& !frp3
->fr_win
->w_p_wfh
)
2459 frp3
= frp3
->fr_next
;
2463 frame_new_height(frp2
, frp2
->fr_height
+ frp_close
->fr_height
,
2464 frp2
== frp_close
->fr_next
? TRUE
: FALSE
, FALSE
);
2465 #ifdef FEAT_VERTSPLIT
2470 /* When 'winfixwidth' is set, try to find another frame in the column
2471 * (as close to the closed frame as possible) to distribute the width
2473 if (frp2
->fr_win
!= NULL
&& frp2
->fr_win
->w_p_wfw
)
2475 frp
= frp_close
->fr_prev
;
2476 frp3
= frp_close
->fr_next
;
2477 while (frp
!= NULL
|| frp3
!= NULL
)
2481 if (frp
->fr_win
!= NULL
&& !frp
->fr_win
->w_p_wfw
)
2491 if (frp3
->fr_win
!= NULL
&& !frp3
->fr_win
->w_p_wfw
)
2497 frp3
= frp3
->fr_next
;
2501 frame_new_width(frp2
, frp2
->fr_width
+ frp_close
->fr_width
,
2502 frp2
== frp_close
->fr_next
? TRUE
: FALSE
, FALSE
);
2507 /* If rows/columns go to a window below/right its positions need to be
2508 * updated. Can only be done after the sizes have been updated. */
2509 if (frp2
== frp_close
->fr_next
)
2511 int row
= win
->w_winrow
;
2512 int col
= W_WINCOL(win
);
2514 frame_comp_pos(frp2
, &row
, &col
);
2517 if (frp2
->fr_next
== NULL
&& frp2
->fr_prev
== NULL
)
2519 /* There is no other frame in this list, move its info to the parent
2521 frp2
->fr_parent
->fr_layout
= frp2
->fr_layout
;
2522 frp2
->fr_parent
->fr_child
= frp2
->fr_child
;
2523 for (frp
= frp2
->fr_child
; frp
!= NULL
; frp
= frp
->fr_next
)
2524 frp
->fr_parent
= frp2
->fr_parent
;
2525 frp2
->fr_parent
->fr_win
= frp2
->fr_win
;
2526 if (frp2
->fr_win
!= NULL
)
2527 frp2
->fr_win
->w_frame
= frp2
->fr_parent
;
2528 frp
= frp2
->fr_parent
;
2531 frp2
= frp
->fr_parent
;
2532 if (frp2
!= NULL
&& frp2
->fr_layout
== frp
->fr_layout
)
2534 /* The frame above the parent has the same layout, have to merge
2535 * the frames into this list. */
2536 if (frp2
->fr_child
== frp
)
2537 frp2
->fr_child
= frp
->fr_child
;
2538 frp
->fr_child
->fr_prev
= frp
->fr_prev
;
2539 if (frp
->fr_prev
!= NULL
)
2540 frp
->fr_prev
->fr_next
= frp
->fr_child
;
2541 for (frp3
= frp
->fr_child
; ; frp3
= frp3
->fr_next
)
2543 frp3
->fr_parent
= frp2
;
2544 if (frp3
->fr_next
== NULL
)
2546 frp3
->fr_next
= frp
->fr_next
;
2547 if (frp
->fr_next
!= NULL
)
2548 frp
->fr_next
->fr_prev
= frp3
;
2560 * Find out which frame is going to get the freed up space when "win" is
2562 * if 'splitbelow'/'splitleft' the space goes to the window above/left.
2563 * if 'nosplitbelow'/'nosplitleft' the space goes to the window below/right.
2564 * This makes opening a window and closing it immediately keep the same window
2568 win_altframe(win
, tp
)
2570 tabpage_T
*tp
; /* tab page "win" is in, NULL for current */
2575 if (tp
== NULL
? firstwin
== lastwin
: tp
->tp_firstwin
== tp
->tp_lastwin
)
2576 /* Last window in this tab page, will go to next tab page. */
2577 return alt_tabpage()->tp_curwin
->w_frame
;
2580 #ifdef FEAT_VERTSPLIT
2581 if (frp
->fr_parent
!= NULL
&& frp
->fr_parent
->fr_layout
== FR_ROW
)
2586 if ((!b
&& frp
->fr_next
!= NULL
) || frp
->fr_prev
== NULL
)
2587 return frp
->fr_next
;
2588 return frp
->fr_prev
;
2592 * Return the tabpage that will be used if the current one is closed.
2599 /* Use the next tab page if possible. */
2600 if (curtab
->tp_next
!= NULL
)
2601 return curtab
->tp_next
;
2603 /* Find the last but one tab page. */
2604 for (tp
= first_tabpage
; tp
->tp_next
!= curtab
; tp
= tp
->tp_next
)
2610 * Find the left-upper window in frame "frp".
2616 while (frp
->fr_win
== NULL
)
2617 frp
= frp
->fr_child
;
2622 * Return TRUE if frame "frp" contains window "wp".
2625 frame_has_win(frp
, wp
)
2631 if (frp
->fr_layout
== FR_LEAF
)
2632 return frp
->fr_win
== wp
;
2634 for (p
= frp
->fr_child
; p
!= NULL
; p
= p
->fr_next
)
2635 if (frame_has_win(p
, wp
))
2641 * Set a new height for a frame. Recursively sets the height for contained
2642 * frames and windows. Caller must take care of positions.
2645 frame_new_height(topfrp
, height
, topfirst
, wfh
)
2648 int topfirst
; /* resize topmost contained frame first */
2649 int wfh
; /* obey 'winfixheight' when there is a choice;
2650 may cause the height not to be set */
2656 if (topfrp
->fr_win
!= NULL
)
2658 /* Simple case: just one window. */
2659 win_new_height(topfrp
->fr_win
,
2660 height
- topfrp
->fr_win
->w_status_height
);
2662 #ifdef FEAT_VERTSPLIT
2663 else if (topfrp
->fr_layout
== FR_ROW
)
2667 /* All frames in this row get the same new height. */
2668 for (frp
= topfrp
->fr_child
; frp
!= NULL
; frp
= frp
->fr_next
)
2670 frame_new_height(frp
, height
, topfirst
, wfh
);
2671 if (frp
->fr_height
> height
)
2673 /* Could not fit the windows, make the whole row higher. */
2674 height
= frp
->fr_height
;
2679 while (frp
!= NULL
);
2682 else /* fr_layout == FR_COL */
2684 /* Complicated case: Resize a column of frames. Resize the bottom
2685 * frame first, frames above that when needed. */
2687 frp
= topfrp
->fr_child
;
2689 /* Advance past frames with one window with 'wfh' set. */
2690 while (frame_fixed_height(frp
))
2694 return; /* no frame without 'wfh', give up */
2698 /* Find the bottom frame of this column */
2699 while (frp
->fr_next
!= NULL
)
2702 /* Advance back for frames with one window with 'wfh' set. */
2703 while (frame_fixed_height(frp
))
2707 extra_lines
= height
- topfrp
->fr_height
;
2708 if (extra_lines
< 0)
2710 /* reduce height of contained frames, bottom or top frame first */
2713 h
= frame_minheight(frp
, NULL
);
2714 if (frp
->fr_height
+ extra_lines
< h
)
2716 extra_lines
+= frp
->fr_height
- h
;
2717 frame_new_height(frp
, h
, topfirst
, wfh
);
2721 frame_new_height(frp
, frp
->fr_height
+ extra_lines
,
2729 while (wfh
&& frp
!= NULL
&& frame_fixed_height(frp
));
2735 while (wfh
&& frp
!= NULL
&& frame_fixed_height(frp
));
2737 /* Increase "height" if we could not reduce enough frames. */
2739 height
-= extra_lines
;
2742 else if (extra_lines
> 0)
2744 /* increase height of bottom or top frame */
2745 frame_new_height(frp
, frp
->fr_height
+ extra_lines
, topfirst
, wfh
);
2748 topfrp
->fr_height
= height
;
2752 * Return TRUE if height of frame "frp" should not be changed because of
2753 * the 'winfixheight' option.
2756 frame_fixed_height(frp
)
2759 /* frame with one window: fixed height if 'winfixheight' set. */
2760 if (frp
->fr_win
!= NULL
)
2761 return frp
->fr_win
->w_p_wfh
;
2763 if (frp
->fr_layout
== FR_ROW
)
2765 /* The frame is fixed height if one of the frames in the row is fixed
2767 for (frp
= frp
->fr_child
; frp
!= NULL
; frp
= frp
->fr_next
)
2768 if (frame_fixed_height(frp
))
2773 /* frp->fr_layout == FR_COL: The frame is fixed height if all of the
2774 * frames in the row are fixed height. */
2775 for (frp
= frp
->fr_child
; frp
!= NULL
; frp
= frp
->fr_next
)
2776 if (!frame_fixed_height(frp
))
2781 #ifdef FEAT_VERTSPLIT
2783 * Return TRUE if width of frame "frp" should not be changed because of
2784 * the 'winfixwidth' option.
2787 frame_fixed_width(frp
)
2790 /* frame with one window: fixed width if 'winfixwidth' set. */
2791 if (frp
->fr_win
!= NULL
)
2792 return frp
->fr_win
->w_p_wfw
;
2794 if (frp
->fr_layout
== FR_COL
)
2796 /* The frame is fixed width if one of the frames in the row is fixed
2798 for (frp
= frp
->fr_child
; frp
!= NULL
; frp
= frp
->fr_next
)
2799 if (frame_fixed_width(frp
))
2804 /* frp->fr_layout == FR_ROW: The frame is fixed width if all of the
2805 * frames in the row are fixed width. */
2806 for (frp
= frp
->fr_child
; frp
!= NULL
; frp
= frp
->fr_next
)
2807 if (!frame_fixed_width(frp
))
2813 * Add a status line to windows at the bottom of "frp".
2814 * Note: Does not check if there is room!
2817 frame_add_statusline(frp
)
2822 if (frp
->fr_layout
== FR_LEAF
)
2825 if (wp
->w_status_height
== 0)
2827 if (wp
->w_height
> 0) /* don't make it negative */
2829 wp
->w_status_height
= STATUS_HEIGHT
;
2832 else if (frp
->fr_layout
== FR_ROW
)
2834 /* Handle all the frames in the row. */
2835 for (frp
= frp
->fr_child
; frp
!= NULL
; frp
= frp
->fr_next
)
2836 frame_add_statusline(frp
);
2838 else /* frp->fr_layout == FR_COL */
2840 /* Only need to handle the last frame in the column. */
2841 for (frp
= frp
->fr_child
; frp
->fr_next
!= NULL
; frp
= frp
->fr_next
)
2843 frame_add_statusline(frp
);
2848 * Set width of a frame. Handles recursively going through contained frames.
2849 * May remove separator line for windows at the right side (for win_close()).
2852 frame_new_width(topfrp
, width
, leftfirst
, wfw
)
2855 int leftfirst
; /* resize leftmost contained frame first */
2856 int wfw
; /* obey 'winfixwidth' when there is a choice;
2857 may cause the width not to be set */
2864 if (topfrp
->fr_layout
== FR_LEAF
)
2866 /* Simple case: just one window. */
2867 wp
= topfrp
->fr_win
;
2868 /* Find out if there are any windows right of this one. */
2869 for (frp
= topfrp
; frp
->fr_parent
!= NULL
; frp
= frp
->fr_parent
)
2870 if (frp
->fr_parent
->fr_layout
== FR_ROW
&& frp
->fr_next
!= NULL
)
2872 if (frp
->fr_parent
== NULL
)
2873 wp
->w_vsep_width
= 0;
2874 win_new_width(wp
, width
- wp
->w_vsep_width
);
2876 else if (topfrp
->fr_layout
== FR_COL
)
2880 /* All frames in this column get the same new width. */
2881 for (frp
= topfrp
->fr_child
; frp
!= NULL
; frp
= frp
->fr_next
)
2883 frame_new_width(frp
, width
, leftfirst
, wfw
);
2884 if (frp
->fr_width
> width
)
2886 /* Could not fit the windows, make whole column wider. */
2887 width
= frp
->fr_width
;
2891 } while (frp
!= NULL
);
2893 else /* fr_layout == FR_ROW */
2895 /* Complicated case: Resize a row of frames. Resize the rightmost
2896 * frame first, frames left of it when needed. */
2898 frp
= topfrp
->fr_child
;
2900 /* Advance past frames with one window with 'wfw' set. */
2901 while (frame_fixed_width(frp
))
2905 return; /* no frame without 'wfw', give up */
2909 /* Find the rightmost frame of this row */
2910 while (frp
->fr_next
!= NULL
)
2913 /* Advance back for frames with one window with 'wfw' set. */
2914 while (frame_fixed_width(frp
))
2918 extra_cols
= width
- topfrp
->fr_width
;
2921 /* reduce frame width, rightmost frame first */
2924 w
= frame_minwidth(frp
, NULL
);
2925 if (frp
->fr_width
+ extra_cols
< w
)
2927 extra_cols
+= frp
->fr_width
- w
;
2928 frame_new_width(frp
, w
, leftfirst
, wfw
);
2932 frame_new_width(frp
, frp
->fr_width
+ extra_cols
,
2940 while (wfw
&& frp
!= NULL
&& frame_fixed_width(frp
));
2946 while (wfw
&& frp
!= NULL
&& frame_fixed_width(frp
));
2948 /* Increase "width" if we could not reduce enough frames. */
2950 width
-= extra_cols
;
2953 else if (extra_cols
> 0)
2955 /* increase width of rightmost frame */
2956 frame_new_width(frp
, frp
->fr_width
+ extra_cols
, leftfirst
, wfw
);
2959 topfrp
->fr_width
= width
;
2963 * Add the vertical separator to windows at the right side of "frp".
2964 * Note: Does not check if there is room!
2972 if (frp
->fr_layout
== FR_LEAF
)
2975 if (wp
->w_vsep_width
== 0)
2977 if (wp
->w_width
> 0) /* don't make it negative */
2979 wp
->w_vsep_width
= 1;
2982 else if (frp
->fr_layout
== FR_COL
)
2984 /* Handle all the frames in the column. */
2985 for (frp
= frp
->fr_child
; frp
!= NULL
; frp
= frp
->fr_next
)
2986 frame_add_vsep(frp
);
2988 else /* frp->fr_layout == FR_ROW */
2990 /* Only need to handle the last frame in the row. */
2991 frp
= frp
->fr_child
;
2992 while (frp
->fr_next
!= NULL
)
2994 frame_add_vsep(frp
);
2999 * Set frame width from the window it contains.
3005 wp
->w_frame
->fr_width
= wp
->w_width
+ wp
->w_vsep_width
;
3010 * Set frame height from the window it contains.
3013 frame_fix_height(wp
)
3016 wp
->w_frame
->fr_height
= wp
->w_height
+ wp
->w_status_height
;
3020 * Compute the minimal height for frame "topfrp".
3021 * Uses the 'winminheight' option.
3022 * When "next_curwin" isn't NULL, use p_wh for this window.
3023 * When "next_curwin" is NOWIN, don't use at least one line for the current
3027 frame_minheight(topfrp
, next_curwin
)
3033 #ifdef FEAT_VERTSPLIT
3037 if (topfrp
->fr_win
!= NULL
)
3039 if (topfrp
->fr_win
== next_curwin
)
3040 m
= p_wh
+ topfrp
->fr_win
->w_status_height
;
3043 /* window: minimal height of the window plus status line */
3044 m
= p_wmh
+ topfrp
->fr_win
->w_status_height
;
3045 /* Current window is minimal one line high */
3046 if (p_wmh
== 0 && topfrp
->fr_win
== curwin
&& next_curwin
== NULL
)
3050 #ifdef FEAT_VERTSPLIT
3051 else if (topfrp
->fr_layout
== FR_ROW
)
3053 /* get the minimal height from each frame in this row */
3055 for (frp
= topfrp
->fr_child
; frp
!= NULL
; frp
= frp
->fr_next
)
3057 n
= frame_minheight(frp
, next_curwin
);
3065 /* Add up the minimal heights for all frames in this column. */
3067 for (frp
= topfrp
->fr_child
; frp
!= NULL
; frp
= frp
->fr_next
)
3068 m
+= frame_minheight(frp
, next_curwin
);
3074 #ifdef FEAT_VERTSPLIT
3076 * Compute the minimal width for frame "topfrp".
3077 * When "next_curwin" isn't NULL, use p_wiw for this window.
3078 * When "next_curwin" is NOWIN, don't use at least one column for the current
3082 frame_minwidth(topfrp
, next_curwin
)
3084 win_T
*next_curwin
; /* use p_wh and p_wiw for next_curwin */
3089 if (topfrp
->fr_win
!= NULL
)
3091 if (topfrp
->fr_win
== next_curwin
)
3092 m
= p_wiw
+ topfrp
->fr_win
->w_vsep_width
;
3095 /* window: minimal width of the window plus separator column */
3096 m
= p_wmw
+ topfrp
->fr_win
->w_vsep_width
;
3097 /* Current window is minimal one column wide */
3098 if (p_wmw
== 0 && topfrp
->fr_win
== curwin
&& next_curwin
== NULL
)
3102 else if (topfrp
->fr_layout
== FR_COL
)
3104 /* get the minimal width from each frame in this column */
3106 for (frp
= topfrp
->fr_child
; frp
!= NULL
; frp
= frp
->fr_next
)
3108 n
= frame_minwidth(frp
, next_curwin
);
3115 /* Add up the minimal widths for all frames in this row. */
3117 for (frp
= topfrp
->fr_child
; frp
!= NULL
; frp
= frp
->fr_next
)
3118 m
+= frame_minwidth(frp
, next_curwin
);
3127 * Try to close all windows except current one.
3128 * Buffers in the other windows become hidden if 'hidden' is set, or '!' is
3129 * used and the buffer was modified.
3131 * Used by ":bdel" and ":only".
3134 close_others(message
, forceit
)
3136 int forceit
; /* always hide all other windows */
3153 /* Be very careful here: autocommands may change the window layout. */
3154 for (wp
= firstwin
; win_valid(wp
); wp
= nextwp
)
3156 nextwp
= wp
->w_next
;
3157 if (wp
!= curwin
) /* don't close current window */
3160 /* Check if it's allowed to abandon this window */
3161 r
= can_abandon(wp
->w_buffer
, forceit
);
3163 if (!win_valid(wp
)) /* autocommands messed wp up */
3171 #if defined(FEAT_GUI_DIALOG) || defined(FEAT_CON_DIALOG)
3172 if (message
&& (p_confirm
|| cmdmod
.confirm
) && p_write
)
3174 dialog_changed(wp
->w_buffer
, FALSE
);
3175 # ifdef FEAT_AUTOCMD
3176 if (!win_valid(wp
)) /* autocommands messed wp up */
3183 if (bufIsChanged(wp
->w_buffer
))
3187 win_close(wp
, !P_HID(wp
->w_buffer
) && !bufIsChanged(wp
->w_buffer
));
3191 if (message
&& lastwin
!= firstwin
)
3192 EMSG(_("E445: Other window contains changes"));
3195 #endif /* FEAT_WINDOWS */
3198 * Init the current window "curwin".
3199 * Called when a new file is being edited.
3204 win_init_empty(curwin
);
3211 redraw_win_later(wp
, NOT_VALID
);
3212 wp
->w_lines_valid
= 0;
3213 wp
->w_cursor
.lnum
= 1;
3214 wp
->w_curswant
= wp
->w_cursor
.col
= 0;
3215 #ifdef FEAT_VIRTUALEDIT
3216 wp
->w_cursor
.coladd
= 0;
3218 wp
->w_pcmark
.lnum
= 1; /* pcmark not cleared but set to line 1 */
3219 wp
->w_pcmark
.col
= 0;
3220 wp
->w_prev_pcmark
.lnum
= 0;
3221 wp
->w_prev_pcmark
.col
= 0;
3229 wp
->w_farsi
= W_CONV
+ W_R_L
;
3231 wp
->w_farsi
= W_CONV
;
3236 * Allocate the first window and put an empty buffer in it.
3237 * Called from main().
3238 * Return FAIL when something goes wrong (out of memory).
3243 if (win_alloc_firstwin(NULL
) == FAIL
)
3247 first_tabpage
= alloc_tabpage();
3248 if (first_tabpage
== NULL
)
3250 first_tabpage
->tp_topframe
= topframe
;
3251 curtab
= first_tabpage
;
3257 #if defined(FEAT_AUTOCMD) || defined(PROTO)
3259 * Init "aucmd_win". This can only be done after the first
3260 * window is fully initialized, thus it can't be in win_alloc_first().
3263 win_alloc_aucmd_win()
3265 aucmd_win
= win_alloc(NULL
, TRUE
);
3266 if (aucmd_win
!= NULL
)
3268 win_init_some(aucmd_win
, curwin
);
3269 # ifdef FEAT_SCROLLBIND
3270 aucmd_win
->w_p_scb
= FALSE
;
3272 new_frame(aucmd_win
);
3278 * Allocate the first window or the first window in a new tab page.
3279 * When "oldwin" is NULL create an empty buffer for it.
3280 * When "oldwin" is not NULL copy info from it to the new window (only with
3282 * Return FAIL when something goes wrong (out of memory).
3285 win_alloc_firstwin(oldwin
)
3288 curwin
= win_alloc(NULL
, FALSE
);
3291 /* Very first window, need to create an empty buffer for it and
3292 * initialize from scratch. */
3293 curbuf
= buflist_new(NULL
, NULL
, 1L, BLN_LISTED
);
3294 if (curwin
== NULL
|| curbuf
== NULL
)
3296 curwin
->w_buffer
= curbuf
;
3297 curbuf
->b_nwindows
= 1; /* there is one window */
3299 curwin
->w_alist
= &global_alist
;
3301 curwin_init(); /* init current window */
3306 /* First window in new tab page, initialize it from "oldwin". */
3307 win_init(curwin
, oldwin
, 0);
3309 # ifdef FEAT_SCROLLBIND
3310 /* We don't want scroll-binding in the first window. */
3311 curwin
->w_p_scb
= FALSE
;
3317 if (curwin
->w_frame
== NULL
)
3319 topframe
= curwin
->w_frame
;
3320 #ifdef FEAT_VERTSPLIT
3321 topframe
->fr_width
= Columns
;
3323 topframe
->fr_height
= Rows
- p_ch
;
3324 topframe
->fr_win
= curwin
;
3330 * Create a frame for window "wp".
3333 new_frame(win_T
*wp
)
3335 frame_T
*frp
= (frame_T
*)alloc_clear((unsigned)sizeof(frame_T
));
3340 frp
->fr_layout
= FR_LEAF
;
3346 * Initialize the window and frame size to the maximum.
3351 firstwin
->w_height
= ROWS_AVAIL
;
3352 topframe
->fr_height
= ROWS_AVAIL
;
3353 #ifdef FEAT_VERTSPLIT
3354 firstwin
->w_width
= Columns
;
3355 topframe
->fr_width
= Columns
;
3359 #if defined(FEAT_WINDOWS) || defined(PROTO)
3362 * Allocate a new tabpage_T and init the values.
3363 * Returns NULL when out of memory.
3370 tp
= (tabpage_T
*)alloc_clear((unsigned)sizeof(tabpage_T
));
3376 for (i
= 0; i
< 3; i
++)
3377 tp
->tp_prev_which_scrollbars
[i
] = -1;
3380 tp
->tp_diff_invalid
= TRUE
;
3383 /* init t: variables */
3384 init_var_dict(&tp
->tp_vars
, &tp
->tp_winvar
);
3386 tp
->tp_ch_used
= p_ch
;
3400 for (idx
= 0; idx
< SNAP_COUNT
; ++idx
)
3401 clear_snapshot(tp
, idx
);
3403 vars_clear(&tp
->tp_vars
.dv_hashtab
); /* free all t: variables */
3409 * Create a new Tab page with one window.
3410 * It will edit the current buffer, like after ":split".
3411 * When "after" is 0 put it just after the current Tab page.
3412 * Otherwise put it just before tab page "after".
3413 * Return FAIL or OK.
3416 win_new_tabpage(after
)
3419 tabpage_T
*tp
= curtab
;
3423 newtp
= alloc_tabpage();
3427 /* Remember the current windows in this Tab page. */
3428 if (leave_tabpage(curbuf
) == FAIL
)
3435 /* Create a new empty window. */
3436 if (win_alloc_firstwin(tp
->tp_curwin
) == OK
)
3438 /* Make the new Tab page the new topframe. */
3441 /* New tab page becomes the first one. */
3442 newtp
->tp_next
= first_tabpage
;
3443 first_tabpage
= newtp
;
3449 /* Put new tab page before tab page "after". */
3451 for (tp
= first_tabpage
; tp
->tp_next
!= NULL
3452 && n
< after
; tp
= tp
->tp_next
)
3455 newtp
->tp_next
= tp
->tp_next
;
3456 tp
->tp_next
= newtp
;
3459 firstwin
->w_winrow
= tabline_height();
3460 win_comp_scroll(curwin
);
3462 newtp
->tp_topframe
= topframe
;
3465 #if defined(FEAT_GUI)
3466 /* When 'guioptions' includes 'L' or 'R' may have to remove or add
3467 * scrollbars. Have to update them anyway. */
3468 gui_may_update_scrollbars();
3471 redraw_all_later(CLEAR
);
3473 apply_autocmds(EVENT_TABENTER
, NULL
, NULL
, FALSE
, curbuf
);
3474 apply_autocmds(EVENT_WINENTER
, NULL
, NULL
, FALSE
, curbuf
);
3479 /* Failed, get back the previous Tab page */
3480 enter_tabpage(curtab
, curbuf
);
3485 * Open a new tab page if ":tab cmd" was used. It will edit the same buffer,
3486 * like with ":split".
3487 * Returns OK if a new tab page was created, FAIL otherwise.
3492 int n
= (cmdmod
.tab
== 0) ? postponed_split_tab
: cmdmod
.tab
;
3496 cmdmod
.tab
= 0; /* reset it to avoid doing it twice */
3497 postponed_split_tab
= 0;
3498 return win_new_tabpage(n
);
3504 * Create up to "maxcount" tabpages with empty windows.
3505 * Returns the number of resulting tab pages.
3508 make_tabpages(maxcount
)
3511 int count
= maxcount
;
3514 /* Limit to 'tabpagemax' tabs. */
3520 * Don't execute autocommands while creating the tab pages. Must do that
3521 * when putting the buffers in the windows.
3526 for (todo
= count
- 1; todo
> 0; --todo
)
3527 if (win_new_tabpage(0) == FAIL
)
3534 /* return actual number of tab pages */
3535 return (count
- todo
);
3539 * Return TRUE when "tpc" points to a valid tab page.
3547 for (tp
= first_tabpage
; tp
!= NULL
; tp
= tp
->tp_next
)
3554 * Find tab page "n" (first one is 1). Returns NULL when not found.
3563 for (tp
= first_tabpage
; tp
!= NULL
&& i
!= n
; tp
= tp
->tp_next
)
3569 * Get index of tab page "tp". First one has index 1.
3570 * When not found returns number of tab pages plus one.
3579 for (tp
= first_tabpage
; tp
!= NULL
&& tp
!= ftp
; tp
= tp
->tp_next
)
3585 * Prepare for leaving the current tab page.
3586 * When autocomands change "curtab" we don't leave the tab page and return
3588 * Careful: When OK is returned need to get a new tab page very very soon!
3591 leave_tabpage(new_curbuf
)
3592 buf_T
*new_curbuf UNUSED
; /* what is going to be the new curbuf,
3595 tabpage_T
*tp
= curtab
;
3598 reset_VIsual_and_resel(); /* stop Visual mode */
3601 if (new_curbuf
!= curbuf
)
3603 apply_autocmds(EVENT_BUFLEAVE
, NULL
, NULL
, FALSE
, curbuf
);
3607 apply_autocmds(EVENT_WINLEAVE
, NULL
, NULL
, FALSE
, curbuf
);
3610 apply_autocmds(EVENT_TABLEAVE
, NULL
, NULL
, FALSE
, curbuf
);
3614 #if defined(FEAT_GUI)
3615 /* Remove the scrollbars. They may be added back later. */
3617 gui_remove_scrollbars();
3619 tp
->tp_curwin
= curwin
;
3620 tp
->tp_prevwin
= prevwin
;
3621 tp
->tp_firstwin
= firstwin
;
3622 tp
->tp_lastwin
= lastwin
;
3623 tp
->tp_old_Rows
= Rows
;
3624 tp
->tp_old_Columns
= Columns
;
3631 * Start using tab page "tp".
3632 * Only to be used after leave_tabpage() or freeing the current tab page.
3635 enter_tabpage(tp
, old_curbuf
)
3637 buf_T
*old_curbuf UNUSED
;
3639 int old_off
= tp
->tp_firstwin
->w_winrow
;
3640 win_T
*next_prevwin
= tp
->tp_prevwin
;
3643 firstwin
= tp
->tp_firstwin
;
3644 lastwin
= tp
->tp_lastwin
;
3645 topframe
= tp
->tp_topframe
;
3647 /* We would like doing the TabEnter event first, but we don't have a
3648 * valid current window yet, which may break some commands.
3649 * This triggers autocommands, thus may make "tp" invalid. */
3650 win_enter_ext(tp
->tp_curwin
, FALSE
, TRUE
);
3651 prevwin
= next_prevwin
;
3654 apply_autocmds(EVENT_TABENTER
, NULL
, NULL
, FALSE
, curbuf
);
3656 if (old_curbuf
!= curbuf
)
3657 apply_autocmds(EVENT_BUFENTER
, NULL
, NULL
, FALSE
, curbuf
);
3660 last_status(FALSE
); /* status line may appear or disappear */
3661 (void)win_comp_pos(); /* recompute w_winrow for all windows */
3662 must_redraw
= CLEAR
; /* need to redraw everything */
3664 diff_need_scrollbind
= TRUE
;
3667 /* The tabpage line may have appeared or disappeared, may need to resize
3668 * the frames for that. When the Vim window was resized need to update
3669 * frame sizes too. Use the stored value of p_ch, so that it can be
3670 * different for each tab page. */
3671 p_ch
= curtab
->tp_ch_used
;
3672 if (curtab
->tp_old_Rows
!= Rows
|| (old_off
!= firstwin
->w_winrow
3673 #ifdef FEAT_GUI_TABLINE
3674 && !gui_use_tabline()
3678 #ifdef FEAT_VERTSPLIT
3679 if (curtab
->tp_old_Columns
!= Columns
&& starting
== 0)
3680 shell_new_columns(); /* update window widths */
3683 #if defined(FEAT_GUI)
3684 /* When 'guioptions' includes 'L' or 'R' may have to remove or add
3685 * scrollbars. Have to update them anyway. */
3686 gui_may_update_scrollbars();
3689 redraw_all_later(CLEAR
);
3693 * Go to tab page "n". For ":tab N" and "Ngt".
3694 * When "n" is 9999 go to the last tab page.
3706 /* Not allowed when editing the command line. */
3708 if (cmdwin_type
!= 0)
3716 /* If there is only one it can't work. */
3717 if (first_tabpage
->tp_next
== NULL
)
3726 /* No count, go to next tab page, wrap around end. */
3727 if (curtab
->tp_next
== NULL
)
3730 tp
= curtab
->tp_next
;
3734 /* "gT": go to previous tab page, wrap around end. "N gT" repeats
3737 for (i
= n
; i
< 0; ++i
)
3739 for (tp
= first_tabpage
; tp
->tp_next
!= ttp
&& tp
->tp_next
!= NULL
;
3747 /* Go to last tab page. */
3748 for (tp
= first_tabpage
; tp
->tp_next
!= NULL
; tp
= tp
->tp_next
)
3753 /* Go to tab page "n". */
3754 tp
= find_tabpage(n
);
3762 goto_tabpage_tp(tp
);
3764 #ifdef FEAT_GUI_TABLINE
3765 if (gui_use_tabline())
3766 gui_mch_set_curtab(tabpage_index(curtab
));
3771 * Go to tabpage "tp".
3772 * Note: doesn't update the GUI tab.
3778 if (tp
!= curtab
&& leave_tabpage(tp
->tp_curwin
->w_buffer
) == OK
)
3780 if (valid_tabpage(tp
))
3781 enter_tabpage(tp
, curbuf
);
3783 enter_tabpage(curtab
, curbuf
);
3788 * Enter window "wp" in tab page "tp".
3789 * Also updates the GUI tab.
3792 goto_tabpage_win(tp
, wp
)
3796 goto_tabpage_tp(tp
);
3797 if (curtab
== tp
&& win_valid(wp
))
3799 win_enter(wp
, TRUE
);
3800 # ifdef FEAT_GUI_TABLINE
3801 if (gui_use_tabline())
3802 gui_mch_set_curtab(tabpage_index(curtab
));
3808 * Move the current tab page to before tab page "nr".
3817 if (first_tabpage
->tp_next
== NULL
)
3820 /* Remove the current tab page from the list of tab pages. */
3821 if (curtab
== first_tabpage
)
3822 first_tabpage
= curtab
->tp_next
;
3825 for (tp
= first_tabpage
; tp
!= NULL
; tp
= tp
->tp_next
)
3826 if (tp
->tp_next
== curtab
)
3828 if (tp
== NULL
) /* "cannot happen" */
3830 tp
->tp_next
= curtab
->tp_next
;
3833 /* Re-insert it at the specified position. */
3836 curtab
->tp_next
= first_tabpage
;
3837 first_tabpage
= curtab
;
3841 for (tp
= first_tabpage
; tp
->tp_next
!= NULL
&& n
> 1; tp
= tp
->tp_next
)
3843 curtab
->tp_next
= tp
->tp_next
;
3844 tp
->tp_next
= curtab
;
3847 /* Need to redraw the tabline. Tab page contents doesn't change. */
3848 redraw_tabline
= TRUE
;
3853 * Go to another window.
3854 * When jumping to another buffer, stop Visual mode. Do this before
3855 * changing windows so we can yank the selection into the '*' register.
3856 * When jumping to another window on the same buffer, adjust its cursor
3857 * position to keep the same Visual area.
3870 if (curbuf_locked())
3875 if (wp
->w_buffer
!= curbuf
)
3876 reset_VIsual_and_resel();
3877 else if (VIsual_active
)
3878 wp
->w_cursor
= curwin
->w_cursor
;
3882 need_mouse_correct
= TRUE
;
3884 win_enter(wp
, TRUE
);
3887 #if defined(FEAT_PERL) || defined(PROTO)
3889 * Find window number "winnr" (counting top to bottom).
3897 # ifdef FEAT_WINDOWS
3898 for (wp
= firstwin
; wp
!= NULL
; wp
= wp
->w_next
)
3908 #ifdef FEAT_VERTSPLIT
3910 * Move to window above or below "count" times.
3913 win_goto_ver(up
, count
)
3914 int up
; /* TRUE to go to win above */
3921 foundfr
= curwin
->w_frame
;
3925 * First go upwards in the tree of frames until we find a upwards or
3926 * downwards neighbor.
3937 if (fr
->fr_parent
->fr_layout
== FR_COL
&& nfr
!= NULL
)
3943 * Now go downwards to find the bottom or top frame in it.
3947 if (nfr
->fr_layout
== FR_LEAF
)
3953 if (nfr
->fr_layout
== FR_ROW
)
3955 /* Find the frame at the cursor row. */
3956 while (fr
->fr_next
!= NULL
3957 && frame2win(fr
)->w_wincol
+ fr
->fr_width
3958 <= curwin
->w_wincol
+ curwin
->w_wcol
)
3961 if (nfr
->fr_layout
== FR_COL
&& up
)
3962 while (fr
->fr_next
!= NULL
)
3968 if (foundfr
!= NULL
)
3969 win_goto(foundfr
->fr_win
);
3973 * Move to left or right window.
3976 win_goto_hor(left
, count
)
3977 int left
; /* TRUE to go to left win */
3984 foundfr
= curwin
->w_frame
;
3988 * First go upwards in the tree of frames until we find a left or
4000 if (fr
->fr_parent
->fr_layout
== FR_ROW
&& nfr
!= NULL
)
4006 * Now go downwards to find the leftmost or rightmost frame in it.
4010 if (nfr
->fr_layout
== FR_LEAF
)
4016 if (nfr
->fr_layout
== FR_COL
)
4018 /* Find the frame at the cursor row. */
4019 while (fr
->fr_next
!= NULL
4020 && frame2win(fr
)->w_winrow
+ fr
->fr_height
4021 <= curwin
->w_winrow
+ curwin
->w_wrow
)
4024 if (nfr
->fr_layout
== FR_ROW
&& left
)
4025 while (fr
->fr_next
!= NULL
)
4031 if (foundfr
!= NULL
)
4032 win_goto(foundfr
->fr_win
);
4037 * Make window "wp" the current window.
4040 win_enter(wp
, undo_sync
)
4044 win_enter_ext(wp
, undo_sync
, FALSE
);
4048 * Make window wp the current window.
4049 * Can be called with "curwin_invalid" TRUE, which means that curwin has just
4050 * been closed and isn't valid.
4053 win_enter_ext(wp
, undo_sync
, curwin_invalid
)
4059 int other_buffer
= FALSE
;
4062 if (wp
== curwin
&& !curwin_invalid
) /* nothing to do */
4066 if (!curwin_invalid
)
4069 * Be careful: If autocommands delete the window, return now.
4071 if (wp
->w_buffer
!= curbuf
)
4073 apply_autocmds(EVENT_BUFLEAVE
, NULL
, NULL
, FALSE
, curbuf
);
4074 other_buffer
= TRUE
;
4078 apply_autocmds(EVENT_WINLEAVE
, NULL
, NULL
, FALSE
, curbuf
);
4082 /* autocmds may abort script processing */
4089 /* sync undo before leaving the current buffer */
4090 if (undo_sync
&& curbuf
!= wp
->w_buffer
)
4092 /* may have to copy the buffer options when 'cpo' contains 'S' */
4093 if (wp
->w_buffer
!= curbuf
)
4094 buf_copy_options(wp
->w_buffer
, BCO_ENTER
| BCO_NOHELP
);
4095 if (!curwin_invalid
)
4097 prevwin
= curwin
; /* remember for CTRL-W p */
4098 curwin
->w_redr_status
= TRUE
;
4101 curbuf
= wp
->w_buffer
;
4103 #ifdef FEAT_VIRTUALEDIT
4104 if (!virtual_active())
4105 curwin
->w_cursor
.coladd
= 0;
4107 changed_line_abv_curs(); /* assume cursor position needs updating */
4109 if (curwin
->w_localdir
!= NULL
)
4111 /* Window has a local directory: Save current directory as global
4112 * directory (unless that was done already) and change to the local
4114 if (globaldir
== NULL
)
4116 char_u cwd
[MAXPATHL
];
4118 if (mch_dirname(cwd
, MAXPATHL
) == OK
)
4119 globaldir
= vim_strsave(cwd
);
4121 if (mch_chdir((char *)curwin
->w_localdir
) == 0)
4122 shorten_fnames(TRUE
);
4124 else if (globaldir
!= NULL
)
4126 /* Window doesn't have a local directory and we are not in the global
4127 * directory: Change to the global directory. */
4128 ignored
= mch_chdir((char *)globaldir
);
4129 vim_free(globaldir
);
4131 shorten_fnames(TRUE
);
4135 apply_autocmds(EVENT_WINENTER
, NULL
, NULL
, FALSE
, curbuf
);
4137 apply_autocmds(EVENT_BUFENTER
, NULL
, NULL
, FALSE
, curbuf
);
4143 curwin
->w_redr_status
= TRUE
;
4144 redraw_tabline
= TRUE
;
4146 redraw_later(VALID
); /* causes status line redraw */
4148 /* set window height to desired minimal value */
4149 if (curwin
->w_height
< p_wh
&& !curwin
->w_p_wfh
)
4150 win_setheight((int)p_wh
);
4151 else if (curwin
->w_height
== 0)
4154 #ifdef FEAT_VERTSPLIT
4155 /* set window width to desired minimal value */
4156 if (curwin
->w_width
< p_wiw
&& !curwin
->w_p_wfw
)
4157 win_setwidth((int)p_wiw
);
4161 setmouse(); /* in case jumped to/from help buffer */
4164 /* Change directories when the 'acd' option is set. */
4168 #endif /* FEAT_WINDOWS */
4170 #if defined(FEAT_WINDOWS) || defined(FEAT_SIGNS) || defined(PROTO)
4172 * Jump to the first open window that contains buffer "buf", if one exists.
4173 * Returns a pointer to the window found, otherwise NULL.
4176 buf_jump_open_win(buf
)
4179 # ifdef FEAT_WINDOWS
4182 for (wp
= firstwin
; wp
!= NULL
; wp
= wp
->w_next
)
4183 if (wp
->w_buffer
== buf
)
4186 win_enter(wp
, FALSE
);
4189 if (curwin
->w_buffer
== buf
)
4196 * Jump to the first open window in any tab page that contains buffer "buf",
4198 * Returns a pointer to the window found, otherwise NULL.
4201 buf_jump_open_tab(buf
)
4204 # ifdef FEAT_WINDOWS
4208 /* First try the current tab page. */
4209 wp
= buf_jump_open_win(buf
);
4213 for (tp
= first_tabpage
; tp
!= NULL
; tp
= tp
->tp_next
)
4216 for (wp
= tp
->tp_firstwin
; wp
!= NULL
; wp
= wp
->w_next
)
4217 if (wp
->w_buffer
== buf
)
4221 goto_tabpage_win(tp
, wp
);
4223 wp
= NULL
; /* something went wrong */
4230 if (curwin
->w_buffer
== buf
)
4238 * Allocate a window structure and link it in the window list when "hidden" is
4242 win_alloc(after
, hidden
)
4243 win_T
*after UNUSED
;
4249 * allocate window structure and linesizes arrays
4251 newwin
= (win_T
*)alloc_clear((unsigned)sizeof(win_T
));
4252 if (newwin
!= NULL
&& win_alloc_lines(newwin
) == FAIL
)
4261 /* Don't execute autocommands while the window is not properly
4262 * initialized yet. gui_create_scrollbar() may trigger a FocusGained
4267 * link the window in the window list
4271 win_append(after
, newwin
);
4273 #ifdef FEAT_VERTSPLIT
4274 newwin
->w_wincol
= 0;
4275 newwin
->w_width
= Columns
;
4278 /* position the display and the cursor at the top of the file. */
4279 newwin
->w_topline
= 1;
4281 newwin
->w_topfill
= 0;
4283 newwin
->w_botline
= 2;
4284 newwin
->w_cursor
.lnum
= 1;
4285 #ifdef FEAT_SCROLLBIND
4286 newwin
->w_scbind_pos
= 1;
4289 /* We won't calculate w_fraction until resizing the window */
4290 newwin
->w_fraction
= 0;
4291 newwin
->w_prev_fraction_row
= -1;
4296 gui_create_scrollbar(&newwin
->w_scrollbars
[SBAR_LEFT
],
4298 gui_create_scrollbar(&newwin
->w_scrollbars
[SBAR_RIGHT
],
4299 SBAR_RIGHT
, newwin
);
4303 /* init w: variables */
4304 init_var_dict(&newwin
->w_vars
, &newwin
->w_winvar
);
4307 foldInitWin(newwin
);
4312 #ifdef FEAT_SEARCH_EXTRA
4313 newwin
->w_match_head
= NULL
;
4314 newwin
->w_next_match_id
= 4;
4320 #if defined(FEAT_WINDOWS) || defined(PROTO)
4323 * remove window 'wp' from the window list and free the structure
4328 tabpage_T
*tp
; /* tab page "win" is in, NULL for current */
4336 /* reduce the reference count to the argument list. */
4337 alist_unlink(wp
->w_alist
);
4340 /* Don't execute autocommands while the window is halfway being deleted.
4341 * gui_mch_destroy_scrollbar() may trigger a FocusGained event. */
4345 #ifdef FEAT_MZSCHEME
4346 mzscheme_window_free(wp
);
4354 python_window_free(wp
);
4358 tcl_window_free(wp
);
4362 ruby_window_free(wp
);
4365 clear_winopt(&wp
->w_onebuf_opt
);
4366 clear_winopt(&wp
->w_allbuf_opt
);
4369 vars_clear(&wp
->w_vars
.dv_hashtab
); /* free all w: variables */
4376 for (i
= 0; i
< wp
->w_tagstacklen
; ++i
)
4377 vim_free(wp
->w_tagstack
[i
].tagname
);
4379 vim_free(wp
->w_localdir
);
4381 #ifdef FEAT_SEARCH_EXTRA
4385 #ifdef FEAT_JUMPLIST
4389 #ifdef FEAT_QUICKFIX
4396 gui_mch_destroy_scrollbar(&wp
->w_scrollbars
[SBAR_LEFT
]);
4397 gui_mch_destroy_scrollbar(&wp
->w_scrollbars
[SBAR_RIGHT
]);
4399 #endif /* FEAT_GUI */
4402 if (wp
!= aucmd_win
)
4413 * Append window "wp" in the window list after window "after".
4416 win_append(after
, wp
)
4421 if (after
== NULL
) /* after NULL is in front of the first */
4424 before
= after
->w_next
;
4426 wp
->w_next
= before
;
4435 before
->w_prev
= wp
;
4439 * Remove a window from the window list.
4444 tabpage_T
*tp
; /* tab page "win" is in, NULL for current */
4446 if (wp
->w_prev
!= NULL
)
4447 wp
->w_prev
->w_next
= wp
->w_next
;
4448 else if (tp
== NULL
)
4449 firstwin
= wp
->w_next
;
4451 tp
->tp_firstwin
= wp
->w_next
;
4452 if (wp
->w_next
!= NULL
)
4453 wp
->w_next
->w_prev
= wp
->w_prev
;
4454 else if (tp
== NULL
)
4455 lastwin
= wp
->w_prev
;
4457 tp
->tp_lastwin
= wp
->w_prev
;
4461 * Append frame "frp" in a frame list after frame "after".
4464 frame_append(after
, frp
)
4465 frame_T
*after
, *frp
;
4467 frp
->fr_next
= after
->fr_next
;
4468 after
->fr_next
= frp
;
4469 if (frp
->fr_next
!= NULL
)
4470 frp
->fr_next
->fr_prev
= frp
;
4471 frp
->fr_prev
= after
;
4475 * Insert frame "frp" in a frame list before frame "before".
4478 frame_insert(before
, frp
)
4479 frame_T
*before
, *frp
;
4481 frp
->fr_next
= before
;
4482 frp
->fr_prev
= before
->fr_prev
;
4483 before
->fr_prev
= frp
;
4484 if (frp
->fr_prev
!= NULL
)
4485 frp
->fr_prev
->fr_next
= frp
;
4487 frp
->fr_parent
->fr_child
= frp
;
4491 * Remove a frame from a frame list.
4497 if (frp
->fr_prev
!= NULL
)
4498 frp
->fr_prev
->fr_next
= frp
->fr_next
;
4500 frp
->fr_parent
->fr_child
= frp
->fr_next
;
4501 if (frp
->fr_next
!= NULL
)
4502 frp
->fr_next
->fr_prev
= frp
->fr_prev
;
4505 #endif /* FEAT_WINDOWS */
4508 * Allocate w_lines[] for window "wp".
4509 * Return FAIL for failure, OK for success.
4515 wp
->w_lines_valid
= 0;
4516 wp
->w_lines
= (wline_T
*)alloc_clear((unsigned)(Rows
* sizeof(wline_T
)));
4517 if (wp
->w_lines
== NULL
)
4523 * free lsize arrays for a window
4529 vim_free(wp
->w_lines
);
4534 * Called from win_new_shellsize() after Rows changed.
4535 * This only does the current tab page, others must be done when made active.
4540 int h
= (int)ROWS_AVAIL
;
4542 if (firstwin
== NULL
) /* not initialized yet */
4545 if (h
< frame_minheight(topframe
, NULL
))
4546 h
= frame_minheight(topframe
, NULL
);
4548 /* First try setting the heights of windows with 'winfixheight'. If
4549 * that doesn't result in the right height, forget about that option. */
4550 frame_new_height(topframe
, h
, FALSE
, TRUE
);
4551 if (topframe
->fr_height
!= h
)
4552 frame_new_height(topframe
, h
, FALSE
, FALSE
);
4554 (void)win_comp_pos(); /* recompute w_winrow and w_wincol */
4558 win_new_height(firstwin
, h
);
4562 curtab
->tp_ch_used
= p_ch
;
4566 /* Disabled: don't want making the screen smaller make a window larger. */
4568 win_equal(curwin
, FALSE
, 'v');
4572 #if defined(FEAT_VERTSPLIT) || defined(PROTO)
4574 * Called from win_new_shellsize() after Columns changed.
4579 if (firstwin
== NULL
) /* not initialized yet */
4582 /* First try setting the widths of windows with 'winfixwidth'. If that
4583 * doesn't result in the right width, forget about that option. */
4584 frame_new_width(topframe
, (int)Columns
, FALSE
, TRUE
);
4585 if (topframe
->fr_width
!= Columns
)
4586 frame_new_width(topframe
, (int)Columns
, FALSE
, FALSE
);
4588 (void)win_comp_pos(); /* recompute w_winrow and w_wincol */
4590 /* Disabled: don't want making the screen smaller make a window larger. */
4592 win_equal(curwin
, FALSE
, 'h');
4597 #if defined(FEAT_CMDWIN) || defined(PROTO)
4599 * Save the size of all windows in "gap".
4608 ga_init2(gap
, (int)sizeof(int), 1);
4609 if (ga_grow(gap
, win_count() * 2) == OK
)
4610 for (wp
= firstwin
; wp
!= NULL
; wp
= wp
->w_next
)
4612 ((int *)gap
->ga_data
)[gap
->ga_len
++] =
4613 wp
->w_width
+ wp
->w_vsep_width
;
4614 ((int *)gap
->ga_data
)[gap
->ga_len
++] = wp
->w_height
;
4619 * Restore window sizes, but only if the number of windows is still the same.
4620 * Does not free the growarray.
4623 win_size_restore(gap
)
4629 if (win_count() * 2 == gap
->ga_len
)
4632 for (wp
= firstwin
; wp
!= NULL
; wp
= wp
->w_next
)
4634 frame_setwidth(wp
->w_frame
, ((int *)gap
->ga_data
)[i
++]);
4635 win_setheight_win(((int *)gap
->ga_data
)[i
++], wp
);
4637 /* recompute the window positions */
4638 (void)win_comp_pos();
4641 #endif /* FEAT_CMDWIN */
4643 #if defined(FEAT_WINDOWS) || defined(PROTO)
4645 * Update the position for all windows, using the width and height of the
4647 * Returns the row just after the last window.
4652 int row
= tabline_height();
4655 frame_comp_pos(topframe
, &row
, &col
);
4660 * Update the position of the windows in frame "topfrp", using the width and
4661 * height of the frames.
4662 * "*row" and "*col" are the top-left position of the frame. They are updated
4663 * to the bottom-right position plus one.
4666 frame_comp_pos(topfrp
, row
, col
)
4673 #ifdef FEAT_VERTSPLIT
4678 wp
= topfrp
->fr_win
;
4681 if (wp
->w_winrow
!= *row
4682 #ifdef FEAT_VERTSPLIT
4683 || wp
->w_wincol
!= *col
4687 /* position changed, redraw */
4688 wp
->w_winrow
= *row
;
4689 #ifdef FEAT_VERTSPLIT
4690 wp
->w_wincol
= *col
;
4692 redraw_win_later(wp
, NOT_VALID
);
4693 wp
->w_redr_status
= TRUE
;
4695 *row
+= wp
->w_height
+ wp
->w_status_height
;
4696 #ifdef FEAT_VERTSPLIT
4697 *col
+= wp
->w_width
+ wp
->w_vsep_width
;
4702 #ifdef FEAT_VERTSPLIT
4706 for (frp
= topfrp
->fr_child
; frp
!= NULL
; frp
= frp
->fr_next
)
4708 #ifdef FEAT_VERTSPLIT
4709 if (topfrp
->fr_layout
== FR_ROW
)
4710 *row
= startrow
; /* all frames are at the same row */
4712 *col
= startcol
; /* all frames are at the same col */
4714 frame_comp_pos(frp
, row
, col
);
4719 #endif /* FEAT_WINDOWS */
4722 * Set current window height and take care of repositioning other windows to
4726 win_setheight(height
)
4729 win_setheight_win(height
, curwin
);
4733 * Set the window height of window "win" and take care of repositioning other
4734 * windows to fit around it.
4737 win_setheight_win(height
, win
)
4745 /* Always keep current window at least one line high, even when
4746 * 'winminheight' is zero. */
4756 frame_setheight(win
->w_frame
, height
+ win
->w_status_height
);
4758 /* recompute the window positions */
4759 row
= win_comp_pos();
4761 if (height
> topframe
->fr_height
)
4762 height
= topframe
->fr_height
;
4763 win
->w_height
= height
;
4768 * If there is extra space created between the last window and the command
4771 if (full_screen
&& msg_scrolled
== 0 && row
< cmdline_row
)
4772 screen_fill(row
, cmdline_row
, 0, (int)Columns
, ' ', ' ', 0);
4777 redraw_all_later(NOT_VALID
);
4780 #if defined(FEAT_WINDOWS) || defined(PROTO)
4783 * Set the height of a frame to "height" and take care that all frames and
4784 * windows inside it are resized. Also resize frames on the left and right if
4785 * the are in the same FR_ROW frame.
4788 * If the frame is part of a FR_COL frame, try fitting the frame in that
4789 * frame. If that doesn't work (the FR_COL frame is too small), recursively
4790 * go to containing frames to resize them and make room.
4791 * If the frame is part of a FR_ROW frame, all frames must be resized as well.
4792 * Check for the minimal height of the FR_ROW frame.
4793 * At the top level we can also use change the command line height.
4796 frame_setheight(curfrp
, height
)
4800 int room
; /* total number of lines available */
4801 int take
; /* number of lines taken from other windows */
4802 int room_cmdline
; /* lines available from cmdline */
4808 /* If the height already is the desired value, nothing to do. */
4809 if (curfrp
->fr_height
== height
)
4812 if (curfrp
->fr_parent
== NULL
)
4814 /* topframe: can only change the command line */
4815 if (height
> ROWS_AVAIL
)
4816 height
= ROWS_AVAIL
;
4818 frame_new_height(curfrp
, height
, FALSE
, FALSE
);
4820 else if (curfrp
->fr_parent
->fr_layout
== FR_ROW
)
4822 /* Row of frames: Also need to resize frames left and right of this
4823 * one. First check for the minimal height of these. */
4824 h
= frame_minheight(curfrp
->fr_parent
, NULL
);
4827 frame_setheight(curfrp
->fr_parent
, height
);
4832 * Column of frames: try to change only frames in this column.
4834 #ifdef FEAT_VERTSPLIT
4837 * 1: compute room available, if it's not enough try resizing the
4839 * 2: compute the room available and adjust the height to it.
4840 * Try not to reduce the height of a window with 'winfixheight' set.
4842 for (run
= 1; run
<= 2; ++run
)
4849 for (frp
= curfrp
->fr_parent
->fr_child
; frp
!= NULL
;
4853 && frp
->fr_win
!= NULL
4854 && frp
->fr_win
->w_p_wfh
)
4855 room_reserved
+= frp
->fr_height
;
4856 room
+= frp
->fr_height
;
4858 room
-= frame_minheight(frp
, NULL
);
4860 #ifdef FEAT_VERTSPLIT
4861 if (curfrp
->fr_width
!= Columns
)
4866 room_cmdline
= Rows
- p_ch
- (lastwin
->w_winrow
4867 + lastwin
->w_height
+ lastwin
->w_status_height
);
4868 if (room_cmdline
< 0)
4872 if (height
<= room
+ room_cmdline
)
4874 #ifdef FEAT_VERTSPLIT
4875 if (run
== 2 || curfrp
->fr_width
== Columns
)
4878 if (height
> room
+ room_cmdline
)
4879 height
= room
+ room_cmdline
;
4882 #ifdef FEAT_VERTSPLIT
4883 frame_setheight(curfrp
->fr_parent
, height
4884 + frame_minheight(curfrp
->fr_parent
, NOWIN
) - (int)p_wmh
- 1);
4890 * Compute the number of lines we will take from others frames (can be
4893 take
= height
- curfrp
->fr_height
;
4895 /* If there is not enough room, also reduce the height of a window
4896 * with 'winfixheight' set. */
4897 if (height
> room
+ room_cmdline
- room_reserved
)
4898 room_reserved
= room
+ room_cmdline
- height
;
4899 /* If there is only a 'winfixheight' window and making the
4900 * window smaller, need to make the other window taller. */
4901 if (take
< 0 && room
- curfrp
->fr_height
< room_reserved
)
4904 if (take
> 0 && room_cmdline
> 0)
4906 /* use lines from cmdline first */
4907 if (take
< room_cmdline
)
4908 room_cmdline
= take
;
4909 take
-= room_cmdline
;
4910 topframe
->fr_height
+= room_cmdline
;
4914 * set the current frame to the new height
4916 frame_new_height(curfrp
, height
, FALSE
, FALSE
);
4919 * First take lines from the frames after the current frame. If
4920 * that is not enough, takes lines from frames above the current
4923 for (run
= 0; run
< 2; ++run
)
4926 frp
= curfrp
->fr_next
; /* 1st run: start with next window */
4928 frp
= curfrp
->fr_prev
; /* 2nd run: start with prev window */
4929 while (frp
!= NULL
&& take
!= 0)
4931 h
= frame_minheight(frp
, NULL
);
4932 if (room_reserved
> 0
4933 && frp
->fr_win
!= NULL
4934 && frp
->fr_win
->w_p_wfh
)
4936 if (room_reserved
>= frp
->fr_height
)
4937 room_reserved
-= frp
->fr_height
;
4940 if (frp
->fr_height
- room_reserved
> take
)
4941 room_reserved
= frp
->fr_height
- take
;
4942 take
-= frp
->fr_height
- room_reserved
;
4943 frame_new_height(frp
, room_reserved
, FALSE
, FALSE
);
4949 if (frp
->fr_height
- take
< h
)
4951 take
-= frp
->fr_height
- h
;
4952 frame_new_height(frp
, h
, FALSE
, FALSE
);
4956 frame_new_height(frp
, frp
->fr_height
- take
,
4970 #if defined(FEAT_VERTSPLIT) || defined(PROTO)
4972 * Set current window width and take care of repositioning other windows to
4979 win_setwidth_win(width
, curwin
);
4983 win_setwidth_win(width
, wp
)
4987 /* Always keep current window at least one column wide, even when
4988 * 'winminwidth' is zero. */
4997 frame_setwidth(wp
->w_frame
, width
+ wp
->w_vsep_width
);
4999 /* recompute the window positions */
5000 (void)win_comp_pos();
5002 redraw_all_later(NOT_VALID
);
5006 * Set the width of a frame to "width" and take care that all frames and
5007 * windows inside it are resized. Also resize frames above and below if the
5008 * are in the same FR_ROW frame.
5010 * Strategy is similar to frame_setheight().
5013 frame_setwidth(curfrp
, width
)
5017 int room
; /* total number of lines available */
5018 int take
; /* number of lines taken from other windows */
5024 /* If the width already is the desired value, nothing to do. */
5025 if (curfrp
->fr_width
== width
)
5028 if (curfrp
->fr_parent
== NULL
)
5029 /* topframe: can't change width */
5032 if (curfrp
->fr_parent
->fr_layout
== FR_COL
)
5034 /* Column of frames: Also need to resize frames above and below of
5035 * this one. First check for the minimal width of these. */
5036 w
= frame_minwidth(curfrp
->fr_parent
, NULL
);
5039 frame_setwidth(curfrp
->fr_parent
, width
);
5044 * Row of frames: try to change only frames in this row.
5047 * 1: compute room available, if it's not enough try resizing the
5049 * 2: compute the room available and adjust the width to it.
5051 for (run
= 1; run
<= 2; ++run
)
5055 for (frp
= curfrp
->fr_parent
->fr_child
; frp
!= NULL
;
5059 && frp
->fr_win
!= NULL
5060 && frp
->fr_win
->w_p_wfw
)
5061 room_reserved
+= frp
->fr_width
;
5062 room
+= frp
->fr_width
;
5064 room
-= frame_minwidth(frp
, NULL
);
5069 if (run
== 2 || curfrp
->fr_height
>= ROWS_AVAIL
)
5075 frame_setwidth(curfrp
->fr_parent
, width
5076 + frame_minwidth(curfrp
->fr_parent
, NOWIN
) - (int)p_wmw
- 1);
5080 * Compute the number of lines we will take from others frames (can be
5083 take
= width
- curfrp
->fr_width
;
5085 /* If there is not enough room, also reduce the width of a window
5086 * with 'winfixwidth' set. */
5087 if (width
> room
- room_reserved
)
5088 room_reserved
= room
- width
;
5089 /* If there is only a 'winfixwidth' window and making the
5090 * window smaller, need to make the other window narrower. */
5091 if (take
< 0 && room
- curfrp
->fr_width
< room_reserved
)
5095 * set the current frame to the new width
5097 frame_new_width(curfrp
, width
, FALSE
, FALSE
);
5100 * First take lines from the frames right of the current frame. If
5101 * that is not enough, takes lines from frames left of the current
5104 for (run
= 0; run
< 2; ++run
)
5107 frp
= curfrp
->fr_next
; /* 1st run: start with next window */
5109 frp
= curfrp
->fr_prev
; /* 2nd run: start with prev window */
5110 while (frp
!= NULL
&& take
!= 0)
5112 w
= frame_minwidth(frp
, NULL
);
5113 if (room_reserved
> 0
5114 && frp
->fr_win
!= NULL
5115 && frp
->fr_win
->w_p_wfw
)
5117 if (room_reserved
>= frp
->fr_width
)
5118 room_reserved
-= frp
->fr_width
;
5121 if (frp
->fr_width
- room_reserved
> take
)
5122 room_reserved
= frp
->fr_width
- take
;
5123 take
-= frp
->fr_width
- room_reserved
;
5124 frame_new_width(frp
, room_reserved
, FALSE
, FALSE
);
5130 if (frp
->fr_width
- take
< w
)
5132 take
-= frp
->fr_width
- w
;
5133 frame_new_width(frp
, w
, FALSE
, FALSE
);
5137 frame_new_width(frp
, frp
->fr_width
- take
,
5150 #endif /* FEAT_VERTSPLIT */
5153 * Check 'winminheight' for a valid value.
5162 /* loop until there is a 'winminheight' that is possible */
5165 /* TODO: handle vertical splits */
5167 for (wp
= firstwin
; wp
!= NULL
; wp
= wp
->w_next
)
5168 room
+= wp
->w_height
- p_wmh
;
5183 * Status line of dragwin is dragged "offset" lines down (negative is up).
5186 win_drag_status_line(dragwin
, offset
)
5194 int up
; /* if TRUE, drag status line up, otherwise down */
5197 fr
= dragwin
->w_frame
;
5199 if (fr
!= topframe
) /* more than one window */
5202 /* When the parent frame is not a column of frames, its parent should
5204 if (fr
->fr_layout
!= FR_COL
)
5207 if (fr
!= topframe
) /* only a row of windows, may drag statusline */
5212 /* If this is the last frame in a column, may want to resize the parent
5213 * frame instead (go two up to skip a row of frames). */
5214 while (curfr
!= topframe
&& curfr
->fr_next
== NULL
)
5223 if (offset
< 0) /* drag up */
5227 /* sum up the room of the current frame and above it */
5230 /* only one window */
5231 room
= fr
->fr_height
- frame_minheight(fr
, NULL
);
5236 for (fr
= fr
->fr_child
; ; fr
= fr
->fr_next
)
5238 room
+= fr
->fr_height
- frame_minheight(fr
, NULL
);
5243 fr
= curfr
->fr_next
; /* put fr at frame that grows */
5245 else /* drag down */
5249 * Only dragging the last status line can reduce p_ch.
5251 room
= Rows
- cmdline_row
;
5252 if (curfr
->fr_next
== NULL
)
5258 /* sum up the room of frames below of the current one */
5259 for (fr
= curfr
->fr_next
; fr
!= NULL
; fr
= fr
->fr_next
)
5260 room
+= fr
->fr_height
- frame_minheight(fr
, NULL
);
5261 fr
= curfr
; /* put fr at window that grows */
5264 if (room
< offset
) /* Not enough room */
5265 offset
= room
; /* Move as far as we can */
5270 * Grow frame fr by "offset" lines.
5271 * Doesn't happen when dragging the last status line up.
5274 frame_new_height(fr
, fr
->fr_height
+ offset
, up
, FALSE
);
5277 fr
= curfr
; /* current frame gets smaller */
5279 fr
= curfr
->fr_next
; /* next frame gets smaller */
5282 * Now make the other frames smaller.
5284 while (fr
!= NULL
&& offset
> 0)
5286 n
= frame_minheight(fr
, NULL
);
5287 if (fr
->fr_height
- offset
<= n
)
5289 offset
-= fr
->fr_height
- n
;
5290 frame_new_height(fr
, n
, !up
, FALSE
);
5294 frame_new_height(fr
, fr
->fr_height
- offset
, !up
, FALSE
);
5302 row
= win_comp_pos();
5303 screen_fill(row
, cmdline_row
, 0, (int)Columns
, ' ', ' ', 0);
5305 p_ch
= Rows
- cmdline_row
;
5308 curtab
->tp_ch_used
= p_ch
;
5309 redraw_all_later(SOME_VALID
);
5313 #ifdef FEAT_VERTSPLIT
5315 * Separator line of dragwin is dragged "offset" lines right (negative is left).
5318 win_drag_vsep_line(dragwin
, offset
)
5325 int left
; /* if TRUE, drag separator line left, otherwise right */
5328 fr
= dragwin
->w_frame
;
5329 if (fr
== topframe
) /* only one window (cannot happen?) */
5333 /* When the parent frame is not a row of frames, its parent should be. */
5334 if (fr
->fr_layout
!= FR_ROW
)
5336 if (fr
== topframe
) /* only a column of windows (cannot happen?) */
5342 /* If this is the last frame in a row, may want to resize a parent
5344 while (curfr
->fr_next
== NULL
)
5357 if (offset
< 0) /* drag left */
5361 /* sum up the room of the current frame and left of it */
5363 for (fr
= fr
->fr_child
; ; fr
= fr
->fr_next
)
5365 room
+= fr
->fr_width
- frame_minwidth(fr
, NULL
);
5369 fr
= curfr
->fr_next
; /* put fr at frame that grows */
5371 else /* drag right */
5374 /* sum up the room of frames right of the current one */
5376 for (fr
= curfr
->fr_next
; fr
!= NULL
; fr
= fr
->fr_next
)
5377 room
+= fr
->fr_width
- frame_minwidth(fr
, NULL
);
5378 fr
= curfr
; /* put fr at window that grows */
5381 if (room
< offset
) /* Not enough room */
5382 offset
= room
; /* Move as far as we can */
5383 if (offset
<= 0) /* No room at all, quit. */
5386 /* grow frame fr by offset lines */
5387 frame_new_width(fr
, fr
->fr_width
+ offset
, left
, FALSE
);
5389 /* shrink other frames: current and at the left or at the right */
5391 fr
= curfr
; /* current frame gets smaller */
5393 fr
= curfr
->fr_next
; /* next frame gets smaller */
5395 while (fr
!= NULL
&& offset
> 0)
5397 n
= frame_minwidth(fr
, NULL
);
5398 if (fr
->fr_width
- offset
<= n
)
5400 offset
-= fr
->fr_width
- n
;
5401 frame_new_width(fr
, n
, !left
, FALSE
);
5405 frame_new_width(fr
, fr
->fr_width
- offset
, !left
, FALSE
);
5413 (void)win_comp_pos();
5414 redraw_all_later(NOT_VALID
);
5416 #endif /* FEAT_VERTSPLIT */
5417 #endif /* FEAT_MOUSE */
5419 #endif /* FEAT_WINDOWS */
5422 * Set the height of a window.
5423 * This takes care of the things inside the window, not what happens to the
5424 * window position, the frame or to other windows.
5427 win_new_height(wp
, height
)
5432 int sline
, line_size
;
5433 #define FRACTION_MULT 16384L
5435 /* Don't want a negative height. Happens when splitting a tiny window.
5436 * Will equalize heights soon to fix it. */
5439 if (wp
->w_height
== height
)
5440 return; /* nothing to do */
5442 if (wp
->w_wrow
!= wp
->w_prev_fraction_row
&& wp
->w_height
> 0)
5443 wp
->w_fraction
= ((long)wp
->w_wrow
* FRACTION_MULT
5444 + FRACTION_MULT
/ 2) / (long)wp
->w_height
;
5446 wp
->w_height
= height
;
5449 /* Don't change w_topline when height is zero. Don't set w_topline when
5450 * 'scrollbind' is set and this isn't the current window. */
5452 #ifdef FEAT_SCROLLBIND
5453 && (!wp
->w_p_scb
|| wp
== curwin
)
5458 * Find a value for w_topline that shows the cursor at the same
5459 * relative position in the window as before (more or less).
5461 lnum
= wp
->w_cursor
.lnum
;
5462 if (lnum
< 1) /* can happen when starting up */
5464 wp
->w_wrow
= ((long)wp
->w_fraction
* (long)height
- 1L) / FRACTION_MULT
;
5465 line_size
= plines_win_col(wp
, lnum
, (long)(wp
->w_cursor
.col
)) - 1;
5466 sline
= wp
->w_wrow
- line_size
;
5470 /* Make sure the whole cursor line is visible, if possible. */
5471 int rows
= plines_win(wp
, lnum
, FALSE
);
5473 if (sline
> wp
->w_height
- rows
)
5475 sline
= wp
->w_height
- rows
;
5476 wp
->w_wrow
-= rows
- line_size
;
5483 * Cursor line would go off top of screen if w_wrow was this high.
5484 * Make cursor line the first line in the window. If not enough
5485 * room use w_skipcol;
5487 wp
->w_wrow
= line_size
;
5488 if (wp
->w_wrow
>= wp
->w_height
5489 && (W_WIDTH(wp
) - win_col_off(wp
)) > 0)
5491 wp
->w_skipcol
+= W_WIDTH(wp
) - win_col_off(wp
);
5493 while (wp
->w_wrow
>= wp
->w_height
)
5495 wp
->w_skipcol
+= W_WIDTH(wp
) - win_col_off(wp
)
5503 while (sline
> 0 && lnum
> 1)
5506 hasFoldingWin(wp
, lnum
, &lnum
, NULL
, TRUE
, NULL
);
5509 /* first line in buffer is folded */
5517 if (lnum
== wp
->w_topline
)
5518 line_size
= plines_win_nofill(wp
, lnum
, TRUE
)
5522 line_size
= plines_win(wp
, lnum
, TRUE
);
5529 * Line we want at top would go off top of screen. Use next
5533 hasFoldingWin(wp
, lnum
, NULL
, &lnum
, TRUE
, NULL
);
5536 wp
->w_wrow
-= line_size
+ sline
;
5540 /* First line of file reached, use that as topline. */
5542 wp
->w_wrow
-= sline
;
5545 set_topline(wp
, lnum
);
5552 curs_columns(FALSE
); /* validate w_wrow */
5554 wp
->w_prev_fraction_row
= wp
->w_wrow
;
5556 win_comp_scroll(wp
);
5557 redraw_win_later(wp
, SOME_VALID
);
5559 wp
->w_redr_status
= TRUE
;
5561 invalidate_botline_win(wp
);
5564 #ifdef FEAT_VERTSPLIT
5566 * Set the width of a window.
5569 win_new_width(wp
, width
)
5573 wp
->w_width
= width
;
5574 wp
->w_lines_valid
= 0;
5575 changed_line_abv_curs_win(wp
);
5576 invalidate_botline_win(wp
);
5580 curs_columns(TRUE
); /* validate w_wrow */
5582 redraw_win_later(wp
, NOT_VALID
);
5583 wp
->w_redr_status
= TRUE
;
5591 wp
->w_p_scr
= ((unsigned)wp
->w_height
>> 1);
5592 if (wp
->w_p_scr
== 0)
5597 * command_height: called whenever p_ch has been changed
5605 int old_p_ch
= curtab
->tp_ch_used
;
5607 /* Use the value of p_ch that we remembered. This is needed for when the
5608 * GUI starts up, we can't be sure in what order things happen. And when
5609 * p_ch was changed in another tab page. */
5610 curtab
->tp_ch_used
= p_ch
;
5612 /* Find bottom frame with width of screen. */
5613 frp
= lastwin
->w_frame
;
5614 # ifdef FEAT_VERTSPLIT
5615 while (frp
->fr_width
!= Columns
&& frp
->fr_parent
!= NULL
)
5616 frp
= frp
->fr_parent
;
5619 /* Avoid changing the height of a window with 'winfixheight' set. */
5620 while (frp
->fr_prev
!= NULL
&& frp
->fr_layout
== FR_LEAF
5621 && frp
->fr_win
->w_p_wfh
)
5624 if (starting
!= NO_SCREEN
)
5626 cmdline_row
= Rows
- p_ch
;
5628 if (p_ch
> old_p_ch
) /* p_ch got bigger */
5630 while (p_ch
> old_p_ch
)
5636 curtab
->tp_ch_used
= p_ch
;
5637 cmdline_row
= Rows
- p_ch
;
5640 h
= frp
->fr_height
- frame_minheight(frp
, NULL
);
5641 if (h
> p_ch
- old_p_ch
)
5642 h
= p_ch
- old_p_ch
;
5644 frame_add_height(frp
, -h
);
5648 /* Recompute window positions. */
5649 (void)win_comp_pos();
5651 /* clear the lines added to cmdline */
5653 screen_fill((int)(cmdline_row
), (int)Rows
, 0,
5654 (int)Columns
, ' ', ' ', 0);
5655 msg_row
= cmdline_row
;
5656 redraw_cmdline
= TRUE
;
5660 if (msg_row
< cmdline_row
)
5661 msg_row
= cmdline_row
;
5662 redraw_cmdline
= TRUE
;
5664 frame_add_height(frp
, (int)(old_p_ch
- p_ch
));
5666 /* Recompute window positions. */
5667 if (frp
!= lastwin
->w_frame
)
5668 (void)win_comp_pos();
5670 cmdline_row
= Rows
- p_ch
;
5671 win_setheight(cmdline_row
);
5675 #if defined(FEAT_WINDOWS) || defined(PROTO)
5677 * Resize frame "frp" to be "n" lines higher (negative for less high).
5678 * Also resize the frames it is contained in.
5681 frame_add_height(frp
, n
)
5685 frame_new_height(frp
, frp
->fr_height
+ n
, FALSE
, FALSE
);
5688 frp
= frp
->fr_parent
;
5691 frp
->fr_height
+= n
;
5696 * Add or remove a status line for the bottom window(s), according to the
5697 * value of 'laststatus'.
5700 last_status(morewin
)
5701 int morewin
; /* pretend there are two or more windows */
5703 /* Don't make a difference between horizontal or vertical split. */
5704 last_status_rec(topframe
, (p_ls
== 2
5705 || (p_ls
== 1 && (morewin
|| lastwin
!= firstwin
))));
5709 last_status_rec(fr
, statusline
)
5716 if (fr
->fr_layout
== FR_LEAF
)
5719 if (wp
->w_status_height
!= 0 && !statusline
)
5721 /* remove status line */
5722 win_new_height(wp
, wp
->w_height
+ 1);
5723 wp
->w_status_height
= 0;
5726 else if (wp
->w_status_height
== 0 && statusline
)
5728 /* Find a frame to take a line from. */
5730 while (fp
->fr_height
<= frame_minheight(fp
, NULL
))
5737 /* In a column of frames: go to frame above. If already at
5738 * the top or in a row of frames: go to parent. */
5739 if (fp
->fr_parent
->fr_layout
== FR_COL
&& fp
->fr_prev
!= NULL
)
5744 wp
->w_status_height
= 1;
5747 frame_new_height(fp
, fp
->fr_height
- 1, FALSE
, FALSE
);
5748 frame_fix_height(wp
);
5749 (void)win_comp_pos();
5752 win_new_height(wp
, wp
->w_height
- 1);
5754 redraw_all_later(SOME_VALID
);
5757 #ifdef FEAT_VERTSPLIT
5758 else if (fr
->fr_layout
== FR_ROW
)
5760 /* vertically split windows, set status line for each one */
5761 for (fp
= fr
->fr_child
; fp
!= NULL
; fp
= fp
->fr_next
)
5762 last_status_rec(fp
, statusline
);
5767 /* horizontally split window, set status line for last one */
5768 for (fp
= fr
->fr_child
; fp
->fr_next
!= NULL
; fp
= fp
->fr_next
)
5770 last_status_rec(fp
, statusline
);
5775 * Return the number of lines used by the tab page line.
5780 #ifdef FEAT_GUI_TABLINE
5781 /* When the GUI has the tabline then this always returns zero. */
5782 if (gui_use_tabline())
5788 case 1: return (first_tabpage
->tp_next
== NULL
) ? 0 : 1;
5793 #endif /* FEAT_WINDOWS */
5795 #if defined(FEAT_SEARCHPATH) || defined(PROTO)
5797 * Get the file name at the cursor.
5798 * If Visual mode is active, use the selected text if it's in one line.
5799 * Returns the name in allocated memory, NULL for failure.
5802 grab_file_name(count
, file_lnum
)
5804 linenr_T
*file_lnum
;
5812 if (get_visual_text(NULL
, &ptr
, &len
) == FAIL
)
5814 return find_file_name_in_path(ptr
, len
,
5815 FNAME_MESS
|FNAME_EXP
|FNAME_REL
, count
, curbuf
->b_ffname
);
5818 return file_name_at_cursor(FNAME_MESS
|FNAME_HYP
|FNAME_EXP
|FNAME_REL
, count
,
5824 * Return the file name under or after the cursor.
5826 * The 'path' option is searched if the file name is not absolute.
5827 * The string returned has been alloc'ed and should be freed by the caller.
5828 * NULL is returned if the file name or file is not found.
5831 * FNAME_MESS give error messages
5832 * FNAME_EXP expand to path
5833 * FNAME_HYP check for hypertext link
5834 * FNAME_INCL apply "includeexpr"
5837 file_name_at_cursor(options
, count
, file_lnum
)
5840 linenr_T
*file_lnum
;
5842 return file_name_in_line(ml_get_curline(),
5843 curwin
->w_cursor
.col
, options
, count
, curbuf
->b_ffname
,
5848 * Return the name of the file under or after ptr[col].
5849 * Otherwise like file_name_at_cursor().
5852 file_name_in_line(line
, col
, options
, count
, rel_fname
, file_lnum
)
5857 char_u
*rel_fname
; /* file we are searching relative to */
5858 linenr_T
*file_lnum
; /* line number after the file name */
5864 * search forward for what could be the start of a file name
5867 while (*ptr
!= NUL
&& !vim_isfilec(*ptr
))
5869 if (*ptr
== NUL
) /* nothing found */
5871 if (options
& FNAME_MESS
)
5872 EMSG(_("E446: No file name under cursor"));
5877 * Search backward for first char of the file name.
5878 * Go one char back to ":" before "//" even when ':' is not in 'isfname'.
5883 if (has_mbyte
&& (len
= (*mb_head_off
)(line
, ptr
- 1)) > 0)
5887 if (vim_isfilec(ptr
[-1])
5888 || ((options
& FNAME_HYP
) && path_is_url(ptr
- 1)))
5895 * Search forward for the last char of the file name.
5896 * Also allow "://" when ':' is not in 'isfname'.
5899 while (vim_isfilec(ptr
[len
])
5900 || ((options
& FNAME_HYP
) && path_is_url(ptr
+ len
)))
5903 len
+= (*mb_ptr2len
)(ptr
+ len
);
5909 * If there is trailing punctuation, remove it.
5910 * But don't remove "..", could be a directory name.
5912 if (len
> 2 && vim_strchr((char_u
*)".,:;!", ptr
[len
- 1]) != NULL
5913 && ptr
[len
- 2] != '.')
5916 if (file_lnum
!= NULL
)
5920 /* Get the number after the file name and a separator character */
5926 ++p
; /* skip the separator */
5929 *file_lnum
= (int)getdigits(&p
);
5933 return find_file_name_in_path(ptr
, len
, options
, count
, rel_fname
);
5936 # if defined(FEAT_FIND_ID) && defined(FEAT_EVAL)
5937 static char_u
*eval_includeexpr
__ARGS((char_u
*ptr
, int len
));
5940 eval_includeexpr(ptr
, len
)
5946 set_vim_var_string(VV_FNAME
, ptr
, len
);
5947 res
= eval_to_string_safe(curbuf
->b_p_inex
, NULL
,
5948 was_set_insecurely((char_u
*)"includeexpr", OPT_LOCAL
));
5949 set_vim_var_string(VV_FNAME
, NULL
, 0);
5955 * Return the name of the file ptr[len] in 'path'.
5956 * Otherwise like file_name_at_cursor().
5959 find_file_name_in_path(ptr
, len
, options
, count
, rel_fname
)
5964 char_u
*rel_fname
; /* file we are searching relative to */
5968 # if defined(FEAT_FIND_ID) && defined(FEAT_EVAL)
5969 char_u
*tofree
= NULL
;
5971 if ((options
& FNAME_INCL
) && *curbuf
->b_p_inex
!= NUL
)
5973 tofree
= eval_includeexpr(ptr
, len
);
5977 len
= (int)STRLEN(ptr
);
5982 if (options
& FNAME_EXP
)
5984 file_name
= find_file_in_path(ptr
, len
, options
& ~FNAME_MESS
,
5987 # if defined(FEAT_FIND_ID) && defined(FEAT_EVAL)
5989 * If the file could not be found in a normal way, try applying
5990 * 'includeexpr' (unless done already).
5992 if (file_name
== NULL
5993 && !(options
& FNAME_INCL
) && *curbuf
->b_p_inex
!= NUL
)
5995 tofree
= eval_includeexpr(ptr
, len
);
5999 len
= (int)STRLEN(ptr
);
6000 file_name
= find_file_in_path(ptr
, len
, options
& ~FNAME_MESS
,
6005 if (file_name
== NULL
&& (options
& FNAME_MESS
))
6009 EMSG2(_("E447: Can't find file \"%s\" in path"), ptr
);
6013 /* Repeat finding the file "count" times. This matters when it
6014 * appears several times in the path. */
6015 while (file_name
!= NULL
&& --count
> 0)
6017 vim_free(file_name
);
6018 file_name
= find_file_in_path(ptr
, len
, options
, FALSE
, rel_fname
);
6022 file_name
= vim_strnsave(ptr
, len
);
6024 # if defined(FEAT_FIND_ID) && defined(FEAT_EVAL)
6030 #endif /* FEAT_SEARCHPATH */
6033 * Check if the "://" of a URL is at the pointer, return URL_SLASH.
6034 * Also check for ":\\", which MS Internet Explorer accepts, return
6041 if (STRNCMP(p
, "://", (size_t)3) == 0)
6043 else if (STRNCMP(p
, ":\\\\", (size_t)3) == 0)
6044 return URL_BACKSLASH
;
6049 * Check if "fname" starts with "name://". Return URL_SLASH if it does.
6050 * Return URL_BACKSLASH for "name:\\".
6051 * Return zero otherwise.
6054 path_with_url(fname
)
6059 for (p
= fname
; isalpha(*p
); ++p
)
6061 return path_is_url(p
);
6065 * Return TRUE if "name" is a full (absolute) path name or URL.
6071 return (path_with_url(name
) != 0 || mch_isFullName(name
));
6075 * Get absolute file name into buffer "buf[len]".
6077 * return FAIL for failure, OK otherwise
6080 vim_FullName(fname
, buf
, len
, force
)
6081 char_u
*fname
, *buf
;
6083 int force
; /* force expansion even when already absolute */
6092 url
= path_with_url(fname
);
6094 retval
= mch_FullName(fname
, buf
, len
, force
);
6095 if (url
|| retval
== FAIL
)
6097 /* something failed; use the file name (truncate when too long) */
6098 vim_strncpy(buf
, fname
, len
- 1);
6100 #if defined(MACOS_CLASSIC) || defined(OS2) || defined(MSDOS) || defined(MSWIN)
6107 * Return the minimal number of rows that is needed on the screen to display
6108 * the current number of windows.
6119 if (firstwin
== NULL
) /* not initialized yet */
6124 for (tp
= first_tabpage
; tp
!= NULL
; tp
= tp
->tp_next
)
6126 n
= frame_minheight(tp
->tp_topframe
, NULL
);
6130 total
+= tabline_height();
6132 total
= 1; /* at least one window should have a line! */
6134 total
+= 1; /* count the room for the command line */
6139 * Return TRUE if there is only one window (in the current tab page), not
6140 * counting a help or preview window, unless it is the current window.
6141 * Does not count "aucmd_win".
6150 /* If there is another tab page there always is another window. */
6151 if (first_tabpage
->tp_next
!= NULL
)
6154 for (wp
= firstwin
; wp
!= NULL
; wp
= wp
->w_next
)
6155 if ((!((wp
->w_buffer
->b_help
&& !curbuf
->b_help
)
6156 # ifdef FEAT_QUICKFIX
6160 # ifdef FEAT_AUTOCMD
6165 return (count
<= 1);
6171 #if defined(FEAT_WINDOWS) || defined(FEAT_AUTOCMD) || defined(PROTO)
6173 * Correct the cursor line number in other windows. Used after changing the
6174 * current buffer, and before applying autocommands.
6175 * When "do_curwin" is TRUE, also check current window.
6178 check_lnums(do_curwin
)
6186 FOR_ALL_TAB_WINDOWS(tp
, wp
)
6187 if ((do_curwin
|| wp
!= curwin
) && wp
->w_buffer
== curbuf
)
6193 if (wp
->w_cursor
.lnum
> curbuf
->b_ml
.ml_line_count
)
6194 wp
->w_cursor
.lnum
= curbuf
->b_ml
.ml_line_count
;
6195 if (wp
->w_topline
> curbuf
->b_ml
.ml_line_count
)
6196 wp
->w_topline
= curbuf
->b_ml
.ml_line_count
;
6201 #if defined(FEAT_WINDOWS) || defined(PROTO)
6204 * A snapshot of the window sizes, to restore them after closing the help
6206 * Only these fields are used:
6212 * fr_win (only valid for the old curwin, NULL otherwise)
6216 * Create a snapshot of the current frame sizes.
6222 clear_snapshot(curtab
, idx
);
6223 make_snapshot_rec(topframe
, &curtab
->tp_snapshot
[idx
]);
6227 make_snapshot_rec(fr
, frp
)
6231 *frp
= (frame_T
*)alloc_clear((unsigned)sizeof(frame_T
));
6234 (*frp
)->fr_layout
= fr
->fr_layout
;
6235 # ifdef FEAT_VERTSPLIT
6236 (*frp
)->fr_width
= fr
->fr_width
;
6238 (*frp
)->fr_height
= fr
->fr_height
;
6239 if (fr
->fr_next
!= NULL
)
6240 make_snapshot_rec(fr
->fr_next
, &((*frp
)->fr_next
));
6241 if (fr
->fr_child
!= NULL
)
6242 make_snapshot_rec(fr
->fr_child
, &((*frp
)->fr_child
));
6243 if (fr
->fr_layout
== FR_LEAF
&& fr
->fr_win
== curwin
)
6244 (*frp
)->fr_win
= curwin
;
6248 * Remove any existing snapshot.
6251 clear_snapshot(tp
, idx
)
6255 clear_snapshot_rec(tp
->tp_snapshot
[idx
]);
6256 tp
->tp_snapshot
[idx
] = NULL
;
6260 clear_snapshot_rec(fr
)
6265 clear_snapshot_rec(fr
->fr_next
);
6266 clear_snapshot_rec(fr
->fr_child
);
6272 * Restore a previously created snapshot, if there is any.
6273 * This is only done if the screen size didn't change and the window layout is
6277 restore_snapshot(idx
, close_curwin
)
6279 int close_curwin
; /* closing current window */
6283 if (curtab
->tp_snapshot
[idx
] != NULL
6284 # ifdef FEAT_VERTSPLIT
6285 && curtab
->tp_snapshot
[idx
]->fr_width
== topframe
->fr_width
6287 && curtab
->tp_snapshot
[idx
]->fr_height
== topframe
->fr_height
6288 && check_snapshot_rec(curtab
->tp_snapshot
[idx
], topframe
) == OK
)
6290 wp
= restore_snapshot_rec(curtab
->tp_snapshot
[idx
], topframe
);
6292 if (wp
!= NULL
&& close_curwin
)
6294 redraw_all_later(CLEAR
);
6296 clear_snapshot(curtab
, idx
);
6300 * Check if frames "sn" and "fr" have the same layout, same following frames
6301 * and same children.
6304 check_snapshot_rec(sn
, fr
)
6308 if (sn
->fr_layout
!= fr
->fr_layout
6309 || (sn
->fr_next
== NULL
) != (fr
->fr_next
== NULL
)
6310 || (sn
->fr_child
== NULL
) != (fr
->fr_child
== NULL
)
6311 || (sn
->fr_next
!= NULL
6312 && check_snapshot_rec(sn
->fr_next
, fr
->fr_next
) == FAIL
)
6313 || (sn
->fr_child
!= NULL
6314 && check_snapshot_rec(sn
->fr_child
, fr
->fr_child
) == FAIL
))
6320 * Copy the size of snapshot frame "sn" to frame "fr". Do the same for all
6321 * following frames and children.
6322 * Returns a pointer to the old current window, or NULL.
6325 restore_snapshot_rec(sn
, fr
)
6332 fr
->fr_height
= sn
->fr_height
;
6333 # ifdef FEAT_VERTSPLIT
6334 fr
->fr_width
= sn
->fr_width
;
6336 if (fr
->fr_layout
== FR_LEAF
)
6338 frame_new_height(fr
, fr
->fr_height
, FALSE
, FALSE
);
6339 # ifdef FEAT_VERTSPLIT
6340 frame_new_width(fr
, fr
->fr_width
, FALSE
, FALSE
);
6344 if (sn
->fr_next
!= NULL
)
6346 wp2
= restore_snapshot_rec(sn
->fr_next
, fr
->fr_next
);
6350 if (sn
->fr_child
!= NULL
)
6352 wp2
= restore_snapshot_rec(sn
->fr_child
, fr
->fr_child
);
6361 #if (defined(FEAT_GUI) && defined(FEAT_VERTSPLIT)) || defined(PROTO)
6363 * Return TRUE if there is any vertically split window.
6370 if (topframe
->fr_layout
== FR_ROW
)
6373 if (topframe
->fr_layout
== FR_COL
)
6374 for (fr
= topframe
->fr_child
; fr
!= NULL
; fr
= fr
->fr_next
)
6375 if (fr
->fr_layout
== FR_ROW
)
6382 #if defined(FEAT_SEARCH_EXTRA) || defined(PROTO)
6384 * Add match to the match list of window 'wp'. The pattern 'pat' will be
6385 * highlighted with the group 'grp' with priority 'prio'.
6386 * Optionally, a desired ID 'id' can be specified (greater than or equal to 1).
6387 * If no particular ID is desired, -1 must be specified for 'id'.
6388 * Return ID of added match, -1 on failure.
6391 match_add(wp
, grp
, pat
, prio
, id
)
6404 if (*grp
== NUL
|| *pat
== NUL
)
6406 if (id
< -1 || id
== 0)
6408 EMSGN("E799: Invalid ID: %ld (must be greater than or equal to 1)", id
);
6413 cur
= wp
->w_match_head
;
6418 EMSGN("E801: ID already taken: %ld", id
);
6424 if ((hlg_id
= syn_namen2id(grp
, (int)STRLEN(grp
))) == 0)
6426 EMSG2(_(e_nogroup
), grp
);
6429 if ((regprog
= vim_regcomp(pat
, RE_MAGIC
)) == NULL
)
6431 EMSG2(_(e_invarg2
), pat
);
6435 /* Find available match ID. */
6438 cur
= wp
->w_match_head
;
6439 while (cur
!= NULL
&& cur
->id
!= wp
->w_next_match_id
)
6442 id
= wp
->w_next_match_id
;
6443 wp
->w_next_match_id
++;
6446 /* Build new match. */
6447 m
= (matchitem_T
*)alloc(sizeof(matchitem_T
));
6450 m
->pattern
= vim_strsave(pat
);
6452 m
->match
.regprog
= regprog
;
6453 m
->match
.rmm_ic
= FALSE
;
6454 m
->match
.rmm_maxcol
= 0;
6456 /* Insert new match. The match list is in ascending order with regard to
6457 * the match priorities. */
6458 cur
= wp
->w_match_head
;
6460 while (cur
!= NULL
&& prio
>= cur
->priority
)
6466 wp
->w_match_head
= m
;
6471 redraw_later(SOME_VALID
);
6476 * Delete match with ID 'id' in the match list of window 'wp'.
6477 * Print error messages if 'perr' is TRUE.
6480 match_delete(wp
, id
, perr
)
6485 matchitem_T
*cur
= wp
->w_match_head
;
6486 matchitem_T
*prev
= cur
;
6491 EMSGN("E802: Invalid ID: %ld (must be greater than or equal to 1)",
6495 while (cur
!= NULL
&& cur
->id
!= id
)
6503 EMSGN("E803: ID not found: %ld", id
);
6507 wp
->w_match_head
= cur
->next
;
6509 prev
->next
= cur
->next
;
6510 vim_free(cur
->match
.regprog
);
6511 vim_free(cur
->pattern
);
6513 redraw_later(SOME_VALID
);
6518 * Delete all matches in the match list of window 'wp'.
6526 while (wp
->w_match_head
!= NULL
)
6528 m
= wp
->w_match_head
->next
;
6529 vim_free(wp
->w_match_head
->match
.regprog
);
6530 vim_free(wp
->w_match_head
->pattern
);
6531 vim_free(wp
->w_match_head
);
6532 wp
->w_match_head
= m
;
6534 redraw_later(SOME_VALID
);
6538 * Get match from ID 'id' in window 'wp'.
6539 * Return NULL if match not found.
6546 matchitem_T
*cur
= wp
->w_match_head
;
6548 while (cur
!= NULL
&& cur
->id
!= id
)