1 /* vi:set ts=8 sts=4 sw=4 noet: 2 * 3 * VIM - Vi IMproved by Bram Moolenaar 4 * 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. 8 */ 9 10 #include "vim.h" 11 12 static void cmd_with_count(char *cmd, char_u *bufp, size_t bufsize, long Prenum); 13 static void win_init(win_T *newp, win_T *oldp, int flags); 14 static void win_init_some(win_T *newp, win_T *oldp); 15 static void frame_comp_pos(frame_T *topfrp, int *row, int *col); 16 static void frame_setheight(frame_T *curfrp, int height); 17 static void frame_setwidth(frame_T *curfrp, int width); 18 static void win_exchange(long); 19 static void win_rotate(int, int); 20 static void win_totop(int size, int flags); 21 static void win_equal_rec(win_T *next_curwin, int current, frame_T *topfr, int dir, int col, int row, int width, int height); 22 static win_T *win_free_mem(win_T *win, int *dirp, tabpage_T *tp); 23 static frame_T *win_altframe(win_T *win, tabpage_T *tp); 24 static tabpage_T *alt_tabpage(void); 25 static win_T *frame2win(frame_T *frp); 26 static int frame_has_win(frame_T *frp, win_T *wp); 27 static void frame_new_height(frame_T *topfrp, int height, int topfirst, int wfh); 28 static int frame_fixed_height(frame_T *frp); 29 static int frame_fixed_width(frame_T *frp); 30 static void frame_add_statusline(frame_T *frp); 31 static void frame_new_width(frame_T *topfrp, int width, int leftfirst, int wfw); 32 static void frame_add_vsep(frame_T *frp); 33 static int frame_minwidth(frame_T *topfrp, win_T *next_curwin); 34 static void frame_fix_width(win_T *wp); 35 static int win_alloc_firstwin(win_T *oldwin); 36 static void new_frame(win_T *wp); 37 static tabpage_T *alloc_tabpage(void); 38 static int leave_tabpage(buf_T *new_curbuf, int trigger_leave_autocmds); 39 static void enter_tabpage(tabpage_T *tp, buf_T *old_curbuf, int trigger_enter_autocmds, int trigger_leave_autocmds); 40 static void frame_fix_height(win_T *wp); 41 static int frame_minheight(frame_T *topfrp, win_T *next_curwin); 42 static int may_open_tabpage(void); 43 static void win_enter_ext(win_T *wp, int undo_sync, int no_curwin, int trigger_new_autocmds, int trigger_enter_autocmds, int trigger_leave_autocmds); 44 static void win_free(win_T *wp, tabpage_T *tp); 45 static int win_unlisted(win_T *wp); 46 static void win_append(win_T *after, win_T *wp); 47 static void frame_append(frame_T *after, frame_T *frp); 48 static void frame_insert(frame_T *before, frame_T *frp); 49 static void frame_remove(frame_T *frp); 50 static void win_goto_ver(int up, long count); 51 static void win_goto_hor(int left, long count); 52 static void frame_add_height(frame_T *frp, int n); 53 static void last_status_rec(frame_T *fr, int statusline); 54 55 static void make_snapshot_rec(frame_T *fr, frame_T **frp); 56 static void clear_snapshot(tabpage_T *tp, int idx); 57 static void clear_snapshot_rec(frame_T *fr); 58 static int check_snapshot_rec(frame_T *sn, frame_T *fr); 59 static win_T *restore_snapshot_rec(frame_T *sn, frame_T *fr); 60 61 static int frame_check_height(frame_T *topfrp, int height); 62 static int frame_check_width(frame_T *topfrp, int width); 63 64 static win_T *win_alloc(win_T *after, int hidden); 65 66 #define NOWIN (win_T *)-1 // non-existing window 67 68 #define ROWS_AVAIL (Rows - p_ch - tabline_height()) 69 70 static char *m_onlyone = N_("Already only one window"); 71 72 // When non-zero splitting a window is forbidden. Used to avoid that nasty 73 // autocommands mess up the window structure. 74 static int split_disallowed = 0; 75 76 // #define WIN_DEBUG 77 #ifdef WIN_DEBUG 78 /* 79 * Call this method to log the current window layout. 80 */ 81 static void 82 log_frame_layout(frame_T *frame) 83 { 84 ch_log(NULL, "layout %s, wi: %d, he: %d, wwi: %d, whe: %d, id: %d", 85 frame->fr_layout == FR_LEAF ? "LEAF" 86 : frame->fr_layout == FR_ROW ? "ROW" : "COL", 87 frame->fr_width, 88 frame->fr_height, 89 frame->fr_win == NULL ? -1 : frame->fr_win->w_width, 90 frame->fr_win == NULL ? -1 : frame->fr_win->w_height, 91 frame->fr_win == NULL ? -1 : frame->fr_win->w_id); 92 if (frame->fr_child != NULL) 93 { 94 ch_log(NULL, "children"); 95 log_frame_layout(frame->fr_child); 96 if (frame->fr_next != NULL) 97 ch_log(NULL, "END of children"); 98 } 99 if (frame->fr_next != NULL) 100 log_frame_layout(frame->fr_next); 101 } 102 #endif 103 104 /* 105 * All CTRL-W window commands are handled here, called from normal_cmd(). 106 */ 107 void 108 do_window( 109 int nchar, 110 long Prenum, 111 int xchar) // extra char from ":wincmd gx" or NUL 112 { 113 long Prenum1; 114 win_T *wp; 115 #if defined(FEAT_SEARCHPATH) || defined(FEAT_FIND_ID) 116 char_u *ptr; 117 linenr_T lnum = -1; 118 #endif 119 #ifdef FEAT_FIND_ID 120 int type = FIND_DEFINE; 121 int len; 122 #endif 123 char_u cbuf[40]; 124 125 if (ERROR_IF_ANY_POPUP_WINDOW) 126 return; 127 128 #ifdef FEAT_CMDWIN 129 # define CHECK_CMDWIN \ 130 do { \ 131 if (cmdwin_type != 0) \ 132 { \ 133 emsg(_(e_cmdwin)); \ 134 return; \ 135 } \ 136 } while (0) 137 #else 138 # define CHECK_CMDWIN do { /**/ } while (0) 139 #endif 140 141 Prenum1 = Prenum == 0 ? 1 : Prenum; 142 143 switch (nchar) 144 { 145 // split current window in two parts, horizontally 146 case 'S': 147 case Ctrl_S: 148 case 's': 149 CHECK_CMDWIN; 150 reset_VIsual_and_resel(); // stop Visual mode 151 #ifdef FEAT_QUICKFIX 152 // When splitting the quickfix window open a new buffer in it, 153 // don't replicate the quickfix buffer. 154 if (bt_quickfix(curbuf)) 155 goto newwindow; 156 #endif 157 #ifdef FEAT_GUI 158 need_mouse_correct = TRUE; 159 #endif 160 (void)win_split((int)Prenum, 0); 161 break; 162 163 // split current window in two parts, vertically 164 case Ctrl_V: 165 case 'v': 166 CHECK_CMDWIN; 167 reset_VIsual_and_resel(); // stop Visual mode 168 #ifdef FEAT_QUICKFIX 169 // When splitting the quickfix window open a new buffer in it, 170 // don't replicate the quickfix buffer. 171 if (bt_quickfix(curbuf)) 172 goto newwindow; 173 #endif 174 #ifdef FEAT_GUI 175 need_mouse_correct = TRUE; 176 #endif 177 (void)win_split((int)Prenum, WSP_VERT); 178 break; 179 180 // split current window and edit alternate file 181 case Ctrl_HAT: 182 case '^': 183 CHECK_CMDWIN; 184 reset_VIsual_and_resel(); // stop Visual mode 185 186 if (buflist_findnr(Prenum == 0 187 ? curwin->w_alt_fnum : Prenum) == NULL) 188 { 189 if (Prenum == 0) 190 emsg(_(e_noalt)); 191 else 192 semsg(_("E92: Buffer %ld not found"), Prenum); 193 break; 194 } 195 196 if (!curbuf_locked() && win_split(0, 0) == OK) 197 (void)buflist_getfile( 198 Prenum == 0 ? curwin->w_alt_fnum : Prenum, 199 (linenr_T)0, GETF_ALT, FALSE); 200 break; 201 202 // open new window 203 case Ctrl_N: 204 case 'n': 205 CHECK_CMDWIN; 206 reset_VIsual_and_resel(); // stop Visual mode 207 #ifdef FEAT_QUICKFIX 208 newwindow: 209 #endif 210 if (Prenum) 211 // window height 212 vim_snprintf((char *)cbuf, sizeof(cbuf) - 5, "%ld", Prenum); 213 else 214 cbuf[0] = NUL; 215 #if defined(FEAT_QUICKFIX) 216 if (nchar == 'v' || nchar == Ctrl_V) 217 STRCAT(cbuf, "v"); 218 #endif 219 STRCAT(cbuf, "new"); 220 do_cmdline_cmd(cbuf); 221 break; 222 223 // quit current window 224 case Ctrl_Q: 225 case 'q': 226 reset_VIsual_and_resel(); // stop Visual mode 227 cmd_with_count("quit", cbuf, sizeof(cbuf), Prenum); 228 do_cmdline_cmd(cbuf); 229 break; 230 231 // close current window 232 case Ctrl_C: 233 case 'c': 234 reset_VIsual_and_resel(); // stop Visual mode 235 cmd_with_count("close", cbuf, sizeof(cbuf), Prenum); 236 do_cmdline_cmd(cbuf); 237 break; 238 239 #if defined(FEAT_QUICKFIX) 240 // close preview window 241 case Ctrl_Z: 242 case 'z': 243 CHECK_CMDWIN; 244 reset_VIsual_and_resel(); // stop Visual mode 245 do_cmdline_cmd((char_u *)"pclose"); 246 break; 247 248 // cursor to preview window 249 case 'P': 250 FOR_ALL_WINDOWS(wp) 251 if (wp->w_p_pvw) 252 break; 253 if (wp == NULL) 254 emsg(_("E441: There is no preview window")); 255 else 256 win_goto(wp); 257 break; 258 #endif 259 260 // close all but current window 261 case Ctrl_O: 262 case 'o': 263 CHECK_CMDWIN; 264 reset_VIsual_and_resel(); // stop Visual mode 265 cmd_with_count("only", cbuf, sizeof(cbuf), Prenum); 266 do_cmdline_cmd(cbuf); 267 break; 268 269 // cursor to next window with wrap around 270 case Ctrl_W: 271 case 'w': 272 // cursor to previous window with wrap around 273 case 'W': 274 CHECK_CMDWIN; 275 if (ONE_WINDOW && Prenum != 1) // just one window 276 beep_flush(); 277 else 278 { 279 if (Prenum) // go to specified window 280 { 281 for (wp = firstwin; --Prenum > 0; ) 282 { 283 if (wp->w_next == NULL) 284 break; 285 else 286 wp = wp->w_next; 287 } 288 } 289 else 290 { 291 if (nchar == 'W') // go to previous window 292 { 293 wp = curwin->w_prev; 294 if (wp == NULL) 295 wp = lastwin; // wrap around 296 } 297 else // go to next window 298 { 299 wp = curwin->w_next; 300 if (wp == NULL) 301 wp = firstwin; // wrap around 302 } 303 } 304 win_goto(wp); 305 } 306 break; 307 308 // cursor to window below 309 case 'j': 310 case K_DOWN: 311 case Ctrl_J: 312 CHECK_CMDWIN; 313 win_goto_ver(FALSE, Prenum1); 314 break; 315 316 // cursor to window above 317 case 'k': 318 case K_UP: 319 case Ctrl_K: 320 CHECK_CMDWIN; 321 win_goto_ver(TRUE, Prenum1); 322 break; 323 324 // cursor to left window 325 case 'h': 326 case K_LEFT: 327 case Ctrl_H: 328 case K_BS: 329 CHECK_CMDWIN; 330 win_goto_hor(TRUE, Prenum1); 331 break; 332 333 // cursor to right window 334 case 'l': 335 case K_RIGHT: 336 case Ctrl_L: 337 CHECK_CMDWIN; 338 win_goto_hor(FALSE, Prenum1); 339 break; 340 341 // move window to new tab page 342 case 'T': 343 CHECK_CMDWIN; 344 if (one_window()) 345 msg(_(m_onlyone)); 346 else 347 { 348 tabpage_T *oldtab = curtab; 349 tabpage_T *newtab; 350 351 // First create a new tab with the window, then go back to 352 // the old tab and close the window there. 353 wp = curwin; 354 if (win_new_tabpage((int)Prenum) == OK 355 && valid_tabpage(oldtab)) 356 { 357 newtab = curtab; 358 goto_tabpage_tp(oldtab, TRUE, TRUE); 359 if (curwin == wp) 360 win_close(curwin, FALSE); 361 if (valid_tabpage(newtab)) 362 goto_tabpage_tp(newtab, TRUE, TRUE); 363 } 364 } 365 break; 366 367 // cursor to top-left window 368 case 't': 369 case Ctrl_T: 370 win_goto(firstwin); 371 break; 372 373 // cursor to bottom-right window 374 case 'b': 375 case Ctrl_B: 376 win_goto(lastwin); 377 break; 378 379 // cursor to last accessed (previous) window 380 case 'p': 381 case Ctrl_P: 382 if (!win_valid(prevwin)) 383 beep_flush(); 384 else 385 win_goto(prevwin); 386 break; 387 388 // exchange current and next window 389 case 'x': 390 case Ctrl_X: 391 CHECK_CMDWIN; 392 win_exchange(Prenum); 393 break; 394 395 // rotate windows downwards 396 case Ctrl_R: 397 case 'r': 398 CHECK_CMDWIN; 399 reset_VIsual_and_resel(); // stop Visual mode 400 win_rotate(FALSE, (int)Prenum1); // downwards 401 break; 402 403 // rotate windows upwards 404 case 'R': 405 CHECK_CMDWIN; 406 reset_VIsual_and_resel(); // stop Visual mode 407 win_rotate(TRUE, (int)Prenum1); // upwards 408 break; 409 410 // move window to the very top/bottom/left/right 411 case 'K': 412 case 'J': 413 case 'H': 414 case 'L': 415 CHECK_CMDWIN; 416 win_totop((int)Prenum, 417 ((nchar == 'H' || nchar == 'L') ? WSP_VERT : 0) 418 | ((nchar == 'H' || nchar == 'K') ? WSP_TOP : WSP_BOT)); 419 break; 420 421 // make all windows the same height 422 case '=': 423 #ifdef FEAT_GUI 424 need_mouse_correct = TRUE; 425 #endif 426 win_equal(NULL, FALSE, 'b'); 427 break; 428 429 // increase current window height 430 case '+': 431 #ifdef FEAT_GUI 432 need_mouse_correct = TRUE; 433 #endif 434 win_setheight(curwin->w_height + (int)Prenum1); 435 break; 436 437 // decrease current window height 438 case '-': 439 #ifdef FEAT_GUI 440 need_mouse_correct = TRUE; 441 #endif 442 win_setheight(curwin->w_height - (int)Prenum1); 443 break; 444 445 // set current window height 446 case Ctrl__: 447 case '_': 448 #ifdef FEAT_GUI 449 need_mouse_correct = TRUE; 450 #endif 451 win_setheight(Prenum ? (int)Prenum : 9999); 452 break; 453 454 // increase current window width 455 case '>': 456 #ifdef FEAT_GUI 457 need_mouse_correct = TRUE; 458 #endif 459 win_setwidth(curwin->w_width + (int)Prenum1); 460 break; 461 462 // decrease current window width 463 case '<': 464 #ifdef FEAT_GUI 465 need_mouse_correct = TRUE; 466 #endif 467 win_setwidth(curwin->w_width - (int)Prenum1); 468 break; 469 470 // set current window width 471 case '|': 472 #ifdef FEAT_GUI 473 need_mouse_correct = TRUE; 474 #endif 475 win_setwidth(Prenum != 0 ? (int)Prenum : 9999); 476 break; 477 478 // jump to tag and split window if tag exists (in preview window) 479 #if defined(FEAT_QUICKFIX) 480 case '}': 481 CHECK_CMDWIN; 482 if (Prenum) 483 g_do_tagpreview = Prenum; 484 else 485 g_do_tagpreview = p_pvh; 486 #endif 487 // FALLTHROUGH 488 case ']': 489 case Ctrl_RSB: 490 CHECK_CMDWIN; 491 // keep Visual mode, can select words to use as a tag 492 if (Prenum) 493 postponed_split = Prenum; 494 else 495 postponed_split = -1; 496 #ifdef FEAT_QUICKFIX 497 if (nchar != '}') 498 g_do_tagpreview = 0; 499 #endif 500 501 // Execute the command right here, required when "wincmd ]" 502 // was used in a function. 503 do_nv_ident(Ctrl_RSB, NUL); 504 break; 505 506 #ifdef FEAT_SEARCHPATH 507 // edit file name under cursor in a new window 508 case 'f': 509 case 'F': 510 case Ctrl_F: 511 wingotofile: 512 CHECK_CMDWIN; 513 514 ptr = grab_file_name(Prenum1, &lnum); 515 if (ptr != NULL) 516 { 517 tabpage_T *oldtab = curtab; 518 win_T *oldwin = curwin; 519 # ifdef FEAT_GUI 520 need_mouse_correct = TRUE; 521 # endif 522 setpcmark(); 523 if (win_split(0, 0) == OK) 524 { 525 RESET_BINDING(curwin); 526 if (do_ecmd(0, ptr, NULL, NULL, ECMD_LASTL, 527 ECMD_HIDE, NULL) == FAIL) 528 { 529 // Failed to open the file, close the window 530 // opened for it. 531 win_close(curwin, FALSE); 532 goto_tabpage_win(oldtab, oldwin); 533 } 534 else if (nchar == 'F' && lnum >= 0) 535 { 536 curwin->w_cursor.lnum = lnum; 537 check_cursor_lnum(); 538 beginline(BL_SOL | BL_FIX); 539 } 540 } 541 vim_free(ptr); 542 } 543 break; 544 #endif 545 546 #ifdef FEAT_FIND_ID 547 // Go to the first occurrence of the identifier under cursor along path in a 548 // new window -- webb 549 case 'i': // Go to any match 550 case Ctrl_I: 551 type = FIND_ANY; 552 // FALLTHROUGH 553 case 'd': // Go to definition, using 'define' 554 case Ctrl_D: 555 CHECK_CMDWIN; 556 if ((len = find_ident_under_cursor(&ptr, FIND_IDENT)) == 0) 557 break; 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; 562 break; 563 #endif 564 565 // Quickfix window only: view the result under the cursor in a new split. 566 #if defined(FEAT_QUICKFIX) 567 case K_KENTER: 568 case CAR: 569 if (bt_quickfix(curbuf)) 570 qf_view_result(TRUE); 571 break; 572 #endif 573 574 // CTRL-W g extended commands 575 case 'g': 576 case Ctrl_G: 577 CHECK_CMDWIN; 578 #ifdef USE_ON_FLY_SCROLL 579 dont_scroll = TRUE; // disallow scrolling here 580 #endif 581 ++no_mapping; 582 ++allow_keys; // no mapping for xchar, but allow key codes 583 if (xchar == NUL) 584 xchar = plain_vgetc(); 585 LANGMAP_ADJUST(xchar, TRUE); 586 --no_mapping; 587 --allow_keys; 588 #ifdef FEAT_CMDL_INFO 589 (void)add_to_showcmd(xchar); 590 #endif 591 switch (xchar) 592 { 593 #if defined(FEAT_QUICKFIX) 594 case '}': 595 xchar = Ctrl_RSB; 596 if (Prenum) 597 g_do_tagpreview = Prenum; 598 else 599 g_do_tagpreview = p_pvh; 600 #endif 601 // FALLTHROUGH 602 case ']': 603 case Ctrl_RSB: 604 // keep Visual mode, can select words to use as a tag 605 if (Prenum) 606 postponed_split = Prenum; 607 else 608 postponed_split = -1; 609 610 // Execute the command right here, required when 611 // "wincmd g}" was used in a function. 612 do_nv_ident('g', xchar); 613 break; 614 615 #ifdef FEAT_SEARCHPATH 616 case 'f': // CTRL-W gf: "gf" in a new tab page 617 case 'F': // CTRL-W gF: "gF" in a new tab page 618 cmdmod.tab = tabpage_index(curtab) + 1; 619 nchar = xchar; 620 goto wingotofile; 621 #endif 622 case 't': // CTRL-W gt: go to next tab page 623 goto_tabpage((int)Prenum); 624 break; 625 626 case 'T': // CTRL-W gT: go to previous tab page 627 goto_tabpage(-(int)Prenum1); 628 break; 629 630 case TAB: // CTRL-W g<Tab>: go to last used tab page 631 if (goto_tabpage_lastused() == FAIL) 632 beep_flush(); 633 break; 634 635 default: 636 beep_flush(); 637 break; 638 } 639 break; 640 641 default: beep_flush(); 642 break; 643 } 644 } 645 646 /* 647 * Figure out the address type for ":wincmd". 648 */ 649 void 650 get_wincmd_addr_type(char_u *arg, exarg_T *eap) 651 { 652 switch (*arg) 653 { 654 case 'S': 655 case Ctrl_S: 656 case 's': 657 case Ctrl_N: 658 case 'n': 659 case 'j': 660 case Ctrl_J: 661 case 'k': 662 case Ctrl_K: 663 case 'T': 664 case Ctrl_R: 665 case 'r': 666 case 'R': 667 case 'K': 668 case 'J': 669 case '+': 670 case '-': 671 case Ctrl__: 672 case '_': 673 case '|': 674 case ']': 675 case Ctrl_RSB: 676 case 'g': 677 case Ctrl_G: 678 case Ctrl_V: 679 case 'v': 680 case 'h': 681 case Ctrl_H: 682 case 'l': 683 case Ctrl_L: 684 case 'H': 685 case 'L': 686 case '>': 687 case '<': 688 #if defined(FEAT_QUICKFIX) 689 case '}': 690 #endif 691 #ifdef FEAT_SEARCHPATH 692 case 'f': 693 case 'F': 694 case Ctrl_F: 695 #endif 696 #ifdef FEAT_FIND_ID 697 case 'i': 698 case Ctrl_I: 699 case 'd': 700 case Ctrl_D: 701 #endif 702 // window size or any count 703 eap->addr_type = ADDR_OTHER; 704 break; 705 706 case Ctrl_HAT: 707 case '^': 708 // buffer number 709 eap->addr_type = ADDR_BUFFERS; 710 break; 711 712 case Ctrl_Q: 713 case 'q': 714 case Ctrl_C: 715 case 'c': 716 case Ctrl_O: 717 case 'o': 718 case Ctrl_W: 719 case 'w': 720 case 'W': 721 case 'x': 722 case Ctrl_X: 723 // window number 724 eap->addr_type = ADDR_WINDOWS; 725 break; 726 727 #if defined(FEAT_QUICKFIX) 728 case Ctrl_Z: 729 case 'z': 730 case 'P': 731 #endif 732 case 't': 733 case Ctrl_T: 734 case 'b': 735 case Ctrl_B: 736 case 'p': 737 case Ctrl_P: 738 case '=': 739 case CAR: 740 // no count 741 eap->addr_type = ADDR_NONE; 742 break; 743 } 744 } 745 746 static void 747 cmd_with_count( 748 char *cmd, 749 char_u *bufp, 750 size_t bufsize, 751 long Prenum) 752 { 753 size_t len = STRLEN(cmd); 754 755 STRCPY(bufp, cmd); 756 if (Prenum > 0) 757 vim_snprintf((char *)bufp + len, bufsize - len, "%ld", Prenum); 758 } 759 760 /* 761 * If "split_disallowed" is set given an error and return FAIL. 762 * Otherwise return OK. 763 */ 764 static int 765 check_split_disallowed() 766 { 767 if (split_disallowed > 0) 768 { 769 emsg(_("E242: Can't split a window while closing another")); 770 return FAIL; 771 } 772 return OK; 773 } 774 775 /* 776 * split the current window, implements CTRL-W s and :split 777 * 778 * "size" is the height or width for the new window, 0 to use half of current 779 * height or width. 780 * 781 * "flags": 782 * WSP_ROOM: require enough room for new window 783 * WSP_VERT: vertical split. 784 * WSP_TOP: open window at the top-left of the shell (help window). 785 * WSP_BOT: open window at the bottom-right of the shell (quickfix window). 786 * WSP_HELP: creating the help window, keep layout snapshot 787 * 788 * return FAIL for failure, OK otherwise 789 */ 790 int 791 win_split(int size, int flags) 792 { 793 if (ERROR_IF_ANY_POPUP_WINDOW) 794 return FAIL; 795 796 // When the ":tab" modifier was used open a new tab page instead. 797 if (may_open_tabpage() == OK) 798 return OK; 799 800 // Add flags from ":vertical", ":topleft" and ":botright". 801 flags |= cmdmod.split; 802 if ((flags & WSP_TOP) && (flags & WSP_BOT)) 803 { 804 emsg(_("E442: Can't split topleft and botright at the same time")); 805 return FAIL; 806 } 807 if (check_split_disallowed() == FAIL) 808 return FAIL; 809 810 // When creating the help window make a snapshot of the window layout. 811 // Otherwise clear the snapshot, it's now invalid. 812 if (flags & WSP_HELP) 813 make_snapshot(SNAP_HELP_IDX); 814 else 815 clear_snapshot(curtab, SNAP_HELP_IDX); 816 817 return win_split_ins(size, flags, NULL, 0); 818 } 819 820 /* 821 * When "new_wp" is NULL: split the current window in two. 822 * When "new_wp" is not NULL: insert this window at the far 823 * top/left/right/bottom. 824 * return FAIL for failure, OK otherwise 825 */ 826 int 827 win_split_ins( 828 int size, 829 int flags, 830 win_T *new_wp, 831 int dir) 832 { 833 win_T *wp = new_wp; 834 win_T *oldwin; 835 int new_size = size; 836 int i; 837 int need_status = 0; 838 int do_equal = FALSE; 839 int needed; 840 int available; 841 int oldwin_height = 0; 842 int layout; 843 frame_T *frp, *curfrp, *frp2, *prevfrp; 844 int before; 845 int minheight; 846 int wmh1; 847 int did_set_fraction = FALSE; 848 849 if (flags & WSP_TOP) 850 oldwin = firstwin; 851 else if (flags & WSP_BOT) 852 oldwin = lastwin; 853 else 854 oldwin = curwin; 855 856 // add a status line when p_ls == 1 and splitting the first window 857 if (ONE_WINDOW && p_ls == 1 && oldwin->w_status_height == 0) 858 { 859 if (VISIBLE_HEIGHT(oldwin) <= p_wmh && new_wp == NULL) 860 { 861 emsg(_(e_noroom)); 862 return FAIL; 863 } 864 need_status = STATUS_HEIGHT; 865 } 866 867 #ifdef FEAT_GUI 868 // May be needed for the scrollbars that are going to change. 869 if (gui.in_use) 870 out_flush(); 871 #endif 872 873 if (flags & WSP_VERT) 874 { 875 int wmw1; 876 int minwidth; 877 878 layout = FR_ROW; 879 880 /* 881 * Check if we are able to split the current window and compute its 882 * width. 883 */ 884 // Current window requires at least 1 space. 885 wmw1 = (p_wmw == 0 ? 1 : p_wmw); 886 needed = wmw1 + 1; 887 if (flags & WSP_ROOM) 888 needed += p_wiw - wmw1; 889 if (flags & (WSP_BOT | WSP_TOP)) 890 { 891 minwidth = frame_minwidth(topframe, NOWIN); 892 available = topframe->fr_width; 893 needed += minwidth; 894 } 895 else if (p_ea) 896 { 897 minwidth = frame_minwidth(oldwin->w_frame, NOWIN); 898 prevfrp = oldwin->w_frame; 899 for (frp = oldwin->w_frame->fr_parent; frp != NULL; 900 frp = frp->fr_parent) 901 { 902 if (frp->fr_layout == FR_ROW) 903 FOR_ALL_FRAMES(frp2, frp->fr_child) 904 if (frp2 != prevfrp) 905 minwidth += frame_minwidth(frp2, NOWIN); 906 prevfrp = frp; 907 } 908 available = topframe->fr_width; 909 needed += minwidth; 910 } 911 else 912 { 913 minwidth = frame_minwidth(oldwin->w_frame, NOWIN); 914 available = oldwin->w_frame->fr_width; 915 needed += minwidth; 916 } 917 if (available < needed && new_wp == NULL) 918 { 919 emsg(_(e_noroom)); 920 return FAIL; 921 } 922 if (new_size == 0) 923 new_size = oldwin->w_width / 2; 924 if (new_size > available - minwidth - 1) 925 new_size = available - minwidth - 1; 926 if (new_size < wmw1) 927 new_size = wmw1; 928 929 // if it doesn't fit in the current window, need win_equal() 930 if (oldwin->w_width - new_size - 1 < p_wmw) 931 do_equal = TRUE; 932 933 // We don't like to take lines for the new window from a 934 // 'winfixwidth' window. Take them from a window to the left or right 935 // instead, if possible. Add one for the separator. 936 if (oldwin->w_p_wfw) 937 win_setwidth_win(oldwin->w_width + new_size + 1, oldwin); 938 939 // Only make all windows the same width if one of them (except oldwin) 940 // is wider than one of the split windows. 941 if (!do_equal && p_ea && size == 0 && *p_ead != 'v' 942 && oldwin->w_frame->fr_parent != NULL) 943 { 944 frp = oldwin->w_frame->fr_parent->fr_child; 945 while (frp != NULL) 946 { 947 if (frp->fr_win != oldwin && frp->fr_win != NULL 948 && (frp->fr_win->w_width > new_size 949 || frp->fr_win->w_width > oldwin->w_width 950 - new_size - 1)) 951 { 952 do_equal = TRUE; 953 break; 954 } 955 frp = frp->fr_next; 956 } 957 } 958 } 959 else 960 { 961 layout = FR_COL; 962 963 /* 964 * Check if we are able to split the current window and compute its 965 * height. 966 */ 967 // Current window requires at least 1 space. 968 wmh1 = (p_wmh == 0 ? 1 : p_wmh) + WINBAR_HEIGHT(curwin); 969 needed = wmh1 + STATUS_HEIGHT; 970 if (flags & WSP_ROOM) 971 needed += p_wh - wmh1; 972 if (flags & (WSP_BOT | WSP_TOP)) 973 { 974 minheight = frame_minheight(topframe, NOWIN) + need_status; 975 available = topframe->fr_height; 976 needed += minheight; 977 } 978 else if (p_ea) 979 { 980 minheight = frame_minheight(oldwin->w_frame, NOWIN) + need_status; 981 prevfrp = oldwin->w_frame; 982 for (frp = oldwin->w_frame->fr_parent; frp != NULL; 983 frp = frp->fr_parent) 984 { 985 if (frp->fr_layout == FR_COL) 986 FOR_ALL_FRAMES(frp2, frp->fr_child) 987 if (frp2 != prevfrp) 988 minheight += frame_minheight(frp2, NOWIN); 989 prevfrp = frp; 990 } 991 available = topframe->fr_height; 992 needed += minheight; 993 } 994 else 995 { 996 minheight = frame_minheight(oldwin->w_frame, NOWIN) + need_status; 997 available = oldwin->w_frame->fr_height; 998 needed += minheight; 999 } 1000 if (available < needed && new_wp == NULL) 1001 { 1002 emsg(_(e_noroom)); 1003 return FAIL; 1004 } 1005 oldwin_height = oldwin->w_height; 1006 if (need_status) 1007 { 1008 oldwin->w_status_height = STATUS_HEIGHT; 1009 oldwin_height -= STATUS_HEIGHT; 1010 } 1011 if (new_size == 0) 1012 new_size = oldwin_height / 2; 1013 if (new_size > available - minheight - STATUS_HEIGHT) 1014 new_size = available - minheight - STATUS_HEIGHT; 1015 if (new_size < wmh1) 1016 new_size = wmh1; 1017 1018 // if it doesn't fit in the current window, need win_equal() 1019 if (oldwin_height - new_size - STATUS_HEIGHT < p_wmh) 1020 do_equal = TRUE; 1021 1022 // We don't like to take lines for the new window from a 1023 // 'winfixheight' window. Take them from a window above or below 1024 // instead, if possible. 1025 if (oldwin->w_p_wfh) 1026 { 1027 // Set w_fraction now so that the cursor keeps the same relative 1028 // vertical position using the old height. 1029 set_fraction(oldwin); 1030 did_set_fraction = TRUE; 1031 1032 win_setheight_win(oldwin->w_height + new_size + STATUS_HEIGHT, 1033 oldwin); 1034 oldwin_height = oldwin->w_height; 1035 if (need_status) 1036 oldwin_height -= STATUS_HEIGHT; 1037 } 1038 1039 // Only make all windows the same height if one of them (except oldwin) 1040 // is higher than one of the split windows. 1041 if (!do_equal && p_ea && size == 0 && *p_ead != 'h' 1042 && oldwin->w_frame->fr_parent != NULL) 1043 { 1044 frp = oldwin->w_frame->fr_parent->fr_child; 1045 while (frp != NULL) 1046 { 1047 if (frp->fr_win != oldwin && frp->fr_win != NULL 1048 && (frp->fr_win->w_height > new_size 1049 || frp->fr_win->w_height > oldwin_height - new_size 1050 - STATUS_HEIGHT)) 1051 { 1052 do_equal = TRUE; 1053 break; 1054 } 1055 frp = frp->fr_next; 1056 } 1057 } 1058 } 1059 1060 /* 1061 * allocate new window structure and link it in the window list 1062 */ 1063 if ((flags & WSP_TOP) == 0 1064 && ((flags & WSP_BOT) 1065 || (flags & WSP_BELOW) 1066 || (!(flags & WSP_ABOVE) 1067 && ( (flags & WSP_VERT) ? p_spr : p_sb)))) 1068 { 1069 // new window below/right of current one 1070 if (new_wp == NULL) 1071 wp = win_alloc(oldwin, FALSE); 1072 else 1073 win_append(oldwin, wp); 1074 } 1075 else 1076 { 1077 if (new_wp == NULL) 1078 wp = win_alloc(oldwin->w_prev, FALSE); 1079 else 1080 win_append(oldwin->w_prev, wp); 1081 } 1082 1083 if (new_wp == NULL) 1084 { 1085 if (wp == NULL) 1086 return FAIL; 1087 1088 new_frame(wp); 1089 if (wp->w_frame == NULL) 1090 { 1091 win_free(wp, NULL); 1092 return FAIL; 1093 } 1094 1095 // make the contents of the new window the same as the current one 1096 win_init(wp, curwin, flags); 1097 } 1098 1099 /* 1100 * Reorganise the tree of frames to insert the new window. 1101 */ 1102 if (flags & (WSP_TOP | WSP_BOT)) 1103 { 1104 if ((topframe->fr_layout == FR_COL && (flags & WSP_VERT) == 0) 1105 || (topframe->fr_layout == FR_ROW && (flags & WSP_VERT) != 0)) 1106 { 1107 curfrp = topframe->fr_child; 1108 if (flags & WSP_BOT) 1109 while (curfrp->fr_next != NULL) 1110 curfrp = curfrp->fr_next; 1111 } 1112 else 1113 curfrp = topframe; 1114 before = (flags & WSP_TOP); 1115 } 1116 else 1117 { 1118 curfrp = oldwin->w_frame; 1119 if (flags & WSP_BELOW) 1120 before = FALSE; 1121 else if (flags & WSP_ABOVE) 1122 before = TRUE; 1123 else if (flags & WSP_VERT) 1124 before = !p_spr; 1125 else 1126 before = !p_sb; 1127 } 1128 if (curfrp->fr_parent == NULL || curfrp->fr_parent->fr_layout != layout) 1129 { 1130 // Need to create a new frame in the tree to make a branch. 1131 frp = ALLOC_CLEAR_ONE(frame_T); 1132 *frp = *curfrp; 1133 curfrp->fr_layout = layout; 1134 frp->fr_parent = curfrp; 1135 frp->fr_next = NULL; 1136 frp->fr_prev = NULL; 1137 curfrp->fr_child = frp; 1138 curfrp->fr_win = NULL; 1139 curfrp = frp; 1140 if (frp->fr_win != NULL) 1141 oldwin->w_frame = frp; 1142 else 1143 FOR_ALL_FRAMES(frp, frp->fr_child) 1144 frp->fr_parent = curfrp; 1145 } 1146 1147 if (new_wp == NULL) 1148 frp = wp->w_frame; 1149 else 1150 frp = new_wp->w_frame; 1151 frp->fr_parent = curfrp->fr_parent; 1152 1153 // Insert the new frame at the right place in the frame list. 1154 if (before) 1155 frame_insert(curfrp, frp); 1156 else 1157 frame_append(curfrp, frp); 1158 1159 // Set w_fraction now so that the cursor keeps the same relative 1160 // vertical position. 1161 if (!did_set_fraction) 1162 set_fraction(oldwin); 1163 wp->w_fraction = oldwin->w_fraction; 1164 1165 if (flags & WSP_VERT) 1166 { 1167 wp->w_p_scr = curwin->w_p_scr; 1168 1169 if (need_status) 1170 { 1171 win_new_height(oldwin, oldwin->w_height - 1); 1172 oldwin->w_status_height = need_status; 1173 } 1174 if (flags & (WSP_TOP | WSP_BOT)) 1175 { 1176 // set height and row of new window to full height 1177 wp->w_winrow = tabline_height(); 1178 win_new_height(wp, curfrp->fr_height - (p_ls > 0) 1179 - WINBAR_HEIGHT(wp)); 1180 wp->w_status_height = (p_ls > 0); 1181 } 1182 else 1183 { 1184 // height and row of new window is same as current window 1185 wp->w_winrow = oldwin->w_winrow; 1186 win_new_height(wp, VISIBLE_HEIGHT(oldwin)); 1187 wp->w_status_height = oldwin->w_status_height; 1188 } 1189 frp->fr_height = curfrp->fr_height; 1190 1191 // "new_size" of the current window goes to the new window, use 1192 // one column for the vertical separator 1193 win_new_width(wp, new_size); 1194 if (before) 1195 wp->w_vsep_width = 1; 1196 else 1197 { 1198 wp->w_vsep_width = oldwin->w_vsep_width; 1199 oldwin->w_vsep_width = 1; 1200 } 1201 if (flags & (WSP_TOP | WSP_BOT)) 1202 { 1203 if (flags & WSP_BOT) 1204 frame_add_vsep(curfrp); 1205 // Set width of neighbor frame 1206 frame_new_width(curfrp, curfrp->fr_width 1207 - (new_size + ((flags & WSP_TOP) != 0)), flags & WSP_TOP, 1208 FALSE); 1209 } 1210 else 1211 win_new_width(oldwin, oldwin->w_width - (new_size + 1)); 1212 if (before) // new window left of current one 1213 { 1214 wp->w_wincol = oldwin->w_wincol; 1215 oldwin->w_wincol += new_size + 1; 1216 } 1217 else // new window right of current one 1218 wp->w_wincol = oldwin->w_wincol + oldwin->w_width + 1; 1219 frame_fix_width(oldwin); 1220 frame_fix_width(wp); 1221 } 1222 else 1223 { 1224 // width and column of new window is same as current window 1225 if (flags & (WSP_TOP | WSP_BOT)) 1226 { 1227 wp->w_wincol = 0; 1228 win_new_width(wp, Columns); 1229 wp->w_vsep_width = 0; 1230 } 1231 else 1232 { 1233 wp->w_wincol = oldwin->w_wincol; 1234 win_new_width(wp, oldwin->w_width); 1235 wp->w_vsep_width = oldwin->w_vsep_width; 1236 } 1237 frp->fr_width = curfrp->fr_width; 1238 1239 // "new_size" of the current window goes to the new window, use 1240 // one row for the status line 1241 win_new_height(wp, new_size); 1242 if (flags & (WSP_TOP | WSP_BOT)) 1243 { 1244 int new_fr_height = curfrp->fr_height - new_size 1245 + WINBAR_HEIGHT(wp) ; 1246 1247 if (!((flags & WSP_BOT) && p_ls == 0)) 1248 new_fr_height -= STATUS_HEIGHT; 1249 frame_new_height(curfrp, new_fr_height, flags & WSP_TOP, FALSE); 1250 } 1251 else 1252 win_new_height(oldwin, oldwin_height - (new_size + STATUS_HEIGHT)); 1253 if (before) // new window above current one 1254 { 1255 wp->w_winrow = oldwin->w_winrow; 1256 wp->w_status_height = STATUS_HEIGHT; 1257 oldwin->w_winrow += wp->w_height + STATUS_HEIGHT; 1258 } 1259 else // new window below current one 1260 { 1261 wp->w_winrow = oldwin->w_winrow + VISIBLE_HEIGHT(oldwin) 1262 + STATUS_HEIGHT; 1263 wp->w_status_height = oldwin->w_status_height; 1264 if (!(flags & WSP_BOT)) 1265 oldwin->w_status_height = STATUS_HEIGHT; 1266 } 1267 if (flags & WSP_BOT) 1268 frame_add_statusline(curfrp); 1269 frame_fix_height(wp); 1270 frame_fix_height(oldwin); 1271 } 1272 1273 if (flags & (WSP_TOP | WSP_BOT)) 1274 (void)win_comp_pos(); 1275 1276 /* 1277 * Both windows need redrawing 1278 */ 1279 redraw_win_later(wp, NOT_VALID); 1280 wp->w_redr_status = TRUE; 1281 redraw_win_later(oldwin, NOT_VALID); 1282 oldwin->w_redr_status = TRUE; 1283 1284 if (need_status) 1285 { 1286 msg_row = Rows - 1; 1287 msg_col = sc_col; 1288 msg_clr_eos_force(); // Old command/ruler may still be there 1289 comp_col(); 1290 msg_row = Rows - 1; 1291 msg_col = 0; // put position back at start of line 1292 } 1293 1294 /* 1295 * equalize the window sizes. 1296 */ 1297 if (do_equal || dir != 0) 1298 win_equal(wp, TRUE, 1299 (flags & WSP_VERT) ? (dir == 'v' ? 'b' : 'h') 1300 : dir == 'h' ? 'b' : 'v'); 1301 1302 // Don't change the window height/width to 'winheight' / 'winwidth' if a 1303 // size was given. 1304 if (flags & WSP_VERT) 1305 { 1306 i = p_wiw; 1307 if (size != 0) 1308 p_wiw = size; 1309 1310 # ifdef FEAT_GUI 1311 // When 'guioptions' includes 'L' or 'R' may have to add scrollbars. 1312 if (gui.in_use) 1313 gui_init_which_components(NULL); 1314 # endif 1315 } 1316 else 1317 { 1318 i = p_wh; 1319 if (size != 0) 1320 p_wh = size; 1321 } 1322 1323 #ifdef FEAT_JUMPLIST 1324 // Keep same changelist position in new window. 1325 wp->w_changelistidx = oldwin->w_changelistidx; 1326 #endif 1327 1328 /* 1329 * make the new window the current window 1330 */ 1331 win_enter_ext(wp, FALSE, FALSE, TRUE, TRUE, TRUE); 1332 if (flags & WSP_VERT) 1333 p_wiw = i; 1334 else 1335 p_wh = i; 1336 1337 return OK; 1338 } 1339 1340 1341 /* 1342 * Initialize window "newp" from window "oldp". 1343 * Used when splitting a window and when creating a new tab page. 1344 * The windows will both edit the same buffer. 1345 * WSP_NEWLOC may be specified in flags to prevent the location list from 1346 * being copied. 1347 */ 1348 static void 1349 win_init(win_T *newp, win_T *oldp, int flags UNUSED) 1350 { 1351 int i; 1352 1353 newp->w_buffer = oldp->w_buffer; 1354 #ifdef FEAT_SYN_HL 1355 newp->w_s = &(oldp->w_buffer->b_s); 1356 #endif 1357 oldp->w_buffer->b_nwindows++; 1358 newp->w_cursor = oldp->w_cursor; 1359 newp->w_valid = 0; 1360 newp->w_curswant = oldp->w_curswant; 1361 newp->w_set_curswant = oldp->w_set_curswant; 1362 newp->w_topline = oldp->w_topline; 1363 #ifdef FEAT_DIFF 1364 newp->w_topfill = oldp->w_topfill; 1365 #endif 1366 newp->w_leftcol = oldp->w_leftcol; 1367 newp->w_pcmark = oldp->w_pcmark; 1368 newp->w_prev_pcmark = oldp->w_prev_pcmark; 1369 newp->w_alt_fnum = oldp->w_alt_fnum; 1370 newp->w_wrow = oldp->w_wrow; 1371 newp->w_fraction = oldp->w_fraction; 1372 newp->w_prev_fraction_row = oldp->w_prev_fraction_row; 1373 #ifdef FEAT_JUMPLIST 1374 copy_jumplist(oldp, newp); 1375 #endif 1376 #ifdef FEAT_QUICKFIX 1377 if (flags & WSP_NEWLOC) 1378 { 1379 // Don't copy the location list. 1380 newp->w_llist = NULL; 1381 newp->w_llist_ref = NULL; 1382 } 1383 else 1384 copy_loclist_stack(oldp, newp); 1385 #endif 1386 newp->w_localdir = (oldp->w_localdir == NULL) 1387 ? NULL : vim_strsave(oldp->w_localdir); 1388 newp->w_prevdir = (oldp->w_prevdir == NULL) 1389 ? NULL : vim_strsave(oldp->w_prevdir); 1390 1391 // copy tagstack and folds 1392 for (i = 0; i < oldp->w_tagstacklen; i++) 1393 { 1394 taggy_T *tag = &newp->w_tagstack[i]; 1395 *tag = oldp->w_tagstack[i]; 1396 if (tag->tagname != NULL) 1397 tag->tagname = vim_strsave(tag->tagname); 1398 if (tag->user_data != NULL) 1399 tag->user_data = vim_strsave(tag->user_data); 1400 } 1401 newp->w_tagstackidx = oldp->w_tagstackidx; 1402 newp->w_tagstacklen = oldp->w_tagstacklen; 1403 #ifdef FEAT_FOLDING 1404 copyFoldingState(oldp, newp); 1405 #endif 1406 1407 win_init_some(newp, oldp); 1408 1409 #ifdef FEAT_SYN_HL 1410 check_colorcolumn(newp); 1411 #endif 1412 } 1413 1414 /* 1415 * Initialize window "newp" from window "old". 1416 * Only the essential things are copied. 1417 */ 1418 static void 1419 win_init_some(win_T *newp, win_T *oldp) 1420 { 1421 // Use the same argument list. 1422 newp->w_alist = oldp->w_alist; 1423 ++newp->w_alist->al_refcount; 1424 newp->w_arg_idx = oldp->w_arg_idx; 1425 1426 // copy options from existing window 1427 win_copy_options(oldp, newp); 1428 } 1429 1430 /* 1431 * Return TRUE if "win" is a global popup or a popup in the current tab page. 1432 */ 1433 int 1434 win_valid_popup(win_T *win UNUSED) 1435 { 1436 #ifdef FEAT_PROP_POPUP 1437 win_T *wp; 1438 1439 FOR_ALL_POPUPWINS(wp) 1440 if (wp == win) 1441 return TRUE; 1442 FOR_ALL_POPUPWINS_IN_TAB(curtab, wp) 1443 if (wp == win) 1444 return TRUE; 1445 #endif 1446 return FALSE; 1447 } 1448 1449 /* 1450 * Check if "win" is a pointer to an existing window in the current tab page. 1451 */ 1452 int 1453 win_valid(win_T *win) 1454 { 1455 win_T *wp; 1456 1457 if (win == NULL) 1458 return FALSE; 1459 FOR_ALL_WINDOWS(wp) 1460 if (wp == win) 1461 return TRUE; 1462 return win_valid_popup(win); 1463 } 1464 1465 /* 1466 * Check if "win" is a pointer to an existing window in any tab page. 1467 */ 1468 int 1469 win_valid_any_tab(win_T *win) 1470 { 1471 win_T *wp; 1472 tabpage_T *tp; 1473 1474 if (win == NULL) 1475 return FALSE; 1476 FOR_ALL_TABPAGES(tp) 1477 { 1478 FOR_ALL_WINDOWS_IN_TAB(tp, wp) 1479 { 1480 if (wp == win) 1481 return TRUE; 1482 } 1483 #ifdef FEAT_PROP_POPUP 1484 FOR_ALL_POPUPWINS_IN_TAB(tp, wp) 1485 if (wp == win) 1486 return TRUE; 1487 #endif 1488 } 1489 return win_valid_popup(win); 1490 } 1491 1492 /* 1493 * Return the number of windows. 1494 */ 1495 int 1496 win_count(void) 1497 { 1498 win_T *wp; 1499 int count = 0; 1500 1501 FOR_ALL_WINDOWS(wp) 1502 ++count; 1503 return count; 1504 } 1505 1506 /* 1507 * Make "count" windows on the screen. 1508 * Return actual number of windows on the screen. 1509 * Must be called when there is just one window, filling the whole screen 1510 * (excluding the command line). 1511 */ 1512 int 1513 make_windows( 1514 int count, 1515 int vertical UNUSED) // split windows vertically if TRUE 1516 { 1517 int maxcount; 1518 int todo; 1519 1520 if (vertical) 1521 { 1522 // Each windows needs at least 'winminwidth' lines and a separator 1523 // column. 1524 maxcount = (curwin->w_width + curwin->w_vsep_width 1525 - (p_wiw - p_wmw)) / (p_wmw + 1); 1526 } 1527 else 1528 { 1529 // Each window needs at least 'winminheight' lines and a status line. 1530 maxcount = (VISIBLE_HEIGHT(curwin) + curwin->w_status_height 1531 - (p_wh - p_wmh)) / (p_wmh + STATUS_HEIGHT); 1532 } 1533 1534 if (maxcount < 2) 1535 maxcount = 2; 1536 if (count > maxcount) 1537 count = maxcount; 1538 1539 /* 1540 * add status line now, otherwise first window will be too big 1541 */ 1542 if (count > 1) 1543 last_status(TRUE); 1544 1545 /* 1546 * Don't execute autocommands while creating the windows. Must do that 1547 * when putting the buffers in the windows. 1548 */ 1549 block_autocmds(); 1550 1551 // todo is number of windows left to create 1552 for (todo = count - 1; todo > 0; --todo) 1553 if (vertical) 1554 { 1555 if (win_split(curwin->w_width - (curwin->w_width - todo) 1556 / (todo + 1) - 1, WSP_VERT | WSP_ABOVE) == FAIL) 1557 break; 1558 } 1559 else 1560 { 1561 if (win_split(curwin->w_height - (curwin->w_height - todo 1562 * STATUS_HEIGHT) / (todo + 1) 1563 - STATUS_HEIGHT, WSP_ABOVE) == FAIL) 1564 break; 1565 } 1566 1567 unblock_autocmds(); 1568 1569 // return actual number of windows 1570 return (count - todo); 1571 } 1572 1573 /* 1574 * Exchange current and next window 1575 */ 1576 static void 1577 win_exchange(long Prenum) 1578 { 1579 frame_T *frp; 1580 frame_T *frp2; 1581 win_T *wp; 1582 win_T *wp2; 1583 int temp; 1584 1585 if (ERROR_IF_ANY_POPUP_WINDOW) 1586 return; 1587 if (ONE_WINDOW) // just one window 1588 { 1589 beep_flush(); 1590 return; 1591 } 1592 1593 #ifdef FEAT_GUI 1594 need_mouse_correct = TRUE; 1595 #endif 1596 1597 /* 1598 * find window to exchange with 1599 */ 1600 if (Prenum) 1601 { 1602 frp = curwin->w_frame->fr_parent->fr_child; 1603 while (frp != NULL && --Prenum > 0) 1604 frp = frp->fr_next; 1605 } 1606 else if (curwin->w_frame->fr_next != NULL) // Swap with next 1607 frp = curwin->w_frame->fr_next; 1608 else // Swap last window in row/col with previous 1609 frp = curwin->w_frame->fr_prev; 1610 1611 // We can only exchange a window with another window, not with a frame 1612 // containing windows. 1613 if (frp == NULL || frp->fr_win == NULL || frp->fr_win == curwin) 1614 return; 1615 wp = frp->fr_win; 1616 1617 /* 1618 * 1. remove curwin from the list. Remember after which window it was in wp2 1619 * 2. insert curwin before wp in the list 1620 * if wp != wp2 1621 * 3. remove wp from the list 1622 * 4. insert wp after wp2 1623 * 5. exchange the status line height and vsep width. 1624 */ 1625 wp2 = curwin->w_prev; 1626 frp2 = curwin->w_frame->fr_prev; 1627 if (wp->w_prev != curwin) 1628 { 1629 win_remove(curwin, NULL); 1630 frame_remove(curwin->w_frame); 1631 win_append(wp->w_prev, curwin); 1632 frame_insert(frp, curwin->w_frame); 1633 } 1634 if (wp != wp2) 1635 { 1636 win_remove(wp, NULL); 1637 frame_remove(wp->w_frame); 1638 win_append(wp2, wp); 1639 if (frp2 == NULL) 1640 frame_insert(wp->w_frame->fr_parent->fr_child, wp->w_frame); 1641 else 1642 frame_append(frp2, wp->w_frame); 1643 } 1644 temp = curwin->w_status_height; 1645 curwin->w_status_height = wp->w_status_height; 1646 wp->w_status_height = temp; 1647 temp = curwin->w_vsep_width; 1648 curwin->w_vsep_width = wp->w_vsep_width; 1649 wp->w_vsep_width = temp; 1650 1651 // If the windows are not in the same frame, exchange the sizes to avoid 1652 // messing up the window layout. Otherwise fix the frame sizes. 1653 if (curwin->w_frame->fr_parent != wp->w_frame->fr_parent) 1654 { 1655 temp = curwin->w_height; 1656 curwin->w_height = wp->w_height; 1657 wp->w_height = temp; 1658 temp = curwin->w_width; 1659 curwin->w_width = wp->w_width; 1660 wp->w_width = temp; 1661 } 1662 else 1663 { 1664 frame_fix_height(curwin); 1665 frame_fix_height(wp); 1666 frame_fix_width(curwin); 1667 frame_fix_width(wp); 1668 } 1669 1670 (void)win_comp_pos(); // recompute window positions 1671 1672 win_enter(wp, TRUE); 1673 redraw_all_later(NOT_VALID); 1674 } 1675 1676 /* 1677 * rotate windows: if upwards TRUE the second window becomes the first one 1678 * if upwards FALSE the first window becomes the second one 1679 */ 1680 static void 1681 win_rotate(int upwards, int count) 1682 { 1683 win_T *wp1; 1684 win_T *wp2; 1685 frame_T *frp; 1686 int n; 1687 1688 if (ONE_WINDOW) // nothing to do 1689 { 1690 beep_flush(); 1691 return; 1692 } 1693 1694 #ifdef FEAT_GUI 1695 need_mouse_correct = TRUE; 1696 #endif 1697 1698 // Check if all frames in this row/col have one window. 1699 FOR_ALL_FRAMES(frp, curwin->w_frame->fr_parent->fr_child) 1700 if (frp->fr_win == NULL) 1701 { 1702 emsg(_("E443: Cannot rotate when another window is split")); 1703 return; 1704 } 1705 1706 while (count--) 1707 { 1708 if (upwards) // first window becomes last window 1709 { 1710 // remove first window/frame from the list 1711 frp = curwin->w_frame->fr_parent->fr_child; 1712 wp1 = frp->fr_win; 1713 win_remove(wp1, NULL); 1714 frame_remove(frp); 1715 1716 // find last frame and append removed window/frame after it 1717 for ( ; frp->fr_next != NULL; frp = frp->fr_next) 1718 ; 1719 win_append(frp->fr_win, wp1); 1720 frame_append(frp, wp1->w_frame); 1721 1722 wp2 = frp->fr_win; // previously last window 1723 } 1724 else // last window becomes first window 1725 { 1726 // find last window/frame in the list and remove it 1727 for (frp = curwin->w_frame; frp->fr_next != NULL; 1728 frp = frp->fr_next) 1729 ; 1730 wp1 = frp->fr_win; 1731 wp2 = wp1->w_prev; // will become last window 1732 win_remove(wp1, NULL); 1733 frame_remove(frp); 1734 1735 // append the removed window/frame before the first in the list 1736 win_append(frp->fr_parent->fr_child->fr_win->w_prev, wp1); 1737 frame_insert(frp->fr_parent->fr_child, frp); 1738 } 1739 1740 // exchange status height and vsep width of old and new last window 1741 n = wp2->w_status_height; 1742 wp2->w_status_height = wp1->w_status_height; 1743 wp1->w_status_height = n; 1744 frame_fix_height(wp1); 1745 frame_fix_height(wp2); 1746 n = wp2->w_vsep_width; 1747 wp2->w_vsep_width = wp1->w_vsep_width; 1748 wp1->w_vsep_width = n; 1749 frame_fix_width(wp1); 1750 frame_fix_width(wp2); 1751 1752 // recompute w_winrow and w_wincol for all windows 1753 (void)win_comp_pos(); 1754 } 1755 1756 redraw_all_later(NOT_VALID); 1757 } 1758 1759 /* 1760 * Move the current window to the very top/bottom/left/right of the screen. 1761 */ 1762 static void 1763 win_totop(int size, int flags) 1764 { 1765 int dir; 1766 int height = curwin->w_height; 1767 1768 if (ONE_WINDOW) 1769 { 1770 beep_flush(); 1771 return; 1772 } 1773 if (check_split_disallowed() == FAIL) 1774 return; 1775 1776 // Remove the window and frame from the tree of frames. 1777 (void)winframe_remove(curwin, &dir, NULL); 1778 win_remove(curwin, NULL); 1779 last_status(FALSE); // may need to remove last status line 1780 (void)win_comp_pos(); // recompute window positions 1781 1782 // Split a window on the desired side and put the window there. 1783 (void)win_split_ins(size, flags, curwin, dir); 1784 if (!(flags & WSP_VERT)) 1785 { 1786 win_setheight(height); 1787 if (p_ea) 1788 win_equal(curwin, TRUE, 'v'); 1789 } 1790 1791 #if defined(FEAT_GUI) 1792 // When 'guioptions' includes 'L' or 'R' may have to remove or add 1793 // scrollbars. Have to update them anyway. 1794 gui_may_update_scrollbars(); 1795 #endif 1796 } 1797 1798 /* 1799 * Move window "win1" to below/right of "win2" and make "win1" the current 1800 * window. Only works within the same frame! 1801 */ 1802 void 1803 win_move_after(win_T *win1, win_T *win2) 1804 { 1805 int height; 1806 1807 // check if the arguments are reasonable 1808 if (win1 == win2) 1809 return; 1810 1811 // check if there is something to do 1812 if (win2->w_next != win1) 1813 { 1814 if (win1->w_frame->fr_parent != win2->w_frame->fr_parent) 1815 { 1816 iemsg("INTERNAL: trying to move a window into another frame"); 1817 return; 1818 } 1819 1820 // may need to move the status line/vertical separator of the last 1821 // window 1822 if (win1 == lastwin) 1823 { 1824 height = win1->w_prev->w_status_height; 1825 win1->w_prev->w_status_height = win1->w_status_height; 1826 win1->w_status_height = height; 1827 if (win1->w_prev->w_vsep_width == 1) 1828 { 1829 // Remove the vertical separator from the last-but-one window, 1830 // add it to the last window. Adjust the frame widths. 1831 win1->w_prev->w_vsep_width = 0; 1832 win1->w_prev->w_frame->fr_width -= 1; 1833 win1->w_vsep_width = 1; 1834 win1->w_frame->fr_width += 1; 1835 } 1836 } 1837 else if (win2 == lastwin) 1838 { 1839 height = win1->w_status_height; 1840 win1->w_status_height = win2->w_status_height; 1841 win2->w_status_height = height; 1842 if (win1->w_vsep_width == 1) 1843 { 1844 // Remove the vertical separator from win1, add it to the last 1845 // window, win2. Adjust the frame widths. 1846 win2->w_vsep_width = 1; 1847 win2->w_frame->fr_width += 1; 1848 win1->w_vsep_width = 0; 1849 win1->w_frame->fr_width -= 1; 1850 } 1851 } 1852 win_remove(win1, NULL); 1853 frame_remove(win1->w_frame); 1854 win_append(win2, win1); 1855 frame_append(win2->w_frame, win1->w_frame); 1856 1857 (void)win_comp_pos(); // recompute w_winrow for all windows 1858 redraw_later(NOT_VALID); 1859 } 1860 win_enter(win1, FALSE); 1861 } 1862 1863 /* 1864 * Make all windows the same height. 1865 * 'next_curwin' will soon be the current window, make sure it has enough 1866 * rows. 1867 */ 1868 void 1869 win_equal( 1870 win_T *next_curwin, // pointer to current window to be or NULL 1871 int current, // do only frame with current window 1872 int dir) // 'v' for vertically, 'h' for horizontally, 1873 // 'b' for both, 0 for using p_ead 1874 { 1875 if (dir == 0) 1876 dir = *p_ead; 1877 win_equal_rec(next_curwin == NULL ? curwin : next_curwin, current, 1878 topframe, dir, 0, tabline_height(), 1879 (int)Columns, topframe->fr_height); 1880 } 1881 1882 /* 1883 * Set a frame to a new position and height, spreading the available room 1884 * equally over contained frames. 1885 * The window "next_curwin" (if not NULL) should at least get the size from 1886 * 'winheight' and 'winwidth' if possible. 1887 */ 1888 static void 1889 win_equal_rec( 1890 win_T *next_curwin, // pointer to current window to be or NULL 1891 int current, // do only frame with current window 1892 frame_T *topfr, // frame to set size off 1893 int dir, // 'v', 'h' or 'b', see win_equal() 1894 int col, // horizontal position for frame 1895 int row, // vertical position for frame 1896 int width, // new width of frame 1897 int height) // new height of frame 1898 { 1899 int n, m; 1900 int extra_sep = 0; 1901 int wincount, totwincount = 0; 1902 frame_T *fr; 1903 int next_curwin_size = 0; 1904 int room = 0; 1905 int new_size; 1906 int has_next_curwin = 0; 1907 int hnc; 1908 1909 if (topfr->fr_layout == FR_LEAF) 1910 { 1911 // Set the width/height of this frame. 1912 // Redraw when size or position changes 1913 if (topfr->fr_height != height || topfr->fr_win->w_winrow != row 1914 || topfr->fr_width != width || topfr->fr_win->w_wincol != col 1915 ) 1916 { 1917 topfr->fr_win->w_winrow = row; 1918 frame_new_height(topfr, height, FALSE, FALSE); 1919 topfr->fr_win->w_wincol = col; 1920 frame_new_width(topfr, width, FALSE, FALSE); 1921 redraw_all_later(NOT_VALID); 1922 } 1923 } 1924 else if (topfr->fr_layout == FR_ROW) 1925 { 1926 topfr->fr_width = width; 1927 topfr->fr_height = height; 1928 1929 if (dir != 'v') // equalize frame widths 1930 { 1931 // Compute the maximum number of windows horizontally in this 1932 // frame. 1933 n = frame_minwidth(topfr, NOWIN); 1934 // add one for the rightmost window, it doesn't have a separator 1935 if (col + width == Columns) 1936 extra_sep = 1; 1937 else 1938 extra_sep = 0; 1939 totwincount = (n + extra_sep) / (p_wmw + 1); 1940 has_next_curwin = frame_has_win(topfr, next_curwin); 1941 1942 /* 1943 * Compute width for "next_curwin" window and room available for 1944 * other windows. 1945 * "m" is the minimal width when counting p_wiw for "next_curwin". 1946 */ 1947 m = frame_minwidth(topfr, next_curwin); 1948 room = width - m; 1949 if (room < 0) 1950 { 1951 next_curwin_size = p_wiw + room; 1952 room = 0; 1953 } 1954 else 1955 { 1956 next_curwin_size = -1; 1957 FOR_ALL_FRAMES(fr, topfr->fr_child) 1958 { 1959 // If 'winfixwidth' set keep the window width if 1960 // possible. 1961 // Watch out for this window being the next_curwin. 1962 if (frame_fixed_width(fr)) 1963 { 1964 n = frame_minwidth(fr, NOWIN); 1965 new_size = fr->fr_width; 1966 if (frame_has_win(fr, next_curwin)) 1967 { 1968 room += p_wiw - p_wmw; 1969 next_curwin_size = 0; 1970 if (new_size < p_wiw) 1971 new_size = p_wiw; 1972 } 1973 else 1974 // These windows don't use up room. 1975 totwincount -= (n + (fr->fr_next == NULL 1976 ? extra_sep : 0)) / (p_wmw + 1); 1977 room -= new_size - n; 1978 if (room < 0) 1979 { 1980 new_size += room; 1981 room = 0; 1982 } 1983 fr->fr_newwidth = new_size; 1984 } 1985 } 1986 if (next_curwin_size == -1) 1987 { 1988 if (!has_next_curwin) 1989 next_curwin_size = 0; 1990 else if (totwincount > 1 1991 && (room + (totwincount - 2)) 1992 / (totwincount - 1) > p_wiw) 1993 { 1994 // Can make all windows wider than 'winwidth', spread 1995 // the room equally. 1996 next_curwin_size = (room + p_wiw 1997 + (totwincount - 1) * p_wmw 1998 + (totwincount - 1)) / totwincount; 1999 room -= next_curwin_size - p_wiw; 2000 } 2001 else 2002 next_curwin_size = p_wiw; 2003 } 2004 } 2005 2006 if (has_next_curwin) 2007 --totwincount; // don't count curwin 2008 } 2009 2010 FOR_ALL_FRAMES(fr, topfr->fr_child) 2011 { 2012 wincount = 1; 2013 if (fr->fr_next == NULL) 2014 // last frame gets all that remains (avoid roundoff error) 2015 new_size = width; 2016 else if (dir == 'v') 2017 new_size = fr->fr_width; 2018 else if (frame_fixed_width(fr)) 2019 { 2020 new_size = fr->fr_newwidth; 2021 wincount = 0; // doesn't count as a sizeable window 2022 } 2023 else 2024 { 2025 // Compute the maximum number of windows horiz. in "fr". 2026 n = frame_minwidth(fr, NOWIN); 2027 wincount = (n + (fr->fr_next == NULL ? extra_sep : 0)) 2028 / (p_wmw + 1); 2029 m = frame_minwidth(fr, next_curwin); 2030 if (has_next_curwin) 2031 hnc = frame_has_win(fr, next_curwin); 2032 else 2033 hnc = FALSE; 2034 if (hnc) // don't count next_curwin 2035 --wincount; 2036 if (totwincount == 0) 2037 new_size = room; 2038 else 2039 new_size = (wincount * room + ((unsigned)totwincount >> 1)) 2040 / totwincount; 2041 if (hnc) // add next_curwin size 2042 { 2043 next_curwin_size -= p_wiw - (m - n); 2044 new_size += next_curwin_size; 2045 room -= new_size - next_curwin_size; 2046 } 2047 else 2048 room -= new_size; 2049 new_size += n; 2050 } 2051 2052 // Skip frame that is full width when splitting or closing a 2053 // window, unless equalizing all frames. 2054 if (!current || dir != 'v' || topfr->fr_parent != NULL 2055 || (new_size != fr->fr_width) 2056 || frame_has_win(fr, next_curwin)) 2057 win_equal_rec(next_curwin, current, fr, dir, col, row, 2058 new_size, height); 2059 col += new_size; 2060 width -= new_size; 2061 totwincount -= wincount; 2062 } 2063 } 2064 else // topfr->fr_layout == FR_COL 2065 { 2066 topfr->fr_width = width; 2067 topfr->fr_height = height; 2068 2069 if (dir != 'h') // equalize frame heights 2070 { 2071 // Compute maximum number of windows vertically in this frame. 2072 n = frame_minheight(topfr, NOWIN); 2073 // add one for the bottom window if it doesn't have a statusline 2074 if (row + height == cmdline_row && p_ls == 0) 2075 extra_sep = 1; 2076 else 2077 extra_sep = 0; 2078 totwincount = (n + extra_sep) / (p_wmh + 1); 2079 has_next_curwin = frame_has_win(topfr, next_curwin); 2080 2081 /* 2082 * Compute height for "next_curwin" window and room available for 2083 * other windows. 2084 * "m" is the minimal height when counting p_wh for "next_curwin". 2085 */ 2086 m = frame_minheight(topfr, next_curwin); 2087 room = height - m; 2088 if (room < 0) 2089 { 2090 // The room is less then 'winheight', use all space for the 2091 // current window. 2092 next_curwin_size = p_wh + room; 2093 room = 0; 2094 } 2095 else 2096 { 2097 next_curwin_size = -1; 2098 FOR_ALL_FRAMES(fr, topfr->fr_child) 2099 { 2100 // If 'winfixheight' set keep the window height if 2101 // possible. 2102 // Watch out for this window being the next_curwin. 2103 if (frame_fixed_height(fr)) 2104 { 2105 n = frame_minheight(fr, NOWIN); 2106 new_size = fr->fr_height; 2107 if (frame_has_win(fr, next_curwin)) 2108 { 2109 room += p_wh - p_wmh; 2110 next_curwin_size = 0; 2111 if (new_size < p_wh) 2112 new_size = p_wh; 2113 } 2114 else 2115 // These windows don't use up room. 2116 totwincount -= (n + (fr->fr_next == NULL 2117 ? extra_sep : 0)) / (p_wmh + 1); 2118 room -= new_size - n; 2119 if (room < 0) 2120 { 2121 new_size += room; 2122 room = 0; 2123 } 2124 fr->fr_newheight = new_size; 2125 } 2126 } 2127 if (next_curwin_size == -1) 2128 { 2129 if (!has_next_curwin) 2130 next_curwin_size = 0; 2131 else if (totwincount > 1 2132 && (room + (totwincount - 2)) 2133 / (totwincount - 1) > p_wh) 2134 { 2135 // can make all windows higher than 'winheight', 2136 // spread the room equally. 2137 next_curwin_size = (room + p_wh 2138 + (totwincount - 1) * p_wmh 2139 + (totwincount - 1)) / totwincount; 2140 room -= next_curwin_size - p_wh; 2141 } 2142 else 2143 next_curwin_size = p_wh; 2144 } 2145 } 2146 2147 if (has_next_curwin) 2148 --totwincount; // don't count curwin 2149 } 2150 2151 FOR_ALL_FRAMES(fr, topfr->fr_child) 2152 { 2153 wincount = 1; 2154 if (fr->fr_next == NULL) 2155 // last frame gets all that remains (avoid roundoff error) 2156 new_size = height; 2157 else if (dir == 'h') 2158 new_size = fr->fr_height; 2159 else if (frame_fixed_height(fr)) 2160 { 2161 new_size = fr->fr_newheight; 2162 wincount = 0; // doesn't count as a sizeable window 2163 } 2164 else 2165 { 2166 // Compute the maximum number of windows vert. in "fr". 2167 n = frame_minheight(fr, NOWIN); 2168 wincount = (n + (fr->fr_next == NULL ? extra_sep : 0)) 2169 / (p_wmh + 1); 2170 m = frame_minheight(fr, next_curwin); 2171 if (has_next_curwin) 2172 hnc = frame_has_win(fr, next_curwin); 2173 else 2174 hnc = FALSE; 2175 if (hnc) // don't count next_curwin 2176 --wincount; 2177 if (totwincount == 0) 2178 new_size = room; 2179 else 2180 new_size = (wincount * room + ((unsigned)totwincount >> 1)) 2181 / totwincount; 2182 if (hnc) // add next_curwin size 2183 { 2184 next_curwin_size -= p_wh - (m - n); 2185 new_size += next_curwin_size; 2186 room -= new_size - next_curwin_size; 2187 } 2188 else 2189 room -= new_size; 2190 new_size += n; 2191 } 2192 // Skip frame that is full width when splitting or closing a 2193 // window, unless equalizing all frames. 2194 if (!current || dir != 'h' || topfr->fr_parent != NULL 2195 || (new_size != fr->fr_height) 2196 || frame_has_win(fr, next_curwin)) 2197 win_equal_rec(next_curwin, current, fr, dir, col, row, 2198 width, new_size); 2199 row += new_size; 2200 height -= new_size; 2201 totwincount -= wincount; 2202 } 2203 } 2204 } 2205 2206 #ifdef FEAT_JOB_CHANNEL 2207 static void 2208 leaving_window(win_T *win) 2209 { 2210 // Only matters for a prompt window. 2211 if (!bt_prompt(win->w_buffer)) 2212 return; 2213 2214 // When leaving a prompt window stop Insert mode and perhaps restart 2215 // it when entering that window again. 2216 win->w_buffer->b_prompt_insert = restart_edit; 2217 if (restart_edit != 0 && mode_displayed) 2218 clear_cmdline = TRUE; // unshow mode later 2219 restart_edit = NUL; 2220 2221 // When leaving the window (or closing the window) was done from a 2222 // callback we need to break out of the Insert mode loop and restart Insert 2223 // mode when entering the window again. 2224 if (State & INSERT) 2225 { 2226 stop_insert_mode = TRUE; 2227 if (win->w_buffer->b_prompt_insert == NUL) 2228 win->w_buffer->b_prompt_insert = 'A'; 2229 } 2230 } 2231 2232 static void 2233 entering_window(win_T *win) 2234 { 2235 // Only matters for a prompt window. 2236 if (!bt_prompt(win->w_buffer)) 2237 return; 2238 2239 // When switching to a prompt buffer that was in Insert mode, don't stop 2240 // Insert mode, it may have been set in leaving_window(). 2241 if (win->w_buffer->b_prompt_insert != NUL) 2242 stop_insert_mode = FALSE; 2243 2244 // When entering the prompt window restart Insert mode if we were in Insert 2245 // mode when we left it. 2246 restart_edit = win->w_buffer->b_prompt_insert; 2247 } 2248 #endif 2249 2250 /* 2251 * Close all windows for buffer "buf". 2252 */ 2253 void 2254 close_windows( 2255 buf_T *buf, 2256 int keep_curwin) // don't close "curwin" 2257 { 2258 win_T *wp; 2259 tabpage_T *tp, *nexttp; 2260 int h = tabline_height(); 2261 int count = tabpage_index(NULL); 2262 2263 ++RedrawingDisabled; 2264 2265 for (wp = firstwin; wp != NULL && !ONE_WINDOW; ) 2266 { 2267 if (wp->w_buffer == buf && (!keep_curwin || wp != curwin) 2268 && !(wp->w_closing || wp->w_buffer->b_locked > 0)) 2269 { 2270 if (win_close(wp, FALSE) == FAIL) 2271 // If closing the window fails give up, to avoid looping 2272 // forever. 2273 break; 2274 2275 // Start all over, autocommands may change the window layout. 2276 wp = firstwin; 2277 } 2278 else 2279 wp = wp->w_next; 2280 } 2281 2282 // Also check windows in other tab pages. 2283 for (tp = first_tabpage; tp != NULL; tp = nexttp) 2284 { 2285 nexttp = tp->tp_next; 2286 if (tp != curtab) 2287 FOR_ALL_WINDOWS_IN_TAB(tp, wp) 2288 if (wp->w_buffer == buf 2289 && !(wp->w_closing || wp->w_buffer->b_locked > 0)) 2290 { 2291 win_close_othertab(wp, FALSE, tp); 2292 2293 // Start all over, the tab page may be closed and 2294 // autocommands may change the window layout. 2295 nexttp = first_tabpage; 2296 break; 2297 } 2298 } 2299 2300 --RedrawingDisabled; 2301 2302 if (count != tabpage_index(NULL)) 2303 apply_autocmds(EVENT_TABCLOSED, NULL, NULL, FALSE, curbuf); 2304 2305 redraw_tabline = TRUE; 2306 if (h != tabline_height()) 2307 shell_new_rows(); 2308 } 2309 2310 /* 2311 * Return TRUE if the current window is the only window that exists (ignoring 2312 * "aucmd_win"). 2313 * Returns FALSE if there is a window, possibly in another tab page. 2314 */ 2315 static int 2316 last_window(void) 2317 { 2318 return (one_window() && first_tabpage->tp_next == NULL); 2319 } 2320 2321 /* 2322 * Return TRUE if there is only one window other than "aucmd_win" in the 2323 * current tab page. 2324 */ 2325 int 2326 one_window(void) 2327 { 2328 win_T *wp; 2329 int seen_one = FALSE; 2330 2331 FOR_ALL_WINDOWS(wp) 2332 { 2333 if (wp != aucmd_win) 2334 { 2335 if (seen_one) 2336 return FALSE; 2337 seen_one = TRUE; 2338 } 2339 } 2340 return TRUE; 2341 } 2342 2343 /* 2344 * Close the possibly last window in a tab page. 2345 * Returns TRUE when the window was closed already. 2346 */ 2347 static int 2348 close_last_window_tabpage( 2349 win_T *win, 2350 int free_buf, 2351 tabpage_T *prev_curtab) 2352 { 2353 if (ONE_WINDOW) 2354 { 2355 buf_T *old_curbuf = curbuf; 2356 2357 /* 2358 * Closing the last window in a tab page. First go to another tab 2359 * page and then close the window and the tab page. This avoids that 2360 * curwin and curtab are invalid while we are freeing memory, they may 2361 * be used in GUI events. 2362 * Don't trigger autocommands yet, they may use wrong values, so do 2363 * that below. 2364 */ 2365 goto_tabpage_tp(alt_tabpage(), FALSE, TRUE); 2366 redraw_tabline = TRUE; 2367 2368 // Safety check: Autocommands may have closed the window when jumping 2369 // to the other tab page. 2370 if (valid_tabpage(prev_curtab) && prev_curtab->tp_firstwin == win) 2371 { 2372 int h = tabline_height(); 2373 2374 win_close_othertab(win, free_buf, prev_curtab); 2375 if (h != tabline_height()) 2376 shell_new_rows(); 2377 } 2378 #ifdef FEAT_JOB_CHANNEL 2379 entering_window(curwin); 2380 #endif 2381 // Since goto_tabpage_tp above did not trigger *Enter autocommands, do 2382 // that now. 2383 apply_autocmds(EVENT_TABCLOSED, NULL, NULL, FALSE, curbuf); 2384 apply_autocmds(EVENT_WINENTER, NULL, NULL, FALSE, curbuf); 2385 apply_autocmds(EVENT_TABENTER, NULL, NULL, FALSE, curbuf); 2386 if (old_curbuf != curbuf) 2387 apply_autocmds(EVENT_BUFENTER, NULL, NULL, FALSE, curbuf); 2388 return TRUE; 2389 } 2390 return FALSE; 2391 } 2392 2393 /* 2394 * Close the buffer of "win" and unload it if "action" is DOBUF_UNLOAD. 2395 * "action" can also be zero (do nothing) or DOBUF_WIPE. 2396 * "abort_if_last" is passed to close_buffer(): abort closing if all other 2397 * windows are closed. 2398 */ 2399 static void 2400 win_close_buffer(win_T *win, int action, int abort_if_last) 2401 { 2402 #ifdef FEAT_SYN_HL 2403 // Free independent synblock before the buffer is freed. 2404 if (win->w_buffer != NULL) 2405 reset_synblock(win); 2406 #endif 2407 2408 #ifdef FEAT_QUICKFIX 2409 // When the quickfix/location list window is closed, unlist the buffer. 2410 if (win->w_buffer != NULL && bt_quickfix(win->w_buffer)) 2411 win->w_buffer->b_p_bl = FALSE; 2412 #endif 2413 2414 // Close the link to the buffer. 2415 if (win->w_buffer != NULL) 2416 { 2417 bufref_T bufref; 2418 2419 set_bufref(&bufref, curbuf); 2420 win->w_closing = TRUE; 2421 close_buffer(win, win->w_buffer, action, abort_if_last, FALSE); 2422 if (win_valid_any_tab(win)) 2423 win->w_closing = FALSE; 2424 // Make sure curbuf is valid. It can become invalid if 'bufhidden' is 2425 // "wipe". 2426 if (!bufref_valid(&bufref)) 2427 curbuf = firstbuf; 2428 } 2429 } 2430 2431 /* 2432 * Close window "win". Only works for the current tab page. 2433 * If "free_buf" is TRUE related buffer may be unloaded. 2434 * 2435 * Called by :quit, :close, :xit, :wq and findtag(). 2436 * Returns FAIL when the window was not closed. 2437 */ 2438 int 2439 win_close(win_T *win, int free_buf) 2440 { 2441 win_T *wp; 2442 int other_buffer = FALSE; 2443 int close_curwin = FALSE; 2444 int dir; 2445 int help_window = FALSE; 2446 tabpage_T *prev_curtab = curtab; 2447 frame_T *win_frame = win->w_frame->fr_parent; 2448 #ifdef FEAT_DIFF 2449 int had_diffmode = win->w_p_diff; 2450 #endif 2451 2452 #if defined(FEAT_TERMINAL) && defined(FEAT_PROP_POPUP) 2453 // Can close a popup window with a terminal if the job has finished. 2454 if (may_close_term_popup() == OK) 2455 return OK; 2456 #endif 2457 if (ERROR_IF_ANY_POPUP_WINDOW) 2458 return FAIL; 2459 2460 if (last_window()) 2461 { 2462 emsg(_("E444: Cannot close last window")); 2463 return FAIL; 2464 } 2465 2466 if (win->w_closing || (win->w_buffer != NULL 2467 && win->w_buffer->b_locked > 0)) 2468 return FAIL; // window is already being closed 2469 if (win_unlisted(win)) 2470 { 2471 emsg(_(e_autocmd_close)); 2472 return FAIL; 2473 } 2474 if ((firstwin == aucmd_win || lastwin == aucmd_win) && one_window()) 2475 { 2476 emsg(_("E814: Cannot close window, only autocmd window would remain")); 2477 return FAIL; 2478 } 2479 2480 // When closing the last window in a tab page first go to another tab page 2481 // and then close the window and the tab page to avoid that curwin and 2482 // curtab are invalid while we are freeing memory. 2483 if (close_last_window_tabpage(win, free_buf, prev_curtab)) 2484 return FAIL; 2485 2486 // When closing the help window, try restoring a snapshot after closing 2487 // the window. Otherwise clear the snapshot, it's now invalid. 2488 if (bt_help(win->w_buffer)) 2489 help_window = TRUE; 2490 else 2491 clear_snapshot(curtab, SNAP_HELP_IDX); 2492 2493 if (win == curwin) 2494 { 2495 #ifdef FEAT_JOB_CHANNEL 2496 leaving_window(curwin); 2497 #endif 2498 /* 2499 * Guess which window is going to be the new current window. 2500 * This may change because of the autocommands (sigh). 2501 */ 2502 wp = frame2win(win_altframe(win, NULL)); 2503 2504 /* 2505 * Be careful: If autocommands delete the window or cause this window 2506 * to be the last one left, return now. 2507 */ 2508 if (wp->w_buffer != curbuf) 2509 { 2510 other_buffer = TRUE; 2511 win->w_closing = TRUE; 2512 apply_autocmds(EVENT_BUFLEAVE, NULL, NULL, FALSE, curbuf); 2513 if (!win_valid(win)) 2514 return FAIL; 2515 win->w_closing = FALSE; 2516 if (last_window()) 2517 return FAIL; 2518 } 2519 win->w_closing = TRUE; 2520 apply_autocmds(EVENT_WINLEAVE, NULL, NULL, FALSE, curbuf); 2521 if (!win_valid(win)) 2522 return FAIL; 2523 win->w_closing = FALSE; 2524 if (last_window()) 2525 return FAIL; 2526 #ifdef FEAT_EVAL 2527 // autocmds may abort script processing 2528 if (aborting()) 2529 return FAIL; 2530 #endif 2531 } 2532 2533 #ifdef FEAT_GUI 2534 // Avoid trouble with scrollbars that are going to be deleted in 2535 // win_free(). 2536 if (gui.in_use) 2537 out_flush(); 2538 #endif 2539 2540 #ifdef FEAT_PROP_POPUP 2541 if (popup_win_closed(win) && !win_valid(win)) 2542 return FAIL; 2543 #endif 2544 win_close_buffer(win, free_buf ? DOBUF_UNLOAD : 0, TRUE); 2545 2546 if (only_one_window() && win_valid(win) && win->w_buffer == NULL 2547 && (last_window() || curtab != prev_curtab 2548 || close_last_window_tabpage(win, free_buf, prev_curtab))) 2549 { 2550 // Autocommands have closed all windows, quit now. Restore 2551 // curwin->w_buffer, otherwise writing viminfo may fail. 2552 if (curwin->w_buffer == NULL) 2553 curwin->w_buffer = curbuf; 2554 getout(0); 2555 } 2556 2557 // Autocommands may have moved to another tab page. 2558 if (curtab != prev_curtab && win_valid_any_tab(win) 2559 && win->w_buffer == NULL) 2560 { 2561 // Need to close the window anyway, since the buffer is NULL. 2562 win_close_othertab(win, FALSE, prev_curtab); 2563 return FAIL; 2564 } 2565 2566 // Autocommands may have closed the window already or closed the only 2567 // other window. 2568 if (!win_valid(win) || last_window() 2569 || close_last_window_tabpage(win, free_buf, prev_curtab)) 2570 return FAIL; 2571 2572 // Now we are really going to close the window. Disallow any autocommand 2573 // to split a window to avoid trouble. 2574 ++split_disallowed; 2575 2576 // Free the memory used for the window and get the window that received 2577 // the screen space. 2578 wp = win_free_mem(win, &dir, NULL); 2579 2580 // Make sure curwin isn't invalid. It can cause severe trouble when 2581 // printing an error message. For win_equal() curbuf needs to be valid 2582 // too. 2583 if (win == curwin) 2584 { 2585 curwin = wp; 2586 #ifdef FEAT_QUICKFIX 2587 if (wp->w_p_pvw || bt_quickfix(wp->w_buffer)) 2588 { 2589 /* 2590 * If the cursor goes to the preview or the quickfix window, try 2591 * finding another window to go to. 2592 */ 2593 for (;;) 2594 { 2595 if (wp->w_next == NULL) 2596 wp = firstwin; 2597 else 2598 wp = wp->w_next; 2599 if (wp == curwin) 2600 break; 2601 if (!wp->w_p_pvw && !bt_quickfix(wp->w_buffer)) 2602 { 2603 curwin = wp; 2604 break; 2605 } 2606 } 2607 } 2608 #endif 2609 curbuf = curwin->w_buffer; 2610 close_curwin = TRUE; 2611 2612 // The cursor position may be invalid if the buffer changed after last 2613 // using the window. 2614 check_cursor(); 2615 } 2616 if (p_ea && (*p_ead == 'b' || *p_ead == dir)) 2617 // If the frame of the closed window contains the new current window, 2618 // only resize that frame. Otherwise resize all windows. 2619 win_equal(curwin, curwin->w_frame->fr_parent == win_frame, dir); 2620 else 2621 win_comp_pos(); 2622 if (close_curwin) 2623 { 2624 win_enter_ext(wp, FALSE, TRUE, FALSE, TRUE, TRUE); 2625 if (other_buffer) 2626 // careful: after this wp and win may be invalid! 2627 apply_autocmds(EVENT_BUFENTER, NULL, NULL, FALSE, curbuf); 2628 } 2629 2630 --split_disallowed; 2631 2632 /* 2633 * If last window has a status line now and we don't want one, 2634 * remove the status line. 2635 */ 2636 last_status(FALSE); 2637 2638 // After closing the help window, try restoring the window layout from 2639 // before it was opened. 2640 if (help_window) 2641 restore_snapshot(SNAP_HELP_IDX, close_curwin); 2642 2643 #ifdef FEAT_DIFF 2644 // If the window had 'diff' set and now there is only one window left in 2645 // the tab page with 'diff' set, and "closeoff" is in 'diffopt', then 2646 // execute ":diffoff!". 2647 if (diffopt_closeoff() && had_diffmode && curtab == prev_curtab) 2648 { 2649 int diffcount = 0; 2650 win_T *dwin; 2651 2652 FOR_ALL_WINDOWS(dwin) 2653 if (dwin->w_p_diff) 2654 ++diffcount; 2655 if (diffcount == 1) 2656 do_cmdline_cmd((char_u *)"diffoff!"); 2657 } 2658 #endif 2659 2660 #if defined(FEAT_GUI) 2661 // When 'guioptions' includes 'L' or 'R' may have to remove scrollbars. 2662 if (gui.in_use && !win_hasvertsplit()) 2663 gui_init_which_components(NULL); 2664 #endif 2665 2666 redraw_all_later(NOT_VALID); 2667 return OK; 2668 } 2669 2670 /* 2671 * Close window "win" in tab page "tp", which is not the current tab page. 2672 * This may be the last window in that tab page and result in closing the tab, 2673 * thus "tp" may become invalid! 2674 * Caller must check if buffer is hidden and whether the tabline needs to be 2675 * updated. 2676 */ 2677 void 2678 win_close_othertab(win_T *win, int free_buf, tabpage_T *tp) 2679 { 2680 win_T *wp; 2681 int dir; 2682 tabpage_T *ptp = NULL; 2683 int free_tp = FALSE; 2684 2685 // Get here with win->w_buffer == NULL when win_close() detects the tab 2686 // page changed. 2687 if (win->w_closing || (win->w_buffer != NULL 2688 && win->w_buffer->b_locked > 0)) 2689 return; // window is already being closed 2690 2691 if (win->w_buffer != NULL) 2692 // Close the link to the buffer. 2693 close_buffer(win, win->w_buffer, free_buf ? DOBUF_UNLOAD : 0, 2694 FALSE, FALSE); 2695 2696 // Careful: Autocommands may have closed the tab page or made it the 2697 // current tab page. 2698 for (ptp = first_tabpage; ptp != NULL && ptp != tp; ptp = ptp->tp_next) 2699 ; 2700 if (ptp == NULL || tp == curtab) 2701 return; 2702 2703 // Autocommands may have closed the window already. 2704 for (wp = tp->tp_firstwin; wp != NULL && wp != win; wp = wp->w_next) 2705 ; 2706 if (wp == NULL) 2707 return; 2708 2709 // When closing the last window in a tab page remove the tab page. 2710 if (tp->tp_firstwin == tp->tp_lastwin) 2711 { 2712 if (tp == first_tabpage) 2713 first_tabpage = tp->tp_next; 2714 else 2715 { 2716 for (ptp = first_tabpage; ptp != NULL && ptp->tp_next != tp; 2717 ptp = ptp->tp_next) 2718 ; 2719 if (ptp == NULL) 2720 { 2721 internal_error("win_close_othertab()"); 2722 return; 2723 } 2724 ptp->tp_next = tp->tp_next; 2725 } 2726 free_tp = TRUE; 2727 } 2728 2729 // Free the memory used for the window. 2730 win_free_mem(win, &dir, tp); 2731 2732 if (free_tp) 2733 free_tabpage(tp); 2734 } 2735 2736 /* 2737 * Free the memory used for a window. 2738 * Returns a pointer to the window that got the freed up space. 2739 */ 2740 static win_T * 2741 win_free_mem( 2742 win_T *win, 2743 int *dirp, // set to 'v' or 'h' for direction if 'ea' 2744 tabpage_T *tp) // tab page "win" is in, NULL for current 2745 { 2746 frame_T *frp; 2747 win_T *wp; 2748 tabpage_T *win_tp = tp == NULL ? curtab : tp; 2749 2750 // Remove the window and its frame from the tree of frames. 2751 frp = win->w_frame; 2752 wp = winframe_remove(win, dirp, tp); 2753 vim_free(frp); 2754 win_free(win, tp); 2755 2756 // When deleting the current window in the tab, select a new current 2757 // window. 2758 if (win == win_tp->tp_curwin) 2759 win_tp->tp_curwin = wp; 2760 2761 return wp; 2762 } 2763 2764 #if defined(EXITFREE) || defined(PROTO) 2765 void 2766 win_free_all(void) 2767 { 2768 int dummy; 2769 2770 while (first_tabpage->tp_next != NULL) 2771 tabpage_close(TRUE); 2772 2773 if (aucmd_win != NULL) 2774 { 2775 (void)win_free_mem(aucmd_win, &dummy, NULL); 2776 aucmd_win = NULL; 2777 } 2778 2779 while (firstwin != NULL) 2780 (void)win_free_mem(firstwin, &dummy, NULL); 2781 2782 // No window should be used after this. Set curwin to NULL to crash 2783 // instead of using freed memory. 2784 curwin = NULL; 2785 } 2786 #endif 2787 2788 /* 2789 * Remove a window and its frame from the tree of frames. 2790 * Returns a pointer to the window that got the freed up space. 2791 */ 2792 win_T * 2793 winframe_remove( 2794 win_T *win, 2795 int *dirp UNUSED, // set to 'v' or 'h' for direction if 'ea' 2796 tabpage_T *tp) // tab page "win" is in, NULL for current 2797 { 2798 frame_T *frp, *frp2, *frp3; 2799 frame_T *frp_close = win->w_frame; 2800 win_T *wp; 2801 2802 /* 2803 * If there is only one window there is nothing to remove. 2804 */ 2805 if (tp == NULL ? ONE_WINDOW : tp->tp_firstwin == tp->tp_lastwin) 2806 return NULL; 2807 2808 /* 2809 * Remove the window from its frame. 2810 */ 2811 frp2 = win_altframe(win, tp); 2812 wp = frame2win(frp2); 2813 2814 // Remove this frame from the list of frames. 2815 frame_remove(frp_close); 2816 2817 if (frp_close->fr_parent->fr_layout == FR_COL) 2818 { 2819 // When 'winfixheight' is set, try to find another frame in the column 2820 // (as close to the closed frame as possible) to distribute the height 2821 // to. 2822 if (frp2->fr_win != NULL && frp2->fr_win->w_p_wfh) 2823 { 2824 frp = frp_close->fr_prev; 2825 frp3 = frp_close->fr_next; 2826 while (frp != NULL || frp3 != NULL) 2827 { 2828 if (frp != NULL) 2829 { 2830 if (!frame_fixed_height(frp)) 2831 { 2832 frp2 = frp; 2833 wp = frame2win(frp2); 2834 break; 2835 } 2836 frp = frp->fr_prev; 2837 } 2838 if (frp3 != NULL) 2839 { 2840 if (frp3->fr_win != NULL && !frp3->fr_win->w_p_wfh) 2841 { 2842 frp2 = frp3; 2843 wp = frp3->fr_win; 2844 break; 2845 } 2846 frp3 = frp3->fr_next; 2847 } 2848 } 2849 } 2850 frame_new_height(frp2, frp2->fr_height + frp_close->fr_height, 2851 frp2 == frp_close->fr_next ? TRUE : FALSE, FALSE); 2852 *dirp = 'v'; 2853 } 2854 else 2855 { 2856 // When 'winfixwidth' is set, try to find another frame in the column 2857 // (as close to the closed frame as possible) to distribute the width 2858 // to. 2859 if (frp2->fr_win != NULL && frp2->fr_win->w_p_wfw) 2860 { 2861 frp = frp_close->fr_prev; 2862 frp3 = frp_close->fr_next; 2863 while (frp != NULL || frp3 != NULL) 2864 { 2865 if (frp != NULL) 2866 { 2867 if (!frame_fixed_width(frp)) 2868 { 2869 frp2 = frp; 2870 wp = frame2win(frp2); 2871 break; 2872 } 2873 frp = frp->fr_prev; 2874 } 2875 if (frp3 != NULL) 2876 { 2877 if (frp3->fr_win != NULL && !frp3->fr_win->w_p_wfw) 2878 { 2879 frp2 = frp3; 2880 wp = frp3->fr_win; 2881 break; 2882 } 2883 frp3 = frp3->fr_next; 2884 } 2885 } 2886 } 2887 frame_new_width(frp2, frp2->fr_width + frp_close->fr_width, 2888 frp2 == frp_close->fr_next ? TRUE : FALSE, FALSE); 2889 *dirp = 'h'; 2890 } 2891 2892 // If rows/columns go to a window below/right its positions need to be 2893 // updated. Can only be done after the sizes have been updated. 2894 if (frp2 == frp_close->fr_next) 2895 { 2896 int row = win->w_winrow; 2897 int col = win->w_wincol; 2898 2899 frame_comp_pos(frp2, &row, &col); 2900 } 2901 2902 if (frp2->fr_next == NULL && frp2->fr_prev == NULL) 2903 { 2904 // There is no other frame in this list, move its info to the parent 2905 // and remove it. 2906 frp2->fr_parent->fr_layout = frp2->fr_layout; 2907 frp2->fr_parent->fr_child = frp2->fr_child; 2908 FOR_ALL_FRAMES(frp, frp2->fr_child) 2909 frp->fr_parent = frp2->fr_parent; 2910 frp2->fr_parent->fr_win = frp2->fr_win; 2911 if (frp2->fr_win != NULL) 2912 frp2->fr_win->w_frame = frp2->fr_parent; 2913 frp = frp2->fr_parent; 2914 if (topframe->fr_child == frp2) 2915 topframe->fr_child = frp; 2916 vim_free(frp2); 2917 2918 frp2 = frp->fr_parent; 2919 if (frp2 != NULL && frp2->fr_layout == frp->fr_layout) 2920 { 2921 // The frame above the parent has the same layout, have to merge 2922 // the frames into this list. 2923 if (frp2->fr_child == frp) 2924 frp2->fr_child = frp->fr_child; 2925 frp->fr_child->fr_prev = frp->fr_prev; 2926 if (frp->fr_prev != NULL) 2927 frp->fr_prev->fr_next = frp->fr_child; 2928 for (frp3 = frp->fr_child; ; frp3 = frp3->fr_next) 2929 { 2930 frp3->fr_parent = frp2; 2931 if (frp3->fr_next == NULL) 2932 { 2933 frp3->fr_next = frp->fr_next; 2934 if (frp->fr_next != NULL) 2935 frp->fr_next->fr_prev = frp3; 2936 break; 2937 } 2938 } 2939 if (topframe->fr_child == frp) 2940 topframe->fr_child = frp2; 2941 vim_free(frp); 2942 } 2943 } 2944 2945 return wp; 2946 } 2947 2948 /* 2949 * Return a pointer to the frame that will receive the empty screen space that 2950 * is left over after "win" is closed. 2951 * 2952 * If 'splitbelow' or 'splitright' is set, the space goes above or to the left 2953 * by default. Otherwise, the free space goes below or to the right. The 2954 * result is that opening a window and then immediately closing it will 2955 * preserve the initial window layout. The 'wfh' and 'wfw' settings are 2956 * respected when possible. 2957 */ 2958 static frame_T * 2959 win_altframe( 2960 win_T *win, 2961 tabpage_T *tp) // tab page "win" is in, NULL for current 2962 { 2963 frame_T *frp; 2964 frame_T *other_fr, *target_fr; 2965 2966 if (tp == NULL ? ONE_WINDOW : tp->tp_firstwin == tp->tp_lastwin) 2967 return alt_tabpage()->tp_curwin->w_frame; 2968 2969 frp = win->w_frame; 2970 2971 if (frp->fr_prev == NULL) 2972 return frp->fr_next; 2973 if (frp->fr_next == NULL) 2974 return frp->fr_prev; 2975 2976 // By default the next window will get the space that was abandoned by this 2977 // window 2978 target_fr = frp->fr_next; 2979 other_fr = frp->fr_prev; 2980 2981 // If this is part of a column of windows and 'splitbelow' is true then the 2982 // previous window will get the space. 2983 if (frp->fr_parent != NULL && frp->fr_parent->fr_layout == FR_COL && p_sb) 2984 { 2985 target_fr = frp->fr_prev; 2986 other_fr = frp->fr_next; 2987 } 2988 2989 // If this is part of a row of windows, and 'splitright' is true then the 2990 // previous window will get the space. 2991 if (frp->fr_parent != NULL && frp->fr_parent->fr_layout == FR_ROW && p_spr) 2992 { 2993 target_fr = frp->fr_prev; 2994 other_fr = frp->fr_next; 2995 } 2996 2997 // If 'wfh' or 'wfw' is set for the target and not for the alternate 2998 // window, reverse the selection. 2999 if (frp->fr_parent != NULL && frp->fr_parent->fr_layout == FR_ROW) 3000 { 3001 if (frame_fixed_width(target_fr) && !frame_fixed_width(other_fr)) 3002 target_fr = other_fr; 3003 } 3004 else 3005 { 3006 if (frame_fixed_height(target_fr) && !frame_fixed_height(other_fr)) 3007 target_fr = other_fr; 3008 } 3009 3010 return target_fr; 3011 } 3012 3013 /* 3014 * Return the tabpage that will be used if the current one is closed. 3015 */ 3016 static tabpage_T * 3017 alt_tabpage(void) 3018 { 3019 tabpage_T *tp; 3020 3021 // Use the next tab page if possible. 3022 if (curtab->tp_next != NULL) 3023 return curtab->tp_next; 3024 3025 // Find the last but one tab page. 3026 for (tp = first_tabpage; tp->tp_next != curtab; tp = tp->tp_next) 3027 ; 3028 return tp; 3029 } 3030 3031 /* 3032 * Find the left-upper window in frame "frp". 3033 */ 3034 static win_T * 3035 frame2win(frame_T *frp) 3036 { 3037 while (frp->fr_win == NULL) 3038 frp = frp->fr_child; 3039 return frp->fr_win; 3040 } 3041 3042 /* 3043 * Return TRUE if frame "frp" contains window "wp". 3044 */ 3045 static int 3046 frame_has_win(frame_T *frp, win_T *wp) 3047 { 3048 frame_T *p; 3049 3050 if (frp->fr_layout == FR_LEAF) 3051 return frp->fr_win == wp; 3052 3053 FOR_ALL_FRAMES(p, frp->fr_child) 3054 if (frame_has_win(p, wp)) 3055 return TRUE; 3056 return FALSE; 3057 } 3058 3059 /* 3060 * Set a new height for a frame. Recursively sets the height for contained 3061 * frames and windows. Caller must take care of positions. 3062 */ 3063 static void 3064 frame_new_height( 3065 frame_T *topfrp, 3066 int height, 3067 int topfirst, // resize topmost contained frame first 3068 int wfh) // obey 'winfixheight' when there is a choice; 3069 // may cause the height not to be set 3070 { 3071 frame_T *frp; 3072 int extra_lines; 3073 int h; 3074 3075 if (topfrp->fr_win != NULL) 3076 { 3077 // Simple case: just one window. 3078 win_new_height(topfrp->fr_win, 3079 height - topfrp->fr_win->w_status_height 3080 - WINBAR_HEIGHT(topfrp->fr_win)); 3081 } 3082 else if (topfrp->fr_layout == FR_ROW) 3083 { 3084 do 3085 { 3086 // All frames in this row get the same new height. 3087 FOR_ALL_FRAMES(frp, topfrp->fr_child) 3088 { 3089 frame_new_height(frp, height, topfirst, wfh); 3090 if (frp->fr_height > height) 3091 { 3092 // Could not fit the windows, make the whole row higher. 3093 height = frp->fr_height; 3094 break; 3095 } 3096 } 3097 } 3098 while (frp != NULL); 3099 } 3100 else // fr_layout == FR_COL 3101 { 3102 // Complicated case: Resize a column of frames. Resize the bottom 3103 // frame first, frames above that when needed. 3104 3105 frp = topfrp->fr_child; 3106 if (wfh) 3107 // Advance past frames with one window with 'wfh' set. 3108 while (frame_fixed_height(frp)) 3109 { 3110 frp = frp->fr_next; 3111 if (frp == NULL) 3112 return; // no frame without 'wfh', give up 3113 } 3114 if (!topfirst) 3115 { 3116 // Find the bottom frame of this column 3117 while (frp->fr_next != NULL) 3118 frp = frp->fr_next; 3119 if (wfh) 3120 // Advance back for frames with one window with 'wfh' set. 3121 while (frame_fixed_height(frp)) 3122 frp = frp->fr_prev; 3123 } 3124 3125 extra_lines = height - topfrp->fr_height; 3126 if (extra_lines < 0) 3127 { 3128 // reduce height of contained frames, bottom or top frame first 3129 while (frp != NULL) 3130 { 3131 h = frame_minheight(frp, NULL); 3132 if (frp->fr_height + extra_lines < h) 3133 { 3134 extra_lines += frp->fr_height - h; 3135 frame_new_height(frp, h, topfirst, wfh); 3136 } 3137 else 3138 { 3139 frame_new_height(frp, frp->fr_height + extra_lines, 3140 topfirst, wfh); 3141 break; 3142 } 3143 if (topfirst) 3144 { 3145 do 3146 frp = frp->fr_next; 3147 while (wfh && frp != NULL && frame_fixed_height(frp)); 3148 } 3149 else 3150 { 3151 do 3152 frp = frp->fr_prev; 3153 while (wfh && frp != NULL && frame_fixed_height(frp)); 3154 } 3155 // Increase "height" if we could not reduce enough frames. 3156 if (frp == NULL) 3157 height -= extra_lines; 3158 } 3159 } 3160 else if (extra_lines > 0) 3161 { 3162 // increase height of bottom or top frame 3163 frame_new_height(frp, frp->fr_height + extra_lines, topfirst, wfh); 3164 } 3165 } 3166 topfrp->fr_height = height; 3167 } 3168 3169 /* 3170 * Return TRUE if height of frame "frp" should not be changed because of 3171 * the 'winfixheight' option. 3172 */ 3173 static int 3174 frame_fixed_height(frame_T *frp) 3175 { 3176 // frame with one window: fixed height if 'winfixheight' set. 3177 if (frp->fr_win != NULL) 3178 return frp->fr_win->w_p_wfh; 3179 3180 if (frp->fr_layout == FR_ROW) 3181 { 3182 // The frame is fixed height if one of the frames in the row is fixed 3183 // height. 3184 FOR_ALL_FRAMES(frp, frp->fr_child) 3185 if (frame_fixed_height(frp)) 3186 return TRUE; 3187 return FALSE; 3188 } 3189 3190 // frp->fr_layout == FR_COL: The frame is fixed height if all of the 3191 // frames in the row are fixed height. 3192 FOR_ALL_FRAMES(frp, frp->fr_child) 3193 if (!frame_fixed_height(frp)) 3194 return FALSE; 3195 return TRUE; 3196 } 3197 3198 /* 3199 * Return TRUE if width of frame "frp" should not be changed because of 3200 * the 'winfixwidth' option. 3201 */ 3202 static int 3203 frame_fixed_width(frame_T *frp) 3204 { 3205 // frame with one window: fixed width if 'winfixwidth' set. 3206 if (frp->fr_win != NULL) 3207 return frp->fr_win->w_p_wfw; 3208 3209 if (frp->fr_layout == FR_COL) 3210 { 3211 // The frame is fixed width if one of the frames in the row is fixed 3212 // width. 3213 FOR_ALL_FRAMES(frp, frp->fr_child) 3214 if (frame_fixed_width(frp)) 3215 return TRUE; 3216 return FALSE; 3217 } 3218 3219 // frp->fr_layout == FR_ROW: The frame is fixed width if all of the 3220 // frames in the row are fixed width. 3221 FOR_ALL_FRAMES(frp, frp->fr_child) 3222 if (!frame_fixed_width(frp)) 3223 return FALSE; 3224 return TRUE; 3225 } 3226 3227 /* 3228 * Add a status line to windows at the bottom of "frp". 3229 * Note: Does not check if there is room! 3230 */ 3231 static void 3232 frame_add_statusline(frame_T *frp) 3233 { 3234 win_T *wp; 3235 3236 if (frp->fr_layout == FR_LEAF) 3237 { 3238 wp = frp->fr_win; 3239 if (wp->w_status_height == 0) 3240 { 3241 if (wp->w_height > 0) // don't make it negative 3242 --wp->w_height; 3243 wp->w_status_height = STATUS_HEIGHT; 3244 } 3245 } 3246 else if (frp->fr_layout == FR_ROW) 3247 { 3248 // Handle all the frames in the row. 3249 FOR_ALL_FRAMES(frp, frp->fr_child) 3250 frame_add_statusline(frp); 3251 } 3252 else // frp->fr_layout == FR_COL 3253 { 3254 // Only need to handle the last frame in the column. 3255 for (frp = frp->fr_child; frp->fr_next != NULL; frp = frp->fr_next) 3256 ; 3257 frame_add_statusline(frp); 3258 } 3259 } 3260 3261 /* 3262 * Set width of a frame. Handles recursively going through contained frames. 3263 * May remove separator line for windows at the right side (for win_close()). 3264 */ 3265 static void 3266 frame_new_width( 3267 frame_T *topfrp, 3268 int width, 3269 int leftfirst, // resize leftmost contained frame first 3270 int wfw) // obey 'winfixwidth' when there is a choice; 3271 // may cause the width not to be set 3272 { 3273 frame_T *frp; 3274 int extra_cols; 3275 int w; 3276 win_T *wp; 3277 3278 if (topfrp->fr_layout == FR_LEAF) 3279 { 3280 // Simple case: just one window. 3281 wp = topfrp->fr_win; 3282 // Find out if there are any windows right of this one. 3283 for (frp = topfrp; frp->fr_parent != NULL; frp = frp->fr_parent) 3284 if (frp->fr_parent->fr_layout == FR_ROW && frp->fr_next != NULL) 3285 break; 3286 if (frp->fr_parent == NULL) 3287 wp->w_vsep_width = 0; 3288 win_new_width(wp, width - wp->w_vsep_width); 3289 } 3290 else if (topfrp->fr_layout == FR_COL) 3291 { 3292 do 3293 { 3294 // All frames in this column get the same new width. 3295 FOR_ALL_FRAMES(frp, topfrp->fr_child) 3296 { 3297 frame_new_width(frp, width, leftfirst, wfw); 3298 if (frp->fr_width > width) 3299 { 3300 // Could not fit the windows, make whole column wider. 3301 width = frp->fr_width; 3302 break; 3303 } 3304 } 3305 } while (frp != NULL); 3306 } 3307 else // fr_layout == FR_ROW 3308 { 3309 // Complicated case: Resize a row of frames. Resize the rightmost 3310 // frame first, frames left of it when needed. 3311 3312 frp = topfrp->fr_child; 3313 if (wfw) 3314 // Advance past frames with one window with 'wfw' set. 3315 while (frame_fixed_width(frp)) 3316 { 3317 frp = frp->fr_next; 3318 if (frp == NULL) 3319 return; // no frame without 'wfw', give up 3320 } 3321 if (!leftfirst) 3322 { 3323 // Find the rightmost frame of this row 3324 while (frp->fr_next != NULL) 3325 frp = frp->fr_next; 3326 if (wfw) 3327 // Advance back for frames with one window with 'wfw' set. 3328 while (frame_fixed_width(frp)) 3329 frp = frp->fr_prev; 3330 } 3331 3332 extra_cols = width - topfrp->fr_width; 3333 if (extra_cols < 0) 3334 { 3335 // reduce frame width, rightmost frame first 3336 while (frp != NULL) 3337 { 3338 w = frame_minwidth(frp, NULL); 3339 if (frp->fr_width + extra_cols < w) 3340 { 3341 extra_cols += frp->fr_width - w; 3342 frame_new_width(frp, w, leftfirst, wfw); 3343 } 3344 else 3345 { 3346 frame_new_width(frp, frp->fr_width + extra_cols, 3347 leftfirst, wfw); 3348 break; 3349 } 3350 if (leftfirst) 3351 { 3352 do 3353 frp = frp->fr_next; 3354 while (wfw && frp != NULL && frame_fixed_width(frp)); 3355 } 3356 else 3357 { 3358 do 3359 frp = frp->fr_prev; 3360 while (wfw && frp != NULL && frame_fixed_width(frp)); 3361 } 3362 // Increase "width" if we could not reduce enough frames. 3363 if (frp == NULL) 3364 width -= extra_cols; 3365 } 3366 } 3367 else if (extra_cols > 0) 3368 { 3369 // increase width of rightmost frame 3370 frame_new_width(frp, frp->fr_width + extra_cols, leftfirst, wfw); 3371 } 3372 } 3373 topfrp->fr_width = width; 3374 } 3375 3376 /* 3377 * Add the vertical separator to windows at the right side of "frp". 3378 * Note: Does not check if there is room! 3379 */ 3380 static void 3381 frame_add_vsep(frame_T *frp) 3382 { 3383 win_T *wp; 3384 3385 if (frp->fr_layout == FR_LEAF) 3386 { 3387 wp = frp->fr_win; 3388 if (wp->w_vsep_width == 0) 3389 { 3390 if (wp->w_width > 0) // don't make it negative 3391 --wp->w_width; 3392 wp->w_vsep_width = 1; 3393 } 3394 } 3395 else if (frp->fr_layout == FR_COL) 3396 { 3397 // Handle all the frames in the column. 3398 FOR_ALL_FRAMES(frp, frp->fr_child) 3399 frame_add_vsep(frp); 3400 } 3401 else // frp->fr_layout == FR_ROW 3402 { 3403 // Only need to handle the last frame in the row. 3404 frp = frp->fr_child; 3405 while (frp->fr_next != NULL) 3406 frp = frp->fr_next; 3407 frame_add_vsep(frp); 3408 } 3409 } 3410 3411 /* 3412 * Set frame width from the window it contains. 3413 */ 3414 static void 3415 frame_fix_width(win_T *wp) 3416 { 3417 wp->w_frame->fr_width = wp->w_width + wp->w_vsep_width; 3418 } 3419 3420 /* 3421 * Set frame height from the window it contains. 3422 */ 3423 static void 3424 frame_fix_height(win_T *wp) 3425 { 3426 wp->w_frame->fr_height = VISIBLE_HEIGHT(wp) + wp->w_status_height; 3427 } 3428 3429 /* 3430 * Compute the minimal height for frame "topfrp". 3431 * Uses the 'winminheight' option. 3432 * When "next_curwin" isn't NULL, use p_wh for this window. 3433 * When "next_curwin" is NOWIN, don't use at least one line for the current 3434 * window. 3435 */ 3436 static int 3437 frame_minheight(frame_T *topfrp, win_T *next_curwin) 3438 { 3439 frame_T *frp; 3440 int m; 3441 int n; 3442 3443 if (topfrp->fr_win != NULL) 3444 { 3445 if (topfrp->fr_win == next_curwin) 3446 m = p_wh + topfrp->fr_win->w_status_height; 3447 else 3448 { 3449 // window: minimal height of the window plus status line 3450 m = p_wmh + topfrp->fr_win->w_status_height; 3451 if (topfrp->fr_win == curwin && next_curwin == NULL) 3452 { 3453 // Current window is minimal one line high and WinBar is 3454 // visible. 3455 if (p_wmh == 0) 3456 ++m; 3457 m += WINBAR_HEIGHT(curwin); 3458 } 3459 } 3460 } 3461 else if (topfrp->fr_layout == FR_ROW) 3462 { 3463 // get the minimal height from each frame in this row 3464 m = 0; 3465 FOR_ALL_FRAMES(frp, topfrp->fr_child) 3466 { 3467 n = frame_minheight(frp, next_curwin); 3468 if (n > m) 3469 m = n; 3470 } 3471 } 3472 else 3473 { 3474 // Add up the minimal heights for all frames in this column. 3475 m = 0; 3476 FOR_ALL_FRAMES(frp, topfrp->fr_child) 3477 m += frame_minheight(frp, next_curwin); 3478 } 3479 3480 return m; 3481 } 3482 3483 /* 3484 * Compute the minimal width for frame "topfrp". 3485 * When "next_curwin" isn't NULL, use p_wiw for this window. 3486 * When "next_curwin" is NOWIN, don't use at least one column for the current 3487 * window. 3488 */ 3489 static int 3490 frame_minwidth( 3491 frame_T *topfrp, 3492 win_T *next_curwin) // use p_wh and p_wiw for next_curwin 3493 { 3494 frame_T *frp; 3495 int m, n; 3496 3497 if (topfrp->fr_win != NULL) 3498 { 3499 if (topfrp->fr_win == next_curwin) 3500 m = p_wiw + topfrp->fr_win->w_vsep_width; 3501 else 3502 { 3503 // window: minimal width of the window plus separator column 3504 m = p_wmw + topfrp->fr_win->w_vsep_width; 3505 // Current window is minimal one column wide 3506 if (p_wmw == 0 && topfrp->fr_win == curwin && next_curwin == NULL) 3507 ++m; 3508 } 3509 } 3510 else if (topfrp->fr_layout == FR_COL) 3511 { 3512 // get the minimal width from each frame in this column 3513 m = 0; 3514 FOR_ALL_FRAMES(frp, topfrp->fr_child) 3515 { 3516 n = frame_minwidth(frp, next_curwin); 3517 if (n > m) 3518 m = n; 3519 } 3520 } 3521 else 3522 { 3523 // Add up the minimal widths for all frames in this row. 3524 m = 0; 3525 FOR_ALL_FRAMES(frp, topfrp->fr_child) 3526 m += frame_minwidth(frp, next_curwin); 3527 } 3528 3529 return m; 3530 } 3531 3532 3533 /* 3534 * Try to close all windows except current one. 3535 * Buffers in the other windows become hidden if 'hidden' is set, or '!' is 3536 * used and the buffer was modified. 3537 * 3538 * Used by ":bdel" and ":only". 3539 */ 3540 void 3541 close_others( 3542 int message, 3543 int forceit) // always hide all other windows 3544 { 3545 win_T *wp; 3546 win_T *nextwp; 3547 int r; 3548 3549 if (one_window()) 3550 { 3551 if (message && !autocmd_busy) 3552 msg(_(m_onlyone)); 3553 return; 3554 } 3555 3556 // Be very careful here: autocommands may change the window layout. 3557 for (wp = firstwin; win_valid(wp); wp = nextwp) 3558 { 3559 nextwp = wp->w_next; 3560 if (wp != curwin) // don't close current window 3561 { 3562 3563 // Check if it's allowed to abandon this window 3564 r = can_abandon(wp->w_buffer, forceit); 3565 if (!win_valid(wp)) // autocommands messed wp up 3566 { 3567 nextwp = firstwin; 3568 continue; 3569 } 3570 if (!r) 3571 { 3572 #if defined(FEAT_GUI_DIALOG) || defined(FEAT_CON_DIALOG) 3573 if (message && (p_confirm || cmdmod.confirm) && p_write) 3574 { 3575 dialog_changed(wp->w_buffer, FALSE); 3576 if (!win_valid(wp)) // autocommands messed wp up 3577 { 3578 nextwp = firstwin; 3579 continue; 3580 } 3581 } 3582 if (bufIsChanged(wp->w_buffer)) 3583 #endif 3584 continue; 3585 } 3586 win_close(wp, !buf_hide(wp->w_buffer) 3587 && !bufIsChanged(wp->w_buffer)); 3588 } 3589 } 3590 3591 if (message && !ONE_WINDOW) 3592 emsg(_("E445: Other window contains changes")); 3593 } 3594 3595 static void 3596 win_init_empty(win_T *wp) 3597 { 3598 redraw_win_later(wp, NOT_VALID); 3599 wp->w_lines_valid = 0; 3600 wp->w_cursor.lnum = 1; 3601 wp->w_curswant = wp->w_cursor.col = 0; 3602 wp->w_cursor.coladd = 0; 3603 wp->w_pcmark.lnum = 1; // pcmark not cleared but set to line 1 3604 wp->w_pcmark.col = 0; 3605 wp->w_prev_pcmark.lnum = 0; 3606 wp->w_prev_pcmark.col = 0; 3607 wp->w_topline = 1; 3608 #ifdef FEAT_DIFF 3609 wp->w_topfill = 0; 3610 #endif 3611 wp->w_botline = 2; 3612 #if defined(FEAT_SYN_HL) || defined(FEAT_SPELL) 3613 wp->w_s = &wp->w_buffer->b_s; 3614 #endif 3615 } 3616 3617 /* 3618 * Init the current window "curwin". 3619 * Called when a new file is being edited. 3620 */ 3621 void 3622 curwin_init(void) 3623 { 3624 win_init_empty(curwin); 3625 } 3626 3627 /* 3628 * Allocate the first window and put an empty buffer in it. 3629 * Called from main(). 3630 * Return FAIL when something goes wrong (out of memory). 3631 */ 3632 int 3633 win_alloc_first(void) 3634 { 3635 if (win_alloc_firstwin(NULL) == FAIL) 3636 return FAIL; 3637 3638 first_tabpage = alloc_tabpage(); 3639 if (first_tabpage == NULL) 3640 return FAIL; 3641 first_tabpage->tp_topframe = topframe; 3642 curtab = first_tabpage; 3643 curtab->tp_firstwin = firstwin; 3644 curtab->tp_lastwin = lastwin; 3645 curtab->tp_curwin = curwin; 3646 3647 return OK; 3648 } 3649 3650 /* 3651 * Allocate and init a window that is not a regular window. 3652 * This can only be done after the first window is fully initialized, thus it 3653 * can't be in win_alloc_first(). 3654 */ 3655 win_T * 3656 win_alloc_popup_win(void) 3657 { 3658 win_T *wp; 3659 3660 wp = win_alloc(NULL, TRUE); 3661 if (wp != NULL) 3662 { 3663 // We need to initialize options with something, using the current 3664 // window makes most sense. 3665 win_init_some(wp, curwin); 3666 3667 RESET_BINDING(wp); 3668 new_frame(wp); 3669 } 3670 return wp; 3671 } 3672 3673 /* 3674 * Initialize window "wp" to display buffer "buf". 3675 */ 3676 void 3677 win_init_popup_win(win_T *wp, buf_T *buf) 3678 { 3679 wp->w_buffer = buf; 3680 ++buf->b_nwindows; 3681 win_init_empty(wp); // set cursor and topline to safe values 3682 3683 // Make sure w_localdir and globaldir are NULL to avoid a chdir() in 3684 // win_enter_ext(). 3685 VIM_CLEAR(wp->w_localdir); 3686 } 3687 3688 /* 3689 * Allocate the first window or the first window in a new tab page. 3690 * When "oldwin" is NULL create an empty buffer for it. 3691 * When "oldwin" is not NULL copy info from it to the new window. 3692 * Return FAIL when something goes wrong (out of memory). 3693 */ 3694 static int 3695 win_alloc_firstwin(win_T *oldwin) 3696 { 3697 curwin = win_alloc(NULL, FALSE); 3698 if (oldwin == NULL) 3699 { 3700 // Very first window, need to create an empty buffer for it and 3701 // initialize from scratch. 3702 curbuf = buflist_new(NULL, NULL, 1L, BLN_LISTED); 3703 if (curwin == NULL || curbuf == NULL) 3704 return FAIL; 3705 curwin->w_buffer = curbuf; 3706 #ifdef FEAT_SYN_HL 3707 curwin->w_s = &(curbuf->b_s); 3708 #endif 3709 curbuf->b_nwindows = 1; // there is one window 3710 curwin->w_alist = &global_alist; 3711 curwin_init(); // init current window 3712 } 3713 else 3714 { 3715 // First window in new tab page, initialize it from "oldwin". 3716 win_init(curwin, oldwin, 0); 3717 3718 // We don't want cursor- and scroll-binding in the first window. 3719 RESET_BINDING(curwin); 3720 } 3721 3722 new_frame(curwin); 3723 if (curwin->w_frame == NULL) 3724 return FAIL; 3725 topframe = curwin->w_frame; 3726 topframe->fr_width = Columns; 3727 topframe->fr_height = Rows - p_ch; 3728 3729 return OK; 3730 } 3731 3732 /* 3733 * Create a frame for window "wp". 3734 */ 3735 static void 3736 new_frame(win_T *wp) 3737 { 3738 frame_T *frp = ALLOC_CLEAR_ONE(frame_T); 3739 3740 wp->w_frame = frp; 3741 if (frp != NULL) 3742 { 3743 frp->fr_layout = FR_LEAF; 3744 frp->fr_win = wp; 3745 } 3746 } 3747 3748 /* 3749 * Initialize the window and frame size to the maximum. 3750 */ 3751 void 3752 win_init_size(void) 3753 { 3754 firstwin->w_height = ROWS_AVAIL; 3755 topframe->fr_height = ROWS_AVAIL; 3756 firstwin->w_width = Columns; 3757 topframe->fr_width = Columns; 3758 } 3759 3760 /* 3761 * Allocate a new tabpage_T and init the values. 3762 * Returns NULL when out of memory. 3763 */ 3764 static tabpage_T * 3765 alloc_tabpage(void) 3766 { 3767 tabpage_T *tp; 3768 # ifdef FEAT_GUI 3769 int i; 3770 # endif 3771 3772 3773 tp = ALLOC_CLEAR_ONE(tabpage_T); 3774 if (tp == NULL) 3775 return NULL; 3776 3777 # ifdef FEAT_EVAL 3778 // init t: variables 3779 tp->tp_vars = dict_alloc(); 3780 if (tp->tp_vars == NULL) 3781 { 3782 vim_free(tp); 3783 return NULL; 3784 } 3785 init_var_dict(tp->tp_vars, &tp->tp_winvar, VAR_SCOPE); 3786 # endif 3787 3788 # ifdef FEAT_GUI 3789 for (i = 0; i < 3; i++) 3790 tp->tp_prev_which_scrollbars[i] = -1; 3791 # endif 3792 # ifdef FEAT_DIFF 3793 tp->tp_diff_invalid = TRUE; 3794 # endif 3795 tp->tp_ch_used = p_ch; 3796 3797 return tp; 3798 } 3799 3800 void 3801 free_tabpage(tabpage_T *tp) 3802 { 3803 int idx; 3804 3805 # ifdef FEAT_DIFF 3806 diff_clear(tp); 3807 # endif 3808 # ifdef FEAT_PROP_POPUP 3809 while (tp->tp_first_popupwin != NULL) 3810 popup_close_tabpage(tp, tp->tp_first_popupwin->w_id, TRUE); 3811 #endif 3812 for (idx = 0; idx < SNAP_COUNT; ++idx) 3813 clear_snapshot(tp, idx); 3814 #ifdef FEAT_EVAL 3815 vars_clear(&tp->tp_vars->dv_hashtab); // free all t: variables 3816 hash_init(&tp->tp_vars->dv_hashtab); 3817 unref_var_dict(tp->tp_vars); 3818 #endif 3819 3820 if (tp == lastused_tabpage) 3821 lastused_tabpage = NULL; 3822 3823 vim_free(tp->tp_localdir); 3824 vim_free(tp->tp_prevdir); 3825 3826 #ifdef FEAT_PYTHON 3827 python_tabpage_free(tp); 3828 #endif 3829 3830 #ifdef FEAT_PYTHON3 3831 python3_tabpage_free(tp); 3832 #endif 3833 3834 vim_free(tp); 3835 } 3836 3837 /* 3838 * Create a new Tab page with one window. 3839 * It will edit the current buffer, like after ":split". 3840 * When "after" is 0 put it just after the current Tab page. 3841 * Otherwise put it just before tab page "after". 3842 * Return FAIL or OK. 3843 */ 3844 int 3845 win_new_tabpage(int after) 3846 { 3847 tabpage_T *tp = curtab; 3848 tabpage_T *prev_tp = curtab; 3849 tabpage_T *newtp; 3850 int n; 3851 3852 newtp = alloc_tabpage(); 3853 if (newtp == NULL) 3854 return FAIL; 3855 3856 // Remember the current windows in this Tab page. 3857 if (leave_tabpage(curbuf, TRUE) == FAIL) 3858 { 3859 vim_free(newtp); 3860 return FAIL; 3861 } 3862 curtab = newtp; 3863 3864 newtp->tp_localdir = (tp->tp_localdir == NULL) 3865 ? NULL : vim_strsave(tp->tp_localdir); 3866 // Create a new empty window. 3867 if (win_alloc_firstwin(tp->tp_curwin) == OK) 3868 { 3869 // Make the new Tab page the new topframe. 3870 if (after == 1) 3871 { 3872 // New tab page becomes the first one. 3873 newtp->tp_next = first_tabpage; 3874 first_tabpage = newtp; 3875 } 3876 else 3877 { 3878 if (after > 0) 3879 { 3880 // Put new tab page before tab page "after". 3881 n = 2; 3882 for (tp = first_tabpage; tp->tp_next != NULL 3883 && n < after; tp = tp->tp_next) 3884 ++n; 3885 } 3886 newtp->tp_next = tp->tp_next; 3887 tp->tp_next = newtp; 3888 } 3889 newtp->tp_firstwin = newtp->tp_lastwin = newtp->tp_curwin = curwin; 3890 3891 win_init_size(); 3892 firstwin->w_winrow = tabline_height(); 3893 win_comp_scroll(curwin); 3894 3895 newtp->tp_topframe = topframe; 3896 last_status(FALSE); 3897 3898 lastused_tabpage = prev_tp; 3899 3900 #if defined(FEAT_GUI) 3901 // When 'guioptions' includes 'L' or 'R' may have to remove or add 3902 // scrollbars. Have to update them anyway. 3903 gui_may_update_scrollbars(); 3904 #endif 3905 #ifdef FEAT_JOB_CHANNEL 3906 entering_window(curwin); 3907 #endif 3908 3909 redraw_all_later(NOT_VALID); 3910 apply_autocmds(EVENT_WINNEW, NULL, NULL, FALSE, curbuf); 3911 apply_autocmds(EVENT_WINENTER, NULL, NULL, FALSE, curbuf); 3912 apply_autocmds(EVENT_TABNEW, NULL, NULL, FALSE, curbuf); 3913 apply_autocmds(EVENT_TABENTER, NULL, NULL, FALSE, curbuf); 3914 return OK; 3915 } 3916 3917 // Failed, get back the previous Tab page 3918 enter_tabpage(curtab, curbuf, TRUE, TRUE); 3919 return FAIL; 3920 } 3921 3922 /* 3923 * Open a new tab page if ":tab cmd" was used. It will edit the same buffer, 3924 * like with ":split". 3925 * Returns OK if a new tab page was created, FAIL otherwise. 3926 */ 3927 static int 3928 may_open_tabpage(void) 3929 { 3930 int n = (cmdmod.tab == 0) ? postponed_split_tab : cmdmod.tab; 3931 3932 if (n != 0) 3933 { 3934 cmdmod.tab = 0; // reset it to avoid doing it twice 3935 postponed_split_tab = 0; 3936 return win_new_tabpage(n); 3937 } 3938 return FAIL; 3939 } 3940 3941 /* 3942 * Create up to "maxcount" tabpages with empty windows. 3943 * Returns the number of resulting tab pages. 3944 */ 3945 int 3946 make_tabpages(int maxcount) 3947 { 3948 int count = maxcount; 3949 int todo; 3950 3951 // Limit to 'tabpagemax' tabs. 3952 if (count > p_tpm) 3953 count = p_tpm; 3954 3955 /* 3956 * Don't execute autocommands while creating the tab pages. Must do that 3957 * when putting the buffers in the windows. 3958 */ 3959 block_autocmds(); 3960 3961 for (todo = count - 1; todo > 0; --todo) 3962 if (win_new_tabpage(0) == FAIL) 3963 break; 3964 3965 unblock_autocmds(); 3966 3967 // return actual number of tab pages 3968 return (count - todo); 3969 } 3970 3971 /* 3972 * Return TRUE when "tpc" points to a valid tab page. 3973 */ 3974 int 3975 valid_tabpage(tabpage_T *tpc) 3976 { 3977 tabpage_T *tp; 3978 3979 FOR_ALL_TABPAGES(tp) 3980 if (tp == tpc) 3981 return TRUE; 3982 return FALSE; 3983 } 3984 3985 /* 3986 * Return TRUE when "tpc" points to a valid tab page and at least one window is 3987 * valid. 3988 */ 3989 int 3990 valid_tabpage_win(tabpage_T *tpc) 3991 { 3992 tabpage_T *tp; 3993 win_T *wp; 3994 3995 FOR_ALL_TABPAGES(tp) 3996 { 3997 if (tp == tpc) 3998 { 3999 FOR_ALL_WINDOWS_IN_TAB(tp, wp) 4000 { 4001 if (win_valid_any_tab(wp)) 4002 return TRUE; 4003 } 4004 return FALSE; 4005 } 4006 } 4007 // shouldn't happen 4008 return FALSE; 4009 } 4010 4011 /* 4012 * Close tabpage "tab", assuming it has no windows in it. 4013 * There must be another tabpage or this will crash. 4014 */ 4015 void 4016 close_tabpage(tabpage_T *tab) 4017 { 4018 tabpage_T *ptp; 4019 4020 if (tab == first_tabpage) 4021 { 4022 first_tabpage = tab->tp_next; 4023 ptp = first_tabpage; 4024 } 4025 else 4026 { 4027 for (ptp = first_tabpage; ptp != NULL && ptp->tp_next != tab; 4028 ptp = ptp->tp_next) 4029 ; 4030 assert(ptp != NULL); 4031 ptp->tp_next = tab->tp_next; 4032 } 4033 4034 goto_tabpage_tp(ptp, FALSE, FALSE); 4035 free_tabpage(tab); 4036 } 4037 4038 /* 4039 * Find tab page "n" (first one is 1). Returns NULL when not found. 4040 */ 4041 tabpage_T * 4042 find_tabpage(int n) 4043 { 4044 tabpage_T *tp; 4045 int i = 1; 4046 4047 if (n == 0) 4048 return curtab; 4049 4050 for (tp = first_tabpage; tp != NULL && i != n; tp = tp->tp_next) 4051 ++i; 4052 return tp; 4053 } 4054 4055 /* 4056 * Get index of tab page "tp". First one has index 1. 4057 * When not found returns number of tab pages plus one. 4058 */ 4059 int 4060 tabpage_index(tabpage_T *ftp) 4061 { 4062 int i = 1; 4063 tabpage_T *tp; 4064 4065 for (tp = first_tabpage; tp != NULL && tp != ftp; tp = tp->tp_next) 4066 ++i; 4067 return i; 4068 } 4069 4070 /* 4071 * Prepare for leaving the current tab page. 4072 * When autocommands change "curtab" we don't leave the tab page and return 4073 * FAIL. 4074 * Careful: When OK is returned need to get a new tab page very very soon! 4075 */ 4076 static int 4077 leave_tabpage( 4078 buf_T *new_curbuf UNUSED, // what is going to be the new curbuf, 4079 // NULL if unknown 4080 int trigger_leave_autocmds UNUSED) 4081 { 4082 tabpage_T *tp = curtab; 4083 4084 #ifdef FEAT_JOB_CHANNEL 4085 leaving_window(curwin); 4086 #endif 4087 reset_VIsual_and_resel(); // stop Visual mode 4088 if (trigger_leave_autocmds) 4089 { 4090 if (new_curbuf != curbuf) 4091 { 4092 apply_autocmds(EVENT_BUFLEAVE, NULL, NULL, FALSE, curbuf); 4093 if (curtab != tp) 4094 return FAIL; 4095 } 4096 apply_autocmds(EVENT_WINLEAVE, NULL, NULL, FALSE, curbuf); 4097 if (curtab != tp) 4098 return FAIL; 4099 apply_autocmds(EVENT_TABLEAVE, NULL, NULL, FALSE, curbuf); 4100 if (curtab != tp) 4101 return FAIL; 4102 } 4103 #if defined(FEAT_GUI) 4104 // Remove the scrollbars. They may be added back later. 4105 if (gui.in_use) 4106 gui_remove_scrollbars(); 4107 #endif 4108 tp->tp_curwin = curwin; 4109 tp->tp_prevwin = prevwin; 4110 tp->tp_firstwin = firstwin; 4111 tp->tp_lastwin = lastwin; 4112 tp->tp_old_Rows = Rows; 4113 tp->tp_old_Columns = Columns; 4114 firstwin = NULL; 4115 lastwin = NULL; 4116 return OK; 4117 } 4118 4119 /* 4120 * Start using tab page "tp". 4121 * Only to be used after leave_tabpage() or freeing the current tab page. 4122 * Only trigger *Enter autocommands when trigger_enter_autocmds is TRUE. 4123 * Only trigger *Leave autocommands when trigger_leave_autocmds is TRUE. 4124 */ 4125 static void 4126 enter_tabpage( 4127 tabpage_T *tp, 4128 buf_T *old_curbuf UNUSED, 4129 int trigger_enter_autocmds, 4130 int trigger_leave_autocmds) 4131 { 4132 int row; 4133 int old_off = tp->tp_firstwin->w_winrow; 4134 win_T *next_prevwin = tp->tp_prevwin; 4135 tabpage_T *last_tab = curtab; 4136 4137 curtab = tp; 4138 firstwin = tp->tp_firstwin; 4139 lastwin = tp->tp_lastwin; 4140 topframe = tp->tp_topframe; 4141 4142 // We would like doing the TabEnter event first, but we don't have a 4143 // valid current window yet, which may break some commands. 4144 // This triggers autocommands, thus may make "tp" invalid. 4145 win_enter_ext(tp->tp_curwin, FALSE, TRUE, FALSE, 4146 trigger_enter_autocmds, trigger_leave_autocmds); 4147 prevwin = next_prevwin; 4148 4149 last_status(FALSE); // status line may appear or disappear 4150 row = win_comp_pos(); // recompute w_winrow for all windows 4151 #ifdef FEAT_DIFF 4152 diff_need_scrollbind = TRUE; 4153 #endif 4154 4155 // The tabpage line may have appeared or disappeared, may need to resize 4156 // the frames for that. When the Vim window was resized need to update 4157 // frame sizes too. Use the stored value of p_ch, so that it can be 4158 // different for each tab page. 4159 if (p_ch != curtab->tp_ch_used) 4160 clear_cmdline = TRUE; 4161 p_ch = curtab->tp_ch_used; 4162 4163 // When cmdheight is changed in a tab page with '<C-w>-', cmdline_row is 4164 // changed but p_ch and tp_ch_used are not changed. Thus we also need to 4165 // check cmdline_row. 4166 if ((row < cmdline_row) && (cmdline_row <= Rows - p_ch)) 4167 clear_cmdline = TRUE; 4168 4169 if (curtab->tp_old_Rows != Rows || (old_off != firstwin->w_winrow 4170 #ifdef FEAT_GUI_TABLINE 4171 && !gui_use_tabline() 4172 #endif 4173 )) 4174 shell_new_rows(); 4175 if (curtab->tp_old_Columns != Columns && starting == 0) 4176 shell_new_columns(); // update window widths 4177 4178 lastused_tabpage = last_tab; 4179 4180 #if defined(FEAT_GUI) 4181 // When 'guioptions' includes 'L' or 'R' may have to remove or add 4182 // scrollbars. Have to update them anyway. 4183 gui_may_update_scrollbars(); 4184 #endif 4185 4186 // Apply autocommands after updating the display, when 'rows' and 4187 // 'columns' have been set correctly. 4188 if (trigger_enter_autocmds) 4189 { 4190 apply_autocmds(EVENT_TABENTER, NULL, NULL, FALSE, curbuf); 4191 if (old_curbuf != curbuf) 4192 apply_autocmds(EVENT_BUFENTER, NULL, NULL, FALSE, curbuf); 4193 } 4194 4195 redraw_all_later(NOT_VALID); 4196 } 4197 4198 /* 4199 * Go to tab page "n". For ":tab N" and "Ngt". 4200 * When "n" is 9999 go to the last tab page. 4201 */ 4202 void 4203 goto_tabpage(int n) 4204 { 4205 tabpage_T *tp = NULL; // shut up compiler 4206 tabpage_T *ttp; 4207 int i; 4208 4209 if (text_locked()) 4210 { 4211 // Not allowed when editing the command line. 4212 text_locked_msg(); 4213 return; 4214 } 4215 4216 // If there is only one it can't work. 4217 if (first_tabpage->tp_next == NULL) 4218 { 4219 if (n > 1) 4220 beep_flush(); 4221 return; 4222 } 4223 4224 if (n == 0) 4225 { 4226 // No count, go to next tab page, wrap around end. 4227 if (curtab->tp_next == NULL) 4228 tp = first_tabpage; 4229 else 4230 tp = curtab->tp_next; 4231 } 4232 else if (n < 0) 4233 { 4234 // "gT": go to previous tab page, wrap around end. "N gT" repeats 4235 // this N times. 4236 ttp = curtab; 4237 for (i = n; i < 0; ++i) 4238 { 4239 for (tp = first_tabpage; tp->tp_next != ttp && tp->tp_next != NULL; 4240 tp = tp->tp_next) 4241 ; 4242 ttp = tp; 4243 } 4244 } 4245 else if (n == 9999) 4246 { 4247 // Go to last tab page. 4248 for (tp = first_tabpage; tp->tp_next != NULL; tp = tp->tp_next) 4249 ; 4250 } 4251 else 4252 { 4253 // Go to tab page "n". 4254 tp = find_tabpage(n); 4255 if (tp == NULL) 4256 { 4257 beep_flush(); 4258 return; 4259 } 4260 } 4261 4262 goto_tabpage_tp(tp, TRUE, TRUE); 4263 4264 #ifdef FEAT_GUI_TABLINE 4265 if (gui_use_tabline()) 4266 gui_mch_set_curtab(tabpage_index(curtab)); 4267 #endif 4268 } 4269 4270 /* 4271 * Go to tabpage "tp". 4272 * Only trigger *Enter autocommands when trigger_enter_autocmds is TRUE. 4273 * Only trigger *Leave autocommands when trigger_leave_autocmds is TRUE. 4274 * Note: doesn't update the GUI tab. 4275 */ 4276 void 4277 goto_tabpage_tp( 4278 tabpage_T *tp, 4279 int trigger_enter_autocmds, 4280 int trigger_leave_autocmds) 4281 { 4282 // Don't repeat a message in another tab page. 4283 set_keep_msg(NULL, 0); 4284 4285 if (tp != curtab && leave_tabpage(tp->tp_curwin->w_buffer, 4286 trigger_leave_autocmds) == OK) 4287 { 4288 if (valid_tabpage(tp)) 4289 enter_tabpage(tp, curbuf, trigger_enter_autocmds, 4290 trigger_leave_autocmds); 4291 else 4292 enter_tabpage(curtab, curbuf, trigger_enter_autocmds, 4293 trigger_leave_autocmds); 4294 } 4295 } 4296 4297 /* 4298 * Go to the last accessed tab page, if there is one. 4299 * Return OK or FAIL 4300 */ 4301 int 4302 goto_tabpage_lastused(void) 4303 { 4304 if (valid_tabpage(lastused_tabpage)) 4305 { 4306 goto_tabpage_tp(lastused_tabpage, TRUE, TRUE); 4307 return OK; 4308 } 4309 return FAIL; 4310 } 4311 4312 /* 4313 * Enter window "wp" in tab page "tp". 4314 * Also updates the GUI tab. 4315 */ 4316 void 4317 goto_tabpage_win(tabpage_T *tp, win_T *wp) 4318 { 4319 goto_tabpage_tp(tp, TRUE, TRUE); 4320 if (curtab == tp && win_valid(wp)) 4321 { 4322 win_enter(wp, TRUE); 4323 # ifdef FEAT_GUI_TABLINE 4324 if (gui_use_tabline()) 4325 gui_mch_set_curtab(tabpage_index(curtab)); 4326 # endif 4327 } 4328 } 4329 4330 /* 4331 * Move the current tab page to after tab page "nr". 4332 */ 4333 void 4334 tabpage_move(int nr) 4335 { 4336 int n = 1; 4337 tabpage_T *tp, *tp_dst; 4338 4339 if (first_tabpage->tp_next == NULL) 4340 return; 4341 4342 for (tp = first_tabpage; tp->tp_next != NULL && n < nr; tp = tp->tp_next) 4343 ++n; 4344 4345 if (tp == curtab || (nr > 0 && tp->tp_next != NULL 4346 && tp->tp_next == curtab)) 4347 return; 4348 4349 tp_dst = tp; 4350 4351 // Remove the current tab page from the list of tab pages. 4352 if (curtab == first_tabpage) 4353 first_tabpage = curtab->tp_next; 4354 else 4355 { 4356 FOR_ALL_TABPAGES(tp) 4357 if (tp->tp_next == curtab) 4358 break; 4359 if (tp == NULL) // "cannot happen" 4360 return; 4361 tp->tp_next = curtab->tp_next; 4362 } 4363 4364 // Re-insert it at the specified position. 4365 if (nr <= 0) 4366 { 4367 curtab->tp_next = first_tabpage; 4368 first_tabpage = curtab; 4369 } 4370 else 4371 { 4372 curtab->tp_next = tp_dst->tp_next; 4373 tp_dst->tp_next = curtab; 4374 } 4375 4376 // Need to redraw the tabline. Tab page contents doesn't change. 4377 redraw_tabline = TRUE; 4378 } 4379 4380 4381 /* 4382 * Go to another window. 4383 * When jumping to another buffer, stop Visual mode. Do this before 4384 * changing windows so we can yank the selection into the '*' register. 4385 * When jumping to another window on the same buffer, adjust its cursor 4386 * position to keep the same Visual area. 4387 */ 4388 void 4389 win_goto(win_T *wp) 4390 { 4391 #ifdef FEAT_CONCEAL 4392 win_T *owp = curwin; 4393 #endif 4394 4395 #ifdef FEAT_PROP_POPUP 4396 if (ERROR_IF_ANY_POPUP_WINDOW) 4397 return; 4398 if (popup_is_popup(wp)) 4399 { 4400 emsg(_("E366: Not allowed to enter a popup window")); 4401 return; 4402 } 4403 #endif 4404 if (text_and_win_locked()) 4405 { 4406 beep_flush(); 4407 text_locked_msg(); 4408 return; 4409 } 4410 if (curbuf_locked()) 4411 return; 4412 4413 if (wp->w_buffer != curbuf) 4414 reset_VIsual_and_resel(); 4415 else if (VIsual_active) 4416 wp->w_cursor = curwin->w_cursor; 4417 4418 #ifdef FEAT_GUI 4419 need_mouse_correct = TRUE; 4420 #endif 4421 win_enter(wp, TRUE); 4422 4423 #ifdef FEAT_CONCEAL 4424 // Conceal cursor line in previous window, unconceal in current window. 4425 if (win_valid(owp) && owp->w_p_cole > 0 && !msg_scrolled) 4426 redrawWinline(owp, owp->w_cursor.lnum); 4427 if (curwin->w_p_cole > 0 && !msg_scrolled) 4428 need_cursor_line_redraw = TRUE; 4429 #endif 4430 } 4431 4432 #if defined(FEAT_PERL) || defined(PROTO) 4433 /* 4434 * Find window number "winnr" (counting top to bottom). 4435 */ 4436 win_T * 4437 win_find_nr(int winnr) 4438 { 4439 win_T *wp; 4440 4441 FOR_ALL_WINDOWS(wp) 4442 if (--winnr == 0) 4443 break; 4444 return wp; 4445 } 4446 #endif 4447 4448 #if ((defined(FEAT_PYTHON) || defined(FEAT_PYTHON3))) || defined(PROTO) 4449 /* 4450 * Find the tabpage for window "win". 4451 */ 4452 tabpage_T * 4453 win_find_tabpage(win_T *win) 4454 { 4455 win_T *wp; 4456 tabpage_T *tp; 4457 4458 FOR_ALL_TAB_WINDOWS(tp, wp) 4459 if (wp == win) 4460 return tp; 4461 return NULL; 4462 } 4463 #endif 4464 4465 /* 4466 * Get the above or below neighbor window of the specified window. 4467 * up - TRUE for the above neighbor 4468 * count - nth neighbor window 4469 * Returns the specified window if the neighbor is not found. 4470 */ 4471 win_T * 4472 win_vert_neighbor(tabpage_T *tp, win_T *wp, int up, long count) 4473 { 4474 frame_T *fr; 4475 frame_T *nfr; 4476 frame_T *foundfr; 4477 4478 #ifdef FEAT_PROP_POPUP 4479 if (popup_is_popup(wp)) 4480 // popups don't have neighbors. 4481 return NULL; 4482 #endif 4483 foundfr = wp->w_frame; 4484 while (count--) 4485 { 4486 /* 4487 * First go upwards in the tree of frames until we find a upwards or 4488 * downwards neighbor. 4489 */ 4490 fr = foundfr; 4491 for (;;) 4492 { 4493 if (fr == tp->tp_topframe) 4494 goto end; 4495 if (up) 4496 nfr = fr->fr_prev; 4497 else 4498 nfr = fr->fr_next; 4499 if (fr->fr_parent->fr_layout == FR_COL && nfr != NULL) 4500 break; 4501 fr = fr->fr_parent; 4502 } 4503 4504 /* 4505 * Now go downwards to find the bottom or top frame in it. 4506 */ 4507 for (;;) 4508 { 4509 if (nfr->fr_layout == FR_LEAF) 4510 { 4511 foundfr = nfr; 4512 break; 4513 } 4514 fr = nfr->fr_child; 4515 if (nfr->fr_layout == FR_ROW) 4516 { 4517 // Find the frame at the cursor row. 4518 while (fr->fr_next != NULL 4519 && frame2win(fr)->w_wincol + fr->fr_width 4520 <= wp->w_wincol + wp->w_wcol) 4521 fr = fr->fr_next; 4522 } 4523 if (nfr->fr_layout == FR_COL && up) 4524 while (fr->fr_next != NULL) 4525 fr = fr->fr_next; 4526 nfr = fr; 4527 } 4528 } 4529 end: 4530 return foundfr != NULL ? foundfr->fr_win : NULL; 4531 } 4532 4533 /* 4534 * Move to window above or below "count" times. 4535 */ 4536 static void 4537 win_goto_ver( 4538 int up, // TRUE to go to win above 4539 long count) 4540 { 4541 win_T *win; 4542 4543 #ifdef FEAT_PROP_POPUP 4544 if (ERROR_IF_TERM_POPUP_WINDOW) 4545 return; 4546 #endif 4547 win = win_vert_neighbor(curtab, curwin, up, count); 4548 if (win != NULL) 4549 win_goto(win); 4550 } 4551 4552 /* 4553 * Get the left or right neighbor window of the specified window. 4554 * left - TRUE for the left neighbor 4555 * count - nth neighbor window 4556 * Returns the specified window if the neighbor is not found. 4557 */ 4558 win_T * 4559 win_horz_neighbor(tabpage_T *tp, win_T *wp, int left, long count) 4560 { 4561 frame_T *fr; 4562 frame_T *nfr; 4563 frame_T *foundfr; 4564 4565 #ifdef FEAT_PROP_POPUP 4566 if (popup_is_popup(wp)) 4567 // popups don't have neighbors. 4568 return NULL; 4569 #endif 4570 foundfr = wp->w_frame; 4571 while (count--) 4572 { 4573 /* 4574 * First go upwards in the tree of frames until we find a left or 4575 * right neighbor. 4576 */ 4577 fr = foundfr; 4578 for (;;) 4579 { 4580 if (fr == tp->tp_topframe) 4581 goto end; 4582 if (left) 4583 nfr = fr->fr_prev; 4584 else 4585 nfr = fr->fr_next; 4586 if (fr->fr_parent->fr_layout == FR_ROW && nfr != NULL) 4587 break; 4588 fr = fr->fr_parent; 4589 } 4590 4591 /* 4592 * Now go downwards to find the leftmost or rightmost frame in it. 4593 */ 4594 for (;;) 4595 { 4596 if (nfr->fr_layout == FR_LEAF) 4597 { 4598 foundfr = nfr; 4599 break; 4600 } 4601 fr = nfr->fr_child; 4602 if (nfr->fr_layout == FR_COL) 4603 { 4604 // Find the frame at the cursor row. 4605 while (fr->fr_next != NULL 4606 && frame2win(fr)->w_winrow + fr->fr_height 4607 <= wp->w_winrow + wp->w_wrow) 4608 fr = fr->fr_next; 4609 } 4610 if (nfr->fr_layout == FR_ROW && left) 4611 while (fr->fr_next != NULL) 4612 fr = fr->fr_next; 4613 nfr = fr; 4614 } 4615 } 4616 end: 4617 return foundfr != NULL ? foundfr->fr_win : NULL; 4618 } 4619 4620 /* 4621 * Move to left or right window. 4622 */ 4623 static void 4624 win_goto_hor( 4625 int left, // TRUE to go to left win 4626 long count) 4627 { 4628 win_T *win; 4629 4630 #ifdef FEAT_PROP_POPUP 4631 if (ERROR_IF_TERM_POPUP_WINDOW) 4632 return; 4633 #endif 4634 win = win_horz_neighbor(curtab, curwin, left, count); 4635 if (win != NULL) 4636 win_goto(win); 4637 } 4638 4639 /* 4640 * Make window "wp" the current window. 4641 */ 4642 void 4643 win_enter(win_T *wp, int undo_sync) 4644 { 4645 win_enter_ext(wp, undo_sync, FALSE, FALSE, TRUE, TRUE); 4646 } 4647 4648 /* 4649 * Make window wp the current window. 4650 * Can be called with "curwin_invalid" TRUE, which means that curwin has just 4651 * been closed and isn't valid. 4652 */ 4653 static void 4654 win_enter_ext( 4655 win_T *wp, 4656 int undo_sync, 4657 int curwin_invalid, 4658 int trigger_new_autocmds, 4659 int trigger_enter_autocmds, 4660 int trigger_leave_autocmds) 4661 { 4662 int other_buffer = FALSE; 4663 4664 if (wp == curwin && !curwin_invalid) // nothing to do 4665 return; 4666 4667 #ifdef FEAT_JOB_CHANNEL 4668 if (!curwin_invalid) 4669 leaving_window(curwin); 4670 #endif 4671 4672 if (!curwin_invalid && trigger_leave_autocmds) 4673 { 4674 /* 4675 * Be careful: If autocommands delete the window, return now. 4676 */ 4677 if (wp->w_buffer != curbuf) 4678 { 4679 apply_autocmds(EVENT_BUFLEAVE, NULL, NULL, FALSE, curbuf); 4680 other_buffer = TRUE; 4681 if (!win_valid(wp)) 4682 return; 4683 } 4684 apply_autocmds(EVENT_WINLEAVE, NULL, NULL, FALSE, curbuf); 4685 if (!win_valid(wp)) 4686 return; 4687 #ifdef FEAT_EVAL 4688 // autocmds may abort script processing 4689 if (aborting()) 4690 return; 4691 #endif 4692 } 4693 4694 // sync undo before leaving the current buffer 4695 if (undo_sync && curbuf != wp->w_buffer) 4696 u_sync(FALSE); 4697 4698 // Might need to scroll the old window before switching, e.g., when the 4699 // cursor was moved. 4700 update_topline(); 4701 4702 // may have to copy the buffer options when 'cpo' contains 'S' 4703 if (wp->w_buffer != curbuf) 4704 buf_copy_options(wp->w_buffer, BCO_ENTER | BCO_NOHELP); 4705 if (!curwin_invalid) 4706 { 4707 prevwin = curwin; // remember for CTRL-W p 4708 curwin->w_redr_status = TRUE; 4709 } 4710 curwin = wp; 4711 curbuf = wp->w_buffer; 4712 check_cursor(); 4713 if (!virtual_active()) 4714 curwin->w_cursor.coladd = 0; 4715 changed_line_abv_curs(); // assume cursor position needs updating 4716 4717 if (curwin->w_localdir != NULL || curtab->tp_localdir != NULL) 4718 { 4719 char_u *dirname; 4720 4721 // Window or tab has a local directory: Save current directory as 4722 // global directory (unless that was done already) and change to the 4723 // local directory. 4724 if (globaldir == NULL) 4725 { 4726 char_u cwd[MAXPATHL]; 4727 4728 if (mch_dirname(cwd, MAXPATHL) == OK) 4729 globaldir = vim_strsave(cwd); 4730 } 4731 if (curwin->w_localdir != NULL) 4732 dirname = curwin->w_localdir; 4733 else 4734 dirname = curtab->tp_localdir; 4735 4736 if (mch_chdir((char *)dirname) == 0) 4737 shorten_fnames(TRUE); 4738 } 4739 else if (globaldir != NULL) 4740 { 4741 // Window doesn't have a local directory and we are not in the global 4742 // directory: Change to the global directory. 4743 vim_ignored = mch_chdir((char *)globaldir); 4744 VIM_CLEAR(globaldir); 4745 shorten_fnames(TRUE); 4746 } 4747 4748 #ifdef FEAT_JOB_CHANNEL 4749 entering_window(curwin); 4750 #endif 4751 // Careful: autocommands may close the window and make "wp" invalid 4752 if (trigger_new_autocmds) 4753 apply_autocmds(EVENT_WINNEW, NULL, NULL, FALSE, curbuf); 4754 if (trigger_enter_autocmds) 4755 { 4756 apply_autocmds(EVENT_WINENTER, NULL, NULL, FALSE, curbuf); 4757 if (other_buffer) 4758 apply_autocmds(EVENT_BUFENTER, NULL, NULL, FALSE, curbuf); 4759 } 4760 4761 #ifdef FEAT_TITLE 4762 maketitle(); 4763 #endif 4764 curwin->w_redr_status = TRUE; 4765 #ifdef FEAT_TERMINAL 4766 if (bt_terminal(curwin->w_buffer)) 4767 // terminal is likely in another mode 4768 redraw_mode = TRUE; 4769 #endif 4770 redraw_tabline = TRUE; 4771 if (restart_edit) 4772 redraw_later(VALID); // causes status line redraw 4773 4774 // set window height to desired minimal value 4775 if (curwin->w_height < p_wh && !curwin->w_p_wfh 4776 #ifdef FEAT_PROP_POPUP 4777 && !popup_is_popup(curwin) 4778 #endif 4779 ) 4780 win_setheight((int)p_wh); 4781 else if (curwin->w_height == 0) 4782 win_setheight(1); 4783 4784 // set window width to desired minimal value 4785 if (curwin->w_width < p_wiw && !curwin->w_p_wfw) 4786 win_setwidth((int)p_wiw); 4787 4788 setmouse(); // in case jumped to/from help buffer 4789 4790 // Change directories when the 'acd' option is set. 4791 DO_AUTOCHDIR; 4792 } 4793 4794 4795 /* 4796 * Jump to the first open window that contains buffer "buf", if one exists. 4797 * Returns a pointer to the window found, otherwise NULL. 4798 */ 4799 win_T * 4800 buf_jump_open_win(buf_T *buf) 4801 { 4802 win_T *wp = NULL; 4803 4804 if (curwin->w_buffer == buf) 4805 wp = curwin; 4806 else 4807 FOR_ALL_WINDOWS(wp) 4808 if (wp->w_buffer == buf) 4809 break; 4810 if (wp != NULL) 4811 win_enter(wp, FALSE); 4812 return wp; 4813 } 4814 4815 /* 4816 * Jump to the first open window in any tab page that contains buffer "buf", 4817 * if one exists. 4818 * Returns a pointer to the window found, otherwise NULL. 4819 */ 4820 win_T * 4821 buf_jump_open_tab(buf_T *buf) 4822 { 4823 win_T *wp = buf_jump_open_win(buf); 4824 tabpage_T *tp; 4825 4826 if (wp != NULL) 4827 return wp; 4828 4829 FOR_ALL_TABPAGES(tp) 4830 if (tp != curtab) 4831 { 4832 FOR_ALL_WINDOWS_IN_TAB(tp, wp) 4833 if (wp->w_buffer == buf) 4834 break; 4835 if (wp != NULL) 4836 { 4837 goto_tabpage_win(tp, wp); 4838 if (curwin != wp) 4839 wp = NULL; // something went wrong 4840 break; 4841 } 4842 } 4843 return wp; 4844 } 4845 4846 static int last_win_id = LOWEST_WIN_ID - 1; 4847 4848 /* 4849 * Allocate a window structure and link it in the window list when "hidden" is 4850 * FALSE. 4851 */ 4852 static win_T * 4853 win_alloc(win_T *after UNUSED, int hidden UNUSED) 4854 { 4855 win_T *new_wp; 4856 4857 /* 4858 * allocate window structure and linesizes arrays 4859 */ 4860 new_wp = ALLOC_CLEAR_ONE(win_T); 4861 if (new_wp == NULL) 4862 return NULL; 4863 4864 if (win_alloc_lines(new_wp) == FAIL) 4865 { 4866 vim_free(new_wp); 4867 return NULL; 4868 } 4869 4870 new_wp->w_id = ++last_win_id; 4871 4872 #ifdef FEAT_EVAL 4873 // init w: variables 4874 new_wp->w_vars = dict_alloc(); 4875 if (new_wp->w_vars == NULL) 4876 { 4877 win_free_lsize(new_wp); 4878 vim_free(new_wp); 4879 return NULL; 4880 } 4881 init_var_dict(new_wp->w_vars, &new_wp->w_winvar, VAR_SCOPE); 4882 #endif 4883 4884 // Don't execute autocommands while the window is not properly 4885 // initialized yet. gui_create_scrollbar() may trigger a FocusGained 4886 // event. 4887 block_autocmds(); 4888 4889 /* 4890 * link the window in the window list 4891 */ 4892 if (!hidden) 4893 win_append(after, new_wp); 4894 new_wp->w_wincol = 0; 4895 new_wp->w_width = Columns; 4896 4897 // position the display and the cursor at the top of the file. 4898 new_wp->w_topline = 1; 4899 #ifdef FEAT_DIFF 4900 new_wp->w_topfill = 0; 4901 #endif 4902 new_wp->w_botline = 2; 4903 new_wp->w_cursor.lnum = 1; 4904 new_wp->w_scbind_pos = 1; 4905 4906 // use global option value for global-local options 4907 new_wp->w_p_so = -1; 4908 new_wp->w_p_siso = -1; 4909 4910 // We won't calculate w_fraction until resizing the window 4911 new_wp->w_fraction = 0; 4912 new_wp->w_prev_fraction_row = -1; 4913 4914 #ifdef FEAT_GUI 4915 if (gui.in_use) 4916 { 4917 gui_create_scrollbar(&new_wp->w_scrollbars[SBAR_LEFT], 4918 SBAR_LEFT, new_wp); 4919 gui_create_scrollbar(&new_wp->w_scrollbars[SBAR_RIGHT], 4920 SBAR_RIGHT, new_wp); 4921 } 4922 #endif 4923 #ifdef FEAT_FOLDING 4924 foldInitWin(new_wp); 4925 #endif 4926 unblock_autocmds(); 4927 #ifdef FEAT_SEARCH_EXTRA 4928 new_wp->w_match_head = NULL; 4929 new_wp->w_next_match_id = 4; 4930 #endif 4931 return new_wp; 4932 } 4933 4934 /* 4935 * Remove window 'wp' from the window list and free the structure. 4936 */ 4937 static void 4938 win_free( 4939 win_T *wp, 4940 tabpage_T *tp) // tab page "win" is in, NULL for current 4941 { 4942 int i; 4943 buf_T *buf; 4944 wininfo_T *wip; 4945 4946 #ifdef FEAT_FOLDING 4947 clearFolding(wp); 4948 #endif 4949 4950 // reduce the reference count to the argument list. 4951 alist_unlink(wp->w_alist); 4952 4953 // Don't execute autocommands while the window is halfway being deleted. 4954 // gui_mch_destroy_scrollbar() may trigger a FocusGained event. 4955 block_autocmds(); 4956 4957 #ifdef FEAT_LUA 4958 lua_window_free(wp); 4959 #endif 4960 4961 #ifdef FEAT_MZSCHEME 4962 mzscheme_window_free(wp); 4963 #endif 4964 4965 #ifdef FEAT_PERL 4966 perl_win_free(wp); 4967 #endif 4968 4969 #ifdef FEAT_PYTHON 4970 python_window_free(wp); 4971 #endif 4972 4973 #ifdef FEAT_PYTHON3 4974 python3_window_free(wp); 4975 #endif 4976 4977 #ifdef FEAT_TCL 4978 tcl_window_free(wp); 4979 #endif 4980 4981 #ifdef FEAT_RUBY 4982 ruby_window_free(wp); 4983 #endif 4984 4985 clear_winopt(&wp->w_onebuf_opt); 4986 clear_winopt(&wp->w_allbuf_opt); 4987 4988 #ifdef FEAT_EVAL 4989 vars_clear(&wp->w_vars->dv_hashtab); // free all w: variables 4990 hash_init(&wp->w_vars->dv_hashtab); 4991 unref_var_dict(wp->w_vars); 4992 #endif 4993 4994 { 4995 tabpage_T *ttp; 4996 4997 if (prevwin == wp) 4998 prevwin = NULL; 4999 FOR_ALL_TABPAGES(ttp) 5000 if (ttp->tp_prevwin == wp) 5001 ttp->tp_prevwin = NULL; 5002 } 5003 win_free_lsize(wp); 5004 5005 for (i = 0; i < wp->w_tagstacklen; ++i) 5006 { 5007 vim_free(wp->w_tagstack[i].tagname); 5008 vim_free(wp->w_tagstack[i].user_data); 5009 } 5010 vim_free(wp->w_localdir); 5011 vim_free(wp->w_prevdir); 5012 5013 // Remove the window from the b_wininfo lists, it may happen that the 5014 // freed memory is re-used for another window. 5015 FOR_ALL_BUFFERS(buf) 5016 FOR_ALL_BUF_WININFO(buf, wip) 5017 if (wip->wi_win == wp) 5018 wip->wi_win = NULL; 5019 5020 #ifdef FEAT_SEARCH_EXTRA 5021 clear_matches(wp); 5022 #endif 5023 5024 #ifdef FEAT_JUMPLIST 5025 free_jumplist(wp); 5026 #endif 5027 5028 #ifdef FEAT_QUICKFIX 5029 qf_free_all(wp); 5030 #endif 5031 5032 #ifdef FEAT_GUI 5033 if (gui.in_use) 5034 { 5035 gui_mch_destroy_scrollbar(&wp->w_scrollbars[SBAR_LEFT]); 5036 gui_mch_destroy_scrollbar(&wp->w_scrollbars[SBAR_RIGHT]); 5037 } 5038 #endif // FEAT_GUI 5039 5040 #ifdef FEAT_MENU 5041 remove_winbar(wp); 5042 #endif 5043 #ifdef FEAT_PROP_POPUP 5044 free_callback(&wp->w_close_cb); 5045 free_callback(&wp->w_filter_cb); 5046 for (i = 0; i < 4; ++i) 5047 VIM_CLEAR(wp->w_border_highlight[i]); 5048 vim_free(wp->w_scrollbar_highlight); 5049 vim_free(wp->w_thumb_highlight); 5050 vim_free(wp->w_popup_title); 5051 list_unref(wp->w_popup_mask); 5052 vim_free(wp->w_popup_mask_cells); 5053 #endif 5054 5055 #ifdef FEAT_SYN_HL 5056 vim_free(wp->w_p_cc_cols); 5057 #endif 5058 5059 if (win_valid_any_tab(wp)) 5060 win_remove(wp, tp); 5061 if (autocmd_busy) 5062 { 5063 wp->w_next = au_pending_free_win; 5064 au_pending_free_win = wp; 5065 } 5066 else 5067 vim_free(wp); 5068 5069 unblock_autocmds(); 5070 } 5071 5072 /* 5073 * Return TRUE if "wp" is not in the list of windows: the autocmd window or a 5074 * popup window. 5075 */ 5076 static int 5077 win_unlisted(win_T *wp) 5078 { 5079 return wp == aucmd_win || WIN_IS_POPUP(wp); 5080 } 5081 5082 #if defined(FEAT_PROP_POPUP) || defined(PROTO) 5083 /* 5084 * Free a popup window. This does not take the window out of the window list 5085 * and assumes there is only one toplevel frame, no split. 5086 */ 5087 void 5088 win_free_popup(win_T *win) 5089 { 5090 if (bt_popup(win->w_buffer)) 5091 win_close_buffer(win, DOBUF_WIPE_REUSE, FALSE); 5092 else 5093 close_buffer(win, win->w_buffer, 0, FALSE, FALSE); 5094 # if defined(FEAT_TIMERS) 5095 if (win->w_popup_timer != NULL) 5096 stop_timer(win->w_popup_timer); 5097 # endif 5098 vim_free(win->w_frame); 5099 win_free(win, NULL); 5100 } 5101 #endif 5102 5103 /* 5104 * Append window "wp" in the window list after window "after". 5105 */ 5106 static void 5107 win_append(win_T *after, win_T *wp) 5108 { 5109 win_T *before; 5110 5111 if (after == NULL) // after NULL is in front of the first 5112 before = firstwin; 5113 else 5114 before = after->w_next; 5115 5116 wp->w_next = before; 5117 wp->w_prev = after; 5118 if (after == NULL) 5119 firstwin = wp; 5120 else 5121 after->w_next = wp; 5122 if (before == NULL) 5123 lastwin = wp; 5124 else 5125 before->w_prev = wp; 5126 } 5127 5128 /* 5129 * Remove a window from the window list. 5130 */ 5131 void 5132 win_remove( 5133 win_T *wp, 5134 tabpage_T *tp) // tab page "win" is in, NULL for current 5135 { 5136 if (wp->w_prev != NULL) 5137 wp->w_prev->w_next = wp->w_next; 5138 else if (tp == NULL) 5139 firstwin = curtab->tp_firstwin = wp->w_next; 5140 else 5141 tp->tp_firstwin = wp->w_next; 5142 5143 if (wp->w_next != NULL) 5144 wp->w_next->w_prev = wp->w_prev; 5145 else if (tp == NULL) 5146 lastwin = curtab->tp_lastwin = wp->w_prev; 5147 else 5148 tp->tp_lastwin = wp->w_prev; 5149 } 5150 5151 /* 5152 * Append frame "frp" in a frame list after frame "after". 5153 */ 5154 static void 5155 frame_append(frame_T *after, frame_T *frp) 5156 { 5157 frp->fr_next = after->fr_next; 5158 after->fr_next = frp; 5159 if (frp->fr_next != NULL) 5160 frp->fr_next->fr_prev = frp; 5161 frp->fr_prev = after; 5162 } 5163 5164 /* 5165 * Insert frame "frp" in a frame list before frame "before". 5166 */ 5167 static void 5168 frame_insert(frame_T *before, frame_T *frp) 5169 { 5170 frp->fr_next = before; 5171 frp->fr_prev = before->fr_prev; 5172 before->fr_prev = frp; 5173 if (frp->fr_prev != NULL) 5174 frp->fr_prev->fr_next = frp; 5175 else 5176 frp->fr_parent->fr_child = frp; 5177 } 5178 5179 /* 5180 * Remove a frame from a frame list. 5181 */ 5182 static void 5183 frame_remove(frame_T *frp) 5184 { 5185 if (frp->fr_prev != NULL) 5186 frp->fr_prev->fr_next = frp->fr_next; 5187 else 5188 { 5189 frp->fr_parent->fr_child = frp->fr_next; 5190 // special case: topframe->fr_child == frp 5191 if (topframe->fr_child == frp) 5192 topframe->fr_child = frp->fr_next; 5193 } 5194 if (frp->fr_next != NULL) 5195 frp->fr_next->fr_prev = frp->fr_prev; 5196 } 5197 5198 /* 5199 * Allocate w_lines[] for window "wp". 5200 * Return FAIL for failure, OK for success. 5201 */ 5202 int 5203 win_alloc_lines(win_T *wp) 5204 { 5205 wp->w_lines_valid = 0; 5206 wp->w_lines = ALLOC_CLEAR_MULT(wline_T, Rows ); 5207 if (wp->w_lines == NULL) 5208 return FAIL; 5209 return OK; 5210 } 5211 5212 /* 5213 * free lsize arrays for a window 5214 */ 5215 void 5216 win_free_lsize(win_T *wp) 5217 { 5218 // TODO: why would wp be NULL here? 5219 if (wp != NULL) 5220 VIM_CLEAR(wp->w_lines); 5221 } 5222 5223 /* 5224 * Called from win_new_shellsize() after Rows changed. 5225 * This only does the current tab page, others must be done when made active. 5226 */ 5227 void 5228 shell_new_rows(void) 5229 { 5230 int h = (int)ROWS_AVAIL; 5231 5232 if (firstwin == NULL) // not initialized yet 5233 return; 5234 if (h < frame_minheight(topframe, NULL)) 5235 h = frame_minheight(topframe, NULL); 5236 5237 // First try setting the heights of windows with 'winfixheight'. If 5238 // that doesn't result in the right height, forget about that option. 5239 frame_new_height(topframe, h, FALSE, TRUE); 5240 if (!frame_check_height(topframe, h)) 5241 frame_new_height(topframe, h, FALSE, FALSE); 5242 5243 (void)win_comp_pos(); // recompute w_winrow and w_wincol 5244 compute_cmdrow(); 5245 curtab->tp_ch_used = p_ch; 5246 5247 #if 0 5248 // Disabled: don't want making the screen smaller make a window larger. 5249 if (p_ea) 5250 win_equal(curwin, FALSE, 'v'); 5251 #endif 5252 } 5253 5254 /* 5255 * Called from win_new_shellsize() after Columns changed. 5256 */ 5257 void 5258 shell_new_columns(void) 5259 { 5260 if (firstwin == NULL) // not initialized yet 5261 return; 5262 5263 // First try setting the widths of windows with 'winfixwidth'. If that 5264 // doesn't result in the right width, forget about that option. 5265 frame_new_width(topframe, (int)Columns, FALSE, TRUE); 5266 if (!frame_check_width(topframe, Columns)) 5267 frame_new_width(topframe, (int)Columns, FALSE, FALSE); 5268 5269 (void)win_comp_pos(); // recompute w_winrow and w_wincol 5270 #if 0 5271 // Disabled: don't want making the screen smaller make a window larger. 5272 if (p_ea) 5273 win_equal(curwin, FALSE, 'h'); 5274 #endif 5275 } 5276 5277 #if defined(FEAT_CMDWIN) || defined(PROTO) 5278 /* 5279 * Save the size of all windows in "gap". 5280 */ 5281 void 5282 win_size_save(garray_T *gap) 5283 5284 { 5285 win_T *wp; 5286 5287 ga_init2(gap, (int)sizeof(int), 1); 5288 if (ga_grow(gap, win_count() * 2 + 1) == OK) 5289 { 5290 // first entry is value of 'lines' 5291 ((int *)gap->ga_data)[gap->ga_len++] = Rows; 5292 5293 FOR_ALL_WINDOWS(wp) 5294 { 5295 ((int *)gap->ga_data)[gap->ga_len++] = 5296 wp->w_width + wp->w_vsep_width; 5297 ((int *)gap->ga_data)[gap->ga_len++] = wp->w_height; 5298 } 5299 } 5300 } 5301 5302 /* 5303 * Restore window sizes, but only if the number of windows is still the same 5304 * and 'lines' didn't change. 5305 * Does not free the growarray. 5306 */ 5307 void 5308 win_size_restore(garray_T *gap) 5309 { 5310 win_T *wp; 5311 int i, j; 5312 5313 if (win_count() * 2 + 1 == gap->ga_len 5314 && ((int *)gap->ga_data)[0] == Rows) 5315 { 5316 // The order matters, because frames contain other frames, but it's 5317 // difficult to get right. The easy way out is to do it twice. 5318 for (j = 0; j < 2; ++j) 5319 { 5320 i = 1; 5321 FOR_ALL_WINDOWS(wp) 5322 { 5323 frame_setwidth(wp->w_frame, ((int *)gap->ga_data)[i++]); 5324 win_setheight_win(((int *)gap->ga_data)[i++], wp); 5325 } 5326 } 5327 // recompute the window positions 5328 (void)win_comp_pos(); 5329 } 5330 } 5331 #endif // FEAT_CMDWIN 5332 5333 /* 5334 * Update the position for all windows, using the width and height of the 5335 * frames. 5336 * Returns the row just after the last window. 5337 */ 5338 int 5339 win_comp_pos(void) 5340 { 5341 int row = tabline_height(); 5342 int col = 0; 5343 5344 frame_comp_pos(topframe, &row, &col); 5345 return row; 5346 } 5347 5348 /* 5349 * Update the position of the windows in frame "topfrp", using the width and 5350 * height of the frames. 5351 * "*row" and "*col" are the top-left position of the frame. They are updated 5352 * to the bottom-right position plus one. 5353 */ 5354 static void 5355 frame_comp_pos(frame_T *topfrp, int *row, int *col) 5356 { 5357 win_T *wp; 5358 frame_T *frp; 5359 int startcol; 5360 int startrow; 5361 int h; 5362 5363 wp = topfrp->fr_win; 5364 if (wp != NULL) 5365 { 5366 if (wp->w_winrow != *row || wp->w_wincol != *col) 5367 { 5368 // position changed, redraw 5369 wp->w_winrow = *row; 5370 wp->w_wincol = *col; 5371 redraw_win_later(wp, NOT_VALID); 5372 wp->w_redr_status = TRUE; 5373 } 5374 // WinBar will not show if the window height is zero 5375 h = VISIBLE_HEIGHT(wp) + wp->w_status_height; 5376 *row += h > topfrp->fr_height ? topfrp->fr_height : h; 5377 *col += wp->w_width + wp->w_vsep_width; 5378 } 5379 else 5380 { 5381 startrow = *row; 5382 startcol = *col; 5383 FOR_ALL_FRAMES(frp, topfrp->fr_child) 5384 { 5385 if (topfrp->fr_layout == FR_ROW) 5386 *row = startrow; // all frames are at the same row 5387 else 5388 *col = startcol; // all frames are at the same col 5389 frame_comp_pos(frp, row, col); 5390 } 5391 } 5392 } 5393 5394 /* 5395 * Set current window height and take care of repositioning other windows to 5396 * fit around it. 5397 */ 5398 void 5399 win_setheight(int height) 5400 { 5401 win_setheight_win(height, curwin); 5402 } 5403 5404 /* 5405 * Set the window height of window "win" and take care of repositioning other 5406 * windows to fit around it. 5407 */ 5408 void 5409 win_setheight_win(int height, win_T *win) 5410 { 5411 int row; 5412 5413 if (win == curwin) 5414 { 5415 // Always keep current window at least one line high, even when 5416 // 'winminheight' is zero. 5417 if (height < p_wmh) 5418 height = p_wmh; 5419 if (height == 0) 5420 height = 1; 5421 height += WINBAR_HEIGHT(curwin); 5422 } 5423 5424 frame_setheight(win->w_frame, height + win->w_status_height); 5425 5426 // recompute the window positions 5427 row = win_comp_pos(); 5428 5429 /* 5430 * If there is extra space created between the last window and the command 5431 * line, clear it. 5432 */ 5433 if (full_screen && msg_scrolled == 0 && row < cmdline_row) 5434 screen_fill(row, cmdline_row, 0, (int)Columns, ' ', ' ', 0); 5435 cmdline_row = row; 5436 msg_row = row; 5437 msg_col = 0; 5438 5439 redraw_all_later(NOT_VALID); 5440 } 5441 5442 /* 5443 * Set the height of a frame to "height" and take care that all frames and 5444 * windows inside it are resized. Also resize frames on the left and right if 5445 * the are in the same FR_ROW frame. 5446 * 5447 * Strategy: 5448 * If the frame is part of a FR_COL frame, try fitting the frame in that 5449 * frame. If that doesn't work (the FR_COL frame is too small), recursively 5450 * go to containing frames to resize them and make room. 5451 * If the frame is part of a FR_ROW frame, all frames must be resized as well. 5452 * Check for the minimal height of the FR_ROW frame. 5453 * At the top level we can also use change the command line height. 5454 */ 5455 static void 5456 frame_setheight(frame_T *curfrp, int height) 5457 { 5458 int room; // total number of lines available 5459 int take; // number of lines taken from other windows 5460 int room_cmdline; // lines available from cmdline 5461 int run; 5462 frame_T *frp; 5463 int h; 5464 int room_reserved; 5465 5466 // If the height already is the desired value, nothing to do. 5467 if (curfrp->fr_height == height) 5468 return; 5469 5470 if (curfrp->fr_parent == NULL) 5471 { 5472 // topframe: can only change the command line 5473 if (height > ROWS_AVAIL) 5474 height = ROWS_AVAIL; 5475 if (height > 0) 5476 frame_new_height(curfrp, height, FALSE, FALSE); 5477 } 5478 else if (curfrp->fr_parent->fr_layout == FR_ROW) 5479 { 5480 // Row of frames: Also need to resize frames left and right of this 5481 // one. First check for the minimal height of these. 5482 h = frame_minheight(curfrp->fr_parent, NULL); 5483 if (height < h) 5484 height = h; 5485 frame_setheight(curfrp->fr_parent, height); 5486 } 5487 else 5488 { 5489 /* 5490 * Column of frames: try to change only frames in this column. 5491 */ 5492 /* 5493 * Do this twice: 5494 * 1: compute room available, if it's not enough try resizing the 5495 * containing frame. 5496 * 2: compute the room available and adjust the height to it. 5497 * Try not to reduce the height of a window with 'winfixheight' set. 5498 */ 5499 for (run = 1; run <= 2; ++run) 5500 { 5501 room = 0; 5502 room_reserved = 0; 5503 FOR_ALL_FRAMES(frp, curfrp->fr_parent->fr_child) 5504 { 5505 if (frp != curfrp 5506 && frp->fr_win != NULL 5507 && frp->fr_win->w_p_wfh) 5508 room_reserved += frp->fr_height; 5509 room += frp->fr_height; 5510 if (frp != curfrp) 5511 room -= frame_minheight(frp, NULL); 5512 } 5513 if (curfrp->fr_width != Columns) 5514 room_cmdline = 0; 5515 else 5516 { 5517 room_cmdline = Rows - p_ch - (lastwin->w_winrow 5518 + VISIBLE_HEIGHT(lastwin) 5519 + lastwin->w_status_height); 5520 if (room_cmdline < 0) 5521 room_cmdline = 0; 5522 } 5523 5524 if (height <= room + room_cmdline) 5525 break; 5526 if (run == 2 || curfrp->fr_width == Columns) 5527 { 5528 if (height > room + room_cmdline) 5529 height = room + room_cmdline; 5530 break; 5531 } 5532 frame_setheight(curfrp->fr_parent, height 5533 + frame_minheight(curfrp->fr_parent, NOWIN) - (int)p_wmh - 1); 5534 } 5535 5536 /* 5537 * Compute the number of lines we will take from others frames (can be 5538 * negative!). 5539 */ 5540 take = height - curfrp->fr_height; 5541 5542 // If there is not enough room, also reduce the height of a window 5543 // with 'winfixheight' set. 5544 if (height > room + room_cmdline - room_reserved) 5545 room_reserved = room + room_cmdline - height; 5546 // If there is only a 'winfixheight' window and making the 5547 // window smaller, need to make the other window taller. 5548 if (take < 0 && room - curfrp->fr_height < room_reserved) 5549 room_reserved = 0; 5550 5551 if (take > 0 && room_cmdline > 0) 5552 { 5553 // use lines from cmdline first 5554 if (take < room_cmdline) 5555 room_cmdline = take; 5556 take -= room_cmdline; 5557 topframe->fr_height += room_cmdline; 5558 } 5559 5560 /* 5561 * set the current frame to the new height 5562 */ 5563 frame_new_height(curfrp, height, FALSE, FALSE); 5564 5565 /* 5566 * First take lines from the frames after the current frame. If 5567 * that is not enough, takes lines from frames above the current 5568 * frame. 5569 */ 5570 for (run = 0; run < 2; ++run) 5571 { 5572 if (run == 0) 5573 frp = curfrp->fr_next; // 1st run: start with next window 5574 else 5575 frp = curfrp->fr_prev; // 2nd run: start with prev window 5576 while (frp != NULL && take != 0) 5577 { 5578 h = frame_minheight(frp, NULL); 5579 if (room_reserved > 0 5580 && frp->fr_win != NULL 5581 && frp->fr_win->w_p_wfh) 5582 { 5583 if (room_reserved >= frp->fr_height) 5584 room_reserved -= frp->fr_height; 5585 else 5586 { 5587 if (frp->fr_height - room_reserved > take) 5588 room_reserved = frp->fr_height - take; 5589 take -= frp->fr_height - room_reserved; 5590 frame_new_height(frp, room_reserved, FALSE, FALSE); 5591 room_reserved = 0; 5592 } 5593 } 5594 else 5595 { 5596 if (frp->fr_height - take < h) 5597 { 5598 take -= frp->fr_height - h; 5599 frame_new_height(frp, h, FALSE, FALSE); 5600 } 5601 else 5602 { 5603 frame_new_height(frp, frp->fr_height - take, 5604 FALSE, FALSE); 5605 take = 0; 5606 } 5607 } 5608 if (run == 0) 5609 frp = frp->fr_next; 5610 else 5611 frp = frp->fr_prev; 5612 } 5613 } 5614 } 5615 } 5616 5617 /* 5618 * Set current window width and take care of repositioning other windows to 5619 * fit around it. 5620 */ 5621 void 5622 win_setwidth(int width) 5623 { 5624 win_setwidth_win(width, curwin); 5625 } 5626 5627 void 5628 win_setwidth_win(int width, win_T *wp) 5629 { 5630 // Always keep current window at least one column wide, even when 5631 // 'winminwidth' is zero. 5632 if (wp == curwin) 5633 { 5634 if (width < p_wmw) 5635 width = p_wmw; 5636 if (width == 0) 5637 width = 1; 5638 } 5639 5640 frame_setwidth(wp->w_frame, width + wp->w_vsep_width); 5641 5642 // recompute the window positions 5643 (void)win_comp_pos(); 5644 5645 redraw_all_later(NOT_VALID); 5646 } 5647 5648 /* 5649 * Set the width of a frame to "width" and take care that all frames and 5650 * windows inside it are resized. Also resize frames above and below if the 5651 * are in the same FR_ROW frame. 5652 * 5653 * Strategy is similar to frame_setheight(). 5654 */ 5655 static void 5656 frame_setwidth(frame_T *curfrp, int width) 5657 { 5658 int room; // total number of lines available 5659 int take; // number of lines taken from other windows 5660 int run; 5661 frame_T *frp; 5662 int w; 5663 int room_reserved; 5664 5665 // If the width already is the desired value, nothing to do. 5666 if (curfrp->fr_width == width) 5667 return; 5668 5669 if (curfrp->fr_parent == NULL) 5670 // topframe: can't change width 5671 return; 5672 5673 if (curfrp->fr_parent->fr_layout == FR_COL) 5674 { 5675 // Column of frames: Also need to resize frames above and below of 5676 // this one. First check for the minimal width of these. 5677 w = frame_minwidth(curfrp->fr_parent, NULL); 5678 if (width < w) 5679 width = w; 5680 frame_setwidth(curfrp->fr_parent, width); 5681 } 5682 else 5683 { 5684 /* 5685 * Row of frames: try to change only frames in this row. 5686 * 5687 * Do this twice: 5688 * 1: compute room available, if it's not enough try resizing the 5689 * containing frame. 5690 * 2: compute the room available and adjust the width to it. 5691 */ 5692 for (run = 1; run <= 2; ++run) 5693 { 5694 room = 0; 5695 room_reserved = 0; 5696 FOR_ALL_FRAMES(frp, curfrp->fr_parent->fr_child) 5697 { 5698 if (frp != curfrp 5699 && frp->fr_win != NULL 5700 && frp->fr_win->w_p_wfw) 5701 room_reserved += frp->fr_width; 5702 room += frp->fr_width; 5703 if (frp != curfrp) 5704 room -= frame_minwidth(frp, NULL); 5705 } 5706 5707 if (width <= room) 5708 break; 5709 if (run == 2 || curfrp->fr_height >= ROWS_AVAIL) 5710 { 5711 if (width > room) 5712 width = room; 5713 break; 5714 } 5715 frame_setwidth(curfrp->fr_parent, width 5716 + frame_minwidth(curfrp->fr_parent, NOWIN) - (int)p_wmw - 1); 5717 } 5718 5719 /* 5720 * Compute the number of lines we will take from others frames (can be 5721 * negative!). 5722 */ 5723 take = width - curfrp->fr_width; 5724 5725 // If there is not enough room, also reduce the width of a window 5726 // with 'winfixwidth' set. 5727 if (width > room - room_reserved) 5728 room_reserved = room - width; 5729 // If there is only a 'winfixwidth' window and making the 5730 // window smaller, need to make the other window narrower. 5731 if (take < 0 && room - curfrp->fr_width < room_reserved) 5732 room_reserved = 0; 5733 5734 /* 5735 * set the current frame to the new width 5736 */ 5737 frame_new_width(curfrp, width, FALSE, FALSE); 5738 5739 /* 5740 * First take lines from the frames right of the current frame. If 5741 * that is not enough, takes lines from frames left of the current 5742 * frame. 5743 */ 5744 for (run = 0; run < 2; ++run) 5745 { 5746 if (run == 0) 5747 frp = curfrp->fr_next; // 1st run: start with next window 5748 else 5749 frp = curfrp->fr_prev; // 2nd run: start with prev window 5750 while (frp != NULL && take != 0) 5751 { 5752 w = frame_minwidth(frp, NULL); 5753 if (room_reserved > 0 5754 && frp->fr_win != NULL 5755 && frp->fr_win->w_p_wfw) 5756 { 5757 if (room_reserved >= frp->fr_width) 5758 room_reserved -= frp->fr_width; 5759 else 5760 { 5761 if (frp->fr_width - room_reserved > take) 5762 room_reserved = frp->fr_width - take; 5763 take -= frp->fr_width - room_reserved; 5764 frame_new_width(frp, room_reserved, FALSE, FALSE); 5765 room_reserved = 0; 5766 } 5767 } 5768 else 5769 { 5770 if (frp->fr_width - take < w) 5771 { 5772 take -= frp->fr_width - w; 5773 frame_new_width(frp, w, FALSE, FALSE); 5774 } 5775 else 5776 { 5777 frame_new_width(frp, frp->fr_width - take, 5778 FALSE, FALSE); 5779 take = 0; 5780 } 5781 } 5782 if (run == 0) 5783 frp = frp->fr_next; 5784 else 5785 frp = frp->fr_prev; 5786 } 5787 } 5788 } 5789 } 5790 5791 /* 5792 * Check 'winminheight' for a valid value and reduce it if needed. 5793 */ 5794 void 5795 win_setminheight(void) 5796 { 5797 int room; 5798 int needed; 5799 int first = TRUE; 5800 5801 // loop until there is a 'winminheight' that is possible 5802 while (p_wmh > 0) 5803 { 5804 room = Rows - p_ch; 5805 needed = frame_minheight(topframe, NULL); 5806 if (room >= needed) 5807 break; 5808 --p_wmh; 5809 if (first) 5810 { 5811 emsg(_(e_noroom)); 5812 first = FALSE; 5813 } 5814 } 5815 } 5816 5817 /* 5818 * Check 'winminwidth' for a valid value and reduce it if needed. 5819 */ 5820 void 5821 win_setminwidth(void) 5822 { 5823 int room; 5824 int needed; 5825 int first = TRUE; 5826 5827 // loop until there is a 'winminheight' that is possible 5828 while (p_wmw > 0) 5829 { 5830 room = Columns; 5831 needed = frame_minwidth(topframe, NULL); 5832 if (room >= needed) 5833 break; 5834 --p_wmw; 5835 if (first) 5836 { 5837 emsg(_(e_noroom)); 5838 first = FALSE; 5839 } 5840 } 5841 } 5842 5843 /* 5844 * Status line of dragwin is dragged "offset" lines down (negative is up). 5845 */ 5846 void 5847 win_drag_status_line(win_T *dragwin, int offset) 5848 { 5849 frame_T *curfr; 5850 frame_T *fr; 5851 int room; 5852 int row; 5853 int up; // if TRUE, drag status line up, otherwise down 5854 int n; 5855 5856 fr = dragwin->w_frame; 5857 curfr = fr; 5858 if (fr != topframe) // more than one window 5859 { 5860 fr = fr->fr_parent; 5861 // When the parent frame is not a column of frames, its parent should 5862 // be. 5863 if (fr->fr_layout != FR_COL) 5864 { 5865 curfr = fr; 5866 if (fr != topframe) // only a row of windows, may drag statusline 5867 fr = fr->fr_parent; 5868 } 5869 } 5870 5871 // If this is the last frame in a column, may want to resize the parent 5872 // frame instead (go two up to skip a row of frames). 5873 while (curfr != topframe && curfr->fr_next == NULL) 5874 { 5875 if (fr != topframe) 5876 fr = fr->fr_parent; 5877 curfr = fr; 5878 if (fr != topframe) 5879 fr = fr->fr_parent; 5880 } 5881 5882 if (offset < 0) // drag up 5883 { 5884 up = TRUE; 5885 offset = -offset; 5886 // sum up the room of the current frame and above it 5887 if (fr == curfr) 5888 { 5889 // only one window 5890 room = fr->fr_height - frame_minheight(fr, NULL); 5891 } 5892 else 5893 { 5894 room = 0; 5895 for (fr = fr->fr_child; ; fr = fr->fr_next) 5896 { 5897 room += fr->fr_height - frame_minheight(fr, NULL); 5898 if (fr == curfr) 5899 break; 5900 } 5901 } 5902 fr = curfr->fr_next; // put fr at frame that grows 5903 } 5904 else // drag down 5905 { 5906 up = FALSE; 5907 /* 5908 * Only dragging the last status line can reduce p_ch. 5909 */ 5910 room = Rows - cmdline_row; 5911 if (curfr->fr_next == NULL) 5912 room -= 1; 5913 else 5914 room -= p_ch; 5915 if (room < 0) 5916 room = 0; 5917 // sum up the room of frames below of the current one 5918 FOR_ALL_FRAMES(fr, curfr->fr_next) 5919 room += fr->fr_height - frame_minheight(fr, NULL); 5920 fr = curfr; // put fr at window that grows 5921 } 5922 5923 if (room < offset) // Not enough room 5924 offset = room; // Move as far as we can 5925 if (offset <= 0) 5926 return; 5927 5928 /* 5929 * Grow frame fr by "offset" lines. 5930 * Doesn't happen when dragging the last status line up. 5931 */ 5932 if (fr != NULL) 5933 frame_new_height(fr, fr->fr_height + offset, up, FALSE); 5934 5935 if (up) 5936 fr = curfr; // current frame gets smaller 5937 else 5938 fr = curfr->fr_next; // next frame gets smaller 5939 5940 /* 5941 * Now make the other frames smaller. 5942 */ 5943 while (fr != NULL && offset > 0) 5944 { 5945 n = frame_minheight(fr, NULL); 5946 if (fr->fr_height - offset <= n) 5947 { 5948 offset -= fr->fr_height - n; 5949 frame_new_height(fr, n, !up, FALSE); 5950 } 5951 else 5952 { 5953 frame_new_height(fr, fr->fr_height - offset, !up, FALSE); 5954 break; 5955 } 5956 if (up) 5957 fr = fr->fr_prev; 5958 else 5959 fr = fr->fr_next; 5960 } 5961 row = win_comp_pos(); 5962 screen_fill(row, cmdline_row, 0, (int)Columns, ' ', ' ', 0); 5963 cmdline_row = row; 5964 p_ch = Rows - cmdline_row; 5965 if (p_ch < 1) 5966 p_ch = 1; 5967 curtab->tp_ch_used = p_ch; 5968 redraw_all_later(SOME_VALID); 5969 showmode(); 5970 } 5971 5972 /* 5973 * Separator line of dragwin is dragged "offset" lines right (negative is left). 5974 */ 5975 void 5976 win_drag_vsep_line(win_T *dragwin, int offset) 5977 { 5978 frame_T *curfr; 5979 frame_T *fr; 5980 int room; 5981 int left; // if TRUE, drag separator line left, otherwise right 5982 int n; 5983 5984 fr = dragwin->w_frame; 5985 if (fr == topframe) // only one window (cannot happen?) 5986 return; 5987 curfr = fr; 5988 fr = fr->fr_parent; 5989 // When the parent frame is not a row of frames, its parent should be. 5990 if (fr->fr_layout != FR_ROW) 5991 { 5992 if (fr == topframe) // only a column of windows (cannot happen?) 5993 return; 5994 curfr = fr; 5995 fr = fr->fr_parent; 5996 } 5997 5998 // If this is the last frame in a row, may want to resize a parent 5999 // frame instead. 6000 while (curfr->fr_next == NULL) 6001 { 6002 if (fr == topframe) 6003 break; 6004 curfr = fr; 6005 fr = fr->fr_parent; 6006 if (fr != topframe) 6007 { 6008 curfr = fr; 6009 fr = fr->fr_parent; 6010 } 6011 } 6012 6013 if (offset < 0) // drag left 6014 { 6015 left = TRUE; 6016 offset = -offset; 6017 // sum up the room of the current frame and left of it 6018 room = 0; 6019 for (fr = fr->fr_child; ; fr = fr->fr_next) 6020 { 6021 room += fr->fr_width - frame_minwidth(fr, NULL); 6022 if (fr == curfr) 6023 break; 6024 } 6025 fr = curfr->fr_next; // put fr at frame that grows 6026 } 6027 else // drag right 6028 { 6029 left = FALSE; 6030 // sum up the room of frames right of the current one 6031 room = 0; 6032 FOR_ALL_FRAMES(fr, curfr->fr_next) 6033 room += fr->fr_width - frame_minwidth(fr, NULL); 6034 fr = curfr; // put fr at window that grows 6035 } 6036 6037 if (room < offset) // Not enough room 6038 offset = room; // Move as far as we can 6039 if (offset <= 0) // No room at all, quit. 6040 return; 6041 if (fr == NULL) 6042 return; // Safety check, should not happen. 6043 6044 // grow frame fr by offset lines 6045 frame_new_width(fr, fr->fr_width + offset, left, FALSE); 6046 6047 // shrink other frames: current and at the left or at the right 6048 if (left) 6049 fr = curfr; // current frame gets smaller 6050 else 6051 fr = curfr->fr_next; // next frame gets smaller 6052 6053 while (fr != NULL && offset > 0) 6054 { 6055 n = frame_minwidth(fr, NULL); 6056 if (fr->fr_width - offset <= n) 6057 { 6058 offset -= fr->fr_width - n; 6059 frame_new_width(fr, n, !left, FALSE); 6060 } 6061 else 6062 { 6063 frame_new_width(fr, fr->fr_width - offset, !left, FALSE); 6064 break; 6065 } 6066 if (left) 6067 fr = fr->fr_prev; 6068 else 6069 fr = fr->fr_next; 6070 } 6071 (void)win_comp_pos(); 6072 redraw_all_later(NOT_VALID); 6073 } 6074 6075 #define FRACTION_MULT 16384L 6076 6077 /* 6078 * Set wp->w_fraction for the current w_wrow and w_height. 6079 * Has no effect when the window is less than two lines. 6080 */ 6081 void 6082 set_fraction(win_T *wp) 6083 { 6084 if (wp->w_height > 1) 6085 // When cursor is in the first line the percentage is computed as if 6086 // it's halfway that line. Thus with two lines it is 25%, with three 6087 // lines 17%, etc. Similarly for the last line: 75%, 83%, etc. 6088 wp->w_fraction = ((long)wp->w_wrow * FRACTION_MULT 6089 + FRACTION_MULT / 2) / (long)wp->w_height; 6090 } 6091 6092 /* 6093 * Set the height of a window. 6094 * "height" excludes any window toolbar. 6095 * This takes care of the things inside the window, not what happens to the 6096 * window position, the frame or to other windows. 6097 */ 6098 void 6099 win_new_height(win_T *wp, int height) 6100 { 6101 int prev_height = wp->w_height; 6102 6103 // Don't want a negative height. Happens when splitting a tiny window. 6104 // Will equalize heights soon to fix it. 6105 if (height < 0) 6106 height = 0; 6107 if (wp->w_height == height) 6108 return; // nothing to do 6109 6110 if (wp->w_height > 0) 6111 { 6112 if (wp == curwin) 6113 // w_wrow needs to be valid. When setting 'laststatus' this may 6114 // call win_new_height() recursively. 6115 validate_cursor(); 6116 if (wp->w_height != prev_height) 6117 return; // Recursive call already changed the size, bail out here 6118 // to avoid the following to mess things up. 6119 if (wp->w_wrow != wp->w_prev_fraction_row) 6120 set_fraction(wp); 6121 } 6122 6123 wp->w_height = height; 6124 wp->w_skipcol = 0; 6125 6126 // There is no point in adjusting the scroll position when exiting. Some 6127 // values might be invalid. 6128 if (!exiting) 6129 scroll_to_fraction(wp, prev_height); 6130 } 6131 6132 void 6133 scroll_to_fraction(win_T *wp, int prev_height) 6134 { 6135 linenr_T lnum; 6136 int sline, line_size; 6137 int height = wp->w_height; 6138 6139 // Don't change w_topline in any of these cases: 6140 // - window height is 0 6141 // - 'scrollbind' is set and this isn't the current window 6142 // - window height is sufficient to display the whole buffer and first line 6143 // is visible. 6144 if (height > 0 6145 && (!wp->w_p_scb || wp == curwin) 6146 && (height < wp->w_buffer->b_ml.ml_line_count || wp->w_topline > 1)) 6147 { 6148 /* 6149 * Find a value for w_topline that shows the cursor at the same 6150 * relative position in the window as before (more or less). 6151 */ 6152 lnum = wp->w_cursor.lnum; 6153 if (lnum < 1) // can happen when starting up 6154 lnum = 1; 6155 wp->w_wrow = ((long)wp->w_fraction * (long)height - 1L) 6156 / FRACTION_MULT; 6157 line_size = plines_win_col(wp, lnum, (long)(wp->w_cursor.col)) - 1; 6158 sline = wp->w_wrow - line_size; 6159 6160 if (sline >= 0) 6161 { 6162 // Make sure the whole cursor line is visible, if possible. 6163 int rows = plines_win(wp, lnum, FALSE); 6164 6165 if (sline > wp->w_height - rows) 6166 { 6167 sline = wp->w_height - rows; 6168 wp->w_wrow -= rows - line_size; 6169 } 6170 } 6171 6172 if (sline < 0) 6173 { 6174 /* 6175 * Cursor line would go off top of screen if w_wrow was this high. 6176 * Make cursor line the first line in the window. If not enough 6177 * room use w_skipcol; 6178 */ 6179 wp->w_wrow = line_size; 6180 if (wp->w_wrow >= wp->w_height 6181 && (wp->w_width - win_col_off(wp)) > 0) 6182 { 6183 wp->w_skipcol += wp->w_width - win_col_off(wp); 6184 --wp->w_wrow; 6185 while (wp->w_wrow >= wp->w_height) 6186 { 6187 wp->w_skipcol += wp->w_width - win_col_off(wp) 6188 + win_col_off2(wp); 6189 --wp->w_wrow; 6190 } 6191 } 6192 } 6193 else if (sline > 0) 6194 { 6195 while (sline > 0 && lnum > 1) 6196 { 6197 #ifdef FEAT_FOLDING 6198 hasFoldingWin(wp, lnum, &lnum, NULL, TRUE, NULL); 6199 if (lnum == 1) 6200 { 6201 // first line in buffer is folded 6202 line_size = 1; 6203 --sline; 6204 break; 6205 } 6206 #endif 6207 --lnum; 6208 #ifdef FEAT_DIFF 6209 if (lnum == wp->w_topline) 6210 line_size = plines_win_nofill(wp, lnum, TRUE) 6211 + wp->w_topfill; 6212 else 6213 #endif 6214 line_size = plines_win(wp, lnum, TRUE); 6215 sline -= line_size; 6216 } 6217 6218 if (sline < 0) 6219 { 6220 /* 6221 * Line we want at top would go off top of screen. Use next 6222 * line instead. 6223 */ 6224 #ifdef FEAT_FOLDING 6225 hasFoldingWin(wp, lnum, NULL, &lnum, TRUE, NULL); 6226 #endif 6227 lnum++; 6228 wp->w_wrow -= line_size + sline; 6229 } 6230 else if (sline > 0) 6231 { 6232 // First line of file reached, use that as topline. 6233 lnum = 1; 6234 wp->w_wrow -= sline; 6235 } 6236 } 6237 set_topline(wp, lnum); 6238 } 6239 6240 if (wp == curwin) 6241 { 6242 if (get_scrolloff_value()) 6243 update_topline(); 6244 curs_columns(FALSE); // validate w_wrow 6245 } 6246 if (prev_height > 0) 6247 wp->w_prev_fraction_row = wp->w_wrow; 6248 6249 win_comp_scroll(wp); 6250 redraw_win_later(wp, SOME_VALID); 6251 wp->w_redr_status = TRUE; 6252 invalidate_botline_win(wp); 6253 } 6254 6255 /* 6256 * Set the width of a window. 6257 */ 6258 void 6259 win_new_width(win_T *wp, int width) 6260 { 6261 wp->w_width = width; 6262 wp->w_lines_valid = 0; 6263 changed_line_abv_curs_win(wp); 6264 invalidate_botline_win(wp); 6265 if (wp == curwin) 6266 { 6267 update_topline(); 6268 curs_columns(TRUE); // validate w_wrow 6269 } 6270 redraw_win_later(wp, NOT_VALID); 6271 wp->w_redr_status = TRUE; 6272 } 6273 6274 void 6275 win_comp_scroll(win_T *wp) 6276 { 6277 wp->w_p_scr = ((unsigned)wp->w_height >> 1); 6278 if (wp->w_p_scr == 0) 6279 wp->w_p_scr = 1; 6280 } 6281 6282 /* 6283 * command_height: called whenever p_ch has been changed 6284 */ 6285 void 6286 command_height(void) 6287 { 6288 int h; 6289 frame_T *frp; 6290 int old_p_ch = curtab->tp_ch_used; 6291 6292 // Use the value of p_ch that we remembered. This is needed for when the 6293 // GUI starts up, we can't be sure in what order things happen. And when 6294 // p_ch was changed in another tab page. 6295 curtab->tp_ch_used = p_ch; 6296 6297 // Find bottom frame with width of screen. 6298 frp = lastwin->w_frame; 6299 while (frp->fr_width != Columns && frp->fr_parent != NULL) 6300 frp = frp->fr_parent; 6301 6302 // Avoid changing the height of a window with 'winfixheight' set. 6303 while (frp->fr_prev != NULL && frp->fr_layout == FR_LEAF 6304 && frp->fr_win->w_p_wfh) 6305 frp = frp->fr_prev; 6306 6307 if (starting != NO_SCREEN) 6308 { 6309 cmdline_row = Rows - p_ch; 6310 6311 if (p_ch > old_p_ch) // p_ch got bigger 6312 { 6313 while (p_ch > old_p_ch) 6314 { 6315 if (frp == NULL) 6316 { 6317 emsg(_(e_noroom)); 6318 p_ch = old_p_ch; 6319 curtab->tp_ch_used = p_ch; 6320 cmdline_row = Rows - p_ch; 6321 break; 6322 } 6323 h = frp->fr_height - frame_minheight(frp, NULL); 6324 if (h > p_ch - old_p_ch) 6325 h = p_ch - old_p_ch; 6326 old_p_ch += h; 6327 frame_add_height(frp, -h); 6328 frp = frp->fr_prev; 6329 } 6330 6331 // Recompute window positions. 6332 (void)win_comp_pos(); 6333 6334 // clear the lines added to cmdline 6335 if (full_screen) 6336 screen_fill((int)(cmdline_row), (int)Rows, 0, 6337 (int)Columns, ' ', ' ', 0); 6338 msg_row = cmdline_row; 6339 redraw_cmdline = TRUE; 6340 return; 6341 } 6342 6343 if (msg_row < cmdline_row) 6344 msg_row = cmdline_row; 6345 redraw_cmdline = TRUE; 6346 } 6347 frame_add_height(frp, (int)(old_p_ch - p_ch)); 6348 6349 // Recompute window positions. 6350 if (frp != lastwin->w_frame) 6351 (void)win_comp_pos(); 6352 } 6353 6354 /* 6355 * Resize frame "frp" to be "n" lines higher (negative for less high). 6356 * Also resize the frames it is contained in. 6357 */ 6358 static void 6359 frame_add_height(frame_T *frp, int n) 6360 { 6361 frame_new_height(frp, frp->fr_height + n, FALSE, FALSE); 6362 for (;;) 6363 { 6364 frp = frp->fr_parent; 6365 if (frp == NULL) 6366 break; 6367 frp->fr_height += n; 6368 } 6369 } 6370 6371 /* 6372 * Add or remove a status line for the bottom window(s), according to the 6373 * value of 'laststatus'. 6374 */ 6375 void 6376 last_status( 6377 int morewin) // pretend there are two or more windows 6378 { 6379 // Don't make a difference between horizontal or vertical split. 6380 last_status_rec(topframe, (p_ls == 2 6381 || (p_ls == 1 && (morewin || !ONE_WINDOW)))); 6382 } 6383 6384 static void 6385 last_status_rec(frame_T *fr, int statusline) 6386 { 6387 frame_T *fp; 6388 win_T *wp; 6389 6390 if (fr->fr_layout == FR_LEAF) 6391 { 6392 wp = fr->fr_win; 6393 if (wp->w_status_height != 0 && !statusline) 6394 { 6395 // remove status line 6396 win_new_height(wp, wp->w_height + 1); 6397 wp->w_status_height = 0; 6398 comp_col(); 6399 } 6400 else if (wp->w_status_height == 0 && statusline) 6401 { 6402 // Find a frame to take a line from. 6403 fp = fr; 6404 while (fp->fr_height <= frame_minheight(fp, NULL)) 6405 { 6406 if (fp == topframe) 6407 { 6408 emsg(_(e_noroom)); 6409 return; 6410 } 6411 // In a column of frames: go to frame above. If already at 6412 // the top or in a row of frames: go to parent. 6413 if (fp->fr_parent->fr_layout == FR_COL && fp->fr_prev != NULL) 6414 fp = fp->fr_prev; 6415 else 6416 fp = fp->fr_parent; 6417 } 6418 wp->w_status_height = 1; 6419 if (fp != fr) 6420 { 6421 frame_new_height(fp, fp->fr_height - 1, FALSE, FALSE); 6422 frame_fix_height(wp); 6423 (void)win_comp_pos(); 6424 } 6425 else 6426 win_new_height(wp, wp->w_height - 1); 6427 comp_col(); 6428 redraw_all_later(SOME_VALID); 6429 } 6430 } 6431 else if (fr->fr_layout == FR_ROW) 6432 { 6433 // vertically split windows, set status line for each one 6434 FOR_ALL_FRAMES(fp, fr->fr_child) 6435 last_status_rec(fp, statusline); 6436 } 6437 else 6438 { 6439 // horizontally split window, set status line for last one 6440 for (fp = fr->fr_child; fp->fr_next != NULL; fp = fp->fr_next) 6441 ; 6442 last_status_rec(fp, statusline); 6443 } 6444 } 6445 6446 /* 6447 * Return the number of lines used by the tab page line. 6448 */ 6449 int 6450 tabline_height(void) 6451 { 6452 #ifdef FEAT_GUI_TABLINE 6453 // When the GUI has the tabline then this always returns zero. 6454 if (gui_use_tabline()) 6455 return 0; 6456 #endif 6457 switch (p_stal) 6458 { 6459 case 0: return 0; 6460 case 1: return (first_tabpage->tp_next == NULL) ? 0 : 1; 6461 } 6462 return 1; 6463 } 6464 6465 /* 6466 * Return the minimal number of rows that is needed on the screen to display 6467 * the current number of windows. 6468 */ 6469 int 6470 min_rows(void) 6471 { 6472 int total; 6473 tabpage_T *tp; 6474 int n; 6475 6476 if (firstwin == NULL) // not initialized yet 6477 return MIN_LINES; 6478 6479 total = 0; 6480 FOR_ALL_TABPAGES(tp) 6481 { 6482 n = frame_minheight(tp->tp_topframe, NULL); 6483 if (total < n) 6484 total = n; 6485 } 6486 total += tabline_height(); 6487 total += 1; // count the room for the command line 6488 return total; 6489 } 6490 6491 /* 6492 * Return TRUE if there is only one window and only one tab page, not 6493 * counting a help or preview window, unless it is the current window. 6494 * Does not count unlisted windows. 6495 */ 6496 int 6497 only_one_window(void) 6498 { 6499 int count = 0; 6500 win_T *wp; 6501 6502 #if defined(FEAT_PROP_POPUP) 6503 // If the current window is a popup then there always is another window. 6504 if (popup_is_popup(curwin)) 6505 return FALSE; 6506 #endif 6507 6508 // If there is another tab page there always is another window. 6509 if (first_tabpage->tp_next != NULL) 6510 return FALSE; 6511 6512 FOR_ALL_WINDOWS(wp) 6513 if (wp->w_buffer != NULL 6514 && (!((bt_help(wp->w_buffer) && !bt_help(curbuf)) 6515 # ifdef FEAT_QUICKFIX 6516 || wp->w_p_pvw 6517 # endif 6518 ) || wp == curwin) && wp != aucmd_win) 6519 ++count; 6520 return (count <= 1); 6521 } 6522 6523 /* 6524 * Correct the cursor line number in other windows. Used after changing the 6525 * current buffer, and before applying autocommands. 6526 * When "do_curwin" is TRUE, also check current window. 6527 */ 6528 void 6529 check_lnums(int do_curwin) 6530 { 6531 win_T *wp; 6532 tabpage_T *tp; 6533 6534 FOR_ALL_TAB_WINDOWS(tp, wp) 6535 if ((do_curwin || wp != curwin) && wp->w_buffer == curbuf) 6536 { 6537 // save the original cursor position and topline 6538 wp->w_save_cursor.w_cursor_save = wp->w_cursor; 6539 wp->w_save_cursor.w_topline_save = wp->w_topline; 6540 6541 if (wp->w_cursor.lnum > curbuf->b_ml.ml_line_count) 6542 wp->w_cursor.lnum = curbuf->b_ml.ml_line_count; 6543 if (wp->w_topline > curbuf->b_ml.ml_line_count) 6544 wp->w_topline = curbuf->b_ml.ml_line_count; 6545 6546 // save the corrected cursor position and topline 6547 wp->w_save_cursor.w_cursor_corr = wp->w_cursor; 6548 wp->w_save_cursor.w_topline_corr = wp->w_topline; 6549 } 6550 } 6551 6552 /* 6553 * Reset cursor and topline to its stored values from check_lnums(). 6554 * check_lnums() must have been called first! 6555 */ 6556 void 6557 reset_lnums() 6558 { 6559 win_T *wp; 6560 tabpage_T *tp; 6561 6562 FOR_ALL_TAB_WINDOWS(tp, wp) 6563 if (wp->w_buffer == curbuf) 6564 { 6565 // Restore the value if the autocommand didn't change it. 6566 if (EQUAL_POS(wp->w_save_cursor.w_cursor_corr, wp->w_cursor)) 6567 wp->w_cursor = wp->w_save_cursor.w_cursor_save; 6568 if (wp->w_save_cursor.w_topline_corr == wp->w_topline) 6569 wp->w_topline = wp->w_save_cursor.w_topline_save; 6570 } 6571 } 6572 6573 /* 6574 * A snapshot of the window sizes, to restore them after closing the help 6575 * window. 6576 * Only these fields are used: 6577 * fr_layout 6578 * fr_width 6579 * fr_height 6580 * fr_next 6581 * fr_child 6582 * fr_win (only valid for the old curwin, NULL otherwise) 6583 */ 6584 6585 /* 6586 * Create a snapshot of the current frame sizes. 6587 */ 6588 void 6589 make_snapshot(int idx) 6590 { 6591 clear_snapshot(curtab, idx); 6592 make_snapshot_rec(topframe, &curtab->tp_snapshot[idx]); 6593 } 6594 6595 static void 6596 make_snapshot_rec(frame_T *fr, frame_T **frp) 6597 { 6598 *frp = ALLOC_CLEAR_ONE(frame_T); 6599 if (*frp == NULL) 6600 return; 6601 (*frp)->fr_layout = fr->fr_layout; 6602 (*frp)->fr_width = fr->fr_width; 6603 (*frp)->fr_height = fr->fr_height; 6604 if (fr->fr_next != NULL) 6605 make_snapshot_rec(fr->fr_next, &((*frp)->fr_next)); 6606 if (fr->fr_child != NULL) 6607 make_snapshot_rec(fr->fr_child, &((*frp)->fr_child)); 6608 if (fr->fr_layout == FR_LEAF && fr->fr_win == curwin) 6609 (*frp)->fr_win = curwin; 6610 } 6611 6612 /* 6613 * Remove any existing snapshot. 6614 */ 6615 static void 6616 clear_snapshot(tabpage_T *tp, int idx) 6617 { 6618 clear_snapshot_rec(tp->tp_snapshot[idx]); 6619 tp->tp_snapshot[idx] = NULL; 6620 } 6621 6622 static void 6623 clear_snapshot_rec(frame_T *fr) 6624 { 6625 if (fr != NULL) 6626 { 6627 clear_snapshot_rec(fr->fr_next); 6628 clear_snapshot_rec(fr->fr_child); 6629 vim_free(fr); 6630 } 6631 } 6632 6633 /* 6634 * Restore a previously created snapshot, if there is any. 6635 * This is only done if the screen size didn't change and the window layout is 6636 * still the same. 6637 */ 6638 void 6639 restore_snapshot( 6640 int idx, 6641 int close_curwin) // closing current window 6642 { 6643 win_T *wp; 6644 6645 if (curtab->tp_snapshot[idx] != NULL 6646 && curtab->tp_snapshot[idx]->fr_width == topframe->fr_width 6647 && curtab->tp_snapshot[idx]->fr_height == topframe->fr_height 6648 && check_snapshot_rec(curtab->tp_snapshot[idx], topframe) == OK) 6649 { 6650 wp = restore_snapshot_rec(curtab->tp_snapshot[idx], topframe); 6651 win_comp_pos(); 6652 if (wp != NULL && close_curwin) 6653 win_goto(wp); 6654 redraw_all_later(NOT_VALID); 6655 } 6656 clear_snapshot(curtab, idx); 6657 } 6658 6659 /* 6660 * Check if frames "sn" and "fr" have the same layout, same following frames 6661 * and same children. And the window pointer is valid. 6662 */ 6663 static int 6664 check_snapshot_rec(frame_T *sn, frame_T *fr) 6665 { 6666 if (sn->fr_layout != fr->fr_layout 6667 || (sn->fr_next == NULL) != (fr->fr_next == NULL) 6668 || (sn->fr_child == NULL) != (fr->fr_child == NULL) 6669 || (sn->fr_next != NULL 6670 && check_snapshot_rec(sn->fr_next, fr->fr_next) == FAIL) 6671 || (sn->fr_child != NULL 6672 && check_snapshot_rec(sn->fr_child, fr->fr_child) == FAIL) 6673 || (sn->fr_win != NULL && !win_valid(sn->fr_win))) 6674 return FAIL; 6675 return OK; 6676 } 6677 6678 /* 6679 * Copy the size of snapshot frame "sn" to frame "fr". Do the same for all 6680 * following frames and children. 6681 * Returns a pointer to the old current window, or NULL. 6682 */ 6683 static win_T * 6684 restore_snapshot_rec(frame_T *sn, frame_T *fr) 6685 { 6686 win_T *wp = NULL; 6687 win_T *wp2; 6688 6689 fr->fr_height = sn->fr_height; 6690 fr->fr_width = sn->fr_width; 6691 if (fr->fr_layout == FR_LEAF) 6692 { 6693 frame_new_height(fr, fr->fr_height, FALSE, FALSE); 6694 frame_new_width(fr, fr->fr_width, FALSE, FALSE); 6695 wp = sn->fr_win; 6696 } 6697 if (sn->fr_next != NULL) 6698 { 6699 wp2 = restore_snapshot_rec(sn->fr_next, fr->fr_next); 6700 if (wp2 != NULL) 6701 wp = wp2; 6702 } 6703 if (sn->fr_child != NULL) 6704 { 6705 wp2 = restore_snapshot_rec(sn->fr_child, fr->fr_child); 6706 if (wp2 != NULL) 6707 wp = wp2; 6708 } 6709 return wp; 6710 } 6711 6712 #if defined(FEAT_GUI) || defined(PROTO) 6713 /* 6714 * Return TRUE if there is any vertically split window. 6715 */ 6716 int 6717 win_hasvertsplit(void) 6718 { 6719 frame_T *fr; 6720 6721 if (topframe->fr_layout == FR_ROW) 6722 return TRUE; 6723 6724 if (topframe->fr_layout == FR_COL) 6725 FOR_ALL_FRAMES(fr, topframe->fr_child) 6726 if (fr->fr_layout == FR_ROW) 6727 return TRUE; 6728 6729 return FALSE; 6730 } 6731 #endif 6732 6733 #if defined(FEAT_PYTHON) || defined(FEAT_PYTHON3) || defined(PROTO) 6734 int 6735 get_win_number(win_T *wp, win_T *first_win) 6736 { 6737 int i = 1; 6738 win_T *w; 6739 6740 for (w = first_win; w != NULL && w != wp; w = W_NEXT(w)) 6741 ++i; 6742 6743 if (w == NULL) 6744 return 0; 6745 else 6746 return i; 6747 } 6748 6749 int 6750 get_tab_number(tabpage_T *tp UNUSED) 6751 { 6752 int i = 1; 6753 tabpage_T *t; 6754 6755 for (t = first_tabpage; t != NULL && t != tp; t = t->tp_next) 6756 ++i; 6757 6758 if (t == NULL) 6759 return 0; 6760 else 6761 return i; 6762 } 6763 #endif 6764 6765 /* 6766 * Return TRUE if "topfrp" and its children are at the right height. 6767 */ 6768 static int 6769 frame_check_height(frame_T *topfrp, int height) 6770 { 6771 frame_T *frp; 6772 6773 if (topfrp->fr_height != height) 6774 return FALSE; 6775 6776 if (topfrp->fr_layout == FR_ROW) 6777 FOR_ALL_FRAMES(frp, topfrp->fr_child) 6778 if (frp->fr_height != height) 6779 return FALSE; 6780 6781 return TRUE; 6782 } 6783 6784 /* 6785 * Return TRUE if "topfrp" and its children are at the right width. 6786 */ 6787 static int 6788 frame_check_width(frame_T *topfrp, int width) 6789 { 6790 frame_T *frp; 6791 6792 if (topfrp->fr_width != width) 6793 return FALSE; 6794 6795 if (topfrp->fr_layout == FR_COL) 6796 FOR_ALL_FRAMES(frp, topfrp->fr_child) 6797 if (frp->fr_width != width) 6798 return FALSE; 6799 6800 return TRUE; 6801 } 6802 6803 #if defined(FEAT_SYN_HL) || defined(PROTO) 6804 /* 6805 * Simple int comparison function for use with qsort() 6806 */ 6807 static int 6808 int_cmp(const void *a, const void *b) 6809 { 6810 return *(const int *)a - *(const int *)b; 6811 } 6812 6813 /* 6814 * Handle setting 'colorcolumn' or 'textwidth' in window "wp". 6815 * Returns error message, NULL if it's OK. 6816 */ 6817 char * 6818 check_colorcolumn(win_T *wp) 6819 { 6820 char_u *s; 6821 int col; 6822 int count = 0; 6823 int color_cols[256]; 6824 int i; 6825 int j = 0; 6826 6827 if (wp->w_buffer == NULL) 6828 return NULL; // buffer was closed 6829 6830 for (s = wp->w_p_cc; *s != NUL && count < 255;) 6831 { 6832 if (*s == '-' || *s == '+') 6833 { 6834 // -N and +N: add to 'textwidth' 6835 col = (*s == '-') ? -1 : 1; 6836 ++s; 6837 if (!VIM_ISDIGIT(*s)) 6838 return e_invarg; 6839 col = col * getdigits(&s); 6840 if (wp->w_buffer->b_p_tw == 0) 6841 goto skip; // 'textwidth' not set, skip this item 6842 col += wp->w_buffer->b_p_tw; 6843 if (col < 0) 6844 goto skip; 6845 } 6846 else if (VIM_ISDIGIT(*s)) 6847 col = getdigits(&s); 6848 else 6849 return e_invarg; 6850 color_cols[count++] = col - 1; // 1-based to 0-based 6851 skip: 6852 if (*s == NUL) 6853 break; 6854 if (*s != ',') 6855 return e_invarg; 6856 if (*++s == NUL) 6857 return e_invarg; // illegal trailing comma as in "set cc=80," 6858 } 6859 6860 vim_free(wp->w_p_cc_cols); 6861 if (count == 0) 6862 wp->w_p_cc_cols = NULL; 6863 else 6864 { 6865 wp->w_p_cc_cols = ALLOC_MULT(int, count + 1); 6866 if (wp->w_p_cc_cols != NULL) 6867 { 6868 // sort the columns for faster usage on screen redraw inside 6869 // win_line() 6870 qsort(color_cols, count, sizeof(int), int_cmp); 6871 6872 for (i = 0; i < count; ++i) 6873 // skip duplicates 6874 if (j == 0 || wp->w_p_cc_cols[j - 1] != color_cols[i]) 6875 wp->w_p_cc_cols[j++] = color_cols[i]; 6876 wp->w_p_cc_cols[j] = -1; // end marker 6877 } 6878 } 6879 6880 return NULL; // no error 6881 } 6882 #endif 6883