vim: src/popupwin.c annotate

annotate src/popupwin.c @ 16853:e6bcccccbf7b v8.1.1428

patch 8.1.1428: popup_atcursor() not implemented yet commit https://github.com/vim/vim/commit/cc31ad9f9b601d53926b96586bd6b40602d57951 Author: Bram Moolenaar <Bram@vim.org> Date: Thu May 30 19:25:06 2019 +0200 patch 8.1.1428: popup_atcursor() not implemented yet Problem: Popup_atcursor() not implemented yet. Solution: Implement it. (Yasuhiro Matsumoto, closes https://github.com/vim/vim/issues/4456)

author	Bram Moolenaar <Bram@vim.org>
date	Thu, 30 May 2019 19:30:03 +0200
parents	48c06fcb8be7
children	19162ff4eacd

rev	line source
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	1 /* vi:set ts=8 sts=4 sw=4 noet:
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	2 *
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	3 * VIM - Vi IMproved by Bram Moolenaar
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	4 *
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	5 * Do ":help uganda" in Vim to read a list of people who contributed.
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	6 * Do ":help credits" in Vim to see a list of people who contributed.
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	7 * See README.txt for an overview of the Vim source code.
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	8 */
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	9
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	10 /*
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	11 * Implementation of popup windows. See ":help popup".
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	12 */
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	13
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	14 #include "vim.h"
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	15
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	16 #ifdef FEAT_TEXT_PROP
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	17
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	18 /*
16853 e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	19 * Get option value for"key", which is "line" or "col".
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	20 * Handles "cursor+N" and "cursor-N".
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	21 */
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	22 static int
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	23 popup_options_pos(dict_T dict, char_u key)
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	24 {
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	25 dictitem_T *di;
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	26 char_u *val;
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	27 char_u *s;
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	28 char_u *endp;
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	29 int n = 0;
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	30
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	31 di = dict_find(dict, key, -1);
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	32 if (di == NULL)
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	33 return 0;
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	34
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	35 val = tv_get_string(&di->di_tv);
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	36 if (STRNCMP(val, "cursor", 6) != 0)
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	37 return dict_get_number(dict, key);
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	38
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	39 setcursor_mayforce(TRUE);
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	40 s = val + 6;
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	41 if (*s != NUL)
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	42 {
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	43 n = strtol((char )s, (char *)&endp, 10);
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	44 if (endp != NULL && *skipwhite(endp) != NUL)
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	45 {
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	46 semsg(_(e_invexpr2), val);
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	47 return 0;
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	48 }
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	49 }
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	50
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	51 if (STRCMP(key, "line") == 0)
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	52 n = screen_screenrow() + 1 + n;
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	53 else // "col"
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	54 n = screen_screencol() + 1 + n;
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	55
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	56 if (n < 1)
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	57 n = 1;
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	58 return n;
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	59 }
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	60
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	61 /*
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	62 * Go through the options in "dict" and apply them to buffer "buf" displayed in
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	63 * popup window "wp".
16853 e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	64 * When called from f_popup_atcursor() "atcursor" is TRUE.
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	65 */
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	66 static void
16853 e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	67 apply_options(win_T wp, buf_T buf UNUSED, dict_T *dict, int atcursor)
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	68 {
16800 12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	69 int nr;
16806 306766ed0f70 patch 8.1.1405: "highlight" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16802 diff changeset	70 char_u *str;
16800 12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	71
16817 069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	72 wp->w_minwidth = dict_get_number(dict, (char_u *)"minwidth");
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	73 wp->w_minheight = dict_get_number(dict, (char_u *)"minheight");
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	74 wp->w_maxwidth = dict_get_number(dict, (char_u *)"maxwidth");
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	75 wp->w_maxheight = dict_get_number(dict, (char_u *)"maxheight");
16817 069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	76
16853 e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	77 if (atcursor)
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	78 {
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	79 setcursor_mayforce(TRUE);
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	80 wp->w_wantline = screen_screenrow();
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	81 wp->w_wantcol = screen_screencol() + 1;
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	82 }
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	83
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	84 nr = popup_options_pos(dict, (char_u *)"line");
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	85 if (nr > 0)
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	86 wp->w_wantline = nr;
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	87 nr = popup_options_pos(dict, (char_u *)"col");
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	88 if (nr > 0)
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	89 wp->w_wantcol = nr;
16817 069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	90
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	91 wp->w_zindex = dict_get_number(dict, (char_u *)"zindex");
16800 12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	92
16802 f5487021fdad patch 8.1.1403: cannot build without the timer feature Bram Moolenaar <Bram@vim.org> parents: 16800 diff changeset	93 #if defined(FEAT_TIMERS)
16800 12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	94 // Add timer to close the popup after some time.
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	95 nr = dict_get_number(dict, (char_u *)"time");
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	96 if (nr > 0)
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	97 {
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	98 char_u cbbuf[50];
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	99 char_u *ptr = cbbuf;
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	100 typval_T tv;
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	101
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	102 vim_snprintf((char *)cbbuf, sizeof(cbbuf),
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	103 "{_ -> popup_close(%d)}", wp->w_id);
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	104 if (get_lambda_tv(&ptr, &tv, TRUE) == OK)
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	105 {
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	106 wp->w_popup_timer = create_timer(nr, 0);
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	107 wp->w_popup_timer->tr_callback =
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	108 vim_strsave(partial_name(tv.vval.v_partial));
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	109 func_ref(wp->w_popup_timer->tr_callback);
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	110 wp->w_popup_timer->tr_partial = tv.vval.v_partial;
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	111 }
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	112 }
16802 f5487021fdad patch 8.1.1403: cannot build without the timer feature Bram Moolenaar <Bram@vim.org> parents: 16800 diff changeset	113 #endif
16800 12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	114
16806 306766ed0f70 patch 8.1.1405: "highlight" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16802 diff changeset	115 str = dict_get_string(dict, (char_u *)"highlight", TRUE);
306766ed0f70 patch 8.1.1405: "highlight" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16802 diff changeset	116 if (str != NULL)
306766ed0f70 patch 8.1.1405: "highlight" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16802 diff changeset	117 set_string_option_direct_in_win(wp, (char_u *)"wincolor", -1,
306766ed0f70 patch 8.1.1405: "highlight" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16802 diff changeset	118 str, OPT_FREE\|OPT_LOCAL, 0);
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	119 }
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	120
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	121 /*
16811 0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	122 * Add lines to the popup from a list of strings.
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	123 */
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	124 static void
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	125 add_popup_strings(buf_T buf, list_T l)
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	126 {
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	127 listitem_T *li;
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	128 linenr_T lnum = 0;
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	129 char_u *p;
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	130
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	131 for (li = l->lv_first; li != NULL; li = li->li_next)
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	132 if (li->li_tv.v_type == VAR_STRING)
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	133 {
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	134 p = li->li_tv.vval.v_string;
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	135 ml_append_buf(buf, lnum++,
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	136 p == NULL ? (char_u *)"" : p, (colnr_T)0, TRUE);
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	137 }
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	138 }
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	139
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	140 /*
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	141 * Add lines to the popup from a list of dictionaries.
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	142 */
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	143 static void
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	144 add_popup_dicts(buf_T buf, list_T l)
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	145 {
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	146 listitem_T *li;
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	147 listitem_T *pli;
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	148 linenr_T lnum = 0;
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	149 char_u *p;
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	150 dict_T *dict;
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	151
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	152 // first add the text lines
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	153 for (li = l->lv_first; li != NULL; li = li->li_next)
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	154 {
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	155 if (li->li_tv.v_type != VAR_DICT)
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	156 {
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	157 emsg(_(e_dictreq));
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	158 return;
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	159 }
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	160 dict = li->li_tv.vval.v_dict;
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	161 p = dict == NULL ? NULL
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	162 : dict_get_string(dict, (char_u *)"text", FALSE);
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	163 ml_append_buf(buf, lnum++,
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	164 p == NULL ? (char_u *)"" : p, (colnr_T)0, TRUE);
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	165 }
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	166
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	167 // add the text properties
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	168 lnum = 1;
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	169 for (li = l->lv_first; li != NULL; li = li->li_next, ++lnum)
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	170 {
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	171 dictitem_T *di;
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	172 list_T *plist;
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	173
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	174 dict = li->li_tv.vval.v_dict;
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	175 di = dict_find(dict, (char_u *)"props", -1);
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	176 if (di != NULL)
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	177 {
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	178 if (di->di_tv.v_type != VAR_LIST)
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	179 {
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	180 emsg(_(e_listreq));
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	181 return;
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	182 }
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	183 plist = di->di_tv.vval.v_list;
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	184 if (plist != NULL)
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	185 {
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	186 for (pli = plist->lv_first; pli != NULL; pli = pli->li_next)
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	187 {
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	188 if (pli->li_tv.v_type != VAR_DICT)
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	189 {
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	190 emsg(_(e_dictreq));
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	191 return;
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	192 }
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	193 dict = pli->li_tv.vval.v_dict;
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	194 if (dict != NULL)
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	195 {
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	196 int col = dict_get_number(dict, (char_u *)"col");
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	197
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	198 prop_add_common( lnum, col, dict, buf, NULL);
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	199 }
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	200 }
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	201 }
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	202 }
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	203 }
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	204 }
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	205
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	206 /*
16817 069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	207 * Adjust the position and size of the popup to fit on the screen.
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	208 */
16839 032d5335987e patch 8.1.1421: drawing "~" line in popup window Bram Moolenaar <Bram@vim.org> parents: 16837 diff changeset	209 void
16817 069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	210 popup_adjust_position(win_T *wp)
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	211 {
16837 18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	212 linenr_T lnum;
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	213 int wrapped = 0;
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	214 int maxwidth;
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	215
16817 069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	216 // TODO: Compute the size and position properly.
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	217 if (wp->w_wantline > 0)
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	218 wp->w_winrow = wp->w_wantline - 1;
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	219 else
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	220 // TODO: better default
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	221 wp->w_winrow = Rows > 5 ? Rows / 2 - 2 : 0;
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	222 if (wp->w_winrow >= Rows)
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	223 wp->w_winrow = Rows - 1;
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	224
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	225 if (wp->w_wantcol > 0)
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	226 wp->w_wincol = wp->w_wantcol - 1;
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	227 else
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	228 // TODO: better default
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	229 wp->w_wincol = Columns > 20 ? Columns / 2 - 10 : 0;
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	230 if (wp->w_wincol >= Columns - 3)
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	231 wp->w_wincol = Columns - 3;
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	232
16837 18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	233 maxwidth = Columns - wp->w_wincol;
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	234 if (wp->w_maxwidth > 0 && maxwidth > wp->w_maxwidth)
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	235 maxwidth = wp->w_maxwidth;
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	236
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	237 // Compute width based on longest text line and the 'wrap' option.
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	238 // TODO: more accurate wrapping
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	239 wp->w_width = 0;
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	240 for (lnum = 1; lnum <= wp->w_buffer->b_ml.ml_line_count; ++lnum)
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	241 {
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	242 int len = vim_strsize(ml_get_buf(wp->w_buffer, lnum, FALSE));
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	243
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	244 while (wp->w_p_wrap && len > maxwidth)
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	245 {
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	246 ++wrapped;
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	247 len -= maxwidth;
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	248 wp->w_width = maxwidth;
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	249 }
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	250 if (wp->w_width < len)
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	251 wp->w_width = len;
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	252 }
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	253
16817 069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	254 if (wp->w_minwidth > 0 && wp->w_width < wp->w_minwidth)
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	255 wp->w_width = wp->w_minwidth;
16837 18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	256 if (wp->w_width > maxwidth)
18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	257 wp->w_width = maxwidth;
16817 069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	258
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	259 if (wp->w_height <= 1)
16837 18593056d8f1 patch 8.1.1420: popup window size only uses first line length Bram Moolenaar <Bram@vim.org> parents: 16833 diff changeset	260 wp->w_height = wp->w_buffer->b_ml.ml_line_count + wrapped;
16817 069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	261 if (wp->w_minheight > 0 && wp->w_height < wp->w_minheight)
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	262 wp->w_height = wp->w_minheight;
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	263 if (wp->w_maxheight > 0 && wp->w_height > wp->w_maxheight)
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	264 wp->w_height = wp->w_maxheight;
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	265 if (wp->w_height > Rows - wp->w_winrow)
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	266 wp->w_height = Rows - wp->w_winrow;
16839 032d5335987e patch 8.1.1421: drawing "~" line in popup window Bram Moolenaar <Bram@vim.org> parents: 16837 diff changeset	267
032d5335987e patch 8.1.1421: drawing "~" line in popup window Bram Moolenaar <Bram@vim.org> parents: 16837 diff changeset	268 wp->w_popup_last_changedtick = CHANGEDTICK(wp->w_buffer);
16817 069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	269 }
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	270
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	271 /*
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	272 * popup_create({text}, {options})
16853 e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	273 * popup_atcursor({text}, {options})
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	274 * When called from f_popup_atcursor() "atcursor" is TRUE.
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	275 */
16853 e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	276 static void
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	277 popup_create(typval_T argvars, typval_T rettv, int atcursor)
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	278 {
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	279 win_T *wp;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	280 buf_T *buf;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	281 dict_T *d;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	282 int nr;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	283
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	284 // Check arguments look OK.
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	285 if (!(argvars[0].v_type == VAR_STRING
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	286 && argvars[0].vval.v_string != NULL
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	287 && STRLEN(argvars[0].vval.v_string) > 0)
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	288 && !(argvars[0].v_type == VAR_LIST
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	289 && argvars[0].vval.v_list != NULL
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	290 && argvars[0].vval.v_list->lv_len > 0))
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	291 {
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	292 emsg(_(e_listreq));
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	293 return;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	294 }
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	295 if (argvars[1].v_type != VAR_DICT \|\| argvars[1].vval.v_dict == NULL)
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	296 {
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	297 emsg(_(e_dictreq));
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	298 return;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	299 }
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	300 d = argvars[1].vval.v_dict;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	301
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	302 // Create the window and buffer.
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	303 wp = win_alloc_popup_win();
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	304 if (wp == NULL)
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	305 return;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	306 rettv->vval.v_number = wp->w_id;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	307 wp->w_p_wrap = TRUE; // 'wrap' is default on
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	308
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	309 buf = buflist_new(NULL, NULL, (linenr_T)0, BLN_NEW\|BLN_LISTED\|BLN_DUMMY);
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	310 if (buf == NULL)
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	311 return;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	312 ml_open(buf);
16843 283037126560 patch 8.1.1423: popup windows use options from current window and buffer Bram Moolenaar <Bram@vim.org> parents: 16841 diff changeset	313
283037126560 patch 8.1.1423: popup windows use options from current window and buffer Bram Moolenaar <Bram@vim.org> parents: 16841 diff changeset	314 win_init_popup_win(wp, buf);
283037126560 patch 8.1.1423: popup windows use options from current window and buffer Bram Moolenaar <Bram@vim.org> parents: 16841 diff changeset	315
283037126560 patch 8.1.1423: popup windows use options from current window and buffer Bram Moolenaar <Bram@vim.org> parents: 16841 diff changeset	316 set_local_options_default(wp);
16806 306766ed0f70 patch 8.1.1405: "highlight" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16802 diff changeset	317 set_string_option_direct_in_buf(buf, (char_u *)"buftype", -1,
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	318 (char_u *)"popup", OPT_FREE\|OPT_LOCAL, 0);
16806 306766ed0f70 patch 8.1.1405: "highlight" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16802 diff changeset	319 set_string_option_direct_in_buf(buf, (char_u *)"bufhidden", -1,
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	320 (char_u *)"hide", OPT_FREE\|OPT_LOCAL, 0);
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	321 buf->b_p_ul = -1; // no undo
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	322 buf->b_p_swf = FALSE; // no swap file
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	323 buf->b_p_bl = FALSE; // unlisted buffer
16833 6699c03347d2 patch 8.1.1418: win_execute() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16829 diff changeset	324 buf->b_locked = TRUE;
16851 48c06fcb8be7 patch 8.1.1427: popup window screenshot test fails Bram Moolenaar <Bram@vim.org> parents: 16843 diff changeset	325 // Avoid that 'buftype' is reset when this buffer is entered.
48c06fcb8be7 patch 8.1.1427: popup window screenshot test fails Bram Moolenaar <Bram@vim.org> parents: 16843 diff changeset	326 buf->b_p_initialized = TRUE;
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	327
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	328 nr = (int)dict_get_number(d, (char_u *)"tab");
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	329 if (nr == 0)
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	330 {
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	331 // popup on current tab
16796 5f98d80d116a patch 8.1.1400: using global pointer for tab-local popups is clumsy Bram Moolenaar <Bram@vim.org> parents: 16794 diff changeset	332 wp->w_next = curtab->tp_first_popupwin;
5f98d80d116a patch 8.1.1400: using global pointer for tab-local popups is clumsy Bram Moolenaar <Bram@vim.org> parents: 16794 diff changeset	333 curtab->tp_first_popupwin = wp;
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	334 }
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	335 else if (nr < 0)
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	336 {
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	337 // global popup
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	338 wp->w_next = first_popupwin;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	339 first_popupwin = wp;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	340 }
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	341 else
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	342 // TODO: find tab page "nr"
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	343 emsg("Not implemented yet");
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	344
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	345 // Add text to the buffer.
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	346 if (argvars[0].v_type == VAR_STRING)
16811 0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	347 {
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	348 // just a string
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	349 ml_append_buf(buf, 0, argvars[0].vval.v_string, (colnr_T)0, TRUE);
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	350 }
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	351 else
16811 0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	352 {
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	353 list_T *l = argvars[0].vval.v_list;
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	354
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	355 if (l->lv_first->li_tv.v_type == VAR_STRING)
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	356 // list of strings
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	357 add_popup_strings(buf, l);
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	358 else
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	359 // list of dictionaries
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	360 add_popup_dicts(buf, l);
0457d49eb2d9 patch 8.1.1407: popup_create() does not support text properties Bram Moolenaar <Bram@vim.org> parents: 16809 diff changeset	361 }
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	362
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	363 // Delete the line of the empty buffer.
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	364 curbuf = buf;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	365 ml_delete(buf->b_ml.ml_line_count, FALSE);
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	366 curbuf = curwin->w_buffer;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	367
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	368 // Deal with options.
16853 e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	369 apply_options(wp, buf, argvars[1].vval.v_dict, atcursor);
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	370
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	371 // set default values
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	372 if (wp->w_zindex == 0)
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	373 wp->w_zindex = 50;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	374
16817 069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	375 popup_adjust_position(wp);
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	376
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	377 wp->w_vsep_width = 0;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	378
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	379 redraw_all_later(NOT_VALID);
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	380 }
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	381
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	382 /*
16853 e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	383 * popup_create({text}, {options})
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	384 */
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	385 void
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	386 f_popup_create(typval_T argvars, typval_T rettv)
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	387 {
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	388 popup_create(argvars, rettv, FALSE);
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	389 }
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	390
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	391 /*
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	392 * popup_atcursor({text}, {options})
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	393 */
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	394 void
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	395 f_popup_atcursor(typval_T argvars, typval_T rettv)
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	396 {
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	397 popup_create(argvars, rettv, TRUE);
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	398 }
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	399
e6bcccccbf7b patch 8.1.1428: popup_atcursor() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16851 diff changeset	400 /*
16809 5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	401 * Find the popup window with window-ID "id".
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	402 * If the popup window does not exist NULL is returned.
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	403 * If the window is not a popup window, and error message is given.
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	404 */
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	405 static win_T *
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	406 find_popup_win(int id)
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	407 {
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	408 win_T *wp = win_id2wp(id);
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	409
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	410 if (wp != NULL && !bt_popup(wp->w_buffer))
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	411 {
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	412 semsg(_("E993: window %d is not a popup window"), id);
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	413 return NULL;
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	414 }
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	415 return wp;
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	416 }
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	417
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	418 /*
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	419 * Return TRUE if there any popups that are not hidden.
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	420 */
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	421 int
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	422 popup_any_visible(void)
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	423 {
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	424 win_T *wp;
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	425
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	426 for (wp = first_popupwin; wp != NULL; wp = wp->w_next)
16813 4cfad94161f4 patch 8.1.1408: PFL_HIDDEN conflicts with system header file Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	427 if ((wp->w_popup_flags & POPF_HIDDEN) == 0)
16809 5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	428 return TRUE;
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	429 for (wp = curtab->tp_first_popupwin; wp != NULL; wp = wp->w_next)
16813 4cfad94161f4 patch 8.1.1408: PFL_HIDDEN conflicts with system header file Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	430 if ((wp->w_popup_flags & POPF_HIDDEN) == 0)
16809 5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	431 return TRUE;
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	432 return FALSE;
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	433 }
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	434
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	435 /*
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	436 * popup_close({id})
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	437 */
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	438 void
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	439 f_popup_close(typval_T argvars, typval_T rettv UNUSED)
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	440 {
16809 5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	441 int id = (int)tv_get_number(argvars);
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	442
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	443 popup_close(id);
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	444 }
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	445
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	446 /*
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	447 * popup_hide({id})
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	448 */
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	449 void
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	450 f_popup_hide(typval_T argvars, typval_T rettv UNUSED)
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	451 {
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	452 int id = (int)tv_get_number(argvars);
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	453 win_T *wp = find_popup_win(id);
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	454
16813 4cfad94161f4 patch 8.1.1408: PFL_HIDDEN conflicts with system header file Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	455 if (wp != NULL && (wp->w_popup_flags & POPF_HIDDEN) == 0)
16809 5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	456 {
16813 4cfad94161f4 patch 8.1.1408: PFL_HIDDEN conflicts with system header file Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	457 wp->w_popup_flags \|= POPF_HIDDEN;
16809 5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	458 redraw_all_later(NOT_VALID);
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	459 }
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	460 }
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	461
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	462 /*
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	463 * popup_show({id})
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	464 */
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	465 void
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	466 f_popup_show(typval_T argvars, typval_T rettv UNUSED)
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	467 {
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	468 int id = (int)tv_get_number(argvars);
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	469 win_T *wp = find_popup_win(id);
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	470
16813 4cfad94161f4 patch 8.1.1408: PFL_HIDDEN conflicts with system header file Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	471 if (wp != NULL && (wp->w_popup_flags & POPF_HIDDEN) != 0)
16809 5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	472 {
16813 4cfad94161f4 patch 8.1.1408: PFL_HIDDEN conflicts with system header file Bram Moolenaar <Bram@vim.org> parents: 16811 diff changeset	473 wp->w_popup_flags &= ~POPF_HIDDEN;
16809 5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	474 redraw_all_later(NOT_VALID);
5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	475 }
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	476 }
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	477
16800 12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	478 static void
16809 5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	479 popup_free(win_T *wp)
16800 12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	480 {
16833 6699c03347d2 patch 8.1.1418: win_execute() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16829 diff changeset	481 wp->w_buffer->b_locked = FALSE;
16800 12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	482 if (wp->w_winrow + wp->w_height >= cmdline_row)
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	483 clear_cmdline = TRUE;
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	484 win_free_popup(wp);
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	485 redraw_all_later(NOT_VALID);
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	486 }
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	487
16794 ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	488 /*
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	489 * Close a popup window by Window-id.
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	490 */
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	491 void
16794 ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	492 popup_close(int id)
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	493 {
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	494 win_T *wp;
16794 ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	495 tabpage_T *tp;
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	496 win_T *prev = NULL;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	497
16794 ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	498 // go through global popups
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	499 for (wp = first_popupwin; wp != NULL; prev = wp, wp = wp->w_next)
16794 ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	500 if (wp->w_id == id)
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	501 {
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	502 if (prev == NULL)
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	503 first_popupwin = wp->w_next;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	504 else
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	505 prev->w_next = wp->w_next;
16809 5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	506 popup_free(wp);
16794 ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	507 return;
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	508 }
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	509
16794 ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	510 // go through tab-local popups
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	511 FOR_ALL_TABPAGES(tp)
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	512 popup_close_tabpage(tp, id);
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	513 }
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	514
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	515 /*
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	516 * Close a popup window with Window-id "id" in tabpage "tp".
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	517 */
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	518 void
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	519 popup_close_tabpage(tabpage_T *tp, int id)
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	520 {
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	521 win_T *wp;
16796 5f98d80d116a patch 8.1.1400: using global pointer for tab-local popups is clumsy Bram Moolenaar <Bram@vim.org> parents: 16794 diff changeset	522 win_T **root = &tp->tp_first_popupwin;
16794 ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	523 win_T *prev = NULL;
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	524
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	525 for (wp = *root; wp != NULL; prev = wp, wp = wp->w_next)
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	526 if (wp->w_id == id)
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	527 {
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	528 if (prev == NULL)
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	529 *root = wp->w_next;
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	530 else
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	531 prev->w_next = wp->w_next;
16809 5ff14f96f1c9 patch 8.1.1406: popup_hide() and popup_show() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16806 diff changeset	532 popup_free(wp);
16794 ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	533 return;
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	534 }
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	535 }
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	536
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	537 void
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	538 close_all_popups(void)
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	539 {
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	540 while (first_popupwin != NULL)
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	541 popup_close(first_popupwin->w_id);
16796 5f98d80d116a patch 8.1.1400: using global pointer for tab-local popups is clumsy Bram Moolenaar <Bram@vim.org> parents: 16794 diff changeset	542 while (curtab->tp_first_popupwin != NULL)
5f98d80d116a patch 8.1.1400: using global pointer for tab-local popups is clumsy Bram Moolenaar <Bram@vim.org> parents: 16794 diff changeset	543 popup_close(curtab->tp_first_popupwin->w_id);
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	544 }
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	545
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	546 void
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	547 ex_popupclear(exarg_T *eap UNUSED)
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	548 {
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	549 close_all_popups();
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	550 }
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	551
16817 069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	552 /*
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	553 * popup_move({id}, {options})
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	554 */
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	555 void
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	556 f_popup_move(typval_T argvars, typval_T rettv UNUSED)
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	557 {
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	558 dict_T *d;
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	559 int nr;
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	560 int id = (int)tv_get_number(argvars);
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	561 win_T *wp = find_popup_win(id);
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	562
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	563 if (wp == NULL)
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	564 return; // invalid {id}
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	565
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	566 if (argvars[1].v_type != VAR_DICT \|\| argvars[1].vval.v_dict == NULL)
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	567 {
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	568 emsg(_(e_dictreq));
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	569 return;
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	570 }
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	571 d = argvars[1].vval.v_dict;
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	572
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	573 if ((nr = dict_get_number(d, (char_u *)"minwidth")) > 0)
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	574 wp->w_minwidth = nr;
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	575 if ((nr = dict_get_number(d, (char_u *)"minheight")) > 0)
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	576 wp->w_minheight = nr;
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	577 if ((nr = dict_get_number(d, (char_u *)"maxwidth")) > 0)
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	578 wp->w_maxwidth = nr;
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	579 if ((nr = dict_get_number(d, (char_u *)"maxheight")) > 0)
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	580 wp->w_maxheight = nr;
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	581 if ((nr = dict_get_number(d, (char_u *)"line")) > 0)
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	582 wp->w_wantline = nr;
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	583 if ((nr = dict_get_number(d, (char_u *)"col")) > 0)
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	584 wp->w_wantcol = nr;
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	585 // TODO: "pos"
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	586
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	587 if (wp->w_winrow + wp->w_height >= cmdline_row)
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	588 clear_cmdline = TRUE;
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	589 popup_adjust_position(wp);
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	590 redraw_all_later(NOT_VALID);
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	591 }
069ee8dc8c8d patch 8.1.1410: popup_move() is not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16813 diff changeset	592
16829 5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	593 /*
5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	594 * popup_getposition({id})
5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	595 */
5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	596 void
5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	597 f_popup_getposition(typval_T argvars, typval_T rettv)
5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	598 {
5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	599 dict_T *dict;
5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	600 int id = (int)tv_get_number(argvars);
5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	601 win_T *wp = find_popup_win(id);
5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	602
5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	603 if (rettv_dict_alloc(rettv) == OK)
5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	604 {
5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	605 if (wp == NULL)
5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	606 return; // invalid {id}
5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	607 dict = rettv->vval.v_dict;
5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	608 dict_add_number(dict, "line", wp->w_winrow + 1);
5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	609 dict_add_number(dict, "col", wp->w_wincol + 1);
5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	610 dict_add_number(dict, "width", wp->w_width);
5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	611 dict_add_number(dict, "height", wp->w_height);
16841 cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	612 dict_add_number(dict, "visible",
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	613 (wp->w_popup_flags & POPF_HIDDEN) == 0);
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	614 }
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	615 }
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	616
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	617 /*
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	618 * f_popup_getoptions({id})
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	619 */
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	620 void
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	621 f_popup_getoptions(typval_T argvars, typval_T rettv)
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	622 {
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	623 dict_T *dict;
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	624 int id = (int)tv_get_number(argvars);
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	625 win_T *wp = find_popup_win(id);
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	626
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	627 if (rettv_dict_alloc(rettv) == OK)
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	628 {
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	629 if (wp == NULL)
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	630 return;
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	631
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	632 dict = rettv->vval.v_dict;
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	633 dict_add_number(dict, "line", wp->w_wantline);
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	634 dict_add_number(dict, "col", wp->w_wantcol);
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	635 dict_add_number(dict, "minwidth", wp->w_minwidth);
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	636 dict_add_number(dict, "minheight", wp->w_minheight);
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	637 dict_add_number(dict, "maxheight", wp->w_maxheight);
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	638 dict_add_number(dict, "maxwidth", wp->w_maxwidth);
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	639 dict_add_number(dict, "zindex", wp->w_zindex);
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	640 # if defined(FEAT_TIMERS)
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	641 dict_add_number(dict, "time", wp->w_popup_timer != NULL
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	642 ? (long)wp->w_popup_timer->tr_interval : 0L);
cf630fab9fb6 patch 8.1.1422: popup_getoptions() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16839 diff changeset	643 # endif
16829 5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	644 }
5cebaecad422 patch 8.1.1416: popup_getposition() not implemented yet Bram Moolenaar <Bram@vim.org> parents: 16817 diff changeset	645 }
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	646 #endif // FEAT_TEXT_PROP

Mercurial > vim

annotate src/popupwin.c @ 16853:e6bcccccbf7b v8.1.1428