vim: src/popupwin.c annotate

annotate src/popupwin.c @ 16802:f5487021fdad v8.1.1403

patch 8.1.1403: cannot build without the timer feature commit https://github.com/vim/vim/commit/35d5af6c0b618aef9ca87b05b2e184934e47d916 Author: Bram Moolenaar <Bram@vim.org> Date: Sun May 26 20:44:10 2019 +0200 patch 8.1.1403: cannot build without the timer feature Problem: Cannot build without the timer feature. Solution: Add #ifdef.

author	Bram Moolenaar <Bram@vim.org>
date	Sun, 26 May 2019 20:45:05 +0200
parents	12e3a3afdb6a
children	306766ed0f70

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 /*
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	19 * 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	20 * popup window "wp".
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	21 */
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	22 static void
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	23 apply_options(win_T wp, buf_T buf UNUSED, dict_T *dict)
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	24 {
16800 12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	25 int nr;
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	26
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	27 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	28 wp->w_maxheight = dict_get_number(dict, (char_u *)"maxheight");
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	29 wp->w_winrow = dict_get_number(dict, (char_u *)"line");
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	30 wp->w_wincol = dict_get_number(dict, (char_u *)"col");
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	31 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	32
16802 f5487021fdad patch 8.1.1403: cannot build without the timer feature Bram Moolenaar <Bram@vim.org> parents: 16800 diff changeset	33 #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	34 // 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	35 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	36 if (nr > 0)
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	37 {
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	38 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	39 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	40 typval_T tv;
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	41
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	42 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	43 "{_ -> 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	44 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	45 {
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	46 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	47 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	48 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	49 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	50 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	51 }
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	52 }
16802 f5487021fdad patch 8.1.1403: cannot build without the timer feature Bram Moolenaar <Bram@vim.org> parents: 16800 diff changeset	53 #endif
16800 12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	54
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	55 }
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	56
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	57 /*
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	58 * popup_create({text}, {options})
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	59 */
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	60 void
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	61 f_popup_create(typval_T argvars, typval_T rettv)
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	62 {
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	63 win_T *wp;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	64 buf_T *buf;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	65 dict_T *d;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	66 int nr;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	67
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	68 // Check arguments look OK.
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	69 if (!(argvars[0].v_type == VAR_STRING
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	70 && argvars[0].vval.v_string != NULL
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	71 && STRLEN(argvars[0].vval.v_string) > 0)
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	72 && !(argvars[0].v_type == VAR_LIST
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	73 && argvars[0].vval.v_list != NULL
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	74 && 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	75 {
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	76 emsg(_(e_listreq));
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	77 return;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	78 }
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	79 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	80 {
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	81 emsg(_(e_dictreq));
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	82 return;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	83 }
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	84 d = argvars[1].vval.v_dict;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	85
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	86 // Create the window and buffer.
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	87 wp = win_alloc_popup_win();
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	88 if (wp == NULL)
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	89 return;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	90 rettv->vval.v_number = wp->w_id;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	91 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	92
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	93 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	94 if (buf == NULL)
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	95 return;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	96 ml_open(buf);
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	97 curbuf = buf;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	98 set_string_option_direct((char_u *)"buftype", -1,
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	99 (char_u *)"popup", OPT_FREE\|OPT_LOCAL, 0);
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	100 set_string_option_direct((char_u *)"bufhidden", -1,
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	101 (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	102 curbuf = curwin->w_buffer;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	103 buf->b_p_ul = -1; // no undo
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	104 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	105 buf->b_p_bl = FALSE; // unlisted buffer
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	106
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	107 win_init_popup_win(wp, buf);
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	108
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	109 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	110 if (nr == 0)
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	111 {
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	112 // 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	113 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	114 curtab->tp_first_popupwin = wp;
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	115 }
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	116 else if (nr < 0)
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	117 {
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	118 // global popup
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	119 wp->w_next = first_popupwin;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	120 first_popupwin = wp;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	121 }
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	122 else
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	123 // TODO: find tab page "nr"
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	124 emsg("Not implemented yet");
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	125
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	126 // Add text to the buffer.
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	127 if (argvars[0].v_type == VAR_STRING)
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	128 // just a string
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	129 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	130 else if (argvars[0].vval.v_list->lv_first->li_tv.v_type == VAR_STRING)
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	131 {
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	132 listitem_T *li;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	133 linenr_T lnum = 0;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	134 char_u *p;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	135
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	136 // list of strings
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	137 for (li = argvars[0].vval.v_list->lv_first; li != NULL;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	138 li = li->li_next)
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	139 if (li->li_tv.v_type == VAR_STRING)
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	140 {
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	141 p = li->li_tv.vval.v_string;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	142 ml_append_buf(buf, lnum++,
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	143 p == NULL ? (char_u *)"" : p, (colnr_T)0, TRUE);
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	144 }
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	145 }
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	146 else
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	147 // TODO: handle a list of dictionaries
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	148 emsg("Not implemented yet");
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	149
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	150 // Delete the line of the empty buffer.
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	151 curbuf = buf;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	152 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	153 curbuf = curwin->w_buffer;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	154
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	155 // Deal with options.
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	156 apply_options(wp, buf, argvars[1].vval.v_dict);
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	157
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	158 // set default values
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	159 if (wp->w_zindex == 0)
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	160 wp->w_zindex = 50;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	161
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	162 // TODO: Compute the size and position properly.
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	163
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	164 // Default position is in middle of the screen, assuming a small popup
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	165 if (wp->w_winrow == 0)
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	166 wp->w_winrow = Rows > 5 ? Rows / 2 - 2 : 0;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	167 else
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	168 --wp->w_winrow; // option value is one-based
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	169 if (wp->w_wincol == 0)
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	170 wp->w_wincol = Columns > 20 ? Columns / 2 - 10 : 0;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	171 else
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	172 --wp->w_wincol; // option value is one-based
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	173
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	174
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	175 // TODO: set width based on longest text line and the 'wrap' option
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	176 wp->w_width = wp->w_maxwidth == 0 ? 20 : wp->w_maxwidth;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	177 if (wp->w_maxwidth > 0 && wp->w_width > wp->w_maxwidth)
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	178 wp->w_width = wp->w_maxwidth;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	179 if (wp->w_width > Columns - wp->w_wincol)
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	180 wp->w_width = Columns - wp->w_wincol;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	181
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	182 // TODO: adjust height for wrapped lines
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	183 wp->w_height = buf->b_ml.ml_line_count;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	184 if (wp->w_maxheight > 0 && wp->w_height > wp->w_maxheight)
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	185 wp->w_height = wp->w_maxheight;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	186 if (wp->w_height > Rows - wp->w_winrow)
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	187 wp->w_height = Rows - wp->w_winrow;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	188
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	189 wp->w_vsep_width = 0;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	190
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	191 redraw_all_later(NOT_VALID);
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	192 }
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	193
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	194 /*
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	195 * popup_close({id})
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	196 */
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	197 void
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	198 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	199 {
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	200 int nr = (int)tv_get_number(argvars);
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	201
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	202 popup_close(nr);
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	203 }
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	204
16800 12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	205 static void
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	206 popup_undisplay(win_T *wp)
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	207 {
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	208 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	209 clear_cmdline = TRUE;
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	210 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	211 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	212 }
12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	213
16794 ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	214 /*
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	215 * 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	216 */
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	217 void
16794 ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	218 popup_close(int id)
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	219 {
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	220 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	221 tabpage_T *tp;
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	222 win_T *prev = NULL;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	223
16794 ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	224 // go through global popups
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	225 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	226 if (wp->w_id == id)
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	227 {
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	228 if (prev == NULL)
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	229 first_popupwin = wp->w_next;
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	230 else
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	231 prev->w_next = wp->w_next;
16800 12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	232 popup_undisplay(wp);
16794 ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	233 return;
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	234 }
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	235
16794 ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	236 // 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	237 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	238 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	239 }
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	240
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	241 /*
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	242 * 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	243 */
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	244 void
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	245 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	246 {
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	247 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	248 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	249 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	250
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	251 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	252 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	253 {
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	254 if (prev == NULL)
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	255 *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	256 else
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	257 prev->w_next = wp->w_next;
16800 12e3a3afdb6a patch 8.1.1402: "timer" option of popup windows not supported Bram Moolenaar <Bram@vim.org> parents: 16796 diff changeset	258 popup_undisplay(wp);
16794 ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	259 return;
ddfa924df50d patch 8.1.1399: popup windows not adjusted when switching tabs Bram Moolenaar <Bram@vim.org> parents: 16778 diff changeset	260 }
16778 eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	261 }
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	262
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	263 void
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	264 close_all_popups(void)
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	265 {
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	266 while (first_popupwin != NULL)
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	267 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	268 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	269 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	270 }
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	271
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	272 void
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	273 ex_popupclear(exarg_T *eap UNUSED)
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	274 {
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	275 close_all_popups();
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	276 }
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	277
eda4d65f232c patch 8.1.1391: no popup window support Bram Moolenaar <Bram@vim.org> parents: diff changeset	278 #endif // FEAT_TEXT_PROP

Mercurial > vim

annotate src/popupwin.c @ 16802:f5487021fdad v8.1.1403