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
;
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 wp
->w_height
= 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 wp
->w_height
= 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 wp
->w_width
= 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 wp
->w_width
= Columns
;
1053 wp
->w_vsep_width
= 0;
1057 wp
->w_wincol
= oldwin
->w_wincol
;
1058 wp
->w_width
= 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 #ifdef FEAT_GUI_MACVIM
1101 /* The view may have moved, so clear all or display may get corrupted. */
1102 redraw_win_later(oldwin
, CLEAR
);
1104 redraw_win_later(oldwin
, NOT_VALID
);
1106 oldwin
->w_redr_status
= TRUE
;
1112 msg_clr_eos_force(); /* Old command/ruler may still be there */
1115 msg_col
= 0; /* put position back at start of line */
1119 * make the new window the current window and redraw
1121 if (do_equal
|| dir
!= 0)
1123 #ifdef FEAT_VERTSPLIT
1124 (flags
& WSP_VERT
) ? (dir
== 'v' ? 'b' : 'h')
1125 : dir
== 'h' ? 'b' :
1129 /* Don't change the window height/width to 'winheight' / 'winwidth' if a
1130 * size was given. */
1131 #ifdef FEAT_VERTSPLIT
1132 if (flags
& WSP_VERT
)
1139 /* When 'guioptions' includes 'L' or 'R' may have to add scrollbars. */
1141 gui_init_which_components(NULL
);
1151 win_enter(wp
, FALSE
);
1152 #ifdef FEAT_VERTSPLIT
1153 if (flags
& WSP_VERT
)
1164 * Initialize window "newp" from window "oldp".
1165 * Used when splitting a window and when creating a new tab page.
1166 * The windows will both edit the same buffer.
1167 * WSP_NEWLOC may be specified in flags to prevent the location list from
1171 win_init(newp
, oldp
, flags
)
1178 newp
->w_buffer
= oldp
->w_buffer
;
1179 oldp
->w_buffer
->b_nwindows
++;
1180 newp
->w_cursor
= oldp
->w_cursor
;
1182 newp
->w_curswant
= oldp
->w_curswant
;
1183 newp
->w_set_curswant
= oldp
->w_set_curswant
;
1184 newp
->w_topline
= oldp
->w_topline
;
1186 newp
->w_topfill
= oldp
->w_topfill
;
1188 newp
->w_leftcol
= oldp
->w_leftcol
;
1189 newp
->w_pcmark
= oldp
->w_pcmark
;
1190 newp
->w_prev_pcmark
= oldp
->w_prev_pcmark
;
1191 newp
->w_alt_fnum
= oldp
->w_alt_fnum
;
1192 newp
->w_wrow
= oldp
->w_wrow
;
1193 newp
->w_fraction
= oldp
->w_fraction
;
1194 newp
->w_prev_fraction_row
= oldp
->w_prev_fraction_row
;
1195 #ifdef FEAT_JUMPLIST
1196 copy_jumplist(oldp
, newp
);
1198 #ifdef FEAT_QUICKFIX
1199 if (flags
& WSP_NEWLOC
)
1201 /* Don't copy the location list. */
1202 newp
->w_llist
= NULL
;
1203 newp
->w_llist_ref
= NULL
;
1206 copy_loclist(oldp
, newp
);
1208 if (oldp
->w_localdir
!= NULL
)
1209 newp
->w_localdir
= vim_strsave(oldp
->w_localdir
);
1211 /* copy tagstack and folds */
1212 for (i
= 0; i
< oldp
->w_tagstacklen
; i
++)
1214 newp
->w_tagstack
[i
] = oldp
->w_tagstack
[i
];
1215 if (newp
->w_tagstack
[i
].tagname
!= NULL
)
1216 newp
->w_tagstack
[i
].tagname
=
1217 vim_strsave(newp
->w_tagstack
[i
].tagname
);
1219 newp
->w_tagstackidx
= oldp
->w_tagstackidx
;
1220 newp
->w_tagstacklen
= oldp
->w_tagstacklen
;
1221 # ifdef FEAT_FOLDING
1222 copyFoldingState(oldp
, newp
);
1225 win_init_some(newp
, oldp
);
1229 * Initialize window "newp" from window"old".
1230 * Only the essential things are copied.
1233 win_init_some(newp
, oldp
)
1237 /* Use the same argument list. */
1238 newp
->w_alist
= oldp
->w_alist
;
1239 ++newp
->w_alist
->al_refcount
;
1240 newp
->w_arg_idx
= oldp
->w_arg_idx
;
1242 /* copy options from existing window */
1243 win_copy_options(oldp
, newp
);
1246 #endif /* FEAT_WINDOWS */
1248 #if defined(FEAT_WINDOWS) || defined(PROTO)
1250 * Check if "win" is a pointer to an existing window.
1260 for (wp
= firstwin
; wp
!= NULL
; wp
= wp
->w_next
)
1267 * Return the number of windows.
1275 for (wp
= firstwin
; wp
!= NULL
; wp
= wp
->w_next
)
1281 * Make "count" windows on the screen.
1282 * Return actual number of windows on the screen.
1283 * Must be called when there is just one window, filling the whole screen
1284 * (excluding the command line).
1287 make_windows(count
, vertical
)
1289 int vertical UNUSED
; /* split windows vertically if TRUE */
1294 #ifdef FEAT_VERTSPLIT
1297 /* Each windows needs at least 'winminwidth' lines and a separator
1299 maxcount
= (curwin
->w_width
+ curwin
->w_vsep_width
1300 - (p_wiw
- p_wmw
)) / (p_wmw
+ 1);
1305 /* Each window needs at least 'winminheight' lines and a status line. */
1306 maxcount
= (curwin
->w_height
+ curwin
->w_status_height
1307 - (p_wh
- p_wmh
)) / (p_wmh
+ STATUS_HEIGHT
);
1312 if (count
> maxcount
)
1316 * add status line now, otherwise first window will be too big
1323 * Don't execute autocommands while creating the windows. Must do that
1324 * when putting the buffers in the windows.
1329 /* todo is number of windows left to create */
1330 for (todo
= count
- 1; todo
> 0; --todo
)
1331 #ifdef FEAT_VERTSPLIT
1334 if (win_split(curwin
->w_width
- (curwin
->w_width
- todo
)
1335 / (todo
+ 1) - 1, WSP_VERT
| WSP_ABOVE
) == FAIL
)
1341 if (win_split(curwin
->w_height
- (curwin
->w_height
- todo
1342 * STATUS_HEIGHT
) / (todo
+ 1)
1343 - STATUS_HEIGHT
, WSP_ABOVE
) == FAIL
)
1351 /* return actual number of windows */
1352 return (count
- todo
);
1356 * Exchange current and next window
1359 win_exchange(Prenum
)
1368 if (lastwin
== firstwin
) /* just one window */
1375 need_mouse_correct
= TRUE
;
1379 * find window to exchange with
1383 frp
= curwin
->w_frame
->fr_parent
->fr_child
;
1384 while (frp
!= NULL
&& --Prenum
> 0)
1387 else if (curwin
->w_frame
->fr_next
!= NULL
) /* Swap with next */
1388 frp
= curwin
->w_frame
->fr_next
;
1389 else /* Swap last window in row/col with previous */
1390 frp
= curwin
->w_frame
->fr_prev
;
1392 /* We can only exchange a window with another window, not with a frame
1393 * containing windows. */
1394 if (frp
== NULL
|| frp
->fr_win
== NULL
|| frp
->fr_win
== curwin
)
1399 * 1. remove curwin from the list. Remember after which window it was in wp2
1400 * 2. insert curwin before wp in the list
1402 * 3. remove wp from the list
1403 * 4. insert wp after wp2
1404 * 5. exchange the status line height and vsep width.
1406 wp2
= curwin
->w_prev
;
1407 frp2
= curwin
->w_frame
->fr_prev
;
1408 if (wp
->w_prev
!= curwin
)
1410 win_remove(curwin
, NULL
);
1411 frame_remove(curwin
->w_frame
);
1412 win_append(wp
->w_prev
, curwin
);
1413 frame_insert(frp
, curwin
->w_frame
);
1417 win_remove(wp
, NULL
);
1418 frame_remove(wp
->w_frame
);
1419 win_append(wp2
, wp
);
1421 frame_insert(wp
->w_frame
->fr_parent
->fr_child
, wp
->w_frame
);
1423 frame_append(frp2
, wp
->w_frame
);
1425 temp
= curwin
->w_status_height
;
1426 curwin
->w_status_height
= wp
->w_status_height
;
1427 wp
->w_status_height
= temp
;
1428 #ifdef FEAT_VERTSPLIT
1429 temp
= curwin
->w_vsep_width
;
1430 curwin
->w_vsep_width
= wp
->w_vsep_width
;
1431 wp
->w_vsep_width
= temp
;
1433 /* If the windows are not in the same frame, exchange the sizes to avoid
1434 * messing up the window layout. Otherwise fix the frame sizes. */
1435 if (curwin
->w_frame
->fr_parent
!= wp
->w_frame
->fr_parent
)
1437 temp
= curwin
->w_height
;
1438 curwin
->w_height
= wp
->w_height
;
1439 wp
->w_height
= temp
;
1440 temp
= curwin
->w_width
;
1441 curwin
->w_width
= wp
->w_width
;
1446 frame_fix_height(curwin
);
1447 frame_fix_height(wp
);
1448 frame_fix_width(curwin
);
1449 frame_fix_width(wp
);
1453 (void)win_comp_pos(); /* recompute window positions */
1455 win_enter(wp
, TRUE
);
1456 redraw_later(CLEAR
);
1460 * rotate windows: if upwards TRUE the second window becomes the first one
1461 * if upwards FALSE the first window becomes the second one
1464 win_rotate(upwards
, count
)
1473 if (firstwin
== lastwin
) /* nothing to do */
1480 need_mouse_correct
= TRUE
;
1483 #ifdef FEAT_VERTSPLIT
1484 /* Check if all frames in this row/col have one window. */
1485 for (frp
= curwin
->w_frame
->fr_parent
->fr_child
; frp
!= NULL
;
1487 if (frp
->fr_win
== NULL
)
1489 EMSG(_("E443: Cannot rotate when another window is split"));
1496 if (upwards
) /* first window becomes last window */
1498 /* remove first window/frame from the list */
1499 frp
= curwin
->w_frame
->fr_parent
->fr_child
;
1501 win_remove(wp1
, NULL
);
1504 /* find last frame and append removed window/frame after it */
1505 for ( ; frp
->fr_next
!= NULL
; frp
= frp
->fr_next
)
1507 win_append(frp
->fr_win
, wp1
);
1508 frame_append(frp
, wp1
->w_frame
);
1510 wp2
= frp
->fr_win
; /* previously last window */
1512 else /* last window becomes first window */
1514 /* find last window/frame in the list and remove it */
1515 for (frp
= curwin
->w_frame
; frp
->fr_next
!= NULL
;
1519 wp2
= wp1
->w_prev
; /* will become last window */
1520 win_remove(wp1
, NULL
);
1523 /* append the removed window/frame before the first in the list */
1524 win_append(frp
->fr_parent
->fr_child
->fr_win
->w_prev
, wp1
);
1525 frame_insert(frp
->fr_parent
->fr_child
, frp
);
1528 /* exchange status height and vsep width of old and new last window */
1529 n
= wp2
->w_status_height
;
1530 wp2
->w_status_height
= wp1
->w_status_height
;
1531 wp1
->w_status_height
= n
;
1532 frame_fix_height(wp1
);
1533 frame_fix_height(wp2
);
1534 #ifdef FEAT_VERTSPLIT
1535 n
= wp2
->w_vsep_width
;
1536 wp2
->w_vsep_width
= wp1
->w_vsep_width
;
1537 wp1
->w_vsep_width
= n
;
1538 frame_fix_width(wp1
);
1539 frame_fix_width(wp2
);
1542 /* recompute w_winrow and w_wincol for all windows */
1543 (void)win_comp_pos();
1546 redraw_later(CLEAR
);
1550 * Move the current window to the very top/bottom/left/right of the screen.
1553 win_totop(size
, flags
)
1558 int height
= curwin
->w_height
;
1560 if (lastwin
== firstwin
)
1566 /* Remove the window and frame from the tree of frames. */
1567 (void)winframe_remove(curwin
, &dir
, NULL
);
1568 win_remove(curwin
, NULL
);
1569 last_status(FALSE
); /* may need to remove last status line */
1570 (void)win_comp_pos(); /* recompute window positions */
1572 /* Split a window on the desired side and put the window there. */
1573 (void)win_split_ins(size
, flags
, curwin
, dir
);
1574 if (!(flags
& WSP_VERT
))
1576 win_setheight(height
);
1578 win_equal(curwin
, TRUE
, 'v');
1581 #if defined(FEAT_GUI) && defined(FEAT_VERTSPLIT)
1582 /* When 'guioptions' includes 'L' or 'R' may have to remove or add
1583 * scrollbars. Have to update them anyway. */
1584 gui_may_update_scrollbars();
1589 * Move window "win1" to below/right of "win2" and make "win1" the current
1590 * window. Only works within the same frame!
1593 win_move_after(win1
, win2
)
1598 /* check if the arguments are reasonable */
1602 /* check if there is something to do */
1603 if (win2
->w_next
!= win1
)
1605 /* may need move the status line/vertical separator of the last window
1607 if (win1
== lastwin
)
1609 height
= win1
->w_prev
->w_status_height
;
1610 win1
->w_prev
->w_status_height
= win1
->w_status_height
;
1611 win1
->w_status_height
= height
;
1612 #ifdef FEAT_VERTSPLIT
1613 if (win1
->w_prev
->w_vsep_width
== 1)
1615 /* Remove the vertical separator from the last-but-one window,
1616 * add it to the last window. Adjust the frame widths. */
1617 win1
->w_prev
->w_vsep_width
= 0;
1618 win1
->w_prev
->w_frame
->fr_width
-= 1;
1619 win1
->w_vsep_width
= 1;
1620 win1
->w_frame
->fr_width
+= 1;
1624 else if (win2
== lastwin
)
1626 height
= win1
->w_status_height
;
1627 win1
->w_status_height
= win2
->w_status_height
;
1628 win2
->w_status_height
= height
;
1629 #ifdef FEAT_VERTSPLIT
1630 if (win1
->w_vsep_width
== 1)
1632 /* Remove the vertical separator from win1, add it to the last
1633 * window, win2. Adjust the frame widths. */
1634 win2
->w_vsep_width
= 1;
1635 win2
->w_frame
->fr_width
+= 1;
1636 win1
->w_vsep_width
= 0;
1637 win1
->w_frame
->fr_width
-= 1;
1641 win_remove(win1
, NULL
);
1642 frame_remove(win1
->w_frame
);
1643 win_append(win2
, win1
);
1644 frame_append(win2
->w_frame
, win1
->w_frame
);
1646 (void)win_comp_pos(); /* recompute w_winrow for all windows */
1647 redraw_later(NOT_VALID
);
1649 win_enter(win1
, FALSE
);
1653 * Make all windows the same height.
1654 * 'next_curwin' will soon be the current window, make sure it has enough
1658 win_equal(next_curwin
, current
, dir
)
1659 win_T
*next_curwin
; /* pointer to current window to be or NULL */
1660 int current
; /* do only frame with current window */
1661 int dir
; /* 'v' for vertically, 'h' for horizontally,
1662 'b' for both, 0 for using p_ead */
1665 #ifdef FEAT_VERTSPLIT
1670 win_equal_rec(next_curwin
== NULL
? curwin
: next_curwin
, current
,
1671 topframe
, dir
, 0, tabline_height(),
1672 (int)Columns
, topframe
->fr_height
);
1676 * Set a frame to a new position and height, spreading the available room
1677 * equally over contained frames.
1678 * The window "next_curwin" (if not NULL) should at least get the size from
1679 * 'winheight' and 'winwidth' if possible.
1682 win_equal_rec(next_curwin
, current
, topfr
, dir
, col
, row
, width
, height
)
1683 win_T
*next_curwin
; /* pointer to current window to be or NULL */
1684 int current
; /* do only frame with current window */
1685 frame_T
*topfr
; /* frame to set size off */
1686 int dir
; /* 'v', 'h' or 'b', see win_equal() */
1687 int col
; /* horizontal position for frame */
1688 int row
; /* vertical position for frame */
1689 int width
; /* new width of frame */
1690 int height
; /* new height of frame */
1694 int wincount
, totwincount
= 0;
1696 int next_curwin_size
= 0;
1699 int has_next_curwin
= 0;
1702 if (topfr
->fr_layout
== FR_LEAF
)
1704 /* Set the width/height of this frame.
1705 * Redraw when size or position changes */
1706 if (topfr
->fr_height
!= height
|| topfr
->fr_win
->w_winrow
!= row
1707 #ifdef FEAT_VERTSPLIT
1708 || topfr
->fr_width
!= width
|| topfr
->fr_win
->w_wincol
!= col
1712 topfr
->fr_win
->w_winrow
= row
;
1713 frame_new_height(topfr
, height
, FALSE
, FALSE
);
1714 #ifdef FEAT_VERTSPLIT
1715 topfr
->fr_win
->w_wincol
= col
;
1716 frame_new_width(topfr
, width
, FALSE
, FALSE
);
1718 redraw_all_later(CLEAR
);
1721 #ifdef FEAT_VERTSPLIT
1722 else if (topfr
->fr_layout
== FR_ROW
)
1724 topfr
->fr_width
= width
;
1725 topfr
->fr_height
= height
;
1727 if (dir
!= 'v') /* equalize frame widths */
1729 /* Compute the maximum number of windows horizontally in this
1731 n
= frame_minwidth(topfr
, NOWIN
);
1732 /* add one for the rightmost window, it doesn't have a separator */
1733 if (col
+ width
== Columns
)
1737 totwincount
= (n
+ extra_sep
) / (p_wmw
+ 1);
1738 has_next_curwin
= frame_has_win(topfr
, next_curwin
);
1741 * Compute width for "next_curwin" window and room available for
1743 * "m" is the minimal width when counting p_wiw for "next_curwin".
1745 m
= frame_minwidth(topfr
, next_curwin
);
1749 next_curwin_size
= p_wiw
+ room
;
1754 next_curwin_size
= -1;
1755 for (fr
= topfr
->fr_child
; fr
!= NULL
; fr
= fr
->fr_next
)
1757 /* If 'winfixwidth' set keep the window width if
1759 * Watch out for this window being the next_curwin. */
1760 if (frame_fixed_width(fr
))
1762 n
= frame_minwidth(fr
, NOWIN
);
1763 new_size
= fr
->fr_width
;
1764 if (frame_has_win(fr
, next_curwin
))
1766 room
+= p_wiw
- p_wmw
;
1767 next_curwin_size
= 0;
1768 if (new_size
< p_wiw
)
1772 /* These windows don't use up room. */
1773 totwincount
-= (n
+ (fr
->fr_next
== NULL
1774 ? extra_sep
: 0)) / (p_wmw
+ 1);
1775 room
-= new_size
- n
;
1781 fr
->fr_newwidth
= new_size
;
1784 if (next_curwin_size
== -1)
1786 if (!has_next_curwin
)
1787 next_curwin_size
= 0;
1788 else if (totwincount
> 1
1789 && (room
+ (totwincount
- 2))
1790 / (totwincount
- 1) > p_wiw
)
1792 /* Can make all windows wider than 'winwidth', spread
1793 * the room equally. */
1794 next_curwin_size
= (room
+ p_wiw
1795 + (totwincount
- 1) * p_wmw
1796 + (totwincount
- 1)) / totwincount
;
1797 room
-= next_curwin_size
- p_wiw
;
1800 next_curwin_size
= p_wiw
;
1804 if (has_next_curwin
)
1805 --totwincount
; /* don't count curwin */
1808 for (fr
= topfr
->fr_child
; fr
!= NULL
; fr
= fr
->fr_next
)
1812 if (fr
->fr_next
== NULL
)
1813 /* last frame gets all that remains (avoid roundoff error) */
1815 else if (dir
== 'v')
1816 new_size
= fr
->fr_width
;
1817 else if (frame_fixed_width(fr
))
1819 new_size
= fr
->fr_newwidth
;
1820 wincount
= 0; /* doesn't count as a sizeable window */
1824 /* Compute the maximum number of windows horiz. in "fr". */
1825 n
= frame_minwidth(fr
, NOWIN
);
1826 wincount
= (n
+ (fr
->fr_next
== NULL
? extra_sep
: 0))
1828 m
= frame_minwidth(fr
, next_curwin
);
1829 if (has_next_curwin
)
1830 hnc
= frame_has_win(fr
, next_curwin
);
1833 if (hnc
) /* don't count next_curwin */
1835 if (totwincount
== 0)
1838 new_size
= (wincount
* room
+ ((unsigned)totwincount
>> 1))
1840 if (hnc
) /* add next_curwin size */
1842 next_curwin_size
-= p_wiw
- (m
- n
);
1843 new_size
+= next_curwin_size
;
1844 room
-= new_size
- next_curwin_size
;
1851 /* Skip frame that is full width when splitting or closing a
1852 * window, unless equalizing all frames. */
1853 if (!current
|| dir
!= 'v' || topfr
->fr_parent
!= NULL
1854 || (new_size
!= fr
->fr_width
)
1855 || frame_has_win(fr
, next_curwin
))
1856 win_equal_rec(next_curwin
, current
, fr
, dir
, col
, row
,
1860 totwincount
-= wincount
;
1864 else /* topfr->fr_layout == FR_COL */
1866 #ifdef FEAT_VERTSPLIT
1867 topfr
->fr_width
= width
;
1869 topfr
->fr_height
= height
;
1871 if (dir
!= 'h') /* equalize frame heights */
1873 /* Compute maximum number of windows vertically in this frame. */
1874 n
= frame_minheight(topfr
, NOWIN
);
1875 /* add one for the bottom window if it doesn't have a statusline */
1876 if (row
+ height
== cmdline_row
&& p_ls
== 0)
1880 totwincount
= (n
+ extra_sep
) / (p_wmh
+ 1);
1881 has_next_curwin
= frame_has_win(topfr
, next_curwin
);
1884 * Compute height for "next_curwin" window and room available for
1886 * "m" is the minimal height when counting p_wh for "next_curwin".
1888 m
= frame_minheight(topfr
, next_curwin
);
1892 /* The room is less then 'winheight', use all space for the
1893 * current window. */
1894 next_curwin_size
= p_wh
+ room
;
1899 next_curwin_size
= -1;
1900 for (fr
= topfr
->fr_child
; fr
!= NULL
; fr
= fr
->fr_next
)
1902 /* If 'winfixheight' set keep the window height if
1904 * Watch out for this window being the next_curwin. */
1905 if (frame_fixed_height(fr
))
1907 n
= frame_minheight(fr
, NOWIN
);
1908 new_size
= fr
->fr_height
;
1909 if (frame_has_win(fr
, next_curwin
))
1911 room
+= p_wh
- p_wmh
;
1912 next_curwin_size
= 0;
1913 if (new_size
< p_wh
)
1917 /* These windows don't use up room. */
1918 totwincount
-= (n
+ (fr
->fr_next
== NULL
1919 ? extra_sep
: 0)) / (p_wmh
+ 1);
1920 room
-= new_size
- n
;
1926 fr
->fr_newheight
= new_size
;
1929 if (next_curwin_size
== -1)
1931 if (!has_next_curwin
)
1932 next_curwin_size
= 0;
1933 else if (totwincount
> 1
1934 && (room
+ (totwincount
- 2))
1935 / (totwincount
- 1) > p_wh
)
1937 /* can make all windows higher than 'winheight',
1938 * spread the room equally. */
1939 next_curwin_size
= (room
+ p_wh
1940 + (totwincount
- 1) * p_wmh
1941 + (totwincount
- 1)) / totwincount
;
1942 room
-= next_curwin_size
- p_wh
;
1945 next_curwin_size
= p_wh
;
1949 if (has_next_curwin
)
1950 --totwincount
; /* don't count curwin */
1953 for (fr
= topfr
->fr_child
; fr
!= NULL
; fr
= fr
->fr_next
)
1957 if (fr
->fr_next
== NULL
)
1958 /* last frame gets all that remains (avoid roundoff error) */
1960 else if (dir
== 'h')
1961 new_size
= fr
->fr_height
;
1962 else if (frame_fixed_height(fr
))
1964 new_size
= fr
->fr_newheight
;
1965 wincount
= 0; /* doesn't count as a sizeable window */
1969 /* Compute the maximum number of windows vert. in "fr". */
1970 n
= frame_minheight(fr
, NOWIN
);
1971 wincount
= (n
+ (fr
->fr_next
== NULL
? extra_sep
: 0))
1973 m
= frame_minheight(fr
, next_curwin
);
1974 if (has_next_curwin
)
1975 hnc
= frame_has_win(fr
, next_curwin
);
1978 if (hnc
) /* don't count next_curwin */
1980 if (totwincount
== 0)
1983 new_size
= (wincount
* room
+ ((unsigned)totwincount
>> 1))
1985 if (hnc
) /* add next_curwin size */
1987 next_curwin_size
-= p_wh
- (m
- n
);
1988 new_size
+= next_curwin_size
;
1989 room
-= new_size
- next_curwin_size
;
1995 /* Skip frame that is full width when splitting or closing a
1996 * window, unless equalizing all frames. */
1997 if (!current
|| dir
!= 'h' || topfr
->fr_parent
!= NULL
1998 || (new_size
!= fr
->fr_height
)
1999 || frame_has_win(fr
, next_curwin
))
2000 win_equal_rec(next_curwin
, current
, fr
, dir
, col
, row
,
2004 totwincount
-= wincount
;
2010 * close all windows for buffer 'buf'
2013 close_windows(buf
, keep_curwin
)
2015 int keep_curwin
; /* don't close "curwin" */
2018 tabpage_T
*tp
, *nexttp
;
2019 int h
= tabline_height();
2021 ++RedrawingDisabled
;
2023 for (wp
= firstwin
; wp
!= NULL
&& lastwin
!= firstwin
; )
2025 if (wp
->w_buffer
== buf
&& (!keep_curwin
|| wp
!= curwin
))
2027 win_close(wp
, FALSE
);
2029 /* Start all over, autocommands may change the window layout. */
2036 /* Also check windows in other tab pages. */
2037 for (tp
= first_tabpage
; tp
!= NULL
; tp
= nexttp
)
2039 nexttp
= tp
->tp_next
;
2041 for (wp
= tp
->tp_firstwin
; wp
!= NULL
; wp
= wp
->w_next
)
2042 if (wp
->w_buffer
== buf
)
2044 win_close_othertab(wp
, FALSE
, tp
);
2046 /* Start all over, the tab page may be closed and
2047 * autocommands may change the window layout. */
2048 nexttp
= first_tabpage
;
2053 --RedrawingDisabled
;
2055 if (h
!= tabline_height())
2060 * Return TRUE if the current window is the only window that exists (ignoring
2062 * Returns FALSE if there is a window, possibly in another tab page.
2067 return (one_window() && first_tabpage
->tp_next
== NULL
);
2071 * Return TRUE if there is only one window other than "aucmd_win" in the
2079 int seen_one
= FALSE
;
2083 if (wp
!= aucmd_win
)
2092 return firstwin
== lastwin
;
2097 * Close window "win". Only works for the current tab page.
2098 * If "free_buf" is TRUE related buffer may be unloaded.
2100 * called by :quit, :close, :xit, :wq and findtag()
2103 win_close(win
, free_buf
)
2109 int other_buffer
= FALSE
;
2111 int close_curwin
= FALSE
;
2113 int help_window
= FALSE
;
2114 tabpage_T
*prev_curtab
= curtab
;
2118 EMSG(_("E444: Cannot close last window"));
2123 if (win
== aucmd_win
)
2125 EMSG(_("E813: Cannot close autocmd window"));
2128 if ((firstwin
== aucmd_win
|| lastwin
== aucmd_win
) && one_window())
2130 EMSG(_("E814: Cannot close window, only autocmd window would remain"));
2136 * When closing the last window in a tab page first go to another tab
2137 * page and then close the window and the tab page. This avoids that
2138 * curwin and curtab are not invalid while we are freeing memory, they may
2139 * be used in GUI events.
2141 if (firstwin
== lastwin
)
2143 goto_tabpage_tp(alt_tabpage());
2144 redraw_tabline
= TRUE
;
2146 /* Safety check: Autocommands may have closed the window when jumping
2147 * to the other tab page. */
2148 if (valid_tabpage(prev_curtab
) && prev_curtab
->tp_firstwin
== win
)
2150 int h
= tabline_height();
2152 win_close_othertab(win
, free_buf
, prev_curtab
);
2153 if (h
!= tabline_height())
2159 /* When closing the help window, try restoring a snapshot after closing
2160 * the window. Otherwise clear the snapshot, it's now invalid. */
2161 if (win
->w_buffer
->b_help
)
2164 clear_snapshot(curtab
, SNAP_HELP_IDX
);
2170 * Guess which window is going to be the new current window.
2171 * This may change because of the autocommands (sigh).
2173 wp
= frame2win(win_altframe(win
, NULL
));
2176 * Be careful: If autocommands delete the window, return now.
2178 if (wp
->w_buffer
!= curbuf
)
2180 other_buffer
= TRUE
;
2181 apply_autocmds(EVENT_BUFLEAVE
, NULL
, NULL
, FALSE
, curbuf
);
2182 if (!win_valid(win
) || last_window())
2185 apply_autocmds(EVENT_WINLEAVE
, NULL
, NULL
, FALSE
, curbuf
);
2186 if (!win_valid(win
) || last_window())
2189 /* autocmds may abort script processing */
2197 /* Avoid trouble with scrollbars that are going to be deleted in
2204 * Close the link to the buffer.
2206 close_buffer(win
, win
->w_buffer
, free_buf
? DOBUF_UNLOAD
: 0);
2208 /* Autocommands may have closed the window already, or closed the only
2209 * other window or moved to another tab page. */
2210 if (!win_valid(win
) || last_window() || curtab
!= prev_curtab
)
2213 /* Free the memory used for the window. */
2214 wp
= win_free_mem(win
, &dir
, NULL
);
2216 /* Make sure curwin isn't invalid. It can cause severe trouble when
2217 * printing an error message. For win_equal() curbuf needs to be valid
2222 #ifdef FEAT_QUICKFIX
2223 if (wp
->w_p_pvw
|| bt_quickfix(wp
->w_buffer
))
2226 * If the cursor goes to the preview or the quickfix window, try
2227 * finding another window to go to.
2231 if (wp
->w_next
== NULL
)
2237 if (!wp
->w_p_pvw
&& !bt_quickfix(wp
->w_buffer
))
2245 curbuf
= curwin
->w_buffer
;
2246 close_curwin
= TRUE
;
2249 #ifdef FEAT_VERTSPLIT
2250 && (*p_ead
== 'b' || *p_ead
== dir
)
2253 win_equal(curwin
, TRUE
,
2254 #ifdef FEAT_VERTSPLIT
2264 win_enter_ext(wp
, FALSE
, TRUE
);
2267 /* careful: after this wp and win may be invalid! */
2268 apply_autocmds(EVENT_BUFENTER
, NULL
, NULL
, FALSE
, curbuf
);
2273 * If last window has a status line now and we don't want one,
2274 * remove the status line.
2278 /* After closing the help window, try restoring the window layout from
2279 * before it was opened. */
2281 restore_snapshot(SNAP_HELP_IDX
, close_curwin
);
2283 #if defined(FEAT_GUI) && defined(FEAT_VERTSPLIT)
2284 /* When 'guioptions' includes 'L' or 'R' may have to remove scrollbars. */
2285 if (gui
.in_use
&& !win_hasvertsplit())
2286 gui_init_which_components(NULL
);
2289 redraw_all_later(NOT_VALID
);
2293 * Close window "win" in tab page "tp", which is not the current tab page.
2294 * This may be the last window ih that tab page and result in closing the tab,
2295 * thus "tp" may become invalid!
2296 * Caller must check if buffer is hidden and whether the tabline needs to be
2300 win_close_othertab(win
, free_buf
, tp
)
2307 tabpage_T
*ptp
= NULL
;
2309 /* Close the link to the buffer. */
2310 close_buffer(win
, win
->w_buffer
, free_buf
? DOBUF_UNLOAD
: 0);
2312 /* Careful: Autocommands may have closed the tab page or made it the
2313 * current tab page. */
2314 for (ptp
= first_tabpage
; ptp
!= NULL
&& ptp
!= tp
; ptp
= ptp
->tp_next
)
2316 if (ptp
== NULL
|| tp
== curtab
)
2319 /* Autocommands may have closed the window already. */
2320 for (wp
= tp
->tp_firstwin
; wp
!= NULL
&& wp
!= win
; wp
= wp
->w_next
)
2325 /* Free the memory used for the window. */
2326 wp
= win_free_mem(win
, &dir
, tp
);
2328 /* When closing the last window in a tab page remove the tab page. */
2331 if (tp
== first_tabpage
)
2332 first_tabpage
= tp
->tp_next
;
2335 for (ptp
= first_tabpage
; ptp
!= NULL
&& ptp
->tp_next
!= tp
;
2340 EMSG2(_(e_intern2
), "win_close_othertab()");
2343 ptp
->tp_next
= tp
->tp_next
;
2350 * Free the memory used for a window.
2351 * Returns a pointer to the window that got the freed up space.
2354 win_free_mem(win
, dirp
, tp
)
2356 int *dirp
; /* set to 'v' or 'h' for direction if 'ea' */
2357 tabpage_T
*tp
; /* tab page "win" is in, NULL for current */
2362 /* Remove the window and its frame from the tree of frames. */
2364 wp
= winframe_remove(win
, dirp
, tp
);
2368 /* When deleting the current window of another tab page select a new
2369 * current window. */
2370 if (tp
!= NULL
&& win
== tp
->tp_curwin
)
2376 #if defined(EXITFREE) || defined(PROTO)
2382 # ifdef FEAT_WINDOWS
2383 while (first_tabpage
->tp_next
!= NULL
)
2384 tabpage_close(TRUE
);
2387 # ifdef FEAT_AUTOCMD
2388 if (aucmd_win
!= NULL
)
2390 (void)win_free_mem(aucmd_win
, &dummy
, NULL
);
2395 while (firstwin
!= NULL
)
2396 (void)win_free_mem(firstwin
, &dummy
, NULL
);
2401 * Remove a window and its frame from the tree of frames.
2402 * Returns a pointer to the window that got the freed up space.
2405 winframe_remove(win
, dirp
, tp
)
2407 int *dirp UNUSED
; /* set to 'v' or 'h' for direction if 'ea' */
2408 tabpage_T
*tp
; /* tab page "win" is in, NULL for current */
2410 frame_T
*frp
, *frp2
, *frp3
;
2411 frame_T
*frp_close
= win
->w_frame
;
2415 * If there is only one window there is nothing to remove.
2417 if (tp
== NULL
? firstwin
== lastwin
: tp
->tp_firstwin
== tp
->tp_lastwin
)
2421 * Remove the window from its frame.
2423 frp2
= win_altframe(win
, tp
);
2424 wp
= frame2win(frp2
);
2426 /* Remove this frame from the list of frames. */
2427 frame_remove(frp_close
);
2429 #ifdef FEAT_VERTSPLIT
2430 if (frp_close
->fr_parent
->fr_layout
== FR_COL
)
2433 /* When 'winfixheight' is set, try to find another frame in the column
2434 * (as close to the closed frame as possible) to distribute the height
2436 if (frp2
->fr_win
!= NULL
&& frp2
->fr_win
->w_p_wfh
)
2438 frp
= frp_close
->fr_prev
;
2439 frp3
= frp_close
->fr_next
;
2440 while (frp
!= NULL
|| frp3
!= NULL
)
2444 if (frp
->fr_win
!= NULL
&& !frp
->fr_win
->w_p_wfh
)
2454 if (frp3
->fr_win
!= NULL
&& !frp3
->fr_win
->w_p_wfh
)
2460 frp3
= frp3
->fr_next
;
2464 frame_new_height(frp2
, frp2
->fr_height
+ frp_close
->fr_height
,
2465 frp2
== frp_close
->fr_next
? TRUE
: FALSE
, FALSE
);
2466 #ifdef FEAT_VERTSPLIT
2471 /* When 'winfixwidth' is set, try to find another frame in the column
2472 * (as close to the closed frame as possible) to distribute the width
2474 if (frp2
->fr_win
!= NULL
&& frp2
->fr_win
->w_p_wfw
)
2476 frp
= frp_close
->fr_prev
;
2477 frp3
= frp_close
->fr_next
;
2478 while (frp
!= NULL
|| frp3
!= NULL
)
2482 if (frp
->fr_win
!= NULL
&& !frp
->fr_win
->w_p_wfw
)
2492 if (frp3
->fr_win
!= NULL
&& !frp3
->fr_win
->w_p_wfw
)
2498 frp3
= frp3
->fr_next
;
2502 frame_new_width(frp2
, frp2
->fr_width
+ frp_close
->fr_width
,
2503 frp2
== frp_close
->fr_next
? TRUE
: FALSE
, FALSE
);
2508 /* If rows/columns go to a window below/right its positions need to be
2509 * updated. Can only be done after the sizes have been updated. */
2510 if (frp2
== frp_close
->fr_next
)
2512 int row
= win
->w_winrow
;
2513 int col
= W_WINCOL(win
);
2515 frame_comp_pos(frp2
, &row
, &col
);
2518 if (frp2
->fr_next
== NULL
&& frp2
->fr_prev
== NULL
)
2520 /* There is no other frame in this list, move its info to the parent
2522 frp2
->fr_parent
->fr_layout
= frp2
->fr_layout
;
2523 frp2
->fr_parent
->fr_child
= frp2
->fr_child
;
2524 for (frp
= frp2
->fr_child
; frp
!= NULL
; frp
= frp
->fr_next
)
2525 frp
->fr_parent
= frp2
->fr_parent
;
2526 frp2
->fr_parent
->fr_win
= frp2
->fr_win
;
2527 if (frp2
->fr_win
!= NULL
)
2528 frp2
->fr_win
->w_frame
= frp2
->fr_parent
;
2529 frp
= frp2
->fr_parent
;
2532 frp2
= frp
->fr_parent
;
2533 if (frp2
!= NULL
&& frp2
->fr_layout
== frp
->fr_layout
)
2535 /* The frame above the parent has the same layout, have to merge
2536 * the frames into this list. */
2537 if (frp2
->fr_child
== frp
)
2538 frp2
->fr_child
= frp
->fr_child
;
2539 frp
->fr_child
->fr_prev
= frp
->fr_prev
;
2540 if (frp
->fr_prev
!= NULL
)
2541 frp
->fr_prev
->fr_next
= frp
->fr_child
;
2542 for (frp3
= frp
->fr_child
; ; frp3
= frp3
->fr_next
)
2544 frp3
->fr_parent
= frp2
;
2545 if (frp3
->fr_next
== NULL
)
2547 frp3
->fr_next
= frp
->fr_next
;
2548 if (frp
->fr_next
!= NULL
)
2549 frp
->fr_next
->fr_prev
= frp3
;
2561 * Find out which frame is going to get the freed up space when "win" is
2563 * if 'splitbelow'/'splitleft' the space goes to the window above/left.
2564 * if 'nosplitbelow'/'nosplitleft' the space goes to the window below/right.
2565 * This makes opening a window and closing it immediately keep the same window
2569 win_altframe(win
, tp
)
2571 tabpage_T
*tp
; /* tab page "win" is in, NULL for current */
2576 if (tp
== NULL
? firstwin
== lastwin
: tp
->tp_firstwin
== tp
->tp_lastwin
)
2577 /* Last window in this tab page, will go to next tab page. */
2578 return alt_tabpage()->tp_curwin
->w_frame
;
2581 #ifdef FEAT_VERTSPLIT
2582 if (frp
->fr_parent
!= NULL
&& frp
->fr_parent
->fr_layout
== FR_ROW
)
2587 if ((!b
&& frp
->fr_next
!= NULL
) || frp
->fr_prev
== NULL
)
2588 return frp
->fr_next
;
2589 return frp
->fr_prev
;
2593 * Return the tabpage that will be used if the current one is closed.
2600 /* Use the next tab page if possible. */
2601 if (curtab
->tp_next
!= NULL
)
2602 return curtab
->tp_next
;
2604 /* Find the last but one tab page. */
2605 for (tp
= first_tabpage
; tp
->tp_next
!= curtab
; tp
= tp
->tp_next
)
2611 * Find the left-upper window in frame "frp".
2617 while (frp
->fr_win
== NULL
)
2618 frp
= frp
->fr_child
;
2623 * Return TRUE if frame "frp" contains window "wp".
2626 frame_has_win(frp
, wp
)
2632 if (frp
->fr_layout
== FR_LEAF
)
2633 return frp
->fr_win
== wp
;
2635 for (p
= frp
->fr_child
; p
!= NULL
; p
= p
->fr_next
)
2636 if (frame_has_win(p
, wp
))
2642 * Set a new height for a frame. Recursively sets the height for contained
2643 * frames and windows. Caller must take care of positions.
2646 frame_new_height(topfrp
, height
, topfirst
, wfh
)
2649 int topfirst
; /* resize topmost contained frame first */
2650 int wfh
; /* obey 'winfixheight' when there is a choice;
2651 may cause the height not to be set */
2657 if (topfrp
->fr_win
!= NULL
)
2659 /* Simple case: just one window. */
2660 win_new_height(topfrp
->fr_win
,
2661 height
- topfrp
->fr_win
->w_status_height
);
2663 #ifdef FEAT_VERTSPLIT
2664 else if (topfrp
->fr_layout
== FR_ROW
)
2668 /* All frames in this row get the same new height. */
2669 for (frp
= topfrp
->fr_child
; frp
!= NULL
; frp
= frp
->fr_next
)
2671 frame_new_height(frp
, height
, topfirst
, wfh
);
2672 if (frp
->fr_height
> height
)
2674 /* Could not fit the windows, make the whole row higher. */
2675 height
= frp
->fr_height
;
2680 while (frp
!= NULL
);
2683 else /* fr_layout == FR_COL */
2685 /* Complicated case: Resize a column of frames. Resize the bottom
2686 * frame first, frames above that when needed. */
2688 frp
= topfrp
->fr_child
;
2690 /* Advance past frames with one window with 'wfh' set. */
2691 while (frame_fixed_height(frp
))
2695 return; /* no frame without 'wfh', give up */
2699 /* Find the bottom frame of this column */
2700 while (frp
->fr_next
!= NULL
)
2703 /* Advance back for frames with one window with 'wfh' set. */
2704 while (frame_fixed_height(frp
))
2708 extra_lines
= height
- topfrp
->fr_height
;
2709 if (extra_lines
< 0)
2711 /* reduce height of contained frames, bottom or top frame first */
2714 h
= frame_minheight(frp
, NULL
);
2715 if (frp
->fr_height
+ extra_lines
< h
)
2717 extra_lines
+= frp
->fr_height
- h
;
2718 frame_new_height(frp
, h
, topfirst
, wfh
);
2722 frame_new_height(frp
, frp
->fr_height
+ extra_lines
,
2730 while (wfh
&& frp
!= NULL
&& frame_fixed_height(frp
));
2736 while (wfh
&& frp
!= NULL
&& frame_fixed_height(frp
));
2738 /* Increase "height" if we could not reduce enough frames. */
2740 height
-= extra_lines
;
2743 else if (extra_lines
> 0)
2745 /* increase height of bottom or top frame */
2746 frame_new_height(frp
, frp
->fr_height
+ extra_lines
, topfirst
, wfh
);
2749 topfrp
->fr_height
= height
;
2753 * Return TRUE if height of frame "frp" should not be changed because of
2754 * the 'winfixheight' option.
2757 frame_fixed_height(frp
)
2760 /* frame with one window: fixed height if 'winfixheight' set. */
2761 if (frp
->fr_win
!= NULL
)
2762 return frp
->fr_win
->w_p_wfh
;
2764 if (frp
->fr_layout
== FR_ROW
)
2766 /* The frame is fixed height if one of the frames in the row is fixed
2768 for (frp
= frp
->fr_child
; frp
!= NULL
; frp
= frp
->fr_next
)
2769 if (frame_fixed_height(frp
))
2774 /* frp->fr_layout == FR_COL: The frame is fixed height if all of the
2775 * frames in the row are fixed height. */
2776 for (frp
= frp
->fr_child
; frp
!= NULL
; frp
= frp
->fr_next
)
2777 if (!frame_fixed_height(frp
))
2782 #ifdef FEAT_VERTSPLIT
2784 * Return TRUE if width of frame "frp" should not be changed because of
2785 * the 'winfixwidth' option.
2788 frame_fixed_width(frp
)
2791 /* frame with one window: fixed width if 'winfixwidth' set. */
2792 if (frp
->fr_win
!= NULL
)
2793 return frp
->fr_win
->w_p_wfw
;
2795 if (frp
->fr_layout
== FR_COL
)
2797 /* The frame is fixed width if one of the frames in the row is fixed
2799 for (frp
= frp
->fr_child
; frp
!= NULL
; frp
= frp
->fr_next
)
2800 if (frame_fixed_width(frp
))
2805 /* frp->fr_layout == FR_ROW: The frame is fixed width if all of the
2806 * frames in the row are fixed width. */
2807 for (frp
= frp
->fr_child
; frp
!= NULL
; frp
= frp
->fr_next
)
2808 if (!frame_fixed_width(frp
))
2814 * Add a status line to windows at the bottom of "frp".
2815 * Note: Does not check if there is room!
2818 frame_add_statusline(frp
)
2823 if (frp
->fr_layout
== FR_LEAF
)
2826 if (wp
->w_status_height
== 0)
2828 if (wp
->w_height
> 0) /* don't make it negative */
2830 wp
->w_status_height
= STATUS_HEIGHT
;
2833 else if (frp
->fr_layout
== FR_ROW
)
2835 /* Handle all the frames in the row. */
2836 for (frp
= frp
->fr_child
; frp
!= NULL
; frp
= frp
->fr_next
)
2837 frame_add_statusline(frp
);
2839 else /* frp->fr_layout == FR_COL */
2841 /* Only need to handle the last frame in the column. */
2842 for (frp
= frp
->fr_child
; frp
->fr_next
!= NULL
; frp
= frp
->fr_next
)
2844 frame_add_statusline(frp
);
2849 * Set width of a frame. Handles recursively going through contained frames.
2850 * May remove separator line for windows at the right side (for win_close()).
2853 frame_new_width(topfrp
, width
, leftfirst
, wfw
)
2856 int leftfirst
; /* resize leftmost contained frame first */
2857 int wfw
; /* obey 'winfixwidth' when there is a choice;
2858 may cause the width not to be set */
2865 if (topfrp
->fr_layout
== FR_LEAF
)
2867 /* Simple case: just one window. */
2868 wp
= topfrp
->fr_win
;
2869 /* Find out if there are any windows right of this one. */
2870 for (frp
= topfrp
; frp
->fr_parent
!= NULL
; frp
= frp
->fr_parent
)
2871 if (frp
->fr_parent
->fr_layout
== FR_ROW
&& frp
->fr_next
!= NULL
)
2873 if (frp
->fr_parent
== NULL
)
2874 wp
->w_vsep_width
= 0;
2875 win_new_width(wp
, width
- wp
->w_vsep_width
);
2877 else if (topfrp
->fr_layout
== FR_COL
)
2881 /* All frames in this column get the same new width. */
2882 for (frp
= topfrp
->fr_child
; frp
!= NULL
; frp
= frp
->fr_next
)
2884 frame_new_width(frp
, width
, leftfirst
, wfw
);
2885 if (frp
->fr_width
> width
)
2887 /* Could not fit the windows, make whole column wider. */
2888 width
= frp
->fr_width
;
2892 } while (frp
!= NULL
);
2894 else /* fr_layout == FR_ROW */
2896 /* Complicated case: Resize a row of frames. Resize the rightmost
2897 * frame first, frames left of it when needed. */
2899 frp
= topfrp
->fr_child
;
2901 /* Advance past frames with one window with 'wfw' set. */
2902 while (frame_fixed_width(frp
))
2906 return; /* no frame without 'wfw', give up */
2910 /* Find the rightmost frame of this row */
2911 while (frp
->fr_next
!= NULL
)
2914 /* Advance back for frames with one window with 'wfw' set. */
2915 while (frame_fixed_width(frp
))
2919 extra_cols
= width
- topfrp
->fr_width
;
2922 /* reduce frame width, rightmost frame first */
2925 w
= frame_minwidth(frp
, NULL
);
2926 if (frp
->fr_width
+ extra_cols
< w
)
2928 extra_cols
+= frp
->fr_width
- w
;
2929 frame_new_width(frp
, w
, leftfirst
, wfw
);
2933 frame_new_width(frp
, frp
->fr_width
+ extra_cols
,
2941 while (wfw
&& frp
!= NULL
&& frame_fixed_width(frp
));
2947 while (wfw
&& frp
!= NULL
&& frame_fixed_width(frp
));
2949 /* Increase "width" if we could not reduce enough frames. */
2951 width
-= extra_cols
;
2954 else if (extra_cols
> 0)
2956 /* increase width of rightmost frame */
2957 frame_new_width(frp
, frp
->fr_width
+ extra_cols
, leftfirst
, wfw
);
2960 topfrp
->fr_width
= width
;
2964 * Add the vertical separator to windows at the right side of "frp".
2965 * Note: Does not check if there is room!
2973 if (frp
->fr_layout
== FR_LEAF
)
2976 if (wp
->w_vsep_width
== 0)
2978 if (wp
->w_width
> 0) /* don't make it negative */
2980 wp
->w_vsep_width
= 1;
2983 else if (frp
->fr_layout
== FR_COL
)
2985 /* Handle all the frames in the column. */
2986 for (frp
= frp
->fr_child
; frp
!= NULL
; frp
= frp
->fr_next
)
2987 frame_add_vsep(frp
);
2989 else /* frp->fr_layout == FR_ROW */
2991 /* Only need to handle the last frame in the row. */
2992 frp
= frp
->fr_child
;
2993 while (frp
->fr_next
!= NULL
)
2995 frame_add_vsep(frp
);
3000 * Set frame width from the window it contains.
3006 wp
->w_frame
->fr_width
= wp
->w_width
+ wp
->w_vsep_width
;
3011 * Set frame height from the window it contains.
3014 frame_fix_height(wp
)
3017 wp
->w_frame
->fr_height
= wp
->w_height
+ wp
->w_status_height
;
3021 * Compute the minimal height for frame "topfrp".
3022 * Uses the 'winminheight' option.
3023 * When "next_curwin" isn't NULL, use p_wh for this window.
3024 * When "next_curwin" is NOWIN, don't use at least one line for the current
3028 frame_minheight(topfrp
, next_curwin
)
3034 #ifdef FEAT_VERTSPLIT
3038 if (topfrp
->fr_win
!= NULL
)
3040 if (topfrp
->fr_win
== next_curwin
)
3041 m
= p_wh
+ topfrp
->fr_win
->w_status_height
;
3044 /* window: minimal height of the window plus status line */
3045 m
= p_wmh
+ topfrp
->fr_win
->w_status_height
;
3046 /* Current window is minimal one line high */
3047 if (p_wmh
== 0 && topfrp
->fr_win
== curwin
&& next_curwin
== NULL
)
3051 #ifdef FEAT_VERTSPLIT
3052 else if (topfrp
->fr_layout
== FR_ROW
)
3054 /* get the minimal height from each frame in this row */
3056 for (frp
= topfrp
->fr_child
; frp
!= NULL
; frp
= frp
->fr_next
)
3058 n
= frame_minheight(frp
, next_curwin
);
3066 /* Add up the minimal heights for all frames in this column. */
3068 for (frp
= topfrp
->fr_child
; frp
!= NULL
; frp
= frp
->fr_next
)
3069 m
+= frame_minheight(frp
, next_curwin
);
3075 #ifdef FEAT_VERTSPLIT
3077 * Compute the minimal width for frame "topfrp".
3078 * When "next_curwin" isn't NULL, use p_wiw for this window.
3079 * When "next_curwin" is NOWIN, don't use at least one column for the current
3083 frame_minwidth(topfrp
, next_curwin
)
3085 win_T
*next_curwin
; /* use p_wh and p_wiw for next_curwin */
3090 if (topfrp
->fr_win
!= NULL
)
3092 if (topfrp
->fr_win
== next_curwin
)
3093 m
= p_wiw
+ topfrp
->fr_win
->w_vsep_width
;
3096 /* window: minimal width of the window plus separator column */
3097 m
= p_wmw
+ topfrp
->fr_win
->w_vsep_width
;
3098 /* Current window is minimal one column wide */
3099 if (p_wmw
== 0 && topfrp
->fr_win
== curwin
&& next_curwin
== NULL
)
3103 else if (topfrp
->fr_layout
== FR_COL
)
3105 /* get the minimal width from each frame in this column */
3107 for (frp
= topfrp
->fr_child
; frp
!= NULL
; frp
= frp
->fr_next
)
3109 n
= frame_minwidth(frp
, next_curwin
);
3116 /* Add up the minimal widths for all frames in this row. */
3118 for (frp
= topfrp
->fr_child
; frp
!= NULL
; frp
= frp
->fr_next
)
3119 m
+= frame_minwidth(frp
, next_curwin
);
3128 * Try to close all windows except current one.
3129 * Buffers in the other windows become hidden if 'hidden' is set, or '!' is
3130 * used and the buffer was modified.
3132 * Used by ":bdel" and ":only".
3135 close_others(message
, forceit
)
3137 int forceit
; /* always hide all other windows */
3154 /* Be very careful here: autocommands may change the window layout. */
3155 for (wp
= firstwin
; win_valid(wp
); wp
= nextwp
)
3157 nextwp
= wp
->w_next
;
3158 if (wp
!= curwin
) /* don't close current window */
3161 /* Check if it's allowed to abandon this window */
3162 r
= can_abandon(wp
->w_buffer
, forceit
);
3164 if (!win_valid(wp
)) /* autocommands messed wp up */
3172 #if defined(FEAT_GUI_DIALOG) || defined(FEAT_CON_DIALOG)
3173 if (message
&& (p_confirm
|| cmdmod
.confirm
) && p_write
)
3175 dialog_changed(wp
->w_buffer
, FALSE
);
3176 # ifdef FEAT_AUTOCMD
3177 if (!win_valid(wp
)) /* autocommands messed wp up */
3184 if (bufIsChanged(wp
->w_buffer
))
3188 win_close(wp
, !P_HID(wp
->w_buffer
) && !bufIsChanged(wp
->w_buffer
));
3192 if (message
&& lastwin
!= firstwin
)
3193 EMSG(_("E445: Other window contains changes"));
3196 #endif /* FEAT_WINDOWS */
3199 * Init the current window "curwin".
3200 * Called when a new file is being edited.
3205 win_init_empty(curwin
);
3212 redraw_win_later(wp
, NOT_VALID
);
3213 wp
->w_lines_valid
= 0;
3214 wp
->w_cursor
.lnum
= 1;
3215 wp
->w_curswant
= wp
->w_cursor
.col
= 0;
3216 #ifdef FEAT_VIRTUALEDIT
3217 wp
->w_cursor
.coladd
= 0;
3219 wp
->w_pcmark
.lnum
= 1; /* pcmark not cleared but set to line 1 */
3220 wp
->w_pcmark
.col
= 0;
3221 wp
->w_prev_pcmark
.lnum
= 0;
3222 wp
->w_prev_pcmark
.col
= 0;
3230 wp
->w_farsi
= W_CONV
+ W_R_L
;
3232 wp
->w_farsi
= W_CONV
;
3237 * Allocate the first window and put an empty buffer in it.
3238 * Called from main().
3239 * Return FAIL when something goes wrong (out of memory).
3244 if (win_alloc_firstwin(NULL
) == FAIL
)
3248 first_tabpage
= alloc_tabpage();
3249 if (first_tabpage
== NULL
)
3251 first_tabpage
->tp_topframe
= topframe
;
3252 curtab
= first_tabpage
;
3258 #if defined(FEAT_AUTOCMD) || defined(PROTO)
3260 * Init "aucmd_win". This can only be done after the first
3261 * window is fully initialized, thus it can't be in win_alloc_first().
3264 win_alloc_aucmd_win()
3266 aucmd_win
= win_alloc(NULL
, TRUE
);
3267 if (aucmd_win
!= NULL
)
3269 win_init_some(aucmd_win
, curwin
);
3270 # ifdef FEAT_SCROLLBIND
3271 aucmd_win
->w_p_scb
= FALSE
;
3273 new_frame(aucmd_win
);
3279 * Allocate the first window or the first window in a new tab page.
3280 * When "oldwin" is NULL create an empty buffer for it.
3281 * When "oldwin" is not NULL copy info from it to the new window (only with
3283 * Return FAIL when something goes wrong (out of memory).
3286 win_alloc_firstwin(oldwin
)
3289 curwin
= win_alloc(NULL
, FALSE
);
3292 /* Very first window, need to create an empty buffer for it and
3293 * initialize from scratch. */
3294 curbuf
= buflist_new(NULL
, NULL
, 1L, BLN_LISTED
);
3295 if (curwin
== NULL
|| curbuf
== NULL
)
3297 curwin
->w_buffer
= curbuf
;
3298 curbuf
->b_nwindows
= 1; /* there is one window */
3300 curwin
->w_alist
= &global_alist
;
3302 curwin_init(); /* init current window */
3307 /* First window in new tab page, initialize it from "oldwin". */
3308 win_init(curwin
, oldwin
, 0);
3310 # ifdef FEAT_SCROLLBIND
3311 /* We don't want scroll-binding in the first window. */
3312 curwin
->w_p_scb
= FALSE
;
3318 if (curwin
->w_frame
== NULL
)
3320 topframe
= curwin
->w_frame
;
3321 #ifdef FEAT_VERTSPLIT
3322 topframe
->fr_width
= Columns
;
3324 topframe
->fr_height
= Rows
- p_ch
;
3325 topframe
->fr_win
= curwin
;
3331 * Create a frame for window "wp".
3334 new_frame(win_T
*wp
)
3336 frame_T
*frp
= (frame_T
*)alloc_clear((unsigned)sizeof(frame_T
));
3341 frp
->fr_layout
= FR_LEAF
;
3347 * Initialize the window and frame size to the maximum.
3352 firstwin
->w_height
= ROWS_AVAIL
;
3353 topframe
->fr_height
= ROWS_AVAIL
;
3354 #ifdef FEAT_VERTSPLIT
3355 firstwin
->w_width
= Columns
;
3356 topframe
->fr_width
= Columns
;
3360 #if defined(FEAT_WINDOWS) || defined(PROTO)
3363 * Allocate a new tabpage_T and init the values.
3364 * Returns NULL when out of memory.
3371 tp
= (tabpage_T
*)alloc_clear((unsigned)sizeof(tabpage_T
));
3377 for (i
= 0; i
< 3; i
++)
3378 tp
->tp_prev_which_scrollbars
[i
] = -1;
3381 tp
->tp_diff_invalid
= TRUE
;
3384 /* init t: variables */
3385 init_var_dict(&tp
->tp_vars
, &tp
->tp_winvar
);
3387 tp
->tp_ch_used
= p_ch
;
3401 for (idx
= 0; idx
< SNAP_COUNT
; ++idx
)
3402 clear_snapshot(tp
, idx
);
3404 vars_clear(&tp
->tp_vars
.dv_hashtab
); /* free all t: variables */
3410 * Create a new Tab page with one window.
3411 * It will edit the current buffer, like after ":split".
3412 * When "after" is 0 put it just after the current Tab page.
3413 * Otherwise put it just before tab page "after".
3414 * Return FAIL or OK.
3417 win_new_tabpage(after
)
3420 tabpage_T
*tp
= curtab
;
3424 newtp
= alloc_tabpage();
3428 /* Remember the current windows in this Tab page. */
3429 if (leave_tabpage(curbuf
) == FAIL
)
3436 /* Create a new empty window. */
3437 if (win_alloc_firstwin(tp
->tp_curwin
) == OK
)
3439 /* Make the new Tab page the new topframe. */
3442 /* New tab page becomes the first one. */
3443 newtp
->tp_next
= first_tabpage
;
3444 first_tabpage
= newtp
;
3450 /* Put new tab page before tab page "after". */
3452 for (tp
= first_tabpage
; tp
->tp_next
!= NULL
3453 && n
< after
; tp
= tp
->tp_next
)
3456 newtp
->tp_next
= tp
->tp_next
;
3457 tp
->tp_next
= newtp
;
3460 firstwin
->w_winrow
= tabline_height();
3461 win_comp_scroll(curwin
);
3463 newtp
->tp_topframe
= topframe
;
3466 #if defined(FEAT_GUI)
3467 /* When 'guioptions' includes 'L' or 'R' may have to remove or add
3468 * scrollbars. Have to update them anyway. */
3469 gui_may_update_scrollbars();
3472 redraw_all_later(CLEAR
);
3474 apply_autocmds(EVENT_TABENTER
, NULL
, NULL
, FALSE
, curbuf
);
3475 apply_autocmds(EVENT_WINENTER
, NULL
, NULL
, FALSE
, curbuf
);
3480 /* Failed, get back the previous Tab page */
3481 enter_tabpage(curtab
, curbuf
);
3486 * Open a new tab page if ":tab cmd" was used. It will edit the same buffer,
3487 * like with ":split".
3488 * Returns OK if a new tab page was created, FAIL otherwise.
3493 int n
= (cmdmod
.tab
== 0) ? postponed_split_tab
: cmdmod
.tab
;
3497 cmdmod
.tab
= 0; /* reset it to avoid doing it twice */
3498 postponed_split_tab
= 0;
3499 return win_new_tabpage(n
);
3505 * Create up to "maxcount" tabpages with empty windows.
3506 * Returns the number of resulting tab pages.
3509 make_tabpages(maxcount
)
3512 int count
= maxcount
;
3515 /* Limit to 'tabpagemax' tabs. */
3521 * Don't execute autocommands while creating the tab pages. Must do that
3522 * when putting the buffers in the windows.
3527 for (todo
= count
- 1; todo
> 0; --todo
)
3528 if (win_new_tabpage(0) == FAIL
)
3535 /* return actual number of tab pages */
3536 return (count
- todo
);
3540 * Return TRUE when "tpc" points to a valid tab page.
3548 for (tp
= first_tabpage
; tp
!= NULL
; tp
= tp
->tp_next
)
3555 * Find tab page "n" (first one is 1). Returns NULL when not found.
3564 for (tp
= first_tabpage
; tp
!= NULL
&& i
!= n
; tp
= tp
->tp_next
)
3570 * Get index of tab page "tp". First one has index 1.
3571 * When not found returns number of tab pages plus one.
3580 for (tp
= first_tabpage
; tp
!= NULL
&& tp
!= ftp
; tp
= tp
->tp_next
)
3586 * Prepare for leaving the current tab page.
3587 * When autocomands change "curtab" we don't leave the tab page and return
3589 * Careful: When OK is returned need to get a new tab page very very soon!
3592 leave_tabpage(new_curbuf
)
3593 buf_T
*new_curbuf UNUSED
; /* what is going to be the new curbuf,
3596 tabpage_T
*tp
= curtab
;
3599 reset_VIsual_and_resel(); /* stop Visual mode */
3602 if (new_curbuf
!= curbuf
)
3604 apply_autocmds(EVENT_BUFLEAVE
, NULL
, NULL
, FALSE
, curbuf
);
3608 apply_autocmds(EVENT_WINLEAVE
, NULL
, NULL
, FALSE
, curbuf
);
3611 apply_autocmds(EVENT_TABLEAVE
, NULL
, NULL
, FALSE
, curbuf
);
3615 #if defined(FEAT_GUI)
3616 /* Remove the scrollbars. They may be added back later. */
3618 gui_remove_scrollbars();
3620 tp
->tp_curwin
= curwin
;
3621 tp
->tp_prevwin
= prevwin
;
3622 tp
->tp_firstwin
= firstwin
;
3623 tp
->tp_lastwin
= lastwin
;
3624 tp
->tp_old_Rows
= Rows
;
3625 tp
->tp_old_Columns
= Columns
;
3632 * Start using tab page "tp".
3633 * Only to be used after leave_tabpage() or freeing the current tab page.
3636 enter_tabpage(tp
, old_curbuf
)
3638 buf_T
*old_curbuf UNUSED
;
3640 int old_off
= tp
->tp_firstwin
->w_winrow
;
3641 win_T
*next_prevwin
= tp
->tp_prevwin
;
3644 firstwin
= tp
->tp_firstwin
;
3645 lastwin
= tp
->tp_lastwin
;
3646 topframe
= tp
->tp_topframe
;
3648 /* We would like doing the TabEnter event first, but we don't have a
3649 * valid current window yet, which may break some commands.
3650 * This triggers autocommands, thus may make "tp" invalid. */
3651 win_enter_ext(tp
->tp_curwin
, FALSE
, TRUE
);
3652 prevwin
= next_prevwin
;
3655 apply_autocmds(EVENT_TABENTER
, NULL
, NULL
, FALSE
, curbuf
);
3657 if (old_curbuf
!= curbuf
)
3658 apply_autocmds(EVENT_BUFENTER
, NULL
, NULL
, FALSE
, curbuf
);
3661 last_status(FALSE
); /* status line may appear or disappear */
3662 (void)win_comp_pos(); /* recompute w_winrow for all windows */
3663 must_redraw
= CLEAR
; /* need to redraw everything */
3665 diff_need_scrollbind
= TRUE
;
3668 /* The tabpage line may have appeared or disappeared, may need to resize
3669 * the frames for that. When the Vim window was resized need to update
3670 * frame sizes too. Use the stored value of p_ch, so that it can be
3671 * different for each tab page. */
3672 p_ch
= curtab
->tp_ch_used
;
3673 if (curtab
->tp_old_Rows
!= Rows
|| (old_off
!= firstwin
->w_winrow
3674 #ifdef FEAT_GUI_TABLINE
3675 && !gui_use_tabline()
3679 #ifdef FEAT_VERTSPLIT
3680 if (curtab
->tp_old_Columns
!= Columns
&& starting
== 0)
3681 shell_new_columns(); /* update window widths */
3684 #if defined(FEAT_GUI)
3685 /* When 'guioptions' includes 'L' or 'R' may have to remove or add
3686 * scrollbars. Have to update them anyway. */
3687 gui_may_update_scrollbars();
3690 redraw_all_later(CLEAR
);
3694 * Go to tab page "n". For ":tab N" and "Ngt".
3695 * When "n" is 9999 go to the last tab page.
3707 /* Not allowed when editing the command line. */
3709 if (cmdwin_type
!= 0)
3717 /* If there is only one it can't work. */
3718 if (first_tabpage
->tp_next
== NULL
)
3727 /* No count, go to next tab page, wrap around end. */
3728 if (curtab
->tp_next
== NULL
)
3731 tp
= curtab
->tp_next
;
3735 /* "gT": go to previous tab page, wrap around end. "N gT" repeats
3738 for (i
= n
; i
< 0; ++i
)
3740 for (tp
= first_tabpage
; tp
->tp_next
!= ttp
&& tp
->tp_next
!= NULL
;
3748 /* Go to last tab page. */
3749 for (tp
= first_tabpage
; tp
->tp_next
!= NULL
; tp
= tp
->tp_next
)
3754 /* Go to tab page "n". */
3755 tp
= find_tabpage(n
);
3763 goto_tabpage_tp(tp
);
3765 #ifdef FEAT_GUI_TABLINE
3766 if (gui_use_tabline())
3767 gui_mch_set_curtab(tabpage_index(curtab
));
3772 * Go to tabpage "tp".
3773 * Note: doesn't update the GUI tab.
3779 if (tp
!= curtab
&& leave_tabpage(tp
->tp_curwin
->w_buffer
) == OK
)
3781 if (valid_tabpage(tp
))
3782 enter_tabpage(tp
, curbuf
);
3784 enter_tabpage(curtab
, curbuf
);
3789 * Enter window "wp" in tab page "tp".
3790 * Also updates the GUI tab.
3793 goto_tabpage_win(tp
, wp
)
3797 goto_tabpage_tp(tp
);
3798 if (curtab
== tp
&& win_valid(wp
))
3800 win_enter(wp
, TRUE
);
3801 # ifdef FEAT_GUI_TABLINE
3802 if (gui_use_tabline())
3803 gui_mch_set_curtab(tabpage_index(curtab
));
3809 * Move the current tab page to before tab page "nr".
3818 if (first_tabpage
->tp_next
== NULL
)
3821 /* Remove the current tab page from the list of tab pages. */
3822 if (curtab
== first_tabpage
)
3823 first_tabpage
= curtab
->tp_next
;
3826 for (tp
= first_tabpage
; tp
!= NULL
; tp
= tp
->tp_next
)
3827 if (tp
->tp_next
== curtab
)
3829 if (tp
== NULL
) /* "cannot happen" */
3831 tp
->tp_next
= curtab
->tp_next
;
3834 /* Re-insert it at the specified position. */
3837 curtab
->tp_next
= first_tabpage
;
3838 first_tabpage
= curtab
;
3842 for (tp
= first_tabpage
; tp
->tp_next
!= NULL
&& n
> 1; tp
= tp
->tp_next
)
3844 curtab
->tp_next
= tp
->tp_next
;
3845 tp
->tp_next
= curtab
;
3848 /* Need to redraw the tabline. Tab page contents doesn't change. */
3849 redraw_tabline
= TRUE
;
3854 * Go to another window.
3855 * When jumping to another buffer, stop Visual mode. Do this before
3856 * changing windows so we can yank the selection into the '*' register.
3857 * When jumping to another window on the same buffer, adjust its cursor
3858 * position to keep the same Visual area.
3871 if (curbuf_locked())
3876 if (wp
->w_buffer
!= curbuf
)
3877 reset_VIsual_and_resel();
3878 else if (VIsual_active
)
3879 wp
->w_cursor
= curwin
->w_cursor
;
3883 need_mouse_correct
= TRUE
;
3885 win_enter(wp
, TRUE
);
3888 #if defined(FEAT_PERL) || defined(PROTO)
3890 * Find window number "winnr" (counting top to bottom).
3898 # ifdef FEAT_WINDOWS
3899 for (wp
= firstwin
; wp
!= NULL
; wp
= wp
->w_next
)
3909 #ifdef FEAT_VERTSPLIT
3911 * Move to window above or below "count" times.
3914 win_goto_ver(up
, count
)
3915 int up
; /* TRUE to go to win above */
3922 foundfr
= curwin
->w_frame
;
3926 * First go upwards in the tree of frames until we find a upwards or
3927 * downwards neighbor.
3938 if (fr
->fr_parent
->fr_layout
== FR_COL
&& nfr
!= NULL
)
3944 * Now go downwards to find the bottom or top frame in it.
3948 if (nfr
->fr_layout
== FR_LEAF
)
3954 if (nfr
->fr_layout
== FR_ROW
)
3956 /* Find the frame at the cursor row. */
3957 while (fr
->fr_next
!= NULL
3958 && frame2win(fr
)->w_wincol
+ fr
->fr_width
3959 <= curwin
->w_wincol
+ curwin
->w_wcol
)
3962 if (nfr
->fr_layout
== FR_COL
&& up
)
3963 while (fr
->fr_next
!= NULL
)
3969 if (foundfr
!= NULL
)
3970 win_goto(foundfr
->fr_win
);
3974 * Move to left or right window.
3977 win_goto_hor(left
, count
)
3978 int left
; /* TRUE to go to left win */
3985 foundfr
= curwin
->w_frame
;
3989 * First go upwards in the tree of frames until we find a left or
4001 if (fr
->fr_parent
->fr_layout
== FR_ROW
&& nfr
!= NULL
)
4007 * Now go downwards to find the leftmost or rightmost frame in it.
4011 if (nfr
->fr_layout
== FR_LEAF
)
4017 if (nfr
->fr_layout
== FR_COL
)
4019 /* Find the frame at the cursor row. */
4020 while (fr
->fr_next
!= NULL
4021 && frame2win(fr
)->w_winrow
+ fr
->fr_height
4022 <= curwin
->w_winrow
+ curwin
->w_wrow
)
4025 if (nfr
->fr_layout
== FR_ROW
&& left
)
4026 while (fr
->fr_next
!= NULL
)
4032 if (foundfr
!= NULL
)
4033 win_goto(foundfr
->fr_win
);
4038 * Make window "wp" the current window.
4041 win_enter(wp
, undo_sync
)
4045 win_enter_ext(wp
, undo_sync
, FALSE
);
4049 * Make window wp the current window.
4050 * Can be called with "curwin_invalid" TRUE, which means that curwin has just
4051 * been closed and isn't valid.
4054 win_enter_ext(wp
, undo_sync
, curwin_invalid
)
4060 int other_buffer
= FALSE
;
4063 if (wp
== curwin
&& !curwin_invalid
) /* nothing to do */
4067 if (!curwin_invalid
)
4070 * Be careful: If autocommands delete the window, return now.
4072 if (wp
->w_buffer
!= curbuf
)
4074 apply_autocmds(EVENT_BUFLEAVE
, NULL
, NULL
, FALSE
, curbuf
);
4075 other_buffer
= TRUE
;
4079 apply_autocmds(EVENT_WINLEAVE
, NULL
, NULL
, FALSE
, curbuf
);
4083 /* autocmds may abort script processing */
4090 /* sync undo before leaving the current buffer */
4091 if (undo_sync
&& curbuf
!= wp
->w_buffer
)
4093 /* may have to copy the buffer options when 'cpo' contains 'S' */
4094 if (wp
->w_buffer
!= curbuf
)
4095 buf_copy_options(wp
->w_buffer
, BCO_ENTER
| BCO_NOHELP
);
4096 if (!curwin_invalid
)
4098 prevwin
= curwin
; /* remember for CTRL-W p */
4099 curwin
->w_redr_status
= TRUE
;
4102 curbuf
= wp
->w_buffer
;
4104 #ifdef FEAT_VIRTUALEDIT
4105 if (!virtual_active())
4106 curwin
->w_cursor
.coladd
= 0;
4108 changed_line_abv_curs(); /* assume cursor position needs updating */
4110 if (curwin
->w_localdir
!= NULL
)
4112 /* Window has a local directory: Save current directory as global
4113 * directory (unless that was done already) and change to the local
4115 if (globaldir
== NULL
)
4117 char_u cwd
[MAXPATHL
];
4119 if (mch_dirname(cwd
, MAXPATHL
) == OK
)
4120 globaldir
= vim_strsave(cwd
);
4122 if (mch_chdir((char *)curwin
->w_localdir
) == 0)
4123 shorten_fnames(TRUE
);
4125 else if (globaldir
!= NULL
)
4127 /* Window doesn't have a local directory and we are not in the global
4128 * directory: Change to the global directory. */
4129 ignored
= mch_chdir((char *)globaldir
);
4130 vim_free(globaldir
);
4132 shorten_fnames(TRUE
);
4136 apply_autocmds(EVENT_WINENTER
, NULL
, NULL
, FALSE
, curbuf
);
4138 apply_autocmds(EVENT_BUFENTER
, NULL
, NULL
, FALSE
, curbuf
);
4144 curwin
->w_redr_status
= TRUE
;
4145 redraw_tabline
= TRUE
;
4147 redraw_later(VALID
); /* causes status line redraw */
4149 /* set window height to desired minimal value */
4150 if (curwin
->w_height
< p_wh
&& !curwin
->w_p_wfh
)
4151 win_setheight((int)p_wh
);
4152 else if (curwin
->w_height
== 0)
4155 #ifdef FEAT_VERTSPLIT
4156 /* set window width to desired minimal value */
4157 if (curwin
->w_width
< p_wiw
&& !curwin
->w_p_wfw
)
4158 win_setwidth((int)p_wiw
);
4162 setmouse(); /* in case jumped to/from help buffer */
4165 /* Change directories when the 'acd' option is set. */
4169 #endif /* FEAT_WINDOWS */
4171 #if defined(FEAT_WINDOWS) || defined(FEAT_SIGNS) || defined(PROTO)
4173 * Jump to the first open window that contains buffer "buf", if one exists.
4174 * Returns a pointer to the window found, otherwise NULL.
4177 buf_jump_open_win(buf
)
4180 # ifdef FEAT_WINDOWS
4183 for (wp
= firstwin
; wp
!= NULL
; wp
= wp
->w_next
)
4184 if (wp
->w_buffer
== buf
)
4187 win_enter(wp
, FALSE
);
4190 if (curwin
->w_buffer
== buf
)
4197 * Jump to the first open window in any tab page that contains buffer "buf",
4199 * Returns a pointer to the window found, otherwise NULL.
4202 buf_jump_open_tab(buf
)
4205 # ifdef FEAT_WINDOWS
4209 /* First try the current tab page. */
4210 wp
= buf_jump_open_win(buf
);
4214 for (tp
= first_tabpage
; tp
!= NULL
; tp
= tp
->tp_next
)
4217 for (wp
= tp
->tp_firstwin
; wp
!= NULL
; wp
= wp
->w_next
)
4218 if (wp
->w_buffer
== buf
)
4222 goto_tabpage_win(tp
, wp
);
4224 wp
= NULL
; /* something went wrong */
4231 if (curwin
->w_buffer
== buf
)
4239 * Allocate a window structure and link it in the window list when "hidden" is
4243 win_alloc(after
, hidden
)
4244 win_T
*after UNUSED
;
4250 * allocate window structure and linesizes arrays
4252 newwin
= (win_T
*)alloc_clear((unsigned)sizeof(win_T
));
4253 if (newwin
!= NULL
&& win_alloc_lines(newwin
) == FAIL
)
4262 /* Don't execute autocommands while the window is not properly
4263 * initialized yet. gui_create_scrollbar() may trigger a FocusGained
4268 * link the window in the window list
4272 win_append(after
, newwin
);
4274 #ifdef FEAT_VERTSPLIT
4275 newwin
->w_wincol
= 0;
4276 newwin
->w_width
= Columns
;
4279 /* position the display and the cursor at the top of the file. */
4280 newwin
->w_topline
= 1;
4282 newwin
->w_topfill
= 0;
4284 newwin
->w_botline
= 2;
4285 newwin
->w_cursor
.lnum
= 1;
4286 #ifdef FEAT_SCROLLBIND
4287 newwin
->w_scbind_pos
= 1;
4290 /* We won't calculate w_fraction until resizing the window */
4291 newwin
->w_fraction
= 0;
4292 newwin
->w_prev_fraction_row
= -1;
4297 gui_create_scrollbar(&newwin
->w_scrollbars
[SBAR_LEFT
],
4299 gui_create_scrollbar(&newwin
->w_scrollbars
[SBAR_RIGHT
],
4300 SBAR_RIGHT
, newwin
);
4304 /* init w: variables */
4305 init_var_dict(&newwin
->w_vars
, &newwin
->w_winvar
);
4308 foldInitWin(newwin
);
4313 #ifdef FEAT_SEARCH_EXTRA
4314 newwin
->w_match_head
= NULL
;
4315 newwin
->w_next_match_id
= 4;
4321 #if defined(FEAT_WINDOWS) || defined(PROTO)
4324 * remove window 'wp' from the window list and free the structure
4329 tabpage_T
*tp
; /* tab page "win" is in, NULL for current */
4337 /* reduce the reference count to the argument list. */
4338 alist_unlink(wp
->w_alist
);
4341 /* Don't execute autocommands while the window is halfway being deleted.
4342 * gui_mch_destroy_scrollbar() may trigger a FocusGained event. */
4346 #ifdef FEAT_MZSCHEME
4347 mzscheme_window_free(wp
);
4355 python_window_free(wp
);
4359 tcl_window_free(wp
);
4363 ruby_window_free(wp
);
4366 clear_winopt(&wp
->w_onebuf_opt
);
4367 clear_winopt(&wp
->w_allbuf_opt
);
4370 vars_clear(&wp
->w_vars
.dv_hashtab
); /* free all w: variables */
4377 for (i
= 0; i
< wp
->w_tagstacklen
; ++i
)
4378 vim_free(wp
->w_tagstack
[i
].tagname
);
4380 vim_free(wp
->w_localdir
);
4382 #ifdef FEAT_SEARCH_EXTRA
4386 #ifdef FEAT_JUMPLIST
4390 #ifdef FEAT_QUICKFIX
4397 gui_mch_destroy_scrollbar(&wp
->w_scrollbars
[SBAR_LEFT
]);
4398 gui_mch_destroy_scrollbar(&wp
->w_scrollbars
[SBAR_RIGHT
]);
4400 #endif /* FEAT_GUI */
4403 if (wp
!= aucmd_win
)
4414 * Append window "wp" in the window list after window "after".
4417 win_append(after
, wp
)
4422 if (after
== NULL
) /* after NULL is in front of the first */
4425 before
= after
->w_next
;
4427 wp
->w_next
= before
;
4436 before
->w_prev
= wp
;
4440 * Remove a window from the window list.
4445 tabpage_T
*tp
; /* tab page "win" is in, NULL for current */
4447 if (wp
->w_prev
!= NULL
)
4448 wp
->w_prev
->w_next
= wp
->w_next
;
4449 else if (tp
== NULL
)
4450 firstwin
= wp
->w_next
;
4452 tp
->tp_firstwin
= wp
->w_next
;
4453 if (wp
->w_next
!= NULL
)
4454 wp
->w_next
->w_prev
= wp
->w_prev
;
4455 else if (tp
== NULL
)
4456 lastwin
= wp
->w_prev
;
4458 tp
->tp_lastwin
= wp
->w_prev
;
4462 * Append frame "frp" in a frame list after frame "after".
4465 frame_append(after
, frp
)
4466 frame_T
*after
, *frp
;
4468 frp
->fr_next
= after
->fr_next
;
4469 after
->fr_next
= frp
;
4470 if (frp
->fr_next
!= NULL
)
4471 frp
->fr_next
->fr_prev
= frp
;
4472 frp
->fr_prev
= after
;
4476 * Insert frame "frp" in a frame list before frame "before".
4479 frame_insert(before
, frp
)
4480 frame_T
*before
, *frp
;
4482 frp
->fr_next
= before
;
4483 frp
->fr_prev
= before
->fr_prev
;
4484 before
->fr_prev
= frp
;
4485 if (frp
->fr_prev
!= NULL
)
4486 frp
->fr_prev
->fr_next
= frp
;
4488 frp
->fr_parent
->fr_child
= frp
;
4492 * Remove a frame from a frame list.
4498 if (frp
->fr_prev
!= NULL
)
4499 frp
->fr_prev
->fr_next
= frp
->fr_next
;
4501 frp
->fr_parent
->fr_child
= frp
->fr_next
;
4502 if (frp
->fr_next
!= NULL
)
4503 frp
->fr_next
->fr_prev
= frp
->fr_prev
;
4506 #endif /* FEAT_WINDOWS */
4509 * Allocate w_lines[] for window "wp".
4510 * Return FAIL for failure, OK for success.
4516 wp
->w_lines_valid
= 0;
4517 wp
->w_lines
= (wline_T
*)alloc_clear((unsigned)(Rows
* sizeof(wline_T
)));
4518 if (wp
->w_lines
== NULL
)
4524 * free lsize arrays for a window
4530 vim_free(wp
->w_lines
);
4535 * Called from win_new_shellsize() after Rows changed.
4536 * This only does the current tab page, others must be done when made active.
4541 int h
= (int)ROWS_AVAIL
;
4543 if (firstwin
== NULL
) /* not initialized yet */
4546 if (h
< frame_minheight(topframe
, NULL
))
4547 h
= frame_minheight(topframe
, NULL
);
4549 /* First try setting the heights of windows with 'winfixheight'. If
4550 * that doesn't result in the right height, forget about that option. */
4551 frame_new_height(topframe
, h
, FALSE
, TRUE
);
4552 if (topframe
->fr_height
!= h
)
4553 frame_new_height(topframe
, h
, FALSE
, FALSE
);
4555 (void)win_comp_pos(); /* recompute w_winrow and w_wincol */
4559 win_new_height(firstwin
, h
);
4563 curtab
->tp_ch_used
= p_ch
;
4567 /* Disabled: don't want making the screen smaller make a window larger. */
4569 win_equal(curwin
, FALSE
, 'v');
4573 #if defined(FEAT_VERTSPLIT) || defined(PROTO)
4575 * Called from win_new_shellsize() after Columns changed.
4580 if (firstwin
== NULL
) /* not initialized yet */
4583 /* First try setting the widths of windows with 'winfixwidth'. If that
4584 * doesn't result in the right width, forget about that option. */
4585 frame_new_width(topframe
, (int)Columns
, FALSE
, TRUE
);
4586 if (topframe
->fr_width
!= Columns
)
4587 frame_new_width(topframe
, (int)Columns
, FALSE
, FALSE
);
4589 (void)win_comp_pos(); /* recompute w_winrow and w_wincol */
4591 /* Disabled: don't want making the screen smaller make a window larger. */
4593 win_equal(curwin
, FALSE
, 'h');
4598 #if defined(FEAT_CMDWIN) || defined(PROTO)
4600 * Save the size of all windows in "gap".
4609 ga_init2(gap
, (int)sizeof(int), 1);
4610 if (ga_grow(gap
, win_count() * 2) == OK
)
4611 for (wp
= firstwin
; wp
!= NULL
; wp
= wp
->w_next
)
4613 ((int *)gap
->ga_data
)[gap
->ga_len
++] =
4614 wp
->w_width
+ wp
->w_vsep_width
;
4615 ((int *)gap
->ga_data
)[gap
->ga_len
++] = wp
->w_height
;
4620 * Restore window sizes, but only if the number of windows is still the same.
4621 * Does not free the growarray.
4624 win_size_restore(gap
)
4630 if (win_count() * 2 == gap
->ga_len
)
4633 for (wp
= firstwin
; wp
!= NULL
; wp
= wp
->w_next
)
4635 frame_setwidth(wp
->w_frame
, ((int *)gap
->ga_data
)[i
++]);
4636 win_setheight_win(((int *)gap
->ga_data
)[i
++], wp
);
4638 /* recompute the window positions */
4639 (void)win_comp_pos();
4642 #endif /* FEAT_CMDWIN */
4644 #if defined(FEAT_WINDOWS) || defined(PROTO)
4646 * Update the position for all windows, using the width and height of the
4648 * Returns the row just after the last window.
4653 int row
= tabline_height();
4656 frame_comp_pos(topframe
, &row
, &col
);
4661 * Update the position of the windows in frame "topfrp", using the width and
4662 * height of the frames.
4663 * "*row" and "*col" are the top-left position of the frame. They are updated
4664 * to the bottom-right position plus one.
4667 frame_comp_pos(topfrp
, row
, col
)
4674 #ifdef FEAT_VERTSPLIT
4679 wp
= topfrp
->fr_win
;
4682 if (wp
->w_winrow
!= *row
4683 #ifdef FEAT_VERTSPLIT
4684 || wp
->w_wincol
!= *col
4688 /* position changed, redraw */
4689 wp
->w_winrow
= *row
;
4690 #ifdef FEAT_VERTSPLIT
4691 wp
->w_wincol
= *col
;
4693 redraw_win_later(wp
, NOT_VALID
);
4694 wp
->w_redr_status
= TRUE
;
4696 *row
+= wp
->w_height
+ wp
->w_status_height
;
4697 #ifdef FEAT_VERTSPLIT
4698 *col
+= wp
->w_width
+ wp
->w_vsep_width
;
4703 #ifdef FEAT_VERTSPLIT
4707 for (frp
= topfrp
->fr_child
; frp
!= NULL
; frp
= frp
->fr_next
)
4709 #ifdef FEAT_VERTSPLIT
4710 if (topfrp
->fr_layout
== FR_ROW
)
4711 *row
= startrow
; /* all frames are at the same row */
4713 *col
= startcol
; /* all frames are at the same col */
4715 frame_comp_pos(frp
, row
, col
);
4720 #endif /* FEAT_WINDOWS */
4723 * Set current window height and take care of repositioning other windows to
4727 win_setheight(height
)
4730 win_setheight_win(height
, curwin
);
4734 * Set the window height of window "win" and take care of repositioning other
4735 * windows to fit around it.
4738 win_setheight_win(height
, win
)
4746 /* Always keep current window at least one line high, even when
4747 * 'winminheight' is zero. */
4757 frame_setheight(win
->w_frame
, height
+ win
->w_status_height
);
4759 /* recompute the window positions */
4760 row
= win_comp_pos();
4762 if (height
> topframe
->fr_height
)
4763 height
= topframe
->fr_height
;
4764 win
->w_height
= height
;
4769 * If there is extra space created between the last window and the command
4772 if (full_screen
&& msg_scrolled
== 0 && row
< cmdline_row
)
4773 screen_fill(row
, cmdline_row
, 0, (int)Columns
, ' ', ' ', 0);
4778 redraw_all_later(NOT_VALID
);
4781 #if defined(FEAT_WINDOWS) || defined(PROTO)
4784 * Set the height of a frame to "height" and take care that all frames and
4785 * windows inside it are resized. Also resize frames on the left and right if
4786 * the are in the same FR_ROW frame.
4789 * If the frame is part of a FR_COL frame, try fitting the frame in that
4790 * frame. If that doesn't work (the FR_COL frame is too small), recursively
4791 * go to containing frames to resize them and make room.
4792 * If the frame is part of a FR_ROW frame, all frames must be resized as well.
4793 * Check for the minimal height of the FR_ROW frame.
4794 * At the top level we can also use change the command line height.
4797 frame_setheight(curfrp
, height
)
4801 int room
; /* total number of lines available */
4802 int take
; /* number of lines taken from other windows */
4803 int room_cmdline
; /* lines available from cmdline */
4809 /* If the height already is the desired value, nothing to do. */
4810 if (curfrp
->fr_height
== height
)
4813 if (curfrp
->fr_parent
== NULL
)
4815 /* topframe: can only change the command line */
4816 if (height
> ROWS_AVAIL
)
4817 height
= ROWS_AVAIL
;
4819 frame_new_height(curfrp
, height
, FALSE
, FALSE
);
4821 else if (curfrp
->fr_parent
->fr_layout
== FR_ROW
)
4823 /* Row of frames: Also need to resize frames left and right of this
4824 * one. First check for the minimal height of these. */
4825 h
= frame_minheight(curfrp
->fr_parent
, NULL
);
4828 frame_setheight(curfrp
->fr_parent
, height
);
4833 * Column of frames: try to change only frames in this column.
4835 #ifdef FEAT_VERTSPLIT
4838 * 1: compute room available, if it's not enough try resizing the
4840 * 2: compute the room available and adjust the height to it.
4841 * Try not to reduce the height of a window with 'winfixheight' set.
4843 for (run
= 1; run
<= 2; ++run
)
4850 for (frp
= curfrp
->fr_parent
->fr_child
; frp
!= NULL
;
4854 && frp
->fr_win
!= NULL
4855 && frp
->fr_win
->w_p_wfh
)
4856 room_reserved
+= frp
->fr_height
;
4857 room
+= frp
->fr_height
;
4859 room
-= frame_minheight(frp
, NULL
);
4861 #ifdef FEAT_VERTSPLIT
4862 if (curfrp
->fr_width
!= Columns
)
4867 room_cmdline
= Rows
- p_ch
- (lastwin
->w_winrow
4868 + lastwin
->w_height
+ lastwin
->w_status_height
);
4869 if (room_cmdline
< 0)
4873 if (height
<= room
+ room_cmdline
)
4875 #ifdef FEAT_VERTSPLIT
4876 if (run
== 2 || curfrp
->fr_width
== Columns
)
4879 if (height
> room
+ room_cmdline
)
4880 height
= room
+ room_cmdline
;
4883 #ifdef FEAT_VERTSPLIT
4884 frame_setheight(curfrp
->fr_parent
, height
4885 + frame_minheight(curfrp
->fr_parent
, NOWIN
) - (int)p_wmh
- 1);
4891 * Compute the number of lines we will take from others frames (can be
4894 take
= height
- curfrp
->fr_height
;
4896 /* If there is not enough room, also reduce the height of a window
4897 * with 'winfixheight' set. */
4898 if (height
> room
+ room_cmdline
- room_reserved
)
4899 room_reserved
= room
+ room_cmdline
- height
;
4900 /* If there is only a 'winfixheight' window and making the
4901 * window smaller, need to make the other window taller. */
4902 if (take
< 0 && room
- curfrp
->fr_height
< room_reserved
)
4905 if (take
> 0 && room_cmdline
> 0)
4907 /* use lines from cmdline first */
4908 if (take
< room_cmdline
)
4909 room_cmdline
= take
;
4910 take
-= room_cmdline
;
4911 topframe
->fr_height
+= room_cmdline
;
4915 * set the current frame to the new height
4917 frame_new_height(curfrp
, height
, FALSE
, FALSE
);
4920 * First take lines from the frames after the current frame. If
4921 * that is not enough, takes lines from frames above the current
4924 for (run
= 0; run
< 2; ++run
)
4927 frp
= curfrp
->fr_next
; /* 1st run: start with next window */
4929 frp
= curfrp
->fr_prev
; /* 2nd run: start with prev window */
4930 while (frp
!= NULL
&& take
!= 0)
4932 h
= frame_minheight(frp
, NULL
);
4933 if (room_reserved
> 0
4934 && frp
->fr_win
!= NULL
4935 && frp
->fr_win
->w_p_wfh
)
4937 if (room_reserved
>= frp
->fr_height
)
4938 room_reserved
-= frp
->fr_height
;
4941 if (frp
->fr_height
- room_reserved
> take
)
4942 room_reserved
= frp
->fr_height
- take
;
4943 take
-= frp
->fr_height
- room_reserved
;
4944 frame_new_height(frp
, room_reserved
, FALSE
, FALSE
);
4950 if (frp
->fr_height
- take
< h
)
4952 take
-= frp
->fr_height
- h
;
4953 frame_new_height(frp
, h
, FALSE
, FALSE
);
4957 frame_new_height(frp
, frp
->fr_height
- take
,
4971 #if defined(FEAT_VERTSPLIT) || defined(PROTO)
4973 * Set current window width and take care of repositioning other windows to
4980 win_setwidth_win(width
, curwin
);
4984 win_setwidth_win(width
, wp
)
4988 /* Always keep current window at least one column wide, even when
4989 * 'winminwidth' is zero. */
4998 frame_setwidth(wp
->w_frame
, width
+ wp
->w_vsep_width
);
5000 /* recompute the window positions */
5001 (void)win_comp_pos();
5003 redraw_all_later(NOT_VALID
);
5007 * Set the width of a frame to "width" and take care that all frames and
5008 * windows inside it are resized. Also resize frames above and below if the
5009 * are in the same FR_ROW frame.
5011 * Strategy is similar to frame_setheight().
5014 frame_setwidth(curfrp
, width
)
5018 int room
; /* total number of lines available */
5019 int take
; /* number of lines taken from other windows */
5025 /* If the width already is the desired value, nothing to do. */
5026 if (curfrp
->fr_width
== width
)
5029 if (curfrp
->fr_parent
== NULL
)
5030 /* topframe: can't change width */
5033 if (curfrp
->fr_parent
->fr_layout
== FR_COL
)
5035 /* Column of frames: Also need to resize frames above and below of
5036 * this one. First check for the minimal width of these. */
5037 w
= frame_minwidth(curfrp
->fr_parent
, NULL
);
5040 frame_setwidth(curfrp
->fr_parent
, width
);
5045 * Row of frames: try to change only frames in this row.
5048 * 1: compute room available, if it's not enough try resizing the
5050 * 2: compute the room available and adjust the width to it.
5052 for (run
= 1; run
<= 2; ++run
)
5056 for (frp
= curfrp
->fr_parent
->fr_child
; frp
!= NULL
;
5060 && frp
->fr_win
!= NULL
5061 && frp
->fr_win
->w_p_wfw
)
5062 room_reserved
+= frp
->fr_width
;
5063 room
+= frp
->fr_width
;
5065 room
-= frame_minwidth(frp
, NULL
);
5070 if (run
== 2 || curfrp
->fr_height
>= ROWS_AVAIL
)
5076 frame_setwidth(curfrp
->fr_parent
, width
5077 + frame_minwidth(curfrp
->fr_parent
, NOWIN
) - (int)p_wmw
- 1);
5081 * Compute the number of lines we will take from others frames (can be
5084 take
= width
- curfrp
->fr_width
;
5086 /* If there is not enough room, also reduce the width of a window
5087 * with 'winfixwidth' set. */
5088 if (width
> room
- room_reserved
)
5089 room_reserved
= room
- width
;
5090 /* If there is only a 'winfixwidth' window and making the
5091 * window smaller, need to make the other window narrower. */
5092 if (take
< 0 && room
- curfrp
->fr_width
< room_reserved
)
5096 * set the current frame to the new width
5098 frame_new_width(curfrp
, width
, FALSE
, FALSE
);
5101 * First take lines from the frames right of the current frame. If
5102 * that is not enough, takes lines from frames left of the current
5105 for (run
= 0; run
< 2; ++run
)
5108 frp
= curfrp
->fr_next
; /* 1st run: start with next window */
5110 frp
= curfrp
->fr_prev
; /* 2nd run: start with prev window */
5111 while (frp
!= NULL
&& take
!= 0)
5113 w
= frame_minwidth(frp
, NULL
);
5114 if (room_reserved
> 0
5115 && frp
->fr_win
!= NULL
5116 && frp
->fr_win
->w_p_wfw
)
5118 if (room_reserved
>= frp
->fr_width
)
5119 room_reserved
-= frp
->fr_width
;
5122 if (frp
->fr_width
- room_reserved
> take
)
5123 room_reserved
= frp
->fr_width
- take
;
5124 take
-= frp
->fr_width
- room_reserved
;
5125 frame_new_width(frp
, room_reserved
, FALSE
, FALSE
);
5131 if (frp
->fr_width
- take
< w
)
5133 take
-= frp
->fr_width
- w
;
5134 frame_new_width(frp
, w
, FALSE
, FALSE
);
5138 frame_new_width(frp
, frp
->fr_width
- take
,
5151 #endif /* FEAT_VERTSPLIT */
5154 * Check 'winminheight' for a valid value.
5163 /* loop until there is a 'winminheight' that is possible */
5166 /* TODO: handle vertical splits */
5168 for (wp
= firstwin
; wp
!= NULL
; wp
= wp
->w_next
)
5169 room
+= wp
->w_height
- p_wmh
;
5184 * Status line of dragwin is dragged "offset" lines down (negative is up).
5187 win_drag_status_line(dragwin
, offset
)
5195 int up
; /* if TRUE, drag status line up, otherwise down */
5198 fr
= dragwin
->w_frame
;
5200 if (fr
!= topframe
) /* more than one window */
5203 /* When the parent frame is not a column of frames, its parent should
5205 if (fr
->fr_layout
!= FR_COL
)
5208 if (fr
!= topframe
) /* only a row of windows, may drag statusline */
5213 /* If this is the last frame in a column, may want to resize the parent
5214 * frame instead (go two up to skip a row of frames). */
5215 while (curfr
!= topframe
&& curfr
->fr_next
== NULL
)
5224 if (offset
< 0) /* drag up */
5228 /* sum up the room of the current frame and above it */
5231 /* only one window */
5232 room
= fr
->fr_height
- frame_minheight(fr
, NULL
);
5237 for (fr
= fr
->fr_child
; ; fr
= fr
->fr_next
)
5239 room
+= fr
->fr_height
- frame_minheight(fr
, NULL
);
5244 fr
= curfr
->fr_next
; /* put fr at frame that grows */
5246 else /* drag down */
5250 * Only dragging the last status line can reduce p_ch.
5252 room
= Rows
- cmdline_row
;
5253 if (curfr
->fr_next
== NULL
)
5259 /* sum up the room of frames below of the current one */
5260 for (fr
= curfr
->fr_next
; fr
!= NULL
; fr
= fr
->fr_next
)
5261 room
+= fr
->fr_height
- frame_minheight(fr
, NULL
);
5262 fr
= curfr
; /* put fr at window that grows */
5265 if (room
< offset
) /* Not enough room */
5266 offset
= room
; /* Move as far as we can */
5271 * Grow frame fr by "offset" lines.
5272 * Doesn't happen when dragging the last status line up.
5275 frame_new_height(fr
, fr
->fr_height
+ offset
, up
, FALSE
);
5278 fr
= curfr
; /* current frame gets smaller */
5280 fr
= curfr
->fr_next
; /* next frame gets smaller */
5283 * Now make the other frames smaller.
5285 while (fr
!= NULL
&& offset
> 0)
5287 n
= frame_minheight(fr
, NULL
);
5288 if (fr
->fr_height
- offset
<= n
)
5290 offset
-= fr
->fr_height
- n
;
5291 frame_new_height(fr
, n
, !up
, FALSE
);
5295 frame_new_height(fr
, fr
->fr_height
- offset
, !up
, FALSE
);
5303 row
= win_comp_pos();
5304 screen_fill(row
, cmdline_row
, 0, (int)Columns
, ' ', ' ', 0);
5306 p_ch
= Rows
- cmdline_row
;
5309 curtab
->tp_ch_used
= p_ch
;
5310 redraw_all_later(SOME_VALID
);
5314 #ifdef FEAT_VERTSPLIT
5316 * Separator line of dragwin is dragged "offset" lines right (negative is left).
5319 win_drag_vsep_line(dragwin
, offset
)
5326 int left
; /* if TRUE, drag separator line left, otherwise right */
5329 fr
= dragwin
->w_frame
;
5330 if (fr
== topframe
) /* only one window (cannot happen?) */
5334 /* When the parent frame is not a row of frames, its parent should be. */
5335 if (fr
->fr_layout
!= FR_ROW
)
5337 if (fr
== topframe
) /* only a column of windows (cannot happen?) */
5343 /* If this is the last frame in a row, may want to resize a parent
5345 while (curfr
->fr_next
== NULL
)
5358 if (offset
< 0) /* drag left */
5362 /* sum up the room of the current frame and left of it */
5364 for (fr
= fr
->fr_child
; ; fr
= fr
->fr_next
)
5366 room
+= fr
->fr_width
- frame_minwidth(fr
, NULL
);
5370 fr
= curfr
->fr_next
; /* put fr at frame that grows */
5372 else /* drag right */
5375 /* sum up the room of frames right of the current one */
5377 for (fr
= curfr
->fr_next
; fr
!= NULL
; fr
= fr
->fr_next
)
5378 room
+= fr
->fr_width
- frame_minwidth(fr
, NULL
);
5379 fr
= curfr
; /* put fr at window that grows */
5382 if (room
< offset
) /* Not enough room */
5383 offset
= room
; /* Move as far as we can */
5384 if (offset
<= 0) /* No room at all, quit. */
5387 /* grow frame fr by offset lines */
5388 frame_new_width(fr
, fr
->fr_width
+ offset
, left
, FALSE
);
5390 /* shrink other frames: current and at the left or at the right */
5392 fr
= curfr
; /* current frame gets smaller */
5394 fr
= curfr
->fr_next
; /* next frame gets smaller */
5396 while (fr
!= NULL
&& offset
> 0)
5398 n
= frame_minwidth(fr
, NULL
);
5399 if (fr
->fr_width
- offset
<= n
)
5401 offset
-= fr
->fr_width
- n
;
5402 frame_new_width(fr
, n
, !left
, FALSE
);
5406 frame_new_width(fr
, fr
->fr_width
- offset
, !left
, FALSE
);
5414 (void)win_comp_pos();
5415 redraw_all_later(NOT_VALID
);
5417 #endif /* FEAT_VERTSPLIT */
5418 #endif /* FEAT_MOUSE */
5420 #endif /* FEAT_WINDOWS */
5423 * Set the height of a window.
5424 * This takes care of the things inside the window, not what happens to the
5425 * window position, the frame or to other windows.
5428 win_new_height(wp
, height
)
5433 int sline
, line_size
;
5434 #define FRACTION_MULT 16384L
5436 /* Don't want a negative height. Happens when splitting a tiny window.
5437 * Will equalize heights soon to fix it. */
5440 if (wp
->w_height
== height
)
5441 return; /* nothing to do */
5443 if (wp
->w_wrow
!= wp
->w_prev_fraction_row
&& wp
->w_height
> 0)
5444 wp
->w_fraction
= ((long)wp
->w_wrow
* FRACTION_MULT
5445 + FRACTION_MULT
/ 2) / (long)wp
->w_height
;
5447 wp
->w_height
= height
;
5450 /* Don't change w_topline when height is zero. Don't set w_topline when
5451 * 'scrollbind' is set and this isn't the current window. */
5453 #ifdef FEAT_SCROLLBIND
5454 && (!wp
->w_p_scb
|| wp
== curwin
)
5459 * Find a value for w_topline that shows the cursor at the same
5460 * relative position in the window as before (more or less).
5462 lnum
= wp
->w_cursor
.lnum
;
5463 if (lnum
< 1) /* can happen when starting up */
5465 wp
->w_wrow
= ((long)wp
->w_fraction
* (long)height
- 1L) / FRACTION_MULT
;
5466 line_size
= plines_win_col(wp
, lnum
, (long)(wp
->w_cursor
.col
)) - 1;
5467 sline
= wp
->w_wrow
- line_size
;
5471 /* Make sure the whole cursor line is visible, if possible. */
5472 int rows
= plines_win(wp
, lnum
, FALSE
);
5474 if (sline
> wp
->w_height
- rows
)
5476 sline
= wp
->w_height
- rows
;
5477 wp
->w_wrow
-= rows
- line_size
;
5484 * Cursor line would go off top of screen if w_wrow was this high.
5485 * Make cursor line the first line in the window. If not enough
5486 * room use w_skipcol;
5488 wp
->w_wrow
= line_size
;
5489 if (wp
->w_wrow
>= wp
->w_height
5490 && (W_WIDTH(wp
) - win_col_off(wp
)) > 0)
5492 wp
->w_skipcol
+= W_WIDTH(wp
) - win_col_off(wp
);
5494 while (wp
->w_wrow
>= wp
->w_height
)
5496 wp
->w_skipcol
+= W_WIDTH(wp
) - win_col_off(wp
)
5504 while (sline
> 0 && lnum
> 1)
5507 hasFoldingWin(wp
, lnum
, &lnum
, NULL
, TRUE
, NULL
);
5510 /* first line in buffer is folded */
5518 if (lnum
== wp
->w_topline
)
5519 line_size
= plines_win_nofill(wp
, lnum
, TRUE
)
5523 line_size
= plines_win(wp
, lnum
, TRUE
);
5530 * Line we want at top would go off top of screen. Use next
5534 hasFoldingWin(wp
, lnum
, NULL
, &lnum
, TRUE
, NULL
);
5537 wp
->w_wrow
-= line_size
+ sline
;
5541 /* First line of file reached, use that as topline. */
5543 wp
->w_wrow
-= sline
;
5546 set_topline(wp
, lnum
);
5553 curs_columns(FALSE
); /* validate w_wrow */
5555 wp
->w_prev_fraction_row
= wp
->w_wrow
;
5557 win_comp_scroll(wp
);
5558 redraw_win_later(wp
, SOME_VALID
);
5560 wp
->w_redr_status
= TRUE
;
5562 invalidate_botline_win(wp
);
5565 #ifdef FEAT_VERTSPLIT
5567 * Set the width of a window.
5570 win_new_width(wp
, width
)
5574 wp
->w_width
= width
;
5575 wp
->w_lines_valid
= 0;
5576 changed_line_abv_curs_win(wp
);
5577 invalidate_botline_win(wp
);
5581 curs_columns(TRUE
); /* validate w_wrow */
5583 #ifdef FEAT_GUI_MACVIM
5584 /* The view may have moved, so clear all or display may get corrupted. */
5585 redraw_win_later(wp
, CLEAR
);
5587 redraw_win_later(wp
, NOT_VALID
);
5589 wp
->w_redr_status
= TRUE
;
5597 wp
->w_p_scr
= ((unsigned)wp
->w_height
>> 1);
5598 if (wp
->w_p_scr
== 0)
5603 * command_height: called whenever p_ch has been changed
5611 int old_p_ch
= curtab
->tp_ch_used
;
5613 /* Use the value of p_ch that we remembered. This is needed for when the
5614 * GUI starts up, we can't be sure in what order things happen. And when
5615 * p_ch was changed in another tab page. */
5616 curtab
->tp_ch_used
= p_ch
;
5618 /* Find bottom frame with width of screen. */
5619 frp
= lastwin
->w_frame
;
5620 # ifdef FEAT_VERTSPLIT
5621 while (frp
->fr_width
!= Columns
&& frp
->fr_parent
!= NULL
)
5622 frp
= frp
->fr_parent
;
5625 /* Avoid changing the height of a window with 'winfixheight' set. */
5626 while (frp
->fr_prev
!= NULL
&& frp
->fr_layout
== FR_LEAF
5627 && frp
->fr_win
->w_p_wfh
)
5630 if (starting
!= NO_SCREEN
)
5632 cmdline_row
= Rows
- p_ch
;
5634 if (p_ch
> old_p_ch
) /* p_ch got bigger */
5636 while (p_ch
> old_p_ch
)
5642 curtab
->tp_ch_used
= p_ch
;
5643 cmdline_row
= Rows
- p_ch
;
5646 h
= frp
->fr_height
- frame_minheight(frp
, NULL
);
5647 if (h
> p_ch
- old_p_ch
)
5648 h
= p_ch
- old_p_ch
;
5650 frame_add_height(frp
, -h
);
5654 /* Recompute window positions. */
5655 (void)win_comp_pos();
5657 /* clear the lines added to cmdline */
5659 screen_fill((int)(cmdline_row
), (int)Rows
, 0,
5660 (int)Columns
, ' ', ' ', 0);
5661 msg_row
= cmdline_row
;
5662 redraw_cmdline
= TRUE
;
5666 if (msg_row
< cmdline_row
)
5667 msg_row
= cmdline_row
;
5668 redraw_cmdline
= TRUE
;
5670 frame_add_height(frp
, (int)(old_p_ch
- p_ch
));
5672 /* Recompute window positions. */
5673 if (frp
!= lastwin
->w_frame
)
5674 (void)win_comp_pos();
5676 cmdline_row
= Rows
- p_ch
;
5677 win_setheight(cmdline_row
);
5681 #if defined(FEAT_WINDOWS) || defined(PROTO)
5683 * Resize frame "frp" to be "n" lines higher (negative for less high).
5684 * Also resize the frames it is contained in.
5687 frame_add_height(frp
, n
)
5691 frame_new_height(frp
, frp
->fr_height
+ n
, FALSE
, FALSE
);
5694 frp
= frp
->fr_parent
;
5697 frp
->fr_height
+= n
;
5702 * Add or remove a status line for the bottom window(s), according to the
5703 * value of 'laststatus'.
5706 last_status(morewin
)
5707 int morewin
; /* pretend there are two or more windows */
5709 /* Don't make a difference between horizontal or vertical split. */
5710 last_status_rec(topframe
, (p_ls
== 2
5711 || (p_ls
== 1 && (morewin
|| lastwin
!= firstwin
))));
5715 last_status_rec(fr
, statusline
)
5722 if (fr
->fr_layout
== FR_LEAF
)
5725 if (wp
->w_status_height
!= 0 && !statusline
)
5727 /* remove status line */
5728 win_new_height(wp
, wp
->w_height
+ 1);
5729 wp
->w_status_height
= 0;
5732 else if (wp
->w_status_height
== 0 && statusline
)
5734 /* Find a frame to take a line from. */
5736 while (fp
->fr_height
<= frame_minheight(fp
, NULL
))
5743 /* In a column of frames: go to frame above. If already at
5744 * the top or in a row of frames: go to parent. */
5745 if (fp
->fr_parent
->fr_layout
== FR_COL
&& fp
->fr_prev
!= NULL
)
5750 wp
->w_status_height
= 1;
5753 frame_new_height(fp
, fp
->fr_height
- 1, FALSE
, FALSE
);
5754 frame_fix_height(wp
);
5755 (void)win_comp_pos();
5758 win_new_height(wp
, wp
->w_height
- 1);
5760 redraw_all_later(SOME_VALID
);
5763 #ifdef FEAT_VERTSPLIT
5764 else if (fr
->fr_layout
== FR_ROW
)
5766 /* vertically split windows, set status line for each one */
5767 for (fp
= fr
->fr_child
; fp
!= NULL
; fp
= fp
->fr_next
)
5768 last_status_rec(fp
, statusline
);
5773 /* horizontally split window, set status line for last one */
5774 for (fp
= fr
->fr_child
; fp
->fr_next
!= NULL
; fp
= fp
->fr_next
)
5776 last_status_rec(fp
, statusline
);
5781 * Return the number of lines used by the tab page line.
5786 #ifdef FEAT_GUI_TABLINE
5787 /* When the GUI has the tabline then this always returns zero. */
5788 if (gui_use_tabline())
5794 case 1: return (first_tabpage
->tp_next
== NULL
) ? 0 : 1;
5799 #endif /* FEAT_WINDOWS */
5801 #if defined(FEAT_SEARCHPATH) || defined(PROTO)
5803 * Get the file name at the cursor.
5804 * If Visual mode is active, use the selected text if it's in one line.
5805 * Returns the name in allocated memory, NULL for failure.
5808 grab_file_name(count
, file_lnum
)
5810 linenr_T
*file_lnum
;
5818 if (get_visual_text(NULL
, &ptr
, &len
) == FAIL
)
5820 return find_file_name_in_path(ptr
, len
,
5821 FNAME_MESS
|FNAME_EXP
|FNAME_REL
, count
, curbuf
->b_ffname
);
5824 return file_name_at_cursor(FNAME_MESS
|FNAME_HYP
|FNAME_EXP
|FNAME_REL
, count
,
5830 * Return the file name under or after the cursor.
5832 * The 'path' option is searched if the file name is not absolute.
5833 * The string returned has been alloc'ed and should be freed by the caller.
5834 * NULL is returned if the file name or file is not found.
5837 * FNAME_MESS give error messages
5838 * FNAME_EXP expand to path
5839 * FNAME_HYP check for hypertext link
5840 * FNAME_INCL apply "includeexpr"
5843 file_name_at_cursor(options
, count
, file_lnum
)
5846 linenr_T
*file_lnum
;
5848 return file_name_in_line(ml_get_curline(),
5849 curwin
->w_cursor
.col
, options
, count
, curbuf
->b_ffname
,
5854 * Return the name of the file under or after ptr[col].
5855 * Otherwise like file_name_at_cursor().
5858 file_name_in_line(line
, col
, options
, count
, rel_fname
, file_lnum
)
5863 char_u
*rel_fname
; /* file we are searching relative to */
5864 linenr_T
*file_lnum
; /* line number after the file name */
5870 * search forward for what could be the start of a file name
5873 while (*ptr
!= NUL
&& !vim_isfilec(*ptr
))
5875 if (*ptr
== NUL
) /* nothing found */
5877 if (options
& FNAME_MESS
)
5878 EMSG(_("E446: No file name under cursor"));
5883 * Search backward for first char of the file name.
5884 * Go one char back to ":" before "//" even when ':' is not in 'isfname'.
5889 if (has_mbyte
&& (len
= (*mb_head_off
)(line
, ptr
- 1)) > 0)
5893 if (vim_isfilec(ptr
[-1])
5894 || ((options
& FNAME_HYP
) && path_is_url(ptr
- 1)))
5901 * Search forward for the last char of the file name.
5902 * Also allow "://" when ':' is not in 'isfname'.
5905 while (vim_isfilec(ptr
[len
])
5906 || ((options
& FNAME_HYP
) && path_is_url(ptr
+ len
)))
5909 len
+= (*mb_ptr2len
)(ptr
+ len
);
5915 * If there is trailing punctuation, remove it.
5916 * But don't remove "..", could be a directory name.
5918 if (len
> 2 && vim_strchr((char_u
*)".,:;!", ptr
[len
- 1]) != NULL
5919 && ptr
[len
- 2] != '.')
5922 if (file_lnum
!= NULL
)
5926 /* Get the number after the file name and a separator character */
5932 ++p
; /* skip the separator */
5935 *file_lnum
= (int)getdigits(&p
);
5939 return find_file_name_in_path(ptr
, len
, options
, count
, rel_fname
);
5942 # if defined(FEAT_FIND_ID) && defined(FEAT_EVAL)
5943 static char_u
*eval_includeexpr
__ARGS((char_u
*ptr
, int len
));
5946 eval_includeexpr(ptr
, len
)
5952 set_vim_var_string(VV_FNAME
, ptr
, len
);
5953 res
= eval_to_string_safe(curbuf
->b_p_inex
, NULL
,
5954 was_set_insecurely((char_u
*)"includeexpr", OPT_LOCAL
));
5955 set_vim_var_string(VV_FNAME
, NULL
, 0);
5961 * Return the name of the file ptr[len] in 'path'.
5962 * Otherwise like file_name_at_cursor().
5965 find_file_name_in_path(ptr
, len
, options
, count
, rel_fname
)
5970 char_u
*rel_fname
; /* file we are searching relative to */
5974 # if defined(FEAT_FIND_ID) && defined(FEAT_EVAL)
5975 char_u
*tofree
= NULL
;
5977 if ((options
& FNAME_INCL
) && *curbuf
->b_p_inex
!= NUL
)
5979 tofree
= eval_includeexpr(ptr
, len
);
5983 len
= (int)STRLEN(ptr
);
5988 if (options
& FNAME_EXP
)
5990 file_name
= find_file_in_path(ptr
, len
, options
& ~FNAME_MESS
,
5993 # if defined(FEAT_FIND_ID) && defined(FEAT_EVAL)
5995 * If the file could not be found in a normal way, try applying
5996 * 'includeexpr' (unless done already).
5998 if (file_name
== NULL
5999 && !(options
& FNAME_INCL
) && *curbuf
->b_p_inex
!= NUL
)
6001 tofree
= eval_includeexpr(ptr
, len
);
6005 len
= (int)STRLEN(ptr
);
6006 file_name
= find_file_in_path(ptr
, len
, options
& ~FNAME_MESS
,
6011 if (file_name
== NULL
&& (options
& FNAME_MESS
))
6015 EMSG2(_("E447: Can't find file \"%s\" in path"), ptr
);
6019 /* Repeat finding the file "count" times. This matters when it
6020 * appears several times in the path. */
6021 while (file_name
!= NULL
&& --count
> 0)
6023 vim_free(file_name
);
6024 file_name
= find_file_in_path(ptr
, len
, options
, FALSE
, rel_fname
);
6028 file_name
= vim_strnsave(ptr
, len
);
6030 # if defined(FEAT_FIND_ID) && defined(FEAT_EVAL)
6036 #endif /* FEAT_SEARCHPATH */
6039 * Check if the "://" of a URL is at the pointer, return URL_SLASH.
6040 * Also check for ":\\", which MS Internet Explorer accepts, return
6047 if (STRNCMP(p
, "://", (size_t)3) == 0)
6049 else if (STRNCMP(p
, ":\\\\", (size_t)3) == 0)
6050 return URL_BACKSLASH
;
6055 * Check if "fname" starts with "name://". Return URL_SLASH if it does.
6056 * Return URL_BACKSLASH for "name:\\".
6057 * Return zero otherwise.
6060 path_with_url(fname
)
6065 for (p
= fname
; isalpha(*p
); ++p
)
6067 return path_is_url(p
);
6071 * Return TRUE if "name" is a full (absolute) path name or URL.
6077 return (path_with_url(name
) != 0 || mch_isFullName(name
));
6081 * Get absolute file name into buffer "buf[len]".
6083 * return FAIL for failure, OK otherwise
6086 vim_FullName(fname
, buf
, len
, force
)
6087 char_u
*fname
, *buf
;
6089 int force
; /* force expansion even when already absolute */
6098 url
= path_with_url(fname
);
6100 retval
= mch_FullName(fname
, buf
, len
, force
);
6101 if (url
|| retval
== FAIL
)
6103 /* something failed; use the file name (truncate when too long) */
6104 vim_strncpy(buf
, fname
, len
- 1);
6106 #if defined(MACOS_CLASSIC) || defined(OS2) || defined(MSDOS) || defined(MSWIN)
6113 * Return the minimal number of rows that is needed on the screen to display
6114 * the current number of windows.
6125 if (firstwin
== NULL
) /* not initialized yet */
6130 for (tp
= first_tabpage
; tp
!= NULL
; tp
= tp
->tp_next
)
6132 n
= frame_minheight(tp
->tp_topframe
, NULL
);
6136 total
+= tabline_height();
6138 total
= 1; /* at least one window should have a line! */
6140 total
+= 1; /* count the room for the command line */
6145 * Return TRUE if there is only one window (in the current tab page), not
6146 * counting a help or preview window, unless it is the current window.
6147 * Does not count "aucmd_win".
6156 /* If there is another tab page there always is another window. */
6157 if (first_tabpage
->tp_next
!= NULL
)
6160 for (wp
= firstwin
; wp
!= NULL
; wp
= wp
->w_next
)
6161 if ((!((wp
->w_buffer
->b_help
&& !curbuf
->b_help
)
6162 # ifdef FEAT_QUICKFIX
6166 # ifdef FEAT_AUTOCMD
6171 return (count
<= 1);
6177 #if defined(FEAT_WINDOWS) || defined(FEAT_AUTOCMD) || defined(PROTO)
6179 * Correct the cursor line number in other windows. Used after changing the
6180 * current buffer, and before applying autocommands.
6181 * When "do_curwin" is TRUE, also check current window.
6184 check_lnums(do_curwin
)
6192 FOR_ALL_TAB_WINDOWS(tp
, wp
)
6193 if ((do_curwin
|| wp
!= curwin
) && wp
->w_buffer
== curbuf
)
6199 if (wp
->w_cursor
.lnum
> curbuf
->b_ml
.ml_line_count
)
6200 wp
->w_cursor
.lnum
= curbuf
->b_ml
.ml_line_count
;
6201 if (wp
->w_topline
> curbuf
->b_ml
.ml_line_count
)
6202 wp
->w_topline
= curbuf
->b_ml
.ml_line_count
;
6207 #if defined(FEAT_WINDOWS) || defined(PROTO)
6210 * A snapshot of the window sizes, to restore them after closing the help
6212 * Only these fields are used:
6218 * fr_win (only valid for the old curwin, NULL otherwise)
6222 * Create a snapshot of the current frame sizes.
6228 clear_snapshot(curtab
, idx
);
6229 make_snapshot_rec(topframe
, &curtab
->tp_snapshot
[idx
]);
6233 make_snapshot_rec(fr
, frp
)
6237 *frp
= (frame_T
*)alloc_clear((unsigned)sizeof(frame_T
));
6240 (*frp
)->fr_layout
= fr
->fr_layout
;
6241 # ifdef FEAT_VERTSPLIT
6242 (*frp
)->fr_width
= fr
->fr_width
;
6244 (*frp
)->fr_height
= fr
->fr_height
;
6245 if (fr
->fr_next
!= NULL
)
6246 make_snapshot_rec(fr
->fr_next
, &((*frp
)->fr_next
));
6247 if (fr
->fr_child
!= NULL
)
6248 make_snapshot_rec(fr
->fr_child
, &((*frp
)->fr_child
));
6249 if (fr
->fr_layout
== FR_LEAF
&& fr
->fr_win
== curwin
)
6250 (*frp
)->fr_win
= curwin
;
6254 * Remove any existing snapshot.
6257 clear_snapshot(tp
, idx
)
6261 clear_snapshot_rec(tp
->tp_snapshot
[idx
]);
6262 tp
->tp_snapshot
[idx
] = NULL
;
6266 clear_snapshot_rec(fr
)
6271 clear_snapshot_rec(fr
->fr_next
);
6272 clear_snapshot_rec(fr
->fr_child
);
6278 * Restore a previously created snapshot, if there is any.
6279 * This is only done if the screen size didn't change and the window layout is
6283 restore_snapshot(idx
, close_curwin
)
6285 int close_curwin
; /* closing current window */
6289 if (curtab
->tp_snapshot
[idx
] != NULL
6290 # ifdef FEAT_VERTSPLIT
6291 && curtab
->tp_snapshot
[idx
]->fr_width
== topframe
->fr_width
6293 && curtab
->tp_snapshot
[idx
]->fr_height
== topframe
->fr_height
6294 && check_snapshot_rec(curtab
->tp_snapshot
[idx
], topframe
) == OK
)
6296 wp
= restore_snapshot_rec(curtab
->tp_snapshot
[idx
], topframe
);
6298 if (wp
!= NULL
&& close_curwin
)
6300 redraw_all_later(CLEAR
);
6302 clear_snapshot(curtab
, idx
);
6306 * Check if frames "sn" and "fr" have the same layout, same following frames
6307 * and same children.
6310 check_snapshot_rec(sn
, fr
)
6314 if (sn
->fr_layout
!= fr
->fr_layout
6315 || (sn
->fr_next
== NULL
) != (fr
->fr_next
== NULL
)
6316 || (sn
->fr_child
== NULL
) != (fr
->fr_child
== NULL
)
6317 || (sn
->fr_next
!= NULL
6318 && check_snapshot_rec(sn
->fr_next
, fr
->fr_next
) == FAIL
)
6319 || (sn
->fr_child
!= NULL
6320 && check_snapshot_rec(sn
->fr_child
, fr
->fr_child
) == FAIL
))
6326 * Copy the size of snapshot frame "sn" to frame "fr". Do the same for all
6327 * following frames and children.
6328 * Returns a pointer to the old current window, or NULL.
6331 restore_snapshot_rec(sn
, fr
)
6338 fr
->fr_height
= sn
->fr_height
;
6339 # ifdef FEAT_VERTSPLIT
6340 fr
->fr_width
= sn
->fr_width
;
6342 if (fr
->fr_layout
== FR_LEAF
)
6344 frame_new_height(fr
, fr
->fr_height
, FALSE
, FALSE
);
6345 # ifdef FEAT_VERTSPLIT
6346 frame_new_width(fr
, fr
->fr_width
, FALSE
, FALSE
);
6350 if (sn
->fr_next
!= NULL
)
6352 wp2
= restore_snapshot_rec(sn
->fr_next
, fr
->fr_next
);
6356 if (sn
->fr_child
!= NULL
)
6358 wp2
= restore_snapshot_rec(sn
->fr_child
, fr
->fr_child
);
6367 #if (defined(FEAT_GUI) && defined(FEAT_VERTSPLIT)) || defined(PROTO)
6369 * Return TRUE if there is any vertically split window.
6376 if (topframe
->fr_layout
== FR_ROW
)
6379 if (topframe
->fr_layout
== FR_COL
)
6380 for (fr
= topframe
->fr_child
; fr
!= NULL
; fr
= fr
->fr_next
)
6381 if (fr
->fr_layout
== FR_ROW
)
6388 #if defined(FEAT_SEARCH_EXTRA) || defined(PROTO)
6390 * Add match to the match list of window 'wp'. The pattern 'pat' will be
6391 * highlighted with the group 'grp' with priority 'prio'.
6392 * Optionally, a desired ID 'id' can be specified (greater than or equal to 1).
6393 * If no particular ID is desired, -1 must be specified for 'id'.
6394 * Return ID of added match, -1 on failure.
6397 match_add(wp
, grp
, pat
, prio
, id
)
6410 if (*grp
== NUL
|| *pat
== NUL
)
6412 if (id
< -1 || id
== 0)
6414 EMSGN("E799: Invalid ID: %ld (must be greater than or equal to 1)", id
);
6419 cur
= wp
->w_match_head
;
6424 EMSGN("E801: ID already taken: %ld", id
);
6430 if ((hlg_id
= syn_namen2id(grp
, (int)STRLEN(grp
))) == 0)
6432 EMSG2(_(e_nogroup
), grp
);
6435 if ((regprog
= vim_regcomp(pat
, RE_MAGIC
)) == NULL
)
6437 EMSG2(_(e_invarg2
), pat
);
6441 /* Find available match ID. */
6444 cur
= wp
->w_match_head
;
6445 while (cur
!= NULL
&& cur
->id
!= wp
->w_next_match_id
)
6448 id
= wp
->w_next_match_id
;
6449 wp
->w_next_match_id
++;
6452 /* Build new match. */
6453 m
= (matchitem_T
*)alloc(sizeof(matchitem_T
));
6456 m
->pattern
= vim_strsave(pat
);
6458 m
->match
.regprog
= regprog
;
6459 m
->match
.rmm_ic
= FALSE
;
6460 m
->match
.rmm_maxcol
= 0;
6462 /* Insert new match. The match list is in ascending order with regard to
6463 * the match priorities. */
6464 cur
= wp
->w_match_head
;
6466 while (cur
!= NULL
&& prio
>= cur
->priority
)
6472 wp
->w_match_head
= m
;
6477 redraw_later(SOME_VALID
);
6482 * Delete match with ID 'id' in the match list of window 'wp'.
6483 * Print error messages if 'perr' is TRUE.
6486 match_delete(wp
, id
, perr
)
6491 matchitem_T
*cur
= wp
->w_match_head
;
6492 matchitem_T
*prev
= cur
;
6497 EMSGN("E802: Invalid ID: %ld (must be greater than or equal to 1)",
6501 while (cur
!= NULL
&& cur
->id
!= id
)
6509 EMSGN("E803: ID not found: %ld", id
);
6513 wp
->w_match_head
= cur
->next
;
6515 prev
->next
= cur
->next
;
6516 vim_free(cur
->match
.regprog
);
6517 vim_free(cur
->pattern
);
6519 redraw_later(SOME_VALID
);
6524 * Delete all matches in the match list of window 'wp'.
6532 while (wp
->w_match_head
!= NULL
)
6534 m
= wp
->w_match_head
->next
;
6535 vim_free(wp
->w_match_head
->match
.regprog
);
6536 vim_free(wp
->w_match_head
->pattern
);
6537 vim_free(wp
->w_match_head
);
6538 wp
->w_match_head
= m
;
6540 redraw_later(SOME_VALID
);
6544 * Get match from ID 'id' in window 'wp'.
6545 * Return NULL if match not found.
6552 matchitem_T
*cur
= wp
->w_match_head
;
6554 while (cur
!= NULL
&& cur
->id
!= id
)